Added NormVideo() call before exit.
This commit is contained in:
parent
7f2f256f2f
commit
8aa894321a
2
bbs.pas
2
bbs.pas
|
@ -328,5 +328,7 @@ Begin
|
||||||
|
|
||||||
textcolor(7); clrscr; textcolor(14);
|
textcolor(7); clrscr; textcolor(14);
|
||||||
WriteLn('[> Exited with ErrorLevel ',elevel,' at '+date+' '+time);
|
WriteLn('[> Exited with ErrorLevel ',elevel,' at '+date+' '+time);
|
||||||
|
{rcg11182000 added NormVideo()...}
|
||||||
|
NormVideo();
|
||||||
halt(elevel);
|
halt(elevel);
|
||||||
end.
|
end.
|
||||||
|
|
Loading…
Reference in New Issue