Term->Text[ Term->WritePos ].Colour = Term->CurColour;
Term->WritePos --;
} while(Term->WritePos && i-- && Term->Text[ Term->WritePos ].Ch == '\0');
Term->Text[ Term->WritePos ].Colour = Term->CurColour;
Term->WritePos --;
} while(Term->WritePos && i-- && Term->Text[ Term->WritePos ].Ch == '\0');