Page 61 - PAPRobotica1

Elaboradas por: Norma Angélica González Sandoval y Sergio López Luna

PARTE 5:
Lean el siguiente programa por equipo y expliquen cada bloque marcado en las distintas escalas de
grises:

const tSensors SE2 = (tSensors) S2;
task main()
{
long vol;
while(1)
{
while (SensorValue(SE2)<=930)
{
if (SensorValue[SE2]<=900)
{
vol=1;
}
if (SensorValue[SE2]<=870)
{
vol=2;
}
if (SensorValue[SE2]<=840)
{
vol=3;
}
if (SensorValue[SE2]<=810)
{
vol=4;
}
if (SensorValue[SE2]<=750)
{
vol=5;
}
switch (vol)
{
case 1:
nxtDisplayTextLine (2,"Volumen = 1");
wait10Msec(10);
PlayTone(200,10);
break;
case 2:
nxtDisplayTextLine (2,"Volumen = 2");
wait10Msec(10);
PlayTone(400,10);
break;
case 3:
nxtDisplayTextLine (2,"Volumen = 3");
wait10Msec(10);
PlayTone(600,10);
break;
case 4:
nxtDisplayTextLine (2,"Volumen = 4");
wait10Msec(10);
PlayTone(800,10);
break;
case 5:
nxtDisplayTextLine (2,"Volumen = 5");
wait10Msec(10);
PlayTone(1000,10);
break;
}
}
}
}

Proyecto PE100215 Primera Parte
“La robótica como estrategia para el desarrollo del pensamiento innovador en los alumnos de la ENP”