Registriert seit: 17. Okt 2006
11 Beiträge
Delphi 6 Enterprise
|
AW: daten von serieller Schnittstelle
11. Jul 2014, 19:58
Delphi-Quellcode:
const int analogInPin = A0;
int sensorValue = 0;
int winkel =0;
#include <LiquidCrystal.h>
LiquidCrystal lcd(12, 11, 6,5, 4, 3);
void setup() {
lcd.begin(16, 2);
Serial.begin(9600);
}
void loop() {
sensorValue = analogRead(analogInPin);
winkel = sensorValue /2.841;
delay (500)
Serial.println(winkel);
lcd.clear();
lcd.setCursor(0, 0);
lcd.print("Winkel = ");
lcd.print(winkel);
}
das ist das Arduino-Programm
|
|
Zitat
|