XB-MAIL.40
FILE INFORMATION
FILENAME(S): XB-MAIL.40
FILE TYPE(S): PRG
FILE SIZE: 9.4K
FIRST SEEN: 2025-11-30 21:11:25
APPEARS ON: 1 disk(s)
FILE HASH
14f302354a72f2eea54cfaca5b78da8e1d699dcd3d28a52314283638038d0e56
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BASIC UITBR 1 | XB-MAIL.40 | PRG | DuncanTwain | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 00 00 8B 45 58 49 54 B2 31 89 31 30 |.......EXIT.1.10|
00000010: 32 30 00 1D 08 01 00 45 58 49 54 B2 31 00 2A 08 |20.....EXIT.1.*.|
00000020: 0A 00 91 F0 89 36 30 30 30 30 00 33 08 14 00 89 |.....60000.3....|
00000030: 34 30 30 00 39 08 62 00 27 00 3F 08 63 00 27 00 |400.9.b.'.?.c.'.|
00000040: 60 08 64 00 A1 48 31 24 3A 8B 48 31 24 B2 22 22 |`.d..H1$:.H1$.""|
00000050: 89 31 30 30 EF 48 31 B2 C5 28 48 31 24 29 3A 8E |.100.H1..(H1$):.|
00000060: 00 66 08 96 00 27 00 87 08 C8 00 E7 31 30 38 2C |.f...'......108,|
00000070: 50 54 24 3B 3A EA 48 31 24 2C 31 3A 48 31 B2 C5 |PT$;:.H1$,1:H1..|
00000080: 28 48 31 24 29 3A 8E 00 8D 08 2B 01 27 00 C7 08 |(H1$):....+.'...|
00000090: 2C 01 4C B2 C3 28 49 4E 24 29 3A 81 4A B2 31 A4 |,.L..(IN$):.J.1.|
000000A0: 4C 3A 41 53 24 B2 CA 28 49 4E 24 2C 4A 2C 31 29 |L:AS$..(IN$,J,1)|
000000B0: 3A 41 53 B2 C6 28 41 53 24 29 3A 8B 41 53 B3 36 |:AS..(AS$):.AS.6|
000000C0: 30 89 33 33 30 EF 82 00 D4 08 36 01 4C B2 C3 28 |0.330.....6.L..(|
000000D0: 49 4E 24 29 00 F8 08 40 01 81 4A B2 31 A4 4C 3A |IN$)...@..J.1.L:|
000000E0: 41 53 24 B2 CA 28 49 4E 24 2C 4A 2C 31 29 3A 41 |AS$..(IN$,J,1):A|
000000F0: 53 B2 C6 28 41 53 24 29 00 2A 09 4A 01 8B 41 53 |S..(AS$).*.J..AS|
00000100: B2 33 34 49 4E 24 B2 C8 28 49 4E 24 2C 4A AB 31 |.34IN$..(IN$,J.1|
00000110: 29 AA C7 28 39 38 29 AA C9 28 49 4E 24 2C 4C AB |)..(98)..(IN$,L.|
00000120: 4A 29 3A E6 82 3A 89 33 32 30 00 5D 09 54 01 8B |J):..:.320.].T..|
00000130: 41 53 B2 34 34 49 4E 24 B2 C8 28 49 4E 24 2C 4A |AS.44IN$..(IN$,J|
00000140: AB 31 29 AA C7 28 31 30 38 29 AA C9 28 49 4E 24 |.1)..(108)..(IN$|
00000150: 2C 4C AB 4A 29 3A E6 82 3A 89 33 32 30 00 90 09 |,L.J):..:.320...|
00000160: 5E 01 8B 41 53 B2 35 39 49 4E 24 B2 C8 28 49 4E |^..AS.59IN$..(IN|
00000170: 24 2C 4A AB 31 29 AA C7 28 31 32 33 29 AA C9 28 |$,J.1)..(123)..(|
00000180: 49 4E 24 2C 4C AB 4A 29 3A E6 82 3A 89 33 32 30 |IN$,L.J):..:.320|
00000190: 00 C3 09 68 01 8B 41 53 B2 35 38 49 4E 24 B2 C8 |...h..AS.58IN$..|
000001A0: 28 49 4E 24 2C 4A AB 31 29 AA C7 28 31 32 32 29 |(IN$,J.1)..(122)|
000001B0: AA C9 28 49 4E 24 2C 4C AB 4A 29 3A E6 82 3A 89 |..(IN$,L.J):..:.|
000001C0: 33 32 30 00 CB 09 72 01 82 3A 8E 00 D1 09 8F 01 |320...r..:......|
000001D0: 27 00 EB 09 90 01 99 22 93 11 11 11 11 93 22 3A |'......"......":|
000001E0: 8B 54 B2 36 34 42 B0 44 45 52 33 00 26 0A 95 01 |.T.64B.DER3.&...|
000001F0: 27 2A 2A 2A 2A 20 41 44 52 45 53 53 45 4E 42 45 |'**** ADRESSENBE|
00000200: 53 54 41 4E 44 20 56 4F 4F 52 20 43 42 4D 2D 36 |STAND VOOR CBM-6|
00000210: 34 20 4D 45 54 20 45 58 42 41 53 49 43 20 4C 45 |4 MET EXBASIC LE|
00000220: 56 45 4C 20 49 49 00 5D 0A 9A 01 27 41 41 4E 47 |VEL II.]...'AANG|
00000230: 45 50 41 53 54 20 44 4F 4F 52 20 47 41 52 59 20 |EPAST DOOR GARY |
00000240: 56 41 4E 20 42 45 45 43 4B 2C 20 20 20 20 20 20 |VAN BEECK, |
00000250: 20 20 20 20 4A 55 4E 49 20 31 39 38 33 00 92 0A | JUNI 1983...|
00000260: F4 01 41 31 B2 32 35 3A 5A 49 24 B2 22 5A 49 45 |..A1.25:ZI$."ZIE|
00000270: 4E 20 3F 22 3A 53 B2 34 32 3A 50 54 24 B2 22 4B |N ?":S.42:PT$."K|
00000280: 45 55 5A 45 20 12 3E 3E 92 20 22 3A 50 46 B2 31 |EUZE .>>. ":PF.1|
00000290: 30 32 00 CB 0A FE 01 86 20 4E 24 28 41 31 29 2C |02...... N$(A1),|
000002A0: 41 24 28 41 31 29 2C 50 24 28 41 31 29 2C 57 24 |A$(A1),P$(A1),W$|
000002B0: 28 41 31 29 2C 54 24 28 41 31 29 2C 48 25 28 41 |(A1),T$(A1),H%(A|
000002C0: 31 29 2C 49 25 28 32 AC 41 31 29 00 13 0B 08 02 |1),I%(2.A1).....|
000002D0: 8F 20 49 4E 20 48 25 2D 54 41 42 45 4C 20 53 54 |. IN H%-TABEL ST|
000002E0: 41 41 54 20 44 45 20 56 4F 4C 47 4F 52 44 45 2D |AAT DE VOLGORDE-|
000002F0: 2A 44 45 20 49 4E 44 45 58 2A 2D 20 56 41 4E 20 |*DE INDEX*- VAN |
00000300: 44 45 20 44 49 56 45 52 53 45 20 54 41 42 45 4C |DE DIVERSE TABEL|
00000310: 4C 45 4E 00 19 0B E6 03 27 00 1F 0B E7 03 27 00 |LEN.....'.....'.|
00000320: 36 0B E8 03 81 4A B2 30 A4 41 31 3A 48 25 28 4A |6....J.0.A1:H%(J|
00000330: 29 B2 4A 3A 82 4A 00 71 0B FC 03 99 22 93 22 3A |).J:.J.q....".":|
00000340: 0E 30 2C 30 2C 33 39 2C 30 2C 32 33 39 3A 0E 30 |.0,0,39,0,239:.0|
00000350: 2C 34 2C 33 39 2C 34 2C 53 3A 0E 30 2C 30 2C 30 |,4,39,4,S:.0,0,0|
00000360: 2C 34 2C 53 3A 0E 33 39 2C 30 2C 33 39 2C 34 2C |,4,S:.39,0,39,4,|
00000370: 53 00 87 0B 10 04 E7 38 32 22 12 43 4C 41 49 52 |S......82".CLAIR|
00000380: 45 92 20 4D 45 4E 55 00 B2 0B 24 04 99 22 11 11 |E. MENU...$.."..|
00000390: 11 31 2E 20 42 45 53 54 41 4E 44 20 4F 50 5A 45 |.1. BESTAND OPZE|
000003A0: 54 54 45 4E 20 4F 46 20 55 49 54 42 52 45 49 44 |TTEN OF UITBREID|
000003B0: 45 4E 00 D9 0B 38 04 99 22 11 32 2E 20 49 4E 48 |EN...8..".2. INH|
000003C0: 4F 55 44 20 54 4F 4E 45 4E 20 56 41 4E 20 48 45 |OUD TONEN VAN HE|
000003D0: 54 20 42 45 53 54 41 4E 44 00 F9 0B 4C 04 99 22 |T BESTAND...L.."|
000003E0: 11 33 2E 20 5A 4F 45 4B 45 4E 20 49 4E 20 48 45 |.3. ZOEKEN IN HE|
000003F0: 54 20 42 45 53 54 41 4E 44 00 18 0C 60 04 99 22 |T BESTAND...`.."|
00000400: 11 34 2E 20 53 4F 52 54 45 52 45 4E 20 50 45 52 |.4. SORTEREN PER|
00000410: 20 45 4C 45 4D 45 4E 54 00 38 0C 74 04 99 22 11 | ELEMENT.8.t..".|
00000420: 35 2E 20 56 45 52 41 4E 44 45 52 45 4E 20 49 4E |5. VERANDEREN IN|
00000430: 20 42 45 53 54 41 4E 44 00 6B 0C 88 04 99 22 11 | BESTAND.k....".|
00000440: 36 2E 20 4C 45 44 45 4E 4C 49 4A 53 54 20 50 52 |6. LEDENLIJST PR|
00000450: 49 4E 54 45 4E 20 20 20 20 11 2A 91 9D 2A 2A 2A |INTEN .*..***|
00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9E 0C 9C 04 |***********.....|
00000470: 99 22 11 37 2E 20 4C 41 42 45 4C 53 20 50 52 49 |.".7. LABELS PRI|
00000480: 4E 54 45 4E 20 20 20 20 20 20 20 20 11 2A 91 9D |NTEN .*..|
00000490: 2A 20 20 44 4F 4F 52 47 41 41 4E 20 4E 41 00 D1 |* DOORGAAN NA..|
000004A0: 0C B0 04 99 22 11 38 2E 20 42 45 53 54 41 4E 44 |....".8. BESTAND|
000004B0: 20 57 45 47 53 43 48 52 49 4A 56 45 4E 20 20 11 | WEGSCHRIJVEN .|
000004C0: 2A 91 9D 2A 20 20 20 27 52 45 41 44 59 2E 27 20 |*..* 'READY.' |
000004D0: 3A 00 05 0D C4 04 99 22 11 39 2E 20 53 54 4F 50 |:......".9. STOP|
000004E0: 20 50 52 4F 47 52 41 4D 4D 41 20 20 20 20 20 20 | PROGRAMMA |
000004F0: 20 20 11 2A 91 9D 2A 20 20 20 20 20 20 12 47 4F | .*..* .GO|
00000500: 54 4F 20 30 92 00 15 0D D8 04 99 F3 28 34 30 2C |TO 0........(40,|
00000510: 31 38 35 29 3B 00 3A 0D EC 04 97 31 35 38 2C 30 |185);.:....158,0|
00000520: 3A 8D 32 30 30 3A 8B 48 31 24 B2 22 30 22 A7 2E |:.200:.H1$."0"..|
00000530: EF 48 31 B2 C5 28 48 31 24 29 00 74 0D 00 05 91 |.H1..(H1$).t....|
00000540: 48 31 8D 32 30 30 30 2C 34 30 30 30 2C 36 30 30 |H1.2000,4000,600|
00000550: 30 2C 38 30 30 30 2C 31 30 30 30 30 2C 33 35 30 |0,8000,10000,350|
00000560: 30 30 2C 32 30 30 30 30 2C 32 35 30 30 30 2C 32 |00,20000,25000,2|
00000570: 39 30 30 30 00 7F 0D 14 05 89 20 31 30 32 30 00 |9000...... 1020.|
00000580: 85 0D CE 07 27 00 8B 0D CF 07 27 00 A8 0D D0 07 |....'.....'.....|
00000590: 99 22 93 11 11 2A 2A 2A 2A 2A 20 49 4E 56 4F 45 |."...***** INVOE|
000005A0: 52 20 2A 2A 2A 2A 2A 22 00 C2 0D E4 07 99 22 3D |R *****"......"=|
000005B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000005C0: 3D 22 00 D0 0D F8 07 8B 4E B1 30 89 32 36 36 30 |="......N.0.2660|
000005D0: 00 F3 0D 0C 08 99 22 11 11 31 2E 20 4E 49 45 55 |......"..1. NIEU|
000005E0: 57 20 42 45 53 54 41 4E 44 20 4F 50 42 4F 55 57 |W BESTAND OPBOUW|
000005F0: 45 4E 22 00 19 0E 20 08 99 22 11 11 32 2E 20 4F |EN"... .."..2. O|
00000600: 55 44 20 42 45 53 54 41 4E 44 20 4F 50 48 41 4C |UD BESTAND OPHAL|
00000610: 45 4E 11 22 3A 8D 32 30 30 00 3F 0E 34 08 8B 48 |EN.":.200.?.4..H|
00000620: 31 24 B2 22 31 22 89 32 31 32 30 EF 8B 48 31 24 |1$."1".2120..H1$|
00000630: B2 22 32 22 89 33 30 30 30 EF 89 32 30 30 30 00 |."2".3000..2000.|
00000640: 4C 0E 48 08 4E B2 31 3A 45 49 B2 31 00 56 0E 5C |L.H.N.1:EI.1.V.\|
00000650: 08 99 22 93 11 22 00 79 0E 70 08 99 22 55 20 4B |.."..".y.p.."U K|
00000660: 55 4E 54 20 4E 55 20 41 44 52 45 53 53 45 4E 20 |UNT NU ADRESSEN |
00000670: 49 4E 56 4F 45 52 45 4E 22 00 A8 0E 84 08 99 22 |INVOEREN"......"|
00000680: 11 4F 4D 20 4D 45 54 20 49 4E 56 4F 45 52 20 54 |.OM MET INVOER T|
00000690: 45 20 45 49 4E 44 49 47 45 4E 3A 20 54 59 50 45 |E EINDIGEN: TYPE|
000006A0: 20 2D 53 54 4F 50 2D 22 00 B0 0E 98 08 99 22 22 | -STOP-"......""|
000006B0: 00 C1 0E AC 08 81 20 50 20 B2 20 4E 20 A4 20 41 |...... P . N . A|
000006C0: 31 00 D1 0E C0 08 99 22 11 3C 22 3B 50 3B 22 3E |1......".<";P;">|
000006D0: 22 00 E0 0E D4 08 99 22 3D 3D 3D 3D 3D 3D 3D 22 |"......"======="|
000006E0: 00 09 0F E8 08 49 4E 24 B2 22 20 22 3A EA 22 4E |.....IN$." ":."N|
000006F0: 41 41 4D 20 20 20 20 20 20 20 3A 20 22 3B 49 4E |AAM : ";IN|
00000700: 24 2C 31 35 3A 8D 33 30 30 00 28 0F FC 08 8B 49 |$,15:.300.(....I|
00000710: 4E 24 B2 22 53 54 4F 50 22 89 32 35 34 30 EF 4E |N$."STOP".2540.N|
00000720: 24 28 50 29 B2 49 4E 24 00 51 0F 10 09 49 4E 24 |$(P).IN$.Q...IN$|
00000730: B2 22 20 22 3A EA 22 41 44 52 45 53 20 20 20 20 |." ":."ADRES |
00000740: 20 20 3A 20 22 3B 49 4E 24 2C 31 38 3A 8D 33 30 | : ";IN$,18:.30|
00000750: 30 00 70 0F 24 09 8B 49 4E 24 B2 22 53 54 4F 50 |0.p.$..IN$."STOP|
00000760: 22 89 32 35 34 30 EF 41 24 28 50 29 B2 49 4E 24 |".2540.A$(P).IN$|
00000770: 00 98 0F 38 09 49 4E 24 B2 22 20 22 3A EA 22 50 |...8.IN$." ":."P|
00000780: 4F 53 54 43 4F 44 45 20 20 20 3A 20 22 3B 49 4E |OSTCODE : ";IN|
00000790: 24 2C 37 3A 8D 33 30 30 00 B7 0F 4C 09 8B 49 4E |$,7:.300...L..IN|
000007A0: 24 B2 22 53 54 4F 50 22 89 32 35 34 30 EF 50 24 |$."STOP".2540.P$|
000007B0: 28 50 29 B2 49 4E 24 00 EA 0F 60 09 49 4E 24 B2 |(P).IN$...`.IN$.|
000007C0: 22 20 22 3A 99 22 91 57 4F 4F 4E 50 4C 41 41 54 |" ":.".WOONPLAAT|
000007D0: 53 3A 22 3B F3 28 31 30 2C 32 39 29 3B 3A EA 49 |S:";.(10,29);:.I|
000007E0: 4E 24 2C 31 35 3A 8D 33 30 30 00 09 10 74 09 8B |N$,15:.300...t..|
000007F0: 49 4E 24 B2 22 53 54 4F 50 22 89 32 35 34 30 EF |IN$."STOP".2540.|
00000800: 57 24 28 50 29 B2 49 4E 24 00 2C 10 88 09 49 4E |W$(P).IN$.,...IN|
00000810: 24 B2 22 20 22 3A EA 22 11 49 4E 46 4F 20 3A 22 |$." ":.".INFO :"|
00000820: 3B 49 4E 24 2C 37 39 3A 8D 33 30 30 00 4B 10 9C |;IN$,79:.300.K..|
00000830: 09 8B 49 4E 24 B2 22 53 54 4F 50 22 89 32 35 34 |..IN$."STOP".254|
00000840: 30 EF 54 24 28 50 29 B2 49 4E 24 00 53 10 B0 09 |0.T$(P).IN$.S...|
00000850: 99 22 22 00 5B 10 C4 09 82 20 50 00 63 10 D8 09 |."".[.... P.c...|
00000860: 99 22 22 00 78 10 EC 09 99 22 11 45 49 4E 44 45 |."".x....".EINDE|
00000870: 20 49 4E 56 4F 45 52 22 00 86 10 00 0A 4E 20 B2 | INVOER".....N .|
00000880: 20 50 20 AB 20 31 00 B4 10 14 0A 99 22 11 45 52 | P . 1......".ER|
00000890: 20 5A 49 54 54 45 4E 22 3B 4E 3B 22 41 44 52 45 | ZITTEN";N;"ADRE|
000008A0: 53 53 45 4E 20 49 4E 20 48 45 54 20 42 45 53 54 |SSEN IN HET BEST|
000008B0: 41 4E 44 22 00 D0 10 28 0A 99 22 11 11 52 41 41 |AND"...(.."..RAA|
000008C0: 4B 20 45 45 4E 20 54 4F 45 54 53 20 41 41 4E 22 |K EEN TOETS AAN"|
000008D0: 00 D9 10 3C 0A 8D 31 30 30 00 DF 10 50 0A 8E 00 |...<..100...P...|
000008E0: 0D 11 64 0A 99 22 11 45 52 20 5A 49 54 20 41 4C |..d..".ER ZIT AL|
000008F0: 20 45 45 4E 20 42 45 53 54 41 4E 44 20 49 4E 20 | EEN BESTAND IN |
00000900: 48 45 54 20 47 45 48 45 55 47 45 4E 22 00 2B 11 |HET GEHEUGEN".+.|
00000910: 78 0A 99 22 11 31 2E 20 4E 49 45 54 20 4F 56 45 |x..".1. NIET OVE|
00000920: 52 53 43 48 52 49 4A 56 45 4E 22 00 48 11 8C 0A |RSCHRIJVEN".H...|
00000930: 99 22 11 32 2E 20 57 45 4C 20 4F 56 45 52 53 43 |.".2. WEL OVERSC|
00000940: 48 52 49 4A 56 45 4E 22 00 51 11 A0 0A 8D 32 30 |HRIJVEN".Q....20|
00000950: 30 00 6A 11 B4 0A 8B 20 48 31 B2 31 20 B0 20 48 |0.j.... H1.1 . H|
00000960: 31 B2 32 20 A7 20 32 37 38 30 00 75 11 C8 0A 89 |1.2 . 2780.u....|
00000970: 20 32 36 36 30 00 87 11 DC 0A 8B 20 48 31 B2 32 | 2660...... H1.2|
00000980: 20 A7 20 32 31 32 30 00 A9 11 F0 0A 99 22 11 11 | . 2120......"..|
00000990: 11 11 11 33 2E 20 42 45 53 54 41 4E 44 20 55 49 |...3. BESTAND UI|
000009A0: 54 42 52 45 49 44 45 4E 22 00 CC 11 04 0B 99 22 |TBREIDEN"......"|
000009B0: 11 34 2E 20 42 45 53 54 41 4E 44 20 4E 49 45 54 |.4. BESTAND NIET|
000009C0: 20 55 49 54 42 52 45 49 44 45 4E 22 00 D5 11 18 | UITBREIDEN"....|
000009D0: 0B 8D 32 30 30 00 E0 11 2C 0B 8B 48 31 B2 34 8E |..200...,..H1.4.|
000009E0: 00 EF 11 40 0B 4E B2 4E AA 31 3A 45 49 B2 31 00 |...@.N.N.1:EI.1.|
000009F0: FA 11 54 0B 89 20 32 31 34 30 00 00 12 B6 0B 27 |..T.. 2140.....'|
00000A00: 00 06 12 B7 0B 27 00 3C 12 B8 0B 45 4D 24 B2 22 |.....'.<...EM$."|
00000A10: 22 3A 27 47 41 20 4E 41 41 52 20 54 41 50 45 20 |":'GA NAAR TAPE |
00000A20: 41 4C 53 20 44 49 53 4B 20 4E 49 45 54 20 49 53 |ALS DISK NIET IS|
00000A30: 20 41 41 4E 47 45 53 4C 4F 54 45 4E 00 77 12 B9 | AANGESLOTEN.w..|
00000A40: 0B A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C 22 49 |..15:.15,8,15,"I|
00000A50: 30 22 3A 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 54 |0":.15,EN,EM$,ET|
00000A60: 2C 45 53 3A 8B 45 4D 24 B3 B1 22 4F 4B 22 A0 31 |,ES:.EM$.."OK".1|
00000A70: 35 3A 89 33 34 30 30 00 AF 12 80 0C 85 22 11 11 |5:.3400......"..|
00000A80: 11 11 11 11 11 11 11 11 57 45 4C 4B 20 42 45 53 |........WELK BES|
00000A90: 54 41 4E 44 20 4B 49 45 53 54 20 55 20 3F 20 41 |TAND KIEST U ? A|
00000AA0: 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 3B 46 24 00 |DRES.......";F$.|
00000AB0: CB 12 8A 0C 46 4C 24 B2 22 30 3A 22 AA 46 24 AA |....FL$."0:".F$.|
00000AC0: 22 2C 53 45 51 2C 52 45 41 44 22 00 DD 12 94 0C |",SEQ,READ".....|
00000AD0: A0 35 3A 9F 35 2C 38 2C 32 2C 46 4C 24 00 E6 12 |.5:.5,8,2,FL$...|
00000AE0: 9E 0C 84 35 2C 4E 00 F1 12 A8 0C 81 58 B2 31 A4 |...5,N......X.1.|
00000AF0: 4E 00 FE 12 B2 0C 84 35 2C 4E 24 28 58 29 00 0B |N......5,N$(X)..|
00000B00: 13 BC 0C 84 35 2C 41 24 28 58 29 00 18 13 C6 0C |....5,A$(X).....|
00000B10: 84 35 2C 50 24 28 58 29 00 25 13 D0 0C 84 35 2C |.5,P$(X).%....5,|
00000B20: 57 24 28 58 29 00 32 13 DA 0C 84 35 2C 54 24 28 |W$(X).2....5,T$(|
00000B30: 58 29 00 3F 13 E4 0C 99 22 13 22 58 3A 82 58 00 |X).?...."."X:.X.|
00000B40: 48 13 EE 0C A0 35 3A 91 00 5F 13 F8 0C 81 4A B2 |H....5:.._....J.|
00000B50: 30 A4 41 31 3A 48 25 28 4A 29 B2 4A 3A 82 4A 00 |0.A1:H%(J).J:.J.|
00000B60: 65 13 02 0D 8E 00 95 13 48 0D 99 22 93 56 45 52 |e.......H..".VER|
00000B70: 57 49 4A 44 45 52 20 45 56 45 4E 54 55 45 45 4C |WIJDER EVENTUEEL|
00000B80: 20 50 52 4F 47 52 41 4D 4D 41 43 41 53 53 45 54 | PROGRAMMACASSET|
00000B90: 54 45 11 11 22 00 C0 13 49 0D 99 22 50 4C 41 41 |TE.."...I.."PLAA|
00000BA0: 54 53 20 44 45 20 44 41 54 41 43 41 53 53 45 54 |TS DE DATACASSET|
00000BB0: 54 45 20 49 4E 20 54 41 50 45 20 23 31 11 11 22 |TE IN TAPE #1.."|
00000BC0: 00 EA 13 4A 0D 99 22 44 52 55 4B 20 4F 50 20 45 |...J.."DRUK OP E|
00000BD0: 45 4E 20 54 4F 45 54 53 20 4F 4D 20 56 45 52 44 |EN TOETS OM VERD|
00000BE0: 45 52 20 54 45 20 47 41 41 4E 00 FB 13 4B 0D A1 |ER TE GAAN...K..|
00000BF0: 51 24 3A 8B 51 24 B2 22 22 89 2E 00 35 14 51 0D |Q$:.Q$.""...5.Q.|
00000C00: E7 34 37 39 3A A0 35 3A 9F 35 2C 31 2C 30 2C 46 |.479:.5:.5,1,0,F|
00000C10: 24 3A 84 35 2C 4E 3A 99 22 93 11 11 49 4E 4C 45 |$:.5,N:."...INLE|
00000C20: 5A 45 4E 20 56 41 4E 20 42 45 53 54 41 4E 44 20 |ZEN VAN BESTAND |
00000C30: 12 22 3B 46 24 00 50 14 52 0D 99 22 11 41 41 4E |.";F$.P.R..".AAN|
00000C40: 54 41 4C 20 41 44 52 45 53 53 45 4E 3A 22 3B 4E |TAL ADRESSEN:";N|
00000C50: 00 5F 14 5C 0D 8D 33 32 34 30 3A EE 33 3A 8E 00 |._.\..3240:.3:..|
00000C60: 65 14 9E 0F 27 00 6B 14 9F 0F 27 00 88 14 A0 0F |e...'.k...'.....|
00000C70: 99 22 93 11 11 2A 2A 2A 2A 2A 20 49 4E 48 4F 55 |."...***** INHOU|
00000C80: 44 20 2A 2A 2A 2A 2A 22 00 A2 14 B4 0F 99 22 3D |D *****"......"=|
00000C90: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000CA0: 3D 22 00 C5 14 C8 0F 99 22 11 11 57 45 4C 4B 45 |="......"..WELKE|
00000CB0: 20 41 44 52 45 53 53 45 4E 20 57 49 4C 54 20 55 | ADRESSEN WILT U|
00000CC0: 20 22 5A 49 24 00 D5 14 DC 0F 99 22 11 31 2E 20 | "ZI$......".1. |
00000CD0: 41 4C 4C 45 53 00 F1 14 F0 0F 99 22 11 32 2E 20 |ALLES......".2. |
00000CE0: 45 45 4E 20 42 45 50 41 41 4C 44 20 41 44 52 45 |EEN BEPAALD ADRE|
00000CF0: 53 00 03 15 04 10 99 22 11 33 2E 20 42 45 52 45 |S......".3. BERE|
00000D00: 49 4B 22 00 0C 15 18 10 8D 31 30 30 00 20 15 2C |IK"......100. .,|
00000D10: 10 8B 48 31 B3 31 B0 48 31 B1 33 89 34 30 30 30 |..H1.1.H1.3.4000|
00000D20: 00 35 15 40 10 8B 20 48 31 20 B3 B1 20 31 20 89 |.5.@.. H1 .. 1 .|
00000D30: 20 34 32 32 30 00 43 15 54 10 54 31 B2 31 3A 54 | 4220.C.T.T1.1:T|
00000D40: 32 B2 4E 00 4E 15 68 10 89 20 34 35 34 30 00 63 |2.N.N.h.. 4540.c|
00000D50: 15 7C 10 8B 20 48 31 20 B3 B1 20 32 20 89 20 34 |.|.. H1 .. 2 . 4|
00000D60: 33 34 30 00 7F 15 90 10 EA 22 11 57 45 4C 4B 20 |340......".WELK |
00000D70: 4E 55 4D 4D 45 52 3F 20 22 3B 54 31 24 2C 33 00 |NUMMER? ";T1$,3.|
00000D80: 8D 15 A4 10 54 31 B2 C5 28 54 31 24 29 00 A1 15 |....T1..(T1$)...|
00000D90: B8 10 8B 20 54 31 20 B1 20 4E 20 A7 20 34 35 32 |... T1 . N . 452|
00000DA0: 30 00 AB 15 CC 10 54 32 B2 54 31 00 B6 15 E0 10 |0.....T2.T1.....|
00000DB0: 89 20 34 35 34 30 00 DA 15 F4 10 EA 22 11 45 45 |. 4540......".EE|
00000DC0: 52 53 54 45 20 41 44 52 45 53 4E 4E 55 4D 4D 45 |RSTE ADRESNNUMME|
00000DD0: 52 3A 20 22 3B 54 31 24 2C 33 00 E8 15 08 11 54 |R: ";T1$,3.....T|
00000DE0: 31 B2 C5 28 54 31 24 29 00 01 16 1C 11 8B 54 31 |1..(T1$)......T1|
00000DF0: B3 31 54 31 B2 31 EF 8B 54 31 B1 4E A7 34 35 32 |.1T1.1..T1.N.452|
00000E00: 30 00 1A 16 30 11 27 49 46 20 54 31 20 3E 20 4E |0...0.'IF T1 > N|
00000E10: 20 54 48 45 4E 20 34 35 32 30 00 3D 16 44 11 EA | THEN 4520.=.D..|
00000E20: 22 11 4C 41 41 54 53 54 45 20 41 44 52 45 53 4E |".LAATSTE ADRESN|
00000E30: 4E 55 4D 4D 45 52 3A 20 22 3B 54 32 24 00 4B 16 |NUMMER: ";T2$.K.|
00000E40: 58 11 54 32 B2 C5 28 54 32 24 29 00 67 16 6C 11 |X.T2..(T2$).g.l.|
00000E50: 8B 54 32 B1 4E A7 34 35 32 30 EF 8B 54 32 B1 B2 |.T2.N.4520..T2..|
00000E60: 54 31 A7 34 35 34 30 00 83 16 80 11 27 49 46 20 |T1.4540.....'IF |
00000E70: 54 32 20 3E 3D 20 54 31 20 20 54 48 45 4E 20 34 |T2 >= T1 THEN 4|
00000E80: 35 34 30 00 AC 16 94 11 99 22 11 46 4F 55 54 2D |540......".FOUT-|
00000E90: 2D 41 44 52 45 53 20 31 20 3E 20 41 44 52 45 53 |-ADRES 1 > ADRES|
00000EA0: 20 32 22 3A EE 34 3A 89 34 30 30 30 00 EE 16 A8 | 2":.4:.4000....|
00000EB0: 11 99 22 11 42 45 53 54 41 4E 44 20 48 45 45 46 |..".BESTAND HEEF|
00000EC0: 54 20 47 45 45 4E 22 54 32 22 4D 41 41 52 20 53 |T GEEN"T2"MAAR S|
00000ED0: 4C 45 43 48 54 53 22 3B 4E 3B 22 20 41 44 52 45 |LECHTS";N;" ADRE|
00000EE0: 53 53 45 4E 22 3A EE 34 3A 89 34 30 30 30 00 FE |SSEN":.4:.4000..|
00000EF0: 16 BC 11 8B 50 52 B2 31 A7 33 35 30 32 30 00 07 |....PR.1.35020..|
00000F00: 17 D0 11 99 22 93 22 00 19 17 E4 11 81 20 57 20 |...."."...... W |
00000F10: B2 20 54 31 20 A4 20 54 32 00 26 17 F8 11 48 38 |. T1 . T2.&...H8|
00000F20: B2 48 25 28 57 29 00 48 17 0C 12 99 22 3C 22 3B |.H%(W).H...."<";|
00000F30: 57 3B 22 3E 20 20 20 12 53 48 49 46 54 92 20 3D |W;"> .SHIFT. =|
00000F40: 20 57 49 53 53 45 4E 22 00 6D 17 20 12 99 22 3D | WISSEN".m. .."=|
00000F50: 3D 3D 3D 3D 3D 3D 20 20 12 52 45 54 55 52 4E 92 |====== .RETURN.|
00000F60: 20 56 4F 4F 52 20 56 45 52 44 45 52 22 00 75 17 | VOOR VERDER".u.|
00000F70: 34 12 99 22 22 00 82 17 48 12 99 20 4E 24 28 48 |4..""...H.. N$(H|
00000F80: 38 29 00 8F 17 5C 12 99 20 41 24 28 48 38 29 00 |8)...\.. A$(H8).|
00000F90: A8 17 70 12 99 20 50 24 28 48 38 29 3B 22 20 20 |..p.. P$(H8);" |
00000FA0: 22 3B 57 24 28 48 38 29 00 B5 17 84 12 99 20 54 |";W$(H8)...... T|
00000FB0: 24 28 48 38 29 00 DC 17 8E 12 8B 41 46 B2 31 A7 |$(H8)......AF.1.|
00000FC0: 34 37 38 30 3A 27 45 4C 53 45 47 4F 53 55 42 34 |4780:'ELSEGOSUB4|
00000FD0: 39 30 30 3A 47 4F 54 4F 34 38 30 30 00 1E 18 98 |900:GOTO4800....|
00000FE0: 12 99 22 22 3A 8B 48 31 B2 32 99 22 11 11 54 49 |.."":.H1.2."..TI|
00000FF0: 4B 20 12 D3 C8 C9 C6 D4 92 20 56 4F 4F 52 20 57 |K ....... VOOR W|
00001000: 49 53 53 45 4E 20 55 49 54 20 42 45 53 54 41 4E |ISSEN UIT BESTAN|
00001010: 44 20 4F 46 20 41 4E 44 45 52 53 11 11 22 00 39 |D OF ANDERS..".9|
00001020: 18 9C 12 99 22 91 12 57 49 4C 4C 45 4B 45 55 52 |...."..WILLEKEUR|
00001030: 49 47 45 20 54 4F 45 54 53 00 54 18 AC 12 8B C2 |IGE TOETS.T.....|
00001040: 28 31 35 32 29 B2 30 A7 2E EF 41 46 B2 31 3A 8D |(152).0...AF.1:.|
00001050: 34 39 30 30 00 5C 18 C0 12 82 3A 8E 00 7C 18 24 |4900.\....:..|.$|
00001060: 13 99 22 93 22 3A 8D 34 36 38 30 3A 99 22 12 40 |..".":.4680:.".@|
00001070: 92 20 3D 20 57 49 53 53 45 4E 22 3A 00 90 18 25 |. = WISSEN":...%|
00001080: 13 8D 31 30 30 3A 8B 48 31 24 B3 B1 22 40 22 8E |..100:.H1$.."@".|
00001090: 00 D7 18 29 13 81 58 B2 57 AA 31 A4 4E AA 31 3A |...)..X.W.1.N.1:|
000010A0: 4E 24 28 58 AB 31 29 B2 4E 24 28 58 29 3A 41 24 |N$(X.1).N$(X):A$|
000010B0: 28 58 AB 31 29 B2 41 24 28 58 29 3A 50 24 28 58 |(X.1).A$(X):P$(X|
000010C0: AB 31 29 B2 50 24 28 58 29 3A 57 24 28 58 AB 31 |.1).P$(X):W$(X.1|
000010D0: 29 B2 57 24 28 58 29 00 F8 18 2E 13 54 24 28 58 |).W$(X).....T$(X|
000010E0: AB 31 29 B2 54 24 28 58 29 3A 82 3A 4E B2 4E AB |.1).T$(X):.:N.N.|
000010F0: 31 3A 41 46 B2 30 3A 8E 00 FE 18 6E 17 27 00 04 |1:AF.0:....n.'..|
00001100: 19 6F 17 27 00 21 19 70 17 99 22 93 11 11 2A 2A |.o.'.!.p.."...**|
00001110: 2A 2A 2A 20 5A 4F 45 4B 45 4E 20 2A 2A 2A 2A 2A |*** ZOEKEN *****|
00001120: 22 00 3B 19 84 17 99 22 3D 3D 3D 3D 3D 3D 3D 3D |".;...."========|
00001130: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 67 19 98 17 |==========".g...|
00001140: EA 22 11 54 45 20 5A 4F 45 4B 45 4E 20 57 4F 4F |.".TE ZOEKEN WOO|
00001150: 52 44 20 4F 46 20 44 45 45 4C 20 44 41 41 52 56 |RD OF DEEL DAARV|
00001160: 41 4E 20 22 3B 5A 24 00 70 19 AC 17 46 31 B2 30 |AN ";Z$.p...F1.0|
00001170: 00 84 19 C0 17 81 5A B2 31 A4 4E 3A 48 38 B2 48 |......Z.1.N:H8.H|
00001180: 25 28 5A 29 00 A1 19 D4 17 46 B2 F5 28 4E 24 28 |%(Z).....F..(N$(|
00001190: 48 38 29 2C 5A 24 29 3A 8B 46 B1 30 89 36 33 36 |H8),Z$):.F.0.636|
000011A0: 30 00 BE 19 E8 17 46 B2 F5 28 41 24 28 48 38 29 |0.....F..(A$(H8)|
000011B0: 2C 5A 24 29 3A 8B 46 B1 30 89 36 33 36 30 00 DB |,Z$):.F.0.6360..|
000011C0: 19 FC 17 46 B2 F5 28 50 24 28 48 38 29 2C 5A 24 |...F..(P$(H8),Z$|
000011D0: 29 3A 8B 46 B1 30 89 36 33 36 30 00 F8 19 10 18 |):.F.0.6360.....|
000011E0: 46 B2 F5 28 57 24 28 48 38 29 2C 5A 24 29 3A 8B |F..(W$(H8),Z$):.|
000011F0: 46 B1 30 89 36 33 36 30 00 15 1A 24 18 46 B2 F5 |F.0.6360...$.F..|
00001200: 28 54 24 28 48 38 29 2C 5A 24 29 3A 8B 46 B1 30 |(T$(H8),Z$):.F.0|
00001210: 89 36 33 36 30 00 1D 1A 38 18 82 20 5A 00 28 1A |.6360...8.. Z.(.|
00001220: 4C 18 8B 46 31 B2 31 8E 00 57 1A 60 18 99 22 11 |L..F1.1..W.`..".|
00001230: 44 45 5A 45 20 4C 45 54 54 45 52 43 4F 4D 42 49 |DEZE LETTERCOMBI|
00001240: 4E 41 54 49 45 20 49 53 20 4E 49 45 54 20 41 41 |NATIE IS NIET AA|
00001250: 4E 57 45 5A 49 47 22 00 71 1A 74 18 99 22 11 11 |NWEZIG".q.t.."..|
00001260: 11 31 2E 20 56 45 52 44 45 52 20 5A 4F 45 4B 45 |.1. VERDER ZOEKE|
00001270: 4E 00 80 1A 88 18 99 22 11 32 2E 20 4D 45 4E 55 |N......".2. MENU|
00001280: 00 89 1A 9C 18 8D 31 30 30 00 9D 1A B0 18 8B 48 |......100......H|
00001290: 31 B3 31 B0 48 31 B1 32 89 36 33 30 30 00 AD 1A |1.1.H1.2.6300...|
000012A0: C4 18 8B 48 31 B2 32 8E EF 31 36 30 30 00 B5 1A |...H1.2..1600...|
000012B0: D8 18 99 22 22 00 BE 1A EC 18 46 31 B2 31 00 DE |..."".....F1.1..|
000012C0: 1A 00 19 99 22 11 43 4F 4D 42 49 4E 41 54 49 45 |....".COMBINATIE|
000012D0: 20 41 41 4E 57 45 5A 49 47 20 49 4E 3A 22 00 FD | AANWEZIG IN:"..|
000012E0: 1A 14 19 99 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |...."-----------|
000012F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 0C 1B |------------"...|
00001300: 28 19 99 22 3C 22 3B 5A 3B 22 3E 22 00 18 1B 3C |(.."<";Z;">"...<|
00001310: 19 99 4E 24 28 48 38 29 00 24 1B 50 19 99 41 24 |..N$(H8).$.P..A$|
00001320: 28 48 38 29 00 3C 1B 64 19 99 50 24 28 48 38 29 |(H8).<.d..P$(H8)|
00001330: 3B 22 20 20 22 3B 57 24 28 48 38 29 00 48 1B 78 |;" ";W$(H8).H.x|
00001340: 19 99 54 24 28 48 38 29 00 51 1B 8C 19 8D 31 30 |..T$(H8).Q....10|
00001350: 30 00 5B 1B A0 19 8B 5A B2 4E 8E 00 66 1B B4 19 |0.[....Z.N..f...|
00001360: 89 20 36 32 30 30 00 6C 1B 3E 1F 27 00 72 1B 3F |. 6200.l.>.'.r.?|
00001370: 1F 27 00 8D 1B 40 1F 99 22 93 2A 2A 2A 2A 20 53 |.'...@..".**** S|
00001380: 4F 52 54 45 52 45 4E 20 2A 2A 2A 2A 22 00 A9 1B |ORTEREN ****"...|
00001390: 54 1F 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |T.."============|
000013A0: 3D 3D 3D 3D 3D 3D 3D 3D 22 00 BD 1B 68 1F 99 22 |========"...h.."|
000013B0: 11 11 53 4F 52 54 45 52 45 4E 20 4F 50 00 CD 1B |..SORTEREN OP...|
000013C0: 7C 1F 99 22 11 11 31 2E 20 4E 41 41 4D 00 DD 1B ||.."..1. NAAM...|
000013D0: 90 1F 99 22 11 32 2E 20 41 44 52 45 53 00 F0 1B |...".2. ADRES...|
000013E0: A4 1F 99 22 11 33 2E 20 50 4F 53 54 43 4F 44 45 |...".3. POSTCODE|
000013F0: 00 05 1C B8 1F 99 22 11 34 2E 20 57 4F 4F 4E 50 |......".4. WOONP|
00001400: 4C 41 41 54 53 00 14 1C CC 1F 99 22 11 35 2E 20 |LAATS......".5. |
00001410: 49 4E 46 4F 00 1D 1C E0 1F 8D 31 30 30 00 3A 1C |INFO......100.:.|
00001420: F4 1F 8B 20 48 31 20 B3 20 31 20 B0 20 48 31 20 |... H1 . 1 . H1 |
00001430: B1 20 35 20 89 20 38 31 36 30 00 6B 1C 08 20 99 |. 5 . 8160.k.. .|
00001440: 22 11 53 4F 52 54 45 52 45 4E 20 4B 4F 53 54 20 |".SORTEREN KOST |
00001450: 5A 45 4C 46 53 20 45 45 4E 20 43 4F 4D 50 55 54 |ZELFS EEN COMPUT|
00001460: 45 52 20 54 49 4A 44 2E 2E 2E 22 00 75 1C 1C 20 |ER TIJD...".u.. |
00001470: 8D 38 33 32 30 00 95 1C 30 20 99 22 11 42 45 53 |.8320...0 .".BES|
00001480: 54 41 4E 44 20 47 45 53 4F 52 54 45 45 52 44 22 |TAND GESORTEERD"|
00001490: 3A 45 49 B2 31 00 9E 1C 44 20 8D 31 30 30 00 A4 |:EI.1...D .100..|
000014A0: 1C 58 20 8E 00 B4 1C 6C 20 8F 20 2A 53 4F 52 54 |.X ....l . *SORT|
000014B0: 45 45 52 2A 00 C8 1C 80 20 4E 39 B2 4E AA 31 3A |EER*.... N9.N.1:|
000014C0: 58 B2 30 3A 48 39 B2 30 00 E5 1C 94 20 42 B2 4E |X.0:H9.0.... B.N|
000014D0: 39 AB 31 3A 81 4A B2 30 A4 42 3A 49 25 28 4A 29 |9.1:.J.0.B:I%(J)|
000014E0: B2 4A 3A 82 4A 00 F7 1C A8 20 81 4A B2 30 A4 4E |.J:.J.... .J.0.N|
000014F0: 39 AC 32 AB 33 A9 32 00 15 1D BC 20 42 B2 42 AA |9.2.3.2.... B.B.|
00001500: 31 3A 49 31 B2 49 25 28 4A 29 3A 49 32 B2 49 25 |1:I1.I%(J):I2.I%|
00001510: 28 4A AA 31 29 00 1F 1D D0 20 8D 38 36 32 30 00 |(J.1).... .8620.|
00001520: 2E 1D E4 20 49 25 28 42 29 B2 49 3A 82 4A 00 46 |... I%(B).I:.J.F|
00001530: 1D F8 20 58 B2 58 AB 31 3A 43 B2 49 25 28 42 29 |.. X.X.1:C.I%(B)|
00001540: 3A 8B 43 B3 30 8E 00 5B 1D 0C 21 48 25 28 48 39 |:.C.0..[..!H%(H9|
00001550: 29 B2 43 3A 48 39 B2 48 39 AA 31 00 67 1D 20 21 |).C:H9.H9.1.g. !|
00001560: 49 25 28 43 29 B2 58 00 8B 1D 34 21 43 25 B2 43 |I%(C).X...4!C%.C|
00001570: AD 32 3A 4A B2 43 25 AC 32 3A 43 B2 4E 39 AA 43 |.2:J.C%.2:C.N9.C|
00001580: 25 3A 8B 43 B1 42 89 38 34 34 30 00 A3 1D 48 21 |%:.C.B.8440...H!|
00001590: 49 31 B2 49 25 28 4A 29 3A 49 32 B2 49 25 28 4A |I1.I%(J):I2.I%(J|
000015A0: AA 31 29 00 B7 1D 5C 21 8B 49 31 B3 30 49 B2 49 |.1)...\!.I1.0I.I|
000015B0: 32 3A 89 38 36 30 30 00 CB 1D 70 21 8B 49 32 B3 |2:.8600...p!.I2.|
000015C0: 30 49 B2 49 31 3A 89 38 36 30 30 00 D5 1D 84 21 |0I.I1:.8600....!|
000015D0: 8D 38 36 32 30 00 E7 1D 98 21 49 25 28 43 29 B2 |.8620....!I%(C).|
000015E0: 49 3A 89 38 35 30 30 00 08 1E AC 21 8B 48 31 B2 |I:.8500....!.H1.|
000015F0: 31 49 B2 49 31 3A 8B 4E 24 28 49 32 29 B3 4E 24 |1I.I1:.N$(I2).N$|
00001600: 28 49 31 29 49 B2 49 32 00 29 1E C0 21 8B 48 31 |(I1)I.I2.)..!.H1|
00001610: B2 32 49 B2 49 31 3A 8B 41 24 28 49 32 29 B3 41 |.2I.I1:.A$(I2).A|
00001620: 24 28 49 31 29 49 B2 49 32 00 4A 1E D4 21 8B 48 |$(I1)I.I2.J..!.H|
00001630: 31 B2 33 49 B2 49 31 3A 8B 50 24 28 49 32 29 B3 |1.3I.I1:.P$(I2).|
00001640: 50 24 28 49 31 29 49 B2 49 32 00 6B 1E E8 21 8B |P$(I1)I.I2.k..!.|
00001650: 48 31 B2 34 49 B2 49 31 3A 8B 57 24 28 49 32 29 |H1.4I.I1:.W$(I2)|
00001660: B3 57 24 28 49 31 29 49 B2 49 32 00 8C 1E FC 21 |.W$(I1)I.I2....!|
00001670: 8B 48 31 B2 35 49 B2 49 31 3A 8B 54 24 28 49 32 |.H1.5I.I1:.T$(I2|
00001680: 29 B3 54 24 28 49 31 29 49 B2 49 32 00 92 1E 10 |).T$(I1)I.I2....|
00001690: 22 8E 00 98 1E 0E 27 27 00 9E 1E 0F 27 27 00 BD |".....''....''..|
000016A0: 1E 10 27 99 22 93 11 11 2A 2A 2A 2A 2A 20 56 45 |..'."...***** VE|
000016B0: 52 41 4E 44 45 52 20 2A 2A 2A 2A 2A 22 00 D9 1E |RANDER *****"...|
000016C0: 24 27 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |$'."============|
000016D0: 3D 3D 3D 3D 3D 3D 3D 3D 22 00 ED 1E 38 27 8B 20 |========"...8'. |
000016E0: 4E 20 B1 20 30 20 89 20 31 30 31 34 30 00 10 1F |N . 0 . 10140...|
000016F0: 4C 27 99 22 11 45 52 20 49 53 20 47 45 45 4E 20 |L'.".ER IS GEEN |
00001700: 42 45 53 54 41 4E 44 20 41 41 4E 57 45 5A 49 47 |BESTAND AANWEZIG|
00001710: 00 2C 1F 60 27 99 22 11 11 52 41 41 4B 20 45 45 |.,.`'."..RAAK EE|
00001720: 4E 20 54 4F 45 54 53 20 41 41 4E 22 00 35 1F 74 |N TOETS AAN".5.t|
00001730: 27 8D 31 30 30 00 3B 1F 88 27 8E 00 66 1F 9C 27 |'.100.;..'..f..'|
00001740: EA 22 11 41 44 52 45 53 20 56 45 52 41 4E 44 45 |.".ADRES VERANDE|
00001750: 52 45 4E 20 4D 45 54 20 4E 55 4D 4D 45 52 20 22 |REN MET NUMMER "|
00001760: 3B 5A 33 24 2C 33 00 7E 1F B0 27 5A B2 C5 28 5A |;Z3$,3.~..'Z..(Z|
00001770: 33 24 29 3A 8B 5A B1 4E 89 31 30 30 30 30 00 8B |3$):.Z.N.10000..|
00001780: 1F C4 27 48 38 B2 48 25 28 5A 29 00 B7 1F D8 27 |..'H8.H%(Z)....'|
00001790: 99 22 11 57 49 4A 5A 49 47 20 5A 4F 4E 4F 44 49 |.".WIJZIG ZONODI|
000017A0: 47 20 44 45 20 47 45 54 4F 4F 4E 44 45 20 52 45 |G DE GETOONDE RE|
000017B0: 47 45 4C 20 45 4E 22 00 D7 1F EC 27 99 22 11 44 |GEL EN"....'.".D|
000017C0: 52 55 4B 20 44 41 41 52 4E 41 20 4F 50 20 12 52 |RUK DAARNA OP .R|
000017D0: 45 54 55 52 4E 92 22 00 F1 1F 00 28 99 22 11 11 |ETURN."....(."..|
000017E0: 20 20 20 20 20 20 20 20 20 22 3B 4E 24 28 48 38 | ";N$(H8|
000017F0: 29 00 06 20 14 28 0F 22 91 4E 41 41 4D 20 20 20 |).. .(.".NAAM |
00001800: 20 20 22 3B 56 24 00 14 20 28 28 4E 24 28 48 38 | ";V$.. ((N$(H8|
00001810: 29 B2 56 24 00 2E 20 3C 28 99 3A 99 22 20 20 20 |).V$.. <(.:." |
00001820: 20 20 20 20 20 20 22 3B 41 24 28 48 38 29 00 43 | ";A$(H8).C|
00001830: 20 50 28 0F 22 91 41 44 52 45 53 20 20 20 20 22 | P(.".ADRES "|
00001840: 3B 56 24 00 51 20 64 28 41 24 28 48 38 29 B2 56 |;V$.Q d(A$(H8).V|
00001850: 24 00 6B 20 78 28 99 3A 99 22 20 20 20 20 20 20 |$.k x(.:." |
00001860: 20 20 20 22 3B 50 24 28 48 38 29 00 80 20 8C 28 | ";P$(H8).. .(|
00001870: 0F 22 91 50 4F 53 54 43 4F 44 45 20 22 3B 56 24 |.".POSTCODE ";V$|
00001880: 00 8E 20 A0 28 50 24 28 48 38 29 B2 56 24 00 A8 |.. .(P$(H8).V$..|
00001890: 20 B4 28 99 3A 99 22 20 20 20 20 20 20 20 20 20 | .(.:." |
000018A0: 22 3B 57 24 28 48 38 29 00 BD 20 C8 28 0F 22 91 |";W$(H8).. .(.".|
000018B0: 57 4F 4F 4E 50 4C 2E 20 20 22 3B 56 24 00 CB 20 |WOONPL. ";V$.. |
000018C0: DC 28 57 24 28 48 38 29 B2 56 24 00 E2 20 F0 28 |.(W$(H8).V$.. .(|
000018D0: 99 3A 99 22 20 20 20 20 20 20 22 3B 54 24 28 48 |.:." ";T$(H|
000018E0: 38 29 00 F4 20 04 29 0F 22 91 49 4E 46 4F 20 20 |8).. .).".INFO |
000018F0: 22 3B 56 24 00 07 21 18 29 54 24 28 48 38 29 B2 |";V$..!.)T$(H8).|
00001900: 56 24 3A 45 49 B2 31 00 2E 21 2C 29 99 3A 99 22 |V$:EI.1..!,).:."|
00001910: 11 11 31 2E 20 4E 4F 47 20 45 45 4E 20 41 44 52 |..1. NOG EEN ADR|
00001920: 45 53 20 43 4F 52 52 49 47 45 52 45 4E 22 00 49 |ES CORRIGEREN".I|
00001930: 21 40 29 99 22 11 32 2E 20 54 45 52 55 47 20 4E |!@).".2. TERUG N|
00001940: 41 41 52 20 4D 45 4E 55 22 00 52 21 54 29 8D 31 |AAR MENU".R!T).1|
00001950: 30 30 00 70 21 68 29 8B 20 48 31 20 B3 20 31 20 |00.p!h). H1 . 1 |
00001960: B0 20 48 31 20 B1 20 32 20 89 20 31 30 35 38 30 |. H1 . 2 . 10580|
00001970: 00 7B 21 7C 29 8B 48 31 B2 32 8E 00 87 21 90 29 |.{!|).H1.2...!.)|
00001980: 89 20 31 30 30 30 30 00 8D 21 1E 4E 27 00 93 21 |. 10000..!.N'..!|
00001990: 1F 4E 27 00 B0 21 20 4E 99 22 93 11 11 2A 2A 2A |.N'..! N."...***|
000019A0: 2A 2A 20 4C 41 42 45 4C 53 20 2A 2A 2A 2A 2A 22 |** LABELS *****"|
000019B0: 00 CB 21 34 4E 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D |..!4N."=========|
000019C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 E6 21 48 4E |=========="..!HN|
000019D0: 99 22 11 31 2E 20 41 4C 4C 45 53 20 41 46 44 52 |.".1. ALLES AFDR|
000019E0: 55 4B 4B 45 4E 22 00 08 22 5C 4E 99 22 11 32 2E |UKKEN".."\N.".2.|
000019F0: 20 53 45 4C 45 43 54 49 45 20 4F 50 20 50 4F 53 | SELECTIE OP POS|
00001A00: 54 43 4F 44 45 20 20 22 00 11 22 70 4E 8D 31 30 |TCODE ".."pN.10|
00001A10: 30 00 2F 22 84 4E 8B 20 48 31 20 B3 20 31 20 B0 |0./".N. H1 . 1 .|
00001A20: 20 48 31 20 B1 20 32 20 89 20 32 30 30 38 30 00 | H1 . 2 . 20080.|
00001A30: 44 22 98 4E 8B 20 48 31 20 B2 20 32 20 89 20 32 |D".N. H1 . 2 . 2|
00001A40: 30 34 38 30 00 4F 22 AC 4E 8D 32 30 38 34 30 00 |0480.O".N.20840.|
00001A50: 63 22 C0 4E 8F 20 50 54 52 20 41 41 4E 52 4F 45 |c".N. PTR AANROE|
00001A60: 50 45 4E 00 77 22 D4 4E 9F 50 46 2C 34 3A 98 50 |PEN.w".N.PF,4:.P|
00001A70: 46 2C C7 28 37 29 3B 00 AF 22 D6 4E 8B 53 54 A7 |F,.(7);..".N.ST.|
00001A80: 99 22 93 22 3A E7 31 30 22 12 50 52 49 4E 54 45 |.".":.10".PRINTE|
00001A90: 52 20 49 53 20 4E 4F 47 20 55 49 54 21 3A 43 4C |R IS NOG UIT!:CL|
00001AA0: 4F 53 45 50 46 3A 47 4F 54 4F 32 30 31 38 30 00 |OSEPF:GOTO20180.|
00001AB0: C3 22 E8 4E 81 45 B2 31 A4 4E 3A 48 38 B2 48 25 |.".N.E.1.N:H8.H%|
00001AC0: 28 45 29 00 D5 22 FC 4E E7 32 38 22 41 44 52 45 |(E)..".N.28"ADRE|
00001AD0: 53 20 22 3B 45 00 E4 22 10 4F 98 50 46 2C 4E 24 |S ";E..".O.PF,N$|
00001AE0: 28 48 38 29 00 F3 22 24 4F 98 50 46 2C 41 24 28 |(H8).."$O.PF,A$(|
00001AF0: 48 38 29 00 0E 23 38 4F 98 50 46 2C 50 24 28 48 |H8)..#8O.PF,P$(H|
00001B00: 38 29 3B 22 20 20 22 3B 57 24 28 48 38 29 00 1F |8);" ";W$(H8)..|
00001B10: 23 4C 4F 81 49 B2 31 A4 33 3A 98 50 46 3A 82 00 |#LO.I.1.3:.PF:..|
00001B20: 27 23 88 4F 82 20 45 00 4A 23 9C 4F 99 22 93 44 |'#.O. E.J#.O.".D|
00001B30: 49 54 20 57 41 52 45 4E 20 22 3B 45 AB 31 3B 22 |IT WAREN ";E.1;"|
00001B40: 20 41 44 52 45 53 53 45 4E 22 00 53 23 B0 4F 8D | ADRESSEN".S#.O.|
00001B50: 31 30 30 00 61 23 C4 4F 8F 20 50 54 52 20 55 49 |100.a#.O. PTR UI|
00001B60: 54 00 69 23 D8 4F A0 50 46 00 6F 23 EC 4F 8E 00 |T.i#.O.PF.o#.O..|
00001B70: 92 23 00 50 EA 22 11 11 57 41 54 20 49 53 20 44 |.#.P."..WAT IS D|
00001B80: 45 20 50 4F 53 54 43 4F 44 45 3F 20 22 3B 48 24 |E POSTCODE? ";H$|
00001B90: 2C 37 00 A0 23 14 50 8F 20 50 54 52 20 41 41 4E |,7..#.P. PTR AAN|
00001BA0: 00 B4 23 28 50 9F 50 46 2C 34 3A 98 50 46 2C C7 |..#(P.PF,4:.PF,.|
00001BB0: 28 37 29 3B 00 EC 23 2A 50 8B 53 54 A7 99 22 93 |(7);..#*P.ST..".|
00001BC0: 22 3A E7 31 30 22 12 50 52 49 4E 54 45 52 20 49 |":.10".PRINTER I|
00001BD0: 53 20 4E 4F 47 20 55 49 54 21 3A 43 4C 4F 53 45 |S NOG UIT!:CLOSE|
00001BE0: 50 46 3A 47 4F 54 4F 32 30 35 32 30 00 F4 23 3C |PF:GOTO20520..#<|
00001BF0: 50 45 B2 30 00 08 24 50 50 81 4B B2 31 A4 4E 3A |PE.0..$PP.K.1.N:|
00001C00: 48 38 B2 48 25 28 4B 29 00 28 24 64 50 8B 20 C8 |H8.H%(K).($dP. .|
00001C10: 28 50 24 28 48 38 29 2C 34 29 20 B3 B1 20 48 24 |(P$(H8),4) .. H$|
00001C20: 20 89 20 32 30 37 34 30 00 32 24 78 50 45 B2 45 | . 20740.2$xPE.E|
00001C30: AA 31 00 41 24 8C 50 98 50 46 2C 4E 24 28 48 38 |.1.A$.P.PF,N$(H8|
00001C40: 29 00 50 24 A0 50 98 50 46 2C 41 24 28 48 38 29 |).P$.P.PF,A$(H8)|
00001C50: 00 6B 24 B4 50 98 50 46 2C 50 24 28 48 38 29 3B |.k$.P.PF,P$(H8);|
00001C60: 22 20 20 22 3B 57 24 28 48 38 29 00 7C 24 C8 50 |" ";W$(H8).|$.P|
00001C70: 81 49 B2 31 A4 33 3A 98 50 46 3A 82 00 84 24 04 |.I.1.3:.PF:...$.|
00001C80: 51 82 20 4B 00 A5 24 18 51 99 22 93 44 49 54 20 |Q. K..$.Q.".DIT |
00001C90: 57 41 52 45 4E 20 22 3B 45 3B 22 20 41 44 52 45 |WAREN ";E;" ADRE|
00001CA0: 53 53 45 4E 22 00 B3 24 2C 51 8F 20 50 54 52 20 |SSEN"..$,Q. PTR |
00001CB0: 55 49 54 00 BB 24 40 51 A0 50 46 00 C1 24 54 51 |UIT..$@Q.PF..$TQ|
00001CC0: 8E 00 EA 24 68 51 99 22 93 11 11 45 52 20 57 4F |...$hQ."...ER WO|
00001CD0: 52 44 45 4E 20 45 45 52 53 54 20 54 45 53 54 2D |RDEN EERST TEST-|
00001CE0: 45 54 49 4B 45 54 54 45 4E 22 00 14 25 7C 51 99 |ETIKETTEN"..%|Q.|
00001CF0: 22 11 41 46 47 45 44 52 55 4B 54 20 4F 4D 20 44 |".AFGEDRUKT OM D|
00001D00: 45 20 49 4E 53 54 45 4C 4C 49 4E 47 20 56 41 4E |E INSTELLING VAN|
00001D10: 20 44 45 22 00 33 25 90 51 99 22 11 50 52 49 4E | DE".3%.Q.".PRIN|
00001D20: 54 45 52 20 54 45 20 43 4F 4E 54 52 4F 4C 45 52 |TER TE CONTROLER|
00001D30: 45 4E 22 00 47 25 A4 51 9F 50 46 2C 34 3A 98 50 |EN".G%.Q.PF,4:.P|
00001D40: 46 2C C7 28 37 29 3B 00 7F 25 B8 51 8B 53 54 A7 |F,.(7);..%.Q.ST.|
00001D50: 99 22 93 22 3A E7 31 30 22 12 50 52 49 4E 54 45 |.".":.10".PRINTE|
00001D60: 52 20 49 53 20 4E 4F 47 20 55 49 54 21 3A 43 4C |R IS NOG UIT!:CL|
00001D70: 4F 53 45 50 46 3A 47 4F 54 4F 32 30 39 30 30 00 |OSEPF:GOTO20900.|
00001D80: 8A 25 C2 51 81 44 B2 31 A4 33 00 AA 25 CC 51 98 |.%.Q.D.1.3..%.Q.|
00001D90: 50 46 2C 22 58 58 58 58 58 58 58 58 58 58 58 58 |PF,"XXXXXXXXXXXX|
00001DA0: 58 58 58 58 58 58 58 58 58 22 00 B2 25 E0 51 82 |XXXXXXXXX"..%.Q.|
00001DB0: 20 44 00 C3 25 F4 51 81 49 B2 31 A4 33 3A 98 50 | D..%.Q.I.1.3:.P|
00001DC0: 46 3A 82 00 CB 25 30 52 A0 50 46 00 EB 25 44 52 |F:...%0R.PF..%DR|
00001DD0: 99 22 11 11 31 2E 20 49 4E 53 54 45 4C 4C 49 4E |."..1. INSTELLIN|
00001DE0: 47 20 56 45 52 4B 45 45 52 44 22 00 0B 26 58 52 |G VERKEERD"..&XR|
00001DF0: 99 22 11 32 2E 20 49 4E 53 54 45 4C 4C 49 4E 47 |.".2. INSTELLING|
00001E00: 20 4F 2E 4B 2E 91 91 91 91 91 22 00 14 26 6C 52 | O.K......"..&lR|
00001E10: 8D 31 30 30 00 29 26 80 52 8B 48 31 B3 31 B0 48 |.100.)&.R.H1.1.H|
00001E20: 31 B1 32 89 32 31 31 30 30 00 39 26 94 52 8B 48 |1.2.21100.9&.R.H|
00001E30: 31 B2 31 89 32 30 39 30 30 00 3F 26 A8 52 8E 00 |1.1.20900.?&.R..|
00001E40: 45 26 A6 61 27 00 4B 26 A7 61 27 00 6E 26 A8 61 |E&.a'.K&.a'.n&.a|
00001E50: 99 22 93 11 11 2A 2A 2A 2A 2A 20 57 45 47 53 43 |."...***** WEGSC|
00001E60: 48 52 49 4A 56 45 4E 20 2A 2A 2A 2A 2A 22 00 89 |HRIJVEN *****"..|
00001E70: 26 DA 61 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |&.a."===========|
00001E80: 3D 3D 3D 3D 3D 3D 3D 3D 22 00 B4 26 0C 62 99 22 |========"..&.b."|
00001E90: 11 11 47 45 45 46 20 4E 41 41 4D 20 57 41 41 52 |..GEEF NAAM WAAR|
00001EA0: 4F 4E 44 45 52 20 42 45 53 54 41 4E 44 20 4D 4F |ONDER BESTAND MO|
00001EB0: 45 54 20 22 00 E0 26 3E 62 85 22 11 57 4F 52 44 |ET "..&>b.".WORD|
00001EC0: 45 4E 20 4F 50 47 45 42 4F 52 47 45 4E 20 3F 20 |EN OPGEBORGEN ? |
00001ED0: 41 44 52 45 53 9D 9D 9D 9D 9D 9D 9D 22 3B 46 24 |ADRES.......";F$|
00001EE0: 00 1D 27 3F 62 45 4D 24 B2 22 22 3A 27 4B 49 4A |..'?bEM$."":'KIJ|
00001EF0: 4B 20 4F 46 20 44 49 53 4B 20 41 41 4E 57 45 5A |K OF DISK AANWEZ|
00001F00: 49 47 20 2D 2D 20 44 4F 45 20 41 4E 44 45 52 53 |IG -- DOE ANDERS|
00001F10: 20 54 41 50 45 2D 52 4F 55 54 49 4E 45 00 59 27 | TAPE-ROUTINE.Y'|
00001F20: 40 62 A0 31 35 3A 9F 31 35 2C 38 2C 31 35 2C 22 |@b.15:.15,8,15,"|
00001F30: 49 30 22 3A 84 31 35 2C 45 4E 2C 45 4D 24 2C 45 |I0":.15,EN,EM$,E|
00001F40: 54 2C 45 53 3A 8B 45 4D 24 B3 B1 22 4F 4B 22 A0 |T,ES:.EM$.."OK".|
00001F50: 31 35 3A 89 32 36 30 30 30 00 76 27 70 62 46 4C |15:.26000.v'pbFL|
00001F60: 24 B2 22 40 30 3A 22 AA 46 24 AA 22 2C 53 45 51 |$."@0:".F$.",SEQ|
00001F70: 2C 57 52 49 54 45 00 85 27 A2 62 9F 35 2C 38 2C |,WRITE..'.b.5,8,|
00001F80: 32 2C 46 4C 24 00 95 27 D4 62 98 35 2C 4E 3B C7 |2,FL$..'.b.5,N;.|
00001F90: 28 31 33 29 3B 00 A9 27 06 63 81 4C B2 31 A4 4E |(13);..'.c.L.1.N|
00001FA0: 3A 48 38 B2 48 25 28 4C 29 00 BE 27 38 63 98 35 |:H8.H%(L)..'8c.5|
00001FB0: 2C 4E 24 28 48 38 29 3B C7 28 31 33 29 3B 00 D3 |,N$(H8);.(13);..|
00001FC0: 27 6A 63 98 35 2C 41 24 28 48 38 29 3B C7 28 31 |'jc.5,A$(H8);.(1|
00001FD0: 33 29 3B 00 E8 27 9C 63 98 35 2C 50 24 28 48 38 |3);..'.c.5,P$(H8|
00001FE0: 29 3B C7 28 31 33 29 3B 00 FD 27 CE 63 98 35 2C |);.(13);..'.c.5,|
00001FF0: 57 24 28 48 38 29 3B C7 28 31 33 29 3B 00 12 28 |W$(H8);.(13);..(|
00002000: 00 64 98 35 2C 54 24 28 48 38 29 3B C7 28 31 33 |.d.5,T$(H8);.(13|
00002010: 29 3B 00 1F 28 32 64 99 22 13 22 4C 3A 82 4C 00 |);..(2d."."L:.L.|
00002020: 2D 28 64 64 A0 35 3A 45 49 B2 30 3A 91 00 33 28 |-(dd.5:EI.0:..3(|
00002030: 96 64 8E 00 3E 28 90 65 46 4C 24 B2 46 24 00 6C |.d..>(.eFL$.F$.l|
00002040: 28 9A 65 99 22 93 11 11 55 20 47 41 41 54 20 48 |(.e."...U GAAT H|
00002050: 45 54 20 42 45 53 54 41 4E 44 20 57 45 47 53 43 |ET BESTAND WEGSC|
00002060: 48 52 49 4A 56 45 4E 20 4E 41 41 52 00 8F 28 A4 |HRIJVEN NAAR..(.|
00002070: 65 99 22 12 54 41 50 45 20 23 31 92 20 4F 4E 44 |e.".TAPE #1. OND|
00002080: 45 52 20 44 45 20 4E 41 41 4D 20 12 22 46 24 00 |ER DE NAAM ."F$.|
00002090: BC 28 AE 65 99 22 11 11 56 45 52 57 49 4A 44 45 |.(.e."..VERWIJDE|
000020A0: 52 20 45 45 52 53 54 20 44 45 20 50 52 4F 47 52 |R EERST DE PROGR|
000020B0: 41 4D 4D 41 43 41 53 53 45 54 54 45 00 E9 28 B8 |AMMACASSETTE..(.|
000020C0: 65 99 22 11 45 4E 20 4C 45 47 20 56 45 52 56 4F |e.".EN LEG VERVO|
000020D0: 4C 47 45 4E 53 20 44 45 20 44 41 54 41 43 41 53 |LGENS DE DATACAS|
000020E0: 53 45 54 54 45 20 49 4E 2E 00 15 29 C2 65 99 22 |SETTE IN...).e."|
000020F0: 11 47 45 42 52 55 49 4B 20 42 49 4A 20 56 4F 4F |.GEBRUIK BIJ VOO|
00002100: 52 4B 45 55 52 20 50 45 52 20 42 45 53 54 41 4E |RKEUR PER BESTAN|
00002110: 44 20 45 45 4E 00 31 29 CC 65 99 22 12 41 50 41 |D EEN.1).e.".APA|
00002120: 52 54 45 92 20 44 41 54 41 43 41 53 53 45 54 54 |RTE. DATACASSETT|
00002130: 45 00 58 29 D6 65 99 22 11 11 54 49 4B 20 45 45 |E.X).e."..TIK EE|
00002140: 4E 20 54 4F 45 54 53 20 41 4C 53 20 55 20 4B 4C |N TOETS ALS U KL|
00002150: 41 41 52 20 42 45 4E 54 00 69 29 E0 65 A1 51 24 |AAR BENT.i).e.Q$|
00002160: 3A 8B 51 24 B2 22 22 89 2E 00 7A 29 EA 65 A0 35 |:.Q$.""...z).e.5|
00002170: 3A 9F 35 2C 31 2C 32 2C 46 24 00 87 29 F4 65 8D |:.5,1,2,F$..).e.|
00002180: 32 35 33 30 30 3A 8E 00 8D 29 46 71 27 00 93 29 |25300:...)Fq'..)|
00002190: 47 71 27 00 AF 29 48 71 99 22 93 11 11 2A 2A 2A |Gq'..)Hq."...***|
000021A0: 2A 2A 20 45 49 4E 44 45 20 2A 2A 2A 2A 2A 22 00 |** EINDE *****".|
000021B0: C8 29 52 71 99 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.)Rq."==========|
000021C0: 3D 3D 3D 3D 3D 3D 3D 22 00 F7 29 5C 71 8B 45 49 |======="..)\q.EI|
000021D0: B2 31 99 22 11 11 20 20 20 20 20 20 20 42 45 53 |.1.".. BES|
000021E0: 54 41 4E 44 20 4E 4F 47 20 57 45 47 53 43 48 52 |TAND NOG WEGSCHR|
000021F0: 49 4A 56 45 4E 21 22 00 02 2A 70 71 8D 31 30 30 |IJVEN!"..*pq.100|
00002200: 3A 8E 00 08 2A 7A 71 27 00 0E 2A 84 71 27 00 14 |:...*zq'..*.q'..|
00002210: 2A 8E 71 27 00 1A 2A 2E 75 27 00 20 2A 2F 75 27 |*.q'..*.u'. */u'|
00002220: 00 26 2A B6 88 27 00 2C 2A B7 88 27 00 4B 2A B8 |.&*..'.,*..'.K*.|
00002230: 88 50 52 B2 31 3A 5A 49 24 B2 22 50 52 49 4E 54 |.PR.1:ZI$."PRINT|
00002240: 45 4E 20 3F 22 3A 89 34 30 30 30 00 68 2A CC 88 |EN ?":.4000.h*..|
00002250: 50 52 B2 30 3A 9F 31 30 34 2C 32 30 3A 98 31 30 |PR.0:.104,20:.10|
00002260: 34 2C C7 28 32 34 29 3B 00 9A 2A E0 88 99 22 12 |4,.(24);..*...".|
00002270: 11 11 11 11 11 20 20 20 20 20 20 20 20 20 20 20 |..... |
00002280: 50 52 49 4E 54 45 52 20 53 54 41 4E 44 42 59 20 |PRINTER STANDBY |
00002290: 20 20 20 20 20 20 20 20 20 22 00 B8 2A F4 88 81 | "..*...|
000022A0: 57 B2 54 31 A4 54 32 3A 46 50 B2 46 50 AA 31 3A |W.T1.T2:FP.FP.1:|
000022B0: 48 38 B2 48 25 28 57 29 00 E5 2A 30 89 98 31 30 |H8.H%(W)..*0..10|
000022C0: 34 2C C7 28 32 37 29 AA C7 28 36 38 29 AA C7 28 |4,.(27)..(68)..(|
000022D0: 36 29 AA C7 28 32 32 29 AA C7 28 34 32 29 AA C7 |6)..(22)..(42)..|
000022E0: 28 35 32 29 3B 00 FA 2A 44 89 98 31 30 34 2C C7 |(52);..*D..104,.|
000022F0: 28 36 37 29 AA C7 28 30 29 3B 00 33 2B 58 89 98 |(67)..(0);.3+X..|
00002300: 31 30 34 2C 46 50 24 3B 57 3B C7 28 39 29 3B 4E |104,FP$;W;.(9);N|
00002310: 24 28 48 38 29 3B C7 28 39 29 3B 41 24 28 48 38 |$(H8);.(9);A$(H8|
00002320: 29 3B C7 28 39 29 3B 50 24 28 48 38 29 3B C7 28 |);.(9);P$(H8);.(|
00002330: 39 29 3B 00 4F 2B 6C 89 98 31 30 34 2C 57 24 28 |9);.O+l..104,W$(|
00002340: 48 38 29 3B C7 28 39 29 3B 54 24 28 48 38 29 00 |H8);.(9);T$(H8).|
00002350: 6A 2B 80 89 8B 46 50 B2 36 30 98 31 30 34 2C C7 |j+...FP.60.104,.|
00002360: 28 31 32 29 3B 3A 46 50 B2 30 00 8E 2B 94 89 8B |(12);:FP.0..+...|
00002370: C2 28 31 35 31 29 B2 36 57 B2 54 32 3A 98 31 30 |.(151).6W.T2:.10|
00002380: 34 2C C7 28 32 34 29 3A 89 33 35 32 38 30 00 95 |4,.(24):.35280..|
00002390: 2B A8 89 82 57 00 A4 2B BC 89 98 31 30 34 2C C7 |+...W..+...104,.|
000023A0: 28 31 32 29 00 BA 2B D0 89 A0 31 30 34 3A 5A 49 |(12)..+...104:ZI|
000023B0: 24 B2 22 5A 49 45 4E 20 3F 22 00 C9 2B E4 89 99 |$."ZIEN ?"..+...|
000023C0: 22 93 22 3A 89 31 30 32 30 00 CF 2B 3E 9C 27 00 |".":.1020..+>.'.|
000023D0: D5 2B 3F 9C 27 00 03 2C 60 EA 99 22 93 45 52 20 |.+?.'..,`..".ER |
000023E0: 49 53 20 45 45 4E 20 50 52 4F 47 52 41 4D 4D 41 |IS EEN PROGRAMMA|
000023F0: 2D 20 4F 46 20 42 45 44 49 45 4E 49 4E 47 53 46 |- OF BEDIENINGSF|
00002400: 4F 55 54 00 31 2C 6A EA 99 22 4F 50 47 45 54 52 |OUT.1,j.."OPGETR|
00002410: 45 44 45 4E 2E 20 48 45 54 20 42 45 53 54 45 20 |EDEN. HET BESTE |
00002420: 4B 55 4E 54 20 55 20 4E 55 20 44 45 20 44 41 54 |KUNT U NU DE DAT|
00002430: 41 00 62 2C 74 EA 99 22 44 49 45 20 4F 50 20 44 |A.b,t.."DIE OP D|
00002440: 49 54 20 4D 4F 4D 45 4E 54 20 49 4E 20 48 45 54 |IT MOMENT IN HET|
00002450: 20 47 45 48 45 55 47 45 4E 20 41 41 4E 57 45 2D | GEHEUGEN AANWE-|
00002460: 22 3B 00 A8 2C 7E EA 99 22 5A 49 47 20 5A 49 4A |";..,~.."ZIG ZIJ|
00002470: 4E 20 12 45 45 52 53 54 20 57 45 47 53 43 48 52 |N .EERST WEGSCHR|
00002480: 49 4A 56 45 4E 92 2C 20 45 56 45 4E 54 55 45 45 |IJVEN., EVENTUEE|
00002490: 4C 20 20 4F 4E 44 45 52 20 45 45 4E 20 53 50 45 |L ONDER EEN SPE|
000024A0: 43 49 41 4C 45 20 22 3B 00 DB 2C 88 EA 99 22 4E |CIALE ";..,..."N|
000024B0: 41 41 4D 2C 20 41 4E 44 45 52 53 20 49 53 20 41 |AAM, ANDERS IS A|
000024C0: 4C 20 55 57 4D 4F 45 49 54 45 20 4D 49 53 53 43 |L UWMOEITE MISSC|
000024D0: 48 49 45 4E 20 56 4F 4F 52 22 3B 00 F1 2C 92 EA |HIEN VOOR";..,..|
000024E0: 99 22 20 4E 49 45 54 53 20 47 45 57 45 45 53 54 |." NIETS GEWEEST|
000024F0: 2E 00 1E 2D 9C EA 99 22 11 11 20 20 20 20 20 55 |...-...".. U|
00002500: 20 47 41 41 54 20 4E 55 20 54 45 52 55 47 20 4E | GAAT NU TERUG N|
00002510: 41 41 52 20 48 45 54 20 4D 45 4E 55 2E 22 00 41 |AAR HET MENU.".A|
00002520: 2D A6 EA 99 22 11 11 11 20 20 20 20 20 20 20 20 |-..."... |
00002530: 20 20 20 20 20 20 20 20 12 53 55 43 43 45 53 21 | .SUCCES!|
00002540: 92 00 64 2D B0 EA 99 22 11 11 11 11 12 43 4F 44 |..d-...".....COD|
00002550: 45 20 56 41 4E 20 44 45 20 46 4F 55 54 3A 92 20 |E VAN DE FOUT:. |
00002560: 22 3B 45 43 00 87 2D BA EA 99 22 11 49 4E 20 52 |";EC..-...".IN R|
00002570: 45 47 45 4C 4E 55 4D 4D 45 52 3A 20 22 3B 45 4C |EGELNUMMER: ";EL|
00002580: 3A EE 31 30 3A 89 30 00 96 2D 48 EE 99 C2 28 31 |:.10:.0..-H...(1|
00002590: 35 32 29 3A 89 2E 00 A5 2D 18 F6 99 C2 28 31 35 |52):....-....(15|
000025A0: 31 29 3A 89 2E 00 00 00 00 |1):...... |
.......EXIT.1.1020.....EXIT.1.*......600
00.3....400.9.B.'.?.C.'.`.D..H1$:.H1$.""
.100.H1.E(H1$):..F...'...H..108,PT$;:.H1
$,1:H1.E(H1$):....+.'.G.,.L.C(IN$):.J.1.
L:AS$.J(IN$,J,1):AS.F(AS$):.AS.60.330...
T.6.L.C(IN$)...@..J.1.L:AS$.J(IN$,J,1):A
S.F(AS$).*.J..AS.34IN$.H(IN$,J.1).G(98).
I(IN$,L.J):..:.320.].T..AS.44IN$.H(IN$,J
.1).G(108).I(IN$,L.J):..:.320...^..AS.59
IN$.H(IN$,J.1).G(123).I(IN$,L.J):..:.320
.C.H..AS.58IN$.H(IN$,J.1).G(122).I(IN$,L
.J):..:.320.K.R..:..Q...'......"......":
.T.64B.DER3.&...'**** ADRESSENBESTAND VO
OR CBM-64 MET EXBASIC LEVEL II.]...'AANG
EPAST DOOR GARY VAN BEECK, JUNI
1983.....A1.25:ZI$."ZIEN ?":S.42:PT$."K
EUZE .>>. ":PF.102.K.... N$(A1),A$(A1),P
$(A1),W$(A1),T$(A1),H%(A1),I%(2.A1).....
. IN H%-TABEL STAAT DE VOLGORDE-*DE INDE
X*- VAN DE DIVERSE TABELLEN.....'.....'.
6....J.0.A1:H%(J).J:.J.Q....".":.0,0,39,
0,239:.0,4,39,4,S:.0,0,0,4,S:.39,0,39,4,
S......82".CLAIRE. MENU...$.."...1. BEST
AND OPZETTEN OF UITBREIDEN.Y.8..".2. INH
OUD TONEN VAN HET BESTAND...L..".3. ZOEK
EN IN HET BESTAND...`..".4. SORTEREN PER
ELEMENT.8.T..".5. VERANDEREN IN BESTAND
.K....".6. LEDENLIJST PRINTEN .*..***
***********......".7. LABELS PRINTEN
.*..* DOORGAAN NA.Q....".8. BESTAND
WEGSCHRIJVEN .*..* 'READY.' :...D.."
.9. STOP PROGRAMMA .*..* .GO
TO 0....X...(40,185);.:....158,0:.200:.H
1$."0"...H1.E(H1$).T....H1.2000,4000,600
0,8000,10000,35000,20000,25000,29000...
.. 1020...N.'...O.'...P.."...***** INVOE
R *****".B...."==================".P....
N.0.2660......"..1. NIEUW BESTAND OPBOUW
EN"... .."..2. OUD BESTAND OPHALEN.":.20
0.?.4..H1$."1".2120..H1$."2".3000..2000.
L.H.N.1:EI.1.V.\.."..".Y.P.."U KUNT NU A
DRESSEN INVOEREN"......".OM MET INVOER T
E EINDIGEN: TYPE -STOP-"......"".A.... P
. N . A1.Q....".<";P;">"...T.."======="
.....IN$." ":."NAAM : ";IN$,15:.30
0.(....IN$."STOP".2540.N$(P).IN$.Q...IN$
." ":."ADRES : ";IN$,18:.300.P.$..I
N$."STOP".2540.A$(P).IN$...8.IN$." ":."P
OSTCODE : ";IN$,7:.300...L..IN$."STOP"
.2540.P$(P).IN$...`.IN$." ":.".WOONPLAAT
S:";.(10,29);:.IN$,15:.300...T..IN$."STO
P".2540.W$(P).IN$.,...IN$." ":.".INFO :"
;IN$,79:.300.K....IN$."STOP".2540.T$(P).
IN$.S...."".[.D.. P.C.X.."".X....".EINDE
INVOER".....N . P . 1......".ER ZITTEN"
;N;"ADRESSEN IN HET BESTAND".P.(.."..RAA
K EEN TOETS AAN".Y.<..100...P.....D..".E
R ZIT AL EEN BESTAND IN HET GEHEUGEN".+.
X..".1. NIET OVERSCHRIJVEN".H....".2. WE
L OVERSCHRIJVEN".Q. ..200.J.... H1.1 . H
1.2 . 2780.U.H.. 2660...... H1.2 . 2120.
.....".....3. BESTAND UITBREIDEN".L...."
.4. BESTAND NIET UITBREIDEN".U....200...
,..H1.4....@.N.N.1:EI.1...T.. 2140.....'
.....'.<...EM$."":'GA NAAR TAPE ALS DISK
NIET IS AANGESLOTEN.W... 15:.15,8,15,"I
0":.15,EN,EM$,ET,ES:.EM$.."OK" 15:.3400.
....."..........WELK BESTAND KIEST U ? A
DRES.......";F$.K...FL$."0:".F$.",SEQ,RE
AD"..... 5:.5,8,2,FL$......5,N......X.1.
N......5,N$(X)......5,A$(X)...F..5,P$(X)
.%.P..5,W$(X).2.Z..5,T$(X).?...."."X:.X.
H... 5:.._....J.0.A1:H%(J).J:.J.E.......
H..".VERWIJDER EVENTUEEL PROGRAMMACASSET
TE.."...I.."PLAATS DE DATACASSETTE IN TA
PE #1.."...J.."DRUK OP EEN TOETS OM VERD
ER TE GAAN...K..Q$:.Q$.""...5.Q..479: 5:
.5,1,0,F$:.5,N:."...INLEZEN VAN BESTAND
.";F$.P.R..".AANTAL ADRESSEN:";N._.\..32
40:.3:..E...'.K...'... .."...***** INHOU
D *****"......"==================".E.H..
"..WELKE ADRESSEN WILT U "ZI$.U....".1.
ALLES......".2. EEN BEPAALD ADRES......"
.3. BEREIK"......100. .,..H1.1.H1.3.4000
.5.@.. H1 .. 1 . 4220.C.T.T1.1:T2.N.N.H.
. 4540.C.|.. H1 .. 2 . 4340.....".WELK
NUMMER? ";T1$,3.....T1.E(T1$)...... T1 .
N . 4520...L.T2.T1...... 4540.Z....".EE
RSTE ADRESNNUMMER: ";T1$,3.....T1.E(T1$)
......T1.1T1.1..T1.N.4520...0.'IF T1 > N
THEN 4520.=.D..".LAATSTE ADRESNNUMMER:
";T2$.K.X.T2.E(T2$).G.L..T2.N.4520..T2..
T1.4540.....'IF T2 >= T1 THEN 4540.....
.".FOUT--ADRES 1 > ADRES 2":.4:.4000....
..".BESTAND HEEFT GEEN"T2"MAAR SLECHTS";
N;" ADRESSEN":.4:.4000......PR.1.35020..
.P.."."...... W . T1 . T2.&...H8.H%(W).H
...."<";W;"> .SHIFT. = WISSEN".M. .."=
====== .RETURN. VOOR VERDER".U.4..""...
H.. N$(H8)...\.. A$(H8)...P.. P$(H8);"
";W$(H8)...... T$(H8)......AF.1.4780:'EL
SEGOSUB4900:GOTO4800......"":.H1.2."..TI
K .SHIFT. VOOR WISSEN UIT BESTAND OF AND
ERS..".9...."..WILLEKEURIGE TOETS.T....B
(152).0...AF.1:.4900.\....:..|.$..".":.4
680:.".@. = WISSEN":...%..100:.H1$.."@".
.W.)..X.W.1.N.1:N$(X.1).N$(X):A$(X.1).A$
(X):P$(X.1).P$(X):W$(X.1).W$(X).....T$(X
.1).T$(X):.:N.N.1:AF.0:....N.'...O.'.!.P
.."...***** ZOEKEN *****".;...."========
==========".G....".TE ZOEKEN WOORD OF DE
EL DAARVAN ";Z$.P...F1.0......Z.1.N:H8.H
%(Z)...T.F..(N$(H8),Z$):.F.0.6360.....F.
.(A$(H8),Z$):.F.0.6360.....F..(P$(H8),Z$
):.F.0.6360.....F..(W$(H8),Z$):.F.0.6360
...$.F..(T$(H8),Z$):.F.0.6360...8.. Z.(.
L..F1.1..W.`..".DEZE LETTERCOMBINATIE IS
NIET AANWEZIG".Q.T.."...1. VERDER ZOEKE
N......".2. MENU......100......H1.1.H1.2
.6300...D..H1.2..1600...X.."".....F1.1..
....".COMBINATIE AANWEZIG IN:"......"---
--------------------"...(.."<";Z;">"...<
..N$(H8).$.P..A$(H8).<.D..P$(H8);" ";W$
(H8).H.X..T$(H8).Q....100.[. ..Z.N..F...
. 6200.L.>.'.R.?.'...@..".**** SORTEREN
****"...T.."===================="...H.."
..SORTEREN OP.M.|.."..1. NAAM......".2.
ADRES......".3. POSTCODE......".4. WOONP
LAATS...L..".5. INFO......100.:.... H1 .
1 . H1 . 5 . 8160.K.. .".SORTEREN KOST
ZELFS EEN COMPUTER TIJD...".U.. .8320...
0 .".BESTAND GESORTEERD":EI.1...D .100..
.X ....L . *SORTEER*.H.. N9.N.1:X.0:H9.0
.... B.N9.1:.J.0.B:I%(J).J:.J.... .J.0.N
9.2.3.2.... B.B.1:I1.I%(J):I2.I%(J.1)...
P .8620.... I%(B).I:.J.F.. X.X.1:C.I%(B)
:.C.0..[..!H%(H9).C:H9.H9.1.G. !I%(C).X.
..4!C%.C.2:J.C%.2:C.N9.C%:.C.B.8440...H!
I1.I%(J):I2.I%(J.1)...\!.I1.0I.I2:.8600.
K.P!.I2.0I.I1:.8600.U..!.8620....!I%(C).
I:.8500....!.H1.1I.I1:.N$(I2).N$(I1)I.I2
.)..!.H1.2I.I1:.A$(I2).A$(I1)I.I2.J.T!.H
1.3I.I1:.P$(I2).P$(I1)I.I2.K..!.H1.4I.I1
:.W$(I2).W$(I1)I.I2....!.H1.5I.I1:.T$(I2
).T$(I1)I.I2....".....''....''....'."...
***** VERANDER *****".Y.$'."============
========"...8'. N . 0 . 10140...L'.".ER
IS GEEN BESTAND AANWEZIG.,.`'."..RAAK EE
N TOETS AAN".5.T'.100.;..'..F..'.".ADRES
VERANDEREN MET NUMMER ";Z3$,3.~..'Z.E(Z
3$):.Z.N.10000...D'H8.H%(Z)...X'.".WIJZI
G ZONODIG DE GETOONDE REGEL EN".W..'.".D
RUK DAARNA OP .RETURN."....(."..
";N$(H8).. .(.".NAAM ";V$.. ((N$(H8
).V$.. <(.:." ";A$(H8).C P(.".AD
RES ";V$.Q D(A$(H8).V$.K X(.:."
";P$(H8).. .(.".POSTCODE ";V$.. (P$(
H8).V$.. .(.:." ";W$(H8).. H(.".
WOONPL. ";V$.K .(W$(H8).V$.. .(.:."
";T$(H8).. .).".INFO ";V$..!.)T$(H8).
V$:EI.1..!,).:."..1. NOG EEN ADRES CORRI
GEREN".I!@).".2. TERUG NAAR MENU".R!T).1
00.P!H). H1 . 1 . H1 . 2 . 10580.{!|).H1
.2...!.). 10000..!.N'..!.N'..! N."...***
** LABELS *****".K!4N."=================
=="..!HN.".1. ALLES AFDRUKKEN".."\N.".2.
SELECTIE OP POSTCODE ".."PN.100./".N.
H1 . 1 . H1 . 2 . 20080.D".N. H1 . 2 . 2
0480.O".N.20840.C".N. PTR AANROEPEN.W"TN
.PF,4:.PF,G(7);.."VN.ST..".":.10".PRINTE
R IS NOG UIT!:CLOSEPF:GOTO20180.C".N.E.1
.N:H8.H%(E).U".N.28"ADRES ";E..".O.PF,N$
(H8).."$O.PF,A$(H8)..#8O.PF,P$(H8);" ";
W$(H8)..#LO.I.1.3:.PF:..'#.O. E.J#.O.".D
IT WAREN ";E.1;" ADRESSEN".S#.O.100.A#DO
. PTR UIT.I#XO PF.O#.O...#.P."..WAT IS D
E POSTCODE? ";H$,7. #.P. PTR AAN..#(P.PF
,4:.PF,G(7);..#*P.ST..".":.10".PRINTER I
S NOG UIT!:CLOSEPF:GOTO20520..#<PE.0..$P
P.K.1.N:H8.H%(K).($DP. H(P$(H8),4) .. H$
. 20740.2$XPE.E.1.A$.P.PF,N$(H8).P$ P.P
F,A$(H8).K$.P.PF,P$(H8);" ";W$(H8).|$HP
.I.1.3:.PF:...$.Q. K..$.Q.".DIT WAREN ";
E;" ADRESSEN"..$,Q. PTR UIT..$@Q PF.A$TQ
...$HQ."...ER WORDEN EERST TEST-ETIKETTE
N"..%|Q.".AFGEDRUKT OM DE INSTELLING VAN
DE".3%.Q.".PRINTER TE CONTROLEREN".G%.Q
.PF,4:.PF,G(7);.%.Q.ST..".":.10".PRINTE
R IS NOG UIT!:CLOSEPF:GOTO20900..%BQ.D.1
.3..%LQ.PF,"XXXXXXXXXXXXXXXXXXXXX"..%.Q.
D.C%.Q.I.1.3:.PF:..K%0R PF..%DR."..1. I
NSTELLING VERKEERD"..&XR.".2. INSTELLING
O.K......"..&LR.100.)&.R.H1.1.H1.2.2110
0.9&.R.H1.1.20900.?&.R..E&.A'.K&.A'.N&.A
."...***** WEGSCHRIJVEN *****"..&ZA."===
================"..&.B."..GEEF NAAM WAAR
ONDER BESTAND MOET "..&>B.".WORDEN OPGEB
ORGEN ? ADRES.......";F$..'?BEM$."":'KIJ
K OF DISK AANWEZIG -- DOE ANDERS TAPE-RO
UTINE.Y'@B 15:.15,8,15,"I0":.15,EN,EM$,E
T,ES:.EM$.."OK" 15:.26000.V'PBFL$."@0:".
F$.",SEQ,WRITE..'.B.5,8,2,FL$..'TB.5,N;G
(13);..'.C.L.1.N:H8.H%(L)..'8C.5,N$(H8);
G(13);.S'JC.5,A$(H8);G(13);..'.C.5,P$(H8
);G(13);..'NC.5,W$(H8);G(13);..(.D.5,T$(
H8);G(13);..(2D."."L:.L.-(DD 5:EI.0:..3(
.D..>(.EFL$.F$.L(.E."...U GAAT HET BESTA
ND WEGSCHRIJVEN NAAR..(.E.".TAPE #1. OND
ER DE NAAM ."F$..(.E."..VERWIJDER EERST
DE PROGRAMMACASSETTE..(.E.".EN LEG VERVO
LGENS DE DATACASSETTE IN...)BE.".GEBRUIK
BIJ VOORKEUR PER BESTAND EEN.1)LE.".APA
RTE. DATACASSETTE.X)VE."..TIK EEN TOETS
ALS U KLAAR BENT.I).E.Q$:.Q$.""...Z).E 5
:.5,1,2,F$..).E.25300:...)FQ'..)GQ'..)HQ
."...***** EINDE *****".H)RQ."==========
======="..)\Q.EI.1.".. BESTAND NOG
WEGSCHRIJVEN!"..*PQ.100:...*ZQ'..*.Q'..
*.Q'..*.U'. */U'.&*..'.,*..'.K*..PR.1:ZI
$."PRINTEN ?":.4000.H*L.PR.0:.104,20:.10
4,G(24);..*..."...... PRINTER
STANDBY "..*...W.T1.T2:FP.FP.1:
H8.H%(W)..*0..104,G(27).G(68).G(6).G(22)
.G(42).G(52);..*D..104,G(67).G(0);.3+X..
104,FP$;W;G(9);N$(H8);G(9);A$(H8);G(9);P
$(H8);G(9);.O+L..104,W$(H8);G(9);T$(H8).
J+...FP.60.104,G(12);:FP.0..+...B(151).6
W.T2:.104,G(24):.35280..+...W..+...104,G
(12)..+P. 104:ZI$."ZIEN ?".I+...".":.102
0.O+>.'.U+?.'..,`..".ER IS EEN PROGRAMMA
- OF BEDIENINGSFOUT.1,J.."OPGETREDEN. HE
T BESTE KUNT U NU DE DATA.B,T.."DIE OP D
IT MOMENT IN HET GEHEUGEN AANWE-";..,~..
"ZIG ZIJN .EERST WEGSCHRIJVEN., EVENTUEE
L ONDER EEN SPECIALE ";..,..."NAAM, AND
ERS IS AL UWMOEITE MISSCHIEN VOOR";..,..
." NIETS GEWEEST...-...".. U GAAT NU
TERUG NAAR HET MENU.".A-..."...
.SUCCES!..D-...".....CODE VAN DE
FOUT:. ";EC..-...".IN REGELNUMMER: ";EL
:.10:.0..-H..B(152):....-...B(151):.....
.
> CLICK IMAGE PREVIEW FOR FULL MODAL