Remplace :
moveq.l #5,d0 ;Gris clair \s1: move.l d1,(a1)+ dbf d0,\s1
par :
move.l d1,(a1)+ move.l d1,(a1)+ move.l d1,(a1)+ move.l d1,(a1)+ move.l d1,(a1)+ move.l d1,(a1)+
et de même pour le gris foncé, remplace toutes les occurrences de d3 par d0 et supprime le du movem, insère juste après le premier 'move.b -4(a0),(a1)' un 'lea 8000-24(a1),a1', puis remplace 'lea 16(a1),a1 ; lea 16(a2),a2' par 'lea 16-8000(a1),a1', puis remplace les occurrences de a2 par a1, et enfin enlève les movem de début et de fin
