
HALGOL 48 V1.02

        START    END    LENGTH
MATH.O  $2000   $34E3   $14E4
HAL.O   $3600   $38A6   $02A7
HAL.P   $3A00   $495D   $0F5E
EDIT.O  $4C00   $5D13   $1114
ENTER.O $6000   $7229   $122A
LET.O   $7300   $7F41   $0C42



BUILDER

 100 HOME : TEXT :P = 38383:Q = P - 102
 120 PRINT "INSERT DISK 1 IN DRIVE 2, AND THEN"
 130 PRINT "KEY RETURN"
 140 PRINT CHR$(4);"BLOAD UTIL7,A$8600,D1"
 150 INPUT Z$
 160 PRINT CHR$(4);"BLOAD APPLE.IO,A$8600,D2"
 170 PRINT CHR$(4);"BLOAD MATH.O,A$1FF8,D2"
 180 PRINT CHR$(4);"BSAVE APPLE.O,A$8600,L$1000,D1"
 200 D = 2: GOSUB 500
 210 PRINT CHR$(4);"BLOAD HAL.O,A$35F8,D2"
 220 PRINT CHR$(4);"BLOAD HAL.P,A$39F8"
 230 D = 3: GOSUB 500
 240 PRINT CHR$(4);"BLOAD EDIT.O,A$4BF8"
 250 D = 4: GOSUB 500
 260 PRINT CHR$(4);"BLOAD ENTER.O,A$5FF8"
 262 D = 5: GOSUB 500
 265 PRINT CHR$(4);"BLOAD LET.O,A$72F8"
 270 PRINT CHR$(4);"BSAVE HALGOL.O,A$2000,L$6000,D1"
 280 PRINT : PRINT "THE BINARY FILES ARE BUILT": PRINT
 290 PRINT CHR$(4);"RUN LOADER"
 500 PRINT "INSERT DISK ";D," IN DRIVE 2, AND THEN"
 510 PRINT "KEY RETURN"
 520 INPUT Z$
 530 RETURN


