home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disc 14 / Commodore_Disc_14_19xx_-_de.d64 / bloodmon (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  447b  |  20 lines
  1. 1000 rem ******************************
  2. 1010 rem ******** bloodmon ************
  3. 1020 rem ******************************
  4. 1030 poke53280,5:poke53281,6:poke646,7
  5. 1040 print"[147]"
  6. 1045 ifa=0thena=1:load"bmmas",8,1
  7. 1050 poke211,16:poke214,3:sys58732
  8. 1060 print"bloodmon"
  9. 1070 poke211,6:poke214,7:sys58732
  10. 1080 print"block oriented disk monitor"
  11. 1085 poke646,5
  12. 1090 poke211,13:poke214,11:sys58732
  13. 1100 print"by p. pusztay"
  14. 1110 poke646,1
  15. 1120 poke211,13:poke214,20:sys58732
  16. 1130 print"insert disk !"
  17. 1140 a$="":geta$:ifa$=""then1140
  18. 1150 sys6*4096
  19. 1160 goto1030
  20.