home *** CD-ROM | disk | FTP | other *** search
/ Mail Madness! 5 / Mail_Madness_05_19xx_-_Side_B.d64 / schotter (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  23KB  |  68 lines
  1. 0 hi=100
  2. 1 :
  3. 2 rem (c) 1985 the second projekt
  4. 3 rem
  5. 4 rem      -- schotter --
  6. 5 :
  7. 10 poke53280,9:poke53281,9:si=54272:v=53248:ifpo>hithenhi=po
  8. 15 po=0:ag=0:be=0:g=0:gf=0:fa=0:poke53272,31:poke53265,11
  9. 20 print"[147][158]                   ["
  10. 25 print"           @c[146]      \"
  11. 30 print"           ad[146]        o[146]   uxz"
  12. 35 print"           befghijklmnprstwy
  13. 40 [153]"                      qwait  v"
  14. 45 [153]"               presents:
  15. 50 print"[144] [193]> ;+> ;+> ;?> ;+>[193]++>[193]+++?;+> ;+>[193]>
  16. 55 [153]"  ? +?atn +?atn +peek+ +?+ atn+? atn+? +?atn +tan+ ?
  17. 60 print"    <+> +   +++ + +  +   +  +=? ++=
  18. 65 [153]"    tanpeek+ +tanpeek +?+ +peek+  +   +  +tanpeek +<tan
  19. 70 print"    <+= <+= <[194]= <+= [194]+[192] [194]+[192] <+= <[193]>
  20. 745 [153]"    geschrieben von : edzard wittig
  21. 750 print"[144]        letzter highscore :";hi
  22. 755 poke53265,27:fort=0to500:next:sys21007
  23. 800 sys 20480
  24. 805 ifpeek(56320)<>111then805
  25. 810 pokesi+11,0:pokesi+18,0:pokesi+4,0
  26. 820 poke53280,0:poke53281,0
  27. 830 print"[147]    beschleunigung :
  28. 840 [153]"    anfangsgeschw. :
  29. 850 print"       'gefallene' :
  30. 860 [153]"( '1' bis '6' )
  31. 865 geta$:ifa$<"1"ora$>"6"then865
  32. 870 print"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]0.0"a$" schritte  "
  33. 875 print"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]('1' bis '9')
  34. 880 [161]b$:[139]b$[179]"1"[176]b$[177]"9"[167]880
  35. 885 [153]"cmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmd0."b$" schritte   "
  36. 890 [153]"cmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmdcmd('1' bis '9')
  37. 895 getc$:ifc$<"1"orc$>"9"then895
  38. 900 print"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]"c$" sind erlaubt
  39. 910 [153]"stop        alles richtig, dann taste":[158]21007:[151]198,0
  40. 920 [161]d$:[139]d$[178]""[167]920
  41. 930 [139]d$[178]"n"[167]820
  42. 935 be[178][197] (a$)[173]100
  43. 940 ag[178][197] (b$)[173]10
  44. 945 gf[178][197] (c$)
  45. 1005 [151]v[170]1,156:[151]v[170]23,1:[151]v[170]0,255:[151]49152[170]6,255
  46. 1010 [151]v[170]39,15:[151]2040,255:[151]v[170]2,146:[151]v[170]3,174:[151]v[170]29,2
  47. 1015 [151]v[170]40,1:[151]2041,254:[151]2042,253:[151]v[170]41,7
  48. 1020 [151]si[170]13,0:[151]si[170]12,9:[151]si[170]24,31:[151]si[170]23,241:[151]si[170]8,100
  49. 1021 [151]si[170]6,240:[151]si[170]4,33:[151]si[170]22,60
  50. 1055 [158]21057:[151]v[170]21,7
  51. 1100 [151]v[170]4,[181]([187](1)[172]245)[170]10:[151]v[170]30,0:[151]v[170]5,0:[151]v[170]21,7:ag[178]ag[170]be
  52. 1105 [139][194](v[170]16)[178]5[167][151]v[170]16,1
  53. 1106 [139][194](v[170]16)[178]4[167][151]v[170]16,0
  54. 1110 [129]t[178]0[164]168[169]ag:[151]v[170]5,t
  55. 1115 [139]t[177]160[167][139]([194](v[170]30)[175]6)[178]6[167]1210
  56. 1120 [151]si[170]1,255[171]t:[130]:[139]ag[177]2.9[167]ag[178].9
  57. 1200 [151]si[170]11,0:[151]si[170]11,129:fa[178]fa[170]1:[139]fa[178]gf[167]1220
  58. 1205 [151]v[170]21,3:[153]""[163]21)fa:[137]1100
  59. 1210 [151]si[170]11,0:[151]si[170]11,17:[151]v[170]21,3:po[178]po[170]11
  60. 1215 [153]""[163]33)po:[137]1100
  61. 1220 [151]v[170]21,0:[153]"load":[151]49160,1:[129]t[178]0[164]100:[130]:[151]v[170]22,200
  62. 1225 [153]"loadame over game over game over game over g"
  63. 1230 [153]"stop            ihr score : "po:[158]21007:[151]198,0:[151]si[170]4,129
  64. 1235 [161]a$
  65. 1240 [151]si[170]1,[181]([187](1)[172]255):[151]si[170]22,[181]([187](1)[172]100)
  66. 1250 [139]a$[178]""[167]1235
  67. 1255 [151]si[170]4,0:[153]"load":[151]v[170]22,200:[151]v[170]16,0:[137]10
  68.