home *** CD-ROM | disk | FTP | other *** search
/ Dark Star 12 / Dark_Star_12_1996_-_de_Side_B.d64 / rst (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  32KB  |  575 lines
  1. 1 ra=38:s1=49151:s2=49380:lw=peek(186):poke788,52
  2. 2 poke53280,2:poke53281,2:print"[147]      jesus christus [150]loves you!"
  3. 3 fora=1torn:pokes2+a,0:next
  4. 4 gett$:ift$=""then4
  5. 5 poke53280,.:poke53281,.:dimp(225),s(44),tm$(39),n$(39)
  6. 6 print"[147]dieses programm ist freeware,und darf   nicht veraendert werden."
  7. 7 print"falls ihr ideen,kritik,lob,geld oder so habt dann schreibt an:"
  8. 8 print"     matthias schrameyer":print"     fauststr.18"
  9. 9 print"     47137 duisburg":print"     deutschland"
  10. 10 gett$:ift$=""then10
  11. 11 print"[147]        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208]"
  12. 12 print"       [159]12 [152][208][151]raetselhafte[152][208][208]"
  13. 13 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208]"
  14. 14 print"       [159]11 [152][208][208][208][151]steintafeln[152][208][146]     [169][223]"
  15. 15 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208][146]    [169] [146][169]"
  16. 16 print"       [159]12 [152][208][151]programmiert[152][208][208][146]  [160][169] [146][169]"
  17. 17 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208][146]  [169] [146][169]"
  18. 18 print"        [159]4 [152][208][208][208][208][208][151]von:[152][208][208][208][208][208][208][146]   [146][169]"
  19. 19 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208]"
  20. 20 print"       [159]36 [152][208][208][151]der[152][208][151]christ[152][208][208][208]"
  21. 21 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208]"
  22. 22 print"        [159]4 [152][208][208][208][208][208][151]fuer[152][208][208][208][208][208][208]"
  23. 23 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208][146]    [151][169][163][163][163][163]"
  24. 24 print"       [159]74 [152][208][151]digital[152][208][151]talk[152][208][208][146]    [151]     "
  25. 25 print"        [159]0 [152][208][208][208][208][208][208][208][208][208][208][208][208][208][208][208][146]      [149] "
  26. 26 print"                                "
  27. 27 print"          [159]011111111111110      [149] "
  28. 28 print"           111111111111        [149] "
  29. 29 print"           [159]111111111111"
  30. 30 print"            11111111111"
  31. 31 print"             [159]111111111"
  32. 32 print"               1111"
  33. 33 print"                [159]11"
  34. 34 print"  [152]nach dem spiel mario's picross.";
  35. 35 data24,,,60,,,126,,,219,,,24,,,24,,,24,,,24,,,24,,,24,,,24
  36. 36 fora=704to734:reads:pokea,s:next
  37. 37 poke2040,11:poke53269,0
  38. 38 open1,lw,2,"rsths,s,r"
  39. 39 fora=1tora:input#1,tm$(a):input#1,n$(a):next:close1
  40. 41 fora=1tora:pokes2+a,.:next
  41. 44 gett$:ift$=""then44
  42. 45 print"[147][158]       bitte warten entwerfe raetsel."
  43. 46 rn=peek(53266):ifpeek(s2+rn)=1then46
  44. 47 m=.:x=79:y=60:bf=.:up=.:f=.:s$="":w$="":b=.:rp=rn:ifrn>rathen46
  45. 48 fora=1to225:pokes1+a,.:next
  46. 49 ifrp>13then51
  47. 50 onrpgoto140,152,163,174,185,197,208,219,230,242,253,265,276
  48. 51 rp=rp-13:ifrp>13then53
  49. 52 onrpgoto289,301,313,324,335,347,359,371,383,395,406,416,428
  50. 53 rp=rp-13
  51. 54 onrpgoto440,451,463,474,486,497,509,520,532,545,557,569,579
  52. 55 a$=a1$+a2$+a3$+a4$:c$=c1$+c2$+c3$
  53. 56 fora=1to225:b$=mid$(a$,a,1):p(a)=val(b$):next
  54. 57 fora=1to176step4:b$=mid$(c$,a,a+4):b=b+1:s(b)=val(b$):next
  55. 58 fora=1to44:poke831+a,s(a):next
  56. 59 poke2041,13:poke53250,37:poke53251,142
  57. 60 fora=1to225:ifp(a)=1thenbf=bf+1
  58. 61 next
  59. 62 print"[147][152]       ..............."
  60. 63 fora=1to14:print"       ...............":next
  61. 64 print"";s$
  62. 65 print"";w$
  63. 66 print"[152]status[157][157][157][157]m"
  64. 67 poke53269,1:ti$="000000"
  65. 68 poke53248,x:poke53249,y
  66. 69 gett$:ift$=""then69
  67. 70 ift$=""then78
  68. 71 ift$="[145]"then80
  69. 72 ift$=""then82
  70. 73 ift$="[157]"then84
  71. 74 ift$=chr$(13)then90
  72. 75 ift$=chr$(32)then86
  73. 76 ift$=chr$(20)then128
  74. 77 goto69
  75. 78 ify=172then68
  76. 79 y=y+8:goto68
  77. 80 ify=60then68
  78. 81 y=y-8:goto68
  79. 82 ifx=191then68
  80. 83 x=x+8:goto68
  81. 84 ifx=79then68
  82. 85 x=x-8:goto68
  83. 86 ifm=.then88
  84. 87 ifm=1then89
  85. 88 m=1:poke1186,19:goto68
  86. 89 m=.:poke1186,13:goto68
  87. 90 yp=(172-y)/8*40:xp=(191-x)/8
  88. 91 ifm=0thenmp=32
  89. 92 ifm=1thenmp=208
  90. 93 poke1605-yp-xp,mp
  91. 94 ifm=.then68
  92. 95 yp=(172-y)/8*15:pu=225-(yp+xp)
  93. 96 ifp(pu)=1then130
  94. 97 goto100
  95. 98 ifup=bfthen112
  96. 99 goto68
  97. 100 fora=1to3:poke53280,2:poke53280,.:next:f=f+1:iff=6then102
  98. 101 goto68
  99. 102 poke53269,.:print"[147][152]es tut mir sehr sehr leid aber du machst"
  100. 103 print"zu viele fehler."
  101. 104 print"deshalb bist du nun leider game over[146]."
  102. 105 print"rekord zeit = ";tm$(rn);" von:":printn$(rn)
  103. 106 print"noch ein spiel ?"
  104. 107 gett$:ift$=""then107
  105. 108 ift$="j"then45
  106. 109 ift$<>"n"then107
  107. 111 print"[147]schade...":end
  108. 112 sz$=ti$:print"[213][195][195][195][201][157][157][157][157][157][194]   [194][157][157][157][157][157][194]   [194][157][157][157][157][157][194]   [194][157][157][157][157][157][202][195][195][195][203]"
  109. 113 print"                                        ":poke53288,1
  110. 114 print"[145][145]";sn$:poke53269,2
  111. 115 gett$:ift$=""then115
  112. 116 ift$<>chr$(32)then115
  113. 117 poke53269,.:print"[147]prima du hast das raetsel geloest und"
  114. 118 print"hattest ";f;" fehler.."
  115. 119 print"deine zeit:";sz$:pokes2+rn,1
  116. 120 ifsz$>tm$(rn)then105
  117. 121 print"du hast eine neue rekord[146] zeit !":tm$(rn)=sz$
  118. 122 input"wie ist dein name du genie";n$(rn)
  119. 123 print"warte ma eben.speichere deine score!"
  120. 124 open15,lw,15,"s:rsths":close15
  121. 125 open1,lw,2,"rsths,s,w":fora=1tora:print#1,tm$(a):print#1,n$(a)
  122. 126 next:close1
  123. 127 goto105
  124. 128 yp=(172-y)/8*40:xp=(191-x)/8
  125. 129 poke1605-yp-xp,46:goto68
  126. 130 ifpeek(s1+pu)=0thenpokes1+pu,1:up=up+1
  127. 131 goto98
  128. 132 print"[147]herzlichen glueckwunsch !":print"du hast alle[146] raetsel geloest."
  129. 133 print"yoh.mann.soll die leveldatei zurueck-"
  130. 134 print"gesetzt werden ?"
  131. 135 gett$:ift$="n"then106
  132. 136 open15,lw,15,"s:rstlev":close15:open1,lw,3,"rstlev,s,w":fora=1tora
  133. 137 print#1,0:next:close1
  134. 138 goto106
  135. 139 :
  136. 140 s1$="[159]2[157]11[157][157][159]12[157][157][159]4[157]4[157]6[157]11[157][157][159]12[157][157][159]12[157][157][159]12[157][157][159]12[157][157][159]12[157][157]"
  137. 141 s2$="[159]6[157]11[157][157][159]6":s$=s1$+s2$
  138. 142 w$="[159]000014116100000[157][157][157][157][157][157][157][157][157][157][157]01346[159]0[157][157][157][157][157]1111[157][157][157]11"
  139. 143 a1$="000000011000000000000101000000000001011000000000001111000000000001111"
  140. 144 a2$="000000000011111100000000010000100000000010001100000000010001100000"
  141. 145 a3$="00001000110000000001000110000000001000110000000001111110000000001"
  142. 146 a4$="0000100000000011111100000"
  143. 147 c1$="+001+128+000+002+128+000+005+128+000+007+128+000+007+128+000+015+192"
  144. 148 c2$="+000+008+064+000+008+192+000+008+192+000+008+192+000+008+192+000+008"
  145. 149 c3$="+192+000+015+192+000+008+064+000+015+192+"
  146. 150 sn$="[158]lippenstift":goto55
  147. 151 :
  148. 152 s1$="[159]0[157]6[157]11[157][157][159]8[157]25[157][157][159]25[157][157][159]8[157]8[157]10[157][157]34[157][157][159]44[157][157][159]14[157][157]13[157][157]"
  149. 153 s2$="7[157]0":s$=s1$+s2$
  150. 154 w$="[159]355111111115530[157][157][157][157][157][157][157][157][157][157][157][157][159]2616666[159]1[157][157][157][157][157][157][157][159]333322[157][157][157][157][157]3"
  151. 155 a1$="000000000000000000011111100000000100000010000000111111110000000110"
  152. 156 a2$="1111100000001101111100000001111111100000001111111100000001111111111"
  153. 157 a3$="000111000000111101111000000111101111111111111101111111111111000"
  154. 158 a4$="11111110000000000000000000000":sn$="[158]zylinder"
  155. 159 c1$="+000+000+000+015+192+000+016+032+000+031+224+000+027+224+000+027+224"
  156. 160 c2$="+000+031+224+000+031+224+000+031+252+000+112+030+000+240+030+000+255"
  157. 161 c3$="+254+000+255+252+000+127+000+000+000+000+":goto55
  158. 162 :
  159. 163 s1$="[159]33[157][157][159]14[159]1[157][157][157]18[157][157][159]18[157][157][159]18[157][157][159]18[157][157][159]14[159]1[157][157][157]31[159]1[157][157][157]11"
  160. 164 s2$="[157][157][159]11[157][157][159]11[157][157][159]11[157][157][159]11[157][157][159]11[157][157][159]3":s$=s1$+s2$:sn$="[158]axt"
  161. 165 w$="[159]008186611144000[157][157][157][157][157][157][157][157][157][157][157][157]1   [159]54[159]5[157][157]1"
  162. 166 a1$="00111001110000000101111010000000101111111100000101111111100000101111"
  163. 167 a2$="1111000001011111111000001011110100000001110010100000000000010100000"
  164. 168 a3$="0000000101000000000000101000000000000101000000000000101000000000000"
  165. 169 a4$="10100000000000011100000"
  166. 170 c1$="+057+192+000+047+064+000+047+240+000+047+240+000+047+240+000+047+240"
  167. 171 c2$="+000+047+064+000+057+064+000+001+064+000+001+064+000+001+064+000+001"
  168. 172 c3$="+064+000+001+064+000+001+064+000+001+192+":goto55
  169. 173 :
  170. 174 s$="[159]2[157]2[157]2[157]9[157]3[157]5[157]7[157]9[157]14[157][157][159]12[159]4[157][157][157]14[157][157][159]9[157]7[157]5[157]9":sn$="[158]ofen"
  171. 175 w1$="[159]000114851111000[157][157][157][157][157][157][157][157][157][157][157][157]52314[159]2175[157][157][157][157][157][157][157][157][157][159]1214  0[159]11"
  172. 176 w2$="[157][157][157][157][157][157][157][157]14":w$=w1$+w2$
  173. 177 a1$="00000110000000000000110000000000000110000000000011111111100000000011"
  174. 178 a2$="10000000000011111000000000111111100000001111111110000001000011110000"
  175. 179 a3$="00101101111000000100001111000000111111111000000011111110000000001111"
  176. 180 a4$="100000000111111111000"
  177. 181 c1$="+006+000+000+006+000+000+006+000+000+031+240+000+003+128+000+007+192"
  178. 182 c2$="+000+015+224+000+031+240+000+016+240+000+022+240+000+016+240+000+031"
  179. 183 c3$="+240+000+015+224+000+007+192+000+031+240+":goto55
  180. 184 :
  181. 185 s1$="[159]0[157]0[157]9[157]7[157]22[159]3[157][157][157]22[159]3[157][157][157]22[159]3[157][157][157]15[157][157]15[157][157]15[157][157]15[157][157]34[159]2"
  182. 186 s2$="[157][157][157]31[159]41[159]2[157][157][157][157][157]11[159]11[157][157][157][157][159]5":s$=s1$+s2$
  183. 187 w1$="[159]111222111877786[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]6[159]13444[159]316 111[157][157][157][157][157][157][157][157][157][157][159]111"
  184. 188 w2$="     1[157][157][157][157][157][157][157][157]1":w$=w1$+w2$:sn$="[158]lokomotive"
  185. 189 a1$="00000000000000000000000000000011111111100000001111111000000001100011"
  186. 190 a2$="00111000110001100111000110001100111001111111111111111111111111111111"
  187. 191 a3$="11111111111111111111111111111111000111100011111010111101011001000100"
  188. 192 a4$="100010001111100111110"
  189. 193 c1$="+000+000+000+000+000+000+255+128+000+127+000+000+099+056+000+099+056"
  190. 194 c2$="+000+099+056+000+255+254+000+255+254+000+255+254+000+255+254+000+227"
  191. 195 c3$="+198+000+235+214+000+034+068+000+062+124+":goto55
  192. 196 :
  193. 197 s1$="[159]5[157]7[157]22[159]3[157][157][157]9[157]12[159]21[157][157][157][157][159]9[157]9[157]24[159]1[157][157][157]11[159]1[157][157][157]11[157][157][159]9[157]"
  194. 198 s2$="11[157][157][159]11[157][157][159]11[157][157][159]3":s$=s1$+s2$
  195. 199 w$="[159]000932842839000[157][157][157][157][157][157][157][157][157][157][157]3454512[157][157][157][157][157][157][157][159]11 15 1[157][157][157][157]1"
  196. 200 a1$="00000111110000000001111111000000011011011100000011111111100000010110"
  197. 201 a2$="11010000001111111110000001111111110000001101111010000001000100010000"
  198. 202 a3$="00100000001000000111111111000000000101000000000000101000000000000101"
  199. 203 a4$="000000000000111000000":sn$="[158]eis"
  200. 204 c1$="+007+192+000+015+224+000+027+112+000+031+240+000+022+208+000+031+240"
  201. 205 c2$="+000+031+240+000+027+208+000+017+016+000+016+016+000+031+240+000+002"
  202. 206 c3$="+128+000+002+128+000+002+128+000+003+128+":goto55
  203. 207 :
  204. 208 s1$="[159]0[157]22[157][157][159]13[159]1[157][157][157]1[157]1[157]1[157]6[157]8[157]91[159]1[157][157][157]28[159]3[157][157][157]113[157][157][157][159]14[157][157]"
  205. 209 s2$="12[157][157]0[157]0":sn$="[158]wal":s$=s1$+s2$
  206. 210 w$="[159]361121211542533[157][157][157][157][157][157][157][157][157][157][157][157][157]377[159]1776[157][157][157][157][157][157][157][159]3"
  207. 211 a1$="00000000000000000011011000000000101110100000000000100000000000000100"
  208. 212 a2$="00000000000010000000000011111100000000111111110000000111111111001011"
  209. 213 a3$="10111111110111111111111110111111111111111110011111111111100000000000"
  210. 214 a4$="000000000000000000000"
  211. 215 c1$="+000+000+000+027+000+000+046+128+000+004+000+000+004+000+000+004+000"
  212. 216 c2$="+000+063+000+000+127+128+000+127+202+000+223+238+000+255+238+000+255"
  213. 217 c3$="+252+000+127+248+000+000+000+000+000+000+":goto55
  214. 218 :
  215. 219 s1$="[159]4[157]6[157]33[157][157][159]11[159]11[157][157][157][157][159]11[159]11[157][157][157][157][159]11[159]11[157][157][157][157][159]11[159]11[157][157][157][157][159]8[157]"
  216. 220 s2$="9[157]32[157][157][159]18[157][157][159]11[159]11[157][157][157][157][159]11[159]11[157][157][157][157][159]11[159]11[157][157][157][157][159]11"
  217. 221 w$="[159]000121229273600[157][157][157][157][157][157][157][157][157][157][157][157]23[159]122121[157][157][157][157][157][159]51 4":s$=s1$+s2$
  218. 222 a1$="00000111100000000001111110000000011100111000000010100101000000010100"
  219. 223 a2$="10100000001010010100000001010010100000001111111100000001111111110000"
  220. 224 a3$="00111000001100000101111111100000100100100100000100100100100000100100"
  221. 225 a4$="100100000000100000100":sn$="[158]stuhl"
  222. 226 c1$="+007+128+000+015+192+000+028+224+000+020+160+000+020+160+000+020+160"
  223. 227 c2$="+000+020+160+000+031+224+000+031+240+000+028+024+000+023+248+000+018"
  224. 228 c3$="+072+000+018+072+000+018+072+000+002+008+":goto55
  225. 229 :
  226. 230 s1$="[159]13[157][157]29[157][157][159]13[157][157]11[159]11[157][157][157][157][159]17[159]1[157][157][157]12[159]41[157][157][157][157][159]11[159]31[157][157][157][157][159]1"
  227. 231 s2$="3[159]1[157][157][157]11[159]11[157][157][157][157][159]11[159]11[157][157][157][157][159]17[159]1[157][157][157]12[159]41[157][157][157][157][159]13[157][157]29[157][157][159]13"
  228. 232 w1$="[159]031113333363130[157][157][157][157][157][157][157][157][157][157][157][157][157][157]3[159]5143144363[159]53[157][157][157][157][157][157][157][157][157][157][157][159]141155"
  229. 233 w2$="1[157][157][157][157][157][157][157]1131  5[157][157][157][157][159]3":s$=s1$+s2$:w$=w1$+w2$
  230. 234 a1$="01111111111111001100111111111001111111111111000101000001010000101111"
  231. 235 a2$="11101000010110111101000010010111001000010001110001000010010001001000"
  232. 236 a3$="01010000010100001011111110100001011011110100011111111111110011001111"
  233. 237 a4$="111110011111111111110":sn$="[158]sanduhr"
  234. 238 c1$="+127+252+000+103+252+000+127+252+000+040+040+000+047+232+000+045+232"
  235. 239 c2$="+000+037+200+000+035+136+000+036+072+000+040+040+000+047+232+000+045"
  236. 240 c3$="+232+000+127+252+000+103+252+000+127+252+":goto55
  237. 241 :
  238. 242 s1$="[159]3[157]3[157]3[157]23[157][157][159]23[157][157][159]25[157][157][159]27[157][157][159]27[157][157][159]41[159]2[157][157][157]61[159]22[157][157][157][157][159]6"
  239. 243 s2$="1[159]2[157][157][157]21[159]12[159]2[157][157][157][157][157]21[159]12[157][157][157][157][159]21[159]7[157][157][157]67":s$=s1$+s2$
  240. 244 w$="[159]678836009388819[157][157][157][157][157][157][157][157][157][157][157][157][157]111    2112[159]0[157][157][157]11[157][157]22"
  241. 245 a1$="00000000001110000000000001110000000000001110000110000001110000110000"
  242. 246 a2$="00111000011000001111100011000011111110011000011111110111100010000111"
  243. 247 a3$="11111001011011111111001000011110001001011011110001001000011110001001"
  244. 248 a4$="111111111111001111111":sn$="[158]flaschen"
  245. 249 c1$="+000+056+000+000+056+000+000+056+000+048+056+000+048+056+000+048+124"
  246. 250 c2$="+000+048+254+000+048+254+000+120+134+000+252+182+000+252+134+000+196"
  247. 251 c3$="+182+000+196+134+000+196+254+000+252+254+":goto55
  248. 252 :
  249. 253 s1$="[159]15[157][157]15[157][157]51[159]1[157][157][157]51[159]3[157][157][157]22[159]11[159]1[157][157][157][157][157]52[159]2[157][157][157]22[159]5[157][157][157]57[157][157]"
  250. 254 s2$="[159]22[159]13[157][157][157][157][159]51[159]11[157][157][157][157][159]57[159]1[157][157][157]22[159]9[157][157][157]22[159]5[157][157][157]15[157][157]15"
  251. 255 w1$="[159]114112622222622[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]551[159]552532223512[157][157][157][157][157][157][157][157][157][157][157][157][157][159]1 "
  252. 256 w2$="  255555214[157][157][157][157][157][157][157][157][157][157][157][157][157]2          12[157][157][157][157][157][157][157][157][157][157][157][157][157][159]2          2"
  253. 257 a1$="11111111111111111111111111111111111010000010011111010000011111011010"
  254. 258 a2$="00001011111101100011001101100111110001111101111111001101101000001111"
  255. 259 a3$="11110100000101111110111111101110110111111111110110011111000111111111"
  256. 260 a4$="111111111111111111111":s$=s1$+s2$:w$=w1$+w2$:sn$="[158]kaffeemaschine"
  257. 261 c1$="+255+254+000+255+254+000+250+008+000+250+014+000+218+010+000+251+024"
  258. 262 c2$="+000+217+240+000+251+248+000+218+014+000+250+010+000+251+250+000+219"
  259. 263 c3$="+254+000+217+240+000+255+254+000+255+254+":goto55
  260. 264 :
  261. 265 s1$="[159]0[157]0[157]11[157][157]110[157][157][157][159]110[157][157][157][159]12[159]21[159]3[157][157][157][157][157]12[159]11[159]3[157][157][157][157][157]12[159]11[159]3"
  262. 266 s2$="[157][157][157][157][157]12[159]33[157][157][157][157][159]110[157][157][157][159]15[157][157]11[157][157][159]11[157][157][159]11[157][157][159]11":s$=s1$+s2$
  263. 267 w$="[159]711129933433987[157][157][157][157][157][157][157][157][157][157][157][157][157][157]1111  65752[157][157][157][157][157][157][157][157][157][157][159]11"
  264. 268 a1$="00000000000000000000000000000000111111111110001001111111111010000111"
  265. 269 a2$="11111111011011001001111000011010101111000011010101111000011011101111"
  266. 270 a3$="00001111111111111111111111111000000010100000000000010100000000000010"
  267. 271 a4$="100000000000010100000":sn$="[158]briefkasten"
  268. 272 c1$="+000+000+000+000+000+000+063+248+000+079+252+000+135+254+000+182+078"
  269. 273 c2$="+000+134+174+000+134+174+000+134+238+000+135+254+000+255+254+000+001"
  270. 274 c3$="+064+000+001+064+000+001+064+000+001+064+":goto55
  271. 275 :
  272. 276 s1$="[159]5[157]11[159]11[157][157][157][157][159]13[159]1[157][157][157]42[159]2[157][157][157]11[159]5[157][157][157]15[157][157]17[159]11[157][157][157][157][159]13[159]4"
  273. 277 s2$="1[157][157][157][157][159]12[159]33[159]1[157][157][157][157][157]12[159]22[159]21[157][157][157][157][157][157][159]12[159]13[159]21[157][157][157][157][157][157][159]12[159]52[159]"
  274. 278 s3$="1[157][157][157][157][157]13[159]33[159]1[157][157][157][157][157]14[159]41[157][157][157][157][159]15":s$=s1$+s2$+s3$
  275. 279 w1$="[159]131163231313131[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]01113322441211[159]0[157][157][157][157][157][157][157][157][157][157][157][157][157]60 [159]"
  276. 280 w2$="22153282[159]1[157][157][157][157][157][157][157][157]13122[157][157][157][157][159]1  3":w$=w1$+w2$:sn$="[158]kamera"
  277. 281 a1$="00000000111110000000001010101000000001011101001111001100011001001000"
  278. 282 a2$="11111001111111111111111001111111001011001110001111011001101110111011"
  279. 283 a3$="01101101101101101101011101101101101111101101101110111011101101111000"
  280. 284 a4$="1111011111111111111111":a$=a1$+a2$+a3$+a4$
  281. 285 c1$="+000+248+000+001+084+000+001+116+000+121+140+000+072+248+000+255+254"
  282. 286 c2$="+000+159+202+000+156+122+000+155+186+000+182+218+000+181+218+000+183"
  283. 287 c3$="+218+000+187+186+000+188+122+000+255+254+":goto55
  284. 288 :
  285. 289 s1$="[159]2[157]11[157][157][159]11[157][157][159]11[159]3[157][157][157]11[159]5[157][157][157]11[159]11[157][157][157][157][159]73[159]1[157][157][157]11[159]15[157][157]"
  286. 290 s2$="[157][157][159]66[157][157][159]11[157][157][159]5[157]22[157][157][159]22[157][157][159]22[157][157][159]5":s$=s1$+s2$
  287. 291 w1$="[159]211111111152224[157][157][157][157][157][157][157][157][157][157][157][157][157][157]11111[159]15[159]41 222[157][157][157][157][157][157][157][157][157][157][157][159]3511"
  288. 292 w2$="[157][157]1":w$=w1$+w2$
  289. 293 a1$="00000011000000000000010100000000000010100000000000010100111000000010"
  290. 294 a2$="10111110000001010100011111111011100011000001010111110111111011111100"
  291. 295 a3$="00000101000000000011111000000000110011000000000110011000000000110011"
  292. 296 a4$="000000000011111000000":sn$="[158]schere"
  293. 297 c1$="+003+000+000+002+128+000+002+128+000+002+156+000+002+190+000+002+162"
  294. 298 c2$="+000+254+226+000+130+190+000+126+252+000+002+128*000+015+128+000+025"
  295. 299 c3$="+128+000+025+128+000+025+128+000+015+128+":goto55
  296. 300 :
  297. 301 s1$="[159]15[157][157]22[157][157][159]29[159]2[157][157][157]22[159]22[157][157][157][157][159]22[159]22[157][157][157][157][159]22[159]22[157][157][157][157][159]22[159]22"
  298. 302 s2$="[157][157][157][157][159]29[159]2[157][157][157]22[157][157][159]21[159]2[157][157][157]23[159]2[157][157][157]21[159]32[157][157][157][157][159]22[157][157][159]23[157][157][159]15"
  299. 303 w1$="[159]111111111111111[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]5516611111662[159]55[157][157][157][157][157][157][157][157][157][157][157][157]131111"
  300. 304 w2$="111[157][157][157][157][157][157][157][157][157]111111111[157][157][157][157][157][157][157][159]1   1":w$=w1$+w2$:s$=s1$+s2$
  301. 305 a1$="11111111111111111000000000001111011111111101111011000001101111011000"
  302. 306 a2$="00110111101100000110111101100000110111101111111110111100000000000111"
  303. 307 a3$="10010000000011110111000000011110010000111011110000000000011110000000"
  304. 308 a4$="000111111111111111111":sn$="[158]game boy"
  305. 309 c1$="+255+254+000+192+006+000+223+246+000+216+054+000+216+054+000+216+054"
  306. 310 c2$="+000+216+054+000+223+246+000+192+006+000+200+006+000+220+006+000+200"
  307. 311 c3$="+118+000+192+006+000+192+014+000+255+254+":goto55
  308. 312 :
  309. 313 s1$="[159]77[157][157][159]66[157][157][159]66[157][157][159]55[157][157][159]55[157][157][159]11[157][157][159]11[159]11[157][157][157][157][159]21[159]12[157][157][157][157]"
  310. 314 s2$="[159]33[157][157][159]44[157][157][159]33[157][157][159]33[157][157][159]21[159]2[157][157][157]23[159]2[157][157][157]17[159]1":s$=s1$+s2$
  311. 315 w$="[159]555553131355555[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]9741113 3111479[157][157][157][157][157][157][157][157][157][159]2 2"
  312. 316 a1$="11111110111111111111100011111111111100011111111111000001111111111000"
  313. 317 a2$="00111110000001010000001000001010000011100001010000111110000000001111"
  314. 318 a3$="11100000001111111000000000111111000000000111110000010000011110000111"
  315. 319 a4$="000011100011111110001":sn$="[158]stern"
  316. 320 c1$="+254+254+000+252+126+000+252+126+000+248+062+000+248+062+000+002+128"
  317. 321 c2$="+000+130+130+000+194+134+000+224+014+000+240+030+000+224+014+000+224"
  318. 322 c3$="+014+000+193+006+000+195+134+000+143+226+":goto55
  319. 323 :
  320. 324 s1$="[159]0[157]2[157]22[157][157][159]23[157][157][159]22[159]5[157][157][157]11[159]7[157][157][157]12[157][157]10[157][157]72[157][157][159]72[157][157][159]82"
  321. 325 s2$="[157][157][159]72[157][157][159]0[157]0[157]0":s$=s1$+s2$
  322. 326 w$="[159]221117111111115[157][157][157][157][157][157][157][157][157][157][157][157][157]316 6554449[159]1[157][157][157][157][157][157][157][157][157][157][157]4"
  323. 327 a1$="00000000000000000000000000011000000000001101100000000110011100011011"
  324. 328 a2$="00111110010010011111110001111111111110000111111111100001111111001100"
  325. 329 a3$="01111111000110111111110000110111111100000110000000000000000000000000"
  326. 330 a4$="000000000000000000000":sn$="[158]schuh (pumps)"
  327. 331 c1$="+000+000+000+000+012+000+000+054+000+000+206+000+027+062+000+036+254"
  328. 332 c2$="+000+031+254+000+015+252+000+031+204+000+063+140+000+255+012+000+254"
  329. 333 c3$="+012+000+000+000+000+000+000+000+000+000+":goto55
  330. 334 :
  331. 335 s1$="[159]0[157]7[157]62[157][157][159]23[159]2[157][157][157]15[157][157][159]26[157][157][159]15[157][157][159]21[159]11[159]5[157][157][157][157][157]15[157][157][159]2"
  332. 336 s2$="1[159]11[159]5[157][157][157][157][157]15[157][157][159]21[159]11[159]5[157][157][157][157][157]15[157][157][159]12[157][157]0":s$=s1$+s2$
  333. 337 w1$="[159]932122231121180[157][157][157][157][157][157][157][157][157][157][157][157][157][157]1111111311[159]20[157][157][157][157][157][157][157][157][157][157][157][157]1 1 1 111"
  334. 338 w2$="0[157][157][157][157][157][157][157][157][157][157]1 1 1 1[157][157][157][157][157][157][157][159]1 1 1 1":w$=w1$+w2$:sn$="[158]brot"
  335. 339 a1$="00000000000000000001111111000000111111001100001100001110110001000000"
  336. 340 a2$="111110011000000111111010000000011111011010101011111010"
  337. 341 a3$="0000000111110110101010111110100000000111110110101010111110100000000"
  338. 342 a4$="111110111111111111000000000000000000"
  339. 343 c1$="+000+000+000+015+224+000+063+048+000+097+216+000+064+248+000+192+252"
  340. 344 c2$="+000+128+124+000+213+124+000+128+124+000+213+124+000+128+124+000+213"
  341. 345 c3$="+124+000+128+124+000+255+240+000+000+000+":goto55
  342. 346 :
  343. 347 s1$="[159]0[157]3[157]6[157]15[157][157][159]52[157][157][159]13[159]2[157][157][157]12[157][157][159]42[157][157][159]82[157][157][159]19[157][157][159]45[157][157][159]"
  344. 348 s2$="81[157][157][159]13[157][157]9[157]5":s$=s1$+s2$
  345. 349 w1$="[159]08325532222470[157][157][157][157][157][157][157][157][157][157][157][157]2222222223[157][157][157][157][157][157][157][157][157][157][159]323333333[157][157]"
  346. 350 w2$="[157][157][157][157][157][157]3":w$=w1$+w2$:sn$="[158]kuchen"
  347. 351 a1$="00000000000000000011100000000000111111000000000101111100000000111110"
  348. 352 a2$="1100000010111000110000010000000011000011110000001100011111111000110"
  349. 353 a3$="0100011111111100111100001111100111111110000100111111111111100000011"
  350. 354 a4$="11111110000000000111110":n$="[158]kuchen"
  351. 355 c1$="+000+000+000+028+000+000+063+000+000+047+128+000+062+192+000+092+096"
  352. 356 c2$="+000+064+048+000+120+024+000+127+140+000+071+252+000+120+124+000+127"
  353. 357 c3$="+132+000+127+252+000+007+252+000+000+124+":goto55
  354. 358 :
  355. 359 s1$="[159]0[157]0[157]11[157][157]13[157][157]12[159]11[159]11[157][157][157][157][157][157][159]12[159]11[159]11[157][157][157][157][157][157][159]111[157][157][157][159]15[157]"
  356. 360 s2$="[157]15[157][157]15[157][157]15[157][157]36[159]2[157][157][157]11[159]11[157][157][157][157][159]44[157][157][159]0":s$=s1$+s2$
  357. 361 w1$="[159]551221121212929[157][157][157][157][157][157][157][157][157][157][157][157][157]145[159]206[159]06[159]2518[157][157][157][157][157][157][157][157][157][157][157][159]11   "
  358. 362 w2$="   1":w$=w1$+w2$:sn$="[158]bus"
  359. 363 a1$="00000000000000000000000000000000011111111111000111111111111100100110"
  360. 364 a2$="10101010010011010101010010111111111111111111111111111111111111111111"
  361. 365 a3$="11111111111111111111111111111111001111110011001001000010010001111000"
  362. 366 a4$="011110000000000000000"
  363. 367 c1$="+000+000+000+000+000+000+031+252+000+063+254+000+038+170+000+038+170"
  364. 368 c2$="+000+047+254+000+255+254+000+255+254+000+255+254+000+255+254+000+231"
  365. 369 c3$="+230+000+036+036+000+060+060+000+000+000+":goto55
  366. 370 :
  367. 371 s1$="[159]3[157]11[157][157][159]9[157]22[157][157][159]22[157][157][159]11[157][157][159]11[157][157][159]15[157][157]11[157][157][159]15[157][157]11[157][157][159]1"
  368. 372 s2$="3[159]1[157][157][157]23[159]2[157][157][157]21[159]2[157][157][157]9":s$=s1$+s2$:sn$="[158]glocke"
  369. 373 w1$="[159]342211313112243[157][157][157][157][157][157][157][157][157][157][157][157][157][157]4111111111114[159][157][157][157][157][157][157][157][157][157][157][157][157]111111111"
  370. 374 w2$="11[157][157][157][157][157][157][157][157][157][157][157]22112121122[157][157][157][157][157][157][157][159]141":w$=w1$+w2$
  371. 375 a1$="00000011100000000000010100000000011111111100000110000000110001100000"
  372. 376 a2$="00001100100000000000100100000000000101111111111111111000000000000011"
  373. 377 a3$="11111111111111010000000000010010000111000010011000111000110001100010"
  374. 378 a4$="001100000111111111000"
  375. 379 c1$="+003+128+000+002+128+000+031+240+000+048+024+000+096+012+000+064+004"
  376. 380 c2$="+000+064+004+000+255+254+000+128+002+000+255+254+000+064+004+000+067"
  377. 381 c3$="+132+000+099+140+000+049+024+000+031+240+":goto55
  378. 382 :
  379. 383 s1$="[159]42[157][157][159]10[157][157]27[157][157][159]48[157][157][159]39[157][157][159]81[159]4[157][157][157]15[157][157]91[157][157][159]11[159]1[157][157][157][159]15"
  380. 384 s2$="[157][157]11[159]11[157][157][157][157][159]15[157][157]11[157][157][159]11[157][157][159]13":s$=s1$+s2$:sn$="[158]schlittschuh"
  381. 385 w1$="[159]655122225746671[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]21333345221131[159]0[157][157][157][157][157][157][157][157][157][157][157][157][157][157]1113"
  382. 386 w2$="1111131113[157][157][157][157][157][157][157][157][157][157][157][157][157][157]2 111111111 1[157][157][157][157][157][157][157][157][157][157][157][159]1 1111"
  383. 387 a1$="00000011110001100000111111111100001100111111101111001111111111100011"
  384. 388 a2$="11111111111111101011111111111111111111111111110000011000000001000011"
  385. 389 a3$="11111111111111001010000010100111111111111111100000000000001010000000"
  386. 390 a4$="000001011111111111110":w$=w1$+w2$
  387. 391 c1$="+003+198+000+007+254+000+012+254+000+121+254+000+227+254+000+255+094"
  388. 392 c2$="+000+255+254+000+255+130+000+128+066+000+255+254+000+040+040+000+255"
  389. 393 c3$="+254+000+128+002+000+064+002+000+127+252+":goto55
  390. 394 :
  391. 395 s1$="[159]0[157]0[157]0[157]6[157]42[159]1[157][157][157]310[157][157][157][159]11[159]11[159]2[157][157][157][157][157]11[159]11[159]11[157][157][157][157][157][157][159]11"
  392. 396 s2$="[159]11[157][157][157][157][159]21[159]11[157][157][157][157][159]13[157][157]55[157][157][159]0[157]0[157]0":s$=s1$+s2$:sn$="[158]schuh"
  393. 397 w$="[159]522113143111116[157][157][157][157][157][157][157][157][157][157][157][157][157][157]2262221111112[157][157][157][157][157][159]22412[157][157]2"
  394. 398 a1$="00000000000000000000000000000000000000000000000000000111111001111001"
  395. 399 a2$="1000001111001111111111100101010000011100101010000101100100000001001"
  396. 400 a3$="11010000000100101111111111111000111110011111000000000000000000000000"
  397. 401 a4$="00000000000000000000000"
  398. 402 c1$="+000+000+000+000+000+000+000+000+000+000+252+000+121+130+000+231+254"
  399. 403 c2$="+000+149+006+000+149+010+000+144+018+000+208+018+000+127+252+000+062"
  400. 404 c3$="+124+000+000+000+000+000+000+000+000+000+":goto55
  401. 405 :
  402. 406 s1$="[159]0[157]0[157]5[157]33[157][157][159]11[157][157][159]22[157][157][159]11[159]11[157][157][157][157][159]13[159]3[157][157][157]11[159]14[157][157][157][157][159]1"
  403. 407 s2$="6[157][157][159]38[157][157][159]12[157][157]7[157]0[157]0":s$=s1$+s2$:sn$="[158]kappe"
  404. 408 w$="[159]631211121386542[157][157][157][157][157][157][157][157][157][157][157][157][157][157]121123134[157][157][157][157][159]233"
  405. 409 a1$="00000000000000000000000000000000011111000000001110001110000001000000"
  406. 410 a2$="01000001100000001100001000001010100001000001110111001000001010111101"
  407. 411 a3$="00000000111111111000011111111001111111111110000001111111000000000000"
  408. 412 a4$="000000000000000000000"
  409. 413 c1$="+000+000+000+000+000+000+031+000+000+113+192+000+064+064+000+192+096"
  410. 414 c2$="+000+130+160+000+131+184+000+130+188+000+128+126+000+225+254+000+063"
  411. 415 c3$="+252+000+007+240+000+000+000+000+000+000+":goto55
  412. 416 :
  413. 417 s1$="[159]9[157]13[157][157]15[157][157]55[157][157][159]41[159]14[157][157][157][157][159]41[159]14[157][157][157][157][159]7[157]9[157]33[157][157][159]33[159]3[157][157]"
  414. 418 s2$="[157]33[159]3[157][157][157]43[159]4[157][157][157]55[157][157][159]13[157][157]13":s$=s1$+s2$:sn$="[158]telefon"
  415. 419 w$="[159]455643333346554[157][157][157][157][157][157][157][157][157][157][157][157][157][157]4689522259864[157][157][157][157][157][157][157][157][157][159]33333[157][157][157][157]222"
  416. 420 a1$="000111111111000011111111111110111111111111111111110000011111111101"
  417. 421 a2$="00010111111110100010111100001111111000000011111111100000011100011100"
  418. 422 a3$="00011101110111000011101110111000111101110111100111110001111100111111"
  419. 423 a4$="11111110011111111111110"
  420. 424 c1$="+031+240+000+127+252+000+255+254+000+248+062+000+244+094+000+244+094"
  421. 425 c2$="+000+015+224+000+031+240+000+028+112+000+059+184+000+059+184+000+123"
  422. 426 c3$="+188+000+124+124+000+127+252+000+127+252+":goto55
  423. 427 :
  424. 428 s1$="[159]2[157]22[157][157][159]11[157][157][159]21[157][157][159]12[157][157][159]22[157][157][159]9[157]11[157][157][159]51[157][157][159]11[159]1[157][157][157]31"
  425. 429 s2$="[159]1[157][157][157]11[159]1[157][157][157]51[157][157][159]11[157][157][159]7":s$=s1$+s2$:sn$="[158]dose"
  426. 430 w1$="[159]000911114321240[157][157][157][157][157][157][157][157][157][157][157]111511122[157][157][157][157][157][157][157][157][157][159]1111 0[157][157][157][157][157][157]111[157]"
  427. 431 w2$="[157][159]11":w$=w1$+w2$
  428. 432 a1$="00000000001110000000000011011000000000010001000000000110001000000000"
  429. 433 a2$="10001100000000011011000001111111110000001000001000000001111101000000"
  430. 434 a3$="00100010100000000111010100000000100010100000000111110100000000100000"
  431. 435 a4$="100000000111111100000"
  432. 436 c1$="+000+056+000+000+108+000+000+068+000+000+196+000+000+140+000+000+216"
  433. 437 c2$="+000+031+240+000+016+064+000+031+064+000+017+064+000+029+064+000+017"
  434. 438 c3$="+064+000+031+064+000+016+064+000+031+192+":goto55
  435. 439 :
  436. 440 s1$="[159]0[157]4[157]12[157][157][159]12[157][157][159]12[157][157][159]12[157][157][159]33[157][157][159]24[157][157][159]11[159]13[157][157][157][157][159]22[159]2"
  437. 441 s2$="3[157][157][157][157][159]11[159]13[157][157][157][157][159]11[159]13[157][157][157][157][159]22[159]23[157][157][157][157][159]21[159]13[157][157][157][157][159]8"
  438. 442 w$="[159]043216157397400[157][157][157][157][157][157][157][157][157][157][157][157][157]22421242[157][157][157][157][157][157][159]13 31":sn$="[158]knoblauch"
  439. 443 a1$="00000000000000000000111100000000000101100000000000101100000000000101"
  440. 444 a2$="10000000000010110000000001110011100000011000011110000010010101110000"
  441. 445 a3$="11011011011100010010001011100010010001011100011011011011100001101010"
  442. 446 a4$="111000000111111110000":s$=s1$+s2$
  443. 447 c1$="+000+000+000+007+128+000+005+128+000+005+128+000+005+128+000+005+128"
  444. 448 c2$="+000+028+224+000+048+240+000+037+112+000+109+184+000+072+184+000+072"
  445. 449 c3$="+184+000+109+184+000+053+112+000+031+224+":goto55
  446. 450 :
  447. 451 s1$="[159]2[157]3[157]3[157]4[157]64[157][157][159]61[159]5[157][157][157]14[157][157][159]71[159]4[157][157][157]71[159]3[157][157][157]21[157][157][159]67[157][157][159]"
  448. 452 s2$="67[157][157][159]8[157]11[157][157]6":s$=s1$+s2$
  449. 453 w1$="[159]222222231368658[157][157][157][157][157][157][157][157][157][157][157][157][157][157]222222 [159]054444[157][157][157][157][157][157][157][157][157][157][157][157][157][159]222222"
  450. 454 w2$="[157][157][157][157]2222":w$=w1$+w2$:sn$="[158]hand"
  451. 455 a1$="00000000001100000000000011100000000000011100000000000011110001111110"
  452. 456 a2$="00111100111111010111110000000010011111111111010011111111111010001110"
  453. 457 a3$="00000001100001011111101111111011111101111111000000011111111000111111"
  454. 458 a4$="111110000111111000000"
  455. 459 c1$="+000+048+000+000+112+000+000+112+000+000+120+000+126+060+000+126+190"
  456. 460 c2$="+000+000+158+000+254+158+000+254+142+000+000+194+000+126+254+000+126"
  457. 461 c3$="+254+000+001+254+000+031+252+000+031+128+":goto55
  458. 462 :
  459. 463 s1$="[159]3[157]5[157]14[157][157][159]13[157][157][159]32[157][157][159]12[159]4[157][157][157]32[159]2[157][157][157]62[157][157][159]9[157]61[157][157][159]52[157]"
  460. 464 s2$="[157][159]44[157][157][159]9[157]8[157]7":s$=s1$+s2$
  461. 465 w$="[159]789153322423453[157][157][157][157][157][157][157][157][157][157][157][157]0334622311[157][157][157][157][157][159]31":sn$="[158]schaufel"
  462. 466 a1$="00000000001110000000000011111000000000010111100000000010011100000000"
  463. 467 a2$="11100110001000110111100011101101100000111111011000001111111110000001"
  464. 468 a3$="1111101000000011111001100000011110011110000011111111100000011111111"
  465. 469 a4$="0000000111111100000000"
  466. 470 c1$="+000+056+000+000+124+000+000+094+000+000+078+000+000+230+000+017+188"
  467. 471 c2$="+000+059+096+000+126+192+000+255+128+000+253+000+000+249+128+000+243"
  468. 472 c3$="+192+000+255+128+000+255+000+000+254+000+":goto55
  469. 473 :
  470. 474 s1$="[159]7[157]33[157][157][159]22[157][157][159]11[157][157][159]22[157][157][159]11[157][157][159]11[157][157][159]11[157][157][159]22[157][157][159]11[159]31[159]"
  471. 475 s2$="1[157][157][157][157][157]12[159]52[159]1[157][157][157][157][157]11[159]31[159]11[157][157][157][157][157][157][159]35[159]3[157][157][157]25[159]2[157][157][157]3"
  472. 476 w1$="[159]732121111121237[157][157][157][157][157][157][157][157][157][157][157][157][157][157]124 46624 421[157][157][157][157][157][157][157][157][157][157][157][157][157][159]22     3"
  473. 477 w2$="   22":s$=s1$+s2$:w$=w1$+w2$:sn$="[158]halskette"
  474. 478 a1$="00001111111000000111000001110001100000000011001000000000001011000000"
  475. 479 a2$="00000111000000000000011000000000000011000000000000011100000000000111"
  476. 480 a3$="01000111000101101101111101101010101110101010011101111101110001101111"
  477. 481 a4$="101100000000111000000"
  478. 482 c1$="+015+224+000+056+056+000+096+012+000+064+004+000+192+006+000+128+002"
  479. 483 c2$="+000+128+002+000+128+002+000+192+006+000+163+138+000+183+218+000+087"
  480. 484 c3$="+084+000+119+220+000+055+216+000+003+128+":goto55
  481. 485 :
  482. 486 s1$="[159]3[157]5[157]5[157]7[157]11[157][157][159]21[159]2[157][157][157]11[157][157][159]9[157]27[157][157][159]29[157][157][159]211[157][157][157][159]15[157][157]1"
  483. 487 s2$="5[157][157]11[159]11[157][157][157][157][159]33[159]3"
  484. 488 w1$="[159]352253444316553[157][157][157][157][157][157][157][157][157][157][157][157][157]22316161[159]011[157][157][157][157][157][157][157][157][157][157][157][159]111116171"
  485. 489 w2$="[157][157][157][157][157][157]5 1":s$=s1$+s2$:w$=w1$+w2$:sn$="[158]ufo"
  486. 490 a1$="00000011100000000000111110000000000111110000000001111111000000001000"
  487. 491 a2$="00100000000110101100000000100000100000001111111110000011001111111000"
  488. 492 a3$="11001111111110110011111111111111111111111111111111111111111010001000"
  489. 493 a4$="100010001110111011100"
  490. 494 c1$="+003+128+000+007+192+000+007+192+000+015+224+000+008+032+000+013+096"
  491. 495 c2$="+000+008+032+000+031+240+000+051+248+000+103+252+000+207+254+000+255"
  492. 496 c3$="+254+000+255+254+000+068+068+000+059+184+":goto55
  493. 497 :
  494. 498 s1$="[159]0[157]21[159]1[157][157][157]13[157][157][159]32[159]3[157][157][157]56[157][157][159]13[157][157]15[157][157]15[157][157]211[157][157][157][159]211[157][157][157]"
  495. 499 s2$="[159]15[157][157]29[157][157][159]11[157][157]7[157]0":s$=s1$+s2$:sn$="[158]tomate"
  496. 500 w$="[159]585512131111185[157][157][157][157][157][157][157][157][157][157][157][157][157]318199111[159]00[157][157][157][157][157][157][157][157][157][157]120  001"
  497. 501 a1$="00000000000000000001101001000000000101110000000111011001110001111100"
  498. 502 a2$="11111100111111111111101111111111111111111111111111111100111111111111"
  499. 503 a3$="10011111111111111111111111111011001111111110001111111111100000011111"
  500. 504 a4$="110000000000000000000"
  501. 505 c1$="+000+000+000+013+032+000+005+192+000+059+056+000+124+252+000+127+252"
  502. 506 c2$="+000+255+254+000+255+254+000+207+254+000+207+254+000+255+254+000+103"
  503. 507 c3$="+252+000+063+248+000+015+224+000+000+000+":goto55
  504. 508 :
  505. 509 a1$="00001111100000000011010110000000011101110000000011010110000000001111"
  506. 510 a2$="10000000000001000000000000001000000000000001000000000000001000000000"
  507. 511 a3$="00000100000000111000100001111011110101111110001110101111100001111111"
  508. 512 a4$="110000000011110000000"
  509. 513 s1$="[159]5[157]21[159]2[157][157][157]33[157][157][159]21[159]2[157][157][157]5[157]1[157]1[157]1[157]1[157]1[157]31[159]4[157][157][157]41[159]6[157][157][157]31"
  510. 514 s2$="[159]5[157][157][157]9[157]4":s$=s1$+s2$:sn$="[158]blume"
  511. 515 w$="[159]124351215333321[157][157][157][157][157][157][157][157][157][157][157][157]3411133[157][157][157][157][157][159]11[159]1[157][157][157]2 2"
  512. 516 c1$="+015+128+000+026+192+000+029+192+000+026+192+000+015+128+000+002+000"
  513. 517 c2$="+000+002+000+000+002+000+000+002+000+000+002+000+000+226+030+000+122"
  514. 518 c3$="+252+000+058+248+000+063+224+000+015+000+":goto55
  515. 519 :
  516. 520 s1$="[159]0[157]0[157]8[157]22[157][157][159]13[157][157]13[157][157]27[159]1[157][157][157]210[157][157][157][159]12[157][157]28[157][157][159]13[157][157]18[159]1"
  517. 521 s2$="[157][157][157]16[159]1[157][157][157]22[157][157][159]11":s$=s1$+s2$:sn$="[158]kaffeetasse"
  518. 522 w1$="[159]048111111118224[157][157][157][157][157][157][157][157][157][157][157][157][157]2[159]0299999[159]0142[157][157][157][157][157][157][157][157][157][157][157]1[159]111111"
  519. 523 w2$="1 [159]24[157][157][157][157][157][157][157][157][157][157]3[157][159]1":w$=w1$+w2$
  520. 524 a1$="00000000000000000000000000000000011111111000000110000001100000111111"
  521. 525 a2$="11111110011111111111110011011111110010011011111111110011111111111100"
  522. 526 a3$="01101111111100011111111111110010111111110010010011111100010011000000"
  523. 527 a4$="000110001111111111100"
  524. 528 c1$="+000+000+000+000+000+000+031+224+000+048+048+000+063+254+000+063+254"
  525. 529 c2$="+000+055+242+000+055+254+000+063+252+000+055+248+000+127+252+000+095"
  526. 530 c3$="+228+000+079+196+000+096+012+000+063+248+":goto55
  527. 531 :
  528. 532 s1$="[159]0[157]33[157][157][159]103[157][157][157][159]33[159]12[157][157][157][157][159]33[159]11[157][157][157][157][159]21[159]12[159]21[157][157][157][157][157][157][159]21"
  529. 533 s2$="[159]12[159]11[157][157][157][157][157][157][159]15[159]1[157][157][157]12[159]13[157][157][157][157][159]21[159]2[157][157][157]61[157][157][159]11[157][157][159]11[157][157][159]"
  530. 534 s3$="11[159]41[157][157][157][157][159]74":s$=s1$+s2$+s3$:sn$="[158]hund"
  531. 535 w1$="[159]594211249614121[157][157][157][157][157][157][157][157][157][157][157][157][157]621121211142[159]2[157][157][157][157][157][157][157][157][157][157][157][157]11111   21"
  532. 536 w2$="1[157][157][157][157][157][157][157][157][157][157][157]1121":w$=w1$+w2$
  533. 537 a1$="00000000000000001110011100000011111111110111011100001110101111100001"
  534. 538 a2$="11010011101001011011011101001011001010100000011111010100110010001110"
  535. 539 a3$="11000001000011001111110000001001000000000001001000000000001001001001"
  536. 540 a4$="111001001111111001111"
  537. 541 c1$="+000+000+000+115+128+000+255+220+000+225+214+000+225+210+000+210+218"
  538. 542 c2$="+000+210+202+000+064+250+000+076+142+000+096+134+000+063+002+000+032"
  539. 543 c3$="+002+000+032+002+000+036+242+000+063+158+":goto55
  540. 544 :
  541. 545 s1$="[159]33[157][157][159]11[159]11[157][157][157][157][159]14[159]1[157][157][157]11[159]11[157][157][157][157][159]33[157][157][159]11[157][157][159]14[159]2[157][157][157]2"
  542. 546 s2$="1[159]11[157][157][157][157][159]14[159]2[157][157][157]11[157][157][159]21[157][157][159]13[159]1[157][157][157]65[157][157][159]11[159]11[157][157][157][157][159]55"
  543. 547 w1$="[159]054815115173700[157][157][157][157][157][157][157][157][157][157][157][157][157]1113113111[157][157][157][157][157][157][157][157][157][157][159]1113114111[157][157][157][157]"
  544. 548 w2$="[157][157][157][157]1 21 1":s$=s1$+s2$:w$=w1$+w2$:sn$="[158]overall"
  545. 549 a1$="00011100111000000010100101000000010111101000000010100101000000011100"
  546. 550 a2$="11100000001000000100000001011110110000011010010010000010011110011000"
  547. 551 a3$="01000000000100011000000000100010000111000100011111101111100010001001"
  548. 552 a4$="000100011111001111100"
  549. 553 c1$="+028+224+000+020+160+000+023+160+000+020+160+000+028+224+000+016+032"
  550. 554 c2$="+000+023+176+000+052+144+000+039+152+000+032+008+000+096+008+000+067"
  551. 555 c3$="+136+000+126+248+000+068+136+000+124+248+":goto55
  552. 556 :
  553. 557 s1$="[159]0[157]0[157]52[157][157][159]15[159]3[157][157][157]24[159]12[157][157][157][157][159]35[159]2[157][157][157]44[159]3[157][157][157]43[159]3[157][157][157]52[159]3"
  554. 558 s2$="[157][157][157]41[159]3[157][157][157]84[157][157][159]21[159]2[157][157][157]91[157][157][159]91[157][157][159]52":s$=s1$+s2$
  555. 559 w1$="[159]512344548299500[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]2545432141112[157][157][157][157][157][157][157][157][157][157][157][157][159]3123333 "
  556. 560 w2$="2[157][157][157][157][157][157][157][157]2":w$=w1$+w2$:sn$="[158]blatt"
  557. 561 a1$="00000000000000000000000000000011111000110000010111110111000011011110"
  558. 562 a2$="10110001110111110110001111011110111000111101110111000111110110111000"
  559. 563 a3$="00111101011100111111110111100110000001011000011111111101000001111111"
  560. 564 a4$="110100000011111001100"
  561. 565 c1$="+000+000+000+000+000+000+248+192+000+190+224+000+222+176+000+239+176"
  562. 566 c2$="+000+247+184+000+123+184+000+125+184+000+030+184+000+255+120+000+192"
  563. 567 c3$="+176+000+127+208+000+063+232+000+015+152+":goto55
  564. 568 :
  565. 569 s1$="[159]4[157]15[157][157][159]21[159]2[157][157][157]52[157][157][159]12[157][157][159]11[159]22[157][157][157][157][159]12[159]4[157][157][157]48[157][157][159]13[159]1"
  566. 570 s2$="1[157][157][157][157][159]13[159]11[157][157][157][157][159]11[157][157][159]11[157][157][159]11[159]41[157][157][157][157][159]11[159]11[159]1[157][157][157][157][157]53"
  567. 571 w$="[159]311213178332134[157][157][157][157][157][157][157][157][157][157][157][157][157][157]61111131131[159]0[157][157][157][157][157][157][157][157][157][157][157]1813[157][157]1"
  568. 572 a1$="11110000000000010011111000000011000101100000001111101100000001000001"
  569. 573 a2$="10000000100010110001100100000110011110111100111111110001000011101010"
  570. 574 a3$="00100001110101000100000000100000100000000100000101011110100000101010"
  571. 575 a4$="010100000111110011100":s$=s1$+s2$:sn$="[158]einhorn"
  572. 576 c1$="+240+000+000+159+000+000+197+128+000+125+128+000+065+128+000+069+140"
  573. 577 c2$="+000+065+158+000+121+254+000+016+234+000+016+234+000+016+008+000+016"
  574. 578 c3$="+008+000+021+232+000+021+040+000+031+056+":goto55
  575.