1

import os, shutil, sys

     2

base_folder = os.path.split(sys.path[0])[0]

     3

sys.path.append(os.path.join(base_folder, "wxsvg", "SVGUIEditor"))

     4

sys.path.append(os.path.join(base_folder, "plcopeneditor", "graphics"))

     5

     6

import wx

     7

     8

from SVGUIGenerator import *

     9

from SVGUIControler import *

    10

from SVGUIEditor import *

    11

from FBD_Objects import *

    12

    13

from wxPopen import ProcessLogger

    14

import subprocess

    15

from wx.wxsvg import SVGDocument

    16

    17

[ID_SVGUIEDITORFBDPANEL, 

    18

] = [wx.NewId() for _init_ctrls in range(1)]

    19

    20

SVGUIFB_Types = {ITEM_CONTAINER : "Container",

    21

                 ITEM_BUTTON : "Button", 

    22

                 ITEM_TEXT : "TextCtrl", 

    23

                 ITEM_SCROLLBAR : "ScrollBar", 

    24

                 ITEM_ROTATING : "RotatingCtrl", 

    25

                 ITEM_NOTEBOOK : "NoteBook", 

    26

                 ITEM_TRANSFORM : "Transform"}

    27

    28

class _SVGUIEditor(SVGUIEditor):

    29

    """

    30

    This Class add IEC specific features to the SVGUIEditor :

    31

        - FDB preview

    32

        - FBD begin drag 

    33

    """

    34

    35

    def _init_coll_EditorGridSizer_Items(self, parent):

    36

        SVGUIEditor._init_coll_EditorGridSizer_Items(self, parent)

    37

        parent.AddWindow(self.FBDPanel, 0, border=0, flag=wx.GROW)

    38

    39

    def _init_ctrls(self, prnt):

    40

        SVGUIEditor._init_ctrls(self, prnt, False)

    41

    42

        self.FBDPanel = wx.Panel(id=ID_SVGUIEDITORFBDPANEL, 

    43

                  name='FBDPanel', parent=self.EditorPanel, pos=wx.Point(0, 0),

    44

                  size=wx.Size(0, 0), style=wx.TAB_TRAVERSAL|wx.SIMPLE_BORDER)

    45

        self.FBDPanel.SetBackgroundColour(wx.WHITE)

    46

        self.FBDPanel.Bind(wx.EVT_LEFT_DOWN, self.OnFBDPanelClick)

    47

        self.FBDPanel.Bind(wx.EVT_PAINT, self.OnPaintFBDPanel)

    48

    49

        setattr(self.FBDPanel, "GetScaling", lambda: None) 

    50

    51

        self._init_sizers()

    52

    53

    def __init__(self, parent, controler = None, fileOpen = None):

    54

        SVGUIEditor.__init__(self, parent, controler, fileOpen)

    55

    56

        self.FBDBlock = None

    57

    58

    def RefreshView(self, select_id = None):

    59

        SVGUIEditor.RefreshView(self, select_id)

    60

        self.FBDPanel.Refresh()

    61

    62

    def OnPaintFBDPanel(self,event):

    63

        dc = wx.ClientDC(self.FBDPanel)

    64

        dc.Clear()

    65

        selected = self.GetSelected()

    66

        if selected is not None:

    67

            selected_type = self.Controler.GetElementType(selected)

    68

            if selected_type is not None:

    69

                self.FBDBlock = FBD_Block(parent=self.FBDPanel,type=SVGUIFB_Types[selected_type],name=self.Controler.GetElementName(selected))

    70

                width, height = self.FBDBlock.GetMinSize()

    71

                self.FBDBlock.SetSize(width,height)

    72

                clientsize = self.FBDPanel.GetClientSize()

    73

                x = (clientsize.width - width) / 2

    74

                y = (clientsize.height - height) / 2

    75

                self.FBDBlock.SetPosition(x, y)

    76

                self.FBDBlock.Draw(dc)

    77

        else:

    78

            self.FBDBlock = None

    79

        event.Skip()

    80

    81

    def OnFBDPanelClick(self, event):

    82

        if self.FBDBlock:

    83

            data = wx.TextDataObject(str((self.FBDBlock.GetType(), "functionBlock", self.FBDBlock.GetName())))

    84

            DropSrc = wx.DropSource(self.FBDPanel)

    85

            DropSrc.SetData(data)

    86

            DropSrc.DoDragDrop()

    87

        event.Skip()

    88

    89

    def OnInterfaceTreeItemSelected(self, event):

    90

        self.FBDPanel.Refresh()

    91

        SVGUIEditor.OnInterfaceTreeItemSelected(self, event)

    92

    93

    def OnGenerate(self,event):

    94

        self.SaveProject()

    95

        self.Controler.PlugGenerate_C(sys.path[0],(0,0,4,5),None)

    96

        event.Skip()    

    97

    98

TYPECONVERSION = {"BOOL" : "X", "SINT" : "B", "INT" : "W", "DINT" : "D", "LINT" : "L",

    99

    "USINT" : "B", "UINT" : "W", "UDINT" : "D", "ULINT" : "L", "REAL" : "D", "LREAL" : "L",

   100

    "STRING" : "B", "BYTE" : "B", "WORD" : "W", "DWORD" : "D", "LWORD" : "L", "WSTRING" : "W"}

   101

   102

CTYPECONVERSION = {"BOOL" : "IEC_BOOL", "UINT" : "IEC_UINT", "STRING" : "IEC_STRING", "REAL" : "IEC_REAL"}

   103

CPRINTTYPECONVERSION = {"BOOL" : "d", "UINT" : "d", "STRING" : "s", "REAL" : "f"}

   104

   105

class RootClass(SVGUIControler):

   106

   107

    def __init__(self):

   108

        SVGUIControler.__init__(self)

   109

        filepath = os.path.join(self.PlugPath(), "gui.xml")

   110

   111

        if os.path.isfile(filepath):

   112

            svgfile = os.path.join(self.PlugPath(), "gui.svg")

   113

            if os.path.isfile(svgfile):

   114

                self.SvgFilepath = svgfile

   115

            self.OpenXMLFile(filepath)

   116

        else:

   117

            self.CreateNewInterface()

   118

            self.SetFilePath(filepath)

   119

   120

    def GetElementIdFromName(self, name):

   121

        element = self.GetElementByName(name)

   122

        if element is not None:

   123

            return element.getid()

   124

        return None

   125

   126

    _View = None

   127

    def _OpenView(self):

   128

        if not self._View:

   129

            def _onclose():

   130

                self._View = None

   131

            def _onsave():

   132

                self.GetPlugRoot().SaveProject()

   133

            self._View = _SVGUIEditor(self.GetPlugRoot().AppFrame, self)

   134

            self._View._onclose = _onclose

   135

            self._View._onsave = _onsave

   136

            self._View.Show()

   137

   138

    def _ImportSVG(self):

   139

        if not self._View:

   140

            dialog = wx.FileDialog(self.GetPlugRoot().AppFrame, "Choose a SVG file", os.getcwd(), "",  "SVG files (*.svg)|*.svg|All files|*.*", wx.OPEN)

   141

            if dialog.ShowModal() == wx.ID_OK:

   142

                svgpath = dialog.GetPath()

   143

                if os.path.isfile(svgpath):

   144

                    shutil.copy(svgpath, os.path.join(self.PlugPath(), "gui.svg"))

   145

                else:

   146

                    self.logger.write_error("No such SVG file: %s\n"%svgpath)

   147

            dialog.Destroy()

   148

   149

    def _ImportXML(self):

   150

        if not self._View:

   151

            dialog = wx.FileDialog(self.GetPlugRoot().AppFrame, "Choose a XML file", os.getcwd(), "",  "XML files (*.xml)|*.xml|All files|*.*", wx.OPEN)

   152

            if dialog.ShowModal() == wx.ID_OK:

   153

                xmlpath = dialog.GetPath()

   154

                if os.path.isfile(xmlpath):

   155

                    shutil.copy(xmlpath, os.path.join(self.PlugPath(), "gui.xml"))

   156

                else:

   157

                    self.logger.write_error("No such XML file: %s\n"%xmlpath)

   158

            dialog.Destroy()

   159

   160

    def _StartInkscape(self):

   161

        if not self._View:

   162

            svgfile = os.path.join(self.PlugPath(), "gui.svg")

   163

            popenargs = []

   164

   165

            if wx.Platform == '__WXMSW__':

   166

                popenargs.append(os.path.join(base_folder, "Inkscape", "inkscape.exe"))

   167

            else:

   168

                popenargs.append("/usr/bin/inkscape")

   169

   170

            if os.path.isfile(svgfile):

   171

                popenargs.append(svgfile)

   172

   173

            subprocess.Popen(popenargs).pid

   174

   175

    PluginMethods = [

   176

        {"bitmap" : os.path.join("images","HMIEditor"),

   177

         "name" : "HMI Editor",

   178

         "tooltip" : "HMI Editor",

   179

         "method" : "_OpenView"},

   180

        {"bitmap" : os.path.join("images","ImportSVG"),

   181

         "name" : "Import SVG",

   182

         "tooltip" : "Import SVG",

   183

         "method" : "_ImportSVG"},

   184

        {"bitmap" : os.path.join("images","ImportDEF"),

   185

         "name" : "Import XML",

   186

         "tooltip" : "Import XML",

   187

         "method" : "_ImportXML"},

   188

         {"bitmap" : os.path.join("images","ImportSVG"),

   189

         "name" : "Inkscape",

   190

         "tooltip" : "Create HMI",

   191

         "method" : "_StartInkscape"},

   192

    ]

   193

   194

    def OnPlugSave(self):

   195

        self.SaveXMLFile(os.path.join(self.PlugPath(), "gui.xml"))

   196

        return True

   197

   198

    def PlugGenerate_C(self, buildpath, locations):

   199

        progname = "SVGUI_%s"%"_".join(map(str, self.GetCurrentLocation()))

   200

   201

        doc = SVGDocument(self.GetSVGFilePath())

   202

        root_element = doc.GetRootElement()

   203

        window_size = (int(float(root_element.GetAttribute("width"))),

   204

                       int(float(root_element.GetAttribute("height"))))

   205

   206

#        svgfilepath = self.GetSVGFilePath()

   207

#        xmlfilepath = self.GetFilePath()

   208

#        shutil.copy(svgfilepath, buildpath)

   209

#        shutil.copy(xmlfilepath, buildpath)

   210

   211

        SVGFilePath = self.GetSVGFilePath()

   212

        SVGFileBaseName = os.path.split(SVGFilePath)[1]

   213

        FilePath = self.GetFilePath()

   214

        FileBaseName = os.path.split(FilePath)[1]

   215

   216

        generator = _SVGUICGenerator(self, self.GetElementsByType(), 

   217

                                     os.path.split(self.GetSVGFilePath())[1], 

   218

                                     os.path.split(self.GetFilePath())[1], 

   219

                                     self.GetCurrentLocation())

   220

        generator.GenerateProgram(window_size, buildpath, progname)

   221

        Gen_C_file = os.path.join(buildpath, progname+".cpp" )

   222

   223

        if wx.Platform == '__WXMSW__':

   224

            cxx_flags = "-I..\\..\\wxPython-src-2.8.8.1\\bld\\lib\\wx\\include\\msw-unicode-release-2.8 -I..\\..\\wxPython-src-2.8.8.1\\include -I..\\..\\wxPython-src-2.8.8.1\\contrib\\include -I..\\..\\matiec\\lib -DWXUSINGDLL -D__WXMSW__ -mthreads"

   225

            libs = "\"..\\lib\\libwxsvg.a\" \"..\\lib\\libwxsvg_agg.a\" \"..\\lib\\libagg.a\" \"..\\lib\\libaggplatformwin32.a\" \"..\\lib\\libaggfontwin32tt.a\" -L..\\..\\wxPython-src-2.8.8.1\\bld\\lib -mno-cygwin -mwindows -mthreads  -mno-cygwin -mwindows -Wl,--subsystem,windows -mwindows -lwx_mswu_richtext-2.8 -lwx_mswu_aui-2.8 -lwx_mswu_xrc-2.8 -lwx_mswu_qa-2.8 -lwx_mswu_html-2.8 -lwx_mswu_adv-2.8 -lwx_mswu_core-2.8 -lwx_baseu_xml-2.8 -lwx_baseu_net-2.8 -lwx_baseu-2.8"

   226

        else:

   227

            status, result, err_result = ProcessLogger(self.logger, "wx-config --cxxflags", no_stdout=True).spin()

   228

            if status:

   229

                self.logger.write_error("Unable to get wx cxxflags\n")

   230

            cxx_flags = result.strip() + " -I../matiec/lib"

   231

   232

            status, result, err_result = ProcessLogger(self.logger, "wx-config --libs", no_stdout=True).spin()

   233

            if status:

   234

                self.logger.write_error("Unable to get wx libs\n")

   235

            libs = result.strip() + " -lwxsvg"

   236

   237

        return [(Gen_C_file, cxx_flags)],libs,True,(SVGFileBaseName, file(SVGFilePath, "rb")), (FileBaseName, file(FilePath, "rb"))

   238

   239

    def BlockTypesFactory(self):

   240

   241

        SVGUIBlock_Types = []

   242

   243

        def GetSVGUIBlockType(type):

   244

            for category in SVGUIBlock_Types:

   245

                for blocktype in category["list"]:

   246

                    if blocktype["name"] == type:

   247

                        return blocktype

   248

        setattr(self, "GetSVGUIBlockType", GetSVGUIBlockType)

   249

   250

        def generate_svgui_block(generator, block, body, link, order=False):

   251

            name = block.getinstanceName()

   252

            block_id = self.GetElementIdFromName(name)

   253

            if block_id == None:

   254

                raise ValueError, "No corresponding block found"

   255

            type = block.gettypeName()

   256

            block_infos = GetSVGUIBlockType(type)

   257

            current_location = ".".join(map(str, self.GetCurrentLocation()))

   258

            if not generator.ComputedBlocks.get(block, False) and not order:

   259

                generator.ComputedBlocks[block] = True

   260

                for num, variable in enumerate(block.inputVariables.getvariable()):

   261

                    connections = variable.connectionPointIn.getconnections()

   262

                    input_info = (generator.TagName, "block", block.getlocalId(), "input", num)

   263

                    if connections and len(connections) == 1:

   264

                        parameter = "%sQ%s%s.%d.%d"%("%", TYPECONVERSION[block_infos["inputs"][num][1]], current_location, block_id, num+1)

   265

                        value = generator.ComputeFBDExpression(body, connections[0])

   266

                        generator.Program += [(generator.CurrentIndent, ()),

   267

                                              (parameter, input_info),

   268

                                              (" := ", ())]

   269

                        generator.Program += generator.ExtractModifier(variable, value, input_info)

   270

                        generator.Program += [(";\n", ())]

   271

            if link:

   272

                connectionPoint = link.getposition()[-1]

   273

                for num, variable in enumerate(block.outputVariables.getvariable()):

   274

                    blockPointx, blockPointy = variable.connectionPointOut.getrelPositionXY()

   275

                    output_info = (generator.TagName, "block", block.getlocalId(), "output", num)

   276

                    if block.getx() + blockPointx == connectionPoint.getx() and block.gety() + blockPointy == connectionPoint.gety():

   277

                        return [("%sI%s%s.%d.%d"%("%", TYPECONVERSION[block_infos["outputs"][num][1]], current_location, block_id, num+1), output_info)]

   278

                raise ValueError, "No output variable found"

   279

            else:

   280

                return None

   281

   282

        def initialise_block(type, name, block = None):

   283

            block_id = self.GetElementIdFromName(name)

   284

            if block_id == None:

   285

                raise ValueError, "No corresponding block found"

   286

            block_infos = GetSVGUIBlockType(type)

   287

            current_location = ".".join(map(str, self.GetCurrentLocation()))

   288

            variables = []

   289

            if block is not None:

   290

                input_variables = block.inputVariables.getvariable()

   291

                output_variables = block.outputVariables.getvariable()

   292

            else:

   293

                input_variables = None

   294

                output_variables = None

   295

            for num, (input_name, input_type, input_modifier) in enumerate(block_infos["inputs"]):

   296

                if input_variables is not None and num < len(input_variables):

   297

                    connections = input_variables[num].connectionPointIn.getconnections()

   298

                if input_variables is None or connections and len(connections) == 1:

   299

                    variables.append((input_type, None, "%sQ%s%s.%d.%d"%("%", TYPECONVERSION[input_type], current_location, block_id, num+1), None))

   300

            for num, (output_name, output_type, output_modifier) in enumerate(block_infos["outputs"]):

   301

                variables.append((output_type, None, "%sI%s%s.%d.%d"%("%", TYPECONVERSION[input_type], current_location, block_id, num+1), None))

   302

            return variables

   303

   304

        SVGUIBlock_Types.extend([{"name" : "SVGUI function blocks", "list" :

   305

                [{"name" : "Container", "type" : "functionBlock", "extensible" : False, 

   306

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none")], 

   307

                    "outputs" : [],

   308

                    "comment" : "SVGUI Container",

   309

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   310

                {"name" : "Button", "type" : "functionBlock", "extensible" : False, 

   311

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("Value","BOOL","none")], 

   312

                    "outputs" : [("State","BOOL","none")],

   313

                    "comment" : "SVGUI Button",

   314

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   315

                {"name" : "TextCtrl", "type" : "functionBlock", "extensible" : False, 

   316

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetText","STRING","none")], 

   317

                    "outputs" : [("Text","STRING","none")],

   318

                    "comment" : "SVGUI Text Control",

   319

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   320

                {"name" : "ScrollBar", "type" : "functionBlock", "extensible" : False, 

   321

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetThumb","UINT","none"),("SetRange","UINT","none"),("SetPosition","UINT","none")], 

   322

                    "outputs" : [("Position","UINT","none")],

   323

                    "comment" : "SVGUI ScrollBar",

   324

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   325

                {"name" : "NoteBook", "type" : "functionBlock", "extensible" : False, 

   326

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetSelected","BOOL","none")], 

   327

                    "outputs" : [("Selected","UINT","none")],

   328

                    "comment" : "SVGUI Notebook",

   329

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   330

                {"name" : "RotatingCtrl", "type" : "functionBlock", "extensible" : False, 

   331

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetAngle","REAL","none")], 

   332

                    "outputs" : [("Angle","REAL","none")],

   333

                    "comment" : "SVGUI Rotating Control",

   334

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   335

                {"name" : "Transform", "type" : "functionBlock", "extensible" : False, 

   336

                    "inputs" : [("Show","BOOL","none"),("Enable","BOOL","none"),("SetX","REAL","none"),("SetY","REAL","none"),("SetXScale","REAL","none"),("SetYScale","REAL","none"),("SetAngle","REAL","none")], 

   337

                    "outputs" : [("X","REAL","none"),("Y","REAL","none")],

   338

                    "comment" : "SVGUI Transform",

   339

                    "generate" : generate_svgui_block, "initialise" : initialise_block},

   340

               ]}

   341

        ])

   342

   343

        return SVGUIBlock_Types

   344

   345

   346

class _SVGUICGenerator(SVGUICGenerator):

   347

   348

    def __init__(self, controler, elements, svgfile, xmlfile, current_location):

   349

        SVGUICGenerator.__init__(self, elements, svgfile, xmlfile)

   350

   351

        self.CurrentLocation = current_location

   352

        self.Controler = controler

   353

   354

    def GenerateProgramHeadersPublicVars(self):

   355

        text = """

   356

    void OnPlcOutEvent(wxEvent& event);

   357

   358

    void Retrieve();

   359

    void Publish();

   360

    void Initialize();

   361

"""

   362

#        text += "    void Print();\n"

   363

        return text

   364

   365

    def GenerateIECVars(self):

   366

        text = ""

   367

        for element in self.Elements:

   368

            text += "STATE_TYPE out_state_%d;\n"%element.getid()

   369

            text += "STATE_TYPE in_state_%d;\n"%element.getid()

   370

        text +="\n"

   371

        current_location = "_".join(map(str, self.CurrentLocation))

   372

        #Declaration des variables

   373

        for element in self.Elements:

   374

            block_infos = self.Controler.GetSVGUIBlockType(SVGUIFB_Types[GetElementType(element)])

   375

            block_id = element.getid()

   376

            for i, input in enumerate(block_infos["inputs"]):

   377

                element_c_type = CTYPECONVERSION[input[1]]

   378

                variable = "__Q%s%s_%d_%d"%(TYPECONVERSION[input[1]], current_location, block_id, i + 1)

   379

                text += "%s beremiz%s;\n"%(element_c_type, variable)

   380

                text += "%s* %s = &beremiz%s;\n"%(element_c_type, variable, variable)

   381

                text += "%s _copy%s;\n"%(element_c_type, variable)

   382

            for i, output in enumerate(block_infos["outputs"]):

   383

                element_c_type = CTYPECONVERSION[output[1]]

   384

                variable = "__I%s%s_%d_%d"%(TYPECONVERSION[output[1]], current_location, block_id, i + 1)

   385

                text += "%s beremiz%s;\n"%(element_c_type, variable)

   386

                text += "%s* %s = &beremiz%s;\n"%(element_c_type, variable, variable)

   387

                text += "%s _copy%s;\n"%(element_c_type, variable)

   388

            text +="\n"

   389

        return text

   390

   391

    def GenerateGlobalVarsAndFuncs(self, size):

   392

        text = """#include "iec_types.h"

   393

#ifdef __WXMSW__

   394

#define COMPARE_AND_SWAP_VAL(Destination, comparand, exchange) InterlockedCompareExchange(Destination, exchange, comparand)

   395

#define THREAD_RETURN_TYPE DWORD WINAPI

   396

#define STATE_TYPE long int

   397

#else

   398

#define COMPARE_AND_SWAP_VAL(Destination, comparand, exchange) __sync_val_compare_and_swap(Destination, comparand, exchange)

   399

#define THREAD_RETURN_TYPE void*

   400

#define STATE_TYPE volatile int

   401

#endif

   402

   403

"""

   404

   405

        text += self.GenerateIECVars()

   406

   407

        text += """IMPLEMENT_APP_NO_MAIN(SVGViewApp);

   408

SVGViewApp *myapp = NULL;

   409

wxSemaphore MyInitSem;

   410

   411

#ifdef __WXMSW__

   412

HANDLE wxMainLoop;

   413

DWORD wxMainLoopId;

   414

#else

   415

pthread_t wxMainLoop;

   416

#endif

   417

   418

"""

   419

   420

        text += """int myargc = 0;

   421

char** myargv = NULL;

   422

   423

#define UNCHANGED 1

   424

#define PLC_BUSY 2

   425

#define CHANGED 3

   426

#define GUI_BUSY 4

   427

#ifdef __WXMSW__

   428

#else

   429

#endif

   430

   431

bool refresh = false;

   432

bool refreshing = false;

   433

   434

THREAD_RETURN_TYPE InitWxEntry(void* args)

   435

{

   436

  wxEntry(myargc,myargv);

   437

  MyInitSem.Post();

   438

  return 0;

   439

}

   440

   441

"""

   442

   443

        text += """

   444

bool SVGViewApp::OnInit()

   445

{

   446

  #ifndef __WXMSW__

   447

    setlocale(LC_NUMERIC, "C");

   448

  #endif

   449

"""

   450

   451

        text += """  frame = new MainFrame(NULL, wxT("Program"),wxDefaultPosition, wxSize(%d, %d));

   452

  frame->Show();

   453

  myapp = this;

   454

"""%size

   455

        text += """  return true;

   456

}

   457

   458

extern "C" {

   459

   460

int __init_%(location)s(int argc, char** argv)

   461

{

   462

  myargc = argc;

   463

  myargv = argv;

   464

#ifdef __WXMSW__

   465

  wxMainLoop = CreateThread(NULL, 0, InitWxEntry, 0, 0, &wxMainLoopId);

   466

#else

   467

  pthread_create(&wxMainLoop, NULL, InitWxEntry, NULL);

   468

#endif

   469

  MyInitSem.Wait();

   470

  return 0;

   471

}

   472

   473

void __cleanup_%(location)s()

   474

{

   475

  if(myapp){

   476

      wxCloseEvent event(wxEVT_CLOSE_WINDOW);

   477

      myapp->frame->AddPendingEvent(event);

   478

      myapp = NULL;

   479

  }

   480

  MyInitSem.Wait();

   481

}

   482

   483

void __retrieve_%(location)s()

   484

{

   485