Das Open-Control-Projekt - Die Alternative zur C-Control-I


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Schleifenzähler, merkwürdiges Verhalten Kategorie: Open-Micro/Open-Mini/Open-Midi/Open-Macro/Open-Maxi (von ChristianK - 10.04.2006 11:38)
ChristianK nutzt:  Micro, Open-Micro, Open-Mini
Hallo zusammen,

ich habe mit der Open Mini eine Überwachungsschaltung realisiert,
die einen Stellantrieb steuert.
Vorher hatte ich diese Schaltung mir der Open Micro realisiert, das funktionierte
soweit ganz gut. Da witere Ports benötigt wurden, habe ich das Programm an die
Open Mini angepasst.
Nun funktioniert gar nichts mehr.
Um den Fehler einzugrenzen, habe ich ein Test-Prog erstellt:

' #### EQSO-Version MINI ###'
'Erstellt: CKleinschmidt 05.04.06
'##########################'

include "OM.DEF"
'--------------------------
'------ I/O PORTS ---------
'--------------------------
define ENTLADEN     port[9]
define MotorRechts  port[10]
define MotorLinks   port[11]
define MSWITCH    port[4]
define KEYSWITCH  port[3]
define Netz   ad[1]
define AKKU   ad[2]
define EQSWITCH   port[12]
'--------------------------
'---- Variablen -------
'--------------------------
define ZAEHLER byte
define DAYS byte
define HOURS byte
define TEST byte
define UNLOADTIME byte
define AKKU_LEER 179  '11,7 Volt
define GRENZWERT 183  '12,0 Volt
define AKKU_VOLL 203  '13,3 Volt
define MINUNLOAD  2
'PULLUPA= 0              'alle Pullups A abschalten
PULLUPB= 0               'alle Pullups B abschalten
'PULLUPA=&b00101111      'Pull-Up für Port 5 ausschalten
PULLUPA=&b00001100      'Pull-Up für Port A2 A3 einschalten
'PULLUPB=&b00001000      'Pull-Up für Port B3 einschalten
pause 20
#ANFANG
ZAEHLER = 0
 ENTLADEN = off
 MotorRechts =off
 MotorLinks =off
#START
  ZAEHLER = ZAEHLER + 1
  If ZAEHLER > 5 goto ENDE
  pause 50                   'Start bei Power-On-Reset

  ENTLADEN = on
  pause 100
  ENTLADEN = off
   pause 100
  MotorRechts =on
  pause 200
  MotorRechts =off
  pause 100
  MotorLinks =on
  pause 200
  MotorLinks =off
  pause 200
  wait not KEYSWITCH       ' Schlüsselschalter in EIN-Stellung (Kontakt ist geschlossen)
  if not keyswitch ENTLADEN = on
  if keyswitch ENTLADEN = off ' Schlüsselschalter muss wieder auf  AUS stehen
  pause 50
  goto START

 #ENDE

Beim Start läuft es erst normal: Enladen, Motor rechts, Motor links
Die Abfrage von "Keyswitch" wird aber nicht durchgeführt.
Die Schleife wird  mehr als 6 mal durchlaufen, ohne das das Prog stoppt.
Unregelmäßig , mal nach 8 mal, 12 mal taktet das Relais, das den Motor links laufen lässt,
und der 5 Volt-Regler wird sehr warm, was auf einen hohen 5 Volt Strom schliessen lässt.
Ich benutze den Compiler 1.0, ich kann keinen Fehler finden und bin nun langsam am Verzweifeln.
Hat jemand eine Idee, was die Ursache sein könnte ???

Danke für jeden Tip.

MfG
ChristianK

 Antwort schreiben

Bisherige Antworten:

Re: Schleifenzähler, merkwürdiges Verhalten (von Dietmar - 10.04.2006 18:29)
    Re: Schleifenzähler, merkwürdiges Verhalten (von ChristianK - 10.04.2006 19:48)
        Re: Schleifenzähler, merkwürdiges Verhalten (von ChristianK - 10.04.2006 20:40)
            Re: Schleifenzähler, merkwürdiges Verhalten (von Dietmar - 10.04.2006 22:10)
                Re: Schleifenzähler, merkwürdiges Verhalten (von ChristianK - 11.04.2006 20:33)