  INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
Hallo > Zum Problem: > Umgesetzt habe ich es wie im unten angeführten Code. Das Problem ist nur, dass sich die OM nach ca. 5 Durchläufen aufhängt, bzw. nicht mehr reagiert. Danach hilft nur noch ein Neustart. > Vielleicht hat jemand eine Idee wie man das besser umsetzen kann bzw. wo der Fehler liegen könnte? "#Aktiv" wird mit GOSUB als Unterprogramm aufgerufen. Dort taucht aber kein RETURN auf. Dies dürfte der Grund für den Absturz sein. Gruß Hauk > > ' --- Definiere Ports OpenMicro --------------------------------------------- > > define portEin PORT[4] > define portAus PORT[5] > define portTaster PORT[6] > > ' --- Definiere Variablen --------------------------------------------------- > > > > > ' --- Voreinstellung der Hard- & Software ----------------------------------- > portEin = on ' Das Port zum Einkuppeln schließen > portAus = on ' Das Port zum Auskuppeln schließen > > > > ' --- Hauptschleife --------------------------------------------------------- > #Schleife > if portTaster = OFF then gosub Aktiv ' Status der Taste abfragen > goto Schleife > > > > ' --- Wenn Taste gedrückt ist dann... --------------------------------------- > #Aktiv > portEin = off > Pause 100 ' Dauer die Port 4 aktiv ist > portEin = on > > > #Aktiv1 > If portTaster = OFF then goto Aktiv1 > > portAus = off > Pause 700 ' Dauer die Port 5 aktiv ist > portAus = on > > goto Schleife ' Zurück zur Hauptschleife > > > > ' --------------------------------------------------------------------------- > end ' Programmende > ' --------------------------------------------------------------------------- > > |
| Antwort schreiben |
OM stürzt nicht ab (von Dietmar - 31.08.2007 20:13)