Sub Activity_KeyPress (KeyCode As Int) As Boolean 'Return True to consume the event
If KeyCode=20 Or KeyCode=89 Then 'Joystick Down
CallSubDelayed(Me,"JOYSTICK_DOWN1")
Return True
End If
If KeyCode=19 Or KeyCode=90 Then 'Joystick Up
CallSubDelayed(Me,"JOYSTICK_UP1")
Return True
End If
Return True
End Sub