home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Demos / XENUUTH.SDA / XENUUTH.S (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  385b  |  14 lines
  1. 1 PRINTCHR$(14):POKE808,239:POKE792,193
  2. 10 A$(1)="XENUUTH 13"
  3. 20 _AA$(1),1
  4. 30 POKE53280,11:_J1,11
  5. 31 PRINT"[147]":PRINT"INPUT NUMBER OF TIMES TO VIEW":PRINT"(10)":INPUTV
  6. 40 PRINT"[147]"
  7. 50 PRINT"             [193]NY [203]EY TO [214]IEW"
  8. 51 PRINT"  [214]OIDMONSTER/[210]ANDALL [198]LAGG PRODUCTION"
  9. 60 GETB$:IFB$=""THEN60
  10. 70 _D0:_B1,V
  11. 75 PRINT"[147]                  [212]HE [197]ND"
  12. 80 FORI=0TO25:_DI:PRINT""I:NEXT:PRINT"[154]":POKE808,237:POKE792,71
  13. 90 END
  14.