home *** CD-ROM | disk | FTP | other *** search
/ Input 64 / Input_64_85-11_1985_Verlag_Heinz_Weise_de.d64 / planetarium (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  20KB  |  14 lines
  1. 10 ifpeek(50307)<>120then110
  2. 20 poke50258,64:poke50255,peek(50255)+1
  3. 30 poke50257,24:poke50259,1:poke50260,8
  4. 40 poke50261,0:poke50262,86
  5. 50 poke53280,0:poke53281,5:printchr$(14)chr$(8)
  6. 55 print"[147][144]   [208][204][193][206][197][212][193][210][201][213][205][160]- [214][207][206][160][198][210][193][206][203][160][194][207][197][210][206][195][203][197]     "
  7. 60 print"[215]enn [211]ie das [208]rogramm sichern wollen,"
  8. 70 print"tun [211]ie das bitte [202][197][212][218][212] mit [195][212][210][204][146]+s[146] !"
  9. 71 print"[163][163][163][163][163]"
  10. 80 print"[196]ruecken [211]ie irgendeine [212]aste, um"
  11. 90 print" mit dem [208]rogramm zu beginnen.";
  12. 100 poke198,0:wait198,1:poke50257,20:print"[147]"
  13. 110 sys2560
  14.