la deconvenue de la betrave en zone urbain

replayZIK
    move.l ptreordata(pc),A0
    lea tableau256adr1,a1
    moveq #0,d1
    move.b (a0)+,d1
    add d1,d1
    add d1,d1
    move.l a1,a2
    add d1,a2
    move.l (a2)+,a4
    move.l (a2)+,a5
    lea suite(pc),a6
    jmp (a4)    ; --> JMPRTS  = jmp (a5)
                ; --> JMPRTS2 = jmp (a6) = adresse de retour
suite
    move.b (a0)+,d1
    add d1,d1
    add d1,d1
    lea 128*2*4(a1),a1
    move.l a1,a2
    add d1,a2
    move.l (a2)+,a4
    move.l (a2)+,a5
    lea suite2(pc),a6
    jmp (a4)
suite2
    rts
ptreordata  dc.l eordata