home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / PCLPACK.ZIP / NICE.ZIP / MACS.ZIP / NODEDOWN.CTL < prev    next >
Encoding:
Text File  |  1992-06-22  |  470 b   |  13 lines
  1. if (%MULTI%)=(TRUE) then goto (start)
  2. say(&CR&&11&Sorry, %FNAME%, this system is not running the Multinode version of the)
  3. say(Powerboard BBS Package.&CR&&CR&&3&If you feel this would be a good addition to the BBS, please contact)
  4. say(your Sysop, %SYSOP%.&CR&)
  5. enter
  6. return
  7. *start
  8. loadsub(control\macros\mwho.ctl)
  9. menuask%cron%(&CR&&3&Please enter the number of the &11&node &3&to shut down&12&: &15&*)
  10. if (%resp%)=(<CR>) then return
  11. nodedown(%resp%)
  12. return
  13.