home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1985 June / 64er_Magazin_85-06_1985_Markt__Technik_de.d64 / samurai (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  10KB  |  482 lines
  1. 1 rem -------------------------
  2. 2 rem          samurai,
  3. 3 rem         written by
  4. 4 rem       thomas strigl
  5. 5 rem  austr.25,7585 lichtenau
  6. 6 rem -------------------------
  7. 11 :
  8. 12 :
  9. 13 dim fe(8,8)
  10. 15 si=54272:fl=si:fh=si+1:w=si+4:a=si+5:h=si+6:l=si+24
  11. 20 fa=2:z=1:s=1:sw=8:sr=8:x1=32:y1=61:x2=32:y2=229
  12. 30 poke53281,0:poke53280,0
  13. 40 gosub 9210
  14. 95 :
  15. 96 :
  16. 97 rem * spielfeld *
  17. 98 print"[152]  1  2  3  4  5  6  7  8
  18. 99 [153]" print#            "
  19. 100 [153]"1print#            "
  20. 101 [153]" print#            "
  21. 102 [153]" print#            "
  22. 103 [153]"2print#            "
  23. 104 [153]" print#            "
  24. 106 [153]" print#            "
  25. 107 [153]"3print#            "
  26. 108 [153]" print#            "
  27. 109 [153]" print#            "
  28. 110 [153]"4print#            "
  29. 111 [153]" print#            "
  30. 112 [153]" print#            "
  31. 113 [153]"5print#            "
  32. 114 [153]" print#            "
  33. 115 [153]" print#            "
  34. 116 [153]"6print#            "
  35. 117 [153]" print#            "
  36. 118 [153]" print#            "
  37. 119 [153]"7print#            "
  38. 120 [153]" print#            "
  39. 121 [153]" print#            "
  40. 122 [153]"8print#            "
  41. 123 [153]" print#            "
  42. 129 [153]""
  43. 131 [153][163]26)" written by"
  44. 132 [153][163]26)"thomas strigl"
  45. 133 [153][163]25)"tototototototototototototototo"
  46. 198 :
  47. 199 :
  48. 200 [143] *** grundstellung ***
  49. 201 b[178]1065:f[178]55337:y[178]1:v[178]12:c[178]9
  50. 209 [129]q[178]1[164]2
  51. 211 [139]y[178]2[167]b[178]1905:f[178]56177
  52. 212 [129]x[178]1[164]v
  53. 220 [151]b,160:[151]f,y
  54. 230 b[178]b[170]1:f[178]f[170]1:[130]x
  55. 240 [129]x[178]1[164]3
  56. 250 [151]b,160:[151]f,7
  57. 260 b[178]b[170]1:f[178]f[170]1
  58. 261 [151]v[170]5,61
  59. 265 [130]x
  60. 266 [129]x[178]1[164]c
  61. 267 [151]b,160:[151]f,y
  62. 268 b[178]b[170]1:f[178]f[170]1:[130]x
  63. 269 b[178]b[170]16:f[178]f[170]16
  64. 270 [129]x[178]1[164]24
  65. 271 [151]b,160:[151]f,y
  66. 272 b[178]b[170]1:f[178]f[170]1:[130]x
  67. 273 b[178]b[170]16:f[178]f[170]16
  68. 274 [129]x[178]1[164]24
  69. 275 [151]b,160:[151]f,y
  70. 276 b[178]b[170]1:f[178]f[170]1:[130]x
  71. 277 [139]y[178]1[167]a[178]4:za[178]3:b[178]1106:f[178]55378
  72. 278 [139]y[178]2[167]b[178]1946:f[178]56218
  73. 280 [129]x[178]1[164]a
  74. 281 zu[178][181](4[172][187](1))[170]1
  75. 282 [151]b,zu[170]176:[151]f,y
  76. 284 [139]y[178]1[167]fe(1,x)[178]zu[170]10
  77. 285 [139]y[178]2[167]fe(8,x)[178]zu
  78. 286 b[178]b[170]3:f[178]f[170]3:[130]x
  79. 289 zk[178][181](2[172][187](1))[170]1
  80. 290 [151]b,zk[170]176:[151]f,y
  81. 291 b[178]b[170]3:f[178]f[170]3
  82. 293 [139]y[178]1[167]fe(1,5)[178]zk[170]30
  83. 294 [139]y[178]2[167]fe(8,4)[178]zk[170]20
  84. 300 [129]x[178]1[164]za
  85. 305 zu[178][181](4[172][187](1))[170]1
  86. 306 [151]b,zu[170]176:[151]f,y
  87. 307 [139]y[178]1[167]fe(1,x[170]5)[178]zu[170]10
  88. 308 [139]y[178]2[167]fe(8,x[170]4)[178]zu
  89. 310 b[178]b[170]3:f[178]f[170]3:[130]x
  90. 350 a[178]a[171]1:za[178]za[170]1:y[178]2:c[178]12:v[178]9:[130]q
  91. 360 [139]qm$[178]"s"[167][141]22000
  92. 370 [139]qm$[178]"s"[167][137]22100
  93. 398 :
  94. 399 :
  95. 400 [143] *** ziehen ***
  96. 401 [141]20100
  97. 402 [141]800
  98. 420 [151]214,11:[151]211,25:[158]58640
  99. 430 [133]"contvon: zeile";z1
  100. 440 [133]"contspalte";s1
  101. 450 [133]"contnach:zeile";z2
  102. 460 [133]"contspalte";s2
  103. 598 :
  104. 599 :
  105. 600 [143] *** fig. setzen ***
  106. 601 [137]7000
  107. 620 p[178]((z2[172]3[171]2)[172]40[170]s2[172]3[171]2[170]1024)
  108. 621 f[178]((z2[172]3[171]2)[172]40[170]s2[172]3[171]2[170]55296)
  109. 625 [129]x[178]1[164]3
  110. 630 [151]p,160:[151]f,fa
  111. 640 p[178]p[170]1:f[178]f[170]1
  112. 641 [130]x
  113. 650 [141]3000
  114. 660 p[178]p[170]37:f[178]f[170]37
  115. 661 [151]p,160:[151]f,fa
  116. 662 p[178]p[170]1:f[178]f[170]1
  117. 670 [151]p,zu[170]176:[151]f,fa
  118. 672 p[178]p[170]1:f[178]f[170]1
  119. 680 [151]p,160:[151]f,fa
  120. 681 p[178]p[170]38:f[178]f[170]38
  121. 685 [129]x[178]1[164]3
  122. 690 [151]p,160:[151]f,fa
  123. 695 p[178]p[170]1:f[178]f[170]1
  124. 696 [130]x
  125. 710 [139]fa[178]2[167]fe(z2,s2)[178]zu
  126. 711 [139]fa[178]1[167]fe(z2,s2)[178]zu[170]10
  127. 720 [137]6500
  128. 721 :
  129. 722 :
  130. 800 [143] * name *
  131. 810 [151]214,8:[151]211,25:[158]58640
  132. 820 [139]sp$[178]n1$[167]sp$[178]n2$:[153]"sys";sp$:[142]
  133. 830 [139]sp$[178]n2$[167]sp$[178]n1$:[153]"sys";sp$:[142]
  134. 2205 [151]v[170]21,60
  135. 2998 :
  136. 2999 :
  137. 3000 [143] * zufallszahl *
  138. 3005 zu[178][181](4[172][187](1))[170]1
  139. 3010 [142]
  140. 3998 :
  141. 3999 :
  142. 4000 [143] *** koenig ***
  143. 4010 p[178]((z2[172]3[171]2)[172]40[170]s2[172]3[171]2[170]1024)
  144. 4020 f[178]((z2[172]3[171]2)[172]40[170]s2[172]3[171]2[170]55296)
  145. 4030 [129]x[178]1[164]3
  146. 4040 [151]p,160:[151]f,7
  147. 4050 p[178]p[170]1:f[178]f[170]1
  148. 4060 [130]x
  149. 4070 [141]5000
  150. 4080 p[178]p[170]37:f[178]f[170]37
  151. 4090 [151]p,160:[151]f,fa
  152. 4100 p[178]p[170]1:f[178]f[170]1
  153. 4110 [151]p,zk[170]176:[151]f,fa
  154. 4120 p[178]p[170]1:f[178]f[170]1
  155. 4130 [151]p,160:[151]f,fa
  156. 4140 p[178]p[170]38:f[178]f[170]38
  157. 4150 [129]x[178]1[164]3
  158. 4160 [151]p,160:[151]f,fa
  159. 4170 p[178]p[170]1:f[178]f[170]1
  160. 4180 [130]x
  161. 4200 [139]fa[178]2[167]fe(z2,s2)[178]zk[170]20
  162. 4210 [139]fa[178]1[167]fe(z2,s2)[178]zk[170]30
  163. 4220 [137]6500
  164. 4998 :
  165. 4999 :
  166. 5000 [143] *** zufall k. ***
  167. 5010 zk[178][181](2[172][187](1))[170]1
  168. 5020 [142]
  169. 5998 :
  170. 5999 :
  171. 6500 [143] *** feld loeschen ***
  172. 6505 r[178]z1[170]s1:fa[178]0
  173. 6510 [139]r[178]2[176]r[178]4[176]r[178]6[176]r[178]8[176]r[178]10[167]fa[178]12
  174. 6520 [139]r[178]12[176]r[178]14[176]r[178]16[176]r[178]18[167]fa[178]12
  175. 6530 p[178]((z1[172]3[171]2)[172]40[170]s1[172]3[171]2[170]1024)
  176. 6540 f[178]((z1[172]3[171]2)[172]40[170]s1[172]3[171]2[170]55296)
  177. 6545 [129]q[178]1[164]3
  178. 6550 [129]x[178]1[164]3
  179. 6551 [151]p,160:[151]f,fa
  180. 6552 p[178]p[170]1:f[178]f[170]1:[130]x
  181. 6553 p[178]p[170]37:f[178]f[170]37:[130]q
  182. 6554 fe(z1,s1)[178]0
  183. 6555 [139]sw[178]2[176]sr[178]2[167][137]9100
  184. 6560 [137]8000
  185. 6998 :
  186. 6999 :
  187. 7000 [143] *** zug richtig? ***
  188. 7001 [137]9000
  189. 7010 [139]fe(z1,s1)[179]10[167]fa[178]2
  190. 7020 [139]fe(z1,s1)[177]10[167]fa[178]1
  191. 7030 [139]fe(z1,s1)[177]20[167]fa[178]2
  192. 7040 [139]fe(z1,s1)[177]30[167]fa[178]1
  193. 7041 [139]fa[178]1[175]sp$[178]n2$[167][137]8100
  194. 7042 [139]fa[178]2[175]sp$[178]n1$[167][137]8100
  195. 7050 [139]fe(z2,s2)[178]0[167][137]7200
  196. 7060 [139]fe(z2,s2)[179]10[167]sa[178]2
  197. 7065 [139]fe(z2,s2)[177]10[167]sa[178]1
  198. 7070 [139]fe(z2,s2)[177]20[167]sa[178]51
  199. 7075 [139]fe(z2,s2)[177]30[167]sa[178]52
  200. 7076 [139]fa[178]1[175]sa[178]1[167][137]8100
  201. 7077 [139]fa[178]1[175]sa[178]52[167][137]8100
  202. 7078 [139]fa[178]2[175]sa[178]51[167][137]8100
  203. 7079 [139]fa[178]2[175]sa[178]2[167][137]8100
  204. 7085 [139]sa[178]51[175]fa[178]1[167][137]9100
  205. 7087 [139]sa[178]52[175]fa[178]2[167][137]9100
  206. 7088 [139]fe(z1,s1)[177]20[175]sa[178]1[167]sw[178]sw[171]1:[137]4000
  207. 7089 [139]fe(z1,s1)[177]30[175]sa[178]2[167]sr[178]sr[171]1:[137]4000
  208. 7090 [139]fa[178]2[175]sa[178]1[167]sw[178]sw[171]1:[153][163]26)"f.geschlagen":[141]20000
  209. 7100 [139]fa[178]1[175]sa[178]2[167]sr[178]sr[171]1:[153][163]26)"f.geschlagen":[141]20000
  210. 7200 [139]fe(z1,s1)[177]20[167][137]4000
  211. 7210 [137]620
  212. 7998 :
  213. 7999 :
  214. 8000 [143] * loeschen *
  215. 8009 [153]""
  216. 8010 [129]i[178]1[164]19
  217. 8011 [153][163]25)"              "
  218. 8012 [130]
  219. 8030 [139]sx[178]1[167]sx[178]0:[151]214,8:[151]211,25:[158]58640:[153]"sys";sp$:[137]8033
  220. 8031 [139]qm$[178]"s"[167][137]22100
  221. 8032 [137]400
  222. 8033 [139]qm$[178]"s"[167][137]22200
  223. 8034 [137]420
  224. 8098 :
  225. 8099 :
  226. 8100 [143] * n.moeglich *
  227. 8110 [153][163]26)"n.moeglich"
  228. 8120 [141]20000
  229. 8130 sx[178]1:[137]8000
  230. 8998 :
  231. 8999 :
  232. 9000 [143] * zahl *
  233. 9001 [139]s2[177]8[176]z2[177]8[167][137]8100
  234. 9002 [139]s1[177]8[176]z1[177]8[167][137]8100
  235. 9010 [139]z1[179]z2[167]ri[178]z2[171]z1
  236. 9011 [139]z1[177]z2[167]ri[178]z1[171]z2
  237. 9012 [139]s1[179]s2[167]ra[178]s2[171]s1
  238. 9013 [139]s1[177]s2[167]ra[178]s1[171]s2
  239. 9014 [139]z1[178]z2[167]ri[178]0
  240. 9015 [139]s1[178]s2[167]ra[178]0
  241. 9024 [139]fe(z1,s1)[179]10[167][137]9030
  242. 9025 [139]fe(z1,s1)[179]20[167][137]9040
  243. 9026 [139]fe(z1,s1)[179]30[167][137]9050
  244. 9027 [139]fe(z1,s1)[179]40[167][137]9060
  245. 9030 [143] stein rot
  246. 9031 [139]ri[170]ra[179][177]fe(z1,s1)[167][137]8100
  247. 9032 [137]10000
  248. 9040 [143] stein weiss
  249. 9041 [139]ri[170]ra[179][177]fe(z1,s1)[171]10[167][137]8100
  250. 9042 [137]10000
  251. 9050 [143] koenig rot
  252. 9051 [139]ri[170]ra[179][177]fe(z1,s1)[171]20[167][137]8100
  253. 9052 [137]10000
  254. 9060 [143] koenig weiss
  255. 9061 [139]ri[170]ra[179][177]fe(z1,s1)[171]30[167][137]8100
  256. 9062 [137]10000
  257. 9098 :
  258. 9099 :
  259. 9100 [143] * gewonnen *
  260. 9101 [151]v[170]21,0
  261. 9105 [153]"load"
  262. 9110 [153]"glueckwunsch !!!"
  263. 9111 [153]"";sp$;" hat gewonnen"
  264. 9112 [141]20000
  265. 9113 [133]"noch ein spiel (j/n)";xy$
  266. 9114 [139]xy$[178]"n"[167][128]
  267. 9115 [139]xy$[178]"j"[167][156]:[137]1
  268. 9116 :
  269. 9117 :
  270. 9118 [143] *** anleitung ***
  271. 9119 [151]56322,255
  272. 9210 [153][199](14)"load
  273. 9211 print"[158]   [211] [193] [205] [213] [210] [193] [201] [146],written by [212]homas"
  274. 9212 print"                             [211]trigl
  275. 9213 [153]"tototototototototototototototototototototototototototototototototototototototo"
  276. 9398 :
  277. 9399 :
  278. 9400 [153]"sys (NULL)iel desclose(NULL)piels:
  279. 9401 print"
  280. 9402 [153]" peekei (NULL)amurai geht es darum ,die left$aupt-
  281. 9403 print" figur des [199]egenspielers,seinen [203]oenig,
  282. 9404 [153]" zu besiegen oder seine (NULL)pielsteine zu
  283. 9405 print" schlagen, dass nur noch der [203]oenig und
  284. 9406 [153]" ein weiterer (NULL)tein uebrigbleiben.
  285. 9407 print"[129]    [196]ie [218]ahl auf jedem [211]pielstein gibt
  286. 9408 [153]" an,wie weit der (NULL)tein ziehen muss.
  287. 9409 print" [196]as [194]esondere ist, dass sich die [218]ahl
  288. 9410 [153]" bei jedem (NULL)ug aendert.(NULL)an muss deshalb
  289. 9411 print" [199]lueck und [213]eberraschungen in seine
  290. 9412 [153]" (NULL)trategie einbeziehen !
  291. 9420 print"[158]           >>>> taste <<<<
  292. 9422 [161]a$:[139]a$[178]""[167][137]9422
  293. 9450 [153]"loadprint (NULL)ie die (NULL)pielsteine gezogen werden:
  294. 9451 print"
  295. 9452 [153]"cont str$ie (NULL)ahl, die im (NULL)pielstein sichtbar
  296. 9453 print" ist, zeigt an, wie viele [198]elder weit
  297. 9454 [153]" der (NULL)tein ziehen muss. peekeim (NULL)oenig
  298. 9456 print" erscheinen nur die [218]ahlen 1 und 2 ,
  299. 9457 [153]" bei den uebrigen (NULL)teinen die (NULL)ahlen
  300. 9458 print" 1 bis 4.
  301. 9459 [153]"      str$ie (NULL)pielsteine duerfen nur
  302. 9460 print" waagrecht und senkrecht gezogen werden"
  303. 9461 print" werden, nicht schraeg.
  304. 9462 [153]" peekei jedem zug darf man nur einmal
  305. 9463 print" rechtwinklig abbiegen.
  306. 9464 [153]" vals duerfen keine (NULL)pielsteine
  307. 9465 print" uebersprungen werden !!!!!!. [211]pieler 1
  308. 9466 [153]" faengt mit weiss an.
  309. 9468 print" viel [211]pass !!!
  310. 9470 [133]" name spieler 1";n1$
  311. 9471 [133]" name spieler 2";n2$
  312. 9472 sp$[178]n2$
  313. 9473 [153]"load"
  314. 9474 [153]:[153]:[153]
  315. 9475 [153]"sys     left$alt !!!! ":[153]
  316. 9476 [153]"sys     vals gibt 2 (NULL)oeglichkeiten um "
  317. 9477 [153]"     die asciguren zu bewegen.":[153]:[153]
  318. 9478 [153]"     k - durch valingabe von (NULL)oordinaten"
  319. 9479 [153]
  320. 9480 [153]"     s - durch peekewegen u. (NULL)teuern ueber"
  321. 9481 [153]"         mid$oystick"
  322. 9482 [153]:[153]:[153]
  323. 9483 [133]"     peekuchstabe";qm$
  324. 9980 [153][199](142)"load":[142]
  325. 9981 :
  326. 9982 :
  327. 10000 [143] * fig. uebersprungen? *
  328. 10001 [139]z1[178]z2[167][137]10088
  329. 10002 [139]s1[178]s2[167][137]10094
  330. 10010 [139]z1[177]z2[167][137]10050
  331. 10020 [139]z2[177]z1[167][137]10070
  332. 10050 :
  333. 10051 [129]i[178]z1[171]1[164]z2[169][171]1
  334. 10052 [139]fe(i,s1)[179][177]0[167][137]10059
  335. 10053 [130]
  336. 10054 [129]i[178]s1[164]s2[171]1
  337. 10055 [139]s1[177]s2[167][129]i[178]s2[170]1[164]s1
  338. 10056 [139]fe(z2,i)[179][177]0[167][137]10059
  339. 10057 [130]:[137]7010
  340. 10059 [129]i[178]s1[170]1[164]s2
  341. 10060 [139]s1[177]s2[167][129]i[178]s1[171]1[164]s2[169][171]1
  342. 10061 [139]fe(z1,i)[179][177]0[167][137]8100
  343. 10062 [130]
  344. 10063 [129]i[178]z2[170]1[164]z1
  345. 10064 [139]fe(i,s2)[179][177]0[167][137]8100
  346. 10065 [130]:[137]7010
  347. 10070 :
  348. 10071 [129]i[178]z1[170]1[164]z2
  349. 10072 [139]fe(i,s1)[179][177]0[167][137]10079
  350. 10073 [130]
  351. 10074 [129]i[178]s2[170]1[164]s1
  352. 10075 [139]s1[179]s2[167][129]i[178]s1[170]1[164]s2[171]1
  353. 10076 [139]fe(z2,i)[179][177]0[167][137]10079
  354. 10077 [130]:[137]7010
  355. 10079 [129]i[178]s2[164]s1[171]1
  356. 10080 [139]s1[179]s2[167][129]i[178]s1[170]1[164]s2
  357. 10081 [139]fe(z1,i)[179][177]0[167][137]8100
  358. 10082 [130]
  359. 10083 [129]i[178]z1[164]z2[171]1
  360. 10084 [139]fe(i,s2)[179][177]0[167][137]8100
  361. 10085 :
  362. 10088 [139]s1[171]s2[178]1[167][137]7010
  363. 10089 [139]s2[171]s1[178]1[167][137]7010
  364. 10090 [129]i[178]s1[170]1[164]s2[171]1
  365. 10091 [139]s1[177]s2[167][129]i[178]s1[171]1[164]s2[170]1[169][171]1
  366. 10092 [139]fe(z1,i)[179][177]0[167][137]8100
  367. 10093 [130]:[137]7010
  368. 10094 [139]z1[171]z2[178]1[167][137]7010
  369. 10095 [139]z2[171]z1[178]1[167][137]7010
  370. 10096 [129]i[178]z1[170]1[164]z2[171]1
  371. 10097 [139]z1[177]z2[167][129]i[178]z1[171]1[164]z2[170]1[169][171]1
  372. 10098 [139]fe(i,s1)[179][177]0[167][137]8100
  373. 10099 [130]:[137]7010
  374. 10100 :
  375. 10101 :
  376. 20000 [143] *** toene ***
  377. 20010 [151]l,15
  378. 20020 [151]a,16[170]9
  379. 20040 [151]h,4[172]16[170]4
  380. 20041 [129]q[178]1[164]5
  381. 20050 [151]fh,29:[151]fl,69
  382. 20060 [151]w,33
  383. 20070 [129]t[178]1[164]40:[130]t
  384. 20071 [151]fh,17:[151]fl,103
  385. 20072 [151]w,33
  386. 20073 [129]t[178]1[164]40:[130]t
  387. 20074 [130]q
  388. 20080 [151]w,0:[151]a,0:[151]h,0
  389. 20082 [142]
  390. 20100 :
  391. 20110 [151]l,15
  392. 20120 [151]a,16[170]9
  393. 20140 [151]h,4[172]16[170]4
  394. 20150 [151]fh,29:[151]fl,69
  395. 20160 [151]w,33
  396. 20170 [129]i[178]1[164]500:[130]
  397. 20180 [151]w,0:[151]a,0:[151]h,0
  398. 20190 [142]
  399. 20998 :
  400. 20999 :
  401. 22000 [143] ** daten f. sprites **
  402. 22001 :
  403. 22002 sp$[178]n2$
  404. 22004 v[178]53248
  405. 22005 [151]v[170]21,60
  406. 22006 [151] 2042,13:[151]2043,14
  407. 22007 [151] 2044,13:[151]2045,14
  408. 22009 :
  409. 22010 [143] sprite 2
  410. 22012 [129]n[178]0[164]62:[135]q:[151]832[170]n,q:[130]
  411. 22014 [131]0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  412. 22015 [131]0,0,0,0,0,0,0,0,0,0,0,0
  413. 22016 [131]0,0,0,0,0,0,0,0,0,0,255,0
  414. 22017 [131]1,255,128,3,255,192,7,255,224
  415. 22018 [131]15,255,240,31,255,248
  416. 22019 [131]63,255,252,127,255,254,255,255,255
  417. 22020 [151]v[170]39[170]5,7
  418. 22021 :
  419. 22050 [143] sprite 3
  420. 22051 [129]n[178]0[164]62:[135]q:[151]896[170]n,q:[130]
  421. 22052 [131]255,255,255,128,0,1,128,0,1,128,0,1,128,0,1
  422. 22053 [131]128,0,1,128,0,1,128,0,1,128,0,1
  423. 22054 [131]128,0,1,128,0,1,128,0,1,128,255,1
  424. 22055 [131]129,255,129,131,255,193,135,255,225
  425. 22056 [131]143,255,241,159,255,249
  426. 22057 [131]191,255,253,255,255,255,255,255,255
  427. 22058 [151]v[170]4,32:[151]v[170]5,61
  428. 22059 [151]v[170]8,32:[151]v[170]9,230
  429. 22060 [151]v[170]41,2:[151]v[170]42,2:[151]v[170]43,1:[151]v[170]44,1
  430. 22070 [142]
  431. 22071 :
  432. 22072 :
  433. 22100 [143] *** sprites bewegen ***
  434. 22101 [141]800
  435. 22200 [141]20100:[139]sp$[178]n2$[167][137]22400
  436. 22201 [143] ** spieler 1 **
  437. 22202 u1[178]4:qr[178]0
  438. 22210 j[178][194](56321)
  439. 22220 [139](j[175]1)[178]0[175]y1[171]24[177]50[167]y1[178]y1[171]24:[137]22230
  440. 22221 [139](j[175]4)[178]0[175]x1[171]24[177]20[167]x1[178]x1[171]24:[137]22230
  441. 22222 [139](j[175]2)[178]0[175]y1[170]24[179]230[167]y1[178]y1[170]24:[137]22230
  442. 22223 [139](j[175]8)[178]0[175]x1[170]24[179]210[167]x1[178]x1[170]24:[137]22230
  443. 22224 [139](j[175]16)[178]0[167][137]22300
  444. 22225 [137]22210
  445. 22230 [151]v[170]u1,x1:[151]v[170]u1[170]1,y1
  446. 22231 [129]i[178]1[164]80:[130]i:[137]22210
  447. 22300 [139]qr[179][177]0[167][137]22350
  448. 22310 z1[178]((y1[171]61)[173]24)[170]1
  449. 22312 s1[178]((x1[171]32)[173]24)[170]1
  450. 22313 [139]fe(z1,s1)[178]0[167][137]22210
  451. 22314 qr[178]1:u1[178]6:[151]v[170]21,24:[129]i[178]1[164]160:[130]
  452. 22315 [151]v[170]u1,x1:[151]v[170]u1[170]1,y1
  453. 22316 [137] 22210
  454. 22350 z2[178]((y1[171]61)[173]24)[170]1
  455. 22352 s2[178]((x1[171]32)[173]24)[170]1
  456. 22354 u1[178]4:[151]v[170]21,20:[151]v[170]u1,x1:[151]v[170]u1[170]1,y1
  457. 22356 [137]600
  458. 22357 :
  459. 22400 [143] ** spieler 2 **
  460. 22402 u2[178]8:qr[178]0
  461. 22403 [151]56322,255
  462. 22410 j[178][194](56320)
  463. 22420 [139](j[175]1)[178]0[175]y2[171]24[177]50[167]y2[178]y2[171]24:[137]22500
  464. 22421 [139](j[175]4)[178]0[175]x2[171]24[177]20[167]x2[178]x2[171]24:[137]22500
  465. 22422 [139](j[175]2)[178]0[175]y2[170]24[179]230[167]y2[178]y2[170]24:[137]22500
  466. 22423 [139](j[175]8)[178]0[175]x2[170]24[179]210[167]x2[178]x2[170]24:[137]22500
  467. 22424 [139](j[175]16)[178]0[167][137]22520
  468. 22425 [137]22410
  469. 22500 [151]v[170]u2,x2:[151]v[170]u2[170]1,y2
  470. 22510 i[178]0:[129]i[178]1[164]80:[130]i:[137]22410
  471. 22520 [139]qr[179][177]0[167][137]22600
  472. 22525 z1[178]((y2[171]61)[173]24)[170]1
  473. 22530 s1[178]((x2[171]32)[173]24)[170]1
  474. 22531 [139]fe(z1,s1)[178]0[167][137]22410
  475. 22535 qr[178]1:u2[178]10:[151]v[170]21,36:[129]i[178]1[164]160:[130]
  476. 22536 [151]v[170]u2,x2:[151]v[170]u2[170]1,y2
  477. 22537 [137] 22410
  478. 22600 z2[178]((y2[171]61)[173]24)[170]1
  479. 22601 s2[178]((x2[171]32)[173]24)[170]1
  480. 22602 u2[178]8:[151]v[170]21,20:[151]v[170]u2,x2:[151]v[170]u2[170]1,y2
  481. 22603 [137]600
  482.