Parallelports programering!

[Arrowfredde]

Hejsan!
Jag hade tänmkt att börja lite med att programera parallelporten..
Jag kan typ inte mycket alls men jag har börjat med att styra en led i Visual Basic..

För att tända den är min code:

Kod: Markera allt

Private Sub Command1_Click()
Port1 = 888
Out Port1, 1
End Sub

Och för att stänga av den:

Kod: Markera allt

Private Sub Command2_Click()
Port1 = 888
Out Port1, 1
End Sub

Nu är det så att jag vill gp vidare och lära mig att styra flera led:s..

Jag trodde då att man skulle byta till det här men det funkade ju inte heller

Kod: Markera allt

Private Sub Command3_Click()
Port2 = 888
Out Port2, 1
End Sub

Men det vill inte funka...
Vad gör jag för fel?!

Tacksam för hjälp!

//
Fredde

[speakman]

Nu är just exemplet med Port2 _exakt_ identiskt med exemplet med Port1.
Port1 är bara en variabel, och att byta namn på den gör nog ingen lycklig.
Testa däremot Out Port1, 3 eller än hellre Out Port1, 255 och se vilka pinnar som ändrar sig.

Mvh
speakman

[benring]

Kör du den koden i Visual Basic??

Qbasic har den koden vet jag men den funkar inte på WINXP (Eller NT) då porten e strypt så du kommer inte åt den så direkt längre.

Vilket OS kör du?


/B

[RDX*]

Du kan titta in hos Geekhideout där finns info och *.dll filer som hjälper dig att komma åt parallellporten från VB.

Där finns även programmet parmon. Som simulerar porten så du kan se vilket tillstånd porten är i.

[benring]

visst, denna har jag kört i flera år, funkar kalas, för Visual Basic bla.

http://www.driverlinx.com/DownLoad/DlPortIO.htm

Det jag undrade var om han kör den koden ovan i visual basic?
Och vilket OS?



/B

[Arrowfredde]

Hejsan!
jag kör Visual Basic och har windows XP på datorn, jag har även Port I/O installerat på datorn..

[benring]

Aha, jamen dåså

Fick du ordning på det?



/B

[Arrowfredde]

Nej alltså jag hade Port I/O installerat på datorn sen innan, det jag inte förstår är vad jag ska ändra i koden för att få andra portar att fungera lika..

[Icecap]

Testa med 632 i stället för 888....det är ju portnumret eller hur?

[speakman]

Jag förutsatte att du ville styra fler LEDs från samma parallellport. Då borde mitt förslag fungera. Ska du kontrollera en helt annan parallellport?

Mvh
speakman

[SvenPon]

Du kan ta hem mitt program Parallellport experiment skrivet i VB

http://www.pellesoft.se/communicate/use ... spx?tid=53