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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL