home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Commodore Disc 3
/
Commodore_Disc_03_19xx_-_de.d64
/
yahtzee
(
.txt
)
< prev
Wrap
Commodore BASIC
|
2022-10-26
|
25KB
|
1,118 lines
100 rem*************************************************************************
104 rem** *
108 rem** yahtzee *
110 rem** (c) by dirk uekermann *
112 rem** hoehenstrasse 36 *
114 rem** 5243 herdorf *
116 rem** *
120 rem*************************************************************************
150 print"[147]"
200 poke53280,0:poke53281,12:poke646,1
205 poke211,8:poke214,11:sys58640:print"einen moment bitte....."
210 gosub59000
250 rem***** bild 1 *****
260 printchr$(142):printchr$(8):print"[147]"
270 poke1397,25:gosub20000
280 poke1399,1:gosub20000
290 poke1401,8:gosub20000
300 poke1403,20:gosub20000
310 poke1405,26:gosub20000
320 poke1407,5:gosub20000
330 poke1409,5:gosub20000
350 print"";tab(17)"v o n":gosub20000
360 gosub60000
361 a=4:for u=1to6
362 pl=pl+1
363 print"":a=a+4:gosub20000
364 on pl gosub 4515,4535,4555,4575,4595,4615
365 nextu
370 gett$:ift$<>chr$(13)then370
380 goto15000
400 rem**** bild 1a ****
405 print"[147]"
410 pl$=" y a h t z e e "
415 printpl$
420 print""
425 print" bitte geben sie die uhrzeit ein
430 [133]" > ";ii$
431 [139][195](ii$)[177]6[167]400
432 [139][200](ii$,2)[179]"00"[176][200](ii$,2)[177]"23"[167]400
433 [139][202](ii$,3,2)[179]"00"[176][202](ii$,3,2)[177]"59"[167]400
434 [139][201](ii$,2)[179]"00"[176][201](ii$,2)[177]"59"[167]400
435 ti$[178]ii$
440 [137] 15000
500 [143]**** bild 2 ****
505 [156]
508 nn$[178]"--"
509 pl$[178]" y a h t z e e "
510 [153]"load"
515 [153]pl$
520 [133]"> anzahl mitspieler (max.4) --> ";ms
530 [139] ms[177]4[176]ms[179][178]0[167]500
540 [153]:[153]
550 [129] t[178]1[164] ms
560 [153]"> name";t;"cmd. mitspieler --->"
570 [133]"on";name$(t)
573 na$(t)[178]na$(t)[170]" "
575 [139] [195](name$(t))[177]4[167]name$(t)[178][200](name$(t),4)
580 [130] t
990 [153][199](147)
995 [137] 1060
1000 [143]*** bild 3 ***
1050 [141] 50000
1055 [153]""
1058 [158]49372
1060 [153]"onon";[163]5)name$(1);[163]10)name$(2);[163]15)name$(3);[163]20)name$(4)
1070 [153]
1500 [153]"1":[141]22000
1520 [153]"2":[141]22200
1540 [153]"3":[141]22400
1560 [153]"4":[141]22600
1580 [153]"5":[141]22800
1600 [153]"6":[141]23000
1620 [153]"lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen"
1640 [153]"sum":[141]25000
1660 [153]"bon":[141]25200
1700 [153]"+/- ":[141]25600
1720 [153]
1740 [153]"d-p":[141]23200
1760 [153]"v-p":[141]23400
1780 [153]"f-h":[141]23600
1800 [153]"k-s":[141]23800
1820 [153]"g-s":[141]24000
1840 [153]"yah":[141]24200
1860 [153]"cha":[141]24400
1880 [153]"lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen"
1900 [153]"sum":[141]24600
1920 [153]"obe":[141]25400
1940 [153]"ges":[141]24800
1945 [141] 45000:[143] uhrzeit
1946 [139] f5[178]1[167] [137] 40200
1947 [139] f3[178]1[167] 46125
1950 [139] k1(ms)[170]k2(ms)[170]k3(ms)[170]k4(ms)[170]k5(ms)[170]k6(ms)[179]6[167]1970
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
1956 [139] ge(1)[177]ge(2)[175]ge(1)[177]ge(3)[175]ge(1)[177]ge(4)[167] p[178]1
1957 [139] ge(2)[177]ge(1)[175]ge(2)[177]ge(3)[175]ge(2)[177]ge(4)[167]p[178]2
1958 [139] ge(3)[177]ge(1)[175]ge(3)[177]ge(2)[175]ge(3)[177]ge(4)[167]p[178]3
1959 [139] ge(4)[177]ge(1)[175]ge(4)[177]ge(2)[175]ge(4)[177]ge(3)[167]p[178]4
1960 [153]""
1961 [129] lo[178]1[164]20
1962 [153][163]27)" "
1963 [130] lo
1964 [153]"";[163]27)"gewonnen hat"
1965 [153]:[153][163]29)"sys ";name$(p);" wait"
1966 [153]"";[163]29)"tabelle"
1967 [153][163]27)"---> return"
1968 [161] sp$:[139] sp$[179][177][199](13)[167]1968
1969 [141] 30000
1970 [141]6000
1980 [141]6300
1990 [137] 3000
2215 [141] 30010
3000 [143]**** wuerfeln ****
3030 [129] q[178]1[164]5:ja$(q)[178]"ja":[130]q
3050 [129] wurf [178] 2 [164] 4
3060 [129] dice[178]1[164]5
3065 [139] ja$(dice)[179][177]"ja" [167] 3100
3070 zahl(dice)[178][181](6[172][187](1))[170]1
3071 [139] ri$[178]"1"[167] zahl(dice)[178]1
3072 [139] ri$[178]"2"[167] zahl(dice)[178]2
3073 [139] ri$[178]"3"[167] zahl(dice)[178]3
3074 [139] ri$[178]"4"[167] zahl(dice)[178]4
3075 [139] ri$[178]"5"[167] zahl(dice)[178]5
3076 [139] ri$[178]"6"[167] zahl(dice)[178]6
3079 ri$[178]""
3080 [145] dice [141] 3510,3530,3550,3570,3590
3090 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
3095 [141] 20000
3100 [130] dice
3120 [141] 47000
3130 [130] wurf
3160 [137] 7000:[143] eintrag markieren
3500 [143]*** wuerfel positionieren ***
3510 [153]"":a[178]29:[142]
3530 [153]"":a[178]33:[142]
3550 [153]"":a[178]27:[142]
3570 [153]"":a[178]31:[142]
3590 [153]"":a[178]35:[142]
3900 [143]* bild 5 (wuerfel halten ?) **
3905 [139] wurf[178]4 [167] [142]
3910 [153]"";[163]29)wurf"cmd. wurf":[153]
3915 [141]47000:[143] neu wuerfel
3917 [142]
4500 [143]**** zahlen ****
4510 [143]**** 1 ****
4515 [153][163]a)"sys "
4520 [153][163]a)"sys (NULL) "
4525 [153][163]a)"sys wait"
4529 [142]
4530 [143]**** 2 ****
4535 [153][163]a)"sys(NULL) "
4540 [153][163]a)"sys "
4545 [153][163]a)"sys (NULL)wait"
4549 [142]
4550 [143]**** 3 ****
4555 [153][163]a)"sys(NULL) "
4560 [153][163]a)"sys (NULL) "
4565 [153][163]a)"sys (NULL)wait"
4569 [142]
4570 [143]**** 4 ****
4575 [153][163]a)"sys(NULL) (NULL)"
4580 [153][163]a)"sys "
4585 [153][163]a)"sys(NULL) (NULL)wait"
4589 [142]
4590 [143]**** 5 ****
4595 [153][163]a)"sys(NULL) (NULL)"
4600 [153][163]a)"sys (NULL) "
4605 [153][163]a)"sys(NULL) (NULL)wait"
4609 [142]
4610 [143]**** 6 ****
4615 [153][163]a)"sys(NULL) (NULL)"
4620 [153][163]a)"sys(NULL) (NULL)"
4625 [153][163]a)"sys(NULL) (NULL)wait"
4629 [142]
5000 [143]*** zahlen rot ****
5010 [143]**** 1 ****
5015 [153][163]a)" "
5020 [153][163]a)" (NULL) "
5025 [153][163]a)" wait"
5029 [142]
5030 [143]**** 2 ****
5035 [153][163]a)"(NULL) "
5040 [153][163]a)" "
5045 [153][163]a)" (NULL)wait"
5049 [142]
5050 [143]**** 3 ****
5055 [153][163]a)"(NULL) "
5060 [153][163]a)" (NULL) "
5065 [153][163]a)" (NULL)wait"
5069 [142]
5070 [143]**** 4 ****
5075 [153][163]a)"(NULL) (NULL)"
5080 [153][163]a)" "
5085 [153][163]a)"(NULL) (NULL)wait"
5089 [142]
5090 [143]**** 5 ****
5095 [153][163]a)"(NULL) (NULL)"
5100 [153][163]a)" (NULL) "
5105 [153][163]a)"(NULL) (NULL)wait"
5109 [142]
5110 [143]**** 6 ****
5115 [153][163]a)"(NULL) (NULL)"
5120 [153][163]a)"(NULL) (NULL)"
5125 [153][163]a)"(NULL) (NULL)wait"
5129 [142]
6000 [143]**** bild 4 ****
6010 r[178]r[170]1:[139] r[177]ms [167] r[178]1
6020 ts[178]r[172]5
6030 [158]49152,0,ts,4,20,1
6050 [153]""
6060 [153]"";[163]27)"sys";name$(r)" bitte"
6062 [153]:[153][163]29)"return"
6063 [153]"";[163]30)"oder"
6064 [153]"";[163]27)"f1 bild neu"
6065 [139] et$[179][177]""[167][153]"";[163]27)"f5 zurueck"
6066 [153]"";[163]27)"f7 tabelle"
6068 [153]"";[163]27)"f8 ende"
6072 [161] x$
6075 [139] x$[178]"input"[167] [158]49372:[137] 46000:[143] bild neu
6076 [139] x$[178]"let"[167] [158]49372:[137] 48000:[143] tabelle zwischendurch
6077 [139] x$[178]"restore"[167] [158]49372:[137] 30000:[143] tabelle zum ende
6078 [139] x$[178]"read"[175]et$[179][177]""[167][158]49372:[137] 40000:[143] eintrag loeschen
6080 [139]x$[179][177][199](13)[167]6072
6090 [142]
6300 [143]**** bild 5 ****
6310 [141] 50000
6330 [153]"";[163]30)"a";[163]34)"b"
6340 [153]"";[163]28)"c";[163]32)"d";[163]36)"e"
6360 [142]
7000 [143]*** bild 6 (eintrag markieren)*
7010 [153]""
7020 [129] lo[178]1[164]9
7030 [153][163]27)" "
7040 [130] lo
7070 et$[178]""
7075 [153][163]27)"ononononsys ";na$(r);" wait"
7080 [153]"";[163]27)"eintrag: "
7091 [161] et$:[139] et$[178]""[167]7091
7095 [141] 20000
7100 [139] et$[178]"1"[167][153][163]25)"on einser ":[141]7500:[137]8000
7110 [139] et$[178]"2"[167][153][163]25)"on zweier ":[141]7500:[137]8200
7120 [139] et$[178]"3"[167][153][163]25)"on dreier ":[141]7500:[137]8400
7130 [139] et$[178]"4"[167][153][163]25)"on vierer ":[141]7500:[137]8600
7140 [139] et$[178]"5"[167][153][163]25)"on fuenfer ":[141]7500:[137]8800
7150 [139] et$[178]"6"[167][153][163]25)"on sechser ":[141]7500:[137]9000
7160 [139] et$[178]"d"[167][153][163]25)"on dreier-pasch":[141]7500:[137]9200
7170 [139] et$[178]"v"[167][153][163]25)"on vierer-pasch":[141]7500:[137]9400
7180 [139] et$[178]"f"[167][153][163]25)"on full-house":[141]7500:[137]9600
7190 [139] et$[178]"k"[167][153][163]25)"on kl.strasse":[141]7500:[137]9800
7200 [139] et$[178]"g"[167][153][163]25)"on gr.strasse":[141]7500:[137]10000
7210 [139] et$[178]"y"[167][153][163]25)"on yahtzee ":[141]7500:[137]10200
7220 [139] et$[178]"c"[167][153][163]25)"on chance ":[141]7500:[137]10400
7250 [137] 7070
7500 [143]*** return abfrage fuer eintrag
7510 [161] rt$
7520 [139] rt$[178][199](13)[167] [142]
7530 [139] rt$[178][199](20)[167] 7550
7540 [137] 7510
7550 [141] 47300
7560 [137] 7000
8000 [143]*** 1er ****
8010 [139] k1(r)[178]1[167]7250
8020 k1(r)[178]1
8030 [129] dice[178]1[164]5
8040 [139] zahl(dice)[178]1[167]e[178]1
8050 ei(r)[178]ei(r)[170]e:e[178]0
8060 [130] dice
8070 [137]1000
8200 [143]*** 2er ****
8210 [139] k2(r)[178]1[167]7250
8220 k2(r)[178]1
8230 [129] dice[178]1[164]5
8240 [139] zahl(dice)[178]2[167]z[178]2
8250 zw(r)[178]zw(r)[170]z:z[178]0
8260 [130] dice
8270 [137]1000
8400 [143]*** 3er ****
8410 [139] k3(r)[178]1[167]7250
8420 k3(r)[178]1
8430 [129] dice[178]1[164]5
8440 [139] zahl(dice)[178]3[167]d[178]3
8450 dr(r)[178]dr(r)[170]d:d[178]0
8460 [130] dice
8470 [137]1000
8600 [143]*** 4er ****
8610 [139] k4(r)[178]1[167]7250
8620 k4(r)[178]1
8630 [129] dice[178]1[164]5
8640 [139] zahl(dice)[178]4[167]v[178]4
8650 vi(r)[178]vi(r)[170]v:v[178]0
8660 [130] dice
8670 [137]1000
8800 [143]*** 5er ****
8810 [139] k5(r)[178]1[167]7250
8820 k5(r)[178]1
8830 [129] dice[178]1[164]5
8840 [139] zahl(dice)[178]5[167]f[178]5
8850 fu(r)[178]fu(r)[170]f:f[178]0
8860 [130] dice
8870 [137]1000
9000 [143]*** 6er ****
9010 [139] k6(r)[178]1[167]7250
9020 k6(r)[178]1
9030 [129] dice[178]1[164]5
9040 [139] zahl(dice)[178]6[167]s[178]6
9050 se(r)[178]se(r)[170]s:s[178]0
9060 [130] dice
9070 [137]1000
9200 [143]*** 3er-pasch ***
9210 [139] kd(r)[178]1[167]7250
9220 kd(r)[178]1
9230 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(3)[167]9350
9235 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(4)[167]9350
9240 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(5)[167]9350
9245 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(4)[167]9350
9250 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(5)[167]9350
9255 [139] zahl(1)[178]zahl(4)[175]zahl(1)[178]zahl(5)[167]9350
9260 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(4)[167]9350
9265 [139] zahl(2)[178]zahl(4)[175]zahl(2)[178]zahl(5)[167]9350
9270 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(5)[167]9350
9275 [139] zahl(3)[178]zahl(4)[175]zahl(3)[178]zahl(5)[167]9350
9330 [137]1000
9350 dp(r)[178]za(1)[170]za(2)[170]za(3)[170]za(4)[170]za(5)
9360 [137]1000
9400 [143]*** 4er-pasch ***
9410 [139] kv(r)[178]1[167]7250
9420 kv(r)[178]1
9430 [139] za(1)[178]za(2)[175]za(1)[178]za(3)[175]za(1)[178]za(4)[167]9550
9435 [139] za(1)[178]za(2)[175]za(1)[178]za(3)[175]za(1)[178]za(5)[167]9550
9440 [139] za(1)[178]za(3)[175]za(1)[178]za(4)[175]za(1)[178]za(5)[167]9550
9445 [139] za(1)[178]za(2)[175]za(1)[178]za(4)[175]za(1)[178]za(5)[167]9550
9450 [139] za(2)[178]za(3)[175]za(2)[178]za(4)[175]za(2)[178]za(5)[167]9550
9470 [137]1000
9550 vp(r)[178]za(1)[170]za(2)[170]za(3)[170]za(4)[170]za(5)
9570 [137]1000
9600 [143]*** full-house ***
9610 [139] kf(r)[178]1[167]7250
9620 kf(r)[178]1
9630 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(3)[175]zahl(4)[178]zahl(5)[167]9750
9635 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(4)[175]zahl(3)[178]zahl(5)[167]9750
9640 [139] zahl(1)[178]zahl(2)[175]zahl(1)[178]zahl(5)[175]zahl(3)[178]zahl(4)[167]9750
9645 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(4)[175]zahl(2)[178]zahl(5)[167]9750
9650 [139] zahl(1)[178]zahl(3)[175]zahl(1)[178]zahl(5)[175]zahl(2)[178]zahl(4)[167]9750
9655 [139] zahl(1)[178]zahl(4)[175]zahl(1)[178]zahl(5)[175]zahl(2)[178]zahl(3)[167]9750
9660 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(4)[175]zahl(1)[178]zahl(5)[167]9750
9665 [139] zahl(2)[178]zahl(4)[175]zahl(2)[178]zahl(5)[175]zahl(1)[178]zahl(3)[167]9750
9670 [139] zahl(2)[178]zahl(3)[175]zahl(2)[178]zahl(5)[175]zahl(1)[178]zahl(4)[167]9750
9675 [139] zahl(3)[178]zahl(4)[175]zahl(3)[178]zahl(5)[175]zahl(1)[178]zahl(2)[167]9750
9690 [137]1000
9750 fh(r)[178]25
9790 [137]1000
9800 [143]*** kleine strasse ***
9810 [139] kk(r)[178]1[167]7250
9820 kk(r)[178]1
9829 s1[178]0:s2[178]0:s3[178]0:s4[178]0
9830 [129] dice[178]1[164]5
9835 [139] zahl(dice)[178]1[167] s1[178]1
9837 [139] zahl(dice)[178]2[167] s2[178]1
9839 [139] zahl(dice)[178]3[167] s3[178]1
9841 [139] zahl(dice)[178]4[167] s4[178]1
9843 [130] dice
9844 ka[178]0
9845 ka[178]s1[170]s2[170]s3[170]s4
9847 [139] ka[178]4[167] 9970
9849 s1[178]0:s2[178]0:s3[178]0:s4[178]0
9850 [129] dice[178]1[164]5
9853 kl(dice)[178]0
9855 [139] zahl(dice)[178]2[167] s1[178]1
9857 [139] zahl(dice)[178]3[167] s2[178]1
9859 [139] zahl(dice)[178]4[167] s3[178]1
9861 [139] zahl(dice)[178]5[167] s4[178]1
9863 [130] dice
9864 ka[178]0
9865 ka[178]s1[170]s2[170]s3[170]s4
9867 [139] ka[178]4[167] 9970
9869 s1[178]0:s2[178]0:s3[178]0:s4[178]0
9870 [129] dice[178]1[164]5
9875 [139] zahl(dice)[178]3[167] s1[178]1
9877 [139] zahl(dice)[178]4[167] s2[178]1
9879 [139] zahl(dice)[178]5[167] s3[178]1
9881 [139] zahl(dice)[178]6[167] s4[178]1
9883 [130] dice
9884 ka[178]0
9885 ka[178]s1[170]s2[170]s3[170]s4
9887 [139] ka[178]4[167] 9970
9900 [137] 1000
9970 ks(r)[178]30
9980 [137] 1000
10000 [143]*** grosse strasse ***
10010 [139] kg(r)[178]1[167]7250
10020 kg(r)[178]1
10025 s1[178]0:s2[178]0:s3[178]0:s4[178]0:s5[178]0
10030 [129] dice[178]1[164]5
10033 kl(dice)[178]0
10035 [139] zahl(dice)[178]1[167] s1[178]1
10037 [139] zahl(dice)[178]2[167] s2[178]1
10039 [139] zahl(dice)[178]3[167] s3[178]1
10041 [139] zahl(dice)[178]4[167] s4[178]1
10043 [139] zahl(dice)[178]5[167] s5[178]1
10045 [130] dice
10047 ga[178]0
10049 ga[178]s1[170]s2[170]s3[170]s4[170]s5
10051 [139] ga[178]5[167] 10170
10055 s1[178]0:s2[178]0:s3[178]0:s4[178]0:s5[178]0
10060 [129] dice[178]1[164]5
10065 [139] zahl(dice)[178]2[167] s1[178]1
10067 [139] zahl(dice)[178]3[167] s2[178]1
10069 [139] zahl(dice)[178]4[167] s3[178]1
10071 [139] zahl(dice)[178]5[167] s4[178]1
10073 [139] zahl(dice)[178]6[167] s5[178]1
10075 [130] dice
10077 ga[178]0
10079 ga[178]s1[170]s2[170]s3[170]s4[170]s5
10081 [139] ga[178]5[167] 10170
10090 [137] 1000
10170 gs(r)[178]40
10180 [137] 1000
10200 [143]*** yahtzee ***
10210 [139] ky(r)[178]1[167]11000
10220 ky(r)[178]1
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
10250 [137] 1000
10270 ya(r)[178]50
10290 [137] 1000
10400 [143]*** chance ***
10410 [139] kc(r)[178]1[167]7250
10420 kc(r)[178]1
10430 ch(r)[178]za(1)[170]za(2)[170]za(3)[170]za(4)[170]za(5)
10450 [137] 1000
11000 [143]*** mehrere kniffel ***
11010 [139] ya(r)[178]0 [167] 7250
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
11030 [137] 7250
11070 ya(r)[178]ya(r)[170]100
11100 i[178]zahl(1)
11110 [139] i[178]1 [175] k1(r)[178]1 [167] 11500
11115 [139] i[178]2 [175] k2(r)[178]1 [167] 11500
11120 [139] i[178]3 [175] k3(r)[178]1 [167] 11500
11125 [139] i[178]4 [175] k4(r)[178]1 [167] 11500
11130 [139] i[178]5 [175] k5(r)[178]1 [167] 11500
11135 [139] i[178]6 [175] k6(r)[178]1 [167] 11500
11150 [139] i[178]1[167]8000
11155 [139] i[178]2[167]8200
11160 [139] i[178]3[167]8400
11165 [139] i[178]4[167]8600
11170 [139] i[178]5[167]8800
11175 [139] i[178]6[167]9000
11500 [139] kg(r)[178]0[167]11800
11510 [139] kk(r)[178]0[167]11900
11520 [139] kf(r)[178]0[167]9600
11525 [139] kv(r)[178]0[167]9400
11530 [139] kd(r)[178]0[167]9200
11532 [139] kc(r)[178]0[167]10400
11535 [139] k1(r)[178]0[167]8000
11540 [139] k2(r)[178]0[167]8200
11545 [139] k3(r)[178]0[167]8400
11550 [139] k4(r)[178]0[167]8600
11555 [139] k5(r)[178]0[167]8800
11560 [139] k6(r)[178]0[167]9000
11800 za(1)[178]1:za(2)[178]2:za(3)[178]3:za(4)[178]4:za(5)[178]5
11810 [137] 10000
11900 za(1)[178]1:za(2)[178]2:za(3)[178]3:za(4)[178]4
11910 [137] 9800
12000 [143]***** spielstand sichern ******
12010 [159]1,8,15
12020 [152]1,"s:yahtzee-datei"
12030 [160]1
12040 [160]2:[159]2,8,3,"yahtzee-datei,s,w"
12045 r[178]r[171]1
12050 [152]2,ms
12051 [152]2,sp
12052 [152]2,r
12060 [129]dg[178]1[164]ms
12061 [152]2,na$(dg)","
12070 [152]2,ei(dg)
12071 [152]2,zw(dg)
12072 [152]2,dr(dg)
12074 [152]2,vi(dg)
12075 [152]2,fu(dg)
12076 [152]2,se(dg)
12080 [152]2,dp(dg)
12081 [152]2,vp(dg)
12082 [152]2,fh(dg)
12083 [152]2,ks(dg)
12084 [152]2,gs(dg)
12085 [152]2,ya(dg)
12086 [152]2,ch(dg)
12090 [152]2,k1(dg)
12091 [152]2,k2(dg)
12092 [152]2,k3(dg)
12093 [152]2,k4(dg)
12094 [152]2,k5(dg)
12095 [152]2,k6(dg)
12100 [152]2,kd(dg)
12101 [152]2,kv(dg)
12102 [152]2,kf(dg)
12103 [152]2,kk(dg)
12104 [152]2,kg(dg)
12105 [152]2,ky(dg)
12106 [152]2,kc(dg)
12110 [152]2,g1(dg)
12111 [152]2,g2(dg)
12112 [152]2,g3(dg)
12113 [152]2,g4(dg)
12114 [152]2,g5(dg)
12115 [152]2,g6(dg)
12130 [130] dg
12135 [160]2
12140 [138]250
13000 [143]***** spielstand laden ******
13010 [159]2,8,3,"yahtzee-datei,s,r"
13020 [159]1,8,15:[132]1,er,er$,tr,sk
13040 [139] er[178]0[167]13050
13045 [153]"loaddatei nicht gefunden !":[141]20000:[129]t[178]1[164]999:[130]t:[160]2
13046 [152]1,"s:yahtzee-datei":[160]1:[137]15000
13050 [132]2,ms
13051 [132]2,sp
13052 [132]2,r
13060 [129]dg[178]1[164]ms
13061 [132]2,na$(dg)
13070 [132]2,ei(dg)
13071 [132]2,zw(dg)
13072 [132]2,dr(dg)
13074 [132]2,vi(dg)
13075 [132]2,fu(dg)
13076 [132]2,se(dg)
13080 [132]2,dp(dg)
13081 [132]2,vp(dg)
13082 [132]2,fh(dg)
13083 [132]2,ks(dg)
13084 [132]2,gs(dg)
13085 [132]2,ya(dg)
13086 [132]2,ch(dg)
13090 [132]2,k1(dg)
13091 [132]2,k2(dg)
13092 [132]2,k3(dg)
13093 [132]2,k4(dg)
13094 [132]2,k5(dg)
13095 [132]2,k6(dg)
13100 [132]2,kd(dg)
13101 [132]2,kv(dg)
13102 [132]2,kf(dg)
13103 [132]2,kk(dg)
13104 [132]2,kg(dg)
13105 [132]2,ky(dg)
13106 [132]2,kc(dg)
13110 [132]2,g1(dg)
13111 [132]2,g2(dg)
13112 [132]2,g3(dg)
13113 [132]2,g4(dg)
13114 [132]2,g5(dg)
13115 [132]2,g6(dg)
13130 [130] dg
13140 [160]1:[160]2
13145 nn$[178]"--"
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)
13147 pz[178]pz[170]ky(ms)[170]kc(ms)[170]kf(ms):[139]pz[178]13[167]pz[178]0:[137]30100
13148 pz[178]0
13150 [137]990
14990 [143]******* menu ******
15000 [153]"load"
15010 [153]" <1> spielstand laden"
15020 [153]" <2> weiter zum programm"
15025 [153]" <3> uhrzeit eingeben"
15030 [153]" bitte waehelen sie !"
15040 [161]t$:[139]t$[178]""[167]15040
15050 [139] t$[178]"1"[167]13000
15055 [139] t$[178]"2"[167]500
15060 [139] t$[178]"3"[167]400
15070 [137]15040
20000 [143] ** sound subroutine **
20020 mp[178]54272
20030 [151] mp[170]24,15
20040 [151] mp[170]6,240
20050 [151] mp[170]4,17
20060 [129] mv[178]1 [164] 1
20070 [129] mo[178] 1 [164] 255 [169] 50
20080 [151] mp[170]1,mo
20090 [130] mo
20100 [130] mv
20110 [151] mp[170]4,32
20120 [142]
22000 [143]*** 1er eintrag ***
22002 b[178]0:c[178]0
22005 [129]l[178]1[164]ms
22010 b[178]b[170]5:[139] k1(l)[178]0[167] 22030
22015 [139] ei(l)[179]10 [167] c[178]b[170]1
22017 [139] ei(l)[177][178]10 [167] c[178]b
22019 [139] ei(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22030
22020 [153]"on";[163]c)ei(l)
22030 [130] l
22040 [142]
22200 [143]*** 2er eintrag ***
22202 b[178]0:c[178]0
22205 [129]l[178]1[164]ms
22210 b[178]b[170]5:[139] k2(l)[178]0[167] 22230
22215 [139] zw(l)[179]10 [167] c[178]b[170]1
22217 [139] zw(l)[177][178]10 [167] c[178]b
22219 [139] zw(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22230
22220 [153]"on";[163]c)zw(l)
22230 [130] l
22240 [142]
22400 [143]*** 3er eintrag ***
22402 b[178]0:c[178]0
22405 [129]l[178]1[164]ms
22410 b[178]b[170]5:[139] k3(l)[178]0[167] 22430
22415 [139] dr(l)[179]10 [167] c[178]b[170]1
22417 [139] dr(l)[177][178]10 [167] c[178]b
22419 [139] dr(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22430
22420 [153]"on";[163]c)dr(l)
22430 [130] l
22440 [142]
22600 [143]*** 4er eintrag ***
22602 b[178]0:c[178]0
22605 [129]l[178]1[164]ms
22610 b[178]b[170]5:[139] k4(l)[178]0[167] 22630
22615 [139] vi(l)[179]10 [167] c[178]b[170]1
22617 [139] vi(l)[177][178]10 [167] c[178]b
22619 [139] vi(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22630
22620 [153]"on";[163]c)vi(l)
22630 [130] l
22640 [142]
22800 [143]*** 5er eintrag ***
22802 b[178]0:c[178]0
22805 [129]l[178]1[164]ms
22810 b[178]b[170]5:[139] k5(l)[178]0[167] 22830
22815 [139] fu(l)[179]10 [167] c[178]b[170]1
22817 [139] fu(l)[177][178]10 [167] c[178]b
22819 [139] fu(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 22830
22820 [153]"on";[163]c)fu(l)
22830 [130] l
22840 [142]
23000 [143]*** 6er eintrag ***
23002 b[178]0:c[178]0
23005 [129]l[178]1[164]ms
23010 b[178]b[170]5:[139] k6(l)[178]0[167] 23030
23015 [139] se(l)[179]10 [167] c[178]b[170]1
23017 [139] se(l)[177][178]10 [167] c[178]b
23019 [139] se(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23030
23020 [153]"on";[163]c)se(l)
23030 [130] l
23040 [142]
23200 [143]*** d-p eintrag ***
23202 b[178]0:c[178]0
23205 [129]l[178]1[164]ms
23210 b[178]b[170]5:[139] kd(l)[178]0[167] 23230
23215 [139] dp(l)[179]10 [167] c[178]b[170]1
23217 [139] dp(l)[177][178]10 [167] c[178]b
23219 [139] dp(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23230
23220 [153]"on";[163]c)dp(l)
23230 [130] l
23240 [142]
23400 [143]*** v-p eintrag ***
23402 b[178]0:c[178]0
23405 [129]l[178]1[164]ms
23410 b[178]b[170]5:[139] kv(l)[178]0[167] 23430
23415 [139] vp(l)[179]10 [167] c[178]b[170]1
23417 [139] vp(l)[177][178]10 [167] c[178]b
23419 [139] vp(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23430
23420 [153]"on";[163]c)vp(l)
23430 [130] l
23440 [142]
23600 [143]*** f-h eintrag ***
23602 b[178]0:c[178]0
23605 [129]l[178]1[164]ms
23610 b[178]b[170]5:[139] kf(l)[178]0[167] 23630
23615 [139] fh(l)[178]0 [167] c[178]b[170]1
23617 [139] fh(l)[177]0 [167] c[178]b
23619 [139] fh(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23630
23620 [153]"on";[163]c)fh(l)
23630 [130] l
23640 [142]
23800 [143]*** k-s eintrag ***
23802 b[178]0:c[178]0
23805 [129]l[178]1[164]ms
23810 b[178]b[170]5:[139] kk(l)[178]0[167] 23830
23815 [139] ks(l)[178]0 [167] c[178]b[170]1
23817 [139] ks(l)[177]0 [167] c[178]b
23819 [139] ks(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 23830
23820 [153]"on";[163]c)ks(l)
23830 [130] l
23840 [142]
24000 [143]*** g-s eintrag ***
24002 b[178]0:c[178]0
24005 [129]l[178]1[164]ms
24010 b[178]b[170]5:[139] kg(l)[178]0[167] 24030
24015 [139] gs(l)[178]0 [167] c[178]b[170]1
24017 [139] gs(l)[177]0 [167] c[178]b
24019 [139] gs(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 24030
24020 [153]"on";[163]c)gs(l)
24030 [130] l
24040 [142]
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
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
24090 [130] l
24100 [137] 1000
24200 [143]*** yah eintrag ***
24202 b[178]0:c[178]0
24205 [129]l[178]1[164]ms
24210 b[178]b[170]5:[139] ky(l)[178]0[167] 24230
24215 [139] ya(l)[178]0 [167] c[178]b[170]1
24217 [139] ya(l)[177]0[175]ya(l)[179]100[167] c[178]b
24219 [139] ya(l)[177][178] 100[167] c[178]b[171]1
24220 [139] ya(l)[178]0[167] [153]"on";[163]c)nn$ :[137] 24230
24222 [153]"on";[163]c)ya(l)
24230 [130] l
24240 [142]
24400 [143]*** cha eintrag ***
24402 b[178]0:c[178]0
24405 [129]l[178]1[164]ms
24410 b[178]b[170]5:[139] kc(l)[178]0[167] 24430
24415 [139] ch(l)[179]10 [167] c[178]b[170]1
24417 [139] ch(l)[177]9 [167] c[178]b
24420 [153]"on";[163]c)ch(l)
24430 [130] l
24440 [142]
24600 [143]*** s.u eintrag ***
24602 b[178]0:c[178]0
24605 [129]l[178]1[164]ms
24610 su(l)[178]dp(l)[170]vp(l)[170]fh(l)[170]ks(l)[170]gs(l)[170]ya(l)[170]ch(l)
24615 b[178]b[170]5:[139] su(l)[179][178]0[167] 24630
24617 [139] su(l)[179]10 [167] c[178]b[170]1
24618 [139] su(l)[177][178]10[175]su(l)[179]100[167] c[178]b
24619 [139] su(l)[177][178] 100[167] c[178]b[171]1
24620 [153]"on";[163]c)su(l)
24630 [130] l
24640 [142]
24800 [143]*** ges eintrag ***
24802 b[178]0:c[178]0
24805 [129]l[178]1[164]ms
24810 ge(l)[178]og(l)[170]su(l)
24815 b[178]b[170]5:[139] ge(l)[179][178]0[167] 24830
24817 [139] ge(l)[179]10 [167] c[178]b[170]1
24818 [139] ge(l)[177][178]10[175]ge(l)[179]100[167] c[178]b
24819 [139] ge(l)[177][178] 100[167] c[178]b[171]1
24820 [153]"on";[163]c)ge(l)
24830 [130] l
24840 [142]
25000 [143]*** s.o eintrag ***
25002 b[178]0:c[178]0
25005 [129]l[178]1[164]ms
25010 so(l)[178]ei(l)[170]zw(l)[170]dr(l)[170]vi(l)[170]fu(l)[170]se(l)
25015 b[178]b[170]5:[139] so(l)[179][178]0[167] 25030
25017 [139] so(l)[179]10 [167] c[178]b[170]1
25018 [139] so(l)[177][178]10[175]so(l)[179]100[167] c[178]b
25019 [139] so(l)[177][178] 100[167] c[178]b[171]1
25020 [153]"on";[163]c)so(l)
25030 [130] l
25040 [142]
25200 [143]*** bon eintrag ***
25202 b[178]0:c[178]0
25205 [129]l[178]1[164]ms
25210 [139] so(l)[177][178]63[167]bo(l)[178]35
25215 b[178]b[170]5:[139] bo(l)[179][178]0[167] 25230
25220 [153]"on";[163]b)bo(l)
25230 [130] l
25240 [142]
25400 [143]*** o.g eintrag ***
25402 b[178]0:c[178]0
25405 [129]l[178]1[164]ms
25410 og(l)[178]so(l)[170]bo(l)
25415 b[178]b[170]5:[139] og(l)[179][178]0[167] 25430
25417 [139] og(l)[179]10 [167] c[178]b[170]1
25418 [139] og(l)[177][178]10[175]og(l)[179]100[167] c[178]b
25419 [139] og(l)[177][178] 100[167] c[178]b[171]1
25420 [153]"on";[163]c)og(l)
25430 [130] l
25440 [142]
25600 [143]*** +/- eintrag ****
25620 b[178]0:c[178]0
25630 [129] l[178]1 [164] ms
25640 [139] k1(l)[178]1[167] a1(l)[178]ei(l)[171]3
25650 [139] k2(l)[178]1[167] a2(l)[178]zw(l)[171]6
25660 [139] k3(l)[178]1[167] a3(l)[178]dr(l)[171]9
25670 [139] k4(l)[178]1[167] a4(l)[178]vi(l)[171]12
25680 [139] k5(l)[178]1[167] a5(l)[178]fu(l)[171]15
25690 [139] k6(l)[178]1[167] a6(l)[178]se(l)[171]18
25700 ab(l)[178]a1(l)[170]a2(l)[170]a3(l)[170]a4(l)[170]a5(l)[170]a6(l)
25720 b[178]b[170]5:[139] ab(l)[178]0[167] 25760
25722 [139] ab(l)[179]10 [175] ab(l)[177][171]10 [167] c[178]b[170]1
25724 [139] ab(l)[177][178]10 [176] ab(l)[179][178][171]10 [167] c[178]b
25730 [153]"on";[163]c)"sys";ab(l);""
25760 [130] l
25770 [142]
30000 [143]**** gesamttabelle ****
30005 [139] f7[178]1 [167] [137] 30100
30010 spiel[178]spiel[170]1
30070 [129] l[178]1[164]ms
30075 [139] sp[178]1[167] g1(l)[178]ge(l)
30080 [139] sp[178]2[167] g2(l)[178]ge(l)
30085 [139] sp[178]3[167] g3(l)[178]ge(l)
30089 [139] sp[178]4[167] g4(l)[178]ge(l)
30092 [139] sp[178]5[167] g5(l)[178]ge(l)
30095 [139] sp[178]6[167] g6(l)[178]ge(l)
30099 [130] l
30100 [153]"load";[163]10)name$(1);[163]17)name$(2);[163]24)name$(3);[163]31)name$(4)
30105 [153]:[153]
30110 [153]:[153]"1.spiel":[141] 30300
30115 [153]:[153]"2.spiel":[141] 30400
30130 [153]:[153]"3.spiel":[141] 30500
30140 [153]:[153]"4.spiel":[141] 30600
30150 [153]:[153]"5.spiel":[141] 30700
30160 [153]:[153]"6.spiel":[141] 30800
30170 [153]"lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen"
30180 [153]:[153]"gesamt ":[141] 30900
30200 [137] 31000
30300 b[178]0:c[178]0
30310 [129]l[178]1[164]ms
30315 [139] g1(l)[178]0[167]30390
30320 b[178]b[170]7
30330 [139]g1(l)[179] 10 [167] c[178]b[170]5
30340 [139]g1(l)[177][178]10[175]g1(l)[179]100[167] c[178]b[170]4
30350 [139]g1(l)[177][178]100[175]g1(l)[179]1000[167] c[178]b[170]3
30360 [139]g1(l)[177][178]1000[167] c[178]b[170]2
30380 [153]"on";[163]c)g1(l)
30390 [130] l
30395 [142]
30400 b[178]0:c[178]0
30410 [129]l[178]1[164]ms
30415 [139] g2(l)[178]0[167]30490
30420 b[178]b[170]7
30430 [139]g2(l)[179] 10 [167] c[178]b[170]5
30440 [139]g2(l)[177][178]10[175]g2(l)[179]100[167] c[178]b[170]4
30450 [139]g2(l)[177][178]100[175]g2(l)[179]1000[167] c[178]b[170]3
30460 [139]g2(l)[177][178]1000[167] c[178]b[170]2
30480 [153]"on";[163]c)g2(l)
30490 [130] l
30495 [142]
30500 b[178]0:c[178]0
30510 [129]l[178]1[164]ms
30515 [139] g3(l)[178]0[167]30590
30520 b[178]b[170]7
30530 [139]g3(l)[179] 10 [167] c[178]b[170]5
30540 [139]g3(l)[177][178]10[175]g3(l)[179]100[167] c[178]b[170]4
30550 [139]g3(l)[177][178]100[175]g3(l)[179]1000[167] c[178]b[170]3
30560 [139]g3(l)[177][178]1000[167] c[178]b[170]2
30580 [153]"on";[163]c)g3(l)
30590 [130] l
30595 [142]
30600 b[178]0:c[178]0
30610 [129]l[178]1[164]ms
30615 [139] g4(l)[178]0[167]30690
30620 b[178]b[170]7
30630 [139]g4(l)[179] 10 [167] c[178]b[170]5
30640 [139]g4(l)[177][178]10[175]g4(l)[179]100[167] c[178]b[170]4
30650 [139]g4(l)[177][178]100[175]g4(l)[179]1000[167] c[178]b[170]3
30660 [139]g4(l)[177][178]1000[167] c[178]b[170]2
30680 [153]"on";[163]c)g4(l)
30690 [130] l
30695 [142]
30700 b[178]0:c[178]0
30710 [129]l[178]1[164]ms
30715 [139] g5(l)[178]0[167]30790
30720 b[178]b[170]7
30730 [139]g5(l)[179] 10 [167] c[178]b[170]5
30740 [139]g5(l)[177][178]10[175]g5(l)[179]100[167] c[178]b[170]4
30750 [139]g5(l)[177][178]100[175]g5(l)[179]1000[167] c[178]b[170]3
30760 [139]g5(l)[177][178]1000[167] c[178]b[170]2
30780 [153]"on";[163]c)g5(l)
30790 [130] l
30795 [142]
30800 b[178]0:c[178]0
30810 [129]l[178]1[164]ms
30815 [139] g6(l)[178]0[167]30890
30820 b[178]b[170]7
30830 [139]g6(l)[179] 10 [167] c[178]b[170]5
30840 [139]g6(l)[177][178]10[175]g6(l)[179]100[167] c[178]b[170]4
30850 [139]g6(l)[177][178]100[175]g6(l)[179]1000[167] c[178]b[170]3
30860 [139]g6(l)[177][178]1000[167] c[178]b[170]2
30880 [153]"on";[163]c)g6(l)
30890 [130] l
30895 [142]
30900 b[178]0:c[178]0
30905 [129]l[178]1[164]ms
30910 gt(l)[178]g1(l)[170]g2(l)[170]g3(l)[170]g4(l)[170]g5(l)[170]g6(l)
30919 [139] gt(l)[178]0 [167] 30990
30920 b[178]b[170]7
30930 [139]gt(l)[179] 10 [167] c[178]b[170]5
30940 [139]gt(l)[177][178]10[175]gt(l)[179]100[167] c[178]b[170]4
30950 [139]gt(l)[177][178]100[175]gt(l)[179]1000[167] c[178]b[170]3
30960 [139]gt(l)[177][178]1000[167] c[178]b[170]2
30980 [153]"on";[163]c)gt(l)
30990 [130] l
30995 [142]
31000 [139] gt(1)[177]gt(2)[175]gt(1)[177]gt(3)[175]gt(1)[177]gt(4)[167] p[178]1
31010 [139] gt(2)[177]gt(1)[175]gt(2)[177]gt(3)[175]gt(2)[177]gt(4)[167]p[178]2
31020 [139] gt(3)[177]gt(1)[175]gt(3)[177]gt(2)[175]gt(3)[177]gt(4)[167]p[178]3
31030 [139] gt(4)[177]gt(1)[175]gt(4)[177]gt(2)[175]gt(4)[177]gt(3)[167]p[178]4
31050 [139] spiel[178]6[167]32000
31055 [153]"";[163]8)"in fuehrung liegt sys ";na$(p);" wait"
31060 ts[178]p[172]7[170]3:[158]49152,0,ts,5,20,1
31070 [139]f7[178]1[167][153]" s = spielstand sichern taste = spielon":[142]
31090 ja$[178]""
31100 [153]"";[163]8)"nochmal (j/n/a/h) <s>ave"
31105 [161] ja$:[139] ja$[178]""[167] 31105
31110 [139] ja$[178]"h"[167][158]49372:[141]35000
31120 [139] ja$[178]"a"[167][158]49372:[137]500
31122 [139] ja$[178]"n"[167][158]49372:[153]"load":[128]
31124 [139] ja$[178]"s"[167][158]49372:[137]12000
31125 [139] ja$[178]"j"[167][158]49372:[137]34000
31130 [137] 31105
32000 [153]"";[163]8)"gesamtsieger ist sys ";na$(p);" wait"
32040 ja$[178]""
32050 [153]"";[163]12)"nochmal (j/n/h)"
32052 [161] ja$:[139] ja$[178][199](32)[167] 32052
32055 [139] ja$[178]"h"[167] [141] 35500
32060 [139] ja$[178]"j"[167] 500
32065 [139] ja$[178]"n"[167] [153]"load":[128]
32070 [137] 32052
34000 [143]*** loeschen ***
34009 [129] l[178]1[164] ms
34010 ab(l)[178]0
34011 ei(l)[178]0:k1(l)[178]0
34012 zw(l)[178]0:k2(l)[178]0
34013 dr(l)[178]0:k3(l)[178]0
34014 vi(l)[178]0:k4(l)[178]0
34015 fu(l)[178]0:k5(l)[178]0
34016 se(l)[178]0:k6(l)[178]0
34017 so(l)[178]0:og(l)[178]0
34018 bo(l)[178]0
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
34020 dp(l)[178]0:kd(l)[178]0
34021 vp(l)[178]0:kv(l)[178]0
34022 fh(l)[178]0:kf(l)[178]0
34023 ks(l)[178]0:kk(l)[178]0
34024 gs(l)[178]0:kg(l)[178]0
34025 ya(l)[178]0:ky(l)[178]0
34026 ch(l)[178]0:kc(l)[178]0
34027 su(l)[178]0
34028 ge(l)[178]0
34050 [130] l
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
34060 [137] 990
35000 [143]*** hilfe ***
35010 [153]"load*** hilfe *** hilfe *** hilfe *** hilfe wait"
35020 [158]49152,0,0,40,20,1
35040 [153]"-h- ---> diesen text aufrufen"
35050 [153]"-j- ---> es wird mit den gleichen"
35060 [153]" personen weitergespielt"
35070 [153]"-n- ---> das spiel wird beendet"
35080 [153]"-a- ---> ein ganz neues spiel beginnen"
35090 [153]" ---> ihre wahl "
35092 [161] ja$:[139] ja$[178]""[167]35092
35095 [158]49372
35100 [142]
35500 [153]"load*** hilfe *** hilfe *** hilfe *** hilfe wait"
35520 [158]49152,0,0,40,20,1
35540 [153]"-h- ---> diesen text aufrufen"
35550 [153]"-j- ---> ein ganz neues spiel beginnt"
35560 [153]" die tabelle wird geloescht"
35570 [153]"-n- ---> das spiel wird beendet"
35590 [153]" ---> ihre wahl "
35595 [161] ja$:[139] ja$[178]""[167] 35595
35596 [158]49372
35600 [142]
40000 [143]* eintrag loeschen und neu vergeben *
40020 r[178]r[171]1
40025 [139] r[178]0[167]r[178]ms
40030 [139] et$[178]"1"[167] k1(r)[178]0:ei(r)[178]0:a1(r)[178]0
40040 [139] et$[178]"2"[167] k2(r)[178]0:zw(r)[178]0:a2(r)[178]0
40050 [139] et$[178]"3"[167] k3(r)[178]0:dr(r)[178]0:a3(r)[178]0
40060 [139] et$[178]"4"[167] k4(r)[178]0:vi(r)[178]0:a4(r)[178]0
40070 [139] et$[178]"5"[167] k5(r)[178]0:fu(r)[178]0:a5(r)[178]0
40080 [139] et$[178]"6"[167] k6(r)[178]0:se(r)[178]0:a6(r)[178]0
40090 [139] et$[178]"d"[167] kd(r)[178]0:dp(r)[178]0
40100 [139] et$[178]"v"[167] kv(r)[178]0:vp(r)[178]0
40110 [139] et$[178]"f"[167] kf(r)[178]0:fh(r)[178]0
40120 [139] et$[178]"k"[167] kk(r)[178]0:ks(r)[178]0
40130 [139] et$[178]"g"[167] kg(r)[178]0:gs(r)[178]0
40140 [139] et$[178]"y"[167] ky(r)[178]0:ya(r)[178]0
40150 [139] et$[178]"c"[167] kc(r)[178]0:ch(r)[178]0
40170 f5[178]1
40180 [137]990
40200 f5[178]0
40210 [141] 6300
40220 [129] dice[178]1[164]5
40230 [145] dice [141] 3510,3530,3550,3570,3590
40240 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
40250 [130] dice
40270 [137] 7000
45000 [143] uhrzeit
45020 zeit$[178]ti$
45030 st$[178][200](zeit$,2)
45032 min$(1)[178][201](zeit$,4)
45033 min$(2)[178][200](min$(1),2)
45035 sec$[178][201](zeit$,2)
45040 [153][163]27)st$;".";min$(2);".";sec$;" uhron"
45050 [142]
46000 [143] ***** bild neu *****
46010 r[178]r[171]1
46030 [137] 990
47000 [143]** wuerfel halten/neu wuerfeln
47005 [139] wurf[178]4 [167] [142]
47010 [129] bu[178]1[164]5
47015 ja$(bu)[178]"nein":jj$(bu)[178]""
47020 [130] bu
47040 bu[178]0
47045 [153]"";[163]26)wurf"cmd. wurf":[153]
47050 [153]""
47060 xy[178]25
47090 xy[178]xy[170]2
47092 [153][163]xy)"on wait"
47095 bu[178]bu[170]1
47100 [161] jj$(bu)
47105 [139] jj$(bu)[178][199](13)[167]ji$[178][199](32):[141] 20000:[141]47125
47106 [139] jj$(bu)[178][199](13)[167]47130
47107 [139] jj$(bu)[178][199](20)[167][141]20000:[137]47200
47109 [139] jj$(bu)[179]"a"[176] jj$(bu)[177]"e" [167] 47100
47110 [153][163]xy)"on";jj$(bu):[141]20000
47112 [139] jj$(bu)[178]"a"[167] ja$(1)[178]"ja":[141]3510:dice[178]1
47113 [139] jj$(bu)[178]"b"[167] ja$(2)[178]"ja":[141]3530:dice[178]2
47114 [139] jj$(bu)[178]"c"[167] ja$(3)[178]"ja":[141]3550:dice[178]3
47115 [139] jj$(bu)[178]"d"[167] ja$(4)[178]"ja":[141]3570:dice[178]4
47116 [139] jj$(bu)[178]"e"[167] ja$(5)[178]"ja":[141]3590:dice[178]5
47117 [145] zahl(dice)[141]5010,5030,5050,5070,5090,5110
47118 [153]""
47119 [139] bu[178]5 [167] 47130
47120 [137] 47090
47125 [153][163]xy)"on";ji$:[142]
47130 [153]""
47140 [153][163]27)"richtig ?"
47150 [161] ri$:[139] ri$[178]""[167]47150
47155 [141] 20000
47160 [139] ri$[178]"j"[176]ri$[178][199](13)[167] [141] 47400:[142]
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
47167 [139] ri$[179][177]"n"[167] 47150
47170 [141] 47300:[143] zeilen loeschen
47180 [137] 47000
47200 [139] bu[178]1[167] [137]47100
47205 [153][163]xy)"on";[199](32)
47210 bu[178]bu[171]1
47221 [139] jj$(bu)[178]"a"[167] ja$(1)[178]"nein":[141]3510:dice[178]1
47222 [139] jj$(bu)[178]"b"[167] ja$(2)[178]"nein":[141]3530:dice[178]2
47223 [139] jj$(bu)[178]"c"[167] ja$(3)[178]"nein":[141]3550:dice[178]3
47224 [139] jj$(bu)[178]"d"[167] ja$(4)[178]"nein":[141]3570:dice[178]4
47225 [139] jj$(bu)[178]"e"[167] ja$(5)[178]"nein":[141]3590:dice[178]5
47226 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
47227 [153]""
47228 jj$(bu)[178]""
47230 xy[178]xy[171]2
47240 bu[178]bu[171]1:[137] 47092
47300 [143]*** zeilen fuer eingabe wurf loeschen ****
47310 [153]""
47320 [129] lo[178]1[164] 8
47330 [153][163]25)" "
47340 [130] lo
47343 [129] dice[178]1[164]5
47344 [145] dice [141] 3510,3530,3550,3570,3590
47345 [145] zahl(dice)[141]4515,4535,4555,4575,4595,4615
47347 [130] dice
47350 [142]
47400 [143]*** zeilen fuer eingabe wurf loeschen ****
47410 [153]""
47420 [129] lo[178]1[164] 8
47430 [153][163]27)" "
47440 [130] lo
47450 [142]
48000 [143]*** tabelle zwischendurch ***
48010 f7[178]1
48015 [153]"load"
48020 [141] 30000
48030 [161] t$:[139] t$[178]""[167]48030
48032 [158]49372
48035 [139] t$[178]"s"[167]12000
48040 f7[178]0
48050 [137] 46000
50000 [143]**** zeilen loeschen ****
50005 [153]""
50010 [129] lo[178]1 [164] 23
50020 [153][163]26)" "
50030 [130] lo
50040 [142]
59000 [143]*** laufschrift ***
59100 [129]i[178]49152[164]49384
59110 [135]a:[151]i,a:s[178]s[170]a
59120 [130] i
59130 [139]s[179][177]32199[167][153]:[153]"data-fehler!!"
59135 [142]
59140 [131] 120,32,253,174,32,158,183,224,25,176
59150 [131] 127,142,232,7,32,253,174,32,158,183
59160 [131] 224,40,176,114,142,233,7,32,253,174
59170 [131] 32,158,183,138,240,102,24,109,233,7
59180 [131] 201,41,176,94,202,142,234,7,32,253
59190 [131] 174,32,158,183,142,235,7,142,236,7
59200 [131] 169,0,133,247,169,4,133,248,174,232
59210 [131] 7,240,14,24,165,247,105,40,133,247
59220 [131] 144,2,230,248,202,208,242,24,165,247
59230 [131] 109,233,7,133,247,144,2,230,248,32
59240 [131] 253,174,32,158,183,224,2,176,29,224
59250 [131] 0,208,13,169,141,141,20,3,169,192
59260 [131] 141,21,3,76,136,192,169,178,141,20
59270 [131] 3,169,192,141,21,3,88,96,76,72
59280 [131] 178,206,236,7,173,236,7,208,26,173
59290 [131] 235,7,141,236,7,172,234,7,240,15
59300 [131] 177,247,72,136,177,247,200,145,247,136
59310 [131] 208,247,104,145,247,76,49,234,206,236
59320 [131] 7,173,236,7,208,245,173,235,7,141
59330 [131] 236,7,160,0,204,234,7,240,232,177
59340 [131] 247,72,200,177,247,136,145,247,200,204
59350 [131] 234,7,208,244,104,145,247,76,49,234
59360 [131] 120,169,49,141,20,3,169,234,141,21
59380 [131] 3,88,96
60000 [143]*** zu bild 1 ***
60005 [153]:[153]
60020 [153][163]5)"d":[141]20000
60030 [153][163]7)"oni":[141]20000
60040 [153][163]9)"onr":[141]20000
60050 [153][163]11)"onk":[141]20000
60060 [153][163]17)"onu":[141]20000
60070 [153][163]19)"one":[141]20000
60073 [153][163]21)"onk":[141]20000
60076 [153][163]23)"one":[141]20000
60080 [153][163]25)"onr":[141]20000
60090 [153][163]27)"onm":[141]20000
60100 [153][163]29)"ona":[141]20000
60110 [153][163]31)"onn":[141]20000
60120 [153][163]33)"onn":[141]20000
60180 [142]