home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 134 / Tiger_Disk_134_20xx_Tiger-Crew-Disk_de_Side_B.d64 / scroll-loader (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  629b  |  13 lines
  1. 2 ifpeek(816)=165andpeek(817)=244then10
  2. 3 print"[147] kill cartridge ! ":end
  3. 10 ifpeek(49152)<>169andpeek(49155)<>80thenload"scroll-file*",8,1
  4. 20 poke53280,.:poke53281,.:print"[147]";
  5. 30 print"dies ist nur ein lade-/demo-programm,   das dir zeigen soll, wie du ";
  6. 40 print"ein mit dem":print"scroll-maker v1.0[146] erstelltes scroll-filevon basic aus";
  7. 50 print" anzeigen kannst.":print"du musst dabei aber beachten, dass sich an der";
  8. 60 print" scroll-position":print"kein text[146] auf dem bildschirm befindet!"
  9. 70 print"    taste zum starten des scrolls !     "
  10. 80 poke198,0:wait198,1:poke198,0:sys49152
  11. 90 print"[145][145][145]":gosub100:poke198,0:wait198,1:poke198,0:sys64760
  12. 100 print"    taste zum beenden des programms     ":return
  13.