home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 53 / 64er_Magazin_Sonderheft_53_19xx_Markt__Technik_de_Side_A.d64 / demo.recht (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  234b  |  15 lines
  1. 1 rem grafik 2001
  2. 2 rem demo recht
  3. 3 rem 2.90/bl
  4. 10 (NULL)
  5. 11 (NULL)8,0
  6. 12 poke53280,0
  7. 13 (NULL)1
  8. 15 x=319:y=199
  9. 30 fori=0to319step2
  10. 31 ifi>199ory<0then70
  11. 40 (NULL)0,i,i,x,y:x=x-2:y=y-2
  12. 50 next:poke53280,1
  13. 70 (NULL)0,1,2,2,1,16,0,180,"recht"
  14. 1000 poke198,0:wait198,1:(NULL)0:end
  15.