home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_88-03_1988_-_de_Side_B.d64 / balloon raid (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  11KB  |  273 lines
  1. 8 poke51,200:poke52,105:poke53,200:poke54,105:j=peek(186)
  2. 10 a=a+1:ifa=1thenload"part 1",j,1
  3. 11 b=b+1:ifb=1thenload"part 2",j,1
  4. 12 sys6196:sys6246:print"[147]":poke53265,65
  5. 13 print"load"chr$(34)"part 3"chr$(34)",j,1:":print"goto15"
  6. 14 poke631,19:poke632,13:poke633,13:poke634,13:poke198,4:end
  7. 15 poke51,200:poke52,105:poke53,200:poke54,105:ll=peek(186):ifll=1then9100
  8. 16 open2,8,2,"points,p,r"
  9. 17 fort=1to10:input#2,n$(t):input#2,hs(t):nextt:close2:goto9100
  10. 980 print"[147]":poke53280,0:poke53281,3:poke53282,0:poke53283,13:poke2040,210
  11. 982 poke53287,1:a=peek(1015):poke53281,3:poke53265,65:a=a+1:poke1015,a
  12. 983 onagoto1000,3000,8990,4000,5000,8990,5100,5300,8990,5200,993
  13. 993 poke1015,0:poke53281,0:print"[147]":poke53269,0:poke53265,155
  14. 994 print"[149]    congratulations you have destroyed"
  15. 995 printtab(15)"all enemies"
  16. 996 si=54272:fori=0to24:pokesi+i,0:next:pokesi+24,15:pokesi+5,8:pokesi+6,255
  17. 997 pokesi+4,23:f2=4:forz=1to5:pokesi+15,f2
  18. 998 forf1=1to160:pokesi+1,f1:f2=f2+.01:nextf1:nextz:pokesi+4,0:goto980
  19. 1000 print"[147][153]          [218]              [207]
  20. 1001 [153]"  (NULL)    (NULL) (NULL)left$ (NULL)      (NULL)  (NULL) (NULL)(NULL)    (NULL)   (NULL)
  21. 1002 print" [205][206]  [218] [203] [205][206][204][200]     [205][206] [207][206] [218][197][207]  [205][206]   [200]
  22. 1003 [153]" mid$(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)mid$(NULL)asc(NULL)(NULL)    mid$(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)  mid$(NULL)(NULL) (NULL)(NULL)
  23. 1004 print" [202][197][204][202][203][196][197][206][196][197][198][203][204]    [199][197][198][198][200][201][200][196][206][204] [202][203][204] [202][206][204]
  24. 1005 [153]" chr$left$right$mid$left$str$ascleft$ascleft$str$val(NULL)lcdewaitprintchr$left$(NULL)val(NULL)str$valval(NULL)(NULL) chr$left$right$ mid$(NULL)(NULL)
  25. 1006 print" [199][197][201][202][197][198][200][200][198][200][198][197][201]    [196][197][197][196][197][198][200][197][206][201]c[146][153][196][206][198]d[146][153][199][197][201]jkal[153][146]";
  26. 1007 print" [196][197][198][199][200][196][196][197][198][209][199][203][201]    [208][196][203][198][194][196][203][198][206][201] [198][200][196] [199][200][201]
  27. 1008 [153]" asc(NULL)str$str$valascvalleft$str$(NULL)str$valasc][][%(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)str$left$asc str$valasc asc(NULL)asc
  28. 1009 print"][208][209][210][196][200][196][196][203][198][[196][206][198]#][^^^#%[!#[210][209][208][[208][209][210]][196][197][198]
  29. 1010 [153]"]#%!(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)[(NULL)(NULL)(NULL)!]^^[^[^][^!%#]!##[(NULL)(NULL)(NULL)[contnot__";
  30. 1011 [153]"^^[^!##%##]%##%^]^]^%^[^]^#^^^]^]!#(NULL)(NULL)___";
  31. 1012 [153]"^^^]^^^^^[^^]^^^^^]^^^]^\(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)_(NULL)*(NULL)_____";
  32. 1013 [153]"(NULL)_(NULL)(NULL)\[^^(NULL)(NULL)^^^]^^[^^#^(NULL)(NULL)(NULL)________________";
  33. 1014 [153]"_____(NULL)*(NULL)__(NULL)(NULL)(NULL)*(NULL)(NULL)(NULL)^\(NULL)(NULL)___________________";:a[178]4:[137]1100
  34. 1100 [129]k[178]1[164]a:[153]"cont________________________________________";:[130]
  35. 1101 [153]"_______________________________________";:[151]1024[170]999,31
  36. 1102 [151]55296[170]999,6:l[178]21[171][194](907)
  37. 1103 [153]"listscore(NULL)verify000000(NULL)(NULL)liste(NULL)605(NULL)rate(NULL)00(NULL)verify00(NULL)(NULL)listlives(NULL)verify03";
  38. 1104 [153]"defammunition(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)";:[139]l[179]10[167]1210
  39. 1105 [151]211,24:[151]214,0:[158]58640:[153]"poke"l"";:[153]"cmdcmdcmdcmd(NULL)";:[151]53265,155
  40. 1106 a[178][194](860):b[178][194](861):sc[178]b[172]256:sc[178]sc[170]a
  41. 1107 [139]sc[177]9999[167]1113
  42. 1108 [139]sc[177]999[167]1115
  43. 1109 [139]sc[177]99[167]1120
  44. 1110 [139]sc[177]9[167]1125
  45. 1111 c[178]9:d[178]1033
  46. 1112 [137]1130
  47. 1113 c[178]5:d[178]1035
  48. 1114 [137]1130
  49. 1115 c[178]6:d[178]1030
  50. 1116 [137]1130
  51. 1120 c[178]7:d[178]1031
  52. 1121 [137]1130
  53. 1125 c[178]8:d[178]1032
  54. 1130 [151]214,0:[151]211,c:[158]58640
  55. 1133 [153]"verify"sc"":[139]sc[177]9999[167][151]1029,94
  56. 1135 [151]d,48:a[178][194](896)
  57. 1136 [151]211,38:[151]214,0:[158]58640:[153]"verify"a"";:[153]"cmdcmdcmd0";
  58. 1137 a[178][194](1015):[139]a[178]3[176]a[178]6[176]a[178]9[167]1145
  59. 1140 [158]27216:[151]53278,0:[158]33681:a[178][194](842):[139]a[178]46[167]1160
  60. 1141 a[178][194](40959):[139]a[178]1[167]1143
  61. 1142 [137]982
  62. 1143 a[178][194](1015):a[178]a[171]1:[151]1015,a:[137]982
  63. 1145 [151]53264,0:[158]8192:[151]913,245:[158]33681:[151]913,0:[151]53283,13:[137]982
  64. 1160 sc[178][194](861):sc[178]sc[172]256:b[178][194](860):sc[178]sc[170]b:sc[178]sc[172]10:[139]sc[177]hs(10)[167]1167
  65. 1161 [137]9100
  66. 1167 sc[178]sc[173]10
  67. 1168 [153]"loadverify":[151]53280,15:[151]53281,15:[151]53265,65
  68. 1169 [151]214,8:[151]211,6:[158]58640:[151]53282,11:n$[178]""
  69. 1170 [153]"(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)"
  70. 1171 [153][163]6)"(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)poketype(NULL)in(NULL)your(NULL)name(NULL)(NULL)(NULL)(NULL)(NULL)for_"
  71. 1172 [153][163]6)"(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)for_"
  72. 1173 [153][163]6)"(NULL)lista(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)verify000000(NULL)points(NULL)for_"
  73. 1174 [153][163]6)"(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)_"
  74. 1175 [153][163]7)"____________________________"
  75. 1180 [139]sc[177]9[167]a[178]22:b[178]462
  76. 1181 [139]sc[177]99[167]a[178]21:b[178]461
  77. 1182 [139]sc[177]999[167]a[178]20:b[178]460
  78. 1183 [139]sc[177]9999[167]a[178]19:b[178]459
  79. 1184 [151]211,a:[151]214,11:[158]58640:[153]"verify"sc"":[151]1024[170]b,48:[151]1483,94
  80. 1185 o[178]7:[151]53265,155
  81. 1186 [161]a$:[139]a$[178]""[167]1186
  82. 1187 [139]a$[178]""[167]a$[178]"(NULL)"
  83. 1188 [139]a$[178]""[167]1196
  84. 1189 [139]a$[178]"load"[167]1169
  85. 1190 [139]a$[178]" "[167]1169
  86. 1191 c[178][194](197):[139]c[178]1[167]1200
  87. 1192 [139]c[178]0[167]1169
  88. 1193 [141]1900
  89. 1194 [151]211,o:[151]214,11:[158]58640:[153]"list"a$"":o[178]o[170]1:[139]o[178]19[167]1197
  90. 1195 n$[178]n$[170]a$:[137]1186
  91. 1196 [151]211,7:[151]214,11:[158]58640:[153]"(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)";:[137]1185
  92. 1197 o[178]o[171]1:[137]1186
  93. 1200 [151]53280,0:[151]53281,0:[151]53282,0:[137]9202
  94. 1210 [151]211,25:[151]214,0:[158]58640:[153]"poke"l"";:[153]"cmdcmdcmd0";:[151]53265,155
  95. 1211 [137]1106
  96. 1900 si[178]54272:[151]si[170]24,15:[151]si[170]23,240:[151]si[170]6,0:[151]si[170]5,6
  97. 1901 [151]si[170]11,0:[151]si[170]18,0:[151]si[170]4,0:[151]si[170]1,60:[151]si[170]15,5:[151]si[170]4,21
  98. 1902 [142]
  99. 3000 [153]"loadprint";
  100. 3001 [153]"  (NULL)
  101. 3002 print"[218][205][206][207]  [218]
  102. 3003 [153]"(NULL)(NULL)(NULL)(NULL)  (NULL)   (NULL)   (NULL)    (NULL)
  103. 3004 print"[200][207][196][203] [207][203][204][218][205][206]  [207][203] [207]  [206]
  104. 3005 [153]"(NULL)(NULL)asc(NULL)(NULL)(NULL)val(NULL)valmid$(NULL)(NULL)(NULL)(NULL)val(NULL)(NULL) (NULL)val(NULL)                  (NULL)";
  105. 3006 [153]"asc(NULL)ascstr$right$(NULL)str$str$(NULL)str$left$right$mid$(NULL)valstr$(NULL)(NULL)mid$(NULL)right$               (NULL)  val";
  106. 3007 [153]"str$(NULL)str$valasc(NULL)valstr$left$asc(NULL)right$chr$(NULL)str$val(NULL)right$chr$left$right$              (NULL)(NULL) (NULL)val";
  107. 3008 [153]"asc(NULL)(NULL)(NULL)str$left$ascascleft$ascvalright$chr$(NULL)str$ascvalascstr$valright$              mid$(NULL)(NULL)(NULL)(NULL)";
  108. 3009 [153]"str$left$ascvalascvalascstr$(NULL)str$(NULL)valstr$left$valval(NULL)str$asc(NULL)str$defklawait lcdeghiwaitprintchr$valright$left$(NULL)";
  109. 3010 [153]"str$(NULL)val(NULL)str$(NULL)(NULL)str$(NULL)ascvalascascvalascval(NULL)ascascvalasc              chr$left$str$valasc";
  110. 3011 [153]"asc(NULL)(NULL)(NULL)asc(NULL)left$asc(NULL)str$(NULL)str$str$(NULL)valstr$valascstr$(NULL)(NULL)contposfreand________-=^printascvalstr$(NULL)val";
  111. 3012 [153]"str$valascascstr$(NULL)ascstr$(NULL)ascvalstr$asc(NULL)str$str$(NULL)(NULL)(NULL)!^[]cont]poscoscosand____(NULL)(NULL)]printstr$left$ascvalasc";
  112. 3013 [153]"str$left$(NULL)(NULL)ascleft$str$ascleft$asc(NULL)(NULL)str$valasc(NULL)%!#^[^cont]\(NULL)*^(NULL)_____-[print(NULL)(NULL)(NULL)(NULL)(NULL)";
  113. 3014 [153]"ascstr$(NULL)str$(NULL)(NULL)(NULL)str$valasc!#(NULL)(NULL)(NULL)%]cont](NULL)^tab((NULL)________-fre=]^#%!(NULL)^";
  114. 3015 [153]"printstr$(NULL)peek(NULL)%%!(NULL)(NULL)(NULL)]][[]]cont^^posfreand_________(NULL)(NULL)]\(NULL)^tab((NULL)__";
  115. 3016 [153]"print(NULL)(NULL)(NULL)%[[^%#%^]^]^[cont^^]^^not__________________";
  116. 3017 [153]"#%%!(NULL)*(NULL)][]^[^^[^]^^(NULL)(NULL)___________________";
  117. 3018 [153]"tab((NULL)______(NULL)(NULL)\(NULL)(NULL)^(NULL)^tab(*(NULL)_____________________";:a[178]2:[137]1100
  118. 4000 [153]"load";:[153]"print (NULL)
  119. 4001 print"[218][203][204][218]       [218] [218]
  120. 4002 [153]"(NULL)(NULL)asc(NULL)     (NULL)(NULL)(NULL)(NULL)(NULL)     (NULL)       (NULL)      (NULL)   (NULL)
  121. 4003 print"[203][197][198][203][204]   [205][206][202][203][204][203][204]   [205][206]      [205][206]     [205][203] [218][205][206]
  122. 4004 [153]"left$ascstr$left$right$efkprintwaitmid$(NULL)str$valasc(NULL)(NULL)cklprintwait(NULL)(NULL)(NULL)cdklwaitdeforsinlog*>rnd  printmid$(NULL)(NULL)(NULL)mid$(NULL)(NULL)";
  123. 4005 [153]"val(NULL)str$valasc   mid$left$str$valascleft$right$   mid$(NULL)right$    listfnsgnverifynewlistintgetabs  printchr$left$asc(NULL)ascleft$right$";
  124. 4006 [153]"(NULL)(NULL)(NULL)(NULL)(NULL)cont[posfreprintascleft$ascleft$str$valasccontfreand_printascleft$str$cont_-=^%]!][^posandprintstr$valasc(NULL)str$valasc";
  125. 4007 [153]"!#%!%]]^str$valstr$(NULL)ascvalasc[^contposprintstr$valasccont=^^^^^]^]^^]printasc(NULL)asc(NULL)asc(NULL)asc";
  126. 4008 [153]"cont(NULL)(NULL)(NULL)^tab((NULL)[]print(NULL)(NULL)(NULL)#(NULL)(NULL)(NULL)][^ascleft$str$^[^^]^^][^^[(NULL)(NULL)(NULL)#(NULL)(NULL)(NULL)";
  127. 4009 [153]"cont______(NULL)(NULL)##!]!#%[^]printasc(NULL)asc[^^]^^[]^][^#%![#!#";
  128. 4010 [153]"cont______-=]^^[]]^^^[print(NULL)(NULL)(NULL)@^^^^^^^^]^[^[]][]^";
  129. 4011 [153]"cont_____spc(]\^[^(NULL)tab((NULL)^[]^!#%^^^(NULL)^tab((NULL)(NULL)(NULL)(NULL)^tab(*^tab((NULL)^][";
  130. 4012 [153]"________(NULL)(NULL)(NULL)___(NULL)(NULL)^^[]]^]^posfreand__________(NULL)(NULL)^";
  131. 4013 [153]"______________-=^^^^^^[^^]^not____________";
  132. 4014 [153]"__________-fre=+^[^][[^(NULL)(NULL)(NULL)^tab((NULL)_____________";
  133. 4015 [153]"_________spc(^[]^](NULL)(NULL)(NULL)^tab((NULL)___________________";
  134. 4016 [153]"__________(NULL)^^tab((NULL)_________________________";:a[178]2:[137]1100
  135. 5000 [153]"load";
  136. 5001 [153]"print                                      (NULL)
  137. 5002 print"        [218]               [207]  [218]        [218][205][206]
  138. 5003 [153]"       (NULL)(NULL)              (NULL)(NULL) (NULL)(NULL)   (NULL) (NULL) (NULL)(NULL)mid$(NULL)(NULL)";
  139. 5004 [153]"       mid$(NULL)              mid$(NULL)(NULL)mid$left$(NULL) (NULL)(NULL)(NULL)left$(NULL)mid$(NULL)chr$left$right$";
  140. 5005 [153]"defklwait  printchr$left$deforsin>rndcldeghijklwaitprintmid$(NULL)right$mid$valright$ mid$(NULL)chr$val(NULL)str$valstr$valasc";
  141. 5006 [153]"       chr$left$str$listsgngetabs          printchr$left$str$str$valasc chr$left$str$str$(NULL)ascstr$ascvalasc";
  142. 5007 [153]"cont_____-=printstr$valasc#%^contposfrecosand______printstr$left$ascstr$(NULL)asccont_printascvalstr$(NULL)left$asc(NULL)str$(NULL)str$";
  143. 5008 [153]"cont___-=[]print(NULL)(NULL)(NULL)#]^cont]^(NULL)^______printascvalstr$(NULL)(NULL)(NULL)[str$(NULL)str$str$(NULL)asc(NULL)ascstr$asc";
  144. 5009 [153]"cont__spc(^]^[!#%!(NULL)(NULL)(NULL)^____-=pos=print(NULL)(NULL)(NULL)@#![asc(NULL)ascascleft$ascvalstr$(NULL)asc";
  145. 5010 [153]"cont___(NULL)(NULL)(NULL)^tab((NULL)(NULL)(NULL)______-=^[^]%!![][[print(NULL)(NULL)(NULL)str$(NULL)asc(NULL)(NULL)(NULL)asc";
  146. 5011 [153]"cont______________-fre=^^[]^^^]^^]^^%#%print(NULL)(NULL)(NULL)@(NULL)(NULL)(NULL)";
  147. 5012 [153]"cont____-frefre=posfrecoscosfre=^^^]^^^]^(NULL)(NULL)^]^]^[^]!#%[%#!";
  148. 5013 [153]"___spc(\^^[^]^^(NULL)^tab((NULL)(NULL)^exptab((NULL)(NULL)(NULL)__(NULL)^tab((NULL)^]^]^][^[][";
  149. 5014 [153]"_____(NULL)^^tab((NULL)(NULL)(NULL)_________________(NULL)(NULL)(NULL)(NULL)]^[^]^^";
  150. 5015 [153]"_________________________________(NULL)(NULL)(NULL)(NULL)^[^";
  151. 5016 [153]"_____________________________________(NULL)^tab(";:a[178]2:[137]1100
  152. 5100 [153]"loadprint             (NULL)
  153. 5101 print"   [218]         [197]
  154. 5102 [153]"  (NULL)(NULL)        (NULL)left$(NULL)   (NULL)     (NULL)
  155. 5103 print"  [202][203][204]      [205][206][196][206]  [205][206]   [207][205][206]
  156. 5104 [153]"  mid$(NULL)(NULL)      mid$(NULL)left$val  mid$(NULL)(NULL) (NULL)(NULL)mid$(NULL)(NULL)
  157. 5107 print"  [199][200][201]      [202][203][206][203][204] [202][203][204] [202][203][196][197][201]
  158. 5108 [153]"deforsinloglog*>rnd    printchr$left$str$left$right$ chr$left$right$ chr$left$str$left$ascdef>rnd
  159. 5109 print"[155][165][180][149][162][155][181][161][181][182][150][176][191][188][172][153][196][197][197][197][198][150][191][188][188][188][172][153][196][197][198][196][198][155][181][182]ldkl[146] cdegijk[146]";
  160. 5110 print"[154]#!!%#[[151][185][155][165][180][149][162][155][181][153][198][203][198][203][196][155][180][181][161][181][161][153][198][200][198][206][198]!^[151][185][175][153]
  161. 5111 [153]"[^]^[^^#%!!(NULL)(NULL)str$(NULL)asc#]#!%str$(NULL)asc(NULL)(NULL)@[]^contposfreand_______";
  162. 5112 [153]"^^^[]^^[^]^#%print(NULL)(NULL)(NULL)@[]^^(NULL)(NULL)(NULL)@[#[^[^[^contposand_____";
  163. 5113 [153]"^^^^^^[^^^[][!#%##^]^#%!#][^^^^]^]^not____";
  164. 5114 [153]"(NULL)^]^^^^^^[^]^^]^[^]^^[^^]^^^]^^(NULL)^exp______";
  165. 5115 [153]"_(NULL)\(NULL)^exptab((NULL)(NULL)^(NULL)(NULL)(NULL)^^^]^^^]^^(NULL)^(NULL)(NULL)^tab(^(NULL)_________";
  166. 5116 [153]"_____________(NULL)(NULL)^^(NULL)^tab((NULL)(NULL)(NULL)_________________";
  167. 5117 [153]"_______________(NULL)(NULL)_______________________";:a[178]3:[137]1100
  168. 5120 [128]
  169. 5200 [153]"loadprint";
  170. 5201 [153]"               (NULL)
  171. 5202 print"    [218]     [207] [218] [205][206]   [218]
  172. 5203 [153]"   (NULL)(NULL)(NULL)   (NULL)(NULL) (NULL)(NULL)mid$(NULL)(NULL)(NULL)(NULL)(NULL)          (NULL)
  173. 5204 print"   [202][203][206][204]  [203][206][218][206][206][202][203][204][206][202][203][204][218]   [207]   [205][197]  [218]
  174. 5205 [153]"   mid$str$(NULL)(NULL) (NULL)left$(NULL)(NULL)str$(NULL)str$valasc(NULL)str$valasc(NULL)(NULL) (NULL)(NULL)   mid$(NULL)(NULL)(NULL)(NULL)  (NULL)
  175. 5206 print"   [199][203][200][201] [202][197][200][203][197][203][196][197][196][203][198][203][196][203][204] [202][203][204]  [202][203][204][202][203][204][205][197]
  176. 5207 [153]" cdwaitprintchr$str$valright$fwaitprintchr$(NULL)val(NULL)str$left$asc(NULL)val(NULL)valleft$ascleft$right$awaitprintmid$(NULL)(NULL)lcwaitprintchr$left$right$chr$left$right$mid$(NULL)(NULL)ldwaitprint";
  177. 5208 [153]"   chr$valvalstr$defloglog*printstr$left$asc(NULL)valascvalleft$val(NULL)ascleft$right$ chr$left$right$  chr$valstr$defsinloglogloglog*>rndprint";
  178. 5209 [153]"   str$str$(NULL)asclistintgetintprintleft$valasc(NULL)ascleft$str$(NULL)asc(NULL)str$valasc chr$(NULL)right$  str$valasclistintgetintgetintgetintabsprint";
  179. 5210 [153]"  poke-print(NULL)valvalasc#!%(NULL)(NULL)valvalstr$(NULL)asc(NULL)str$valval(NULL)str$ str$valasc  asc(NULL)asc#%!%#!%^";
  180. 5211 [153]"cont-=]#print(NULL)(NULL)(NULL)@[^#ascasc(NULL)(NULL)@str$valasc(NULL)str$valasccont_printasc(NULL)str$cont-=print(NULL)(NULL)(NULL)@]^[^]^]";
  181. 5212 [153]"^]^[%#!#]^%(NULL)(NULL)@%!(NULL)(NULL)(NULL)@str$valasc](NULL)(NULL)(NULL)@[#%!^[^]]^[^";
  182. 5213 [153]"^^^^]^^]^[#%#[]^!#%#(NULL)(NULL)(NULL)]#!%]]^[]^^]^^[^cont(NULL)";
  183. 5214 [153]"^](NULL)(NULL)tab(^exptab((NULL)_(NULL)^(NULL)^[^(NULL)(NULL)(NULL)^tab((NULL)[]^]^[^(NULL)^(NULL)(NULL)^tab(^expexp(NULL)_";
  184. 5215 [153]"[^posfrecos<=posfrecoscosfre=^]^posfrecos<____(NULL)^tab((NULL)____________";
  185. 5216 [153]"^](NULL)(NULL)\[^^[^]^^[^]^^]^^][not________________";
  186. 5217 [153]"tab((NULL)___(NULL)^tab((NULL)(NULL)^tab(^tab(expexp(NULL)(NULL)**(NULL)(NULL)(NULL)_________________";:a[178]3:[137]1100
  187. 5300 [153]"loadprint"
  188. 5301 [153]"
  189. 5302 print"
  190. 5303 [153]"
  191. 5304 print"         [218]             [218]
  192. 5305 [153]"        (NULL)(NULL) (NULL)          (NULL)(NULL)         (NULL)  (NULL)  (NULL)";
  193. 5306 [153]"        mid$(NULL)(NULL)(NULL)          mid$val(NULL)       (NULL)(NULL) (NULL)(NULL) (NULL)(NULL)";
  194. 5307 [153]"        mid$(NULL)right$left$(NULL)         mid$(NULL)(NULL)       mid$(NULL)(NULL)mid$(NULL)(NULL)mid$(NULL)";
  195. 5308 [153]"  clwaitprint    chr$valascvalright$         chr$(NULL)right$       printchr$(NULL)right$chr$(NULL)right$chr$(NULL)";
  196. 5309 [153]"eghhijklprintwaitchr$left$str$(NULL)right$ cldjklwait cwaitprintchr$left$right$dadejklwaitprintchr$left$right$chr$left$right$chr$(NULL)";
  197. 5310 [153]"        str$valascleft$asc         str$valasc       printstr$valascascvalstr$asc(NULL)";
  198. 5311 [153]"cont______-=print(NULL)(NULL)(NULL)(NULL)(NULL)cont<frefreand___-=print(NULL)(NULL)(NULL)@^contposfrecos<=print(NULL)(NULL)(NULL)str$valasc(NULL)(NULL)cont";
  199. 5312 [153]"_____spc(][#!#%%#]^]not_spc([(NULL)^tab(exp(NULL)][]^]^%#!print(NULL)(NULL)(NULL)cont!!";
  200. 5313 [153]"_________(NULL)^tab(exp(NULL)_______________(NULL)^tab((NULL)]^#!%]^";
  201. 5314 [153]"__________________________________(NULL)(NULL)^](NULL)^";:a[178]5:[137]1100
  202. 8990 [151]53265,155
  203. 8991 [153]"load":[151]53281,0:[151]53269,0:[151]211,14:[151]214,11:[158]58640
  204. 8992 [153]"verifybonus round":[129]n[178]30[164]10[169][171]2:[129]k[178]1[164]60[169]n:[141]1900
  205. 8993 [151]si[170]15,(k[170]n):[130]:[130]
  206. 8994 [151]53265,65:[153]"loadprint";:[151]53281,3:[151]53283,15
  207. 8995 [153]" (NULL)   (NULL)
  208. 8996 print"[205][203][204][218][205][206]
  209. 8997 [153]"(NULL)(NULL)(NULL)(NULL)mid$(NULL)(NULL)
  210. 8998 print"[206][200][201][203][196][203][204]
  211. 8999 [153]"left$left$(NULL)valchr$left$right$(NULL)
  212. 9000 print"[197][196][200][206][198][206][198][203]
  213. 9001 [153]"verify@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@";
  214. 9002 [153]"*chr$left$right$**chr$left$right$**chr$left$right$**chr$left$right$**chr$left$right$**chr$left$right$**chr$left$right$**chr$left$right$*";
  215. 9003 [153]"defatnpeek_atnpeekatnpeek_atnpeekatnpeek_atnpeekatnpeek_atnpeekatnpeek_atnpeekatnpeek_atnpeekatnpeek_atnpeekatnpeek_atnpeek";
  216. 9004 [153]"lenstr$_lenstr$lenstr$_lenstr$lenstr$_lenstr$lenstr$_lenstr$lenstr$_lenstr$lenstr$_lenstr$lenstr$_lenstr$lenstr$_lenstr$";
  217. 9005 [153]"valasc_valascvalasc_valasc(NULL)verify(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)def(NULL)ascvalasc_valascvalasc_valascvalasc_valasc";
  218. 9006 [153]"atnpeek_atnpeekatnpeek_atn(NULL)verify(NULL)(NULL)*********(NULL)(NULL)(NULL)def(NULL)peekatn_atnpeekatnpeek_atnpeekatnpeek_atnpeek";
  219. 9007 [153]"lenstr$_lenstr$lenstr$_(NULL)verify(NULL)(NULL)(NULL)wait          (NULL)(NULL)(NULL)def(NULL)str$_lenstr$lenstr$_lenstr$lenstr$_len(NULL)";
  220. 9008 [153]"valasc_valascvalasc_verify(NULL)(NULL)(NULL)lcdeghijklwait lverify(NULL)(NULL)(NULL)def(NULL)_valascvalasc_valascvalasc_(NULL)verify(NULL)def";
  221. 9009 [153]"atnpeek_atnpeekatn(NULL)verify(NULL)(NULL)(NULL)wait              (NULL)(NULL)(NULL)def_atnpeekatnpeek_atnpeekatnpeek_verify(NULL)(NULL)def";
  222. 9010 [153]"lenstr$_lenstr$(NULL)verify(NULL)(NULL)(NULL)wait                (NULL)(NULL)(NULL)def(NULL)str$lenstr$_lenstr$str$(NULL)verify(NULL)(NULL)(NULL)def";
  223. 9011 [153]"valasc_val(NULL)verify(NULL)(NULL)*cont                  verify(NULL)(NULL)(NULL)def(NULL)valasc_valasc(NULL)verify(NULL)(NULL)*cont ";
  224. 9012 [153]"                                        ";
  225. 9013 [153]"                                       wait";:[151]2023,160:[151]56295,6
  226. 9014 [137]1103
  227. 9100 [143] titelbild
  228. 9101 [153]"load":[151]53280,0:[151]53281,0:[151]53282,0:[151]53265,65:[151]56325,50
  229. 9102 [153]"    sysorlogwait *>wait orwait  orwait  getabswait getabswait posandwait  orlogwait *>wait sgnwait ortab(wait (NULL)"
  230. 9103 [153]"    clrsinlogwait rndfnwait sinintwait sinintwait then+wait then+wait -=wait  sin^wait rndfnwait newwait sinfrewait"
  231. 9104 [151]907,1:[151]1015,0:[151]896,3:[151]53248[170]22,24:[151]2040,210
  232. 9105 [153][163]10)"(NULL) verify1987 cobrasoft inc."
  233. 9106 [153][163]9)"pokedesigned and programmed"
  234. 9107 [153][163]12)"listby joerg sieslack"
  235. 9108 [153][163]5)"defpress  s p a c e  to start game"
  236. 9109 [153]"print   hi score verify000000  printstage verify00  printlives verify03"
  237. 9110 sc[178][194](861):sc[178]sc[172]256:a[178][194](860):sc[178]sc[170]a
  238. 9111 [139]sc[178]0[167]hi[178]hs(1):a[178]14:b[178]934:hi[178]hi[173]10
  239. 9112 [139]sc[177]hi[167]hi[178]sc
  240. 9115 [139]hi[177]9[167]a[178]14:b[178]934
  241. 9116 [139]hi[177]99[167]a[178]13:b[178]933
  242. 9117 [139]hi[177]999[167]a[178]12:b[178]932
  243. 9118 [139]hi[177]9999[167]a[178]11:b[178]931
  244. 9119 [151]211,a:[151]214,23:[158]58640:[153]"verify"hi"":[151]1024[170]b,48:[151]1955,94
  245. 9120 [151]53265,155:[141]9150:[151]860,0:[151]861,0:[158]27086:[158]4096:[137]980
  246. 9150 v[178]53248:[151]v[170]21,31:[151]v[170]28,15:[151]v,48:[151]v[170]1,180:[151]2040,230
  247. 9151 [151]53286,1:[151]53285,11:[151]v[170]39,14:[151]v[170]2,110:[151]v[170]3,180:[151]v[170]40,13
  248. 9152 [151]2041,229:[151]v[170]4,176:[151]v[170]5,180:[151]2042,243:[151]2043,174
  249. 9153 [151]211,3:[151]214,20:[158]58640:[153]"verify100     250     400     500    1000"
  250. 9154 [151]v[170]6,238:[151]v[170]7,183:[151]v[170]42,13:[151]2044,170
  251. 9155 [151]v[170]16,16:[151]v[170]8,43:[151]v[170]9,182:[151]v[170]43,8
  252. 9160 [142]
  253. 9202 [151]53265,65:[153]"load";:[153][163]14)"verifyhall of fame":[153]"";:sc[178]sc[172]10
  254. 9203 [129]t[178]1[164]10:[153]"";:[153][163]11)"list"n$(t)"":[153]"ononverify"
  255. 9204 [153][163]22)hs(t)
  256. 9205 [153]"";:t[178]t[170]1:[153][163]11)"print"n$(t)"":[153]"ononverify"
  257. 9206 [153][163]22)hs(t):[130]
  258. 9207 [139]sc[177]hs[167]9209
  259. 9208 [137]9218
  260. 9209 i[178]0
  261. 9210 i[178]i[170]1:[139]sc[177]hs(i)[167]hb[178]i:[137]9212
  262. 9211 [137]9210
  263. 9212 [129]a[178]10[164]i[169][171]1:hs(a)[178]hs(a[171]1):n$(a)[178]n$(a[171]1):[130]a
  264. 9213 hs(hb)[178]sc:sc[178]0:n$(hb)[178]n$:n$(hb)[178]n$(hb)[170]"           ":[153]"";
  265. 9214 [137]9203
  266. 9218 [129]c[178]1[164]10:[151]214,3[170](c[172]2):[151]211,7:[158]58640:[153]"verify"c"":[130]c
  267. 9219 [151]53265,155:[139]ll[178]1[167]9222
  268. 9220 [159]2,8,2,"@0:points,p,w"
  269. 9221 [129]t[178]1[164]10:[152]2,n$(t):[152]2,hs(t):[130]t:[160]2
  270. 9222 [151]211,11:[151]214,3:[158]58640:[153]"defpress space to exit"
  271. 9223 a[178][194](197):[139]a[178]60[167]9100
  272. 9224 [137]9223
  273.