if (m_doing)

Subroutine.Moment.Break();

while (m_doing) {}

InterprEnvironment.Reset();

m_env = InterprEnvironment.Instance;

m_env.CurrentConsole = m_console;

m_env.LoadSubs();

}

public void Restart() {

new Thread(new ThreadStart(DoRestart)).Start();

}

public bool Busy {

get { return m_doing; }

}

public void SaveVariables() {

m_env.SaveVars();

}

public void LoadSubs() {

m_env.LoadSubs();

}

public ConsoleNamespace.VariableReport[] GetVariables() {

return m_env.GetGlobalVarsList();

}

public string[] GetSubs() {

return m_env.LoadedSubs;

}

public void DeleteVariable(string name) {

m_env.ConsoleNamespace.Remove(name);

}

public bool LoadSub(string name) {

return m_env.LoadSub(name);

}

public void UnloadSub(string name) {

m_env.UnloadSub(name);

}

public bool NotRestored {

get {

return m_env.NotRestored;

}

}

}

}

18. Класс SourceBox.

....................................................................

private int m_curline = 0;//текущая строка

private int m_lincount = 0;//общее число строк

private HighlightParser m_hp = new HighlightParser();

private static Font s_nfont =

new Font("Lucida Console", 10, FontStyle.Regular);

private static Font s_cfont =

new Font("Lucida Console", 12, FontStyle.Bold);

private int GetCurrentLine() {

return m_tb.GetLineFromCharIndex(m_tb.SelectionStart);

}

private int GetLinesCount() {

return m_tb.Lines.Length;

}

private String GetLine(int index) {

return m_tb.Lines[index];

}

private void m_tb_KeyPress(object sender, KeyPressEventArgs e) {

if (e.KeyChar == '\r') {

string txt = m_tb.Text;

int i = m_tb.SelectionStart - 2;

int j;

while (i >= 0) {

if (txt[i] == '\n')

return;

else if (txt[i] == '\t') {

j = 0;

while ((i >= 0) && (txt[i] == '\t')) {

j++;

i--;

}

if ((i < 0) || (txt[i] == '\n')) {

m_tb.SelectedText = new String('\t', j);

return;

}

}

i--;

}

}

}

private bool GetLinePos(int index, out int beg, out int len) {

if ((index < 0) || (index >= GetLinesCount())) {

beg = len = 0;

return false;

}

int i;

string[] ls = m_tb.Lines;

beg = 0;

for (i = 0; i < index; i++)

beg += ls[i].Length + 1;

len = ls[index].Length;

return true;

}

private void SelectLine(int index) {

int beg, len;

if (!GetLinePos(index, out beg, out len))

throw new IndexOutOfRangeException();

m_tb.SelectionStart = beg;

m_tb.SelectionLength = len;

}

private void HighlightLine(int index) {

int beg, len;

int curbeg = m_tb.SelectionStart;

int curlen = m_tb.SelectionLength;

GetLinePos(index, out beg, out len);

string str = m_tb.Lines[index];

m_hp.Reset(str);

while (m_hp.HasMore()) {

int tbeg, tlen;

HighlightParser.TokenType type;

m_hp.GetNext(out tbeg, out tlen, out type);

m_tb.SelectionStart = beg + tbeg;

m_tb.SelectionLength = tlen;

switch (type) {

case HighlightParser.TokenType.Comment:

{

m_tb.SelectionColor = Color.DarkGreen;

break;

}

case HighlightParser.TokenType.Identifier:

{

m_tb.SelectionColor = Color.Purple;

break;

}

case HighlightParser.TokenType.Keyword:

{

m_tb.SelectionColor = Color.Blue;

break;

}

case HighlightParser.TokenType.Number:

{

m_tb.SelectionColor = Color.Red;

break;

}

case HighlightParser.TokenType.String:

{

m_tb.SelectionColor = Color.Brown;

break;

}

case HighlightParser.TokenType.Other:

{

m_tb.SelectionColor = Color.Black;

break;

}

}

}

m_tb.SelectionStart = curbeg;

m_tb.SelectionLength = curlen;

}

public enum LineState {

ErrorLine,

CurrentLine,

NormalLine

}

private void ColorLine(int index, LineState state) {

int curbeg = m_tb.SelectionStart;

int curlen = m_tb.SelectionLength;

SelectLine(index);

switch (state) {

case LineState.ErrorLine:

{

m_tb.SelectionColor = Color.Red;

break;

}

case LineState.CurrentLine:

{

m_tb.SelectionFont = s_cfont;

break;

}

case LineState.NormalLine:

{

m_tb.SelectionFont = s_nfont;

HighlightLine(index);

break;

}

}

m_tb.SelectionStart = curbeg;

m_tb.SelectionLength = curlen;

}

private void HighlightText(bool anyway) {

int l = GetCurrentLine();

int lc = GetLinesCount();

if ((l != m_curline) || (lc != m_lincount) || anyway) {

m_tb_2.Focus();

m_curline = l;

m_lincount = lc;

int bi = m_tb.GetCharIndexFromPosition(new Point(0, 0));

int ei = m_tb.GetCharIndexFromPosition(new Point(m_tb.Size));

int bl = m_tb.GetLineFromCharIndex(bi);

int el = m_tb.GetLineFromCharIndex(ei);

if (bl > 0) bl--;

if (el < lc) el++;

for (int i = bl; i < el; i++)

HighlightLine(i);

m_tb.Focus();

}

}

private void m_tb_KeyUp(object sender, KeyEventArgs e) {

HighlightText(false);

}

private void m_tb_MouseUp(object sender, MouseEventArgs e) {

if (e.Button == MouseButtons.Left)

HighlightText(true);

}

public string[] Lines {

get { return (string[]) m_tb.Lines.Clone(); }

}

public bool LoadFile(string filename) {

try {

m_tb.LoadFile(filename, RichTextBoxStreamType.PlainText);

HighlightText(true);

return true;

}

catch {

return false;

}

}

public bool SaveFile(string filename) {

try {

m_tb.SaveFile(filename, RichTextBoxStreamType.PlainText);

return true;

}

catch {

return false;

}

}

public int CurrentLine {

get { return m_tb.GetLineFromCharIndex(m_tb.SelectionStart); }

}

private class HighlightParser {

private char[] m_a;

private int m_len;

private int m_cur;

public enum TokenType {

String,

Number,

Keyword,

Comment,

Identifier,

Other

}

public void Reset(string str) {

m_a = str.ToCharArray();

m_len = str.Length;

m_cur = 0;

while ((m_cur < m_len) && Char.IsWhiteSpace(m_a[m_cur]))

m_cur++;

}

public bool HasMore() {

return m_cur < m_len;

Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17