diff --git a/mystic/HISTORY.txt b/mystic/HISTORY.txt index 8b2a633..2bae05b 100644 --- a/mystic/HISTORY.txt +++ b/mystic/HISTORY.txt @@ -3985,3 +3985,6 @@ and their directories (if they do not already exist). See MUTIL.CFG for more information. + ! The MCI parser for |!x MCI codes now checks for validity of the number + or otherwise does not parse the code. + diff --git a/mystic/bbs_io.pas b/mystic/bbs_io.pas index 4d8bbc8..14d593d 100644 --- a/mystic/bbs_io.pas +++ b/mystic/bbs_io.pas @@ -377,11 +377,16 @@ Begin End; Case Code[1] of - '!' : Begin + '!' : If Code[2] in ['0'..'9'] Then Begin A := strS2I(Code[2]); + ScreenInfo[A].X := Screen.CursorX; ScreenInfo[A].Y := Screen.CursorY; ScreenInfo[A].A := Screen.TextAttr; + End Else Begin + Result := False; + + Exit; End; '$' : Case Code[2] of 'C' : Begin diff --git a/mystic/todo.pas b/mystic/todo.pas index 0969a00..77f581c 100644 --- a/mystic/todo.pas +++ b/mystic/todo.pas @@ -100,6 +100,7 @@ FUTURE / IDEAS / WORK IN PROGRESS / NOTES - So much cool stuff to do with the new themes - LastOn revamp make sure its not global and new stuff is populated - ANSI online help that can execute menu commands/restore screen +- MPL fAppend? Why didnt I add that? RANDOM DRUNKEN BRAINDUMP AKA DESIGN DETAILS ===========================================