APPENDIX NINETEEN
XL/XE Programs
BASIC Software Toggle
This is a version of the BASIC switcher routine used in a public do-
main program called "RamMaster," available on the Gateway BBS,
St. Louis, Missouri, used here with permission by its author, Matt
Ratcliff. The program creates an AUTORUN.SYS file which prompts
you to turn BASIC on and off; there's no need to hold down the OP-
TION key when booting a disk. When you turn it off from DOS, you
gain the 8K RAM it occupies; DOS takes advantage of this memory
space for copy and disk duplication routines. Refer back to the
XL/XE memory map for more information.
800XL BASIC Switcher
10 GRAPHICS 0:DIM A$(10):? "800XL BASIC SWI
TCHER"
15 PRINT "By Matthew Ratcliff 3/25/85"
20 PRINT :PRINT "GET DOS DISK READY AND PRE
SS RTN;"
25 INPUT A$
30 TRAP 200:OPEN #1,8,0,"D:AUTORUN.SYS"
40 RESTORE
50 READ A:IF A<0 THEN 100
60 PUT #1,A:GOTO 50
100 CLOSE #1:PRINT "BASIC SWITCHER READY."
105 PRINT "PUT THIS FILE ON ALL YOUR 'BASIC
'"
110 PRINT "PROGRAMMING DISKS.":PRINT
115 PRINT "SAVE THIS LOADER AS A BACKUP!"
120 END
200 PRINT "UNEXPECTED ERROR ";PEEK(195)
210 PRINT "AT LINE ";PEEK(186)+256*PEEK(187
):END
1000 DATA 255,255,0,52,236,53,173,250,3,240
,1
1005 DATA 96,32,160,53,76,34,52,184,176
1010 DATA 176,216,204,160,194,193,211,201,1
95
1015 DATA 160,211,247,233,244,227,232,229,2
42,155,4
1020 DATA 162,12,160,52,32,120,53,76,56,52,
194
1025 DATA 249,160,205,225,244,170,210,225,2
44
1030 DATA 155,4,162,44,160,52,32,120,53,76,
88
1035 DATA 52,80,114,101,115,115,32,35,32
1040 DATA 97,110,100,32,210,212,206,32,107,
101
1045 DATA 121,58,155,4,162,66,160,52,32,120
1050 DATA 53,76,115,52,91,49,93,32,66,65,83
1055 DATA 73,67,32,160,207,206,160,160,155
1060 DATA 4,162,98,160,52,32,120,53,76,142,
52,91
1065 DATA 50,93,32,66,65,83,73,67
1070 DATA 32,160,207,198,198,160,155,4,162,
125
1075 DATA 160,52,32,120,53,32,203,53,201,50
1080 DATA 208,41,173,1,211,9,2,141,1,211,16
9
1085 DATA 192,133,106,32,160,53,76,187,52
1090 DATA 160,194,193,211,201,195,160,207,1
98
1095 DATA 198,160,155,4,162,174,160,52,32,1
20,53
1100 DATA 76,62,53,201,49,240,3,76,79,53,17
3,1,211
1105 DATA 41,253,141,1,211,169,160
1110 DATA 133,106,32,160,53,76,235,52,160,1
94
1115 DATA 193,211,201,195,160,207,206,160,2
9,155
1120 DATA 4,162,222,160,52,32,120,53,173,22
6,168
1125 DATA 201,96,208,48,76,31,53,82,69
1130 DATA 86,46,66,32,45,32,195,239,238,244
,225,227
1135 DATA 244,160,193,212,193,210,201,160
1140 DATA 230,239,242,160,210,197,214,174,1
95
1145 DATA 160,161,155,4,162,252,160,52,32,1
20,53
1150 DATA 76,62,53,201,234,208,17,76,55,53,
82,69
1155 DATA 86,46,67,155,4,162,48,160
1160 DATA 53,32,120,53,76,71,53,29,29,29,29
,155
1165 DATA 4,162,65,160,53,32,120,53
1170 DATA 96,76,107,53,160,194,193,196,160,
203
1175 DATA 197,217,253,32,32,32,80,82,69,83
1180 DATA 83,32,160,210,212,206,160,155,4
1185 DATA 162,82,160,53,32,120,53,32,203,53
,76
1190 DATA 0,52,142,68,3,134,208,140,69,3,13
2,209
1195 DATA 160,0,140,72,3,140,73,3
1200 DATA 177,208,201,4,240,6,238,72,3,200,
208
1205 DATA 244,169,11,162,0,141,66,3,76
1210 DATA 86,228,162,96,169,12,157,66,3,32,
86,228
1215 DATA 162,96,169,3,157,66,3,169
1220 DATA 200,157,68,3,169,53,157,69,3,169,
0
1225 DATA 157,75,3,169,28,157,74,3,76
1230 DATA 86,228,83,58,0,162,0,169,5,157
1235 DATA 66,3,169,0,157,68,3,169,4,157
1240 DATA 69,3,169,4,157,72,3,169,0,157
1245 DATA 73,3,32,86,228,173,0,4,96,226
1250 DATA 2,227,2,0,52,-1
DOWNLOAD SWITCHER.BAS
ROM OS to RAM OS Toggle
The second program is a short version ot the "RamMaster" also on
the Gateway BBS; it turns your ROM OS into a RAM OS and traps RE-
SET so that if you press it. it doesn't jump back to ROM When you
press RESET. the routine leaves the block at 52224-53247 ($CC00-
$CFFF) intact, so any altered character set you've loaded there will
remain untouched. It also creates an AUTORUN.SYS file, so if you
want it on the same disk as the BASIC switcher above, you'll have to
rename it (line 30). The RESET handler routine loads into page 6 at
byte 1616 ($650). Both programs can be loaded trom DOS with the
"L" command.
ROM to RAM OS Handler
10 GRAPHICS 0:DIM A$(10):? "ROM TO RAM O/S
HANDLER"
15 PRINT "BY Matthew Ratcliff 3/25/85"
20 PRINT :PRINT "GET DOS DISK READY AND PRE
SS RTN";
25 INPUT A$
30 TRAP 200:OPEN #1,8,0,"D:AUTORUN.SYS"
40 RESTORE
50 READ A:IF A<0 THEN 100
60 PUT #1,A:GOTO 50
100 CLOSE #1:PRINT "64K 'XL ROM->RAM O/S C
ONVERTER"
105 PRINT "AUTORUN.SYS FILE COMPLETE."
110 PRINT "BE SURE TO SAVE THIS LOADER"
115 PRINT "AS A BACKUP!":END
200 PRINT "UNEXPECTED ERROR ";
205 PRINT PEEK(195):PRINT "AT LINE ";PEEK(1
86)+256*PEEK (187)
210 END
1000 DATA 255,255,0,52,105,53,169,80,133,2
1005 DATA 133,216,169,6,133,3,133,217,165,9
1010 DATA 9,2,133,9,160,0,169,144,133,222,1
69
1015 DATA 52,133,223,173,60,53,133,214,177
1020 DATA 222,145,216,230,222,208,2,230,223
1025 DATA 230,216,208,2,230,217,198,214,208
,236,76
1030 DATA 91,52,205,225,244,170,210,225,244
,167
1035 DATA 243,160,210,207,205,173,190,210,1
93,205
1040 DATA 160,200,225,238,228,236,229,242,1
60,242
1045 DATA 229,225,228,249,174,155,4,162,56,
160
1050 DATA 52,32,61,53,76,136,52,160,160,160
,208
1055 DATA 210,197,211,211,160,167,210,197,2
11
1060 DATA 197,212,167,160,203,229,249,160,2
44
1065 DATA 239,160,229,238,225,226,236,229,1
74,160,160
1070 DATA 155,4,162,101,160,52,32,61,53,96
1075 DATA 169,80,133,2,169,6,133,3,165,9
1080 DATA 9,2,133,9,120,169,0,141,47,2,133
1085 DATA 16,141,0,212,141,14,210,141,14
1090 DATA 212,133,219,169,1,133,66,169,192
1095 DATA 133,217,169,204,133,218,160,0,240
,81,169
1100 DATA 216,133,217,132,218,230,219,208,7
1
1105 DATA 169,128,133,16,141,14,210,169,64,
141,14
1110 DATA 212,169,34,141,47,2,141,0,212,198
1115 DATA 66,88,162,96,169,12,157,66,3,32
1120 DATA 86,228,162,96,169,3,157,66,3,169
1125 DATA 83,141,0,4,169,58,141,1,4,169
1130 DATA 4,157,69,3,169,0,157,75,3,157
1135 DATA 68,3,169,28,157,74,3,76,86,228
1140 DATA 132,216,173,1,211,9,1,141,1,211
1145 DATA 177,216,170,173,1,211,41,254,141,
1
1150 DATA 211,138,145,216,230,216,208,230,2
30
1155 DATA 217,165,218,197,217,208,222,165,2
19,240,135
1160 DATA 208,143,173,142,68,3,134,212,140
1165 DATA 69,3,132,213,160,0,140,72,3,140,7
3
1170 DATA 3,177,212,201,4,240,11,238,72,3
1175 DATA 208,3,238,73,3,200,208,239,169,11
1180 DATA 162,0,141,66,3,76,86,228,226,2,22
7
1185 DATA 2,0,52,-1
DOWNLOAD ROMTORAM.BAS
BASIC Revision B Fix
This small program "fixes" your Revision B BASIC (see above) by
copying BASIC ROM to RAM and writing the correct bytes into the
location. This brings your BASIC B up to BASIC C, without needing the
ROM chips or cartridge to do so (I still recommend that you acquire
a new Revision C ROM from Atari). This means your BASIC is also
alterable, since it is in RAM now. Matt the wizard does it again. I sug-
gest you get onto the Gateway BBS and download his programs if
you haven't already done so.
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
DOWNLOAD REVBTOC.BAS
Return to Table of Contents
| Previous Chapter
| Next Chapter