// HC-SR505PirRSensorTest.INO

/* Pinball News
 * https://www.pinballnews.com/site/
 * 09-OCT-22
 * This sketch is intended for public use. 
*/

int alarmLED = 1; // Output pin # for the LED
int pirPin = 2; // Input pin # on Arduino from PIR sensor (active HIGH)
int pirState = LOW; // Assuming no motion detected
int val = 0; // Variable for reading pin status
int flashCount = 3; // Variable for number of alarmLED flashes  
int flash = 33; // variable time for flashing the LED

void setup(){ 
pinMode(alarmLED, OUTPUT); // declare LED as output
pinMode(pirPin, INPUT); // declare sensor as input

for (int k = 0; k < (flashCount + flashCount); k++) {// Flash quick setup verification sequence 
  if (k % 2 == 0) {
    digitalWrite(alarmLED, HIGH);
    }
  else {
    digitalWrite(alarmLED, LOW);
    }
  delay(flash);
  }
}
 
void loop(){
  val = digitalRead (pirPin); // Read input value (active HIGH)
    if (val == HIGH) // Check if input is HIGH
      digitalWrite(alarmLED, HIGH); // Turn LED ON   
    else {digitalWrite(alarmLED, LOW);} // Turn LED OFF
}