MEERKT-D
FILE INFORMATION
FILENAME(S): MEERKT-D
FILE TYPE(S): PRG
FILE SIZE: 8.7K
FIRST SEEN: 2025-11-30 21:23:43
APPEARS ON: 1 disk(s)
FILE HASH
88624db269372ee6166b85bbd1e2161e194c3a0c45c19fcb21fc29b3a9310d8c
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 34 2 | MEERKT-D | PRG | DuncanTwain | 7 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0F 04 05 00 97 35 39 34 36 38 2C 31 34 00 |.......59468,14.|
00000010: 1B 04 07 00 8D 20 36 30 30 30 30 00 37 04 0A 00 |..... 60000.7...|
00000020: 81 49 B2 31 A4 34 30 3A 42 4C 24 B2 42 4C 24 AA |.I.1.40:BL$.BL$.|
00000030: C7 28 33 32 29 3A 82 00 5F 04 14 00 8F 20 50 47 |.(32):.._.... PG|
00000040: 4D 20 3D 20 27 4D 45 45 52 4B 45 55 5A 45 54 4F |M = 'MEERKEUZETO|
00000050: 45 54 53 2D 44 27 20 4D 45 53 2D 38 35 30 32 00 |ETS-D' MES-8502.|
00000060: 86 04 19 00 8F 20 28 43 29 20 4D 41 4C 4D 42 45 |..... (C) MALMBE|
00000070: 52 47 20 31 39 38 31 20 4D 2E 4A 2E 20 56 41 4E |RG 1981 M.J. VAN|
00000080: 20 44 41 4C 45 4E 00 A5 04 1E 00 8F 20 31 36 4B | DALEN...... 16K|
00000090: 42 20 44 4F 43 45 4E 54 45 4E 2D 55 49 54 56 4F |B DOCENTEN-UITVO|
000000A0: 45 52 49 4E 47 00 D4 04 28 00 8F 2A 2A 2A 56 45 |ERING...(..***VE|
000000B0: 52 4B 4C 41 52 49 4E 47 20 45 4E 20 44 45 43 4C |RKLARING EN DECL|
000000C0: 41 52 41 54 49 45 20 56 41 52 49 41 42 45 4C 45 |ARATIE VARIABELE|
000000D0: 4E 2A 2A 2A 00 F3 04 32 00 8F 20 53 24 28 49 29 |N***...2.. S$(I)|
000000E0: 20 49 53 20 53 54 41 4D 20 56 41 4E 20 49 54 45 | IS STAM VAN ITE|
000000F0: 4D 20 49 00 1B 05 3C 00 8F 20 41 24 28 49 2C 4A |M I...<.. A$(I,J|
00000100: 29 20 49 53 20 41 4C 54 45 52 4E 41 54 49 45 46 |) IS ALTERNATIEF|
00000110: 20 56 41 4E 20 49 54 45 4D 20 49 00 68 05 46 00 | VAN ITEM I.h.F.|
00000120: 8F 20 54 24 28 49 2C 4A 29 20 49 53 20 54 4F 45 |. T$(I,J) IS TOE|
00000130: 4C 49 43 48 54 49 4E 47 20 42 49 4A 20 41 4C 54 |LICHTING BIJ ALT|
00000140: 45 52 4E 41 54 49 45 46 20 4A 20 56 41 4E 20 49 |ERNATIEF J VAN I|
00000150: 54 45 4D 20 49 3B 20 49 54 20 3D 20 41 41 4E 54 |TEM I; IT = AANT|
00000160: 41 4C 20 49 54 45 4D 53 00 92 05 5A 00 86 41 28 |AL ITEMS...Z..A(|
00000170: 35 30 29 2C 42 28 35 30 29 2C 53 24 28 35 30 29 |50),B(50),S$(50)|
00000180: 2C 41 24 28 35 30 2C 34 29 2C 54 24 28 35 30 2C |,A$(50,4),T$(50,|
00000190: 34 29 00 CA 05 6E 00 41 42 24 28 31 29 B2 22 C1 |4)...n.AB$(1).".|
000001A0: 2E 20 22 3A 41 42 24 28 32 29 B2 22 C2 2E 20 22 |. ":AB$(2).".. "|
000001B0: 3A 41 42 24 28 33 29 B2 22 C3 2E 20 22 3A 41 42 |:AB$(3).".. ":AB|
000001C0: 24 28 34 29 B2 22 C4 2E 20 22 00 D4 05 73 00 89 |$(4).".. "...s..|
000001D0: 20 32 30 30 00 E9 05 78 00 8B 20 C3 28 50 4B 24 | 200...x.. .(PK$|
000001E0: 29 B2 30 20 A7 20 99 3A 8E 00 FD 05 7D 00 81 20 |).0 . .:....}.. |
000001F0: 4D 42 B2 31 20 A4 20 C3 28 50 4B 24 29 00 1B 06 |MB.1 . .(PK$)...|
00000200: 82 00 8B 20 C6 28 CA 28 50 4B 24 2C 4D 42 2C 31 |... .(.(PK$,MB,1|
00000210: 29 29 B2 32 A7 20 8D 20 31 36 30 00 31 06 8C 00 |)).2. . 160.1...|
00000220: 82 4D 42 3A 99 50 4B 24 3A 50 4B 24 B2 22 22 3A |.MB:.PK$:PK$."":|
00000230: 8E 00 45 06 96 00 8F 20 49 4E 56 4F 45 47 45 4E |..E.... INVOEGEN|
00000240: 20 3C 43 52 3E 00 7A 06 A0 00 50 48 24 B2 C8 28 | <CR>.z...PH$..(|
00000250: 50 4B 24 2C 4D 42 AB 31 29 AA C7 28 31 33 29 AA |PK$,MB.1)..(13).|
00000260: C9 28 50 4B 24 2C C3 28 50 4B 24 29 AB 4D 42 29 |.(PK$,.(PK$).MB)|
00000270: 3A 50 4B 24 B2 50 48 24 3A 8E 00 90 06 AA 00 9F |:PK$.PH$:.......|
00000280: 31 2C 30 3A 84 31 2C 48 24 3A A0 31 3A 99 3A 8E |1,0:.1,H$:.1:.:.|
00000290: 00 AA 06 C8 00 8F 2A 2A 2A 48 4F 4F 46 44 50 52 |......***HOOFDPR|
000002A0: 4F 47 52 41 4D 4D 41 2A 2A 2A 00 EC 06 D2 00 99 |OGRAMMA***......|
000002B0: 22 93 12 22 3B 42 4C 24 3B 22 92 2A 2A 20 CD A0 |"..";BL$;".** ..|
000002C0: C5 A0 C5 A0 D2 A0 CB A0 C5 A0 D5 A0 DA A0 C5 A0 |................|
000002D0: A0 D4 A0 CF A0 C5 A0 D4 A0 D3 A0 A0 2D 20 A0 C4 |............- ..|
000002E0: 20 2A 2A 22 3B 22 12 22 3B 42 4C 24 00 11 07 DC | **";".";BL$....|
000002F0: 00 99 22 20 31 20 CF 50 52 4F 45 50 45 4E 20 54 |.." 1 .PROEPEN T|
00000300: 4F 45 54 53 20 56 41 4E 20 43 41 53 53 45 54 54 |OETS VAN CASSETT|
00000310: 45 00 39 07 E1 00 99 22 11 20 32 20 D3 43 48 52 |E.9....". 2 .CHR|
00000320: 49 4A 56 45 4E 20 54 4F 45 54 53 20 4E 41 41 52 |IJVEN TOETS NAAR|
00000330: 20 43 41 53 53 45 54 54 45 00 59 07 E6 00 99 22 | CASSETTE.Y...."|
00000340: 11 20 33 20 C9 4E 56 4F 45 52 45 4E 20 4E 49 45 |. 3 .NVOEREN NIE|
00000350: 55 57 45 20 54 4F 45 54 53 00 7C 07 F0 00 99 22 |UWE TOETS.|...."|
00000360: 11 20 34 20 D7 49 4A 5A 49 47 45 4E 20 42 45 53 |. 4 .IJZIGEN BES|
00000370: 54 41 41 4E 44 45 20 54 4F 45 54 53 00 9C 07 FA |TAANDE TOETS....|
00000380: 00 99 22 11 20 35 20 D4 4F 45 56 4F 45 47 45 4E |..". 5 .OEVOEGEN|
00000390: 20 56 41 4E 20 49 54 45 4D 28 53 29 00 B8 07 04 | VAN ITEM(S)....|
000003A0: 01 99 22 11 20 36 20 12 D5 49 54 56 4F 45 52 49 |..". 6 ..ITVOERI|
000003B0: 4E 47 20 54 4F 45 54 53 00 E4 07 0E 01 99 22 11 |NG TOETS......".|
000003C0: 20 37 20 CF 50 52 4F 45 50 45 4E 20 54 4F 45 54 | 7 .PROEPEN TOET|
000003D0: 53 20 56 41 4E 20 C3 C2 CD 2D 44 49 53 4B 28 34 |S VAN ...-DISK(4|
000003E0: 30 34 30 29 00 12 08 18 01 99 22 11 20 38 20 D3 |040)......". 8 .|
000003F0: 43 48 52 49 4A 56 45 4E 20 54 4F 45 54 53 20 4E |CHRIJVEN TOETS N|
00000400: 41 41 52 20 C3 C2 CD 2D 44 49 53 4B 28 34 30 34 |AAR ...-DISK(404|
00000410: 30 29 00 2F 08 22 01 99 22 11 20 39 20 C7 45 42 |0)./."..". 9 .EB|
00000420: 52 55 49 4B 53 41 41 4E 57 49 4A 5A 49 4E 47 00 |RUIKSAANWIJZING.|
00000430: 62 08 27 01 99 22 11 12 20 20 20 20 4D 41 41 4B |b.'..".. MAAK|
00000440: 20 20 20 55 57 20 20 20 4B 45 55 5A 45 20 20 20 | UW KEUZE |
00000450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D0 20 | . |
00000460: 22 3B 00 6E 08 2C 01 8D 31 30 31 30 3A 99 00 83 |";.n.,..1010:...|
00000470: 08 40 01 8B C6 28 4B 5A 24 29 B2 32 30 38 A7 8D |.@...(KZ$).208..|
00000480: 39 31 30 00 B5 08 68 01 91 4B 5A 8D 37 31 30 2C |910...h..KZ.710,|
00000490: 38 31 30 2C 32 32 31 30 2C 32 35 31 30 2C 32 32 |810,2210,2510,22|
000004A0: 32 30 2C 32 30 31 30 2C 35 30 30 2C 36 30 30 2C |20,2010,500,600,|
000004B0: 31 30 30 31 30 00 BE 08 72 01 89 32 30 30 00 C4 |10010...r..200..|
000004C0: 08 7C 01 8E 00 EC 08 AE 01 8C 3A 4B 5A B2 33 33 |.|........:KZ.33|
000004D0: 37 35 32 3A 81 5A B2 4B 5A A4 4B 5A AA 31 34 3A |752:.Z.KZ.KZ.14:|
000004E0: 87 4A 3A 97 5A 2C 4A 3A 82 5A 3A 8E 00 1A 09 B8 |.J:.Z,J:.Z:.....|
000004F0: 01 83 34 30 2C 32 30 2C 39 2C 31 31 2C 33 32 2C |..40,20,9,11,32,|
00000500: 35 2C 35 2C 31 34 2C 33 32 2C 32 30 2C 31 35 2C |5,5,14,32,20,15,|
00000510: 35 2C 32 30 2C 31 39 2C 34 31 00 2F 09 F4 01 8F |5,20,19,41./....|
00000520: 2A 2A 2A 44 49 53 4B 20 52 45 41 44 2A 2A 2A 00 |***DISK READ***.|
00000530: 3A 09 F9 01 48 55 24 B2 22 22 00 6D 09 FE 01 99 |:...HU$."".m....|
00000540: 3A 99 22 C7 45 45 46 20 4E 41 41 4D 20 56 41 4E |:.".EEF NAAM VAN|
00000550: 20 44 45 20 54 4F 45 54 53 20 22 3B 3A 8D 20 31 | DE TOETS ";:. 1|
00000560: 37 30 3A 46 24 B2 22 4D 2E 22 AA 48 24 00 98 09 |70:F$."M.".H$...|
00000570: 03 02 8B 20 C6 28 C9 28 46 24 2C 31 29 29 B2 32 |... .(.(F$,1)).2|
00000580: 20 A7 20 46 24 B2 22 4D 2E 22 AA C8 28 48 24 2C | . F$."M."..(H$,|
00000590: C3 28 48 24 29 AB 31 29 00 C0 09 08 02 46 4C 24 |.(H$).1).....FL$|
000005A0: B2 22 30 3A 22 AA 46 24 AA 22 2C 53 45 51 2C 52 |."0:".F$.",SEQ,R|
000005B0: 45 41 44 22 3A 9F 31 2C 38 2C 31 34 2C 46 4C 24 |EAD":.1,8,14,FL$|
000005C0: 00 D0 09 12 02 84 31 2C 46 24 3A 84 31 2C 49 54 |......1,F$:.1,IT|
000005D0: 00 F0 09 1C 02 99 20 C9 28 46 24 2C C3 28 46 24 |...... .(F$,.(F$|
000005E0: 29 AB 32 29 3B 22 20 47 45 56 4F 4E 44 45 4E 22 |).2);" GEVONDEN"|
000005F0: 00 0F 0A 26 02 81 49 B2 31 A4 49 54 3A 84 31 2C |...&..I.1.IT:.1,|
00000600: 41 28 49 29 3A 84 31 2C 42 28 49 29 3A 82 49 00 |A(I):.1,B(I):.I.|
00000610: 2B 0A 30 02 81 49 B2 31 A4 49 54 3A 8D 31 34 31 |+.0..I.1.IT:.141|
00000620: 30 3A 53 24 28 49 29 B2 48 55 24 00 4B 0A 3A 02 |0:S$(I).HU$.K.:.|
00000630: 81 4A B2 31 A4 41 28 49 29 3A 8D 31 34 31 30 3A |.J.1.A(I):.1410:|
00000640: 41 24 28 49 2C 4A 29 B2 48 55 24 00 64 0A 44 02 |A$(I,J).HU$.d.D.|
00000650: 8D 31 34 31 30 3A 54 24 28 49 2C 4A 29 B2 48 55 |.1410:T$(I,J).HU|
00000660: 24 3A 82 4A 00 6B 0A 4E 02 82 49 00 7B 0A 53 02 |$:.J.k.N..I.{.S.|
00000670: 48 55 24 B2 22 22 3A A0 31 3A 8E 00 91 0A 58 02 |HU$."":.1:....X.|
00000680: 8F 2A 2A 2A 44 49 53 4B 20 57 52 49 54 45 2A 2A |.***DISK WRITE**|
00000690: 2A 00 9C 0A 5D 02 48 55 24 B2 22 22 00 CF 0A 62 |*...].HU$.""...b|
000006A0: 02 99 3A 99 22 C7 45 45 46 20 4E 41 41 4D 20 56 |..:.".EEF NAAM V|
000006B0: 41 4E 20 44 45 20 54 4F 45 54 53 20 22 3B 3A 8D |AN DE TOETS ";:.|
000006C0: 20 31 37 30 3A 46 24 B2 22 4D 2E 22 AA 48 24 00 | 170:F$."M.".H$.|
000006D0: FA 0A 67 02 8B 20 C6 28 C9 28 46 24 2C 31 29 29 |..g.. .(.(F$,1))|
000006E0: B2 32 20 A7 20 46 24 B2 22 4D 2E 22 AA C8 28 48 |.2 . F$."M."..(H|
000006F0: 24 2C C3 28 48 24 29 AB 31 29 00 2E 0B 6C 02 46 |$,.(H$).1)...l.F|
00000700: 4C 24 B2 22 40 30 3A 22 AA 46 24 AA 22 2C 53 45 |L$."@0:".F$.",SE|
00000710: 51 2C 57 52 49 54 45 22 3A 9F 31 2C 38 2C 31 34 |Q,WRITE":.1,8,14|
00000720: 2C 46 4C 24 3A 4B 5A 24 B2 C7 28 31 33 29 00 50 |,FL$:KZ$..(13).P|
00000730: 0B 80 02 98 31 2C 46 24 3B 4B 5A 24 3B 3A 98 31 |....1,F$;KZ$;:.1|
00000740: 2C 49 54 3B 4B 5A 24 3B 3A 81 49 B2 31 A4 49 54 |,IT;KZ$;:.I.1.IT|
00000750: 00 71 0B 85 02 98 31 2C 41 28 49 29 3B 4B 5A 24 |.q....1,A(I);KZ$|
00000760: 3B 3A 98 31 2C 42 28 49 29 3B 4B 5A 24 3B 3A 82 |;:.1,B(I);KZ$;:.|
00000770: 49 00 8C 0B 8A 02 81 49 B2 31 A4 49 54 3A 48 24 |I......I.1.IT:H$|
00000780: B2 53 24 28 49 29 3A 8D 31 33 31 30 00 BF 0B 94 |.S$(I):.1310....|
00000790: 02 81 4A 31 B2 31 A4 41 28 49 29 3A 48 24 B2 41 |..J1.1.A(I):H$.A|
000007A0: 24 28 49 2C 4A 31 29 3A 8D 31 33 31 30 3A 48 24 |$(I,J1):.1310:H$|
000007B0: B2 54 24 28 49 2C 4A 31 29 3A 8D 31 33 31 30 00 |.T$(I,J1):.1310.|
000007C0: C9 0B 9E 02 82 4A 31 2C 49 00 EE 0B A8 02 A0 31 |.....J1,I......1|
000007D0: 3A 46 4C B2 30 3A 99 22 12 CB CC C1 C1 D2 92 22 |:FL.0:."......."|
000007E0: 3A 57 54 B2 31 30 30 30 3A 89 31 32 31 30 00 03 |:WT.1000:.1210..|
000007F0: 0C BC 02 8F 2A 2A 2A 54 41 50 45 20 52 45 41 44 |....***TAPE READ|
00000800: 2A 2A 2A 00 0E 0C C1 02 48 55 24 B2 22 22 00 4A |***.....HU$."".J|
00000810: 0C C6 02 99 22 11 C7 45 45 46 20 4E 41 41 4D 20 |...."..EEF NAAM |
00000820: 56 41 4E 20 44 45 20 54 4F 45 54 53 3A 45 45 4E |VAN DE TOETS:EEN|
00000830: 20 2E 20 49 4E 44 49 45 4E 20 4F 4E 42 45 4B 45 | . INDIEN ONBEKE|
00000840: 4E 44 20 22 3B 3A 8D 31 37 30 00 6A 0C D0 02 46 |ND ";:.170.j...F|
00000850: 24 B2 22 58 22 3A 8B 20 C3 28 48 24 29 B1 31 20 |$."X":. .(H$).1 |
00000860: A7 20 46 24 B2 46 24 AA 48 24 00 90 0C D1 02 8B |. F$.F$.H$......|
00000870: 20 C6 28 C9 28 46 24 2C 31 29 29 B2 32 20 A7 20 | .(.(F$,1)).2 . |
00000880: 46 24 B2 C8 28 46 24 2C C3 28 46 24 29 AB 31 29 |F$..(F$,.(F$).1)|
00000890: 00 AF 0C D5 02 9F 31 2C 31 2C 30 2C 46 24 3A 99 |......1,1,0,F$:.|
000008A0: 22 27 4E 20 4F 47 45 4E 42 4C 49 4B 2E 2E 2E 00 |"'N OGENBLIK....|
000008B0: BF 0C DA 02 84 31 2C 46 24 3A 84 31 2C 49 54 00 |.....1,F$:.1,IT.|
000008C0: DE 0C E4 02 99 20 C9 28 46 24 2C C3 28 46 24 29 |..... .(F$,.(F$)|
000008D0: AB 31 29 22 20 47 45 56 4F 4E 44 45 4E 22 00 FD |.1)" GEVONDEN"..|
000008E0: 0C EE 02 81 49 B2 31 A4 49 54 3A 84 31 2C 41 28 |....I.1.IT:.1,A(|
000008F0: 49 29 3A 84 31 2C 42 28 49 29 3A 82 49 00 20 0D |I):.1,B(I):.I. .|
00000900: F8 02 81 49 B2 31 A4 49 54 3A 48 55 24 B2 22 22 |...I.1.IT:HU$.""|
00000910: 3A 8D 31 34 31 30 3A 53 24 28 49 29 B2 48 55 24 |:.1410:S$(I).HU$|
00000920: 00 49 0D 02 03 81 4A 5A B2 31 A4 41 28 49 29 3A |.I....JZ.1.A(I):|
00000930: 48 55 24 B2 22 22 3A 8D 31 34 31 30 3A 41 24 28 |HU$."":.1410:A$(|
00000940: 49 2C 4A 5A 29 B2 48 55 24 00 6B 0D 0C 03 48 55 |I,JZ).HU$.k...HU|
00000950: 24 B2 22 22 3A 8D 31 34 31 30 3A 54 24 28 49 2C |$."":.1410:T$(I,|
00000960: 4A 5A 29 B2 48 55 24 3A 82 4A 5A 00 72 0D 16 03 |JZ).HU$:.JZ.r...|
00000970: 82 49 00 83 0D 1B 03 48 55 24 B2 22 22 3A 20 A0 |.I.....HU$."": .|
00000980: 31 3A 8E 00 99 0D 20 03 8F 2A 2A 2A 54 41 50 45 |1:.... ..***TAPE|
00000990: 20 57 52 49 54 45 2A 2A 2A 00 A7 0D 25 03 4B 5A | WRITE***...%.KZ|
000009A0: 24 B2 C7 28 31 33 29 00 B6 0D 2A 03 8B 49 54 B2 |$..(13)...*..IT.|
000009B0: 30 A7 31 35 31 30 00 CB 0D 2F 03 4B 5A 24 B2 C7 |0.1510.../.KZ$..|
000009C0: 28 31 33 29 3A 48 55 24 B2 22 22 00 FD 0D 34 03 |(13):HU$.""...4.|
000009D0: 99 3A 99 22 C7 45 45 46 20 4E 41 41 4D 20 56 41 |.:.".EEF NAAM VA|
000009E0: 4E 20 44 45 20 54 4F 45 54 53 20 22 3B 3A 8D 20 |N DE TOETS ";:. |
000009F0: 31 37 30 3A 46 24 B2 22 58 22 AA 48 24 00 23 0E |170:F$."X".H$.#.|
00000A00: 39 03 8B 20 C6 28 C9 28 46 24 2C 31 29 29 B2 32 |9.. .(.(F$,1)).2|
00000A10: 20 A7 20 46 24 B2 C8 28 46 24 2C C3 28 46 24 29 | . F$..(F$,.(F$)|
00000A20: AB 31 29 00 42 0E 3E 03 9F 31 2C 31 2C 31 2C 46 |.1).B.>..1,1,1,F|
00000A30: 24 3A 99 22 27 4E 20 4F 47 45 4E 42 4C 49 4B 2E |$:."'N OGENBLIK.|
00000A40: 2E 2E 00 71 0E 48 03 98 31 2C 46 24 3B 4B 5A 24 |...q.H..1,F$;KZ$|
00000A50: 3B 3A 98 31 2C 49 54 3B 4B 5A 24 3B 3A 81 49 B2 |;:.1,IT;KZ$;:.I.|
00000A60: 31 A4 49 54 3A 98 31 2C 41 28 49 29 3B 4B 5A 24 |1.IT:.1,A(I);KZ$|
00000A70: 3B 00 86 0E 4D 03 98 31 2C 42 28 49 29 3B 4B 5A |;...M..1,B(I);KZ|
00000A80: 24 3B 3A 82 20 49 00 A1 0E 52 03 81 49 B2 31 A4 |$;:. I...R..I.1.|
00000A90: 49 54 3A 48 24 B2 53 24 28 49 29 3A 8D 31 33 31 |IT:H$.S$(I):.131|
00000AA0: 30 00 D4 0E 5C 03 81 4A 5A B2 31 A4 41 28 49 29 |0...\..JZ.1.A(I)|
00000AB0: 3A 48 24 B2 41 24 28 49 2C 4A 5A 29 3A 8D 31 33 |:H$.A$(I,JZ):.13|
00000AC0: 31 30 3A 48 24 B2 54 24 28 49 2C 4A 5A 29 3A 8D |10:H$.T$(I,JZ):.|
00000AD0: 31 33 31 30 00 DE 0E 66 03 82 4A 5A 2C 49 00 03 |1310...f..JZ,I..|
00000AE0: 0F 7A 03 A0 31 3A 46 4C B2 30 3A 99 22 12 CB CC |.z..1:FL.0:."...|
00000AF0: C1 C1 D2 92 22 3A 57 54 B2 31 30 30 30 3A 89 31 |....":WT.1000:.1|
00000B00: 32 31 30 00 1F 0F 84 03 8F 2A 2A 2A 48 41 52 44 |210......***HARD|
00000B10: 43 4F 50 59 20 50 52 49 4E 54 45 52 2A 2A 2A 00 |COPY PRINTER***.|
00000B20: 35 0F 8E 03 9F 37 2C 34 2C 37 3A 98 37 3A A0 37 |5....7,4,7:.7:.7|
00000B30: 3A 9F 33 2C 34 00 46 0F 92 03 50 4B 24 B2 46 24 |:.3,4.F...PK$.F$|
00000B40: 3A 8D 20 39 36 30 00 5D 0F 93 03 98 33 2C 22 D4 |:. 960.]....3,".|
00000B50: 4F 45 54 53 20 22 3B 50 4B 24 3A 98 33 00 88 0F |OETS ";PK$:.3...|
00000B60: 98 03 81 49 B2 31 A4 49 54 3A 50 4B 24 B2 53 24 |...I.1.IT:PK$.S$|
00000B70: 28 49 29 3A 8D 39 36 30 3A 98 33 2C 22 C9 54 45 |(I):.960:.3,".TE|
00000B80: 4D 20 22 3B 49 3A 98 33 00 96 0F 9A 03 98 33 2C |M ";I:.3......3,|
00000B90: 50 4B 24 3A 98 33 00 CE 0F 9D 03 81 4A B2 31 A4 |PK$:.3......J.1.|
00000BA0: 41 28 49 29 3A 50 4B 24 B2 41 24 28 49 2C 4A 29 |A(I):PK$.A$(I,J)|
00000BB0: 3A 8D 39 36 30 3A 20 98 33 2C C7 28 4A AA 31 39 |:.960: .3,.(J.19|
00000BC0: 32 29 3B 22 3A 20 22 3B 50 4B 24 3A 82 4A 00 D8 |2);": ";PK$:.J..|
00000BD0: 0F A2 03 98 33 3A 98 33 00 E0 0F A7 03 82 20 49 |....3:.3...... I|
00000BE0: 00 E9 0F AC 03 A0 33 3A 8E 00 FC 0F C0 03 8B 20 |......3:....... |
00000BF0: C3 28 50 4B 24 29 B2 30 20 A7 20 8E 00 2B 10 C5 |.(PK$).0 . ..+..|
00000C00: 03 81 20 4D 42 B2 31 20 A4 20 C3 28 50 4B 24 29 |.. MB.1 . .(PK$)|
00000C10: 3A 8B 20 C6 28 CA 28 50 4B 24 2C 4D 42 2C 31 29 |:. .(.(PK$,MB,1)|
00000C20: 29 B2 32 20 A7 20 8D 20 39 38 30 00 36 10 CA 03 |).2 . . 980.6...|
00000C30: 82 20 4D 42 3A 8E 00 63 10 D4 03 50 4B 24 B2 C8 |. MB:..c...PK$..|
00000C40: 28 50 4B 24 2C 4D 42 AB 31 29 AA C7 28 31 33 29 |(PK$,MB.1)..(13)|
00000C50: AA C9 28 50 4B 24 2C C3 28 50 4B 24 29 AB 4D 42 |..(PK$,.(PK$).MB|
00000C60: 29 3A 8E 00 7D 10 E8 03 8F 2A 2A 2A 4B 45 59 42 |):..}....***KEYB|
00000C70: 4F 41 52 44 20 49 4E 50 55 54 2A 2A 2A 00 9D 10 |OARD INPUT***...|
00000C80: F2 03 A1 4B 5A 24 3A 4B 5A B2 C5 28 4B 5A 24 29 |...KZ$:KZ..(KZ$)|
00000C90: 3A 8B 4B 5A 24 B2 22 22 A7 31 30 31 30 00 A8 10 |:.KZ$."".1010...|
00000CA0: F7 03 97 31 35 38 2C 30 00 AE 10 FC 03 8E 00 D1 |...158,0........|
00000CB0: 10 1A 04 9F 31 2C 30 3A 99 22 20 9D 22 3B 3A 84 |....1,0:." .";:.|
00000CC0: 31 2C 48 24 3A 48 B2 C5 28 48 24 29 3A A0 31 3A |1,H$:H..(H$):.1:|
00000CD0: 99 00 E6 10 1B 04 8B 20 48 24 B2 22 22 20 A7 20 |....... H$."" . |
00000CE0: 89 20 31 30 35 30 00 FB 10 1C 04 8B 20 48 24 B2 |. 1050...... H$.|
00000CF0: 22 53 22 20 A7 20 48 B2 30 3A 8E 00 13 11 1F 04 |"S" . H.0:......|
00000D00: 8B 20 48 B2 30 20 A7 20 48 B2 C6 28 48 24 29 AB |. H.0 . H..(H$).|
00000D10: 31 39 32 00 2A 11 20 04 8B 20 48 B3 30 20 A7 20 |192.*. .. H.0 . |
00000D20: 48 B2 C6 28 48 24 29 AB 36 34 00 30 11 21 04 8E |H..(H$).64.0.!..|
00000D30: 00 46 11 24 04 48 24 B2 22 22 3A 48 55 24 B2 22 |.F.$.H$."":HU$."|
00000D40: 22 3A 9F 31 2C 30 00 5B 11 29 04 97 20 36 32 33 |":.1,0.[.).. 623|
00000D50: 2C 33 34 3A 97 20 31 35 38 2C 31 00 67 11 2E 04 |,34:. 158,1.g...|
00000D60: 84 31 2C 52 24 3A 99 00 85 11 33 04 8B 20 52 24 |.1,R$:....3.. R$|
00000D70: B2 22 4B 4C 41 41 52 22 20 A7 20 A0 31 3A 48 24 |."KLAAR" . .1:H$|
00000D80: B2 52 24 3A 8E 00 B0 11 38 04 8B 20 52 24 B2 22 |.R$:....8.. R$."|
00000D90: 40 22 20 B0 20 52 24 B2 22 5F 22 20 A7 20 A0 31 |@" . R$."_" . .1|
00000DA0: 3A 52 24 B2 22 22 3A 99 22 91 20 20 20 22 3A 8E |:R$."":.". ":.|
00000DB0: 00 CD 11 3D 04 8B 20 C3 28 48 24 29 B2 30 20 A7 |...=.. .(H$).0 .|
00000DC0: 20 48 24 B2 52 24 3A 89 20 31 30 36 35 00 00 12 | H$.R$:. 1065...|
00000DD0: 42 04 8B 20 C3 28 48 24 29 AA C3 28 52 24 29 B3 |B.. .(H$)..(R$).|
00000DE0: 32 34 36 20 A7 20 48 24 B2 48 24 AA C7 28 32 29 |246 . H$.H$..(2)|
00000DF0: AA 22 20 20 20 22 AA 52 24 3A 89 20 31 30 36 35 |." ".R$:. 1065|
00000E00: 00 06 12 4C 04 8E 00 1C 12 56 04 48 24 B2 22 22 |...L.....V.H$.""|
00000E10: 3A 48 55 24 B2 22 22 3A 9F 31 2C 30 00 31 12 60 |:HU$."":.1,0.1.`|
00000E20: 04 97 20 36 32 33 2C 33 34 3A 97 20 31 35 38 2C |.. 623,34:. 158,|
00000E30: 31 00 3D 12 6A 04 84 31 2C 52 24 3A 99 00 5B 12 |1.=.j..1,R$:..[.|
00000E40: 74 04 8B 20 52 24 B2 22 4B 4C 41 41 52 22 20 A7 |t.. R$."KLAAR" .|
00000E50: 20 A0 31 3A 48 24 B2 52 24 3A 8E 00 86 12 7E 04 | .1:H$.R$:....~.|
00000E60: 8B 20 52 24 B2 22 40 22 20 B0 20 52 24 B2 22 5F |. R$."@" . R$."_|
00000E70: 22 20 A7 20 A0 31 3A 52 24 B2 22 22 3A 99 22 91 |" . .1:R$."":.".|
00000E80: 20 20 20 22 3A 8E 00 A3 12 88 04 8B 20 C3 28 48 | ":....... .(H|
00000E90: 24 29 B2 30 20 A7 20 48 24 B2 52 24 3A 89 20 31 |$).0 . H$.R$:. 1|
00000EA0: 31 32 30 00 D0 12 92 04 8B 20 C3 28 48 24 29 AA |120...... .(H$).|
00000EB0: C3 28 52 24 29 B3 32 34 36 20 A7 20 48 24 B2 48 |.(R$).246 . H$.H|
00000EC0: 24 AA C7 28 32 29 AA 52 24 3A 89 20 31 31 32 30 |$..(2).R$:. 1120|
00000ED0: 00 D6 12 9C 04 8E 00 E7 12 B0 04 8F 2A 2A 2A 57 |............***W|
00000EE0: 41 43 48 54 4C 55 53 00 F7 12 BA 04 81 5A B2 31 |ACHTLUS......Z.1|
00000EF0: A4 57 54 3A 82 3A 8E 00 1F 13 14 05 8F 20 50 52 |.WT:.:....... PR|
00000F00: 49 4E 54 23 31 20 4D 45 54 20 4D 45 45 52 20 44 |INT#1 MET MEER D|
00000F10: 41 4E 20 38 30 20 4B 41 52 41 4B 54 45 52 53 00 |AN 80 KARAKTERS.|
00000F20: 32 13 1E 05 4A B2 31 3A 4B B2 C3 28 48 24 29 AB |2...J.1:K..(H$).|
00000F30: 36 33 00 45 13 28 05 48 55 24 B2 CA 28 48 24 2C |63.E.(.HU$..(H$,|
00000F40: 4A 2C 36 33 29 00 73 13 32 05 98 31 2C C7 28 33 |J,63).s.2..1,.(3|
00000F50: 34 29 3B 48 55 24 3B C7 28 31 33 29 3B 3A 8B 20 |4);HU$;.(13);:. |
00000F60: 4A B3 4B 20 A7 20 4A B2 4A AA 36 33 3A 89 20 31 |J.K . J.J.63:. 1|
00000F70: 33 32 30 00 88 13 3C 05 98 31 2C 22 23 23 22 3B |320...<..1,"##";|
00000F80: C7 28 31 33 29 3B 3A 8E 00 C1 13 78 05 8F 20 44 |.(13);:....x.. D|
00000F90: 49 53 4B 2F 54 41 50 45 20 52 45 41 44 20 56 41 |ISK/TAPE READ VA|
00000FA0: 4E 20 49 4E 50 55 54 20 4D 45 54 20 4D 45 45 52 |N INPUT MET MEER|
00000FB0: 20 44 41 4E 20 38 30 20 4B 41 52 41 4B 54 45 52 | DAN 80 KARAKTER|
00000FC0: 53 00 CC 13 82 05 48 55 24 B2 22 22 00 E6 13 8C |S.....HU$.""....|
00000FD0: 05 84 31 2C 48 41 24 3A 8B 20 48 41 24 B2 22 23 |..1,HA$:. HA$."#|
00000FE0: 23 22 20 A7 20 8E 00 11 14 91 05 8B 20 C8 28 48 |#" . ....... .(H|
00000FF0: 41 24 2C 31 29 B2 C7 28 33 34 29 20 A7 20 48 41 |A$,1)..(34) . HA|
00001000: 24 B2 C9 28 48 41 24 2C C3 28 48 41 24 29 AB 31 |$..(HA$,.(HA$).1|
00001010: 29 00 21 14 96 05 48 55 24 B2 48 55 24 AA 48 41 |).!...HU$.HU$.HA|
00001020: 24 00 2C 14 A0 05 89 20 31 34 32 30 00 4F 14 DC |$.,.... 1420.O..|
00001030: 05 8F 2A 2A 2A 57 41 41 52 53 43 48 55 57 49 4E |..***WAARSCHUWIN|
00001040: 47 20 54 4F 45 54 53 20 49 4E 4C 45 5A 45 4E 00 |G TOETS INLEZEN.|
00001050: 5D 14 E6 05 99 3A 81 5A 5A B2 31 A4 36 00 9A 14 |]....:.ZZ.1.6...|
00001060: F0 05 99 22 12 20 20 20 20 4C 45 45 53 20 45 45 |...". LEES EE|
00001070: 52 53 54 20 54 4F 45 54 53 20 56 41 4E 20 43 41 |RST TOETS VAN CA|
00001080: 53 53 45 54 54 45 20 20 20 20 91 92 22 3A 57 54 |SSETTE ..":WT|
00001090: B2 31 30 30 3A 8D 31 32 31 30 00 D2 14 FA 05 99 |.100:.1210......|
000010A0: 22 20 20 20 20 4C 45 45 53 20 45 45 52 53 54 20 |" LEES EERST |
000010B0: 54 4F 45 54 53 20 56 41 4E 20 43 41 53 53 45 54 |TOETS VAN CASSET|
000010C0: 54 45 20 20 20 20 91 22 3A 8D 31 32 31 30 3A 82 |TE .":.1210:.|
000010D0: 3A 8E 00 05 15 40 06 8F 2A 2A 2A 41 41 4E 57 49 |:....@..***AANWI|
000010E0: 4A 5A 49 4E 47 20 52 45 54 55 52 4E 2D 54 4F 45 |JZING RETURN-TOE|
000010F0: 54 53 20 42 49 4A 20 47 45 45 4E 20 57 49 4A 5A |TS BIJ GEEN WIJZ|
00001100: 49 47 49 4E 47 00 11 15 4A 06 81 5A 5A B2 31 A4 |IGING...J..ZZ.1.|
00001110: 36 00 40 15 54 06 99 22 12 40 20 49 4E 44 49 45 |6.@.T..".@ INDIE|
00001120: 4E 20 47 45 45 4E 20 57 49 4A 5A 49 47 49 4E 47 |N GEEN WIJZIGING|
00001130: 92 91 22 3A 57 54 B2 31 30 30 3A 8D 31 32 31 30 |..":WT.100:.1210|
00001140: 00 68 15 5E 06 99 22 40 20 49 4E 44 49 45 4E 20 |.h.^.."@ INDIEN |
00001150: 47 45 45 4E 20 57 49 4A 5A 49 47 49 4E 47 91 22 |GEEN WIJZIGING."|
00001160: 3A 8D 31 32 31 30 3A 82 00 96 15 68 06 99 22 20 |:.1210:....h.." |
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 20 20 20 20 20 20 20 20 20 | |
00001190: 20 20 20 20 91 22 00 A0 15 72 06 89 31 30 36 30 | ."...r..1060|
000011A0: 00 C5 15 A4 06 8F 2A 2A 2A 57 41 41 52 53 43 48 |......***WAARSCH|
000011B0: 55 57 49 4E 47 20 54 42 56 20 40 20 56 4F 4F 52 |UWING TBV @ VOOR|
000011C0: 20 53 54 4F 50 00 D1 15 AE 06 81 5A 5A B2 31 A4 | STOP......ZZ.1.|
000011D0: 36 00 FB 15 B8 06 99 22 40 20 2B 20 52 45 54 55 |6......"@ + RETU|
000011E0: 52 4E 20 56 4F 4F 52 20 53 54 4F 50 20 91 22 3A |RN VOOR STOP .":|
000011F0: 57 54 B2 37 30 3A 8D 31 32 31 30 00 20 16 C2 06 |WT.70:.1210. ...|
00001200: 99 22 12 40 20 2B 20 52 45 54 55 52 4E 20 56 4F |.".@ + RETURN VO|
00001210: 4F 52 20 53 54 4F 50 20 91 22 3A 8D 31 32 31 30 |OR STOP .":.1210|
00001220: 00 49 16 CC 06 82 5A 5A 3A 99 22 20 20 20 20 20 |.I....ZZ:." |
00001230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001240: 20 20 20 20 20 91 22 3A 8E 00 6B 16 08 07 8F 2A | .":..k....*|
00001250: 2A 2A 57 41 41 52 53 43 48 55 57 49 4E 47 20 46 |**WAARSCHUWING F|
00001260: 4F 55 54 45 20 49 4E 56 4F 45 52 00 77 16 12 07 |OUTE INVOER.w...|
00001270: 81 5A 5A B2 31 A4 36 00 9C 16 1C 07 99 22 4F 4E |.ZZ.1.6......"ON|
00001280: 4A 55 49 53 54 45 20 49 4E 56 4F 45 52 91 22 3A |JUISTE INVOER.":|
00001290: 57 54 B2 31 30 30 3A 8D 31 32 31 30 00 BB 16 26 |WT.100:.1210...&|
000012A0: 07 99 22 12 4F 4E 4A 55 49 53 54 45 20 49 4E 56 |..".ONJUISTE INV|
000012B0: 4F 45 52 91 22 3A 8D 31 32 31 30 00 DF 16 30 07 |OER.":.1210...0.|
000012C0: 82 5A 5A 3A 99 22 20 20 20 20 20 20 20 20 20 20 |.ZZ:." |
000012D0: 20 20 20 20 20 20 20 20 20 91 91 91 22 3A 8E 00 | ...":..|
000012E0: F5 16 D0 07 8F 2A 2A 2A 45 58 45 43 55 54 45 20 |.....***EXECUTE |
000012F0: 54 4F 45 54 53 00 11 17 DA 07 48 B2 30 3A 54 B2 |TOETS.....H.0:T.|
00001300: 30 3A 53 43 B2 30 3A 8B 49 54 B2 30 A7 31 35 31 |0:SC.0:.IT.0.151|
00001310: 30 00 31 17 EE 07 81 49 B2 31 A4 49 54 3A 54 B2 |0.1....I.1.IT:T.|
00001320: 54 AA 31 3A 99 22 93 12 C9 54 45 4D 20 92 22 3B |T.1:."...TEM .";|
00001330: 49 00 49 17 F8 07 50 4B 24 B2 53 24 28 49 29 3A |I.I...PK$.S$(I):|
00001340: 8D 20 31 32 30 3A 99 3A 99 00 75 17 02 08 81 4A |. 120:.:..u....J|
00001350: B2 31 A4 41 28 49 29 3A 50 4B 24 B2 41 42 24 28 |.1.A(I):PK$.AB$(|
00001360: 4A 29 AA 41 24 28 49 2C 4A 29 3A 8D 20 31 32 30 |J).A$(I,J):. 120|
00001370: 3A 99 3A 82 4A 00 B0 17 0C 08 99 22 11 12 D7 45 |:.:.J......"...E|
00001380: 4C 4B 45 20 49 53 20 4A 55 49 53 54 92 20 22 3B |LKE IS JUIST. ";|
00001390: 3A 8D 31 30 35 30 3A 8B 48 B3 31 B0 48 B1 41 28 |:.1050:.H.1.H.A(|
000013A0: 49 29 A7 99 22 91 91 22 3B 3A 89 20 32 30 36 30 |I).."..";:. 2060|
000013B0: 00 E2 17 16 08 99 3A 50 4B 24 B2 54 24 28 49 2C |......:PK$.T$(I,|
000013C0: 48 29 3A 8D 20 31 32 30 3A 8B 48 B2 42 28 49 29 |H):. 120:.H.B(I)|
000013D0: A7 53 43 B2 53 43 AA 31 3A 48 B2 49 3A 89 32 30 |.SC.SC.1:H.I:.20|
000013E0: 39 30 00 24 18 20 08 8F 20 50 52 49 4E 54 3A 50 |90.$. .. PRINT:P|
000013F0: 52 49 4E 54 22 CE 4F 47 20 45 45 4E 3B 20 5A 4F |RINT".OG EEN; ZO|
00001400: 4A 41 2C 20 54 49 4B 20 31 22 3B 3A 47 4F 53 55 |JA, TIK 1";:GOSU|
00001410: 42 31 30 31 30 3A 49 46 4B 5A 3D 31 54 48 45 4E |B1010:IFKZ=1THEN|
00001420: 32 30 32 30 00 4B 18 2A 08 8D 34 33 30 3A 8D 31 |2020.K.*..430:.1|
00001430: 30 31 30 3A 82 49 3A 8F 20 49 4E 44 49 45 4E 20 |010:.I:. INDIEN |
00001440: 53 45 51 55 45 4E 54 49 45 45 4C 00 73 18 34 08 |SEQUENTIEEL.s.4.|
00001450: 99 3A 99 22 CA 45 20 48 45 42 54 22 3B 54 3B 22 |.:.".E HEBT";T;"|
00001460: 54 4F 45 54 53 56 52 41 47 45 4E 20 47 45 44 41 |TOETSVRAGEN GEDA|
00001470: 41 4E 2E 00 A4 18 3E 08 8B 53 43 B3 B1 31 A7 99 |AN....>..SC..1..|
00001480: 22 C4 41 41 52 56 41 4E 20 57 41 52 45 4E 20 45 |".AARVAN WAREN E|
00001490: 52 22 3B 53 43 3B 22 4A 55 49 53 54 2E 22 3A 89 |R";SC;"JUIST.":.|
000014A0: 32 31 33 30 00 C2 18 48 08 99 22 C4 41 41 52 56 |2130...H..".AARV|
000014B0: 41 4E 20 57 41 53 20 45 52 20 31 20 4A 55 49 53 |AN WAS ER 1 JUIS|
000014C0: 54 22 00 CC 18 52 08 89 31 30 31 30 00 EB 18 5C |T"...R..1010...\|
000014D0: 08 8F 20 45 58 45 43 55 54 45 20 54 4F 45 54 53 |.. EXECUTE TOETS|
000014E0: 20 53 45 51 45 4E 54 55 45 45 4C 00 07 19 98 08 | SEQENTUEEL.....|
000014F0: 8F 2A 2A 2A 49 4E 56 4F 45 52 20 4E 49 45 55 57 |.***INVOER NIEUW|
00001500: 45 20 54 4F 45 54 53 00 10 19 A2 08 49 54 B2 30 |E TOETS.....IT.0|
00001510: 00 1C 19 AC 08 49 54 B2 49 54 AA 31 00 25 19 B1 |.....IT.IT.1.%..|
00001520: 08 99 22 93 22 00 44 19 B6 08 99 22 4D 45 45 52 |..".".D...."MEER|
00001530: 4B 2E 54 4F 45 54 53 2D 44 20 49 54 45 4D 22 3B |K.TOETS-D ITEM";|
00001540: 49 54 3B 22 00 55 19 C0 08 8D 31 37 31 30 3A 8D |IT;".U....1710:.|
00001550: 20 31 31 31 30 00 63 19 CA 08 53 24 28 49 54 29 | 1110.c...S$(IT)|
00001560: B2 48 24 00 83 19 D4 08 8B C8 28 53 24 28 49 54 |.H$.......(S$(IT|
00001570: 29 2C 35 29 B2 22 4B 4C 41 41 52 22 20 89 20 32 |),5)."KLAAR" . 2|
00001580: 34 33 30 00 A0 19 DE 08 8B 53 24 28 49 54 29 B2 |430......S$(IT).|
00001590: 22 22 20 A7 20 8D 31 38 31 30 3A 89 32 32 33 30 |"" . .1810:.2230|
000015A0: 00 D5 19 E8 08 9F 34 2C 30 3A 99 22 C8 4F 45 56 |......4,0:.".OEV|
000015B0: 45 45 4C 20 41 4C 54 45 52 4E 41 54 49 45 56 45 |EEL ALTERNATIEVE|
000015C0: 4E 20 20 34 9D 22 3B 3A 84 34 2C 41 28 49 54 29 |N 4.";:.4,A(IT)|
000015D0: 3A A0 34 3A 99 00 F6 19 F2 08 8B 41 28 49 54 29 |:.4:.......A(IT)|
000015E0: B3 32 B0 41 28 49 54 29 B1 34 A7 8D 31 38 31 30 |.2.A(IT).4..1810|
000015F0: 3A 89 32 32 38 30 00 05 1A FC 08 81 49 B2 31 A4 |:.2280......I.1.|
00001600: 41 28 49 54 29 00 20 1A 06 09 99 22 D4 45 4B 53 |A(IT). ....".EKS|
00001610: 54 20 41 4C 54 45 52 4E 41 54 49 45 46 22 3B 49 |T ALTERNATIEF";I|
00001620: 00 3F 1A 10 09 8D 31 37 31 30 3A 4C B2 30 3A 99 |.?....1710:L.0:.|
00001630: 20 41 42 24 28 49 29 3B 3A 20 8D 31 30 36 30 00 | AB$(I);: .1060.|
00001640: 4F 1A 1A 09 41 24 28 49 54 2C 49 29 B2 48 24 00 |O...A$(IT,I).H$.|
00001650: 6E 1A 24 09 8B C3 28 41 24 28 49 54 2C 49 29 29 |n.$...(A$(IT,I))|
00001660: B3 31 A7 8D 31 38 31 30 3A 89 32 33 31 30 00 75 |.1..1810:.2310.u|
00001670: 1A 2E 09 82 49 00 B4 1A 38 09 81 49 B2 31 A4 41 |....I...8..I.1.A|
00001680: 28 49 54 29 3A 99 22 20 20 20 20 20 20 D4 4F 45 |(IT):." .OE|
00001690: 4C 49 43 48 54 49 4E 47 20 41 4C 54 45 52 4E 41 |LICHTING ALTERNA|
000016A0: 54 49 45 46 22 3B 49 3A 54 24 28 49 54 2C 49 29 |TIEF";I:T$(IT,I)|
000016B0: B2 22 11 22 00 C4 1A 42 09 8D 31 37 31 30 3A 8D |."."...B..1710:.|
000016C0: 31 30 36 30 00 D4 1A 4C 09 54 24 28 49 54 2C 49 |1060...L.T$(IT,I|
000016D0: 29 B2 48 24 00 DB 1A 56 09 82 49 00 0A 1B 60 09 |).H$...V..I...`.|
000016E0: 99 22 57 45 4C 4B 20 41 4C 54 45 52 4E 41 54 49 |."WELK ALTERNATI|
000016F0: 45 46 20 49 53 20 4A 55 49 53 54 3F 20 22 3B 3A |EF IS JUIST? ";:|
00001700: 8D 20 31 30 35 30 3A 4A B2 48 00 31 1B 6A 09 8B |. 1050:J.H.1.j..|
00001710: 4A B1 41 28 49 54 29 B0 4A B3 31 20 A7 20 99 22 |J.A(IT).J.1 . ."|
00001720: CF 4E 4D 4F 47 45 4C 49 4A 4B 22 3A 89 32 34 30 |.NMOGELIJK":.240|
00001730: 30 00 66 1B 74 09 42 28 49 54 29 B2 4A 3A 99 22 |0.f.t.B(IT).J:."|
00001740: 93 C9 4E 44 49 45 4E 20 45 49 4E 44 45 20 54 4F |..NDIEN EINDE TO|
00001750: 45 54 53 2C 20 54 49 4B 3A 20 4B 4C 41 41 52 22 |ETS, TIK: KLAAR"|
00001760: 3A 89 32 32 32 30 00 7C 1B 7E 09 49 54 B2 49 54 |:.2220.|.~.IT.IT|
00001770: AB 31 3A 41 28 30 29 B2 49 54 3A 8E 00 9B 1B C4 |.1:A(0).IT:.....|
00001780: 09 8F 2A 2A 2A 57 49 4A 5A 49 47 20 42 45 53 54 |..***WIJZIG BEST|
00001790: 41 41 4E 44 45 20 54 4F 45 54 53 00 C5 1B CE 09 |AANDE TOETS.....|
000017A0: 99 22 93 D4 49 4B 20 27 53 27 20 56 4F 4F 52 20 |."..IK 'S' VOOR |
000017B0: 4C 49 4A 53 54 20 49 54 45 4D 53 20 28 44 45 20 |LIJST ITEMS (DE |
000017C0: 53 54 41 4D 29 00 D4 1B D8 09 8B 49 54 B2 30 A7 |STAM)......IT.0.|
000017D0: 31 35 31 30 00 07 1C E2 09 99 3A 99 22 D7 45 4C |1510......:.".EL|
000017E0: 4B 20 49 54 45 4D 20 57 49 4A 5A 49 47 45 4E 20 |K ITEM WIJZIGEN |
000017F0: 22 3B 3A 8D 31 30 35 30 3A 8B 48 B2 30 B0 48 B1 |";:.1050:.H.0.H.|
00001800: 49 54 A7 32 35 35 30 00 17 1C EC 09 49 B2 48 3A |IT.2550.....I.H:|
00001810: 8D 32 35 39 30 3A 8E 00 23 1C F6 09 81 49 B2 31 |.2590:..#....I.1|
00001820: A4 49 54 00 63 1C 00 0A 99 3A 99 3A 99 22 C9 54 |.IT.c....:.:.".T|
00001830: 45 4D 22 3B 49 3A 99 3A 50 4B 24 B2 53 24 28 49 |EM";I:.:PK$.S$(I|
00001840: 29 3A 8D 31 32 30 3A 81 4A B2 31 A4 41 28 49 29 |):.120:.J.1.A(I)|
00001850: 3A 50 4B 24 B2 41 42 24 28 4A 29 AA 41 24 28 49 |:PK$.AB$(J).A$(I|
00001860: 2C 4A 29 00 70 1C 05 0A 8D 20 31 32 30 3A 82 4A |,J).p.... 120:.J|
00001870: 00 A3 1C 0A 0A 99 3A 99 22 11 C9 4E 44 49 45 4E |......:."..NDIEN|
00001880: 20 57 49 4A 5A 49 47 45 4E 2C 20 54 49 4B 20 31 | WIJZIGEN, TIK 1|
00001890: 22 3A 8D 31 30 31 30 3A 8B 4B 5A B2 31 A7 8D 32 |":.1010:.KZ.1..2|
000018A0: 35 39 30 00 AC 1C 14 0A 82 49 3A 8E 00 F2 1C 1E |590......I:.....|
000018B0: 0A 99 22 93 D4 49 4B 20 12 31 92 20 56 4F 4F 52 |.."..IK .1. VOOR|
000018C0: 20 56 45 52 57 49 4A 44 45 52 45 4E 20 56 41 4E | VERWIJDEREN VAN|
000018D0: 20 44 49 54 20 49 54 45 4D 22 3A 99 22 D4 49 4B | DIT ITEM":.".IK|
000018E0: 20 41 4E 44 45 52 53 20 12 52 45 54 55 52 4E 92 | ANDERS .RETURN.|
000018F0: 2E 22 00 08 1D 23 0A 8D 31 30 31 30 3A 8B 4B 5A |."...#..1010:.KZ|
00001900: B3 B1 31 A7 32 37 31 30 00 1C 1D 28 0A 8B 49 B2 |..1.2710...(..I.|
00001910: 49 54 A7 49 54 B2 49 54 AB 31 3A 8E 00 2A 1D 32 |IT.IT.IT.1:..*.2|
00001920: 0A 81 4B B2 49 A4 49 54 AB 31 00 70 1D 3C 0A 53 |..K.I.IT.1.p.<.S|
00001930: 24 28 49 29 B2 53 24 28 49 AA 31 29 3A 41 28 49 |$(I).S$(I.1):A(I|
00001940: 29 B2 41 28 49 AA 31 29 3A 42 28 49 29 B2 42 28 |).A(I.1):B(I).B(|
00001950: 49 AA 31 29 3A 81 4A B2 31 A4 41 28 49 29 3A 41 |I.1):.J.1.A(I):A|
00001960: 24 28 49 2C 4A 29 B2 41 24 28 49 AA 31 2C 4A 29 |$(I,J).A$(I.1,J)|
00001970: 00 89 1D 46 0A 54 24 28 49 2C 4A 29 B2 54 24 28 |...F.T$(I,J).T$(|
00001980: 49 AA 31 2C 4A 29 3A 82 4A 00 9A 1D 50 0A 82 4B |I.1,J):.J...P..K|
00001990: 3A 49 54 B2 49 54 AB 31 3A 8E 00 C2 1D 8C 0A 8F |:IT.IT.1:.......|
000019A0: 2A 2A 2A 53 55 42 52 4F 55 54 49 4E 45 20 57 49 |***SUBROUTINE WI|
000019B0: 4A 5A 49 47 49 4E 47 20 4F 4E 44 45 52 44 45 4C |JZIGING ONDERDEL|
000019C0: 45 4E 00 E4 1D 96 0A 99 3A 99 22 C9 54 45 4D 22 |EN......:.".TEM"|
000019D0: 3B 49 3A 99 3A 50 4B 24 B2 53 24 28 49 29 3A 8D |;I:.:PK$.S$(I):.|
000019E0: 20 31 32 30 00 03 1E A0 0A 8D 31 36 31 30 3A 8B | 120......1610:.|
000019F0: 20 C3 28 48 24 29 B1 31 20 A7 20 53 24 28 49 29 | .(H$).1 . S$(I)|
00001A00: B2 48 24 00 34 1E A5 0A 81 4A B2 31 A4 41 28 49 |.H$.4....J.1.A(I|
00001A10: 29 3A 50 4B 24 B2 41 42 24 28 4A 29 AA 41 24 28 |):PK$.AB$(J).A$(|
00001A20: 49 2C 4A 29 3A 8D 20 31 32 30 3A 4C B2 30 3A 8D |I,J):. 120:L.0:.|
00001A30: 31 36 31 30 00 4F 1E A7 0A 8B 20 C3 28 48 24 29 |1610.O.... .(H$)|
00001A40: B1 31 20 A7 20 41 24 28 49 2C 4A 29 B2 48 24 00 |.1 . A$(I,J).H$.|
00001A50: 7F 1E AA 0A 99 22 D4 4F 45 4C 49 43 48 54 49 4E |.....".OELICHTIN|
00001A60: 47 22 3B 4A 3B 22 3A 22 3A 50 4B 24 B2 54 24 28 |G";J;":":PK$.T$(|
00001A70: 49 2C 4A 29 3A 8D 31 32 30 3A 8D 31 36 31 30 00 |I,J):.120:.1610.|
00001A80: 9A 1E B4 0A 8B 20 C3 28 48 24 29 B1 31 20 A7 20 |..... .(H$).1 . |
00001A90: 54 24 28 49 2C 4A 29 B2 48 24 00 A1 1E BE 0A 82 |T$(I,J).H$......|
00001AA0: 4A 00 CA 1E C8 0A 99 22 D7 45 4C 4B 20 41 4C 54 |J......".ELK ALT|
00001AB0: 45 52 4E 41 54 49 45 46 20 49 53 20 4A 55 49 53 |ERNATIEF IS JUIS|
00001AC0: 54 20 20 22 3B 42 28 49 29 3B 00 F2 1E CD 0A 85 |T ";B(I);......|
00001AD0: 22 9D 9D 9D 9D 22 3B 4A 3A 8B 28 4A B3 31 B0 20 |"....";J:.(J.1. |
00001AE0: 4A B1 41 28 49 29 29 A7 20 20 20 20 20 20 32 37 |J.A(I)). 27|
00001AF0: 36 30 00 FF 1E D2 0A 42 28 49 29 B2 4A 3A 8E 00 |60.....B(I).J:..|
00001B00: 13 1F 10 27 8F 2A 2A 2A 54 4F 45 4C 49 43 48 54 |...'.***TOELICHT|
00001B10: 49 4E 47 00 44 1F 1A 27 99 22 93 12 20 20 20 20 |ING.D..'.".. |
00001B20: 20 20 20 20 D4 A0 CF A0 C5 A0 CC A0 C9 A0 C3 20 | ........... |
00001B30: C8 A0 D4 A0 C9 A0 CE A0 C7 A0 A0 A0 A0 A0 A0 A0 |................|
00001B40: A0 A0 92 22 00 76 1F 24 27 99 22 11 31 20 C4 49 |...".v.$'.".1 .I|
00001B50: 54 20 49 53 20 44 45 20 44 4F 43 45 4E 54 45 4E |T IS DE DOCENTEN|
00001B60: 2D 56 45 52 53 49 45 20 56 41 4E 20 45 45 4E 20 |-VERSIE VAN EEN |
00001B70: 50 52 4F 2D 22 3B 00 A4 1F 2E 27 99 22 47 52 41 |PRO-";....'."GRA|
00001B80: 4D 4D 41 20 57 41 41 52 4D 45 45 20 55 20 45 45 |MMA WAARMEE U EE|
00001B90: 4E 20 41 55 54 4F 4D 41 54 49 53 43 48 45 20 4D |N AUTOMATISCHE M|
00001BA0: 45 45 52 2D 00 BD 1F 42 27 99 22 4B 45 55 5A 45 |EER-...B'."KEUZE|
00001BB0: 2D 54 4F 45 54 53 20 4D 41 41 4B 54 2E 00 FA 1F |-TOETS MAAKT....|
00001BC0: 4C 27 99 22 D5 20 4B 49 45 53 54 20 50 45 52 20 |L'.". KIEST PER |
00001BD0: 49 54 45 4D 20 54 55 53 53 45 4E 20 32 2C 20 33 |ITEM TUSSEN 2, 3|
00001BE0: 20 4F 46 20 34 20 20 20 20 20 20 20 4D 4F 47 45 | OF 4 MOGE|
00001BF0: 4C 49 4A 4B 48 45 44 45 4E 2E 00 27 20 56 27 99 |LIJKHEDEN..' V'.|
00001C00: 22 11 32 20 C2 49 4A 20 48 45 54 20 5A 45 4C 46 |".2 .IJ HET ZELF|
00001C10: 20 49 4E 54 49 4B 4B 45 4E 20 56 41 4E 20 45 45 | INTIKKEN VAN EE|
00001C20: 4E 20 54 4F 45 54 53 00 4E 20 60 27 99 22 20 20 |N TOETS.N `'." |
00001C30: 4D 4F 45 54 20 55 20 48 45 54 20 56 4F 4C 47 45 |MOET U HET VOLGE|
00001C40: 4E 44 45 20 4F 4E 54 48 4F 55 44 45 4E 3A 00 7B |NDE ONTHOUDEN:.{|
00001C50: 20 6A 27 99 22 2E 20 45 4C 4B 45 20 54 4F 45 54 | j'.". ELKE TOET|
00001C60: 53 20 4B 45 4E 54 20 28 31 29 20 45 45 4E 20 53 |S KENT (1) EEN S|
00001C70: 54 41 4D 2C 20 28 32 29 20 44 45 00 A9 20 74 27 |TAM, (2) DE.. t'|
00001C80: 99 22 20 20 41 4C 54 45 52 4E 41 54 49 45 56 45 |." ALTERNATIEVE|
00001C90: 4E 20 50 45 52 20 49 54 45 4D 20 45 4E 20 28 33 |N PER ITEM EN (3|
00001CA0: 29 20 44 45 20 54 4F 45 2D 00 D6 20 7E 27 99 22 |) DE TOE-.. ~'."|
00001CB0: 20 20 4C 49 43 48 54 49 4E 47 20 50 45 52 20 41 | LICHTING PER A|
00001CC0: 4C 54 45 52 4E 41 54 49 45 46 2E D5 20 4B 55 4E |LTERNATIEF.. KUN|
00001CD0: 54 20 41 4C 53 22 00 09 21 92 27 99 22 20 20 54 |T ALS"..!.'." T|
00001CE0: 4F 45 4C 49 43 48 54 49 4E 47 20 56 4F 4C 53 54 |OELICHTING VOLST|
00001CF0: 41 41 4E 20 4D 45 54 20 12 4A 55 49 53 54 92 20 |AAN MET .JUIST. |
00001D00: 4F 46 20 12 46 4F 55 54 92 00 3A 21 9C 27 99 22 |OF .FOUT..:!.'."|
00001D10: 2E 20 45 4C 4B 20 56 41 4E 20 44 45 20 47 45 4E |. ELK VAN DE GEN|
00001D20: 4F 45 4D 44 45 20 4F 4E 44 45 52 44 45 4C 45 4E |OEMDE ONDERDELEN|
00001D30: 20 4D 41 47 20 54 45 4E 22 3B 00 89 21 A6 27 99 | MAG TEN";..!.'.|
00001D40: 22 20 20 48 4F 4F 47 53 54 45 20 36 20 52 45 47 |" HOOGSTE 6 REG|
00001D50: 45 4C 53 20 56 41 4E 20 34 30 20 41 41 4E 53 4C |ELS VAN 40 AANSL|
00001D60: 41 47 45 4E 20 20 20 20 20 20 20 4C 41 4E 47 20 |AGEN LANG |
00001D70: 5A 49 4A 4E 2E 20 C4 45 20 52 45 53 54 20 56 45 |ZIJN. .E REST VE|
00001D80: 52 44 57 49 4A 4E 54 2E 2E 00 98 21 B0 27 8D 34 |RDWIJNT....!.'.4|
00001D90: 33 30 3A 8D 31 30 31 30 00 C9 21 BA 27 99 22 93 |30:.1010..!.'.".|
00001DA0: 12 20 56 45 52 56 4F 4C 47 20 20 D4 A0 CF A0 C5 |. VERVOLG .....|
00001DB0: A0 CC A0 C9 A0 C3 A0 C8 A0 D4 A0 C9 A0 CE A0 C7 |................|
00001DC0: A0 A0 A0 A0 A0 A0 A0 92 22 00 F8 21 C4 27 99 22 |........"..!.'."|
00001DD0: 11 33 20 D4 49 4B 20 40 20 2B 20 D2 C5 D4 D5 D2 |.3 .IK @ + .....|
00001DE0: CE 20 41 4C 53 20 41 46 53 4C 55 49 54 49 4E 47 |. ALS AFSLUITING|
00001DF0: 20 56 41 4E 20 44 45 22 00 05 22 CE 27 99 22 54 | VAN DE"..".'."T|
00001E00: 45 4B 53 54 22 00 2F 22 E2 27 99 22 11 34 20 D6 |EKST"./".'.".4 .|
00001E10: 4F 4F 52 20 48 45 54 20 4F 50 53 4C 41 41 4E 20 |OOR HET OPSLAAN |
00001E20: 56 41 4E 20 55 57 20 54 4F 45 54 53 20 4F 50 00 |VAN UW TOETS OP.|
00001E30: 5A 22 EC 27 99 22 43 41 53 53 45 54 54 45 20 28 |Z".'."CASSETTE (|
00001E40: 4F 46 20 44 49 53 4B 29 20 56 45 52 5A 49 4E 54 |OF DISK) VERZINT|
00001E50: 20 55 20 54 45 4C 4B 45 4E 53 00 81 22 F6 27 99 | U TELKENS..".'.|
00001E60: 22 45 45 4E 20 45 45 4E 44 55 49 44 49 47 45 20 |"EEN EENDUIDIGE |
00001E70: 54 49 54 45 4C 2E 20 CF 4E 54 48 4F 55 44 45 4E |TITEL. .NTHOUDEN|
00001E80: 21 00 B0 22 00 28 99 22 11 35 20 C9 4E 20 48 45 |!..".(.".5 .N HE|
00001E90: 54 20 4D 45 4E 55 20 4B 52 49 4A 47 54 20 55 20 |T MENU KRIJGT U |
00001EA0: 44 45 20 56 45 52 53 43 48 49 4C 4C 45 4E 44 45 |DE VERSCHILLENDE|
00001EB0: 00 DD 22 0A 28 99 22 4D 4F 47 45 4C 49 4A 4B 48 |..".(."MOGELIJKH|
00001EC0: 45 44 45 4E 20 56 41 4E 20 44 49 54 20 50 52 4F |EDEN VAN DIT PRO|
00001ED0: 47 52 41 4D 4D 41 20 41 41 4E 47 45 2D 00 EB 22 |GRAMMA AANGE-.."|
00001EE0: 14 28 99 22 42 4F 44 45 4E 2E 22 00 FA 22 1E 28 |.(."BODEN."..".(|
00001EF0: 8D 34 33 30 3A 8D 31 30 31 30 00 00 23 28 28 8E |.430:.1010..#((.|
00001F00: 00 0F 23 60 EA 8F 20 4D 45 53 20 4C 4F 47 4F 00 |..#`.. MES LOGO.|
00001F10: 43 23 74 EA 99 22 93 11 12 20 20 20 20 20 20 20 |C#t.."... |
00001F20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F40: 20 22 3B 00 74 23 76 EA 99 22 20 20 CD C5 D3 20 | ";.t#v.." ... |
00001F50: 4D 45 53 20 CD C5 D3 20 4D 45 53 20 CD C5 D3 20 |MES ... MES ... |
00001F60: 4D 45 53 20 CD C5 D3 20 4D 45 53 20 CD C5 D3 20 |MES ... MES ... |
00001F70: 20 20 22 3B 00 A4 23 78 EA 99 22 20 20 20 20 20 | ";..#x.." |
00001F80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001F90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001FA0: 20 20 20 22 00 D0 23 84 EA 99 22 AC A2 A2 20 20 | "..#..."... |
00001FB0: 20 20 20 20 20 A2 A2 BB 20 20 A2 A2 20 A2 A2 20 | ... .. .. |
00001FC0: A2 A2 A2 BB 20 20 A2 A2 20 A2 A2 A2 A2 20 A2 A2 |.... .. .... ..|
00001FD0: 00 FD 23 86 EA 99 22 AC A2 A2 BB 20 20 20 20 20 |..#...".... |
00001FE0: AC A2 A2 BB 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 BB |.... .. .. ....|
00001FF0: 20 AC A2 BB AC A2 A2 A2 A2 BB AC A2 A2 00 2B 24 | .............+$|
00002000: 88 EA 99 22 AC A2 A2 A2 20 20 20 20 20 A2 A2 A2 |...".... ...|
00002010: BB 20 20 A2 A2 20 20 20 20 20 20 20 20 20 A2 A2 |. .. ..|
00002020: 20 20 20 20 20 20 20 20 A2 A2 BB 00 59 24 8A EA | ....Y$..|
00002030: 99 22 AC A2 A2 A2 BB 20 20 20 AC A2 A2 A2 BB 20 |."..... ..... |
00002040: 20 A2 A2 20 20 20 20 20 20 20 20 20 A2 A2 20 20 | .. .. |
00002050: 20 20 20 20 20 20 A2 A2 BB 00 7C 24 8C EA 99 22 | ....|$..."|
00002060: AC A2 BB A2 A2 20 20 20 A2 A2 AC A2 BB 20 20 A2 |..... ..... .|
00002070: A2 20 20 20 20 20 20 20 20 20 A2 A2 00 A9 24 8E |. ....$.|
00002080: EA 99 22 AC A2 BB AC A2 BB 20 AC A2 BB AC A2 BB |.."...... ......|
00002090: 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 BB 20 AC A2 BB | .. .. .... ...|
000020A0: AC A2 A2 A2 A2 BB AC A2 BB 00 D6 24 90 EA 99 22 |...........$..."|
000020B0: AC A2 BB 20 A2 A2 20 A2 A2 20 AC A2 BB 20 20 A2 |... .. .. ... .|
000020C0: A2 20 A2 A2 20 A2 A2 A2 BB 20 20 A2 A2 20 A2 A2 |. .. .... .. ..|
000020D0: A2 A2 A2 20 A2 A2 00 04 25 92 EA 99 22 AC A2 BB |... ....%..."...|
000020E0: 20 AC A2 A2 A2 BB 20 AC A2 BB 20 20 A2 A2 20 20 | ..... ... .. |
000020F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002100: 20 AC A2 A2 00 32 25 94 EA 99 22 AC A2 BB 20 20 | ....2%..."... |
00002110: A2 A2 A2 20 20 AC A2 BB 20 20 A2 A2 20 20 20 20 |... ... .. |
00002120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 AC | .|
00002130: A2 A2 00 60 25 96 EA 99 22 AC A2 BB 20 20 AC A2 |...`%..."... ..|
00002140: BB 20 20 AC A2 BB 20 20 A2 A2 20 20 20 20 20 20 |. ... .. |
00002150: 20 20 20 A2 A2 BB 20 20 20 20 20 20 20 AC A2 A2 | ... ...|
00002160: 00 8E 25 98 EA 99 22 AC A2 BB 20 20 20 A2 20 20 |..%..."... . |
00002170: 20 AC A2 BB 20 20 A2 A2 20 20 20 20 20 20 20 20 | ... .. |
00002180: 20 A2 A2 BB 20 20 20 20 20 20 20 AC A2 A2 00 BC | ... .....|
00002190: 25 9A EA 99 22 AC A2 BB 20 20 20 20 20 20 20 AC |%..."... .|
000021A0: A2 BB 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 BB 20 AC |.. .. .. .... .|
000021B0: A2 BB AC A2 A2 A2 A2 A2 20 A2 A2 BB 00 E9 25 9C |........ .....%.|
000021C0: EA 99 22 AC A2 BB 20 20 20 20 20 20 20 AC A2 BB |.."... ...|
000021D0: 20 20 A2 A2 20 A2 A2 20 A2 A2 A2 BB 20 20 A2 A2 | .. .. .... ..|
000021E0: 20 A2 A2 A2 A2 BB AC A2 A2 00 1D 26 B0 EA 99 22 | ..........&..."|
000021F0: 11 11 12 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00002200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002210: 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 4E 26 | ";.N&|
00002220: B2 EA 99 22 20 20 CD C1 CC CD C2 C5 D2 C7 D3 20 |..." ......... |
00002230: 20 20 A0 C5 C4 D5 C3 C1 D4 C9 C5 D6 C5 20 20 A0 | ........... .|
00002240: D3 CF C6 D4 D7 C1 D2 C5 A0 A0 A0 A0 22 3B 00 7F |............";..|
00002250: 26 B4 EA 99 22 12 20 20 20 20 20 20 20 20 20 20 |&...". |
00002260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002280: A0 26 B6 EA 81 49 B2 31 A4 31 35 30 30 3A A1 5A |.&...I.1.1500:.Z|
00002290: 24 3A 8B 5A 24 B3 B1 22 22 A7 49 B2 31 35 30 30 |$:.Z$.."".I.1500|
000022A0: 00 A7 26 B8 EA 82 49 00 AD 26 BA EA 8E 00 00 00 |..&...I..&......|
000022B0: 6D |m |
.......59468,14...... 60000.7....I.1.40:
BL$.BL$.G(32):.._.... PGM = 'MEERKEUZETO
ETS-D' MES-8502...... (C) MALMBERG 1981
M.J. VAN DALEN...... 16KB DOCENTEN-UITVO
ERING.T.(..***VERKLARING EN DECLARATIE V
ARIABELEN***...2.. S$(I) IS STAM VAN ITE
M I...<.. A$(I,J) IS ALTERNATIEF VAN ITE
M I.H.F.. T$(I,J) IS TOELICHTING BIJ ALT
ERNATIEF J VAN ITEM I; IT = AANTAL ITEMS
...Z..A(50),B(50),S$(50),A$(50,4),T$(50,
4).J.N.AB$(1)."A. ":AB$(2)."B. ":AB$(3).
"C. ":AB$(4)."D. ".T.S.. 200...X.. C(PK$
).0 . .:....}.. MB.1 . C(PK$)...... F(J(
PK$,MB,1)).2. . 160.1....MB:.PK$:PK$."":
..E.... INVOEGEN <CR>.Z. .PH$.H(PK$,MB.1
).G(13).I(PK$,C(PK$).MB):PK$.PH$:.......
1,0:.1,H$: 1:.:....H..***HOOFDPROGRAMMA*
**...R.."..";BL$;".** M E E R K E U Z E
T O E T S - D **";".";BL$......" 1 OP
ROEPEN TOETS VAN CASSETTE.9....". 2 SCHR
IJVEN TOETS NAAR CASSETTE.Y....". 3 INVO
EREN NIEUWE TOETS.|....". 4 WIJZIGEN BES
TAANDE TOETS......". 5 TOEVOEGEN VAN ITE
M(S)......". 6 .UITVOERING TOETS......".
7 OPROEPEN TOETS VAN CBM-DISK(4040)....
..". 8 SCHRIJVEN TOETS NAAR CBM-DISK(404
0)./."..". 9 GEBRUIKSAANWIJZING.B.'.."..
MAAK UW KEUZE P
";.N.,..1010:....@..F(KZ$).208..910...H.
.KZ.710,810,2210,2510,2220,2010,500,600,
10010...R..200.D.|........:KZ.33752:.Z.K
Z.KZ.14:.J:.Z,J:.Z:.......40,20,9,11,32,
5,5,14,32,20,15,5,20,19,41./....***DISK
READ***.:...HU$."".M....:."GEEF NAAM VAN
DE TOETS ";:. 170:F$."M.".H$...... F(I(
F$,1)).2 . F$."M.".H(H$,C(H$).1).....FL$
."0:".F$.",SEQ,READ":.1,8,14,FL$.P....1,
F$:.1,IT...... I(F$,C(F$).2);" GEVONDEN"
...&..I.1.IT:.1,A(I):.1,B(I):.I.+.0..I.1
.IT:.1410:S$(I).HU$.K.:..J.1.A(I):.1410:
A$(I,J).HU$.D.D..1410:T$(I,J).HU$:.J.K.N
..I.{.S.HU$."": 1:....X..***DISK WRITE**
*...].HU$."".O.B..:."GEEF NAAM VAN DE TO
ETS ";:. 170:F$."M.".H$...G.. F(I(F$,1))
.2 . F$."M.".H(H$,C(H$).1)...L.FL$."@0:"
.F$.",SEQ,WRITE":.1,8,14,FL$:KZ$.G(13).P
....1,F$;KZ$;:.1,IT;KZ$;:.I.1.IT.Q....1,
A(I);KZ$;:.1,B(I);KZ$;:.I......I.1.IT:H$
.S$(I):.1310......J1.1.A(I):H$.A$(I,J1):
.1310:H$.T$(I,J1):.1310.I....J1,I..... 1
:FL.0:.".KLAAR.":WT.1000:.1210......***T
APE READ***...A.HU$."".J.F..".GEEF NAAM
VAN DE TOETS:EEN . INDIEN ONBEKEND ";:.1
70.J.P.F$."X":. C(H$).1 . F$.F$.H$...Q..
F(I(F$,1)).2 . F$.H(F$,C(F$).1)...U..1,
1,0,F$:."'N OGENBLIK......Z..1,F$:.1,IT.
..... I(F$,C(F$).1)" GEVONDEN"......I.1.
IT:.1,A(I):.1,B(I):.I. ....I.1.IT:HU$.""
:.1410:S$(I).HU$.I....JZ.1.A(I):HU$."":.
1410:A$(I,JZ).HU$.K...HU$."":.1410:T$(I,
JZ).HU$:.JZ.R....I.....HU$."": 1:.... .
.***TAPE WRITE***...%.KZ$.G(13)...*..IT.
0.1510.K./.KZ$.G(13):HU$.""...4..:."GEEF
NAAM VAN DE TOETS ";:. 170:F$."X".H$.#.
9.. F(I(F$,1)).2 . F$.H(F$,C(F$).1).B.>.
.1,1,1,F$:."'N OGENBLIK....Q.H..1,F$;KZ$
;:.1,IT;KZ$;:.I.1.IT:.1,A(I);KZ$;...M..1
,B(I);KZ$;:. I...R..I.1.IT:H$.S$(I):.131
0.T.\..JZ.1.A(I):H$.A$(I,JZ):.1310:H$.T$
(I,JZ):.1310...F..JZ,I...Z. 1:FL.0:.".KL
AAR.":WT.1000:.1210......***HARDCOPY PRI
NTER***.5....7,4,7:.7: 7:.3,4.F...PK$.F$
:. 960.]....3,"TOETS ";PK$:.3......I.1.I
T:PK$.S$(I):.960:.3,"ITEM ";I:.3......3,
PK$:.3.N....J.1.A(I):PK$.A$(I,J):.960: .
3,G(J.192);": ";PK$:.J.X....3:.3...... I
..... 3:....... C(PK$).0 . ..+.E.. MB.1
. C(PK$):. F(J(PK$,MB,1)).2 . . 980.6.J.
. MB:..C.T.PK$.H(PK$,MB.1).G(13).I(PK$,C
(PK$).MB):..}....***KEYBOARD INPUT***...
...KZ$:KZ.E(KZ$):.KZ$."".1010......158,0
.......Q....1,0:." .";:.1,H$:H.E(H$): 1:
....... H$."" . . 1050...... H$."S" . H.
0:....... H.0 . H.F(H$).192.*. .. H.0 .
H.F(H$).64.0.!...F.$.H$."":HU$."":.1,0.[
.).. 623,34:. 158,1.G....1,R$:....3.. R$
."KLAAR" . 1:H$.R$:....8.. R$."@" . R$.
"_" . 1:R$."":.". ":..M.=.. C(H$).0 .
H$.R$:. 1065...B.. C(H$).C(R$).246 . H$
.H$.G(2)." ".R$:. 1065...L.....V.H$.""
:HU$."":.1,0.1.`.. 623,34:. 158,1.=.J..1
,R$:..[.T.. R$."KLAAR" . 1:H$.R$:....~.
. R$."@" . R$."_" . 1:R$."":.". ":...
.... C(H$).0 . H$.R$:. 1120.P.... C(H$).
C(R$).246 . H$.H$.G(2).R$:. 1120.V......
....***WACHTLUS......Z.1.WT:.:....... PR
INT#1 MET MEER DAN 80 KARAKTERS.2...J.1:
K.C(H$).63.E.(.HU$.J(H$,J,63).S.2..1,G(3
4);HU$;G(13);:. J.K . J.J.63:. 1320...<.
.1,"##";G(13);:..A.X.. DISK/TAPE READ VA
N INPUT MET MEER DAN 80 KARAKTERS.L...HU
$.""......1,HA$:. HA$."##" . ....... H(H
A$,1).G(34) . HA$.I(HA$,C(HA$).1).!...HU
$.HU$.HA$.,. .. 1420.O....***WAARSCHUWIN
G TOETS INLEZEN.]....:.ZZ.1.6......".
LEES EERST TOETS VAN CASSETTE ..":WT
.100:.1210.R...." LEES EERST TOETS VA
N CASSETTE .":.1210:.:....@..***AANWI
JZING RETURN-TOETS BIJ GEEN WIJZIGING...
J..ZZ.1.6.@.T..".@ INDIEN GEEN WIJZIGING
..":WT.100:.1210.H.^.."@ INDIEN GEEN WIJ
ZIGING.":.1210:....H.."
.". .R..1060.E....**
*WAARSCHUWING TBV @ VOOR STOP.Q....ZZ.1.
6......"@ + RETURN VOOR STOP .":WT.70:.1
210. .B..".@ + RETURN VOOR STOP .":.1210
.I.L..ZZ:." .":
..K....***WAARSCHUWING FOUTE INVOER.W...
.ZZ.1.6......"ONJUISTE INVOER.":WT.100:.
1210...&..".ONJUISTE INVOER.":.1210...0.
.ZZ:." ...":....P..***
EXECUTE TOETS...Z.H.0:T.0:SC.0:.IT.0.151
0.1....I.1.IT:T.T.1:."..ITEM .";I.I...PK
$.S$(I):. 120:.:..U....J.1.A(I):PK$.AB$(
J).A$(I,J):. 120:.:.J......"..WELKE IS J
UIST. ";:.1050:.H.1.H.A(I).."..";:. 2060
......:PK$.T$(I,H):. 120:.H.B(I).SC.SC.1
:H.I:.2090.$. .. PRINT:PRINT"NOG EEN; ZO
JA, TIK 1";:GOSUB1010:IFKZ=1THEN2020.K.*
..430:.1010:.I:. INDIEN SEQUENTIEEL.S.4.
.:."JE HEBT";T;"TOETSVRAGEN GEDAAN....>.
.SC..1.."DAARVAN WAREN ER";SC;"JUIST.":.
2130.B.H.."DAARVAN WAS ER 1 JUIST".L.R..
1010...\.. EXECUTE TOETS SEQENTUEEL.....
.***INVOER NIEUWE TOETS.....IT.0.....IT.
IT.1.%....".".D...."MEERK.TOETS-D ITEM";
IT;".U....1710:. 1110.C.J.S$(IT).H$...T.
.H(S$(IT),5)."KLAAR" . 2430. ....S$(IT).
"" . .1810:.2230.U....4,0:."HOEVEEL ALTE
RNATIEVEN 4.";:.4,A(IT): 4:.......A(IT)
.2.A(IT).4..1810:.2280......I.1.A(IT). .
..."TEKST ALTERNATIEF";I.?....1710:L.0:.
AB$(I);: .1060.O...A$(IT,I).H$.N.$..C(A
$(IT,I)).1..1810:.2310.U....I...8..I.1.A
(IT):." TOELICHTING ALTERNATIEF";I:
T$(IT,I).".".D.B..1710:.1060.T.L.T$(IT,I
).H$...V..I...`.."WELK ALTERNATIEF IS JU
IST? ";:. 1050:J.H.1.J..J.A(IT).J.1 . ."
ONMOGELIJK":.2400.F.T.B(IT).J:.".INDIEN
EINDE TOETS, TIK: KLAAR":.2220.|.~.IT.IT
.1:A(0).IT:....D..***WIJZIG BESTAANDE TO
ETS.E.N..".TIK 'S' VOOR LIJST ITEMS (DE
STAM).T.X..IT.0.1510......:."WELK ITEM W
IJZIGEN ";:.1050:.H.0.H.IT.2550.....I.H:
.2590:..#....I.1.IT.C....:.:."ITEM";I:.:
PK$.S$(I):.120:.J.1.A(I):PK$.AB$(J).A$(I
,J).P.... 120:.J......:.".INDIEN WIJZIGE
N, TIK 1":.1010:.KZ.1..2590......I:.....
..".TIK .1. VOOR VERWIJDEREN VAN DIT ITE
M":."TIK ANDERS .RETURN.."...#..1010:.KZ
..1.2710...(..I.IT.IT.IT.1:..*.2..K.I.IT
.1.P.<.S$(I).S$(I.1):A(I).A(I.1):B(I).B(
I.1):.J.1.A(I):A$(I,J).A$(I.1,J)...F.T$(
I,J).T$(I.1,J):.J...P..K:IT.IT.1:..B....
***SUBROUTINE WIJZIGING ONDERDELEN......
:."ITEM";I:.:PK$.S$(I):. 120... ..1610:.
C(H$).1 . S$(I).H$.4....J.1.A(I):PK$.AB
$(J).A$(I,J):. 120:L.0:.1610.O.... C(H$)
.1 . A$(I,J).H$....."TOELICHTING";J;":"
:PK$.T$(I,J):.120:.1610...... C(H$).1 .
T$(I,J).H$......J.J.H.."WELK ALTERNATIEF
IS JUIST ";B(I);...M.."....";J:.(J.1.
J.A(I)). 2760...R.B(I).J:.....'.***
TOELICHTING.D..'.".. T O E L I C
H T I N G .".V.$'.".1 DIT IS DE
DOCENTEN-VERSIE VAN EEN PRO-";....'."GRA
MMA WAARMEE U EEN AUTOMATISCHE MEER-...B
'."KEUZE-TOETS MAAKT....L'."U KIEST PER
ITEM TUSSEN 2, 3 OF 4 MOGELIJKHEDE
N..' V'.".2 BIJ HET ZELF INTIKKEN VAN EE
N TOETS.N `'." MOET U HET VOLGENDE ONTH
OUDEN:.{ J'.". ELKE TOETS KENT (1) EEN S
TAM, (2) DE.. T'." ALTERNATIEVEN PER IT
EM EN (3) DE TOE-.V ~'." LICHTING PER A
LTERNATIEF.U KUNT ALS"..!.'." TOELICHTI
NG VOLSTAAN MET .JUIST. OF .FOUT..:!.'."
. ELK VAN DE GENOEMDE ONDERDELEN MAG TEN
";..!.'." HOOGSTE 6 REGELS VAN 40 AANSL
AGEN LANG ZIJN. DE REST VERDWIJNT.
...!.'.430:.1010.I!.'.".. VERVOLG T O E
L I C H T I N G ."..!D'.".3 TIK @
+ RETURN ALS AFSLUITING VAN DE".."N'."T
EKST"./".'.".4 VOOR HET OPSLAAN VAN UW T
OETS OP.Z".'."CASSETTE (OF DISK) VERZINT
U TELKENS..".'."EEN EENDUIDIGE TITEL. O
NTHOUDEN!..".(.".5 IN HET MENU KRIJGT U
DE VERSCHILLENDE..".(."MOGELIJKHEDEN VAN
DIT PROGRAMMA AANGE-..".(."BODEN."..".(
.430:.1010..#((...#`.. MES LOGO.C#T.."..
.
";.T#V.." MES MES MES MES MES MES MES
MES MES ";..#X.."
".P#..."... ...
.. .. .... .. .... ....#..."....
.... .. .. .... .............+$..."....
.... .. .. ....Y$..
."..... ..... .. .. ..
..|$..."..... ..... .. ....$.
.."...... ...... .. .. .... ...........
..V$..."... .. .. ... .. .. .... .. ..
... ....%..."... ..... ... ..
....2%..."... ... ... ..
....`%..."... ... ...
.. ... .....%..."... .
... .. ... .....%..."...
... .. .. .... ......... .....%.
.."... ... .. .. .... .. .......
...&..."...
";.N&..." MALMBERGS EDUCA
TIEVE SOFTWARE ";.&...".
". &...I.1
.1500:.Z$:.Z$.."".I.1500..&...I..&......
M
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL