mod192 macro

;
;   move.w #-192*9+$12,d0
;
;
;   nop
;;; modulo 192
;;      you see the code in the debugger and the apropriate hexadecimal opcode
;   move.w #192,d2
;   tst.w d0
;   bmi.s .negatif
;.positif
;   cmp d2,d0
;   blt.s .ok
;   sub d2,d0
;   bra.s .positif
;.negatif
;   add.w d2,d0
;   bmi.s .negatif
;.ok

;   illegal
totopc
mod192 macro \1,\2          ; then you note the opcode and change the bmi etc as a dc.w statement  so it could be repeated
; here it's a macro but it's the same problem in rept endr
    move.w \2,-(sp)
    move.w #192,\2
    tst.w \1
    dc.w $6b08
    cmp \2,\1
    dc.w $6d08
    sub \2,\1
    dc.w $60F8
    add \2,\1
    dc.w $6bfc
    move.w (sp)+,\2
    endm
modnosp  macro \1,\2
    ;move.w \2,-(sp)
    ;move.w #192,\2
    tst.w \1
    dc.w $6b08
    cmp \2,\1
    dc.w $6d08
    sub \2,\1
    dc.w $60F8
    add \2,\1
    dc.w $6bfc
    ;move.w (sp)+,\2
    endm