jackiechan :
move.l #$FFFF0000,d0 en moveq.l #-1,d3 ; clr.w d3 (je n'ai pas vérifié, mais c'est certainement plus rapide).

En tout cas, ça économise 2 octets.

Pollux
: Et enfin tu peux utiliser un dbf pour ta boucle, ça t'économiserait 4 cycles par boucle.

Et gaspille 2 octets:
subq.w #1,%dn
label:
...
dbf.w %dn,label
-> 6 octets (dbf.s n'existe pas)

label:
...
subq.w #1,%dn
bne.s label
-> 4 octets