CIAAPRA EQU $BFE001
Port1Fire EQU 6
Port2Fire EQU 7

WaitForMouse:
  BTST.B #Port1Fire,CIAAPRA
  BEQ Done
  BTST #Port2Fire,CIAAPRA
  BEQ Done
  BRA WaitForMouse
Done: