-- END EQUATES ----- DECIMAL SETUP= 34 OCTAL *30 DECIMAL PBLOCK, 1 /POSITION COMMAND PXPOS, 0 /X POSITION PYPOS, 0 /Y POSITION VBLOCK, 4 /VECTOR COMMAND VXPOS, 0 /X POSITION VYPOS, 0 /Y POSITION INIBLK, 29 /INIT COMMAND TO PRIMATIVES. STCMD, 0 OCTAL LINCNT, 0 FUNC, 0 *200 START, DCA MODE /SEE WHICH MODE IT IS CLL CLA TAD MODE /FI