| [637] | 1 | #include "diabolo.h" | 
|---|
|  | 2 | #include "bolo.h" | 
|---|
|  | 3 | #include "acqui.h" | 
|---|
|  | 4 | #include "regul.h" | 
|---|
|  | 5 | #include "auto.h" | 
|---|
|  | 6 | #include "config_transputer.h" | 
|---|
|  | 7 |  | 
|---|
|  | 8 |  | 
|---|
|  | 9 |  | 
|---|
|  | 10 |  | 
|---|
|  | 11 | void rafraichis_fenetres(void) | 
|---|
|  | 12 | { | 
|---|
|  | 13 | int i,j; | 
|---|
|  | 14 | //printf("rafraichis fenetres "); | 
|---|
|  | 15 | if(fenetre(fenetre_acquisition)) | 
|---|
|  | 16 | { | 
|---|
|  | 17 | double f1,f2,f3; | 
|---|
|  | 18 |  | 
|---|
|  | 19 | ecritD(fenetre_acquisition,e_periode,"%6.1f",(double)gg->reglage.horloge.periode/5.); | 
|---|
|  | 20 | ecritD(fenetre_acquisition,e_nb_mes,(int)gg->reglage.horloge.nb_mesures/2); | 
|---|
|  | 21 | ecritD(fenetre_acquisition,e_temp_mort,(int)gg->reglage.horloge.temp_mort); | 
|---|
| [643] | 22 | ecritD(fenetre_acquisition,e_telemesure,1+(0x0f & (int)gg->reglage.dilu.transmission)); | 
|---|
|  | 23 | ecritD(fenetre_acquisition,e_flash,1+((0x30 & (int)gg->reglage.dilu.transmission)>>4)); | 
|---|
| [649] | 24 | ecritD(fenetre_acquisition,e_vanne,(int)gg->reglage.dilu.vanne); | 
|---|
|  | 25 | ecritD(fenetre_acquisition,e_helium,(int)gg->reglage.dilu.helium); | 
|---|
| [637] | 26 |  | 
|---|
|  | 27 | // affichage de toutes les fréquences | 
|---|
|  | 28 | if(gg->reglage.horloge.periode) f1=5000/(double)gg->reglage.horloge.periode; else f1=1; | 
|---|
|  | 29 | f2=f1/bitmot;f3=f2*1000./(double)(gg->reglage.horloge.nb_mesures); | 
|---|
|  | 30 | ecritD(fenetre_acquisition,e_freq,"freq: %5.1f kHz  --  %5.2f kHz,    modulation: %5.1f Hz",f1,f2,f3); | 
|---|
|  | 31 |  | 
|---|
|  | 32 | gg->periode_echantillonage=(double)gg->reglage.horloge.periode*((double)bitmot)*(double)(gg->reglage.horloge.nb_mesures)/10000000.;                                     //  2 fois la frequence de modulation | 
|---|
|  | 33 | //      printf(" periode d'échantillonage= %g \n",gg->periode_echantillonage); | 
|---|
|  | 34 | } | 
|---|
|  | 35 |  | 
|---|
|  | 36 | for(j=0;j<nb_max_bolo;j++) | 
|---|
|  | 37 | if(fenetre(j+1))        // seuls les bolos avec fenetre ouverte | 
|---|
|  | 38 | { | 
|---|
|  | 39 | int V,I,g,v; | 
|---|
|  | 40 | //              printf("b%d  ",j+1); | 
|---|
|  | 41 | V=dac_V(gg->reglage.bolo[j]); | 
|---|
|  | 42 | I=dac_I(gg->reglage.bolo[j]); | 
|---|
|  | 43 | ecritD(j+1,b_carre,V); | 
|---|
|  | 44 | ecritD(j+1,b_tri,I); | 
|---|
|  | 45 | ecritD(j+1,b_lin,dac_L(gg->reglage.bolo[j])); | 
|---|
|  | 46 | ecritD(j+1,b_trans,dac_T(gg->reglage.bolo[j])); | 
|---|
|  | 47 | g=gainbrut(gg->reglage.bolo[j]);if(g>15)        g=g&3; | 
|---|
|  | 48 | ecritD(j+1,b_gain,g); | 
|---|
|  | 49 | ecritD(j+1,b_phase,phase(gg->reglage.bolo[j])); | 
|---|
|  | 50 | ecritD(j+1,b_comm,comm(gg->reglage.bolo[j])); | 
|---|
|  | 51 | v=voie(gg->reglage.bolo[j]); | 
|---|
|  | 52 | if(v)   {ecritD(j+1,b_auto,1);ecritD(j+1,b_voie,v);} | 
|---|
|  | 53 | else    ecritD(j+1,b_auto,0); | 
|---|
|  | 54 | mesures_bolo(j+1,V,I,0); | 
|---|
|  | 55 | } | 
|---|
|  | 56 | //printf("\n"); | 
|---|
|  | 57 |  | 
|---|
| [643] | 58 | /*if(fenetre(fenetre_vitesse_block)) | 
|---|
| [637] | 59 | for(i=0;i<14;i++) | 
|---|
|  | 60 | ecritD(fenetre_vitesse_block,ct_cadence+i,"%d",gg->reglage.vitesse[i]); | 
|---|
| [643] | 61 | */ | 
|---|
| [637] | 62 |  | 
|---|
|  | 63 | if(fenetre(fenetre_regulation)) | 
|---|
|  | 64 | for(i=0;i<nombre_de_regul;i++) | 
|---|
|  | 65 | { | 
|---|
|  | 66 | ecritD(fenetre_regulation,regu_mode+i,gg->reglage.regul[i].mode+1); | 
|---|
|  | 67 | ecritD(fenetre_regulation,regu_bolo+i,gg->reglage.regul[i].num_bolo+1); | 
|---|
|  | 68 | ecritD(fenetre_regulation,regu_voie_chauf+i,gg->reglage.regul[i].voie_chauf+1); | 
|---|
|  | 69 | ecritD(fenetre_regulation,regu_prop+i,gg->reglage.regul[i].prop); | 
|---|
|  | 70 | ecritD(fenetre_regulation,regu_int+i,gg->reglage.regul[i].integ+1); | 
|---|
|  | 71 | ecritD(fenetre_regulation,regu_deriv+i,gg->reglage.regul[i].deriv+1); | 
|---|
| [649] | 72 | if(gg->reglage.regul[i].chauffage>0)    ecritD(fenetre_regulation,regu_chauffage+i,gg->reglage.regul[i].chauffage); | 
|---|
|  | 73 | else                            ecritD(fenetre_regulation,regu_chauffage+i,-gg->reglage.regul[i].chauffage); | 
|---|
| [637] | 74 | } | 
|---|
|  | 75 |  | 
|---|
|  | 76 | if(fenetre(fenetre_automatismes)) | 
|---|
|  | 77 | for(i=0;i<nombre_de_voies;i++) | 
|---|
|  | 78 | { | 
|---|
|  | 79 | ecritD(fenetre_automatismes,atm_auto+i,gg->reglage.autom[i].mode+1); | 
|---|
|  | 80 | ecritD(fenetre_automatismes,atm_gain+i,gg->reglage.autom[i].gain+1-20); | 
|---|
|  | 81 | ecritD(fenetre_automatismes,atm_courant+i,gg->reglage.autom[i].courant+1); | 
|---|
|  | 82 | ecritD(fenetre_automatismes,atm_delai+i,gg->reglage.autom[i].delai); | 
|---|
|  | 83 | } | 
|---|
|  | 84 | } | 
|---|
|  | 85 |  | 
|---|
|  | 86 |  | 
|---|
|  | 87 |  | 
|---|
|  | 88 |  | 
|---|
|  | 89 |  | 
|---|
|  | 90 |  | 
|---|
|  | 91 |  | 
|---|
|  | 92 |  | 
|---|
|  | 93 |  | 
|---|