Page 17 - Drehscheibe
P. 17

digitalWrite(Step, HIGH);
                   var210 = 0 ;
                   istposition = 210;
                 }

                 //30 Grad

               if (digitalRead(Pos5) ==LOW && var30 < 1)
                 {

                   digitalWrite(Step, LOW);
                   var30 =1;
                  istposition = 30;
                 }
               if (analogRead(analogPin_2)< 600 && var30 == 1)
                 {
                   delay (18500);                                  //Laufzeit vom
               Auslösen des Sensors bis um 180 Grad weitergedreht wurde.
                   digitalWrite(Step, HIGH);
                   var30 = 0 ;
                   istposition = 30;
                 }


                   //5. Sensor

                 //225 Grad

               if (digitalRead(Pos6) ==LOW && var225 < 1)
                 {


                   digitalWrite(Step, LOW);
                   var225 =1;
                   istposition = 225;
                 }
               if (analogRead(analogPin_3)< 600 && var225 == 1)       //der
               Vergleichswert (600 z.B.) ist der Auslösewert von 0 bis 1200 -
               Empfindlichkeit des Sensors)
                 {
                   digitalWrite(Step, HIGH);
                   var225 = 0 ;
                   istposition = 225;
                 }

                 //45 Grad

               if (digitalRead(Pos7) ==LOW && var45 < 1)
                 {

                   digitalWrite(Step, LOW);
                   var45 =1;
                  istposition = 45;
                 }
               if (analogRead(analogPin_3)< 600 && var45 == 1)
                 {
                   delay (18500);                                  //Laufzeit vom
               Auslösen des Sensors bis um 180 Grad weitergedreht wurde.
                   digitalWrite(Step, HIGH);
                   var45 = 0 ;
   12   13   14   15   16   17   18