TMT5: keyboard Shortcuts not working ?

[themaster1]

Something's strange with TotalMediaTheatre5 when i press Shift + Up on my keyboard it's working fine (increase volume), when i use it on eventghost with emulate keystrokes it is not !

The strange thing is that some keystrokes work with emulate keystrokes and some don't (mute, subtitles, dvd menu these work)

Any idea of what's going on?

[themaster1]

Well it seems i found out, if i enable "use alternate method to emulate keyspresses" most of the keystrokes work. I will report back

[themaster1]

Here is the xml.
Most actions work play, pause, volume, dvd menu

<Folder Name="TotalMediaTheatre5" id="1506" Enabled="False">
<Macro Name="AutoPlay">
<Event Name="System.DriveMounted.H" />
<Action>
Window.SendKeys(u'{Space}', False)
</Action>
</Macro>
<Macro Name="Play">
<Event Name="HauppaugeIR.PLAY" />
<Action>
Window.SendKeys(u'{Space}', False)
</Action>
</Macro>
<Macro Name="Pause">
<Event Name="HauppaugeIR.PAUSE" />
<Action>
Window.SendKeys(u'{Space}', False)
</Action>
</Macro>
<Macro Name="Stop">
<Event Name="HauppaugeIR.STOP" />
<Action>
Window.SendKeys(u'{O}', True)
</Action>
</Macro>
<Macro Name="Repeat A/B scene">
<Event Name="HauppaugeIR.CHNLPREV" />
<Action>
Window.SendKeys(u'{Ctrl+R}', True)
</Action>
</Macro>
<Macro Name="Menu">
<Event Name="HauppaugeIR.MENU" />
<Action>
Window.SendKeys(u'{Ctrl+M}', True)
</Action>
</Macro>
<Macro Name="Previous chapter">
<Event Name="HauppaugeIR.SKIPREV" />
<Action>
Window.SendKeys(u'{PageUp}', True)
</Action>
</Macro>
<Macro Name="Next chapter">
<Event Name="HauppaugeIR.SKIPFWD" />
<Action>
Window.SendKeys(u'{PageDown}', True)
</Action>
</Macro>
<Macro Name="Step backward">
<Event Name="HauppaugeIR.REWIND" />
<Action>
Window.SendKeys(u'{R}', False)
</Action>
</Macro>
<Macro Name="Step forward">
<Event Name="HauppaugeIR.FASTFWD" />
<Action>
Window.SendKeys(u'{F}', False)
</Action>
</Macro>
<Macro Name="Subtitles">
<Event Name="HauppaugeIR.BLUE" />
<Action>
Window.SendKeys(u'{s}', False)
</Action>
</Macro>
<Macro Name="Toggle fullscreen">
<Event Name="HauppaugeIR.GREEN" />
<Action>
Window.SendKeys(u'{z}', False)
</Action>
</Macro>
<Macro Name="Toggle mute">
<Event Name="HauppaugeIR.MUTE" />
<Action>
Window.SendKeys(u'{Q}', False)
</Action>
</Macro>
<Macro Name="Volume up">
<Event Name="HauppaugeIR.VOLUP" />
<Action>
Window.SendKeys(u'{Shift+Up}', True)
</Action>
</Macro>
<Macro Name="Volume down">
<Event Name="HauppaugeIR.VOLDOWN" />
<Action>
Window.SendKeys(u'{Shift+Down}', True)
</Action>
</Macro>
<Macro Name="Next audio stream" />
<Macro Name="Next subtitle">
<Event Name="HauppaugeIR.YELLOW" />
<Action>
EventGhost.ShowOSD(u'Sous-Titres Suivant', u'0;-24;0;0;0;700;0;0;0;0;3;2;1;34;Arial', (0, 158, 234), (0, 0, 0), 6, (0, 0), 0, 3.0, True)
</Action>
</Macro>
<Macro Name="Next angle">
<Event Name="HauppaugeIR.TEXT" />
<Action>
PowerDvd.NextAngel()
</Action>
<Action>
EventGhost.ShowOSD(u'Angle suivant', u'0;-24;0;0;0;700;0;0;0;0;3;2;1;34;Arial', (0, 158, 234), (0, 0, 0), 6, (0, 0), 0, 3.0, True)
</Action>
</Macro>
<Macro Name="Capture frame">
<Event Name="HauppaugeIR.REC" />
</Macro>
<Macro Name="Navigation Up">
<Event Name="HauppaugeIR.NAVUP" />
<Action>
Window.SendKeys(u'{Up}', True)
</Action>
</Macro>
<Macro Name="Navigation Down">
<Event Name="HauppaugeIR.NAVDOWN" />
<Action>
Window.SendKeys(u'{Down}', True)
</Action>
</Macro>
<Macro Name="Navigation Left">
<Event Name="HauppaugeIR.NAVLEFT" />
<Action>
Window.SendKeys(u'{Left}', True)
</Action>
</Macro>
<Macro Name="Navigation Right">
<Event Name="HauppaugeIR.NAVRIGHT" />
<Action>
Window.SendKeys(u'{Right}', True)
</Action>
</Macro>
<Macro Name="Navigation Enter">
<Event Name="HauppaugeIR.OK" />
<Action>
Window.SendKeys(u'{Enter}', True)
</Action>
</Macro>
<Macro Name="Cancel">
<Event Name="HauppaugeIR.BACK" />
</Macro>
<Macro Name="Exit">
<Event Name="HauppaugeIR.RADIO" />
<Action>
Window.SendKeys(u'{Ctrl+X}', True)
</Action>
</Macro>
<Macro Name="Eject Disc/Disc insertion: {E}">
<Event Name="HauppaugeIR.RED" Enabled="False" />
<Action Enabled="False">
EventGhost.PythonScript(u'imageFile = r"C:\\Program Files\\EventGhost\\00-Macros_images\\forpako2.png"\nonTop = True\n#onTop = False\nsize = None\n#size = (128,128)\npos = (10, 440)\n#pos = None\ndelay = 5\n#delay = 0\n#----------------------------------------------------------------------\n\nclass ShapedFrame(wx.Frame):\n\n def __init__(self, imageFile, onTop, size, pos, delay):\n style = wx.FRAME_SHAPED | wx.SIMPLE_BORDER | wx.FRAME_NO_TASKBAR\n if onTop:\n style |= wx.STAY_ON_TOP\n wx.Frame.__init__(self, eg.document.frame, -1, "Shaped Window", style = style)\n\n self.hasShape = False\n self.delta = (0,0)\n \n self.Bind(wx.EVT_LEFT_DOWN, self.OnLeftDown)\n self.Bind(wx.EVT_LEFT_UP, self.OnLeftUp)\n self.Bind(wx.EVT_MOTION, self.OnMouseMove)\n self.Bind(wx.EVT_RIGHT_UP, self.OnExit)\n self.Bind(wx.EVT_TIMER, self.OnExit)\n self.Bind(wx.EVT_PAINT, self.OnPaint)\n\n\n #self.bmp = wx.Image(imageFile, wx.BITMAP_TYPE_ANY).ConvertToBitmap()\n img = wx.Image(imageFile, wx.BITMAP_TYPE_ANY)\n if size:\n img.Rescale(size[0], size[1])\n self.bmp = img.ConvertToBitmap()\n #self.bmp = wx.BitmapFromImage(img) \n \n \n if delay:\n self.timer = wx.Timer(self)\n self.timer.Start(1000*delay)\n# wx.CallAfter(self.timer.Start, 1000*delay)\n else:\n self.timer = None\n \n w, h = self.bmp.GetWidth(), self.bmp.GetHeight()\n self.SetClientSize((w, h))\n\n self.SetWindowShape()\n\n dc = wx.ClientDC(self)\n dc.DrawBitmap(self.bmp, 0,0, True)\n if pos:\n self.SetPosition(pos)\n else:\n self.Center()\n self.Show(True)\n\n\n def SetWindowShape(self, *evt):\n # Use the bitmap\'s mask to determine the region\n r = wx.RegionFromBitmap(self.bmp)\n self.hasShape = self.SetShape(r)\n\n\n def OnPaint(self, evt):\n dc = wx.PaintDC(self)\n dc.DrawBitmap(self.bmp, 0,0, True)\n\n\n def OnExit(self, evt):\n if self.timer:\n self.timer.Stop()\n del self.timer\n self.Close()\n\n\n def OnLeftDown(self, evt):\n self.CaptureMouse()\n x, y = self.ClientToScreen(evt.GetPosition())\n originx, originy = self.GetPosition()\n dx = x - originx\n dy = y - originy\n self.delta = ((dx, dy))\n\n\n def OnLeftUp(self, evt):\n if self.HasCapture():\n self.ReleaseMouse()\n\n\n def OnMouseMove(self, evt):\n if evt.Dragging() and evt.LeftIsDown():\n x, y = self.ClientToScreen(evt.GetPosition())\n fp = (x - self.delta[0], y - self.delta[1])\n self.Move(fp)\n#----------------------------------------------------------------------\n\nwx.CallAfter(ShapedFrame, imageFile, onTop, size, pos, delay)')
</Action>
<Action>
EventGhost.ShowOSD(u'Disc eject/ Disc Insertion in: 5 sec', u'0;-24;0;0;0;700;0;0;0;1;0;0;2;32;Arial', (64, 128, 128), (0, 0, 0), 6, (0, 0), 0, 1.0, True)
</Action>
<Action>
EventGhost.Wait(1.0)
</Action>
<Action>
EventGhost.ShowOSD(u'Disc eject/ Disc Insertion in: 4 sec', u'0;-24;0;0;0;700;0;0;0;1;0;0;2;32;Arial', (64, 128, 128), (0, 0, 0), 6, (0, 0), 0, 1.0, True)
</Action>
<Action>
EventGhost.Wait(1.0)
</Action>
<Action>
EventGhost.ShowOSD(u'Disc eject/ Disc Insertion in: 3 sec', u'0;-24;0;0;0;700;0;0;0;1;0;0;2;32;Arial', (64, 128, 128), (0, 0, 0), 6, (0, 0), 0, 1.0, True)
</Action>
<Action>
EventGhost.Wait(1.0)
</Action>
<Action>
EventGhost.ShowOSD(u'Disc eject/ Disc Insertion in: 2 sec', u'0;-24;0;0;0;700;0;0;0;1;0;0;2;32;Arial', (64, 128, 128), (0, 0, 0), 6, (0, 0), 0, 1.0, True)
</Action>
<Action>
EventGhost.Wait(1.0)
</Action>
<Action>
EventGhost.ShowOSD(u'Disc eject/ Disc Insertion in: 1 sec', u'0;-24;0;0;0;700;0;0;0;1;0;0;2;32;Arial', (64, 128, 128), (0, 0, 0), 6, (0, 0), 0, 1.0, True)
</Action>
<Action>
Window.SendKeys(u'{E}', False)
</Action>
</Macro>
<Macro Name="Open Folder">
<Event Name="HauppaugeIR.VIDEOS" />
<Action>
Window.SendKeys(u'{Ctrl+O}', True)
</Action>
</Macro>
</Folder>

[kct]

hi,

Did you ever got all the actions to work?
Mine used to work fine but now i cant use up, down, left, right. I tried your suggestion of enable "use alternate method to emulate keyspresses" but no luck.

[themaster1]

Same situation here many keypresses don't work, this software is a mess as far as keypresses are concerned