basit (ATMEGA328) arduino yu vb6 ile haberleştirmek

[yasin_570]

hem arduino hemde vb6da bu basit uygulamayla uygulamalarınızı dahada genişletebilirsiniz işim yogun olduğu için 2-3 ay sonra görüşmek üzere.



arduino ya yüklenecek kod




int led12=12;


void setup()
{
Serial.begin(9600);


pinMode(led12,OUTPUT);


}






void loop()
{
if(Serial.available()){
int data=Serial.read();
if(data=='a')
{
digitalWrite(led12,HIGH);
delay(10);




}
else
{
digitalWrite(led12,LOW);
delay(10);




}
}
}











************************************************************
vb6 ya declare edecegimiz kod


Private Sub Command1_Click()
statusLED = "a"
MSComm1.Output = statusLED
End Sub


Private Sub Form_Load()
MSComm1.RThreshold = 1
MSComm1.InputLen = 1
MSComm1.Settings = "9600,n,8,1"
MSComm1.CommPort = 1
MSComm1.DTREnable = false


MSComm1.PortOpen = True




End Sub


(bilenlerin daha çok kişi öğrenmesi için bilgi paylaşımı yapması gerek bu var olan artılarımızı eksiltmez)