Favorilerine Ekle | Giriş Sayfan Yap | Tavsiye Et

 

Kurs Tanıtım Sayfası | Süper Üye Kimdir? | Menü Tasarımı Konulu Örnek Ders
Kod İndir| Hazır Kodlar | Makaleler| İpuçları | VB .NET Kursu | Dersler | Forum | Alt Bölümler | Servisler
    Merhaba Misafir
    anasayfa » visual basic makaleleri » Paralel Port LPT Kontrol ( Gelişmiş ) Herşeyi Anlıcaksınız...
Üye Girişi
Kullanıcı Adı:  
Şifre : 
Kaydet ?
Siteden tam olarak faydalanabilmek için üye olmalısınız.
Unuttuğunuz şifrenizi öğrenebilmek için kayıt sırasında verdiğiniz Hatırlatma Cevabı'nı bilmeniz gereklidir.
Şifre hatırlatma işlevini sadece 3 defa kullanma hakkınız vardır.
Kullanıcı adını ve şifresini unutan üyelere email ile yardım verilmez.

Aktivasyon Gelmedi mi?Aktivasyon mesajınız email adresinize gelmedi mi?
Buraya tıklayarak bir kez daha aktivasyon mesajı gönderilmesini sağlayabilirsiniz.
Lütfen email hesabınızın BULK ve SPAM klasörlerini de kontrol ediniz.
Rastgele Makale

Mp3 Calici

Yazar: Aytac
Basit bir mp3 uygulamasi. Acemiler icin cok uygun. Gerekli olanlar 1 CommonDialog nesnesi - 3 Button - 1 PictureBox - 1 Timer - 4 Label nesnesi. Kolay gelsin


Webmasterlar
Sitenize Ekleyin!
Sitenizde "Son Eklenen 10 Visual Basic Yazısı"'nı göstermek ve içeriğini zenginleştirmek için buraya tıklayınız.

Vbasicmaster.com'a link verin!
Aşağıdaki minik banneri sitenize eklemek için tıklayın!

Üye Sayısı:
Ziyaretçiler nerede?
Yayın № : 11058
Yayın Tar:22.02.2009
Yazar : takcancan
Hit :1746

Bu Yazarın Yazıları Sadece bu yazarın makale göster
Bu Yazıyı Tavsiye Et

Merhaba Bu Kodlar İle Bilgisayarda İstediğinizi Yapıcaksınız...

INPOUT32.DLL Elinizde Yoksa internette Bulabilirsiniz... INPOUT32.DLL İndirdikten sonra Windows System32 İçerisine Atınız Ve
Vb de Formunuza Module Ekleyin Ve Bu kodları Yazın

---- Buradan Aşşağısını Yapıstırın ---

#If Win32 Then
Public Declare Function Inp Lib "inpout32.dll" _
Alias "Inp32" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout32.dll" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

#Else
Public Declare Function Inp Lib "inpout16.Dll" _
Alias "Inp16" (ByVal PortAddress As Integer) As Integer
Public Declare Sub Out Lib "inpout16.Dll" _
Alias "Out16" (ByVal PortAddress As Integer, ByVal Value As Integer)
#End If
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

---- Buraya KAdar Olanı Module Yazınız ---

Şimdi Formunuzda
Declare Kısmına
Dim adres as integer Yazın

Form_Load Kısmına adres = &H378 Yazınız. Lpt Yazıcı Portunuzun Genel Adresi &H378 dir.

şimdi bunları bir kenara bırakıp

veriler ve acılcak portlardan konusalım sonrada buton click olayını koonusucaz

Bu Portun 25 Pini vardır. bu pinlerin 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 18 - 19 - 20 - 21 - 22 - 23 - 24 - 25 Nolu Pinlerini Kullanıcaz

şimdi 2 nolu pine +5 volt göndermek için 1
3 nolu pine +5 volt göndermek için 2
4 nolu pin +5 volt göndermek için 4
bu sekilde her pinde 2 katı yazılır

tüm hepsini açmak için ise 255 yazılır

şimdi buton click olayına out adres, 1 yazdıgımızda 2 nolu pin +5 volt olur
out adres, 2 yazdıgımızda 3 nolu pin +5 volt olur
bu sekilde dvm etmektedir

+5 volt olanları kapatmak için ise out adres, 0 yazılır

kalan 18 19 20 21 22 23 24 25 nolu pinlerin hepsini birleştiriyoruz bunlar ise ( - ) voltu Temsil Etmektedir

şimdi ise yöneteceğimiz elektronik eşyalara geçelim

İsterseniz Elektronikcilerden BC237 Transistörünü Alınız İsterseniz İse 5 voltluk röle alırız. Ve Deneme Amaçlı 1 tanede Led alınız.
BC237 Transistör Alırsanız bu Parçanın 3 Bacağı Vardır.
Collector - Base - Emiter Uçları Vardır. Base ucuna portun 2 nolu pinini baglarız böylece 2 nolu pin +5 volt oldugunda transistörün collector ve emitor uclarında bi iletkenlik olur..
herneyse baseye 2 nolu pin girdikten sonra
collector e pilin + kutbunu bağlatınız emitör ise Led Yada Ampulun Ucunu Bağlayınız Ampulun diger Ucunu Pilin - kutbuna ve yine pilin - kutbuna portta köprülediğimiz 18 19 20 21 22 23 24 25 nıolu uçları pilin - sine veriyoruz

böylece butona tıklanınca transistör tetiklenmiş ve led yada apmul yanmıs oluyor burada led yada ampul yerine çeşilti şeyler baglayabilirsiniz hatta yeterli besleyip kapı otomatiği baglayıp evinizin kapılarını bile pc le açıp kapatın :D

röle kullananlar için ise 2 nolu pini rölenin bi bobin ucuna 18 19 20 21 22 23 24 25 nolu uçlar ise rölenin diger bacagına baglanır ve rölenin NO normal Open Normalde Açık Kontagı Vardır Bu kontagın bi ucuna pilin + sını diger ucuna ledi ledin diger ucunu pilin -sine ve ampulun diger ucunu - ye takınız. Not: Role Kullananlar Köprülenen Pinleri pilin - kutbuna takmanız gerekmez.

Eğer Yapadığınız bir Şey Olursa ak_tayfun_gs@hotmail.com





Yorumlar, eklemeler ve düşünceler
        hııım güzel bilgi sağol

   cyberworm, 23.02.2009 23:47
© Hakan Ersöz 2000-2013| Üyelik Sözleşmesi | | Ödeme Bildirimi
Sitemizden yenilikleri hemen öğrenin, pop upları engelleyin, chat yapın... ToolBarımızı indirin:
Vasicmaster Toolbar'ı indirin