eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

A26

This commit is contained in:
mysticbbs 2013-03-04 10:52:56 -05:00
parent c9f41a3fc5
commit 4ce4e25802
1 changed files with 20 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
mdl/m_term_ansi.pas
View File

@ -264,6 +264,15 @@ Begin
#27 : State := 1; #27 : State := 1;
#9 : Screen.CursorXY (Screen.CursorX + 8, Screen.CursorY); #9 : Screen.CursorXY (Screen.CursorX + 8, Screen.CursorY);
#12 : Screen.ClearScreen; #12 : Screen.ClearScreen;
(*
#14,
#15 : Begin
Screen.WriteChar('X');
State := 0;
WasValid := True;
End;
*)
Else Else
Screen.WriteChar(Ch); Screen.WriteChar(Ch);
@ -297,6 +306,15 @@ Begin
#27 : State := 1; #27 : State := 1;
#9 : Screen.CursorXY (Screen.CursorX + 8, Screen.CursorY); #9 : Screen.CursorXY (Screen.CursorX + 8, Screen.CursorY);
#12 : Screen.ClearScreen; #12 : Screen.ClearScreen;
(*
#14,
#15 : Begin
Screen.WriteChar('X');
State := 0;
WasValid := True;
End;
*)
Else Else
Screen.WriteChar(Data[Count]); Screen.WriteChar(Data[Count]);
WasValid := True; WasValid := True;