_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

SUPERSORT INFO

FILE INFORMATION

FILENAME(S): SUPERSORT INFO

FILE TYPE(S): SEQ

FILE SIZE: 10.9K

FIRST SEEN: 2025-11-30 21:12:23

APPEARS ON: 4 disk(s)

FILE HASH

3faac223917b54aaca8782dd35522ab846e4041638639f272483899e4df45abd

FOUND ON DISKS (4 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
LISTINGS SUPERSORT INFO SEQ DuncanTwain 15 1 DOWNLOAD FILE
LISTINGS SUPERSORT INFO SEQ DuncanTwain 15 1 DOWNLOAD FILE
DISK 192 A SUPERSORT INFO SEQ DuncanTwain 7 4 DOWNLOAD FILE
0050B SUPERSORT INFO SEQ DuncanTwain 7 4 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 80 2A 4E 42 22 53 55 50  45 52 53 4F 52 54 20 49  |.*NB"SUPERSORT I|
00000010: 4E 46 4F 22 0D 0D C4 CF  CF D2 20 CE C9 C3 CB 20  |NFO"...... .... |
00000020: C4 C5 CE 20 C2 CF C5 D2  2C 0D 20 20 20 20 20 C6  |... ....,.     .|
00000030: C1 C9 D3 C1 CE D4 C5 CE  D3 D4 D2 C1 C1 D4 20 34  |.............. 4|
00000040: 36 2C 0D 20 20 20 20 20  31 32 31 31 D0 D7 20 C8  |6,.     1211.. .|
00000050: C9 CC D6 C5 D2 D3 D5 CD  2C 0D 20 20 20 20 20 54  |........,.     T|
00000060: 45 4C 2E 20 30 33 35 2D  34 31 31 33 35 0D 0D 0D  |EL. 035-41135...|
00000070: 0D 0D C8 45 54 20 53 4F  52 54 45 52 45 4E 20 56  |...ET SORTEREN V|
00000080: 41 4E 20 45 45 4E 20 41  52 52 41 59 20 4D 45 54  |AN EEN ARRAY MET|
00000090: 20 42 49 4A 56 4F 4F 52  42 45 45 4C 44 20 4E 41  | BIJVOORBEELD NA|
000000A0: 4D 45 4E 20 44 55 55 52  54 20 49 4E 20 C2 C1 D3  |MEN DUURT IN ...|
000000B0: C9 C3 20 41 4C 20 47 41  55 57 20 45 45 4E 20 55  |.. AL GAUW EEN U|
000000C0: 55 52 20 4F 46 20 4C 41  4E 47 45 52 20 41 46 48  |UR OF LANGER AFH|
000000D0: 41 4E 4B 45 4C 49 4A 4B  20 56 41 4E 20 44 45 20  |ANKELIJK VAN DE |
000000E0: 47 52 4F 4F 54 54 45 2E  0D C4 49 54 20 4B 4F 4D  |GROOTTE...IT KOM|
000000F0: 54 20 56 4F 4F 52 4E 41  4D 45 4C 49 4A 4B 20 44  |T VOORNAMELIJK D|
00000100: 4F 4F 52 44 41 54 20 C2  C1 D3 C9 C3 20 47 45 45  |OORDAT ..... GEE|
00000110: 4E 20 53 4E 45 4C 4C 45  20 54 41 41 4C 20 49 53  |N SNELLE TAAL IS|
00000120: 20 45 4E 20 44 4F 4F 52  20 C7 C1 D2 C2 C1 C7 C5  | EN DOOR .......|
00000130: 20 C3 CF CC CC C5 C3 D4  C9 CF CE 2E 0D C9 45 44  | .............ED|
00000140: 45 52 45 20 4B 45 45 52  20 41 4C 53 20 41 41 4E  |ERE KEER ALS AAN|
00000150: 20 45 45 4E 20 53 54 52  49 4E 47 56 41 52 49 41  | EEN STRINGVARIA|
00000160: 42 45 4C 45 20 45 45 4E  20 4E 49 45 55 57 45 20  |BELE EEN NIEUWE |
00000170: 49 4E 48 4F 55 44 20 57  4F 52 44 20 54 4F 45 47  |INHOUD WORD TOEG|
00000180: 45 4B 45 4E 44 2C 20 4B  52 49 4A 47 54 20 44 45  |EKEND, KRIJGT DE|
00000190: 5A 45 20 53 54 52 49 4E  47 20 45 45 4E 20 4E 49  |ZE STRING EEN NI|
000001A0: 45 55 57 45 20 50 4C 41  41 54 53 20 49 4E 20 48  |EUWE PLAATS IN H|
000001B0: 45 54 20 4E 4F 47 20 56  52 49 4A 45 20 47 45 48  |ET NOG VRIJE GEH|
000001C0: 45 55 47 45 4E 2E 20 C8  49 45 52 44 4F 4F 52 20  |EUGEN. .IERDOOR |
000001D0: 4F 4E 54 53 54 41 41 54  20 4F 4E 42 45 4E 55 54  |ONTSTAAT ONBENUT|
000001E0: 54 45 20 52 55 49 4D 54  45 20 57 41 41 52 20 44  |TE RUIMTE WAAR D|
000001F0: 45 20 56 4F 52 49 47 45  20 49 4E 48 4F 55 44 20  |E VORIGE INHOUD |
00000200: 57 41 53 2E 0D C7 C1 D2  C2 C1 C7 C5 20 C3 CF CC  |WAS......... ...|
00000210: CC C5 C3 D4 C9 CF CE 20  49 53 20 45 45 4E 20 52  |....... IS EEN R|
00000220: 4F 55 54 49 4E 45 20 44  49 45 20 44 4F 4F 52 20  |OUTINE DIE DOOR |
00000230: 44 45 20 C2 C1 D3 C9 C3  20 C9 CE D4 C5 D2 D0 D2  |DE ..... .......|
00000240: C5 D4 C5 D2 20 57 4F 52  44 54 20 41 41 4E 47 45  |.... WORDT AANGE|
00000250: 52 4F 45 50 45 4E 20 41  4C 53 20 45 52 20 47 45  |ROEPEN ALS ER GE|
00000260: 45 4E 20 56 52 49 4A 45  20 52 55 49 4D 54 45 20  |EN VRIJE RUIMTE |
00000270: 4D 45 45 52 20 49 4E 20  48 45 54 20 47 45 48 45  |MEER IN HET GEHE|
00000280: 55 47 45 4E 20 41 41 4E  57 45 5A 49 47 20 49 53  |UGEN AANWEZIG IS|
00000290: 2E 20 C4 45 5A 45 20 52  4F 55 54 49 4E 45 20 47  |. .EZE ROUTINE G|
000002A0: 45 45 46 54 20 4F 4E 42  45 4E 55 54 54 45 20 52  |EEFT ONBENUTTE R|
000002B0: 55 49 4D 54 45 20 57 45  45 52 20 56 52 49 4A 20  |UIMTE WEER VRIJ |
000002C0: 4D 41 41 52 20 49 53 20  4E 4F 47 41 4C 20 4C 41  |MAAR IS NOGAL LA|
000002D0: 4E 47 5A 41 41 4D 20 45  4E 20 56 45 52 4F 4F 52  |NGZAAM EN VEROOR|
000002E0: 5A 41 41 4B 54 20 22 48  49 4B 4B 45 4E 22 20 49  |ZAAKT "HIKKEN" I|
000002F0: 4E 20 44 45 20 55 49 54  56 4F 45 52 49 4E 47 20  |N DE UITVOERING |
00000300: 56 41 4E 20 48 45 54 20  C2 C1 D3 C9 C3 20 50 52  |VAN HET ..... PR|
00000310: 4F 47 52 41 4D 4D 41 2E  0D C4 45 20 53 4E 45 4C  |OGRAMMA...E SNEL|
00000320: 53 54 45 20 4D 41 4E 49  45 52 20 4F 4D 20 45 45  |STE MANIER OM EE|
00000330: 4E 20 41 52 52 41 59 20  54 45 20 53 4F 52 54 45  |N ARRAY TE SORTE|
00000340: 52 45 4E 20 49 53 20 4D  45 54 20 42 45 48 55 4C  |REN IS MET BEHUL|
00000350: 50 20 56 41 4E 20 45 45  4E 20 52 4F 55 54 49 4E  |P VAN EEN ROUTIN|
00000360: 45 20 49 4E 20 4D 41 43  48 49 4E 45 54 41 41 4C  |E IN MACHINETAAL|
00000370: 20 45 4E 20 44 45 5A 45  20 56 41 4E 55 49 54 20  | EN DEZE VANUIT |
00000380: 48 45 54 20 C2 C1 D3 C9  C3 20 50 52 4F 47 52 41  |HET ..... PROGRA|
00000390: 4D 4D 41 20 41 41 4E 20  54 45 20 52 4F 45 50 45  |MMA AAN TE ROEPE|
000003A0: 4E 20 57 41 4E 4E 45 45  52 20 53 4F 52 54 45 52  |N WANNEER SORTER|
000003B0: 49 4E 47 20 47 45 57 45  4E 53 54 20 49 53 2E 0D  |ING GEWENST IS..|
000003C0: CF 4D 20 44 49 54 20 56  41 4E 55 49 54 20 4D 41  |.M DIT VANUIT MA|
000003D0: 43 48 49 4E 45 54 41 41  4C 20 54 45 20 52 45 41  |CHINETAAL TE REA|
000003E0: 4C 49 53 45 52 45 4E 20  4D 4F 45 54 45 4E 20 45  |LISEREN MOETEN E|
000003F0: 45 52 53 54 20 45 45 4E  20 41 41 4E 54 41 4C 20  |ERST EEN AANTAL |
00000400: 50 52 4F 42 4C 45 4D 45  4E 20 4F 50 47 45 4C 4F  |PROBLEMEN OPGELO|
00000410: 53 54 20 57 4F 52 44 45  4E 2E 0D 0D 20 20 20 20  |ST WORDEN...    |
00000420: 20 C8 CF C5 20 D7 C5 C5  D4 20 C9 CB 20 D7 C5 CC  | ... .... .. ...|
00000430: CB C5 20 C1 D2 D2 C1 D9  20 C9 CB 20 CD CF C5 D4  |.. ..... .. ....|
00000440: 20 D3 CF D2 D4 C5 D2 C5  CE 3F 0D 0D C4 45 20 4E  | ........?...E N|
00000450: 41 41 4D 20 56 41 4E 20  44 45 20 4C 41 41 54 53  |AAM VAN DE LAATS|
00000460: 54 45 20 44 4F 4F 52 20  C2 C1 D3 C9 C3 20 47 45  |TE DOOR ..... GE|
00000470: 52 41 41 44 50 4C 45 45  47 44 45 20 56 41 52 49  |RAADPLEEGDE VARI|
00000480: 41 42 45 4C 45 20 4E 41  41 4D 20 53 54 41 41 54  |ABELE NAAM STAAT|
00000490: 20 4F 50 20 41 44 52 45  53 53 45 4E 20 36 39 20  | OP ADRESSEN 69 |
000004A0: 45 4E 20 37 30 2E 20 CC  45 54 20 57 45 4C 20 44  |EN 70. .ET WEL D|
000004B0: 41 54 20 44 45 20 C2 C1  D3 C9 C3 20 C9 CE D4 C5  |AT DE ..... ....|
000004C0: D2 D0 D2 C5 D4 C5 D2 20  44 45 5A 45 20 4B 45 4E  |....... DEZE KEN|
000004D0: 4D 45 52 4B 54 20 4F 4D  20 4F 4E 44 45 52 53 43  |MERKT OM ONDERSC|
000004E0: 48 45 49 44 20 54 45 20  4D 41 4B 45 4E 20 54 55  |HEID TE MAKEN TU|
000004F0: 53 53 45 4E 20 C9 CE D4  C5 C7 C5 D2 D3 2C D3 D4  |SSEN ........,..|
00000500: D2 C9 CE C7 D3 20 45 4E  20 C6 CC CF C1 D4 C9 CE  |..... EN .......|
00000510: C7 20 D0 CF C9 CE D4 20  56 41 52 49 41 42 45 4C  |. ..... VARIABEL|
00000520: 45 4E 2E 0D C4 4F 4F 52  20 44 45 20 4F 50 44 52  |EN...OOR DE OPDR|
00000530: 41 43 48 54 20 D3 24 3D  D8 24 28 30 29 20 49 4E  |ACHT .$=.$(0) IN|
00000540: 20 C2 C1 D3 C9 C3 20 4B  4F 4D 54 20 44 45 20 4E  | ..... KOMT DE N|
00000550: 41 41 4D 20 56 41 4E 20  44 45 20 54 45 20 53 4F  |AAM VAN DE TE SO|
00000560: 52 54 45 52 45 4E 20 41  52 52 41 59 20 20 49 4E  |RTEREN ARRAY  IN|
00000570: 20 44 49 54 20 47 45 56  41 4C 20 D8 24 20 4F 50  | DIT GEVAL .$ OP|
00000580: 20 42 4F 56 45 4E 47 45  4E 4F 45 4D 44 20 41 44  | BOVENGENOEMD AD|
00000590: 52 45 53 20 54 45 20 53  54 41 41 4E 20 45 4E 20  |RES TE STAAN EN |
000005A0: 57 4F 52 44 20 5A 4F 20  41 41 4E 20 44 45 20 4D  |WORD ZO AAN DE M|
000005B0: 41 43 48 49 4E 45 54 41  41 4C 2D 52 4F 55 54 49  |ACHINETAAL-ROUTI|
000005C0: 4E 45 20 44 4F 4F 52 47  45 47 45 56 45 4E 2E 0D  |NE DOORGEGEVEN..|
000005D0: 0D 20 20 20 20 20 D7 C1  C1 D2 20 D3 D4 C1 C1 D4  |.     .... .....|
000005E0: 20 C4 C5 20 D4 C5 20 D3  CF D2 D4 C5 D2 C5 CE 20  | .. .. ........ |
000005F0: D3 D4 D2 C9 CE C7 C1 D2  D2 C1 D9 3F 0D 0D C8 45  |...........?...E|
00000600: 54 20 42 45 47 49 4E 41  44 52 45 53 20 56 41 4E  |T BEGINADRES VAN|
00000610: 20 41 4C 4C 45 20 41 52  52 41 59 53 20 53 54 41  | ALLE ARRAYS STA|
00000620: 41 54 20 4F 50 20 41 44  52 45 53 53 45 4E 20 34  |AT OP ADRESSEN 4|
00000630: 37 20 45 4E 20 34 38 2E  20 CF 50 20 44 49 54 20  |7 EN 48. .P DIT |
00000640: 41 44 52 45 53 20 53 54  41 41 54 20 44 45 20 4E  |ADRES STAAT DE N|
00000650: 41 41 4D 20 56 41 4E 20  44 45 20 45 45 52 53 54  |AAM VAN DE EERST|
00000660: 45 20 41 52 52 41 59 20  49 4E 20 32 20 42 59 54  |E ARRAY IN 2 BYT|
00000670: 45 53 20 4D 45 54 20 44  41 41 52 4E 41 20 44 45  |ES MET DAARNA DE|
00000680: 20 4F 46 46 53 45 54 20  49 4E 20 32 20 42 59 54  | OFFSET IN 2 BYT|
00000690: 45 53 20 4E 41 41 52 20  44 45 20 56 4F 4C 47 45  |ES NAAR DE VOLGE|
000006A0: 4E 44 45 20 41 52 52 41  59 2E 0D C8 49 45 52 4D  |NDE ARRAY...IERM|
000006B0: 45 45 20 4B 55 4E 4E 45  4E 20 57 45 20 4F 4E 5A  |EE KUNNEN WE ONZ|
000006C0: 45 20 56 41 52 49 41 42  45 4C 45 20 5A 4F 45 4B  |E VARIABELE ZOEK|
000006D0: 45 4E 20 54 4F 54 20 48  45 54 20 45 49 4E 44 41  |EN TOT HET EINDA|
000006E0: 44 52 45 53 20 56 41 4E  20 44 45 20 41 52 52 41  |DRES VAN DE ARRA|
000006F0: 59 53 2C 20 57 45 4C 4B  20 53 54 41 41 54 20 4F  |YS, WELK STAAT O|
00000700: 50 20 41 44 52 45 53 53  45 4E 20 34 39 20 45 4E  |P ADRESSEN 49 EN|
00000710: 20 35 30 2C 20 49 53 20  42 45 52 45 49 4B 54 2E  | 50, IS BEREIKT.|
00000720: 0D C9 4E 44 49 45 4E 20  44 45 20 47 45 5A 4F 43  |..NDIEN DE GEZOC|
00000730: 48 54 45 20 41 52 52 41  59 20 4E 49 45 54 20 49  |HTE ARRAY NIET I|
00000740: 53 20 47 45 56 4F 4E 44  45 4E 20 57 4F 52 44 54  |S GEVONDEN WORDT|
00000750: 20 44 45 20 46 4F 55 54  42 4F 4F 44 53 43 48 41  | DE FOUTBOODSCHA|
00000760: 50 20 22 CE CF D4 20 C6  CF D5 CE C4 22 20 41 46  |P "... ....." AF|
00000770: 47 45 47 45 56 45 4E 20  45 4E 20 48 45 54 20 C2  |GEGEVEN EN HET .|
00000780: C1 D3 C9 C3 20 50 52 4F  47 52 41 4D 4D 41 20 53  |.... PROGRAMMA S|
00000790: 54 4F 50 54 2E 0D 0D 20  20 20 20 20 C8 CF C5 20  |TOPT...     ... |
000007A0: C9 D3 20 C5 C5 CE 20 D3  D4 D2 C9 CE C7 C1 D2 D2  |.. ... .........|
000007B0: C1 D9 20 C9 CE 20 C2 C1  D3 C9 C3 20 CF D0 C7 C5  |.. .. ..... ....|
000007C0: C2 CF D5 D7 C4 3F 0D 0D  C5 45 4E 20 53 54 52 49  |.....?...EN STRI|
000007D0: 4E 47 41 52 52 41 59 20  42 45 53 54 41 41 54 20  |NGARRAY BESTAAT |
000007E0: 55 49 54 20 54 57 45 45  20 44 45 4C 45 4E 3A 0D  |UIT TWEE DELEN:.|
000007F0: 20 20 31 29 20 44 45 20  C1 D2 D2 C1 D9 20 C8 C5  |  1) DE ..... ..|
00000800: C1 C4 C5 D2 20 4D 45 54  20 44 45 20 4E 41 41 4D  |.... MET DE NAAM|
00000810: 20 28 32 20 42 59 54 45  53 29 2C 20 4F 46 46 53  | (2 BYTES), OFFS|
00000820: 45 54 20 56 4F 4C 47 45  4E 44 45 20 41 52 52 41  |ET VOLGENDE ARRA|
00000830: 59 20 28 32 20 42 59 54  45 53 29 2C 20 44 49 4D  |Y (2 BYTES), DIM|
00000840: 45 4E 53 49 45 20 28 31  20 42 59 54 45 29 20 45  |ENSIE (1 BYTE) E|
00000850: 4E 20 50 45 52 20 44 49  4D 45 4E 53 49 45 20 48  |N PER DIMENSIE H|
00000860: 45 54 20 4D 41 58 49 4D  55 4D 20 41 41 4E 54 41  |ET MAXIMUM AANTA|
00000870: 4C 20 45 4C 45 4D 45 4E  54 45 4E 20 28 44 49 4D  |L ELEMENTEN (DIM|
00000880: 45 4E 53 49 45 20 58 20  32 20 42 59 54 45 53 29  |ENSIE X 2 BYTES)|
00000890: 2E 0D 20 20 32 29 20 44  45 20 D3 D4 D2 C9 CE C7  |..  2) DE ......|
000008A0: 20 C4 C5 D3 C3 D2 C9 D0  D4 CF D2 D3 20 57 45 4C  | ........... WEL|
000008B0: 4B 45 20 50 45 52 20 45  4C 45 4D 45 4E 54 20 42  |KE PER ELEMENT B|
000008C0: 45 53 54 41 41 4E 20 55  49 54 20 44 45 20 4C 45  |ESTAAN UIT DE LE|
000008D0: 4E 47 54 45 20 28 31 20  42 59 54 45 29 20 45 4E  |NGTE (1 BYTE) EN|
000008E0: 20 48 45 54 20 41 44 52  45 53 20 28 32 20 42 59  | HET ADRES (2 BY|
000008F0: 54 45 53 29 20 56 41 4E  20 44 45 20 53 54 52 49  |TES) VAN DE STRI|
00000900: 4E 47 20 42 45 48 4F 52  45 4E 44 45 20 42 49 4A  |NG BEHORENDE BIJ|
00000910: 20 44 41 54 20 45 4C 45  4D 45 4E 54 2E 0D 0D 20  | DAT ELEMENT... |
00000920: 20 20 20 20 D7 C5 CC CB  C5 20 D3 CF D2 D4 C5 C5  |    ..... ......|
00000930: D2 CD C5 D4 C8 CF C4 C5  20 CB C9 C5 D3 20 C9 CB  |........ .... ..|
00000940: 3F 0D 0D C1 4C 53 20 53  4F 52 54 45 45 52 4D 45  |?...LS SORTEERME|
00000950: 54 48 4F 44 45 20 4B 4F  4F 53 20 49 4B 20 44 45  |THODE KOOS IK DE|
00000960: 20 5A 4F 47 45 4E 41 41  4D 44 45 20 22 C2 D5 C2  | ZOGENAAMDE "...|
00000970: C2 CC C5 20 D3 CF D2 D4  22 2E 0D C4 45 20 52 4F  |... ...."...E RO|
00000980: 55 54 49 4E 45 20 44 4F  4F 52 4C 4F 4F 50 54 20  |UTINE DOORLOOPT |
00000990: 44 45 20 41 52 52 41 59  20 56 41 4E 20 42 45 47  |DE ARRAY VAN BEG|
000009A0: 49 4E 20 54 4F 54 20 45  49 4E 44 20 45 4E 20 56  |IN TOT EIND EN V|
000009B0: 45 52 47 45 4C 49 4A 4B  54 20 48 45 54 20 45 45  |ERGELIJKT HET EE|
000009C0: 52 53 54 45 20 45 4C 45  4D 45 4E 54 20 4D 45 54  |RSTE ELEMENT MET|
000009D0: 20 48 45 54 20 54 57 45  45 44 45 2C 20 44 41 41  | HET TWEEDE, DAA|
000009E0: 52 4E 41 20 48 45 54 20  54 57 45 45 44 45 20 4D  |RNA HET TWEEDE M|
000009F0: 45 54 20 48 45 54 20 44  45 52 44 45 20 45 4E 5A  |ET HET DERDE ENZ|
00000A00: 2E 0D C9 4E 44 49 45 4E  20 42 49 4A 20 56 45 52  |...NDIEN BIJ VER|
00000A10: 47 45 4C 49 4A 4B 49 4E  47 20 42 4C 49 4A 4B 54  |GELIJKING BLIJKT|
00000A20: 20 44 41 54 20 45 45 4E  20 45 4C 45 4D 45 4E 54  | DAT EEN ELEMENT|
00000A30: 20 47 52 4F 54 45 52 20  49 53 20 44 41 4E 20 48  | GROTER IS DAN H|
00000A40: 45 54 20 56 4F 4C 47 45  4E 44 45 20 57 4F 52 44  |ET VOLGENDE WORD|
00000A50: 45 4E 20 5A 49 4A 20 56  45 52 57 49 53 53 45 4C  |EN ZIJ VERWISSEL|
00000A60: 44 2E 0D C2 49 4A 20 48  45 54 20 56 45 52 57 49  |D...IJ HET VERWI|
00000A70: 53 53 45 4C 45 4E 20 57  4F 52 44 45 4E 20 41 4C  |SSELEN WORDEN AL|
00000A80: 4C 45 45 4E 20 44 45 20  D3 D4 D2 C9 CE C7 20 C4  |LEEN DE ...... .|
00000A90: C5 D3 C3 D2 C9 D0 D4 CF  D2 D3 20 56 45 52 57 49  |.......... VERWI|
00000AA0: 53 53 45 4C 44 20 45 4E  20 4E 49 45 54 20 44 45  |SSELD EN NIET DE|
00000AB0: 20 D3 D4 D2 C9 CE C7 D3  20 5A 45 4C 46 2C 20 4F  | ....... ZELF, O|
00000AC0: 4D 44 41 54 20 44 49 54  20 56 45 45 4C 20 53 4E  |MDAT DIT VEEL SN|
00000AD0: 45 4C 4C 45 52 20 47 41  41 54 2E 0D C1 4C 53 20  |ELLER GAAT...LS |
00000AE0: 44 45 20 52 4F 55 54 49  4E 45 20 41 41 4E 20 48  |DE ROUTINE AAN H|
00000AF0: 45 54 20 45 49 4E 44 45  20 56 41 4E 20 44 45 20  |ET EINDE VAN DE |
00000B00: 41 52 52 41 59 20 49 53  20 47 45 4B 4F 4D 45 4E  |ARRAY IS GEKOMEN|
00000B10: 20 45 4E 20 45 52 20 48  45 45 46 54 20 45 45 4E  | EN ER HEEFT EEN|
00000B20: 20 56 45 52 57 49 53 53  45 4C 49 4E 47 20 50 4C  | VERWISSELING PL|
00000B30: 41 41 54 53 47 45 56 4F  4E 44 45 4E 20 44 41 4E  |AATSGEVONDEN DAN|
00000B40: 20 48 45 52 48 41 41 4C  54 20 44 45 20 43 59 43  | HERHAALT DE CYC|
00000B50: 4C 55 53 20 5A 49 43 48  20 4F 50 4E 49 45 55 57  |LUS ZICH OPNIEUW|
00000B60: 20 54 4F 54 20 44 45 20  41 52 52 41 59 20 4F 50  | TOT DE ARRAY OP|
00000B70: 20 56 4F 4C 47 4F 52 44  45 20 4C 49 47 54 20 45  | VOLGORDE LIGT E|
00000B80: 4E 20 4E 41 41 52 20 48  45 54 20 C2 C1 D3 C9 C3  |N NAAR HET .....|
00000B90: 20 50 52 4F 47 52 41 4D  4D 41 20 57 4F 52 44 20  | PROGRAMMA WORD |
00000BA0: 54 45 52 55 47 47 45 53  50 52 4F 4E 47 45 4E 2E  |TERUGGESPRONGEN.|
00000BB0: 0D 0D 0D C4 45 20 53 4F  52 54 45 45 52 52 4F 55  |....E SORTEERROU|
00000BC0: 54 49 4E 45 20 57 45 4C  4B 45 20 48 49 45 52 4F  |TINE WELKE HIERO|
00000BD0: 4E 44 45 52 20 49 53 20  47 45 50 52 49 4E 54 20  |NDER IS GEPRINT |
00000BE0: 57 4F 52 44 54 20 4F 50  20 5A 49 4A 4E 20 50 4C  |WORDT OP ZIJN PL|
00000BF0: 41 41 54 53 20 49 4E 20  48 45 54 20 47 45 48 45  |AATS IN HET GEHE|
00000C00: 55 47 45 4E 47 45 42 49  45 44 20 56 41 4E 41 46  |UGENGEBIED VANAF|
00000C10: 20 34 39 31 35 32 20 28  24 C3 30 30 30 29 20 47  | 49152 ($.000) G|
00000C20: 45 5A 45 54 20 45 4E 20  42 45 53 4C 41 41 54 20  |EZET EN BESLAAT |
00000C30: 4E 4F 47 20 47 45 45 4E  20 32 35 36 20 42 59 54  |NOG GEEN 256 BYT|
00000C40: 45 53 2E 0D D6 4F 4F 52  44 45 4C 45 4E 20 5A 49  |ES...OORDELEN ZI|
00000C50: 4A 4E 20 3A 20 53 4E 45  4C 4C 45 20 53 4F 52 54  |JN : SNELLE SORT|
00000C60: 45 52 49 4E 47 2C 20 4D  4F 47 45 4C 49 4A 4B 48  |ERING, MOGELIJKH|
00000C70: 45 49 44 20 4F 4D 20 56  45 52 53 43 48 49 4C 4C  |EID OM VERSCHILL|
00000C80: 45 4E 44 45 20 53 54 52  49 4E 47 41 52 52 41 59  |ENDE STRINGARRAY|
00000C90: 53 20 54 45 20 53 4F 52  54 45 52 45 4E 20 45 4E  |S TE SORTEREN EN|
00000CA0: 20 44 45 20 52 4F 55 54  49 4E 45 20 4B 41 4E 20  | DE ROUTINE KAN |
00000CB0: 49 4E 20 48 45 54 20 C2  C1 D3 C9 C3 20 50 52 4F  |IN HET ..... PRO|
00000CC0: 47 52 41 4D 4D 41 20 57  4F 52 44 45 4E 20 4F 50  |GRAMMA WORDEN OP|
00000CD0: 47 45 4E 4F 4D 45 4E 20  44 4D 56 20 C4 C1 D4 C1  |GENOMEN DMV ....|
00000CE0: 20 53 54 41 54 45 4D 45  4E 54 53 2E 0D CE 41 44  | STATEMENTS...AD|
00000CF0: 45 4C 45 4E 20 5A 49 4A  4E 20 20 20 3A 20 41 4C  |ELEN ZIJN   : AL|
00000D00: 4C 45 45 4E 20 31 2D 44  49 4D 45 4E 53 49 4F 4E  |LEEN 1-DIMENSION|
00000D10: 41 4C 45 20 53 54 52 49  4E 47 41 52 52 41 59 53  |ALE STRINGARRAYS|
00000D20: 20 4B 55 4E 4E 45 4E 20  57 4F 52 44 45 4E 20 47  | KUNNEN WORDEN G|
00000D30: 45 53 4F 52 54 45 45 52  44 20 45 4E 20 4D 41 41  |ESORTEERD EN MAA|
00000D40: 52 20 4F 50 20 45 45 4E  20 4D 41 4E 49 45 52 2C  |R OP EEN MANIER,|
00000D50: 20 44 45 20 45 4C 45 4D  45 4E 54 45 4E 20 57 4F  | DE ELEMENTEN WO|
00000D60: 52 44 45 4E 20 4E 41 4D  45 4C 49 4A 4B 20 56 41  |RDEN NAMELIJK VA|
00000D70: 4E 20 42 45 47 49 4E 20  54 4F 54 20 45 49 4E 44  |N BEGIN TOT EIND|
00000D80: 20 56 45 52 47 45 4C 45  4B 45 4E 20 45 4E 20 49  | VERGELEKEN EN I|
00000D90: 4E 20 4F 50 4C 4F 50 45  4E 44 45 20 56 4F 4C 47  |N OPLOPENDE VOLG|
00000DA0: 4F 52 44 45 20 47 45 53  4F 52 54 45 45 52 44 2E  |ORDE GESORTEERD.|
00000DB0: 0D 0D 0D 0D 0D 31 30 20  52 45 4D 20 20 2A 2A 2A  |.....10 REM  ***|
00000DC0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000DD0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 0D 31 31 20 52  |***********.11 R|
00000DE0: 45 4D 20 20 2A 20 20 20  20 20 20 20 20 20 20 20  |EM  *           |
00000DF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E00: 20 2A 0D 31 32 20 52 45  4D 20 20 2A 20 20 20 20  | *.12 REM  *    |
00000E10: 20 20 53 20 55 20 50 20  45 20 52 20 53 20 4F 20  |  S U P E R S O |
00000E20: 52 20 54 20 20 20 20 20  2A 0D 31 33 20 52 45 4D  |R T     *.13 REM|
00000E30: 20 20 2A 20 20 20 20 20  20 20 20 20 20 20 20 20  |  *             |
00000E40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 2A  |               *|
00000E50: 0D 31 34 20 52 45 4D 20  20 2A 20 20 20 20 20 20  |.14 REM  *      |
00000E60: 20 20 20 20 20 20 44 4F  4F 52 20 20 20 20 20 20  |      DOOR      |
00000E70: 20 20 20 20 20 20 2A 0D  31 35 20 52 45 4D 20 20  |      *.15 REM  |
00000E80: 2A 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |*               |
00000E90: 20 20 20 20 20 20 20 20  20 20 20 20 20 2A 0D 31  |             *.1|
00000EA0: 36 20 52 45 4D 20 20 2A  20 20 20 20 20 20 20 4E  |6 REM  *       N|
00000EB0: 49 43 4B 20 44 45 4E 20  42 4F 45 52 20 20 20 20  |ICK DEN BOER    |
00000EC0: 20 20 20 20 2A 0D 31 37  20 52 45 4D 20 20 2A 20  |    *.17 REM  * |
00000ED0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000EE0: 20 20 20 20 20 20 20 20  20 20 20 2A 0D 31 38 20  |           *.18 |
00000EF0: 52 45 4D 20 20 2A 20 53  4F 52 54 45 45 52 54 20  |REM  * SORTEERT |
00000F00: 57 49 4C 4C 45 4B 45 55  52 49 47 45 20 20 20 20  |WILLEKEURIGE    |
00000F10: 20 20 2A 0D 31 39 20 52  45 4D 20 20 2A 20 53 54  |  *.19 REM  * ST|
00000F20: 52 49 4E 47 41 52 52 41  59 20 41 4C 53 20 56 4F  |RINGARRAY ALS VO|
00000F30: 4C 47 54 3A 20 20 20 20  20 2A 0D 32 30 20 52 45  |LGT:     *.20 RE|
00000F40: 4D 20 20 2A 20 53 24 3D  58 24 28 30 29 3A 53 59  |M  * S$=X$(0):SY|
00000F50: 53 34 39 31 35 32 20 20  20 20 20 20 20 20 20 20  |S49152          |
00000F60: 2A 0D 32 31 20 52 45 4D  20 20 2A 20 44 4D 56 2E  |*.21 REM  * DMV.|
00000F70: 20 53 24 3D 58 24 28 30  29 20 47 45 45 46 20 4A  | S$=X$(0) GEEF J|
00000F80: 45 20 44 45 20 20 20 2A  0D 32 32 20 52 45 4D 20  |E DE   *.22 REM |
00000F90: 20 2A 20 4E 41 41 4D 20  56 41 4E 20 44 45 20 54  | * NAAM VAN DE T|
00000FA0: 45 20 53 4F 52 54 45 52  45 4E 20 20 20 20 2A 0D  |E SORTEREN    *.|
00000FB0: 32 33 20 52 45 4D 20 20  2A 20 53 54 52 49 4E 47  |23 REM  * STRING|
00000FC0: 41 52 52 41 59 20 58 24  28 30 29 20 44 4F 4F 52  |ARRAY X$(0) DOOR|
00000FD0: 2E 20 20 20 20 2A 0D 32  34 20 52 45 4D 20 20 2A  |.    *.24 REM  *|
00000FE0: 20 49 50 56 2E 20 53 24  20 4D 41 47 20 4F 4F 4B  | IPV. S$ MAG OOK|
00000FF0: 20 45 45 4E 20 41 4E 44  45 52 45 20 2A 0D 32 35  | EEN ANDERE *.25|
00001000: 20 52 45 4D 20 20 2A 20  56 41 52 49 41 42 45 4C  | REM  * VARIABEL|
00001010: 45 20 57 4F 52 44 45 4E  20 47 45 4B 4F 5A 45 4E  |E WORDEN GEKOZEN|
00001020: 20 20 20 2A 0D 32 36 20  52 45 4D 20 20 2A 20 20  |   *.26 REM  *  |
00001030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001040: 20 20 20 20 20 20 20 20  20 20 2A 0D 32 37 20 52  |          *.27 R|
00001050: 45 4D 20 20 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |EM  ************|
00001060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00001070: 2A 2A 0D 32 38 20 44 41  54 41 31 36 36 2C 30 34  |**.28 DATA166,04|
00001080: 37 2C 31 36 35 2C 30 34  38 2C 31 33 34 2C 30 39  |7,165,048,134,09|
00001090: 35 2C 31 33 33 2C 30 39  36 0D 32 39 20 44 41 54  |5,133,096.29 DAT|
000010A0: 41 31 39 37 2C 30 35 30  2C 32 30 38 2C 30 30 34  |A197,050,208,004|
000010B0: 2C 32 32 38 2C 30 34 39  2C 32 34 30 2C 30 32 39  |,228,049,240,029|
000010C0: 0D 33 30 20 44 41 54 41  31 36 30 2C 30 30 30 2C  |.30 DATA160,000,|
000010D0: 31 37 37 2C 30 39 35 2C  32 30 30 2C 31 39 37 2C  |177,095,200,197,|
000010E0: 30 36 39 2C 32 30 38 0D  33 31 20 44 41 54 41 30  |069,208.31 DATA0|
000010F0: 30 36 2C 31 36 35 2C 30  37 30 2C 32 30 39 2C 30  |06,165,070,209,0|
00001100: 39 35 2C 32 34 30 2C 30  32 33 2C 32 30 30 0D 33  |95,240,023,200.3|
00001110: 32 20 44 41 54 41 31 37  37 2C 30 39 35 2C 30 32  |2 DATA177,095,02|
00001120: 34 2C 31 30 31 2C 30 39  35 2C 31 37 30 2C 32 30  |4,101,095,170,20|
00001130: 30 2C 31 37 37 0D 33 33  20 44 41 54 41 30 39 35  |0,177.33 DATA095|
00001140: 2C 31 30 31 2C 30 39 36  2C 31 34 34 2C 32 31 35  |,101,096,144,215|
00001150: 2C 31 36 32 2C 31 39 39  2C 31 33 34 0D 33 34 20  |,162,199,134.34 |
00001160: 44 41 54 41 30 33 34 2C  31 36 39 2C 31 36 31 2C  |DATA034,169,161,|
00001170: 30 37 36 2C 30 36 39 2C  31 36 34 2C 32 30 30 2C  |076,069,164,200,|
00001180: 31 37 37 0D 33 35 20 44  41 54 41 30 39 35 2C 30  |177.35 DATA095,0|
00001190: 32 34 2C 31 30 31 2C 30  39 35 2C 31 37 30 2C 32  |24,101,095,170,2|
000011A0: 30 30 2C 31 37 37 2C 30  39 35 0D 33 36 20 44 41  |00,177,095.36 DA|
000011B0: 54 41 31 30 31 2C 30 39  36 2C 31 33 33 2C 30 33  |TA101,096,133,03|
000011C0: 37 2C 30 35 36 2C 31 33  38 2C 32 33 33 2C 30 30  |7,056,138,233,00|
000011D0: 33 0D 33 37 20 44 41 54  41 31 33 33 2C 30 33 36  |3.37 DATA133,036|
000011E0: 2C 31 37 36 2C 30 30 32  2C 31 39 38 2C 30 33 37  |,176,002,198,037|
000011F0: 2C 32 30 30 2C 31 37 37  0D 33 38 20 44 41 54 41  |,200,177.38 DATA|
00001200: 30 39 35 2C 30 33 32 2C  31 35 30 2C 31 37 37 2C  |095,032,150,177,|
00001210: 31 33 33 2C 32 35 31 2C  31 33 32 2C 32 35 32 0D  |133,251,132,252.|
00001220: 33 39 20 44 41 54 41 31  36 39 2C 30 30 30 2C 31  |39 DATA169,000,1|
00001230: 33 33 2C 30 30 32 2C 31  36 35 2C 32 35 31 2C 31  |33,002,165,251,1|
00001240: 36 34 2C 32 35 32 0D 34  30 20 44 41 54 41 31 39  |64,252.40 DATA19|
00001250: 36 2C 30 33 37 2C 32 30  38 2C 30 30 34 2C 31 39  |6,037,208,004,19|
00001260: 37 2C 30 33 36 2C 31 37  36 2C 31 32 32 0D 34 31  |7,036,176,122.41|
00001270: 20 44 41 54 41 31 33 33  2C 30 39 35 2C 31 33 32  | DATA133,095,132|
00001280: 2C 30 39 36 2C 31 36 30  2C 30 30 30 2C 31 37 37  |,096,160,000,177|
00001290: 2C 30 39 35 0D 34 32 20  44 41 54 41 31 33 33 2C  |,095.42 DATA133,|
000012A0: 32 35 33 2C 32 30 30 2C  31 37 37 2C 30 39 35 2C  |253,200,177,095,|
000012B0: 31 34 31 2C 31 36 36 2C  31 39 32 0D 34 33 20 44  |141,166,192.43 D|
000012C0: 41 54 41 32 30 30 2C 31  37 37 2C 30 39 35 2C 31  |ATA200,177,095,1|
000012D0: 34 31 2C 31 36 37 2C 31  39 32 2C 32 30 30 2C 31  |41,167,192,200,1|
000012E0: 37 37 0D 34 34 20 44 41  54 41 30 39 35 2C 31 33  |77.44 DATA095,13|
000012F0: 33 2C 32 35 34 2C 32 30  30 2C 31 37 37 2C 30 39  |3,254,200,177,09|
00001300: 35 2C 31 34 31 2C 31 36  33 0D 34 35 20 44 41 54  |5,141,163.45 DAT|
00001310: 41 31 39 32 2C 32 30 30  2C 31 37 37 2C 30 39 35  |A192,200,177,095|
00001320: 2C 31 34 31 2C 31 36 34  2C 31 39 32 2C 30 32 34  |,141,164,192,024|
00001330: 0D 34 36 20 44 41 54 41  31 36 35 2C 32 35 34 2C  |.46 DATA165,254,|
00001340: 32 30 38 2C 30 30 31 2C  30 35 36 2C 31 36 36 2C  |208,001,056,166,|
00001350: 32 35 33 2C 32 34 30 0D  34 37 20 44 41 54 41 30  |253,240.47 DATA0|
00001360: 32 35 2C 31 37 36 2C 30  32 33 2C 31 39 37 2C 32  |25,176,023,197,2|
00001370: 35 33 2C 31 37 36 2C 30  30 31 2C 31 37 30 0D 34  |53,176,001,170.4|
00001380: 38 20 44 41 54 41 31 36  30 2C 30 30 30 2C 31 38  |8 DATA160,000,18|
00001390: 35 2C 30 30 30 2C 30 30  30 2C 32 31 37 2C 30 30  |5,000,000,217,00|
000013A0: 30 2C 30 30 30 0D 34 39  20 44 41 54 41 32 30 38  |0,000.49 DATA208|
000013B0: 2C 30 30 38 2C 32 30 30  2C 32 30 32 2C 32 30 38  |,008,200,202,208|
000013C0: 2C 32 34 34 2C 31 36 35  2C 32 35 34 0D 35 30 20  |,244,165,254.50 |
000013D0: 44 41 54 41 31 39 37 2C  32 35 33 2C 31 37 36 2C  |DATA197,253,176,|
000013E0: 30 33 33 2C 31 36 32 2C  30 30 33 2C 31 36 30 2C  |033,162,003,160,|
000013F0: 30 30 30 0D 35 31 20 44  41 54 41 31 37 37 2C 30  |000.51 DATA177,0|
00001400: 39 35 2C 30 37 32 2C 31  36 30 2C 30 30 33 2C 31  |95,072,160,003,1|
00001410: 37 37 2C 30 39 35 2C 31  36 30 0D 35 32 20 44 41  |77,095,160.52 DA|
00001420: 54 41 30 30 30 2C 31 34  35 2C 30 39 35 2C 31 30  |TA000,145,095,10|
00001430: 34 2C 31 36 30 2C 30 30  33 2C 31 34 35 2C 30 39  |4,160,003,145,09|
00001440: 35 0D 35 33 20 44 41 54  41 32 33 30 2C 30 39 35  |5.53 DATA230,095|
00001450: 2C 32 30 38 2C 30 30 32  2C 32 33 30 2C 30 39 36  |,208,002,230,096|
00001460: 2C 32 30 32 2C 32 30 38  0D 35 34 20 44 41 54 41  |,202,208.54 DATA|
00001470: 32 32 39 2C 31 36 39 2C  30 30 31 2C 31 33 33 2C  |229,169,001,133,|
00001480: 30 30 32 2C 30 32 34 2C  31 36 35 2C 30 39 35 0D  |002,024,165,095.|
00001490: 35 35 20 44 41 54 41 31  36 34 2C 30 39 36 2C 31  |55 DATA164,096,1|
000014A0: 30 35 2C 30 30 33 2C 31  34 34 2C 31 33 30 2C 32  |05,003,144,130,2|
000014B0: 30 30 2C 30 37 36 0D 35  36 20 44 41 54 41 30 39  |00,076.56 DATA09|
000014C0: 36 2C 31 39 32 2C 31 36  35 2C 30 30 32 2C 32 34  |6,192,165,002,24|
000014D0: 30 2C 30 30 33 2C 30 37  36 2C 30 38 38 0D 35 37  |0,003,076,088.57|
000014E0: 20 44 41 54 41 31 39 32  2C 30 39 36 2C 33 30 35  | DATA192,096,305|
000014F0: 36 34 0D 35 38 20 41 3D  34 39 31 35 32 3A 54 3D  |64.58 A=49152:T=|
00001500: 30 0D 35 39 20 52 45 41  44 58 3A 49 46 58 3C 32  |0.59 READX:IFX<2|
00001510: 35 36 54 48 45 4E 50 4F  4B 45 41 2C 58 3A 54 3D  |56THENPOKEA,X:T=|
00001520: 54 2B 58 3A 41 3D 41 2B  31 3A 47 4F 54 4F 35 39  |T+X:A=A+1:GOTO59|
00001530: 0D 36 30 20 49 46 54 3C  3E 58 54 48 45 4E 50 52  |.60 IFT<>XTHENPR|
00001540: 49 4E 54 22 46 4F 55 54  20 49 4E 20 44 41 54 41  |INT"FOUT IN DATA|
00001550: 22 0D 0D 0D DA 49 45 48  49 45 52 20 44 45 20 41  |"....IEHIER DE A|
00001560: 53 53 45 4D 42 4C 45 52  20 4C 49 53 54 49 4E 47  |SSEMBLER LISTING|
00001570: 2E 0D 0D 0D 31 30 31 30  3A 20 20 43 30 30 30 20  |....1010:  C000 |
00001580: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001590: 20 20 2A 3D 20 20 20 24  43 30 30 30 0D 31 30 32  |  *=   $C000.102|
000015A0: 30 3A 20 20 43 30 30 30  20 20 20 20 20 20 20 20  |0:  C000        |
000015B0: 20 20 45 52 52 4F 55 54  20 20 20 3D 20 20 20 20  |  ERROUT   =    |
000015C0: 24 41 34 34 35 0D 31 30  33 30 3A 20 20 43 30 30  |$A445.1030:  C00|
000015D0: 30 20 20 20 20 20 20 20  20 20 20 53 45 54 41 52  |0          SETAR|
000015E0: 52 20 20 20 3D 20 20 20  20 24 42 31 39 36 0D 31  |R   =    $B196.1|
000015F0: 30 34 30 3A 20 20 43 30  30 30 20 20 20 20 20 20  |040:  C000      |
00001600: 20 20 20 20 41 52 52 54  41 42 20 20 20 3D 20 20  |    ARRTAB   =  |
00001610: 20 20 24 32 46 0D 31 30  35 30 3A 20 20 43 30 30  |  $2F.1050:  C00|
00001620: 30 20 20 20 20 20 20 20  20 20 20 54 45 4D 50 20  |0          TEMP |
00001630: 20 20 20 20 3D 20 20 20  20 24 35 46 0D 31 30 36  |    =    $5F.106|
00001640: 30 3A 20 20 43 30 30 30  20 20 20 20 20 20 20 20  |0:  C000        |
00001650: 20 20 45 4E 44 41 52 52  20 20 20 3D 20 20 20 20  |  ENDARR   =    |
00001660: 24 33 31 0D 31 30 37 30  3A 20 20 43 30 30 30 20  |$31.1070:  C000 |
00001670: 20 20 20 20 20 20 20 20  20 56 41 52 4E 41 4D 20  |         VARNAM |
00001680: 20 20 3D 20 20 20 20 24  34 35 0D 31 30 38 30 3A  |  =    $45.1080:|
00001690: 20 20 43 30 30 30 20 20  20 20 20 20 20 20 20 20  |  C000          |
000016A0: 41 52 52 45 4E 44 20 20  20 3D 20 20 20 20 24 32  |ARREND   =    $2|
000016B0: 34 0D 31 30 39 30 3A 20  20 43 30 30 30 20 20 20  |4.1090:  C000   |
000016C0: 20 20 20 20 20 20 20 41  52 52 53 54 41 52 54 20  |       ARRSTART |
000016D0: 3D 20 20 20 20 24 46 42  0D 31 31 30 30 3A 20 20  |=    $FB.1100:  |
000016E0: 43 30 30 30 20 20 20 20  20 20 20 20 20 20 4C 53  |C000          LS|
000016F0: 54 52 31 20 20 20 20 3D  20 20 20 20 24 46 44 0D  |TR1    =    $FD.|
00001700: 31 31 31 30 3A 20 20 43  30 30 30 20 20 20 20 20  |1110:  C000     |
00001710: 20 20 20 20 20 4C 53 54  52 32 20 20 20 20 3D 20  |     LSTR2    = |
00001720: 20 20 20 24 46 45 0D 31  31 32 30 3A 20 20 43 30  |   $FE.1120:  C0|
00001730: 30 30 20 20 20 20 20 20  20 20 20 20 57 49 53 42  |00          WISB|
00001740: 49 54 20 20 20 3D 20 20  20 20 24 30 32 0D 20 20  |IT   =    $02.  |
00001750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001760: 20 20 20 20 3B 40 40 40  40 40 40 40 40 40 40 40  |    ;@@@@@@@@@@@|
00001770: 40 40 40 40 40 0D 20 20  20 20 20 20 20 20 20 20  |@@@@@.          |
00001780: 20 20 20 20 20 20 20 20  20 20 20 20 3B 40 20 20  |            ;@  |
00001790: 53 55 50 45 52 53 4F 52  54 20 20 20 40 0D 20 20  |SUPERSORT   @.  |
000017A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000017B0: 20 20 20 20 3B 40 40 40  40 40 40 40 40 40 40 40  |    ;@@@@@@@@@@@|
000017C0: 40 40 40 40 40 0D 31 31  36 30 3A 20 20 43 30 30  |@@@@@.1160:  C00|
000017D0: 30 20 41 36 20 32 46 20  20 20 20 53 52 43 48 41  |0 A6 2F    SRCHA|
000017E0: 52 52 20 20 4C 44 58 20  20 41 52 52 54 41 42 0D  |RR  LDX  ARRTAB.|
000017F0: 31 31 37 30 3A 20 20 43  30 30 32 20 41 35 20 33  |1170:  C002 A5 3|
00001800: 30 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |0             LD|
00001810: 41 20 20 41 52 52 54 41  42 2B 31 0D 31 31 38 30  |A  ARRTAB+1.1180|
00001820: 3A 20 20 43 30 30 34 20  38 36 20 35 46 20 20 20  |:  C004 86 5F   |
00001830: 20 4C 30 30 31 20 20 20  20 20 53 54 58 20 20 54  | L001     STX  T|
00001840: 45 4D 50 0D 31 31 39 30  3A 20 20 43 30 30 36 20  |EMP.1190:  C006 |
00001850: 38 35 20 36 30 20 20 20  20 20 20 20 20 20 20 20  |85 60           |
00001860: 20 20 53 54 41 20 20 54  45 4D 50 2B 31 0D 31 32  |  STA  TEMP+1.12|
00001870: 30 30 3A 20 20 43 30 30  38 20 43 35 20 33 32 20  |00:  C008 C5 32 |
00001880: 20 20 20 20 20 20 20 20  20 20 20 20 43 4D 50 20  |            CMP |
00001890: 20 45 4E 44 41 52 52 2B  31 0D 31 32 31 30 3A 20  | ENDARR+1.1210: |
000018A0: 20 43 30 30 41 20 44 30  20 30 34 20 20 20 20 20  | C00A D0 04     |
000018B0: 20 20 20 20 20 20 20 20  42 4E 45 20 20 4C 30 30  |        BNE  L00|
000018C0: 32 0D 31 32 32 30 3A 20  20 43 30 30 43 20 45 34  |2.1220:  C00C E4|
000018D0: 20 33 31 20 20 20 20 20  20 20 20 20 20 20 20 20  | 31             |
000018E0: 43 50 58 20 20 45 4E 44  41 52 52 0D 31 32 33 30  |CPX  ENDARR.1230|
000018F0: 3A 20 20 43 30 30 45 20  46 30 20 31 44 20 20 20  |:  C00E F0 1D   |
00001900: 20 20 20 20 20 20 20 20  20 20 42 45 51 20 20 4C  |          BEQ  L|
00001910: 30 30 34 0D 31 32 34 30  3A 20 20 43 30 31 30 20  |004.1240:  C010 |
00001920: 41 30 20 30 30 20 20 20  20 4C 30 30 32 20 20 20  |A0 00    L002   |
00001930: 20 20 4C 44 59 20 20 23  30 0D 31 32 35 30 3A 20  |  LDY  #0.1250: |
00001940: 20 43 30 31 32 20 42 31  20 35 46 20 20 20 20 20  | C012 B1 5F     |
00001950: 20 20 20 20 20 20 20 20  4C 44 41 20 20 28 54 45  |        LDA  (TE|
00001960: 4D 50 29 2C 59 0D 31 32  36 30 3A 20 20 43 30 31  |MP),Y.1260:  C01|
00001970: 34 20 43 38 20 20 20 20  20 20 20 20 20 20 20 20  |4 C8            |
00001980: 20 20 20 20 49 4E 59 20  20 0D 31 32 37 30 3A 20  |    INY  .1270: |
00001990: 20 43 30 31 35 20 43 35  20 34 35 20 20 20 20 20  | C015 C5 45     |
000019A0: 20 20 20 20 20 20 20 20  43 4D 50 20 20 56 41 52  |        CMP  VAR|
000019B0: 4E 41 4D 0D 31 32 38 30  3A 20 20 43 30 31 37 20  |NAM.1280:  C017 |
000019C0: 44 30 20 30 36 20 20 20  20 20 20 20 20 20 20 20  |D0 06           |
000019D0: 20 20 42 4E 45 20 20 4C  30 30 33 0D 31 32 39 30  |  BNE  L003.1290|
000019E0: 3A 20 20 43 30 31 39 20  41 35 20 34 36 20 20 20  |:  C019 A5 46   |
000019F0: 20 20 20 20 20 20 20 20  20 20 4C 44 41 20 20 56  |          LDA  V|
00001A00: 41 52 4E 41 4D 2B 31 0D  31 33 30 30 3A 20 20 43  |ARNAM+1.1300:  C|
00001A10: 30 31 42 20 44 31 20 35  46 20 20 20 20 20 20 20  |01B D1 5F       |
00001A20: 20 20 20 20 20 20 43 4D  50 20 20 28 54 45 4D 50  |      CMP  (TEMP|
00001A30: 29 2C 59 0D 31 33 31 30  3A 20 20 43 30 31 44 20  |),Y.1310:  C01D |
00001A40: 46 30 20 31 37 20 20 20  20 20 20 20 20 20 20 20  |F0 17           |
00001A50: 20 20 42 45 51 20 20 4C  30 30 35 0D 31 33 32 30  |  BEQ  L005.1320|
00001A60: 3A 20 20 43 30 31 46 20  43 38 20 20 20 20 20 20  |:  C01F C8      |
00001A70: 20 4C 30 30 33 20 20 20  20 20 49 4E 59 20 20 0D  | L003     INY  .|
00001A80: 31 33 33 30 3A 20 20 43  30 32 30 20 42 31 20 35  |1330:  C020 B1 5|
00001A90: 46 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |F             LD|
00001AA0: 41 20 20 28 54 45 4D 50  29 2C 59 0D 31 33 34 30  |A  (TEMP),Y.1340|
00001AB0: 3A 20 20 43 30 32 32 20  31 38 20 20 20 20 20 20  |:  C022 18      |
00001AC0: 20 20 20 20 20 20 20 20  20 20 43 4C 43 20 20 0D  |          CLC  .|
00001AD0: 31 33 35 30 3A 20 20 43  30 32 33 20 36 35 20 35  |1350:  C023 65 5|
00001AE0: 46 20 20 20 20 20 20 20  20 20 20 20 20 20 41 44  |F             AD|
00001AF0: 43 20 20 54 45 4D 50 0D  31 33 36 30 3A 20 20 43  |C  TEMP.1360:  C|
00001B00: 30 32 35 20 41 41 20 20  20 20 20 20 20 20 20 20  |025 AA          |
00001B10: 20 20 20 20 20 20 54 41  58 20 20 0D 31 33 37 30  |      TAX  .1370|
00001B20: 3A 20 20 43 30 32 36 20  43 38 20 20 20 20 20 20  |:  C026 C8      |
00001B30: 20 20 20 20 20 20 20 20  20 20 49 4E 59 20 20 0D  |          INY  .|
00001B40: 31 33 38 30 3A 20 20 43  30 32 37 20 42 31 20 35  |1380:  C027 B1 5|
00001B50: 46 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |F             LD|
00001B60: 41 20 20 28 54 45 4D 50  29 2C 59 0D 31 33 39 30  |A  (TEMP),Y.1390|
00001B70: 3A 20 20 43 30 32 39 20  36 35 20 36 30 20 20 20  |:  C029 65 60   |
00001B80: 20 20 20 20 20 20 20 20  20 20 41 44 43 20 20 54  |          ADC  T|
00001B90: 45 4D 50 2B 31 0D 31 34  30 30 3A 20 20 43 30 32  |EMP+1.1400:  C02|
00001BA0: 42 20 39 30 20 44 37 20  20 20 20 20 20 20 20 20  |B 90 D7         |
00001BB0: 20 20 20 20 42 43 43 20  20 4C 30 30 31 0D 31 34  |    BCC  L001.14|
00001BC0: 31 30 3A 20 20 43 30 32  44 20 41 32 20 43 37 20  |10:  C02D A2 C7 |
00001BD0: 20 20 20 4C 30 30 34 20  20 20 20 20 4C 44 58 20  |   L004     LDX |
00001BE0: 20 23 24 43 37 0D 31 34  32 30 3A 20 20 43 30 32  | #$C7.1420:  C02|
00001BF0: 46 20 38 36 20 32 32 20  20 20 20 20 20 20 20 20  |F 86 22         |
00001C00: 20 20 20 20 53 54 58 20  20 24 32 32 0D 31 34 33  |    STX  $22.143|
00001C10: 30 3A 20 20 43 30 33 31  20 41 39 20 41 31 20 20  |0:  C031 A9 A1  |
00001C20: 20 20 20 20 20 20 20 20  20 20 20 4C 44 41 20 20  |           LDA  |
00001C30: 23 24 41 31 0D 31 34 34  30 3A 20 20 43 30 33 33  |#$A1.1440:  C033|
00001C40: 20 34 43 20 34 35 20 41  34 20 20 20 20 20 20 20  | 4C 45 A4       |
00001C50: 20 20 20 4A 4D 50 20 20  45 52 52 4F 55 54 0D 31  |   JMP  ERROUT.1|
00001C60: 34 35 30 3A 20 20 43 30  33 36 20 43 38 20 20 20  |450:  C036 C8   |
00001C70: 20 20 20 20 4C 30 30 35  20 20 20 20 20 49 4E 59  |    L005     INY|
00001C80: 20 20 0D 31 34 36 30 3A  20 20 43 30 33 37 20 42  |  .1460:  C037 B|
00001C90: 31 20 35 46 20 20 20 20  20 20 20 20 20 20 20 20  |1 5F            |
00001CA0: 20 4C 44 41 20 20 28 54  45 4D 50 29 2C 59 0D 31  | LDA  (TEMP),Y.1|
00001CB0: 34 37 30 3A 20 20 43 30  33 39 20 31 38 20 20 20  |470:  C039 18   |
00001CC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 43 4C 43  |             CLC|
00001CD0: 20 20 0D 31 34 38 30 3A  20 20 43 30 33 41 20 36  |  .1480:  C03A 6|
00001CE0: 35 20 35 46 20 20 20 20  20 20 20 20 20 20 20 20  |5 5F            |
00001CF0: 20 41 44 43 20 20 54 45  4D 50 0D 31 34 39 30 3A  | ADC  TEMP.1490:|
00001D00: 20 20 43 30 33 43 20 41  41 20 20 20 20 20 20 20  |  C03C AA       |
00001D10: 20 20 20 20 20 20 20 20  20 54 41 58 20 20 0D 31  |         TAX  .1|
00001D20: 35 30 30 3A 20 20 43 30  33 44 20 43 38 20 20 20  |500:  C03D C8   |
00001D30: 20 20 20 20 20 20 20 20  20 20 20 20 20 49 4E 59  |             INY|
00001D40: 20 20 0D 31 35 31 30 3A  20 20 43 30 33 45 20 42  |  .1510:  C03E B|
00001D50: 31 20 35 46 20 20 20 20  20 20 20 20 20 20 20 20  |1 5F            |
00001D60: 20 4C 44 41 20 20 28 54  45 4D 50 29 2C 59 0D 31  | LDA  (TEMP),Y.1|
00001D70: 35 32 30 3A 20 20 43 30  34 30 20 36 35 20 36 30  |520:  C040 65 60|
00001D80: 20 20 20 20 20 20 20 20  20 20 20 20 20 41 44 43  |             ADC|
00001D90: 20 20 54 45 4D 50 2B 31  0D 31 35 33 30 3A 20 20  |  TEMP+1.1530:  |
00001DA0: 43 30 34 32 20 38 35 20  32 35 20 20 20 20 20 20  |C042 85 25      |
00001DB0: 20 20 20 20 20 20 20 53  54 41 20 20 41 52 52 45  |       STA  ARRE|
00001DC0: 4E 44 2B 31 0D 31 35 34  30 3A 20 20 43 30 34 34  |ND+1.1540:  C044|
00001DD0: 20 33 38 20 20 20 20 20  20 20 20 20 20 20 20 20  | 38             |
00001DE0: 20 20 20 53 45 43 20 20  0D 31 35 35 30 3A 20 20  |   SEC  .1550:  |
00001DF0: 43 30 34 35 20 38 41 20  20 20 20 20 20 20 20 20  |C045 8A         |
00001E00: 20 20 20 20 20 20 20 54  58 41 20 20 0D 31 35 36  |       TXA  .156|
00001E10: 30 3A 20 20 43 30 34 36  20 45 39 20 30 33 20 20  |0:  C046 E9 03  |
00001E20: 20 20 20 20 20 20 20 20  20 20 20 53 42 43 20 20  |           SBC  |
00001E30: 23 33 0D 31 35 37 30 3A  20 20 43 30 34 38 20 38  |#3.1570:  C048 8|
00001E40: 35 20 32 34 20 20 20 20  20 20 20 20 20 20 20 20  |5 24            |
00001E50: 20 53 54 41 20 20 41 52  52 45 4E 44 0D 31 35 38  | STA  ARREND.158|
00001E60: 30 3A 20 20 43 30 34 41  20 42 30 20 30 32 20 20  |0:  C04A B0 02  |
00001E70: 20 20 20 20 20 20 20 20  20 20 20 42 43 53 20 20  |           BCS  |
00001E80: 4C 30 30 36 0D 31 35 39  30 3A 20 20 43 30 34 43  |L006.1590:  C04C|
00001E90: 20 43 36 20 32 35 20 20  20 20 20 20 20 20 20 20  | C6 25          |
00001EA0: 20 20 20 44 45 43 20 20  41 52 52 45 4E 44 2B 31  |   DEC  ARREND+1|
00001EB0: 0D 31 36 30 30 3A 20 20  43 30 34 45 20 43 38 20  |.1600:  C04E C8 |
00001EC0: 20 20 20 20 20 20 4C 30  30 36 20 20 20 20 20 49  |      L006     I|
00001ED0: 4E 59 20 20 0D 31 36 31  30 3A 20 20 43 30 34 46  |NY  .1610:  C04F|
00001EE0: 20 42 31 20 35 46 20 20  20 20 20 20 20 20 20 20  | B1 5F          |
00001EF0: 20 20 20 4C 44 41 20 20  28 54 45 4D 50 29 2C 59  |   LDA  (TEMP),Y|
00001F00: 0D 31 36 32 30 3A 20 20  43 30 35 31 20 32 30 20  |.1620:  C051 20 |
00001F10: 39 36 20 42 31 20 20 20  20 20 20 20 20 20 20 4A  |96 B1          J|
00001F20: 53 52 20 20 53 45 54 41  52 52 0D 31 36 33 30 3A  |SR  SETARR.1630:|
00001F30: 20 20 43 30 35 34 20 38  35 20 46 42 20 20 20 20  |  C054 85 FB    |
00001F40: 20 20 20 20 20 20 20 20  20 53 54 41 20 20 41 52  |         STA  AR|
00001F50: 52 53 54 41 52 54 0D 31  36 34 30 3A 20 20 43 30  |RSTART.1640:  C0|
00001F60: 35 36 20 38 34 20 46 43  20 20 20 20 20 20 20 20  |56 84 FC        |
00001F70: 20 20 20 20 20 53 54 59  20 20 41 52 52 53 54 41  |     STY  ARRSTA|
00001F80: 52 54 2B 31 0D 31 36 35  30 3A 20 20 43 30 35 38  |RT+1.1650:  C058|
00001F90: 20 41 39 20 30 30 20 20  20 20 4C 30 30 37 20 20  | A9 00    L007  |
00001FA0: 20 20 20 4C 44 41 20 20  23 30 0D 31 36 36 30 3A  |   LDA  #0.1660:|
00001FB0: 20 20 43 30 35 41 20 38  35 20 30 32 20 20 20 20  |  C05A 85 02    |
00001FC0: 20 20 20 20 20 20 20 20  20 53 54 41 20 20 57 49  |         STA  WI|
00001FD0: 53 42 49 54 0D 31 36 37  30 3A 20 20 43 30 35 43  |SBIT.1670:  C05C|
00001FE0: 20 41 35 20 46 42 20 20  20 20 20 20 20 20 20 20  | A5 FB          |
00001FF0: 20 20 20 4C 44 41 20 20  41 52 52 53 54 41 52 54  |   LDA  ARRSTART|
00002000: 0D 31 36 38 30 3A 20 20  43 30 35 45 20 41 34 20  |.1680:  C05E A4 |
00002010: 46 43 20 20 20 20 20 20  20 20 20 20 20 20 20 4C  |FC             L|
00002020: 44 59 20 20 41 52 52 53  54 41 52 54 2B 31 0D 31  |DY  ARRSTART+1.1|
00002030: 36 39 30 3A 20 20 43 30  36 30 20 43 34 20 32 35  |690:  C060 C4 25|
00002040: 20 20 20 20 4C 30 30 38  20 20 20 20 20 43 50 59  |    L008     CPY|
00002050: 20 20 41 52 52 45 4E 44  2B 31 0D 31 37 30 30 3A  |  ARREND+1.1700:|
00002060: 20 20 43 30 36 32 20 44  30 20 30 34 20 20 20 20  |  C062 D0 04    |
00002070: 20 20 20 20 20 20 20 20  20 42 4E 45 20 20 4C 30  |         BNE  L0|
00002080: 30 39 0D 31 37 31 30 3A  20 20 43 30 36 34 20 43  |09.1710:  C064 C|
00002090: 35 20 32 34 20 20 20 20  20 20 20 20 20 20 20 20  |5 24            |
000020A0: 20 43 4D 50 20 20 41 52  52 45 4E 44 0D 31 37 32  | CMP  ARREND.172|
000020B0: 30 3A 20 20 43 30 36 36  20 42 30 20 37 41 20 20  |0:  C066 B0 7A  |
000020C0: 20 20 20 20 20 20 20 20  20 20 20 42 43 53 20 20  |           BCS  |
000020D0: 4C 30 31 31 0D 31 37 33  30 3A 20 20 43 30 36 38  |L011.1730:  C068|
000020E0: 20 38 35 20 35 46 20 20  20 20 4C 30 30 39 20 20  | 85 5F    L009  |
000020F0: 20 20 20 53 54 41 20 20  54 45 4D 50 0D 31 37 34  |   STA  TEMP.174|
00002100: 30 3A 20 20 43 30 36 41  20 38 34 20 36 30 20 20  |0:  C06A 84 60  |
00002110: 20 20 20 20 20 20 20 20  20 20 20 53 54 59 20 20  |           STY  |
00002120: 54 45 4D 50 2B 31 0D 31  37 35 30 3A 20 20 43 30  |TEMP+1.1750:  C0|
00002130: 36 43 20 41 30 20 30 30  20 20 20 20 43 4F 4D 50  |6C A0 00    COMP|
00002140: 41 52 45 20 20 4C 44 59  20 20 23 30 0D 31 37 36  |ARE  LDY  #0.176|
00002150: 30 3A 20 20 43 30 36 45  20 42 31 20 35 46 20 20  |0:  C06E B1 5F  |
00002160: 20 20 20 20 20 20 20 20  20 20 20 4C 44 41 20 20  |           LDA  |
00002170: 28 54 45 4D 50 29 2C 59  0D 31 37 37 30 3A 20 20  |(TEMP),Y.1770:  |
00002180: 43 30 37 30 20 38 35 20  46 44 20 20 20 20 20 20  |C070 85 FD      |
00002190: 20 20 20 20 20 20 20 53  54 41 20 20 4C 53 54 52  |       STA  LSTR|
000021A0: 31 0D 31 37 38 30 3A 20  20 43 30 37 32 20 43 38  |1.1780:  C072 C8|
000021B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000021C0: 49 4E 59 20 20 0D 31 37  39 30 3A 20 20 43 30 37  |INY  .1790:  C07|
000021D0: 33 20 42 31 20 35 46 20  20 20 20 20 20 20 20 20  |3 B1 5F         |
000021E0: 20 20 20 20 4C 44 41 20  20 28 54 45 4D 50 29 2C  |    LDA  (TEMP),|
000021F0: 59 0D 31 38 30 30 3A 20  20 43 30 37 35 20 38 44  |Y.1800:  C075 8D|
00002200: 20 41 36 20 43 30 20 20  20 20 20 20 20 20 20 20  | A6 C0          |
00002210: 53 54 41 20 20 43 4D 50  4C 34 2B 31 0D 31 38 31  |STA  CMPL4+1.181|
00002220: 30 3A 20 20 43 30 37 38  20 43 38 20 20 20 20 20  |0:  C078 C8     |
00002230: 20 20 20 20 20 20 20 20  20 20 20 49 4E 59 20 20  |           INY  |
00002240: 0D 31 38 32 30 3A 20 20  43 30 37 39 20 42 31 20  |.1820:  C079 B1 |
00002250: 35 46 20 20 20 20 20 20  20 20 20 20 20 20 20 4C  |5F             L|
00002260: 44 41 20 20 28 54 45 4D  50 29 2C 59 0D 31 38 33  |DA  (TEMP),Y.183|
00002270: 30 3A 20 20 43 30 37 42  20 38 44 20 41 37 20 43  |0:  C07B 8D A7 C|
00002280: 30 20 20 20 20 20 20 20  20 20 20 53 54 41 20 20  |0          STA  |
00002290: 43 4D 50 4C 34 2B 32 0D  31 38 34 30 3A 20 20 43  |CMPL4+2.1840:  C|
000022A0: 30 37 45 20 43 38 20 20  20 20 20 20 20 20 20 20  |07E C8          |
000022B0: 20 20 20 20 20 20 49 4E  59 20 20 0D 31 38 35 30  |      INY  .1850|
000022C0: 3A 20 20 43 30 37 46 20  42 31 20 35 46 20 20 20  |:  C07F B1 5F   |
000022D0: 20 20 20 20 20 20 20 20  20 20 4C 44 41 20 20 28  |          LDA  (|
000022E0: 54 45 4D 50 29 2C 59 0D  31 38 36 30 3A 20 20 43  |TEMP),Y.1860:  C|
000022F0: 30 38 31 20 38 35 20 46  45 20 20 20 20 20 20 20  |081 85 FE       |
00002300: 20 20 20 20 20 20 53 54  41 20 20 4C 53 54 52 32  |      STA  LSTR2|
00002310: 0D 31 38 37 30 3A 20 20  43 30 38 33 20 43 38 20  |.1870:  C083 C8 |
00002320: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 49  |               I|
00002330: 4E 59 20 20 0D 31 38 38  30 3A 20 20 43 30 38 34  |NY  .1880:  C084|
00002340: 20 42 31 20 35 46 20 20  20 20 20 20 20 20 20 20  | B1 5F          |
00002350: 20 20 20 4C 44 41 20 20  28 54 45 4D 50 29 2C 59  |   LDA  (TEMP),Y|
00002360: 0D 31 38 39 30 3A 20 20  43 30 38 36 20 38 44 20  |.1890:  C086 8D |
00002370: 41 33 20 43 30 20 20 20  20 20 20 20 20 20 20 53  |A3 C0          S|
00002380: 54 41 20 20 43 4D 50 4C  33 2B 31 0D 31 39 30 30  |TA  CMPL3+1.1900|
00002390: 3A 20 20 43 30 38 39 20  43 38 20 20 20 20 20 20  |:  C089 C8      |
000023A0: 20 20 20 20 20 20 20 20  20 20 49 4E 59 20 20 0D  |          INY  .|
000023B0: 31 39 31 30 3A 20 20 43  30 38 41 20 42 31 20 35  |1910:  C08A B1 5|
000023C0: 46 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |F             LD|
000023D0: 41 20 20 28 54 45 4D 50  29 2C 59 0D 31 39 32 30  |A  (TEMP),Y.1920|
000023E0: 3A 20 20 43 30 38 43 20  38 44 20 41 34 20 43 30  |:  C08C 8D A4 C0|
000023F0: 20 20 20 20 20 20 20 20  20 20 53 54 41 20 20 43  |          STA  C|
00002400: 4D 50 4C 33 2B 32 0D 31  39 33 30 3A 20 20 43 30  |MPL3+2.1930:  C0|
00002410: 38 46 20 31 38 20 20 20  20 20 20 20 20 20 20 20  |8F 18           |
00002420: 20 20 20 20 20 43 4C 43  20 20 0D 31 39 34 30 3A  |     CLC  .1940:|
00002430: 20 20 43 30 39 30 20 41  35 20 46 45 20 20 20 20  |  C090 A5 FE    |
00002440: 20 20 20 20 20 20 20 20  20 4C 44 41 20 20 4C 53  |         LDA  LS|
00002450: 54 52 32 0D 31 39 35 30  3A 20 20 43 30 39 32 20  |TR2.1950:  C092 |
00002460: 44 30 20 30 31 20 20 20  20 20 20 20 20 20 20 20  |D0 01           |
00002470: 20 20 42 4E 45 20 20 43  4D 50 4C 31 0D 31 39 36  |  BNE  CMPL1.196|
00002480: 30 3A 20 20 43 30 39 34  20 33 38 20 20 20 20 20  |0:  C094 38     |
00002490: 20 20 20 20 20 20 20 20  20 20 20 53 45 43 20 20  |           SEC  |
000024A0: 0D 31 39 37 30 3A 20 20  43 30 39 35 20 41 36 20  |.1970:  C095 A6 |
000024B0: 46 44 20 20 20 20 43 4D  50 4C 31 20 20 20 20 4C  |FD    CMPL1    L|
000024C0: 44 58 20 20 4C 53 54 52  31 0D 31 39 38 30 3A 20  |DX  LSTR1.1980: |
000024D0: 20 43 30 39 37 20 46 30  20 31 39 20 20 20 20 20  | C097 F0 19     |
000024E0: 20 20 20 20 20 20 20 20  42 45 51 20 20 43 4D 50  |        BEQ  CMP|
000024F0: 4C 35 0D 31 39 39 30 3A  20 20 43 30 39 39 20 42  |L5.1990:  C099 B|
00002500: 30 20 31 37 20 20 20 20  20 20 20 20 20 20 20 20  |0 17            |
00002510: 20 42 43 53 20 20 43 4D  50 4C 35 0D 32 30 30 30  | BCS  CMPL5.2000|
00002520: 3A 20 20 43 30 39 42 20  43 35 20 46 44 20 20 20  |:  C09B C5 FD   |
00002530: 20 20 20 20 20 20 20 20  20 20 43 4D 50 20 20 4C  |          CMP  L|
00002540: 53 54 52 31 0D 32 30 31  30 3A 20 20 43 30 39 44  |STR1.2010:  C09D|
00002550: 20 42 30 20 30 31 20 20  20 20 20 20 20 20 20 20  | B0 01          |
00002560: 20 20 20 42 43 53 20 20  43 4D 50 4C 32 0D 32 30  |   BCS  CMPL2.20|
00002570: 32 30 3A 20 20 43 30 39  46 20 41 41 20 20 20 20  |20:  C09F AA    |
00002580: 20 20 20 20 20 20 20 20  20 20 20 20 54 41 58 20  |            TAX |
00002590: 20 0D 32 30 33 30 3A 20  20 43 30 41 30 20 41 30  | .2030:  C0A0 A0|
000025A0: 20 30 30 20 20 20 20 43  4D 50 4C 32 20 20 20 20  | 00    CMPL2    |
000025B0: 4C 44 59 20 20 23 30 0D  32 30 34 30 3A 20 20 43  |LDY  #0.2040:  C|
000025C0: 30 41 32 20 42 39 20 30  30 20 43 30 20 43 4D 50  |0A2 B9 00 C0 CMP|
000025D0: 4C 33 20 20 20 20 4C 44  41 20 20 24 43 30 30 30  |L3    LDA  $C000|
000025E0: 2C 59 0D 32 30 35 30 3A  20 20 43 30 41 35 20 44  |,Y.2050:  C0A5 D|
000025F0: 39 20 30 30 20 43 30 20  43 4D 50 4C 34 20 20 20  |9 00 C0 CMPL4   |
00002600: 20 43 4D 50 20 20 24 43  30 30 30 2C 59 0D 32 30  | CMP  $C000,Y.20|
00002610: 36 30 3A 20 20 43 30 41  38 20 44 30 20 30 38 20  |60:  C0A8 D0 08 |
00002620: 20 20 20 20 20 20 20 20  20 20 20 20 42 4E 45 20  |            BNE |
00002630: 20 43 4D 50 4C 35 0D 32  30 37 30 3A 20 20 43 30  | CMPL5.2070:  C0|
00002640: 41 41 20 43 38 20 20 20  20 20 20 20 20 20 20 20  |AA C8           |
00002650: 20 20 20 20 20 49 4E 59  20 20 0D 32 30 38 30 3A  |     INY  .2080:|
00002660: 20 20 43 30 41 42 20 43  41 20 20 20 20 20 20 20  |  C0AB CA       |
00002670: 20 20 20 20 20 20 20 20  20 44 45 58 20 20 0D 32  |         DEX  .2|
00002680: 30 39 30 3A 20 20 43 30  41 43 20 44 30 20 46 34  |090:  C0AC D0 F4|
00002690: 20 20 20 20 20 20 20 20  20 20 20 20 20 42 4E 45  |             BNE|
000026A0: 20 20 43 4D 50 4C 33 0D  32 31 30 30 3A 20 20 43  |  CMPL3.2100:  C|
000026B0: 30 41 45 20 41 35 20 46  45 20 20 20 20 20 20 20  |0AE A5 FE       |
000026C0: 20 20 20 20 20 20 4C 44  41 20 20 4C 53 54 52 32  |      LDA  LSTR2|
000026D0: 0D 32 31 31 30 3A 20 20  43 30 42 30 20 43 35 20  |.2110:  C0B0 C5 |
000026E0: 46 44 20 20 20 20 20 20  20 20 20 20 20 20 20 43  |FD             C|
000026F0: 4D 50 20 20 4C 53 54 52  31 0D 32 31 32 30 3A 20  |MP  LSTR1.2120: |
00002700: 20 43 30 42 32 20 42 30  20 32 31 20 20 20 20 43  | C0B2 B0 21    C|
00002710: 4D 50 4C 35 20 20 20 20  42 43 53 20 20 4C 30 31  |MPL5    BCS  L01|
00002720: 30 0D 32 31 33 30 3A 20  20 43 30 42 34 20 41 32  |0.2130:  C0B4 A2|
00002730: 20 30 33 20 20 20 20 57  49 53 53 45 4C 20 20 20  | 03    WISSEL   |
00002740: 4C 44 58 20 20 23 33 0D  32 31 34 30 3A 20 20 43  |LDX  #3.2140:  C|
00002750: 30 42 36 20 41 30 20 30  30 20 20 20 20 57 49 53  |0B6 A0 00    WIS|
00002760: 4C 31 20 20 20 20 4C 44  59 20 20 23 30 0D 32 31  |L1    LDY  #0.21|
00002770: 35 30 3A 20 20 43 30 42  38 20 42 31 20 35 46 20  |50:  C0B8 B1 5F |
00002780: 20 20 20 20 20 20 20 20  20 20 20 20 4C 44 41 20  |            LDA |
00002790: 20 28 54 45 4D 50 29 2C  59 0D 32 31 36 30 3A 20  | (TEMP),Y.2160: |
000027A0: 20 43 30 42 41 20 34 38  20 20 20 20 20 20 20 20  | C0BA 48        |
000027B0: 20 20 20 20 20 20 20 20  50 48 41 20 20 0D 32 31  |        PHA  .21|
000027C0: 37 30 3A 20 20 43 30 42  42 20 41 30 20 30 33 20  |70:  C0BB A0 03 |
000027D0: 20 20 20 20 20 20 20 20  20 20 20 20 4C 44 59 20  |            LDY |
000027E0: 20 23 33 0D 32 31 38 30  3A 20 20 43 30 42 44 20  | #3.2180:  C0BD |
000027F0: 42 31 20 35 46 20 20 20  20 20 20 20 20 20 20 20  |B1 5F           |
00002800: 20 20 4C 44 41 20 20 28  54 45 4D 50 29 2C 59 0D  |  LDA  (TEMP),Y.|
00002810: 32 31 39 30 3A 20 20 43  30 42 46 20 41 30 20 30  |2190:  C0BF A0 0|
00002820: 30 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |0             LD|
00002830: 59 20 20 23 30 0D 32 32  30 30 3A 20 20 43 30 43  |Y  #0.2200:  C0C|
00002840: 31 20 39 31 20 35 46 20  20 20 20 20 20 20 20 20  |1 91 5F         |
00002850: 20 20 20 20 53 54 41 20  20 28 54 45 4D 50 29 2C  |    STA  (TEMP),|
00002860: 59 0D 32 32 31 30 3A 20  20 43 30 43 33 20 36 38  |Y.2210:  C0C3 68|
00002870: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00002880: 50 4C 41 20 20 0D 32 32  32 30 3A 20 20 43 30 43  |PLA  .2220:  C0C|
00002890: 34 20 41 30 20 30 33 20  20 20 20 20 20 20 20 20  |4 A0 03         |
000028A0: 20 20 20 20 4C 44 59 20  20 23 33 0D 32 32 33 30  |    LDY  #3.2230|
000028B0: 3A 20 20 43 30 43 36 20  39 31 20 35 46 20 20 20  |:  C0C6 91 5F   |
000028C0: 20 20 20 20 20 20 20 20  20 20 53 54 41 20 20 28  |          STA  (|
000028D0: 54 45 4D 50 29 2C 59 0D  32 32 34 30 3A 20 20 43  |TEMP),Y.2240:  C|
000028E0: 30 43 38 20 45 36 20 35  46 20 20 20 20 20 20 20  |0C8 E6 5F       |
000028F0: 20 20 20 20 20 20 49 4E  43 20 20 54 45 4D 50 0D  |      INC  TEMP.|
00002900: 32 32 35 30 3A 20 20 43  30 43 41 20 44 30 20 30  |2250:  C0CA D0 0|
00002910: 32 20 20 20 20 20 20 20  20 20 20 20 20 20 42 4E  |2             BN|
00002920: 45 20 20 57 49 53 4C 32  0D 32 32 36 30 3A 20 20  |E  WISL2.2260:  |
00002930: 43 30 43 43 20 45 36 20  36 30 20 20 20 20 20 20  |C0CC E6 60      |
00002940: 20 20 20 20 20 20 20 49  4E 43 20 20 54 45 4D 50  |       INC  TEMP|
00002950: 2B 31 0D 32 32 37 30 3A  20 20 43 30 43 45 20 43  |+1.2270:  C0CE C|
00002960: 41 20 20 20 20 20 20 20  57 49 53 4C 32 20 20 20  |A       WISL2   |
00002970: 20 44 45 58 20 20 0D 32  32 38 30 3A 20 20 43 30  | DEX  .2280:  C0|
00002980: 43 46 20 44 30 20 45 35  20 20 20 20 20 20 20 20  |CF D0 E5        |
00002990: 20 20 20 20 20 42 4E 45  20 20 57 49 53 4C 31 0D  |     BNE  WISL1.|
000029A0: 32 32 39 30 3A 20 20 43  30 44 31 20 41 39 20 30  |2290:  C0D1 A9 0|
000029B0: 31 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |1             LD|
000029C0: 41 20 20 23 24 30 31 0D  32 33 30 30 3A 20 20 43  |A  #$01.2300:  C|
000029D0: 30 44 33 20 38 35 20 30  32 20 20 20 20 20 20 20  |0D3 85 02       |
000029E0: 20 20 20 20 20 20 53 54  41 20 20 57 49 53 42 49  |      STA  WISBI|
000029F0: 54 0D 32 33 31 30 3A 20  20 43 30 44 35 20 31 38  |T.2310:  C0D5 18|
00002A00: 20 20 20 20 20 20 20 4C  30 31 30 20 20 20 20 20  |       L010     |
00002A10: 43 4C 43 20 20 0D 32 33  32 30 3A 20 20 43 30 44  |CLC  .2320:  C0D|
00002A20: 36 20 41 35 20 35 46 20  20 20 20 20 20 20 20 20  |6 A5 5F         |
00002A30: 20 20 20 20 4C 44 41 20  20 54 45 4D 50 0D 32 33  |    LDA  TEMP.23|
00002A40: 33 30 3A 20 20 43 30 44  38 20 41 34 20 36 30 20  |30:  C0D8 A4 60 |
00002A50: 20 20 20 20 20 20 20 20  20 20 20 20 4C 44 59 20  |            LDY |
00002A60: 20 54 45 4D 50 2B 31 0D  32 33 34 30 3A 20 20 43  | TEMP+1.2340:  C|
00002A70: 30 44 41 20 36 39 20 30  33 20 20 20 20 20 20 20  |0DA 69 03       |
00002A80: 20 20 20 20 20 20 41 44  43 20 20 23 33 0D 32 33  |      ADC  #3.23|
00002A90: 35 30 3A 20 20 43 30 44  43 20 39 30 20 38 32 20  |50:  C0DC 90 82 |
00002AA0: 20 20 20 20 20 20 20 20  20 20 20 20 42 43 43 20  |            BCC |
00002AB0: 20 4C 30 30 38 0D 32 33  36 30 3A 20 20 43 30 44  | L008.2360:  C0D|
00002AC0: 45 20 43 38 20 20 20 20  20 20 20 20 20 20 20 20  |E C8            |
00002AD0: 20 20 20 20 49 4E 59 20  20 0D 32 33 37 30 3A 20  |    INY  .2370: |
00002AE0: 20 43 30 44 46 20 34 43  20 36 30 20 43 30 20 20  | C0DF 4C 60 C0  |
00002AF0: 20 20 20 20 20 20 20 20  4A 4D 50 20 20 4C 30 30  |        JMP  L00|
00002B00: 38 0D 32 33 38 30 3A 20  20 43 30 45 32 20 41 35  |8.2380:  C0E2 A5|
00002B10: 20 30 32 20 20 20 20 4C  30 31 31 20 20 20 20 20  | 02    L011     |
00002B20: 4C 44 41 20 20 57 49 53  42 49 54 0D 32 33 39 30  |LDA  WISBIT.2390|
00002B30: 3A 20 20 43 30 45 34 20  46 30 20 30 33 20 20 20  |:  C0E4 F0 03   |
00002B40: 20 20 20 20 20 20 20 20  20 20 42 45 51 20 20 45  |          BEQ  E|
00002B50: 49 4E 44 45 0D 32 34 30  30 3A 20 20 43 30 45 36  |INDE.2400:  C0E6|
00002B60: 20 34 43 20 35 38 20 43  30 20 20 20 20 20 20 20  | 4C 58 C0       |
00002B70: 20 20 20 4A 4D 50 20 20  4C 30 30 37 0D 32 34 31  |   JMP  L007.241|
00002B80: 30 3A 20 20 43 30 45 39  20 36 30 20 20 20 20 20  |0:  C0E9 60     |
00002B90: 20 20 45 49 4E 44 45 20  20 20 20 52 54 53 20 20  |  EINDE    RTS  |
00002BA0: 0D 0D                                             |..              |
.*NB"SUPERSORT INFO"..DOOR NICK DEN BOER
,.     FAISANTENSTRAAT 46,.     1211PW H
ILVERSUM,.     TEL. 035-41135.....HET SO
RTEREN VAN EEN ARRAY MET BIJVOORBEELD NA
MEN DUURT IN BASIC AL GAUW EEN UUR OF LA
NGER AFHANKELIJK VAN DE GROOTTE..DIT KOM
T VOORNAMELIJK DOORDAT BASIC GEEN SNELLE
 TAAL IS EN DOOR GARBAGE COLLECTION..IED
ERE KEER ALS AAN EEN STRINGVARIABELE EEN
 NIEUWE INHOUD WORD TOEGEKEND, KRIJGT DE
ZE STRING EEN NIEUWE PLAATS IN HET NOG V
RIJE GEHEUGEN. HIERDOOR ONTSTAAT ONBENUT
TE RUIMTE WAAR DE VORIGE INHOUD WAS..GAR
BAGE COLLECTION IS EEN ROUTINE DIE DOOR 
DE BASIC INTERPRETER WORDT AANGEROEPEN A
LS ER GEEN VRIJE RUIMTE MEER IN HET GEHE
UGEN AANWEZIG IS. DEZE ROUTINE GEEFT ONB
ENUTTE RUIMTE WEER VRIJ MAAR IS NOGAL LA
NGZAAM EN VEROORZAAKT "HIKKEN" IN DE UIT
VOERING VAN HET BASIC PROGRAMMA..DE SNEL
STE MANIER OM EEN ARRAY TE SORTEREN IS M
ET BEHULP VAN EEN ROUTINE IN MACHINETAAL
 EN DEZE VANUIT HET BASIC PROGRAMMA AAN 
TE ROEPEN WANNEER SORTERING GEWENST IS..
OM DIT VANUIT MACHINETAAL TE REALISEREN 
MOETEN EERST EEN AANTAL PROBLEMEN OPGELO
ST WORDEN...     HOE WEET IK WELKE ARRAY
 IK MOET SORTEREN?..DE NAAM VAN DE LAATS
TE DOOR BASIC GERAADPLEEGDE VARIABELE NA
AM STAAT OP ADRESSEN 69 EN 70. LET WEL D
AT DE BASIC INTERPRETER DEZE KENMERKT OM
 ONDERSCHEID TE MAKEN TUSSEN INTEGERS,ST
RINGS EN FLOATING POINT VARIABELEN..DOOR
 DE OPDRACHT S$=X$(0) IN BASIC KOMT DE N
AAM VAN DE TE SORTEREN ARRAY  IN DIT GEV
AL X$ OP BOVENGENOEMD ADRES TE STAAN EN 
WORD ZO AAN DE MACHINETAAL-ROUTINE DOORG
EGEVEN...     WAAR STAAT DE TE SORTEREN 
STRINGARRAY?..HET BEGINADRES VAN ALLE AR
RAYS STAAT OP ADRESSEN 47 EN 48. OP DIT 
ADRES STAAT DE NAAM VAN DE EERSTE ARRAY 
IN 2 BYTES MET DAARNA DE OFFSET IN 2 BYT
ES NAAR DE VOLGENDE ARRAY..HIERMEE KUNNE
N WE ONZE VARIABELE ZOEKEN TOT HET EINDA
DRES VAN DE ARRAYS, WELK STAAT OP ADRESS
EN 49 EN 50, IS BEREIKT..INDIEN DE GEZOC
HTE ARRAY NIET IS GEVONDEN WORDT DE FOUT
BOODSCHAP "NOT FOUND" AFGEGEVEN EN HET B
ASIC PROGRAMMA STOPT...     HOE IS EEN S
TRINGARRAY IN BASIC OPGEBOUWD?..EEN STRI
NGARRAY BESTAAT UIT TWEE DELEN:.  1) DE 
ARRAY HEADER MET DE NAAM (2 BYTES), OFFS
ET VOLGENDE ARRAY (2 BYTES), DIMENSIE (1
 BYTE) EN PER DIMENSIE HET MAXIMUM AANTA
L ELEMENTEN (DIMENSIE X 2 BYTES)..  2) D
E STRING DESCRIPTORS WELKE PER ELEMENT B
ESTAAN UIT DE LENGTE (1 BYTE) EN HET ADR
ES (2 BYTES) VAN DE STRING BEHORENDE BIJ
 DAT ELEMENT...     WELKE SORTEERMETHODE
 KIES IK?..ALS SORTEERMETHODE KOOS IK DE
 ZOGENAAMDE "BUBBLE SORT"..DE ROUTINE DO
ORLOOPT DE ARRAY VAN BEGIN TOT EIND EN V
ERGELIJKT HET EERSTE ELEMENT MET HET TWE
EDE, DAARNA HET TWEEDE MET HET DERDE ENZ
..INDIEN BIJ VERGELIJKING BLIJKT DAT EEN
 ELEMENT GROTER IS DAN HET VOLGENDE WORD
EN ZIJ VERWISSELD..BIJ HET VERWISSELEN W
ORDEN ALLEEN DE STRING DESCRIPTORS VERWI
SSELD EN NIET DE STRINGS ZELF, OMDAT DIT
 VEEL SNELLER GAAT..ALS DE ROUTINE AAN H
ET EINDE VAN DE ARRAY IS GEKOMEN EN ER H
EEFT EEN VERWISSELING PLAATSGEVONDEN DAN
 HERHAALT DE CYCLUS ZICH OPNIEUW TOT DE 
ARRAY OP VOLGORDE LIGT EN NAAR HET BASIC
 PROGRAMMA WORD TERUGGESPRONGEN....DE SO
RTEERROUTINE WELKE HIERONDER IS GEPRINT 
WORDT OP ZIJN PLAATS IN HET GEHEUGENGEBI
ED VANAF 49152 ($C000) GEZET EN BESLAAT 
NOG GEEN 256 BYTES..VOORDELEN ZIJN : SNE
LLE SORTERING, MOGELIJKHEID OM VERSCHILL
ENDE STRINGARRAYS TE SORTEREN EN DE ROUT
INE KAN IN HET BASIC PROGRAMMA WORDEN OP
GENOMEN DMV DATA STATEMENTS..NADELEN ZIJ
N   : ALLEEN 1-DIMENSIONALE STRINGARRAYS
 KUNNEN WORDEN GESORTEERD EN MAAR OP EEN
 MANIER, DE ELEMENTEN WORDEN NAMELIJK VA
N BEGIN TOT EIND VERGELEKEN EN IN OPLOPE
NDE VOLGORDE GESORTEERD......10 REM  ***
***************************.11 REM  *   
                         *.12 REM  *    
  S U P E R S O R T     *.13 REM  *     
                       *.14 REM  *      
      DOOR            *.15 REM  *       
                     *.16 REM  *       N
ICK DEN BOER        *.17 REM  *         
                   *.18 REM  * SORTEERT 
WILLEKEURIGE      *.19 REM  * STRINGARRA
Y ALS VOLGT:     *.20 REM  * S$=X$(0):SY
S49152          *.21 REM  * DMV. S$=X$(0
) GEEF JE DE   *.22 REM  * NAAM VAN DE T
E SORTEREN    *.23 REM  * STRINGARRAY X$
(0) DOOR.    *.24 REM  * IPV. S$ MAG OOK
 EEN ANDERE *.25 REM  * VARIABELE WORDEN
 GEKOZEN   *.26 REM  *                  
          *.27 REM  ********************
**********.28 DATA166,047,165,048,134,09
5,133,096.29 DATA197,050,208,004,228,049
,240,029.30 DATA160,000,177,095,200,197,
069,208.31 DATA006,165,070,209,095,240,0
23,200.32 DATA177,095,024,101,095,170,20
0,177.33 DATA095,101,096,144,215,162,199
,134.34 DATA034,169,161,076,069,164,200,
177.35 DATA095,024,101,095,170,200,177,0
95.36 DATA101,096,133,037,056,138,233,00
3.37 DATA133,036,176,002,198,037,200,177
.38 DATA095,032,150,177,133,251,132,252.
39 DATA169,000,133,002,165,251,164,252.4
0 DATA196,037,208,004,197,036,176,122.41
 DATA133,095,132,096,160,000,177,095.42 
DATA133,253,200,177,095,141,166,192.43 D
ATA200,177,095,141,167,192,200,177.44 DA
TA095,133,254,200,177,095,141,163.45 DAT
A192,200,177,095,141,164,192,024.46 DATA
165,254,208,001,056,166,253,240.47 DATA0
25,176,023,197,253,176,001,170.48 DATA16
0,000,185,000,000,217,000,000.49 DATA208
,008,200,202,208,244,165,254.50 DATA197,
253,176,033,162,003,160,000.51 DATA177,0
95,072,160,003,177,095,160.52 DATA000,14
5,095,104,160,003,145,095.53 DATA230,095
,208,002,230,096,202,208.54 DATA229,169,
001,133,002,024,165,095.55 DATA164,096,1
05,003,144,130,200,076.56 DATA096,192,16
5,002,240,003,076,088.57 DATA192,096,305
64.58 A=49152:T=0.59 READX:IFX<256THENPO
KEA,X:T=T+X:A=A+1:GOTO59.60 IFT<>XTHENPR
INT"FOUT IN DATA"...ZIEHIER DE ASSEMBLER
 LISTING....1010:  C000                 
  *=   $C000.1020:  C000          ERROUT
   =    $A445.1030:  C000          SETAR
R   =    $B196.1040:  C000          ARRT
AB   =    $2F.1050:  C000          TEMP 
    =    $5F.1060:  C000          ENDARR
   =    $31.1070:  C000          VARNAM 
  =    $45.1080:  C000          ARREND  
 =    $24.1090:  C000          ARRSTART 
=    $FB.1100:  C000          LSTR1    =
    $FD.1110:  C000          LSTR2    = 
   $FE.1120:  C000          WISBIT   =  
  $02.                      ;@@@@@@@@@@@
@@@@@.                      ;@  SUPERSOR
T   @.                      ;@@@@@@@@@@@
@@@@@.1160:  C000 A6 2F    SRCHARR  LDX 
 ARRTAB.1170:  C002 A5 30             LD
A  ARRTAB+1.1180:  C004 86 5F    L001   
  STX  TEMP.1190:  C006 85 60           
  STA  TEMP+1.1200:  C008 C5 32         
    CMP  ENDARR+1.1210:  C00A D0 04     
        BNE  L002.1220:  C00C E4 31     
        CPX  ENDARR.1230:  C00E F0 1D   
          BEQ  L004.1240:  C010 A0 00   
 L002     LDY  #0.1250:  C012 B1 5F     
        LDA  (TEMP),Y.1260:  C014 C8    
            INY  .1270:  C015 C5 45     
        CMP  VARNAM.1280:  C017 D0 06   
          BNE  L003.1290:  C019 A5 46   
          LDA  VARNAM+1.1300:  C01B D1 5
F             CMP  (TEMP),Y.1310:  C01D 
F0 17             BEQ  L005.1320:  C01F 
C8       L003     INY  .1330:  C020 B1 5
F             LDA  (TEMP),Y.1340:  C022 
18                CLC  .1350:  C023 65 5
F             ADC  TEMP.1360:  C025 AA  
              TAX  .1370:  C026 C8      
          INY  .1380:  C027 B1 5F       
      LDA  (TEMP),Y.1390:  C029 65 60   
          ADC  TEMP+1.1400:  C02B 90 D7 
            BCC  L001.1410:  C02D A2 C7 
   L004     LDX  #$C7.1420:  C02F 86 22 
            STX  $22.1430:  C031 A9 A1  
           LDA  #$A1.1440:  C033 4C 45 A
4          JMP  ERROUT.1450:  C036 C8   
    L005     INY  .1460:  C037 B1 5F    
         LDA  (TEMP),Y.1470:  C039 18   
             CLC  .1480:  C03A 65 5F    
         ADC  TEMP.1490:  C03C AA       
         TAX  .1500:  C03D C8           
     INY  .1510:  C03E B1 5F            
 LDA  (TEMP),Y.1520:  C040 65 60        
     ADC  TEMP+1.1530:  C042 85 25      
       STA  ARREND+1.1540:  C044 38     
           SEC  .1550:  C045 8A         
       TXA  .1560:  C046 E9 03          
   SBC  #3.1570:  C048 85 24            
 STA  ARREND.1580:  C04A B0 02          
   BCS  L006.1590:  C04C C6 25          
   DEC  ARREND+1.1600:  C04E C8       L0
06     INY  .1610:  C04F B1 5F          
   LDA  (TEMP),Y.1620:  C051 20 96 B1   
       JSR  SETARR.1630:  C054 85 FB    
         STA  ARRSTART.1640:  C056 84 FC
             STY  ARRSTART+1.1650:  C058
 A9 00    L007     LDA  #0.1660:  C05A 8
5 02             STA  WISBIT.1670:  C05C
 A5 FB             LDA  ARRSTART.1680:  
C05E A4 FC             LDY  ARRSTART+1.1
690:  C060 C4 25    L008     CPY  ARREND
+1.1700:  C062 D0 04             BNE  L0
09.1710:  C064 C5 24             CMP  AR
REND.1720:  C066 B0 7A             BCS  
L011.1730:  C068 85 5F    L009     STA  
TEMP.1740:  C06A 84 60             STY  
TEMP+1.1750:  C06C A0 00    COMPARE  LDY
  #0.1760:  C06E B1 5F             LDA  
(TEMP),Y.1770:  C070 85 FD             S
TA  LSTR1.1780:  C072 C8                
INY  .1790:  C073 B1 5F             LDA 
 (TEMP),Y.1800:  C075 8D A6 C0          
STA  CMPL4+1.1810:  C078 C8             
   INY  .1820:  C079 B1 5F             L
DA  (TEMP),Y.1830:  C07B 8D A7 C0       
   STA  CMPL4+2.1840:  C07E C8          
      INY  .1850:  C07F B1 5F           
  LDA  (TEMP),Y.1860:  C081 85 FE       
      STA  LSTR2.1870:  C083 C8         
       INY  .1880:  C084 B1 5F          
   LDA  (TEMP),Y.1890:  C086 8D A3 C0   
       STA  CMPL3+1.1900:  C089 C8      
          INY  .1910:  C08A B1 5F       
      LDA  (TEMP),Y.1920:  C08C 8D A4 C0
          STA  CMPL3+2.1930:  C08F 18   
             CLC  .1940:  C090 A5 FE    
         LDA  LSTR2.1950:  C092 D0 01   
          BNE  CMPL1.1960:  C094 38     
           SEC  .1970:  C095 A6 FD    CM
PL1    LDX  LSTR1.1980:  C097 F0 19     
        BEQ  CMPL5.1990:  C099 B0 17    
         BCS  CMPL5.2000:  C09B C5 FD   
          CMP  LSTR1.2010:  C09D B0 01  
           BCS  CMPL2.2020:  C09F AA    
            TAX  .2030:  C0A0 A0 00    C
MPL2    LDY  #0.2040:  C0A2 B9 00 C0 CMP
L3    LDA  $C000,Y.2050:  C0A5 D9 00 C0 
CMPL4    CMP  $C000,Y.2060:  C0A8 D0 08 
            BNE  CMPL5.2070:  C0AA C8   
             INY  .2080:  C0AB CA       
         DEX  .2090:  C0AC D0 F4        
     BNE  CMPL3.2100:  C0AE A5 FE       
      LDA  LSTR2.2110:  C0B0 C5 FD      
       CMP  LSTR1.2120:  C0B2 B0 21    C
MPL5    BCS  L010.2130:  C0B4 A2 03    W
ISSEL   LDX  #3.2140:  C0B6 A0 00    WIS
L1    LDY  #0.2150:  C0B8 B1 5F         
    LDA  (TEMP),Y.2160:  C0BA 48        
        PHA  .2170:  C0BB A0 03         
    LDY  #3.2180:  C0BD B1 5F           
  LDA  (TEMP),Y.2190:  C0BF A0 00       
      LDY  #0.2200:  C0C1 91 5F         
    STA  (TEMP),Y.2210:  C0C3 68        
        PLA  .2220:  C0C4 A0 03         
    LDY  #3.2230:  C0C6 91 5F           
  STA  (TEMP),Y.2240:  C0C8 E6 5F       
      INC  TEMP.2250:  C0CA D0 02       
      BNE  WISL2.2260:  C0CC E6 60      
       INC  TEMP+1.2270:  C0CE CA       
WISL2    DEX  .2280:  C0CF D0 E5        
     BNE  WISL1.2290:  C0D1 A9 01       
      LDA  #$01.2300:  C0D3 85 02       
      STA  WISBIT.2310:  C0D5 18       L
010     CLC  .2320:  C0D6 A5 5F         
    LDA  TEMP.2330:  C0D8 A4 60         
    LDY  TEMP+1.2340:  C0DA 69 03       
      ADC  #3.2350:  C0DC 90 82         
    BCC  L008.2360:  C0DE C8            
    INY  .2370:  C0DF 4C 60 C0          
JMP  L008.2380:  C0E2 A5 02    L011     
LDA  WISBIT.2390:  C0E4 F0 03           
  BEQ  EINDE.2400:  C0E6 4C 58 C0       
   JMP  L007.2410:  C0E9 60       EINDE 
   RTS  ..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL