Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C Quellcode formatieren: <code>Quellcode</code> BASIC Quellcode formatieren: <basic>Quellcode</basic> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! -> I > ich fühl mich grad ein klein wenig blöd... ich find meinen denkfehler nicht. vom kratzen hab ich inzwischen > eine glatze. > > ich habe einen modelcraft rs-2 servo angeschlossen an meinem c-control pro 128 app. board > (rot an +5v, braun an masse, orange an port c.0) > > ich wollte jetzt einfach mal den servo von links nach rechts fahren lassen und zurück in einer endlosschleife. > das ganze funktioniert nicht, der servo zuckt nur gelegentlich hin und her, tut aber nicht, was er soll. > nur finde ich leider den denkfehler nicht und kann meinen scheinbar fehlerhaften code nicht korrigieren. > kann mir einer sagen, wo hier der fehler liegt? > > Dim zaehler As Integer > > Sub main() > Port_DataDirBit(16,PORT_OUT) > > Do While (True) > links() > rechts() > End While > > End Sub > > Sub links() > zaehler = 0 > Do While (zaehler < 51) > zaehler = zaehler + 1 > Port_WriteBit(16,PORT_ON) > AbsDelay(1) > Port_WriteBit(16,PORT_OFF) > AbsDelay(19) > End While > End Sub > > Sub rechts() > zaehler = 0 > Do While (zaehler < 51) > zaehler = zaehler + 1 > Port_WriteBit(16,PORT_ON) > AbsDelay(2) > Port_WriteBit(16,PORT_OFF) > AbsDelay(18) > End While > End Sub > > ps: der motor funktioniert, mit einem heruntergeladenen demo-programm funktioniert er zwar zittrig, > aber ansonsten tadellos.
