; IF condition macro, as with A86
Macro IFC cond,op,x,y,z
LOCAL @@lbl
ifidni <cond>,<a>
jna @@lbl
elseifidni <cond>,<ae>
jnae @@lbl
elseifidni <cond>,<b>
jnb @@lbl
elseifidni <cond>,<be>
jnbe @@lbl
elseifidni <cond>,<c>
jnc @@lbl
elseifidni <cond>,<e>
jne @@lbl
elseifidni <cond>,<g>
jng @@lbl
elseifidni <cond>,<ge>
jnge @@lbl
elseifidni <cond>,<l>
jnl @@lbl
elseifidni <cond>,<le>
jnle @@lbl
elseifidni <cond>,<na>
ja @@lbl
elseifidni <cond>,<nae>
jae @@lbl
elseifidni <cond>,<nb>
jb @@lbl
elseifidni <cond>,<nbe>
jbe @@lbl
elseifidni <cond>,<nc>
jc @@lbl
elseifidni <cond>,<ne>
je @@lbl
elseifidni <cond>,<ng>
jg @@lbl
elseifidni <cond>,<nge>
jge @@lbl
elseifidni <cond>,<nl>
jl @@lbl
elseifidni <cond>,<nle>
jle @@lbl
elseifidni <cond>,<no>
jo @@lbl
elseifidni <cond>,<np>
jp @@lbl
elseifidni <cond>,<ns>
js @@lbl
elseifidni <cond>,<nz>
jz @@lbl
elseifidni <cond>,<o>
jno @@lbl
elseifidni <cond>,<p>
jnp @@lbl
elseifidni <cond>,<pe>
jpo @@lbl
elseifidni <cond>,<po>
jpe @@lbl
elseifidni <cond>,<s>
jns @@lbl
elseifidni <cond>,<z>
jnz @@lbl
endif
ifnb <z>
op x,y,z
elseifnb <y>
op x,y
else
op x
endif
@@lbl:
EndM