ShuriZma
/
BizHawk
mirror of https://github.com/TASEmulators/BizHawk.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

LuaWriter. Prevented some exceptions.

This commit is contained in:
rolanmen1 2012-07-21 04:17:49 +00:00
parent 259ec356bd
commit 1616cc7eb9
1 changed files with 133 additions and 38 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

159
BizHawk.MultiClient/tools/LuaWriter.cs
View File

@ -12,7 +12,7 @@ namespace BizHawk.MultiClient
{ {
public partial class LuaWriter : Form public partial class LuaWriter : Form
{ {
public Regex keyWords = new Regex("and|break|do|else|elseif|end|false|for|function|if|in|local|nil|not|or|repeat|return|then|true|until|while"); public Regex keyWords = new Regex("and|break|do|else|if|end|false|for|function|in|local|nil|not|or|repeat|return|then|true|until|while|elseif");
public LuaWriter() public LuaWriter()
{ {
InitializeComponent(); InitializeComponent();
@ -23,49 +23,150 @@ namespace BizHawk.MultiClient
int selPos = LuaText.SelectionStart; int selPos = LuaText.SelectionStart;
int selChars = LuaText.SelectedText.Length; int selChars = LuaText.SelectedText.Length;
LuaText.SelectAll();
LuaText.SelectionColor = Color.Black;
ColorReservedWords(); ColorReservedWords();
ColorComments(); ColorComments();
ColorStrings(); ColorStrings();
ColorCharacters();
LuaText.Select(selPos, selChars); LuaText.Select(selPos, selChars);
} }
private void ColorCharacters()
{
Color color = Color.Gray;
Color commentColor = Color.Green;
int firstApostrophe = LuaText.Find("'", 0);
while (firstApostrophe >= 0)
{
if (LuaText.SelectionColor != commentColor)
{
int opening = firstApostrophe;
int endLine;
if (LuaText.Lines[LuaText.GetLineFromCharIndex(LuaText.GetFirstCharIndexOfCurrentLine())] == LuaText.Lines[LuaText.Lines.Length - 1])
endLine = LuaText.Text.Length;
else
endLine = LuaText.GetFirstCharIndexFromLine(LuaText.GetLineFromCharIndex(opening) + 1) - 1;
int ending = LuaText.Find("'", opening + 1, endLine, RichTextBoxFinds.None);
if (ending > 0)
while (ending > 0)
{
if (LuaText.Text[ending - 1] == '\\')
ending++;
else
break;
if (ending > endLine)
{
ending = opening;
break;
}
ending = LuaText.Find("'", ending, endLine, RichTextBoxFinds.None);
}
else
ending = opening;
if (opening != ending)
{
LuaText.Select(opening, ending - opening + 1);
LuaText.SelectionColor = color;
if (ending != LuaText.Text.Length - 1)
firstApostrophe = LuaText.Find("'", ending + 1, RichTextBoxFinds.None);
else
break;
}
else
if (endLine != LuaText.Text.Length)
firstApostrophe = LuaText.Find("'", endLine + 1, RichTextBoxFinds.None);
else
break;
}
else
{
if (LuaText.SelectionStart == LuaText.Text.Length - 1)
break;
else
firstApostrophe = LuaText.Find("'", LuaText.SelectionStart + 1, RichTextBoxFinds.None);
}
}
}
private void ColorStrings() private void ColorStrings()
{ {
int firstQuote = LuaText.Find("\"", 0); Color color = Color.Gray;
while (firstQuote > 0) Color commentColor = Color.Green;
{
if (LuaText.SelectionColor != Color.Green)
{
if (LuaText.Text[LuaText.SelectionStart - 1] != '\\')
{
int stringStart = LuaText.SelectionStart;
int endLine = LuaText.GetFirstCharIndexFromLine(LuaText.GetLineFromCharIndex(stringStart) + 1) - 1;
int stringEnd = LuaText.Find("\"", stringStart + 1, endLine, RichTextBoxFinds.None);
if (stringEnd > 0) int firstQuotation = LuaText.Find("\"", 0);
while (firstQuotation >= 0)
{ {
LuaText.Select(stringStart, stringEnd - stringStart + 1); if (LuaText.SelectionColor != commentColor)
LuaText.SelectionColor = Color.Gray; {
firstQuote = LuaText.Find("\"", stringEnd + 1, RichTextBoxFinds.None); int opening = firstQuotation;
int endLine;
if (LuaText.Lines[LuaText.GetLineFromCharIndex(LuaText.GetFirstCharIndexOfCurrentLine())] == LuaText.Lines[LuaText.Lines.Length - 1])
endLine = LuaText.Text.Length;
else
endLine = LuaText.GetFirstCharIndexFromLine(LuaText.GetLineFromCharIndex(opening) + 1) - 1;
int ending = LuaText.Find("\"", opening + 1, endLine, RichTextBoxFinds.None);
if (ending > 0)
while (ending > 0)
{
if (LuaText.Text[ending - 1] == '\\')
ending++;
else
break;
if (ending > endLine)
{
ending = opening;
break;
}
ending = LuaText.Find("\"", ending, endLine, RichTextBoxFinds.None);
}
else
ending = opening;
if (opening != ending)
{
LuaText.Select(opening, ending - opening + 1);
LuaText.SelectionColor = color;
if (ending != LuaText.Text.Length - 1)
firstQuotation = LuaText.Find("\"", ending + 1, RichTextBoxFinds.None);
else
break;
}
else
if (endLine != LuaText.Text.Length)
firstQuotation = LuaText.Find("\"", endLine + 1, RichTextBoxFinds.None);
else
break;
} }
else else
{ {
LuaText.Select(stringStart, endLine - stringStart); if (LuaText.SelectionStart == LuaText.Text.Length - 1)
LuaText.SelectionColor = Color.Gray; break;
firstQuote = LuaText.Find("\"", endLine + 1, RichTextBoxFinds.None);
}
}
}
else else
firstQuote = LuaText.Find("\"", LuaText.SelectionStart + 1, RichTextBoxFinds.None); firstQuotation = LuaText.Find("\"", LuaText.SelectionStart + 1, RichTextBoxFinds.None);
}
} }
} }
private void ColorComments() private void ColorComments()
{ {
Color color = Color.Green;
foreach (Match CommentMatch in new Regex("--").Matches(LuaText.Text)) foreach (Match CommentMatch in new Regex("--").Matches(LuaText.Text))
{ {
int endComment; int endComment;
@ -78,7 +179,7 @@ namespace BizHawk.MultiClient
endComment = LuaText.Text.Length; endComment = LuaText.Text.Length;
LuaText.Select(CommentMatch.Index, endComment); LuaText.Select(CommentMatch.Index, endComment);
LuaText.SelectionColor = Color.Green; LuaText.SelectionColor = color;
} }
else else
{ {
@ -88,14 +189,14 @@ namespace BizHawk.MultiClient
endComment = LuaText.GetFirstCharIndexFromLine(LuaText.GetLineFromCharIndex(CommentMatch.Index) + 1) - CommentMatch.Index; endComment = LuaText.GetFirstCharIndexFromLine(LuaText.GetLineFromCharIndex(CommentMatch.Index) + 1) - CommentMatch.Index;
LuaText.Select(CommentMatch.Index, endComment); LuaText.Select(CommentMatch.Index, endComment);
LuaText.SelectionColor = Color.Green; LuaText.SelectionColor = color;
} }
} }
} }
private void ColorReservedWords() private void ColorReservedWords()
{ {
int curPos = 0; Color color = Color.Blue;
foreach (Match keyWordMatch in keyWords.Matches(LuaText.Text)) foreach (Match keyWordMatch in keyWords.Matches(LuaText.Text))
{ {
@ -109,16 +210,10 @@ namespace BizHawk.MultiClient
if (!char.IsLetterOrDigit(before) && !char.IsLetterOrDigit(after)) if (!char.IsLetterOrDigit(before) && !char.IsLetterOrDigit(after))
{ {
LuaText.Select(curPos, keyWordMatch.Index);
LuaText.SelectionColor = Color.Black;
LuaText.Select(keyWordMatch.Index, keyWordMatch.Length); LuaText.Select(keyWordMatch.Index, keyWordMatch.Length);
LuaText.SelectionColor = Color.Blue; LuaText.SelectionColor = color;
} }
curPos = keyWordMatch.Index + keyWordMatch.Length;
} }
LuaText.Select(curPos, LuaText.Text.Length);
LuaText.SelectionColor = Color.Black;
} }
} }