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