home *** CD-ROM | disk | FTP | other *** search
- @ECHO OFF
- VERIFY ON
- SET TASK=0
- rem LH BNU /L1=11520 /T=8192 /R=8192 /F
- C:\DOS\SHARE.EXE /L:200
- x00 B,1,57600 T=8192 R=8192 F=15 DV:ON E
- dvansi
- F:
- CD\RA
- rem DEL GEDIT.CFG
- REM PATH D:\WINDOWS;C:\DOS;D:\BBS\FD;F:\RA;D:\FOXPRO25
- SET FD=D:\BBS\FD
- SET FAX=DEBUG
- SET FDOPT=RDEBUG,INTL
- SET DSZPORT=2
- SET ICE=F:\RA\CHAT
- SET EAGLE=F:\RA\EAGLE.CFG
- SET MCHAT=D:\BBS\MCHAT\MCHAT.CFG
- SET DSZLOG=F:\RA\DSZ.LOG
- :LOOP
- D:
- CD\BBS\FD
- FD
- IF ERRORLEVEL 251 GOTO FAX
- IF ERRORLEVEL 250 GOTO BBSCALL
- IF ERRORLEVEL 249 GOTO BBSCALL
- IF ERRORLEVEL 248 GOTO BBSCALL
- IF ERRORLEVEL 247 GOTO BBSCALL
- IF ERRORLEVEL 246 GOTO BBSCALL
- IF ERRORLEVEL 245 GOTO BBSCALL
- IF ERRORLEVEL 244 GOTO BBSCALL
- IF ERRORLEVEL 243 GOTO BBSCALL
- IF ERRORLEVEL 242 GOTO BBSCALL
- IF ERRORLEVEL 241 GOTO BBSCALL
- IF ERRORLEVEL 240 GOTO BBSCALL
- IF ERRORLEVEL 239 GOTO BBSCALL
- IF ERRORLEVEL 238 GOTO BBSCALL
- IF ERRORLEVEL 237 GOTO BBSCALL
- IF ERRORLEVEL 236 GOTO BBSCALL
- IF ERRORLEVEL 235 GOTO BBSCALL
- IF ERRORLEVEL 234 GOTO BBSCALL
- IF ERRORLEVEL 233 GOTO BBSCALL
- IF ERRORLEVEL 232 GOTO BBSCALL
- IF ERRORLEVEL 231 GOTO BBSCALL
- IF ERRORLEVEL 100 GOTO MAIL
- IF ERRORLEVEL 99 GOTO PACKMSG
- IF ERRORLEVEL 90 GOTO MKNODE
- IF ERRORLEVEL 89 GOTO BIRTHDAY
- IF ERRORLEVEL 10 GOTO USERBRK
- IF ERRORLEVEL 1 GOTO FDERROR
- IF ERRORLEVEL 0 GOTO EXIT
- :FAX
- F:
- CD\BGFAX
- XU LOCK:1:OFF
- BGFAX/FCO F:\BGFAX 2! Z
- XU LOCK:1:57600
- rem FAXMAIL FAXIN.LOG CHQ BGFAX CHEN_HAI-QING NEWFAX 6:650/6
- GOTO LOOP
- :PACKMSG
- D:
- CD\BBS\FD
- ATPLUS -CATH1M0
- F:
- CD\RA
- RAMSG PURGE
- RAMSG PACK -RENUMBER
- D:
- CD\BBS\FD
- ATPLUS -CATH0M1
- GOTO LOOP
- :MKNODE
- D:
- CD\BBS\FD
- ATPLUS -CATH1M0
- CD\BBS\FD\MKNODE
- CALL MKNODE.BAT
- GOTO LOOP
- :BBSCALL
- DOBBS
- GOTO LOOP
- :MAIL
- D:
- CD\BBS\XM
- DEL LINELOCK.XM
- CD\BBS\FD
- ATPLUS -CATH1M0
- CD\BBS\XM
- XM IMPORT
- XM EXPORT
- rem XM PACK @ROUTE.RAE
- CD\BBS\FD
- ATPLUS -CATH0M1
- GOTO LOOP
- :BIRTHDAY
- D:
- CD\BBS\RABIRTH
- CALL BIRTHDAY.BAT
- GOTO LOOP
- :USERBRK
- GOTO EXIT
- :FDERROR
- @ECHO Mailer returned an error (1-9)
- BNU/B
- :EXIT
- ECHO OFF
- ECHO Welcome to Dos system.