Révision 504
Ajouté par vidaval il y a plus de 6 ans
branch/daval/Emb_App/crt0mr.a30 | ||
---|---|---|
; after reset,this program will start
|
||
;-----------------------------------------------------------------
|
||
__SYS_INITIAL:
|
||
LDC #__Sys_Sp, SP ; set inital ISP
|
||
LDC #__Sys_Sp, SP ; set inital ISP
|
||
|
||
MOV.B #2,0AH
|
||
MOV.B #00,PMOD ; Set Processor Mode Register
|
branch/daval/Emb_App/programme_principal_etud.c | ||
---|---|---|
int temps_course;
|
||
char car_tps[6];
|
||
|
||
// Potentiometres
|
||
|
||
int var2_vitesse;
|
||
int var1_azimut;
|
||
|
||
|
||
void mode2course(){ //Recuperation de l'info sur la couleur du feu et de la piste sur laquelle on est
|
||
CanFrame requete;
|
||
UINT flag;
|
||
... | ... | |
{
|
||
vitesse.data.val=0;
|
||
snd_dtq (CanTx,vitesse.msg);
|
||
dly_tsk(20);
|
||
}
|
||
while(Bp_M==1)
|
||
{
|
||
vitesse.data.val=var2_vitesse/10;
|
||
snd_dtq (CanTx,vitesse.msg);
|
||
dly_tsk(20);
|
||
}
|
||
|
||
dly_tsk(20);
|
||
}
|
||
... | ... | |
lcd_str("p noir");
|
||
break;
|
||
}
|
||
requete_temps.data.id='H';
|
||
requete_temps.data.id='H'; // On va lire la valeur du temps de course
|
||
requete_temps.data.rtr=1;
|
||
snd_dtq (CanTx,requete_temps.msg); // Interrogation du peripherique sur le temps de course actuel.
|
||
snd_dtq (CanTx,requete_temps.msg);
|
||
temps_course=periph[ADDR('H')].val;
|
||
car_tps[0]=entier_car(temps_course/1000);
|
||
car_tps[1]=entier_car((temps_course%1000)/100);
|
||
... | ... | |
LED_J=1;
|
||
}
|
||
else LED_J=0;
|
||
var2_vitesse = ad00; // Potentiom?tre de droite
|
||
var1_azimut = ad01; // Potentiom?tre de gauche
|
||
|
||
}
|
||
|
Formats disponibles : Unified diff
Le bouton poussoir du milieu fonctionne on peut commander la vitesse avec le potentiomètre