home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / umich / telecomm / fnordadl / fn132src.zoo / scripts / bbs.g next >
Encoding:
Text File  |  1991-09-02  |  589 b   |  33 lines
  1. set v 1
  2. cd d:\secret
  3. while { $v > 0 }
  4.     if { -e ctdltabl.sys } == 0
  5.     configur x
  6.     endif
  7.     citadel +line +ymodem +purge +netdebug +zap
  8.     if { $status == 0 }
  9.     set v 0
  10.     echo 'Normal console termination.'
  11.     ef { $status == 2 }
  12.     set v 0
  13.     echo 'Something must be buggered.'
  14.     ef { $status == 3 }
  15.     set v 0
  16.     echo 'Somebody took it down from remote.'
  17.     ef { $status == 255 }
  18.     set v 0
  19.     echo 'Something is REALLY buggered.'
  20.     ef { $status == 10 }
  21.     echo 'Calling uucp feed: dragos'
  22.     pushd d:\
  23.     rmail
  24.     rnews
  25.     batch dragos
  26.     uupoll dragos
  27.     rmail
  28.     rnews
  29.     expire 3
  30.     popd
  31.     endif
  32. endwhile
  33.