VARS
VARS
  **module** lang=py
    # VARIABLES
      VARIABLES
        NOM
          DIR_BASE
            "D:\\LG SAVOIRS\\PROLOG\\DOCS\\APPLICATIONS\\VIEILLES APPLICATIONS"
              init
            dir des applications
              info
          S_GLOB
            False
              init
            dir pour sauve globale sur le disque de sauvegarde
              info
          S_INC
            False
              init
            dir pour sauve incrémentale sur le disque de sauvegarde
              info
          N_DATE
            'pas de date'
              init
            date de la sauvegarde
              info
          engine
            False
              init
            variable pour le TTS
              info
          engine_voice
            'HORTENSE'
              init
            nom de la voix courante
              info
          engine_last
            0
              init
            dernière fois où le TTS a été utilisé
              info
      LISTE_DIRS
        NOM
          dropbox perso
            dropbox perso
              note
            "C:\\Users\\lgouzenes.PACTENOVATION\\Dropbox (Compte personnel)"
              direct
            oui
              sauver
          dropbox pro
            dropbox pro
              note
              parties LG
          DIR_DATA
            DIR_DATA_BASE J+ 'DATA'
              direct
            dir pour exploitation
              note
      PAIRES
        NOM_1
          C LG KB2
            D LG KB2
              NOM_2
          D LG KB2
            D LG SAVOIRS
              NOM_2
          C LG SAVOIRS
            D LG SAVOIRS
              NOM_2
      WARNINGS
    # déclaration de variables
      # variables globales
        EXTRACT TABLE NOM , init, info
          by item
          TABLE VARIABLES //NOM
          FORMAT
            {info}
            global {NOM}
            {NOM} = {init}
    # pour l'interface graphique
      notation
        decl ::=
          global {a1}
            #usage
              decl a1, a2
            {a1} = {a2}
            {L}
      #INIT des variables
        # pour les fichiers images des graphiques
          global BASE_GRAPHIQUES
            BASE_GRAPHIQUES = os.path.join ( 'C:\\ProgramData\\KM2' , 'GRAPHIQUES', 'km2_pictos_gif', 'Pictos Gif 32x32')
            BASE_GRAPHIQUES = "C:\\PROGRAMDATA\\KM2\\GRAPHIQUES"
            BASE_GRAPHIQUES = **filename**
          decl BASE_PICTOS, os.path.join ( BASE_GRAPHIQUES , 'km2_pictos_gif', 'Pictos Gif 32x32')
        # pour les élements graphiques
          decl liste_boutons , []
          decl liste_frames, []
          decl liste_labels, []
      # conventions
        notation
          globvar ::=
            global {a1}
              definition
              when init_state
                #
                  {a1} = {a2}
              {L}
            # declare global variable and init
              documentation
            # syntax
              documentation
              globvar name, value
          use_globals ::=
            GOSUB
              definition
            # to be used in programms anywhere
              documentation
              declare globals all variables
          use_systems ::=
            GOSUB
              definition
              documentation
          state ::=
            globvar {a1}, '{a1}'
              definition
              l_states.append ('{a1}')
            i_state +=1
              definition
            # syntax
              documentation
              state name
            # declare a state, with initial value incremented from i_state
              documentation
          INIT_VARS ::=
              definition
              EXTRACT TABLE {a1}, {a2}, {a3}
                by_item
                {L}
                FORMAT
                    # {{a3}}
                    global {{a1}}
                    {{a1}} = {{a2}}
              documentation
        notation
          del decl
          OZE_GLOBALS ::=
            use_globals
            use_oze