18f4550 ile yazılmış programı çalıştıramadım.

[Recep METE]

Arkadaşlar internetten hazır olarak buluğum c# ile 18f4550 ile sıcaklık ölçme programını çalıştıramadım.Lcd ekrana hiç görüntü gelmiyor.Proteus virtual usb kuruludur.C#  ve 18f4550 ile yapılmış başka bir led yak söndür çalışması normal olarak çalışmaktadır.Proteus usb çalışmakta, bir sorun yok. Ancak bu programda C# dan sıcaklık değerlerini alamadım.Hatta pice bağlı lcd de hiçbir değer görülmemektedir.Acaba hata nerede olabilir.Değerli yorumlarınzı bekliyorum.Bu arada herkesin bayramını kutluyorum.



Proteusta simüle ederken pice yüklenen programda yukarıdaki uyarıları veriyor.Ama yinede yükleniyor.






Bakın buradaki gibi veri  gelmemektedir.



Buda videosu.http://youtu.be/4PhmaGqPr2c



Kodlar buradaki gibidir.Bir eksiklik var mıdr?

#include <18F4550.h>
#device ADC=10
#fuses HSPLL,NOWDT,NOPROTECT,NOLVP,NODEBUG,USBDIV,PLL2,CPUDIV1,VREGEN,NOBROWNOUT // 8MHZ
#use delay(clock=48000000)

#define USB_HID_DEVICE     TRUE             
#define USB_EP1_TX_ENABLE  USB_ENABLE_INTERRUPT //Uçnokta1'de Kesme transferi aktif
#define USB_EP1_RX_ENABLE  USB_ENABLE_INTERRUPT    
#define USB_EP1_TX_SIZE    64                 //Uçnokta1 için maksimum alınacak ve gonderilecek
#define USB_EP1_RX_SIZE    64 

#include <pic18_usb.h>     
#include <USB_Driver.h>                //USB konfigurasyon bilgileri bu dosyadadır.
#include <usb.c>
#include <lcd_driver.c>
#include <One_Wire.c>
#include <DS1820.c>

#use fast_io(a)
#use fast_io(b)
#use fast_io(c)
#use fast_io(d)

#define UcNokta1       1 

unsigned int16 Term;
unsigned int8 paket[64];
unsigned int8 Tam,Onda;
float Sicaklik;

void main()
{
   setup_timer_3(T3_DISABLED | T3_DIV_BY_1);
   
   set_tris_a(0x00);
   set_tris_b(0x00);
   set_tris_c(0x00);
   set_tris_d(0x00);
   output_a(0x00);
   output_b(0x00);
   output_c(0x00);
   output_d(0x00);
   
   lcd_init();
   output_high(pin_b7);
   delay_ms(100);
   output_low(pin_b7);
   printf(lcd_putc,"\f");
   printf(lcd_putc,"USB Baglantisi");
   lcd_gotoxy(1,2);
   printf(lcd_putc,"Bekleniyor");
   delay_ms(100);
   
   usb_init();                      
   usb_task();                    
   usb_wait_for_enumeration();         //Cihaz, hazır olana kadar bekle
   
   if(usb_enumerated())    
      printf(lcd_putc,"\f");
      printf(lcd_putc,"Baglanti Kuruldu");
      lcd_gotoxy(1,2);
      printf(lcd_putc,"DS18B20 Okunuyor");
      Sicaklik = ds1820_read();          //Sıcaklığı Oku....
      printf(lcd_putc,"\f");             // Ekranı  sil... 
      lcd_gotoxy(5,1);
      printf(lcd_putc,"Mucit23");
   while(TRUE)
   {  
      while(usb_enumerated())
      {
       if (usb_kbhit(1))             //Eğer pc'den yeni bir paket geldiyse
         {         
            usb_get_packet(UcNokta1, paket, 64); //paketi oku    
            output_high(pin_a0);
         }
           lcd_gotoxy(1,2); 
           printf(lcd_putc,"SICAKLIK=%3.1f", Sicaklik); 
           lcd_putc(223); 
           lcd_putc("C  ");
           Term=Sicaklik*10;
           Tam=Term/10;
           Onda=Term%10;
           paket[1]=Tam;
           paket[2]=Onda;
           
         usb_put_packet(UcNokta1, paket,64, USB_DTS_TOGGLE); // Datayı Gönder..
         Sicaklik = ds1820_read();
      }
   }
}

LCD DRİVER bu şekilde;

[//Buradaki ayar bendeki Deneme Kartina göredir, istenilirse baska Pinlere cevrilebilinir.
#define LCD_DB4   PIN_B0 
#define LCD_DB5   PIN_B1
#define LCD_DB6   PIN_B2 
#define LCD_DB7   PIN_B3 

#define LCD_E     PIN_B5
#define LCD_RS    PIN_B4 

//#define LCD_RW    PIN_B6 //Bendeki Deneme Kartinda LC_RW PIC'in GND Pinine bagli.Bu nedenle bu satiri iptal ediyoruz...
//#define USE_LCD_RW   1   // Ayni sebepden bu satirida iptal ediyoruz !!    

//======================================== 

#define lcd_type 2        // 0=5x7, 1=5x10, 2=2 lines 
#define lcd_line_two 0x40 // LCD RAM address for the 2nd line 


int8 const LCD_INIT_STRING[4] = 
{ 
 0x20 | (lcd_type << 2), // Func set: 4-bit, 2 lines, 5x8 dots 
 0xc,                    // Display on 
 1,                      // Clear display 
 6                       // Increment cursor 
 }; 
                              

//------------------------------------- 
void lcd_send_nibble(int8 nibble) 
{ 
// Note:  !! converts an integer expression 
// to a boolean (1 or 0). 
 output_bit(LCD_DB4, !!(nibble & 1)); 
 output_bit(LCD_DB5, !!(nibble & 2));  
 output_bit(LCD_DB6, !!(nibble & 4));    
 output_bit(LCD_DB7, !!(nibble & 8));    

 delay_cycles(1); 
 output_high(LCD_E); 
 delay_us(2); 
 output_low(LCD_E); 
} 

//----------------------------------- 
// This sub-routine is only called by lcd_read_byte(). 
// It's not a stand-alone routine.  For example, the 
// R/W signal is set high by lcd_read_byte() before 
// this routine is called.      

#ifdef USE_LCD_RW 
int8 lcd_read_nibble(void) 
{ 
int8 retval; 
// Create bit variables so that we can easily set 
// individual bits in the retval variable. 
#bit retval_0 = retval.0 
#bit retval_1 = retval.1 
#bit retval_2 = retval.2 
#bit retval_3 = retval.3 

retval = 0; 
    
output_high(LCD_E); 
delay_cycles(1); 

retval_0 = input(LCD_DB4); 
retval_1 = input(LCD_DB5); 
retval_2 = input(LCD_DB6); 
retval_3 = input(LCD_DB7); 
  
output_low(LCD_E); 
    
return(retval);    
}    
#endif 

//--------------------------------------- 
// Read a byte from the LCD and return it. 

#ifdef USE_LCD_RW 
int8 lcd_read_byte(void) 
{ 
int8 low; 
int8 high; 

output_high(LCD_RW); 
delay_cycles(1); 

high = lcd_read_nibble(); 

low = lcd_read_nibble(); 

return( (high<<4) | low); 
} 
#endif 

//---------------------------------------- 
// Send a byte to the LCD. 
void lcd_send_byte(int8 address, int8 n) 
{ 
output_low(LCD_RS); 

#ifdef USE_LCD_RW 
while(bit_test(lcd_read_byte(),7)) ; 
#else 
delay_us(60);  
#endif 

if(address) 
   output_high(LCD_RS); 
else 
   output_low(LCD_RS); 
      
 delay_cycles(1); 

#ifdef USE_LCD_RW 
output_low(LCD_RW); 
delay_cycles(1); 
#endif 

output_low(LCD_E); 

lcd_send_nibble(n >> 4); 
lcd_send_nibble(n & 0xf); 
} 

//---------------------------- 
void lcd_init(void) 
{ 
int8 i; 

output_low(LCD_RS); 

#ifdef USE_LCD_RW 
output_low(LCD_RW); 
#endif 

output_low(LCD_E); 

delay_ms(15); 

for(i=0 ;i < 3; i++) 
   { 
    lcd_send_nibble(0x03); 
    delay_ms(5); 
   } 

lcd_send_nibble(0x02); 

for(i=0; i < sizeof(LCD_INIT_STRING); i++) 
   { 
    lcd_send_byte(0, LCD_INIT_STRING[i]); 
    
    // If the R/W signal is not used, then 
    // the busy bit can't be polled.  One of 
    // the init commands takes longer than 
    // the hard-coded delay of 60 us, so in 
    // that case, lets just do a 5 ms delay 
    // after all four of them. 
    #ifndef USE_LCD_RW 
    delay_ms(5); 
    #endif 
   } 

} 

//---------------------------- 

void lcd_gotoxy(int8 x, int8 y) 
{ 
int8 address; 

if(y != 1) 
   address = lcd_line_two; 
else 
   address=0; 

address += x-1; 
lcd_send_byte(0, 0x80 | address); 
} 

//----------------------------- 
void lcd_putc(char c) 
{ 
 switch(c) 
   { 
    case '\f': 
      lcd_send_byte(0,1); 
      delay_ms(2); 
      break; 
    
    case '\n': 
       lcd_gotoxy(1,2); 
       break; 
    
    case '\b': 
       lcd_send_byte(0,0x10); 
       break; 
    
    default: 
       lcd_send_byte(1,c); 
       break; 
   } 
} 

//------------------------------ 
#ifdef USE_LCD_RW 
char lcd_getc(int8 x, int8 y) 
{ 
char value; 

lcd_gotoxy(x,y); 

// Wait until busy flag is low. 
while(bit_test(lcd_read_byte(),7));  

output_high(LCD_RS); 
value = lcd_read_byte(); 
output_low(lcd_RS); 

return(value); 
} 
#endif/code]

[okay57]

c sharp kullanıyorsunuz heralde.Projenin ISIS te çalışması için c sharp yazılımında 
this.usbHidPort1.ProductId = Int32.Parse("0000", System.Globalization.NumberStyles.HexNumber);
this.usbHidPort1.VendorId = Int32.Parse("0000", System.Globalization.NumberStyles.HexNumber);
düzenlemesini yapın.

[okay57]

Picin 1 nolu bacağına 5Volt bağlayın düzelecektir.

[RaMu]

Isiste sol altta 83 mesaj yazıyor açıp baktın mı ne diyor diye?
Pice çift tıkla indirdiğin dosyada gelen .hex dosyasını isiste göster-yükle.
Picin MCLR bacağını 5-10 k ile +5V a çek, çalışır.

[Recep METE]

Picin 1 nolu bacağına 5Volt bağlayın düzelecektir.

Isiste sol altta 83 mesaj yazıyor açıp baktın mı ne diyor diye?
Pice çift tıkla indirdiğin dosyada gelen .hex dosyasını isiste göster-yükle.
Picin MCLR bacağını 5-10 k ile +5V a çek, çalışır.

Arkadaşlar Allah hepinizden razı olsun 5V bağlantısı yapınca çalıştı.Nasıl böyle bir körlük yapmışım anlayamadım.
Neyse herkese iyi bayramlar.
mesaj birleştirme:: 28 Temmuz 2014, 08:44:17
Şimdide şöyle bir sorun oluştu.Proteusta ds1820  sıcaklık ayarlama göstergesinde sıcaklık 22 derece göstermesine rağmen lcd ve C#'da sıcaklık 172 gibi üç rakamlı sayılar gösteriyor.Bunun için nasıl ayarlama yapmalıyım.Değerli yorumlarınızı sabırsızlıkla/sabırla bekliyorum.

Bakın buradaki gibi bir durum meydana gelmektedir:

[okay57]

Pic ten bilgiyi gönderdiğin diziye bak ve  örneğin sadece bir diziden gönderiyorsan diğer 2. ve geri kalan dizileri c sharpta h'FF' yap.

[baran123]

Sıcaklık sensörünü ds18b20 yap kütüphanesinide ona göre değiştir usb devresi denerken proteusda sorun oluyor kristal değerlerini düşürmen lazım
mesaj birleştirme:: 28 Temmuz 2014, 17:08:12
aynı çalışmayı bende yaptım bitirdim bir kaç güne yayınlayacağım oradanda bakabilirsin

[okay57]

Dikkat ederseniz sıcaklığı 8 ile çarpıp ekranda gösteriyor.Sıcaklığı 8 e bölerseniz doğru cevabı alırsınız.Günü kurtaran bir çözüm ama...

[Recep METE]

Dikkat ederseniz sıcaklığı 8 ile çarpıp ekranda gösteriyor.Sıcaklığı 8 e bölerseniz doğru cevabı alırsınız.Günü kurtaran bir çözüm ama...

Arkadaşım, programda 10 ile çarpıldığı görülüyor.

Term=Sicaklik*10;           Tam=Term/10;           Onda=Term%10;           paket[1]=Tam;           paket[2]=Onda;

Acaba benim göremediğim bir yer mi var?
mesaj birleştirme:: 29 Temmuz 2014, 10:57:02

Sıcaklık sensörünü ds18b20 yap kütüphanesinide ona göre değiştir usb devresi denerken proteusda sorun oluyor kristal değerlerini düşürmen lazım
mesaj birleştirme:: 29 Temmuz 2014, 07:08:12
aynı çalışmayı bende yaptım bitirdim bir kaç güne yayınlayacağım oradanda bakabilirsin

Arkadaşım sıcaklık sensörünü ds18b20 yaptım ancak pogramı derlediğimde ds18b20 driveri ccsc de açılıyor aşağıdaki hata mesajı ortaya çıkıyor.Sorunu bir türlü çözemedim.

[okay57]

Yazılımda çarpılmasının nedeni arayüzde göstermek için.Bir şey onu otomatik olarak 8 ile çarpıyor ama ben bulamadım.
Driverda bir de şunu deneyin.Driver dosyasının adı ds18b20.c yerine ds18b.c yapın ve yazılımda da yerine bunu yazın.

[okay57]

Sicaklik = ds1820_read(); satırından sonra Sicaklik/=Sicaklik yazın doğru değeri göreceksiniz.

[okay57]

Yanlış yazdım şunu yazın  Sicaklik/=8;

[Recep METE]

Sicaklik = ds1820_read(); satırından sonra Sicaklik/=Sicaklik yazın doğru değeri göreceksiniz.

Yanlış yazdım şunu yazın  Sicaklik/=8;

Okay hocam, çok teşekkür ederim, gösterdiğiniz kodla herşey düzeldi.Tekrar çok sağolun, beni haftalardır uğraşıp düzeltemediğim sıkıntıdan kurtardın.Ancak programın mantığını bana açıklarmısınız.Nedensıcaklık bölünüyorve 8'e eşitleniyor.Neden bu küçük eklemeyi yapmazsak düzgün çalışmıyor.Bunları anlamak istiyorum.İyi çalışmalar.

[okay57]

Rica ederim hocam.Onu bende çözemedim sensör devresinden kalnaklı bir şey ama.benim ki günü kurtaran bir çözüm.bu konuya açıklık getiren biri olursa iyi olur.çünkü bende merak ediyorum.

[CLR]

Nedenini söylüyeyim arkadaşlar ama böyle ilerlemeniz güç, datasheet okumadan proje yapıyorsunuz. Bu elektronik pratiği açısından iyi birşey ama aynı şekilde devam ederseniz 100 tane proje bitirseniz de teorik anlamda çok şey kazanmazsınız. Aynı çoğu televizyon tamircisi gibi(istisna insanlarda çok), arızayı tamir ederler ama arızanın neden kaynaklandığını bilmezler dolayısıyla aynı arıza sonra tekrar olur.

Ds18b20 default 12bit olarak sıcaklık okuyor. Sonucu 8'e bölerseniz 12 bit yerine 9 bit okursunuz ve çözünürlük 0,5 derece olacaktır, 1 derece hassasiyetle okumak isterseniz 16'ya bölebilirsiniz. Eğer İngilizce bilginiz zayıfsa kelime kelime çevirin bu esnada teknik ingilizce kelime bilginizde gelişir.