Révision 50
Ajouté par tibacher il y a plus de 6 ans
branch/bacher/Emb_App/SessionM32C_E8a_system.ini | ||
---|---|---|
[Target]
|
||
M32C E8a SYSTEM=Renesas Communications
|
||
[USER_DATA]
|
||
RESET=ff0016
|
||
RESET=ff001e
|
branch/bacher/Emb_App/programme_principal_etud.c | ||
---|---|---|
// disponible. 0xab avec a-> nombre de couleurs bien plac?es et b -> couleurs pr?sentes mais mal plac?es.
|
||
//'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 cons=450; //contient la consigne
|
||
int retour=0; //contient la valeur retourner par le p?riph
|
||
int k=1; //contient le gain du correcteur
|
||
int valeur=0; //contient la valeur ? envoyer
|
||
|
||
void main()
|
||
{
|
||
CanFrame comm;
|
||
CanFrame demande;
|
||
CanFrame reponse;
|
||
|
||
void main()
|
||
{
|
||
ports_mcu();
|
||
lcd_init();
|
||
periph_init();
|
||
... | ... | |
can_init();
|
||
clavier_init(1);
|
||
capture_init();
|
||
|
||
|
||
sta_cyc(ID_acqui);
|
||
// sta_tsk(ID_periph_rx);
|
||
|
||
while(1)
|
||
{
|
||
LED_J=1;
|
||
dly_tsk(100);
|
||
LED_J=0;
|
||
dly_tsk(100);
|
||
}
|
||
//LED_J=1;
|
||
//dly_tsk(100);
|
||
//LED_J=0;
|
||
//dly_tsk(100);
|
||
demande.data.id='R';
|
||
demande.data.rtr=1;
|
||
|
||
snd_dtq (CanTx,demande.msg); // Interrogation du peripherique
|
||
rcv_dtq (CanRx,&reponse.msg); // Attente de la reponse
|
||
retour=reponse.data.val; // contient la valeur de retour du simulateur.
|
||
|
||
comm.data.id='T';
|
||
comm.data.rtr=0;
|
||
comm.data.val=valeur;
|
||
snd_dtq (CanTx,comm.msg); //on envoie la modification ? effectuer
|
||
|
||
if(retour!=cons) valeur=k*(cons-retour);
|
||
|
||
|
||
|
||
}
|
||
}
|
||
|
||
void acqui()
|
Formats disponibles : Unified diff
régulation dans le main OK