<?xml version="1.0" encoding="UTF-8" ?>
<EventGhost Version="1600" Guid="{98781AF7-954A-4041-A87D-841277B48371}" Time="1356781146.86">
    <Autostart Name="Autostart" Expanded="True">
        <Plugin Identifier="Serial" Guid="{D565171F-1703-4212-972C-B824B55329CB}" File="Serial">
            gAIoSwFNgCVLA0sASwBLAIhYAgAAAFxycQBYBgAAAFNlcmlhbHEBSwB0cQIu
        </Plugin>
    </Autostart>
    <Folder Name="copy_paste_visio" Expanded="True">
        <Macro Name="Serial Port: Read Data" Expanded="True">
            <Action>
                Serial.Read(None, 0.0)
            </Action>
        </Macro>
        <Macro Name="duplicate">
            <Event Name="Serial.duplicate " />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Ctrl+D}', False)
            </Action>
        </Macro>
        <Macro Name="copy">
            <Event Name="Serial.copy" />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Ctrl+C}', False)
            </Action>
        </Macro>
        <Macro Name="paste">
            <Event Name="Serial.paste" />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Ctrl+V}', False)
            </Action>
        </Macro>
        <Macro Name="delete">
            <Event Name="Serial.delete" />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Del}', False)
            </Action>
        </Macro>
        <Macro Name="cut">
            <Event Name="Serial.cut" />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Ctrl+X}', False)
            </Action>
        </Macro>
        <Macro Name="undo">
            <Event Name="Serial.undo" />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Ctrl+Z}', False)
            </Action>
        </Macro>
        <Macro Name="redo" Expanded="True">
            <Event Name="Serial.redo" />
            <Action>
                Window.FindWindow(u'Visio32.EXE', u'Visio Technical - [Zeichnung1:Blatt-1]', u'VISIOA', u'', u'VISIOG', 1, False, 0.0, 0)
            </Action>
            <Action>
                Window.BringToFront()
            </Action>
            <Action>
                Window.SendKeys(u'{Ctrl+Y}', False)
            </Action>
        </Macro>
    </Folder>
</EventGhost>
