home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / TASS-1.DSK / STARTUP.bas < prev    next >
BASIC Source File  |  2014-09-09  |  813b  |  12 lines
  1. 5  IF  PEEK(64435) < >6  THEN  GOTO 28
  2. 10  HOME : VTAB 11: PRINT "            Sparker Brothers"
  3. 20  VTAB 13: PRINT "               Presents.."
  4. 22  VTAB 18: PRINT "Call:": PRINT "MindFog Elite.......714/733-8859 10keg": PRINT "Devils Tower........714/775-4294 30keg": PRINT "Electric Warehouse..714/775-2350 25keg"
  5. 23  GOTO 30
  6. 28  HOME : VTAB 11: PRINT "            SPARKER BROTHERS"
  7. 29  VTAB 13: PRINT "               PRESENTS..": VTAB 18: PRINT "CALL:": PRINT "MINDFOG ELITE.......714/733-8859 10KEG": PRINT "DEVILS TOWER........714/775-4294 30KEG": PRINT "ELECTRIC WAREHOUSE..714/775-2350 25KEG"
  8. 30  PRINT  CHR$(4);"BLOAD PYRO.PIC,A$2000"
  9. 40  POKE 49232,1: POKE 49234,1: POKE 49236,1: POKE 49239,1
  10. 50  GET A$
  11. 60  PRINT 
  12. 70  PRINT  CHR$(4);"PREFIX": INPUT A$: PRINT  CHR$(4);"PREFIX";A$: PRINT  CHR$(4);"-ADVENT"