home *** CD-ROM | disk | FTP | other *** search
/ Hall of Fame / HallofFameCDROM.cdr / open / rundoors.lzh / QBBSLOAD.BAT next >
DOS Batch File  |  1988-09-10  |  2KB  |  76 lines
  1. ECHO OFF
  2. CLS
  3. :LOAD
  4.    CD C:\BBS\QCKBBS\BTERM
  5.    BT
  6.    IF ERRORLEVEL 30 GOTO UNPACK
  7.    IF ERRORLEVEL 24 GOTO 2400BAUD
  8.    IF ERRORLEVEL 20 GOTO DAILY
  9.    IF ERRORLEVEL 12 GOTO 1200BAUD
  10.    IF ERRORLEVEL 10 GOTO LOCAL
  11.    IF ERRORLEVEL 3 GOTO 300BAUD
  12.    IF ERRORLEVEL 1 GOTO EXIT
  13.    GOTO LOAD
  14.  
  15. :LOCAL
  16.    CD C:\BBS\QCKBBS
  17.    QUICKBBS -L -E0
  18.    GOTO QUICKOUT
  19.  
  20. :300BAUD
  21.    CD C:\BBS\QCKBBS
  22.    QUICKBBS -B300 -E0
  23.    GOTO QUICKOUT
  24.  
  25. :1200BAUD
  26.    CD C:\BBS\QCKBBS
  27.    QUICKBBS -B1200 -E0
  28.    GOTO QUICKOUT
  29.  
  30. :2400BAUD
  31.    CD C:\BBS\QCKBBS
  32.    QUICKBBS -B2400 -E0
  33.    GOTO QUICKOUT
  34.  
  35. :QUICKOUT
  36.    QUICKOUT
  37.  
  38. :UNPACK
  39.    COPY C:\BBS\QCKBBS\BTERM\NETMSGS\*.* C:\BBS\QCKBBS\LOGS
  40.    CD C:\BBS\QCKBBS\BTERM\NETMSGS
  41.    IF EXIST 00*.* C:\BBS\QCKBBS\PKXARC 00*.* C:\BBS\QCKBBS\BTERM\NETMSGS
  42.    ERASE 00*.*
  43.    IF EXIST *.M* C:\BBS\QCKBBS\PKXARC *.M* C:\BBS\QCKBBS\BTERM\NETMSGS
  44.    ERASE *.M*
  45.    CD C:\BBS\QCKBBS
  46.    ECHOGEN -B -T -U -V -Z
  47.    MAILTOSS -K 8
  48.    CD C:\BBS\QCKBBS\BTERM\NETMSGS
  49.    IF EXIST FNEW*.* C:\BBS\QCKBBS\PKXARC FNEW*.* C:\BBS\QCKBBS\TEXT
  50.    IF EXIST FNEW*.* ERASE FNEW*.*
  51.    ERASE *.ARC
  52.    CD C:\BBS\QCKBBS\TEXT
  53.    IF EXIST FIDO*.* ERASE FNNEWS.ASC
  54.    IF EXIST FIDO*.* COPY FIDO*.* FNNEWS.ASC
  55.    ERASE FIDO*.*
  56.    CD C:\BBS\QCKBBS\BTERM\NETMSGS
  57.    IF NOT EXIST NODEDIFF.* GOTO PACK
  58.    C:\BBS\QCKBBS\PKXARC NODEDIFF.* C:\BBS\QCKBBS\BTERM
  59.    ERASE NODEDIFF.*
  60.    CD C:\BBS\QCKBBS\BTERM
  61.    XLAXDIFF
  62.    XLAXNODE
  63.    CD C:\BBS\QCKBBS
  64.    QNODE C:\BBS\QCKBBS\BTERM\
  65.  
  66. :PACK
  67.    CD C:\BBS\QCKBBS\BTERM
  68.    OMMM -S%SCHED% -HC:\BBS\QCKBBS\BTERM\OUTBOUND\ -IC:\BBS\QCKBBS\BTERM\BINKLEY.PRM -MC:\BBS\QCKBBS\BTERM\NETMSGS\ -CC:\OMMM.CTL -N
  69.    GOTO LOAD
  70.  
  71. :EXIT
  72.    ECHO ATH1M0 >COM1
  73.    ECHO OFF
  74.    CLS
  75.    EXIT
  76.