paralelni port i VB6

paralelni port i VB6

offline
  • prm 
  • Građanin
  • Pridružio: 11 Jun 2006
  • Poruke: 94

Kako pomocu VB-a slati na paralelni port neke bitove, i mislim da zavisi u kojem je OS?

Ako neko ima neki jednostavan primjer ili nesto slicno...

Ako ima neka komponenta ili nesto tako slicno....



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
offline
  • Pridružio: 25 Maj 2007
  • Poruke: 114
  • Gde živiš: Novi Sad, Sombor

U VisualBasic-u moras napraviti modul sa sledecim sadrzajem:

Public Declare Sub out0 Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)
Public Declare Function inp0 Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer



a onda to sto si definisao u modulu koristis u svom programu.

Na racunaru moras imati inpout32.dll koji pozivas u modulu:
mycity.rs/must-login.png


Slanje na paralelni port:

Call out0(ADRESA, Vrednost)

ADRESA za paralenlni port je 378H za LPT1 ( 888 decimalno ) ili 278H za LPT2.
VREDNOST se krece iz intervala 0 - 255. ( u zavisnosti koji od 8 bitova postavljas na jedinicu a koji na nulu )

Ucitavanje sa paralelnog porta:

a=inp0(ADRESA)

( u VB nikad nisam ucitavao, ali kod QBasic-a sam za ucitavanje koristio adresu 891 decimalno )

Za statusne i kontrolne bitove koristis druge adrese ( sve je napisano na slici )



offline
  • prm 
  • Građanin
  • Pridružio: 11 Jun 2006
  • Poruke: 94

Stvar je sledeca meni to netreba ali treba mom prijatelju. Stvar je sledeca nasao sam neki kod koji slecno ovome izgleda tako da moze da upali neke diode ali izgleda da nemoze da prima podatke jerbo imamo neki problem!
Koristi je isti dll i nasli smo kod prijatelja u internet klubu. Ali posto covek oce da pravi DzuBoks mora da ocitava podatke....
Ja odavno nisam radio sa Vb-om tako mi treba neki lakse citljiv kod a kolega je vise elektronicar tako da mora malo da nadje nesto bez pono teoretisanja i tako....
HH

Pomoglo bi kada bi neko znao koje jos imaju funkcije u tom dll-u

offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

Status portove koristis za ucitavanje. Tu znaci treba da dovedes napon od 5V da bi mogao da detektujes neke promene pomocu ovog dll-a. Kada deklarises inpout32.dll onda mozes na dugme da stavis kod

a = inp0(891) MsgBox a

I kao rezultat ces da dobijes broj koji treba da pretvoris u binarni (ako se dobro secam) i onda dobijes rezultat recimo 0101 sto znaci da na Status portu (konektori S2 i S4) postoji napon... Toliko za sada a napisem obsirnije kad se vratim sutra iz skole Razz

offline
  • prm 
  • Građanin
  • Pridružio: 11 Jun 2006
  • Poruke: 94

dobro nego kako da saznam sve funkcije koje mogu da koristim iz ovoga dll- a kako i konstante i tako te interesantne zanimacije.....


HH

offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

http://logix4u.net/Legacy_Ports/Parallel_Port/How_Inpout32.dll_works_.html

mozda ovo pomogne? Bebee Dol

offline
  • prm 
  • Građanin
  • Pridružio: 11 Jun 2006
  • Poruke: 94

pa valjda oce covek oce da pravi dju-box pa valjda tu ima sto mu treba. Ja sam samo onako ovlas pogledao i ako nudi ono sto i obecava nece biti lose ako mogu tako reci.


Ok sutra skidam to sa toga sajta i uz pomoc B. bice kako treba valjda....


HH

Dopuna: 14 Mar 2008 22:31

ok napravio drug sve sto mu trebalo moze sada da se zakljuca i ova temica i to sto je napravio je nesto mnogo fino


\...

offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

Jel moze vamo da se postavi source? Jes da ga ne mozemo testirati posto nemamo isti uredjaj koji bi prikljucili na paralel port ali barem da vidimo o cemu se radi Smile

Ko je trenutno na forumu
 

Ukupno su 989 korisnika na forumu :: 21 registrovanih, 5 sakrivenih i 963 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 4channer, _Rade, amaterSRB, BSD, darkangel, djboj, DonRumataEstorski, draganl, goxin, hyla, ILGromovnik, JOntra, kinez88, kybonacci, m0nstrum_, Marko Marković, milenko crazy north, nenad81, radionica1, Valter071, vathra