function OnEvent(event, gkey, family)
    OutputLogMessage("event = %s, arg = %s, fam = %s\n", event, gkey, family)
--    OutputDebugMessage("event = %s, arg = %s, fam = %s\n", event, gkey, family)
    mkey = GetMKeyState()
    if gkey == 18 and mkey == 1 then
        if event == "G_PRESSED" then
            OutputDebugMessage("TS3_PTT_ACTIVATE")
        end
        if event == "G_RELEASED" then
            OutputDebugMessage("TS3_PTT_DEACTIVATE")
        end
    end
    if gkey == 11 and family == "mouse" then
        if event == "MOUSE_BUTTON_PRESSED" then
            OutputDebugMessage("TS3_PTT_ACTIVATE")
        end
        if event == "MOUSE_BUTTON_RELEASED" then
            OutputDebugMessage("TS3_PTT_ACTIVATE")
        end
    end
end