home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Coverdisks / CDU / V1D3.D64 / basic+ (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  368 b   |  15 lines

  1. 10 IFF=1THENGOTO110
  2. 20 PRINTCHR$(147)CHR$(17)CHR$(17)CHR$(17)CHR$(17)
  3. 30 POKE53280,1:POKE53281,1
  4. 40 PRINTCHR$(154);:PRINTTAB(17)"BASIC+"
  5. 50 PRINTCHR$(17);:PRINTTAB(19)"BY"
  6. 60 PRINTCHR$(17);:PRINTTAB(15)"G.D.GAYLER"
  7. 70 PRINTCHR$(17)CHR$(17)CHR$(17)CHR$(28);:PRINTTAB(14)"PLEASE  WAIT"
  8. 80 POKE52,207:POKE56,207:F=1
  9. 90 LOAD"BASIC+.MC",8,1
  10. 100 REM LOAD"BASIC+.MC",1,1
  11. 110 PRINTCHR$(147)CHR$(17)CHR$(17)"ENTER BASIC+  WITH :-"
  12. 120 PRINTCHR$(17)CHR$(17)"SYS(51200)"
  13. 130 POKE52,160:POKE56,160
  14. 140 END
  15.