DOBBEL-6

FILE INFORMATION

FILENAME(S): DOBBEL-6

FILE TYPE(S): PRG

FILE SIZE: 1.4K

FIRST SEEN: 2025-11-30 21:06:41

APPEARS ON: 1 disk(s)

FILE HASH

ace5438b4c1c90957ee9330254a4cbb7af4837de2b9185e8227283b4bc3edb2e

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
STR I BASIC	DOBBEL-6	PRG	DuncanTwain	24	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1A 08 E8 03 8F 20  2A 2A 2A 2A 20 44 4F 42  |....... **** DOB|
00000010: 42 45 4C 45 4E 20 2A 2A  2A 2A 00 20 08 F2 03 27  |BELEN ****. ...'|
00000020: 00 2C 08 FC 03 99 C7 28  31 34 37 29 00 32 08 24  |.,.....(147).2.$|
00000030: 04 3A 00 42 08 4C 04 8F  27 4B 4F 50 20 4D 41 4B  |.:.B.L..'KOP MAK|
00000040: 45 4E 00 58 08 56 04 56  45 4C 44 24 B2 22 3C 20  |EN.X.V.VELD$."< |
00000050: 20 20 20 20 20 20 3C 22  00 6B 08 60 04 99 20 22  |      <".k.`.. "|
00000060: 52 4F 4E 44 45 20 20 5C  5C 22 3B 00 83 08 6A 04  |RONDE  \\";...j.|
00000070: 99 20 22 41 41 4E 54 41  4C 20 4B 45 45 52 20 5C  |. "AANTAL KEER \|
00000080: 5C 22 3B 00 8F 08 74 04  8C 20 32 35 30 30 30 00  |\";...t.. 25000.|
00000090: 9D 08 7E 04 81 20 49 B2  31 20 A4 20 36 00 AA 08  |..~.. I.1 . 6...|
000000A0: 88 04 87 20 54 45 4B 53  54 24 00 C2 08 92 04 99  |... TEKST$......|
000000B0: 20 55 BF 47 20 56 45 4C  44 24 3B 54 45 4B 53 54  | U.G VELD$;TEKST|
000000C0: 24 3B 00 CA 08 9C 04 82  20 49 00 D0 08 A6 04 99  |$;...... I......|
000000D0: 00 E9 08 B0 04 99 20 53  54 52 49 4E 47 24 28 37  |...... STRING$(7|
000000E0: 39 2C C6 28 22 3D 22 29  29 00 0E 09 BA 04 4C 4F  |9,.("=")).....LO|
000000F0: 43 41 54 45 20 32 32 2C  31 3A 99 20 53 54 52 49  |CATE 22,1:. STRI|
00000100: 4E 47 24 28 37 39 2C C6  28 22 3D 22 29 29 00 14  |NG$(79,.("="))..|
00000110: 09 C4 04 27 00 43 09 14  05 27 86 45 4E 53 49 91  |...'.C...'.ENSI.|
00000120: 45 52 45 4E 20 45 4E 20  56 41 52 49 41 42 45 C3  |EREN EN VARIABE.|
00000130: 20 42 45 47 49 4E 57 41  41 52 44 45 4E 20 47 45  | BEGINWAARDEN GE|
00000140: 56 45 4E 00 49 09 1E 05  27 00 62 09 28 05 86 20  |VEN.I...'.b.(.. |
00000150: 4F 47 45 4E 28 36 29 2C  4F 47 45 4E 54 41 4C 28  |OGEN(6),OGENTAL(|
00000160: 36 29 00 70 09 32 05 81  20 49 B2 31 20 A4 20 36  |6).p.2.. I.1 . 6|
00000170: 00 81 09 3C 05 4F 47 45  4E 54 41 4C 28 49 29 B2  |...<.OGENTAL(I).|
00000180: 30 00 89 09 46 05 82 20  49 00 92 09 50 05 56 45  |0...F.. I...P.VE|
00000190: B2 35 00 9D 09 5A 05 52  91 44 45 B2 30 00 B3 09  |.5...Z.R.DE.0...|
000001A0: 64 05 56 45 4C 44 24 B2  22 23 23 23 23 23 23 2E  |d.VELD$."######.|
000001B0: 23 23 22 00 B9 09 6E 05  27 00 CA 09 78 05 27 45  |##"...n.'...x.'E|
000001C0: 45 52 53 54 45 20 52 91  44 45 00 D0 09 82 05 27  |ERSTE R.DE.....'|
000001D0: 00 EF 09 8C 05 8D 20 32  30 30 30 3A 27 BD 45 52  |...... 2000:'.ER|
000001E0: 49 4D 45 4E 54 20 55 49  54 56 4F 45 52 45 4E 00  |IMENT UITVOEREN.|
000001F0: 1D 0A 96 05 8D 20 33 30  30 30 3A 27 52 45 53 55  |..... 3000:'RESU|
00000200: 4C 54 41 54 45 4E 20 42  45 52 45 4B 45 4E 45 4E  |LTATEN BEREKENEN|
00000210: 20 45 4E 20 41 46 44 52  55 4B 4B 45 4E 00 23 0A  | EN AFDRUKKEN.#.|
00000220: A0 05 27 00 4D 0A AA 05  4C 4F 43 41 54 45 20 32  |..'.M...LOCATE 2|
00000230: 33 2C 31 3A 99 20 53 50  41 43 45 24 28 37 38 29  |3,1:. SPACE$(78)|
00000240: 3B 3A 4C 4F 43 41 54 45  20 32 33 2C 31 00 6B 0A  |;:LOCATE 23,1.k.|
00000250: B4 05 85 20 22 4E 4F 47  20 45 45 4E 53 20 3C 4A  |... "NOG EENS <J|
00000260: 2F 4E 3E 20 22 3B 41 4E  54 57 24 00 97 0A BE 05  |/N> ";ANTW$.....|
00000270: 50 B2 49 4E 53 54 52 28  22 4A 4A 4E 4E 22 2C C8  |P.INSTR("JJNN",.|
00000280: 28 41 4E 54 57 24 2C 31  29 29 3A 8B 20 50 B2 30  |(ANTW$,1)):. P.0|
00000290: 20 A7 20 31 34 35 30 00  9D 0A C8 05 27 00 AB 0A  | . 1450.....'...|
000002A0: DC 05 57 48 49 4C 45 20  50 B3 33 00 C0 0A E6 05  |..WHILE P.3.....|
000002B0: 8D 20 32 30 30 30 3A 27  BD 45 52 49 4D 45 4E 54  |. 2000:'.ERIMENT|
000002C0: 00 EE 0A F0 05 8D 20 33  30 30 30 3A 27 52 45 53  |...... 3000:'RES|
000002D0: 55 4C 54 41 54 45 4E 20  42 45 52 45 4B 45 4E 45  |ULTATEN BEREKENE|
000002E0: 4E 20 45 4E 20 41 46 44  52 55 4B 4B 45 4E 00 18  |N EN AFDRUKKEN..|
000002F0: 0B FA 05 4C 4F 43 41 54  45 20 32 33 2C 31 3A 99  |...LOCATE 23,1:.|
00000300: 20 53 50 41 43 45 24 28  37 38 29 3B 3A 4C 4F 43  | SPACE$(78);:LOC|
00000310: 41 54 45 20 32 33 2C 31  00 36 0B 04 06 85 20 22  |ATE 23,1.6.... "|
00000320: 4E 4F 47 20 45 45 4E 53  20 3C 4A 2F 4E 3E 20 22  |NOG EENS <J/N> "|
00000330: 3B 41 4E 54 57 24 00 62  0B 0E 06 50 B2 49 4E 53  |;ANTW$.b...P.INS|
00000340: 54 52 28 22 4A 4A 4E 4E  22 2C C8 28 41 4E 54 57  |TR("JJNN",.(ANTW|
00000350: 24 2C 31 29 29 3A 8B 20  50 B2 30 20 A7 20 31 35  |$,1)):. P.0 . 15|
00000360: 33 30 00 69 0B 36 06 57  80 00 6F 0B CF 07 80 00  |30.i.6.W..o.....|
00000370: 8A 0B D0 07 8F 20 2A 2A  2A 2A 20 45 58 50 45 52  |..... **** EXPER|
00000380: 49 4D 45 4E 54 20 2A 2A  2A 2A 00 90 0B DA 07 27  |IMENT ****.....'|
00000390: 00 9E 0B E4 07 81 20 49  B2 31 20 A4 20 36 00 AC  |...... I.1 . 6..|
000003A0: 0B EE 07 4F 47 45 4E 28  49 29 B2 30 00 B4 0B F8  |...OGEN(I).0....|
000003B0: 07 82 20 49 00 C9 0B 02  08 81 20 54 45 4C 4C 45  |.. I...... TELLE|
000003C0: 52 B2 31 20 A4 20 31 30  30 00 DD 0B 0C 08 57 B0  |R.1 . 100.....W.|
000003D0: 50 B2 B5 28 36 AC BB 28  31 29 29 AA 31 00 F7 0B  |P..(6..(1)).1...|
000003E0: 16 08 4F 47 45 4E 28 57  B0 50 29 B2 4F 47 45 4E  |..OGEN(W.P).OGEN|
000003F0: 28 57 B0 50 29 AA 31 00  04 0C 20 08 82 20 54 45  |(W.P).1... .. TE|
00000400: 4C 4C 45 52 00 0A 0C 2A  08 8E 00 3C 0C B8 0B 8F  |LLER...*...<....|
00000410: 20 2A 2A 2A 2A 20 52 45  53 55 4C 54 41 54 45 4E  | **** RESULTATEN|
00000420: 20 42 45 52 45 4B 45 4E  45 4E 20 45 4E 20 41 46  | BEREKENEN EN AF|
00000430: 44 52 55 4B 4B 45 4E 20  2A 2A 2A 2A 00 42 0C C2  |DRUKKEN ****.B..|
00000440: 0B 27 00 5D 0C CC 0B 56  45 B2 56 45 AA 31 3A 8B  |.'.]...VE.VE.1:.|
00000450: 20 56 45 B2 32 31 20 A7  20 56 45 B2 36 00 7D 0C  | VE.21 . VE.6.}.|
00000460: D1 0B 4C 4F 43 41 54 45  20 56 45 AA 31 2C 31 3A  |..LOCATE VE.1,1:|
00000470: 99 20 53 50 41 43 45 24  28 37 38 29 3B 00 8D 0C  |. SPACE$(78);...|
00000480: D6 0B 4C 4F 43 41 54 45  20 56 45 2C 31 00 B1 0C  |..LOCATE VE,1...|
00000490: E0 0B 52 91 44 45 B2 52  91 44 45 AA 31 3A A4 54  |..R.DE.R.DE.1:.T|
000004A0: 41 41 4C 57 B0 50 45 4E  B2 52 91 44 45 AC 31 30  |AALW.PEN.R.DE.10|
000004B0: 30 00 CB 0C EA 0B 99 20  55 BF 47 20 22 23 23 23  |0...... U.G "###|
000004C0: 23 23 23 23 22 3B 52 91  44 45 3B 00 F0 0C F4 0B  |####";R.DE;.....|
000004D0: 99 20 55 BF 47 20 22 23  23 23 23 23 23 23 23 23  |. U.G "#########|
000004E0: 23 23 23 22 3B A4 54 41  41 4C 57 B0 50 45 4E 3B  |###";.TAALW.PEN;|
000004F0: 00 FE 0C FE 0B 81 20 49  B2 31 20 A4 20 36 00 20  |...... I.1 . 6. |
00000500: 0D 08 0C 4F 47 45 4E 54  41 4C 28 49 29 B2 4F 47  |...OGENTAL(I).OG|
00000510: 45 4E 54 41 4C 28 49 29  AA 4F 47 45 4E 28 49 29  |ENTAL(I).OGEN(I)|
00000520: 00 42 0D 12 0C 50 45 52  43 45 4E 54 B2 4F 47 45  |.B...PERCENT.OGE|
00000530: 4E 54 41 4C 28 49 29 AD  A4 54 41 41 4C 57 B0 50  |NTAL(I)..TAALW.P|
00000540: 45 4E 00 5B 0D 1C 0C 99  20 55 BF 47 20 56 45 4C  |EN.[.... U.G VEL|
00000550: 44 24 3B 50 45 52 43 45  4E 54 3B 00 63 0D 26 0C  |D$;PERCENT;.c.&.|
00000560: 82 20 49 00 69 0D 76 0C  8E 00 7E 0D A8 61 8F 20  |. I.i.v...~..a. |
00000570: 2A 2A 2A 2A 20 44 41 54  41 20 2A 2A 2A 2A 00 BA  |**** DATA ****..|
00000580: 0D B2 61 83 20 22 20 45  45 4E 20 5C 22 2C 22 54  |..a. " EEN \","T|
00000590: 57 45 45 20 5C 22 2C 22  44 52 49 45 20 5C 22 2C  |WEE \","DRIE \",|
000005A0: 22 56 49 45 52 20 5C 22  2C 22 56 49 4A 46 20 5C  |"VIER \","VIJF \|
000005B0: 22 2C 22 20 5A 45 53 20  5C 22 00 00 00           |"," ZES \"...   |

....... **** DOBBELEN ****. ...'.,....G(
147).2.$.:.B.L..'KOP MAKEN.X.V.VELD$."< 
      <".K.`.. "RONDE  \\";...J.. "AANTA
L KEER \\";...T.. 25000...~.. I.1 . 6...
... TEKST$.B.... U.G VELD$;TEKST$;.J....
 I.P.......... STRING$(79,F("=")).....LO
CATE 22,1:. STRING$(79,F("="))...D.'.C..
.'.ENSI.EREN EN VARIABEC BEGINWAARDEN GE
VEN.I...'.B.(.. OGEN(6),OGENTAL(6).P.2..
 I.1 . 6...<.OGENTAL(I).0...F.. I...P.VE
.5...Z.R.DE.0...D.VELD$."######.##"...N.
'.J.X.'EERSTE R.DE.P...'...... 2000:'.ER
IMENT UITVOEREN...... 3000:'RESULTATEN B
EREKENEN EN AFDRUKKEN.#. .'.M...LOCATE 2
3,1:. SPACE$(78);:LOCATE 23,1.K.... "NOG
 EENS <J/N> ";ANTW$.....P.INSTR("JJNN",H
(ANTW$,1)):. P.0 . 1450...H.'.....WHILE 
P.3...... 2000:'.ERIMENT...... 3000:'RES
ULTATEN BEREKENEN EN AFDRUKKEN.....LOCAT
E 23,1:. SPACE$(78);:LOCATE 23,1.6.... "
NOG EENS <J/N> ";ANTW$.B...P.INSTR("JJNN
",H(ANTW$,1)):. P.0 . 1530.I.6.W..O.O...
..P.. **** EXPERIMENT ****...Z.'...... I
.1 . 6.....OGEN(I).0...... I.I.... TELLE
R.1 . 100.....W.P..(6..(1)).1.....OGEN(W
.P).OGEN(W.P).1... .. TELLER...*...<....
 **** RESULTATEN BEREKENEN EN AFDRUKKEN 
****.B.B.'.].L.VE.VE.1:. VE.21 . VE.6.}.
Q.LOCATE VE.1,1:. SPACE$(78);...V.LOCATE
 VE,1.....R.DE.R.DE.1:.TAALW.PEN.R.DE.10
0.K.... U.G "#######";R.DE;...... U.G "#
###########";.TAALW.PEN;...... I.1 . 6. 
...OGENTAL(I).OGENTAL(I).OGEN(I).B...PER
CENT.OGENTAL(I)..TAALW.PEN.[.... U.G VEL
D$;PERCENT;.C.&.. I.I.V...~..A. **** DAT
A ****....A. " EEN \","TWEE \","DRIE \",
"VIER \","VIJF \"," ZES \"...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL