10 D$ =  CHR$ (4)
# set HIMEM to $7530
 15  HIMEM: 30000
 20  PRINT D$"BLOAD GRAPHIX II"
# this is executed to install the ampersand handler
 30  PRINT D$"BRUN AMPER"
 40  PRINT D$"BLOAD SKETCHZ,A$7F1F
 45  PRINT D$"BLOAD CF.MISC,A$1EFF
 50  PRINT D$"BLOAD CAVE,A$2000"
 55  PRINT D$"BLOAD BAD BREATH,A$3C00"
 60  PRINT "^DBLOAD CF.OBJ"
 65  PRINT "^DBLOAD SB2"
 70  PRINT "^DBLOAD LBOLT"
# run main program at $4200
 80  POKE 104,66: POKE 16896,0
 100  PRINT "^DRUN CF