0 'SORTHI.RT2   (c)1988 Wilson Van Alst  [76576,2735]
1 'Loads a version of SORTHI.CO that
2 'will return to a BASIC program that
3 'CALLs or RUNM's it, or to the T200
4 'main menu if it's run from there.
5 'SORTHI was written by Phil Wheeler,
6 'based on a routine by Rick Perry.
7 '
10 CLS:PRINT@85,"Loading SORTH1.CO";
20 FORN=63574TO63858:PRINT@170,N:READR:T=T+R:POKEN,R:NEXT
40 IFT=37801THENSAVEM"SORTH1",63574,63858,63574:MENU
50 SAVEM"SORT",63574,63858,63574
10000 DATA 205,77,79,205,42,42,205,62,79,33
10010 DATA 84,249,205,158,103,205,246,84,215,202
10020 DATA 61,249,33,112,239,229,43,35,205,19
10030 DATA 16,119,254,46,202,127,248,183,194,113
10040 DATA 248,17,80,249,6,4,205,186,65,209
10050 DATA 62,10,205,79,110,202,43,249,205,140
10060 DATA 110,34,111,249,175,50,110,249,42,111
10070 DATA 249,229,205,250,248,34,113,249,225,235
10080 DATA 72,42,113,249,229,205,250,248,34,113
10090 DATA 249,225,120,183,202,198,248,197,213,229
10100 DATA 205,237,248,225,209,193,220,208,248,195
10110 DATA 165,248,58,110,249,183,194,150,248,195
10120 DATA 86,248,197,229,17,112,239,205,167,50
10130 DATA 209,235,12,205,96,60,17,112,239,193
10140 DATA 4,205,189,65,65,62,255,50,110,249
10150 DATA 201,235,26,190,192,19,5,200,35,13
10160 DATA 194,238,248,201,6,0,126,254,26,200
10170 DATA 35,4,202,17,249,254,13,194,252,248
10180 DATA 126,254,10,192,35,4,192,205,77,79
10190 DATA 209,225,6,100,126,231,35,5,194,24
10200 DATA 249,195,34,249,33,99,249,205,158,103
10210 DATA 195,49,249,33,22,111,205,158,103,205
10220 DATA 69,79,33,64,249,205,158,103,205,229
10230 DATA 114,0,201,0,80,114,101,115,115,32
10240 DATA 83,112,97,99,101,32,66,97,114,0
10250 DATA 46,68,79,0,70,105,108,101,32,116
10260 DATA 111,32,115,111,114,116,63,32,0,76
10270 DATA 111,110,103,32,76,105,110,101,33,0
10280 DATA 0,0,0,0,0