SQUARE.BUG  ·  BUG  ·  163 B  ·  1983-08-29  ·  from CompuLink-User-Group_Software-Library_COMUG-Disk-49-LADYBUG
make "description [Draw a right handed square]
define "square [[:side][repeat 4 [forward :side right 90]]]
print [Loaded: square]
print [Usage:  SQUARE side]