cant emulate buttons on my application

[dcwhat]

Hey guys i can not get my keys to show up on MAME, it sends over the letters but it wont recognize an actual button push.

Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
    

Private Type POINTAPI
    x As Long
    y As Long
    v1 As Long
    z As Long
    
End Type
Private Function GetCursorPosEx() As POINTAPI
GetCursorPos GetCursorPosEx
End Function


Private Sub Timer1_Timer()
With GetCursorPosEx
   ' Dim v1 As Integer
    x = .x
    'y = "Current Y = " & .y
    'z = "currect X = " & v1
    End With
    End Sub

Private Sub Timer2_Timer()
AppActivate "MAME"
With GetCursorPosEx
    z = .x
    Dim sy As Integer
    Dim sz As Integer
    'If z = .x Then
    Text1.Text = x
    If z = Text1.Text Then
    y = "Scratch Me!"
    ElseIf z > Text1.Text Then
    y = "Greater"

' and then you can use this:
SendKeys "{k}"
    ElseIf z < Text1.Text Then
    y = "smaller"
    SendKeys "{l}"
    Else
   End If
End With
End Sub

any ideas???