private IVisualizationWireframe GenerateWireframe(ReadOnlyDictionary <string, object> parms)
{
int offset = Util.GetFromObjDict(parms, P_OFFSET, 0);
int baseAddr = Util.GetFromObjDict(parms, P_BASE_ADDR, 0);
if (offset < 0 || offset >= mFileData.Length)
{
// should be caught by editor
mAppRef.ReportError("Invalid parameter");
return(null);
}
VisWireframe vw = new VisWireframe();
vw.Is2d = true;
try {
int[] stack = new int[4];
int stackPtr = 0;
int beamX = 0;
int beamY = 0;
double scale = 1.0;
bool done = false;
int centerVertex = vw.AddVertex(0, 0, 0);
int curVertex = centerVertex;
while (!done && offset < mFileData.Length)
{
ushort code0 = (ushort)Util.GetWord(mFileData, offset, 2, false);
offset += 2;
Opcode opc = GetOpcode(code0);
int dx, dy, ii, vaddr;
switch (opc)
{
case Opcode.VCTR: // 000YYYYY YYYYYYYY IIIXXXXX XXXXXXXX
ushort code1 = (ushort)Util.GetWord(mFileData, offset, 2, false);
offset += 2;
dy = sign13(code0 & 0x1fff);
dx = sign13(code1 & 0x1fff);
ii = code1 >> 13;
beamX += (int)Math.Round(dx * scale);
beamY += (int)Math.Round(dy * scale);
if (ii == 0)
{
// move only
curVertex = vw.AddVertex(beamX, beamY, 0);
}
else if (dx == 0 && dy == 0)
{
// plot point
vw.AddPoint(curVertex);
//mAppRef.DebugLog("PLOT v" + curVertex + ": "
// + beamX + "," + beamY);
}
else
{
// draw line from previous vertex
int newVertex = vw.AddVertex(beamX, beamY, 0);
vw.AddEdge(curVertex, newVertex);
curVertex = newVertex;
}
break;
case Opcode.HALT: // 00100000 00100000
if (stackPtr != 0)
{
mAppRef.DebugLog("NOTE: encountered HALT with nonzero stack");
}
done = true;
break;
case Opcode.SVEC: // 010YYYYY IIIXXXXX
dy = sign5((code0 >> 8) & 0x1f) * 2;
dx = sign5(code0 & 0x1f) * 2;
ii = (code0 >> 5) & 0x07;
if (ii != 1)
{
ii *= 2;
}
// note dx/dy==0 (i.e. draw point) is not supported for SVEC
beamX += (int)Math.Round(dx * scale);
beamY += (int)Math.Round(dy * scale);
if (ii == 0)
{
// move only
curVertex = vw.AddVertex(beamX, beamY, 0);
}
else
{
// draw line from previous vertex
int newVertex = vw.AddVertex(beamX, beamY, 0);
vw.AddEdge(curVertex, newVertex);
//mAppRef.DebugLog("SVEC edge " + curVertex + " - " + newVertex);
curVertex = newVertex;
}
break;
case Opcode.STAT: // 0110-EHO IIIICCCC
// Note this is different for e.g. Star Wars: 0110-RGB ZZZZZZZZ
ii = (code0 >> 4) & 0x0f;
break;
case Opcode.SCAL: // 0111-BBB LLLLLLLL
// Binary scaling adjusts vector drawing time, linear scaling does
// not. (Does this affect the intensity?)
int bs = (code0 >> 8) & 0x07;
int ls = code0 & 0xff;
scale = (16384 - (ls << 6)) >> bs;
break;
case Opcode.CNTR: // 10000000 01------
beamX = beamY = 0;
curVertex = centerVertex;
break;
case Opcode.JSR: // 101-AAAA AAAAAAAA
vaddr = code0 & 0x0fff; // spec says 12 bits, VECSIM uses 13
if (stackPtr == stack.Length)
{
mAppRef.ReportError("Stack overflow at +" + offset.ToString("x6"));
return(null);
}
stack[stackPtr++] = offset;
if (!Branch(vaddr, baseAddr, ref offset))
{
return(null);
}
break;
case Opcode.RTS: // 110----- --------
if (stackPtr == 0)
{
done = true;
}
else
{
offset = stack[--stackPtr];
}
break;
case Opcode.JMP: // 111-AAAA AAAAAAAA
vaddr = code0 & 0x0fff; // spec says 12 bits, VECSIM uses 13
if (!Branch(vaddr, baseAddr, ref offset))
{
return(null);
}
break;
default:
mAppRef.ReportError("Unhandled code $" + code0.ToString("x4"));
return(null);
}
}
} catch (IndexOutOfRangeException) {
// assume it was our file data access that caused the failure
mAppRef.ReportError("Ran off end of file");
return(null);
}
string msg;
if (!vw.Validate(out msg))
{
mAppRef.ReportError("Data error: " + msg);
return(null);
}
return(vw);
}
private IVisualizationWireframe GenerateWireframe(ReadOnlyDictionary <string, object> parms)
{
int offset = Util.GetFromObjDict(parms, P_OFFSET, 0);
int baseAddr = Util.GetFromObjDict(parms, P_BASE_ADDR, 0);
bool ignoreLabs = Util.GetFromObjDict(parms, P_IGNORE_LABS, false);
if (offset < 0 || offset >= mFileData.Length)
{
// should be caught by editor
mAppRef.ReportError("Invalid parameter");
return(null);
}
VisWireframe vw = new VisWireframe();
vw.Is2d = true;
try {
int[] stack = new int[4];
int stackPtr = 0;
double beamX = 0;
double beamY = 0;
int scaleFactor = 0; // tiny
bool done = false;
int centerVertex = vw.AddVertex(0, 0, 0);
int curVertex = centerVertex;
while (!done && offset < mFileData.Length)
{
ushort code0 = (ushort)Util.GetWord(mFileData, offset, 2, false);
offset += 2;
Opcode opc = GetOpcode(code0);
switch (opc)
{
case Opcode.VCTR: { // SSSS -mYY YYYY YYYY | BBBB -mXX XXXX XXXX
ushort code1 = (ushort)Util.GetWord(mFileData, offset, 2, false);
offset += 2;
int yval = sign11(code0 & 0x07ff);
int xval = sign11(code1 & 0x07ff);
int localsc = code0 >> 12; // local scale
int bb = code1 >> 12; // brightness
double scale = CalcScaleMult(scaleFactor + localsc);
double dx = xval * scale;
double dy = yval * scale;
beamX += dx;
beamY += dy;
if (bb == 0)
{
// move only
curVertex = vw.AddVertex((float)beamX, (float)beamY, 0);
}
else if (xval == 0 && yval == 0)
{
// plot point
vw.AddPoint(curVertex);
//mAppRef.DebugLog("PLOT v" + curVertex + ": "
// + beamX + "," + beamY);
}
else
{
// draw line from previous vertex
int newVertex = vw.AddVertex((float)beamX, (float)beamY, 0);
vw.AddEdge(curVertex, newVertex);
curVertex = newVertex;
}
if (VERBOSE)
{
mAppRef.DebugLog("VCTR scale=" + localsc + " x=" + dx +
" y=" + dy + " b=" + bb + " --> dx=" + dx +
" dy=" + dy);
}
}
break;
case Opcode.LABS: { // 1010 00yy yyyy yyyy | SSSS 00xx xxxx xxxx
ushort code1 = (ushort)Util.GetWord(mFileData, offset, 2, false);
offset += 2;
int yc = code0 & 0x07ff;
int xc = code1 & 0x07ff;
int scale = code1 >> 12;
if (!ignoreLabs)
{
// Some things do a big screen movement before they start
// drawing, which throws off the auto-scaling. The output
// looks better if we ignore the initial movement.
beamX = xc;
beamY = yc;
}
// Sign-extend the scale factor. (It's usually 0 or 1 in ROM.)
byte left = (byte)(scale << 4);
scaleFactor = (sbyte)left >> 4;
if (VERBOSE)
{
mAppRef.DebugLog("LABS scale=" + scale + " x=" + xc +
" y=" + yc);
}
}
break;
case Opcode.HALT: // 1011 0000 0000 0000
if (stackPtr != 0)
{
mAppRef.DebugLog("NOTE: encountered HALT with nonzero stack");
}
done = true;
break;
case Opcode.JSRL: { // 1100 aaaa aaaa aaaa
int vaddr = code0 & 0x0fff;
if (stackPtr == stack.Length)
{
mAppRef.ReportError("Stack overflow at +" +
offset.ToString("x6"));
return(null);
}
stack[stackPtr++] = offset;
if (!Branch(vaddr, baseAddr, ref offset))
{
return(null);
}
}
break;
case Opcode.JMPL: { // 1110 aaaa aaaa aaaa
int vaddr = code0 & 0x0fff;
if (!Branch(vaddr, baseAddr, ref offset))
{
return(null);
}
}
break;
case Opcode.RTSL: // 1101 0000 0000 0000
if (stackPtr == 0)
{
done = true;
}
else
{
offset = stack[--stackPtr];
}
break;
case Opcode.SVEC: { // 1111 smYY BBBB SmXX
int yval = sign3((code0 >> 8) & 0x07);
int xval = sign3(code0 & 0x07);
int localsc = ((code0 >> 11) & 0x01) | ((code0 >> 2) & 0x02);
// SVEC scale is VEC scale + 2
double scale = CalcScaleMult(scaleFactor + localsc + 2);
int bb = (code0 >> 4) & 0x0f;
// The dx/dy values need to be x256 to make them work right.
// This is not mentioned in any document I've found, but it's
// required if e.g. you want the hexagon to match up with the 'C'
// in the Asteroids copyright message.
double dx = (xval << 8) * scale;
double dy = (yval << 8) * scale;
beamX += dx;
beamY += dy;
if (bb == 0)
{
// move only
curVertex = vw.AddVertex((float)beamX, (float)beamY, 0);
}
else if (xval == 0 && yval == 0)
{
// plot point
vw.AddPoint(curVertex);
//mAppRef.DebugLog("SPLOT v" + curVertex + ": "
// + beamX + "," + beamY);
}
else
{
// draw line from previous vertex
int newVertex = vw.AddVertex((float)beamX, (float)beamY, 0);
vw.AddEdge(curVertex, newVertex);
curVertex = newVertex;
}
if (VERBOSE)
{
mAppRef.DebugLog("SVEC scale=" + localsc + " x=" + dx +
" y=" + dy + " b=" + bb + " --> dx=" + dx +
" dy=" + dy);
}
}
break;
default:
mAppRef.ReportError("Unhandled code $" + code0.ToString("x4"));
return(null);
}
}
} catch (IndexOutOfRangeException) {
// assume it was our file data access that caused the failure
mAppRef.ReportError("Ran off end of file");
return(null);
}
string msg;
if (!vw.Validate(out msg))
{
mAppRef.ReportError("Data error: " + msg);
return(null);
}
return(vw);
}
