Hazırlayan: H. Yakupoğlu – Visual Basic 6 ile seri port kullanımı hakkında faydalı bir çalışma ayrıca program kaynak kodları ve seri port üzerinden led yakma hakkında bilgiler bulunuyor. Emeği geçen hazırlayan kişilere teşekkürler.
Açıklama: Program vb 6.0 da yazılmıştır Basit bir uygulama gibi görünüyor ancak seri portun çalışma mantığının anlama bakımından çok yararlı bence . Vb te seri portu kullanmak için 2 seçenek var. bunun ilki API ile bunun için modül oluşturmamız gerekiyor buda baya bi uğraş gerekiyor.
İkinci yol ise bizim kullandığımız yol bu özellik vb6 nın bize sağladığı avantaj Microsoft Comm Control nesnesini ile seri portla kolayca iletişim kurulabiliyor. Bunu eklemek için resimleri izlemek yeterli.
Şimdide cam görüntüsü almak için modül ekleyelim..
Modüle gerekli kodları yazdıktan sonra modül penceresini kapatıyoruz.
Şimdide seri port çıkışı için devre şeması
Zenerin amacı hepinizin bildiği gibi led üzerindeki gerilimi 12V tan zener gerilimi olan 5.1V a düşürmek. Aslında şekildeki kırmızı renki pinlerin hepsi çıkış pini ben tercih olarak 7. pini tercih ettim çıkış pinlerinin hepsi ilk durumda -12V değerindedir.
Programı çalıştırıp 7 .pine çıkışp verdiğimizde +12V a yükselir. Seri portun 5. bacağı şekildeki gibi 5. bacaktır.akımı sınırlamak için bir dirençte kullanılmıştır.Bununla beraber seri port çıkışı iletişim halinde 49 mA seviysindedir.
!!!! Dikkat etmesi gereken bir husus burada led kullanıldığı için led enerjisini direk seri porttan almıştır .Motor kontrolü gibi uygulamalarda seri port çıkışı doğrudan motora bağlamamak gerekir.Motor kalkış anında fazla akım çekmek istediğinden seri port bunu karşılayamaz ve motor dönmez .En kötü ihtimal seri port yanar 😀 ama korkmayın ben denedim bir şey olmuyor bende sadece motor hareket etmedi o kadar 😀
Motor kullanacaksanız transistorle sürmeniz daha mantıklı H- köprüsüyle akımı yükseltirsiniz çok daha güzel olur bunun için tabi dışarıdan bir beleme gerekli.
Neyse kodlar aşağıda size kolay gelsin unutmayın “BİLGİLER PAYLAŞTIKÇA ÇOĞALIR”
H. Yakupoğlu
SAÜ EEM
