INFO - FAQ - CC2-Forum - CCPro-Forum |
> Hallo Andreas, > > ich vermute, da stimmt etwas nicht mit der Konfiguration der Benutzerbefehle in ConTEXT. Bitte anhand der unten verlinkten Anleitung prüfen. > > Bitte halte uns auf dem Laufenden, ob es jetzt klappt. > > Freundliche Grüße > > Dietmar Hallo Dietmar, Nun ja, sehr ausführliche Anleitung. :-) Aber genau so habe ich das ja sowieso gemacht. Dennoch, man kann ja nie dumm genug denken. Zusätzlich habe ich das ganze exakt nach dieser Anleitung auf einem weiteren Computer installiert. Gleiches Ergebnis. Ich kann mit der Meldung Datei 'D:\ELEKTRONIK PROJEKTE\STURMKLINGEL\STURMKLINGEL.' nicht gefunden. nicht so viel anfangen. Warum wird eine Datei ohne Extension nicht gefunden? Logischerweise sollte es ja auch gar keine geben. Erwartet wird doch eine *.dat Datei Und so weit ich die Konsolenausgabe sehe, wird auch kein Fehler im Programm gemeldet. Davon abgesehen, dass man die paar Zeilen kaum als Programm ansehen könnte. Rein vom Vorgang her würde ich sagen, dass das compilieren richtig abläuft, dann aber die Datei ja gespeichert werden muss. Und genau hier scheint es zu haken. Und beim verify (wird ja vermutlich drin sein) wirft es dann den Fehler. Grüße Andreas Anbei der Code zum anschauen und lächeln. '*************************************************************************************** '* * '* Sturmklingelsperre V1.0 by Ati mit einem Open-Micro * '* * '*************************************************************************************** ' --- Betriebssystem konfigurieren ----------------------------------------------------- include "om.def" ' Definitionen fuer Betriebssystem RunOnErr = on ' bei Fehler Programm neustarten (Fehler in ERR) PullUpA = 0 ' Pull-Up-Widerstände - aus '--------------------------------------------------------------------------------------- '--- Definitionen der QT4 Ports -------------------------------------------------------- define Taste port[2] 'Digital-Port / Eingang Klingeltaste define LED_rot port[5] 'Digital-Port5 / Ausgang für LED Treiber define LED_grün port[6] 'Digital-Port1 / Ausgang für LED Treiber define LED_Tür port[4] 'Digital-Port1 / Ausgang für LED Treiber define Relais port[1] 'Digital-Port / Ausgang Klingelrelais '--------------------------------------------------------------------------------------- ' Die Pinbelegung der ' Open-Micro (QT4) _____ _____ ' | \__/ | ' 1 [ VDD GND ] 8 VDD = 4.6 bis 5.5 Volt ' | | ' LED grün 2 [ PTA5 PTA0 ] 7 Ausgang Klingelrelais ' | | ' LED rot 3 [ PTA4 PTA1 ] 6 Klingeltsate ' | | ' LED Tür 4 [ PTA3 PTA2 ] 5 host/run ' |______________| ' define x byte ' Datenvariable Relais define t byte ' Datenvariable LED Tür define r byte ' Datenvariable LED rot define g byte ' Datenvariable LED grün define s byte ' Variable Taste (Schalter) define Flanke1 Bit[81] ' Flankenbit Taste rauf '--- setzen der Variablen -------------------------------------------------------------- x = 0 r = 0 g = 0 t = 0 '--- Startprogramm --------------------------------------------------------------------- #init r=1 ' Rote Blink LED ein Pause60 r = 0 Pause30 r = 1 Pause60 r = 0 Pause30 r = 1 Pause60 r = 0 Pause30 r = 1 Pause60 t = 1 ' Tür Taster LED ein '--- Hauptprogramm --------------------------------------------------------------------- #start r = 0 g = 1 if s then goto setz1 ' Taste gedrückt? Ja, dann setze EIN-Flanke Flanke1 = 0 ' FlankenBit off setzen goto start ' Reset Ein-Flanke (bei Nichtbetätigung der Taste) #setz1 if Flanke1 then goto Klingel ' Ein-Flanke gesetzt? Ja, dann Ende Flanke1 = on ' Setze Ein-Flanke (Sperre für weiteres Setzen) goto start #Klingel Flanke1 = 0 x = 1 ' Klingelrelais ein r = 1 ' rote LED ein t = 0 ' Tür LED aus g = 0 ' grüne LED aus pause 12 ' Pause 140 Millisekunden x = 0 ' Klingelrelais aus pause 120 ' Pause 2,4 Sekunden r = 0 ' rote LED aus g = 1 ' grüne LED ein t = 1 ' Tür LED ein goto start end ' Erklärung ' im Ruhezustand läuft der Programmteil ab #start immer wieder durch. ' Erst wenn die Klingeltaste gedrückt wird, also Variable s auf eins gesetzt wird, wird zu #setz1 gesprungen ' Hier wird abgefragt, ob die Flanke bereits gesetzt ist. Wenn nicht, dann wird sie gesetzt. Das Programm springt wieder auf Anfang. ' Da die Durchlaufzeuit gering ist, ist die Dauer eines Tatsendrucks länger als ein Umlauf. Jetzt wird also erneut abgefragt, ' ob die Flanke gesetzt ist. Diesmal ist die Flanke gesetzt und es folgt ein Sprung zu #Klingel. ' Im Unterprogramm wird das Klingelrelais angesteuert (Ding), die grüne LED geht aus, die rote Blink-LED geht an, die Tür-LED wird ausgeschaltet. ' nach 140 ms wird das Klingelrelais abgeschaltet (Dong). es folgt eine Pause von rund 2,5 Sekunden. Dann wird die rote Blink-LED abgeschaltet, ' die grüne LED und die Türklingel-LED wieder eingeschaltet. Dann erfolgt der Sprung zum Programmstart. Passender Link: Birkenwerder |
Antwort schreiben |