PROGRAM-MAKER
FILE INFORMATION
FILENAME(S): PROGRAM-MAKER
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-11-30 21:26:48
APPEARS ON: 1 disk(s)
FILE HASH
a80fbed7f6ee9adb000efc7076a1f2715eb2236c584d07343d84c33a53d3bc3c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD GEOS INFO 1 | PROGRAM-MAKER | PRG | DuncanTwain | 19 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 44 08 E8 03 97 35 33 32 38 30 2C 30 3A 97 |..D....53280,0:.| 00000010: 35 33 32 38 31 2C 30 3A 99 22 93 0E 05 11 11 11 |53281,0:."......| 00000020: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 C7 C5 |... ..| 00000030: CF D3 20 D0 D2 CF C7 D2 C1 CD 2D CD C1 CB C5 D2 |.. .......-.....| 00000040: 11 11 11 22 00 57 08 F2 03 97 20 31 39 38 2C 30 |...".W.... 198,0| 00000050: 3A 92 31 39 38 2C 31 00 7A 08 FC 03 85 22 4E 41 |:.198,1.z...."NA| 00000060: 41 4D 20 56 4F 4F 52 20 44 45 20 41 50 50 4C 49 |AM VOOR DE APPLI| 00000070: 43 41 54 49 45 22 3B 4E 41 24 00 96 08 06 04 85 |CATIE";NA$......| 00000080: 22 4A 41 41 52 20 28 56 41 4E 41 46 20 31 39 30 |"JAAR (VANAF 190| 00000090: 30 29 22 3B 4A 41 00 AD 08 10 04 85 22 4D 41 41 |0)";JA......"MAA| 000000A0: 4E 44 20 28 31 2D 31 32 29 22 3B 4D 41 00 C2 08 |ND (1-12)";MA...| 000000B0: 1A 04 85 22 44 41 47 A0 28 31 2D 33 31 29 22 3B |..."DAG.(1-31)";| 000000C0: 44 41 00 D7 08 24 04 85 22 55 55 52 20 28 30 2D |DA...$.."UUR (0-| 000000D0: 32 34 29 22 3B 55 55 00 EF 08 2E 04 85 22 4D 49 |24)";UU......"MI| 000000E0: 4E 55 55 54 20 28 30 2D 36 30 29 22 3B 4D 49 00 |NUUT (0-60)";MI.| 000000F0: 2B 09 38 04 99 22 C1 4C 4C 45 20 41 44 52 45 53 |+.8..".LLE ADRES| 00000100: 53 45 4E 20 CE C9 C5 D4 20 48 45 58 41 44 45 43 |SEN .... HEXADEC| 00000110: 49 4D 41 41 4C 2E 22 3A 85 22 42 45 47 49 4E 41 |IMAAL.":."BEGINA| 00000120: 44 52 45 53 20 CE D5 22 3B 42 45 00 42 09 42 04 |DRES ..";BE.B.B.| 00000130: 85 22 45 49 4E 44 41 44 52 45 53 20 CE D5 22 3B |."EINDADRES ..";| 00000140: 45 49 00 56 09 4C 04 85 22 4C 41 41 44 41 44 52 |EI.V.L.."LAADADR| 00000150: 45 53 22 3B 4C 41 00 77 09 56 04 85 22 53 54 41 |ES";LA.w.V.."STA| 00000160: 52 54 41 44 52 45 53 22 3B 53 41 3A 4C 45 B2 4C |RTADRES";SA:LE.L| 00000170: 41 AA 45 49 AB 42 45 00 8C 09 60 04 85 22 49 4E |A.EI.BE...`.."IN| 00000180: 46 4F 54 45 4B 53 54 22 3B 49 54 24 00 AB 09 6A |FOTEKST";IT$...j| 00000190: 04 9F 31 35 2C 38 2C 31 35 3A 9F 35 2C 38 2C 35 |..15,8,15:.5,8,5| 000001A0: 2C 4E 41 24 AA 22 2C 53 2C 57 22 00 B8 09 74 04 |,NA$.",S,W"...t.| 000001B0: 81 41 B2 42 45 A4 45 49 00 C8 09 7E 04 98 35 2C |.A.BE.EI...~..5,| 000001C0: C7 28 C2 28 41 29 29 3B 00 CF 09 88 04 82 41 00 |.(.(A));......A.| 000001D0: DC 09 92 04 98 35 2C C7 28 30 29 3B 00 E7 09 9C |.....5,.(0);....| 000001E0: 04 A0 35 2C 38 2C 35 00 F6 09 A6 04 9F 35 2C 38 |..5,8,5......5,8| 000001F0: 2C 35 2C 22 23 22 00 02 0A B0 04 54 B2 31 3A 53 |,5,"#".....T.1:S| 00000200: B2 30 00 16 0A BA 04 98 31 35 2C 22 42 2D 41 3A |.0......15,"B-A:| 00000210: 22 30 2C 54 2C 53 00 3F 0A C4 04 84 31 35 2C 41 |"0,T,S.?....15,A| 00000220: 2C 42 24 2C 54 54 2C 53 53 3A 8B 41 B2 36 35 A7 |,B$,TT,SS:.A.65.| 00000230: 54 B2 54 54 3A 53 B2 53 53 3A 89 31 32 31 30 00 |T.TT:S.SS:.1210.| 00000240: 53 0A CE 04 98 31 35 2C 22 42 2D 50 3A 22 3B 35 |S....15,"B-P:";5| 00000250: 3B 30 3B 00 79 0A D8 04 98 35 2C C7 28 30 29 3B |;0;.y....5,.(0);| 00000260: C7 28 32 35 35 29 3B C7 28 33 29 3B C7 28 32 31 |.(255);.(3);.(21| 00000270: 29 3B C7 28 31 39 31 29 3B 00 94 0A E2 04 81 41 |);.(191);......A| 00000280: B2 31 A4 36 33 3A 87 42 3A 98 35 2C C7 28 42 29 |.1.63:.B:.5,.(B)| 00000290: 3B 3A 82 41 00 AD 0A EC 04 98 35 2C C7 28 31 32 |;:.A......5,.(12| 000002A0: 38 29 3B C7 28 36 29 3B C7 28 30 29 3B 00 D6 0A |8);.(6);.(0);...| 000002B0: F6 04 98 35 2C C7 28 4C 41 AB 32 35 36 AC B5 28 |...5,.(LA.256..(| 000002C0: 4C 41 AD 32 35 36 29 29 3B C7 28 B5 28 4C 41 AD |LA.256));.(.(LA.| 000002D0: 32 35 36 29 29 3B 00 FF 0A 00 05 98 35 2C C7 28 |256));......5,.(| 000002E0: 4C 45 AB 32 35 36 AC B5 28 4C 45 AD 32 35 36 29 |LE.256..(LE.256)| 000002F0: 29 3B C7 28 B5 28 4C 45 AD 32 35 36 29 29 3B 00 |);.(.(LE.256));.| 00000300: 28 0B 0A 05 98 35 2C C7 28 53 41 AB 32 35 36 AC |(....5,.(SA.256.| 00000310: B5 28 53 41 AD 32 35 36 29 29 3B C7 28 B5 28 53 |.(SA.256));.(.(S| 00000320: 41 AD 32 35 36 29 29 3B 00 40 0B 14 05 81 41 B2 |A.256));.@....A.| 00000330: 31 A4 32 30 3A 98 35 2C C7 28 30 29 3B 3A 82 41 |1.20:.5,.(0);:.A| 00000340: 00 56 0B 1E 05 98 35 2C 22 50 45 54 45 52 20 42 |.V....5,"PETER B| 00000350: 4F 4E 43 5A 22 3B 00 6F 0B 28 05 81 41 B2 31 A4 |ONCZ";.o.(..A.1.| 00000360: 31 34 38 3A 98 35 2C C7 28 30 29 3B 3A 82 41 00 |148:.5,.(0);:.A.| 00000370: 8B 0B 32 05 98 31 35 2C 22 42 2D 50 22 3B 35 3B |..2..15,"B-P";5;| 00000380: 37 37 3B 3A 98 35 2C 4E 41 24 3B 00 AD 0B 3C 05 |77;:.5,NA$;...<.| 00000390: 98 31 35 2C 22 42 2D 50 22 3B 35 3B 31 36 30 3B |.15,"B-P";5;160;| 000003A0: 3A 98 35 2C 49 54 24 3B C7 28 30 29 3B 00 C3 0B |:.5,IT$;.(0);...| 000003B0: 46 05 98 31 35 2C 22 55 32 3A 22 3B 35 3B 30 3B |F..15,"U2:";5;0;| 000003C0: 54 3B 53 00 D9 0B 50 05 A0 35 2C 38 2C 35 3A 9F |T;S...P..5,8,5:.| 000003D0: 35 2C 38 2C 35 2C 22 23 22 00 EC 0B 5A 05 54 54 |5,8,5,"#"...Z.TT| 000003E0: B2 31 38 3A 53 53 B2 31 3A 43 B2 30 00 05 0C 64 |.18:SS.1:C.0...d| 000003F0: 05 98 31 35 2C 22 42 2D 52 3A 22 3B 35 3B 30 3B |..15,"B-R:";5;0;| 00000400: 54 54 3B 53 53 00 19 0C 6E 05 98 31 35 2C 22 42 |TT;SS...n..15,"B| 00000410: 2D 50 3A 22 3B 35 3B 30 3B 00 32 0C 78 05 A1 23 |-P:";5;0;.2.x..#| 00000420: 35 2C 41 24 3A 54 4E B2 C6 28 41 24 AA C7 28 30 |5,A$:TN..(A$..(0| 00000430: 29 29 00 45 0C 82 05 98 31 35 2C 22 42 2D 50 22 |)).E....15,"B-P"| 00000440: 3B 35 3B 31 3B 00 5E 0C 8C 05 A1 23 35 2C 41 24 |;5;1;.^....#5,A$| 00000450: 3A 53 4E B2 C6 28 41 24 AA C7 28 30 29 29 00 69 |:SN..(A$..(0)).i| 00000460: 0C 96 05 81 41 B2 30 A4 37 00 77 0C A0 05 42 24 |....A.0.7.w...B$| 00000470: B2 22 22 3A 43 B2 30 00 90 0C AA 05 98 31 35 2C |."":C.0......15,| 00000480: 22 42 2D 50 22 3B 35 3B 41 AC 33 32 AA 35 AA 43 |"B-P";5;A.32.5.C| 00000490: 00 A8 0C B4 05 A1 23 35 2C 41 24 3A 42 B2 C6 28 |......#5,A$:B..(| 000004A0: 41 24 AA C7 28 30 29 29 00 BA 0C BE 05 8B 20 42 |A$..(0))...... B| 000004B0: B2 31 36 30 20 A7 31 35 30 30 00 DA 0C C8 05 42 |.160 .1500.....B| 000004C0: 24 B2 42 24 AA C7 28 42 29 3A 43 B2 43 AA 31 3A |$.B$..(B):C.C.1:| 000004D0: 8B 43 B2 31 36 A7 31 35 30 30 00 E4 0C D2 05 89 |.C.16.1500......| 000004E0: 31 34 35 30 00 F5 0C DC 05 8B 42 24 B2 4E 41 24 |1450......B$.NA$| 000004F0: A7 31 35 33 30 00 1B 0D E6 05 82 41 3A 8B 54 4E |.1530......A:.TN| 00000500: B2 30 A7 99 22 C5 52 20 49 53 20 49 45 54 53 20 |.0..".R IS IETS | 00000510: 4D 49 53 2E 22 3A 89 31 35 37 30 00 31 0D F0 05 |MIS.":.1570.1...| 00000520: 54 54 B2 54 4E 3A 53 53 B2 53 4E 3A 89 31 33 38 |TT.TN:SS.SN:.138| 00000530: 30 00 62 0D FA 05 98 31 35 2C 22 42 2D 50 22 3B |0.b....15,"B-P";| 00000540: 35 3B 32 31 AA 41 AC 33 32 3B 3A 98 35 2C C7 28 |5;21.A.32;:.5,.(| 00000550: 54 29 3B C7 28 53 29 3B C7 28 30 29 3B C7 28 36 |T);.(S);.(0);.(6| 00000560: 29 3B 00 88 0D 04 06 98 35 2C C7 28 4A 41 29 3B |);......5,.(JA);| 00000570: C7 28 4D 41 29 3B C7 28 44 41 29 3B C7 28 55 55 |.(MA);.(DA);.(UU| 00000580: 29 3B C7 28 4D 49 29 3B 00 AC 0D 0E 06 98 31 35 |);.(MI);......15| 00000590: 2C 22 42 2D 50 3A 22 3B 35 3B 41 AC 33 32 AA 32 |,"B-P:";5;A.32.2| 000005A0: 3B 3A 98 35 2C C7 28 31 33 31 29 3B 00 C3 0D 18 |;:.5,.(131);....| 000005B0: 06 98 31 35 2C 22 55 32 3A 22 35 3B 30 3B 54 54 |..15,"U2:"5;0;TT| 000005C0: 3B 53 53 00 D7 0D 22 06 A0 35 2C 38 2C 35 3A A0 |;SS..."..5,8,5:.| 000005D0: 31 35 2C 38 2C 31 35 00 DD 0D 2C 06 80 00 FA 0D |15,8,15...,.....| 000005E0: 36 06 83 32 35 35 2C 32 35 35 2C 32 35 35 2C 30 |6..255,255,255,0| 000005F0: 30 30 2C 30 30 30 2C 30 30 30 00 17 0E 40 06 83 |00,000,000...@..| 00000600: 30 32 34 2C 30 30 30 2C 30 30 30 2C 30 33 32 2C |024,000,000,032,| 00000610: 30 30 30 2C 30 30 30 00 34 0E 4A 06 83 30 36 34 |000,000.4.J..064| 00000620: 2C 30 30 30 2C 30 30 30 2C 30 36 35 2C 30 36 30 |,000,000,065,060| 00000630: 2C 32 34 30 00 51 0E 54 06 83 30 36 36 2C 31 37 |,240.Q.T..066,17| 00000640: 30 2C 31 36 38 2C 30 33 34 2C 31 37 30 2C 31 36 |0,168,034,170,16| 00000650: 38 00 6E 0E 5E 06 83 30 32 35 2C 30 34 32 2C 31 |8.n.^..025,042,1| 00000660: 37 30 2C 30 30 30 2C 30 30 30 2C 30 30 30 00 8B |70,000,000,000..| 00000670: 0E 68 06 83 30 30 30 2C 30 30 30 2C 30 30 30 2C |.h..000,000,000,| 00000680: 30 30 30 2C 30 30 30 2C 30 30 30 00 A8 0E 72 06 |000,000,000...r.| 00000690: 83 30 31 35 2C 30 30 30 2C 30 30 30 2C 30 30 32 |.015,000,000,002| 000006A0: 2C 30 30 30 2C 30 30 30 00 C5 0E 7C 06 83 30 30 |,000,000...|..00| 000006B0: 32 2C 30 30 30 2C 30 30 30 2C 30 30 32 2C 30 35 |2,000,000,002,05| 000006C0: 31 2C 31 34 34 00 E2 0E 86 06 83 30 30 32 2C 30 |1,144......002,0| 000006D0: 34 32 2C 30 34 30 2C 30 30 32 2C 30 34 33 2C 30 |42,040,002,043,0| 000006E0: 34 30 00 FF 0E 90 06 83 30 31 35 2C 30 34 32 2C |40......015,042,| 000006F0: 30 31 36 2C 30 30 30 2C 30 30 30 2C 30 30 30 00 |016,000,000,000.| 00000700: 10 0F 9A 06 83 32 35 35 2C 32 35 35 2C 32 35 35 |.....255,255,255| 00000710: 00 00 00 2C 32 35 35 00 00 |...,255.. |
..D....53280,0:.53281,0:.".........
GEOS PROGRAM-MAKER...".W.... 198,0
:.198,1.Z...."NAAM VOOR DE APPLICATIE";N
A$......"JAAR (VANAF 1900)";JA......"MAA
ND (1-12)";MA.B...."DAG (1-31)";DA.W.$..
"UUR (0-24)";UU......"MINUUT (0-60)";MI.
+.8.."ALLE ADRESSEN NIET HEXADECIMAAL.":
."BEGINADRES NU";BE.B.B.."EINDADRES NU";
EI.V.L.."LAADADRES";LA.W.V.."STARTADRES"
;SA:LE.LA.EI.BE...`.."INFOTEKST";IT$...J
..15,8,15:.5,8,5,NA$.",S,W"...T..A.BE.EI
.H.~..5,G(B(A));.O....A......5,G(0);....
. 5,8,5......5,8,5,"#".....T.1:S.0......
15,"B-A:"0,T,S.?.D..15,A,B$,TT,SS:.A.65.
T.TT:S.SS:.1210.S.N..15,"B-P:";5;0;.Y.X.
.5,G(0);G(255);G(3);G(21);G(191);......A
.1.63:.B:.5,G(B);:.A......5,G(128);G(6);
G(0);.V....5,G(LA.256..(LA.256));G(.(LA.
256));......5,G(LE.256..(LE.256));G(.(LE
.256));.(....5,G(SA.256..(SA.256));G(.(S
A.256));.@....A.1.20:.5,G(0);:.A.V....5,
"PETER BONCZ";.O.(..A.1.148:.5,G(0);:.A.
..2..15,"B-P";5;77;:.5,NA$;...<..15,"B-P
";5;160;:.5,IT$;G(0);.C.F..15,"U2:";5;0;
T;S.Y.P. 5,8,5:.5,8,5,"#"...Z.TT.18:SS.1
:C.0...D..15,"B-R:";5;0;TT;SS...N..15,"B
-P:";5;0;.2.X..#5,A$:TN.F(A$.G(0)).E....
15,"B-P";5;1;.^....#5,A$:SN.F(A$.G(0)).I
....A.0.7.W. .B$."":C.0......15,"B-P";5;
A.32.5.C......#5,A$:B.F(A$.G(0))...... B
.160 .1500.Z.H.B$.B$.G(B):C.C.1:.C.16.15
00...R..1450......B$.NA$.1530......A:.TN
.0.."ER IS IETS MIS.":.1570.1...TT.TN:SS
.SN:.1380.B....15,"B-P";5;21.A.32;:.5,G(
T);G(S);G(0);G(6);......5,G(JA);G(MA);G(
DA);G(UU);G(MI);......15,"B-P:";5;A.32.2
;:.5,G(131);.C....15,"U2:"5;0;TT;SS.W.".
5,8,5: 15,8,15...,.....6..255,255,255,0
00,000,000...@..024,000,000,032,000,000.
4.J..064,000,000,065,060,240.Q.T..066,17
0,168,034,170,168.N.^..025,042,170,000,0
00,000...H..000,000,000,000,000,000...R.
.015,000,000,002,000,000.E.|..002,000,00
0,002,051,144......002,042,040,002,043,0
40......015,042,016,000,000,000......255
,255,255...,255..
> CLICK IMAGE PREVIEW FOR FULL MODAL