{  Filename: DrawLineB1.mc
   Description: Lisp line-drawing microcode.
   Author: Mitch Lichtenberg
   Creation date: 25-Jun-83 16:51:58
   
}

@DRAWLINE:	opcode[73'b],
	Bank ← DLBank,	c1;
	uYCount ← TOS,	c2;
	S ← S - 14'd, CROSS[DLEntry],	c3;

	S ← S - 16'd,	c1, at[DLExit];
	L2 ← L2.0, PC ← PC + PC16,  IBDisp,	c2;
	L2 ← L2.0, DISPNI[OpTable],	c3;

	{ E N D }