ALFABETISEREN
FILE INFORMATION
FILENAME(S): ALFABETISEREN
FILE TYPE(S): PRG
FILE SIZE: 5.6K
FIRST SEEN: 2025-12-02 02:07:55
APPEARS ON: 1 disk(s)
FILE HASH
641b4e2cd5faabc0e53031d8e4c4ac92494ecbc4f1a181b58185536f5f4c0b9a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| KLOP | ALFABETISEREN | PRG | Shocktrooper | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 31 30 30 30 00 15 08 14 00 |.......1000.....|
00000010: 89 31 30 31 30 00 21 08 64 00 99 22 93 22 3B 3A |.1010.!.d..".";:|
00000020: 8E 00 51 08 6E 00 99 C8 28 22 13 11 11 11 11 11 |..Q.n...("......|
00000030: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000040: 11 11 11 22 2C B6 28 B5 28 56 45 AA 31 29 29 29 |...",.(.(VE.1)))|
00000050: 3B 00 61 08 70 00 99 A6 B6 28 48 4F 29 29 3B 3A |;.a.p....(HO));:|
00000060: 8E 00 86 08 78 00 48 4F B2 C2 28 32 30 39 29 AA |....x.HO..(209).|
00000070: 32 35 36 AC C2 28 32 31 30 29 AB 31 30 32 34 AA |256..(210).1024.|
00000080: C2 28 32 31 31 29 00 A4 08 79 00 56 45 B2 B5 28 |.(211)...y.VE..(|
00000090: 48 4F AD 34 30 29 3A 48 4F B2 48 4F AB 34 30 AC |HO.40):HO.HO.40.|
000000A0: 56 45 3A 8E 00 AF 08 C8 00 A1 49 4E 24 3A 8E 00 |VE:.......IN$:..|
000000B0: C4 08 D2 00 A1 49 4E 24 3A 8B 49 4E 24 B2 22 22 |.....IN$:.IN$.""|
000000C0: 89 32 31 30 00 CA 08 DC 00 8E 00 F7 08 FA 00 97 |.210............|
000000D0: 35 34 32 39 36 2C 31 35 3A 97 35 34 32 37 38 2C |54296,15:.54278,|
000000E0: 32 35 35 3A 97 35 34 32 37 33 2C 39 35 3A 97 35 |255:.54273,95:.5|
000000F0: 34 32 37 36 2C 31 37 00 09 09 FB 00 81 4F 4F B2 |4276,17......OO.|
00000100: 31 A4 32 30 30 3A 82 4F 4F 00 2A 09 FC 00 97 35 |1.200:.OO.*....5|
00000110: 34 32 37 36 2C 30 3A 97 35 34 32 37 37 2C 30 3A |4276,0:.54277,0:|
00000120: 97 35 34 32 37 38 2C 30 3A 8E 00 38 09 04 01 52 |.54278,0:..8...R|
00000130: 56 B2 BB 28 31 29 3A 8E 00 46 09 0E 01 46 52 B2 |V..(1):..F...FR.|
00000140: B8 28 30 29 3A 8E 00 6F 09 2C 01 53 52 24 B2 C4 |.(0):..o.,.SR$..|
00000150: 28 53 52 29 3A 8B C8 28 53 52 24 2C 31 29 B2 22 |(SR):..(SR$,1)."|
00000160: 20 22 A7 53 52 24 B2 CA 28 53 52 24 2C 32 29 00 | ".SR$..(SR$,2).|
00000170: 75 09 2D 01 8E 00 9A 09 36 01 53 52 24 B2 22 22 |u.-.....6.SR$.""|
00000180: 3A 8B 53 52 B1 B2 31 30 AE 28 43 54 AB 43 4E AB |:.SR..10.(CT.CN.|
00000190: B4 28 43 4E 29 29 A7 33 31 38 00 B5 09 37 01 8B |.(CN)).318...7..|
000001A0: 53 52 B3 AB 2E 35 AC 31 30 AE AB 43 4E A7 53 52 |SR...5.10..CN.SR|
000001B0: 24 B2 22 2D 22 00 DC 09 38 01 53 52 24 B2 53 52 |$."-"...8.SR$.SR|
000001C0: 24 AA CA 28 C4 28 B5 28 B6 28 53 52 29 AA 2E 35 |$..(.(.(.(SR)..5|
000001D0: AC 31 30 AE AB 43 4E 29 29 2C 32 29 00 07 0A 39 |.10..CN)),2)...9|
000001E0: 01 8B C3 28 53 52 24 29 B3 43 54 AB 43 4E AA 28 |...(SR$).CT.CN.(|
000001F0: 43 4E B3 B1 30 29 A7 53 52 24 B2 22 20 22 AA 53 |CN..0).SR$." ".S|
00000200: 52 24 3A 89 33 31 33 00 21 0A 3A 01 8B 43 4E B2 |R$:.313.!.:..CN.|
00000210: 30 B0 B6 28 53 52 29 B1 B2 31 45 31 30 89 33 31 |0..(SR)..1E10.31|
00000220: 36 00 55 0A 3B 01 53 52 24 B2 53 52 24 AA CA 28 |6.U.;.SR$.SR$..(|
00000230: C4 28 31 AA B6 28 53 52 29 AB B5 28 B6 28 53 52 |.(1..(SR)..(.(SR|
00000240: 29 29 AA 2E 35 AC 31 30 AE AB 43 4E 29 2C 33 2C |))..5.10..CN),3,|
00000250: 43 4E AA 31 29 00 75 0A 3C 01 8B C3 28 53 52 24 |CN.1).u.<...(SR$|
00000260: 29 B3 43 54 A7 53 52 24 B2 53 52 24 AA 22 20 22 |).CT.SR$.SR$." "|
00000270: 3A 89 33 31 36 00 8B 0A 3D 01 8B C3 28 53 52 24 |:.316...=...(SR$|
00000280: 29 B1 43 54 A7 53 52 24 B2 22 22 00 AB 0A 3E 01 |).CT.SR$.""...>.|
00000290: 8B C3 28 53 52 24 29 B3 43 54 A7 53 52 24 B2 53 |..(SR$).CT.SR$.S|
000002A0: 52 24 AA 22 2A 22 3A 89 33 31 38 00 B1 0A 3F 01 |R$."*":.318...?.|
000002B0: 8E 00 C7 0A 5E 01 9F 34 2C 34 3A 98 34 2C 53 52 |....^..4,4:.4,SR|
000002C0: 24 3B 3A A0 34 3A 8E 00 D8 0A 68 01 9F 34 2C 34 |$;:.4:....h..4,4|
000002D0: 3A 98 34 3A A0 34 3A 8E 00 F4 0A E8 03 41 B2 31 |:.4:.4:......A.1|
000002E0: 30 30 30 3A 89 32 30 3A 8F 20 41 4C 50 48 41 2D |000:.20:. ALPHA-|
000002F0: 53 4F 52 54 00 0E 0B F2 03 89 32 39 39 30 3A 8F |SORT......2990:.|
00000300: 20 49 4E 49 54 49 41 4C 49 53 41 54 49 45 00 28 | INITIALISATIE.(|
00000310: 0B FC 03 41 57 B2 30 3A 8F 20 41 41 4E 54 41 4C |...AW.0:. AANTAL|
00000320: 20 57 4F 4F 52 44 45 4E 00 3B 0B 06 04 48 4F B2 | WOORDEN.;...HO.|
00000330: 30 3A 56 45 B2 34 AA 32 AC 41 57 00 4B 0B 10 04 |0:VE.4.2.AW.K...|
00000340: 8B 41 57 B3 35 20 A7 31 30 36 30 00 5F 0B 1A 04 |.AW.5 .1060._...|
00000350: 48 4F B2 31 39 3A 56 45 B2 32 AC 41 57 AB 36 00 |HO.19:VE.2.AW.6.|
00000360: 68 0B 24 04 8D 31 31 30 00 83 0B 2E 04 53 52 B2 |h.$..110.....SR.|
00000370: 41 57 AA 31 3A 43 54 B2 32 3A 43 4E B2 30 3A 8D |AW.1:CT.2:CN.0:.|
00000380: 33 31 30 00 A9 0B 38 04 99 53 52 24 3B 22 20 22 |310...8..SR$;" "|
00000390: 3B 3A 4D 4C B2 39 3A 8D 32 37 35 30 3A 8B 41 24 |;:ML.9:.2750:.A$|
000003A0: B2 22 22 20 A7 31 31 34 30 00 C0 0B 42 04 8D 31 |."" .1140...B..1|
000003B0: 32 38 30 3A 8B 41 57 B3 31 30 20 A7 31 30 33 30 |280:.AW.10 .1030|
000003C0: 00 CA 0B 4C 04 8D 32 34 34 30 00 DE 0B 56 04 48 |...L..2440...V.H|
000003D0: 4F B2 30 3A 56 45 B2 32 33 3A 8D 31 31 30 00 0B |O.0:VE.23:.110..|
000003E0: 0C 60 04 99 22 4D 45 54 20 3C 52 45 54 55 52 4E |.`.."MET <RETURN|
000003F0: 3E 20 53 54 41 52 54 20 48 45 54 20 53 4F 52 54 |> START HET SORT|
00000400: 45 52 45 4E 2E 2E 2E 20 20 22 3B 00 26 0C 6A 04 |EREN... ";.&.j.|
00000410: 8D 32 31 30 3A 8B C6 28 49 4E 24 29 B3 B1 31 33 |.210:..(IN$)..13|
00000420: 20 A7 31 31 33 30 00 36 0C 74 04 8B 41 57 B2 30 | .1130.6.t..AW.0|
00000430: 20 A7 33 30 33 30 00 4C 0C 7E 04 8D 31 35 32 30 | .3030.L.~..1520|
00000440: 3A 8F 20 4F 56 45 52 5A 49 43 48 54 00 64 0C 88 |:. OVERZICHT.d..|
00000450: 04 8D 31 34 31 30 3A 8F 20 53 4E 45 4C 53 4F 52 |..1410:. SNELSOR|
00000460: 54 45 45 52 00 77 0C 92 04 48 4F B2 32 39 3A 81 |TEER.w...HO.29:.|
00000470: 49 B2 31 20 A4 41 57 00 93 0C 9C 04 56 45 B2 32 |I.1 .AW.....VE.2|
00000480: AC 49 AA 31 3A 8D 31 31 30 3A 99 53 24 28 49 29 |.I.1:.110:.S$(I)|
00000490: 3A 82 49 00 A7 0C A6 04 48 4F B2 30 3A 56 45 B2 |:.I.....HO.0:VE.|
000004A0: 32 33 3A 8D 31 31 30 00 D9 0C B0 04 99 22 57 49 |23:.110......"WI|
000004B0: 4C 54 20 55 20 44 41 54 20 4E 55 20 57 41 54 20 |LT U DAT NU WAT |
000004C0: 4C 41 4E 47 5A 41 4D 45 52 20 5A 49 45 4E 20 3F |LANGZAMER ZIEN ?|
000004D0: 20 22 3B 3A 8D 32 39 32 30 00 E8 0C BA 04 8B 59 | ";:.2920......Y|
000004E0: B2 30 20 A7 31 32 37 30 00 F7 0C C4 04 8B 59 B3 |.0 .1270......Y.|
000004F0: 30 20 A7 31 31 39 30 00 0D 0D CE 04 8D 31 35 32 |0 .1190......152|
00000500: 30 3A 8F 20 4F 56 45 52 5A 49 43 48 54 00 24 0D |0:. OVERZICHT.$.|
00000510: D8 04 8D 31 37 31 30 3A 8F 20 4F 50 53 43 48 55 |...1710:. OPSCHU|
00000520: 49 56 45 4E 00 3D 0D E2 04 8D 31 37 39 30 3A 8F |IVEN.=....1790:.|
00000530: 20 54 52 41 41 47 53 4F 52 54 45 45 52 00 50 0D | TRAAGSORTEER.P.|
00000540: EC 04 8D 32 35 39 30 3A 8F 20 53 50 41 54 49 45 |...2590:. SPATIE|
00000550: 00 56 0D F6 04 80 00 77 0D 00 05 8F 20 53 55 42 |.V.....w.... SUB|
00000560: 52 20 43 4F 4E 54 52 4F 4C 45 45 52 20 20 57 4F |R CONTROLEER WO|
00000570: 4F 52 44 20 20 41 24 00 80 0D 0A 05 4C 45 B2 30 |ORD A$.....LE.0|
00000580: 00 91 0D 14 05 81 56 4B B2 31 20 A4 C3 28 41 24 |......VK.1 ..(A$|
00000590: 29 00 A6 0D 1E 05 56 42 B2 C6 28 CA 28 41 24 2C |).....VB..(.(A$,|
000005A0: 56 4B 2C 31 29 29 00 C2 0D 28 05 8B 28 56 42 B1 |VK,1))...(..(VB.|
000005B0: 36 34 29 20 AF 28 56 42 B3 39 31 29 20 A7 31 33 |64) .(VB.91) .13|
000005C0: 35 30 00 E4 0D 32 05 8B 28 56 42 B1 36 34 AA 48 |50...2..(VB.64.H|
000005D0: 4C 29 20 AF 28 56 42 B3 39 31 AA 48 4C 29 20 A7 |L) .(VB.91.HL) .|
000005E0: 31 33 35 30 00 ED 0D 3C 05 4C 45 B2 31 00 F5 0D |1350...<.LE.1...|
000005F0: 46 05 82 56 4B 00 05 0E 50 05 8B 4C 45 B2 30 20 |F..VK...P..LE.0 |
00000600: A7 31 33 39 30 00 36 0E 5A 05 45 45 24 B2 22 57 |.1390.6.Z.EE$."W|
00000610: 4F 4F 52 44 20 42 45 56 41 54 20 4E 49 45 54 20 |OORD BEVAT NIET |
00000620: 41 4C 4C 45 45 4E 20 4D 41 41 52 20 4C 45 54 54 |ALLEEN MAAR LETT|
00000630: 45 52 53 20 21 22 00 46 0E 64 05 8D 32 34 39 30 |ERS !".F.d..2490|
00000640: 3A 89 31 34 30 30 00 5D 0E 6E 05 41 57 B2 41 57 |:.1400.].n.AW.AW|
00000650: AA 31 3A 57 4F 24 28 41 57 29 B2 41 24 00 63 0E |.1:WO$(AW).A$.c.|
00000660: 78 05 8E 00 7A 0E 82 05 8F 20 53 55 42 52 20 53 |x...z.... SUBR S|
00000670: 4E 45 4C 53 4F 52 54 45 45 52 00 84 0E 8C 05 8D |NELSORTEER......|
00000680: 31 35 39 30 00 94 0E 96 05 8B 41 57 B2 31 20 A7 |1590......AW.1 .|
00000690: 31 35 31 30 00 A3 0E A0 05 81 49 B2 31 20 A4 41 |1510......I.1 .A|
000006A0: 57 AB 31 00 B2 0E AA 05 81 4A B2 49 AA 31 20 A4 |W.1......J.I.1 .|
000006B0: 41 57 00 CA 0E B4 05 8B 57 24 28 49 29 B3 B2 57 |AW......W$(I)..W|
000006C0: 24 28 4A 29 20 A7 31 34 39 30 00 EE 0E BE 05 46 |$(J) .1490.....F|
000006D0: 54 24 B2 57 24 28 49 29 3A 57 24 28 49 29 B2 57 |T$.W$(I):W$(I).W|
000006E0: 24 28 4A 29 3A 57 24 28 4A 29 B2 46 54 24 00 12 |$(J):W$(J).FT$..|
000006F0: 0F C8 05 46 54 24 B2 53 24 28 49 29 3A 53 24 28 |...FT$.S$(I):S$(|
00000700: 49 29 B2 53 24 28 4A 29 3A 53 24 28 4A 29 B2 46 |I).S$(J):S$(J).F|
00000710: 54 24 00 19 0F D2 05 82 4A 00 20 0F DC 05 82 49 |T$......J. ....I|
00000720: 00 26 0F E6 05 8E 00 3B 0F F0 05 8F 20 53 55 42 |.&.....;.... SUB|
00000730: 52 20 4F 56 45 52 5A 49 43 48 54 00 55 0F FA 05 |R OVERZICHT.U...|
00000740: 8D 31 30 30 3A 99 22 4F 4E 47 45 53 4F 52 54 45 |.100:."ONGESORTE|
00000750: 45 52 44 22 3B 00 77 0F 04 06 48 4F B2 32 39 3A |ERD";.w...HO.29:|
00000760: 56 45 B2 30 3A 8D 31 31 30 3A 99 22 47 45 53 4F |VE.0:.110:."GESO|
00000770: 52 54 45 45 52 44 22 00 84 0F 0E 06 81 49 B2 31 |RTEERD"......I.1|
00000780: 20 A4 41 57 00 A3 0F 18 06 48 4F B2 30 3A 56 45 | .AW.....HO.0:VE|
00000790: B2 32 AC 49 AA 31 3A 8D 31 31 30 3A 99 57 4F 24 |.2.I.1:.110:.WO$|
000007A0: 28 49 29 00 AA 0F 22 06 82 49 00 B0 0F 2C 06 8E |(I)..."..I...,..|
000007B0: 00 D2 0F 36 06 8F 20 53 55 42 52 20 5A 45 54 20 |...6.. SUBR ZET |
000007C0: 4F 4D 20 49 4E 20 48 4F 4F 46 44 4C 45 54 54 45 |OM IN HOOFDLETTE|
000007D0: 52 53 00 DF 0F 40 06 81 49 B2 31 20 A4 41 57 00 |RS...@..I.1 .AW.|
000007E0: E9 0F 4A 06 41 24 B2 22 22 00 FD 0F 54 06 81 4A |..J.A$.""...T..J|
000007F0: B2 31 20 A4 C3 28 57 4F 24 28 49 29 29 00 14 10 |.1 ..(WO$(I))...|
00000800: 5E 06 42 B2 C6 28 CA 28 57 4F 24 28 49 29 2C 4A |^.B..(.(WO$(I),J|
00000810: 2C 31 29 29 00 26 10 68 06 8B 42 B3 39 36 20 A7 |,1)).&.h..B.96 .|
00000820: 42 B2 42 AA 48 4C 00 35 10 72 06 41 24 B2 41 24 |B.B.HL.5.r.A$.A$|
00000830: AA C7 28 42 29 00 3C 10 7C 06 82 4A 00 49 10 86 |..(B).<.|..J.I..|
00000840: 06 57 24 28 49 29 B2 41 24 00 5A 10 90 06 53 24 |.W$(I).A$.Z...S$|
00000850: 28 49 29 B2 57 4F 24 28 49 29 00 61 10 9A 06 82 |(I).WO$(I).a....|
00000860: 49 00 67 10 A4 06 8E 00 7E 10 AE 06 8F 20 53 55 |I.g.....~.... SU|
00000870: 42 52 4F 55 54 49 4E 45 20 53 48 49 46 54 00 92 |BROUTINE SHIFT..|
00000880: 10 B8 06 81 49 B2 31 20 A4 32 39 3A 48 4F B2 49 |....I.1 .29:HO.I|
00000890: AB 31 00 9F 10 C2 06 81 4A B2 31 20 A4 41 57 00 |.1......J.1 .AW.|
000008A0: B1 10 CC 06 56 45 B2 32 AC 4A AA 31 3A 8D 31 31 |....VE.2.J.1:.11|
000008B0: 30 00 D5 10 D6 06 99 CA 28 57 4F 24 28 4A 29 AA |0.......(WO$(J).|
000008C0: C8 28 4C 45 24 2C 32 39 29 2C 49 2C 31 29 3B 57 |.(LE$,29),I,1);W|
000008D0: 4F 24 28 4A 29 00 DC 10 E0 06 82 4A 00 E3 10 EA |O$(J)......J....|
000008E0: 06 82 49 00 E9 10 F4 06 8E 00 01 11 FE 06 8F 20 |..I............ |
000008F0: 53 55 42 52 20 54 52 41 41 47 53 4F 52 54 45 45 |SUBR TRAAGSORTEE|
00000900: 52 00 0B 11 08 07 8D 31 35 39 30 00 18 11 12 07 |R......1590.....|
00000910: 8B 41 57 B2 31 20 A7 8E 00 27 11 1C 07 81 58 B2 |.AW.1 ...'....X.|
00000920: 31 20 A4 41 57 AB 31 00 2F 11 26 07 42 B2 58 00 |1 .AW.1./.&.B.X.|
00000930: 3E 11 30 07 81 59 B2 58 AA 31 20 A4 41 57 00 54 |>.0..Y.X.1 .AW.T|
00000940: 11 3A 07 8B 57 24 28 42 29 B1 57 24 28 59 29 20 |.:..W$(B).W$(Y) |
00000950: A7 42 B2 59 00 5B 11 44 07 82 59 00 6B 11 4E 07 |.B.Y.[.D..Y.k.N.|
00000960: 8B 42 B1 58 20 A7 8D 31 39 30 30 00 72 11 58 07 |.B.X ..1900.r.X.|
00000970: 82 58 00 78 11 62 07 8E 00 96 11 6C 07 8F 20 53 |.X.x.b.....l.. S|
00000980: 55 42 52 20 56 45 52 57 49 53 53 45 4C 20 20 58 |UBR VERWISSEL X|
00000990: 20 45 4E 20 20 42 00 AC 11 76 07 49 52 B2 32 AC | EN B...v.IR.2.|
000009A0: 58 AA 31 3A 4A 52 B2 32 AC 42 AA 31 00 BF 11 80 |X.1:JR.2.B.1....|
000009B0: 07 4A 43 B2 32 38 AB C3 28 53 24 28 42 29 29 00 |.JC.28..(S$(B)).|
000009C0: D4 11 8A 07 49 43 B2 4A 43 AB C3 28 53 24 28 58 |....IC.JC..(S$(X|
000009D0: 29 29 AB 31 00 E6 11 94 07 8B 58 AA 31 B2 42 20 |)).1......X.1.B |
000009E0: A7 49 43 B2 32 39 00 04 12 9E 07 8F 2D 2D 20 53 |.IC.29......-- S|
000009F0: 43 48 55 49 46 20 53 24 28 42 29 20 45 52 55 49 |CHUIF S$(B) ERUI|
00000A00: 54 20 2D 2D 00 17 12 A8 07 81 48 4F B2 32 39 20 |T --......HO.29 |
00000A10: A4 4A 43 20 A9 AB 31 00 21 12 B2 07 8D 32 33 30 |.JC ..1.!....230|
00000A20: 30 00 3B 12 BC 07 56 45 B2 4A 52 3A 8D 31 31 30 |0.;...VE.JR:.110|
00000A30: 3A 99 53 24 28 42 29 3B 22 20 22 00 43 12 C6 07 |:.S$(B);" ".C...|
00000A40: 82 48 4F 00 61 12 D0 07 8F 2D 2D 20 53 43 48 55 |.HO.a....-- SCHU|
00000A50: 49 46 20 53 24 28 58 29 20 45 52 55 49 54 20 2D |IF S$(X) ERUIT -|
00000A60: 2D 00 72 12 DA 07 8B 49 43 B1 32 38 20 A7 32 30 |-.r....IC.28 .20|
00000A70: 36 30 00 85 12 E4 07 81 48 4F B2 32 39 20 A4 49 |60......HO.29 .I|
00000A80: 43 20 A9 AB 31 00 8F 12 EE 07 8D 32 33 30 30 00 |C ..1......2300.|
00000A90: A9 12 F8 07 56 45 B2 49 52 3A 8D 31 31 30 3A 99 |....VE.IR:.110:.|
00000AA0: 53 24 28 58 29 3B 22 20 22 00 B1 12 02 08 82 48 |S$(X);" "......H|
00000AB0: 4F 00 D3 12 0C 08 8F 20 53 43 48 55 49 46 20 57 |O...... SCHUIF W|
00000AC0: 24 28 42 29 20 4F 50 2C 20 57 24 28 58 29 20 4E |$(B) OP, W$(X) N|
00000AD0: 45 45 52 00 EE 12 16 08 48 4F B2 4A 43 3A 81 53 |EER.....HO.JC:.S|
00000AE0: 4B B2 4A 52 20 A4 49 52 AA 31 20 A9 AB 31 00 F8 |K.JR .IR.1 ..1..|
00000AF0: 12 20 08 8D 32 33 30 30 00 18 13 2A 08 56 45 B2 |. ..2300...*.VE.|
00000B00: 53 4B 3A 8D 31 31 30 3A 99 C8 28 4C 45 24 2C C3 |SK:.110:..(LE$,.|
00000B10: 28 53 24 28 42 29 29 29 00 30 13 34 08 56 45 B2 |(S$(B))).0.4.VE.|
00000B20: 53 4B AB 31 3A 8D 31 31 30 3A 99 53 24 28 42 29 |SK.1:.110:.S$(B)|
00000B30: 00 38 13 3E 08 82 53 4B 00 4F 13 48 08 48 4F B2 |.8.>..SK.O.H.HO.|
00000B40: 49 43 3A 81 53 4B B2 49 52 20 A4 4A 52 AB 31 00 |IC:.SK.IR .JR.1.|
00000B50: 59 13 52 08 8D 32 33 30 30 00 79 13 5C 08 56 45 |Y.R..2300.y.\.VE|
00000B60: B2 53 4B 3A 8D 31 31 30 3A 99 C8 28 4C 45 24 2C |.SK:.110:..(LE$,|
00000B70: C3 28 53 24 28 58 29 29 29 00 95 13 66 08 56 45 |.(S$(X)))...f.VE|
00000B80: B2 53 4B AA 31 3A 8D 31 31 30 3A 99 53 24 28 58 |.SK.1:.110:.S$(X|
00000B90: 29 3A 82 53 4B 00 B0 13 70 08 8F 20 53 43 48 55 |):.SK...p.. SCHU|
00000BA0: 49 46 20 53 54 52 49 4E 47 53 20 54 45 52 55 47 |IF STRINGS TERUG|
00000BB0: 00 BF 13 7A 08 81 48 4F B2 4A 43 20 A4 32 38 00 |...z..HO.JC .28.|
00000BC0: C9 13 84 08 8D 32 33 30 30 00 E3 13 8E 08 56 45 |.....2300.....VE|
00000BD0: B2 49 52 3A 8D 31 31 30 3A 99 22 20 22 3B 53 24 |.IR:.110:." ";S$|
00000BE0: 28 42 29 00 EB 13 98 08 82 48 4F 00 FC 13 A2 08 |(B)......HO.....|
00000BF0: 8B 49 43 B1 32 38 20 A7 32 32 36 30 00 0B 14 AC |.IC.28 .2260....|
00000C00: 08 81 48 4F B2 49 43 20 A4 32 38 00 15 14 B6 08 |..HO.IC .28.....|
00000C10: 8D 32 33 30 30 00 2F 14 C0 08 56 45 B2 4A 52 3A |.2300./...VE.JR:|
00000C20: 8D 31 31 30 3A 99 22 20 22 3B 53 24 28 58 29 00 |.110:." ";S$(X).|
00000C30: 37 14 CA 08 82 48 4F 00 59 14 D4 08 54 24 B2 57 |7....HO.Y...T$.W|
00000C40: 24 28 58 29 3A 57 24 28 58 29 B2 57 24 28 42 29 |$(X):W$(X).W$(B)|
00000C50: 3A 57 24 28 42 29 B2 54 24 00 7B 14 DE 08 54 24 |:W$(B).T$.{...T$|
00000C60: B2 53 24 28 58 29 3A 53 24 28 58 29 B2 53 24 28 |.S$(X):S$(X).S$(|
00000C70: 42 29 3A 53 24 28 42 29 B2 54 24 00 8A 14 E8 08 |B):S$(B).T$.....|
00000C80: 58 58 B2 31 3A 8D 32 35 36 30 00 90 14 F2 08 8E |XX.1:.2560......|
00000C90: 00 A1 14 FC 08 8F 20 53 55 42 52 20 50 41 55 5A |...... SUBR PAUZ|
00000CA0: 45 00 B2 14 06 09 58 58 B2 30 2E 31 3A 8D 32 35 |E.....XX.0.1:.25|
00000CB0: 36 30 00 B8 14 10 09 8E 00 CA 14 1A 09 8F 20 53 |60............ S|
00000CC0: 55 42 52 20 48 45 41 44 45 52 00 E3 14 24 09 8D |UBR HEADER...$..|
00000CD0: 31 30 30 3A 48 4F B2 31 30 3A 56 45 B2 31 3A 8D |100:HO.10:VE.1:.|
00000CE0: 31 31 30 00 FF 14 2E 09 99 22 41 4C 46 41 42 45 |110......"ALFABE|
00000CF0: 54 49 53 43 48 20 53 4F 52 54 45 52 45 4E 22 00 |TISCH SORTEREN".|
00000D00: 13 15 38 09 48 4F B2 31 30 3A 56 45 B2 32 3A 8D |..8.HO.10:VE.2:.|
00000D10: 31 31 30 00 2F 15 42 09 99 22 2D 2D 2D 2D 2D 2D |110./.B.."------|
00000D20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".|
00000D30: 35 15 4C 09 8E 00 4C 15 56 09 8F 20 53 55 42 52 |5.L...L.V.. SUBR|
00000D40: 20 49 4E 53 54 52 55 43 54 49 45 53 00 60 15 60 | INSTRUCTIES.`.`|
00000D50: 09 48 4F B2 30 3A 56 45 B2 31 39 3A 8D 31 31 30 |.HO.0:VE.19:.110|
00000D60: 00 8D 15 6A 09 99 22 44 52 55 4B 20 4F 50 20 52 |...j.."DRUK OP R|
00000D70: 45 54 55 52 4E 20 4E 41 20 45 4C 4B 20 49 4E 47 |ETURN NA ELK ING|
00000D80: 45 56 4F 45 52 44 20 57 4F 4F 52 44 22 00 BD 15 |EVOERD WOORD"...|
00000D90: 74 09 99 3A 99 22 44 52 55 4B 20 57 45 45 52 20 |t..:."DRUK WEER |
00000DA0: 4F 50 20 52 45 54 55 52 4E 20 56 4F 4F 52 20 48 |OP RETURN VOOR H|
00000DB0: 45 54 20 53 4F 52 54 45 52 45 4E 2E 22 00 C3 15 |ET SORTEREN."...|
00000DC0: 7E 09 8E 00 E2 15 88 09 8F 20 53 55 42 52 20 57 |~........ SUBR W|
00000DD0: 49 53 20 4F 4E 44 45 52 53 54 45 20 52 45 47 45 |IS ONDERSTE REGE|
00000DE0: 4C 53 00 F6 15 92 09 48 4F B2 30 3A 81 56 45 B2 |LS.....HO.0:.VE.|
00000DF0: 31 39 20 A4 32 33 00 05 16 9C 09 8D 31 31 30 3A |19 .23......110:|
00000E00: 99 4C 45 24 3B 00 0D 16 A6 09 82 56 45 00 13 16 |.LE$;......VE...|
00000E10: B0 09 8E 00 2E 16 BA 09 8F 20 53 55 42 52 20 46 |......... SUBR F|
00000E20: 4F 55 54 4D 45 4C 44 49 4E 47 20 45 45 24 00 4E |OUTMELDING EE$.N|
00000E30: 16 C4 09 8D 32 34 34 30 3A 8F 20 57 49 53 20 4F |....2440:. WIS O|
00000E40: 4E 44 45 52 53 54 45 20 52 45 47 45 4C 53 00 71 |NDERSTE REGELS.q|
00000E50: 16 CE 09 48 4F B2 31 39 AB C3 28 45 45 24 29 AD |...HO.19..(EE$).|
00000E60: 32 3A 56 45 B2 32 30 3A 8D 31 31 30 3A 99 45 45 |2:VE.20:.110:.EE|
00000E70: 24 00 84 16 D8 09 8D 32 35 39 30 3A 8F 20 53 50 |$......2590:. SP|
00000E80: 41 54 49 45 00 A4 16 E2 09 8D 32 34 34 30 3A 8F |ATIE......2440:.|
00000E90: 20 57 49 53 20 4F 4E 44 45 52 53 54 45 20 52 45 | WIS ONDERSTE RE|
00000EA0: 47 45 4C 53 00 BC 16 EC 09 8D 32 33 39 30 3A 8F |GELS......2390:.|
00000EB0: 20 49 4E 53 54 52 55 43 54 49 45 53 00 C2 16 F6 | INSTRUCTIES....|
00000EC0: 09 8E 00 DF 16 00 0A 8F 20 50 52 4F 43 20 57 41 |........ PROC WA|
00000ED0: 43 48 54 20 58 58 20 53 45 43 4F 4E 44 45 4E 00 |CHT XX SECONDEN.|
00000EE0: F5 16 0A 0A 81 5A 5A B2 31 20 A4 31 30 30 AC 58 |.....ZZ.1 .100.X|
00000EF0: 58 3A 82 5A 5A 00 FB 16 14 0A 8E 00 0D 17 1E 0A |X:.ZZ...........|
00000F00: 8F 20 53 55 42 52 20 53 50 41 54 49 45 00 21 17 |. SUBR SPATIE.!.|
00000F10: 28 0A 48 4F B2 32 3A 56 45 B2 32 33 3A 8D 31 31 |(.HO.2:VE.23:.11|
00000F20: 30 00 52 17 32 0A 99 22 44 52 55 4B 20 4F 50 20 |0.R.2.."DRUK OP |
00000F30: 44 45 20 53 50 41 54 49 45 42 41 4C 4B 20 56 4F |DE SPATIEBALK VO|
00000F40: 4F 52 20 56 45 52 56 4F 4C 47 22 3B 3A 8D 32 37 |OR VERVOLG";:.27|
00000F50: 32 30 00 6B 17 3C 0A 8D 32 31 30 3A 8B 49 4E 24 |20.k.<..210:.IN$|
00000F60: B3 B1 22 20 22 20 A7 32 36 32 30 00 71 17 46 0A |.." " .2620.q.F.|
00000F70: 8E 00 88 17 50 0A 8F 20 53 55 42 52 20 54 49 54 |....P.. SUBR TIT|
00000F80: 45 4C 50 41 47 49 4E 41 00 A1 17 5A 0A 8D 31 30 |ELPAGINA...Z..10|
00000F90: 30 3A 48 4F B2 31 34 3A 56 45 B2 38 3A 8D 31 31 |0:HO.14:VE.8:.11|
00000FA0: 30 00 B4 17 64 0A 99 22 41 4C 46 41 42 45 54 49 |0...d.."ALFABETI|
00000FB0: 53 43 48 22 00 C9 17 6E 0A 48 4F B2 31 36 3A 56 |SCH"...n.HO.16:V|
00000FC0: 45 B2 31 31 3A 8D 31 31 30 00 D9 17 78 0A 99 22 |E.11:.110...x.."|
00000FD0: 53 4F 52 54 45 52 45 4E 22 00 00 18 82 0A 81 48 |SORTEREN"......H|
00000FE0: 4F B2 31 20 A4 31 30 30 30 3A 8D 32 30 30 3A 8B |O.1 .1000:.200:.|
00000FF0: 49 4E 24 B3 B1 22 22 20 A7 48 4F B2 31 30 30 30 |IN$.."" .HO.1000|
00001000: 00 08 18 8C 0A 82 48 4F 00 0E 18 96 0A 8E 00 2A |......HO.......*|
00001010: 18 A0 0A 8F 20 53 55 42 52 20 42 55 46 46 45 52 |.... SUBR BUFFER|
00001020: 20 4C 45 45 47 4D 41 4B 45 4E 00 42 18 AA 0A 8D | LEEGMAKEN.B....|
00001030: 32 30 30 3A 8B 49 4E 24 B3 B1 22 22 20 A7 32 37 |200:.IN$.."" .27|
00001040: 33 30 00 48 18 B4 0A 8E 00 69 18 BE 0A 8F 20 53 |30.H.....i.... S|
00001050: 55 42 52 20 49 4E 56 4F 45 52 20 56 41 4E 20 45 |UBR INVOER VAN E|
00001060: 45 4E 20 53 54 52 49 4E 47 00 73 18 C8 0A 41 24 |EN STRING.s...A$|
00001070: B2 22 22 00 90 18 D2 0A 8D 31 32 30 3A 81 4F 4F |.""......120:.OO|
00001080: B2 31 20 A4 4D 4C 3A 99 22 20 22 3B 3A 82 4F 4F |.1 .ML:." ";:.OO|
00001090: 00 99 18 DC 0A 8D 31 31 30 00 B2 18 E6 0A 8D 32 |......110......2|
000010A0: 37 32 30 3A 8F 20 42 55 46 46 45 52 20 4C 45 47 |720:. BUFFER LEG|
000010B0: 45 4E 00 D2 18 F0 0A 8D 32 31 30 3A 47 42 B2 C6 |EN......210:GB..|
000010C0: 28 49 4E 24 29 3A 8B 47 42 B2 31 33 20 A7 32 39 |(IN$):.GB.13 .29|
000010D0: 31 30 00 F4 18 FA 0A 8B 28 47 42 B2 44 4C 29 20 |10......(GB.DL) |
000010E0: AF 28 41 24 B2 22 22 29 20 A7 8D 32 35 30 3A 89 |.(A$."") ..250:.|
000010F0: 32 37 39 30 00 06 19 04 0B 8B 47 42 B3 B1 44 4C |2790......GB..DL|
00001100: 20 A7 32 38 37 30 00 20 19 0E 0B 8B C3 28 41 24 | .2870. .....(A$|
00001110: 29 B2 31 20 A7 41 24 B2 22 22 3A 89 32 38 35 30 |).1 .A$."":.2850|
00001120: 00 35 19 18 0B 41 24 B2 C8 28 41 24 2C C3 28 41 |.5...A$..(A$,.(A|
00001130: 24 29 AB 31 29 00 56 19 22 0B 8D 31 32 30 3A 48 |$).1).V."..120:H|
00001140: 4F B2 48 4F AB 31 3A 8D 31 31 30 3A 99 22 20 22 |O.HO.1:.110:." "|
00001150: 3B 3A 8D 31 31 30 00 60 19 2C 0B 89 32 37 39 30 |;:.110.`.,..2790|
00001160: 00 7F 19 36 0B 8B 28 C3 28 41 24 29 B2 4D 4C 29 |...6..(.(A$).ML)|
00001170: 20 B0 28 47 42 B3 33 33 29 20 A7 32 39 30 30 00 | .(GB.33) .2900.|
00001180: 9D 19 40 0B 8B 28 47 42 B1 31 32 37 29 20 AF 28 |..@..(GB.127) .(|
00001190: 47 42 B3 31 36 30 29 20 A7 32 39 30 30 00 B7 19 |GB.160) .2900...|
000011A0: 4A 0B 99 49 4E 24 3B 3A 41 24 B2 41 24 AA 49 4E |J..IN$;:A$.A$.IN|
000011B0: 24 3A 89 32 38 30 30 00 C6 19 54 0B 8D 32 35 30 |$:.2800...T..250|
000011C0: 3A 89 32 38 30 30 00 CC 19 5E 0B 8E 00 E1 19 68 |:.2800...^.....h|
000011D0: 0B 8F 20 53 55 42 52 20 4A 41 20 4F 46 20 4E 45 |.. SUBR JA OF NE|
000011E0: 45 00 F0 19 72 0B 4D 4C B2 33 3A 8D 32 37 35 30 |E...r.ML.3:.2750|
000011F0: 00 00 1A 7C 0B 4F 42 24 B2 C8 28 41 24 2C 31 29 |...|.OB$..(A$,1)|
00001200: 00 09 1A 86 0B 59 B2 AB 31 00 28 1A 90 0B 8B 28 |.....Y..1.(....(|
00001210: 4F 42 24 B2 22 4A 22 29 20 B0 28 4F 42 24 B2 22 |OB$."J") .(OB$."|
00001220: 4A 22 29 20 A7 59 B2 31 00 47 1A 9A 0B 8B 28 4F |J") .Y.1.G....(O|
00001230: 42 24 B2 22 4E 22 29 20 B0 28 4F 42 24 B2 22 4E |B$."N") .(OB$."N|
00001240: 22 29 20 A7 59 B2 30 00 4D 1A A4 0B 8E 00 62 1A |") .Y.0.M.....b.|
00001250: AE 0B 8F 20 49 4E 49 54 49 41 4C 49 53 45 52 49 |... INITIALISERI|
00001260: 4E 47 00 7D 1A B8 0B 86 57 4F 24 28 31 30 29 2C |NG.}....WO$(10),|
00001270: 57 24 28 31 30 29 2C 53 24 28 31 30 29 00 AF 1A |W$(10),S$(10)...|
00001280: C2 0B 4C 45 24 B2 22 20 20 20 20 20 20 20 20 20 |..LE$." |
00001290: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
000012B0: D2 1A CC 0B 48 4C B2 C6 28 22 41 22 29 AB C6 28 |....HL..("A")..(|
000012C0: 22 41 22 29 3A 8B 48 4C B3 30 20 A7 48 4C B2 AB |"A"):.HL.0 .HL..|
000012D0: 48 4C 00 DB 1A D6 0B 8D 31 30 30 00 EB 1A E0 0B |HL......100.....|
000012E0: 8D 32 36 34 30 3A 8D 32 33 33 30 00 FE 1A EA 0B |.2640:.2330.....|
000012F0: 48 4F B2 30 3A 56 45 B2 37 3A 8D 31 31 30 00 24 |HO.0:VE.7:.110.$|
00001300: 1B F4 0B 99 22 54 49 4B 20 48 4F 4F 47 53 54 45 |...."TIK HOOGSTE|
00001310: 4E 53 20 54 49 45 4E 20 57 4F 4F 52 44 45 4E 20 |NS TIEN WOORDEN |
00001320: 49 4E 2C 22 00 4B 1B FE 0B 99 22 45 4C 4B 20 4D |IN,".K...."ELK M|
00001330: 45 54 20 4D 41 58 49 4D 41 41 4C 20 4E 45 47 45 |ET MAXIMAAL NEGE|
00001340: 4E 20 4C 45 54 54 45 52 53 2E 22 00 7B 1B 08 0C |N LETTERS.".{...|
00001350: 99 3A 99 22 48 45 54 20 4D 41 41 4B 54 20 4E 49 |.:."HET MAAKT NI|
00001360: 45 54 20 55 49 54 20 4F 46 20 48 45 54 20 48 4F |ET UIT OF HET HO|
00001370: 4F 46 44 4C 45 54 54 45 52 53 22 00 9A 1B 12 0C |OFDLETTERS".....|
00001380: 99 22 4F 46 20 4B 4C 45 49 4E 45 20 4C 45 54 54 |."OF KLEINE LETT|
00001390: 45 52 53 20 5A 49 4A 4E 2E 22 00 C9 1B 1C 0C 99 |ERS ZIJN."......|
000013A0: 3A 99 22 4E 41 44 41 54 20 55 20 44 45 20 57 4F |:."NADAT U DE WO|
000013B0: 4F 52 44 45 4E 20 48 45 42 54 20 49 4E 47 45 54 |ORDEN HEBT INGET|
000013C0: 49 4B 54 2C 20 5A 41 4C 22 00 E9 1B 26 0C 99 22 |IKT, ZAL"...&.."|
000013D0: 44 45 20 43 4F 4D 50 55 54 45 52 20 5A 45 20 53 |DE COMPUTER ZE S|
000013E0: 4F 52 54 45 52 45 4E 2E 22 00 18 1C 30 0C 99 3A |ORTEREN."...0..:|
000013F0: 99 22 54 49 4B 20 4E 55 20 48 45 54 20 4B 41 52 |."TIK NU HET KAR|
00001400: 41 4B 54 45 52 20 49 4E 20 57 41 54 20 55 20 47 |AKTER IN WAT U G|
00001410: 45 42 52 55 49 4B 54 22 00 40 1C 3A 0C 99 22 4F |EBRUIKT".@.:.."O|
00001420: 4D 20 45 45 4E 20 4B 41 52 41 4B 54 45 52 20 54 |M EEN KARAKTER T|
00001430: 45 20 57 49 53 53 45 4E 3A 22 3B 3A 8D 32 31 30 |E WISSEN:";:.210|
00001440: 00 4E 1C 44 0C 44 4C B2 C6 28 49 4E 24 29 00 58 |.N.D.DL..(IN$).X|
00001450: 1C 4E 0C 8D 32 35 39 30 00 68 1C 58 0C 8D 32 33 |.N..2590.h.X..23|
00001460: 33 30 3A 8D 32 33 39 30 00 72 1C 62 0C 89 31 30 |30:.2390.r.b..10|
00001470: 32 30 00 93 1C 30 75 8F 22 41 4C 50 48 41 42 45 |20...0u."ALPHABE|
00001480: 54 49 53 43 48 20 53 4F 52 54 45 52 45 4E 20 20 |TISCH SORTEREN |
00001490: 20 20 22 00 AB 1C 3A 75 8F 20 45 45 4E 20 50 52 | "...:u. EEN PR|
000014A0: 4F 47 52 41 4D 4D 41 20 56 41 4E 00 CC 1C 44 75 |OGRAMMA VAN...Du|
000014B0: 8F 22 20 20 20 20 41 4E 44 52 45 57 20 43 48 41 |." ANDREW CHA|
000014C0: 50 4D 41 4E 20 20 20 20 20 20 20 22 00 DE 1C 4E |PMAN "...N|
000014D0: 75 8F 20 20 20 20 20 20 20 20 20 20 20 26 00 FF |u. &..|
000014E0: 1C 58 75 8F 22 20 20 20 4A 45 52 52 59 20 54 45 |.Xu." JERRY TE|
000014F0: 4D 50 4C 45 2D 46 52 59 20 20 20 20 20 20 22 00 |MPLE-FRY ".|
00001500: 1B 1D 62 75 8F 20 20 20 28 4E 45 54 48 45 52 48 |..bu. (NETHERH|
00001510: 41 4C 4C 20 53 43 48 4F 4F 4C 29 00 2D 1D 6C 75 |ALL SCHOOL).-.lu|
00001520: 8F 20 20 20 20 20 20 20 20 20 20 20 26 00 4E 1D |. &.N.|
00001530: 76 75 8F 22 20 20 20 52 49 43 48 41 52 44 20 47 |vu." RICHARD G|
00001540: 20 57 41 52 4E 45 52 20 20 20 20 20 20 22 00 6E | WARNER ".n|
00001550: 1D 80 75 8F 20 4F 4F 52 53 50 52 4F 4E 4B 45 4C |..u. OORSPRONKEL|
00001560: 49 4A 4B 20 47 45 53 43 48 52 45 56 45 4E 00 83 |IJK GESCHREVEN..|
00001570: 1D 8A 75 8F 20 20 20 20 20 20 20 20 56 4F 4F 52 |..u. VOOR|
00001580: 20 44 45 00 A4 1D 94 75 8F 22 42 42 43 20 4D 4F | DE....u."BBC MO|
00001590: 44 45 4C 20 41 20 4D 49 43 52 4F 43 4F 4D 50 55 |DEL A MICROCOMPU|
000015A0: 54 45 52 22 00 B8 1D 9E 75 8F 20 56 45 52 54 41 |TER"....u. VERTA|
000015B0: 41 4C 44 20 4E 41 41 52 00 D0 1D A8 75 8F 20 27 |ALD NAAR....u. '|
000015C0: 45 45 4E 56 4F 55 44 49 47 27 20 42 41 53 49 43 |EENVOUDIG' BASIC|
000015D0: 00 EF 1D B2 75 8F 20 45 4E 20 47 45 53 43 48 49 |....u. EN GESCHI|
000015E0: 4B 54 20 47 45 4D 41 41 4B 54 20 56 4F 4F 52 00 |KT GEMAAKT VOOR.|
000015F0: 10 1E BC 75 8F 22 42 41 53 49 43 4F 44 45 2D 32 |...u."BASICODE-2|
00001600: 20 20 20 20 20 20 44 4F 4F 52 3A 20 20 20 20 22 | DOOR: "|
00001610: 00 31 1E C6 75 8F 22 20 20 20 20 20 20 20 4A 2E |.1..u." J.|
00001620: 20 48 41 55 42 52 49 43 48 20 20 20 20 20 20 20 | HAUBRICH |
00001630: 22 00 46 1E D0 75 8F 20 20 44 45 43 45 4D 42 45 |".F..u. DECEMBE|
00001640: 52 20 31 39 38 32 00 00 00 |R 1982... |
.......1000......1010.!.D..".";:..Q.N..H
(".........................",.(.(VE.1)))
;.A.P....(HO));:....X.HO.B(209).256.B(21
0).1024.B(211)...Y.VE..(HO.40):HO.HO.40.
VE:....H..IN$:..D.R..IN$:.IN$."".210.J..
........54296,15:.54278,255:.54273,95:.5
4276,17......OO.1.200:.OO.*....54276,0:.
54277,0:.54278,0:..8...RV..(1):..F...FR.
.(0):..O.,.SR$.D(SR):.H(SR$,1)." ".SR$.J
(SR$,2).U.-.....6.SR$."":.SR..10.(CT.CN.
.(CN)).318...7..SR...5.10..CN.SR$."-"...
8.SR$.SR$.J(D(.(.(SR)..5.10..CN)),2)...9
..C(SR$).CT.CN.(CN..0).SR$." ".SR$:.313.
!.:..CN.0..(SR)..1E10.316.U.;.SR$.SR$.J(
D(1..(SR)..(.(SR))..5.10..CN),3,CN.1).U.
<..C(SR$).CT.SR$.SR$." ":.316...=..C(SR$
).CT.SR$.""...>..C(SR$).CT.SR$.SR$."*":.
318...?...G.^..4,4:.4,SR$;: 4:..X.H..4,4
:.4: 4:......A.1000:.20:. ALPHA-SORT....
..2990:. INITIALISATIE.(...AW.0:. AANTAL
WOORDEN.;...HO.0:VE.4.2.AW.K....AW.5 .1
060._...HO.19:VE.2.AW.6.H.$..110.....SR.
AW.1:CT.2:CN.0:.310...8..SR$;" ";:ML.9:.
2750:.A$."" .1140...B..1280:.AW.10 .1030
.J.L..2440...V.HO.0:VE.23:.110...`.."MET
<RETURN> START HET SORTEREN... ";.&.J.
.210:.F(IN$)..13 .1130.6.T..AW.0 .3030.L
.~..1520:. OVERZICHT.D....1410:. SNELSOR
TEER.W...HO.29:.I.1 .AW.....VE.2.I.1:.11
0:.S$(I):.I.....HO.0:VE.23:.110.Y...."WI
LT U DAT NU WAT LANGZAMER ZIEN ? ";:.292
0......Y.0 .1270...D..Y.0 .1190...N..152
0:. OVERZICHT.$.X..1710:. OPSCHUIVEN.=..
..1790:. TRAAGSORTEER.P....2590:. SPATIE
.V.....W.... SUBR CONTROLEER WOORD A$.
....LE.0......VK.1 .C(A$).....VB.F(J(A$,
VK,1)).B.(..(VB.64) .(VB.91) .1350...2..
(VB.64.HL) .(VB.91.HL) .1350...<.LE.1...
F..VK...P..LE.0 .1390.6.Z.EE$."WOORD BEV
AT NIET ALLEEN MAAR LETTERS !".F.D..2490
:.1400.].N.AW.AW.1:WO$(AW).A$.C.X...Z...
. SUBR SNELSORTEER......1590......AW.1 .
1510... ..I.1 .AW.1......J.I.1 .AW.J....
W$(I)..W$(J) .1490.....FT$.W$(I):W$(I).W
$(J):W$(J).FT$...H.FT$.S$(I):S$(I).S$(J)
:S$(J).FT$...R..J. ....I.&.....;.... SUB
R OVERZICHT.U....100:."ONGESORTEERD";.W.
..HO.29:VE.0:.110:."GESORTEERD"......I.1
.AW.....HO.0:VE.2.I.1:.110:.WO$(I)...".
.I...,...R.6.. SUBR ZET OM IN HOOFDLETTE
RS...@..I.1 .AW...J.A$.""...T..J.1 .C(WO
$(I))...^.B.F(J(WO$(I),J,1)).&.H..B.96 .
B.B.HL.5.R.A$.A$.G(B).<.|..J.I...W$(I).A
$.Z...S$(I).WO$(I).A....I.G.....~.... SU
BROUTINE SHIFT......I.1 .29:HO.I.1...B..
J.1 .AW...L.VE.2.J.1:.110.U.V..J(WO$(J).
H(LE$,29),I,1);WO$(J)......J......I.....
....... SUBR TRAAGSORTEER......1590.....
.AW.1 ...'....X.1 .AW.1./.&.B.X.>.0..Y.X
.1 .AW.T.:..W$(B).W$(Y) .B.Y.[.D..Y.K.N.
.B.X ..1900.R.X..X.X.B.....L.. SUBR VERW
ISSEL X EN B...V.IR.2.X.1:JR.2.B.1....
.JC.28.C(S$(B)).T...IC.JC.C(S$(X)).1....
..X.1.B .IC.29......-- SCHUIF S$(B) ERUI
T --......HO.29 .JC ..1.!....2300.;...VE
.JR:.110:.S$(B);" ".C.F..HO.A.P..-- SCHU
IF S$(X) ERUIT --.R.Z..IC.28 .2060......
HO.29 .IC ..1......2300.....VE.IR:.110:.
S$(X);" "......HO.S.... SCHUIF W$(B) OP,
W$(X) NEER.....HO.JC:.SK.JR .IR.1 ..1..
. ..2300...*.VE.SK:.110:.H(LE$,C(S$(B)))
.0.4.VE.SK.1:.110:.S$(B).8.>..SK.O.H.HO.
IC:.SK.IR .JR.1.Y.R..2300.Y.\.VE.SK:.110
:.H(LE$,C(S$(X)))...F.VE.SK.1:.110:.S$(X
):.SK...P.. SCHUIF STRINGS TERUG...Z..HO
.JC .28.I....2300.....VE.IR:.110:." ";S$
(B)......HO......IC.28 .2260......HO.IC
.28......2300./...VE.JR:.110:." ";S$(X).
7.J..HO.Y.T.T$.W$(X):W$(X).W$(B):W$(B).T
$.{...T$.S$(X):S$(X).S$(B):S$(B).T$.....
XX.1:.2560............ SUBR PAUZE.....XX
.0.1:.2560.......J.... SUBR HEADER...$..
100:HO.10:VE.1:.110......"ALFABETISCH SO
RTEREN"...8.HO.10:VE.2:.110./.B.."------
--------------".5.L...L.V.. SUBR INSTRUC
TIES.`.`.HO.0:VE.19:.110...J.."DRUK OP R
ETURN NA ELK INGEVOERD WOORD"...T..:."DR
UK WEER OP RETURN VOOR HET SORTEREN.".C.
~........ SUBR WIS ONDERSTE REGELS.....H
O.0:.VE.19 .23......110:.LE$;......VE...
......... SUBR FOUTMELDING EE$.N.D..2440
:. WIS ONDERSTE REGELS.Q.N.HO.19.C(EE$).
2:VE.20:.110:.EE$...X..2590:. SPATIE....
..2440:. WIS ONDERSTE REGELS......2390:.
INSTRUCTIES.B.......... PROC WACHT XX S
ECONDEN......ZZ.1 .100.XX:.ZZ...........
. SUBR SPATIE.!.(.HO.2:VE.23:.110.R.2.."
DRUK OP DE SPATIEBALK VOOR VERVOLG";:.27
20.K.<..210:.IN$.." " .2620.Q.F.....P..
SUBR TITELPAGINA...Z..100:HO.14:VE.8:.11
0...D.."ALFABETISCH".I.N.HO.16:VE.11:.11
0.Y.X.."SORTEREN"......HO.1 .1000:.200:.
IN$.."" .HO.1000......HO.......*. .. SUB
R BUFFER LEEGMAKEN.B....200:.IN$.."" .27
30.H.....I.... SUBR INVOER VAN EEN STRIN
G.S.H.A$.""...R..120:.OO.1 .ML:." ";:.OO
......110......2720:. BUFFER LEGEN.R....
210:GB.F(IN$):.GB.13 .2910......(GB.DL)
.(A$."") ..250:.2790......GB..DL .2870.
....C(A$).1 .A$."":.2850.5...A$.H(A$,C(A
$).1).V."..120:HO.HO.1:.110:." ";:.110.`
.,..2790..6..(C(A$).ML) .(GB.33) .2900.
..@..(GB.127) .(GB.160) .2900...J..IN$;:
A$.A$.IN$:.2800.F.T..250:.2800.L.^.....H
.. SUBR JA OF NEE...R.ML.3:.2750...|.OB$
.H(A$,1).....Y..1.(....(OB$."J") .(OB$."
J") .Y.1.G....(OB$."N") .(OB$."N") .Y.0.
M.....B.... INITIALISERING.}....WO$(10),
W$(10),S$(10)...B.LE$."
".R.L.HL.F("A").F(
"A"):.HL.0 .HL..HL...V..100......2640:.2
330.....HO.0:VE.7:.110.$...."TIK HOOGSTE
NS TIEN WOORDEN IN,".K...."ELK MET MAXIM
AAL NEGEN LETTERS.".{....:."HET MAAKT NI
ET UIT OF HET HOOFDLETTERS"......"OF KLE
INE LETTERS ZIJN.".I....:."NADAT U DE WO
ORDEN HEBT INGETIKT, ZAL"...&.."DE COMPU
TER ZE SORTEREN."...0..:."TIK NU HET KAR
AKTER IN WAT U GEBRUIKT".@.:.."OM EEN KA
RAKTER TE WISSEN:";:.210.N.D.DL.F(IN$).X
.N..2590.H.X..2330:.2390.R.B..1020...0U.
"ALPHABETISCH SORTEREN "...:U. EEN PR
OGRAMMA VAN.L.DU." ANDREW CHAPMAN
"...NU. &...XU." JERRY TE
MPLE-FRY "...BU. (NETHERHALL SCHO
OL).-.LU. &.N.VU." RICHARD G
WARNER ".N..U. OORSPRONKELIJK GESC
HREVEN....U. VOOR DE....U."BBC MO
DEL A MICROCOMPUTER"....U. VERTAALD NAAR
.P..U. 'EENVOUDIG' BASIC....U. EN GESCHI
KT GEMAAKT VOOR....U."BASICODE-2 DO
OR: ".1.FU." J. HAUBRICH
".F.PU. DECEMBER 1982...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL