include “file_name”

Incluye un fichero fuente en tiempo de ejecución en el programa. El argumento al comando (file_name) debe ser una variable alfanumérica o una cadena o un literal.
Loads an external source file at compile (when the run button is pressed) time into the program. The argument to the Include statement must be a string constant.

include "smilesubroutine.kbs"
clg
while true
   call drawsmile(300*rand, 300*rand, 50*rand+5)
end while
end

subroutine drawsmile(x,y,r)
   # draw a smile with the center at x,y and with a radius of r
   # position and size everything based on fractional multiples of the radius
   color black, yellow
   penwidth 1
   circle x, y, r
   color black
   circle x, y+.2*r, .5*r
   color yellow
   circle x, y, .5*r
   color black
   eye = int(.1*r)
   if eye=0 then eye = 1
   circle x-.35*r, y-.3*r, eye
   circle x+.35*r, y-.3*r, eye
end subroutine