ok danke!
mit integer geht es!
Was ich machen möchte?
Mit der X und Y achse eines gameport joysticks 2 Schrittmotoren steuen,
das ganze soll ein kameraschwenkkopf werden
im prinzip muss ich jetzt ja nur noch die stellung der poties auslesen,
dann den wert mit ner formel auf einen wert zwischen 1 und 10 bringen und diesen dann in der waitms funktion verwenden
Aber das auslesen schnall ich noch nicht ganz...
das geht jetzt zwar schon, aber irgenwie steht da 2 mal das gleiche... warum ??? ist nur die x achse nicht die y achse ?Code:$crystal = 6000000 ' Config Portb = Output ' Config Lcdpin = Pin , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 , E = Portb.1 , Rs = Portb.0 Config Lcd = 16 * 2 Config Adc = Single , Prescaler = Auto Dim Wert1 As Integer Dim Wert2 As Integer '1023 ganz Vorne '520 '363 Do Cls Start Adc Wert1 = Getadc(0 , 1) Start Adc Wert2 = Getadc(1 , 1) Lcd Wert2 Lowerline Lcd Wert2 Waitms 10 Loop
programmier fehler ? oder karten fehler ?







Zitieren

Lesezeichen