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 > > > Bei der C-Comtrol M-Unit2.0 gibt es die Variable "Timer" welche den 10ms Takt aufsummiert. > > > Ist bestens geeignet Warteschleifen ohne "Wait" zu machen. Gibt es bei Pro auch so eine > > > Systemvariable, oder wie kann man diese mit einem weiteren Timer /Counter (16Bit) programmieren? > > > > > > Hi, > > > > schau mal in der Hilfe unter "IRQ Beispiel". Da ist ein kleines Beispielprog. für den 10ms Takt. > > Damit kannst du dir zu mindest die dir bekannte Möglichkeit selber schaffen. > > > > Gruß Jörg > > Habe selbst schon eine super Lösung gefunden: > > 'Dim Laufvar As ULong > 'Dim Timerkick As Word > Sub Laufzeitvariable () > 'Laufzeitvariable für Timer und Warteschleifen ohne "Wait" > Timerkick = Timer_TickCount( ) > Laufvar = Laufvar + Timerkick > End Sub > > Ein Überlauf der 10ms ...ULong Variable erfolgt nach 1,34Jahren man könnte zB nach > einem Jahr einen bewußten Reset ausführen. > > 'Auffrischung der LCD Anzeige nach etwa 200ms > 'Dim Laufvar As ULong > 'Dim AuffrischenZiel As ULong ' Berechnetes Laufzeitziel > > If Laufvar > AuffrischZiel Then > Auffrischen = 1 > AuffrischZiel = Laufvar + 20 'für 200ms nächstes Ziel > End If > > durch die > Abfrage ist auch sichergestellt wenn das Ziel überschritten wurde, das die Auffrischung > erfolgt. > > > genau genommen müßte man >= nehmen, aber die 10ms sind für längere Verzgerungen egal > kostet aber sicher zusätzliche us an Laufzeit > > > Ernst >