4 Eylül 2019 Çarşamba

Pic basic pro pbp flex lcd library


Etepic.com forumunda devre rumuzlu üyenin hazırladığı flex lcd kütüphanesi ile istediğiniz pic pinini  lcd pinlerinde kullanabiliyorsunuz. Pbp ve isis simulasyon dosyası linkten indirilebilir.

https://drive.google.com/file/d/1AXkO5c7AzdLrhzM8BLEFAz3aIMtV1liH/view?usp=drivesdk


devamını oku ...

29 Ağustos 2019 Perşembe

pickat neo6mv2 gps modül proton basic kodu




Gps modül gy-neo6mv2 ile hazırladığım projede proton basic 3.2.5.5 kullandım. Kodlar ve açıklamalara aşağıdan bakabilirsiniz:


' AÇIKLAMA: NEO6MV2 GPS MODÜLÜ İLE KULLANILABİLECEK PROTON BASİC (3.2.5.5) DEMO 'KODUDUR.' TEST PLATFORMU: Pickat pic geliştirme kartı www.pickat.org
' GPS MODÜL: neo6mv2 (GY-NEO6MV2)(GPS6MV2)(modül seri iletişim kullanır, ilk 'çalıştırmada '10 dakika açık alanda sadece voltaj (max 5 volt) veriniz. Daha 'sonra cam kenarı bir yerde sinyal 'alabilirsiniz)Device = 18F2550  'Kullanılan işlemci
'Device = 16f876a  'Kullanılan işlemci olarak seçilebilir, sda-scl pinleri 14-'15'te...
XTAL 20          'Kullanılan kristal değeri (mhz)OPTIMISER_LEVEL=2 'Kod optimize açık
ALL_DIGITAL = true
'CMCON = 7Declare FLOAT_ROUNDING = On'Declare FLOAT_DISPLAY_TYPE = 1 'OR FAST'4x20 LCD TANIMLAMALARI
Declare LCD_DTPIN PORTB.4
Declare LCD_RSPIN PORTB.2
Declare LCD_ENPIN PORTB.3
Declare LCD_INTERFACE 4
Declare LCD_LINES 4
Declare LCD_TYPE 0
Declare LCD_COMMANDUS = 2000
Declare LCD_DATAUS =50 ' YADA 255
' Gps modül sürekli bilgi gönderiyor, bu bilgiyi almak yeterli, modül rx ucunu 'bağlamanıza gerek 'yok.
Declare HSERIAL_BAUD  = 9600      ' SERİ İLETİŞİM HIZI 9600 BAUD, GPS MODÜL '9600 BAUDDeclare HSERIAL_RCSTA = %10010000  ' SERİ PORT AÇILIYOR VE SÜREKLİ VERİ 'ALIŞINA 'AYARLANIYORDeclare HSERIAL_TXSTA = 100100  ' SERİ PORT VERİCİ 'MODÜLÜ AÇILIYOR - pickat 'pin:TX1 (portc.7)
Declare HSERIAL_SPBRG  = 129  '20mhz kristal için verilen değer, Pickat 'üzerinde 20 mhz kristal 'bulunuyor.
'Declare HSERIAL_SPBRG = 64  '10mhz kristal için verilen değer...'Declare HSERIAL_SPBRG= 12  '8mhz kristal için verilen değer...
Dim verial As DWord ' GELEN GENEL DATA
Dim GPSSAAT[7] As Byte ' GENEL DATADAN AYRIŞRITILAN ZAMAN BİLGİSİ DEĞİŞKENİ
Dim MESAJ[9]  As Byte ' GENEL DATADAN AYRIŞRITILAN KUZEY DOĞU KOORDİNAT 'BİLGİLERİ DEĞİŞKENİ
Dim SAY As Byte ' SAYAÇ DEĞİŞKENİ
TRISA = 000001
TRISB = 000011
TRISC = %10000000
PORTA=0
PORTB=0
PORTC=0
verial = 0
Cls

gps_al1:  'GPS saat verisi

HSerIn [verial,skip 5,Str GPSSAAT\12]  'GELEN BİLGİ 5. KARAKTER DEĞERİ VE SONRASI 'ZAMAN SAAT VERİR

'GELEN DEĞERLERDEN 48 ÇIKARILARAK LCD KARAKTER GÖSTERİMİNE 'HAZIRLANIYOR:
For SAY=0 To 6
  GPSSAAT[SAY]=GPSSAAT[SAY]-48
Next
'GREENWICH 3 SAAT ZAMAN FARKI DÜZELTME KODU:
If GPSSAAT[1] <= 9 Then
GPSSAAT[1] = GPSSAAT[1] + 3
End If

If GPSSAAT[0] = 1 Then
GPSSAAT[1] = GPSSAAT[1] - 3
End If
'BİLGİ LCDYE YAZILIYOR:
Print At 1,1,"SAAT :", " ", #GPSSAAT[0], #GPSSAAT[1],":",#GPSSAAT[2],#GPSSAAT[3],":",#GPSSAAT[4],#GPSSAAT[5]  ',#GPSSAAT[6],#GPSSAAT[7],#GPSSAAT[8],#GPSSAAT[9],#GPSSAAT[10]
DelayMS 1700  'bu değerin 1500-1900 ms arasında olması lazım

gps_al2: 'GPS 1. koordinat bilgisi

HSerIn [verial,skip 17,Str MESAJ\9]  'GELEN BİLGİ 17. KARAKTER DEĞERİ VE 'SONRASI 'ZAMAN SAAT VERİR
'GELEN DEĞERLERDEN 48 ÇIKARILARAK LCD KARAKTER GÖSTERİMİNE 'HAZIRLANIYOR:
For SAY=0 To 8
  MESAJ[SAY]=MESAJ[SAY]-48
Next

'BİLGİ LCDYE YAZILIYOR:
Print At 2,1,"KUZEY:"," ", #MESAJ[0],#MESAJ[1],".",#MESAJ[2],#MESAJ[3],".",#MESAJ[5],#MESAJ[6]  DelayMS 1700  'bu değerin 1500-1900 ms arasında olması lazım

gps_al3: 'GPS 1. koordinat bilgisi

HSerIn [verial,skip 31,Str MESAJ\9]  'GELEN BİLGİ 31. KARAKTER DEĞERİ VE 'SONRASI 'ZAMAN SAAT VERİR
'GELEN DEĞERLERDEN 48 ÇIKARILARAK LCD KARAKTER GÖSTERİMİNE 'HAZIRLANIYOR:
For SAY=0 To 7
  MESAJ[SAY]=MESAJ[SAY]-48
Next

'BİLGİ LCDYE YAZILIYOR:
Print At 3,1,"DOGU :"," ", #MESAJ[0],#MESAJ[1],".",#MESAJ[2],#MESAJ[3],".",#MESAJ[5],#MESAJ[6] 
DelayMS 1700  'bu değerin 1500-1900 ms arasında olması lazım
Cls

GoTo gps_al1
End

Gps modülden alınan ham veri, usb-serial modül ile gps sensörü bağlantısı kurulduğunda terminal programda görülen değerlerdir:


$GPRMC,112702.00,A,3946.64705,N,03033.56412,E,0.032,,280819,,,A*73
$GPVTG,,T,,M,0.032,N,0.059,K,A*2E
$GPGGA,112702.00,3946.64705,N,03033.56412,E,1,08,1.17,793.7,M,37.9,M,,*5C
$GPGSA,A,3,27,10,08,32,14,18,20,21,,,,,2.36,1.17,2.05*05
$GPGSV,4,1,14,01,13,293,18,04,48,181,21,08,57,292,15,10,52,045,36*7D
$GPGSV,4,2,14,11,20,305,19,14,38,157,10,16,06,204,,18,35,302,18*7A
$GPGSV,4,3,14,20,26,057,35,21,14,103,27,22,13,245,,24,01,051,*7A
$GPGSV,4,4,14,27,64,193,40,32,53,129,39*73
$GPGLL,3946.64705,N,03033.56412,E,112702.00,A,A*61


Örnek bir görsel ham veri için:









devamını oku ...

9 Temmuz 2019 Salı

pic18f2550 usb hid klavye demo keyboard mouse fare


Pic18f2550 ile klavye demo çalışması proton basic ile hazırlandı. Proton ide ver: 1.4.0.6 derleyici ver: 3.2.5.5 Test platformu pickat geliştirme kartı. Aşağıdaki linkten kod indirilebilir.

https://drive.google.com/file/d/1LZW7RHX1IHTV5L1vLnvArpcXhh2UfzLt/view?usp=sharing

Ayrıca aşağıdaki linktende ham haldeki proton fare kodu indirilip incelenebilir:

https://drive.google.com/file/d/1DKUkiBAvGQ3fbVNoPiZgJEcGsPAII-a0/view?usp=sharing



devamını oku ...

3 Temmuz 2019 Çarşamba

Webusb api



Hazırlanacak web tarayıcı üzerinden usb bağlantısı kurmak için örneklere linklerden ulaşılabilir:

https://wicg.github.io/webusb/

https://www.visuality.pl/posts/webusb-bridge-between-usb-devices-and-web-browsers
devamını oku ...

16 Haziran 2019 Pazar

tekneler için kekamoz yosun önleyici devre




Ultrasonic Anti fouling devresinde tl499a, pic12f675 entegreleri kullanılmış 12 volt dc ile çalışıyor ultra sonik transduser (piezzo sonic hoparlör) sürücü için FTD29 trafo kullanılmış büyük ihtimal yerine ETD29 kullanılabilir trafo sarım detayları resimli olarak anlatılmış.
PIC12F675 Yazılımı assembly dile ile yazılmış kaynak .asm, .hex kodları pcb baskı devre, devre şeması kutu ölçüleri osiloskop ölçüm grafikleri var.
Transducer piezzo sonic hoparlör sürüm voltajı çok yüksek 250v…800v ac devre testlerinde, çalışırken trafo çıkışına dokunmayın teklikelidir.
Kekamoz yosun gibi teknelere yapışarak yaşayan asalak canlıları temizlemek için birebir.
Son olarak belki devrenin frekansı değiştirilerek evlerde, bahçelerde bulunan zararlılar, haşereler içinde ultrasonik fouling devresi kullanılabilir :)
NOT: Bu tip devrelerde kullanılan piezo elektirik malzeme önemlidir. Aşağıdaki linkten uygun piezoları temin edebilirsiniz.

http://www.analysiselectronic.com/?product=1816478&pt=Piezo+Seramik+

Kaynak: 
http://www.320volt.com 
http://www.siliconchip.com.au/cms/A_112107/article.html


devamını oku ...

15 Haziran 2019 Cumartesi

pusula devresi hmc5883L ccs c pic c

HMC5883L dijital pusula modülü ile hazırlanmış devrede pic18f4550 işlemcisi kullanılmış. Proje ccs c dosyalarını aşağıdaki linkten indirebilirsiniz.

CCS C PIC C pusula devresi download

Kaynak youtube videosu projenin çalışması:

https://www.youtube.com/watch?v=Rji4lxLLp9A&t=31s

Benzer pusula devreleri:

https://www.elektroinfo.org/2009/02/elektronik-pusula-devreleri.html


devamını oku ...

pic16f84 gps pic basic pro pbp projesi



Etepic forumunda denk geldiğim bir proje. Pic ile gps projesi yapmak isteyenler kullanabilir. Proje her ne kadar pic16f84 için yapılmış olsada pic16f628a pic16f877 pic18f2550 gibi işlemcilerle farklı gps modüllerde kullanılabilir.

Önemli not: Dünyanın bir ucunda üretilmiş gps modül, Türkiye'ye getirilip çalıştırıldığında stabil olması 30 dakikayı bulabilir. Bu süre sonunda sağlıklı çalışır. Ayrıca ilk enerji verildikten 30 saniye sonra koordinatı seri iletişim portundan verebilir. Bütün bu testleri açık alanda yapmayı unutmayın. Uyduların koordinat bilgisi kapalı mekanlardan alınamaz.

Pic16f84 gps projesi download


Diğer gps bilgileri:



devamını oku ...