en travaillant par octet j'ai ça
move.w #30,d0
move.w #10*160,d1
move.w d0,d2
asr #3,d2
asl #3,d2
add.w d2,d1
not.w d0
bset d0,(a0,d1.w)
je lance et je perds un cheveux... c'est pas encore ça mais ça affiche un peu mieux...
j'arrete et fais une pause
A+