Révision 105
Ajouté par aueuphrasi il y a plus de 6 ans
| branch/euphrasie_auguste/Emb_App/SessionM32C_E8a_system.ini | ||
|---|---|---|
|
[Target]
|
||
|
M32C E8a SYSTEM=Renesas Communications
|
||
|
[USER_DATA]
|
||
|
RESET=ff0016
|
||
|
RESET=ff001a
|
||
| branch/euphrasie_auguste/Emb_App/programme_principal_etud.c | ||
|---|---|---|
|
//'I'/73/Ox49 : D?finition du nom du v?hicule. Doit d?buter par le caract?re '#' et entraine le chargement de la configuration de piste
|
||
|
// correspondant au nom du v?hicule si le nom se termine par '*'
|
||
|
|
||
|
|
||
|
int consigne = 450;
|
||
|
int k = 2;
|
||
|
int commande;
|
||
|
int ang_T;
|
||
|
|
||
|
CanFrame comm;
|
||
|
|
||
|
CanFrame requete, response;
|
||
|
|
||
|
|
||
|
void main()
|
||
|
{
|
||
|
|
||
|
static int ang_T;
|
||
|
|
||
|
|
||
|
ports_mcu();
|
||
|
lcd_init();
|
||
| ... | ... | |
|
sta_cyc(ID_acqui);
|
||
|
// sta_tsk(ID_periph_rx);
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
while(1)
|
||
| ... | ... | |
|
LED_J=1;
|
||
|
dly_tsk(100);
|
||
|
LED_J=0;
|
||
|
dly_tsk(100);
|
||
|
|
||
|
|
||
|
|
||
|
dly_tsk(1000);
|
||
|
periph_write ('T',100);
|
||
|
periph_write ('V',100);
|
||
|
|
||
|
dly_tsk(1000);
|
||
|
periph_write ('T',0);
|
||
|
periph_write ('V',-10);
|
||
|
|
||
|
periph_read ('T', &ang_T);
|
||
|
|
||
|
|
||
|
dly_tsk(100);
|
||
|
|
||
|
|
||
|
//periph_write ('V', 50);
|
||
|
|
||
|
|
||
|
requete.data.id = 'R';
|
||
|
requete.data.rtr = 1;
|
||
|
snd_dtq (CanTx,requete.msg);
|
||
|
rcv_dtq(CanRx, &response.msg);
|
||
|
ang_T = response.data.val;
|
||
|
commande = k * (consigne - ang_T);
|
||
|
periph_write ('T', commande);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void acqui()
|
||
|
{
|
||
|
LED_V=!LED_V;
|
||
|
LED_V=!LED_V;
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
|
||
|
}
|
||
|
|
||
Formats disponibles : Unified diff
Validation asservissement position tourelle