home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / MISC / AB-OVRRD.ZIP / OVERRIDE.SCR < prev    next >
Text File  |  1998-01-26  |  1KB  |  41 lines
  1. ;
  2. ; OVERRIDE.SCR - Allows Chat Override by ACS                 Last modified:
  3. ;                                                          January 26, 1998
  4. ;                                                             Ken Reaverson
  5. ;
  6. ; This script mimics Renegade's ability to allow users of a certain ACS
  7. ; level to override the chat status and page the sysop anyway. It was
  8. ; a feature I kinda missed, and I didn't really feel like having two
  9. ; seperate menu commands, one for regular chat, one for emergency. Hence
  10. ; the existance of this script.
  11. ;
  12. ; To install this script, follow the instructions set forth in the README.1ST
  13. ; file and make any changes to the script itself, if necessary, as directed
  14. ; below.
  15. ;
  16. ACS !XC JUMP OVERRIDE
  17. ACS XC JUMP SYSIN
  18.  
  19. :OVERRIDE
  20. VARIABLE PAGEOP BOOLEAN
  21. NOYES PAGEOP "~SM|04Sysop is not available. Override? [No]: |12"
  22. IF "$PAGEOP$" "YES"
  23.    MENU OCF;Sysop
  24. ENDIF
  25. IF "$PAGEOP$" "NO"
  26.    MENU OCSysop
  27. ENDIF
  28. ;If you've changed your Yes and No strings in the language file, you'll
  29. ;need to change them in the IF statements to match up (ie, my Yes and No
  30. ;strings are Aye for Yes and Nay for No, and I'd have to change Yes to Aye
  31. ;and No to Nay within this script in order for it to run properly)
  32. JUMP END
  33.  
  34. :SYSIN
  35. MENU OCSysop
  36. JUMP END
  37. ;This section simply mimics the normal default Chat command on the main menu
  38.  
  39. :END
  40. ENDSCRIPT
  41.