1 REM OPEN15,8,15,"S0:BOOTSLOW":CLOSE15:SAVE "0:BOOTSLOW",8:VERIFY"0:BOOTSLOW",8
10 PRINT "[147]"; : REM CLEAR SCREEN
20 POKE 53281,0: REM BACKGROUND BLACK
25 POKE 53280,0: REM BORDER     BLACK
27 PRINT "";  : REM PENCOLOR GREEN
100 PRINT CHR$(142)"[164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]";
110 PRINT "COMAL 0.14  POWER DRIVER IS BEING LOADED";
120 PRINT
130 PRINT "[153] THIS BOOT PROGRAM WORKS WITH ALL DISK"
145 PRINT "                DRIVES."
150 PRINT
155 PRINT
156 PRINT "[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";
160 PRINT "[221]     [150]FOR MORE INFO SEND SASE TO:      [221]";
162 PRINT "[171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]";
170 PRINT "[221]  [158]COMAL USERS GROUP, U.S.A., LIMITED  [221]";
180 PRINT "[221]          [158]6041 MONONA DRIVE           [221]";
185 PRINT "[221]          [158]MADISON, WI 53716           [221]";
190 PRINT "[221]             [158]608-222-4432             [221]";
200 PRINT "[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]";
210 PRINT
230 PRINT "  COMAL PROGRAMS CAN ONLY BE EXECUTED"
240 PRINT "  AFTER THE LANGUAGE HAS BEEN LOADED."
245 PRINT "[159]"; : REM PENCOLOR CYAN
275 PRINT "[164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164][164]";
280 PRINT "   BACKUP THIS DISK BEFORE YOU USE IT   [146]";
899 REM
910 REM CHAIN"HI + <RETURN KEY>
920 [151] 198,9
930 [151] 631,[198]("C")
940 [151] 632,[198]("H")
950 [151] 633,[198]("A")
960 [151] 634,[198]("I")
970 [151] 635,[198]("N")
980 [151] 636,34
990 [151] 637,[198]("H")
1000 [151] 638,[198]("I")
1010 [151] 639,13
1020 [147] "POWER DRIVER",8