home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1993 November / 1993-11.d64 / promos (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  318b  |  7 lines
  1. 10 rem*boot program for easy does it & promos v2.0*by hugh rountree*12/31/92*
  2. 20 d$="8":d=peek(186):ifd>7thend$=right$(str$(d),len(str$(d))-1)
  3. 30 printchr$(147):print:print"load";chr$(34);"pb";chr$(34);","d$",1"
  4. 40 fori=1to9:printchr$(13);:next:print"poke56,32:new":print:print
  5. 50 print"load";chr$(34);"easy does it";chr$(34);","d$;chr$(19);
  6. 60 fori=631to633:readda:pokei,da:nexti:poke198,3:new:data13,13,131
  7.