source: Sophya/trunk/Poubelle/archediab.old/archediab.sources/c/stabilite.c@ 649

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

archediab 28 vol

File size: 978 bytes
Line 
1#include "manip.h"
2#include "stabilite.h"
3
4
5
6//nouveauD(0,stabilite_id,"stabilite",exec_stabilite);
7
8
9//-------------------- fonction exec de la fenetre : stabilite -------------------------------
10
11
12void exec_stabilite(int fen,int item,double valeur,...)
13{
14if(item>1000) item-=1000; // pour appeler le case pour tous les cara d'un edit texte
15
16switch(item)
17 {
18 case ouverture :
19 selectgra(fen);
20 graph->ymin=-0.04;
21 graph->ymax=0.04;
22 graph->ypas=0.01;
23 graph->xmin=0.;
24 graph->xmax=360.;
25 graph->xpas=90.;
26 graph->grille=0;
27 graph->graduations=1;
28 graph->taille_graduations=10;
29 graph->sans_image=0;
30 graph->avec_icones=0;
31 strcpy(graph->xtitre, "phases");
32 strcpy(graph->ytitre, "Timedrift");
33 retrace(fen);
34
35 break;
36 case fermeture :
37 break;
38 case PHS_stabil :
39 break;
40 default : break;
41 }
42}
Note: See TracBrowser for help on using the repository browser.