| [643] | 1 | SUPPRIME DU PROGRAMME | 
|---|
|  | 2 |  | 
|---|
| [637] | 3 | #include "diabolo.h" | 
|---|
|  | 4 | #include "config_transputer.h" | 
|---|
|  | 5 |  | 
|---|
|  | 6 |  | 
|---|
|  | 7 |  | 
|---|
|  | 8 | //--------------------  fonction  exec  de  la  fenetre : config_transputer  ------------------------------- | 
|---|
|  | 9 |  | 
|---|
|  | 10 |  | 
|---|
|  | 11 | void exec_config_transputer(int fen,int item,double valeur,...) | 
|---|
|  | 12 | { | 
|---|
|  | 13 | int i; | 
|---|
|  | 14 | if(item>1000) item-=1000; | 
|---|
|  | 15 | if( (item!=ouverture) && (item<0) )return; | 
|---|
|  | 16 | if(gg->flag_tc_reduite) | 
|---|
|  | 17 | //      for(i=0;i<nb_type_blocks;i++) | 
|---|
|  | 18 | for(i=0;i<14;i++) | 
|---|
|  | 19 | { | 
|---|
|  | 20 | int a; | 
|---|
|  | 21 | a=litD(fen,ct_cadence+i,0); | 
|---|
|  | 22 | if((gg->reglage.vitesse[i]!=a) | 
|---|
|  | 23 | ou (clavier(touche_alt) && (item==ct_cadence+i) ) ) | 
|---|
|  | 24 | emission_tc_reduite(tc2_horloge,tc3_vitesse+i,a); | 
|---|
|  | 25 | //      gg->reglage.vitesse[i]=a; | 
|---|
|  | 26 | } | 
|---|
|  | 27 |  | 
|---|
|  | 28 | else    { | 
|---|
|  | 29 | char mot_tc[10]; | 
|---|
|  | 30 | if(item>0) | 
|---|
|  | 31 | { | 
|---|
|  | 32 | mot_tc[0]=tc_cadence1; | 
|---|
|  | 33 | for(i=0;i<7;i++)        mot_tc[i+1]=litD(fen,ct_cadence+i,0); | 
|---|
|  | 34 | emission_telecommande(tc_dir_transputer,mot_tc); | 
|---|
|  | 35 | mot_tc[0]=tc_cadence2; | 
|---|
|  | 36 | for(i=0;i<7;i++)        mot_tc[i+1]=litD(fen,ct_cadence+7+i,0); | 
|---|
|  | 37 | emission_telecommande(tc_dir_transputer,mot_tc); | 
|---|
|  | 38 | mot_tc[0]=tc_cadence3; | 
|---|
|  | 39 | for(i=0;i<2;i++)        mot_tc[i+1]=litD(fen,ct_cadence+14+i,0); | 
|---|
|  | 40 | emission_telecommande(tc_dir_transputer,mot_tc); | 
|---|
|  | 41 | /* | 
|---|
|  | 42 | mot_tc[0]=tc_switch_dil; | 
|---|
|  | 43 | for(i=0;i<7;i++)        mot_tc[i+1]=litD(fen,ct_dil+i,0); | 
|---|
|  | 44 | emission_telecommande(tc_dir_transputer,mot_tc); | 
|---|
|  | 45 | */ | 
|---|
|  | 46 | } | 
|---|
|  | 47 | for(i=0;i<16;i++) | 
|---|
|  | 48 | gg->reglage.vitesse[i]=litD(fen,ct_cadence+i,0); | 
|---|
|  | 49 |  | 
|---|
|  | 50 | } | 
|---|
|  | 51 |  | 
|---|
|  | 52 |  | 
|---|
|  | 53 | } | 
|---|
|  | 54 |  | 
|---|
|  | 55 |  | 
|---|