Page 15 - Drehscheibe
P. 15
{
digitalWrite(Step, HIGH);
var180 = 0 ;
istposition = 180;
}
//0 Grad
if (digitalRead(Pos0) ==LOW && var0 < 1)
{
digitalWrite(Step, LOW);
var0 =1;
istposition = 0;
}
if (analogRead(analogPin_0)< 600 && var0 == 1)
{
delay (18500); //Laufzeit vom Auslösen des Sensors bis um
180Grad
//weitergedreht wurde.
digitalWrite(Step, HIGH);
var0 = 0 ;
istposition = 0;
}
//2. Sensor
//195 Grad
if (digitalRead(Pos3) ==LOW && var195 < 1)
{
digitalWrite(Step, LOW);
var195 =1;
istposition = 195;
}
if (analogRead(analogPin_1)< 600 && var195 == 1) //der
vergleichswert (600 z.B.) ist der Auslösewert von 0 bis 1200
Empfindlichkeit des Sensors)
{
digitalWrite(Step, HIGH);
var195 = 0 ;
istposition = 195;
}
//15 Grad
if (digitalRead(Pos2) ==LOW && var15 < 1)
{
digitalWrite(Step, LOW);
var15 =1;
istposition = 15;
}
if (analogRead(analogPin_1)< 600 && var15 == 1)
{
delay (18500); //Laufzeit vom
Auslösen des Sensors bis um 180 Grad weitergedreht wurde.
digitalWrite(Step, HIGH);
var15 = 0 ;