home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / IMPERIUM.DSK / HELLO.bas < prev    next >
BASIC Source File  |  2014-09-09  |  386b  |  13 lines
  1. 10  HOME 
  2. 20  HTAB 10: VTAB 8: PRINT "THIS IS THE GAME SIDE"
  3. 30  HTAB 20: PRINT "OF"
  4. 35  HTAB 12: INVERSE : PRINT "IMPERIUM  GALACTUM": NORMAL 
  5. 40  HTAB 01: VTAB 12: PRINT "TO BOOT GAME FLIP DISK AND PRESS RETURN"
  6. 45  ONERR  GOTO 90
  7. 50  POKE 49168,0
  8. 60 Z =  PEEK(49152): IF Z <128  THEN 60
  9. 70  IF Z = 141  THEN 90
  10. 80  GOTO 50
  11. 90  PR# 6
  12. 59999  END 
  13. 60000  &  DEL "HELLO": &  SAVE "HELLO"