home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64-128Toolkit / POWERDRIVER.SDA / FASTBOOT (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  1.6 KB  |  53 lines
  1. 1 REM OPEN15,8,15,"S0:FASTBOOT":CLOSE15:SAVE "0:FASTBOOT",8
  2. 10 PRINT "[147]"; : REM CLEAR SCREEN
  3. 20 POKE 53281,0: REM BACKGROUND BLACK
  4. 25 POKE 53280,0: REM BORDER     BLACK
  5. 27 PRINT "";   : REM PENCOLOR GREEN
  6. 30 IF A=1 THEN 90
  7. 35 OPEN 15,8,15,"U;"
  8. 40 INPUT#15,D1,A$,D2,D3
  9. 41 IF A$="OK" THEN PRINT#15,"U:":INPUT#15,D1,A$,D2,D3
  10. 43 IF "1571"=MID$(A$,14,4)THENPRINT#15,"U0>M0":CLOSE15:GOTO70
  11. 50 CLOSE15
  12. 60 IF "1541"<>MID$(A$,14,4) THEN 100
  13. 70 PRINT"[147]LOADING ML.SIZZLE
  14. 80 [139] A[178]0 [167] A[178]1:[147]"0:ML.SIZZLE",8,1
  15. 90 [158] 49152:[156]
  16. 100 [153] "LOADTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTO";
  17. 110 [153] "COMAL 0.14  POWER DRIVER IS BEING LOADED";
  18. 120 [153]
  19. 130 [153] "PRINT  THIS BOOT PROGRAM IS FAST LOADING"
  20. 145 [153] "  COMAL. IT IS INTENDED FOR 1541/1571"
  21. 150 [153] "  DISK DRIVES ONLY. IF YOU HAVE
  22. 151 PRINT "  PROBLEMS PLEASE BOOT AGAIN WITH:
  23. 152 [153]
  24. 153 [153] "LOAD "[199](34)"BOOTSLOW"[199](34)",8"
  25. 154 [153] "RUN
  26. 155 PRINT
  27. 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]";
  28. 160 PRINT "[221]      [150]FOR MORE INFO SEND SASE TO      [221]";
  29. 165 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]";
  30. 170 PRINT "[221]  [158]COMAL USERS GROUP, U.S.A., LIMITED  [221]";
  31. 180 PRINT "[221]         [158]6041 MONONA DRIVE            [221]";
  32. 185 PRINT "[221]         [158]MADISON, WI 53716            [221]";
  33. 186 PRINT "[221]           [158]608-222-4432               [221]";
  34. 190 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]";
  35. 210 PRINT
  36. 230 PRINT "  COMAL PROGRAMS CAN ONLY BE EXECUTED"
  37. 240 PRINT "  AFTER THE LANGUAGE HAS BEEN LOADED."
  38. 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]";
  39. 280 PRINT "   BACKUP THIS DISK BEFORE YOU USE IT   [146]";
  40. 899 REM
  41. 910 REM CHAIN"HI + <RETURN KEY>
  42. 920 [151] 198,9
  43. 930 [151] 631,[198]("C")
  44. 940 [151] 632,[198]("H")
  45. 950 [151] 633,[198]("A")
  46. 960 [151] 634,[198]("I")
  47. 970 [151] 635,[198]("N")
  48. 980 [151] 636,34
  49. 990 [151] 637,[198]("H")
  50. 1000 [151] 638,[198]("I")
  51. 1010 [151] 639,13
  52. 1020 [147] "POWER.DRIVER",8
  53.