home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_91-10_1991_-_de_Side_B.d64 / manta.anlt (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  31 lines
  1. 0 x=x+1:ifx=1thenpoke53272,18:poke53281,0:poke53280,0
  2. 2 ifx=1thengosub100:load"manta.scrn",8,1
  3. 3 ifx=2thenload"manta.anlo",8,1
  4. 4 print"[150]            >>> space <<<":poke198,0:wait198,1:print"[147]"
  5. 19 poke179,32:poke178,0:sys8158:x=0:poke198,0
  6. 20 getz$:ifz$<>"[133]"andz$<>"[134]"andz$<>"[140]"then20
  7. 22 poke198,0:ifz$="[140]"then50
  8. 24 ifz$="[133]"thenx=x+1
  9. 26 ifz$="[134]"thenx=x-1
  10. 28 ifx>6thenx=0
  11. 30 ifx<0thenx=0
  12. 32 k=1024*x+8192:poke179,k/256:poke178,k-256*peek(179):sys8158:goto20
  13. 50 print"[147][144]l[207]";chr$(34);"manta.load";chr$(34);",8:":print"run:":poke198,0
  14. 52 poke252,1:poke631,19:poke632,13:poke633,13:poke198,3:end
  15. 100 print"[147][158]             game credits"
  16. 110 print"           ----------------"
  17. 120 print" idee und konzept : oliver b\ttner":print
  18. 125 print" programmierung   : oliver b\ttner"
  19. 128 print"                    michael r\ttinger":print
  20. 130 print" texte            : oliver b\ttner"
  21. 134 print"                    michael r\ttinger":print
  22. 138 print" musik            : ein unf]higer (!)
  23. 142 [153]"print":[153]:[153]"some fast greets to :"
  24. 146 [153]" didi b[hnke (f\r die drannsl]ischn),"
  25. 150 [153]" hans b\ttner (f\r anregungen),"
  26. 160 [153]" rich martinez (keep on baggin'),"
  27. 164 [153]" x-ample, walter konrad, and least of"
  28. 168 [153]" all , to the dudes from trashcan soft."
  29. 190 [142]
  30. 200 [159]1,8,15,"s:manta.anlt":[160]1:[148]"manta.anlt",8
  31.