home *** CD-ROM | disk | FTP | other *** search
/ ftp.wwiv.com / ftp.wwiv.com.zip / ftp.wwiv.com / pub / MISC / TGFAQ_A2.ZIP / TGPOPFAQ.ZIP / TG-PBAT.HLP < prev    next >
Text File  |  1997-12-19  |  6KB  |  136 lines
  1.                       -- POP.BAT CONFIGURATION --
  2.  
  3. @echo off
  4.  
  5. :Start                                       ::COMMENTS::
  6.     cd\pop
  7.     echo ATZ1>COM2
  8.     PORTAL %1 %2 %3 %4                    :** DEFINE ERRORLEVELS **
  9.      IF ERRORLEVEL 254 goto MemError      :~~~~~~~~~~~~~~~~~~~~~~~~
  10.      IF ERRORLEVEL 253 goto ModemError     ::NOTE: Errorlevels numbers
  11.      IF ERRORLEVEL 252 goto OvrError       ::      must ALWAYS be in
  12.      IF ERRORLEVEL 251 goto FossilError    ::      descending order!
  13.      IF ERRORLEVEL 201 goto HumanCaller    ::BBS caller logon
  14.      IF ERRORLEVEL 180 goto BWDoorDn       ::BlueWave mail door download
  15.      IF ERRORLEVEL 175 goto BWReader       ::Call BlueWave mail reader
  16.      IF ERRORLEVEL 170 goto BWDoorUp       ::BlueWave mail door upload
  17.      IF ERRORLEVEL 160 goto Nightly        ::Midnight maintence routines
  18.      IF ERRORLEVEL 155 goto InBound        ::Inbound file & mail manager
  19.      IF ERRORLEVEL 150 goto FileMgr        ::Process new files & .TICs
  20.      IF ERRORLEVEL 110 goto ViewLog        ::View Telegard SYSOP.LOG
  21.      IF ERRORLEVEL 101 goto LocalBBS       ::Local logon
  22.      IF ERRORLEVEL 0 goto END
  23.     goto Start
  24.  
  25. :HumanCaller                              :** BBS CALLER ROUTINE **
  26.     BBSBATCH                              :~~~~~~~~~~~~~~~~~~~~~~~~
  27.  
  28. :LocalBBS                                 :** LOCAL LOGON ROUTINE **
  29.     echo ATH1>COM2                        :~~~~~~~~~~~~~~~~~~~~~~~~~
  30.     cd\tg
  31.      TELEGARD -N1 -L -Q
  32.     goto Start
  33.  
  34. :InBound                                  :** INBOUND FILE & MESSAGE MGR **
  35.     echo ATH1>COM2                        :~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  36.     del POPUSAGE.T00
  37.     LOGUSAGE 3
  38.     cd\msg\in
  39.     if exist NODEDIFF.A* goto NodeDiff     ::Check for new nodediff
  40.     goto MailMgr                           ::If none, check for mail
  41.  
  42. :NodeDiff                                 :** NODEDIFF MANAGER **
  43.     cd\msg\in                             :~~~~~~~~~~~~~~~~~~~~~~
  44.      ARCE NODEDIFF.A* c:\node              ::Unpack new nodediff
  45.     cd\node
  46.      FASTV7                                ::Compile nodelist (w/FastV7)
  47.     goto MailMgr
  48.  
  49. :MailMgr                                  :** INCOMING MAIL MANAGER **
  50.     cd\sq                                 :~~~~~~~~~~~~~~~~~~~~~~~~~~~
  51.      SQUISH IN OUT LINK SQUASH -q          ::Toss new mail with Squish
  52.      SEAL SCAN                             ::Check mail with Seal
  53.      SQUISH SQUASH -q                      ::Check again with Squish
  54.     goto FileMgr
  55.  
  56. :FileMgr                                  :** INCOMING FILES MANAGER **
  57.     cd\msg\in                             :~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  58.      if exist *.ZIP call C:\THD\THDTERM /S c:\msg\in ::Scan with THDPro
  59.      if exist *.TIC goto DoTics            ::Check for new .TIC files
  60.      if exist *.BAD del *.BAD              ::Delete bad mail packets
  61.      if exist *.ZIP move *.ZIP \fil\uploads /N ::Move scanned files
  62.     goto Start
  63.  
  64. :DoTics                                   :** TIC FILE MANAGER **
  65.     cd\sq                                 :~~~~~~~~~~~~~~~~~~~~~~
  66.      call c:\pop\CRC_OK /TI=c:\msg\in /FI=c:\msg\in /L=c:\tg\logs\seal.log
  67.      call SEAL SCAN TIC ANNOUNCE           ::Process TIC & announce new files
  68.      SQUISH IN OUT SQUASH -q               ::Process announce message(s)
  69.     goto Start
  70.  
  71. :ViewLog                                   ::View SYSOP.LOG from PoP WFC
  72.     echo ATH1>COM2
  73.     cd\tg\logs
  74.      call Q SYSOP.LOG                      ::Substitute your favorite editor
  75.     goto Start
  76.  
  77. :Nightly                                  :** MIDNIGHT MAINT MANAGER **
  78.     cd\tg                                 :~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  79.      call FA2FB -DATE                      ::Convert fbases to TG old-style
  80.      call c:\bat\TGLIST                    ::Update NEW FILES lists
  81.      call FB2FA -DATE                      ::Convert fbases to TG new-style
  82.      TELEGARD -F                           ::Validate new file lists
  83.      INDEX build all                       ::Rebuild all TG data indices
  84.     cd\sq
  85.      sqpack c:\msg\fido\*                  ::Pack Squish echomail
  86.      sqpack c:\msg\net\*                   ::Pack Squish netmail
  87.     goto Start
  88.  
  89. :BWDoorDn                                 :** BLUEWAVE DOOR DOWNLOADS **
  90.     echo ATH1>COM2                        :~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  91.     cd\doors\bw
  92.      call bwmail /Kbob_lotspeich /D        ::Download BlueWave mail packet
  93.     goto BWReader
  94.  
  95. :BWReader                                 :** READ BLUEWAVE MAIL **
  96.     echo ATH1>COM2                        :~~~~~~~~~~~~~~~~~~~~~~~~
  97.     call c:\bat\bw.bat                     ::Load BlueWave mail reader
  98.      if exist c:\mail\*.NEW goto BWDoorUp  ::If new mail was created...
  99.     goto Start
  100.  
  101. :BWDoorUp                                 :** BLUEWAVE DOOR UPLOADS **
  102.     echo ATH1>COM2                        :~~~~~~~~~~~~~~~~~~~~~~~~~~~
  103.     cd\doors\bw
  104.      call bwmail /Kbob_lotspeich /U        ::Upload BlueWave mail packet
  105.     cd\sq
  106.      squish out squash                     ::Toss new mail to Fido
  107.     goto Start
  108.  
  109. :MemError                                  ::MEMORY ERROR routine
  110.     echo Memory Allocation Error - Please Check Your System.
  111.     goto ReBoot
  112.  
  113. :ModemError                                ::MODEM ERROR routine
  114.     echo Error Initializing Modem - Please Check Your Modem,
  115.     echo Cabling And Your Portal Port And Speed Configuration.
  116.     goto ReBoot
  117.  
  118. :OvrError                                  ::OVERLAY ERROR routine
  119.     echo Error Initializing Overlay Manager - Please Check Your System
  120.     goto ReBoot
  121.  
  122. :FossilError                               ::FOSSIL DRIVER ERROR Routine
  123.     echo No Fossil Loaded - Please Check Your System.
  124.     goto ReBoot
  125.  
  126. :ReBoot
  127.     call AUTOBOOT /NIL                     ::Run system auto-rebooter
  128.  
  129. :END                                       ::Shut down Portal of Power
  130.     echo ATH1>COM2
  131.     cls
  132.     echo ESC[10;23H ESC[1;36m┌─────────────────────────────┐ ::Replace "ESC"
  133.     echo ESC[11;23H │    » WE ARE NOW DOWN ! «    │          ::with ALT-27
  134.     echo ESC[12;23H └─────────────────────────────┘ESC[0m    ::character,
  135.     echo.
  136.