00000000: 01 08 49 08 00 00 83 20 33 32 2C 31 31 35 2C 30 |..I.... 32,115,0|
00000010: 2C 31 33 33 2C 39 37 2C 31 36 39 2C 31 32 38 2C |,133,97,169,128,|
00000020: 31 33 33 2C 39 38 2C 33 32 2C 31 31 35 2C 30 2C |133,98,32,115,0,|
00000030: 32 34 30 2C 37 2C 39 2C 31 32 38 2C 31 33 33 2C |240,7,9,128,133,|
00000040: 39 38 2C 33 32 2C 31 31 35 00 93 08 01 00 83 20 |98,32,115...... |
00000050: 30 2C 31 36 35 2C 34 37 2C 31 33 33 2C 39 39 2C |0,165,47,133,99,|
00000060: 31 36 35 2C 34 38 2C 31 33 33 2C 31 30 30 2C 31 |165,48,133,100,1|
00000070: 36 30 2C 30 2C 31 36 35 2C 39 37 2C 32 30 39 2C |60,0,165,97,209,|
00000080: 39 39 2C 32 30 38 2C 37 2C 32 30 30 2C 31 36 35 |99,208,7,200,165|
00000090: 2C 39 38 00 D8 08 02 00 83 20 32 30 39 2C 39 39 |,98...... 209,99|
000000A0: 2C 32 34 30 2C 32 30 2C 32 34 2C 31 36 30 2C 32 |,240,20,24,160,2|
000000B0: 2C 31 37 37 2C 39 39 2C 31 30 31 2C 39 39 2C 37 |,177,99,101,99,7|
000000C0: 32 2C 32 30 30 2C 31 37 37 2C 39 39 2C 31 30 31 |2,200,177,99,101|
000000D0: 2C 31 30 30 2C 31 33 33 00 21 09 03 00 83 20 31 |,100,133.!.... 1|
000000E0: 30 30 2C 31 30 34 2C 31 33 33 2C 39 39 2C 31 34 |00,104,133,99,14|
000000F0: 34 2C 32 32 31 2C 31 36 30 2C 35 2C 31 37 37 2C |4,221,160,5,177,|
00000100: 39 39 2C 31 33 33 2C 31 30 32 2C 32 30 30 2C 31 |99,133,102,200,1|
00000110: 37 37 2C 39 39 2C 31 33 33 2C 31 30 31 2C 32 30 |77,99,133,101,20|
00000120: 38 00 6E 09 04 00 83 20 32 2C 31 39 38 2C 31 30 |8.n.... 2,198,10|
00000130: 32 2C 31 39 38 2C 31 30 31 2C 32 34 2C 31 36 35 |2,198,101,24,165|
00000140: 2C 39 39 2C 31 30 35 2C 37 2C 31 33 33 2C 39 39 |,99,105,7,133,99|
00000150: 2C 31 36 35 2C 31 30 30 2C 31 30 35 2C 30 2C 31 |,165,100,105,0,1|
00000160: 33 33 2C 31 30 30 2C 31 36 35 2C 31 30 31 00 B9 |33,100,165,101..|
00000170: 09 05 00 83 20 32 30 38 2C 32 2C 31 39 38 2C 31 |.... 208,2,198,1|
00000180: 30 32 2C 31 39 38 2C 31 30 31 2C 32 30 38 2C 34 |02,198,101,208,4|
00000190: 2C 31 36 35 2C 31 30 32 2C 32 34 30 2C 31 38 2C |,165,102,240,18,|
000001A0: 31 33 33 2C 31 30 35 2C 31 36 32 2C 30 2C 31 33 |133,105,162,0,13|
000001B0: 34 2C 31 30 33 2C 31 33 34 00 01 0A 06 00 83 20 |4,103,134...... |
000001C0: 31 30 34 2C 31 36 35 2C 39 39 2C 31 33 33 2C 31 |104,165,99,133,1|
000001D0: 30 36 2C 31 36 35 2C 31 30 30 2C 31 33 33 2C 31 |06,165,100,133,1|
000001E0: 30 37 2C 32 34 30 2C 32 32 34 2C 32 34 30 2C 31 |07,240,224,240,1|
000001F0: 31 34 2C 32 34 2C 31 36 35 2C 31 30 36 2C 31 30 |14,24,165,106,10|
00000200: 35 00 4B 0A 07 00 83 20 33 2C 31 33 33 2C 31 30 |5.K.... 3,133,10|
00000210: 36 2C 31 36 35 2C 31 30 37 2C 31 30 35 2C 30 2C |6,165,107,105,0,|
00000220: 31 33 33 2C 31 30 37 2C 32 33 30 2C 31 30 33 2C |133,107,230,103,|
00000230: 32 30 38 2C 32 2C 32 33 30 2C 31 30 34 2C 31 36 |208,2,230,104,16|
00000240: 30 2C 32 2C 31 37 37 2C 31 30 36 00 94 0A 08 00 |0,2,177,106.....|
00000250: 83 20 31 35 33 2C 31 30 39 2C 30 2C 31 33 36 2C |. 153,109,0,136,|
00000260: 31 36 2C 32 34 38 2C 31 36 30 2C 35 2C 31 37 37 |16,248,160,5,177|
00000270: 2C 31 30 36 2C 31 35 33 2C 31 30 39 2C 30 2C 31 |,106,153,109,0,1|
00000280: 33 36 2C 31 39 32 2C 32 2C 32 30 38 2C 32 34 36 |36,192,2,208,246|
00000290: 2C 31 37 30 00 DD 0A 09 00 83 20 35 36 2C 32 32 |,170...... 56,22|
000002A0: 39 2C 31 30 39 2C 31 34 34 2C 32 2C 31 36 36 2C |9,109,144,2,166,|
000002B0: 31 30 39 2C 31 36 30 2C 32 35 35 2C 32 33 32 2C |109,160,255,232,|
000002C0: 32 30 30 2C 32 30 32 2C 32 30 38 2C 38 2C 31 36 |200,202,208,8,16|
000002D0: 35 2C 31 31 32 2C 31 39 37 2C 31 30 39 00 23 0B |5,112,197,109.#.|
000002E0: 0A 00 83 20 31 34 34 2C 31 30 2C 31 37 36 2C 33 |... 144,10,176,3|
000002F0: 34 2C 31 37 37 2C 31 31 33 2C 32 30 39 2C 31 31 |4,177,113,209,11|
00000300: 30 2C 32 34 30 2C 32 33 38 2C 31 36 2C 32 36 2C |0,240,238,16,26,|
00000310: 31 36 30 2C 32 2C 31 38 35 2C 31 31 32 2C 30 2C |160,2,185,112,0,|
00000320: 31 34 35 00 6C 0B 0B 00 83 20 31 30 36 2C 31 33 |145.l.... 106,13|
00000330: 36 2C 31 36 2C 32 34 38 2C 31 36 30 2C 35 2C 31 |6,16,248,160,5,1|
00000340: 38 35 2C 31 30 36 2C 30 2C 31 34 35 2C 31 30 36 |85,106,0,145,106|
00000350: 2C 31 33 36 2C 31 39 32 2C 32 2C 32 30 38 2C 32 |,136,192,2,208,2|
00000360: 34 36 2C 31 36 39 2C 30 2C 31 33 33 00 B9 0B 0C |46,169,0,133....|
00000370: 00 83 20 31 30 35 2C 31 36 35 2C 31 30 31 2C 31 |.. 105,165,101,1|
00000380: 39 37 2C 31 30 33 2C 32 30 38 2C 31 35 32 2C 31 |97,103,208,152,1|
00000390: 36 35 2C 31 30 32 2C 31 39 37 2C 31 30 34 2C 32 |65,102,197,104,2|
000003A0: 30 38 2C 31 34 36 2C 31 36 35 2C 31 30 35 2C 32 |08,146,165,105,2|
000003B0: 34 30 2C 31 33 38 2C 39 36 00 FB 0B 64 00 81 20 |40,138,96...d.. |
000003C0: 4A B2 34 39 31 35 32 20 A4 20 34 39 33 39 34 3A |J.49152 . 49394:|
000003D0: 20 87 20 58 3A 20 97 20 4A 2C 58 3A 20 82 3A 20 | . X: . J,X: .: |
000003E0: 8F 20 54 48 49 53 20 49 53 20 41 4C 4C 20 54 48 |. THIS IS ALL TH|
000003F0: 41 54 27 53 20 4E 45 45 44 45 44 00 35 0C 6E 00 |AT'S NEEDED.5.n.|
00000400: 99 20 22 55 53 45 20 53 59 53 20 34 39 31 35 32 |. "USE SYS 49152|
00000410: 3A 58 20 54 4F 20 53 4F 52 54 20 41 52 52 41 59 |:X TO SORT ARRAY|
00000420: 20 58 24 28 29 2C 20 46 4F 52 20 45 58 41 4D 50 | X$(), FOR EXAMP|
00000430: 4C 45 3A 2D 22 00 5A 0C E7 03 8F 20 2A 2A 2A 20 |LE:-".Z.... *** |
00000440: 36 2D 32 37 2E 20 20 44 45 4D 4F 4E 53 54 52 41 |6-27. DEMONSTRA|
00000450: 54 49 4F 4E 3A 2D 20 2A 2A 2A 00 72 0C E8 03 85 |TION:- ***.r....|
00000460: 20 22 53 49 5A 45 20 4F 46 20 41 52 52 41 59 22 | "SIZE OF ARRAY"|
00000470: 3B 4E 00 7F 0C F2 03 86 20 58 59 24 28 4E 29 00 |;N...... XY$(N).|
00000480: A4 0C FC 03 81 20 4A B2 31 20 A4 20 4E 3A 20 58 |..... J.1 . N: X|
00000490: 59 24 28 4A 29 B2 C4 28 BB 28 31 29 AC 31 30 30 |Y$(J)..(.(1).100|
000004A0: 29 3A 20 82 00 B7 0C 06 04 99 20 22 53 4F 52 54 |): ....... "SORT|
000004B0: 49 4E 47 2E 2E 2E 22 00 C6 0C 10 04 9E 20 34 39 |ING..."...... 49|
000004C0: 31 35 32 3A 58 59 00 E1 0C 1A 04 81 20 4A B2 30 |152:XY...... J.0|
000004D0: 20 A4 20 4E 3A 20 99 20 58 59 24 28 4A 29 3A 20 | . N: . XY$(J): |
000004E0: 82 00 00 00 |.... |
..I.... 32,115,0,133,97,169,128,133,98,3
2,115,0,240,7,9,128,133,98,32,115......
0,165,47,133,99,165,48,133,100,160,0,165
,97,209,99,208,7,200,165,98.X.... 209,99
,240,20,24,160,2,177,99,101,99,72,200,17
7,99,101,100,133.!.... 100,104,133,99,14
4,221,160,5,177,99,133,102,200,177,99,13
3,101,208.N.... 2,198,102,198,101,24,165
,99,105,7,133,99,165,100,105,0,133,100,1
65,101...... 208,2,198,102,198,101,208,4
,165,102,240,18,133,105,162,0,134,103,13
4...... 104,165,99,133,106,165,100,133,1
07,240,224,240,114,24,165,106,105.K....
3,133,106,165,107,105,0,133,107,230,103,
208,2,230,104,160,2,177,106...... 153,10
9,0,136,16,248,160,5,177,106,153,109,0,1
36,192,2,208,246,170...... 56,229,109,14
4,2,166,109,160,255,232,200,202,208,8,16
5,112,197,109.#.... 144,10,176,34,177,11
3,209,110,240,238,16,26,160,2,185,112,0,
145.L.... 106,136,16,248,160,5,185,106,0
,145,106,136,192,2,208,246,169,0,133....
.. 105,165,101,197,103,208,152,165,102,1
97,104,208,146,165,105,240,138,96...D..
J.49152 . 49394: . X: . J,X: .: . THIS I
S ALL THAT'S NEEDED.5.N.. "USE SYS 49152
:X TO SORT ARRAY X$(), FOR EXAMPLE:-".Z.
... *** 6-27. DEMONSTRATION:- ***.R....
"SIZE OF ARRAY";N..... XY$(N)...... J.
1 . N: XY$(J).D(.(1).100): ....... "SORT
ING...".F.... 49152:XY...... J.0 . N: .
XY$(J): ....