# This is most of my batch file that I use with Qbbs and Semper

# first get the connect speed from a little progette that reads
# the file written by Semper

cd I:\SEMPER\
GETSPEED

set baud -B $status

# this is where QBBS is executed for the first time after getting
# past Semper

condense baud
cd I:\qbbs\
quickbbs $baud

# When Qbbs is exited - for any reason - control passes to the label 'last'

goto last

# this is how HoloQWK is executed normally - no command

:holoqwk
cd g:\qwk\
holoqwk.prg
goto again

# This is the filesystem that I use instead of the normal one

:filesyst
CD G:\FSYST\
FILESYST
goto again

# and my way of implementing Jekyll

:jekyll
cd I:\qbbs\jekyll
runjek.prg -r10
chkjek.prg -r10

# after running any external program, I always return to this point to
# re-login back into Qbbs

:again
cd I:\qbbs\
quickbbs -r

# After Qbbs we always check the error level - it may be that we need to
# run an external program - if not, then it means the user has gone :(

:last
if $status == 200 then goto jekyll
if $status == 120 then goto filesyst
if $status ==  60 then goto holoqwk

# the error level from Qbbs was not a call for an external program and
# so we simply exit the batch file back into Semper for the next caller :)

system