GETALSTELSELS

FILE INFORMATION

FILENAME(S): GETALSTELSELS

FILE TYPE(S): PRG

FILE SIZE: 1K

FIRST SEEN: 2025-11-30 21:28:18

APPEARS ON: 1 disk(s)

FILE HASH

ffde141f8ebd01e214b4ffcb954de8fa461eefb5e1c7727974eb29355270a149

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
RON 64 A	GETALSTELSELS	PRG	DuncanTwain	6	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 2B 08 50 C3 4B 4E  24 B2 22 44 49 54 20 47  |..+.P.KN$."DIT G|
00000010: 52 4F 4E 44 47 45 54 41  4C 20 4B 41 4E 20 49 4B  |RONDGETAL KAN IK|
00000020: 20 4E 49 45 54 20 41 41  4E 21 22 00 5C 08 5A C3  | NIET AAN!".\.Z.|
00000030: 99 22 93 1D 11 44 49 54  20 50 52 4F 47 52 41 4D  |."...DIT PROGRAM|
00000040: 4D 41 20 4B 41 4E 20 47  45 54 41 4C 4C 45 4E 20  |MA KAN GETALLEN |
00000050: 56 41 4E 20 48 45 54 20  45 4E 45 22 00 8B 08 64  |VAN HET ENE"...d|
00000060: C3 99 22 1D 4E 41 41 52  20 48 45 54 20 41 4E 44  |..".NAAR HET AND|
00000070: 45 52 45 20 47 45 54 41  4C 53 54 45 4C 53 45 4C  |ERE GETALSTELSEL|
00000080: 20 4F 4D 5A 45 54 54 45  4E 2E 22 00 B9 08 69 C3  | OMZETTEN."...i.|
00000090: 99 22 1D 42 49 4A 20 47  45 54 41 4C 4C 45 4E 20  |.".BIJ GETALLEN |
000000A0: 47 52 4F 54 45 52 20 44  41 4E 20 39 2C 39 39 39  |GROTER DAN 9,999|
000000B0: 2C 39 39 39 2C 39 39 39  22 00 E2 08 6A C3 99 22  |,999,999"...j.."|
000000C0: 1D 49 53 20 44 45 20 4F  4D 5A 45 54 54 49 4E 47  |.IS DE OMZETTING|
000000D0: 20 4E 49 45 54 20 45 58  41 43 54 20 4D 45 45 52  | NIET EXACT MEER|
000000E0: 21 22 00 27 09 6B C3 99  22 1D 56 4F 45 52 20 42  |!".'.k..".VOER B|
000000F0: 49 4A 20 47 45 54 41 4C  49 4E 56 4F 45 52 20 49  |IJ GETALINVOER I|
00000100: 4E 3A 22 C7 28 31 33 29  22 1D 1D 1D 2B 20 4F 4D  |N:".(13)"...+ OM|
00000110: 20 44 45 20 47 52 4F 4E  44 47 45 54 41 4C 4C 45  | DE GRONDGETALLE|
00000120: 4E 20 54 45 20 22 3B 00  5F 09 6C C3 99 22 56 45  |N TE ";._.l.."VE|
00000130: 52 57 49 53 53 45 4C 45  4E 22 C7 28 31 33 29 22  |RWISSELEN".(13)"|
00000140: 1D 1D 1D 2D 20 56 4F 4F  52 20 41 4E 44 45 52 45  |...- VOOR ANDERE|
00000150: 20 47 52 4F 4E 44 47 45  54 41 4C 4C 45 4E 22 00  | GRONDGETALLEN".|
00000160: 79 09 6D C3 99 22 1D 1D  1D 5C 20 4F 4D 20 54 45  |y.m.."...\ OM TE|
00000170: 20 53 54 4F 50 50 45 4E  22 00 B0 09 6E C3 85 22  | STOPPEN"...n.."|
00000180: 11 56 41 4E 20 57 45 4C  4B 20 47 52 4F 4E 44 47  |.VAN WELK GRONDG|
00000190: 45 54 41 4C 22 3B 47 31  3A 8B 47 31 B3 31 B0 47  |ETAL";G1:.G1.1.G|
000001A0: 31 B1 33 36 A7 99 4B 4E  24 3A 89 35 30 30 33 30  |1.36..KN$:.50030|
000001B0: 00 E7 09 78 C3 85 22 4E  41 41 52 20 57 45 4C 4B  |...x.."NAAR WELK|
000001C0: 20 47 52 4F 4E 44 47 45  54 41 4C 22 3B 47 32 3A  | GRONDGETAL";G2:|
000001D0: 8B 47 32 B3 31 B0 47 32  B1 33 36 A7 99 4B 4E 24  |.G2.1.G2.36..KN$|
000001E0: 3A 89 35 30 30 34 30 00  0B 0A 82 C3 85 22 11 47  |:.50040......".G|
000001F0: 45 54 41 4C 22 3B 54 24  3A 4C B2 C3 28 54 24 29  |ETAL";T$:L..(T$)|
00000200: 3A 8B 4C B2 30 A7 35 30  30 35 30 00 2E 0A 84 C3  |:.L.0.50050.....|
00000210: 8B 54 24 B2 22 2B 22 A7  56 B2 47 31 3A 47 31 B2  |.T$."+".V.G1:G1.|
00000220: 47 32 3A 47 32 B2 56 3A  89 35 30 30 35 30 00 3C  |G2:G2.V:.50050.<|
00000230: 0A 85 C3 8B 54 24 B2 22  5C 22 A7 80 00 4E 0A 86  |....T$."\"...N..|
00000240: C3 8B 54 24 B2 22 2D 22  A7 35 30 30 33 30 00 71  |..T$."-".50030.q|
00000250: 0A 8B C3 8F 20 45 45 52  53 54 20 4E 41 41 52 20  |.... EERST NAAR |
00000260: 31 30 2D 54 41 4C 4C 49  47 20 53 54 45 4C 53 45  |10-TALLIG STELSE|
00000270: 4C 00 9D 0A 8C C3 81 58  B2 31 A4 4C 3A 56 B2 C6  |L......X.1.L:V..|
00000280: 28 CA 28 54 24 2C 4C AB  58 AA 31 2C 31 29 29 AB  |(.(T$,L.X.1,1)).|
00000290: 34 38 3A 8B 56 B1 39 A7  56 B2 56 AB 37 00 E1 0A  |48:.V.9.V.V.7...|
000002A0: 96 C3 8B 56 B3 30 B0 56  B1 B2 47 31 A7 99 22 4B  |...V.0.V..G1.."K|
000002B0: 41 4E 20 4E 49 45 54 20  49 4E 20 48 45 54 22 47  |AN NIET IN HET"G|
000002C0: 31 22 9D 2D 54 41 4C 4C  49 47 20 53 54 45 4C 53  |1".-TALLIG STELS|
000002D0: 45 4C 21 22 3A 58 B2 4C  3A 82 3A 89 35 30 30 35  |EL!":X.L:.:.5005|
000002E0: 30 00 F6 0A A0 C3 44 B2  44 AA 56 AC 47 31 AE 28  |0.....D.D.V.G1.(|
000002F0: 58 AB 31 29 3A 82 00 19  0B A8 C3 8F 20 4E 55 20  |X.1):....... NU |
00000300: 4E 41 41 52 20 48 45 54  20 42 45 44 4F 45 4C 44  |NAAR HET BEDOELD|
00000310: 45 20 53 54 45 4C 53 45  4C 00 3D 0B A9 C3 8B 47  |E STELSEL.=....G|
00000320: 32 B2 31 A7 81 58 B2 31  A4 44 3A 47 24 B2 47 24  |2.1..X.1.D:G$.G$|
00000330: AA 22 30 22 3A 82 3A 89  35 30 31 35 30 00 4F 0B  |."0":.:.50150.O.|
00000340: AA C3 8B 47 31 B2 31 A7  44 B2 C3 28 54 24 29 00  |...G1.1.D..(T$).|
00000350: 63 0B AB C3 43 B2 B5 28  BC 28 44 29 AD BC 28 47  |c...C..(.(D)..(G|
00000360: 32 29 29 00 71 0B B4 C3  81 58 B2 43 A4 30 A9 AB  |2)).q....X.C.0..|
00000370: 31 00 B3 0B BE C3 51 B2  B5 28 44 AD 28 47 32 AE  |1.....Q..(D.(G2.|
00000380: 58 29 AA 31 45 AB 38 29  3A 56 B2 51 3A 8B 56 B3  |X).1E.8):V.Q:.V.|
00000390: 31 A7 51 B2 30 3A 56 B2  30 3A 8F 20 2A 2A 20 41  |1.Q.0:V.0:. ** A|
000003A0: 46 52 4F 4E 44 49 4E 47  53 46 4F 55 54 45 4E 21  |FRONDINGSFOUTEN!|
000003B0: 20 2A 2A 00 CA 0B C8 C3  8B 56 B1 39 A7 56 B2 56  | **......V.9.V.V|
000003C0: AA 35 35 3A 89 35 30 31  34 30 00 D5 0B D2 C3 56  |.55:.50140.....V|
000003D0: B2 56 AA 34 38 00 F7 0B  DC C3 47 24 B2 47 24 AA  |.V.48.....G$.G$.|
000003E0: C7 28 56 29 3A 44 B2 44  AB B5 28 51 AC 47 32 AE  |.(V):D.D..(Q.G2.|
000003F0: 58 AA 2E 31 29 3A 82 00  17 0C E6 C3 99 22 11 9F  |X..1):......."..|
00000400: 22 47 24 22 9A 22 3A 47  24 B2 22 22 3A 44 B2 30  |"G$".":G$."":D.0|
00000410: 3A 89 35 30 30 35 30 00  00 00                    |:.50050...      |

..+.PCKN$."DIT GRONDGETAL KAN IK NIET AA
N!".\.ZC."...DIT PROGRAMMA KAN GETALLEN 
VAN HET ENE"...DC.".NAAR HET ANDERE GETA
LSTELSEL OMZETTEN."...IC.".BIJ GETALLEN 
GROTER DAN 9,999,999,999"...JC.".IS DE O
MZETTING NIET EXACT MEER!".'.KC.".VOER B
IJ GETALINVOER IN:"G(13)"...+ OM DE GRON
DGETALLEN TE ";._.LC."VERWISSELEN"G(13)"
...- VOOR ANDERE GRONDGETALLEN".Y.MC."..
.\ OM TE STOPPEN"...NC.".VAN WELK GRONDG
ETAL";G1:.G1.1.G1.36..KN$:.50030...XC."N
AAR WELK GRONDGETAL";G2:.G2.1.G2.36..KN$
:.50040....C.".GETAL";T$:L.C(T$):.L.0.50
050....C.T$."+".V.G1:G1.G2:G2.V:.50050.<
..C.T$."\"...N..C.T$."-".50030.Q..C. EER
ST NAAR 10-TALLIG STELSEL....C.X.1.L:V.F
(J(T$,L.X.1,1)).48:.V.9.V.V.7....C.V.0.V
..G1.."KAN NIET IN HET"G1".-TALLIG STELS
EL!":X.L:.:.50050... CD.D.V.G1.(X.1):...
..C. NU NAAR HET BEDOELDE STELSEL.=..C.G
2.1..X.1.D:G$.G$."0":.:.50150.O..C.G1.1.
D.C(T$).C..CC..(.(D)..(G2)).Q..C.X.C.0..
1....CQ..(D.(G2.X).1E.8):V.Q:.V.1.Q.0:V.
0:. ** AFRONDINGSFOUTEN! **.J.HC.V.9.V.V
.55:.50140.U.RCV.V.48....CG$.G$.G(V):D.D
..(Q.G2.X..1):.....C.".."G$".":G$."":D.0
:.50050...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL