static void Main(string[] args)
{
Tokenizer t = new Tokenizer();
InstructionTree i = new InstructionTree();
InstructionEvaluator ieval = new InstructionEvaluator();
string[] lines = ReadFile("..\\..\\practical_z80.txt");
AsmVars.LineNo++;
foreach (string line in lines)
{
if (!t.Tokenize(line))
{
break;
}
if (!i.Derive(t.tokens.ToArray()))
{
break;
}
//DebugTree(i, 0);
if (!ieval.Evaluate(i))
{
break;
}
foreach (byte b in ieval.code)
{
Console.Write(String.Format("{0,0:X2} ", b));
}
AsmVars.LineNo++;
}
Console.ReadKey();
}
public static void DebugTree(DTree t, int indent)
{
StringBuilder sb = new StringBuilder(indent);
DTree child;
for (int i = 0; i < indent; i++)
{
sb.Append(' ');
}
switch (t.kind)
{
case DTKind.NMEMONIC:
NmemonicTree nm = (NmemonicTree)t;
Console.Write(sb);
Console.WriteLine("(NMEMONIC) { " + nm.nmemonic + " }");
break;
case DTKind.OPERATOR:
OperatorTree op = (OperatorTree)t;
Console.Write(sb);
Console.WriteLine("(OPERATOR) { " + op.op + " }");
break;
case DTKind.REG:
RegTree reg = (RegTree)t;
Console.Write(sb);
Console.WriteLine("(REGISTER) { " + reg.reg + " }");
break;
case DTKind.NORMPAIR:
NormPairTree npair = (NormPairTree)t;
Console.Write(sb);
Console.WriteLine("(NORMPAIR) { " + npair.normpair + " }");
break;
case DTKind.SPECPAIR:
SpecPairTree spair = (SpecPairTree)t;
Console.Write(sb);
Console.WriteLine("(SPECPAIR) { " + spair.specpair + " }");
break;
case DTKind.IPAIR:
IPairTree ipair = (IPairTree)t;
Console.Write(sb);
Console.WriteLine("(IPAIR) { " + ipair.ipair + " }");
break;
case DTKind.IMM:
ImmTree imm = (ImmTree)t;
Console.Write(sb);
Console.WriteLine("(IMM) { " + imm.immediate + " }");
break;
case DTKind.ADR:
AdrTree adr = (AdrTree)t;
child = adr.children;
Console.Write(sb);
Console.WriteLine("(ADR) {");
while (child != null)
{
DebugTree(child, indent + 4);
child = child.next;
}
Console.Write(sb);
Console.WriteLine("}");
break;
case DTKind.INSTRUCTION:
InstructionTree inst = (InstructionTree)t;
child = inst.children;
Console.Write(sb);
Console.WriteLine("(INSTRUCTION) {");
while (child != null)
{
DebugTree(child, indent + 4);
child = child.next;
}
Console.Write(sb);
Console.WriteLine("}");
break;
case DTKind.CONDITION:
ConditionTree cond = (ConditionTree)t;
Console.Write(sb);
Console.WriteLine("(CONDITION) { " + cond.cond + " }");
break;
case DTKind.SPECREG:
SpecRegTree specreg = (SpecRegTree)t;
Console.Write(sb);
Console.WriteLine("(SPECREG) { " + specreg.reg + " }");
break;
default:
break;
}
}
