Toon posts:

[vb6] me leds aansturen met deze schakeling

Pagina: 1
Acties:

Verwijderd

Topicstarter
ik heb dus deze schakeling gemaakt en aan me LPT1 poort van een oude P100 hangen (geen zin om me MoBo op te blazen als me kat over de draadjes van m'n schakeling heen loopt :+ ):

Afbeeldingslocatie: http://www.endoria.net/upload/?bekijk=1013702142

dit heb ik dus gebouwd, nou wil ik dat aansturen uit een VB6 programma'tje. natuurlijk effe op pscode gezocht, en dit gevonden.

hier staat hoe je waarden naar je LPT poort ken sturen, en er staat dat je die code ook voor VB6 kan gebruiken.

hier staat welke waarden je naar je poortje moet sturen om de ledjes te laten branden, maar dit is een iets andere schakeling. werkt dit ook op de schakeling hierboven???

Verwijderd

Je moet op BIT nivo denken

1 = 1e ledje
2 = 2e ledje
4 = 3e ledje
8 = 4e ledje (etc)

2e & 3e ledje zijn dus 2 + 4 = 6 schrijven.

Dat werkt OOK met bovenstaande schakeling.

Verwijderd

Topicstarter
dus dat word dan:
code:
1
2
3
Open "LPT1:" For Output Access Write As #1
Print #1, "5"
Close #1

En dan gaan de eerste en 3e branden????
en als je hem dan weer op 0 zet gaan ze allemaal uit???

want dan lijkt hem me wel heer erg simpel :7

Verwijderd

jep zo simpel is het D7 .. D0 vormen een byte. heb ik ook in delphi, alleen daar stuur ik geen ledjes meer mee aan, maar een i2c bus.

D7..D0 zin bereikbaar via het basisadres (278)

zie ook http://www.doc.ic.ac.uk/~ih/doc/par/index.html#index

en

http://www.doc.ic.ac.uk/~ih/doc/par/doc/regpins.html

  • jelmervos
  • Registratie: Oktober 2000
  • Niet online

jelmervos

Simple user

Direct naar poorten schrijven werkt niet in Windows NT/2000/XP

"The shell stopped unexpectedly and Explorer.exe was restarted."


Verwijderd

oplossing hiervoor: http://www.ise.ufl.edu/esi4161/files/direct_io/
dan kan het wel (heb ik gelezen in het geweldige boek schakelingen voor de buitenwereld, elektuur, isbn 90-5381-140-0)


Verwijderd

Topicstarter
maar ik snap et nog niet helemaal, moet je nou het ene pootje op de 2 en de andere op de 18, en dan het volgende ledje op de 3 en de 19, dus zo:

2-18
3-19
4-20
5-21
6-22
7-23
8-24
9-25

of kan je al die andere gewoon bij elkaar op een pootje stoppen of maakt het niet uit welke gnd je op welk pinnetje doet???

Verwijderd

gnd = gnd, die zitten allemaal aan elkaar, meet maar eens de weerstand tussen 18 en 23 ofzo --> 0!

Verwijderd

Topicstarter
wheheheehe hij doet et niet ;(

ik gebruik dus parport om het effe te checken,
en hij geeft Error, select, ACK, PE en Busy allemaal hoog aan,
en als ik hem op een andere port zet heeft ie busy uit.
alles zit goed en ik heb de gnd allemaal bij elkaar op 1 pin gedaan. geen broken cables, heb ik al doorgemeten. wat kan hier nogmeer fout zijn?

als ik met een simpel proggie 5 wegschrijf dan freezed ie, daar staat ook iets over bij dat snippet op pscode:
Side Effects:If the data is sent to the printer port (LPT1/2) and the printer is off or not connected, the program may freeze.
heb em geprobeert te draaien op W98SE
Pagina: 1