home *** CD-ROM | disk | FTP | other *** search
/ Black Box 4 / BlackBox.cdr / proglang / ladybug1.arj / SPINSQ.BUG < prev    next >
Text File  |  1991-01-13  |  191b  |  5 lines
  1. make "description [SPINSQUARES; from "Logo for the Apple II"]
  2. define "spinsquares [[ :size][repeat 18 [rt 20 repeat 4 [fd :size rt 90]]]]
  3. print :description
  4. print [type spinsquares 100 ]
  5.