SORTEREN SEQ.F.
FILE INFORMATION
FILENAME(S): SORTEREN SEQ.F.
FILE TYPE(S): DEL
FILE SIZE: 4.5K
FIRST SEEN: 2025-11-30 21:06:42
APPEARS ON: 1 disk(s)
FILE HASH
9fb361f084e6ee17f3ef4dc7996254972e5270cc778a43a2e7b9cb187fc6da19
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HULP PROG 2A | SORTEREN SEQ.F. | DEL | DuncanTwain | 22 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 28 08 0A 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..(....*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 14 00 8F 2A 20 |********.O....* | 00000030: 53 4F 52 54 45 52 45 4E 20 56 41 4E 20 53 45 51 |SORTEREN VAN SEQ| 00000040: 55 45 4E 54 49 45 4C 45 20 46 49 4C 45 53 2A 00 |UENTIELE FILES*.| 00000050: 76 08 1E 00 8F 2A 20 20 20 20 20 4D 45 54 20 27 |v....* MET '| 00000060: 4C 49 47 48 54 4E 49 4E 47 20 53 4F 52 54 27 20 |LIGHTNING SORT' | 00000070: 20 20 3A 3A 20 2A 00 9D 08 28 00 8F 2A 20 20 20 | :: *...(..* | 00000080: 28 55 49 54 3A 43 4F 4D 50 55 54 45 21 20 39 2F |(UIT:COMPUTE! 9/| 00000090: 38 34 20 50 31 31 39 29 20 20 20 2A 2A 00 C4 08 |84 P119) **...| 000000A0: 32 00 8F 2A 20 20 20 48 2E 47 2E 56 41 4E 20 4D |2..* H.G.VAN M| 000000B0: 41 4E 45 4E 20 36 2F 38 37 2C 31 30 2F 38 39 20 |ANEN 6/87,10/89 | 000000C0: 20 20 2A 2A 00 EB 08 3C 00 8F 2A 2A 2A 2A 2A 2A | **...<..******| 000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FB 08 41 00 |***********...A.| 000000F0: 8F 20 49 4E 4C 45 49 44 49 4E 47 00 08 09 46 00 |. INLEIDING...F.| 00000100: 8B 41 B1 30 A7 34 30 30 00 3C 09 50 00 99 C7 28 |.A.0.400.<.P...(| 00000110: 31 34 29 22 93 11 20 CD 45 54 20 44 49 54 20 50 |14)".. .ET DIT P| 00000120: 52 47 20 4B 41 4E 20 45 45 4E 20 53 45 51 2E 46 |RG KAN EEN SEQ.F| 00000130: 49 4C 45 20 57 4F 52 44 45 4E 3A 22 00 5A 09 5A |ILE WORDEN:".Z.Z| 00000140: 00 99 22 11 20 31 29 20 47 45 4C 45 5A 45 4E 20 |..". 1) GELEZEN | 00000150: 56 41 4E 20 53 43 48 49 4A 46 00 79 09 64 00 99 |VAN SCHIJF.y.d..| 00000160: 22 20 32 29 20 5A 45 45 52 20 53 4E 45 4C 20 47 |" 2) ZEER SNEL G| 00000170: 45 53 4F 52 54 45 45 52 44 00 8B 09 6E 00 99 22 |ESORTEERD...n.."| 00000180: 20 33 29 20 47 45 54 4F 4F 4E 44 00 A0 09 78 00 | 3) GETOOND...x.| 00000190: 99 22 20 34 29 20 55 49 54 47 45 50 52 49 4E 54 |." 4) UITGEPRINT| 000001A0: 00 B2 09 82 00 99 22 20 35 29 20 47 45 53 41 56 |......" 5) GESAV| 000001B0: 45 44 00 E1 09 8C 00 99 22 11 20 CE C9 C5 D4 20 |ED......". .... | 000001C0: 49 53 20 4F 50 47 45 4E 4F 4D 45 4E 20 2E 45 45 |IS OPGENOMEN .EE| 000001D0: 4E 20 C9 CE D6 CF C5 D2 2D 52 4F 55 54 49 4E 45 |N ......-ROUTINE| 000001E0: 22 00 0F 0A 96 00 99 22 20 20 20 20 20 20 20 20 |"......" | 000001F0: 20 20 20 20 20 20 20 20 20 20 20 2E 45 45 4E 20 | .EEN | 00000200: D7 C9 CA DA C9 C7 2D 52 4F 55 54 49 4E 45 22 00 |......-ROUTINE".| 00000210: 3C 0A A0 00 99 22 11 20 C7 45 42 52 55 49 4B 20 |<....". .EBRUIK | 00000220: 48 49 45 52 56 4F 4F 52 20 48 45 54 20 50 52 47 |HIERVOOR HET PRG| 00000230: 20 CC C9 D3 D4 A0 CD C1 CB C5 D2 2E 00 6D 0A AA | ............m..| 00000240: 00 99 22 20 CE 41 44 45 45 4C 20 44 41 41 52 20 |.." .ADEEL DAAR | 00000250: 49 53 20 45 43 48 54 45 52 20 44 45 20 50 52 49 |IS ECHTER DE PRI| 00000260: 4E 54 2D 52 4F 55 54 49 4E 45 3A 22 3B 00 95 0A |NT-ROUTINE:";...| 00000270: B4 00 99 22 20 49 4E 20 54 57 45 45 20 4F 46 20 |..." IN TWEE OF | 00000280: 44 52 49 45 20 4B 4F 4C 4F 4D 4D 45 4E 20 56 4F |DRIE KOLOMMEN VO| 00000290: 4C 47 45 4E 53 00 BA 0A BE 00 99 22 20 31 20 20 |LGENS......" 1 | 000002A0: 20 20 20 20 20 20 20 20 20 20 32 20 20 20 20 20 | 2 | 000002B0: 20 20 20 20 20 20 20 20 33 22 00 DF 0A C8 00 99 | 3"......| 000002C0: 22 20 34 20 20 20 20 20 20 20 20 20 20 20 20 35 |" 4 5| 000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 36 22 00 | 6".| 000002E0: EC 0A D2 00 99 22 20 45 54 43 2E 22 00 FE 0A DC |....." ETC."....| 000002F0: 00 99 22 11 11 11 11 22 3A 8D 31 37 32 30 00 04 |.."....":.1720..| 00000300: 0B E6 00 3A 00 1F 0B 2C 01 8F 20 4C 41 44 45 4E |...:...,.. LADEN| 00000310: 20 4C 49 47 48 54 4E 49 4E 47 20 53 4F 52 54 00 | LIGHTNING SORT.| 00000320: 4E 0B 36 01 99 22 93 11 11 11 11 11 20 CC 49 47 |N.6.."...... .IG| 00000330: 48 54 4E 49 4E 47 20 53 4F 52 54 20 57 4F 52 44 |HTNING SORT WORD| 00000340: 54 20 4E 55 20 47 45 4C 41 44 45 4E 2E 22 00 73 |T NU GELADEN.".s| 00000350: 0B 40 01 41 B2 41 AA 31 3A 8B 41 B2 31 A7 93 22 |.@.A.A.1:.A.1.."| 00000360: 4C 49 47 48 54 4E 49 4E 47 20 53 4F 52 54 22 2C |LIGHTNING SORT",| 00000370: 38 2C 31 00 79 0B 4A 01 3A 00 94 0B 90 01 8F 20 |8,1.y.J.:...... | 00000380: 42 45 47 49 4E 20 45 49 47 45 4E 4C 49 4A 4B 45 |BEGIN EIGENLIJKE| 00000390: 20 50 52 47 00 A1 0B 9A 01 97 35 33 32 38 31 2C | PRG......53281,| 000003A0: 30 00 D3 0B A4 01 4C 24 B2 22 20 20 20 20 20 20 |0.....L$." | 000003B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003D0: 20 20 22 00 11 0C AE 01 99 C7 28 31 35 38 29 22 | ".......(158)"| 000003E0: 93 11 11 20 20 20 20 20 D3 CF D2 D4 C5 D2 C5 CE |... ........| 000003F0: 20 56 41 4E 20 D3 C5 D1 D5 C5 CE D4 C9 C1 CC A0 | VAN ...........| 00000400: C6 C9 CC C5 D3 A0 A0 A0 A0 A0 22 C7 28 31 35 34 |..........".(154| 00000410: 29 00 31 0C B8 01 99 22 11 11 11 20 20 20 20 20 |).1...."... | 00000420: 20 20 20 20 31 29 20 46 49 4C 45 20 4C 45 5A 45 | 1) FILE LEZE| 00000430: 4E 00 4D 0C C2 01 99 22 11 20 20 20 20 20 20 20 |N.M....". | 00000440: 20 20 32 29 20 53 4F 52 54 45 52 45 4E 00 6B 0C | 2) SORTEREN.k.| 00000450: CC 01 99 22 11 20 20 20 20 20 20 20 20 20 33 29 |...". 3)| 00000460: 20 46 49 4C 45 20 54 4F 4E 45 4E 00 89 0C D6 01 | FILE TONEN.....| 00000470: 99 22 11 20 20 20 20 20 20 20 20 20 34 29 20 55 |.". 4) U| 00000480: 49 54 50 52 49 4E 54 45 4E 00 A2 0C E0 01 99 22 |ITPRINTEN......"| 00000490: 11 20 20 20 20 20 20 20 20 20 35 29 20 53 41 56 |. 5) SAV| 000004A0: 45 4E 00 BB 0C E5 01 99 22 11 20 20 20 20 20 20 |EN......". | 000004B0: 20 20 20 36 29 20 45 49 4E 44 45 00 DF 0C EA 01 | 6) EINDE.....| 000004C0: 99 22 11 11 20 20 20 20 20 20 20 20 20 CD 41 41 |.".. .AA| 000004D0: 4B 20 45 45 4E 20 4B 45 55 5A 45 20 31 2D 36 00 |K EEN KEUZE 1-6.| 000004E0: F2 0C F4 01 A1 41 24 3A 8B 41 24 B2 22 22 A7 35 |.....A$:.A$."".5| 000004F0: 30 30 00 0C 0D FE 01 8B 41 24 B2 22 31 22 A7 97 |00......A$."1"..| 00000500: 35 33 32 38 31 2C 36 3A 89 36 30 30 00 26 0D 08 |53281,6:.600.&..| 00000510: 02 8B 41 24 B2 22 32 22 A7 97 35 33 32 38 31 2C |..A$."2"..53281,| 00000520: 36 3A 89 37 39 30 00 40 0D 12 02 8B 41 24 B2 22 |6:.790.@....A$."| 00000530: 33 22 A7 97 35 33 32 38 31 2C 36 3A 89 39 36 30 |3"..53281,6:.960| 00000540: 00 5B 0D 1C 02 8B 41 24 B2 22 34 22 A7 97 35 33 |.[....A$."4"..53| 00000550: 32 38 31 2C 36 3A 89 31 30 36 30 00 76 0D 26 02 |281,6:.1060.v.&.| 00000560: 8B 41 24 B2 22 35 22 A7 97 35 33 32 38 31 2C 36 |.A$."5"..53281,6| 00000570: 3A 89 31 36 30 30 00 94 0D 2B 02 8B 41 24 B2 22 |:.1600...+..A$."| 00000580: 36 22 A7 A0 31 35 3A 9E 36 35 35 31 31 3A 9E 36 |6"..15:.65511:.6| 00000590: 34 37 33 38 00 9D 0D 30 02 89 35 30 30 00 A3 0D |4738...0..500...| 000005A0: 3A 02 3A 00 B4 0D 58 02 8F 20 46 49 4C 45 20 4C |:.:...X.. FILE L| 000005B0: 45 5A 45 4E 00 BA 0D 62 02 9C 00 CB 0D 64 02 A0 |EZEN...b.....d..| 000005C0: 31 35 3A 9F 31 35 2C 38 2C 31 35 00 E2 0D 67 02 |15:.15,8,15...g.| 000005D0: 99 22 93 11 20 12 46 49 4C 45 20 4C 45 5A 45 4E |.".. .FILE LEZEN| 000005E0: 92 22 00 27 0E 6C 02 99 22 11 11 20 C1 4C 53 20 |.".'.l..".. .LS | 000005F0: 45 52 20 3E 35 30 30 20 49 54 45 4D 53 20 5A 49 |ER >500 ITEMS ZI| 00000600: 4A 4E 20 44 41 4E 20 44 45 20 C4 C9 CD 20 49 4E |JN DAN DE ... IN| 00000610: 20 20 20 20 52 45 47 45 4C 20 37 31 30 20 57 49 | REGEL 710 WI| 00000620: 4A 5A 49 47 45 4E 21 00 57 0E 76 02 99 22 11 11 |JZIGEN!.W.v.."..| 00000630: 20 D7 49 4C 54 20 55 20 45 45 52 53 54 20 5A 49 | .ILT U EERST ZI| 00000640: 45 4E 20 57 45 4C 4B 45 20 53 45 51 2E 46 49 4C |EN WELKE SEQ.FIL| 00000650: 45 53 20 4F 50 20 22 00 72 0E 80 02 99 22 20 44 |ES OP ".r...." D| 00000660: 45 5A 45 20 53 43 48 49 4A 46 20 53 54 41 41 4E |EZE SCHIJF STAAN| 00000670: 3F 22 00 85 0E 8A 02 99 22 20 D4 49 4B 20 49 4E |?"......" .IK IN| 00000680: 20 4A 2F 4E 22 00 98 0E 94 02 A1 5A 24 3A 8B 5A | J/N"......Z$:.Z| 00000690: 24 B2 22 22 A7 36 36 30 00 A9 0E 9E 02 8B 5A 24 |$."".660......Z$| 000006A0: B2 22 4A 22 A7 32 30 30 30 00 B9 0E A8 02 8B 5A |."J".2000......Z| 000006B0: 24 B2 22 4E 22 A7 37 30 30 00 C2 0E B2 02 89 36 |$."N".700......6| 000006C0: 36 30 00 F6 0E BC 02 85 22 11 11 20 D7 41 54 20 |60......".. .AT | 000006D0: 49 53 20 44 45 20 4E 41 41 4D 20 56 41 4E 20 44 |IS DE NAAM VAN D| 000006E0: 45 20 54 45 20 4C 45 5A 45 4E 20 53 45 51 46 49 |E TE LEZEN SEQFI| 000006F0: 4C 45 22 3B 4E 24 00 03 0F C6 02 86 41 24 28 35 |LE";N$......A$(5| 00000700: 30 30 29 00 1F 0F D0 02 A0 38 3A 9F 38 2C 38 2C |00)......8:.8,8,| 00000710: 38 2C 4E 24 AA 22 2C 53 2C 52 22 3A 49 B2 30 00 |8,N$.",S,R":I.0.| 00000720: 40 0F DA 02 84 31 35 2C 4E 4F 2C 46 4F 24 2C 53 |@....15,NO,FO$,S| 00000730: 50 2C 53 45 3A 8B 4E 4F B3 B1 30 A7 31 37 36 30 |P,SE:.NO..0.1760| 00000740: 00 5C 0F E4 02 49 B2 49 AA 31 3A 84 38 2C 41 24 |.\...I.I.1:.8,A$| 00000750: 28 49 29 3A 99 49 3B 41 24 28 49 29 00 6C 0F EE |(I):.I;A$(I).l..| 00000760: 02 8B 53 54 B3 B1 36 34 A7 37 34 30 00 73 0F F8 |..ST..64.740.s..| 00000770: 02 A0 38 00 7D 0F 02 03 8D 31 37 32 30 00 86 0F |..8.}....1720...| 00000780: 0C 03 89 34 30 30 00 8C 0F 16 03 3A 00 9B 0F 84 |...400.....:....| 00000790: 03 8F 20 53 4F 52 54 45 52 45 4E 00 B0 0F 89 03 |.. SORTEREN.....| 000007A0: 99 22 93 11 20 12 53 4F 52 54 45 52 45 4E 92 22 |.".. .SORTEREN."| 000007B0: 00 C4 0F 8E 03 8B 41 24 28 31 29 B2 22 22 A7 89 |......A$(1).""..| 000007C0: 31 38 39 30 00 DE 0F 98 03 99 22 11 11 11 11 20 |1890......".... | 000007D0: C5 56 45 4E 20 47 45 44 55 4C 44 2E 11 22 00 F1 |.VEN GEDULD.."..| 000007E0: 0F A2 03 9E 34 39 31 35 32 2C 49 2C 41 24 28 31 |....49152,I,A$(1| 000007F0: 29 00 FB 0F AC 03 8D 31 37 30 30 00 04 10 B6 03 |)......1700.....| 00000800: 89 34 30 30 00 0A 10 C0 03 3A 00 22 10 E8 03 8F |.400.....:."....| 00000810: 20 54 4F 4E 45 4E 20 56 41 4E 20 44 45 20 46 49 | TONEN VAN DE FI| 00000820: 4C 45 00 3A 10 ED 03 99 22 93 11 20 12 46 49 4C |LE.:....".. .FIL| 00000830: 45 20 54 4F 4E 45 4E 92 11 22 00 4E 10 F2 03 8B |E TONEN..".N....| 00000840: 41 24 28 31 29 B2 22 22 A7 89 31 38 39 30 00 64 |A$(1).""..1890.d| 00000850: 10 06 04 81 4A B2 31 A4 49 3A 99 4A 2C 41 24 28 |....J.1.I:.J,A$(| 00000860: 4A 29 3A 82 00 6E 10 10 04 8D 31 37 30 30 00 77 |J):..n....1700.w| 00000870: 10 1A 04 89 34 30 30 00 7D 10 24 04 3A 00 8E 10 |....400.}.$.:...| 00000880: 4C 04 8F 20 55 49 54 50 52 49 4E 54 45 4E 00 A6 |L.. UITPRINTEN..| 00000890: 10 56 04 99 22 93 11 20 12 55 49 54 50 52 49 4E |.V..".. .UITPRIN| 000008A0: 54 45 4E 92 11 22 00 BA 10 60 04 8B 41 24 28 31 |TEN.."...`..A$(1| 000008B0: 29 B2 22 22 A7 89 31 38 39 30 00 DC 10 6A 04 99 |).""..1890...j..| 000008C0: 22 11 20 2D D3 54 41 41 54 20 44 45 20 50 52 49 |". -.TAAT DE PRI| 000008D0: 4E 54 45 52 20 4B 4C 41 41 52 3F 22 00 23 11 74 |NTER KLAAR?".#.t| 000008E0: 04 99 22 20 2D D0 4C 41 41 54 53 20 50 52 49 4E |.." -.LAATS PRIN| 000008F0: 54 45 52 4B 4F 50 20 41 41 4E 20 42 4F 56 45 4E |TERKOP AAN BOVEN| 00000900: 52 41 4E 44 20 50 41 50 49 45 52 20 20 C4 52 55 |RAND PAPIER .RU| 00000910: 4B 20 44 41 4E 20 4F 50 20 45 45 4E 20 54 4F 45 |K DAN OP EEN TOE| 00000920: 54 53 2E 00 37 11 7E 04 A1 41 24 3A 8B 41 24 B2 |TS..7.~..A$:.A$.| 00000930: 22 22 A7 31 31 35 30 00 65 11 88 04 99 22 11 20 |"".1150.e....". | 00000940: 2D C8 4F 4F 46 44 4C 45 54 54 45 52 53 20 4F 46 |-.OOFDLETTERS OF| 00000950: 20 4F 4F 4B 20 4B 4C 45 49 4E 45 20 4C 45 54 54 | OOK KLEINE LETT| 00000960: 45 52 53 3F 22 00 7D 11 92 04 99 22 20 20 D4 49 |ERS?".}...." .I| 00000970: 4B 20 49 4E 3A 20 48 20 4F 46 20 4B 22 00 91 11 |K IN: H OF K"...| 00000980: 9C 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 31 38 |...A$:.A$."".118| 00000990: 30 00 A7 11 A6 04 8B 41 24 B2 22 48 22 A7 48 B2 |0......A$."H".H.| 000009A0: 31 3A 89 31 32 33 32 00 BD 11 B0 04 8B 41 24 B2 |1:.1232......A$.| 000009B0: 22 4B 22 A7 48 B2 30 3A 89 31 32 33 32 00 C7 11 |"K".H.0:.1232...| 000009C0: BA 04 89 31 31 38 30 00 01 12 D0 04 99 22 11 20 |...1180......". | 000009D0: 2D D7 49 4C 54 20 55 20 45 45 4E 20 54 49 54 45 |-.ILT U EEN TITE| 000009E0: 4C 3F 20 28 4D 41 58 2E 33 38 20 4B 41 52 2E 29 |L? (MAX.38 KAR.)| 000009F0: 22 3A 99 22 20 20 D4 49 4B 20 49 4E 20 4A 2F 4E |":." .IK IN J/N| 00000A00: 22 00 15 12 D1 04 A1 41 24 3A 8B 41 24 B2 22 22 |"......A$:.A$.""| 00000A10: A7 31 32 33 33 00 26 12 D2 04 8B 41 24 B2 22 4A |.1233.&....A$."J| 00000A20: 22 A7 31 32 33 37 00 41 12 D3 04 8B 41 24 B2 22 |".1237.A....A$."| 00000A30: 4E 22 A7 41 24 28 30 29 B2 22 22 3A 89 31 32 34 |N".A$(0)."":.124| 00000A40: 30 00 4B 12 D4 04 89 31 32 33 33 00 61 12 D5 04 |0.K....1233.a...| 00000A50: 99 22 20 20 D7 45 4C 4B 45 20 54 49 54 45 4C 3F |." .ELKE TITEL?| 00000A60: 22 00 7F 12 D6 04 97 31 39 2C 31 3A 85 22 20 20 |"......19,1:." | 00000A70: 22 3B 41 24 28 30 29 3A 97 31 39 2C 30 3A 99 00 |";A$(0):.19,0:..| 00000A80: AE 12 D8 04 99 22 11 20 2D D7 49 4C 54 20 55 20 |.....". -.ILT U | 00000A90: 49 4E 20 31 20 4F 46 20 32 20 4B 4F 4C 4F 4D 4D |IN 1 OF 2 KOLOMM| 00000AA0: 45 4E 20 41 46 44 52 55 4B 4B 45 4E 3F 22 00 C5 |EN AFDRUKKEN?"..| 00000AB0: 12 E2 04 99 22 20 20 D4 49 4B 20 49 4E 20 31 20 |...." .IK IN 1 | 00000AC0: 4F 46 20 32 22 00 D9 12 EC 04 A1 41 24 3A 8B 41 |OF 2"......A$:.A| 00000AD0: 24 B2 22 22 A7 31 32 36 30 00 EA 12 F6 04 8B 41 |$."".1260......A| 00000AE0: 24 B2 22 31 22 A7 31 33 30 30 00 FB 12 00 05 8B |$."1".1300......| 00000AF0: 41 24 B2 22 32 22 A7 31 33 35 30 00 05 13 0A 05 |A$."2".1350.....| 00000B00: 89 31 32 36 30 00 0F 13 14 05 8D 31 39 31 30 00 |.1260......1910.| 00000B10: 1A 13 1E 05 81 4B B2 31 A4 49 00 29 13 28 05 98 |.....K.1.I.).(..| 00000B20: 34 2C 4B 3B 41 24 28 4B 29 00 47 13 32 05 8B 4B |4,K;A$(K).G.2..K| 00000B30: AD 36 34 B2 B5 28 4B AD 36 34 29 A7 81 41 B2 31 |.64..(K.64)..A.1| 00000B40: A4 37 3A 98 34 3A 82 00 53 13 3C 05 82 3A 89 31 |.7:.4:..S.<..:.1| 00000B50: 35 38 30 00 5D 13 46 05 8D 31 39 31 30 00 6E 13 |580.].F..1910.n.| 00000B60: 50 05 49 49 B2 B5 28 49 AD 32 AA 2E 35 29 00 84 |P.II..(I.2..5)..| 00000B70: 13 5A 05 50 B2 B5 28 49 AD 28 32 AC 36 34 29 29 |.Z.P..(I.(2.64))| 00000B80: 3A 51 B2 31 00 92 13 64 05 8B 50 B3 31 A7 31 35 |:Q.1...d..P.1.15| 00000B90: 30 30 00 9D 13 6E 05 81 52 B2 31 A4 50 00 AB 13 |00...n..R.1.P...| 00000BA0: 78 05 81 4B B2 51 A4 51 AA 36 33 00 BB 13 82 05 |x..K.Q.Q.63.....| 00000BB0: 98 34 2C 4B 3B 41 24 28 4B 29 3B 00 C7 13 8C 05 |.4,K;A$(K);.....| 00000BC0: 4B 24 B2 C4 28 4B 29 00 E9 13 96 05 98 34 2C C8 |K$..(K)......4,.| 00000BD0: 28 4C 24 2C 33 36 AB 28 C3 28 41 24 28 4B 29 29 |(L$,36.(.(A$(K))| 00000BE0: AA C3 28 4B 24 29 29 29 3B 00 FE 13 A0 05 98 34 |..(K$)));......4| 00000BF0: 2C 36 34 AA 4B 3B 41 24 28 36 34 AA 4B 29 00 05 |,64.K;A$(64.K)..| 00000C00: 14 AA 05 82 4B 00 15 14 B4 05 81 41 B2 31 A4 37 |....K......A.1.7| 00000C10: 3A 98 34 3A 82 00 24 14 BE 05 51 B2 51 AA 31 32 |:.4:..$...Q.Q.12| 00000C20: 38 3A 82 52 00 38 14 C8 05 8B 49 AB 50 AC 31 32 |8:.R.8....I.P.12| 00000C30: 38 B2 30 A7 31 35 38 30 00 57 14 D2 05 49 49 B2 |8.0.1580.W...II.| 00000C40: 50 AC 31 32 38 AA B5 28 28 49 AB 50 AC 31 32 38 |P.128..((I.P.128| 00000C50: 29 AD 32 AA 2E 35 29 00 64 14 DC 05 4F B2 49 49 |).2..5).d...O.II| 00000C60: AB 51 AA 31 00 70 14 E6 05 81 4B B2 51 A4 49 49 |.Q.1.p....K.Q.II| 00000C70: 00 80 14 F0 05 98 34 2C 4B 3B 41 24 28 4B 29 3B |......4,K;A$(K);| 00000C80: 00 9C 14 FA 05 8B 4B B2 49 49 A7 8B 49 AD 32 B3 |......K.II..I.2.| 00000C90: B1 B5 28 49 AD 32 29 A7 31 35 37 30 00 A8 14 04 |..(I.2).1570....| 00000CA0: 06 4B 24 B2 C4 28 4B 29 00 CA 14 0E 06 98 34 2C |.K$..(K)......4,| 00000CB0: C8 28 4C 24 2C 33 36 AB 28 C3 28 41 24 28 4B 29 |.(L$,36.(.(A$(K)| 00000CC0: 29 AA C3 28 4B 24 29 29 29 3B 00 DD 14 18 06 98 |)..(K$)));......| 00000CD0: 34 2C 4B AA 4F 3B 41 24 28 4B AA 4F 29 00 E3 14 |4,K.O;A$(K.O)...| 00000CE0: 22 06 82 00 EA 14 2C 06 A0 34 00 F3 14 36 06 89 |".....,..4...6..| 00000CF0: 34 30 30 00 F9 14 3B 06 3A 00 05 15 40 06 8F 20 |400...;.:...@.. | 00000D00: 53 41 56 45 4E 00 17 15 4A 06 99 22 93 11 20 12 |SAVEN...J..".. .| 00000D10: 53 41 56 45 4E 92 22 00 2B 15 54 06 8B 41 24 28 |SAVEN.".+.T..A$(| 00000D20: 31 29 B2 22 22 A7 89 31 38 39 30 00 5E 15 5E 06 |1).""..1890.^.^.| 00000D30: 85 22 11 20 D7 41 54 20 49 53 20 44 45 20 4E 41 |.". .AT IS DE NA| 00000D40: 41 4D 20 56 41 4E 20 44 45 20 54 45 20 53 41 56 |AM VAN DE TE SAV| 00000D50: 45 4E 20 53 45 51 46 49 4C 45 22 3B 4E 24 00 77 |EN SEQFILE";N$.w| 00000D60: 15 68 06 A0 38 3A 9F 38 2C 38 2C 38 2C 4E 24 AA |.h..8:.8,8,8,N$.| 00000D70: 22 2C 53 2C 57 2C 22 00 98 15 72 06 84 31 35 2C |",S,W,"...r..15,| 00000D80: 4E 4F 2C 46 4F 24 2C 53 50 2C 53 45 3A 8B 4E 4F |NO,FO$,SP,SE:.NO| 00000D90: B3 B1 30 A7 31 37 37 30 00 AE 15 7C 06 81 4F B2 |..0.1770...|..O.| 00000DA0: 31 A4 49 3A 98 38 2C 41 24 28 4F 29 3A 82 00 B5 |1.I:.8,A$(O):...| 00000DB0: 15 86 06 A0 38 00 BF 15 90 06 8D 31 37 31 30 00 |....8......1710.| 00000DC0: C8 15 9A 06 89 34 30 30 00 CE 15 9F 06 3A 00 E1 |.....400.....:..| 00000DD0: 15 A4 06 8F 20 53 55 42 2D 52 4F 55 54 49 4E 45 |.... SUB-ROUTINE| 00000DE0: 53 00 FE 15 AE 06 99 22 20 22 C7 28 31 38 29 22 |S......" ".(18)"| 00000DF0: CB 4C 41 41 52 21 22 C7 28 31 34 36 29 3B 00 33 |.LAAR!".(146);.3| 00000E00: 16 B8 06 99 22 20 22 C7 28 31 38 29 22 C4 52 55 |...." ".(18)".RU| 00000E10: 4B 20 4F 50 20 45 45 4E 20 54 4F 45 54 53 20 56 |K OP EEN TOETS V| 00000E20: 4F 4F 52 20 56 45 52 56 4F 4C 47 2E 22 C7 28 31 |OOR VERVOLG.".(1| 00000E30: 34 36 29 00 45 16 C2 06 97 31 39 38 2C 30 3A 92 |46).E....198,0:.| 00000E40: 31 39 38 2C 31 00 4B 16 CC 06 8E 00 51 16 D6 06 |198,1.K.....Q...| 00000E50: 3A 00 6C 16 E0 06 8F 20 46 4F 55 54 4B 41 4E 41 |:.l.... FOUTKANA| 00000E60: 41 4C 20 41 46 44 52 55 4B 4B 45 4E 00 81 16 EA |AL AFDRUKKEN....| 00000E70: 06 99 22 11 22 4E 4F 3B 46 4F 24 3B 53 50 3B 53 |.."."NO;FO$;SP;S| 00000E80: 45 00 92 16 F4 06 8B 4E 4F B2 36 33 A7 8D 31 38 |E......NO.63..18| 00000E90: 31 30 00 A6 16 FE 06 99 22 11 22 3A 8D 31 37 32 |10......".":.172| 00000EA0: 30 3A 89 34 30 30 00 AC 16 08 07 3A 00 DA 16 12 |0:.400.....:....| 00000EB0: 07 99 22 11 11 20 D7 49 4C 54 20 55 20 5A 49 45 |..".. .ILT U ZIE| 00000EC0: 4E 20 57 45 4C 4B 45 20 53 45 51 2E 46 49 4C 45 |N WELKE SEQ.FILE| 00000ED0: 53 20 4F 50 20 44 45 5A 45 22 00 F0 16 1C 07 99 |S OP DEZE"......| 00000EE0: 22 20 53 43 48 49 4A 46 20 53 54 41 41 4E 3F 22 |" SCHIJF STAAN?"| 00000EF0: 00 04 17 26 07 99 22 11 20 D4 49 4B 20 49 4E 20 |...&..". .IK IN | 00000F00: 4A 2F 4E 22 00 18 17 30 07 A1 5A 24 3A 8B 5A 24 |J/N"...0..Z$:.Z$| 00000F10: B2 22 22 A7 31 38 34 30 00 29 17 3A 07 8B 5A 24 |."".1840.).:..Z$| 00000F20: B2 22 4A 22 A7 32 30 30 30 00 37 17 44 07 8B 5A |."J".2000.7.D..Z| 00000F30: 24 B2 22 4E 22 A7 8E 00 41 17 4E 07 89 31 38 34 |$."N"...A.N..184| 00000F40: 30 00 47 17 58 07 3A 00 7E 17 62 07 99 22 11 11 |0.G.X.:.~.b.."..| 00000F50: 11 11 11 20 C5 52 20 49 53 20 47 45 45 4E 20 42 |... .R IS GEEN B| 00000F60: 45 53 54 41 4E 44 20 41 41 4E 57 45 5A 49 47 21 |ESTAND AANWEZIG!| 00000F70: 22 3A 99 3A 8D 31 37 32 30 3A 89 34 30 30 00 84 |":.:.1720:.400..| 00000F80: 17 6C 07 3A 00 9B 17 76 07 8F 20 55 49 54 50 52 |.l.:...v.. UITPR| 00000F90: 49 4E 54 45 4E 20 54 49 54 45 4C 00 A9 17 80 07 |INTEN TITEL.....| 00000FA0: A0 34 3A 9F 34 2C 34 2C 37 00 B0 17 8A 07 98 34 |.4:.4,4,7......4| 00000FB0: 00 D0 17 94 07 98 34 2C 22 20 20 20 20 22 C7 28 |......4," ".(| 00000FC0: 31 34 29 41 24 28 30 29 C7 28 31 35 29 3A 98 34 |14)A$(0).(15):.4| 00000FD0: 00 E1 17 9E 07 8B 48 B2 31 A7 A0 34 3A 9F 34 2C |......H.1..4:.4,| 00000FE0: 34 00 E7 17 A8 07 8E 00 ED 17 B2 07 3A 00 0B 18 |4...........:...| 00000FF0: D0 07 8F 20 53 45 51 2E 46 49 4C 45 53 20 4C 45 |... SEQ.FILES LE| 00001000: 5A 45 4E 20 55 49 54 20 44 49 52 00 27 18 DA 07 |ZEN UIT DIR.'...| 00001010: 99 22 11 20 12 53 45 51 2E 46 49 4C 45 53 20 49 |.". .SEQ.FILES I| 00001020: 4E 20 44 49 52 92 22 00 39 18 E4 07 A0 32 3A 9F |N DIR.".9....2:.| 00001030: 32 2C 38 2C 32 2C 22 23 22 00 4A 18 EE 07 54 B2 |2,8,2,"#".J...T.| 00001040: 31 38 3A 53 B2 31 3A 4E B2 30 00 5F 18 F8 07 98 |18:S.1:N.0._....| 00001050: 31 35 2C 22 55 31 22 3B 32 3B 30 3B 54 3B 53 00 |15,"U1";2;0;T;S.| 00001060: 71 18 02 08 98 31 35 2C 22 42 2D 50 22 3B 32 2C |q....15,"B-P";2,| 00001070: 30 00 8B 18 0C 08 A1 23 32 2C 58 24 3A 8B 58 24 |0......#2,X$:.X$| 00001080: B2 22 22 A7 58 24 B2 C7 28 30 29 00 97 18 16 08 |."".X$..(0).....| 00001090: 54 B2 C6 28 58 24 29 00 B1 18 20 08 A1 23 32 2C |T..(X$)... ..#2,| 000010A0: 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 C7 28 30 |X$:.X$."".X$..(0| 000010B0: 29 00 BD 18 2A 08 53 B2 C6 28 58 24 29 00 C8 18 |)...*.S..(X$)...| 000010C0: 34 08 81 58 B2 31 A4 38 00 DF 18 3E 08 98 31 35 |4..X.1.8...>..15| 000010D0: 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 32 AA 32 00 |,"B-P";2;X.32.2.| 000010E0: F9 18 48 08 A1 23 32 2C 58 24 3A 8B 58 24 B2 22 |..H..#2,X$:.X$."| 000010F0: 22 A7 58 24 B2 C7 28 30 29 00 06 19 52 08 54 59 |".X$..(0)...R.TY| 00001100: B2 C6 28 58 24 29 00 1C 19 5C 08 8B 28 54 59 AF |..(X$)...\..(TY.| 00001110: 31 35 29 B3 B1 31 20 A7 32 32 35 30 00 33 19 66 |15)..1 .2250.3.f| 00001120: 08 98 31 35 2C 22 42 2D 50 22 3B 32 3B 58 AC 33 |..15,"B-P";2;X.3| 00001130: 32 AA 35 00 3E 19 70 08 46 46 24 B2 22 22 00 4A |2.5.>.p.FF$."".J| 00001140: 19 7A 08 81 59 B2 31 A4 31 36 00 64 19 84 08 A1 |.z..Y.1.16.d....| 00001150: 23 32 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 B2 |#2,X$:.X$."".X$.| 00001160: C7 28 30 29 00 78 19 8E 08 8B C6 28 58 24 29 B2 |.(0).x.....(X$).| 00001170: 31 36 30 A7 32 32 32 30 00 87 19 98 08 46 46 24 |160.2220.....FF$| 00001180: B2 46 46 24 AA 58 24 00 8E 19 A2 08 82 59 00 98 |.FF$.X$......Y..| 00001190: 19 AC 08 4E B2 4E AA 31 00 B3 19 B6 08 8B 41 B2 |...N.N.1......A.| 000011A0: 30 A7 41 B2 31 3A 99 4E 3B 46 46 24 3B 3A 89 32 |0.A.1:.N;FF$;:.2| 000011B0: 32 35 30 00 C7 19 C0 08 41 B2 30 3A 99 A3 32 30 |250.....A.0:..20| 000011C0: 29 3B 4E 3B 46 46 24 00 CE 19 CA 08 82 58 00 DD |);N;FF$......X..| 000011D0: 19 D4 08 8B 54 B3 B1 30 A7 32 30 34 30 00 E4 19 |....T..0.2040...| 000011E0: DE 08 A0 32 00 F6 19 E8 08 99 22 20 12 20 45 49 |...2......" . EI| 000011F0: 4E 44 45 20 92 22 00 03 1A F2 08 8B 4E 4F B2 36 |NDE ."......NO.6| 00001200: 33 A7 8E 00 22 1A FC 08 99 22 11 11 11 20 12 46 |3..."...."... .F| 00001210: 49 4C 45 20 4C 45 5A 45 4E 92 91 91 22 3A 89 37 |ILE LEZEN...":.7| 00001220: 30 30 00 00 00 |00... |
..(....*********************************
.O....* SORTEREN VAN SEQUENTIELE FILES*.
V....* MET 'LIGHTNING SORT' :: *..
.(..* (UIT:COMPUTE! 9/84 P119) **.D.
2..* H.G.VAN MANEN 6/87,10/89 **...<
..*********************************...A.
. INLEIDING...F..A.0.400.<.P..G(14)".. M
ET DIT PRG KAN EEN SEQ.FILE WORDEN:".Z.Z
..". 1) GELEZEN VAN SCHIJF.Y.D.." 2) ZEE
R SNEL GESORTEERD...N.." 3) GETOOND. .X.
." 4) UITGEPRINT......" 5) GESAVED......
". NIET IS OPGENOMEN .EEN INVOER-ROUTINE
"......" .EEN WIJZIG-R
OUTINE".<. ..". GEBRUIK HIERVOOR HET PRG
LIST MAKER..M...." NADEEL DAAR IS ECHTE
R DE PRINT-ROUTINE:";......" IN TWEE OF
DRIE KOLOMMEN VOLGENS......" 1
2 3"...H.." 4 5
6"...R.." ETC."......"...."
:.1720.....:...,.. LADEN LIGHTNING SORT.
N.6.."...... LIGHTNING SORT WORDT NU GEL
ADEN.".S.@.A.A.1:.A.1.."LIGHTNING SORT",
8,1.Y.J.:...... BEGIN EIGENLIJKE PRG....
..53281,0.S...L$."
"......G(158)"...
SORTEREN VAN SEQUENTIAL FILES "G(154
).1...."... 1) FILE LEZEN.M.B.."
. 2) SORTEREN.K.L..". 3)
FILE TONEN...V..". 4) UITPRINTE
N......". 5) SAVEN......".
6) EINDE......".. MAAK EEN KE
UZE 1-6......A$:.A$."".500......A$."1"..
53281,6:.600.&....A$."2"..53281,6:.790.@
....A$."3"..53281,6:.960.[....A$."4"..53
281,6:.1060.V.&..A$."5"..53281,6:.1600..
.+..A$."6". 15:.65511:.64738...0..500...
:.:...X.. FILE LEZEN...B...K.D. 15:.15,8
,15...G..".. .FILE LEZEN.".'.L..".. ALS
ER >500 ITEMS ZIJN DAN DE DIM IN REGE
L 710 WIJZIGEN!.W.V..".. WILT U EERST ZI
EN WELKE SEQ.FILES OP ".R...." DEZE SCHI
JF STAAN?"......" TIK IN J/N"......Z$:.Z
$."".660......Z$."J".2000......Z$."N".70
0.B....660......".. WAT IS DE NAAM VAN D
E TE LEZEN SEQFILE";N$...F..A$(500)...P.
8:.8,8,8,N$.",S,R":I.0.@.Z..15,NO,FO$,S
P,SE:.NO..0.1760.\...I.I.1:.8,A$(I):.I;A
$(I).L....ST..64.740.S... 8.}....1720...
...400.....:...... SORTEREN......".. .SO
RTEREN.".D....A$(1).""..1890......"....
EVEN GEDULD.."......49152,I,A$(1)......1
700......400.....:.".... TONEN VAN DE FI
LE.:....".. .FILE TONEN..".N....A$(1).""
..1890.D....J.1.I:.J,A$(J):..N....1700.W
....400.}.$.:...L.. UITPRINTEN...V.."..
.UITPRINTEN.."...`..A$(1).""..1890...J..
". -STAAT DE PRINTER KLAAR?".#.T.." -PLA
ATS PRINTERKOP AAN BOVENRAND PAPIER DRU
K DAN OP EEN TOETS..7.~..A$:.A$."".1150.
E....". -HOOFDLETTERS OF OOK KLEINE LETT
ERS?".}...." TIK IN: H OF K"......A$:.A
$."".1180......A$."H".H.1:.1232......A$.
"K".H.0:.1232.G....1180...P..". -WILT U
EEN TITEL? (MAX.38 KAR.)":." TIK IN J/N
"...Q..A$:.A$."".1233.&.R..A$."J".1237.A
.S..A$."N".A$(0)."":.1240.K.T..1233.A.U.
." WELKE TITEL?"..V..19,1:." ";A$(0):
.19,0:....X..". -WILT U IN 1 OF 2 KOLOMM
EN AFDRUKKEN?".E...." TIK IN 1 OF 2".Y.
...A$:.A$."".1260......A$."1".1300......
A$."2".1350......1260......1910......K.1
.I.).(..4,K;A$(K).G.2..K.64..(K.64)..A.1
.7:.4:..S.<..:.1580.].F..1910.N.P.II..(I
.2..5)...Z.P..(I.(2.64)):Q.1...D..P.1.15
00...N..R.1.P...X..K.Q.Q.63......4,K;A$(
K);.G...K$.D(K)......4,H(L$,36.(C(A$(K))
.C(K$)));... ..4,64.K;A$(64.K)......K...
...A.1.7:.4:..$...Q.Q.128:.R.8.H..I.P.12
8.0.1580.W.R.II.P.128..((I.P.128).2..5).
D...O.II.Q.1.P....K.Q.II......4,K;A$(K);
......K.II..I.2...(I.2).1570.....K$.D(K)
.J....4,H(L$,36.(C(A$(K)).C(K$)));......
4,K.O;A$(K.O)...".....,. 4...6..400...;.
:...@.. SAVEN...J..".. .SAVEN.".+.T..A$(
1).""..1890.^.^..". WAT IS DE NAAM VAN D
E TE SAVEN SEQFILE";N$.W.H. 8:.8,8,8,N$.
",S,W,"...R..15,NO,FO$,SP,SE:.NO..0.1770
...|..O.1.I:.8,A$(O):...... 8......1710.
H....400.N...:...... SUB-ROUTINES......"
"G(18)"KLAAR!"G(146);.3...." "G(18)"DRU
K OP EEN TOETS VOOR VERVOLG."G(146).E.B.
.198,0:.198,1.K.L...Q.V.:.L.... FOUTKANA
AL AFDRUKKEN......"."NO;FO$;SP;SE......N
O.63..1810......".":.1720:.400.....:.Z..
..".. WILT U ZIEN WELKE SEQ.FILES OP DEZ
E"......" SCHIJF STAAN?"...&..". TIK IN
J/N"...0..Z$:.Z$."".1840.).:..Z$."J".200
0.7.D..Z$."N"...A.N..1840.G.X.:.~.B.."..
... ER IS GEEN BESTAND AANWEZIG!":.:.172
0:.400...L.:...V.. UITPRINTEN TITEL.....
4:.4,4,7......4.P....4," "G(14)A$(0)
G(15):.4......H.1. 4:.4,4...........:...
P.. SEQ.FILES LEZEN UIT DIR.'.Z..". .SEQ
.FILES IN DIR.".9... 2:.2,8,2,"#".J...T.
18:S.1:N.0._....15,"U1";2;0;T;S.Q....15,
"B-P";2,0......#2,X$:.X$."".X$.G(0).....
T.F(X$)... ..#2,X$:.X$."".X$.G(0)...*.S.
F(X$).H.4..X.1.8...>..15,"B-P";2;X.32.2.
..H..#2,X$:.X$."".X$.G(0)...R.TY.F(X$)..
.\..(TY.15)..1 .2250.3.F..15,"B-P";2;X.3
2.5.>.P.FF$."".J.Z..Y.1.16.D....#2,X$:.X
$."".X$.G(0).X....F(X$).160.2220.....FF$
.FF$.X$......Y.....N.N.1......A.0.A.1:.N
;FF$;:.2250.G...A.0:..20);N;FF$.N.J..X..
.T..T..0.2040..... 2......" . EINDE ."..
....NO.63..."...."... .FILE LEZEN...":.7
00...
> CLICK IMAGE PREVIEW FOR FULL MODAL