home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / a / armforth / !Forth / Forth / demos / graphics < prev   
Encoding:
Text File  |  1991-04-09  |  171 b   |  4 lines
  1. : box 0 200 1 plot 200 0 1 plot 0 -200 1 plot -200 0 1 plot ;
  2. : boxes 1000 0 do i i 4 plot i 256 / drop 0 gcol box refresh 11 +loop ;
  3. : test 100 0 do cls boxes loop ;
  4. test