A

pc -> pic seri iletişim [YARDIM]

Başlatan ahmet22, 16 Aralık 2012, 12:45:10

ahmet22

Öncelikle herkeze kolay gelsin arkadaşlar.
Yapmaya çalıştığım şey bilgisayarın com portundan picle seri iletişim haline geçmek.
Kullanacağım programı vb6 ile kendim yazacağım fakat komutu ne şekilde göndereceğimi bilmiyorum.

MSComm1.Output = "Komut Buraya" vb6 ile bu şekilde komut yollanıyor

hSerIn , [WAIT ("ETE"),INPUTDATA]  pic tende bu şekilde komut alınıyor bildiğim kadarıyla ama vb6 dan yollayacağım komutun nasıl olucağını bilmiyorum bilgisi olan varsa yardım edebilirmi.

Şimdiden Teşekkürler.


halilgaliç

#1
pc programında
  MSComm1.PortOpen = True
            MSComm1.Output = Chr(254)
            MSComm1.PortOpen = False


pic ten ise
HSERIN [GELEN]; alınan bilgi gelen=254  şeklinde olacak


ahmet22

wait komutu yazmama gerek yok yani öyle mi

halilgaliç

seri iletişim kesmesi kullan hiç bir sıkıntı olmaz

ahmet22

şu konu hakkında elinde döküman makale olan varsa yqayınlayabilirmi kafayı yemek üzereyim  :-\

halilgaliç


ahmet22

@ DEVICE pic16F877a, HS_OSC
@ DEVICE pic16F877a, PROTECT_OFF 'Kod Korum açık

DEFINE OSC 12
Include "MODEDEFS.BAS" 'Seri İletişim İçin Gerekli

ADCON1 = 7
TRISA=%00000000   :PORTA=0
TRISC=0 :TRISC.7=1 :TRISC.6=0  :PORTC=0

DEFINE HSER_RCSTA 90h
DEFINE HSER_TXSTA 20h
DEFINE HSER_BAUD 2400

INTCON = %11000000            
ON INTERRUPT GoTo Com_Oku         
PIE1.5 = 1

GELEN VAR WORD
CLEAR
BASLA:

IF GELEN=251    THEN HIGH PORTA.5
IF GELEN=250    THEN LOW PORTA.5
   
IF GELEN=249    THEN HIGH PORTA.4
IF GELEN=248    THEN LOW PORTA.4

IF GELEN=247    THEN HIGH PORTA.3
IF GELEN=246    THEN LOW PORTA.3

IF GELEN=245    THEN HIGH PORTA.2
IF GELEN=244    THEN LOW PORTA.2

GOTO BASLA

Disable
COM_OKU:

HSERIN [GELEN]
PAUSE 10


INTCON = %11000000         
PIE1.5 = 1                 
resume         
ENABLE

End


bu kodlarını kullandım

devreyide aşağıdaki gibi kurdum ama simulasyonda çalıştıramadım nerde hata yapıyorum ben :(



halilgaliç

ben direkt devre üzerine yazmıştım sema bile cizmedim donanımda çalışıyor similasyon için bi şey söyleyemiyecem

ahmet22

max 232 kullanmak gerekiyormu peki donanım üzerinde yoksa direk porttan pic e mi bağlıcağım

halilgaliç

#9
max 232 kullanabilirsin ama sadece pc pice bağlantı yapacaksan şunuda kullanabilirsin
http://www.upload.gen.tr/d.php/www/d37xb5yu/txxx.bmp.html

Powered by EzPortal