Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- begin global
- apin input sensorPin <- a0;
- dpin output ledPin <- 9;
- var sensorValue <- 0;
- var sensorMin <- 1023;
- var sensorMax <- 0;
- end global
- begin setup
- while millis() < 5000
- sensorValue.analogRead(sensorPin);
- // Record maximum sensor value
- if sensorValue > sensorMax then
- sensorMax <- sensorValue;
- end if
- // Record minimum sensor value
- if sensorValue < sensorMin
- sensorMin <- sensorValue;
- end if
- end loop
- end setup
- begin main
- // Read the sensor:
- sensorValue <- sensorPin.analogRead();
- // Apply calibration:
- sensorValue.map(sensorMin, sensorMax, 0, 255);
- // Constrain values:
- sensorValue.constrain(0, 255);
- // Fade the LED using sensorValue:
- ledPin.analogWrite(sensorValue);
- end main
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement