: PBER  Compile to Determine Error Line Number by Addr  11/28/1997-11/28/1997
: ---------------------------------------------------------------------------
: Copyright (C) 1997 by Vladimir Veytsel                        www.davar.net

: 1. Name of %DOS%:\PBASIC program to be compiled
:    "?" - Display PBER.BTM script text (Equivalent: "/").
: 2. Run-time error address.

@ECHO %TR%

 IF %1.==?. .OR. %1.==/. (LIST %_BATCHNAME ^ CLS ^ QUIT)

 IF NOT EXIST %DOS%:\PBASIC\%1.BAS (ECHO %S%%R%Program %DOS%:\PBASIC\%M%%@UPPER[%1].BAS %R%doesn't exist - %M%PBER %R%cancelled%D% ^ QUIT)
 IF %2.==. (ECHO %S%%R%Run-time error address isn't specified - %M%PBER %R%cancelled%D% ^ QUIT)

 PUSHD %DOS%:\PBASIC
 %DOS%:\PWRBASIC\PBC %1 -RE=%2
 POPD