home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 53 / 64er_Magazin_Sonderheft_53_19xx_Markt__Technik_de_Side_A.d64 / demo.text (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  498b  |  18 lines
  1. 1 rem grafik 2001
  2. 2 rem demo text
  3. 5 (NULL)
  4. 6 (NULL)7,0
  5. 10 (NULL)1
  6. 20 a$="64'er [211]onderhefte"
  7. 30 zm=0:r=1:b=1:h=2:v=0:a=8:x=10:y=10:gosub999
  8. 40 zm=0:r=2:b=2:h=2:v=2:a=16:x=280:y=192:gosub999
  9. 50 zm=0:r=3:b=1:h=1:v=4:a=8:x=10:y=172:gosub999
  10. 60 zm=0:r=4:b=1:h=2:v=0:a=10:x=300:y=10:gosub999
  11. 70 zm=0:r=1:b=20:h=15:v=1:a=8:x=20:y=40:a$="5":gosub999
  12. 80 zm=0:r=1:b=2:h=2:v=1:a=16:x=170:y=40:a$="jahre":gosub999
  13. 90 zm=0:r=1:b=1:h=2:v=0:a=8:x=175:y=70:a$="1985-1990":gosub999
  14. 997 poke198,0:wait198,1
  15. 998 (NULL)0:end
  16. 999 (NULL)zm,r,b,h,v,a,x,y,a$
  17. 1000 return
  18.