501b0f6fee06214337be834480dce3a688241a4f
[iramuteq] / iramuteq.py
1 #!/bin/env python
2 # -*- coding: utf-8 -*-
3 #Author: Pierre Ratinaud
4 #Copyright (c) 2008-2016, Pierre Ratinaud
5 #License: GNU GPL
6
7 from optparse import OptionParser
8
9 parser = OptionParser()
10 parser.add_option("-f", "--file", dest="filename",
11                   help="open FILE", metavar="FILE", default=False)
12 (options, args) = parser.parse_args()
13
14 import sys
15 reload(sys)
16 import locale
17 import tempfile
18 import codecs
19 import os
20 from random import randint
21 from ConfigParser import ConfigParser, RawConfigParser
22 import webbrowser
23 import gettext
24 import logging
25 #------------------------------------
26 import wx
27 import wx.lib.agw.aui as aui
28 import wx.html
29 import wx.grid
30 import wx.lib.hyperlink as hl
31 #------------------------------------
32 from functions import BugReport, PlaySound, History, progressbar
33 from checkversion import NewVersion
34 from guifunct import *
35 from tableau import Tableau
36 from dialog import PrefDialog
37 from tabfrequence import Frequences, FreqMultiple
38 from tabchi2 import ChiSquare
39 from tabchi2mcnemar import McNemar
40 #from tabstudent import MakeStudent
41 from tabchddist import ChdCluster
42 from tabafcm import DoAFCM
43 from tabchdalc import AnalyseQuest
44 from tabsimi import DoSimi
45 from tabrsimple import InputText
46 from tabverges import Prototypical
47 from tabsplitvar import SplitMatrixFromVar
48 #frog textdist import AnalysePam
49 from textstat import Stat
50 from textaslexico import Lexico
51 from textlabbe import DistLabbe
52 from textsimi import SimiTxt, SimiFromCluster
53 from textwordcloud import WordCloud, ClusterCloud
54 from textreinert import Reinert
55 #from textcheckcorpus import checkcorpus
56 from openanalyse import OpenAnalyse
57 from corpus import Builder, SubBuilder, MergeClusters
58 from checkinstall import CreateIraDirectory, CheckRPath, FindRPAthWin32, FindRPathNix, CheckRPackages, IsNew, UpgradeConf, CopyConf, RLibsAreInstalled
59 from chemins import RscriptsPath, ConstructConfigPath, ConstructDicoPath, ConstructGlobalPath, PathOut
60 from parse_factiva_xml import ImportFactiva
61 from parse_dmi import ImportDMI
62 from tools import Extract
63 from analyse_merge import AnalyseMerge
64
65 from tree import LeftTree
66 ##########################################################
67 ID_OpenData = wx.NewId()
68 ID_Import = wx.NewId()
69 ID_OpenText = wx.NewId()
70 ID_OnOpenAnalyse = wx.NewId()
71 ID_Freq = wx.NewId()
72 ID_Chi2 = wx.NewId()
73 ID_Chi2mc = wx.NewId()
74 ID_Student = wx.NewId()
75 ID_CHDSIM = wx.NewId()
76 ID_CHDReinert = wx.NewId()
77 ID_TEXTAFCM = wx.NewId()
78 ID_TEXTSTAT = wx.NewId()
79 ID_ASLEX = wx.NewId()
80 ID_TEXTREINERT = wx.NewId()
81 ID_TEXTPAM = wx.NewId()
82 ID_CHECKCORPUS = wx.NewId()
83 ID_Tabcontent = wx.NewId()
84 ID_AFCM = wx.NewId()
85 ID_SIMI = wx.NewId()
86 ID_CloseTab = wx.NewId()
87 ID_SaveTab = wx.NewId()
88 ID_CreateText = wx.NewId()
89 ID_ACCEUIL = wx.NewId()
90 ID_RESULT = wx.NewId()
91 ID_HTMLcontent = wx.NewId()
92 ID_SimiTxt = wx.NewId()
93 ID_proto = wx.NewId()
94 ID_ImportTXM = wx.NewId()
95 ID_FreqMulti = wx.NewId()
96 ID_Splitfromvar = wx.NewId()
97 ID_Subtxtfrommeta = wx.NewId()
98 ID_Subtxtfromthem = wx.NewId()
99 ID_WC = wx.NewId()
100 ID_ImportEuro = wx.NewId()
101 ID_Fact_xml = wx.NewId()
102 ID_Fact_mail = wx.NewId()
103 ID_Fact_copy = wx.NewId()
104 ID_exportmeta = wx.NewId()
105 ID_importdmi = wx.NewId()
106 ID_merge = wx.NewId()
107 ID_merge_clusters = wx.NewId()
108 ID_labbe = wx.NewId()
109 ##########################################################
110 #elements de configuration
111 ##########################################################
112 #encodage
113 if sys.platform == 'darwin' :
114     sys.setdefaultencoding('UTF-8')
115     wx.SetDefaultPyEncoding('UTF-8')
116 else :
117     sys.setdefaultencoding(locale.getpreferredencoding())
118
119 #chemin de l'application
120 AppliPath = os.path.abspath(os.path.dirname(os.path.realpath(sys.argv[0])))
121 #chemin des images
122 ImagePath = os.path.join(AppliPath, 'images')
123 #configuration generale
124 DictConfigPath = ConstructGlobalPath(AppliPath)
125 ConfigGlob = ConfigParser()
126 ConfigGlob.read(DictConfigPath['global'])
127 DefaultConf = ConfigParser()
128 DefaultConf.read(DictConfigPath['preferences'])
129 #repertoire de l'utilisateur
130 user_home = os.getenv('HOME')
131 if user_home is None :
132     user_home = os.path.expanduser('~')
133
134 UserConfigPath = os.path.abspath(os.path.join(user_home, '.iramuteq-%s' % ConfigGlob.get('DEFAULT', 'version_nb')))
135 #Si pas de fichiers de config utilisateur, on cree le repertoire
136 CreateIraDirectory(UserConfigPath, AppliPath)
137 #fichiers log pour windows (py2exe)
138 log = logging.getLogger('iramuteq')
139 fh = logging.FileHandler(os.path.join(UserConfigPath,'stdout.log'))
140 formatter = logging.Formatter('%(asctime)s - %(levelname)s - %(message)s')
141 fh.setFormatter(formatter)
142 log.addHandler(fh)
143 if sys.platform != 'win32' and sys.platform != 'darwin':
144     ch = logging.StreamHandler()
145     ch.setFormatter(formatter)
146     log.addHandler(ch)
147 log.setLevel(logging.INFO)
148
149 class writer(object):
150     def write(self, data):
151         if data.strip() != '' :
152             log.info('ERROR : %s' % data)
153
154 class printer(object) :
155     def write(self, data) :
156         if data.strip() != '' :
157             log.info('Print : %s' % data)
158
159 sys.stderr = writer()
160 sys.stdout = printer()
161
162 ConfigPath = ConstructConfigPath(UserConfigPath)
163
164 langues = {'french' : wx.LANGUAGE_FRENCH,
165            'english' : wx.LANGUAGE_ENGLISH,
166            'portuguese' : wx.LANGUAGE_PORTUGUESE,
167            'italian' : wx.LANGUAGE_ITALIAN,
168            'spanish' : wx.LANGUAGE_SPANISH
169            }
170
171 code_langues = {'french' : 'fr_FR',
172                 'english' : 'en',
173                 'portuguese' : 'pt_PT',
174                 'italian' : 'it_IT',
175                 'spanish' : 'es_ES'
176                }
177
178 images_analyses = {
179         'textroot' : 'textroot.png',
180         'alceste' : 'reinert.png',
181         'reinert' : 'reinert.png',
182         'corpus' : 'textcorpus.png',
183         'wordcloud' :'wordcloud.png',
184         'stat' :'stats.png',
185         'simitxt' : 'simitxt.png',
186         'clustersimitxt' :'clustersimitxt.png',
187         'clustercloud' : 'clustercloud.png',
188         'spec' : 'spec.png',
189         'matroot' : 'matroot.png',
190         'matrix' : 'matrix.png',
191         'freq' : 'frequences.png',
192         'freqmulti' : 'frequences.png',
193         'chi2' : 'chi2.png',
194         'chi2mcnemar' : 'chi2.png',
195         'reinertmatrix' : 'reinertmatrix.png',
196         'simimatrix' : 'simimatrix.png',
197         'simiclustermatrix' : 'simimatrix.png',
198         'proto' : 'proto.png',
199         'TXM' : 'TXM.png',
200         'europress' : 'europress.png',
201         'factiva_xml' : 'factiva_xml.png',
202         'factiva_copy' : 'factiva_copy.png',
203         'factiva_mail': 'factiva_mail.png',
204         'iramuteq' : 'iraicone.png',
205         'subcorpusmeta' : 'subcorpusmeta.png',
206         'subcorpusthema' : 'subcorpusthema.png',
207         'preferences' : 'preferences.png',
208         'exportmetatable' : 'exportmetatable.png',
209         'importdmi' : 'twitter.png',
210         'labbe' : 'spec.png'
211          }
212 #####################################################################
213
214 class IraFrame(wx.Frame):
215     def __init__(self, parent, id= -1, title="", pos=wx.DefaultPosition,
216                  size=wx.DefaultSize, style=wx.DEFAULT_FRAME_STYLE |
217                                             wx.SUNKEN_BORDER |
218                                             wx.CLIP_CHILDREN):
219         log.info('Starting... ' )
220         log.info('version : %s' % ConfigGlob.get('DEFAULT', 'version'))
221         wx.Frame.__init__(self, parent, id, title, pos, size, style)
222         #configuration
223         self.AppliPath = AppliPath
224         self.images_path = os.path.join(AppliPath,'images')
225         self.UserConfigPath = UserConfigPath
226         #self.RscriptsPath = ConstructRscriptsPath(AppliPath)
227         self.RscriptsPath = PathOut(dirout=os.path.join(AppliPath, 'Rscripts'))
228         self.RscriptsPath.basefiles(RscriptsPath)
229         #self.DictPath = ConstructDicoPath(AppliPath)
230         self.DictPath = ConstructDicoPath(UserConfigPath)
231         self.ConfigGlob = ConfigGlob
232         self.ConfigPath = ConstructConfigPath(UserConfigPath)
233         self.pref = RawConfigParser()
234         #workaround for import problem
235         self.SimiFromCluster = SimiFromCluster
236         #langues
237         gettext.install('iramuteq',  os.path.join(AppliPath,'locale'), unicode=True)
238         #langues = ['fr_FR', 'en', 'pt_PT']
239         #for l in langues :
240         #    pass
241         self.preslangue = {}
242         for langue in code_langues :
243             self.preslangue[langue] = gettext.translation("iramuteq", os.path.join(AppliPath,'locale'), languages=[code_langues[langue]])
244         self.setlangue()
245         #self.presLan_fr = gettext.translation("iramuteq", os.path.join(AppliPath,'locale'), languages=['fr_FR'])
246         #self.presLan_en = gettext.translation("iramuteq", os.path.join(AppliPath,'locale'), languages=['en'])
247         # tell FrameManager to manage this frame
248         #self._mgr = wx.aui.AuiManager()
249         self._mgr = aui.AuiManager()
250         self._mgr.SetManagedWindow(self)
251         self.x = 0
252         # create menu
253 #--------------------------------------------------------------------------------
254         self.images_analyses = images_analyses
255         for img in images_analyses :
256             self.images_analyses[img] = wx.Image(os.path.join(self.images_path, self.images_analyses[img]), wx.BITMAP_TYPE_PNG).Scale(16,16).ConvertToBitmap()
257         self.mb = wx.MenuBar()
258
259         file_menu = wx.Menu()
260         item = wx.MenuItem(file_menu, ID_OpenData, _(u"Open a matrix").decode('utf8'), _(u"Open a matrix").decode('utf8'))
261         #item.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_FILE_OPEN))
262         item.SetBitmap(self.images_analyses['matroot'])
263         file_menu.AppendItem(item)
264
265         item = wx.MenuItem(file_menu, ID_OpenText, _(u"Open a text corpus").decode('utf8'), _(u"Open a text corpus").decode('utf8'))
266         item.SetBitmap(self.images_analyses['textroot'])
267         file_menu.AppendItem(item)
268
269         item = wx.MenuItem(file_menu, ID_OnOpenAnalyse, _(u"Open an analysis").decode('utf8'), _(u"Open an analysis").decode('utf8'))
270         item.SetBitmap(self.images_analyses['iramuteq'])
271         file_menu.AppendItem(item)
272
273         item = wx.MenuItem(file_menu, ID_ImportTXM, _(u"Import from TXM").decode('utf8'), _(u"Import from TXM").decode('utf8'))
274         item.SetBitmap(self.images_analyses['TXM'])
275         file_menu.AppendItem(item)
276
277         item = wx.MenuItem(file_menu, ID_ImportEuro, _(u"Import from Europress").decode('utf8'), _(u"Import from Europress").decode('utf8'))
278         item.SetBitmap(self.images_analyses['europress'])
279         file_menu.AppendItem(item)
280
281         item = wx.MenuItem(file_menu, ID_importdmi, _(u"Import from DMI-TCAT (exp.)").decode('utf8'), _(u"Import from DMI-TCAT (exp.)").decode('utf8'))
282         item.SetBitmap(self.images_analyses['importdmi'])
283         file_menu.AppendItem(item)
284
285         item = wx.MenuItem(file_menu, ID_merge, _(u'Merge graphs').decode('utf8'), _(u'Merge graphs').decode('utf8'))
286         file_menu.AppendItem(item)
287
288         item = wx.MenuItem(file_menu, ID_merge_clusters, _(u'Corpus from merge clusters').decode('utf8'), _(u'Corpus from merge clusters').decode('utf8'))
289         file_menu.AppendItem(item)
290
291         menuFactiva = wx.Menu()
292         fact_from_xml = wx.MenuItem(menuFactiva, ID_Fact_xml, _(u"from xml").decode('utf8'))
293         fact_from_xml.SetBitmap(self.images_analyses['factiva_xml'])
294         fact_from_mail = wx.MenuItem(menuFactiva, ID_Fact_mail, _(u"from mail").decode('utf8'))
295         fact_from_mail.SetBitmap(self.images_analyses['factiva_mail'])
296         fact_from_txt = wx.MenuItem(menuFactiva, ID_Fact_copy, _(u"from copy/paste").decode('utf8'))
297         fact_from_txt.SetBitmap(self.images_analyses['factiva_copy'])
298         menuFactiva.AppendItem(fact_from_xml)
299         menuFactiva.AppendItem(fact_from_mail)
300         menuFactiva.AppendItem(fact_from_txt)
301         file_menu.AppendMenu(-1, _(u"Import from factiva").decode('utf8'), menuFactiva)
302
303         menuTools = wx.Menu()
304         splitvar = wx.MenuItem(menuTools, wx.ID_ANY, _(u"Split from variable").decode('utf8'))
305         extractmod = wx.MenuItem(menuTools, wx.ID_ANY, _(u"Extract mods").decode('utf8'))
306         extractthem = wx.MenuItem(menuTools, wx.ID_ANY, _(u"Extract thematics").decode('utf8'))
307         menuTools.AppendItem(splitvar)
308         menuTools.AppendItem(extractmod)
309         menuTools.AppendItem(extractthem)
310         self.ID_splitvar = splitvar.GetId()
311         self.ID_extractmod = extractmod.GetId()
312         self.ID_extractthem = extractthem.GetId()
313         file_menu.AppendMenu(-1, _(u"Tools").decode('utf8'), menuTools)
314
315
316         #item = wx.MenuItem(file_menu, ID_SaveTab, _(u"Save tab as...").decode('utf8'), _(u"Save tab as...").decode('utf8'))
317         #item.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_FILE_SAVE_AS))
318         #file_menu.AppendItem(item)
319
320         file_menu.Append(wx.ID_EXIT, _(u"Exit").decode('utf8'))
321
322         edit_menu = wx.Menu()
323         pref = wx.MenuItem(edit_menu, wx.ID_PREFERENCES, _(u'Preferences').decode('utf8'))
324         pref.SetBitmap(self.images_analyses['preferences'])
325         edit_menu.AppendItem(pref)
326         #edit_menu.Append(wx.ID_PREFERENCES, _(u'Preferences').decode('utf8'))
327
328         view_menu = wx.Menu()
329         home = wx.MenuItem(view_menu, ID_ACCEUIL, _(u"Home page").decode('utf8'))
330         home.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_GO_HOME, size = (16,16)))
331         view_menu.AppendItem(home)
332         #view_menu.Append(ID_ACCEUIL, _(u"Home page").decode('utf8'))
333         results = wx.MenuItem(view_menu, ID_RESULT, _(u'Show results').decode('utf8'))
334         results.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_LIST_VIEW, size = (16,16)))
335         view_menu.AppendItem(results)
336         #view_menu.Append(ID_RESULT, _(u'Show results').decode('utf8'))
337         #view_menu.AppendSeparator()
338         matrix_menu = wx.Menu()
339         matanalyses = [[ID_Freq, _(u"Frequencies").decode('utf8'), 'freq'],
340                        [ID_FreqMulti, _(u"Multiple  Frequencies").decode('utf8'), 'freqmulti'],
341                        [ID_Chi2, _(u"Chi2").decode('utf8'), 'chi2'],
342                        [ID_Chi2mc, _(u"Chi2 McNemar").decode('utf8'), 'chi2mcnemar'],
343                        {'name' : _(u"Clustering").decode('utf8'),
344                         'content' : [[ID_CHDReinert, _(u"Reinert's Method").decode('utf8'), 'reinertmatrix']]},
345                        [ID_SIMI, _(u"Similarities Analysis").decode('utf8'), 'simimatrix'],
346                        [ID_proto, _(u"Prototypical Analysis").decode('utf8'), 'proto'],
347                        [ID_Splitfromvar, _(u"Split from variable").decode('utf8'), 'subcorpusmeta'],
348                         ]
349
350         for analyse in matanalyses :
351             if not isinstance(analyse, dict) :
352                 item = wx.MenuItem(matrix_menu, analyse[0], analyse[1])
353                 item.SetBitmap(self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)))
354                 matrix_menu.AppendItem(item)
355             else :
356                 nmenu = wx.Menu()
357                 for subana in analyse['content'] :
358                     item = wx.MenuItem(nmenu, subana[0], subana[1])
359                     item.SetBitmap(self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)))
360                     nmenu.AppendItem(item)
361                 matrix_menu.AppendMenu(-1, analyse['name'], nmenu)
362         #item = wx.MenuItem(matrix_menu, ID_Freq, _(u"Frequencies").decode('utf8'))
363         #item.SetBitmap(self.images_analyses['freq'])
364         #matrix_menu.AppendItem(item)
365         #matrix_menu.Append(ID_Freq, _(u"Frequencies").decode('utf8'))
366         #item = wx.MenuItem(matrix_menu, ID_Freq, _(u"Multiple  Frequencies").decode('utf8'))
367         #item.SetBitmap(self.images_analyses['freqmulti'])
368         #matrix_menu.Append(ID_FreqMulti, _(u'Multiple frequencies').decode('utf8'))
369         #matrix_menu.AppendItem(item)
370         #matrix_menu.Append(ID_Chi2, _(u"Chi2").decode('utf8'))
371         #matrix_menu.Append(ID_Student, u"t de Student")
372         #menu_classif = wx.Menu()
373         #menu_classif.Append(ID_CHDReinert, _(u"Reinert's Method").decode('utf8'))
374         #menu_classif.Append(ID_CHDSIM, u"Par matrice des distances")
375         #matrix_menu.AppendMenu(-1, _(u"Clustering").decode('utf8'), menu_classif)
376         #matrix_menu.Append(ID_AFCM, u"AFCM")
377         #matrix_menu.Append(ID_SIMI, _(u"Similarities Analysis").decode('utf8'))
378         #matrix_menu.Append(ID_proto, _(u"Prototypical Analysis").decode('utf8'))
379         ID_RCODE = wx.NewId()
380         #matrix_menu.Append(ID_RCODE, u"Code R...")
381         #menu_splittab = wx.Menu()
382         #ID_SPLITVAR = wx.NewId()
383         #splitvar = wx.MenuItem(menu_splittab, ID_SPLITVAR, _(u"Split from variable").decode('utf8'))
384         #menu_splittab.AppendItem(splitvar)
385         #matrix_menu.AppendMenu(-1, _(u"Split matrix").decode('utf8'), menu_splittab)
386         self.matrix_menu = matrix_menu
387
388         text_menu = wx.Menu()
389         analyses_text = [[ID_TEXTSTAT, _(u"Statistics").decode('utf8'), 'stat'],
390                          [ID_ASLEX, _(u"Specificities and CA").decode('utf8'), 'spec'],
391                          [ID_labbe, _(u"Labbe Distance").decode('utf8'),'labbe'],
392                          {'name' : _(u"Clustering").decode('utf8'),
393                           'content' : [[ID_TEXTREINERT, _(u"Reinert's Method").decode('utf8'), 'alceste']]},
394                          [ID_SimiTxt, _(u"Similarities Analysis").decode('utf8'), 'simitxt'],
395                          [ID_WC, _(u"WordCloud").decode('utf8'), 'wordcloud'],
396                          {'name' : _(u"Sub corpus").decode('utf8'),
397                           'content' : [[ID_Subtxtfrommeta, _(u'Sub corpus from metadata').decode('utf8'), 'subcorpusmeta'],
398                                        [ID_Subtxtfromthem, _(u'Sub corpus from thematic').decode('utf8'), 'subcorpusthema']]},
399                          [ID_exportmeta, _(u"Export metadata table").decode('utf8'), 'exportmetatable'],
400                          ]
401
402         for analyse in analyses_text :
403             if not isinstance(analyse, dict) :
404                 item = wx.MenuItem(text_menu, analyse[0], analyse[1])
405                 item.SetBitmap(self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)))
406                 text_menu.AppendItem(item)
407             else :
408                 nmenu = wx.Menu()
409                 for subana in analyse['content'] :
410                     item = wx.MenuItem(nmenu, subana[0], subana[1])
411                     item.SetBitmap(self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)))
412                     nmenu.AppendItem(item)
413                 text_menu.AppendMenu(-1, analyse['name'], nmenu)
414         #text_menu.Append(ID_CHECKCORPUS, u"Vérifier le corpus")
415 #         text_menu.Append(ID_TEXTSTAT, _(u"Statistics").decode('utf8'))
416 #         text_menu.Append(ID_ASLEX, _(u"Specificities and CA").decode('utf8'))
417 #         #text_menu.Append(ID_TEXTAFCM, u"AFC sur UCI / Vocabulaire")
418 #         menu_classiftxt = wx.Menu()
419 #         menu_classiftxt.Append(ID_TEXTREINERT, _(u"Reinert's Method").decode('utf8'))
420 #         #menu_classiftxt.Append(ID_TEXTPAM, u"Par matrice des distances")
421 #         text_menu.AppendMenu(-1, _(u"Clustering").decode('utf8'), menu_classiftxt)
422 #         text_menu.Append(ID_SimiTxt, _(u"Similarities Analysis").decode('utf8'))
423 #
424 #         text_menu.Append(ID_WC, _(u"WordCloud").decode('utf8'))
425         self.text_menu = text_menu
426
427         help_menu = wx.Menu()
428         about = wx.MenuItem(help_menu, wx.ID_ABOUT, _(u"About...").decode('utf8'))
429         about.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_INFORMATION, size = (16,16)))
430         help_menu.AppendItem(about)
431         #help_menu.Append(wx.ID_ABOUT, _(u"About...").decode('utf8'))
432         help = wx.MenuItem(help_menu, wx.ID_HELP, _(u"Online help...").decode('utf8'))
433         help.SetBitmap(wx.ArtProvider_GetBitmap(wx.ART_HELP, size = (16,16)))
434         help_menu.AppendItem(help)
435         #help_menu.Append(wx.ID_HELP, _(u"Online help...").decode('utf8'))
436
437         self.mb.Append(file_menu, _(u"File").decode('utf8'))
438         self.mb.Append(edit_menu, _(u"Edition").decode('utf8'))
439         self.mb.Append(view_menu, _(u"View").decode('utf8'))
440         self.mb.Append(matrix_menu, _(u"Matrix analysis").decode('utf8'))
441         self.mb.Append(text_menu, _(u"Text analysis").decode('utf8'))
442         self.mb.Append(help_menu, _(u"Help").decode('utf8'))
443
444         self.SetMenuBar(self.mb)
445 #--------------------------------------------------------------------
446         self.statusbar = self.CreateStatusBar(2, wx.ST_SIZEGRIP)
447         self.statusbar.SetStatusWidths([-2, -3])
448         self.statusbar.SetStatusText(_(u"Ready").decode('utf8'), 0)
449         self.statusbar.SetStatusText(_(u"Welcome").decode('utf8'), 1)
450
451         # min size for the frame itself isn't completely done.
452         # see the end up FrameManager::Update() for the test
453         # code. For now, just hard code a frame minimum size
454         self.SetMinSize(wx.Size(400, 400))
455
456         # create some toolbars
457         tb1 = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
458                          wx.TB_FLAT | wx.TB_NODIVIDER)
459         tb1.SetToolBitmapSize(wx.Size(16, 16))
460         tb1.AddLabelTool(ID_OpenData, "OpenData", self.images_analyses['matroot'], shortHelp=_(u"Matrix").decode('utf8'), longHelp=_(u"Open a matrix").decode('utf8'))
461         tb1.AddSeparator()
462         tb1.AddLabelTool(ID_OpenText, "OpenText", self.images_analyses['textroot'], shortHelp=_(u"Text").decode('utf8'), longHelp=_(u"Open a text corpus").decode('utf8'))
463         tb1.AddSeparator()
464         tb1.AddLabelTool(ID_OnOpenAnalyse, "OpenAnalyse", self.images_analyses['iramuteq'], shortHelp= _(u"Open an analysis").decode('utf8'), longHelp=_(u"Open an analysis").decode('utf8'))
465         tb1.AddSeparator()
466         tb1.AddLabelTool(ID_ImportTXM, "ImportTXM", self.images_analyses['TXM'], shortHelp= _(u"Import from TXM").decode('utf8'), longHelp=_(u"Import from TXM").decode('utf8'))
467         tb1.AddSeparator()
468         tb1.AddLabelTool(ID_ImportEuro, "ImportEuro", self.images_analyses['europress'], shortHelp= _(u"Import from Europress").decode('utf8'), longHelp=_(u"Import from Europress").decode('utf8'))
469         tb1.AddSeparator()
470         tb1.AddLabelTool(ID_importdmi, "ImportDMI", self.images_analyses['importdmi'], shortHelp= _(u"Import from DMI-TCAT (exp.)").decode('utf8'), longHelp=_(u"Import from DMI-TCAT (exp.)").decode('utf8'))
471         tb1.AddSeparator()
472         tb1.AddLabelTool(ID_Fact_xml, "ImportFactxml", self.images_analyses['factiva_xml'], shortHelp= _(u"Factiva from xml").decode('utf8'), longHelp=_(u"Factiva from xml").decode('utf8'))
473         tb1.AddLabelTool(ID_Fact_mail, "ImportFactmail", self.images_analyses['factiva_mail'], shortHelp= _(u"Factiva from mail").decode('utf8'), longHelp=_(u"Factiva from mail").decode('utf8'))
474         tb1.AddLabelTool(ID_Fact_copy, "ImportFactcopy", self.images_analyses['factiva_copy'], shortHelp= _(u"Factiva from copy/paste").decode('utf8'), longHelp=_(u"Factiva from copy/paste").decode('utf8'))
475         tb1.AddSeparator()
476         tb1.AddLabelTool(wx.ID_PREFERENCES, "Preferences", self.images_analyses['preferences'], shortHelp= _(u"Preferences").decode('utf8'), longHelp=_(u"Preferences").decode('utf8'))
477         tb1.AddSeparator()
478         tb1.AddLabelTool(ID_ACCEUIL, "Home", wx.ArtProvider_GetBitmap(wx.ART_GO_HOME, size = (16,16)), shortHelp= _(u"Home page").decode('utf8'), longHelp=_(u"Home page").decode('utf8'))
479         tb1.AddLabelTool(ID_RESULT, "Results", wx.ArtProvider_GetBitmap(wx.ART_LIST_VIEW, size = (16,16)), shortHelp= _(u'Show results').decode('utf8'), longHelp=_(u'Show results').decode('utf8'))
480         tb1.Realize()
481
482         tb_text = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
483                          wx.TB_FLAT | wx.TB_NODIVIDER)
484         for analyse in analyses_text :
485             if not isinstance(analyse, dict) :
486                 tb_text.AddLabelTool(analyse[0], analyse[1], self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)), shortHelp = analyse[1], longHelp = analyse[1])
487             else :
488                 for subana in analyse['content'] :
489                     tb_text.AddLabelTool(subana[0], subana[1], self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)), shortHelp = subana[1], longHelp = subana[1])
490         tb_text.Realize()
491
492         tb_mat = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
493                          wx.TB_FLAT | wx.TB_NODIVIDER)
494         for analyse in matanalyses :
495             if not isinstance(analyse, dict) :
496                 tb_mat.AddLabelTool(analyse[0], analyse[1], self.images_analyses.get(analyse[2], wx.EmptyBitmap(16,16)), shortHelp = analyse[1], longHelp = analyse[1])
497             else :
498                 for subana in analyse['content'] :
499                     tb_mat.AddLabelTool(subana[0], subana[1], self.images_analyses.get(subana[2], wx.EmptyBitmap(16,16)), shortHelp = subana[1], longHelp = subana[1])
500         tb_mat.Realize()
501
502         tb_help = wx.ToolBar(self, -1, wx.DefaultPosition, wx.DefaultSize,
503                          wx.TB_FLAT | wx.TB_NODIVIDER)
504         tb_help.AddLabelTool(wx.ID_ABOUT, "About", wx.ArtProvider_GetBitmap(wx.ART_INFORMATION, size=(16,16)), shortHelp=_(u"About...").decode('utf8'), longHelp=_(u"About...").decode('utf8'))
505         tb_help.AddLabelTool(wx.ID_HELP, "Help", wx.ArtProvider_GetBitmap(wx.ART_HELP, size=(16,16)), shortHelp=_(u"Online help...").decode('utf8'), longHelp=_(u"Online help...").decode('utf8'))
506         tb_help.Realize()
507 #------------------------------------------------------------------------------------------------
508
509         self.text_ctrl_txt = wx.TextCtrl(self, -1, "", wx.Point(0, 0), wx.Size(200, 200), wx.NO_BORDER | wx.TE_MULTILINE | wx.TE_RICH2 | wx.TE_READONLY)
510
511         #self._mgr.AddPane(self.text_ctrl_txt, wx.aui.AuiPaneInfo().
512         #                  Name("Text").CenterPane())
513         self._mgr.AddPane(self.text_ctrl_txt, aui.AuiPaneInfo().
514                           Name("Text").CenterPane())
515         #self._mgr.AddPane(IntroPanel(self), wx.aui.AuiPaneInfo().Name("Intro_Text").
516         #                  CenterPane())
517         self._mgr.AddPane(IntroPanel(self), aui.AuiPaneInfo().Name("Intro_Text").
518                           CenterPane())
519         #if not os.path.exists(os.path.join(UserConfigPath, 'history.db')) :
520         #    with open(os.path.join(UserConfigPath, 'history.db'), 'w') as f :
521         #        f.write('')
522         self.history = History(os.path.join(UserConfigPath, 'history.db'))
523         #self.history.dostat()
524         self.tree = LeftTree(self)
525         self._mgr.AddPane(self.tree, aui.AuiPaneInfo().Name("lefttree").Caption(_(u"Historic").decode('utf8')).
526                           Left().MinSize(wx.Size(200,500)).Layer(1).Position(1).CloseButton(False).MaximizeButton(True).
527                           MinimizeButton(True))
528
529         #self.nb = wx.aui.AuiNotebook(self, -1, wx.DefaultPosition, wx.DefaultSize, wx.aui.AUI_NB_DEFAULT_STYLE | wx.aui.AUI_NB_TAB_EXTERNAL_MOVE | wx.aui.AUI_NB_TAB_MOVE | wx.aui.AUI_NB_TAB_FLOAT| wx.NO_BORDER)
530         self.nb = aui.AuiNotebook(self, -1, wx.DefaultPosition, wx.DefaultSize, aui.AUI_NB_DEFAULT_STYLE | aui.AUI_NB_TAB_EXTERNAL_MOVE | aui.AUI_NB_TAB_MOVE | aui.AUI_NB_TAB_FLOAT| wx.NO_BORDER)
531         notebook_flags =  aui.AUI_NB_DEFAULT_STYLE | aui.AUI_NB_TAB_EXTERNAL_MOVE | aui.AUI_NB_TAB_MOVE | aui.AUI_NB_TAB_FLOAT| wx.NO_BORDER
532         self.nb.SetAGWWindowStyleFlag(notebook_flags)
533         self.nb.SetArtProvider(aui.ChromeTabArt())
534         #self.nb.SetArtProvider(aui.VC8TabArt())
535         #self.nb.parent = self
536         #self._notebook_style = aui.AUI_NB_DEFAULT_STYLE | aui.AUI_NB_TAB_EXTERNAL_MOVE | wx.NO_BORDER
537         #self._mgr.AddPane(self.nb, wx.aui.AuiPaneInfo().
538         #                      Name("Tab_content").
539         #                      CenterPane())
540         self._mgr.AddPane(self.nb, aui.AuiPaneInfo().
541                               Name("Tab_content").
542                               CenterPane())
543
544         #self._mgr.AddPane(self.Sheet, wx.aui.AuiPaneInfo().Name("Data").CenterPane())
545         #self._mgr.AddPane(self.Sheet, aui.AuiPaneInfo().Name("Data").CenterPane())
546         self.nb.Bind(aui.EVT_AUINOTEBOOK_PAGE_CLOSE, self.OnCloseTab)
547         self.nb.Bind(aui.EVT_AUINOTEBOOK_PAGE_CHANGED, self.OnPageChanged)
548         # add the toolbars to the manager
549
550         #self._mgr.AddPane(tb1, wx.aui.AuiPaneInfo().
551         #                  Name("tb1").Caption("Fichiers").
552         #                  ToolbarPane().Top().
553         #                  LeftDockable(False).RightDockable(False))
554         self._mgr.AddPane(tb1, aui.AuiPaneInfo().
555                           Name("tb1").Caption("Fichiers").
556                           ToolbarPane().Top().
557                           LeftDockable(True).RightDockable(False))
558
559         self._mgr.AddPane(tb_text, aui.AuiPaneInfo().
560                           Name("tb_text").Caption("analyse_text").
561                           ToolbarPane().Top().
562                           LeftDockable(True).RightDockable(False))
563
564         self._mgr.AddPane(tb_mat, aui.AuiPaneInfo().
565                           Name("tb_mat").Caption("analyse_matrix").
566                           ToolbarPane().Top().
567                           LeftDockable(True).RightDockable(False))
568
569         self._mgr.AddPane(tb_help, aui.AuiPaneInfo().
570                           Name("tb_help").Caption("help").
571                           ToolbarPane().Top().
572                           LeftDockable(True).RightDockable(False))
573
574         self._mgr.GetPane('tb_text').Hide()
575         self._mgr.GetPane('tb_mat').Hide()
576
577         self.ShowAPane("Intro_Text")
578         self._mgr.GetPane("lefttree").Show()
579         self._mgr.GetPane("classif_tb").Hide()
580         # "commit" all changes made to FrameManager
581         self._mgr.Update()
582
583         # Show How To Use The Closing Panes Event
584 ##################################################################
585         self.Bind(wx.EVT_MENU, self.OnAcceuil, id=ID_ACCEUIL)
586         self.Bind(wx.EVT_MENU, self.ShowTab, id=ID_RESULT)
587         self.Bind(wx.EVT_MENU, self.OnOpenData, id=ID_OpenData)
588         self.Bind(wx.EVT_MENU, self.OnOpenText, id=ID_OpenText)
589         self.Bind(wx.EVT_MENU, self.OnOpenAnalyse, id=ID_OnOpenAnalyse)
590         self.Bind(wx.EVT_MENU, self.import_factiva_xml, fact_from_xml)
591         self.Bind(wx.EVT_MENU, self.import_factiva_mail, fact_from_mail)
592         self.Bind(wx.EVT_MENU, self.import_factiva_txt, fact_from_txt)
593         self.Bind(wx.EVT_MENU, self.ExtractTools, splitvar)
594         self.Bind(wx.EVT_MENU, self.ExtractTools, extractmod)
595         self.Bind(wx.EVT_MENU, self.ExtractTools, extractthem)
596         self.Bind(wx.EVT_MENU, self.OnFreq, id=ID_Freq)
597         self.Bind(wx.EVT_MENU, self.OnFreqMulti, id=ID_FreqMulti)
598         self.Bind(wx.EVT_MENU, self.OnChi2, id=ID_Chi2)
599         self.Bind(wx.EVT_MENU, self.OnChi2McNemar, id=ID_Chi2mc)
600         self.Bind(wx.EVT_MENU, self.OnStudent, id=ID_Student)
601         self.Bind(wx.EVT_MENU, self.OnCHDSIM, id=ID_CHDSIM)
602         self.Bind(wx.EVT_MENU, self.OnCHDReinert, id=ID_CHDReinert)
603         self.Bind(wx.EVT_MENU, self.OnAFCM, id=ID_AFCM)
604         self.Bind(wx.EVT_MENU, self.OnProto, id=ID_proto)
605         self.Bind(wx.EVT_MENU, self.OnSplitVar, id = ID_Splitfromvar)
606         #self.Bind(wx.EVT_MENU, self.OnRCode, id=ID_RCODE)
607         #self.Bind(wx.EVT_MENU, self.OnSplitVar, id=ID_SPLITVAR)
608         #self.Bind(wx.EVT_MENU, self.OnCheckcorpus, id = ID_CHECKCORPUS)
609         self.Bind(wx.EVT_MENU, self.OnTextStat, id=ID_TEXTSTAT)
610         self.Bind(wx.EVT_MENU, self.OnTextSpec, id=ID_ASLEX)
611         self.Bind(wx.EVT_MENU, self.OnTextLabbe, id=ID_labbe)
612         self.Bind(wx.EVT_MENU, self.OnTextAfcm, id=ID_TEXTAFCM)
613         self.Bind(wx.EVT_MENU, self.OnTextReinert, id=ID_TEXTREINERT)
614         self.Bind(wx.EVT_MENU, self.OnPamSimple, id=ID_TEXTPAM)
615         self.Bind(wx.EVT_MENU, self.OnSimiTxt, id=ID_SimiTxt)
616         self.Bind(wx.EVT_MENU, self.OnWordCloud, id=ID_WC)
617         self.Bind(wx.EVT_MENU, self.OnSubText, id = ID_Subtxtfrommeta)
618         self.Bind(wx.EVT_MENU, self.OnSubText, id = ID_Subtxtfromthem)
619         self.Bind(wx.EVT_MENU, self.OnSimiTab, id=ID_SIMI)
620         self.Bind(wx.EVT_MENU, self.OnExit, id=wx.ID_EXIT)
621         #self.Bind(wx.EVT_MENU, self.OnSaveTabAs, id=ID_SaveTab)
622         self.Bind(wx.EVT_MENU, self.OnAbout, id=wx.ID_ABOUT)
623         self.Bind(wx.EVT_MENU, self.OnHelp, id=wx.ID_HELP)
624         self.Bind(wx.EVT_MENU, self.OnPref, id=wx.ID_PREFERENCES)
625         self.Bind(wx.EVT_MENU, self.OnImportTXM, id=ID_ImportTXM)
626         self.Bind(wx.EVT_MENU, self.OnImportEuropress, id=ID_ImportEuro)
627         self.Bind(wx.EVT_MENU, self.OnImportDMI, id=ID_importdmi)
628         self.Bind(wx.EVT_MENU, self.OnExportMeta, id=ID_exportmeta)
629         self.Bind(wx.EVT_MENU, self.OnMergeGraph, id = ID_merge)
630         self.Bind(wx.EVT_MENU, self.OnMergeClusters, id = ID_merge_clusters)
631         self.Bind(wx.EVT_CLOSE, self.OnClose)
632 ##################################################################
633         flags = self._mgr.GetAGWFlags()
634         #flags &= ~wx.aui.AUI_MGR_TRANSPARENT_HINT
635         #flags &= ~wx.aui.AUI_MGR_VENETIAN_BLINDS_HINT
636         #flags &= ~wx.aui.AUI_MGR_RECTANGLE_HINT
637         flags &= ~(aui.AUI_MGR_RECTANGLE_HINT | aui.AUI_MGR_ALLOW_FLOATING)
638         self._mgr.SetAGWFlags(self._mgr.GetAGWFlags() ^ (aui.AUI_MGR_RECTANGLE_HINT | aui.AUI_MGR_ALLOW_FLOATING))
639         self._mgr.GetArtProvider().SetMetric(aui.AUI_DOCKART_GRADIENT_TYPE, aui.AUI_GRADIENT_HORIZONTAL)
640         self.GetDockArt().SetColor(aui.AUI_DOCKART_ACTIVE_CAPTION_GRADIENT_COLOUR, "#00FFF9")
641         self.DoUpdate()
642
643         self._icon = wx.Icon(os.path.join(ImagePath, "iraicone.ico"), wx.BITMAP_TYPE_ICO)
644         self.SetIcon(self._icon)
645 ##########################
646         self.ctrl = ""
647         self.input_path = [False]
648         self.TEMPDIR = tempfile.mkdtemp('iramuteq')
649         self.FileTabList = []
650         self.listbar=[]
651         self.DictTab = {}
652         self.FreqNum = 0
653         self.colsep = ''
654         self.txtsep = ''
655         self.g_header = False
656         self.g_id = False
657         self.table = ''
658         self.fileforR = ''
659         self.filename = ''
660         self.nastrings = ''
661         self.encode = ''
662         self.SysEncoding = sys.getdefaultencoding()
663         self.syscoding = sys.getdefaultencoding()
664         #print 'SysEncoding',self.SysEncoding
665         if self.SysEncoding == 'mac-roman' : self.SysEncoding = 'MacRoman'
666         self.type = ''
667
668 ##############################################################@
669         self.ShowMenu('view', True)
670         self.ShowMenu('matrix', False)
671         self.ShowMenu('text', False)
672
673         self._mgr.Update()
674
675         self.DataPop = False
676         self.DataTxt = False
677         self.Text = ''
678
679         self.lexique = None
680         self.corpus = None
681
682     def finish_init(self) :
683         try :
684             self.pref.read(self.ConfigPath['preferences'])
685             if IsNew(self) :
686                 UpgradeConf(self)
687                 self.pref.read(self.ConfigPath['preferences'])
688                 New = True
689             else :
690                 CopyConf(self)
691                 New = False
692         except :
693             UpgradeConf(self)
694             self.pref.read(self.ConfigPath['preferences'])
695             New = True
696         self.sound = self.pref.getboolean('iramuteq', 'sound')
697         self.check_update = self.pref.getboolean('iramuteq', 'checkupdate')
698         self.version = ConfigGlob.get('DEFAULT', 'version')
699         #configuration des chemins de R
700         self.PathPath = ConfigParser()
701         self.PathPath.read(ConfigPath['path'])
702         BestRPath = False
703         if not CheckRPath(self.PathPath) :
704             if sys.platform == 'win32':
705                 BestRPath = FindRPAthWin32()
706             else:
707                 BestRPath = FindRPathNix()
708             if BestRPath:
709                 self.PathPath.set('PATHS', 'rpath', BestRPath)
710                 with open(ConfigPath['path'], 'w') as f :
711                     self.PathPath.write(f)
712         else:
713             BestRPath = True
714         if BestRPath :
715             self.RPath = self.PathPath.get('PATHS', 'rpath')
716             if New :
717                 CheckRPackages(self)
718             if not RLibsAreInstalled(self) :
719                 CheckRPackages(self)
720         else :
721             msg = '\n'.join([_(u"Can't find R executable").decode('utf8'), _(u"If R is not installed, get it from http://www.r-project.org.").decode('utf8'),
722                              _(u"If R is installed, report its path in Preferences.").decode('utf8'),
723                              _(u"IRaMuTeQ does not work without R.").decode('utf8')])
724             dlg = wx.MessageDialog(self, msg, _(u"Problem").decode('utf8'), wx.OK | wx.ICON_WARNING)
725             dlg.CenterOnParent()
726             if dlg.ShowModal() in [wx.ID_NO, wx.ID_CANCEL]:
727                 pass
728             dlg.Destroy()
729
730     def setlangue(self) :
731         self.pref.read(self.ConfigPath['preferences'])
732         try :
733             guilangue = self.pref.get('iramuteq', 'guilanguage')
734         except :
735             guilangue = DefaultConf.get('iramuteq', 'guilanguage')
736         self.preslangue.get(guilangue, 'english').install()
737
738     def OnVerif(self, evt) :
739         pack = CheckRPackages(self)
740         if pack :
741             dlg = wx.MessageDialog(self, _(u"Installation OK").decode('utf8'), _(u"Installation").decode('utf8'), wx.OK | wx.ICON_INFORMATION | wx.STAY_ON_TOP)
742             dlg.CenterOnParent()
743             if dlg.ShowModal() in [wx.ID_NO, wx.ID_CANCEL]:
744                 evt.Veto()
745
746     def ShowMenu(self, menu, Show=True):
747         if menu == 'text' :
748             menu_pos = 4
749             if Show :
750                 self._mgr.GetPane('tb_text').Show()
751             else :
752                 self._mgr.GetPane('tb_text').Hide()
753         elif menu == 'matrix' :
754             menu_pos = 3
755             if Show :
756                 self._mgr.GetPane('tb_mat').Show()
757             else :
758                 self._mgr.GetPane('tb_mat').Hide()
759         elif menu == 'view' :
760             menu_pos = 2
761         else :
762             menu_pos = None
763
764         #menu_pos = self.mb.FindMenu(menu)
765         if not menu_pos is None :
766             self.mb.EnableTop(menu_pos, Show)
767             self.mb.UpdateMenus()
768         self._mgr.Update()
769
770 #--------------------------------------------------------------------
771     def OnClose(self, event):
772         print 'onclose'
773         with open(self.ConfigPath['path'], 'w') as f :
774             self.PathPath.write(f)
775         self._mgr.UnInit()
776         del self._mgr
777         self.Destroy()
778
779     def OnOpenData(self, event):
780         inputname, self.input_path = OnOpen(self, "Data")
781         if inputname:
782             #filename = self.input_path[0]
783             self.tableau = Tableau(self,os.path.abspath(self.input_path[0]))
784             val = get_table_param(self, self.input_path[0])
785             if val == wx.ID_OK :
786                 busy = wx.BusyInfo(_("Please wait...").decode('utf8'), self)
787                 wx.SafeYield()
788                 try :
789                     self.tableau.make_content()
790                     OpenAnalyse(self, self.tableau.parametres)
791                     self.tree.OnItemAppend(self.tableau.parametres)
792                     del busy
793                 except :
794                     del busy
795                     BugReport(self)
796                 #self.tableau.show_tab()
797
798     def OnOpenAnalyse(self, event):
799         self.AnalysePath = OnOpen(self, "Analyse")
800         if self.AnalysePath :
801             OpenAnalyse(self, self.AnalysePath[1][0], True)
802             self.ShowMenu('view')
803
804     def OnOpenText(self, event):
805         inputname, self.input_path = OnOpen(self, "Texte")
806         self.filename = self.input_path[0]
807         if inputname:
808             self.OpenText()
809
810     def OnSubText(self, evt, corpus = None, parametres = None):
811         if corpus is None :
812             corpus = self.tree.getcorpus()
813         if evt.GetId() == ID_Subtxtfrommeta :
814             parametres = {'frommeta' : True}
815         elif evt.GetId() == ID_Subtxtfromthem :
816             parametres = {'fromtheme' : True}
817         builder = SubBuilder(self, corpus, parametres)
818         if builder.res == wx.ID_OK :
819             busy = wx.BusyInfo(_("Please wait...").decode('utf8'), self)
820             wx.SafeYield()
821             corpus = builder.doanalyse()
822             self.history.add(corpus.parametres)
823             OpenAnalyse(self, corpus.parametres)
824             self.tree.OnItemAppend(corpus.parametres)
825             del busy
826
827     def OpenText(self):
828         builder =  Builder(self, 5)
829         if builder.res == wx.ID_OK :
830             try :
831                 corpus = builder.doanalyse()
832                 self.history.add(corpus.parametres)
833                 self.tree.OnItemAppend(corpus.parametres)
834                 OpenAnalyse(self, corpus.parametres)
835             except :
836                 builder.dlg.Destroy()
837                 BugReport(self)
838             else :
839                 count = 1
840                 keepGoing = builder.dlg.Update(count, u"Lecture du fichier")
841                 self.ShowMenu('view')
842                 self.ShowMenu('text')
843                 self.ShowMenu('matrix', False)
844                 self.type = "Texte"
845                 self.DataTxt = False
846                 self.Text = ''
847                 count += 1
848                 keepGoing = builder.dlg.Update(count, u"Chargement du dictionnaire")
849                 builder.dlg.Destroy()
850
851     def OnExit(self, event):
852         self.Close()
853
854     def OnAbout(self, event):
855         info = wx.AboutDialogInfo()
856         info.Name = ConfigGlob.get('DEFAULT', 'name')
857         info.Version = ConfigGlob.get('DEFAULT', 'version')
858         info.Copyright = ConfigGlob.get('DEFAULT', 'copyright')
859         info.Translators = ConfigGlob.get('DEFAULT', 'translators').decode('utf8').split(';')
860         info.Description = u"""
861 Interface de R pour les Analyses Multidimensionnelles
862 de Textes et de Questionnaires
863
864 Un logiciel libre
865 construit avec des logiciels libres.
866
867 Laboratoire LERASS
868
869 REPERE
870 """
871         info.WebSite = ("http://www.iramuteq.org", u"Site web IRaMuTeQ")
872         dev = ConfigGlob.get('DEFAULT', 'dev').decode('utf8').split(';')
873         info.Developers = dev
874         info.License = u"""Iramuteq est un logiciel libre ; vous pouvez le diffuser et/ou le modifier
875 suivant les termes de la Licence Publique Générale GNU telle que publiée 
876 par la Free Software Foundation ; soit la version 2 de cette licence, 
877 soit (à votre convenance) une version ultérieure.
878
879 Iramuteq est diffusé dans l'espoir qu'il sera utile, 
880 mais SANS AUCUNE GARANTIE ; sans même une garantie implicite 
881 de COMMERCIALISATION ou d'ADÉQUATION À UN USAGE PARTICULIER. 
882 Voyez la Licence Publique Générale GNU pour plus de détails.
883
884 Vous devriez avoir reçu une copie de la Licence Publique Générale GNU
885 avec Iramuteq ; sinon, veuillez écrire à la Free Software Foundation,
886 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, États-Unis."""
887         wx.AboutBox(info)
888
889     def GetDockArt(self):
890         return self._mgr.GetArtProvider()
891
892     def DoUpdate(self):
893         self._mgr.Update()
894
895     def OnPageChanged(self, event) :
896         new = event.GetSelection()
897         nobject = event.GetEventObject()
898         parent = nobject.GetParent()
899         if isinstance(parent, IraFrame) :
900             npage = self.nb.GetPage(new)
901             if 'parametres' in dir(npage) :
902                 self.tree.GiveFocus(uuid=npage.parametres['uuid'])
903                 if npage.parametres.get('matrix', False) :
904                     self.ShowMenu('text', False)
905                     self.ShowMenu('matrix', True)
906                 elif npage.parametres.get('corpus', False) :
907                     self.ShowMenu('text')
908                     self.ShowMenu('matrix', False)
909
910     def OnCloseTab(self, evt):
911         #log.info('Closing tab %s' % str(evt.GetEventObject()))
912         ctrl = evt.GetEventObject()
913         if isinstance(ctrl.GetParent(), aui.AuiNotebook) or isinstance(ctrl.GetParent(), wx.Panel):
914             notebook = True
915         else :
916             notebook = False
917         page = self.nb.GetPage(self.nb.GetSelection())
918         if 'parametres' in dir(page) and isinstance(ctrl.GetParent(), IraFrame) :
919             self.history.rmtab(page.parametres)
920             self.tree.CloseItem(uuid = page.parametres['uuid'])
921         TabTitle = self.nb.GetPageText(self.nb.GetSelection())
922
923         if self.nb.GetPageCount() == 1 and not notebook :
924             self.LastTabClose()
925
926     def LastTabClose(self) :
927         if self.nb.GetPageCount() == 1 :
928             if self.DataTxt :
929                 self.ShowAPane("Text")
930             elif self.DataPop :
931                 self.ShowAPane("Data")
932             else :
933                 self.ShowAPane("Intro_Text")
934
935     def GetStartPosition(self):
936
937         self.x = self.x + 20
938         x = self.x
939         pt = self.ClientToScreen(wx.Point(0, 0))
940
941         return wx.Point(pt.x + x, pt.y + x)
942
943     def ShowAPane(self, panel):
944         for pane in self._mgr.GetAllPanes() :
945             if not pane.IsToolbar() and pane.name != 'lefttree':
946                 pane.Hide()
947         self._mgr.GetPane(panel).Show()
948         self._mgr.Update()
949
950     def OnAcceuil(self, event):
951         self.ShowAPane(u"Intro_Text")
952         event.Skip()
953
954     def CreateHTMLCtrl(self):
955         ctrl = wx.html.HtmlWindow(self, -1, wx.DefaultPosition, wx.Size(400, 300))
956         if "gtk2" in wx.PlatformInfo:
957             ctrl.SetStandardFonts()
958         ctrl.SetPage(u"text")
959         return ctrl
960
961     def ShowTab(self, evt):
962         self.ShowAPane("Tab_content")
963
964 ################################################################
965 #debut des analyses
966 ################################################################
967     def analyse_matrix(self, analyse, analyse_type = '', matrix = None, parametres = None, dlgnb = 1):
968         if matrix is None :
969             matrix = self.tree.getmatrix()
970         if parametres is not None :
971             parametres['type'] = analyse_type
972         else :
973             parametres = {'type' : analyse_type}
974         try :
975         #print 'plus de bug@@@@@@@@@@@@@@@@@@@@@@'
976             analyse(self, matrix, parametres = parametres, dlg = dlgnb)
977         except:
978             BugReport(self)
979
980     def OnFreq(self, event, matrix = None):
981         self.analyse_matrix(Frequences, analyse_type = 'freq', matrix = matrix, dlgnb = 3)
982
983     def OnFreqMulti(self, event, matrix = None):
984         self.analyse_matrix(FreqMultiple, analyse_type = 'freqmulti', matrix = matrix, dlgnb = 3)
985
986     def OnChi2(self, event, matrix = None):
987         self.analyse_matrix(ChiSquare, matrix = matrix, analyse_type = 'chi2', dlgnb = 3)
988
989     def OnChi2McNemar(self, event, matrix = None):
990         self.analyse_matrix(McNemar, matrix = matrix, analyse_type = 'chi2mcnemar', dlgnb = 3)
991
992     def OnSimiTab(self, event, matrix = None):
993         self.analyse_matrix(DoSimi, matrix = matrix, analyse_type = 'simimatrix', dlgnb = 5)
994
995     def OnCHDReinert(self, event, matrix = None):
996         #if matrix is None :
997         #    matrix = self.tree.getmatrix()
998         #AnalyseQuest(self, matrix, parametres = {'type' : 'reinertmatrix'}, dlg = 3)
999         self.analyse_matrix(AnalyseQuest, matrix = matrix, analyse_type = 'reinertmatrix', dlgnb = 5)
1000
1001     def OnStudent(self, event):
1002         try:
1003             MakeStudent(self)
1004         except:
1005             BugReport(self)
1006
1007     def OnRCode(self, event):
1008         try:
1009             InputText(self)
1010         except:
1011             BugReport(self)
1012
1013     def OnCHDSIM(self, event):
1014         try:
1015         #    print 'ATTENTION!!!!'
1016             chdsim = ChdCluster(self)
1017             if chdsim.val == wx.ID_OK:
1018                 PlaySound(self)
1019         except:
1020             BugReport(self)
1021
1022 #     def OnCHDReinert(self, event):
1023 #         try:
1024 #          #   print('PLUS DE BUG SUR ALCESTE QUESTIONNAIRE')
1025 #             self.quest = AnalyseQuest(self)
1026 #             if self.quest.val == wx.ID_OK:
1027 #                 PlaySound(self)
1028 #         except:
1029 #             BugReport(self)
1030     def OnMergeGraph(self, evt):
1031         #FIXME
1032         AnalyseMerge(self, {'type': 'merge', 'fileout' : '/tmp/test.txt'}, dlg = 5)
1033
1034     def OnMergeClusters(self, evt) :
1035         builder = MergeClusters(self, {})
1036         if builder.res == wx.ID_OK :
1037             busy = wx.BusyInfo(_("Please wait...").decode('utf8'), self)
1038             wx.SafeYield()
1039             corpus = builder.doanalyse()
1040             self.history.add(corpus.parametres)
1041             OpenAnalyse(self, corpus.parametres)
1042             self.tree.OnItemAppend(corpus.parametres)
1043             del busy
1044
1045     def OnProto(self, evt, matrix = None) :
1046         self.analyse_matrix(Prototypical, matrix = matrix, analyse_type = 'proto', dlgnb = 3) 
1047         #Prototypical(self, {'type' : 'proto'})
1048
1049     def OnSplitVar(self, evt, matrix = None):
1050         if matrix is None :
1051             matrix = self.tree.getmatrix()
1052         self.analyse_matrix(SplitMatrixFromVar, matrix = matrix, analyse_type = 'splitvar', parametres = {'pathout': matrix.pathout.dirout}, dlgnb = 3)
1053         #matrix = self.tree.getmatrix()
1054
1055
1056     def OnSimiTxt(self, evt, corpus = None) :
1057         #    print 'PLUS DE BUG SUR SIMITXT'
1058         try :
1059             #self.Text = SimiTxt(self)
1060             if corpus is None :
1061                 corpus = self.tree.getcorpus()
1062             self.Text = SimiTxt(self, corpus, parametres = {'type': 'simitxt'}, dlg = 3)
1063             if self.Text.val == wx.ID_OK :
1064                 PlaySound(self)
1065         except :
1066             BugReport(self)
1067
1068     def OnWordCloud(self, evt, corpus = None) :
1069         #    print 'PLUS DE BUG SUR WORDCLOUD'
1070         try :
1071             if corpus is None :
1072                 corpus = self.tree.getcorpus()
1073             self.Text = WordCloud(self, corpus, parametres = {'type' : 'wordcloud'}, dlg = 3)
1074             if self.Text.val == wx.ID_OK :
1075                 PlaySound(self)
1076         except :
1077             BugReport(self)
1078
1079     def OnClusterCloud(self, corpus, parametres = None) :
1080         self.Text = ClusterCloud(self, corpus, parametres = parametres, dlg = 3)
1081
1082     def OnAFCM(self, event):
1083         try:
1084             DoAFCM(self)
1085         except:
1086             BugReport(self)
1087
1088     def OnTextStat(self, event, corpus = None):
1089             #print 'PAS DE BUG SUR TEXT STAT'
1090         try:
1091             if corpus is None :
1092                 corpus = self.tree.getcorpus()
1093             self.Text = Stat(self, corpus, parametres = {'type': 'stat'}, dlg = 7)
1094
1095             if self.Text.val == wx.ID_OK :
1096                 PlaySound(self)
1097         except:
1098             BugReport(self)
1099
1100     def OnTextSpec(self, event, corpus = None):
1101         try:
1102             #self.Text = AsLexico(self)
1103             #print('ATTENTION : PLUS DE BUG SUR LEXICO')
1104             if corpus is None :
1105                 corpus = self.tree.getcorpus()
1106             self.Text = Lexico(self, corpus, parametres = {'type' : 'spec'}, dlg = 3)
1107             if self.Text.val == wx.ID_OK :
1108                 PlaySound(self)
1109         except:
1110             BugReport(self)
1111
1112     def OnTextLabbe(self, event, corpus = None):
1113         try:
1114             if corpus is None :
1115                 corpus = self.tree.getcorpus()
1116             self.Text = DistLabbe(self, corpus, parametres = {'type' : 'labbe'}, dlg = 3)
1117             if self.Text.val == wx.ID_OK :
1118                 PlaySound(self)
1119         except:
1120             BugReport(self)
1121
1122
1123     def OnTextAfcm(self, event):
1124         try:
1125             AfcUci(self)
1126             PlaySound(self)
1127         except:
1128             BugReport(self)
1129
1130     def import_factiva_xml(self,event):
1131         try :
1132             ImportFactiva(self, 'xml')
1133         except :
1134             BugReport(self)
1135
1136     def import_factiva_mail(self, evt) :
1137         try :
1138             ImportFactiva(self, 'mail')
1139         except :
1140             BugReport(self)
1141
1142     def import_factiva_txt(self, evt) :
1143         try :
1144             ImportFactiva(self, 'txt')
1145         except :
1146             BugReport(self)
1147
1148     def OnImportTXM(self, evt) :
1149         try :
1150             ImportFactiva(self, 'txm')
1151         except :
1152             BugReport(self)
1153
1154     def OnImportEuropress(self, evt) :
1155         try :
1156             ImportFactiva(self, 'euro')
1157         except :
1158             BugReport(self)
1159
1160     def OnImportDMI(self, evt):
1161         ImportDMI(self, {})
1162
1163     def OnExportMeta(self, evt, corpus = None):
1164         if corpus is None :
1165             corpus = self.tree.getcorpus()
1166         try :
1167             ExportMetaTable(self, corpus)
1168         except :
1169             BugReport(self)
1170
1171     def ExtractTools(self, evt) :
1172         ID = evt.GetId()
1173         if ID == self.ID_splitvar :
1174             Extract(self, 'splitvar')
1175         elif ID == self.ID_extractmod :
1176             Extract(self, 'mods')
1177         elif ID == self.ID_extractthem :
1178             Extract(self, 'them')
1179
1180     def OnTextReinert(self, event, corpus = None):
1181         try:
1182             #print('ATTENTION : PLUS DE BUG SUR ALCESTE')
1183             #RunAnalyse(self, corpus, Alceste, OptAlceste)
1184             if corpus is None :
1185                 corpus = self.tree.getcorpus()
1186             self.Text = Reinert(self, corpus, parametres = {'type': 'alceste'}, dlg = 6)
1187             if self.Text.val == wx.ID_OK:
1188                 PlaySound(self)
1189         except:
1190             BugReport(self)
1191
1192     def OnPamSimple(self, event, corpus = None):
1193         try:
1194             if corpus is None :
1195                 corpus = self.tree.getcorpus()
1196             self.Text = AnalysePam(self, corpus, parametres = {'type' : 'pamtxt'}, dlg = 6)
1197             if self.Text.val == wx.ID_OK:
1198                 PlaySound(self)
1199         except:
1200             BugReport(self)
1201
1202     def SimiCluster(self, parametres = {}, fromprof = False, tableau = None) :
1203         self.analyse_matrix(DoSimi, parametres = parametres, analyse_type = 'simiclustermatrix', matrix = tableau, dlgnb = 5)
1204
1205 #    def OnSimi(self,evt):
1206 #        try :
1207             #print 'ATTENTION !!!! VERGES'
1208             #print 'PLUS DE BUG SUR SIMI'
1209 #            self.res = DoSimi(self, param = None)
1210             #self.res = Verges(self)
1211 #            if self.res.val == wx.ID_OK :
1212 #                PlaySound(self)
1213 #        except :
1214 #            BugReport(self)
1215 #################################################################
1216
1217     def OnHelp(self, event):
1218         webbrowser.open('http://www.iramuteq.org/documentation')
1219
1220     def OnPref(self, event):
1221         dlg = PrefDialog(self)
1222         dlg.CenterOnParent()
1223         self.val = dlg.ShowModal()
1224         dlg.Destroy()
1225
1226     def Upgrade(self) :
1227         if self.check_update:
1228             NewVersion(self)
1229         else:
1230             print 'pas de verif'
1231         #IsNew(self)
1232         #CheckRPackages(self)
1233
1234     def OnOpenFromCmdl(self):
1235         truepath = True
1236         if options.filename :
1237             if os.path.exists(options.filename):
1238                 self.filename = os.path.abspath(options.filename)
1239             else:
1240                 truepath = False
1241         elif args :
1242             if os.path.exists(os.path.realpath(args[0])):
1243                 self.filename = os.path.abspath(os.path.realpath(args[0]))
1244             else:
1245                 truepath = False
1246         else:
1247             return
1248         if truepath :
1249             if os.path.splitext(self.filename)[1] in ['.csv', '.xls', '.ods']:
1250                 self.tableau = Tableau(self, self.filename)
1251                 val = get_table_param(self, self.filename)
1252                 if val == wx.ID_OK :
1253                     self.tableau.make_content()
1254                     OpenAnalyse(self, self.tableau.parametres)
1255                     self.tree.OnItemAppend(self.tableau.parametres)
1256                 #get_table_param(self, self.filename)
1257                 #self.tableau.make_content()
1258                 #self.tableau.show_tab()
1259                 #open_data(self, self.filename)
1260             elif os.path.splitext(self.filename)[1] == '.txt':
1261                 self.OpenText()
1262             elif os.path.splitext(self.filename)[1] == '.ira' :
1263                 #self.corpus = Corpus(self)
1264                 #self.Text = OpenAnalyse(self, self.filename)
1265                 OpenAnalyse(self, self.filename)
1266         if not truepath:
1267             print 'This file does not exist'
1268
1269
1270 class IntroPanel(wx.Panel):
1271     def __init__(self, parent):
1272         wx.Panel.__init__(self, parent)
1273         #col = randint(0, 255)
1274         #col1 = randint(0,255)
1275         #col2 = randint(0,255)
1276         #col = 57
1277         col = 161
1278         col1 = 198
1279         col2 = 224
1280         bckgrdcolor = wx.Colour(col, col1, col2)
1281         self.SetBackgroundColour(bckgrdcolor)
1282         txtcolour = wx.Colour(250, 250, 250)
1283         linkcolor = wx.Colour(255, 0, 0)
1284         sizer1 = wx.BoxSizer(wx.VERTICAL)
1285         sizer2 = wx.BoxSizer(wx.VERTICAL)
1286         sizer4 = wx.BoxSizer(wx.HORIZONTAL)
1287         grid_sizer_1 = wx.FlexGridSizer(1, 4, 0, 0)
1288         grid_sizer_3 = wx.FlexGridSizer(1, 4, 0, 0)
1289         grid_sizer_2 = wx.BoxSizer(wx.HORIZONTAL)
1290
1291         iralink = hl.HyperLinkCtrl(self, wx.ID_ANY, u"http://www.iramuteq.org", URL="http://www.iramuteq.org")
1292         iralink.SetColours(linkcolor, linkcolor, "RED")
1293         iralink.SetBackgroundColour(bckgrdcolor)
1294         iralink.EnableRollover(True)
1295         iralink.SetUnderlines(False, False, True)
1296         iralink.SetBold(True)
1297         iralink.UpdateLink()
1298
1299         PanelPres = wx.Panel(self)
1300         bckgrdcolor = wx.Colour(randint(0, 255), randint(0, 255), randint(0, 255))
1301         PanelPres.SetBackgroundColour(bckgrdcolor)
1302
1303         label_1 = wx.StaticText(self, -1, u"IRaMuTeQ", size=(-1, -1))
1304         label_1.SetFont(wx.Font(46, wx.TELETYPE, wx.NORMAL, wx.BOLD, 0, "Purisa"))
1305         label_1.SetForegroundColour(wx.RED)
1306
1307         iraicone = wx.Image(os.path.join(ImagePath,'iraicone100x100.png'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1308         but_ira = wx.StaticBitmap(self, -1, bitmap = iraicone)
1309
1310
1311         label2 = wx.StaticText(PanelPres, -1 , u'\nVersion ' + ConfigGlob.get('DEFAULT', 'version') + '\n')
1312         label2.SetForegroundColour(txtcolour)
1313         label2.SetBackgroundColour(bckgrdcolor)
1314         self.hyper2 = hl.HyperLinkCtrl(PanelPres, wx.ID_ANY, u"REPERE", URL="http://repere.no-ip.org/")
1315         self.hyper2.SetColours(linkcolor, linkcolor, "RED")
1316         self.hyper2.SetBackgroundColour(bckgrdcolor)
1317         self.hyper2.EnableRollover(True)
1318         self.hyper2.SetUnderlines(False, False, True)
1319         self.hyper2.SetBold(True)
1320         self.hyper2.UpdateLink()
1321
1322         label_lerass = wx.StaticText(PanelPres, -1, u'Laboratoire ')
1323         label_lerass.SetForegroundColour(txtcolour)
1324         label_lerass.SetBackgroundColour(bckgrdcolor)
1325
1326         self.hyper_lerass = hl.HyperLinkCtrl(PanelPres, -1, u'LERASS', URL="http://www.lerass.com")
1327         self.hyper_lerass.SetColours(linkcolor, linkcolor, "RED")
1328         self.hyper_lerass.SetBackgroundColour(bckgrdcolor)
1329         self.hyper_lerass.EnableRollover(True)
1330         self.hyper_lerass.SetUnderlines(False, False, True)
1331         self.hyper_lerass.SetBold(True)
1332         self.hyper_lerass.UpdateLink()
1333
1334         blank = wx.StaticText(PanelPres, -1, u'\n')
1335         blank1 = wx.StaticText(PanelPres, -1, u'\n')
1336
1337         labellicence = wx.StaticText(PanelPres, -1, _(u"License GNU GPL").decode('utf8'))
1338         labellicence.SetForegroundColour(txtcolour)
1339         labellicence.SetBackgroundColour(bckgrdcolor)
1340
1341         labelcopy = wx.StaticText(PanelPres, -1, ConfigGlob.get('DEFAULT', 'copyright'))
1342         labelcopy.SetForegroundColour(txtcolour)
1343         labelcopy.SetBackgroundColour(bckgrdcolor)
1344
1345         python_img = wx.Image(os.path.join(ImagePath,'python-logo.jpg'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1346         r_img = wx.Image(os.path.join(ImagePath,'Rlogo.jpg'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1347         lexique_img = wx.Image(os.path.join(ImagePath,'LexTexte4.jpg'), wx.BITMAP_TYPE_ANY).ConvertToBitmap()
1348         but_python = wx.BitmapButton(self, -1, python_img)
1349         but_lexique = wx.BitmapButton(self, -1, lexique_img)
1350         but_r = wx.BitmapButton(self, -1, r_img)
1351         self.Bind(wx.EVT_BUTTON, self.OnPython, but_python)
1352         self.Bind(wx.EVT_BUTTON, self.OnLexique, but_lexique)
1353         self.Bind(wx.EVT_BUTTON, self.OnR, but_r)
1354
1355         grid_sizer_1.Add(self.hyper2, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1356         grid_sizer_3.Add(label_lerass, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1357         grid_sizer_3.Add(self.hyper_lerass, 0, wx.EXPAND | wx.ALIGN_CENTER_HORIZONTAL, 0)
1358         sizer4.Add(label_1, 0, wx.ALIGN_CENTER_HORIZONTAL|wx.ALIGN_CENTER_VERTICAL, 5)
1359
1360         sizer2.Add(label2, 0, wx.ALIGN_CENTER, 5)
1361         sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1362         sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 5)
1363         sizer2.Add(grid_sizer_3, 0, wx.ALIGN_CENTER, 5)
1364         sizer2.Add(wx.StaticText(PanelPres, -1, u' '), 0, wx.ALIGN_CENTER, 5)
1365         sizer2.Add(grid_sizer_1, 0, wx.ALIGN_CENTER, 5)
1366         sizer2.Add(labellicence, 0, wx.ALIGN_CENTER, 5)
1367         sizer2.Add(labelcopy, 0, wx.ALIGN_CENTER, 5)
1368         sizer1.Add(sizer4, 2, wx.ALIGN_CENTER_HORIZONTAL, 0)
1369         sizer1.Add(but_ira, 1, wx.ALIGN_CENTER_HORIZONTAL|wx.ALIGN_CENTER_VERTICAL, 5)
1370         sizer1.Add(iralink, 1, wx.ALIGN_CENTER_HORIZONTAL|wx.ALIGN_TOP, 5)
1371         sizer2.Add(wx.StaticText(PanelPres, -1, u''), 0, wx.ALIGN_CENTER, 10)
1372         PanelPres.SetSizer(sizer2)
1373         grid_sizer_2.Add(but_python, 1, wx.ALIGN_BOTTOM)
1374         grid_sizer_2.Add(but_lexique, 1, wx.ALIGN_BOTTOM)
1375         grid_sizer_2.Add(but_r, 1,  wx.ALIGN_BOTTOM)
1376
1377         sizer1.Add(PanelPres, 0, wx.EXPAND |wx.ALL, 10)
1378         sizer1.Add(grid_sizer_2, 2, wx.ALIGN_CENTER_HORIZONTAL|wx.ALL, 1)
1379         self.SetSizer(sizer1)
1380         sizer1.Fit(self)
1381
1382     def OnPython(self,evt):
1383         webbrowser.open('http://www.python.org')
1384
1385     def OnLexique(self,evt):
1386         webbrowser.open('http://www.lexique.org')
1387
1388     def OnR(self,evt):
1389         webbrowser.open('http://www.r-project.org')
1390
1391 class MySplashScreen(wx.SplashScreen):
1392     def __init__(self):
1393         bmp = wx.Image(os.path.join(ImagePath, 'splash.png')).ConvertToBitmap()
1394         wx.SplashScreen.__init__(self, bmp,
1395                                  wx.SPLASH_CENTRE_ON_SCREEN | wx.SPLASH_TIMEOUT,
1396                                  1000, None, -1)
1397         self.Bind(wx.EVT_CLOSE, self.OnClose)
1398         self.fc = wx.FutureCall(1, self.ShowMain)
1399
1400     def OnClose(self, evt):
1401         evt.Skip()
1402         self.Hide()
1403
1404         if self.fc.IsRunning():
1405             self.fc.Stop()
1406             self.ShowMain()
1407
1408     def ShowMain(self):
1409         displaySize = wx.DisplaySize()
1410         w = displaySize[0]/1.2
1411         h = displaySize[1]/1.2
1412         frame = IraFrame(None, -1, "IRaMuTeQ " + ConfigGlob.get('DEFAULT', 'version'), size=(w, h))
1413         frame.Show()
1414         frame.finish_init()
1415         frame.Upgrade()
1416         frame.OnOpenFromCmdl()
1417 #        if self.fc.IsRunning():
1418 #            self.Raise()
1419         #wx.CallAfter(frame.ShowTip)
1420
1421 class MyApp(wx.App):
1422     def OnInit(self):
1423         """
1424         Create and show the splash screen.  It will then create and show
1425         the main frame when it is time to do so.
1426         """
1427         wx.SystemOptions.SetOptionInt("mac.window-plain-transition", 1)
1428         self.SetAppName("Iramuteq")
1429         splash = MySplashScreen()
1430         splash.Show()
1431         return True
1432
1433 def main():
1434     app = MyApp(False)
1435     app.MainLoop()
1436
1437 if __name__ == '__main__':
1438     __name__ = 'Main'
1439     main()