/ 64'er / 64ER_CD.iso / 89xx / 8902d.d64 / quicksort_demo

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 39 09 7f 09 d4 09 00 0a | 33 00 20 54 48 52 45 45 |9.......|3. THREE|
|00000010| 20 52 4f 55 54 49 4e 45 | 53 20 57 4f 52 4b 20 54 | ROUTINE|S WORK T|
|00000020| 4f 47 45 54 48 45 52 20 | 54 4f 20 46 4f 52 4d 20 |OGETHER |TO FORM |
|00000030| 51 55 49 43 4b 53 4f 52 | 54 00 14 23 00 20 51 55 |QUICKSOR|T..#. QU|
|00000040| 49 43 4b 53 4f 52 54 20 | 3a 3a 20 50 41 52 54 49 |ICKSORT |:: PARTI|
|00000050| 54 49 4f 4e 20 3a 3a 20 | 53 57 41 50 00 1e 04 00 |TION :: |SWAP....|
|00000060| 00 28 12 70 01 00 00 04 | 7a 02 01 72 03 72 04 72 |.(.p....|z..r.r.r|
|00000070| 05 7c 00 32 12 8c 8f 06 | 00 04 05 93 8f 07 00 04 |.|.2....|........|
|00000080| 05 93 94 c5 00 3c 28 7f | 08 07 03 10 07 04 10 07 |.....<(.|........|
|00000090| 03 10 07 04 16 00 20 53 | 4f 52 54 20 41 24 28 4c |...... S|ORT A$(L|
|000000a0| 45 46 54 27 3a 52 49 47 | 48 54 27 29 00 46 05 7d |EFT':RIG|HT').F.}|
|000000b0| 01 00 50 04 00 00 5a 11 | 70 08 00 00 04 72 03 72 |..P...Z.|p....r.r|
|000000c0| 04 72 09 72 0a 7b 00 64 | 30 09 06 0c 02 04 03 04 |.r.r.{.d|0.......|
|000000d0| 04 27 47 02 00 02 25 13 | 3c 00 20 47 45 54 20 4d |.'G...%.|<. GET M|
|000000e0| 49 44 44 4c 45 20 45 4c | 45 4d 45 4e 54 20 41 53 |IDDLE EL|EMENT AS|
|000000f0| 20 50 49 56 4f 54 00 6e | 17 95 00 20 50 45 52 46 | PIVOT.n|... PERF|
|00000100| 4f 52 4d 20 53 57 41 50 | 50 49 4e 47 53 00 78 14 |ORM SWAP|PINGS.x.|
|00000110| 97 06 06 0c 02 07 09 16 | 31 99 07 09 02 00 01 3d |........|1......=|
|00000120| 9a 00 82 14 97 06 06 0c | 02 07 0a 16 2b 99 07 0a |........|....+...|
|00000130| 02 00 01 40 9a 00 8c 26 | 68 04 09 04 0a 2e 6a 7f |...@...&|h.....j.|
|00000140| 0b 0c 02 07 09 1c 12 0c | 02 07 0a 1c 18 07 09 02 |........|........|
|00000150| 00 01 3d 42 07 0a 02 00 | 01 40 42 00 96 0c da 04 |..=B....|.@B.....|
|00000160| 09 04 0a 30 96 00 00 00 | a0 2a 68 04 03 04 0a 2a |...0....|.*h....*|
|00000170| 6a 7f 08 07 03 10 07 0a | 10 07 03 10 07 0a 16 00 |j.......|........|
|00000180| 20 53 4f 52 54 20 41 24 | 28 4c 45 46 54 27 3a 4a | SORT A$|(LEFT':J|
|00000190| 29 00 aa 2b 68 04 09 04 | 04 2a 6a 7f 08 07 09 10 |)..+h...|.*j.....|
|000001a0| 07 04 10 07 09 10 07 04 | 16 00 20 53 4f 52 54 20 |........|.. SORT |
|000001b0| 41 24 28 49 3a 52 49 47 | 48 54 27 29 00 b4 05 7d |A$(I:RIG|HT')...}|
|000001c0| 08 00 be 04 00 00 c8 0d | 70 0b 00 00 02 77 02 77 |........|p....w.w|
|000001d0| 0c 7b 00 d2 14 09 07 06 | 02 3c 09 02 06 0c 3c 42 |.{......|.<....<B|
|000001e0| 09 0c 06 07 3c 42 00 dc | 05 7d 0b 00 e6 04 00 00 |....<B..|.}......|
|000001f0| f0 1e 00 20 44 45 4d 4f | 20 4f 46 20 54 48 49 53 |... DEMO| OF THIS|
|00000200| 20 53 4f 52 54 20 46 4f | 4c 4c 4f 57 53 00 fa 04 | SORT FO|LLOWS...|
|00000210| 00 01 04 14 8c 8f 0d 01 | 02 00 01 90 02 00 32 92 |........|......2.|
|00000220| 02 00 23 93 c5 01 0e 09 | 07 0e 02 00 00 3a 01 18 |..#.....|.....:..|
|00000230| 09 97 5c 37 98 00 00 01 | 22 09 07 0e 02 00 01 3d |..\7....|"......=|
|00000240| 01 2c 0b af 0c 0d 07 0e | 1c b2 b3 01 36 06 9b 00 |.,......|....6...|
|00000250| 00 01 40 04 00 01 4a 19 | 00 20 53 4f 52 54 20 45 |..@...J.|. SORT E|
|00000260| 52 52 4f 52 20 4d 45 53 | 53 41 47 45 53 3a 01 54 |RROR MES|SAGES:.T|
|00000270| 04 00 01 5e 19 5f 03 10 | 53 4f 52 54 49 4e 47 20 |...^._..|SORTING |
|00000280| 53 54 41 52 54 45 44 3a | 65 60 61 01 68 13 7f 01 |STARTED:|e`a.h...|
|00000290| 09 0d 12 02 00 01 0d 07 | 0e 10 02 00 23 13 01 72 |........|....#..r|
|000002a0| 22 00 20 20 20 20 20 20 | 20 20 20 20 20 5e 20 20 |".      |     ^  |
|000002b0| 20 20 20 5e 20 20 20 20 | 20 5e 20 20 20 20 20 5e |   ^    | ^     ^|
|000002c0| 01 7c 3d 00 20 20 20 20 | 20 20 20 20 20 20 20 21 |.|=.    |       !|
|000002d0| 20 20 20 20 20 21 20 20 | 20 20 20 21 20 20 20 20 |     !  |   !    |
|000002e0| 20 2b 2d 3e 4c 45 4e 47 | 54 48 20 4f 46 20 53 54 | +->LENG|TH OF ST|
|000002f0| 52 49 4e 47 20 49 4e 20 | 41 52 52 41 59 01 86 46 |RING IN |ARRAY..F|
|00000300| 00 20 20 20 20 20 20 20 | 20 20 20 20 21 20 20 20 |.       |    !   |
|00000310| 20 20 21 20 20 20 20 20 | 2b 2d 2d 2d 2d 2d 2d 2d |  !     |+-------|
|00000320| 3e 4e 55 4d 42 45 52 20 | 4f 46 20 53 54 52 49 4e |>NUMBER |OF STRIN|
|00000330| 47 53 20 49 4e 20 41 52 | 52 41 59 20 54 4f 20 53 |GS IN AR|RAY TO S|
|00000340| 4f 52 54 01 90 48 00 20 | 20 20 20 20 20 20 20 20 |ORT..H. |        |
|00000350| 20 20 21 20 20 20 20 20 | 2b 2d 2d 2d 2d 2d 2d 2d |  !     |+-------|
|00000360| 2d 2d 2d 2d 2d 2d 3e 31 | 20 48 45 52 45 20 4d 45 |------>1| HERE ME|
|00000370| 41 4e 53 20 53 54 41 52 | 54 20 57 49 54 48 20 46 |ANS STAR|T WITH F|
|00000380| 49 52 53 54 20 52 45 43 | 4f 52 44 01 9a 43 00 20 |IRST REC|ORD..C. |
|00000390| 20 20 20 20 20 20 20 20 | 20 20 2b 2d 2d 2d 2d 2d |        |  +-----|
|000003a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 3e 4e |--------|------>N|
|000003b0| 41 4d 45 20 4f 46 20 54 | 48 45 20 41 52 52 41 59 |AME OF T|HE ARRAY|
|000003c0| 59 20 54 4f 20 42 45 20 | 53 4f 52 54 45 44 01 a4 |Y TO BE |SORTED..|
|000003d0| 04 00 01 ae 1f 00 20 50 | 52 49 4e 54 20 54 48 45 |...... P|RINT THE|
|000003e0| 20 53 4f 52 54 45 44 20 | 4d 45 53 53 41 47 45 53 | SORTED |MESSAGES|
|000003f0| 3a 01 b8 04 00 01 c2 22 | 82 09 0f 00 02 00 01 84 |:......"|........|
|00000400| 04 0e 85 88 5f 04 09 64 | 66 03 01 3a 65 67 0c 0d |...._..d|f..:eg..|
|00000410| 07 09 16 65 60 61 89 01 | cc 04 00 01 d6 04 9f 01 |...e`a..|........|
|00000420| e0 04 00 01 ea 33 00 20 | 53 54 41 52 54 2d 4f 46 |.....3. |START-OF|
|00000430| 2d 44 41 54 41 20 3a 3a | 3a 20 54 4f 20 42 45 20 |-DATA ::|: TO BE |
|00000440| 52 45 41 44 20 49 4e 54 | 4f 20 53 54 52 49 4e 47 |READ INT|O STRING|
|00000450| 20 41 52 52 41 59 01 f4 | 04 00 01 fe 15 aa ae 0c | ARRAY..|........|
|00000460| 46 4f 52 4d 41 54 20 45 | 52 52 4f 52 ab 00 00 02 |FORMAT E|RROR....|
|00000470| 08 15 aa ae 0c 53 59 4e | 54 41 58 20 45 52 52 4f |.....SYN|TAX ERRO|
|00000480| 52 ab 00 00 02 12 16 aa | ae 0d 54 59 50 45 20 43 |R.......|..TYPE C|
|00000490| 4f 4e 46 4c 49 43 54 ab | 00 00 02 1c 20 aa ae 17 |ONFLICT.|.... ...|
|000004a0| 46 55 4e 43 54 49 4f 4e | 20 41 52 47 55 4d 45 4e |FUNCTION| ARGUMEN|
|000004b0| 54 20 45 52 52 4f 52 ab | 00 00 02 26 2e aa ae 25 |T ERROR.|...&...%|
|000004c0| 53 54 41 54 45 4d 45 4e | 54 20 54 4f 4f 20 4c 4f |STATEMEN|T TOO LO|
|000004d0| 4e 47 20 4f 52 20 54 4f | 4f 20 43 4f 4d 50 4c 49 |NG OR TO|O COMPLI|
|000004e0| 43 41 54 45 44 ab 00 00 | 02 30 15 aa ae 0c 53 59 |CATED...|.0....SY|
|000004f0| 53 54 45 4d 20 45 52 52 | 4f 52 ab 00 00 02 3a 16 |STEM ERR|OR....:.|
|00000500| aa ae 0d 4e 41 4d 45 20 | 54 4f 4f 20 4c 4f 4e 47 |...NAME |TOO LONG|
|00000510| ab 00 00 02 44 16 aa ae | 0d 42 52 41 43 4b 45 54 |....D...|.BRACKET|
|00000520| 20 45 52 52 4f 52 ab 00 | 00 02 4e 11 aa ae 08 4f | ERROR..|..N....O|
|00000530| 56 45 52 46 4c 4f 57 ab | 00 00 02 58 26 aa ae 1d |VERFLOW.|...X&...|
|00000540| 45 52 52 4f 52 20 49 4e | 20 53 54 52 55 43 54 55 |ERROR IN| STRUCTU|
|00000550| 52 45 44 20 53 54 41 54 | 45 4d 45 4e 54 ab 00 00 |RED STAT|EMENT...|
|00000560| 02 62 20 aa ae 17 45 52 | 52 4f 52 20 49 4e 20 47 |.b ...ER|ROR IN G|
|00000570| 4f 54 4f 20 53 54 41 54 | 45 4d 45 4e 54 ab 00 00 |OTO STAT|EMENT...|
|00000580| 02 6c 17 aa ae 0e 53 54 | 41 43 4b 20 4f 56 45 52 |.l....ST|ACK OVER|
|00000590| 46 4c 4f 57 ab 00 00 02 | 76 19 aa ae 10 55 4e 4b |FLOW....|v....UNK|
|000005a0| 4e 4f 57 4e 20 56 41 52 | 49 41 42 4c 45 ab 00 00 |NOWN VAR|IABLE...|
|000005b0| 02 80 1e aa ae 15 50 52 | 4f 43 45 44 55 52 45 20 |......PR|OCEDURE |
|000005c0| 50 41 52 41 4d 20 45 52 | 52 4f 52 ab 00 00 02 8a |PARAM ER|ROR.....|
|000005d0| 1a aa ae 11 49 4e 44 45 | 58 2f 50 41 52 41 4d 20 |....INDE|X/PARAM |
|000005e0| 45 52 52 4f 52 ab 00 00 | 02 94 18 aa ae 0f 53 55 |ERROR...|......SU|
|000005f0| 42 53 54 52 49 4e 47 20 | 45 52 52 4f 52 ab 00 00 |BSTRING |ERROR...|
|00000600| 02 9e 36 aa ae 2d 43 4f | 4d 4d 41 4e 44 2c 20 41 |..6..-CO|MMAND, A|
|00000610| 52 52 41 59 2c 20 53 55 | 42 53 54 52 49 4e 47 2c |RRAY, SU|BSTRING,|
|00000620| 20 4f 52 20 50 52 4f 43 | 45 44 55 52 45 20 45 52 | OR PROC|EDURE ER|
|00000630| 52 4f 52 ab 00 00 02 a8 | 14 aa ae 0b 49 4e 44 45 |ROR.....|....INDE|
|00000640| 58 20 45 52 52 4f 52 ab | 00 00 02 b2 1f aa ae 16 |X ERROR.|........|
|00000650| 49 4c 4c 45 47 41 4c 20 | 4e 4f 2e 20 4f 46 20 49 |ILLEGAL |NO. OF I|
|00000660| 4e 44 49 43 45 53 ab 00 | 00 02 bc 20 aa ae 17 53 |NDICES..|... ...S|
|00000670| 54 52 49 4e 47 20 41 53 | 53 49 47 4e 4d 45 4e 54 |TRING AS|SIGNMENT|
|00000680| 20 45 52 52 4f 52 ab 00 | 00 02 c6 20 aa ae 17 46 | ERROR..|... ...F|
|00000690| 55 4e 43 54 49 4f 4e 20 | 41 52 47 55 4d 45 4e 54 |UNCTION |ARGUMENT|
|000006a0| 20 45 52 52 4f 52 ab 00 | 00 02 d0 18 aa ae 0f 4e | ERROR..|.......N|
|000006b0| 4f 54 20 49 4d 50 4c 45 | 4d 45 4e 54 45 44 ab 00 |OT IMPLE|MENTED..|
|000006c0| 00 02 da 1d aa ae 14 5a | 4f 4e 45 20 56 41 4c 55 |.......Z|ONE VALU|
|000006d0| 45 20 49 4e 43 4f 52 52 | 45 43 54 ab 00 00 02 e4 |E INCORR|ECT.....|
|000006e0| 11 aa ae 08 53 54 45 50 | 20 3d 20 30 ab 00 00 02 |....STEP| = 0....|
|000006f0| ee 18 aa ae 0f 41 52 52 | 41 59 20 52 45 44 45 46 |.....ARR|AY REDEF|
|00000700| 49 4e 45 44 ab 00 00 02 | f8 18 aa ae 0f 44 49 4d |INED....|.....DIM|
|00000710| 45 4e 53 49 4f 4e 20 45 | 52 52 4f 52 ab 00 00 03 |ENSION E|RROR....|
|00000720| 02 13 aa ae 0a 43 41 53 | 45 20 45 52 52 4f 52 ab |.....CAS|E ERROR.|
|00000730| 00 00 03 0c 14 aa ae 0b | 45 4e 44 20 4f 46 20 44 |........|END OF D|
|00000740| 41 54 41 ab 00 00 03 16 | 1a aa ae 11 46 49 4c 45 |ATA.....|....FILE|
|00000750| 20 41 4c 52 45 41 44 59 | 20 4f 50 45 4e ab 00 00 | ALREADY| OPEN...|
|00000760| 03 20 19 aa ae 10 46 49 | 4c 45 20 49 4e 50 55 54 |. ....FI|LE INPUT|
|00000770| 20 45 52 52 4f 52 ab 00 | 00 03 2a 14 aa ae 0b 45 | ERROR..|..*....E|
|00000780| 4e 44 2d 4f 46 2d 46 49 | 4c 45 ab 00 00 03 34 16 |ND-OF-FI|LE....4.|
|00000790| aa ae 0d 46 49 4c 45 20 | 4e 4f 54 20 4f 50 45 4e |...FILE |NOT OPEN|
|000007a0| ab 00 00 03 3e 19 aa ae | 10 43 4f 4e 20 4e 4f 54 |....>...|.CON NOT|
|000007b0| 20 50 4f 53 53 49 42 4c | 45 ab 00 00 03 48 1d aa | POSSIBL|E....H..|
|000007c0| ae 14 45 52 52 4f 52 20 | 49 4e 20 50 52 49 4e 54 |..ERROR |IN PRINT|
|000007d0| 20 55 53 49 4e 47 ab 00 | 00 03 52 19 aa ae 10 44 | USING..|..R....D|
|000007e0| 49 56 49 53 49 4f 4e 20 | 42 59 20 5a 45 52 4f ab |IVISION |BY ZERO.|
|000007f0| 00 00 03 5c 1e aa ae 15 | 50 52 4f 47 52 41 4d 20 |...\....|PROGRAM |
|00000800| 4e 4f 54 20 50 52 45 50 | 41 53 53 45 44 ab 00 00 |NOT PREP|ASSED...|
|00000810| 03 66 17 aa ae 0e 46 49 | 4c 45 20 4e 4f 54 20 46 |.f....FI|LE NOT F|
|00000820| 4f 55 4e 44 ab 00 00 03 | 70 17 aa ae 0e 4e 4f 54 |OUND....|p....NOT|
|00000830| 20 49 4e 50 55 54 20 46 | 49 4c 45 ab 00 00 03 7a | INPUT F|ILE....z|
|00000840| 1b aa ae 12 44 45 56 49 | 43 45 20 4e 4f 54 20 50 |....DEVI|CE NOT P|
|00000850| 52 45 53 45 4e 54 ab 00 | 00 03 84 18 aa ae 0f 4e |RESENT..|.......N|
|00000860| 4f 54 20 4f 55 54 50 55 | 54 20 46 49 4c 45 ab 00 |OT OUTPU|T FILE..|
|00000870| 00 03 8e 1f aa ae 16 53 | 54 52 49 4e 47 20 4e 4f |.......S|TRING NO|
|00000880| 54 20 44 49 4d 45 4e 53 | 49 4f 4e 45 44 ab 00 00 |T DIMENS|IONED...|
|00000890| 03 98 1c aa ae 13 54 4f | 4f 20 4d 41 4e 59 20 46 |......TO|O MANY F|
|000008a0| 49 4c 45 53 20 4f 50 45 | 4e ab 00 00 03 a2 14 aa |ILES OPE|N.......|
|000008b0| ae 0b 45 4e 44 20 4f 46 | 20 54 41 50 45 ab 00 00 |..END OF| TAPE...|
|000008c0| 03 ac 17 aa ae 0e 54 4f | 4f 20 4d 41 4e 59 20 4e |......TO|O MANY N|
|000008d0| 41 4d 45 53 ab 00 00 03 | b6 24 aa ae 1b 46 55 4e |AMES....|.$...FUN|
|000008e0| 43 54 49 4f 4e 20 56 41 | 4c 55 45 20 4e 4f 54 20 |CTION VA|LUE NOT |
|000008f0| 52 45 54 55 52 4e 45 44 | ab 00 00 03 c0 16 aa ae |RETURNED|........|
|00000900| 0d 55 53 45 52 20 45 52 | 52 4f 52 20 23 31 ab 00 |.USER ER|ROR #1..|
|00000910| 00 03 ca 16 aa ae 0d 55 | 53 45 52 20 45 52 52 4f |.......U|SER ERRO|
|00000920| 52 20 23 32 ab 00 00 03 | d4 04 00 03 de 10 00 20 |R #2....|....... |
|00000930| 45 4e 44 2d 4f 46 2d 44 | 41 54 41 03 e8 04 00 00 |END-OF-D|ATA.....|
|00000940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000980| 00 00 00 00 00 09 51 55 | 49 43 4b 53 4f 52 54 01 |......QU|ICKSORT.|
|00000990| 41 05 4c 45 46 54 27 06 | 52 49 47 48 54 27 06 52 |A.LEFT'.|RIGHT'.R|
|000009a0| 45 43 4c 45 4e 05 50 49 | 56 4f 54 06 42 55 46 46 |ECLEN.PI|VOT.BUFF|
|000009b0| 45 52 09 50 41 52 54 49 | 54 49 4f 4e 01 49 01 4a |ER.PARTI|TION.I.J|
|000009c0| 04 53 57 41 50 01 42 07 | 4d 45 53 53 41 47 45 09 |.SWAP.B.|MESSAGE.|
|000009d0| 4d 45 53 53 41 47 45 4e | 4f 00 00 a9 cc 17       |MESSAGEN|O.....  |
+--------+-------------------------+-------------------------+--------+--------+