diff --git a/Source/Apps/Mode.asm b/Source/Apps/Mode.asm index e35365a2..38729d64 100644 --- a/Source/Apps/Mode.asm +++ b/Source/Apps/Mode.asm @@ -365,11 +365,16 @@ comsetu: jr comsetx ; common exit ; comsetx: + ld a,(pflag) ; get prompt flag + or a ; set flags + jr z,comsetx2 ; bypass if not requested +comsetx1: ld c,$01 ; console read call bdos ; do it cp $0D ; CR? - jr nz,comsetx ; loop as needed + jr nz,comsetx1 ; loop as needed ; +comsetx2: xor a ret ; diff --git a/Source/Doc/Build.cmd b/Source/Doc/Build.cmd index edf95ada..5a595d65 100644 --- a/Source/Doc/Build.cmd +++ b/Source/Doc/Build.cmd @@ -2,5 +2,5 @@ setlocal setlocal & cd "ZCPR Manual" && call Build.cmd || exit /b 1 & endlocal -setlocal & cd "RomWBW User Guide" && call Build.cmd || exit /b 1 & endlocal -setlocal & cd "RomWBW System Guide" && call Build.cmd || exit /b 1 & endlocal \ No newline at end of file +rem setlocal & cd "RomWBW User Guide" && call Build.cmd || exit /b 1 & endlocal +rem setlocal & cd "RomWBW System Guide" && call Build.cmd || exit /b 1 & endlocal \ No newline at end of file