GETALUITSPRAAK
FILE INFORMATION
FILENAME(S): GETALUITSPRAAK
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-30 21:07:03
APPEARS ON: 2 disk(s)
FILE HASH
73641830cbf5d3adc926af13c146a546f2aab159eaf1769455acf45881497d16
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITY PET 04 | GETALUITSPRAAK | PRG | DuncanTwain | 21 | 9 | DOWNLOAD FILE |
| INFORMATIEF | GETALUITSPRAAK | PRG | DuncanTwain | 21 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0F 04 64 00 8D 31 32 30 3A 89 31 34 30 00 |....d..120:.140.|
00000010: 24 04 6E 00 8F 23 23 43 4C 45 41 52 53 43 52 45 |$.n..##CLEARSCRE|
00000020: 45 4E 23 23 00 2F 04 78 00 99 22 93 22 3A 8E 00 |EN##./.x..".":..|
00000030: 3E 04 82 00 8F 2A 2A 54 45 4B 53 54 2A 2A 00 69 |>....**TEKST**.i|
00000040: 04 8C 00 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...."***********|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 94 04 96 00 99 22 |********"......"|
00000070: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000090: 20 20 2A 22 00 BF 04 A0 00 99 22 2A 20 47 45 54 | *"......"* GET|
000000A0: 41 4C 4C 45 4E 20 56 41 4E 20 43 49 4A 46 45 52 |ALLEN VAN CIJFER|
000000B0: 53 20 4E 41 41 52 20 54 45 4B 53 54 20 2A 22 00 |S NAAR TEKST *".|
000000C0: EA 04 AA 00 99 22 2A 20 4F 56 45 52 47 45 4E 4F |....."* OVERGENO|
000000D0: 4D 45 4E 20 55 49 54 20 52 45 4D 41 52 4B 53 20 |MEN UIT REMARKS |
000000E0: 31 35 20 20 20 20 20 20 2A 22 00 15 05 B4 00 99 |15 *"......|
000000F0: 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |"* |
00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000110: 20 20 20 2A 22 00 40 05 BE 00 99 22 2A 20 4F 4E | *".@...."* ON|
00000120: 54 57 45 52 50 20 49 2E 47 41 55 56 41 4E 20 20 |TWERP I.GAUVAN |
00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A 22 | *"|
00000140: 00 6B 05 C8 00 99 22 2A 20 42 41 53 49 43 4F 44 |.k...."* BASICOD|
00000150: 45 20 4D 2E 52 45 49 4E 44 45 52 53 20 20 20 20 |E M.REINDERS |
00000160: 20 20 20 20 20 20 20 20 20 2A 22 00 96 05 D2 00 | *".....|
00000170: 99 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |."* |
00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000190: 20 20 20 20 2A 22 00 C1 05 DC 00 99 22 2A 20 43 | *"......"* C|
000001A0: 4F 4E 54 41 43 4B 54 41 44 52 45 53 20 42 41 53 |ONTACKTADRES BAS|
000001B0: 49 43 4F 44 45 20 20 20 20 20 20 20 20 20 20 2A |ICODE *|
000001C0: 22 00 EC 05 E6 00 99 22 2A 20 54 52 53 2D 38 30 |"......"* TRS-80|
000001D0: 20 47 45 42 52 55 49 4B 45 52 53 56 45 52 45 4E | GEBRUIKERSVEREN|
000001E0: 49 47 49 4E 47 20 20 20 20 20 2A 22 00 17 06 F0 |IGING *"....|
000001F0: 00 99 22 2A 20 50 4F 53 54 42 55 53 20 32 31 32 |.."* POSTBUS 212|
00000200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000210: 20 20 20 20 20 2A 22 00 42 06 FA 00 99 22 2A 20 | *".B...."* |
00000220: 33 39 36 30 20 42 45 20 20 57 59 4B 20 42 59 20 |3960 BE WYK BY |
00000230: 44 55 55 52 53 54 45 44 45 20 20 20 20 20 20 20 |DUURSTEDE |
00000240: 2A 22 00 6D 06 04 01 99 22 2A 20 20 20 20 20 20 |*".m...."* |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000260: 20 20 20 20 20 20 20 20 20 20 20 2A 22 00 98 06 | *"...|
00000270: 0E 01 99 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..."************|
00000280: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000290: 2A 2A 2A 2A 2A 2A 2A 22 00 A9 06 18 01 81 5A B2 |*******"......Z.|
000002A0: 30 A4 33 30 30 30 3A 82 5A 00 B2 06 22 01 8D 31 |0.3000:.Z..."..1|
000002B0: 32 30 00 C8 06 2C 01 8F 23 23 53 54 52 49 4E 47 |20...,..##STRING|
000002C0: 52 55 49 4D 54 45 23 23 00 D3 06 40 01 86 47 28 |RUIMTE##...@..G(|
000002D0: 32 30 29 00 F1 06 4A 01 86 41 24 28 33 33 29 3A |20)...J..A$(33):|
000002E0: 81 4E B2 31 A4 33 33 3A 87 41 24 28 4E 29 3A 82 |.N.1.33:.A$(N):.|
000002F0: 4E 00 09 07 54 01 8F 2A 2A 48 4F 4F 46 44 50 52 |N...T..**HOOFDPR|
00000300: 4F 47 52 41 4D 4D 41 2A 2A 00 12 07 5E 01 8D 31 |OGRAMMA**...^..1|
00000310: 32 30 00 42 07 68 01 99 3A 99 22 55 49 54 20 54 |20.B.h..:."UIT T|
00000320: 45 20 53 50 52 45 4B 45 4E 20 47 45 54 41 4C 20 |E SPREKEN GETAL |
00000330: 3F 20 28 20 3C 31 38 20 43 49 4A 46 45 52 53 20 |? ( <18 CIJFERS |
00000340: 29 22 00 52 07 72 01 85 41 24 3A 55 24 B2 22 22 |)".R.r..A$:U$.""|
00000350: 3A 99 00 7E 07 7C 01 8B C5 28 41 24 29 B2 30 A7 |:..~.|...(A$).0.|
00000360: 99 22 49 53 20 4E 49 45 54 20 55 49 54 20 54 45 |."IS NIET UIT TE|
00000370: 20 53 50 52 45 4B 45 4E 22 3A 89 33 35 30 00 91 | SPREKEN":.350..|
00000380: 07 86 01 4B B2 30 3A 81 4E B2 31 A4 C3 28 41 24 |...K.0:.N.1..(A$|
00000390: 29 00 A8 07 90 01 8B CA 28 41 24 2C 4E 2C 31 29 |).......(A$,N,1)|
000003A0: B2 22 2E 22 A7 4B B2 4E 00 B5 07 9A 01 82 4E 3A |.".".K.N......N:|
000003B0: 44 B2 4E AB 31 00 C9 07 A4 01 8B 4B B2 30 A7 41 |D.N.1......K.0.A|
000003C0: B2 4E AB 31 3A 89 34 34 30 00 D3 07 AE 01 41 B2 |.N.1:.440.....A.|
000003D0: 4B AB 31 00 F5 07 B8 01 8B 41 B1 31 38 A7 99 22 |K.1......A.18.."|
000003E0: 44 49 54 20 49 53 20 54 45 20 47 52 4F 4F 54 22 |DIT IS TE GROOT"|
000003F0: 3A 89 33 35 30 00 04 08 C2 01 42 24 B2 C8 28 41 |:.350.....B$..(A|
00000400: 24 2C 41 29 00 0F 08 CC 01 81 4E B2 31 A4 41 00 |$,A)......N.1.A.|
00000410: 29 08 D6 01 47 28 4E 29 B2 C5 28 CA 28 42 24 2C |)...G(N)..(.(B$,|
00000420: 41 AB 4E AA 31 2C 31 29 29 00 30 08 E0 01 82 4E |A.N.1,1)).0....N|
00000430: 00 4A 08 EA 01 8F 2A 2A 47 45 54 41 4C 55 49 54 |.J....**GETALUIT|
00000440: 53 50 4C 49 54 53 45 4E 2A 2A 00 57 08 F4 01 8B |SPLITSEN**.W....|
00000450: 41 B2 30 A7 39 32 30 00 64 08 FE 01 8B 41 B1 34 |A.0.920.d....A.4|
00000460: A7 37 33 30 00 7B 08 08 02 91 41 89 35 33 30 2C |.730.{....A.530,|
00000470: 35 36 30 2C 36 32 30 2C 36 37 30 00 88 08 12 02 |560,620,670.....|
00000480: 8F 2A 2A 41 3D 31 2A 2A 00 98 08 1C 02 8B 47 28 |.**A=1**......G(|
00000490: 41 29 B2 30 A7 39 32 30 00 B0 08 26 02 55 24 B2 |A).0.920...&.U$.|
000004A0: 55 24 AA 41 24 28 47 28 41 29 29 3A 89 39 32 30 |U$.A$(G(A)):.920|
000004B0: 00 BD 08 30 02 8F 2A 2A 41 3D 32 2A 2A 00 D6 08 |...0..**A=2**...|
000004C0: 3A 02 8B 47 28 41 29 B2 30 AF 47 28 41 AB 31 29 |:..G(A).0.G(A.1)|
000004D0: B2 30 A7 39 32 30 00 F9 08 44 02 8B 47 28 31 29 |.0.920...D..G(1)|
000004E0: B2 30 A7 55 24 B2 55 24 AA 41 24 28 31 38 AA 47 |.0.U$.U$.A$(18.G|
000004F0: 28 41 29 29 3A 89 39 32 30 00 23 09 4E 02 8B 47 |(A)):.920.#.N..G|
00000500: 28 41 29 B2 31 A7 55 24 B2 55 24 AA 41 24 28 47 |(A).1.U$.U$.A$(G|
00000510: 28 41 29 AC 31 30 AA 47 28 41 AB 31 29 29 3A 89 |(A).10.G(A.1)):.|
00000520: 39 32 30 00 3A 09 58 02 8B 47 28 41 29 B2 30 A7 |920.:.X..G(A).0.|
00000530: 41 B2 41 AB 31 3A 89 35 30 30 00 65 09 62 02 55 |A.A.1:.500.e.b.U|
00000540: 24 B2 55 24 AA 41 24 28 47 28 31 29 29 AA 22 20 |$.U$.A$(G(1))." |
00000550: 45 4E 20 22 AA 41 24 28 31 38 AA 47 28 41 29 29 |EN ".A$(18.G(A))|
00000560: 3A 89 39 32 30 00 72 09 6C 02 8F 2A 2A 41 3D 33 |:.920.r.l..**A=3|
00000570: 2A 2A 00 87 09 76 02 8B 47 28 41 29 B2 30 A7 41 |**...v..G(A).0.A|
00000580: B2 32 3A 89 35 30 30 00 97 09 80 02 8B 47 28 41 |.2:.500......G(A|
00000590: 29 B2 31 A7 36 36 30 00 AA 09 8A 02 55 24 B2 55 |).1.660.....U$.U|
000005A0: 24 AA 41 24 28 47 28 41 29 29 00 C9 09 94 02 55 |$.A$(G(A)).....U|
000005B0: 24 B2 55 24 AA 22 20 48 4F 4E 44 45 52 44 20 22 |$.U$." HONDERD "|
000005C0: 3A 41 B2 32 3A 89 35 30 30 00 D6 09 9E 02 8F 2A |:A.2:.500......*|
000005D0: 2A 41 3D 34 2A 2A 00 EB 09 A8 02 8B 47 28 34 29 |*A=4**......G(4)|
000005E0: B2 30 A7 41 B2 33 3A 89 35 30 30 00 1B 0A B2 02 |.0.A.3:.500.....|
000005F0: 8B 47 28 33 29 B2 30 A7 55 24 B2 55 24 AA 41 24 |.G(3).0.U$.U$.A$|
00000600: 28 47 28 41 29 29 AA 22 20 44 55 49 5A 45 4E 44 |(G(A))." DUIZEND|
00000610: 20 22 3A 41 B2 33 3A 89 35 30 30 00 43 0A BC 02 | ":A.3:.500.C...|
00000620: 8B 47 28 34 29 B2 31 A7 55 24 B2 55 24 AA 41 24 |.G(4).1.U$.U$.A$|
00000630: 28 47 28 34 29 AC 31 30 AA 47 28 33 29 29 3A 89 |(G(4).10.G(3)):.|
00000640: 37 32 30 00 69 0A C6 02 55 24 B2 55 24 AA 41 24 |720.i...U$.U$.A$|
00000650: 28 47 28 33 29 29 AA 22 20 45 4E 20 22 AA 41 24 |(G(3))." EN ".A$|
00000660: 28 31 38 AA 47 28 34 29 29 00 88 0A D0 02 55 24 |(18.G(4)).....U$|
00000670: B2 55 24 AA 22 20 48 4F 4E 44 45 52 44 20 22 3A |.U$." HONDERD ":|
00000680: 41 B2 32 3A 89 35 30 30 00 9F 0A DA 02 8F 2A 2A |A.2:.500......**|
00000690: 41 49 53 47 52 4F 54 45 52 44 41 4E 34 2A 2A 00 |AISGROTERDAN4**.|
000006A0: C7 0A E4 02 8F 2A 2A 42 45 50 41 4C 45 4E 57 45 |.....**BEPALENWE|
000006B0: 4C 4B 47 52 4F 45 50 4A 45 56 41 4E 44 52 49 45 |LKGROEPJEVANDRIE|
000006C0: 48 45 54 49 53 2A 2A 00 DA 0A EE 02 5A B2 B5 28 |HETIS**.....Z..(|
000006D0: 28 41 AB 30 2E 35 29 AD 33 29 00 01 0B F8 02 8F |(A.0.5).3)......|
000006E0: 2A 2A 42 45 50 41 41 4C 57 45 4C 4B 43 49 4A 46 |**BEPAALWELKCIJF|
000006F0: 45 52 49 4E 47 52 4F 45 50 4A 45 56 41 4E 33 2A |ERINGROEPJEVAN3*|
00000700: 2A 00 0D 0B 02 03 4D B2 41 AB 33 AC 5A 00 20 0B |*.....M.A.3.Z. .|
00000710: 0C 03 91 4D 89 37 39 30 2C 38 32 30 2C 38 38 30 |...M.790,820,880|
00000720: 00 3E 0B 16 03 8F 2A 2A 4C 41 41 54 53 54 45 43 |.>....**LAATSTEC|
00000730: 49 4A 46 45 52 49 4E 47 52 4F 45 50 2A 2A 00 57 |IJFERINGROEP**.W|
00000740: 0B 20 03 8B 47 28 41 29 A7 55 24 B2 55 24 AA 41 |. ..G(A).U$.U$.A|
00000750: 24 28 47 28 41 29 29 00 7D 0B 2A 03 41 B2 41 AB |$(G(A)).}.*.A.A.|
00000760: 31 3A 55 24 B2 55 24 AA 22 20 22 AA 41 24 28 32 |1:U$.U$." ".A$(2|
00000770: 38 AA 5A 29 AA 22 20 22 3A 89 35 30 30 00 9D 0B |8.Z)." ":.500...|
00000780: 34 03 8F 2A 2A 4D 49 44 44 45 4C 53 54 45 43 49 |4..**MIDDELSTECI|
00000790: 4A 46 45 52 49 4E 47 52 4F 45 50 2A 2A 00 B1 0B |JFERINGROEP**...|
000007A0: 3E 03 49 B2 47 28 41 29 3A 4A B2 47 28 41 AB 31 |>.I.G(A):J.G(A.1|
000007B0: 29 00 C5 0B 48 03 8B 49 B2 30 A7 41 B2 41 AB 31 |)...H..I.0.A.A.1|
000007C0: 3A 89 35 30 30 00 E8 0B 52 03 8B 49 B2 31 A7 55 |:.500...R..I.1.U|
000007D0: 24 B2 55 24 AA 41 24 28 31 30 AA 4A 29 3A 41 B2 |$.U$.A$(10.J):A.|
000007E0: 41 AB 31 3A 89 38 31 30 00 02 0C 5C 03 8B 4A A7 |A.1:.810...\..J.|
000007F0: 55 24 B2 55 24 AA 41 24 28 4A 29 AA 22 20 45 4E |U$.U$.A$(J)." EN|
00000800: 20 22 00 20 0C 66 03 55 24 B2 55 24 AA 41 24 28 | ". .f.U$.U$.A$(|
00000810: 31 38 AA 49 29 3A 41 B2 41 AB 31 3A 89 38 31 30 |18.I):A.A.1:.810|
00000820: 00 3E 0C 70 03 8F 2A 2A 56 4F 4F 52 53 54 45 43 |.>.p..**VOORSTEC|
00000830: 49 4A 46 45 52 49 4E 47 52 4F 45 50 2A 2A 00 55 |IJFERINGROEP**.U|
00000840: 0C 7A 03 8B 47 28 41 29 B2 30 A7 41 B2 41 AB 31 |.z..G(A).0.A.A.1|
00000850: 3A 89 35 30 30 00 70 0C 84 03 8B 47 28 41 29 B1 |:.500.p....G(A).|
00000860: 31 A7 55 24 B2 55 24 AA 41 24 28 47 28 41 29 29 |1.U$.U$.A$(G(A))|
00000870: 00 91 0C 8E 03 55 24 B2 55 24 AA 22 20 48 4F 4E |.....U$.U$." HON|
00000880: 44 45 52 44 20 22 3A 41 B2 41 AB 31 3A 89 35 30 |DERD ":A.A.1:.50|
00000890: 30 00 B3 0C 98 03 8F 2A 2A 48 49 45 52 41 4C 53 |0......**HIERALS|
000008A0: 49 45 54 53 41 43 48 54 45 52 44 45 4B 4F 4D 4D |IETSACHTERDEKOMM|
000008B0: 41 2A 2A 00 CF 0C A2 03 8F 2A 2A 4E 49 45 54 53 |A**......**NIETS|
000008C0: 41 43 48 54 45 52 44 45 4B 4F 4D 4D 41 2A 2A 00 |ACHTERDEKOMMA**.|
000008D0: DD 0C AC 03 8B 4B B2 30 A7 31 31 37 30 00 F6 0C |.....K.0.1170...|
000008E0: B6 03 8F 2A 2A 41 41 4E 54 41 4C 44 45 43 49 4D |...**AANTALDECIM|
000008F0: 41 4C 45 4E 2A 2A 00 00 0D C0 03 5A B2 44 AB 4B |ALEN**.....Z.D.K|
00000900: 00 1F 0D CA 03 8F 2A 2A 42 45 50 45 52 4B 41 41 |......**BEPERKAA|
00000910: 4E 54 41 4C 44 45 43 49 4D 41 4C 45 4E 2A 2A 00 |NTALDECIMALEN**.|
00000920: 2C 0D D4 03 8B 5A B1 35 A7 5A B2 35 00 46 0D DE |,....Z.5.Z.5.F..|
00000930: 03 8F 2A 2A 45 45 52 53 54 45 5A 44 45 43 49 4D |..**EERSTEZDECIM|
00000940: 41 4C 45 4E 2A 2A 00 59 0D E8 03 43 24 B2 CA 28 |ALEN**.Y...C$..(|
00000950: 41 24 2C 4B AA 31 2C 5A 29 00 6B 0D F2 03 8B C5 |A$,K.1,Z).k.....|
00000960: 28 43 24 29 B2 30 A7 31 31 37 30 00 7F 0D FC 03 |(C$).0.1170.....|
00000970: 55 24 B2 55 24 AA 22 20 4B 4F 4D 4D 41 20 22 00 |U$.U$." KOMMA ".|
00000980: 9F 0D 06 04 81 4E B2 31 A4 5A 3A 44 28 4E 29 B2 |.....N.1.Z:D(N).|
00000990: C5 28 CA 28 43 24 2C 4E 2C 31 29 29 3A 82 4E 00 |.(.(C$,N,1)):.N.|
000009A0: AD 0D 10 04 8B 5A B2 32 A7 31 31 31 30 00 B8 0D |.....Z.2.1110...|
000009B0: 1A 04 81 4E B2 31 A4 5A 00 D7 0D 24 04 8B 44 28 |...N.1.Z...$..D(|
000009C0: 4E 29 B2 30 A7 55 24 B2 55 24 AA 22 4E 55 4C 20 |N).0.U$.U$."NUL |
000009D0: 22 3A 89 31 30 38 30 00 EE 0D 2E 04 55 24 B2 55 |":.1080.....U$.U|
000009E0: 24 AA 41 24 28 44 28 4E 29 29 AA 22 20 22 00 F5 |$.A$(D(N))." "..|
000009F0: 0D 38 04 82 4E 00 FF 0D 42 04 89 31 31 37 30 00 |.8..N...B..1170.|
00000A00: 2A 0E 4C 04 8F 2A 2A 54 57 45 45 44 45 43 49 4D |*.L..**TWEEDECIM|
00000A10: 41 4C 45 4E 48 45 42 42 45 4E 45 49 47 45 4E 55 |ALENHEBBENEIGENU|
00000A20: 49 54 53 50 52 41 41 4B 2A 2A 00 3C 0E 56 04 49 |ITSPRAAK**.<.V.I|
00000A30: B2 44 28 31 29 3A 4A B2 44 28 32 29 00 5E 0E 60 |.D(1):J.D(2).^.`|
00000A40: 04 8B 49 B2 30 A7 55 24 B2 55 24 AA 22 4E 55 4C |..I.0.U$.U$."NUL|
00000A50: 20 22 AA 41 24 28 4A 29 3A 89 31 31 37 30 00 7E | ".A$(J):.1170.~|
00000A60: 0E 6A 04 8B 49 B2 31 A7 55 24 B2 55 24 AA 41 24 |.j..I.1.U$.U$.A$|
00000A70: 28 31 30 AC 49 AA 4A 29 3A 89 31 31 37 30 00 98 |(10.I.J):.1170..|
00000A80: 0E 74 04 8B 4A A7 55 24 B2 55 24 AA 41 24 28 4A |.t..J.U$.U$.A$(J|
00000A90: 29 AA 22 20 45 4E 20 22 00 B1 0E 7E 04 55 24 B2 |)." EN "...~.U$.|
00000AA0: 55 24 AA 41 24 28 31 38 AA 49 29 3A 89 31 31 37 |U$.A$(18.I):.117|
00000AB0: 30 00 CA 0E 88 04 8F 2A 2A 55 49 54 50 52 49 4E |0......**UITPRIN|
00000AC0: 54 45 4E 47 45 54 41 4C 2A 2A 00 DD 0E 92 04 59 |TENGETAL**.....Y|
00000AD0: B2 31 3A 81 5A B2 31 A4 C3 28 55 24 29 00 ED 0E |.1:.Z.1..(U$)...|
00000AE0: 9C 04 99 CA 28 55 24 2C 5A 2C 31 29 3B 00 11 0F |....(U$,Z,1);...|
00000AF0: A6 04 59 B2 59 AA 31 3A 8B 59 B1 33 30 AF CA 28 |..Y.Y.1:.Y.30..(|
00000B00: 55 24 2C 5A 2C 31 29 B2 22 20 22 A7 99 3A 59 B2 |U$,Z,1)." "..:Y.|
00000B10: 31 00 18 0F B0 04 82 5A 00 20 0F BA 04 99 3A 99 |1......Z. ....:.|
00000B20: 00 3F 0F C4 04 85 22 4E 4F 47 20 45 45 4E 20 47 |.?...."NOG EEN G|
00000B30: 45 54 41 4C 20 28 4A 2F 4E 29 20 22 3B 41 24 00 |ETAL (J/N) ";A$.|
00000B40: 4F 0F CE 04 8B 41 24 B2 22 4A 22 A7 33 35 30 00 |O....A$."J".350.|
00000B50: 60 0F D8 04 8B 41 24 B2 22 4E 22 A7 31 33 33 30 |`....A$."N".1330|
00000B60: 00 6A 0F E2 04 89 31 32 32 30 00 78 0F EC 04 8F |.j....1220.x....|
00000B70: 2A 2A 44 41 54 41 2A 2A 00 AA 0F F6 04 83 45 45 |**DATA**......EE|
00000B80: 4E 2C 54 57 45 45 2C 44 52 49 45 2C 56 49 45 52 |N,TWEE,DRIE,VIER|
00000B90: 2C 56 49 4A 46 2C 5A 45 53 2C 5A 45 56 45 4E 2C |,VIJF,ZES,ZEVEN,|
00000BA0: 41 43 48 54 2C 4E 45 47 45 4E 00 E1 0F 00 05 83 |ACHT,NEGEN......|
00000BB0: 54 49 45 4E 2C 45 4C 46 2C 54 57 41 41 4C 46 2C |TIEN,ELF,TWAALF,|
00000BC0: 44 45 52 54 49 45 4E 2C 56 45 45 52 54 49 45 4E |DERTIEN,VEERTIEN|
00000BD0: 2C 56 49 4A 46 54 49 45 4E 2C 5A 45 53 54 49 45 |,VIJFTIEN,ZESTIE|
00000BE0: 4E 00 1A 10 0A 05 83 5A 45 56 45 4E 54 49 45 4E |N......ZEVENTIEN|
00000BF0: 2C 41 43 48 54 54 49 45 4E 2C 4E 45 47 45 4E 54 |,ACHTTIEN,NEGENT|
00000C00: 49 45 4E 2C 54 57 49 4E 54 49 47 2C 44 45 52 54 |IEN,TWINTIG,DERT|
00000C10: 49 47 2C 56 45 45 52 54 49 47 00 50 10 14 05 83 |IG,VEERTIG.P....|
00000C20: 56 49 4A 46 54 49 47 2C 5A 45 53 54 49 47 2C 5A |VIJFTIG,ZESTIG,Z|
00000C30: 45 56 45 4E 54 49 47 2C 54 41 43 48 54 49 47 2C |EVENTIG,TACHTIG,|
00000C40: 4E 45 47 45 4E 54 49 47 2C 48 4F 4E 44 45 52 44 |NEGENTIG,HONDERD|
00000C50: 00 7D 10 1E 05 83 44 55 49 5A 45 4E 44 2C 4D 49 |.}....DUIZEND,MI|
00000C60: 4C 4A 4F 45 4E 2C 4D 49 4C 4A 41 52 44 2C 42 49 |LJOEN,MILJARD,BI|
00000C70: 4C 4A 4F 45 4E 2C 42 49 4C 4A 41 52 44 00 94 10 |LJOEN,BILJARD...|
00000C80: 28 05 8F 2A 2A 45 49 4E 44 50 52 4F 47 52 41 4D |(..**EINDPROGRAM|
00000C90: 4D 41 2A 2A 00 B2 10 32 05 99 3A 99 22 54 4F 54 |MA**...2..:."TOT|
00000CA0: 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 4B 45 45 | DE VOLGENDE KEE|
00000CB0: 52 22 00 D5 10 3C 05 99 22 54 52 53 2D 38 30 20 |R"...<.."TRS-80 |
00000CC0: 47 45 42 52 55 49 4B 45 52 53 56 45 52 45 4E 49 |GEBRUIKERSVERENI|
00000CD0: 47 49 4E 47 22 00 DB 10 46 05 80 00 00 00 |GING"...F..... |
....D..120:.140.$.N..##CLEARSCREEN##./.X
..".":..>....**TEKST**.I...."***********
************************"......"*
*"... .."* GET
ALLEN VAN CIJFERS NAAR TEKST *"......"*
OVERGENOMEN UIT REMARKS 15 *"......
"* *".@.
..."* ONTWERP I.GAUVAN *"
.K.H.."* BASICODE M.REINDERS
*"...R.."*
*".A...."* CONTACKTADRES BASICODE
*"......"* TRS-80 GEBRUIKERSVEREN
IGING *"......"* POSTBUS 212
*".B...."* 3960 BE WYK BY
DUURSTEDE *".M...."*
*"......"************
***********************"......Z.0.3000:.
Z..."..120.H.,..##STRINGRUIMTE##.S.@..G(
20)...J..A$(33):.N.1.33:.A$(N):.N...T..*
*HOOFDPROGRAMMA**...^..120.B.H..:."UIT T
E SPREKEN GETAL ? ( <18 CIJFERS )".R.R..
A$:U$."":..~.|..E(A$).0.."IS NIET UIT TE
SPREKEN":.350.....K.0:.N.1.C(A$)......J
(A$,N,1).".".K.N......N:D.N.1.I....K.0.A
.N.1:.440.S...A.K.1......A.18.."DIT IS T
E GROOT":.350...B.B$.H(A$,A)...L..N.1.A.
).V.G(N).E(J(B$,A.N.1,1)).0....N.J....**
GETALUITSPLITSEN**.W....A.0.920.D....A.4
.730.{....A.530,560,620,670......**A=1**
......G(A).0.920...&.U$.U$.A$(G(A)):.920
...0..**A=2**.V.:..G(A).0.G(A.1).0.920..
.D..G(1).0.U$.U$.A$(18.G(A)):.920.#.N..G
(A).1.U$.U$.A$(G(A).10.G(A.1)):.920.:.X.
.G(A).0.A.A.1:.500.E.B.U$.U$.A$(G(1))."
EN ".A$(18.G(A)):.920.R.L..**A=3**...V..
G(A).0.A.2:.500......G(A).1.660.....U$.U
$.A$(G(A)).I...U$.U$." HONDERD ":A.2:.50
0.V....**A=4**......G(4).0.A.3:.500.....
.G(3).0.U$.U$.A$(G(A))." DUIZEND ":A.3:.
500.C....G(4).1.U$.U$.A$(G(4).10.G(3)):.
720.I.F.U$.U$.A$(G(3))." EN ".A$(18.G(4)
)...P.U$.U$." HONDERD ":A.2:.500...Z..**
AISGROTERDAN4**.G....**BEPALENWELKGROEPJ
EVANDRIEHETIS**.Z...Z..((A.0.5).3)......
**BEPAALWELKCIJFERINGROEPJEVAN3**.....M.
A.3.Z. ....M.790,820,880.>....**LAATSTEC
IJFERINGROEP**.W. ..G(A).U$.U$.A$(G(A)).
}.*.A.A.1:U$.U$." ".A$(28.Z)." ":.500...
4..**MIDDELSTECIJFERINGROEP**...>.I.G(A)
:J.G(A.1).E.H..I.0.A.A.1:.500...R..I.1.U
$.U$.A$(10.J):A.A.1:.810...\..J.U$.U$.A$
(J)." EN ". .F.U$.U$.A$(18.I):A.A.1:.810
.>.P..**VOORSTECIJFERINGROEP**.U.Z..G(A)
.0.A.A.1:.500.P....G(A).1.U$.U$.A$(G(A))
.....U$.U$." HONDERD ":A.A.1:.500......*
*HIERALSIETSACHTERDEKOMMA**.O....**NIETS
ACHTERDEKOMMA**......K.0.1170......**AAN
TALDECIMALEN**.....Z.D.K...J..**BEPERKAA
NTALDECIMALEN**.,.T..Z.5.Z.5.F....**EERS
TEZDECIMALEN**.Y...C$.J(A$,K.1,Z).K....E
(C$).0.1170....U$.U$." KOMMA "......N.1
.Z:D(N).E(J(C$,N,1)):.N......Z.2.1110...
...N.1.Z.W.$..D(N).0.U$.U$."NUL ":.1080.
....U$.U$.A$(D(N))." "...8..N...B..1170.
*.L..**TWEEDECIMALENHEBBENEIGENUITSPRAAK
**.<.V.I.D(1):J.D(2).^.`..I.0.U$.U$."NUL
".A$(J):.1170.~.J..I.1.U$.U$.A$(10.I.J)
:.1170...T..J.U$.U$.A$(J)." EN "...~.U$.
U$.A$(18.I):.1170.J....**UITPRINTENGETAL
**.....Y.1:.Z.1.C(U$)......J(U$,Z,1);...
..Y.Y.1:.Y.30.J(U$,Z,1)." "..:Y.1......Z
. ....:..?.D.."NOG EEN GETAL (J/N) ";A$.
O.N..A$."J".350.`.X..A$."N".1330.J....12
20.X....**DATA**......EEN,TWEE,DRIE,VIER
,VIJF,ZES,ZEVEN,ACHT,NEGEN......TIEN,ELF
,TWAALF,DERTIEN,VEERTIEN,VIJFTIEN,ZESTIE
N......ZEVENTIEN,ACHTTIEN,NEGENTIEN,TWIN
TIG,DERTIG,VEERTIG.P....VIJFTIG,ZESTIG,Z
EVENTIG,TACHTIG,NEGENTIG,HONDERD.}....DU
IZEND,MILJOEN,MILJARD,BILJOEN,BILJARD...
(..**EINDPROGRAMMA**...2..:."TOT DE VOLG
ENDE KEER".U.<.."TRS-80 GEBRUIKERSVERENI
GING"...F.....
> CLICK IMAGE PREVIEW FOR FULL MODAL