Haberler:

Foruma Resim Yükleme ve Boyut Sınırlaması ( ! )  https://bit.ly/2GMFb8H

Ana Menü

Pic16f877a digital lock yardım

Başlatan kyezial, 02 Aralık 2017, 03:13:32

kyezial

Merhaba arkadaşlar.  İlgili kod ve devreyi proteusda denedigimde sorunsuz calısmakta fakat breadboard üzerine kurdugumda hiç durmadan kendi kendine şifre giriyor devam ediyor kodda bir sıkıntı oldugunu düsünüyorum yardım ederseniz sevinirim. Şuradaki devre.
http://www.gadgetronicx.com/electronic-code-locking-system-pic-microcontroller/

#include<16F877.h>
#include<stdio.h>
#bit led=0x05.0
#bit TRIS_led=0x85.0
#byte lcd=0x06
#byte TRIS_lcd=0x86
#bit rs=0x07.0
#bit TRIS_rs=0x87.0
#bit en=0x07.1
#bit TRIS_en=0x87.1
#bit relay=0x07.2
#bit TRIS_relay=0x87.2
#bit C1=0x08.0
#bit C2=0x08.1
#bit C3=0x08.2
#bit R1=0x08.3
#bit R2=0x08.4
#bit R3=0x08.5
#bit R4=0x08.6
#bit TRIS_C1=0x88.0
#bit TRIS_C2=0x88.1
#bit TRIS_C3=0x88.2
#bit TRIS_R1=0x88.3
#bit TRIS_R2=0x88.4
#bit TRIS_R3=0x88.5
#bit TRIS_R4=0x88.6
void display(unsigned char a,int b);  //LCD subroutine
char keypad();                               //Keypad Subroutine
void check();                                 //Password check routine
char password[5]={"7196"};         //Predefined password
char pswd[5];
unsigned char open_msg[15]="Enter Password";
unsigned char welcome_msg[8]="Welcome";
unsigned char close_msg[15]="Wrong Password";
char c;
int flag,i,count,j;
void main()
{
   TRIS_lcd=TRIS_en=TRIS_rs=TRIS_led=TRIS_relay=0; //Directions set
   TRIS_R1=TRIS_R2=TRIS_R3=TRIS_R4=count=0;
   TRIS_C1=TRIS_C2=TRIS_C3=1;
    while(TRUE)
    {
     c=keypad();
     {
     if(c=='*')                                    //Initialize condition
     {
     flag=1;                                       //Flag set to scan other keys
     count=0;
     display(0x01,0);
     display(0x38,0);
     display(0x0f,0);
     display(0x80,0);
     for(i=0;i<=13;i++)
     {
     display(open_msg[i],1);
     }
     display(0xc0,0);
     }
     else if(c=='#')                         //Turning off condition
     {
     count=0;
     relay=0;
     display(0x01,0);
     display(0x0c,0);
     }
     else
     {
     display('*',1);
     pswd[count]=c;                   //Storing input in new arrays
     count=count+1; 
     check();                             
     }
     }
   }
}
void display(unsigned char a,int b)
  {
    lcd=a;
    rs=b;
    en=1;
    delay_ms(10);
    en=0;
    delay_ms(10);
  }
char keypad()                       
 {
  if(flag==0)                            //Waiting for Initialization
  {
    while(TRUE)
    {
     R4=1; 
     R1=R2=R3=0;
     if(C1==1)
      {
        while(C1==1);
        count=0;
        return '*';
      }
     if(C3==1)
      {
        while(C3==1);
        count=0;
        return '#';
      }
   }
 }
else if(flag==1)
{
while(TRUE)                      //Keypad scan
{
R1=1;
R2=R3=R4=0;
if(C1==1)
{
while(C1==1);
return '1';
}
if(C2==1)
{
while(C2==1);
return '2';
}
if(C3==1)
{
while(C3==1);
return '3';
}
R2=1;
R1=R3=R4=0;
if(C1==1)
{
while(C1==1);
return '4';
}
if(C2==1)
{
while(C2==1);
return '5';
}
if(C3==1)
{
while(C3==1);
return '6';
}
R3=1;
R1=R2=R4=0;
if(C1==1)
{
while(C1==1);
return '7';
}
if(C2==1)
{
while(C2==1);
return '8';
}
if(C3==1)
{
while(C3==1);
return '9';
}
R4=1;
R1=R2=R3=0;
if(C1==1)
{
while(C1==1);
return '*';
}
if(C2==1)
{
while(C2==1);
return '0';
}
if(C3==1)
{
while(C3==1);
return '#';
}
}
}
}
void check()
{
if(count>3)                 //Input exceeds count 3 will execute comparison
 {
 flag=count=0;
 j=strcmp(pswd,password);     //Comparison of input and Predefined pswd
 if(j==0)
   {
      relay=1;                         //Turning relay on
      display(0x01,0);
      display(0x80,0);
      for(i=0;i<=6;i++)
      {display(welcome_msg[i],1);}
   }
 else
   {
      relay=0;
      display(0x01,0);
      display(0x80,0);
      for(i=0;i<=13;i++)
      {display(close_msg[i],1);}
   }
 }
}

fide

Merhaba.
Kod yazımı çok tanıdık gelmedi ama problemin devrenin kararsız çalışması. Öncelikle tuş takımı kullanılan devrelerde satırlara 10k ile pulldown yapılır. Satırlar giriş,  sütünlar çıkış yapılır. Genelde b portunda bulunan interrupt on change aktif edilir.


Mantık:
Satırları giriş yaptın. Pulldown sayesibde 0 okuyorsun. Sütunlar 1 yapılır. Herhangi bir tuşa basmayınca 0 olan girişler değişmeyeceğinden bir işlem yapılmaz. Bir tuşa basınca satırlardan biri lojik 1 olur. Bu interrupt on changei tetikler. Sütunları tek tek 1 yaparak hangi satırın 1 olduğunu tararsın.


Srnin drvrendeki hata ise pulldown yapılmadığından girişler gürültüyü lojik 1 gibi değerlendirip işlem yapıyor. Gürültü sürekli değiştiği için saçma sapan şifreler okuyorsun.


Pulldown direnci ekle. İnterrupt on change kesme kullan rahatına bak.
Her birimiz, geride bıraktığımız eserler kadar ölümsüzüz. Evlat gibi, talebe gibi, icatlar gibi...   http://fidenetgaraj.blogspot.com