source: Sophya/trunk/Poubelle/archediab.old/archediab.sources/c/menu.c@ 637

Last change on this file since 637 was 637, checked in by ansari, 26 years ago

archediab version 24 initial import
File size: 3.3 KB
Line 
1#include "diabolo.h"
2#include "fenetres_diabolo.h"
3#include "bolo.h"
4#include "acqui.h"
5#include "carte_acqui.h"
6#include "trace.h"
7#include "montimer.h"
8#include "synchro.h"
9#include "fichier.h"
10#include "courbeVI.h"
11#include "onde.h"
12#include "menu.h"
13#include "pointage.h"
14#include "foyer.h"
15#include "carte.h"
16#include "auto.h"
17#include "regul.h"
18#include "dilution.h"
19#include "senseur_stellaire.h"
20
21
22void ferme_annexe(void);
23
24int ann;
25
26void exec_menu_diabolo(int fen,int item,double valeur,...)
27{
28switch(item)
29 {
30 case d_param_reglage : param_reglage();
31 /*sauve_param();//relit_liste();
32 sauve_reglage(0);
33 sauve_reglage(1);
34 sauve_reglage(2);*/
35 break;
36 case d_trace_tout : ouvreD(0,trace_tout_id ,"trace tout" ,exec_trace_tout );
37 break;
38// case d_trace_tout : if(fenetre(fenetre_trace_tout)) select(fenetre_trace_tout);
39// else ouvreD(fenetre_trace_tout ,trace_tout_id ,"trace tout" ,exec_trace_tout );
40// break;
41 case d_trace_1_per : if(fenetre(fenetre_trace_1_per)) select(fenetre_trace_1_per);
42 else ouvreD(fenetre_trace_1_per,trace_1_per_id,"trace une periode",exec_trace_1_per);
43 break;
44 case d_trace_DS : if(fenetre(fenetre_trace_DS)) select(fenetre_trace_DS);
45 else ouvreD(fenetre_trace_DS ,trace_DS_id ,"trace DS" ,exec_trace_DS);
46 break;
47
48 case d_fourier : gg->flag_fou=1;
49 break;
50 case d_courbeVI : ouvreD(0,courbeVI_id,"courbe V(I)",exec_courbeVI);
51 break;
52 case d_ondelette : if(fenetre(fenetre_ondelette)) select(fenetre_ondelette);
53 else ouvreD(fenetre_ondelette,ondelette_id,"ondelette",exec_ondelette);
54 break;
55
56
57
58 case d_automatismes : if(fenetre(fenetre_automatismes)) select(fenetre_automatismes);
59 else ouvreD(fenetre_automatismes,automatismes_id,"automatismes",exec_automatismes);
60 break;
61
62 case d_regulation : if(fenetre(fenetre_regulation)) select(fenetre_regulation);
63 else ouvreD(fenetre_regulation,regulation_id,"regulation",exec_regulation);
64 break;
65
66 case d_dilution : if(fenetre(fenetre_dilution)) select(fenetre_dilution);
67 else ouvreD(fenetre_dilution,dilution_id,"dilution",exec_dilution);
68 break;
69
70 case d_senseur_stellaire : if(fenetre(fenetre_senseur_stellaire)) select(fenetre_senseur_stellaire);
71 else ouvreD(fenetre_senseur_stellaire,senseur_stellaire_id,"senseur_stellaire",exec_senseur_stellaire);
72 break;
73
74/*
75nouveauD(0,senseur_stellaire_id,"senseur_stellaire",exec_senseur_stellaire);
76
77
78*/
79
80
81
82
83
84
85
86 case d_trace_carte : ferme_annexe();
87 ann=1;
88 ouvreD(fenetre_annexe ,carte_id ,"carte",exec_carte);
89 break;
90
91 case d_pointage : ferme_annexe();
92 ann=2;
93 ouvreD(fenetre_annexe ,pointage_id ,"pointage",exec_pointage);
94 break;
95
96 case d_foyer : ferme_annexe();
97 ann=3;
98 ouvreD(fenetre_annexe ,foyer_id ,"foyer",exec_foyer);
99 break;
100
101 default : break;
102 }
103}
104
105
106void ferme_annexe(void)
107{
108if( fenetre(fenetre_annexe) ) ferme(fenetre_annexe);
109while (fenetre(fenetre_annexe))
110 printf("fermeture fenetre_annexe en cours \n");
111ann=0;
112}
113
114
115void trace_annexe(double * y)
116{
117switch(ann)
118 {
119 case 1 : trace_carte(y); break;
120 case 2 : trace_pointage(y); break;
121 case 3 : trace_foyer(y); break;
122 default : break;
123 }
124}
Note: See TracBrowser for help on using the repository browser.