APPENDIX NINETEEN



Revision B BASIC to Revision C Converter

10 REM 800XL & 64K-600XL REV.B(UGS)
20 REM BASIC TO REV.C CONVERTER.
30 REM By Matthew J. W. Ratcliff 4/5/85
40 REM THIS LOADER WILL CREATE AN
50 REM AUTORUN.SYS FILE FOR YOU.
60 REM ADVISABLE TO MOVE DOWN RAMTOP
70 REM WHEN IN THE RAM/BASIC, SINCE
80 REM SOME ATARI GRAPHICS COMMANDS
90 REM WILL CLEAR RAM ABOVE RAMTOP.
100 REM (i.e. POKE 106,PEEK(106)-4:GR.0-6)
110 REM (i.e. POKE 106,PEEK(106)-16:GR.7-11
    )
120 RESTORE
130 GRAPHICS 0:DIM A$(10)
140 ? "GET DOS DISK READY FOR REV.B TO C"
150 ? "AUTORUN FILE AND PRESS RETURN KEY"
160 TRAP 220: INPUT A$
170 OPEN #1,8,0,"D:AUTORUN.SYS"
180 READ A:IF A<0 THEN 200
190 PUT #1,A:GOTO 180
200 CLOSE #1:? "** ALL DONE **"
210 ? "SAVE THIS LOADER AS A BACKUP":? "JUS
    T IN CASE!":END
220 ? "ERROR # ";PEEK(195);" AT LINE ";PEEK
    (186)+256*PEEK(187):END
1000 DATA 255,255,0,6,130,6,169,0,133,2
1010 DATA 169,6,133,3,173,250,3,240,1,96
1020 DATA 169,0,133,216,169,160,133,217,160
     ,0
1030 DATA 173,1,211,41,253,141,1,211,177,21
     6
1040 DATA 72,173,1,211,9,2,141,1,211,104
1050 DATA 145,216,230,216,208,228,230,217,1
     65,217
1060 DATA 201,192,208,220,162,0,169,12,133,
     218
1070 DATA 160,0,189,95,6,133,216,232,189,95
1080 DATA 6,133,217,232,189,95,6,145,216,23
     2
1090 DATA 198,218,208,232,165,9,9,2,133,9
1100 DATA 96,223,168,234,224,168,240,225,16
     8,17
1110 DATA 226,168,234,41,187,0,243,191,0,24
     4
1120 DATA 191,0,245,191,0,246,191,0,247,191
1130 DATA 0,248,191,0,249,191,0,226,2,227
1140 DATA 2,0,6,-1