CATALOGUS BC-PRO
FILE INFORMATION
FILENAME(S): CATALOGUS BC-PRO
FILE TYPE(S): PRG
FILE SIZE: 7.1K
FIRST SEEN: 2025-11-30 21:07:26
APPEARS ON: 1 disk(s)
FILE HASH
011757efbd0c2de5bed13c1873770f38035e35187dc4dc5794d0b92ec846c44b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| V D BERGH SOFT U | CATALOGUS BC-PRO | PRG | DuncanTwain | 11 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 31 30 30 30 00 15 08 14 00 |.......1000.....|
00000010: 89 31 30 31 30 00 21 08 64 00 99 22 93 22 3B 3A |.1010.!.d..".";:|
00000020: 8E 00 51 08 6E 00 99 C8 28 22 13 11 11 11 11 11 |..Q.n...("......|
00000030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000040: 11 11 11 22 2C B6 28 B5 28 56 45 AA 31 29 29 29 |...",.(.(VE.1)))|
00000050: 3B 00 61 08 70 00 99 A6 B6 28 48 4F 29 29 3B 3A |;.a.p....(HO));:|
00000060: 8E 00 86 08 78 00 48 4F B2 C2 28 32 30 39 29 AA |....x.HO..(209).|
00000070: 32 35 36 AC C2 28 32 31 30 29 AB 31 30 32 34 AA |256..(210).1024.|
00000080: C2 28 32 31 31 29 00 A4 08 79 00 56 45 B2 B5 28 |.(211)...y.VE..(|
00000090: 48 4F AD 34 30 29 3A 48 4F B2 48 4F AB 34 30 AC |HO.40):HO.HO.40.|
000000A0: 56 45 3A 8E 00 AF 08 C8 00 A1 49 4E 24 3A 8E 00 |VE:.......IN$:..|
000000B0: C4 08 D2 00 A1 49 4E 24 3A 8B 49 4E 24 B2 22 22 |.....IN$:.IN$.""|
000000C0: 89 32 31 30 00 CA 08 DC 00 8E 00 F7 08 FA 00 97 |.210............|
000000D0: 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 38 2C |54296,15:.54278,|
000000E0: 32 35 35 3A 97 35 34 32 37 33 2C 39 35 3A 97 35 |255:.54273,95:.5|
000000F0: 34 32 37 36 2C 31 37 00 09 09 FB 00 81 4F 4F B2 |4276,17......OO.|
00000100: 31 A4 32 30 30 3A 82 4F 4F 00 2A 09 FC 00 97 35 |1.200:.OO.*....5|
00000110: 34 32 37 36 2C 30 3A 97 35 34 32 37 37 2C 30 3A |4276,0:.54277,0:|
00000120: 97 35 34 32 37 38 2C 30 3A 8E 00 38 09 04 01 52 |.54278,0:..8...R|
00000130: 56 B2 BB 28 31 29 3A 8E 00 46 09 0E 01 46 52 B2 |V..(1):..F...FR.|
00000140: B8 28 30 29 3A 8E 00 6F 09 2C 01 53 52 24 B2 C4 |.(0):..o.,.SR$..|
00000150: 28 53 52 29 3A 8B C8 28 53 52 24 2C 31 29 B2 22 |(SR):..(SR$,1)."|
00000160: 20 22 A7 53 52 24 B2 CA 28 53 52 24 2C 32 29 00 | ".SR$..(SR$,2).|
00000170: 75 09 2D 01 8E 00 9A 09 36 01 53 52 24 B2 22 22 |u.-.....6.SR$.""|
00000180: 3A 8B 53 52 B1 B2 31 30 AE 28 43 54 AB 43 4E AB |:.SR..10.(CT.CN.|
00000190: B4 28 43 4E 29 29 A7 33 31 38 00 B5 09 37 01 8B |.(CN)).318...7..|
000001A0: 53 52 B3 AB 2E 35 AC 31 30 AE AB 43 4E A7 53 52 |SR...5.10..CN.SR|
000001B0: 24 B2 22 2D 22 00 DC 09 38 01 53 52 24 B2 53 52 |$."-"...8.SR$.SR|
000001C0: 24 AA CA 28 C4 28 B5 28 B6 28 53 52 29 AA 2E 35 |$..(.(.(.(SR)..5|
000001D0: AC 31 30 AE AB 43 4E 29 29 2C 32 29 00 07 0A 39 |.10..CN)),2)...9|
000001E0: 01 8B C3 28 53 52 24 29 B3 43 54 AB 43 4E AA 28 |...(SR$).CT.CN.(|
000001F0: 43 4E B3 B1 30 29 A7 53 52 24 B2 22 20 22 AA 53 |CN..0).SR$." ".S|
00000200: 52 24 3A 89 33 31 33 00 21 0A 3A 01 8B 43 4E B2 |R$:.313.!.:..CN.|
00000210: 30 B0 B6 28 53 52 29 B1 B2 31 45 31 30 89 33 31 |0..(SR)..1E10.31|
00000220: 36 00 55 0A 3B 01 53 52 24 B2 53 52 24 AA CA 28 |6.U.;.SR$.SR$..(|
00000230: C4 28 31 AA B6 28 53 52 29 AB B5 28 B6 28 53 52 |.(1..(SR)..(.(SR|
00000240: 29 29 AA 2E 35 AC 31 30 AE AB 43 4E 29 2C 33 2C |))..5.10..CN),3,|
00000250: 43 4E AA 31 29 00 75 0A 3C 01 8B C3 28 53 52 24 |CN.1).u.<...(SR$|
00000260: 29 B3 43 54 A7 53 52 24 B2 53 52 24 AA 22 20 22 |).CT.SR$.SR$." "|
00000270: 3A 89 33 31 36 00 8B 0A 3D 01 8B C3 28 53 52 24 |:.316...=...(SR$|
00000280: 29 B1 43 54 A7 53 52 24 B2 22 22 00 AB 0A 3E 01 |).CT.SR$.""...>.|
00000290: 8B C3 28 53 52 24 29 B3 43 54 A7 53 52 24 B2 53 |..(SR$).CT.SR$.S|
000002A0: 52 24 AA 22 2A 22 3A 89 33 31 38 00 B1 0A 3F 01 |R$."*":.318...?.|
000002B0: 8E 00 C7 0A 5E 01 9F 34 2C 34 3A 98 34 2C 53 52 |....^..4,4:.4,SR|
000002C0: 24 3B 3A A0 34 3A 8E 00 D8 0A 68 01 9F 34 2C 34 |$;:.4:....h..4,4|
000002D0: 3A 98 34 3A A0 34 3A 8E 00 F7 0A E8 03 8D 33 35 |:.4:.4:.......35|
000002E0: 30 30 3A 89 32 30 3A 8F 20 42 45 53 54 41 4E 44 |00:.20:. BESTAND|
000002F0: 2D 44 45 45 4C 2D 33 00 20 0B F2 03 4E 31 24 B2 |-DEEL-3. ...N1$.|
00000300: 22 43 41 54 41 4C 4F 47 55 53 20 42 41 53 49 43 |"CATALOGUS BASIC|
00000310: 4F 44 45 20 50 52 4F 47 52 41 4D 4D 41 27 53 22 |ODE PROGRAMMA'S"|
00000320: 00 43 0B FC 03 4E 32 24 B2 22 50 52 49 4E 54 2D |.C...N2$."PRINT-|
00000330: 4F 55 54 53 20 28 4D 45 54 20 50 52 49 4E 54 45 |OUTS (MET PRINTE|
00000340: 52 29 22 00 54 0B 06 04 44 54 24 B2 22 30 31 30 |R)".T...DT$."010|
00000350: 31 37 30 22 00 69 0B 10 04 8B 41 B2 30 20 A7 8D |170".i....A.0 ..|
00000360: 31 30 30 3A 8D 33 36 30 30 00 75 0B 1A 04 86 4E |100:.3600.u....N|
00000370: 24 28 4E 52 29 00 87 0B 24 04 86 5A 5A 28 4E 52 |$(NR)...$..ZZ(NR|
00000380: 29 2C 5A 28 4E 52 29 00 9C 0B 38 04 8B 43 52 B2 |),Z(NR)...8..CR.|
00000390: 31 20 A7 86 41 28 4E 52 2C 31 32 29 00 B5 0B 08 |1 ..A(NR,12)....|
000003A0: 07 41 B2 30 3A 4E B2 30 3A 8D 32 30 30 30 30 3A |.A.0:N.0:.20000:|
000003B0: 89 33 38 30 30 00 DF 0B D0 07 8D 31 30 30 3A 4E |.3800......100:N|
000003C0: 24 B2 22 53 4F 52 54 45 52 45 4E 20 4F 50 20 43 |$."SORTEREN OP C|
000003D0: 4F 4E 56 45 52 53 49 45 2D 44 41 54 55 4D 22 00 |ONVERSIE-DATUM".|
000003E0: 0A 0C DA 07 56 45 B2 30 3A 8D 33 30 30 30 3A 4E |....VE.0:.3000:N|
000003F0: 24 B2 22 4D 45 54 20 53 48 45 4C 4C 2D 4D 45 54 |$."MET SHELL-MET|
00000400: 5A 4E 45 52 2D 53 4F 52 54 22 00 1B 0C E4 07 56 |ZNER-SORT".....V|
00000410: 45 B2 32 3A 8D 33 30 30 30 3A 99 00 49 0C EE 07 |E.2:.3000:..I...|
00000420: 99 22 2D 20 44 41 54 55 4D 20 43 4F 4E 56 45 52 |."- DATUM CONVER|
00000430: 54 45 52 45 4E 20 45 4E 20 49 4E 20 49 4E 44 45 |TEREN EN IN INDE|
00000440: 58 20 5A 45 54 54 45 4E 22 00 69 0C F8 07 8D 32 |X ZETTEN".i....2|
00000450: 35 30 3A 81 49 B2 31 20 A4 4E 3A 4C 24 B2 4E 24 |50:.I.1 .N:L$.N$|
00000460: 28 49 29 3A 8D 33 32 30 30 00 86 0C 02 08 4C 24 |(I):.3200.....L$|
00000470: B2 4D 31 24 3A 8D 32 35 30 30 3A 5A 5A 28 49 29 |.M1$:.2500:ZZ(I)|
00000480: B2 53 53 3A 82 49 00 9A 0C 34 08 99 3A 99 22 2D |.SS:.I...4..:."-|
00000490: 20 53 4F 52 54 45 52 45 4E 22 00 A7 0C 3E 08 8D | SORTEREN"...>..|
000004A0: 32 35 30 3A 4D B2 52 00 BF 0C 48 08 4D B2 B5 28 |250:M.R...H.M..(|
000004B0: 4D AD 32 29 3A 8B 4D B2 30 20 A7 32 32 34 30 00 |M.2):.M.0 .2240.|
000004C0: CD 0C 52 08 4A B2 31 3A 4B B2 52 AB 4D 00 D5 0C |..R.J.1:K.R.M...|
000004D0: 5C 08 48 B2 4A 00 DF 0C 66 08 56 B2 48 AA 4D 00 |\.H.J...f.V.H.M.|
000004E0: F7 0C 70 08 8B 5A 5A 28 48 29 B3 B2 5A 5A 28 56 |..p..ZZ(H)..ZZ(V|
000004F0: 29 20 A7 32 32 32 30 00 1F 0D 7A 08 5A 5A 28 30 |) .2220...z.ZZ(0|
00000500: 29 B2 5A 5A 28 48 29 3A 5A 5A 28 48 29 B2 5A 5A |).ZZ(H):ZZ(H).ZZ|
00000510: 28 56 29 3A 5A 5A 28 56 29 B2 5A 5A 28 30 29 00 |(V):ZZ(V).ZZ(0).|
00000520: 48 0D 84 08 8B 43 52 B2 34 20 A7 5A 24 B2 4E 24 |H....CR.4 .Z$.N$|
00000530: 28 48 29 3A 4E 24 28 48 29 B2 4E 24 28 56 29 3A |(H):N$(H).N$(V):|
00000540: 4E 24 28 56 29 B2 5A 24 00 71 0D 8E 08 8B 43 52 |N$(V).Z$.q....CR|
00000550: B2 35 20 A7 5A 28 30 29 B2 5A 28 48 29 3A 5A 28 |.5 .Z(0).Z(H):Z(|
00000560: 48 29 B2 5A 28 56 29 3A 5A 28 56 29 B2 5A 28 30 |H).Z(V):Z(V).Z(0|
00000570: 29 00 86 0D 98 08 48 B2 48 AB 4D 3A 8B 48 B3 31 |).....H.H.M:.H.1|
00000580: 20 A7 32 32 32 30 00 90 0D A2 08 89 32 31 35 30 | .2220......2150|
00000590: 00 A5 0D AC 08 4A B2 4A AA 31 3A 8B 4A B1 4B 20 |.....J.J.1:.J.K |
000005A0: A7 32 31 32 30 00 AF 0D B6 08 89 32 31 34 30 00 |.2120......2140.|
000005B0: DE 0D C0 08 8D 32 35 30 3A 99 3A 99 22 47 45 52 |.....250:.:."GER|
000005C0: 45 45 44 21 20 2D 20 4E 55 3A 20 47 41 52 42 41 |EED! - NU: GARBA|
000005D0: 47 45 20 43 4F 4C 4C 45 43 54 49 4F 4E 22 00 E9 |GE COLLECTION"..|
000005E0: 0D CA 08 8D 32 37 30 3A 8E 00 01 0E C4 09 8F 20 |....270:....... |
000005F0: 44 41 54 55 4D 20 43 4F 4E 56 45 52 54 45 52 45 |DATUM CONVERTERE|
00000600: 4E 00 15 0E CE 09 44 44 B2 C5 28 CA 28 4C 24 2C |N.....DD..(.(L$,|
00000610: 31 2C 32 29 29 00 29 0E D8 09 4D 4D B2 C5 28 CA |1,2)).)...MM..(.|
00000620: 28 4C 24 2C 33 2C 32 29 29 00 3D 0E E2 09 4A 4A |(L$,3,2)).=...JJ|
00000630: B2 C5 28 CA 28 4C 24 2C 35 2C 32 29 29 00 5A 0E |..(.(L$,5,2)).Z.|
00000640: EC 09 53 53 B2 33 36 35 AC 4A 4A AA 44 44 3A 8B |..SS.365.JJ.DD:.|
00000650: 4D 4D B3 33 20 A7 32 35 36 30 00 79 0E F6 09 53 |MM.3 .2560.y...S|
00000660: 53 B2 53 53 AB B5 28 4D 4D AC 2E 34 AA 32 2E 33 |S.SS..(MM..4.2.3|
00000670: 29 3A 4A 4A B2 4A 4A AA 31 00 99 0E 00 0A 53 53 |):JJ.JJ.1.....SS|
00000680: B2 53 53 AA B5 28 4D 4D AC 33 31 AA 28 28 4A 4A |.SS..(MM.31.((JJ|
00000690: AB 31 29 AD 34 29 29 3A 8E 00 B0 0E B8 0B 8F 20 |.1).4)):....... |
000006A0: 4B 4F 50 50 45 4E 20 43 45 4E 54 52 45 52 45 4E |KOPPEN CENTREREN|
000006B0: 00 CB 0E C2 0B 58 24 B2 22 2D 22 3A 48 4F B2 28 |.....X$."-":HO.(|
000006C0: 34 30 AB C3 28 4E 24 29 29 AD 32 00 ED 0E CC 0B |40..(N$)).2.....|
000006D0: 8B C3 28 58 24 29 B3 C3 28 4E 24 29 20 A7 58 24 |..(X$)..(N$) .X$|
000006E0: B2 58 24 AA 22 2D 22 3A 89 33 30 32 30 00 02 0F |.X$."-":.3020...|
000006F0: D6 0B 48 4F B2 48 4F AB 31 3A 8D 31 31 30 3A 99 |..HO.HO.1:.110:.|
00000700: 4E 24 00 19 0F E0 0B 56 45 B2 56 45 AA 31 3A 8D |N$.....VE.VE.1:.|
00000710: 31 31 30 3A 99 58 24 3A 8E 00 36 0F EA 0B 58 24 |110:.X$:..6...X$|
00000720: B2 22 2D 22 3A 8F 20 53 54 52 45 45 50 20 45 52 |."-":. STREEP ER|
00000730: 20 4F 4E 44 45 52 00 54 0F F4 0B 8B C3 28 58 24 | ONDER.T.....(X$|
00000740: 29 B3 4C 20 A7 58 24 B2 58 24 AA 22 2D 22 3A 89 |).L .X$.X$."-":.|
00000750: 33 30 36 30 00 5E 0F FE 0B 99 58 24 3A 8E 00 77 |3060.^....X$:..w|
00000760: 0F 1C 0C 8D 32 35 30 3A 48 4F B2 30 3A 56 45 B2 |....250:HO.0:VE.|
00000770: 32 33 3A 8D 31 31 30 00 95 0F 26 0C 99 22 44 52 |23:.110...&.."DR|
00000780: 55 4B 20 45 45 4E 20 54 4F 45 54 53 20 49 4E 20 |UK EEN TOETS IN |
00000790: 2E 2E 2E 22 3B 00 A2 0F 30 0C 8D 32 31 30 3A 99 |...";...0..210:.|
000007A0: 3A 8E 00 BB 0F 4E 0C 8D 32 35 30 3A 48 4F B2 30 |:....N..250:HO.0|
000007B0: 3A 56 45 B2 32 33 3A 8D 31 31 30 00 E2 0F 58 0C |:VE.23:.110...X.|
000007C0: 99 22 54 3D 54 45 52 55 47 2F 53 3D 53 54 4F 50 |."T=TERUG/S=STOP|
000007D0: 50 45 4E 2F 56 3D 56 45 52 44 45 52 20 2E 2E 2E |PEN/V=VERDER ...|
000007E0: 22 3B 00 EF 0F 62 0C 8D 32 31 30 3A 99 3A 8E 00 |";...b..210:.:..|
000007F0: 08 10 80 0C 8F 20 53 54 52 49 4E 47 20 55 49 54 |..... STRING UIT|
00000800: 45 45 4E 48 41 4C 45 4E 00 1A 10 8A 0C 4D 31 24 |EENHALEN.....M1$|
00000810: B2 CA 28 4C 24 2C 31 2C 36 29 00 2D 10 94 0C 4D |..(L$,1,6).-...M|
00000820: 32 24 B2 CA 28 4C 24 2C 37 2C 32 32 29 00 40 10 |2$..(L$,7,22).@.|
00000830: 9E 0C 4D 33 24 B2 CA 28 4C 24 2C 32 39 2C 35 29 |..M3$..(L$,29,5)|
00000840: 00 53 10 A8 0C 4D 34 24 B2 CA 28 4C 24 2C 33 34 |.S...M4$..(L$,34|
00000850: 2C 33 29 00 59 10 B2 0C 8E 00 82 10 AC 0D 4E 31 |,3).Y.........N1|
00000860: 24 B2 22 43 41 54 41 4C 4F 47 55 53 20 42 41 53 |$."CATALOGUS BAS|
00000870: 49 43 4F 44 45 20 50 52 4F 47 52 41 4D 4D 41 27 |ICODE PROGRAMMA'|
00000880: 53 22 00 9D 10 B6 0D 8D 31 30 30 3A 4E 24 B2 4E |S"......100:N$.N|
00000890: 31 24 3A 56 45 B2 30 3A 8D 33 30 30 30 00 B5 10 |1$:VE.0:.3000...|
000008A0: C0 0D 8D 32 35 30 3A 48 4F B2 33 3A 56 45 B2 38 |...250:HO.3:VE.8|
000008B0: 3A 8D 31 31 30 00 DB 10 CA 0D 99 22 48 45 42 54 |:.110......"HEBT|
000008C0: 20 55 20 44 45 20 54 4F 45 4C 49 43 48 54 49 4E | U DE TOELICHTIN|
000008D0: 47 20 47 45 4C 45 5A 45 4E 3F 22 00 00 11 D4 0D |G GELEZEN?".....|
000008E0: 56 45 B2 31 30 3A 8D 31 31 30 3A 99 22 28 4A 2F |VE.10:.110:."(J/|
000008F0: 4E 29 3A 20 22 3B 3A 8D 32 31 30 3A 99 49 4E 24 |N): ";:.210:.IN$|
00000900: 00 1C 11 DE 0D 8B 49 4E 24 B2 22 4A 22 20 B0 49 |......IN$."J" .I|
00000910: 4E 24 B2 22 4A 22 20 A7 33 36 30 30 00 3B 11 E8 |N$."J" .3600.;..|
00000920: 0D 8D 31 30 30 3A 8D 32 35 30 3A 48 4F B2 31 31 |..100:.250:HO.11|
00000930: 3A 56 45 B2 31 32 3A 8D 31 31 30 00 57 11 F2 0D |:VE.12:.110.W...|
00000940: 99 22 44 4F 45 20 44 41 54 20 44 41 4E 20 45 45 |."DOE DAT DAN EE|
00000950: 52 53 54 21 22 3A 80 00 70 11 10 0E 8D 32 35 30 |RST!":..p....250|
00000960: 3A 48 4F B2 33 3A 56 45 B2 31 34 3A 8D 31 31 30 |:HO.3:VE.14:.110|
00000970: 00 99 11 1A 0E 99 22 4D 4F 45 54 20 55 20 45 45 |......"MOET U EE|
00000980: 4E 20 42 45 53 54 41 4E 44 20 21 21 20 4E 55 4D |N BESTAND !! NUM|
00000990: 45 52 49 45 4B 20 21 21 22 00 AD 11 24 0E 48 4F |ERIEK !!"...$.HO|
000009A0: B2 33 3A 56 45 B2 31 36 3A 8D 31 31 30 00 D0 11 |.3:VE.16:.110...|
000009B0: 2E 0E 99 22 4F 50 53 4C 41 41 4E 3F 20 28 4A 2F |..."OPSLAAN? (J/|
000009C0: 4E 29 3A 20 22 3B 3A 8D 32 31 30 3A 99 49 4E 24 |N): ";:.210:.IN$|
000009D0: 00 F1 11 38 0E 43 52 B2 30 3A 8B 49 4E 24 B2 22 |...8.CR.0:.IN$."|
000009E0: 4A 22 20 B0 49 4E 24 B2 22 4A 22 20 A7 43 52 B2 |J" .IN$."J" .CR.|
000009F0: 31 00 14 12 42 0E 8F 20 42 45 52 45 4B 45 4E 49 |1...B.. BEREKENI|
00000A00: 4E 47 20 27 41 27 20 56 41 4E 20 27 43 4C 45 41 |NG 'A' VAN 'CLEA|
00000A10: 52 20 41 27 00 1E 12 4C 0E 8C 3A 87 4E 52 00 3D |R A'...L..:.NR.=|
00000A20: 12 56 0E 41 B2 28 33 36 AA 33 29 AC 4E 52 3A 8F |.V.A.(36.3).NR:.|
00000A30: 20 50 52 4F 47 52 2E 52 45 47 45 4C 53 00 62 12 | PROGR.REGELS.b.|
00000A40: 60 0E 41 B2 41 AA 28 28 34 29 AA 28 34 29 29 AC |`.A.A.((4).(4)).|
00000A50: 4E 52 3A 8F 20 53 4F 52 54 45 45 52 2D 56 41 52 |NR:. SORTEER-VAR|
00000A60: 27 53 00 7F 12 6A 0E 8B 43 52 B2 31 20 A7 41 B2 |'S...j..CR.1 .A.|
00000A70: 41 AA 28 31 32 AA 31 29 AC 28 34 29 AC 4E 52 00 |A.(12.1).(4).NR.|
00000A80: 85 12 74 0E 8E 00 A0 12 D8 0E 8D 31 30 30 3A 4E |..t........100:N|
00000A90: 24 B2 4E 31 24 3A 56 45 B2 30 3A 8D 33 30 30 30 |$.N1$:VE.0:.3000|
00000AA0: 00 BC 12 E2 0E 4E 24 B2 4E 32 24 3A 56 45 B2 32 |.....N$.N2$:VE.2|
00000AB0: 3A 8D 33 30 30 30 3A 56 45 B2 31 32 00 D0 12 EC |:.3000:VE.12....|
00000AC0: 0E 81 49 B2 31 20 A4 35 3A 8D 32 35 30 3A 82 49 |..I.1 .5:.250:.I|
00000AD0: 00 FC 12 F6 0E 4E 24 B2 22 5A 45 54 20 55 57 20 |.....N$."ZET UW |
00000AE0: 50 52 49 4E 54 45 52 20 4E 55 20 41 41 4E 21 22 |PRINTER NU AAN!"|
00000AF0: 3A 8D 33 30 30 30 3A 8D 33 31 30 30 00 17 13 A0 |:.3000:.3100....|
00000B00: 0F 8D 31 30 30 3A 4E 24 B2 4E 31 24 3A 56 45 B2 |..100:N$.N1$:VE.|
00000B10: 30 3A 8D 33 30 30 30 00 2F 13 AA 0F 4E 24 B2 4E |0:.3000./...N$.N|
00000B20: 32 24 3A 56 45 B2 32 3A 8D 33 30 30 30 3A 99 00 |2$:VE.2:.3000:..|
00000B30: 3E 13 B4 0F 8B 4E B2 30 20 A7 39 39 30 30 00 51 |>....N.0 .9900.Q|
00000B40: 13 BE 0F 44 54 24 B2 C8 28 4E 24 28 4E 29 2C 36 |...DT$..(N$(N),6|
00000B50: 29 00 81 13 C8 0F 99 22 4C 41 41 54 53 54 45 20 |)......"LAATSTE |
00000B60: 50 52 4F 47 52 41 4D 4D 41 20 49 53 20 56 41 4E |PROGRAMMA IS VAN|
00000B70: 20 22 3B 44 54 24 3A 4C B2 33 31 3A 8D 33 30 35 | ";DT$:L.31:.305|
00000B80: 30 00 A6 13 D2 0F 99 3A 99 22 49 4E 20 56 4F 4C |0......:."IN VOL|
00000B90: 47 4F 52 44 45 20 56 41 4E 3A 22 3A 4C B2 31 36 |GORDE VAN:":L.16|
00000BA0: 3A 8D 33 30 35 30 00 CA 13 DC 0F 99 3A 99 22 20 |:.3050......:." |
00000BB0: 31 3D 44 41 54 55 4D 20 28 56 4F 4C 47 45 4E 53 |1=DATUM (VOLGENS|
00000BC0: 20 42 45 53 54 41 4E 44 29 22 00 E6 13 E6 0F 99 | BESTAND)"......|
00000BD0: 3A 99 22 20 32 3D 44 49 53 4B 45 54 54 45 2D 4E |:." 2=DISKETTE-N|
00000BE0: 55 4D 4D 45 52 22 00 FF 13 F0 0F 99 3A 99 22 20 |UMMER"......:." |
00000BF0: 33 3D 41 41 4E 54 41 4C 20 42 59 54 45 53 22 00 |3=AANTAL BYTES".|
00000C00: 15 14 FA 0F 99 3A 99 22 20 34 3D 45 49 4E 44 45 |.....:." 4=EINDE|
00000C10: 22 3A 99 3A 99 00 45 14 04 10 99 22 45 52 20 5A |":.:..E...."ER Z|
00000C20: 49 4A 4E 20 4E 55 20 22 3B 4E 3B 22 20 50 52 4F |IJN NU ";N;" PRO|
00000C30: 47 52 2E 27 53 20 49 4E 20 48 45 54 20 42 45 53 |GR.'S IN HET BES|
00000C40: 54 41 4E 44 22 00 59 14 0E 10 4C B2 33 38 3A 8D |TAND".Y...L.38:.|
00000C50: 33 30 35 30 3A 8D 32 35 30 00 76 14 18 10 99 22 |3050:.250.v...."|
00000C60: 55 57 20 4B 45 55 5A 45 3A 20 22 3B 3A 8D 32 31 |UW KEUZE: ";:.21|
00000C70: 30 3A 99 49 4E 24 00 97 14 22 10 57 B2 C5 28 49 |0:.IN$...".W..(I|
00000C80: 4E 24 29 3A 8B 28 57 B3 31 29 20 B0 28 57 B1 34 |N$):.(W.1) .(W.4|
00000C90: 29 20 A7 34 30 30 30 00 B4 14 2C 10 91 57 20 89 |) .4000...,..W .|
00000CA0: 38 30 30 30 2C 38 30 32 30 2C 38 30 35 30 2C 31 |8000,8020,8050,1|
00000CB0: 30 30 30 30 00 C8 14 68 10 8F 20 46 4F 55 54 4D |0000...h.. FOUTM|
00000CC0: 45 4C 44 49 4E 47 45 4E 00 F4 14 72 10 8D 32 35 |ELDINGEN...r..25|
00000CD0: 30 3A 99 22 44 49 54 20 47 45 47 45 56 45 4E 20 |0:."DIT GEGEVEN |
00000CE0: 48 4F 4F 52 54 20 45 52 20 42 49 4A 21 22 3A 89 |HOORT ER BIJ!":.|
00000CF0: 34 34 30 30 00 FD 14 7C 10 8D 32 35 30 00 2B 15 |4400...|..250.+.|
00000D00: 86 10 99 22 4D 49 4E 53 54 45 4E 53 20 34 30 20 |..."MINSTENS 40 |
00000D10: 4B 41 52 41 4B 54 45 52 53 20 50 45 52 20 52 45 |KARAKTERS PER RE|
00000D20: 47 45 4C 21 22 3A 89 34 34 30 30 00 34 15 90 10 |GEL!":.4400.4...|
00000D30: 8D 32 35 30 00 5E 15 9A 10 99 22 4D 49 4E 53 54 |.250.^...."MINST|
00000D40: 45 4E 53 20 31 34 20 52 45 47 45 4C 53 20 50 45 |ENS 14 REGELS PE|
00000D50: 52 20 42 4C 41 44 21 22 3A 89 34 34 30 30 00 6E |R BLAD!":.4400.n|
00000D60: 15 30 11 8F 20 43 4F 52 52 45 43 54 49 45 00 91 |.0.. CORRECTIE..|
00000D70: 15 3A 11 81 49 B2 31 20 A4 31 30 30 30 3A 82 49 |.:..I.1 .1000:.I|
00000D80: 3A 54 31 B2 56 45 3A 8D 31 32 30 3A 54 32 B2 56 |:T1.VE:.120:T2.V|
00000D90: 45 00 B2 15 44 11 81 49 B2 54 31 20 A4 54 32 3A |E...D..I.T1 .T2:|
00000DA0: 56 45 B2 49 3A 8D 31 31 30 3A 8D 34 36 30 30 3A |VE.I:.110:.4600:|
00000DB0: 82 49 00 B8 15 4E 11 8E 00 E9 15 F8 11 99 22 20 |.I...N........" |
00000DC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000DD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000DE0: 20 20 20 20 20 20 22 3A 8E 00 FB 15 40 1F 5A 24 | ":....@.Z$|
00000DF0: B2 22 4F 50 20 44 41 54 55 4D 22 00 17 16 4A 1F |."OP DATUM"...J.|
00000E00: 81 49 B2 31 20 A4 4E 3A 5A 28 49 29 B2 49 3A 82 |.I.1 .N:Z(I).I:.|
00000E10: 49 3A 89 38 31 30 30 00 33 16 54 1F 5A 24 B2 22 |I:.8100.3.T.Z$."|
00000E20: 4F 50 20 44 49 53 4B 45 54 54 45 2D 4E 55 4D 4D |OP DISKETTE-NUMM|
00000E30: 45 52 22 00 4E 16 5E 1F 81 49 B2 31 20 A4 4E 3A |ER".N.^..I.1 .N:|
00000E40: 4C 24 B2 4E 24 28 49 29 3A 8D 33 32 30 30 00 6F |L$.N$(I):.3200.o|
00000E50: 16 68 1F 5A 5A 28 49 29 B2 C5 28 4D 34 24 29 3A |.h.ZZ(I)..(M4$):|
00000E60: 5A 28 49 29 B2 49 3A 82 49 3A 89 38 30 38 30 00 |Z(I).I:.I:.8080.|
00000E70: 88 16 72 1F 5A 24 B2 22 4F 50 20 41 41 4E 54 41 |..r.Z$."OP AANTA|
00000E80: 4C 20 42 59 54 45 53 22 00 A3 16 7C 1F 81 49 B2 |L BYTES"...|..I.|
00000E90: 31 20 A4 4E 3A 4C 24 B2 4E 24 28 49 29 3A 8D 33 |1 .N:L$.N$(I):.3|
00000EA0: 32 30 30 00 BE 16 86 1F 5A 5A 28 49 29 B2 C5 28 |200.....ZZ(I)..(|
00000EB0: 4D 33 24 29 3A 5A 28 49 29 B2 49 3A 82 49 00 D1 |M3$):Z(I).I:.I..|
00000EC0: 16 90 1F 52 B2 4E 3A 43 52 B2 35 3A 8D 32 31 30 |...R.N:CR.5:.210|
00000ED0: 30 00 F0 16 A4 1F 42 B2 30 3A 81 49 B2 31 20 A4 |0.....B.0:.I.1 .|
00000EE0: 4E 3A 4C 24 B2 4E 24 28 49 29 3A 8D 33 32 30 30 |N:L$.N$(I):.3200|
00000EF0: 00 02 17 AE 1F 42 B2 42 AA C5 28 4D 33 24 29 3A |.....B.B..(M3$):|
00000F00: 82 49 00 1D 17 08 20 8D 31 30 30 3A 4E 24 B2 4E |.I.... .100:N$.N|
00000F10: 32 24 3A 56 45 B2 30 3A 8D 33 30 30 30 00 35 17 |2$:VE.0:.3000.5.|
00000F20: 12 20 8D 32 35 30 3A 48 4F B2 30 3A 56 45 B2 33 |. .250:HO.0:VE.3|
00000F30: 3A 8D 31 31 30 00 59 17 1C 20 99 22 47 45 45 46 |:.110.Y.. ."GEEF|
00000F40: 20 44 41 54 55 4D 20 56 41 4E 44 41 41 47 20 28 | DATUM VANDAAG (|
00000F50: 56 4F 4C 55 49 54 29 3A 22 00 77 17 26 20 85 44 |VOLUIT):".w.& .D|
00000F60: 54 24 3A 8B 44 54 24 B2 22 22 20 A7 8D 34 32 31 |T$:.DT$."" ..421|
00000F70: 30 3A 89 38 32 31 30 00 8F 17 30 20 8D 32 35 30 |0:.8210...0 .250|
00000F80: 3A 48 4F B2 30 3A 56 45 B2 36 3A 8D 31 31 30 00 |:HO.0:VE.6:.110.|
00000F90: B8 17 3A 20 99 22 41 41 4E 54 41 4C 20 4B 41 52 |..: ."AANTAL KAR|
00000FA0: 41 4B 54 45 52 53 20 50 45 52 20 52 45 47 45 4C |AKTERS PER REGEL|
00000FB0: 3A 20 22 3B 3A 85 58 31 00 D0 17 44 20 8B 58 31 |: ";:.X1...D .X1|
00000FC0: B3 34 30 20 A7 8D 34 32 32 30 3A 89 38 32 34 30 |.40 ..4220:.8240|
00000FD0: 00 E8 17 4E 20 8D 32 35 30 3A 48 4F B2 30 3A 56 |...N .250:HO.0:V|
00000FE0: 45 B2 38 3A 8D 31 31 30 00 11 18 58 20 99 22 41 |E.8:.110...X ."A|
00000FF0: 41 4E 54 41 4C 20 52 45 47 45 4C 53 20 4F 50 20 |ANTAL REGELS OP |
00001000: 45 45 4E 20 42 4C 41 44 20 3A 20 22 3B 3A 85 58 |EEN BLAD : ";:.X|
00001010: 32 00 29 18 62 20 8B 58 32 B3 31 34 20 A7 8D 34 |2.).b .X2.14 ..4|
00001020: 32 34 30 3A 89 38 32 37 30 00 45 18 6C 20 53 31 |240:.8270.E.l S1|
00001030: B2 B5 28 58 31 AD 34 30 29 3A 8B 53 31 B1 33 20 |..(X1.40):.S1.3 |
00001040: A7 53 31 B2 33 00 74 18 76 20 99 3A 99 22 4D 45 |.S1.3.t.v .:."ME|
00001050: 54 20 22 3B 58 31 3B 22 20 4B 41 52 2E 20 4F 50 |T ";X1;" KAR. OP|
00001060: 20 45 45 4E 20 52 45 47 45 4C 20 4B 52 49 4A 47 | EEN REGEL KRIJG|
00001070: 54 20 55 22 00 A0 18 80 20 99 22 44 45 20 43 41 |T U".... ."DE CA|
00001080: 54 41 4C 4F 47 55 53 20 49 4E 20 4D 41 58 2E 22 |TALOGUS IN MAX."|
00001090: 3B 53 31 3B 22 20 4B 4F 4C 4F 4D 4D 45 4E 2E 22 |;S1;" KOLOMMEN."|
000010A0: 00 B9 18 8A 20 8D 32 35 30 3A 48 4F B2 30 3A 56 |.... .250:HO.0:V|
000010B0: 45 B2 31 33 3A 8D 31 31 30 00 E7 18 94 20 99 22 |E.13:.110.... ."|
000010C0: 48 4F 45 56 45 45 4C 20 4B 4F 4C 4F 4D 4D 45 4E |HOEVEEL KOLOMMEN|
000010D0: 20 57 49 4C 54 20 55 3F 20 28 31 2D 22 3B 53 31 | WILT U? (1-";S1|
000010E0: 3B 22 29 3A 20 22 3B 00 04 19 9E 20 8D 32 31 30 |;"): ";.... .210|
000010F0: 3A 99 49 4E 24 3A 53 4B B2 C5 28 49 4E 24 29 3A |:.IN$:SK..(IN$):|
00001100: 4C 52 B2 30 00 1F 19 A8 20 8B 28 53 4B B3 31 29 |LR.0.... .(SK.1)|
00001110: 20 B0 28 53 4B B1 53 31 29 20 A7 38 31 30 30 00 | .(SK.S1) .8100.|
00001120: 2D 19 B2 20 41 B2 B5 28 4E AD 53 4B 29 00 4D 19 |-.. A..(N.SK).M.|
00001130: BC 20 8B 41 B3 B1 4E AD 53 4B 20 A7 4E B2 4E AA |. .A..N.SK .N.N.|
00001140: 31 3A 8D 38 34 30 30 3A 89 38 33 37 30 00 57 19 |1:.8400:.8370.W.|
00001150: C6 20 89 38 34 32 30 00 8E 19 D0 20 4E 24 28 4E |. .8420.... N$(N|
00001160: 29 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |)." |
00001170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001180: 20 20 20 20 20 20 20 22 3A 8F 20 33 36 58 00 9C | ":. 36X..|
00001190: 19 DA 20 4C 52 B2 4C 52 AA 31 3A 8E 00 BF 19 E4 |.. LR.LR.1:.....|
000011A0: 20 52 54 24 B2 22 22 3A 52 54 B2 B5 28 28 58 31 | RT$."":RT..((X1|
000011B0: AB 34 30 AC 53 4B 29 AD 28 53 4B AA 31 29 29 00 |.40.SK).(SK.1)).|
000011C0: E1 19 EE 20 8B C3 28 52 54 24 29 B3 52 54 20 A7 |... ..(RT$).RT .|
000011D0: 52 54 24 B2 52 54 24 AA 22 20 22 3A 89 38 34 33 |RT$.RT$." ":.843|
000011E0: 30 00 F8 19 F8 20 52 4C B2 34 30 AC 53 4B AA 28 |0.... RL.40.SK.(|
000011F0: 53 4B AB 31 29 AC 52 54 00 17 1A 02 21 43 B2 31 |SK.1).RT....!C.1|
00001200: 3A 42 4C B2 30 3A 56 B2 58 32 AB 31 31 3A 42 54 |:BL.0:V.X2.11:BT|
00001210: B2 B5 28 41 AD 56 29 00 2F 1A 0C 21 8B 56 AC 42 |..(A.V)./..!.V.B|
00001220: 54 B3 B1 28 41 29 20 A7 42 54 B2 42 54 AA 31 00 |T..(A) .BT.BT.1.|
00001230: 4D 1A 16 21 44 B2 43 AA 56 AB 31 3A 8B 41 B3 56 |M..!D.C.V.1:.A.V|
00001240: 20 A7 56 B2 41 3A 44 B2 43 AA 56 AB 31 00 5F 1A | .V.A:D.C.V.1._.|
00001250: 20 21 8D 38 36 39 30 3A 81 49 B2 43 20 A4 44 00 | !.8690:.I.C .D.|
00001260: 7B 1A 2A 21 4C 24 B2 4E 24 28 5A 28 49 29 29 3A |{.*!L$.N$(Z(I)):|
00001270: 8D 33 32 30 30 3A 8D 38 39 30 30 00 9C 1A 34 21 |.3200:.8900...4!|
00001280: 4C 24 B2 52 54 24 AA 4C 24 3A 8B 53 4B B2 31 20 |L$.RT$.L$:.SK.1 |
00001290: A7 8D 38 38 38 30 3A 89 38 35 36 30 00 C1 1A 3E |..8880:.8560...>|
000012A0: 21 4C 31 24 B2 4C 24 3A 4C 24 B2 4E 24 28 5A 28 |!L1$.L$:L$.N$(Z(|
000012B0: 49 AA 56 29 29 3A 8D 33 32 30 30 3A 8D 38 39 30 |I.V)):.3200:.890|
000012C0: 30 00 D3 1A 48 21 4C 24 B2 4C 31 24 AA 52 54 24 |0...H!L$.L1$.RT$|
000012D0: AA 4C 24 00 EA 1A 52 21 8B 53 4B B2 32 20 A7 8D |.L$...R!.SK.2 ..|
000012E0: 38 38 38 30 3A 89 38 35 36 30 00 11 1B 5C 21 4C |8880:.8560...\!L|
000012F0: 31 24 B2 4C 24 3A 4C 24 B2 4E 24 28 5A 28 49 AA |1$.L$:L$.N$(Z(I.|
00001300: 56 AA 56 29 29 3A 8D 33 32 30 30 3A 8D 38 39 30 |V.V)):.3200:.890|
00001310: 30 00 29 1B 66 21 4C 24 B2 4C 31 24 AA 52 54 24 |0.).f!L$.L1$.RT$|
00001320: AA 4C 24 3A 8D 38 38 38 30 00 3D 1B 70 21 82 49 |.L$:.8880.=.p!.I|
00001330: 3A 4C 24 B2 4C 34 24 3A 8D 38 38 38 30 00 5F 1B |:L$.L4$:.8880._.|
00001340: 7A 21 43 B2 49 AA 28 53 4B AB 31 29 AC 56 3A 41 |z!C.I.(SK.1).V:A|
00001350: B2 41 AB 56 3A 8B 41 B2 30 20 A7 38 35 39 30 00 |.A.V:.A.0 .8590.|
00001360: 6F 1B 84 21 8D 38 39 31 30 3A 89 38 34 37 30 00 |o..!.8910:.8470.|
00001370: 8A 1B 8E 21 8B 4C 52 B2 30 20 A7 53 52 B2 4E 3A |...!.LR.0 .SR.N:|
00001380: 8D 33 30 30 3A 89 38 36 31 30 00 AB 1B 98 21 4E |.300:.8610....!N|
00001390: 24 28 4E 29 B2 22 22 3A 4E B2 4E AB 31 3A 4C 52 |$(N)."":N.N.1:LR|
000013A0: B2 4C 52 AB 31 3A 89 38 35 39 30 00 D8 1B A2 21 |.LR.1:.8590....!|
000013B0: 4C 24 B2 52 54 24 AA 22 41 41 4E 54 41 4C 20 50 |L$.RT$."AANTAL P|
000013C0: 52 4F 47 52 41 4D 4D 41 27 53 20 3A 20 22 AA 53 |ROGRAMMA'S : ".S|
000013D0: 52 24 3A 8D 38 38 38 30 00 E6 1B AC 21 53 52 B2 |R$:.8880....!SR.|
000013E0: 42 3A 8D 33 30 30 00 13 1C B6 21 4C 24 B2 52 54 |B:.300....!L$.RT|
000013F0: 24 AA 22 54 4F 54 41 41 4C 20 41 41 4E 54 41 4C |$."TOTAAL AANTAL|
00001400: 20 42 59 54 45 53 3A 20 22 AA 53 52 24 3A 8D 38 | BYTES: ".SR$:.8|
00001410: 38 38 30 00 31 1C C0 21 8D 31 30 30 3A 8D 32 35 |880.1..!.100:.25|
00001420: 30 3A 48 4F B2 30 3A 56 45 B2 31 31 3A 8D 31 31 |0:HO.0:VE.11:.11|
00001430: 30 00 5C 1C CA 21 99 22 57 49 4C 54 20 55 20 4E |0.\..!."WILT U N|
00001440: 4F 47 20 45 45 4E 53 20 44 45 5A 45 4C 46 44 45 |OG EENS DEZELFDE|
00001450: 20 50 52 49 4E 54 2D 4F 55 54 3F 22 00 78 1C D4 | PRINT-OUT?".x..|
00001460: 21 99 3A 99 22 28 4A 2F 4E 29 3A 20 22 3B 3A 8D |!.:."(J/N): ";:.|
00001470: 32 31 30 3A 99 49 4E 24 00 94 1C DE 21 8B 49 4E |210:.IN$....!.IN|
00001480: 24 B2 22 4A 22 20 B0 49 4E 24 B2 22 4A 22 20 A7 |$."J" .IN$."J" .|
00001490: 38 33 37 30 00 A3 1C E8 21 8D 32 37 30 3A 89 34 |8370....!.270:.4|
000014A0: 30 30 30 00 BA 1C F2 21 42 4C B2 42 4C AA 31 3A |000....!BL.BL.1:|
000014B0: 8F 20 4B 4F 50 52 45 47 45 4C 00 E4 1C FC 21 53 |. KOPREGEL....!S|
000014C0: 52 B2 42 4C 3A 8D 33 30 30 3A 4C 31 24 B2 53 52 |R.BL:.300:L1$.SR|
000014D0: 24 3A 53 52 B2 42 54 3A 8D 33 30 30 3A 4C 32 24 |$:SR.BT:.300:L2$|
000014E0: B2 53 52 24 00 0F 1D 06 22 4C 24 B2 22 42 4C 41 |.SR$...."L$."BLA|
000014F0: 44 3A 22 AA 4C 31 24 AA 22 20 56 41 4E 3A 22 AA |D:".L1$." VAN:".|
00001500: 4C 32 24 3A 4C B2 52 4C AB C3 28 44 54 24 29 00 |L2$:L.RL..(DT$).|
00001510: 33 1D 10 22 8D 38 38 34 30 3A 4C 24 B2 52 54 24 |3..".8840:L$.RT$|
00001520: AA 44 54 24 AA 4C 24 3A 8D 38 38 38 30 3A 8D 38 |.DT$.L$:.8880:.8|
00001530: 38 38 30 00 5C 1D 1A 22 4C 24 B2 4E 31 24 3A 4C |880.\.."L$.N1$:L|
00001540: B2 52 54 AA 28 52 4C AA C3 28 4C 24 29 29 AD 32 |.RT.(RL..(L$)).2|
00001550: 3A 8D 38 38 34 30 3A 8D 38 38 38 30 00 76 1D 24 |:.8840:.8880.v.$|
00001560: 22 4C 24 B2 22 2D 22 3A 4C B2 C3 28 4E 31 24 29 |"L$."-":L..(N1$)|
00001570: 3A 8D 38 38 36 30 00 99 1D 2E 22 4C B2 52 54 AA |:.8860...."L.RT.|
00001580: 28 52 4C AA C3 28 4E 31 24 29 29 AD 32 3A 8D 38 |(RL..(N1$)).2:.8|
00001590: 38 34 30 3A 8D 38 38 38 30 00 C1 1D 38 22 8D 38 |840:.8880...8".8|
000015A0: 38 38 30 3A 4C 24 B2 22 56 4F 4C 47 4F 52 44 45 |880:L$."VOLGORDE|
000015B0: 3A 20 22 AA 5A 24 3A 4C B2 52 54 AA C3 28 4C 24 |: ".Z$:L.RT..(L$|
000015C0: 29 00 DD 1D 42 22 8D 38 38 34 30 3A 8D 38 38 38 |)...B".8840:.888|
000015D0: 30 3A 4C 24 B2 22 2D 22 3A 4C B2 52 4C 00 FE 1D |0:L$."-":L.RL...|
000015E0: 4C 22 8D 38 38 36 30 3A 4C 24 B2 52 54 24 AA 4C |L".8860:L$.RT$.L|
000015F0: 24 3A 4C 34 24 B2 4C 24 3A 8D 38 38 38 30 00 31 |$:L4$.L$:.8880.1|
00001600: 1E 56 22 4C 35 24 B2 22 44 41 54 55 4D 20 20 50 |.V"L5$."DATUM P|
00001610: 52 4F 47 52 41 4D 4D 41 2D 4E 41 41 4D 20 20 20 |ROGRAMMA-NAAM |
00001620: 20 20 20 20 20 20 42 59 54 45 53 20 44 53 4B 20 | BYTES DSK |
00001630: 22 00 47 1E 60 22 8B 53 4B B2 31 20 A7 4C 24 B2 |".G.`".SK.1 .L$.|
00001640: 52 54 24 AA 4C 35 24 00 65 1E 6A 22 8B 53 4B B2 |RT$.L5$.e.j".SK.|
00001650: 32 20 A7 4C 24 B2 52 54 24 AA 4C 35 24 AA 52 54 |2 .L$.RT$.L5$.RT|
00001660: 24 AA 4C 35 24 00 8B 1E 74 22 8B 53 4B B2 33 20 |$.L5$...t".SK.3 |
00001670: A7 4C 24 B2 52 54 24 AA 4C 35 24 AA 52 54 24 AA |.L$.RT$.L5$.RT$.|
00001680: 4C 35 24 AA 52 54 24 AA 4C 35 24 00 A4 1E 7E 22 |L5$.RT$.L5$...~"|
00001690: 8D 38 38 38 30 3A 4C 24 B2 4C 34 24 3A 8D 38 38 |.8880:L$.L4$:.88|
000016A0: 38 30 3A 8E 00 C2 1E 88 22 8B C3 28 4C 24 29 B3 |80:....."..(L$).|
000016B0: 4C 20 A7 4C 24 B2 22 20 22 AA 4C 24 3A 89 38 38 |L .L$." ".L$:.88|
000016C0: 34 30 00 C8 1E 92 22 8E 00 E6 1E 9C 22 8B C3 28 |40...."....."..(|
000016D0: 4C 24 29 B3 4C 20 A7 4C 24 B2 4C 24 AA 22 2D 22 |L$).L .L$.L$."-"|
000016E0: 3A 89 38 38 36 30 00 EC 1E A6 22 8E 00 01 1F B0 |:.8860....".....|
000016F0: 22 53 52 24 B2 4C 24 3A 8D 33 35 30 3A 8D 33 36 |"SR$.L$:.350:.36|
00001700: 30 00 0D 1F BA 22 4C 24 B2 22 22 3A 8E 00 36 1F |0...."L$."":..6.|
00001710: C4 22 4C 24 B2 4D 31 24 AA 22 20 22 AA 4D 32 24 |."L$.M1$." ".M2$|
00001720: AA 22 20 22 AA 4D 33 24 AA 22 20 22 AA 4D 34 24 |." ".M3$." ".M4$|
00001730: AA 22 20 22 3A 8E 00 54 1F CE 22 8D 31 30 30 3A |." ":..T..".100:|
00001740: 8D 32 35 30 3A 48 4F B2 35 3A 56 45 B2 31 32 3A |.250:HO.5:VE.12:|
00001750: 8D 31 31 30 00 7E 1F D8 22 99 22 55 20 4B 55 4E |.110.~.."."U KUN|
00001760: 54 20 4E 55 20 45 45 4E 20 42 4C 41 44 20 57 49 |T NU EEN BLAD WI|
00001770: 53 53 45 4C 45 4E 21 22 3A 8D 33 31 30 30 00 9D |SSELEN!":.3100..|
00001780: 1F E2 22 8D 31 30 30 3A 8D 32 35 30 3A 48 4F B2 |..".100:.250:HO.|
00001790: 31 33 3A 56 45 B2 31 32 3A 8D 31 31 30 00 B4 1F |13:VE.12:.110...|
000017A0: EC 22 99 22 49 4B 20 42 45 4E 20 42 45 5A 49 47 |."."IK BEN BEZIG|
000017B0: 21 22 3A 8E 00 CD 1F AC 26 8D 32 35 30 3A 48 4F |!":.....&.250:HO|
000017C0: B2 34 3A 56 45 B2 31 32 3A 8D 31 31 30 00 F4 1F |.4:VE.12:.110...|
000017D0: B6 26 99 22 47 45 45 4E 20 50 52 4F 47 52 41 4D |.&."GEEN PROGRAM|
000017E0: 4D 41 27 53 20 49 4E 20 48 45 54 20 42 45 53 54 |MA'S IN HET BEST|
000017F0: 41 4E 44 22 00 00 20 C0 26 8D 33 31 30 30 3A 80 |AND".. .&.3100:.|
00001800: 00 1B 20 10 27 8D 31 30 30 3A 4E 24 B2 4E 31 24 |.. .'.100:N$.N1$|
00001810: 3A 56 45 B2 30 3A 8D 33 30 30 30 00 2F 20 1A 27 |:VE.0:.3000./ .'|
00001820: 81 49 B2 31 20 A4 35 3A 8D 32 35 30 3A 82 49 00 |.I.1 .5:.250:.I.|
00001830: 43 20 24 27 48 4F B2 36 3A 56 45 B2 31 32 3A 8D |C $'HO.6:VE.12:.|
00001840: 31 31 30 00 66 20 2E 27 99 22 53 55 43 43 45 53 |110.f .'."SUCCES|
00001850: 20 45 4E 20 54 4F 54 20 57 45 44 45 52 48 4F 52 | EN TOT WEDERHOR|
00001860: 45 4E 21 22 3A 80 00 8F 20 20 4E 8D 31 30 30 3A |EN!":... N.100:|
00001870: 4E 24 B2 22 42 45 53 54 41 4E 44 20 49 4E 4C 45 |N$."BESTAND INLE|
00001880: 5A 45 4E 22 3A 56 45 B2 30 3A 8D 33 30 30 30 00 |ZEN":VE.0:.3000.|
00001890: B0 20 84 4E 99 3A 99 22 49 4E 20 54 45 20 4C 45 |. .N.:."IN TE LE|
000018A0: 5A 45 4E 3A 22 3A 4C B2 31 32 3A 8D 33 30 35 30 |ZEN:":L.12:.3050|
000018B0: 00 BB 20 8E 4E 8D 32 32 30 30 30 00 C5 20 98 4E |.. .N.22000.. .N|
000018C0: 8D 33 31 30 30 00 CF 20 78 50 4E B2 4E AA 41 00 |.3100.. xPN.N.A.|
000018D0: E3 20 82 50 81 49 B2 31 20 A4 35 3A 8D 32 35 30 |. .P.I.1 .5:.250|
000018E0: 3A 82 49 00 0C 21 8C 50 99 3A 99 22 57 49 4C 54 |:.I..!.P.:."WILT|
000018F0: 20 55 20 4E 4F 47 20 45 45 4E 20 42 45 53 54 41 | U NOG EEN BESTA|
00001900: 4E 44 20 49 4E 4C 45 5A 45 4E 3F 22 00 28 21 96 |ND INLEZEN?".(!.|
00001910: 50 99 3A 99 22 28 4A 2F 4E 29 3A 20 22 3B 3A 8D |P.:."(J/N): ";:.|
00001920: 32 31 30 3A 99 49 4E 24 00 45 21 A0 50 8B 49 4E |210:.IN$.E!.P.IN|
00001930: 24 B2 22 4A 22 20 B0 49 4E 24 B2 22 4A 22 20 A7 |$."J" .IN$."J" .|
00001940: 32 30 30 30 30 00 67 21 A5 50 8B 28 49 4E 24 B2 |20000.g!.P.(IN$.|
00001950: 22 4E 22 20 B0 49 4E 24 B2 22 4E 22 29 20 AF 28 |"N" .IN$."N") .(|
00001960: 4E B2 30 29 20 A7 8E 00 87 21 AA 50 8B 49 4E 24 |N.0) ....!.P.IN$|
00001970: B2 22 4E 22 20 B0 49 4E 24 B2 22 4E 22 20 A7 8D |."N" .IN$."N" ..|
00001980: 32 30 36 37 30 3A 8E 00 92 21 B4 50 89 32 30 36 |20670:...!.P.206|
00001990: 31 30 00 A7 21 BE 50 52 B2 4E 3A 43 52 B2 34 3A |10..!.PR.N:CR.4:|
000019A0: 8D 32 30 30 30 3A 8E 00 D2 21 F0 55 99 3A 99 22 |.2000:...!.U.:."|
000019B0: 20 41 20 3D 20 41 41 4E 54 41 4C 20 52 45 43 4F | A = AANTAL RECO|
000019C0: 52 44 53 20 56 41 4E 20 31 20 42 45 53 54 41 4E |RDS VAN 1 BESTAN|
000019D0: 44 22 00 02 22 FA 55 99 3A 99 22 20 4E 20 3D 20 |D"..".U.:." N = |
000019E0: 41 41 4E 54 41 4C 20 52 45 43 4F 52 44 53 20 56 |AANTAL RECORDS V|
000019F0: 41 4E 20 41 4C 4C 45 20 42 45 53 54 41 4E 44 45 |AN ALLE BESTANDE|
00001A00: 4E 22 00 1D 22 04 56 99 3A 99 22 20 46 4F 52 20 |N"..".V.:." FOR |
00001A10: 49 3D 4E 2B 31 20 54 4F 20 4E 2B 41 22 00 36 22 |I=N+1 TO N+A".6"|
00001A20: 0E 56 99 3A 99 22 20 4E 24 28 49 29 20 3D 20 52 |.V.:." N$(I) = R|
00001A30: 45 43 4F 52 44 22 00 61 22 18 56 99 3A 99 22 4C |ECORD".a".V.:."L|
00001A40: 45 4E 47 54 45 20 52 45 43 4F 52 44 20 41 4C 54 |ENGTE RECORD ALT|
00001A50: 49 4A 44 20 33 36 20 4B 41 52 41 4B 54 45 52 53 |IJD 36 KARAKTERS|
00001A60: 22 00 90 22 22 56 99 3A 99 22 4C 45 45 53 20 57 |"..""V.:."LEES W|
00001A70: 41 54 20 4F 50 20 52 45 47 45 4C 53 20 32 30 30 |AT OP REGELS 200|
00001A80: 30 30 2D 32 33 30 30 30 20 53 54 41 41 54 21 22 |00-23000 STAAT!"|
00001A90: 00 A1 22 2C 56 4C B2 33 37 3A 8D 33 30 35 30 3A |..",VL.37:.3050:|
00001AA0: 8E 00 AA 22 A8 61 83 32 30 32 00 C5 22 30 75 8F |...".a.202.."0u.|
00001AB0: 20 48 4F 42 42 59 53 43 4F 4F 50 2D 42 41 53 49 | HOBBYSCOOP-BASI|
00001AC0: 43 4F 44 45 32 00 E0 22 3A 75 8F 20 2A 20 20 20 |CODE2..":u. * |
00001AD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2A | *|
00001AE0: 00 FB 22 44 75 8F 20 2A 20 20 20 20 43 41 54 41 |.."Du. * CATA|
00001AF0: 4C 4F 47 55 53 20 20 20 20 20 2A 00 16 23 4E 75 |LOGUS *..#Nu|
00001B00: 8F 20 2A 20 20 42 43 2D 50 52 4F 47 52 41 4D 4D |. * BC-PROGRAMM|
00001B10: 41 27 53 20 20 2A 00 31 23 58 75 8F 20 20 20 20 |A'S *.1#Xu. |
00001B20: 20 20 44 49 56 2E 50 52 49 4E 54 53 20 20 20 20 | DIV.PRINTS |
00001B30: 2A 00 39 23 62 75 8F 20 50 00 54 23 6C 75 8F 20 |*.9#bu. P.T#lu. |
00001B40: 4F 20 49 4E 47 45 5A 4F 4E 44 45 4E 20 44 4F 4F |O INGEZONDEN DOO|
00001B50: 52 20 20 31 00 6F 23 76 75 8F 20 53 20 20 20 20 |R 1.o#vu. S |
00001B60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 00 | 2.|
00001B70: 8A 23 80 75 8F 20 54 20 42 2E 50 2E 4D 2E 52 49 |.#.u. T B.P.M.RI|
00001B80: 4E 54 4A 45 4D 41 20 20 20 30 00 A5 23 8A 75 8F |NTJEMA 0..#.u.|
00001B90: 20 42 20 54 55 49 4E 53 54 52 41 41 54 20 31 33 | B TUINSTRAAT 13|
00001BA0: 20 20 20 20 30 00 BC 23 94 75 8F 20 55 20 35 38 | 0..#.u. U 58|
00001BB0: 30 32 20 41 44 20 56 45 4E 52 41 59 00 D7 23 9E |02 AD VENRAY..#.|
00001BC0: 75 8F 20 53 20 20 20 20 20 20 20 20 20 20 20 20 |u. S |
00001BD0: 20 20 20 20 20 20 2A 00 F2 23 A8 75 8F 20 20 20 | *..#.u. |
00001BE0: 20 45 49 47 45 4E 20 4F 4E 54 57 45 52 50 20 20 | EIGEN ONTWERP |
00001BF0: 20 2A 00 0D 24 B2 75 8F 20 2A 20 20 20 20 44 45 | *..$.u. * DE|
00001C00: 43 2E 20 31 39 38 33 20 20 20 20 20 2A 00 28 24 |C. 1983 *.($|
00001C10: BC 75 8F 20 2A 20 20 20 20 20 49 54 54 2D 32 30 |.u. * ITT-20|
00001C20: 32 30 20 20 20 20 20 2A 00 43 24 C6 75 8F 20 2A |20 *.C$.u. *|
00001C30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001C40: 20 20 2A 00 5E 24 D0 75 8F 20 2A 2A 2A 2A 20 48 | *.^$.u. **** H|
00001C50: 49 4C 56 45 52 53 55 4D 20 2A 2A 2A 2A 2A 00 64 |ILVERSUM *****.d|
00001C60: 24 DA 75 8F 00 82 24 E4 75 8F 20 43 4F 50 59 52 |$.u...$.u. COPYR|
00001C70: 49 47 48 54 20 4E 4F 53 20 48 49 4C 56 45 52 53 |IGHT NOS HILVERS|
00001C80: 55 4D 00 00 00 |UM... |
.......1000......1010.!.D..".";:..Q.N..H
(".........................",.(.(VE.1)))
;.A.P....(HO));:....X.HO.B(209).256.B(21
0).1024.B(211)...Y.VE..(HO.40):HO.HO.40.
VE:....H..IN$:..D.R..IN$:.IN$."".210.J..
........54296,15:.54278,255:.54273,95:.5
4276,17......OO.1.200:.OO.*....54276,0:.
54277,0:.54278,0:..8...RV..(1):..F...FR.
.(0):..O.,.SR$.D(SR):.H(SR$,1)." ".SR$.J
(SR$,2).U.-.....6.SR$."":.SR..10.(CT.CN.
.(CN)).318...7..SR...5.10..CN.SR$."-"...
8.SR$.SR$.J(D(.(.(SR)..5.10..CN)),2)...9
..C(SR$).CT.CN.(CN..0).SR$." ".SR$:.313.
!.:..CN.0..(SR)..1E10.316.U.;.SR$.SR$.J(
D(1..(SR)..(.(SR))..5.10..CN),3,CN.1).U.
<..C(SR$).CT.SR$.SR$." ":.316...=..C(SR$
).CT.SR$.""...>..C(SR$).CT.SR$.SR$."*":.
318...?...G.^..4,4:.4,SR$;: 4:..X.H..4,4
:.4: 4:.......3500:.20:. BESTAND-DEEL-3.
...N1$."CATALOGUS BASICODE PROGRAMMA'S"
.C...N2$."PRINT-OUTS (MET PRINTER)".T...
DT$."010170".I....A.0 ..100:.3600.U....N
$(NR)...$..ZZ(NR),Z(NR)...8..CR.1 ..A(NR
,12).....A.0:N.0:.20000:.3800...P..100:N
$."SORTEREN OP CONVERSIE-DATUM"...Z.VE.0
:.3000:N$."MET SHELL-METZNER-SORT".....V
E.2:.3000:..I...."- DATUM CONVERTEREN EN
IN INDEX ZETTEN".I....250:.I.1 .N:L$.N$
(I):.3200.....L$.M1$:.2500:ZZ(I).SS:.I..
.4..:."- SORTEREN"...>..250:M.R...H.M..(
M.2):.M.0 .2240.M.R.J.1:K.R.M.U.\.H.J...
F.V.H.M...P..ZZ(H)..ZZ(V) .2220...Z.ZZ(0
).ZZ(H):ZZ(H).ZZ(V):ZZ(V).ZZ(0).H....CR.
4 .Z$.N$(H):N$(H).N$(V):N$(V).Z$.Q....CR
.5 .Z(0).Z(H):Z(H).Z(V):Z(V).Z(0).....H.
H.M:.H.1 .2220......2150.....J.J.1:.J.K
.2120......2140......250:.:."GEREED! - N
U: GARBAGE COLLECTION"...J..270:....D..
DATUM CONVERTEREN...N.DD.E(J(L$,1,2)).).
X.MM.E(J(L$,3,2)).=...JJ.E(J(L$,5,2)).Z.
..SS.365.JJ.DD:.MM.3 .2560.Y...SS.SS..(M
M..4.2.3):JJ.JJ.1.....SS.SS..(MM.31.((JJ
.1).4)):....... KOPPEN CENTREREN.K.B.X$.
"-":HO.(40.C(N$)).2...L..C(X$).C(N$) .X$
.X$."-":.3020...V.HO.HO.1:.110:.N$.....V
E.VE.1:.110:.X$:..6...X$."-":. STREEP ER
ONDER.T....C(X$).L .X$.X$."-":.3060.^..
..X$:..W....250:HO.0:VE.23:.110...&.."DR
UK EEN TOETS IN ...";...0..210:.:....N..
250:HO.0:VE.23:.110...X.."T=TERUG/S=STOP
PEN/V=VERDER ...";...B..210:.:....... ST
RING UITEENHALEN.....M1$.J(L$,1,6).-...M
2$.J(L$,7,22).@...M3$.J(L$,29,5).S...M4$
.J(L$,34,3).Y.........N1$."CATALOGUS BAS
ICODE PROGRAMMA'S"......100:N$.N1$:VE.0:
.3000......250:HO.3:VE.8:.110...J.."HEBT
U DE TOELICHTING GELEZEN?"...T.VE.10:.1
10:."(J/N): ";:.210:.IN$......IN$."J" .I
N$."J" .3600.;....100:.250:HO.11:VE.12:.
110.W...."DOE DAT DAN EERST!":..P....250
:HO.3:VE.14:.110......"MOET U EEN BESTAN
D !! NUMERIEK !!"...$.HO.3:VE.16:.110.P.
..."OPSLAAN? (J/N): ";:.210:.IN$...8.CR.
0:.IN$."J" .IN$."J" .CR.1...B.. BEREKENI
NG 'A' VAN 'CLEAR A'...L..:.NR.=.V.A.(36
.3).NR:. PROGR.REGELS.B.`.A.A.((4).(4)).
NR:. SORTEER-VAR'S..J..CR.1 .A.A.(12.1)
.(4).NR...T... .X..100:N$.N1$:VE.0:.3000
.....N$.N2$:VE.2:.3000:VE.12.P....I.1 .5
:.250:.I.....N$."ZET UW PRINTER NU AAN!"
:.3000:.3100... ..100:N$.N1$:VE.0:.3000.
/...N$.N2$:VE.2:.3000:..>....N.0 .9900.Q
...DT$.H(N$(N),6)...H.."LAATSTE PROGRAMM
A IS VAN ";DT$:L.31:.3050...R..:."IN VOL
GORDE VAN:":L.16:.3050.J....:." 1=DATUM
(VOLGENS BESTAND)"......:." 2=DISKETTE-N
UMMER"......:." 3=AANTAL BYTES"......:."
4=EINDE":.:..E...."ER ZIJN NU ";N;" PRO
GR.'S IN HET BESTAND".Y...L.38:.3050:.25
0.V...."UW KEUZE: ";:.210:.IN$...".W.E(I
N$):.(W.1) .(W.4) .4000...,..W .8000,802
0,8050,10000.H.H.. FOUTMELDINGEN...R..25
0:."DIT GEGEVEN HOORT ER BIJ!":.4400...|
..250.+...."MINSTENS 40 KARAKTERS PER RE
GEL!":.4400.4....250.^...."MINSTENS 14 R
EGELS PER BLAD!":.4400.N.0.. CORRECTIE..
.:..I.1 .1000:.I:T1.VE:.120:T2.VE...D..I
.T1 .T2:VE.I:.110:.4600:.I...N........"
":
....@.Z$."OP DATUM"...J..I.1 .N:Z(I).I:.
I:.8100.3.T.Z$."OP DISKETTE-NUMMER".N.^.
.I.1 .N:L$.N$(I):.3200.O.H.ZZ(I).E(M4$):
Z(I).I:.I:.8080...R.Z$."OP AANTAL BYTES"
...|..I.1 .N:L$.N$(I):.3200.....ZZ(I).E(
M3$):Z(I).I:.I.Q...R.N:CR.5:.2100.....B.
0:.I.1 .N:L$.N$(I):.3200.....B.B.E(M3$):
.I.... .100:N$.N2$:VE.0:.3000.5.. .250:H
O.0:VE.3:.110.Y.. ."GEEF DATUM VANDAAG (
VOLUIT):".W.& .DT$:.DT$."" ..4210:.8210.
..0 .250:HO.0:VE.6:.110...: ."AANTAL KAR
AKTERS PER REGEL: ";:.X1.P.D .X1.40 ..42
20:.8240...N .250:HO.0:VE.8:.110...X ."A
ANTAL REGELS OP EEN BLAD : ";:.X2.).B .X
2.14 ..4240:.8270.E.L S1..(X1.40):.S1.3
.S1.3.T.V .:."MET ";X1;" KAR. OP EEN REG
EL KRIJGT U". .. ."DE CATALOGUS IN MAX."
;S1;" KOLOMMEN.".... .250:HO.0:VE.13:.11
0.... ."HOEVEEL KOLOMMEN WILT U? (1-";S1
;"): ";.... .210:.IN$:SK.E(IN$):LR.0....
.(SK.1) .(SK.S1) .8100.-.. A..(N.SK).M.
. .A..N.SK .N.N.1:.8400:.8370.W.F .8420.
..P N$(N)."
":. 36X...Z LR.LR.1:..... RT$."":
RT..((X1.40.SK).(SK.1)).... .C(RT$).RT .
RT$.RT$." ":.8430.... RL.40.SK.(SK.1).RT
....!C.1:BL.0:V.X2.11:BT..(A.V)./..!.V.B
T..(A) .BT.BT.1.M..!D.C.V.1:.A.V .V.A:D.
C.V.1._. !.8690:.I.C .D.{.*!L$.N$(Z(I)):
.3200:.8900...4!L$.RT$.L$:.SK.1 ..8880:.
8560.A.>!L1$.L$:L$.N$(Z(I.V)):.3200:.890
0.S.H!L$.L1$.RT$.L$...R!.SK.2 ..8880:.85
60...\!L1$.L$:L$.N$(Z(I.V.V)):.3200:.890
0.).F!L$.L1$.RT$.L$:.8880.=.P!.I:L$.L4$:
.8880._.Z!C.I.(SK.1).V:A.A.V:.A.0 .8590.
O..!.8910:.8470....!.LR.0 .SR.N:.300:.86
10....!N$(N)."":N.N.1:LR.LR.1:.8590.X..!
L$.RT$."AANTAL PROGRAMMA'S : ".SR$:.8880
....!SR.B:.300....!L$.RT$."TOTAAL AANTAL
BYTES: ".SR$:.8880.1..!.100:.250:HO.0:V
E.11:.110.\.J!."WILT U NOG EENS DEZELFDE
PRINT-OUT?".X.T!.:."(J/N): ";:.210:.IN$
....!.IN$."J" .IN$."J" .8370....!.270:.4
000....!BL.BL.1:. KOPREGEL....!SR.BL:.30
0:L1$.SR$:SR.BT:.300:L2$.SR$...."L$."BLA
D:".L1$." VAN:".L2$:L.RL.C(DT$).3..".884
0:L$.RT$.DT$.L$:.8880:.8880.\.."L$.N1$:L
.RT.(RL.C(L$)).2:.8840:.8880.V.$"L$."-":
L.C(N1$):.8860...."L.RT.(RL.C(N1$)).2:.8
840:.8880.A.8".8880:L$."VOLGORDE: ".Z$:L
.RT.C(L$)...B".8840:.8880:L$."-":L.RL...
L".8860:L$.RT$.L$:L4$.L$:.8880.1.V"L5$."
DATUM PROGRAMMA-NAAM BYTES DSK
".G.`".SK.1 .L$.RT$.L5$.E.J".SK.2 .L$.RT
$.L5$.RT$.L5$...T".SK.3 .L$.RT$.L5$.RT$.
L5$.RT$.L5$...~".8880:L$.L4$:.8880:..B..
".C(L$).L .L$." ".L$:.8840.H..".....".C(
L$).L .L$.L$."-":.8860...."....."SR$.L$:
.350:.360...."L$."":..6.D"L$.M1$." ".M2$
." ".M3$." ".M4$." ":..T.N".100:.250:HO.
5:VE.12:.110.~.X"."U KUNT NU EEN BLAD WI
SSELEN!":.3100....".100:.250:HO.13:VE.12
:.110...."."IK BEN BEZIG!":..M..&.250:HO
.4:VE.12:.110....&."GEEN PROGRAMMA'S IN
HET BESTAND".. .&.3100:... .'.100:N$.N1$
:VE.0:.3000./ .'.I.1 .5:.250:.I.C $'HO.6
:VE.12:.110.F .'."SUCCES EN TOT WEDERHOR
EN!":... N.100:N$."BESTAND INLEZEN":VE.
0:.3000.. .N.:."IN TE LEZEN:":L.12:.3050
.. .N.22000.E .N.3100.O XPN.N.A.. .P.I.1
.5:.250:.I..!.P.:."WILT U NOG EEN BESTA
ND INLEZEN?".(!.P.:."(J/N): ";:.210:.IN$
.E! P.IN$."J" .IN$."J" .20000.G!.P.(IN$.
"N" .IN$."N") .(N.0) ....!.P.IN$."N" .IN
$."N" ..20670:...!.P.20610..!.PR.N:CR.4:
.2000:..R!.U.:." A = AANTAL RECORDS VAN
1 BESTAND"..".U.:." N = AANTAL RECORDS V
AN ALLE BESTANDEN"..".V.:." FOR I=N+1 TO
N+A".6".V.:." N$(I) = RECORD".A".V.:."L
ENGTE RECORD ALTIJD 36 KARAKTERS"..""V.:
."LEES WAT OP REGELS 20000-23000 STAAT!"
..",VL.37:.3050:...".A.202.E"0U. HOBBYSC
OOP-BASICODE2..":U. * *
.."DU. * CATALOGUS *..#NU. * BC-
PROGRAMMA'S *.1#XU. DIV.PRINTS
*.9#BU. P.T#LU. O INGEZONDEN DOOR 1.O#V
U. S 2..#.U. T B.P.M.RI
NTJEMA 0..#.U. B TUINSTRAAT 13 0..#
.U. U 5802 AD VENRAY.W#.U. S
*..#.U. EIGEN ONTWERP *..$.U.
* DEC. 1983 *.($.U. * ITT-20
20 *.C$FU. * *.^$PU
. **** HILVERSUM *****.D$ZU...$.U. COPYR
IGHT NOS HILVERSUM...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL