Right then helpful chaps, heres the first routine I need help with so I can transpose to Amiga :)

I'm presuming that this is a keyboard check routine.

this one is called three different times, and D0 and D1 are used as parameters before the routine is called, and both are set to the same value.

So we have: $30, $a0 and $fa which I presume (i.e. i'm totally guessing!!) are parameters for different key presses or event checks.

or are they parameters for mouse button presses?

Haven't got a clue!


     lea      $fffffc00.s,a1
     lea      2(a1),a2
w1:      btst      #1,(a1)
     beq.s      w1
     move.b#$14,(a2)
w2:      btst      #1,(a1)
     beq.s      w2
     move.b  #$9,2(a1)
w3:      btst      #1,(a1)
     beq.s      w3
     clr.b      (a2)
w4:      btst      #1,(a1)
     beq.s      w4
     move.b  d0,(a2)
w5:      btst      #1,(a1)
     beq.s      w5
     clr.b      (a2)
w6:      btst      #1,(a1)
     beq.s      w6
     move.bd1,(a2)
w7:      btst      #1,(a1)
     beq.s      w7
     move.b      #$c,(a2)
w8:      btst      #1,(a1)
     beq.s      w8
     move.b      #1,(a2)
w9:      btst      #1,(a1)
     beq.s      w9
     move.b      #1,(a2)
w10:      btst      #1,(a1)
     beq.s      w10
     lsr.b      #1,d1
     lsr.b      #1,d0
     move.b      #$e,(a2)
w11:      btst      #1,(a1)
     beq.s      w11
     clr.b      (a2)
w12:      btst      #1,(a1)
     beq.s      w12
     move.b      d0,(a2)
w13:      btst      #1,(a1)
     beq.s      w13
     clr.b      (a2)
w14:      btst      #1,(a1)
     beq.s      w14
     move.b      d1,(a2)
w15:      btst      #1,(a1)
     beq.s      w15
     rts