{

File name : PixelBltB1.mc
Author : Gwan Santosa & Don Charnley
Date : 10-Apr-85 14:07:51
}

{
Set[PIXELBank, 02];
Set[PSCLRBank, 02];

Stored in LispBanks.dfn and Banks.dfn

}

@PIXELOP:	opcode[305'b],
	Bank ← PIXELBank, 		c1; {For Pixelblt}
	uTOS ← TOS,			c2;
	uTOSH ← TOSH, CROSS[PIXEL],	c3;
	
		
{@PSCLROP:	opcode[70'b],
	Bank ← PSCLRBank, 		c1; {For Pseudo8bitColor}
	uTOS ← TOS,			c2;
	uTOSH ← TOSH, CROSS[PSCLR],	c3;}
	
	{END}