Voici le code:
_main:
move.w #$700,d0 trap #1 ;;;;;;;;;;;;;;;;;;;;;;;;; move.l #$4c00,a0 move.l #buffer,a1 move.w #959,d0 loop_screen_sauv1: move.l (a0)+,(a1)+ dbf d0,loop_screen_sauv1 ;;;;;;;;;;;;;;;;;;;;;;;;;;;; jsr graphlib::clr_scr ;;;;;;;;;;;;;;;;;;;;;;;;;;;; move.l $74,old_int5 bclr.b #2,$600001 move.l #new_int5,$74 bset.b #2,$600001 clr.w d0 trap #1 ;;;;;;;;;;;;;;;;;;;;;;; ;;....code.... ;; ;;;;;;;;;;;;;;;;;;;;;;; new_int5: movem.l d0/a0-a1,-(a7) ;On charge l'ecran actuelle dans le buffer! cmp.w #2,stat ;On affiche cette partie 1 fois sur 3 bne suite01 ;On affiche l'ecran! move.l #$4c00,a0 move.l #buffer,a1 move.w #959,d0 loop_screen_rest: move.l (a1)+,(a0)+ dbf d0,loop_screen_rest clr.w stat suite01 movem.l (a7)+,d0/a0-a1 rte