; ; Additonal Blitz Assembler commands in macro form, added ; to Blitzlibs for BUM10. ; ; Generously donated by Steve Matty - RI/RWE - August '96 ;   .shortbranch ; ;Collection of shortbranch macros ; ;e.g:           TST.w  d0 ;               BNE    goto_here ;               ADDQ   #1,d0 ;           goto_here: ; ; ;macrocall:     !SBNE{goto_here} ; € SBRA   €%.b $60,`1-'label0`@ 'label0`@ € €  € SBCC   €%.b $64,`1-'labelz`@ 'labelz`@ € €  € SBCS   €%.b $65,`1-'label5`@ 'label5`@ € €  € SBNE   €%.b $66,`1-'label6`@ 'label6`@ € €  € SBEQ   €%.b $67,`1-'label7`@ 'label7`@ € €  € SBPL   €%.b $6A,`1-'labela`@ 'labela`@ € €  € SBMI   €%.b $6B,`1-'labelb`@ 'labelb`@ € €  € SBGE   €%.b $6C,`1-'labelc`@ 'labelc`@ € €  € SBLT   €%.b $6D,`1-'labeld`@ 'labeld`@ € €  € SBGT   €%.b $6E,`1-'labele`@ 'labele`@ € €  € SBLE   €%.b $6F,`1-'labelf`@ 'labelf`@ € €   .leascale020 ; ;For 020+ processors only ; ;e.g:        LEA (aX,dX.l*8),aX ; ; ;macrocall:  !LEASCALE{source_aX, dX, scale(2/4/8), dest_aX} ; € LEASCALE   €%.b  $41+{`4*2}   €%.b  $f0+`1   € `3=2     €%.b  $10*{`2}+$a   €     € `3=4       €%.b  $10*{`2}+$c     €       € `3=8         €%.b  $10*{`2}+$e       €     €   €   €%.b  0 € €  