home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disc 3 / Commodore_Disc_03_19xx_-_de.d64 / yahtzee (.txt) < prev   
Commodore BASIC  |  2022-10-26  |  25KB  |  1,118 lines
  1. 100 rem*************************************************************************
  2. 104 rem**                                                                      *
  3. 108 rem**                          yahtzee                                     *
  4. 110 rem**                  (c) by dirk uekermann                               *
  5. 112 rem**                     hoehenstrasse 36                                 *
  6. 114 rem**                        5243 herdorf                                  *
  7. 116 rem**                                                                      *
  8. 120 rem*************************************************************************
  9. 150 print"[147]"
  10. 200 poke53280,0:poke53281,12:poke646,1
  11. 205 poke211,8:poke214,11:sys58640:print"einen moment bitte....."
  12. 210 gosub59000
  13. 250 rem***** bild 1 *****
  14. 260 printchr$(142):printchr$(8):print"[147]"
  15. 270 poke1397,25:gosub20000
  16. 280 poke1399,1:gosub20000
  17. 290 poke1401,8:gosub20000
  18. 300 poke1403,20:gosub20000
  19. 310 poke1405,26:gosub20000
  20. 320 poke1407,5:gosub20000
  21. 330 poke1409,5:gosub20000
  22. 350 print"";tab(17)"v o n":gosub20000
  23. 360 gosub60000
  24. 361 a=4:for u=1to6
  25. 362 pl=pl+1
  26. 363 print"":a=a+4:gosub20000
  27. 364 on pl gosub 4515,4535,4555,4575,4595,4615
  28. 365 nextu
  29. 370 gett$:ift$<>chr$(13)then370
  30. 380 goto15000
  31. 400 rem**** bild 1a ****
  32. 405 print"[147]"
  33. 410 pl$="              y a h t z e e "
  34. 415 printpl$
  35. 420 print""
  36. 425 print"    bitte geben sie die uhrzeit ein
  37. 430 [133]"     > ";ii$
  38. 431 [139][195](ii$)[177]6[167]400
  39. 432 [139][200](ii$,2)[179]"00"[176][200](ii$,2)[177]"23"[167]400
  40. 433 [139][202](ii$,3,2)[179]"00"[176][202](ii$,3,2)[177]"59"[167]400
  41. 434 [139][201](ii$,2)[179]"00"[176][201](ii$,2)[177]"59"[167]400
  42. 435 ti$[178]ii$
  43. 440 [137] 15000
  44. 500 [143]**** bild 2 ****
  45. 505 [156]
  46. 508 nn$[178]"--"
  47. 509 pl$[178]"              y a h t z e e "
  48. 510 [153]"load"
  49. 515 [153]pl$
  50. 520 [133]"> anzahl mitspieler (max.4) -->  ";ms
  51. 530 [139] ms[177]4[176]ms[179][178]0[167]500
  52. 540 [153]:[153]
  53. 550 [129] t[178]1[164] ms
  54. 560 [153]"> name";t;"cmd. mitspieler --->"
  55. 570 [133]"on";name$(t)
  56. 573 na$(t)[178]na$(t)[170]"    "                                      
  57. 575 [139] [195](name$(t))[177]4[167]name$(t)[178][200](name$(t),4)
  58. 580 [130] t
  59. 990 [153][199](147)
  60. 995 [137] 1060
  61. 1000 [143]*** bild 3 ***
  62. 1050 [141] 50000
  63. 1055 [153]""
  64. 1058 [158]49372
  65. 1060 [153]"onon";[163]5)name$(1);[163]10)name$(2);[163]15)name$(3);[163]20)name$(4)
  66. 1070 [153]
  67. 1500 [153]"1":[141]22000
  68. 1520 [153]"2":[141]22200
  69. 1540 [153]"3":[141]22400
  70. 1560 [153]"4":[141]22600
  71. 1580 [153]"5":[141]22800
  72. 1600 [153]"6":[141]23000
  73. 1620 [153]"lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen"
  74. 1640 [153]"sum":[141]25000
  75. 1660 [153]"bon":[141]25200
  76. 1700 [153]"+/-                     ":[141]25600
  77. 1720 [153]
  78. 1740 [153]"d-p":[141]23200
  79. 1760 [153]"v-p":[141]23400
  80. 1780 [153]"f-h":[141]23600
  81. 1800 [153]"k-s":[141]23800
  82. 1820 [153]"g-s":[141]24000
  83. 1840 [153]"yah":[141]24200
  84. 1860 [153]"cha":[141]24400
  85. 1880 [153]"lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen"
  86. 1900 [153]"sum":[141]24600
  87. 1920 [153]"obe":[141]25400
  88. 1940 [153]"ges":[141]24800
  89. 1945 [141] 45000:[143] uhrzeit
  90. 1946 [139] f5[178]1[167] [137] 40200
  91. 1947 [139] f3[178]1[167] 46125
  92. 1950 [139] k1(ms)[170]k2(ms)[170]k3(ms)[170]k4(ms)[170]k5(ms)[170]k6(ms)[179]6[167]1970
  93. 1955 [139] kd(ms)[170]kv(ms)[170]kf(ms)[170]kk(ms)[170]kg(ms)[170]ky(ms)[170]kc(ms)[179]7[167]1970
  94. 1956 [139] ge(1)[177]ge(2)[175]ge(1)[177]ge(3)[175]ge(1)[177]ge(4)[167]  p[178]1
  95. 1957 [139] ge(2)[177]ge(1)[175]ge(2)[177]ge(3)[175]ge(2)[177]ge(4)[167]p[178]2
  96. 1958 [139] ge(3)[177]ge(1)[175]ge(3)[177]ge(2)[175]ge(3)[177]ge(4)[167]p[178]3
  97. 1959 [139] ge(4)[177]ge(1)[175]ge(4)[177]ge(2)[175]ge(4)[177]ge(3)[167]p[178]4
  98. 1960 [153]""
  99. 1961 [129] lo[178]1[164]20
  100. 1962 [153][163]27)"            "
  101. 1963 [130] lo
  102. 1964 [153]"";[163]27)"gewonnen hat"
  103. 1965 [153]:[153][163]29)"sys  ";name$(p);"  wait"
  104. 1966 [153]"";[163]29)"tabelle"
  105. 1967 [153][163]27)"---> return"
  106. 1968 [161] sp$:[139] sp$[179][177][199](13)[167]1968
  107. 1969 [141] 30000
  108. 1970 [141]6000
  109. 1980 [141]6300
  110. 1990 [137] 3000
  111. 2215 [141] 30010
  112. 3000 [143]****  wuerfeln  ****
  113. 3030 [129] q[178]1[164]5:ja$(q)[178]"ja":[130]q
  114. 3050 [129] wurf [178] 2 [164] 4
  115. 3060 [129] dice[178]1[164]5
  116. 3065 [139] ja$(dice)[179][177]"ja" [167] 3100
  117. 3070 zahl(dice)[178][181](6[172][187](1))[170]1
  118. 3071 [139] ri$[178]"1"[167] zahl(dice)[178]1
  119. 3072 [139] ri$[178]"2"[167] zahl(dice)[178]2
  120. 3073 [139] ri$[178]"3"[167] zahl(dice)[178]3
  121. 3074 [139] ri$[178]"4"[167] zahl(dice)[178]4
  122. 3075 [139] ri$[178]"5"[167] zahl(dice)[178]5
  123. 3076 [139] ri$[178]"6"[167] zahl(dice)[178]6
  124. 3079 ri$[178]""
  125. 3080 [145] dice [141] 3510,3530,3550,3570,3590
  126. 3090 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
  127. 3095 [141] 20000
  128. 3100 [130] dice
  129. 3120 [141] 47000
  130. 3130 [130] wurf
  131. 3160 [137] 7000:[143] eintrag markieren
  132. 3500 [143]*** wuerfel positionieren ***
  133. 3510 [153]"":a[178]29:[142]
  134. 3530 [153]"":a[178]33:[142]
  135. 3550 [153]"":a[178]27:[142]
  136. 3570 [153]"":a[178]31:[142]
  137. 3590 [153]"":a[178]35:[142]
  138. 3900 [143]* bild 5 (wuerfel halten ?) **
  139. 3905 [139] wurf[178]4 [167] [142]
  140. 3910 [153]"";[163]29)wurf"cmd. wurf":[153]
  141. 3915 [141]47000:[143] neu wuerfel
  142. 3917 [142]
  143. 4500 [143]****  zahlen ****
  144. 4510 [143]****     1   ****
  145. 4515 [153][163]a)"sys   "
  146. 4520 [153][163]a)"sys (NULL) "
  147. 4525 [153][163]a)"sys   wait"
  148. 4529 [142]
  149. 4530 [143]****     2   ****
  150. 4535 [153][163]a)"sys(NULL)  "
  151. 4540 [153][163]a)"sys   "
  152. 4545 [153][163]a)"sys  (NULL)wait"
  153. 4549 [142]
  154. 4550 [143]****     3   ****
  155. 4555 [153][163]a)"sys(NULL)  "
  156. 4560 [153][163]a)"sys (NULL) "
  157. 4565 [153][163]a)"sys  (NULL)wait"
  158. 4569 [142]
  159. 4570 [143]****     4   ****
  160. 4575 [153][163]a)"sys(NULL) (NULL)"
  161. 4580 [153][163]a)"sys   "
  162. 4585 [153][163]a)"sys(NULL) (NULL)wait"
  163. 4589 [142]
  164. 4590 [143]****     5   ****
  165. 4595 [153][163]a)"sys(NULL) (NULL)"
  166. 4600 [153][163]a)"sys (NULL) "
  167. 4605 [153][163]a)"sys(NULL) (NULL)wait"
  168. 4609 [142]
  169. 4610 [143]****     6   ****
  170. 4615 [153][163]a)"sys(NULL) (NULL)"
  171. 4620 [153][163]a)"sys(NULL) (NULL)"
  172. 4625 [153][163]a)"sys(NULL) (NULL)wait"
  173. 4629 [142]
  174. 5000 [143]*** zahlen rot ****
  175. 5010 [143]****     1   ****
  176. 5015 [153][163]a)"   "
  177. 5020 [153][163]a)" (NULL) "
  178. 5025 [153][163]a)"   wait"
  179. 5029 [142]
  180. 5030 [143]****     2   ****
  181. 5035 [153][163]a)"(NULL)  "
  182. 5040 [153][163]a)"   "
  183. 5045 [153][163]a)"  (NULL)wait"
  184. 5049 [142]
  185. 5050 [143]****     3   ****
  186. 5055 [153][163]a)"(NULL)  "
  187. 5060 [153][163]a)" (NULL) "
  188. 5065 [153][163]a)"  (NULL)wait"
  189. 5069 [142]
  190. 5070 [143]****     4   ****
  191. 5075 [153][163]a)"(NULL) (NULL)"
  192. 5080 [153][163]a)"   "
  193. 5085 [153][163]a)"(NULL) (NULL)wait"
  194. 5089 [142]
  195. 5090 [143]****     5   ****
  196. 5095 [153][163]a)"(NULL) (NULL)"
  197. 5100 [153][163]a)" (NULL) "
  198. 5105 [153][163]a)"(NULL) (NULL)wait"
  199. 5109 [142]
  200. 5110 [143]****     6   ****
  201. 5115 [153][163]a)"(NULL) (NULL)"
  202. 5120 [153][163]a)"(NULL) (NULL)"
  203. 5125 [153][163]a)"(NULL) (NULL)wait"
  204. 5129 [142]
  205. 6000 [143]**** bild 4 ****
  206. 6010 r[178]r[170]1:[139] r[177]ms [167] r[178]1
  207. 6020 ts[178]r[172]5
  208. 6030 [158]49152,0,ts,4,20,1
  209. 6050 [153]""
  210. 6060 [153]"";[163]27)"sys";name$(r)" bitte"
  211. 6062 [153]:[153][163]29)"return"
  212. 6063 [153]"";[163]30)"oder"
  213. 6064 [153]"";[163]27)"f1 bild neu"
  214. 6065 [139] et$[179][177]""[167][153]"";[163]27)"f5 zurueck"
  215. 6066 [153]"";[163]27)"f7 tabelle"
  216. 6068 [153]"";[163]27)"f8 ende"
  217. 6072 [161] x$
  218. 6075 [139] x$[178]"input"[167] [158]49372:[137] 46000:[143] bild neu
  219. 6076 [139] x$[178]"let"[167] [158]49372:[137] 48000:[143] tabelle zwischendurch
  220. 6077 [139] x$[178]"restore"[167] [158]49372:[137] 30000:[143] tabelle zum ende
  221. 6078 [139] x$[178]"read"[175]et$[179][177]""[167][158]49372:[137] 40000:[143] eintrag loeschen
  222. 6080 [139]x$[179][177][199](13)[167]6072
  223. 6090 [142]
  224. 6300 [143]**** bild 5 ****
  225. 6310 [141] 50000
  226. 6330 [153]"";[163]30)"a";[163]34)"b"
  227. 6340 [153]"";[163]28)"c";[163]32)"d";[163]36)"e"
  228. 6360 [142]
  229. 7000 [143]*** bild 6 (eintrag markieren)*
  230. 7010 [153]""
  231. 7020 [129] lo[178]1[164]9
  232. 7030 [153][163]27)"            "
  233. 7040 [130] lo
  234. 7070 et$[178]""
  235. 7075 [153][163]27)"ononononsys    ";na$(r);"    wait"
  236. 7080 [153]"";[163]27)"eintrag:    "
  237. 7091 [161] et$:[139] et$[178]""[167]7091
  238. 7095 [141] 20000
  239. 7100 [139] et$[178]"1"[167][153][163]25)"on  einser  ":[141]7500:[137]8000
  240. 7110 [139] et$[178]"2"[167][153][163]25)"on  zweier  ":[141]7500:[137]8200
  241. 7120 [139] et$[178]"3"[167][153][163]25)"on  dreier  ":[141]7500:[137]8400
  242. 7130 [139] et$[178]"4"[167][153][163]25)"on  vierer  ":[141]7500:[137]8600
  243. 7140 [139] et$[178]"5"[167][153][163]25)"on  fuenfer ":[141]7500:[137]8800
  244. 7150 [139] et$[178]"6"[167][153][163]25)"on  sechser ":[141]7500:[137]9000
  245. 7160 [139] et$[178]"d"[167][153][163]25)"on  dreier-pasch":[141]7500:[137]9200
  246. 7170 [139] et$[178]"v"[167][153][163]25)"on  vierer-pasch":[141]7500:[137]9400
  247. 7180 [139] et$[178]"f"[167][153][163]25)"on  full-house":[141]7500:[137]9600
  248. 7190 [139] et$[178]"k"[167][153][163]25)"on  kl.strasse":[141]7500:[137]9800
  249. 7200 [139] et$[178]"g"[167][153][163]25)"on  gr.strasse":[141]7500:[137]10000
  250. 7210 [139] et$[178]"y"[167][153][163]25)"on  yahtzee ":[141]7500:[137]10200
  251. 7220 [139] et$[178]"c"[167][153][163]25)"on  chance  ":[141]7500:[137]10400
  252. 7250 [137] 7070
  253. 7500 [143]*** return abfrage fuer eintrag
  254. 7510 [161] rt$
  255. 7520 [139] rt$[178][199](13)[167] [142]
  256. 7530 [139] rt$[178][199](20)[167] 7550
  257. 7540 [137] 7510
  258. 7550 [141] 47300
  259. 7560 [137] 7000
  260. 8000 [143]*** 1er ****
  261. 8010 [139] k1(r)[178]1[167]7250
  262. 8020 k1(r)[178]1
  263. 8030 [129] dice[178]1[164]5
  264. 8040 [139] zahl(dice)[178]1[167]e[178]1
  265. 8050 ei(r)[178]ei(r)[170]e:e[178]0
  266. 8060 [130] dice
  267. 8070 [137]1000
  268. 8200 [143]*** 2er ****
  269. 8210 [139] k2(r)[178]1[167]7250
  270. 8220 k2(r)[178]1
  271. 8230 [129] dice[178]1[164]5
  272. 8240 [139] zahl(dice)[178]2[167]z[178]2
  273. 8250 zw(r)[178]zw(r)[170]z:z[178]0
  274. 8260 [130] dice
  275. 8270 [137]1000
  276. 8400 [143]*** 3er ****
  277. 8410 [139] k3(r)[178]1[167]7250
  278. 8420 k3(r)[178]1
  279. 8430 [129] dice[178]1[164]5
  280. 8440 [139] zahl(dice)[178]3[167]d[178]3
  281. 8450 dr(r)[178]dr(r)[170]d:d[178]0
  282. 8460 [130] dice
  283. 8470 [137]1000
  284. 8600 [143]*** 4er ****
  285. 8610 [139] k4(r)[178]1[167]7250
  286. 8620 k4(r)[178]1
  287. 8630 [129] dice[178]1[164]5
  288. 8640 [139] zahl(dice)[178]4[167]v[178]4
  289. 8650 vi(r)[178]vi(r)[170]v:v[178]0
  290. 8660 [130] dice
  291. 8670 [137]1000
  292. 8800 [143]*** 5er ****
  293. 8810 [139] k5(r)[178]1[167]7250
  294. 8820 k5(r)[178]1
  295. 8830 [129] dice[178]1[164]5
  296. 8840 [139] zahl(dice)[178]5[167]f[178]5
  297. 8850 fu(r)[178]fu(r)[170]f:f[178]0
  298. 8860 [130] dice
  299. 8870 [137]1000
  300. 9000 [143]*** 6er ****
  301. 9010 [139] k6(r)[178]1[167]7250
  302. 9020 k6(r)[178]1
  303. 9030 [129] dice[178]1[164]5
  304. 9040 [139] zahl(dice)[178]6[167]s[178]6
  305. 9050 se(r)[178]se(r)[170]s:s[178]0
  306. 9060 [130] dice
  307. 9070 [137]1000
  308. 9200 [143]*** 3er-pasch ***
  309. 9210 [139] kd(r)[178]1[167]7250
  310. 9220 kd(r)[178]1
  311. 9230 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(3)[167]9350
  312. 9235 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(4)[167]9350
  313. 9240 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(5)[167]9350
  314. 9245 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(4)[167]9350
  315. 9250 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(5)[167]9350
  316. 9255 [139] zahl(1)[178]zahl(4)[175]zahl(1)[178]zahl(5)[167]9350
  317. 9260 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(4)[167]9350
  318. 9265 [139] zahl(2)[178]zahl(4)[175]zahl(2)[178]zahl(5)[167]9350
  319. 9270 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(5)[167]9350
  320. 9275 [139] zahl(3)[178]zahl(4)[175]zahl(3)[178]zahl(5)[167]9350
  321. 9330 [137]1000
  322. 9350 dp(r)[178]za(1)[170]za(2)[170]za(3)[170]za(4)[170]za(5)
  323. 9360 [137]1000
  324. 9400 [143]*** 4er-pasch ***
  325. 9410 [139] kv(r)[178]1[167]7250
  326. 9420 kv(r)[178]1
  327. 9430 [139] za(1)[178]za(2)[175]za(1)[178]za(3)[175]za(1)[178]za(4)[167]9550
  328. 9435 [139] za(1)[178]za(2)[175]za(1)[178]za(3)[175]za(1)[178]za(5)[167]9550
  329. 9440 [139] za(1)[178]za(3)[175]za(1)[178]za(4)[175]za(1)[178]za(5)[167]9550
  330. 9445 [139] za(1)[178]za(2)[175]za(1)[178]za(4)[175]za(1)[178]za(5)[167]9550
  331. 9450 [139] za(2)[178]za(3)[175]za(2)[178]za(4)[175]za(2)[178]za(5)[167]9550
  332. 9470 [137]1000
  333. 9550 vp(r)[178]za(1)[170]za(2)[170]za(3)[170]za(4)[170]za(5)
  334. 9570 [137]1000
  335. 9600 [143]*** full-house ***
  336. 9610 [139] kf(r)[178]1[167]7250
  337. 9620 kf(r)[178]1
  338. 9630 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(3)[175]zahl(4)[178]zahl(5)[167]9750
  339. 9635 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(4)[175]zahl(3)[178]zahl(5)[167]9750
  340. 9640 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(5)[175]zahl(3)[178]zahl(4)[167]9750
  341. 9645 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(4)[175]zahl(2)[178]zahl(5)[167]9750
  342. 9650 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(5)[175]zahl(2)[178]zahl(4)[167]9750
  343. 9655 [139] zahl(1)[178]zahl(4)[175]zahl(1)[178]zahl(5)[175]zahl(2)[178]zahl(3)[167]9750
  344. 9660 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(4)[175]zahl(1)[178]zahl(5)[167]9750
  345. 9665 [139] zahl(2)[178]zahl(4)[175]zahl(2)[178]zahl(5)[175]zahl(1)[178]zahl(3)[167]9750
  346. 9670 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(5)[175]zahl(1)[178]zahl(4)[167]9750
  347. 9675 [139] zahl(3)[178]zahl(4)[175]zahl(3)[178]zahl(5)[175]zahl(1)[178]zahl(2)[167]9750
  348. 9690 [137]1000
  349. 9750 fh(r)[178]25
  350. 9790 [137]1000
  351. 9800 [143]*** kleine strasse ***
  352. 9810 [139] kk(r)[178]1[167]7250
  353. 9820 kk(r)[178]1
  354. 9829 s1[178]0:s2[178]0:s3[178]0:s4[178]0
  355. 9830 [129] dice[178]1[164]5
  356. 9835 [139] zahl(dice)[178]1[167] s1[178]1
  357. 9837 [139] zahl(dice)[178]2[167] s2[178]1
  358. 9839 [139] zahl(dice)[178]3[167] s3[178]1
  359. 9841 [139] zahl(dice)[178]4[167] s4[178]1
  360. 9843 [130] dice
  361. 9844 ka[178]0
  362. 9845 ka[178]s1[170]s2[170]s3[170]s4
  363. 9847 [139] ka[178]4[167] 9970
  364. 9849 s1[178]0:s2[178]0:s3[178]0:s4[178]0
  365. 9850 [129] dice[178]1[164]5
  366. 9853 kl(dice)[178]0
  367. 9855 [139] zahl(dice)[178]2[167] s1[178]1
  368. 9857 [139] zahl(dice)[178]3[167] s2[178]1
  369. 9859 [139] zahl(dice)[178]4[167] s3[178]1
  370. 9861 [139] zahl(dice)[178]5[167] s4[178]1
  371. 9863 [130] dice
  372. 9864 ka[178]0
  373. 9865 ka[178]s1[170]s2[170]s3[170]s4
  374. 9867 [139] ka[178]4[167] 9970
  375. 9869 s1[178]0:s2[178]0:s3[178]0:s4[178]0
  376. 9870 [129] dice[178]1[164]5
  377. 9875 [139] zahl(dice)[178]3[167] s1[178]1
  378. 9877 [139] zahl(dice)[178]4[167] s2[178]1
  379. 9879 [139] zahl(dice)[178]5[167] s3[178]1
  380. 9881 [139] zahl(dice)[178]6[167] s4[178]1
  381. 9883 [130] dice
  382. 9884 ka[178]0
  383. 9885 ka[178]s1[170]s2[170]s3[170]s4
  384. 9887 [139] ka[178]4[167] 9970
  385. 9900 [137] 1000
  386. 9970 ks(r)[178]30
  387. 9980 [137] 1000
  388. 10000 [143]*** grosse strasse ***
  389. 10010 [139] kg(r)[178]1[167]7250
  390. 10020 kg(r)[178]1
  391. 10025 s1[178]0:s2[178]0:s3[178]0:s4[178]0:s5[178]0
  392. 10030 [129] dice[178]1[164]5
  393. 10033 kl(dice)[178]0
  394. 10035 [139] zahl(dice)[178]1[167] s1[178]1
  395. 10037 [139] zahl(dice)[178]2[167] s2[178]1
  396. 10039 [139] zahl(dice)[178]3[167] s3[178]1
  397. 10041 [139] zahl(dice)[178]4[167] s4[178]1
  398. 10043 [139] zahl(dice)[178]5[167] s5[178]1
  399. 10045 [130] dice
  400. 10047 ga[178]0
  401. 10049 ga[178]s1[170]s2[170]s3[170]s4[170]s5
  402. 10051 [139] ga[178]5[167] 10170
  403. 10055 s1[178]0:s2[178]0:s3[178]0:s4[178]0:s5[178]0
  404. 10060 [129] dice[178]1[164]5
  405. 10065 [139] zahl(dice)[178]2[167] s1[178]1
  406. 10067 [139] zahl(dice)[178]3[167] s2[178]1
  407. 10069 [139] zahl(dice)[178]4[167] s3[178]1
  408. 10071 [139] zahl(dice)[178]5[167] s4[178]1
  409. 10073 [139] zahl(dice)[178]6[167] s5[178]1
  410. 10075 [130] dice
  411. 10077 ga[178]0
  412. 10079 ga[178]s1[170]s2[170]s3[170]s4[170]s5
  413. 10081 [139] ga[178]5[167] 10170
  414. 10090 [137] 1000
  415. 10170 gs(r)[178]40
  416. 10180 [137] 1000
  417. 10200 [143]*** yahtzee ***
  418. 10210 [139] ky(r)[178]1[167]11000
  419. 10220 ky(r)[178]1
  420. 10230 [139] za(1)[178]za(2)[175]za(1)[178]za(3)[175]za(1)[178]za(4)[175]za(1)[178]za(5)[167]10270
  421. 10250 [137] 1000
  422. 10270 ya(r)[178]50
  423. 10290 [137] 1000
  424. 10400 [143]*** chance ***
  425. 10410 [139] kc(r)[178]1[167]7250
  426. 10420 kc(r)[178]1
  427. 10430 ch(r)[178]za(1)[170]za(2)[170]za(3)[170]za(4)[170]za(5)
  428. 10450 [137] 1000
  429. 11000 [143]*** mehrere kniffel ***
  430. 11010 [139] ya(r)[178]0 [167] 7250
  431. 11020 [139] za(1)[178]za(2)[175]za(1)[178]za(3)[175]za(1)[178]za(4)[175]za(1)[178]za(5)[167]11070
  432. 11030 [137] 7250
  433. 11070 ya(r)[178]ya(r)[170]100
  434. 11100 i[178]zahl(1)
  435. 11110 [139] i[178]1 [175] k1(r)[178]1 [167] 11500
  436. 11115 [139] i[178]2 [175] k2(r)[178]1 [167] 11500
  437. 11120 [139] i[178]3 [175] k3(r)[178]1 [167] 11500
  438. 11125 [139] i[178]4 [175] k4(r)[178]1 [167] 11500
  439. 11130 [139] i[178]5 [175] k5(r)[178]1 [167] 11500
  440. 11135 [139] i[178]6 [175] k6(r)[178]1 [167] 11500
  441. 11150 [139] i[178]1[167]8000
  442. 11155 [139] i[178]2[167]8200
  443. 11160 [139] i[178]3[167]8400
  444. 11165 [139] i[178]4[167]8600
  445. 11170 [139] i[178]5[167]8800
  446. 11175 [139] i[178]6[167]9000
  447. 11500 [139] kg(r)[178]0[167]11800
  448. 11510 [139] kk(r)[178]0[167]11900
  449. 11520 [139] kf(r)[178]0[167]9600
  450. 11525 [139] kv(r)[178]0[167]9400
  451. 11530 [139] kd(r)[178]0[167]9200
  452. 11532 [139] kc(r)[178]0[167]10400
  453. 11535 [139] k1(r)[178]0[167]8000
  454. 11540 [139] k2(r)[178]0[167]8200
  455. 11545 [139] k3(r)[178]0[167]8400
  456. 11550 [139] k4(r)[178]0[167]8600
  457. 11555 [139] k5(r)[178]0[167]8800
  458. 11560 [139] k6(r)[178]0[167]9000
  459. 11800 za(1)[178]1:za(2)[178]2:za(3)[178]3:za(4)[178]4:za(5)[178]5
  460. 11810 [137] 10000
  461. 11900 za(1)[178]1:za(2)[178]2:za(3)[178]3:za(4)[178]4
  462. 11910 [137] 9800
  463. 12000 [143]***** spielstand sichern ******
  464. 12010 [159]1,8,15
  465. 12020 [152]1,"s:yahtzee-datei"
  466. 12030 [160]1
  467. 12040 [160]2:[159]2,8,3,"yahtzee-datei,s,w"
  468. 12045 r[178]r[171]1
  469. 12050 [152]2,ms
  470. 12051 [152]2,sp
  471. 12052 [152]2,r
  472. 12060 [129]dg[178]1[164]ms
  473. 12061 [152]2,na$(dg)","
  474. 12070 [152]2,ei(dg)
  475. 12071 [152]2,zw(dg)
  476. 12072 [152]2,dr(dg)
  477. 12074 [152]2,vi(dg)
  478. 12075 [152]2,fu(dg)
  479. 12076 [152]2,se(dg)
  480. 12080 [152]2,dp(dg)
  481. 12081 [152]2,vp(dg)
  482. 12082 [152]2,fh(dg)
  483. 12083 [152]2,ks(dg)
  484. 12084 [152]2,gs(dg)
  485. 12085 [152]2,ya(dg)
  486. 12086 [152]2,ch(dg)
  487. 12090 [152]2,k1(dg)
  488. 12091 [152]2,k2(dg)
  489. 12092 [152]2,k3(dg)
  490. 12093 [152]2,k4(dg)
  491. 12094 [152]2,k5(dg)
  492. 12095 [152]2,k6(dg)
  493. 12100 [152]2,kd(dg)
  494. 12101 [152]2,kv(dg)
  495. 12102 [152]2,kf(dg)
  496. 12103 [152]2,kk(dg)
  497. 12104 [152]2,kg(dg)
  498. 12105 [152]2,ky(dg)
  499. 12106 [152]2,kc(dg)
  500. 12110 [152]2,g1(dg)
  501. 12111 [152]2,g2(dg)
  502. 12112 [152]2,g3(dg)
  503. 12113 [152]2,g4(dg)
  504. 12114 [152]2,g5(dg)
  505. 12115 [152]2,g6(dg)
  506. 12130 [130] dg
  507. 12135 [160]2
  508. 12140 [138]250
  509. 13000 [143]***** spielstand laden   ******
  510. 13010 [159]2,8,3,"yahtzee-datei,s,r"
  511. 13020 [159]1,8,15:[132]1,er,er$,tr,sk
  512. 13040 [139] er[178]0[167]13050
  513. 13045 [153]"loaddatei nicht gefunden !":[141]20000:[129]t[178]1[164]999:[130]t:[160]2
  514. 13046 [152]1,"s:yahtzee-datei":[160]1:[137]15000
  515. 13050 [132]2,ms
  516. 13051 [132]2,sp
  517. 13052 [132]2,r
  518. 13060 [129]dg[178]1[164]ms
  519. 13061 [132]2,na$(dg)
  520. 13070 [132]2,ei(dg)
  521. 13071 [132]2,zw(dg)
  522. 13072 [132]2,dr(dg)
  523. 13074 [132]2,vi(dg)
  524. 13075 [132]2,fu(dg)
  525. 13076 [132]2,se(dg)
  526. 13080 [132]2,dp(dg)
  527. 13081 [132]2,vp(dg)
  528. 13082 [132]2,fh(dg)
  529. 13083 [132]2,ks(dg)
  530. 13084 [132]2,gs(dg)
  531. 13085 [132]2,ya(dg)
  532. 13086 [132]2,ch(dg)
  533. 13090 [132]2,k1(dg)
  534. 13091 [132]2,k2(dg)
  535. 13092 [132]2,k3(dg)
  536. 13093 [132]2,k4(dg)
  537. 13094 [132]2,k5(dg)
  538. 13095 [132]2,k6(dg)
  539. 13100 [132]2,kd(dg)
  540. 13101 [132]2,kv(dg)
  541. 13102 [132]2,kf(dg)
  542. 13103 [132]2,kk(dg)
  543. 13104 [132]2,kg(dg)
  544. 13105 [132]2,ky(dg)
  545. 13106 [132]2,kc(dg)
  546. 13110 [132]2,g1(dg)
  547. 13111 [132]2,g2(dg)
  548. 13112 [132]2,g3(dg)
  549. 13113 [132]2,g4(dg)
  550. 13114 [132]2,g5(dg)
  551. 13115 [132]2,g6(dg)
  552. 13130 [130] dg
  553. 13140 [160]1:[160]2
  554. 13145 nn$[178]"--"
  555. 13146 pz[178]k1(ms)[170]k2(ms)[170]k3(ms)[170]k4(ms)[170]k5(ms)[170]k6(ms)[170]kd(ms)[170]kv(ms)[170]kk(ms)[170]kg(ms)
  556. 13147 pz[178]pz[170]ky(ms)[170]kc(ms)[170]kf(ms):[139]pz[178]13[167]pz[178]0:[137]30100
  557. 13148 pz[178]0
  558. 13150 [137]990
  559. 14990 [143]******* menu ******
  560. 15000 [153]"load"
  561. 15010 [153]"        <1>  spielstand laden"
  562. 15020 [153]"        <2>  weiter zum programm"
  563. 15025 [153]"        <3>  uhrzeit eingeben"
  564. 15030 [153]"          bitte waehelen sie !"
  565. 15040 [161]t$:[139]t$[178]""[167]15040
  566. 15050 [139] t$[178]"1"[167]13000
  567. 15055 [139] t$[178]"2"[167]500
  568. 15060 [139] t$[178]"3"[167]400
  569. 15070 [137]15040
  570. 20000 [143] ** sound subroutine **
  571. 20020 mp[178]54272
  572. 20030 [151] mp[170]24,15
  573. 20040 [151] mp[170]6,240
  574. 20050 [151] mp[170]4,17
  575. 20060 [129] mv[178]1 [164] 1
  576. 20070 [129] mo[178] 1 [164] 255  [169] 50
  577. 20080 [151] mp[170]1,mo
  578. 20090 [130] mo
  579. 20100 [130] mv
  580. 20110 [151] mp[170]4,32
  581. 20120 [142]
  582. 22000 [143]*** 1er eintrag ***
  583. 22002 b[178]0:c[178]0
  584. 22005 [129]l[178]1[164]ms
  585. 22010 b[178]b[170]5:[139] k1(l)[178]0[167] 22030
  586. 22015 [139] ei(l)[179]10 [167] c[178]b[170]1
  587. 22017 [139] ei(l)[177][178]10 [167] c[178]b
  588. 22019 [139] ei(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22030
  589. 22020 [153]"on";[163]c)ei(l)
  590. 22030 [130] l
  591. 22040 [142]
  592. 22200 [143]*** 2er eintrag ***
  593. 22202 b[178]0:c[178]0
  594. 22205 [129]l[178]1[164]ms
  595. 22210 b[178]b[170]5:[139] k2(l)[178]0[167] 22230
  596. 22215 [139] zw(l)[179]10 [167] c[178]b[170]1
  597. 22217 [139] zw(l)[177][178]10 [167] c[178]b
  598. 22219 [139] zw(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22230
  599. 22220 [153]"on";[163]c)zw(l)
  600. 22230 [130] l
  601. 22240 [142]
  602. 22400 [143]*** 3er eintrag ***
  603. 22402 b[178]0:c[178]0
  604. 22405 [129]l[178]1[164]ms
  605. 22410 b[178]b[170]5:[139] k3(l)[178]0[167] 22430
  606. 22415 [139] dr(l)[179]10 [167] c[178]b[170]1
  607. 22417 [139] dr(l)[177][178]10 [167] c[178]b
  608. 22419 [139] dr(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22430
  609. 22420 [153]"on";[163]c)dr(l)
  610. 22430 [130] l
  611. 22440 [142]
  612. 22600 [143]*** 4er eintrag ***
  613. 22602 b[178]0:c[178]0
  614. 22605 [129]l[178]1[164]ms
  615. 22610 b[178]b[170]5:[139] k4(l)[178]0[167] 22630
  616. 22615 [139] vi(l)[179]10 [167] c[178]b[170]1
  617. 22617 [139] vi(l)[177][178]10 [167] c[178]b
  618. 22619 [139] vi(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22630
  619. 22620 [153]"on";[163]c)vi(l)
  620. 22630 [130] l
  621. 22640 [142]
  622. 22800 [143]*** 5er eintrag ***
  623. 22802 b[178]0:c[178]0
  624. 22805 [129]l[178]1[164]ms
  625. 22810 b[178]b[170]5:[139] k5(l)[178]0[167] 22830
  626. 22815 [139] fu(l)[179]10 [167] c[178]b[170]1
  627. 22817 [139] fu(l)[177][178]10 [167] c[178]b
  628. 22819 [139] fu(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22830
  629. 22820 [153]"on";[163]c)fu(l)
  630. 22830 [130] l
  631. 22840 [142]
  632. 23000 [143]*** 6er eintrag ***
  633. 23002 b[178]0:c[178]0
  634. 23005 [129]l[178]1[164]ms
  635. 23010 b[178]b[170]5:[139] k6(l)[178]0[167] 23030
  636. 23015 [139] se(l)[179]10 [167] c[178]b[170]1
  637. 23017 [139] se(l)[177][178]10 [167] c[178]b
  638. 23019 [139] se(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23030
  639. 23020 [153]"on";[163]c)se(l)
  640. 23030 [130] l
  641. 23040 [142]
  642. 23200 [143]*** d-p eintrag ***
  643. 23202 b[178]0:c[178]0
  644. 23205 [129]l[178]1[164]ms
  645. 23210 b[178]b[170]5:[139] kd(l)[178]0[167] 23230
  646. 23215 [139] dp(l)[179]10 [167] c[178]b[170]1
  647. 23217 [139] dp(l)[177][178]10 [167] c[178]b
  648. 23219 [139] dp(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23230
  649. 23220 [153]"on";[163]c)dp(l)
  650. 23230 [130] l
  651. 23240 [142]
  652. 23400 [143]*** v-p eintrag ***
  653. 23402 b[178]0:c[178]0
  654. 23405 [129]l[178]1[164]ms
  655. 23410 b[178]b[170]5:[139] kv(l)[178]0[167] 23430
  656. 23415 [139] vp(l)[179]10 [167] c[178]b[170]1
  657. 23417 [139] vp(l)[177][178]10 [167] c[178]b
  658. 23419 [139] vp(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23430
  659. 23420 [153]"on";[163]c)vp(l)
  660. 23430 [130] l
  661. 23440 [142]
  662. 23600 [143]*** f-h eintrag ***
  663. 23602 b[178]0:c[178]0
  664. 23605 [129]l[178]1[164]ms
  665. 23610 b[178]b[170]5:[139] kf(l)[178]0[167] 23630
  666. 23615 [139] fh(l)[178]0  [167] c[178]b[170]1
  667. 23617 [139] fh(l)[177]0  [167] c[178]b
  668. 23619 [139] fh(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23630
  669. 23620 [153]"on";[163]c)fh(l)
  670. 23630 [130] l
  671. 23640 [142]
  672. 23800 [143]*** k-s eintrag ***
  673. 23802 b[178]0:c[178]0
  674. 23805 [129]l[178]1[164]ms
  675. 23810 b[178]b[170]5:[139] kk(l)[178]0[167] 23830
  676. 23815 [139] ks(l)[178]0  [167] c[178]b[170]1
  677. 23817 [139] ks(l)[177]0  [167] c[178]b
  678. 23819 [139] ks(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23830
  679. 23820 [153]"on";[163]c)ks(l)
  680. 23830 [130] l
  681. 23840 [142]
  682. 24000 [143]*** g-s eintrag ***
  683. 24002 b[178]0:c[178]0
  684. 24005 [129]l[178]1[164]ms
  685. 24010 b[178]b[170]5:[139] kg(l)[178]0[167] 24030
  686. 24015 [139] gs(l)[178]0  [167] c[178]b[170]1
  687. 24017 [139] gs(l)[177]0  [167] c[178]b
  688. 24019 [139] gs(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 24030
  689. 24020 [153]"on";[163]c)gs(l)
  690. 24030 [130] l
  691. 24040 [142]
  692. 24050 ei(l)[178]0:zw(l)[178]0:dr(l)[178]0:vi(l)[178]0:fu(l)[178]0:se(l)[178]0
  693. 24060 dp(l)[178]0:vp(l)[178]0:fh(l)[178]0:ks(l)[178]0:gs(l)[178]0:ya(l)[178]0:ch(l)[178]0
  694. 24090 [130] l
  695. 24100 [137] 1000
  696. 24200 [143]*** yah eintrag ***
  697. 24202 b[178]0:c[178]0
  698. 24205 [129]l[178]1[164]ms
  699. 24210 b[178]b[170]5:[139] ky(l)[178]0[167] 24230
  700. 24215 [139] ya(l)[178]0  [167] c[178]b[170]1
  701. 24217 [139] ya(l)[177]0[175]ya(l)[179]100[167] c[178]b
  702. 24219 [139] ya(l)[177][178] 100[167] c[178]b[171]1
  703. 24220 [139] ya(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 24230
  704. 24222 [153]"on";[163]c)ya(l)
  705. 24230 [130] l
  706. 24240 [142]
  707. 24400 [143]*** cha eintrag ***
  708. 24402 b[178]0:c[178]0
  709. 24405 [129]l[178]1[164]ms
  710. 24410 b[178]b[170]5:[139] kc(l)[178]0[167] 24430
  711. 24415 [139] ch(l)[179]10 [167] c[178]b[170]1
  712. 24417 [139] ch(l)[177]9  [167] c[178]b
  713. 24420 [153]"on";[163]c)ch(l)
  714. 24430 [130] l
  715. 24440 [142]
  716. 24600 [143]*** s.u eintrag ***
  717. 24602 b[178]0:c[178]0
  718. 24605 [129]l[178]1[164]ms
  719. 24610 su(l)[178]dp(l)[170]vp(l)[170]fh(l)[170]ks(l)[170]gs(l)[170]ya(l)[170]ch(l)
  720. 24615 b[178]b[170]5:[139] su(l)[179][178]0[167] 24630
  721. 24617 [139] su(l)[179]10 [167] c[178]b[170]1
  722. 24618 [139] su(l)[177][178]10[175]su(l)[179]100[167] c[178]b
  723. 24619 [139] su(l)[177][178] 100[167] c[178]b[171]1
  724. 24620 [153]"on";[163]c)su(l)
  725. 24630 [130] l
  726. 24640 [142]
  727. 24800 [143]*** ges eintrag ***
  728. 24802 b[178]0:c[178]0
  729. 24805 [129]l[178]1[164]ms
  730. 24810 ge(l)[178]og(l)[170]su(l)
  731. 24815 b[178]b[170]5:[139] ge(l)[179][178]0[167] 24830
  732. 24817 [139] ge(l)[179]10 [167] c[178]b[170]1
  733. 24818 [139] ge(l)[177][178]10[175]ge(l)[179]100[167] c[178]b
  734. 24819 [139] ge(l)[177][178] 100[167] c[178]b[171]1
  735. 24820 [153]"on";[163]c)ge(l)
  736. 24830 [130] l
  737. 24840 [142]
  738. 25000 [143]*** s.o eintrag ***
  739. 25002 b[178]0:c[178]0
  740. 25005 [129]l[178]1[164]ms
  741. 25010 so(l)[178]ei(l)[170]zw(l)[170]dr(l)[170]vi(l)[170]fu(l)[170]se(l)
  742. 25015 b[178]b[170]5:[139] so(l)[179][178]0[167] 25030
  743. 25017 [139] so(l)[179]10 [167] c[178]b[170]1
  744. 25018 [139] so(l)[177][178]10[175]so(l)[179]100[167] c[178]b
  745. 25019 [139] so(l)[177][178] 100[167] c[178]b[171]1
  746. 25020 [153]"on";[163]c)so(l)
  747. 25030 [130] l
  748. 25040 [142]
  749. 25200 [143]*** bon eintrag ***
  750. 25202 b[178]0:c[178]0
  751. 25205 [129]l[178]1[164]ms
  752. 25210 [139] so(l)[177][178]63[167]bo(l)[178]35
  753. 25215 b[178]b[170]5:[139] bo(l)[179][178]0[167] 25230
  754. 25220 [153]"on";[163]b)bo(l)
  755. 25230 [130] l
  756. 25240 [142]
  757. 25400 [143]*** o.g eintrag ***
  758. 25402 b[178]0:c[178]0
  759. 25405 [129]l[178]1[164]ms
  760. 25410 og(l)[178]so(l)[170]bo(l)
  761. 25415 b[178]b[170]5:[139] og(l)[179][178]0[167] 25430
  762. 25417 [139] og(l)[179]10 [167] c[178]b[170]1
  763. 25418 [139] og(l)[177][178]10[175]og(l)[179]100[167] c[178]b
  764. 25419 [139] og(l)[177][178] 100[167] c[178]b[171]1
  765. 25420 [153]"on";[163]c)og(l)
  766. 25430 [130] l
  767. 25440 [142]
  768. 25600 [143]*** +/- eintrag ****
  769. 25620 b[178]0:c[178]0
  770. 25630 [129] l[178]1 [164] ms
  771. 25640 [139] k1(l)[178]1[167] a1(l)[178]ei(l)[171]3
  772. 25650 [139] k2(l)[178]1[167] a2(l)[178]zw(l)[171]6
  773. 25660 [139] k3(l)[178]1[167] a3(l)[178]dr(l)[171]9
  774. 25670 [139] k4(l)[178]1[167] a4(l)[178]vi(l)[171]12
  775. 25680 [139] k5(l)[178]1[167] a5(l)[178]fu(l)[171]15
  776. 25690 [139] k6(l)[178]1[167] a6(l)[178]se(l)[171]18
  777. 25700 ab(l)[178]a1(l)[170]a2(l)[170]a3(l)[170]a4(l)[170]a5(l)[170]a6(l)
  778. 25720 b[178]b[170]5:[139] ab(l)[178]0[167] 25760
  779. 25722 [139] ab(l)[179]10 [175] ab(l)[177][171]10 [167] c[178]b[170]1
  780. 25724 [139] ab(l)[177][178]10 [176] ab(l)[179][178][171]10 [167] c[178]b
  781. 25730 [153]"on";[163]c)"sys";ab(l);""
  782. 25760 [130] l
  783. 25770 [142]
  784. 30000 [143]**** gesamttabelle ****
  785. 30005 [139] f7[178]1 [167] [137] 30100
  786. 30010 spiel[178]spiel[170]1
  787. 30070 [129] l[178]1[164]ms
  788. 30075 [139] sp[178]1[167] g1(l)[178]ge(l)
  789. 30080 [139] sp[178]2[167] g2(l)[178]ge(l)
  790. 30085 [139] sp[178]3[167] g3(l)[178]ge(l)
  791. 30089 [139] sp[178]4[167] g4(l)[178]ge(l)
  792. 30092 [139] sp[178]5[167] g5(l)[178]ge(l)
  793. 30095 [139] sp[178]6[167] g6(l)[178]ge(l)
  794. 30099 [130] l
  795. 30100 [153]"load";[163]10)name$(1);[163]17)name$(2);[163]24)name$(3);[163]31)name$(4)
  796. 30105 [153]:[153]
  797. 30110 [153]:[153]"1.spiel":[141] 30300
  798. 30115 [153]:[153]"2.spiel":[141] 30400
  799. 30130 [153]:[153]"3.spiel":[141] 30500
  800. 30140 [153]:[153]"4.spiel":[141] 30600
  801. 30150 [153]:[153]"5.spiel":[141] 30700
  802. 30160 [153]:[153]"6.spiel":[141] 30800
  803. 30170 [153]"lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen"
  804. 30180 [153]:[153]"gesamt ":[141] 30900
  805. 30200 [137] 31000
  806. 30300 b[178]0:c[178]0
  807. 30310 [129]l[178]1[164]ms
  808. 30315 [139] g1(l)[178]0[167]30390
  809. 30320 b[178]b[170]7
  810. 30330 [139]g1(l)[179] 10 [167] c[178]b[170]5
  811. 30340 [139]g1(l)[177][178]10[175]g1(l)[179]100[167] c[178]b[170]4
  812. 30350 [139]g1(l)[177][178]100[175]g1(l)[179]1000[167] c[178]b[170]3
  813. 30360 [139]g1(l)[177][178]1000[167] c[178]b[170]2
  814. 30380 [153]"on";[163]c)g1(l)
  815. 30390 [130] l
  816. 30395 [142]
  817. 30400 b[178]0:c[178]0
  818. 30410 [129]l[178]1[164]ms
  819. 30415 [139] g2(l)[178]0[167]30490
  820. 30420 b[178]b[170]7
  821. 30430 [139]g2(l)[179] 10 [167] c[178]b[170]5
  822. 30440 [139]g2(l)[177][178]10[175]g2(l)[179]100[167] c[178]b[170]4
  823. 30450 [139]g2(l)[177][178]100[175]g2(l)[179]1000[167] c[178]b[170]3
  824. 30460 [139]g2(l)[177][178]1000[167] c[178]b[170]2
  825. 30480 [153]"on";[163]c)g2(l)
  826. 30490 [130] l
  827. 30495 [142]
  828. 30500 b[178]0:c[178]0
  829. 30510 [129]l[178]1[164]ms
  830. 30515 [139] g3(l)[178]0[167]30590
  831. 30520 b[178]b[170]7
  832. 30530 [139]g3(l)[179] 10 [167] c[178]b[170]5
  833. 30540 [139]g3(l)[177][178]10[175]g3(l)[179]100[167] c[178]b[170]4
  834. 30550 [139]g3(l)[177][178]100[175]g3(l)[179]1000[167] c[178]b[170]3
  835. 30560 [139]g3(l)[177][178]1000[167] c[178]b[170]2
  836. 30580 [153]"on";[163]c)g3(l)
  837. 30590 [130] l
  838. 30595 [142]
  839. 30600 b[178]0:c[178]0
  840. 30610 [129]l[178]1[164]ms
  841. 30615 [139] g4(l)[178]0[167]30690
  842. 30620 b[178]b[170]7
  843. 30630 [139]g4(l)[179] 10 [167] c[178]b[170]5
  844. 30640 [139]g4(l)[177][178]10[175]g4(l)[179]100[167] c[178]b[170]4
  845. 30650 [139]g4(l)[177][178]100[175]g4(l)[179]1000[167] c[178]b[170]3
  846. 30660 [139]g4(l)[177][178]1000[167] c[178]b[170]2
  847. 30680 [153]"on";[163]c)g4(l)
  848. 30690 [130] l
  849. 30695 [142]
  850. 30700 b[178]0:c[178]0
  851. 30710 [129]l[178]1[164]ms
  852. 30715 [139] g5(l)[178]0[167]30790
  853. 30720 b[178]b[170]7
  854. 30730 [139]g5(l)[179] 10 [167] c[178]b[170]5
  855. 30740 [139]g5(l)[177][178]10[175]g5(l)[179]100[167] c[178]b[170]4
  856. 30750 [139]g5(l)[177][178]100[175]g5(l)[179]1000[167] c[178]b[170]3
  857. 30760 [139]g5(l)[177][178]1000[167] c[178]b[170]2
  858. 30780 [153]"on";[163]c)g5(l)
  859. 30790 [130] l
  860. 30795 [142]
  861. 30800 b[178]0:c[178]0
  862. 30810 [129]l[178]1[164]ms
  863. 30815 [139] g6(l)[178]0[167]30890
  864. 30820 b[178]b[170]7
  865. 30830 [139]g6(l)[179] 10 [167] c[178]b[170]5
  866. 30840 [139]g6(l)[177][178]10[175]g6(l)[179]100[167] c[178]b[170]4
  867. 30850 [139]g6(l)[177][178]100[175]g6(l)[179]1000[167] c[178]b[170]3
  868. 30860 [139]g6(l)[177][178]1000[167] c[178]b[170]2
  869. 30880 [153]"on";[163]c)g6(l)
  870. 30890 [130] l
  871. 30895 [142]
  872. 30900 b[178]0:c[178]0
  873. 30905 [129]l[178]1[164]ms
  874. 30910 gt(l)[178]g1(l)[170]g2(l)[170]g3(l)[170]g4(l)[170]g5(l)[170]g6(l)
  875. 30919 [139] gt(l)[178]0 [167] 30990
  876. 30920 b[178]b[170]7
  877. 30930 [139]gt(l)[179] 10 [167] c[178]b[170]5
  878. 30940 [139]gt(l)[177][178]10[175]gt(l)[179]100[167] c[178]b[170]4
  879. 30950 [139]gt(l)[177][178]100[175]gt(l)[179]1000[167] c[178]b[170]3
  880. 30960 [139]gt(l)[177][178]1000[167] c[178]b[170]2
  881. 30980 [153]"on";[163]c)gt(l)
  882. 30990 [130] l
  883. 30995 [142]
  884. 31000 [139] gt(1)[177]gt(2)[175]gt(1)[177]gt(3)[175]gt(1)[177]gt(4)[167]  p[178]1
  885. 31010 [139] gt(2)[177]gt(1)[175]gt(2)[177]gt(3)[175]gt(2)[177]gt(4)[167]p[178]2
  886. 31020 [139] gt(3)[177]gt(1)[175]gt(3)[177]gt(2)[175]gt(3)[177]gt(4)[167]p[178]3
  887. 31030 [139] gt(4)[177]gt(1)[175]gt(4)[177]gt(2)[175]gt(4)[177]gt(3)[167]p[178]4
  888. 31050 [139] spiel[178]6[167]32000
  889. 31055 [153]"";[163]8)"in fuehrung liegt  sys  ";na$(p);"  wait"
  890. 31060 ts[178]p[172]7[170]3:[158]49152,0,ts,5,20,1
  891. 31070 [139]f7[178]1[167][153]" s = spielstand sichern   taste = spielon":[142]
  892. 31090 ja$[178]""
  893. 31100 [153]"";[163]8)"nochmal (j/n/a/h)  <s>ave"
  894. 31105 [161] ja$:[139] ja$[178]""[167] 31105
  895. 31110 [139] ja$[178]"h"[167][158]49372:[141]35000
  896. 31120 [139] ja$[178]"a"[167][158]49372:[137]500
  897. 31122 [139] ja$[178]"n"[167][158]49372:[153]"load":[128]
  898. 31124 [139] ja$[178]"s"[167][158]49372:[137]12000
  899. 31125 [139] ja$[178]"j"[167][158]49372:[137]34000
  900. 31130 [137] 31105
  901. 32000 [153]"";[163]8)"gesamtsieger ist sys  ";na$(p);"  wait"
  902. 32040 ja$[178]""
  903. 32050 [153]"";[163]12)"nochmal (j/n/h)"
  904. 32052 [161] ja$:[139] ja$[178][199](32)[167] 32052
  905. 32055 [139] ja$[178]"h"[167] [141] 35500
  906. 32060 [139] ja$[178]"j"[167] 500
  907. 32065 [139] ja$[178]"n"[167] [153]"load":[128]
  908. 32070 [137] 32052
  909. 34000 [143]*** loeschen ***
  910. 34009 [129] l[178]1[164] ms
  911. 34010 ab(l)[178]0
  912. 34011 ei(l)[178]0:k1(l)[178]0
  913. 34012 zw(l)[178]0:k2(l)[178]0
  914. 34013 dr(l)[178]0:k3(l)[178]0
  915. 34014 vi(l)[178]0:k4(l)[178]0
  916. 34015 fu(l)[178]0:k5(l)[178]0
  917. 34016 se(l)[178]0:k6(l)[178]0
  918. 34017 so(l)[178]0:og(l)[178]0
  919. 34018 bo(l)[178]0
  920. 34019 a1(l)[178]0:a2(l)[178]0:a3(l)[178]0:a4(l)[178]0:a5(l)[178]0:a6(l)[178]0
  921. 34020 dp(l)[178]0:kd(l)[178]0
  922. 34021 vp(l)[178]0:kv(l)[178]0
  923. 34022 fh(l)[178]0:kf(l)[178]0
  924. 34023 ks(l)[178]0:kk(l)[178]0
  925. 34024 gs(l)[178]0:kg(l)[178]0
  926. 34025 ya(l)[178]0:ky(l)[178]0
  927. 34026 ch(l)[178]0:kc(l)[178]0
  928. 34027 su(l)[178]0
  929. 34028 ge(l)[178]0
  930. 34050 [130] l
  931. 34055 za(1)[178]0:za(2)[178]0:za(3)[178]0:za(4)[178]0:za(5)[178]0:et$[178]"":r[178]0
  932. 34060 [137] 990
  933. 35000 [143]*** hilfe ***
  934. 35010 [153]"load*** hilfe *** hilfe *** hilfe *** hilfe wait"
  935. 35020 [158]49152,0,0,40,20,1
  936. 35040 [153]"-h-   ---> diesen text aufrufen"
  937. 35050 [153]"-j-   ---> es wird mit den gleichen"
  938. 35060 [153]"           personen weitergespielt"
  939. 35070 [153]"-n-   ---> das spiel wird beendet"
  940. 35080 [153]"-a-   ---> ein ganz neues spiel beginnen"
  941. 35090 [153]"      ---> ihre wahl "
  942. 35092 [161] ja$:[139] ja$[178]""[167]35092
  943. 35095 [158]49372
  944. 35100 [142]
  945. 35500 [153]"load*** hilfe *** hilfe *** hilfe *** hilfe wait"
  946. 35520 [158]49152,0,0,40,20,1
  947. 35540 [153]"-h-   ---> diesen text aufrufen"
  948. 35550 [153]"-j-   ---> ein ganz neues spiel beginnt"
  949. 35560 [153]"           die tabelle wird geloescht"
  950. 35570 [153]"-n-   ---> das spiel wird beendet"
  951. 35590 [153]"      ---> ihre wahl "
  952. 35595 [161] ja$:[139] ja$[178]""[167] 35595
  953. 35596 [158]49372
  954. 35600 [142]
  955. 40000 [143]* eintrag loeschen und neu vergeben *
  956. 40020 r[178]r[171]1
  957. 40025 [139] r[178]0[167]r[178]ms
  958. 40030 [139] et$[178]"1"[167] k1(r)[178]0:ei(r)[178]0:a1(r)[178]0
  959. 40040 [139] et$[178]"2"[167] k2(r)[178]0:zw(r)[178]0:a2(r)[178]0
  960. 40050 [139] et$[178]"3"[167] k3(r)[178]0:dr(r)[178]0:a3(r)[178]0
  961. 40060 [139] et$[178]"4"[167] k4(r)[178]0:vi(r)[178]0:a4(r)[178]0
  962. 40070 [139] et$[178]"5"[167] k5(r)[178]0:fu(r)[178]0:a5(r)[178]0
  963. 40080 [139] et$[178]"6"[167] k6(r)[178]0:se(r)[178]0:a6(r)[178]0
  964. 40090 [139] et$[178]"d"[167] kd(r)[178]0:dp(r)[178]0
  965. 40100 [139] et$[178]"v"[167] kv(r)[178]0:vp(r)[178]0
  966. 40110 [139] et$[178]"f"[167] kf(r)[178]0:fh(r)[178]0
  967. 40120 [139] et$[178]"k"[167] kk(r)[178]0:ks(r)[178]0
  968. 40130 [139] et$[178]"g"[167] kg(r)[178]0:gs(r)[178]0
  969. 40140 [139] et$[178]"y"[167] ky(r)[178]0:ya(r)[178]0
  970. 40150 [139] et$[178]"c"[167] kc(r)[178]0:ch(r)[178]0
  971. 40170 f5[178]1
  972. 40180 [137]990
  973. 40200 f5[178]0
  974. 40210 [141] 6300
  975. 40220 [129] dice[178]1[164]5
  976. 40230 [145] dice [141] 3510,3530,3550,3570,3590
  977. 40240 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
  978. 40250 [130] dice
  979. 40270 [137] 7000
  980. 45000 [143] uhrzeit
  981. 45020 zeit$[178]ti$
  982. 45030 st$[178][200](zeit$,2)
  983. 45032 min$(1)[178][201](zeit$,4)
  984. 45033 min$(2)[178][200](min$(1),2)
  985. 45035 sec$[178][201](zeit$,2)
  986. 45040 [153][163]27)st$;".";min$(2);".";sec$;" uhron"
  987. 45050 [142]
  988. 46000 [143] ***** bild neu *****
  989. 46010 r[178]r[171]1
  990. 46030 [137] 990
  991. 47000 [143]** wuerfel halten/neu wuerfeln
  992. 47005 [139] wurf[178]4 [167] [142]
  993. 47010 [129] bu[178]1[164]5
  994. 47015 ja$(bu)[178]"nein":jj$(bu)[178]""
  995. 47020 [130] bu
  996. 47040 bu[178]0
  997. 47045 [153]"";[163]26)wurf"cmd. wurf":[153]
  998. 47050 [153]""
  999. 47060 xy[178]25
  1000. 47090 xy[178]xy[170]2
  1001. 47092 [153][163]xy)"on wait"
  1002. 47095 bu[178]bu[170]1
  1003. 47100 [161] jj$(bu)
  1004. 47105 [139] jj$(bu)[178][199](13)[167]ji$[178][199](32):[141] 20000:[141]47125
  1005. 47106 [139] jj$(bu)[178][199](13)[167]47130
  1006. 47107 [139] jj$(bu)[178][199](20)[167][141]20000:[137]47200
  1007. 47109 [139] jj$(bu)[179]"a"[176] jj$(bu)[177]"e" [167] 47100
  1008. 47110 [153][163]xy)"on";jj$(bu):[141]20000
  1009. 47112 [139] jj$(bu)[178]"a"[167] ja$(1)[178]"ja":[141]3510:dice[178]1
  1010. 47113 [139] jj$(bu)[178]"b"[167] ja$(2)[178]"ja":[141]3530:dice[178]2
  1011. 47114 [139] jj$(bu)[178]"c"[167] ja$(3)[178]"ja":[141]3550:dice[178]3
  1012. 47115 [139] jj$(bu)[178]"d"[167] ja$(4)[178]"ja":[141]3570:dice[178]4
  1013. 47116 [139] jj$(bu)[178]"e"[167] ja$(5)[178]"ja":[141]3590:dice[178]5
  1014. 47117 [145] zahl(dice)[141]5010,5030,5050,5070,5090,5110
  1015. 47118 [153]""
  1016. 47119 [139] bu[178]5 [167] 47130
  1017. 47120 [137] 47090
  1018. 47125 [153][163]xy)"on";ji$:[142]
  1019. 47130 [153]""
  1020. 47140 [153][163]27)"richtig ?"
  1021. 47150 [161] ri$:[139] ri$[178]""[167]47150
  1022. 47155 [141] 20000
  1023. 47160 [139] ri$[178]"j"[176]ri$[178][199](13)[167] [141] 47400:[142]
  1024. 47166 [139] ri$[178]"1"[176]ri$[178]"2"[176]ri$[178]"3"[176] ri$[178]"4"[176] ri$[178]"5"[176]ri$[178]"6"[167]47400
  1025. 47167 [139] ri$[179][177]"n"[167] 47150
  1026. 47170 [141] 47300:[143] zeilen loeschen
  1027. 47180 [137] 47000
  1028. 47200 [139] bu[178]1[167] [137]47100
  1029. 47205 [153][163]xy)"on";[199](32)
  1030. 47210 bu[178]bu[171]1
  1031. 47221 [139] jj$(bu)[178]"a"[167] ja$(1)[178]"nein":[141]3510:dice[178]1
  1032. 47222 [139] jj$(bu)[178]"b"[167] ja$(2)[178]"nein":[141]3530:dice[178]2
  1033. 47223 [139] jj$(bu)[178]"c"[167] ja$(3)[178]"nein":[141]3550:dice[178]3
  1034. 47224 [139] jj$(bu)[178]"d"[167] ja$(4)[178]"nein":[141]3570:dice[178]4
  1035. 47225 [139] jj$(bu)[178]"e"[167] ja$(5)[178]"nein":[141]3590:dice[178]5
  1036. 47226 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
  1037. 47227 [153]""
  1038. 47228 jj$(bu)[178]""
  1039. 47230 xy[178]xy[171]2
  1040. 47240 bu[178]bu[171]1:[137] 47092
  1041. 47300 [143]*** zeilen fuer eingabe wurf loeschen ****
  1042. 47310 [153]""
  1043. 47320 [129] lo[178]1[164] 8
  1044. 47330 [153][163]25)"              "
  1045. 47340 [130] lo
  1046. 47343 [129] dice[178]1[164]5
  1047. 47344 [145] dice [141] 3510,3530,3550,3570,3590
  1048. 47345 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
  1049. 47347 [130] dice
  1050. 47350 [142]
  1051. 47400 [143]*** zeilen fuer eingabe wurf loeschen ****
  1052. 47410 [153]""
  1053. 47420 [129] lo[178]1[164] 8
  1054. 47430 [153][163]27)"            "
  1055. 47440 [130] lo
  1056. 47450 [142]
  1057. 48000 [143]*** tabelle zwischendurch ***
  1058. 48010 f7[178]1
  1059. 48015 [153]"load"
  1060. 48020 [141] 30000
  1061. 48030 [161] t$:[139] t$[178]""[167]48030
  1062. 48032 [158]49372
  1063. 48035 [139] t$[178]"s"[167]12000
  1064. 48040 f7[178]0
  1065. 48050 [137] 46000
  1066. 50000 [143]**** zeilen loeschen ****
  1067. 50005 [153]""
  1068. 50010 [129] lo[178]1 [164] 23
  1069. 50020 [153][163]26)"             "
  1070. 50030 [130] lo
  1071. 50040 [142]
  1072. 59000 [143]*** laufschrift ***
  1073. 59100 [129]i[178]49152[164]49384
  1074. 59110 [135]a:[151]i,a:s[178]s[170]a
  1075. 59120 [130] i
  1076. 59130 [139]s[179][177]32199[167][153]:[153]"data-fehler!!"
  1077. 59135 [142]
  1078. 59140 [131] 120,32,253,174,32,158,183,224,25,176
  1079. 59150 [131] 127,142,232,7,32,253,174,32,158,183
  1080. 59160 [131] 224,40,176,114,142,233,7,32,253,174
  1081. 59170 [131] 32,158,183,138,240,102,24,109,233,7
  1082. 59180 [131] 201,41,176,94,202,142,234,7,32,253
  1083. 59190 [131] 174,32,158,183,142,235,7,142,236,7
  1084. 59200 [131] 169,0,133,247,169,4,133,248,174,232
  1085. 59210 [131] 7,240,14,24,165,247,105,40,133,247
  1086. 59220 [131] 144,2,230,248,202,208,242,24,165,247
  1087. 59230 [131] 109,233,7,133,247,144,2,230,248,32
  1088. 59240 [131] 253,174,32,158,183,224,2,176,29,224
  1089. 59250 [131] 0,208,13,169,141,141,20,3,169,192
  1090. 59260 [131] 141,21,3,76,136,192,169,178,141,20
  1091. 59270 [131] 3,169,192,141,21,3,88,96,76,72
  1092. 59280 [131] 178,206,236,7,173,236,7,208,26,173
  1093. 59290 [131] 235,7,141,236,7,172,234,7,240,15
  1094. 59300 [131] 177,247,72,136,177,247,200,145,247,136
  1095. 59310 [131] 208,247,104,145,247,76,49,234,206,236
  1096. 59320 [131] 7,173,236,7,208,245,173,235,7,141
  1097. 59330 [131] 236,7,160,0,204,234,7,240,232,177
  1098. 59340 [131] 247,72,200,177,247,136,145,247,200,204
  1099. 59350 [131] 234,7,208,244,104,145,247,76,49,234
  1100. 59360 [131] 120,169,49,141,20,3,169,234,141,21
  1101. 59380 [131] 3,88,96
  1102. 60000 [143]*** zu bild 1 ***
  1103. 60005 [153]:[153]
  1104. 60020 [153][163]5)"d":[141]20000
  1105. 60030 [153][163]7)"oni":[141]20000
  1106. 60040 [153][163]9)"onr":[141]20000
  1107. 60050 [153][163]11)"onk":[141]20000
  1108. 60060 [153][163]17)"onu":[141]20000
  1109. 60070 [153][163]19)"one":[141]20000
  1110. 60073 [153][163]21)"onk":[141]20000
  1111. 60076 [153][163]23)"one":[141]20000
  1112. 60080 [153][163]25)"onr":[141]20000
  1113. 60090 [153][163]27)"onm":[141]20000
  1114. 60100 [153][163]29)"ona":[141]20000
  1115. 60110 [153][163]31)"onn":[141]20000
  1116. 60120 [153][163]33)"onn":[141]20000
  1117. 60180 [142]
  1118.