PICf2550 & Relais am IN/OUT Fehler mit PullDown

[Stefan (Gast)]

Hallo Gemeinde,

ich weiß langsam nicht mehr weiter.

Ich habe an einem Eingang des PICF2550er ein PullDown,

(+)---10kOhm----(PIC)
Der Pin wird dann gegen Masse gezogen von einem Relais
(12V)----(Relais)----(GND)

(GND)----(Relais_Schließer)---(PIC)

funktioniert soweit auch. (INCL. FREILAUFDIODEN AN ALLEN RELAIS!)

NUR (!) jetzt habe ich 2 Ausgänge, die 12V benötigen, d.h. mit über 
Transistor werden 5V Relais gesteuert. Funktioniert auch.

Wenn ich nun den Eingang (s. oben, REED-Kontakt für Festozylinder) 
nutzen will, funktioniert das 1X

Zum verständnis Pseudocode:
warte bis Reed schaltet
schalte Relais 1 an
warte Zeit x
schalte Relais 1 aus
warte Zeit y
von vorne

Dann bleibt der Pulldown GESETZT, d.h. ich kriege keinerlei Rückmeldung, 
das Programm arbeit einfach weiter obwohl der Reedkontakt nicht 
rückmeldet.

Kommentiere ich "schalte Relais 1 an/aus" aus, dann wartet er aber.
Nun ist die Frage ... WIESO ?

Mit einem Messgerät an dem PIN sehe ich, dass er nach dem PullDown auch 
auf GND bleibt, obwohl das Relais definitiv abfällt.

Ich hatte das Problem auch schon vorher mit Relais 2, konnte es dort mit 
einem monoflop aber beheben (warum auch immer ...), nur hier ist das 
Problem weiterhin vorhanden.

Irgend eine Idee woran das liegen kann ???

MFG Stefan

Quellcode:

ONOFF=1;
RUNENABL=0;
DelayH();

while(1){
  CHECK=2;
  if(i==u){
  }  // NO REPRINT
else{
  XLCDClear(); 
  //sprintf(buffer, "ZER0_Wait_Zyli.!");
  sprintf(buffer, "~~ZERO > OPENEND");
  while(XLCDIsBusy()); 
  XLCDPutRamString(buffer);
  sprintf(buffer, "%ld", i); // WRITE i INTO *BUFFER
  while(XLCDIsBusy()); 
  XLCDL2home();
  while(XLCDIsBusy()); 
  XLCDPutRamString(buffer);
  LEDWAIT=0;
  WaitBack(W2);
  ZylinderVor=1;  // Ausfahren
  }

  


u=i; // NO REPRINT!

  DelayL();

while(ZylinderVorne==1){
  DelayL(); // Warte bis der Zylinder vorne ist
  if(NOTAUS==1 || NOTSTOP==0){
    goto stop;
    }
  }



//if(ZylinderVorne==0){   //Zylinder ist vorne
LEDWAIT=0;

i++; //+1
/**
XLCDClear(); // CLEAR LCD
sprintf(buffer, "~Einwirken ....~");
while(XLCDIsBusy()); 
XLCDPutRamString(buffer);
sprintf(buffer, "%ld", i); // WRITE i INTO *BUFFERÜ
while(XLCDIsBusy()); 
XLCDL2home();
while(XLCDIsBusy()); 
XLCDPutRamString(buffer);
**/
if(ONOFF==1){
  RUNENABL=1;
  WaitFront(W1);
  RUNENABL=0;
  DelayH();
  ZylinderVorne=0;
  }  
else{
  
  WaitFront(W1);// Einwirkzeit
  }  

ZylinderVor=0;  // Zylinder zurück



u=i+1;  // Reprint!

}

[Stefan (Gast)]

Ach vergessen, hier der Initialisierungsteil.

Hier ist bestimmt einiges unötig, das meiste ist nur durch TRY&ERROR 
versucht worden und hat so halt funkioniert.

Falls hier der Fehler begraben liegt oder falls hier unnötiges enthalten 
ist, bitte melden :D

char buffer[100];                
    // Hinweise für folgende Zeilen:        // 0=output  1=input
  LATA = 0b11111100;                 
  TRISA = 0b11111100;               // RA0+RA1 = OUTPUT, ALL OTHER = INPUT's
  ADCON1 = 0xFF;                   // A/D aus, 0xFF = 1111 1111
  // - USB DISABLING - PIC kann sonnst Schaden nehmen
  UCFG = 0x08;                
  UCON = 0x04;
  UEP0 = 0x16;

  // Setup Port C
  LATC = 0b00000111;
  TRISC = 0b00000110;
  //TRISC=0x00


  // PORTC PWM DISABLING
    PR2=149;          //1.:Register PR2 Wert zuweisen
    CCPR1L=0xFF;        //2.:
    CCPR2L=0xFF;
    CCP2CONbits.DC2B0=0;
    CCP2CONbits.DC2B1=0;
    CCP1CONbits.DC1B0=0;
    CCP1CONbits.DC1B1=0;
    TRISCbits.TRISC2=0;      //3.: CCP1 als Ausgang
    TRISCbits.TRISC2=0;      //    CCP2 als Ausgang
    T2CONbits.T2CKPS1=1;    //4.: TMR2 Prescale setzen (1:16)
    T2CONbits.T2CKPS0=0;    //    Wert egal
    T2CONbits.TMR2ON=1;      //    Timer2 ON

// <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<                       DEFINE OUT-INPUT VARIABLES

// PORT A
  #define  LEDWAIT      PORTAbits.RA0     // Out Zeigt an, dass auf Benutzeraktivität gewartet wird
  //#define LEDDELAY    PORTAbits.RA1     // Out Zeigt an, dass PIC in einer Warteschleife ist (=Arbeitet wenn blinkt), ist im DELAY
  #define AddL       PORTAbits.RA2     // In  Addiert kleinen Wert im Hauptmenü
  #define AddH      PORTAbits.RA3    // In  Addiert großen Wert im Hauptmenü
  #define RUN        PORTAbits.RA4    // In  RUN Running
  #define MENU      PORTAbits.RA5    // In  RI Running

// PORT B
  // BELEGT ==> LCD mit nibbler (statt 8 -> 4 Datenleitungen + R/W,...)

// PORT C
  #define ZylinderVorne    PORTCbits.RC0    // In  Eingangskontakt Zylinder_Ist_Vorne
  // RC1 ist nicht vorhanden @ 2550 (Part_of_USB)
  #define ZylinderVor    PORTCbits.RC2    // Out Ausgang ==> Zylinder kann vor
  #define NOTAUS       PORTCbits.RC5    // In  Gefahr für Mensch (öffner)
  #define NOTSTOP       PORTCbits.RC4    // In  Gefahr für Maschine (schließer)
  #define RUNENABL    PORTCbits.RC6    // Out Motor darf
  #define HEARENABL    PORTCbits.RC7    // Out Heizung darf