Pumpensteuerung - Finde den Fehler PIC 16f628a

[Steve Modena (Gast)]

Hallo,

bin neu hier und hoffe ihr nehmt es mir nicht übel das ich als erstes ne 
Frage poste aber ich komm einfach nicht weiter und weis mittlerweile 
auch nicht mehr wo ich ansetzen soll. Bin noch relativ neu im 
Programmieren und hoffe ihr könnt mir da was beibringen.

Zur Funktion

Einstellbare ein und Ausschaltzeit einstellbarer druck und Loop ja/nein

es soll während der Pausendauer ein einstellbarer Unterdruck im 
Vakuumspeicher, der von einem Druck Sensor (Vergleicher) gemessen wird 
erzeugt werden. Ist die pause zu ende soll das Vakuum  über ein Wechsel 
Ventil in die Anlage freigegeben werden. Nach Ablauf dieser zeit soll 
der druck im System über ein Entlüftungsventil abgelassen werden. Das 
ganze wird auf dem Display angezeigt. Leider Funktioniert es nicht die 
erste Schaltung ohne den Sensor ging Problemlos allerdings musste ich um 
den Sensor anzubringen den EN vom Display an RA5 legen um einen 
Analogpin beschalten zu können.

Mir wird am Display nun nichts angezeigt und ich weiß nicht woran das 
liegt.
Meine frage ist kann das so überhaupt funktionieren oder bin ich 
komplett auf dem Holzweg.

Compiler ist MicroC

Danke schon mal

LG Stefan


Der Code:

/* Vacuum Station
   By Stefan Haemmerle
*/

// LCD modul
 sbit LCD_RS at RA1_bit;
 sbit LCD_EN at RA5_bit;
 sbit LCD_D4 at RB4_bit;
 sbit LCD_D5 at RB5_bit;
 sbit LCD_D6 at RB6_bit;
 sbit LCD_D7 at RB7_bit;
 sbit LCD_RS_Direction at TRISA1_bit;
 sbit LCD_EN_Direction at TRISA5_bit;
 sbit LCD_D4_Direction at TRISB4_bit;
 sbit LCD_D5_Direction at TRISB5_bit;
 sbit LCD_D6_Direction at TRISB6_bit;
 sbit LCD_D7_Direction at TRISB7_bit;


// Hysterese
   sbit MENU_sw at RA2_bit;
   sbit SELECT_sw at RA3_bit;
   sbit ENTER_sw at RA4_bit;
   sbit START_sw at RB0_bit;
   sbit Pumpen_Relais at RB3_bit;
   sbit Wechsel_Ventil at RB2_bit;
   sbit Entluef_Ventil at RB1_bit;
   sbit Sensor at RA0_bit;
   sbit Sensor_Direction at TRISA0_bit;


// Nachrichten definition

 char NA2[] = " Pause = ";
 char NA3[] = " Vacuum  = ";
 char NA4[] = " Druck =-";
 char NA5[] = " Y/N = ";


 unsigned short SS_Pos = 10;
 unsigned short Mbar_Pos = 10;
 unsigned short AN_Zeit[] = {0, 0};
 unsigned short Aus_Zeit[] = {0, 0,};
 unsigned short Mbar [] = {0, 0};
 unsigned short Modus_AUSWAHL = 0 ;
 unsigned short Repeat_Cycle=0, Num_Cycles=0;
 unsigned short i, j, k, Timer_An, Get_Input, Cur_Pos, Cur_On;
 unsigned short temp, refresh, Num, HalfSec, Blink, ChangeMin=0, ChangeSec=0;
 unsigned short aus_ss, an_SS;
 unsigned short max_druck, druck_raw, Zone = 3;

 int temp1;
 char Temper[7];
 
 
void Disp_Erste_zeile(){
  if(!Timer_An){
    switch (Modus_Auswahl){
       case 0: Lcd_Cmd(_LCD_CLEAR);
               Lcd_Out(1,1, ">Pausendauer");
               break;
       case 1: Lcd_Cmd(_LCD_CLEAR);
               Lcd_Out(1,1, ">Vacuumdauer");
               break;
       case 2: Lcd_Cmd(_LCD_CLEAR);
               Lcd_Out(1,1, ">Druck");
               break;
       case 3: Lcd_Cmd(_LCD_CLEAR);
               Lcd_Out(1,1, ">Wiederholung");
               break;

    }
  }
  else{
   if (Wechsel_Ventil == 1) {
     Lcd_Cmd(_LCD_CLEAR);
     Lcd_Out(1,1, "Vacuum");
     Lcd_Out(1,14, "~");
     Lcd_Chr(1,15, Mbar[0,0]);

   }
   if (Wechsel_Ventil == 0) {
     Lcd_Cmd(_LCD_CLEAR);
     Lcd_Out(1,1, "Pause");
     Lcd_Out(1,14, "~");
     Lcd_Chr(1,15, Num_Cycles/10+48);
     Lcd_Chr(1,16, Num_Cycles%10+48);
   }
  }
 }

void Disp_Char(unsigned short col, unsigned short chr){
  Lcd_Chr(2, col, chr+48);
  }

void Disp_Modus(){

   for(i=0; i<2; i++){
      if(Modus_Auswahl == 0){  
       Lcd_Out(2,1, NA2);
       Disp_Char(SS_Pos+i,Aus_Zeit[i]);
      }
      if(Modus_Auswahl == 1){  
       Lcd_Out(2,1, NA3);
       Disp_Char(SS_Pos+i,AN_Zeit[i]);
      }
      if(Modus_Auswahl == 2){  
       Lcd_Out(2,1, NA4);
       Disp_Char(Mbar_Pos+i,AN_Zeit[i]);
      }

      if(Modus_Auswahl == 3){  
       Lcd_Out(2,1, NA5);
       Disp_Char(8,Repeat_Cycle);
       Lcd_Out(2,9, "      ");

       break;
      }
   }
 }

void Delay_X(){
  Delay_ms(300);
 }

void cursor_links(){
   for(j=0; j<5; j++){
      Lcd_Cmd(_LCD_MOVE_CURSOR_LEFT);
   }
 }

void Speicher_Daten(){
  EEPROM_Write(0,Aus_Zeit[0]);
  EEPROM_Write(1,Aus_Zeit[1]);
  EEPROM_Write(2,An_Zeit[0]);
  EEPROM_Write(3,An_Zeit[1]);
  EEPROM_Write(4,Mbar[0]);
  EEPROM_Write(5,Mbar[1]);
  EEPROM_Write(6,Repeat_Cycle);
  EEPROM_Write(9,1);     // Addresse 8 speicher EEPROM Write flag

}

void Lese_Daten(){
  Aus_Zeit[0]=EEPROM_Read(0);
  Aus_Zeit[1]=EEPROM_Read(1);
  AN_Zeit[0]=EEPROM_Read(2);
  AN_Zeit[1]=EEPROM_Read(3);
  Mbar[0]=EEPROM_Read(4);
  Mbar[1]=EEPROM_Read(5);
  Repeat_Cycle=EEPROM_Read(6);
}

void deaktiviere_timer(){
  INTCON = 0x00;
  Wechsel_ventil = 0;
  Num_Cycles = 0;
  INTCON.T0IF = 0;
  Timer_An = 0;
  Blink = 0xff;
  Modus_auswahl = 0;
  Disp_erste_zeile();
  Lese_Daten();
  Disp_Modus();
 }

void interrupt(){
  Num ++;
  if(Num == 18)
  {
   HalfSec ++;
   Num = 0;
   Blink = ~Blink;
   if (HalfSec == 2)
   {
    HalfSec = 0;
    ChangeSec = 1;
   }
  }
  TMR0 = 39;        
  INTCON.T0IF = 0;  
}

void Lese_druck (){

temp1 = sensor;
druck_raw = temp1 * 222;


}

void Pumpensteuerung (){
if(Wechsel_Ventil==0 && Entluef_Ventil == 1 && druck_raw < Mbar[0,0]){
 Pumpen_relais = 1;
}
else
Pumpen_relais = 0;
}



void main () {
  CMCON = 7;           
  TRISA = 0b00111100;
  TRISB = 0b00000001;
  PORTB=0;
  PORTA=0;
  Pumpen_Relais = 0;
  Wechsel_Ventil = 0;
  Entluef_Ventil  = 0;
  Timer_An = 0;
  Get_Input = 0;
  Cur_Pos = 0;
  Cur_On = 0;
  refresh = 0;
  Num = 0;
  HalfSec = 0;

  Lcd_Init();                
  Lcd_Cmd(_LCD_CLEAR);       
  Lcd_Cmd(_LCD_CURSOR_OFF);  
  Lcd_Out(1,1, "Meditek");
  Lcd_Out(2,1, "Prototyp V1.0");
  delay_ms(1000);
  i=0;

  while(i<1){
   Delay_X();
   i ++;
  }
  Lcd_Cmd(_LCD_CLEAR);
  Disp_erste_Zeile();
  if(EEPROM_Read(9) == 1){
   Lese_Daten();
  }

  Disp_modus();

  do {
  
   if(!MENU_sw && !Timer_An){
     Delay_X();
     if(!Get_Input){
       Modus_auswahl = Modus_auswahl+1;
       if(Modus_auswahl > 2) Modus_auswahl=0;
       Disp_Erste_zeile();
       Disp_modus();
     }
     if(Get_Input){
       if(Modus_Auswahl==0){  // Set OFF time
         Aus_Zeit[Cur_Pos] ++;
         temp = Aus_Zeit[Cur_Pos];
         switch (Cur_Pos){
           case 0: if(temp > 5) Aus_Zeit[Cur_Pos]=0;
                   break;
           case 1: if(temp > 9) Aus_Zeit[Cur_Pos]=0;
                   break;
           case 2: if(temp > 5) Aus_Zeit[Cur_Pos]=0;
                   break;
           case 3: if(temp > 9) Aus_Zeit[Cur_Pos]=0;
                   break;
         }
         Disp_Char(ss_Pos+Cur_Pos, Aus_Zeit[Cur_Pos]);

       }
     if(Modus_Auswahl==1){    // Set ON time
       An_Zeit[Cur_Pos] ++;
       temp = An_Zeit[Cur_Pos];
       switch(Cur_Pos){

        case 0: if(temp > 5) An_Zeit[Cur_Pos]=0;
               break;
        case 1: if(temp > 9) An_Zeit[Cur_Pos]=0;
               break;
       }
      Disp_Char(ss_Pos+Cur_Pos, An_Zeit[Cur_Pos]);
     }
     if(Modus_Auswahl==2){    // Set mbar
       mbar[Cur_Pos] ++;
       temp = mbar[Cur_Pos];
       switch(Cur_Pos){

        case 0: if(temp > 9) Mbar [Cur_Pos]=0;
               break;
        case 1: if(temp > 9) Mbar [Cur_Pos]=0;
               break;
       }
      Disp_Char(mbar_Pos+Cur_Pos, mbar[Cur_Pos]);
     }
     if(Modus_Auswahl==3){   // Set cyclic option
      Repeat_Cycle ++;
      if(Repeat_Cycle > 1) Repeat_Cycle=0;
      Disp_Char(8, Repeat_Cycle);
     }
     Lcd_Cmd(_LCD_MOVE_CURSOR_LEFT);
    }
   }   // END if(!Menu_sw)

   if(!SELECT_sw && !Timer_an){
     Delay_X();
     Get_Input = 1;
     if(Modus_Auswahl < 4) {
       if(Cur_On) {
         Cur_Pos ++;
          if (Cur_Pos == 2) {
           Lcd_Cmd(_LCD_MOVE_CURSOR_RIGHT);
           Cur_Pos ++;
          }
          if(Cur_Pos > 2) {
           Lcd_Cmd(_LCD_MOVE_CURSOR_RIGHT);
           Cur_Pos = 0;
           cursor_links();
          }
          else Lcd_Cmd(_LCD_MOVE_CURSOR_RIGHT);
       }
       if(!Cur_On) {
        Cur_On = 1;
        cursor_links();
        Lcd_Cmd(_LCD_UNDERLINE_ON);
       }
     }
     else {
      if(!Cur_On) {
        Cur_On = 1;
        for(j=0; j<7; j++){
          Lcd_Cmd(_LCD_MOVE_CURSOR_LEFT);
        }
        Lcd_Cmd(_LCD_UNDERLINE_ON);
      }
     }

   }   //   if(!SELECT_sw && !Timer_On) ends here

   if(!ENTER_sw && Get_Input){
    Delay_X();
    Get_Input = 0;
    Cur_On = 0;
    Cur_Pos = 0;
    Disp_modus();
    Lcd_Cmd(_LCD_CURSOR_OFF);  // Cursor off
   }

   if (!START_sw && !Get_Input){
    Delay_X();

    switch(Timer_an){
    case 0:
            Timer_an = 1;
            Disp_erste_zeile();
            OPTION_REG = 0x07; 
            TMR0 = 354;          
            INTCON = 0xA0;     
            INTCON.T0IF = 0;
            Modus_auswahl = 0;
            Blink = 0;
            Disp_modus();
            Speicher_Daten();
            break;
    case 1: deaktiviere_timer();
            break;
    }
   }

   if(Timer_an){
    aus_ss = aus_zeit[0]*10 + aus_zeit[1];
    an_ss = an_zeit[0]*10 + an_zeit[1];

    switch(Blink){
     case 0: Lcd_Chr(2,ss_Pos+2,' ');
             break;
     case 255: Lcd_Chr(2,ss_Pos+2,':');
             break;
    }

    if(!aus_SS && !wechsel_ventil){
     if(an_SS){
      Wechsel_Ventil = 1;
      Modus_auswahl = 1;
      Disp_erste_zeile();
      Disp_modus();

     }

     else {
      deaktiviere_timer();
     }
    }

    if(!an_SS && wechsel_ventil){
      if(Repeat_Cycle ==1){
       Wechsel_ventil = 0;
       Num_Cycles++;
       Pumpensteuerung();
       if(Num_Cycles > 99){
        deaktiviere_timer();
       }
       else {
        lese_Daten();
        Modus_auswahl = 0;
        Disp_erste_Zeile();
        Disp_modus();

       }
      }
     else {
      deaktiviere_timer();
     }
    }

    if(ChangeSEC) {
     switch(Modus_auswahl){
      case 0: if(aus_SS == 0){
               aus_SS = 59;

              }
              else if (aus_SS >>0)
              aus_SS --;
              aus_zeit[0] = Aus_ss/10;
              aus_zeit[1] = Aus_ss%10;

              break;

      case 1: if(an_SS == 0){
               an_SS = 59;
              }
              else if(an_SS >> 0)
              an_SS --;
              an_zeit[0] = an_ss/10;
              an_zeit[1] = an_ss%10;
              break;
     }
     Disp_modus();
    }

   }


  }while(1);
 }

[C-hater (Gast)]

Steve Modena schrieb:
> Compiler ist MicroC

Hast Du schon einen anderen Compiler ausprobiert, z.B. den von VisualC? 
Mit welchem Compiler hat der hier:

/* Vacuum Station
   By Stefan Haemmerle

das Programm übersetzt?

Vielleicht solltest Du auch mal schreiben, was genau Deine 
Fehlermeldungen sind (z.B. parse-Error beim Compilieren).

[Cyborg (Gast)]

Wozu gibts einen Debugger, wenn ihn doch keiner benutzt?

Die großen Elkos hinter deinen Spannungsreglern würde ich
mal raus schmeißen. Das entspricht nämlich nicht der Spezifikation
des Spannungregler-Datenblatts.
Die Spannungsversorgung sollte auch etwas präziser angeben werden,
also ob AC oder DC. Dicke Elkos kommen gewöhnlich VOR dem Regler
wenn die Versorgung über Trafo und Gleichrichter erfolgt.

[Steve Modena (Gast)]

Danke für die Antwort Spannungsversorgung is DC und kommt vom einem 9v
Steckernetzteil. Die Elektrik funktioniert auch soweit konnte das mit 
einem anderen funktionierendem Programm testen nur eben ohne 
einstellbaren druck und ohne sensor.

[Steve Modena (Gast)]

MikroC ist der Compiler und ich bekomm keinen Fehler beim Compilieren 
kann das Programm aufspielen nur zeigt mir das display nichts an.

[Steve Modena (Gast)]

und stefan hämmerle bin ich

[Test (Gast)]

Beim 16F628A ist der Pin RA5 nur als Input zu benutzen.
Siehe Bild im Datenblatt Port RA5

[Georg G. (df2au)]

Steht der Port für Enable wirklich auf Ausgang? Ich kenne den PIC nicht, 
aber beiden anderen Steuersignalen setzt du tris auf 0, bei Enable auf 
1.

Steve Modena schrieb:
> TRISA = 0b00111100;
>   TRISB = 0b00000001;

[Christian M. (Gast)]

Vielleicht weil default E = port.3 und RS = port.2 ist? Wie wär's mit 
einem Lcd_Config vor dem Lcd_Init...?

Gruss Chregu

[Kurt B. (kurt-b)]

Steve Modena schrieb:
> Hallo,
>
> bin neu hier und hoffe

Deine Spannungsversorgung scheint etwas seltsam.
GND1 und GND2 und die beiden 10 pF und die Versorgungsbuchse J1 Pin2.

Sind alle GND miteinander verbunden?

 Kurt

[Steve Modena (Gast)]

Wenn mir jemand das Programm macht würde ich ihn auch dafür bezahlen :) 
könnt euch per mail melden [e-mail]

[Steve Modena (Gast)]

Die Spannungsversorgung hab ich noch abgeändert hab eben gesehen das ich 
das alte sheet hochgeladen hab. Es ist nur noch ein Stromkreis ich lade 
gleich das angepasste Schaltbild hoch

[Steve Modena (Gast)]

Hier die aktuellen sheets

[Steve Modena (Gast)]

hab denke ich den Fehler RA5 ist nur ein trigger input bin mir nicht 
sicher ob ich da den en vom display dran hängen kann

[Test (Gast)]

Enable vom Display kannst Du nicht an RA5 hängen, da
dieser Pin nicht als Ausgang zu schalten ist.
Nimm RA2 oder RA3 als Anschuss für EN vom Display und
leg einen Taster auf RA5.

[Cyborg (Gast)]

Steve Modena schrieb:
> hab denke ich den Fehler RA5 ist nur ein trigger input bin mir nicht
> sicher ob ich da den en vom display dran hängen kann

Für den EN brauchst du einen Ausgang, oder ist das unlogisch?

Den 100µF am Ausgang des Reglers hat da nichts verloren.
Man belastet Linearregler nicht so hoch kapazitiv, denn das
macht die Regelung träge.
Wenn, dann gehört der an den Reglereingang, aber wenn DCin
schon genug gesiebt ist und kaum riple hat, kann man sich
den Elko auch ganz sparen. Spielt keine Rolle wenn es im
Moment geht. Am Ausgang ist das Pfusch, mit der Option
bald aus zufallen.

[Steve Modena (Gast)]

Alles klar danke schonmal für die tipps

[Steve Modena (Gast)]

Das ist der RA5/MCLR/VPP Port geht das das ich da einen Taster dran mach 
der den Pic nicht resettet

[Steve Modena (Gast)]

Habs gefunden hat sich erledigt Danke