home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 2 BBS
/
02-BBS.zip
/
BEXES250.LZH
/
SPAWNBBS.CMD
< prev
Wrap
OS/2 REXX Batch file
|
1991-09-17
|
2KB
|
59 lines
REM
REM A working sample file, from C:\BINK to C:\MAX
REM
@Echo off
cls
C:
CD \Bink
If Exist Echo.Out Del Echo.Out >Nul:
CD \MAX
REM Echo Parms passed are: %1 %2 %3 %4 %5 (DTE/CONNECT/hPort/Time/MODEMQual)
C:\Bink\BigBro.Exe %3 C:\Max\max.exe -b%2 -p%3 -t%4 -n1 -z\pipe\bbs
If errorlevel 12 Goto Echox
If errorlevel 11 Goto Packem
If errorlevel 5 Goto Local
Goto Exit
:Echox
If Exist C:\Bink\ECHO.OUT SCANBLD USER.BBS AREA.DAT local matrix @C:\Bink\Echo.Out
CD \BINK
:Reecho
If Exist ECHO.OUT VP2 Export %BINKLEY%AREAS.BBS -0 -M 500 -S 0 -F %BINKLEY%Echo.Out -C -Q -O %OUT% -A ARC2 A5
:REM Severe Error = 2, Partial Export = 1, Goodness = 0.
If ERRORLEVEL 2 Goto SEVEXP1
If ERRORLEVEL 1 Goto SEVPEXP
Goto PURGEM
:SEVEXP1
ECHO Severe Error In POSTTOSS Export
ECHO Severe Error In POSTTOSS Export >> ERROR.LOG
ECHO Severe Error In POSTTOSS Export >c:\Bink\Outbound\Export.z
Goto PACKEM
:SEVPEXP
ECHO Partial Export of AREAS.BBS messages.
oMMM -H%OUT% -M%MAIL% -I%BINKLEY%Binkley.PRM -C%BINKLEY%OMMM.CTL -P%BINKLEY%PRESCAN.CTL -S%SCHED% -Z1 -Q -G -A
Goto Reecho
:PURGEM
:REM Now that either ARCMAIL/NETMAIL or ECHOMAIL is all finished...
If Exist c:\Bink\Outbound\E*.z Del c:\Bink\Outbound\E*.z
Goto PACKEM
:PACKEM -- Here to pack up anything in Matrix Mail area.
CD \MAX
If NOT Exist C:\Bink\ECHO.OUT SCANBLD USER.BBS AREA.DAT local matrix
CD \BINK
Remapper 30039 -cp -fp
oMMM -H%OUT% -M%MAIL% -I%BINKLEY%Binkley.PRM -C%BINKLEY%OMMM.CTL -P%BINKLEY%PRESCAN.CTL -S%SCHED%
Goto EXIT
:LOCAL -- Here to scan for local only mail
SCANBLD USER.BBS AREA.DAT local
CD \BINK
:EXIT
Echo Returning to BinkleyTerm