<?xml version="1.0" encoding="UTF-8" ?>
<EventGhost Version="1262">
<Folder Name="BS.Player" id="462" Enabled="False" Expanded="True">
<Folder Name="Playback" id="463">
<Macro Name="Play">
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 20, 0, 0)
</Action>
</Macro>
<Macro Name="Pause">
<Event Name="UltraX.Play" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 21, 0, 0)
</Action>
</Macro>
<Macro Name="Stop">
<Event Name="UltraX.Stop" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 22, 0, 0)
</Action>
</Macro>
<Macro Name="Forward">
<Event Name="UltraX.Forward" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 79, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Rewind">
<Event Name="UltraX.Rewind" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 80, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="FullScreen">
<Event Name="UltraX.Record" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 10, 0, 0)
</Action>
</Macro>
<Macro Name="PanScan">
<Event Name="UltraX.Angle" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 64, 0, 0)
</Action>
</Macro>
</Folder>
<Folder Name="Volume">
<Macro Name="Volume+">
<Event Name="UltraX.VolumeUp" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 1, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Volime-">
<Event Name="UltraX.VolumeDown" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 2, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Mute">
<Event Name="UltraX.Mute" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 35, 0, 0)
</Action>
</Macro>
</Folder>
<Folder Name="Subtitles" id="508">
<Macro Name="Sub Font+">
<Event Name="UltraX.Right" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 83, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Sub Font-">
<Event Name="UltraX.Left" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 84, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Sub Pos Up">
<Event Name="UltraX.Up" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 87, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Sub Pos Down">
<Event Name="UltraX.Down" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.SendMessage(1026, 88, 0, 0)
</Action>
<Action>
EventGhost.AutoRepeat(0.59999999999999998, 0.29999999999999999, 0.01, 3.0)
</Action>
</Macro>
<Macro Name="Disable" Enabled="False">
<Event Name="UltraX.Ok" />
<Action>
EventGhost.DisableItem(XmlIdLink(508))
</Action>
<Action>
EventGhost.EnableItem(XmlIdLink(463))
</Action>
</Macro>
</Folder>
<Macro Name="Enable: Subtitles">
<Event Name="UltraX.Subtitle" />
<Action>
EventGhost.EnableItem(XmlIdLink(508))
</Action>
<Action>
EventGhost.DisableItem(XmlIdLink(463))
</Action>
</Macro>
<Macro Name="Start Program: bsplayer.exe">
<Event Name="UltraX.Start" />
<Action>
System.Execute(u'C:\\Program Files\\Webteh\\BSplayer\\bsplayer.exe', u'', 0, False, 2, u'')
</Action>
</Macro>
<Macro Name="Close">
<Event Name="UltraX.Close" />
<Action>
Window.FindWindow(u'bsplayer.exe', u'BSplayer', u'BSPlayer', None, None, None, True, 0.0, 0)
</Action>
<Action>
Window.Close()
</Action>
<Action>
EventGhost.NewJumpIf(XmlIdLink(36), 2, False)
</Action>
</Macro>
</Folder>
</EventGhost>