Classic Computer Magazine Archive ST-Log ISSUE 27 / JANUARY 1989 / PAGE 7

READER COMMENT

Attention Owners of Enhanced ST BASIC!

It has come to our attention that, due to ST BASIC'S recent enhancement, the keyword DEF SEG is no longer supported. This means that people with enhanced ST BASIC cannot run the "BASIC loader" programs, such as the one used to create "The DEGAS Fast Loader" from the September '88 issue of ST-Log.

Owners of enhanced ST BASIC should make the following changes to any of the BASIC loader programs that they wish to run:

First, delete lines 100 through 200 from the BASIC loader program you wish to modify (such as Listing 1 of the DEGAS Fast Loader), and then add the following code:

90 'REPLACE "FILENAME.EXT"
 IN LINE 100 WITH THE PROP
ER FILENAME
100 OPEN"R",#1,"A:FILENAME
.EXT",16:FIELD#1,16 AS B$
110 A$="": FOR I=1 TO 16:RE
AD U$:IF U$="*" THEN 140
120 A=UAL ("&H"+U$):PRINT "
*";:A$=A$+CHR$(A):NEXT
130 LSET B$=A$:R=R+l:PUT 1
,R:GOTO 110
140 CLOSE 1:PRINT:PRINT "A
LL DONE!"

Now, go to the next-to-the-last line in the BASIC Loader program (on the DEGAS Fast Loader that would be Line 3090) and add enough 00's to the data to make the line 16 bytes long. For example, for the DEGAS Fast Loader, you would modify Line 3090 so that it looks like this:

3090 data 06,0E,04,04,04,04,04,06,00,00,00,00,00,00, 00,00

The program should now run properly with enhanced ST BASIC.

Use ST Check to validate your typing before making the above changes. The modified program will not yield the same checksums.