home *** CD-ROM | disk | FTP | other *** search
/ PC Online 1996 October / PCO_10.ISO / filesbbs / imcombat.arj / IMMORTAL.ZIP / SCRIPTS / RANDOM.TXT < prev   
Encoding:
Text File  |  1994-10-22  |  551 b   |  31 lines
  1. ;Cause iMMortal To Initiate a random encounter
  2. attack
  3. quit
  4.  
  5. ;DeaD Label iMMortal Jumps here if player is Killed during Attack Command
  6. :DEAD
  7. quit
  8.  
  9. ;RunAway Label iMMortal Jumps here if players is Killed during Attack Command
  10. :RUNAWAY
  11. changecolor 12 0
  12. writeln "      What A Wimp!"
  13. goto pressenter
  14. quit
  15.  
  16.  
  17. ;Press Enter Loop
  18. :pressenter
  19. changecolor 2 0
  20. writeln " "
  21. write  "      Press "
  22. changecolor 13 0
  23. write "["
  24. changecolor 15 0
  25. write "Enter"
  26. changecolor 13 0
  27. write "] "
  28. changecolor 2 0
  29. write "To Continue "
  30. waitenter
  31. return