case 0000:
	uuo(apr);
	goto fetch;
	break;
case 0001:
	uuo(apr);
	goto fetch;
	break;
case 0002:
	uuo(apr);
	goto fetch;
	break;
case 0003:
	uuo(apr);
	goto fetch;
	break;
case 0004:
	uuo(apr);
	goto fetch;
	break;
case 0005:
	uuo(apr);
	goto fetch;
	break;
case 0006:
	uuo(apr);
	goto fetch;
	break;
case 0007:
	uuo(apr);
	goto fetch;
	break;
case 0010:
	uuo(apr);
	goto fetch;
	break;
case 0011:
	uuo(apr);
	goto fetch;
	break;
case 0012:
	uuo(apr);
	goto fetch;
	break;
case 0013:
	uuo(apr);
	goto fetch;
	break;
case 0014:
	uuo(apr);
	goto fetch;
	break;
case 0015:
	uuo(apr);
	goto fetch;
	break;
case 0016:
	uuo(apr);
	goto fetch;
	break;
case 0017:
	uuo(apr);
	goto fetch;
	break;
case 0020:
	uuo(apr);
	goto fetch;
	break;
case 0021:
	uuo(apr);
	goto fetch;
	break;
case 0022:
	uuo(apr);
	goto fetch;
	break;
case 0023:
	uuo(apr);
	goto fetch;
	break;
case 0024:
	uuo(apr);
	goto fetch;
	break;
case 0025:
	uuo(apr);
	goto fetch;
	break;
case 0026:
	uuo(apr);
	goto fetch;
	break;
case 0027:
	uuo(apr);
	goto fetch;
	break;
case 0030:
	uuo(apr);
	goto fetch;
	break;
case 0031:
	uuo(apr);
	goto fetch;
	break;
case 0032:
	uuo(apr);
	goto fetch;
	break;
case 0033:
	uuo(apr);
	goto fetch;
	break;
case 0034:
	uuo(apr);
	goto fetch;
	break;
case 0035:
	uuo(apr);
	goto fetch;
	break;
case 0036:
	uuo(apr);
	goto fetch;
	break;
case 0037:
	uuo(apr);
	goto fetch;
	break;
case 0040:
	uuo(apr);
	goto fetch;
	break;
case 0041:
	uuo(apr);
	goto fetch;
	break;
case 0042:
	uuo(apr);
	goto fetch;
	break;
case 0043:
	uuo(apr);
	goto fetch;
	break;
case 0044:
	uuo(apr);
	goto fetch;
	break;
case 0045:
	uuo(apr);
	goto fetch;
	break;
case 0046:
	uuo(apr);
	goto fetch;
	break;
case 0047:
	uuo(apr);
	goto fetch;
	break;
case 0050:
	uuo(apr);
	goto fetch;
	break;
case 0051:
	uuo(apr);
	goto fetch;
	break;
case 0052:
	uuo(apr);
	goto fetch;
	break;
case 0053:
	uuo(apr);
	goto fetch;
	break;
case 0054:
	uuo(apr);
	goto fetch;
	break;
case 0055:
	uuo(apr);
	goto fetch;
	break;
case 0056:
	uuo(apr);
	goto fetch;
	break;
case 0057:
	uuo(apr);
	goto fetch;
	break;
case 0060:
	uuo(apr);
	goto fetch;
	break;
case 0061:
	uuo(apr);
	goto fetch;
	break;
case 0062:
	uuo(apr);
	goto fetch;
	break;
case 0063:
	uuo(apr);
	goto fetch;
	break;
case 0064:
	uuo(apr);
	goto fetch;
	break;
case 0065:
	uuo(apr);
	goto fetch;
	break;
case 0066:
	uuo(apr);
	goto fetch;
	break;
case 0067:
	uuo(apr);
	goto fetch;
	break;
case 0070:
	uuo(apr);
	goto fetch;
	break;
case 0071:
	uuo(apr);
	goto fetch;
	break;
case 0072:
	uuo(apr);
	goto fetch;
	break;
case 0073:
	uuo(apr);
	goto fetch;
	break;
case 0074:
	uuo(apr);
	goto fetch;
	break;
case 0075:
	uuo(apr);
	goto fetch;
	break;
case 0076:
	uuo(apr);
	goto fetch;
	break;
case 0077:
	uuo(apr);
	goto fetch;
	break;
case 0100:
	nop(apr);
	break;
case 0101:
	nop(apr);
	break;
case 0102:
	nop(apr);
	break;
case 0103:
	nop(apr);
	break;
case 0104:
	nop(apr);
	break;
case 0105:
	nop(apr);
	break;
case 0106:
	nop(apr);
	break;
case 0107:
	nop(apr);
	break;
case 0110:
	nop(apr);
	break;
case 0111:
	nop(apr);
	break;
case 0112:
	nop(apr);
	break;
case 0113:
	nop(apr);
	break;
case 0114:
	nop(apr);
	break;
case 0115:
	nop(apr);
	break;
case 0116:
	nop(apr);
	break;
case 0117:
	nop(apr);
	break;
case 0120:
	nop(apr);
	break;
case 0121:
	nop(apr);
	break;
case 0122:
	nop(apr);
	break;
case 0123:
	nop(apr);
	break;
case 0124:
	nop(apr);
	break;
case 0125:
	nop(apr);
	break;
case 0126:
	nop(apr);
	break;
case 0127:
	nop(apr);
	break;
case 0130:
	nop(apr);
	break;
case 0131:
	nop(apr);
	break;
case 0132:
	FSC
	break;
case 0133:
	pi_hold(apr);
	if(FIRST_PART){
	if(CHAR_INC){
	fce_pse(apr);
	char_inc(apr);
	sce(apr);
	}else{
	fce(apr);
	}
	if(!apr->pi_cyc) PC = PC+1 & RT;
	}else{
	}
	break;
case 0134:
	pi_hold(apr);
	if(FIRST_PART){
	if(CHAR_INC){
	fce_pse(apr);
	char_inc(apr);
	sce(apr);
	}else{
	fce(apr);
	}
	char_mask(apr);
	goto addr;
	}else{
	fce(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	char_load(apr);
	pi_dismiss(apr);
	sac(apr);
	}
	break;
case 0135:
	pi_hold(apr);
	if(FIRST_PART){
	fce(apr);
	char_mask(apr);
	goto addr;
	}else{
	fce(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	char_load(apr);
	pi_dismiss(apr);
	sac(apr);
	}
	break;
case 0136:
	pi_hold(apr);
	if(FIRST_PART){
	if(CHAR_INC){
	fce_pse(apr);
	char_inc(apr);
	sce(apr);
	}else{
	fce(apr);
	}
	char_mask(apr);
	goto addr;
	}else{
	fac(apr);
	fce_pse(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	char_dep(apr);
	pi_dismiss(apr);
	sce(apr);
	}
	break;
case 0137:
	pi_hold(apr);
	if(FIRST_PART){
	fce(apr);
	char_mask(apr);
	goto addr;
	}else{
	fac(apr);
	fce_pse(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	char_dep(apr);
	pi_dismiss(apr);
	sce(apr);
	}
	break;
case 0140:
	FLOAT
	break;
case 0141:
	FLOAT
	break;
case 0142:
	FLOAT
	break;
case 0143:
	FLOAT
	break;
case 0144:
	FLOAT
	break;
case 0145:
	FLOAT
	break;
case 0146:
	FLOAT
	break;
case 0147:
	FLOAT
	break;
case 0150:
	FLOAT
	break;
case 0151:
	FLOAT
	break;
case 0152:
	FLOAT
	break;
case 0153:
	FLOAT
	break;
case 0154:
	FLOAT
	break;
case 0155:
	FLOAT
	break;
case 0156:
	FLOAT
	break;
case 0157:
	FLOAT
	break;
case 0160:
	FLOAT
	break;
case 0161:
	FLOAT
	break;
case 0162:
	FLOAT
	break;
case 0163:
	FLOAT
	break;
case 0164:
	FLOAT
	break;
case 0165:
	FLOAT
	break;
case 0166:
	FLOAT
	break;
case 0167:
	FLOAT
	break;
case 0170:
	FLOAT
	break;
case 0171:
	FLOAT
	break;
case 0172:
	FLOAT
	break;
case 0173:
	FLOAT
	break;
case 0174:
	FLOAT
	break;
case 0175:
	FLOAT
	break;
case 0176:
	FLOAT
	break;
case 0177:
	FLOAT
	break;
case 0200:
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0201:
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0202:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0203:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0204:
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	t = MB; MB = AR; AR = t;
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0205:
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	MB = (MB&RT)<<18 | MB>>18;
	t = MB; MB = AR; AR = t;
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0206:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	MB = (MB&RT)<<18 | MB>>18;
	t = MB; MB = AR; AR = t;
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0207:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	t = MB; MB = AR; AR = t;
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0210:
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_negate(apr);
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0211:
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	ar_negate(apr);
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0212:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	ar_negate(apr);
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0213:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_negate(apr);
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0214:
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(AR_NEG){
	ar_negate(apr);
	}
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0215:
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	if(AR_NEG){
	ar_negate(apr);
	}
	fwt_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0216:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = AR;
	if(AR_NEG){
	ar_negate(apr);
	}
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0217:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(AR_NEG){
	ar_negate(apr);
	}
	fwt_ov(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0220:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	imult_i(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0221:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	imult_i(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0222:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	imult_i(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0223:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	imult_i(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0224:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0225:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0226:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0227:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	imult(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	sac2(apr);
	break;
case 0230:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0231:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0232:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sce(apr);
	break;
case 0233:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sce(apr);
	sac(apr);
	sac2(apr);
	break;
case 0234:
	fac(apr);
	fac2(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0235:
	fac(apr);
	fac2(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0236:
	fac(apr);
	fac2(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sce(apr);
	break;
case 0237:
	fac(apr);
	fac2(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	idiv(apr);
	pi_dismiss(apr);
	sce(apr);
	sac(apr);
	sac2(apr);
	break;
case 0240:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	SC = ~MB & 0377 | ~MB>>9 & 0400;
	if(MB_RNEG){ SC = ~(SC+1) & 0777; }
	ash(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0241:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	SC = ~MB & 0377 | ~MB>>9 & 0400;
	if(MB_RNEG){ SC = ~(SC+1) & 0777; }
	rot(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0242:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	SC = ~MB & 0377 | ~MB>>9 & 0400;
	if(MB_RNEG){ SC = ~(SC+1) & 0777; }
	lsh(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0243:
	nop(apr);
	break;
case 0244:
	fac(apr);
	fac2(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	SC = ~MB & 0377 | ~MB>>9 & 0400;
	if(MB_RNEG){ SC = ~(SC+1) & 0777; }
	ashc(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0245:
	fac(apr);
	fac2(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	SC = ~MB & 0377 | ~MB>>9 & 0400;
	if(MB_RNEG){ SC = ~(SC+1) & 0777; }
	rotc(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0246:
	fac(apr);
	fac2(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	SC = ~MB & 0377 | ~MB>>9 & 0400;
	if(MB_RNEG){ SC = ~(SC+1) & 0777; }
	lshc(apr);
	pi_dismiss(apr);
	sac(apr);
	sac2(apr);
	break;
case 0247:
	nop(apr);
	break;
case 0250:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sce(apr);
	sac(apr);
	break;
case 0251:
	fac_(apr);
blt_fetch:
	fccaclt(apr);
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	MA = MB & RT;
	t = MB; MB = MQ; MQ = t;
	rdmem(apr);
	MB = MQ;
	t = MB; MB = AR; AR = t;
	pir_stb(apr);
	AR &= RT;
	ar_sub(apr);
	t = MB; MB = MQ; MQ = t;
	t = MB; MB = AR; AR = t;
	t = MB; MB = MQ; MQ = t;
	if(!MQ_NEG){
	PC = PC+1 & RT;
	}
	if(BLT_DONE){
	pi_dismiss(apr);
	if(!BLT_LAST){
	sac(apr);
	}
	}else{
	t = MB; MB = AR; AR = t;
	goto blt_fetch;
	}
	break;
case 0252:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc_ltrt(apr);
	if(!AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	sac(apr);
	break;
case 0253:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc_ltrt(apr);
	if(AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	sac(apr);
	break;
case 0254:
	pi_hold(apr);
	if(IR & 0400){
	if(USER){
	set_ill_op(apr);
	}
	pi_rst(apr);
	}
	if(IR & 0200){
	if(USER){
	set_ill_op(apr);
	}else{
	apr->run = 0;
	}
	}
	if(IR & 0100){
	ar_flag_clr(apr);
	ar_flag_set(apr);
	}
	if(IR & 040){
	mode_sync(apr);
	}
	MB = 0;
	MB |= PC;
	PC = MA;
	MA = MB & RT;
	pi_dismiss(apr);
	break;
case 0255:
	pi_hold(apr);
	if(SELECTED_FLAGS){
	PC = MA;
	}
	selected_flags_clr(apr);
	pi_dismiss(apr);
	break;
case 0256:
	mr_clr(apr);
	goto exec;
	break;
case 0257:
	nop(apr);
	break;
case 0260:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc_ltrt(apr);
	MB = 0;
	MB |= PC;
	mb_fm_misc_bits(apr);
	PC = MA;
	t = MB; MB = AR; AR = t;
	MA = MB & RT;
	t = MB; MB = AR; AR = t;
	pdl_ov(apr);
	pi_dismiss(apr);
	sce(apr);
	sac(apr);
	break;
case 0261:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc_ltrt(apr);
	t = MB; MB = AR; AR = t;
	MA = MB & RT;
	t = MB; MB = AR; AR = t;
	pdl_ov(apr);
	pi_dismiss(apr);
	sce(apr);
	sac(apr);
	break;
case 0262:
	fac_(apr);
	fccacrt(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = MQ;
	ar_dec_ltrt(apr);
	pdl_ov(apr);
	pi_dismiss(apr);
	sce(apr);
	sac(apr);
	break;
case 0263:
	fac_(apr);
	fccacrt(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = MQ;
	MA = MB & RT;
	ar_dec_ltrt(apr);
	PC = MA;
	pdl_ov(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0264:
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = 0;
	MB |= PC;
	mb_fm_misc_bits(apr);
	exit_user(apr);
	clr_ill_op(apr);
	apr->chf7 = 0;
	PC = MA;
	PC = PC+1 & RT;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0265:
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = 0;
	MB |= PC;
	mb_fm_misc_bits(apr);
	PC = MA;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0266:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	MB |= PC;
	PC = MA;
	t = MB; MB = AR; AR = t;
	PC = PC+1 & RT;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0267:
	fac_(apr);
	fccaclt(apr);
	pi_hold(apr);
	MB = MQ;
	PC = MA;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0270:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_add(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0271:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_add(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0272:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_add(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0273:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_add(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0274:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0275:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0276:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0277:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0300:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	pi_dismiss(apr);
	break;
case 0301:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(AR_LESS){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0302:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0303:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(AR_LESS || AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0304:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	PC = PC+1 & RT;
	pc_chg(apr);
	pi_dismiss(apr);
	break;
case 0305:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(!AR_LESS){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0306:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0307:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(!AR_LESS && !AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0310:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	pi_dismiss(apr);
	break;
case 0311:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(AR_LESS){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0312:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0313:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(AR_LESS || AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0314:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	PC = PC+1 & RT;
	pc_chg(apr);
	pi_dismiss(apr);
	break;
case 0315:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(!AR_LESS){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0316:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0317:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_sub(apr);
	if(!AR_LESS && !AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	pi_dismiss(apr);
	break;
case 0320:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0321:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	if(AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0322:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0323:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	if(AR_NEG || AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0324:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	PC = PC+1 & RT;
	pc_chg(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0325:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	if(!AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0326:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	if(!AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0327:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	if(!AR_NEG && !AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0330:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0331:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(AR_NEG){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0332:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0333:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(AR_NEG || AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0334:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	PC = PC+1 & RT;
	pc_chg(apr);
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0335:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(!AR_NEG){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0336:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0337:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	if(!AR_NEG && !AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0340:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0341:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	if(AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0342:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0343:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	if(AR_NEG || AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0344:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	PC = PC+1 & RT;
	pc_chg(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0345:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	if(!AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0346:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	if(!AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0347:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_inc(apr);
	if(!AR_NEG && !AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0350:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0351:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	if(AR_NEG){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0352:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0353:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	if(AR_NEG || AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0354:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	PC = PC+1 & RT;
	pc_chg(apr);
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0355:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	if(!AR_NEG){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0356:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0357:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_inc(apr);
	if(!AR_NEG && !AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0360:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0361:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	if(AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0362:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0363:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	if(AR_NEG || AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0364:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	PC = PC+1 & RT;
	pc_chg(apr);
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0365:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	if(!AR_NEG){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0366:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	if(!AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0367:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	ar_dec(apr);
	if(!AR_NEG && !AR_ZERO){
	PC = MA;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	pi_dismiss(apr);
	sac(apr);
	break;
case 0370:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0371:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	if(AR_NEG){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0372:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0373:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	if(AR_NEG || AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0374:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	PC = PC+1 & RT;
	pc_chg(apr);
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0375:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	if(!AR_NEG){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0376:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0377:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	ar_dec(apr);
	if(!AR_NEG && !AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	ar_set_ov_cry(apr);
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0400:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0401:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0402:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0403:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0404:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0405:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0406:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0407:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0410:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0411:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0412:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0413:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0414:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR |= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0415:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR |= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0416:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR |= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0417:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR |= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0420:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0421:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0422:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0423:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0424:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0425:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0426:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0427:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0430:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0431:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0432:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0433:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0434:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0435:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0436:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0437:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0440:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0441:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0442:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0443:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR |= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0444:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0445:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0446:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0447:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0450:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0451:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0452:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0453:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0454:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0455:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0456:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0457:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR |= MB;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0460:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0461:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0462:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0463:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0464:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0465:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0466:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0467:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR ^= FW;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0470:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0471:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0472:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0473:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR &= MB;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0474:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0475:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= FW;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0476:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	break;
case 0477:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= FW;
	pi_dismiss(apr);
	MB = AR;
	sce(apr);
	sac(apr);
	break;
case 0500:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0501:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0502:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0503:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0504:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0505:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0506:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0507:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0510:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0511:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0512:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = 0;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0513:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = 0;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0514:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0515:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0516:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0517:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0520:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0521:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0522:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0523:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0524:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0525:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0526:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0527:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= RT;
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0530:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0531:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0532:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0533:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0534:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0535:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0536:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0537:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_RNEG){
	AR ^= RT;
	}
	AR = AR&RT | MB&LT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0540:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0541:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0542:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0543:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0544:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0545:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0546:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0547:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0550:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0551:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0552:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = 0;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0553:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = 0;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0554:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0555:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0556:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0557:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0560:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0561:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0562:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0563:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0564:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0565:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0566:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0567:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	AR ^= LT;
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0570:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0571:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0572:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0573:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0574:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0575:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0576:
	fac(apr);
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	t = MB; MB = AR; AR = t;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	break;
case 0577:
	fce_pse(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	AR = MB;
	MB = (MB&RT)<<18 | MB>>18;
	AR = 0;
	if(MB_NEG){
	AR ^= LT;
	}
	AR = AR&LT | MB&RT;
	MB = AR;
	pi_dismiss(apr);
	sce(apr);
	sacX(apr);
	break;
case 0600:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0601:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0602:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0603:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0604:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0605:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0606:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0607:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0610:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0611:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0612:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0613:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0614:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0615:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0616:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0617:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	break;
case 0620:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0621:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0622:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0623:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0624:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0625:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0626:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0627:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0630:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0631:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0632:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0633:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0634:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0635:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0636:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0637:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	MB &= AR;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0640:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0641:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0642:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0643:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0644:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0645:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0646:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0647:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0650:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0651:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0652:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0653:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0654:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0655:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0656:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0657:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR ^= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0660:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0661:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0662:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0663:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0664:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0665:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0666:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0667:
	fac(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0670:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0671:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0672:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0673:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0674:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0675:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	PC = PC+1 & RT;
	pc_chg(apr);
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0676:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0677:
	fac(apr);
	fce(apr);
	pi_hold(apr);
	if(!apr->pi_cyc) PC = PC+1 & RT;
	MB = (MB&RT)<<18 | MB>>18;
	NMB = MB;
	NMB &= AR;
	AR |= MB;
	MB = NMB;
	t = MB; MB = AR; AR = t;
	AR ^= FW;
	AR ^= FW;
	if(!AR_ZERO){
	PC = PC+1 & RT;
	pc_chg(apr);
	}
	t = MB; MB = AR; AR = t;
	pi_dismiss(apr);
	sac(apr);
	break;
case 0700:
	/* IOT */
	break;
case 0701:
	/* IOT */
	break;
case 0702:
	/* IOT */
	break;
case 0703:
	/* IOT */
	break;
case 0704:
	/* IOT */
	break;
case 0705:
	/* IOT */
	break;
case 0706:
	/* IOT */
	break;
case 0707:
	/* IOT */
	break;
case 0710:
	/* IOT */
	break;
case 0711:
	/* IOT */
	break;
case 0712:
	/* IOT */
	break;
case 0713:
	/* IOT */
	break;
case 0714:
	/* IOT */
	break;
case 0715:
	/* IOT */
	break;
case 0716:
	/* IOT */
	break;
case 0717:
	/* IOT */
	break;
case 0720:
	/* IOT */
	break;
case 0721:
	/* IOT */
	break;
case 0722:
	/* IOT */
	break;
case 0723:
	/* IOT */
	break;
case 0724:
	/* IOT */
	break;
case 0725:
	/* IOT */
	break;
case 0726:
	/* IOT */
	break;
case 0727:
	/* IOT */
	break;
case 0730:
	/* IOT */
	break;
case 0731:
	/* IOT */
	break;
case 0732:
	/* IOT */
	break;
case 0733:
	/* IOT */
	break;
case 0734:
	/* IOT */
	break;
case 0735:
	/* IOT */
	break;
case 0736:
	/* IOT */
	break;
case 0737:
	/* IOT */
	break;
case 0740:
	/* IOT */
	break;
case 0741:
	/* IOT */
	break;
case 0742:
	/* IOT */
	break;
case 0743:
	/* IOT */
	break;
case 0744:
	/* IOT */
	break;
case 0745:
	/* IOT */
	break;
case 0746:
	/* IOT */
	break;
case 0747:
	/* IOT */
	break;
case 0750:
	/* IOT */
	break;
case 0751:
	/* IOT */
	break;
case 0752:
	/* IOT */
	break;
case 0753:
	/* IOT */
	break;
case 0754:
	/* IOT */
	break;
case 0755:
	/* IOT */
	break;
case 0756:
	/* IOT */
	break;
case 0757:
	/* IOT */
	break;
case 0760:
	/* IOT */
	break;
case 0761:
	/* IOT */
	break;
case 0762:
	/* IOT */
	break;
case 0763:
	/* IOT */
	break;
case 0764:
	/* IOT */
	break;
case 0765:
	/* IOT */
	break;
case 0766:
	/* IOT */
	break;
case 0767:
	/* IOT */
	break;
case 0770:
	/* IOT */
	break;
case 0771:
	/* IOT */
	break;
case 0772:
	/* IOT */
	break;
case 0773:
	/* IOT */
	break;
case 0774:
	/* IOT */
	break;
case 0775:
	/* IOT */
	break;
case 0776:
	/* IOT */
	break;
case 0777:
	/* IOT */
	break;