
|
INFO - FAQ - CC2-Forum - CCPro-Forum |
|
||
|
Hallo zusammen, eine kurze Frage zur Programmausführung auf den Open Micro. Ich habe ein Programm geschrieben das zwei analoge Werte (AD 2 und AD6) mit einander vergleicht und in Abhängigkeit der Werte zwei Ausgänge (Port4 und Port5) steuert. Also ein Wert wird vorgegeben und Port4 und Port5 steuern den Motor (Stellmotor) so das der zweite Wert AD 6 gleich ist. Ist es richtig das ich den "print" Befehl auskommentieren muß wenn die Schaltung ohne Programmieradapter läuft ??? Bei mir startet die Micro nicht wenn der print Befehl im Programm vorkommt. Erst wenn ich den Prog.-Adapter anstecke läuft sie los. Selbst der Baud R9600 Befehl ist dann schon aus kommentiert. Der Compiler meckert nichts an !!!!!!!!! Hier Programmbeispiel. include "om.def" ' Definitionen fuer Betriebssystem pullupa = 0'&b00111101 ' Schaltet die internen Pull-Up-Widerstände ab RunOnErr=ON 'pin define TankIn AD[2] 'Geber define STME AD[6] 'Stellungsrückmelder define MOVoll port[5] 'Richtung Voll define MOLeer port[4] 'Richtung leer 'variable define Tanksoll byte define voltage byte define voltageC byte 'constant define VOLLAB 246 define LEERAB 14 define TankNull 73 '---------------------------------------- init Programm -------------------------------------------- 'BAUD R9600 MOVoll = off MOLeer = off '---------------------------------------- Hauptprogramm -------------------------------------------- #loop If STME => VOLLAB then MOVoll = off 'Endanschlagabschaltung If STME =< LEERAB then MOleer = off 'Endanschlagabschaltung Voltage = TankIn - TankNull looktab Tankkennlinie0, Voltage, VoltageC Tanksoll = VoltageC If TankIn > 250 then Tanksoll = 242 print "TankSoll " Tanksoll, "Stellungsmelder " STME ''''''''''''''''''''''''''''''' die Stelle meine ich !!!!!!!!!!!!!! If Tanksoll < STME then goto MOAb else goto MOAuf goto loop ' '---------------------------------------- Unterprogramme ------------------------------------------- #MoAuf If STME => VOLLAB then goto loop MOleer = off If Tanksoll > (STME + 1) then MOVoll = on else MOVoll = off 'pause 10 'MOVoll = off pause 20 goto loop #MoAb If STME =< LEERAB then goto loop MOVoll = off If Tanksoll < (STME - 1) then MOleer = on else MOleer = off pause 10 MOleer = off pause 20 goto loop 'Hier kommen jetzt nur noch Tabellenwerte ........................ ' |
| Antwort schreiben |