a: ; a: ret_&cc = ret_l ; define ret_<CC> to be ret_l endm
condret macro cc,ncc local a,b ifdef ret_l ; if ret_l is defined if (($ - ret_l) le 126) and ($ gt ret_l) 逆风编程精品 ; if ret_l is near enough then a: j&cc ret_l ; a: j<CC> to ret_l ret_&cc = a ; define ret_<CC> to be a: else makelab a,cc,ncc endif else ifdef ret_&cc ; if ret_<CC> defined if (($ - ret_&cc) le 126) and ($ gt ret_&cc) ; if ret_<CC> is near enough a: j&cc ret_&cc ; a: j<CC> to ret_<CC> ret_&cc = a ; define ret_<CC> to be a: else makelab a,cc,ncc endif else makelab a,cc,ncc endif endif endm ;condret macro cc,ncc ; local a,b ; ifdef ret_l ; if ret_l is defined ; if (($ - ret_l) le 126) and ($ gt ret_l) ; ; if ret_l is near enough then ; a: j&cc ret_l ; a: j<CC> to ret_l ; ret_&cc = a ; define ret_<CC> to be a: ; exitm ; endif ; endif ; ifdef ret_&cc ; if ret_<CC> defined ; if (($ - ret_&cc) le 126) and ($ gt ret_&cc) ; ; if ret_<CC> is near enough ; a: j&cc ret_&cc ; a: j<CC> to ret_<CC> ; ret_&cc = a ; define ret_<CC> to be a: ; exitm ; endif ; endif ; j&ncc a ; j<NCC> a: ; return ; return ; a: ; a: ; ret_&cc = ret_l ; define ret_<CC> to be ret_l ;endm
BREAK <RETZ - return if zero, links up shortwise if necessary>
retz macro condret z,nz endm
BREAK <RETNZ - return if not zero, links up shortwise if necessary>
retnz macro condret nz,z endm
BREAK <RETC - return if carry set, links up shortwise if necessary>
retc macro condret c,nc endm
BREAK <RETNC - return if not carry, links up shortwise if necessary>
retnc macro condret nc,c endm
本文章更多内容:<<上一页 - 1 - 2 |