home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / SCRIPTS.ZIP / CHECKRMT.T < prev    next >
Text File  |  1994-03-10  |  2KB  |  51 lines
  1.     ss rmtcmd "^[mM]$|^[mM][eE][nN]|^[dD] |^[dD][oO][wW]"
  2.     if %z0 set rmtcmd "menu"; return
  3.     ss rmtcmd "^[     ]*[rR]"
  4.     if %z0 cd /host;  source register.t;  set rmtcmd "";  return
  5.     ss rmtcmd "^[pP][rR]|^[mM][eE]|^[rR][ eE]?"
  6.     if %z0 goto priv
  7.     return        :: Don't do the following under DOS 2.1
  8.     ss rmtcmd "^arc|^zoo|^whereis |^sd$|^sd |^ls |^ls$"
  9.     if !%z0 return
  10.     ss rmtcmd ":|\.\.|[     ][/\\]"
  11.     if %z0 echo "Illegal Path";  goto done
  12.     ss rmtcmd "(^zoo[^     ]*)(.*)"
  13.     if %z2 obey "!~/zoo v %z2>COM1"; goto done
  14.     ss rmtcmd "(^arc[^     ]*)(.*)"
  15.     if %z2 obey "!~/pkxarc -v %z2>COM1"; goto done
  16.     if %z1 echo "Must specify archive to directory list"; goto done
  17.     ss rmtcmd "^whereis |^sd$|^sd |^ls |ls$"
  18.     if !%z0 return
  19.     obey "!~/%rmtcmd >COM1 <COM1"
  20.     echo "%rmtcmd complete."
  21. done:    set rmtcmd ""; return
  22. priv:    put "\r\n\n\nFree BBS DSZ registration requests must be accompanied\r\n"
  23.     put "by a paid DSZ or ZCOMM registration, or Professional-YAM order.\r\n"
  24.     put "\r\n\nDo you wish to register DSZ, ZCOMM, or order Pro-YAM now (y/n) ?"
  25.     if y cd /host;  source register.t;  set rmtcmd "";  return
  26.     put "\n\nThe majority of questions callers leave in messages are answered in\r\n"
  27.     put "the opening message (welcome.txt) or info.txt.  Have you read these\r\n"
  28.     put "files carefully??? "
  29.     purgek
  30.     if !y goto rtfm
  31.     echo "\nIf you have a technical or customer service question, please"
  32.     echo "make a voice call to 503-621-3406, do NOT leave a message."
  33.     echo "\n\nIs this message to ask for customer support (technical or otherwise) ?"
  34.     purgek
  35.     if y goto techs
  36.  
  37.     ss rmtcmd "^[mM][eE]"
  38.     if %z0 echo "This will be a PUBLIC message."
  39.     return
  40. rtfm:    cd /host
  41.     set rmtcmd "more welcome.txt"
  42.     return
  43.     return
  44. techs:
  45.     put "\r\n\nFor support:\r\n"
  46.     put "Registered users please call voice 503-621-3406 11 AM to 5 PM Pacific Time.\r\n\n"
  47.     put "Unregistered users may call 900-737-7836 $4.69/nin.\r\n\n"
  48.     set rmtcmd ""
  49.     return
  50.  
  51.