home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 24 / 64er_Magazin_Sonderheft_24_19xx_Markt__Technik_de_Side_A.d64 / demo1 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  231 b   |  18 lines
  1. 2 (NULL) 1:print"  grafik demo 1"
  2. 10 (NULL)0
  3. 20 (NULL)
  4. 30 (NULL) 3,0
  5. 40 fori=0to250
  6. 50 (NULL) i,80,o,o
  7. 60 o=o+2:ifo=>50theno=2:i=i+50
  8. 70 next
  9. 71 geta$:ifa$=""then71
  10. 75 (NULL)0:(NULL)
  11. 90 (NULL) 1
  12. 100 fori=0to99
  13. 110 (NULL) 0,i,319-i,i
  14. 120 next
  15. 130 (NULL) 0,0,319,199
  16. 135 geta$:ifa$=""then135
  17. 1010 (NULL)
  18.