home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 57 / 64er_Magazin_Sonderheft_57_19xx_Markt__Technik_de_Side_B.d64 / hires+video (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  216b  |  12 lines
  1. 10 ifa<>ithen40
  2. 20 a$(1)="die neue bahn"
  3. 25 a$(2)="art studio"
  4. 30 a=a+1:loada$(a),8,1
  5. 40 i=i+1
  6. 50 poke56576,peek(56576)and252+2
  7. 60 poke53248+17,peek(53248+17)or32
  8. 70 poke53248+24,129
  9. 80 poke198,0:wait198,1
  10. 90 ifa<2then10
  11. 100 a=0:i=0:goto10
  12.