home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 55 / 64er_Magazin_Sonderheft_55_19xx_Markt__Technik_de_Side_B.d64 / bildanzeiger (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  416 b   |  16 lines
  1. 1 rem bildanzeiger fuer hitoloko
  2. 2 rem (c) nikolaus heusler - 27.4.90
  3. 3 rem zwengauerweg 18 - 8 muc 71
  4. 4 rem 64'er sonderheft 55
  5. 5 rem markt & technik, 8013 haar
  6. 6 :
  7. 10 ifa=0thengosub1000:poke56,32:clr
  8. 20 ifa=0thena=1:poke0,47:load"z.bild",8,8
  9. 30 ifa=1thena=2:poke0,111:poke53272,24:load"s.bild",8,8
  10. 40 poke198,.:wait198,1
  11. 50 fori=1to25:print:next:sys65409:end
  12. 60 :
  13. 1000 print"[147][158]";:fori=1to111:print"@@@@@@@@@";:next
  14. 1002 poke53280,0:poke53281,6:poke2023,peek(2022):poke56295,peek(56294)
  15. 1004 return
  16.