TEST GEG
FILE INFORMATION
FILENAME(S): TEST GEG
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-11-30 21:28:49
APPEARS ON: 1 disk(s)
FILE HASH
3344846d49960506bbf9798daf7bbb27c63e5b3d99b9c9c748f6d35fd63ec95e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| EDDY S | TEST GEG | PRG | DuncanTwain | 29 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 0A 00 44 45 24 B2 C7 28 31 34 29 3A |......DE$..(14):|
00000010: 45 44 24 B2 C7 28 31 35 29 00 36 08 14 00 8D 37 |ED$..(15).6....7|
00000020: 30 30 3A 97 35 33 32 38 30 2C 31 36 3A 97 35 33 |00:.53280,16:.53|
00000030: 32 38 31 2C 31 36 00 48 08 1E 00 4A B2 31 3A 86 |281,16.H...J.1:.|
00000040: 41 24 28 31 30 30 30 29 00 6E 08 28 00 41 24 28 |A$(1000).n.(.A$(|
00000050: 31 29 B2 22 53 54 4F 50 22 3A 83 54 2C 42 2C 52 |1)."STOP":.T,B,R|
00000060: 2C 4C 2C 53 2C 4D 2C 5A 2C 44 2C 50 2C 45 00 9A |,L,S,M,Z,D,P,E..|
00000070: 08 32 00 99 22 20 20 20 12 20 20 47 45 47 45 56 |.2.." . GEGEV|
00000080: 45 4E 53 20 56 45 52 57 45 52 4B 49 4E 47 20 20 |ENS VERWERKING |
00000090: 20 20 20 20 92 22 3A 99 3A 99 00 C1 08 3C 00 99 | .":.:....<..|
000000A0: 22 20 20 20 20 20 20 20 12 20 54 20 92 20 54 4F |" . T . TO|
000000B0: 45 56 4F 45 47 45 4E 20 4C 49 4A 53 54 20 22 3A |EVOEGEN LIJST ":|
000000C0: 99 00 E5 08 46 00 99 22 20 20 20 20 20 20 20 12 |....F.." .|
000000D0: 20 42 20 92 20 42 45 53 54 41 4E 44 20 53 41 56 | B . BESTAND SAV|
000000E0: 45 4E 22 3A 99 00 0B 09 50 00 99 22 20 20 20 20 |EN":....P.." |
000000F0: 20 20 20 12 20 52 20 92 20 42 45 53 54 41 4E 44 | . R . BESTAND|
00000100: 20 49 4E 4C 45 5A 45 4E 22 3A 99 00 2F 09 5A 00 | INLEZEN":../.Z.|
00000110: 99 22 20 20 20 20 20 20 20 12 20 4C 20 92 20 44 |." . L . D|
00000120: 45 20 48 45 4C 45 20 4C 49 4A 53 54 22 3A 99 00 |E HELE LIJST":..|
00000130: 4E 09 64 00 99 22 20 20 20 20 20 20 20 12 20 53 |N.d.." . S|
00000140: 20 92 20 53 4F 52 54 45 52 45 4E 22 3A 99 00 7B | . SORTEREN":..{|
00000150: 09 6E 00 99 22 20 20 20 20 20 20 20 12 20 4D 20 |.n.." . M |
00000160: 92 20 57 49 4A 5A 49 47 2F 56 45 52 57 49 4A 44 |. WIJZIG/VERWIJD|
00000170: 45 52 20 52 45 47 45 4C 22 3A 99 00 9F 09 78 00 |ER REGEL":....x.|
00000180: 99 22 20 20 20 20 20 20 20 12 20 5A 20 92 20 5A |." . Z . Z|
00000190: 4F 45 4B 20 49 4E 20 4C 49 4A 53 54 22 3A 99 00 |OEK IN LIJST":..|
000001A0: C4 09 82 00 99 22 20 20 20 20 20 20 20 12 20 44 |....." . D|
000001B0: 20 92 20 4C 45 45 53 20 44 49 52 45 43 54 4F 52 | . LEES DIRECTOR|
000001C0: 59 22 3A 99 00 EC 09 8C 00 99 22 20 20 20 20 20 |Y":......." |
000001D0: 20 20 12 20 50 20 92 20 50 52 49 4E 54 45 4E 20 | . P . PRINTEN |
000001E0: 4F 56 45 52 5A 49 43 48 54 22 3A 99 00 12 0A 96 |OVERZICHT":.....|
000001F0: 00 99 22 20 20 20 20 20 20 20 12 20 45 20 92 20 |.." . E . |
00000200: 45 49 4E 44 45 20 50 52 4F 47 52 41 4D 4D 41 22 |EINDE PROGRAMMA"|
00000210: 3A 99 00 29 0A A0 00 8D 36 39 30 3A 99 C7 28 31 |:..)....690:..(1|
00000220: 34 37 29 3A 8C 3A 49 B2 30 00 42 0A AA 00 49 B2 |47):.:I.0.B...I.|
00000230: 49 AA 31 3A 87 59 24 3A 8B 59 24 B2 5A 24 A7 32 |I.1:.Y$:.Y$.Z$.2|
00000240: 30 30 00 50 0A B4 00 8B 49 B3 31 30 89 31 37 30 |00.P....I.10.170|
00000250: 00 58 0A BE 00 89 35 30 00 8E 0A C8 00 91 49 8D |.X....50......I.|
00000260: 32 33 30 2C 32 38 30 2C 33 33 30 2C 34 33 30 2C |230,280,330,430,|
00000270: 34 38 30 2C 31 33 35 30 2C 35 36 30 2C 39 36 30 |480,1350,560,960|
00000280: 2C 39 35 30 2C 31 33 34 30 3A 89 31 36 30 00 BB |,950,1340:.160..|
00000290: 0A E6 00 99 22 20 20 31 32 33 34 35 36 37 38 39 |...." 123456789|
000002A0: 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 35 |0123456789012345|
000002B0: 36 37 38 39 30 31 32 33 34 35 22 00 EB 0A F0 00 |6789012345".....|
000002C0: 99 22 4E 52 22 3B 4A 3A 85 22 20 20 58 9D 9D 9D |."NR";J:." X...|
000002D0: 22 3B 5A 24 3A 8B 5A 24 B2 22 58 22 A7 41 24 28 |";Z$:.Z$."X".A$(|
000002E0: 4A 29 B2 22 53 54 4F 50 22 3A 8E 00 03 0B FA 00 |J)."STOP":......|
000002F0: 41 24 28 4A 29 B2 5A 24 3A 4A B2 4A AA 31 3A 89 |A$(J).Z$:J.J.1:.|
00000300: 32 34 30 00 0A 0B 0E 01 82 41 00 4D 0B 18 01 99 |240......A.M....|
00000310: 22 93 11 47 45 45 46 20 4E 41 41 4D 20 56 4F 4F |"..GEEF NAAM VOO|
00000320: 52 20 4F 50 53 4C 41 41 4E 20 22 3A 85 58 24 3A |R OPSLAAN ":.X$:|
00000330: 9F 35 2C 38 2C 33 2C 22 40 30 3A 22 AA 58 24 AA |.5,8,3,"@0:".X$.|
00000340: 22 2C 53 2C 57 22 3A 81 4A B2 31 A4 48 00 6E 0B |",S,W":.J.1.H.n.|
00000350: 22 01 98 35 2C 41 24 28 4A 29 3A 8B 41 24 28 4A |"..5,A$(J):.A$(J|
00000360: 29 B2 22 53 54 4F 50 22 A7 89 20 33 31 30 00 75 |)."STOP".. 310.u|
00000370: 0B 2C 01 82 4A 00 98 0B 36 01 A0 35 3A 99 22 46 |.,..J...6..5:."F|
00000380: 49 4C 45 20 22 3B 58 24 3B 22 20 4F 50 47 45 53 |ILE ";X$;" OPGES|
00000390: 4C 41 47 45 4E 22 3A 8E 00 E0 0B 4A 01 99 43 48 |LAGEN":....J..CH|
000003A0: 52 28 31 34 37 29 22 4C 41 41 44 20 46 4C 4F 50 |R(147)"LAAD FLOP|
000003B0: 50 59 20 4D 45 54 20 49 4E 50 55 54 20 42 45 53 |PY MET INPUT BES|
000003C0: 54 41 4E 44 22 3A 99 3A 99 22 45 4E 20 47 45 45 |TAND":.:."EN GEE|
000003D0: 46 20 42 45 53 54 41 4E 44 53 20 4E 41 41 4D 22 |F BESTANDS NAAM"|
000003E0: 00 EC 0B 4B 01 99 3A 99 3A 85 58 24 00 27 0C 54 |...K..:.:.X$.'.T|
000003F0: 01 99 3A 99 22 42 45 53 54 41 4E 44 20 54 4F 45 |..:."BESTAND TOE|
00000400: 56 4F 45 47 45 4E 20 41 41 4E 20 54 41 42 45 4C |VOEGEN AAN TABEL|
00000410: 20 12 4A 20 2F 20 4E 92 22 3B 3A 85 22 1D 1D 4A | .J / N.";:."..J|
00000420: 9D 9D 9D 22 3B 54 24 00 3D 0C 5E 01 8B 54 24 B2 |...";T$.=.^..T$.|
00000430: 22 4E 22 A7 20 41 B2 30 3A 89 33 39 30 00 4B 0C |"N". A.0:.390.K.|
00000440: 68 01 81 41 B2 31 A4 31 30 30 30 00 61 0C 72 01 |h..A.1.1000.a.r.|
00000450: 8B 41 24 28 41 29 B2 22 53 54 4F 50 22 A7 33 39 |.A$(A)."STOP".39|
00000460: 30 00 68 0C 7C 01 82 41 00 82 0C 86 01 9F 35 2C |0.h.|..A......5,|
00000470: 38 2C 33 2C 22 30 3A 22 AA 58 24 AA 22 2C 53 2C |8,3,"0:".X$.",S,|
00000480: 52 22 00 B9 0C 90 01 81 4A B2 41 A4 48 3A 84 35 |R"......J.A.H:.5|
00000490: 2C 41 24 28 4A 29 3A 8B 41 24 28 4A 29 B2 22 53 |,A$(J):.A$(J)."S|
000004A0: 54 4F 50 22 B0 41 24 28 4A 29 B2 22 45 4E 44 22 |TOP".A$(J)."END"|
000004B0: A7 4D B2 4A 3A 89 34 32 30 00 C0 0C 9A 01 82 4A |.M.J:.420......J|
000004C0: 00 E7 0C A4 01 A0 35 3A 99 3A 99 22 42 45 53 54 |......5:.:."BEST|
000004D0: 41 4E 44 20 22 AA 58 24 AA 22 20 49 4E 47 45 4C |AND ".X$." INGEL|
000004E0: 45 5A 45 4E 22 3A 8E 00 F3 0C AE 01 43 B2 31 3A |EZEN":......C.1:|
000004F0: 42 B2 31 00 16 0D B3 01 81 41 B2 42 A4 42 AA 32 |B.1......A.B.B.2|
00000500: 31 3A 8B 41 24 28 41 29 B2 22 53 54 4F 50 22 A7 |1:.A$(A)."STOP".|
00000510: 8D 38 35 30 3A 8E 00 27 0D B8 01 99 41 24 28 41 |.850:..'....A$(A|
00000520: 29 3A 43 B2 43 AA 31 00 2E 0D C2 01 82 41 00 42 |):C.C.1......A.B|
00000530: 0D CC 01 42 B2 43 3A 8D 37 32 30 3A 8B 53 B2 31 |...B.C:.720:.S.1|
00000540: A7 8E 00 53 0D CD 01 99 C7 28 31 34 37 29 3A 89 |...S.....(147):.|
00000550: 34 33 35 00 8E 0D E0 01 99 22 53 4F 52 54 2E 20 |435......"SORT. |
00000560: 56 2F 41 20 41 4E 44 45 52 45 20 50 4F 53 49 54 |V/A ANDERE POSIT|
00000570: 49 45 20 44 41 4E 20 31 20 12 4A 2F 4E 92 22 3B |IE DAN 1 .J/N.";|
00000580: 3A 85 22 1D 1D 4E 9D 9D 9D 22 3B 41 4E 24 00 A6 |:."..N...";AN$..|
00000590: 0D EA 01 8B 20 41 4E 24 B2 22 4A 22 20 A7 20 8D |.... AN$."J" . .|
000005A0: 20 38 38 30 3A 8E 00 BF 0D F4 01 99 3A 99 22 45 | 880:.......:."E|
000005B0: 56 45 4E 20 53 4F 52 54 45 52 45 4E 20 22 3B 00 |VEN SORTEREN ";.|
000005C0: E8 0D FE 01 81 5A B2 31 A4 31 30 30 30 3A 8B 41 |.....Z.1.1000:.A|
000005D0: 24 28 5A 29 B2 22 53 54 4F 50 22 A7 99 22 12 20 |$(Z)."STOP"..". |
000005E0: 4B 4C 41 41 52 22 3A 8E 00 0A 0E 08 02 81 49 B2 |KLAAR":.......I.|
000005F0: 5A AA 31 A4 31 30 30 30 3A 8B 41 24 28 49 29 B2 |Z.1.1000:.A$(I).|
00000600: 22 53 54 4F 50 22 89 35 35 30 00 39 0E 12 02 8B |"STOP".550.9....|
00000610: 41 24 28 5A 29 B1 41 24 28 49 29 A7 5A 24 B2 41 |A$(Z).A$(I).Z$.A|
00000620: 24 28 5A 29 3A 41 24 28 5A 29 B2 41 24 28 49 29 |$(Z):A$(Z).A$(I)|
00000630: 3A 41 24 28 49 29 B2 5A 24 00 40 0E 1C 02 82 49 |:A$(I).Z$.@....I|
00000640: 00 47 0E 26 02 82 5A 00 81 0E 30 02 4B B2 31 3A |.G.&..Z...0.K.1:|
00000650: 51 B2 31 3A 53 B2 31 3A 8D 37 30 30 3A 99 3A 99 |Q.1:S.1:.700:.:.|
00000660: 22 47 45 45 46 20 5A 4F 45 4B 2D 53 54 52 49 4E |"GEEF ZOEK-STRIN|
00000670: 47 20 22 3B 3A 85 22 1D 1D 58 9D 9D 9D 22 3B 5A |G ";:."..X...";Z|
00000680: 24 00 BC 0E 3A 02 99 3A 99 22 47 45 45 46 20 5A |$...:..:."GEEF Z|
00000690: 4F 45 4B 2D 50 4F 53 49 54 49 45 20 56 41 4E 41 |OEK-POSITIE VANA|
000006A0: 46 22 3B 3A 85 22 1D 1D 31 9D 9D 9D 22 3B 44 3A |F";:."..1...";D:|
000006B0: 4C B2 C3 28 5A 24 29 3A 8D 37 30 30 00 EC 0E 44 |L..(Z$):.700...D|
000006C0: 02 8B 5A 24 B2 CA 28 41 24 28 51 29 2C 44 2C 4C |..Z$..(A$(Q),D,L|
000006D0: 29 AF 41 24 28 51 29 B3 B1 22 53 54 4F 50 22 A7 |).A$(Q).."STOP".|
000006E0: 99 41 24 28 51 29 3A 53 B2 53 AA 31 00 02 0F 46 |.A$(Q):S.S.1...F|
000006F0: 02 8B 53 B1 32 32 A7 8D 37 32 30 3A 8B 4B B2 31 |..S.22..720:.K.1|
00000700: A7 8E 00 1F 0F 49 02 51 B2 51 AA 31 3A 8B 41 24 |.....I.Q.Q.1:.A$|
00000710: 28 51 29 B3 B1 22 53 54 4F 50 22 A7 35 38 30 00 |(Q).."STOP".580.|
00000720: 2A 0F 4E 02 8D 38 35 30 3A 8E 00 3D 0F B2 02 A1 |*.N..850:..=....|
00000730: 5A 24 3A 8B 5A 24 B2 22 22 A7 36 39 30 00 43 0F |Z$:.Z$."".690.C.|
00000740: B3 02 8E 00 51 0F BC 02 99 C7 28 31 34 37 29 3A |....Q.....(147):|
00000750: 8E 00 98 0F D0 02 99 22 2D 2D 2D 2D 2D 2D 2D 2D |......."--------|
00000760: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000770: 2D 2D 2D 2D 2D 2D 22 3A 99 22 20 46 31 20 3D 20 |------":." F1 = |
00000780: 56 45 52 56 4F 4C 47 20 20 20 20 46 37 20 3D 20 |VERVOLG F7 = |
00000790: 53 54 4F 50 50 45 4E 22 00 AD 0F DA 02 A1 45 44 |STOPPEN"......ED|
000007A0: 24 3A 8B 45 44 24 B2 22 22 A7 37 33 30 00 C3 0F |$:.ED$."".730...|
000007B0: E4 02 8B 45 44 24 B2 C7 28 31 33 33 29 A7 53 B2 |...ED$..(133).S.|
000007C0: 31 3A 8E 00 DD 0F EE 02 8B 45 44 24 B2 C7 28 31 |1:.......ED$..(1|
000007D0: 33 36 29 A7 53 B2 31 3A 4B B2 31 3A 8E 00 E6 0F |36).S.1:K.1:....|
000007E0: F8 02 89 37 33 30 00 11 10 52 03 99 3A 99 22 2D |...730...R..:."-|
000007F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000800: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000810: 22 00 33 10 5C 03 99 22 47 45 45 4E 20 56 45 52 |".3.\.."GEEN VER|
00000820: 44 45 52 45 20 47 45 47 45 56 45 4E 53 20 4D 45 |DERE GEGEVENS ME|
00000830: 45 52 22 00 39 10 66 03 8E 00 6F 10 70 03 99 3A |ER".9.f...o.p..:|
00000840: 99 22 56 2F 41 20 57 45 4C 4B 45 20 50 4F 53 49 |."V/A WELKE POSI|
00000850: 54 49 45 20 20 12 4E 55 4D 4D 45 52 49 45 4B 12 |TIE .NUMMERIEK.|
00000860: 22 3B 3A 85 22 1D 1D 31 9D 9D 9D 22 3B 57 57 00 |";:."..1...";WW.|
00000870: AB 10 7A 03 99 3A 99 22 41 41 4E 54 2E 20 50 4F |..z..:."AANT. PO|
00000880: 53 49 54 49 45 53 20 53 4F 52 54 20 4B 45 59 20 |SITIES SORT KEY |
00000890: 20 12 4E 55 4D 4D 45 52 49 45 4B 12 22 3B 3A 85 | .NUMMERIEK.";:.|
000008A0: 22 1D 1D 31 9D 9D 9D 22 3B 57 57 00 E9 10 84 03 |"..1...";WW.....|
000008B0: 99 3A 99 22 45 56 45 4E 20 53 4F 52 54 45 52 45 |.:."EVEN SORTERE|
000008C0: 4E 22 3B 3A 81 5A B2 31 A4 31 30 30 30 3A 8B 41 |N";:.Z.1.1000:.A|
000008D0: 24 28 5A 29 B2 22 53 54 4F 50 22 A7 99 22 20 12 |$(Z)."STOP".." .|
000008E0: 4B 4C 41 41 52 11 22 3A 8E 00 0B 11 8E 03 81 49 |KLAAR.":.......I|
000008F0: B2 5A AA 31 A4 31 30 30 30 3A 8B 41 24 28 49 29 |.Z.1.1000:.A$(I)|
00000900: B2 22 53 54 4F 50 22 89 39 34 30 00 4C 11 98 03 |."STOP".940.L...|
00000910: 8B CA 28 41 24 28 5A 29 2C 57 57 2C 56 56 29 B1 |..(A$(Z),WW,VV).|
00000920: CA 28 41 24 28 49 29 2C 57 57 2C 56 56 29 A7 5A |.(A$(I),WW,VV).Z|
00000930: 24 B2 41 24 28 5A 29 3A 41 24 28 5A 29 B2 41 24 |$.A$(Z):A$(Z).A$|
00000940: 28 49 29 3A 41 24 28 49 29 B2 5A 24 00 53 11 A2 |(I):A$(I).Z$.S..|
00000950: 03 82 49 00 5A 11 AC 03 82 5A 00 95 11 B6 03 8D |..I.Z....Z......|
00000960: 37 30 30 3A 99 22 44 45 20 50 52 49 4E 54 20 52 |700:."DE PRINT R|
00000970: 4F 55 54 49 4E 45 20 4D 4F 45 54 20 4E 4F 47 20 |OUTINE MOET NOG |
00000980: 22 3A 99 3A 99 22 47 45 49 4D 50 4C 45 4D 45 4E |":.:."GEIMPLEMEN|
00000990: 54 45 45 52 44 00 AA 11 C0 03 8F 20 52 45 41 44 |TEERD...... READ|
000009A0: 20 44 49 52 45 43 54 4F 52 59 00 CF 11 CA 03 81 | DIRECTORY......|
000009B0: 41 B2 31 A4 31 30 30 30 3A 8B 41 24 28 41 29 B2 |A.1.1000:.A$(A).|
000009C0: 22 53 54 4F 50 22 A7 4A B2 41 3A 89 39 39 30 00 |"STOP".J.A:.990.|
000009D0: D6 11 D4 03 82 41 00 E2 11 DE 03 8D 31 33 31 30 |.....A......1310|
000009E0: 3A 8E 00 F8 11 E8 03 9F 31 35 2C 38 2C 31 35 3A |:.......15,8,15:|
000009F0: 98 31 35 2C 22 49 30 22 00 0D 12 F2 03 8B 53 54 |.15,"I0"......ST|
00000A00: B3 B1 30 A7 A0 31 35 3A 89 31 32 36 30 00 29 12 |..0..15:.1260.).|
00000A10: FC 03 9F 32 2C 38 2C 30 2C 22 24 30 3A 2A 22 3A |...2,8,0,"$0:*":|
00000A20: 51 B2 30 3A 49 24 B2 22 22 00 39 12 06 04 8B 53 |Q.0:I$."".9....S|
00000A30: 54 B3 B1 30 A7 31 32 36 30 00 4C 12 10 04 81 4E |T..0.1260.L....N|
00000A40: B2 31 A4 33 32 3A A1 23 32 2C 55 24 00 59 12 1A |.1.32:.#2,U$.Y..|
00000A50: 04 49 24 B2 49 24 AA 55 24 00 5F 12 24 04 82 00 |.I$.I$.U$._.$...|
00000A60: 75 12 2E 04 44 49 24 B2 C9 28 49 24 2C 35 29 3A |u...DI$..(I$,5):|
00000A70: 49 24 B2 22 22 00 85 12 38 04 8B 53 54 B3 B1 30 |I$.""...8..ST..0|
00000A80: A7 31 32 36 30 00 9A 12 42 04 81 42 B2 31 A4 32 |.1260...B..B.1.2|
00000A90: 3A A1 23 32 2C 55 24 3A 82 42 00 B4 12 4C 04 A1 |:.#2,U$:.B...L..|
00000AA0: 23 32 2C 55 24 3A 8B 55 24 B2 22 22 A7 55 24 B2 |#2,U$:.U$."".U$.|
00000AB0: C7 28 30 29 00 C1 12 56 04 51 42 B2 C6 28 55 24 |.(0)...V.QB..(U$|
00000AC0: 29 00 DB 12 60 04 A1 23 32 2C 55 24 3A 8B 55 24 |)...`..#2,U$:.U$|
00000AD0: B2 22 22 A7 55 24 B2 C7 28 30 29 00 EF 12 6A 04 |."".U$..(0)...j.|
00000AE0: 51 42 B2 51 42 AA C6 28 55 24 29 AC 32 35 36 00 |QB.QB..(U$).256.|
00000AF0: 01 13 74 04 A1 23 32 2C 55 24 3A A1 23 32 2C 55 |..t..#2,U$:.#2,U|
00000B00: 24 00 14 13 7E 04 81 43 B2 31 A4 32 36 3A A1 23 |$...~..C.1.26:.#|
00000B10: 32 2C 55 24 00 27 13 88 04 8B 55 24 B2 C7 28 33 |2,U$.'....U$..(3|
00000B20: 34 29 A7 31 31 38 30 00 34 13 92 04 49 24 B2 49 |4).1180.4...I$.I|
00000B30: 24 AA 55 24 00 3B 13 9C 04 82 43 00 5A 13 A6 04 |$.U$.;....C.Z...|
00000B40: 8B C8 28 49 24 2C 31 29 B2 22 20 22 A7 49 24 B2 |..(I$,1)." ".I$.|
00000B50: CA 28 49 24 2C 32 2C 32 36 29 00 6E 13 B0 04 49 |.(I$,2,26).n...I|
00000B60: 24 B2 C8 28 49 24 2C 32 30 29 AA 22 20 22 00 82 |$..(I$,20)." "..|
00000B70: 13 BA 04 58 B2 C3 28 C9 28 C4 28 51 42 29 2C 33 |...X..(.(.(QB),3|
00000B80: 29 29 00 AB 13 C4 04 8B 58 B2 32 A7 41 24 28 4A |))......X.2.A$(J|
00000B90: 29 B2 49 24 AA 22 20 22 AA C9 28 C4 28 51 42 29 |).I$." "..(.(QB)|
00000BA0: 2C 33 29 AA 22 20 22 AA 44 49 24 00 D1 13 CE 04 |,3)." ".DI$.....|
00000BB0: 8B 58 B3 B1 32 A7 41 24 28 4A 29 B2 49 24 AA C9 |.X..2.A$(J).I$..|
00000BC0: 28 C4 28 51 42 29 2C 33 29 AA 22 20 22 AA 44 49 |(.(QB),3)." ".DI|
00000BD0: 24 00 DC 13 D8 04 99 41 24 28 4A 29 00 F2 13 E2 |$......A$(J)....|
00000BE0: 04 49 24 B2 22 22 3A 4A B2 4A AA 31 3A 89 31 30 |.I$."":J.J.1:.10|
00000BF0: 38 30 00 2A 14 EC 04 41 24 28 4A AB 32 29 B2 41 |80.*...A$(J.2).A|
00000C00: 24 28 4A AB 32 29 AA CA 28 41 24 28 4A AB 31 29 |$(J.2)..(A$(J.1)|
00000C10: 2C 32 31 2C 34 29 AA 22 20 46 52 45 45 22 3A A0 |,21,4)." FREE":.|
00000C20: 31 35 3A A0 32 3A 8D 37 30 30 00 41 14 F6 04 4A |15:.2:.700.A...J|
00000C30: B2 4A AB 31 3A 41 24 28 4A 29 B2 22 53 54 4F 50 |.J.1:A$(J)."STOP|
00000C40: 22 00 79 14 00 05 99 3A 99 3A 99 22 4D 45 45 52 |".y....:.:."MEER|
00000C50: 20 46 4C 4F 50 50 59 27 53 20 49 4E 4C 45 5A 45 | FLOPPY'S INLEZE|
00000C60: 4E 20 20 12 4A 20 2F 20 4E 92 22 3B 3A 85 22 1D |N .J / N.";:.".|
00000C70: 1D 4A 9D 9D 9D 22 3B 41 24 00 87 14 0A 05 8B 41 |.J...";A$......A|
00000C80: 24 B2 22 4E 22 A7 8E 00 99 14 14 05 8B 41 24 B3 |$."N"........A$.|
00000C90: B1 22 4A 22 A7 31 32 38 30 00 C5 14 1E 05 99 3A |."J".1280......:|
00000CA0: 99 22 4C 41 41 44 20 46 4C 4F 50 50 59 20 45 4E |."LAAD FLOPPY EN|
00000CB0: 20 44 52 55 4B 20 4F 50 20 45 45 4E 20 54 4F 45 | DRUK OP EEN TOE|
00000CC0: 54 53 22 3A 99 00 D9 14 28 05 A1 41 24 3A 8B 41 |TS":....(..A$:.A|
00000CD0: 24 B2 22 22 A7 31 33 32 30 00 EA 14 32 05 8B 41 |$."".1320...2..A|
00000CE0: 24 B3 B1 22 22 A7 31 30 30 30 00 F0 14 3C 05 80 |$.."".1000...<..|
00000CF0: 00 09 15 46 05 8B 41 24 28 31 29 B2 22 53 54 4F |...F..A$(1)."STO|
00000D00: 50 22 A7 8D 38 35 30 3A 8E 00 47 15 50 05 51 B2 |P"..850:..G.P.Q.|
00000D10: 31 3A 99 22 5A 4F 45 4B 43 4F 44 45 20 56 45 52 |1:."ZOEKCODE VER|
00000D20: 57 49 4A 44 45 52 2F 57 49 4A 5A 49 47 45 4E 20 |WIJDER/WIJZIGEN |
00000D30: 22 3B 3A 85 22 1D 1D 41 4C 4C 45 53 9D 9D 9D 9D |";:."..ALLES....|
00000D40: 9D 9D 9D 22 3B 5A 24 00 63 15 5A 05 8B 5A 24 B2 |...";Z$.c.Z..Z$.|
00000D50: 22 41 4C 4C 45 53 22 A7 8D 31 35 33 30 3A 89 31 |"ALLES"..1530:.1|
00000D60: 34 32 30 00 9F 15 64 05 99 3A 99 22 47 45 45 46 |420...d..:."GEEF|
00000D70: 20 5A 4F 45 4B 2D 50 4F 53 2E 20 56 41 4E 41 46 | ZOEK-POS. VANAF|
00000D80: 20 12 4E 55 4D 45 52 49 45 4B 92 22 3B 3A 85 22 | .NUMERIEK.";:."|
00000D90: 1D 1D 31 9D 9D 9D 22 3B 42 3A 8D 31 35 33 30 00 |..1...";B:.1530.|
00000DA0: AF 15 6E 05 4C B2 C3 28 5A 24 29 3A 51 B2 31 00 |..n.L..(Z$):Q.1.|
00000DB0: C4 15 78 05 8B 5A 24 B2 22 41 4C 4C 45 53 22 A7 |..x..Z$."ALLES".|
00000DC0: 31 34 32 30 00 DF 15 82 05 8B 5A 24 B3 B1 CA 28 |1420......Z$...(|
00000DD0: 41 24 28 51 29 2C 42 2C 4C 29 A7 31 34 37 30 00 |A$(Q),B,L).1470.|
00000DE0: EF 15 8C 05 99 22 20 20 22 3B 41 24 28 51 29 00 |....." ";A$(Q).|
00000DF0: 03 16 96 05 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |.....A$:.A$."".1|
00000E00: 34 33 30 00 15 16 A0 05 8B 41 24 B2 22 53 22 A7 |430......A$."S".|
00000E10: 4A B2 53 3A 8E 00 27 16 AA 05 8B 41 24 B2 22 57 |J.S:..'....A$."W|
00000E20: 22 A7 8D 31 35 32 30 00 39 16 B4 05 8B 41 24 B2 |"..1520.9....A$.|
00000E30: 22 56 22 A7 8D 31 34 39 30 00 58 16 BE 05 51 B2 |"V"..1490.X...Q.|
00000E40: 51 AA 31 3A 8B 41 24 28 51 29 B2 22 53 54 4F 50 |Q.1:.A$(Q)."STOP|
00000E50: 22 A7 8D 38 35 30 3A 8E 00 62 16 C8 05 89 31 34 |"..850:..b....14|
00000E60: 30 30 00 7E 16 D2 05 81 4B B2 51 A4 4A 3A 41 24 |00.~....K.Q.J:A$|
00000E70: 28 4B 29 B2 41 24 28 4B AA 31 29 3A 82 4B 00 AF |(K).A$(K.1):.K..|
00000E80: 16 DC 05 99 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |...."...........|
00000E90: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000EA0: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 |.............";.|
00000EB0: EC 16 E6 05 99 22 12 20 20 56 45 52 57 49 4A 44 |.....". VERWIJD|
00000EC0: 45 52 44 20 20 20 20 20 20 20 20 20 20 20 20 20 |ERD |
00000ED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 4A | ":J|
00000EE0: B2 4A AB 31 3A 51 B2 51 AB 31 3A 8E 00 2A 17 F0 |.J.1:Q.Q.1:..*..|
00000EF0: 05 85 22 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |..".............|
00000F00: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00000F10: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 41 24 28 |...........";A$(|
00000F20: 51 29 3A 51 B2 51 AA 31 3A 8E 00 30 17 FA 05 99 |Q):Q.Q.1:..0....|
00000F30: 00 5F 17 04 06 99 22 12 20 20 20 20 20 20 20 20 |._....". |
00000F40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00000F60: 8E 17 0E 06 99 22 12 20 56 3D 56 45 52 57 49 4A |.....". V=VERWIJ|
00000F70: 44 45 52 20 20 20 20 57 3D 57 49 4A 5A 49 47 45 |DER W=WIJZIGE|
00000F80: 4E 20 20 20 20 20 53 3D 53 54 4F 50 20 22 00 C3 |N S=STOP "..|
00000F90: 17 18 06 99 22 12 20 20 20 20 20 20 20 20 20 20 |....". |
00000FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000FB0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3A 99 3A | ":.:|
00000FC0: 99 3A 8E 00 00 00 |.:.... |
......DE$.G(14):ED$.G(15).6....700:.5328
0,16:.53281,16.H...J.1:.A$(1000).N.(.A$(
1)."STOP":.T,B,R,L,S,M,Z,D,P,E...2.."
. GEGEVENS VERWERKING .":.:..A.<..
" . T . TOEVOEGEN LIJST ":....F.."
. B . BESTAND SAVEN":....P.."
. R . BESTAND INLEZEN":../.Z.."
. L . DE HELE LIJST":..N.D.." . S
. SORTEREN":..{.N.." . M . WIJZIG
/VERWIJDER REGEL":....X.." . Z . Z
OEK IN LIJST":..D...." . D . LEES
DIRECTORY":......." . P . PRINTEN
OVERZICHT":......." . E . EINDE PR
OGRAMMA":..). ..690:.G(147):.:I.0.B...I.
I.1:.Y$:.Y$.Z$.200.P....I.10.170.X....50
...H..I.230,280,330,430,480,1350,560,960
,950,1340:.160......" 12345678901234567
890123456789012345"......"NR";J:." X...
";Z$:.Z$."X".A$(J)."STOP":......A$(J).Z$
:J.J.1:.240......A.M...."..GEEF NAAM VOO
R OPSLAAN ":.X$:.5,8,3,"@0:".X$.",S,W":.
J.1.H.N."..5,A$(J):.A$(J)."STOP".. 310.U
.,..J...6. 5:."FILE ";X$;" OPGESLAGEN":.
...J..CHR(147)"LAAD FLOPPY MET INPUT BES
TAND":.:."EN GEEF BESTANDS NAAM"...K..:.
:.X$.'.T..:."BESTAND TOEVOEGEN AAN TABEL
.J / N.";:."..J...";T$.=.^..T$."N". A.0
:.390.K.H..A.1.1000.A.R..A$(A)."STOP".39
0.H.|..A......5,8,3,"0:".X$.",S,R"......
J.A.H:.5,A$(J):.A$(J)."STOP".A$(J)."END"
.M.J:.420......J..... 5:.:."BESTAND ".X$
." INGELEZEN":......C.1:B.1......A.B.B.2
1:.A$(A)."STOP"..850:..'....A$(A):C.C.1.
..B..A.B.L.B.C:.720:.S.1...S.M..G(147):.
435......"SORT. V/A ANDERE POSITIE DAN 1
.J/N.";:."..N...";AN$...... AN$."J" . .
880:.......:."EVEN SORTEREN ";......Z.1
.1000:.A$(Z)."STOP"..". KLAAR":.......I.
Z.1.1000:.A$(I)."STOP".550.9....A$(Z).A$
(I).Z$.A$(Z):A$(Z).A$(I):A$(I).Z$.@....I
.G.&..Z...0.K.1:Q.1:S.1:.700:.:."GEEF ZO
EK-STRING ";:."..X...";Z$...:..:."GEEF Z
OEK-POSITIE VANAF";:."..1...";D:L.C(Z$):
.700...D..Z$.J(A$(Q),D,L).A$(Q).."STOP".
.A$(Q):S.S.1...F..S.22..720:.K.1.....I.Q
.Q.1:.A$(Q).."STOP".580.*.N..850:..=....
Z$:.Z$."".690.C.....Q....G(147):....P.."
------------------------------":." F1 =
VERVOLG F7 = STOPPEN"...Z..ED$:.ED$."
".730.C....ED$.G(133).S.1:.......ED$.G(1
36).S.1:K.1:.......730...R..:."---------
------------------------".3.\.."GEEN VER
DERE GEGEVENS MEER".9.F...O.P..:."V/A WE
LKE POSITIE .NUMMERIEK.";:."..1...";WW.
..Z..:."AANT. POSITIES SORT KEY .NUMMER
IEK.";:."..1...";WW......:."EVEN SORTERE
N";:.Z.1.1000:.A$(Z)."STOP".." .KLAAR.":
.......I.Z.1.1000:.A$(I)."STOP".940.L...
.J(A$(Z),WW,VV).J(A$(I),WW,VV).Z$.A$(Z):
A$(Z).A$(I):A$(I).Z$.S....I.Z....Z......
700:."DE PRINT ROUTINE MOET NOG ":.:."GE
IMPLEMENTEERD...... READ DIRECTORY.O.J..
A.1.1000:.A$(A)."STOP".J.A:.990.V.T..A..
....1310:.......15,8,15:.15,"I0"......ST
..0. 15:.1260.)....2,8,0,"$0:*":Q.0:I$."
".9....ST..0.1260.L....N.1.32:.#2,U$.Y..
.I$.I$.U$._.$...U...DI$.I(I$,5):I$.""...
8..ST..0.1260...B..B.1.2:.#2,U$:.B...L..
#2,U$:.U$."".U$.G(0).A.V.QB.F(U$)...`..#
2,U$:.U$."".U$.G(0)...J.QB.QB.F(U$).256.
..T..#2,U$:.#2,U$...~..C.1.26:.#2,U$.'..
..U$.G(34).1180.4...I$.I$.U$.;....C.Z...
.H(I$,1)." ".I$.J(I$,2,26).N...I$.H(I$,2
0)." ".....X.C(I(D(QB),3))...D..X.2.A$(J
).I$." ".I(D(QB),3)." ".DI$.Q.N..X..2.A$
(J).I$.I(D(QB),3)." ".DI$...X..A$(J)....
.I$."":J.J.1:.1080.*...A$(J.2).A$(J.2).J
(A$(J.1),21,4)." FREE": 15: 2:.700.A...J
.J.1:A$(J)."STOP".Y....:.:."MEER FLOPPY'
S INLEZEN .J / N.";:."..J...";A$......A
$."N"........A$.."J".1280.E....:."LAAD F
LOPPY EN DRUK OP EEN TOETS":..Y.(..A$:.A
$."".1320...2..A$.."".1000...<.....F..A$
(1)."STOP"..850:..G.P.Q.1:."ZOEKCODE VER
WIJDER/WIJZIGEN ";:."..ALLES.......";Z$.
C.Z..Z$."ALLES"..1530:.1420...D..:."GEEF
ZOEK-POS. VANAF .NUMERIEK.";:."..1...";
B:.1530...N.L.C(Z$):Q.1.D.X..Z$."ALLES".
1420......Z$..J(A$(Q),B,L).1470......"
";A$(Q)......A$:.A$."".1430... ..A$."S".
J.S:..'....A$."W"..1520.9....A$."V"..149
0.X...Q.Q.1:.A$(Q)."STOP"..850:..B.H..14
00.~.R..K.Q.J:A$(K).A$(K.1):.K......"...
.....................................";.
.....". VERWIJDERD
":J.J.1:Q.Q.1:..*....".............
...........................";A$(Q):Q.Q.1
:..0....._....".
"......". V=VERWIJDER W
=WIJZIGEN S=STOP ".C....".
":.:.:....
> CLICK IMAGE PREVIEW FOR FULL MODAL