home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1994 May / 64er_Magazin_94-05_1994_Markt__Technik_de_Side_A.d64 / c-cars-3-patch (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  279b  |  16 lines
  1. 10 input"fastload (y/n)";a$
  2. 15 ifa$="y"then a$=chr$(76):goto22
  3. 20 a$=chr$(96)
  4. 22 print"disc1!":getb$:ifb$=""then22
  5. 25 tr=8:s=9:gosub50
  6. 30 print"disc2!":getb$:ifb$=""then30
  7. 40 tr=17:s=1:gosub50
  8. 45 end
  9. 50 open2,8,2,"#"
  10. 55 open15,8,15
  11. 60 print#15,"u1 2 0";tr;s
  12. 65 print#15,"b-p 2";4
  13. 70 print#2,a$;
  14. 75 print#15,"u2 2 0";tr;s
  15. 80 close2:close15:return
  16.