home *** CD-ROM | disk | FTP | other *** search
/ Rockford Magazine / Rockford_Magazine_002_19xx_-_de_Side_B.d64 / session.mn (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  11KB  |  231 lines
  1. 0 a$=chr$(34)+chr$(34)+"":print"[147]";:poke53280,0:poke53281,0:print"[144])[146]@m.[192][146][204]6[192][146][184] [165][192][146][204]6[192][146][204]@[192][146][184])[146]@m[146]z[208])[146]1m[146]tc)[170]m[146]uc)[146]am[146]n[220]"a$"[146]o [191]h[208][189][202]n[146]x[212][208][181][146][216][160][184]"a$"an[146]z[208][202]n[146]n[220])[146][m[146]q[208])[146]4m[146]r[208])[m[146]tc)";
  2. 1 print"[192]m[146]uc[170])[146]5e[146]a-.[192][146] @p)[146]7e[146]a[216][160][184] [146]@9[146]lpy/[192][200][192][146]l[208][181] [146]@9[146]@wy;[192][200][208][183][146][216][160][184] [146]@9/[192]y[146]lp[200][192][146]l[208][181] [146]@9;[192]y[146]@wh[208][183][146][216][160])[146]5e[146]a cp)[146]7e[146]a)[146]am[146]y[208][146][204]1[170][146]";:fori=0to174:poke49152+i,peek(1024+i):next
  3. 2 ne=49152:fx=49160:cn=49167:en=49171:tn=49326:cs=58732:poke49324,52:mu=1:goto6
  4. 3 fori=21to23:poke211,25:poke214,i:sys58732:printa1$(i-20)right$("              ",14-len(a1$(i-20)));:nexti:return
  5. 4 fori=1to19:poke211,25:poke214,i:sys58732:print"              ";:next:return
  6. 5 fori=1to19:poke211,25:poke214,i:sys58732:printa$(i):next:return
  7. 6 poke53280,0:poke53281,0:poke650,128:le$="              ":l=5:ke=0:p=0:poke53272,19:dima$(19),h$(19),h(19),s(10,31,1):print"[147][152]
  8. [176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][178][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";:a$="[221][149][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][152][221]              [221]":fori=1to19:printa$;:next
  9. 7 print"[221][149][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][152][171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]";:fori=1to3:printa$;:next:print"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";:poke2023,125:poke56295,12:open15,8,15:open1,8,8,"session.hi,p,r":input#15,e,a$,i,i:ife<>0thenclose1:close15:goto9
  10. 8 fori=1to19:input#1,h(i),h$(i):next:close1:close15:goto183
  11. 9 open1,8,8,"session.hi,p,w":fori=1to19:h(i)=(21-i)*25:print#1,h(i):h$(i)="@@@@@@@":print#1,h$(i):next:close1:goto183
  12. 10 a1$(1)="bitte":a1$(2)="warten...":a1$(3)="":gosub3:ke=0:lp=0:m2=0:ifln<>jlthen12
  13. 11 sys51712:x=jx:y=jy:k=jk:t=jt:goto21
  14. 12 f$=right$(str$(ln),len(str$(ln))-1):ifer=1thenfori=0to10:forj=0to30:forq=0to1:s(i,j,q)=0:nextq,j,i
  15. 13 sysen:ifmu=1thenmu=2
  16. 14 a$="level"+f$:gosub218:ifethenreturn
  17. 15 open1,8,8,a$:sys51715:sys51712:input#1,s:s=s-1:ifs=-1thener=0:goto20
  18. 16 er=1:ak=0:fori=0tos
  19. 17 input#1,j:ifj=0thenak=0:goto19
  20. 18 s(i,ak,0)=j:input#1,s(i,ak,1):ak=ak+1:goto17
  21. 19 nexti
  22. 20 input#1,k,ou,x,y,t,ch:close1
  23. 21 ifch<>lnthene=-1:goto25
  24. 22 gosub223:a1$(1)="":a1$(3)="  -- taste --":a1$(2)="":ifln=1goto24
  25. 23 restore:fori=1toln:reada$:next:i$="":fori=1to5:i$=i$+chr$(asc(mid$(a$,i,1))-1):next:a1$(1)="code: "+chr$(34)+i$+chr$(34)
  26. 24 jk=k:jx=x:jy=y:jt=t:jl=ln:gosub3:a1$(1)="":a1$(3)="":poke198,0:wait198,1:gosub3:gosub4:ifmu=2thenmu=1:sysne
  27. 25 return
  28. 26 ifdr=85theny=y+1:goto30
  29. 27 ifdr=86theny=y-1:goto30
  30. 28 ifdr=87thenx=x+1:goto30
  31. 29 x=x-1:dr=peek(1024+x+40*y):dc=peek(55296+x+40*y)
  32. 30 poke1024+x+40*y,111:poke55296+x+40*y,1:goto44
  33. 31 ifmu=0thenmu=1:sysne:goto33
  34. 32 mu=0:sysen
  35. 33 print"[153]";:ifmu=0thena1$(3)="     aus
  36. 34 [139]mu[178]1[167]a1$(3)[178]"     an
  37. 35 gosub3:goto44
  38. 36 poke211,25:poke214,2:syscs:print"[154]  [186][187] session":poke211,25:poke214,5:syscs:print"[150]l [149]:[157][157][157][153][212] [149]:";:poke211,25:poke214,9:syscs:print"[175] [149]:";:poke211,25:poke214,11:syscs:print"[155][162] [149]:";:poke211,25:poke214,13:syscs:print"[150][209] [149]:[157][157][157][154][208] [149]:[153]";:a1$(1)="_ -aufgeben":a1$(2)="f5-musik ist:
  39. 37 [139]mu[178]0[167]a1$(3)[178]"     aus":[158]en
  40. 38 [139]mu[178]1[167]a1$(3)[178]"     an
  41. 39 gosub3:gosub40:goto43
  42. 40 poke211,28:poke214,5:syscs:print""ln"[157]  ";
  43. 41 poke211,28:poke214,7:syscs:printp+lp"[157]  ";:poke211,28:poke214,9:syscs:printl"[157]  ";:poke211,28:poke214,11:syscs:printk"[157]  ";:poke211,28:poke214,13:syscs:printke"[157]  ";
  44. 42 poke211,28:poke214,15:syscs:printm2"[157]  ";:return
  45. 43 dr=96:dc=9
  46. 44 ifdr>=85anddr<=88goto26
  47. 45 jo=peek(56320):geta$:ifa$="_"thenl=l-1:gosub40:goto207
  48. 46 ifa$="[135]"goto31
  49. 47 ifjo=127then45
  50. 48 ifjo=119thenifx<23thennx=x+1:ny=y:goto53
  51. 49 ifjo=123thenifx>1thennx=x-1:ny=y:goto53
  52. 50 ifjo=126thenify>1thenny=y-1:nx=x:goto53
  53. 51 ifjo=125thenify<23thenny=y+1:nx=x:goto53
  54. 52 goto44
  55. 53 zf=1024+nx+40*ny:zi=peek(zf):ol=1024+x+40*y:zc=55296+nx+40*ny:oc=55296+x+40*y:ifzi<>96goto55
  56. 54 pokezf,111:pokezc,1:pokeoc,dc:pokeol,dr:pokeoc,dc:y=ny:x=nx:goto43
  57. 55 ifzi<>91goto57
  58. 56 pokezf,111:pokezc,1:pokeol,dr:pokeoc,dc:y=ny:x=nx:dr=91:dc=8:goto44
  59. 57 if(zi<97orzi>100)andzi<230goto107
  60. 58 sx=2*nx-x:sy=2*ny-y:sf=1024+sx+40*sy:si=peek(sf):sc=sf+54272:ifsx>23orsx<1goto44
  61. 59 ifsy>23orsy<1goto44
  62. 60 fl=zi-96:ifzi>229thenfl=5
  63. 61 onflgosub78,71,92,96,85:ifk=0thenpokezf,111:pokezc,1:pokeol,dr:pokeoc,dc:goto216
  64. 62 ifqi=0goto65
  65. 63 ifzi>229thenqi=zi-5:qc=11:ifqi=230goto127
  66. 64 pokezf,111:pokezc,1:pokeol,dr:pokeoc,dc:dr=qi:dc=qc:x=nx:y=ny:goto44
  67. 65 ifm2=0goto44
  68. 66 if(si<97orsi>100)andsi<230goto44
  69. 67 if(zi=99orzi=100)andsi=97goto44
  70. 68 zi=si:sx=2*sx-nx:sy=2*sy-ny:sf=1024+sx+40*sy:si=peek(sf):sc=sf+54272:fl=zi-96:ifzi>229thenfl=5
  71. 69 onflgosub78,71,92,96,85:ifqi=0goto44
  72. 70 sx=2*nx-x:sy=2*ny-y:sf=1024+sx+40*sy:sc=sf+54272:zi=peek(zf):pokesf,qi:pokesc,qc:si=qi:m2=m2-1:gosub42:goto60
  73. 71 ifsi=96thenpokesf,98:pokesc,15:goto77
  74. 72 ifsi=90thenk=k-1:lp=lp+11:gosub40:goto77
  75. 73 ifsi=92thenpokesf,96:pokesc,9:k=k-1:lp=lp+17:gosub40:goto77
  76. 74 ifsi=91thenpokesf,97:pokesc,11:k=k-1:lp=lp+13:gosub40:goto77
  77. 75 ifsi=>224andsi<=229thenpokesf,si+6:pokesc,15:goto77
  78. 76 qi=0:return
  79. 77 qi=96:qc=9:return
  80. 78 ifsi=96thenk=k+1:lp=lp-13:gosub40:pokesf,98:pokesc,15:goto84
  81. 79 ifsi=90goto84
  82. 80 ifsi=92thenpokesf,96:pokesc,9:lp=lp+3:gosub40:goto84
  83. 81 ifsi=91thenpokesf,97:pokesc,11:goto84
  84. 82 ifsi=>224andsi<=229thenpokesf,si+6:pokesc,15:lp=lp-13:gosub41:goto84
  85. 83 qi=0:return
  86. 84 qi=91:qc=8:return
  87. 85 ifsi=96thenpokesf,98:pokesc,15:goto91
  88. 86 ifsi=90thenk=k-1:lp=lp+11:gosub40:goto91
  89. 87 ifsi=92thenpokesf,96:pokesc,9:k=k-1:lp=lp+17:gosub40:goto91
  90. 88 ifsi=91thenpokesf,97:pokesc,11:k=k-1:lp=lp+13:gosub40:goto91
  91. 89 ifsi=>224andsi<=229thenpokesf,si+6:pokesc,15:goto91
  92. 90 qi=0:return
  93. 91 qi=zi-6:qc=11:return
  94. 92 ifsi=96thenpokesf,99:pokesc,11:goto95
  95. 93 ifsi=>224andsi<=229thenpokesf,229:pokesc,11:goto95
  96. 94 qi=0:return
  97. 95 qi=96:qc=9:return
  98. 96 ifsi=96thenpokesf,100:pokesc,2:goto105
  99. 97 if(si=>66andsi<=75)orsi=77thenqi=0:return
  100. 98 ifsi=229thengoto105
  101. 99 pokesf,100:pokesc,2:pokezf,96:pokezc,9:lp=lp+7:gosub40:ifsi=>224andsi<=228thenpokesf,si
  102. 100 poketn,1:sysfx:forx1=-1to1:fory1=-1to1:if(sx+x1)>23or(sx+x1)<1goto104
  103. 101 if(sy+y1)>23or(sy+y1)<1goto104
  104. 102 bf=1024+sx+x1+40*(sy+y1):bc=bf+54272:bi=peek(bf):if(bi>=66andbi<=75)orbi=77goto104
  105. 103 gosub106:ifbi=>224andbi<=229thenpokebf,229:pokebc,11
  106. 104 nexty1,x1:ifmu=1thensyscn
  107. 105 qi=96:qc=9:return
  108. 106 fori=244to255:pokebf,i:pokebc,2:forj=1to10:nextj,i:pokebf,96:pokebc,9:return
  109. 107 ifzi=81thenke=ke+1:gosub40:goto54
  110. 108 ifzi=80thenm2=m2+1:gosub40:goto54
  111. 109 ifzi<>82then112
  112. 110 ifke=0then43
  113. 111 ke=ke-1:lp=lp+2:gosub40:goto54
  114. 112 ifzi=83thenl=l+1:gosub40:goto54
  115. 113 ifzi=84thenlp=lp+77:gosub40:goto54
  116. 114 ifzi<>94then117
  117. 115 poketn,2:sysfx:pokeol,dr:pokeoc,dc:dr=95:dc=1:pokeou,111:pokeou+54272,1:y=int((ou-1024)/40):x=ou-40*y-1024:ifmu=1thenfori=1to3000:next:syscn:goto44
  118. 116 sysen:goto44
  119. 117 ifzi<85orzi>88goto126
  120. 118 x1=nx-x:y1=ny-y:sx=2*nx-x:sy=2*ny-y:sf=1024+sx+40*sy:sc=sf+54272:si=peek(sf):ifzi<>85then122
  121. 119 ify1<>-1then44
  122. 120 pokeol,dr:pokeoc,dc:dr=85:dc=2
  123. 121 x=nx:y=ny:nx=sx:ny=sy:goto53
  124. 122 ifzi=86andy1=1thenpokeol,dr:pokeoc,dc:dr=86:dc=2:goto121
  125. 123 ifzi=87andx1=-1thenpokeol,dr:pokeoc,dc:dr=87:dc=2:goto121
  126. 124 ifzi=88andx1=1thenpokeol,dr:pokeoc,dc:dr=88:dc=2:goto121
  127. 125 goto44
  128. 126 ifzi<76orzi>79goto128
  129. 127 pokeol,dr:pokeoc,dc:pokezf,111:pokezc,1:bf=1024+nx+40*ny:bc=bf+54272:gosub106:l=l-1:gosub40:goto207
  130. 128 ifzi<>89then135
  131. 129 x1=.:y1=.:as=.:fori=0tos:if(s(i,0,0)=nx)and(s(i,0,1)=ny)thenx1=nx:y1=ny:as=i
  132. 130 nexti
  133. 131 x=nx:y=ny:pokezf,111:pokezc,1:ifx1=0goto44
  134. 132 pokeol,dr:pokeoc,dc:i=1
  135. 133 pokes(as,i,1),peek(s(as,i,0)):pokes(as,i,1)+54272,peek(s(as,i,0)+54272):pokes(as,i,0),96:pokes(as,i,0)+54272,9:i=i+1:ifi<>33ands(as,i,0)<>0then133
  136. 134 lp=lp+1:goto43
  137. 135 ifzi<>101goto180
  138. 136 poketn,2:sysfx:lp=lp+3:gosub40:pokezf,111:pokezc,1:pokeoc,dc:pokeol,dr:pokeoc,dc:dr=111:dc=1:ol=zf:oc=zc:pokezc,dc:pokezf,dr:pokezc,dc:y1=y-ny:x1=x-nx:sx=2*nx-x:sy=2*ny-y:sf=1024+sx+40*sy:sc=sf+54272:si=peek(sf):of=zf:oc=zc:x=nx:y=ny:onx1+2goto145,137,138
  139. 137 ony1+2goto159,44,152
  140. 138 pokeoc,dc:pokeol,dr:pokeoc,dc:ifsx<1goto44
  141. 139 ifsi<>96andsi<>91goto141
  142. 140 ol=sf:oc=sc:dr=si:dc=peek(sc):pokesc,1:pokesf,102:pokesc,1:sx=sx-1:sf=1024+sx+40*sy:sc=sf+54272:si=peek(sf):goto138
  143. 141 ifsi<>117andsi<>120goto166
  144. 142 ifsi=117thensy=sy+1:fl=1
  145. 143 ifsi=120thensy=sy-1:fl=2
  146. 144 sf=1024+sx+40*sy:si=peek(sf):sc=sf+54272:onflgoto159,152
  147. 145 pokeoc,dc:pokeol,dr:pokeoc,dc:ifsx>23goto44
  148. 146 ifsi<>96andsi<>91goto148
  149. 147 ol=sf:oc=sc:dr=si:dc=peek(sc):pokesc,1:pokesf,102:pokesc,1:sx=sx+1:sf=1024+sx+40*sy:sc=sf+54272:si=peek(sf):goto145
  150. 148 ifsi<>118andsi<>119goto166
  151. 149 ifsi=118thensy=sy+1:fl=1
  152. 150 ifsi=119thensy=sy-1:fl=2
  153. 151 sf=1024+sx+40*sy:si=peek(sf):sc=sf+54272:onflgoto159,152
  154. 152 pokeoc,dc:pokeol,dr:pokeoc,dc:ifsy<1goto44
  155. 153 ifsi<>96andsi<>91goto155
  156. 154 ol=sf:oc=sc:dr=si:dc=peek(sc):pokesc,1:pokesf,103:pokesc,1:sy=sy-1:sf=1024+sx+40*sy:sc=sf+54272:si=peek(sf):goto152
  157. 155 ifsi<>117andsi<>118goto170
  158. 156 ifsi=118thensx=sx-1:fl=1
  159. 157 ifsi=117thensx=sx+1:fl=2
  160. 158 sf=1024+sx+40*sy:si=peek(sf):sc=sf+54272:onflgoto138,145
  161. 159 pokeoc,dc:pokeol,dr:pokeoc,dc:ifsy>23goto44
  162. 160 ifsi<>96andsi<>91goto162
  163. 161 ol=sf:oc=sc:dr=si:dc=peek(sc):pokesf,103:pokesc,1:sy=sy+1:sf=1024+sx+40*sy:sc=sf+54272:si=peek(sf):goto159
  164. 162 ifsi<>119andsi<>120goto170
  165. 163 ifsi=119thensx=sx-1:fl=1
  166. 164 ifsi=120thensx=sx+1:fl=2
  167. 165 sf=1024+sx+40*sy:si=peek(sf):sc=sf+54272:onflgoto138,145
  168. 166 ifmu=1thensyscn:goto168
  169. 167 sysen
  170. 168 ifsi=105thenpokeol,dr:pokeoc,dc:goto43
  171. 169 pokeol,dr:pokeoc,dc:goto172
  172. 170 pokeol,dr:pokeoc,dc:ifmu=1thensyscn:goto168
  173. 171 sysen:ifsi=104goto43
  174. 172 ifsi=100thenlp=lp+4:gosub40:goto100
  175. 173 ifsi=89goto175
  176. 174 bf=sf:bc=sf+54272:gosub106:goto43
  177. 175 lp=lp+2:gosub40:ifmu=1thensyscn
  178. 176 ifmu=0thensysen
  179. 177 x1=.:y1=.:as=.:fori=0tos:if(s(i,0,0)=sx)and(s(i,0,1)=sy)thenx1=sx:y1=sy:as=i
  180. 178 nexti:ifx1=0goto174
  181. 179 bf=sf:bc=sf+54272:gosub106:goto131
  182. 180 ifzi<224orzi>229goto44
  183. 181 ifzi=229goto127
  184. 182 pokeol,dr:pokeoc,dc:pokezf,111:pokezc,1:dr=zi+1:dc=11:x=nx:y=ny:goto44
  185. 183 i=3:goto185
  186. 184 i=i+1:poke211,1:poke214,i:sys58732:return
  187. 185 gosub184:print"[150][186][187]":gosub184:print"[151][183][193][193][193][193][193][153][183][193][193][183][193][193][153][182][193][181][183][193][184][151][184][193]":gosub184:print"[151][193][153][193][193][153][193][193][193][151][193][184][193]":gosub184:print"[151][182][193][184][193][193][153][182][193][184][182][193][184][153][193][193][193][151][193][193][193]":gosub184:print"[151][193][153][193][193][153][193][193][193][151][193][182][193]":gosub184:print"[151][193][193][181][193][193][193][153][193][193][181][193][193][181][153][183][193][184][182][193][181][151][193][193]":i=i+1:gosub184
  188. 186 print"[155](w/c)1992bymore.gore":i=i+1:gosub184:print"[152]copyme":gosub184:print"---":gosub184:ln=0:l=5:p=0:k=0:print"iwanttotravel![153]":sysne
  189. 187 print"[149]";:fori=1to19:co$="[149]":ifi<4thenco$=mid$("[158][129]",i,1)
  190. 188 h$=mid$(str$(h(i)),2):h=len(h$):a$(i)=co$+right$("      ",6-h)+h$+" "+h$(i):next:gosub5
  191. 189 a1$(1)="f1 - start !":a1$(2)="f3 - passwort-":a1$(3)="     eingabe":print"";:gosub3
  192. 190 poke198,0:wait198,1:geta$:ifa$<>"[133]"anda$<>"[134]"then190
  193. 191 ifa$<>"[133]"goto195
  194. 192 ln=ln+1:fori=1to23:poke211,1:poke214,i:sys58732:print"[149][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160][160]";:next:gosub4:gosub10:p=0:ife=0goto194
  195. 193 e=0:l=0:goto207
  196. 194 goto36
  197. 195 a1$(1)="":a1$(2)="":a1$(3)="":gosub3:print"":x1=25:y1=22:te$="nun ?":bs=1:le=5:gosub199:a$=i$:i$="":fori=1to5:i$=i$+chr$(asc(mid$(a$,i,1))+1):next:fl=0:restore:fori=1to35:reada$:ifa$=i$thenfl=i
  198. 196 nexti:iffl=0goto187
  199. 197 a1$(1)="das war der":a1$(2)="code fuer":a1$(3)="level"+str$(fl)+".":gosub3:fori=1to1500:next:ln=fl-1:goto189:data"",[xfzi,uspjt,cvubo,gjgui,hpsf/,vbshi,/npsf,bqsjm,bzesh,upcbl,hfuup,ibzeo,notuz,nbhjl,cpsfe,uppps,ywjjj,ifmhb,cpxfm
  200. 198 dataesvht,spbis,cvbib,nptmp,umgpo,efmub,visbo,bqgfm,pv[p/,b/m/l,suzqf,mjnft,lvcjl,svcjl,irpsf
  201. 199 poke211,x1:poke214,y1:sys58732:printte$"";:po=0:i$="
  202. 200 [151]204,0:[151]198,0:[146]198,1:[161]x$:[151]207,0:[151]204,1:[153]" cmd";:[139]po[177]0[175][198](x$)[178]20[167]i$[178][200](i$,[195](i$)[171]1):[153]"cmd cmd";:po[178]po[171]1:[137]200
  203. 201 [139][198](x$)[178]13[167][142]
  204. 202 [139]po[178]le[167]200
  205. 203 [139]bs[178]0[175](x$[179]"0"[176]x$[177]"9")[167]200
  206. 204 [139]bs[178]1[175](x$[179]" "[176](x$[177]"{$7f}"[175]x$[179]"close"))[167]200
  207. 205 [153]x$;:i$[178]i$[170]x$:po[178]po[170]1:[139]x$[179][177][199](34)[137]200
  208. 206 [153][199](34)"cmd cmd";:[137]200
  209. 207 [139]l[178]0[137]211
  210. 208 a1$(1)[178]"":a1$(2)[178]"auf ein neues!":a1$(3)[178]"":[141]3:[151]tn,3:[158]fx:[129]i[178]1[164]4000:[130]:[139]mu[178]1[167][158]cn
  211. 209 [141]4:[141]10:[139]e[179][177]0[167]l[178]0:e[178]0:[137]207
  212. 210 [137]36
  213. 211 a1$(1)[178]"     tja,":a1$(2)[178]"  das war's":a1$(3)[178]"  dann wohl":[141]3:[151]tn,3:[158]fx:[129]i[178]1[164]3000:[130]:p[178]p[170]lp
  214. 212 [129]i[178]1[164]23:[151]211,1:[151]214,i:[158]58732:[153]"verifyclosecloseclosecloseclosecloseclosecloseclosecloseclosecloseclosecloseclosecloseclosecloseclosecloseclosecloseclose";:[130]:[141]4:[139]p[179]h(19)[137]183
  215. 213 [129]i[178]19[164]1[169][171]1:[139]p[177]h(i)[167]fl[178]i
  216. 214 [130]:[129]i[178]19[164]fl[170]1[169][171]1:h(i)[178]h(i[171]1):h$(i)[178]h$(i[171]1):[130]:h(fl)[178]p:h$(fl)[178]"":a1$(2)[178]"!highscore!":a1$(1)[178]"":a1$(3)[178]"":[141]3:[129]i[178]1[164]19:h$[178][202]([196](h(i)),2):h[178][195](h$):a$(i)[178][201]("      ",6[171]h)[170]h$[170]" "[170]h$(i):[130]:[141]5:x1[178]31:y1[178]fl:le[178]7:bs[178]1:te$[178]"":[141]199:h$(fl)[178]i$:h(fl)[178]p
  217. 215 [151]1063[170]40[172]fl,93:[151]55335[170]40[172]fl,12:[158]en:a$[178]"session.hi":[141]218:[159]1,8,15,"s:"[170]a$:[160]1:[159]1,8,8,a$[170]",p,w":[129]i[178]1[164]19:[152]1,h(i):[152]1,h$(i):[130]:[160]1:p[178]0:[137]212
  218. 216 [151]tn,4:[158]fx:a1$(1)[178]"    ...und":a1$(2)[178]"    weiter":a1$(3)[178]"    gehts!":[141]3:ln[178]ln[170]1:p[178]p[170]lp:[129]i[178]1[164]3000:[130]:[141]4:[141]10:[139]e[178]0[137]36
  219. 217 e[178]0:l[178]0:[137]207
  220. 218 [159]2,8,2:[160]2:[139]st[178]0[167]220
  221. 219 a1$(1)[178]"floppy ein-":a1$(2)[178]"schalten !":a1$(3)[178]"":[141]3:c1[178]0:[146]56576,128,128:[146]56576,128:a1$(1)[178]"":a1$(2)[178]"okay.":[141]3
  222. 220 [159]15,8,15:[159]1,8,8,a$:[132]15,e,e$,i,i:[160]1:[160]15:[139]e[178]0[167][142]
  223. 221 a1$(1)[178][200](e$,14):a1$(2)[178][202](e$,15):a1$(3)[178]"taste!":[141]3:[151]198,0:[146]198,1:[139]c1[167]c1[178]0:[142]
  224. 222 a1$(1)[178]"":a1$(2)[178]"":a1$(3)[178]"":[141]3:c1[178][171]1:[137]220
  225. 223 [139]s[178][171]1[167][142]
  226. 224 [153]"for";:a1$(1)[178]"schalterbe-":a1$(2)[178]"legung zei-":a1$(3)[178]"gen (j/n) ?":[141]3
  227. 225 [151]198,0:[146]198,1:[161]a$:[139]a$[179][177]"j"[175]a$[179][177]"n"[137]225
  228. 226 [139]a$[178]"n"[167][142]
  229. 227 a1$(1)[178]"ok...":a1$(2)[178]"":a1$(3)[178]"":[141]3:[129]i[178]0[164]s:sc[178]55296[170]s(i,0,0)[170]40[172]s(i,0,1):[129]j[178]1[164]20:[151]sc,0:[129]q[178]1[164]20:[130]q:[151]sc,1:[129]q[178]1[164]20:[130]q,j:[129]j[178]1[164]1000:[130]j:j[178]1
  230. 228 [151]s(i,j,1),[194](s(i,j,0)):[151]s(i,j,1)[170]54272,[194](s(i,j,0)[170]54272):[151]s(i,j,0),96:[151]s(i,j,0)[170]54272,9:j[178]j[170]1:[139]j[179][177]33[175]s(i,j,0)[179][177]0[167]228
  231. 229 [129]j[178]1[164]1000:[130]j:[158]51712:[130]i:a1$(1)[178]"nochmal ?":a1$(2)[178]"":a1$(3)[178]"":[141]3:[137]225
  232.