Descarga este documento en formato PDF - Ucontrol

14 de 22
#task (rate=50ms, max=10ms)
void R_Llenador2();
void main()
{
semaphore = 1; //Solo una tarea puede utilizar el recurso cada vez
iCantidad = 100; //Inicializamos esta variable para tener algunas botellas en
//la estera.
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
rtos_run();
}
void R_Despachador()
{
int Botellas;
rtos_wait(semaphore); //Reclamamos el recurso y aquí comienza la secc crítica
Botellas = iCantidad; //Leemos la cantidad de botellas a una variable temporal
if(input(PIN_B0)==1)
{
Botellas++; //Ya sabemos que este código no es eficiente pero
iCantidad = Botellas; //sí es didáctico y por eso lo he utilizado así.
}
rtos_signal(semaphore); //Liberamos el semáforo y aquí se acaba la sec crítica
rtos_yield(); // A dormir por otros 100ms para evitar poner dos veces la misma botella
}
void R_Llenador1()
{
rtos_wait(semaphore);
if(input(PIN_B1)==1)
iCantidad -= 12; //Este sí es un código lógico, pero entonces el despachador
//no nos daría problemas aunque nos vayamos a dormir dentro de
//la sección crítica.
rtos_signal(semaphore);
rtos_yield();
}
void R_Llenador2()
{
rtos_wait(semaphore);
if(input(PIN_B2)==1)
iCantidad -= 12;
rtos_signal(semaphore);
rtos_yield();
}
Este programa lo simulé en Proteus poniendo en RB0 una fuente digital de tipo pattern con los siguientes
parámetros:
First Edge at (Secs)=1
Desmarcar el check mark: Equal Mark/Space Timing?
‘Mark’ Time (Secs) = 100m
‘Sapce’ Time(Secs) = 150m
Marcar el check mark: Continuos Secuence of Pulses
Marcar el check mark: Standard Hig-Low Pulse Train
Para RB1 y RB2 se utiliza una fuente del mismo tipo con los siguientes parárametros cambiados
Para RB1:
First Edge at (Secs)=5
‘Mark’ Time (Secs) = 100m
‘Sapce’ Time(Secs) = 5.9
Para RB2:
First Edge at (Secs)=7
‘Mark’ Time (Secs) = 100m