Parallelport

Übersicht

BlitzBasic

DLLs und Userlibs

Gehe zu Seite 1, 2, 3, 4, 5 Weiter

	BtbN Betreff: Parallelport	Do, Aug 25, 2005 20:59 Antworten mit Zitat
Die DLL: http://www.activevb.de/tutoria...t32dll.zip Die decls-Datei: Code: [AUSKLAPPEN] [EINKLAPPEN] .lib "inpout32.dll" Out32%(PortAddress%,Value%):"Out32" Inp32%(PortAddress%):"Inp32" PortAdresse für den Paralelport ist 888, Hilfe findet ihr hier: http://www.activevb.de/tutoria...allel.html Funktionen zur Vereinfachung kommen gleich ^^

BtbN

Betreff: Parallelport

Do, Aug 25, 2005 20:59
Antworten mit Zitat

Die DLL: http://www.activevb.de/tutoria...t32dll.zip

Die decls-Datei:

Code: [AUSKLAPPEN]

.lib "inpout32.dll"

Out32%(PortAddress%,Value%):"Out32"
Inp32%(PortAddress%):"Inp32"

PortAdresse für den Paralelport ist 888, Hilfe findet ihr hier:
http://www.activevb.de/tutoria...allel.html

Funktionen zur Vereinfachung kommen gleich ^^

Zuletzt bearbeitet von BtbN am So, Sep 25, 2005 20:15, insgesamt einmal bearbeitet

	Mr Hopp	Di, Aug 30, 2005 10:54 Antworten mit Zitat
Vorallem is das tut nich für BB, naja, welchen wert soll ich denn eingeben?(Out32(888,?)

Mr Hopp

Di, Aug 30, 2005 10:54
Antworten mit Zitat

Vorallem is das tut nich für BB, naja, welchen wert soll ich denn eingeben?(Out32(888,?)

	BtbN	Di, Aug 30, 2005 14:16 Antworten mit Zitat
Das Tut hat Folgendes geschrieben: Der Wert gibt die Zustände der Datenleitungen an, so wird z.B. Datenleitung 0 mit dem Wert 1 angesteuert, Leitung 2 hat den Wert 4. Also immer 2^n (n=Datenleitung 0 - 7) . Um mehrere Datenleitungen anzusteuern kann man einfach die Werte addieren. Um alle auszuschalten ist es der Wert 0. Beim Einlesen funktioniert das ganze eigentlich ebenso, nur wird dazu der Befehl Wert = INP [Adr.] verwendet. Hier ne funktion, mit der man einzelne Pins an/aus schalten kann: BlitzBasic: [AUSKLAPPEN] [EINKLAPPEN] Dim pins%(7) Function ParalelConf(pin%,an%) Local tru If an <> 0 Then tru = 1 Else tru = 0 EndIf If pin% < 8 And pin% >= 0 Then pins%(pin%) = tru Local wert = 0 For i = 0 To 7 If pins%(i) = 1 Then wert = wert + (2^i) Print (2^i) EndIf Next Print wert Out32(888,wert) End Function

BtbN

Di, Aug 30, 2005 14:16
Antworten mit Zitat

Das Tut hat Folgendes geschrieben:

Der Wert gibt die Zustände der Datenleitungen an, so wird z.B. Datenleitung 0 mit dem Wert 1 angesteuert, Leitung 2 hat den Wert 4. Also immer 2^n (n=Datenleitung 0 - 7) . Um mehrere Datenleitungen anzusteuern kann man einfach die Werte addieren. Um alle auszuschalten ist es der Wert 0. Beim Einlesen funktioniert das ganze eigentlich ebenso, nur wird dazu der Befehl Wert = INP [Adr.] verwendet.

Hier ne funktion, mit der man einzelne Pins an/aus schalten kann:

BlitzBasic: [AUSKLAPPEN]

Dim pins%(7)
Function ParalelConf(pin%,an%)
 Local tru
 If an <> 0 Then
  tru = 1
 Else
  tru = 0
 EndIf
 If pin% < 8 And pin% >= 0 Then pins%(pin%) = tru
 Local wert = 0
 For i = 0 To 7
  If pins%(i) = 1 Then
   wert = wert + (2^i)
   Print (2^i)
  EndIf
 Next
 Print wert
 Out32(888,wert)
End Function

	Mr Hopp	Di, Aug 30, 2005 14:25 Antworten mit Zitat
Unknown runtime exception -> Out32(888,1)

Mr Hopp

Di, Aug 30, 2005 14:25
Antworten mit Zitat

Unknown runtime exception

-> Out32(888,1)

	BtbN	Di, Aug 30, 2005 14:32 Antworten mit Zitat
Bei mir nich. Hat dein PC nen Parallelport? ^^

BtbN

Di, Aug 30, 2005 14:32
Antworten mit Zitat

Bei mir nich.
Hat dein PC nen Parallelport? ^^

	Mr Hopp	Di, Aug 30, 2005 14:35 Antworten mit Zitat
Türlich, son langes rotes Steckteil mit nem Druckersymbol drüber, das musser sein(Ich denk ma, das mit den 25 ein und ausgängen kommt auch hin)

Mr Hopp

Di, Aug 30, 2005 14:35
Antworten mit Zitat

Türlich, son langes rotes Steckteil mit nem Druckersymbol drüber, das musser sein(Ich denk ma, das mit den 25 ein und ausgängen kommt auch hin)

	BtbN	Di, Aug 30, 2005 14:39 Antworten mit Zitat
Dann ka, bei mir funzt meine Leuttafel auf diese Weise super xD

BtbN

Di, Aug 30, 2005 14:39
Antworten mit Zitat

Dann ka, bei mir funzt meine Leuttafel auf diese Weise super xD

	D2006 Administrator	Di, Aug 30, 2005 14:44 Antworten mit Zitat
Das Ding macht mit Windows XP und 2000 Mucken. Denke es liegt daran. Bei mir funzte es wohl zu derzeit als ich es testete (und ein entsprechender, sehr interessanter Thread hier aktuell war) auch nicht. MfG D2006

D2006

Administrator

Di, Aug 30, 2005 14:44
Antworten mit Zitat

Das Ding macht mit Windows XP und 2000 Mucken.
Denke es liegt daran. Bei mir funzte es wohl zu derzeit als ich es testete (und ein entsprechender, sehr interessanter Thread hier aktuell war) auch nicht.

MfG
D2006

	Mr Hopp	Di, Aug 30, 2005 17:52 Antworten mit Zitat
wo is eigentlich die Vereinfachung?

Mr Hopp

Di, Aug 30, 2005 17:52
Antworten mit Zitat

wo is eigentlich die Vereinfachung?

	KHORN	Di, Aug 30, 2005 18:34 Antworten mit Zitat
Sry wegen dumme frage : Was sollen Parallelports sein ? Wozu ist das gut und was kann man damit machen ? Danke^^ Gruß KHORN

KHORN

Di, Aug 30, 2005 18:34
Antworten mit Zitat

Sry wegen dumme frage :
Was sollen Parallelports sein ?
Wozu ist das gut und was kann man damit machen ?

Danke^^

Gruß KHORN

	BtbN	Di, Aug 30, 2005 19:11 Antworten mit Zitat
http://de.wikipedia.org/wiki/Parallelport

BtbN

Di, Aug 30, 2005 19:11
Antworten mit Zitat

http://de.wikipedia.org/wiki/Parallelport

	KHORN	Di, Aug 30, 2005 20:50 Antworten mit Zitat
BORNtobeNAMELESS hat Folgendes geschrieben: Dann ka, bei mir funzt meine Leuttafel auf diese Weise super xD o.O !!!!!!!!!!!!! Wie hast du das denn angestellt ? Wie hast du es mit dem Rechner verbunden o. O ? Das würde mich jetzt sehr interessieren. MfG KHORN

KHORN

Di, Aug 30, 2005 20:50
Antworten mit Zitat

BORNtobeNAMELESS hat Folgendes geschrieben:

Dann ka, bei mir funzt meine Leuttafel auf diese Weise super xD

o.O !!!!!!!!!!!!!
Wie hast du das denn angestellt ?
Wie hast du es mit dem Rechner verbunden o. O ?
Das würde mich jetzt sehr interessieren.

MfG
KHORN

	Mr Hopp	Mi, Aug 31, 2005 12:25 Antworten mit Zitat
Schaut mal bei diesem Tut unter Downloads -> Problemfall bei Windows 2000 und XP -> Die DLL(Dann funzt's auch)

Mr Hopp

Mi, Aug 31, 2005 12:25
Antworten mit Zitat

Schaut mal bei diesem Tut unter Downloads -> Problemfall bei Windows 2000 und XP -> Die DLL(Dann funzt's auch)

	BtbN	Mi, Aug 31, 2005 13:49 Antworten mit Zitat
KHORN hat Folgendes geschrieben: BORNtobeNAMELESS hat Folgendes geschrieben: Dann ka, bei mir funzt meine Leuttafel auf diese Weise super xD o.O !!!!!!!!!!!!! Wie hast du das denn angestellt ? Wie hast du es mit dem Rechner verbunden o. O ? Das würde mich jetzt sehr interessieren. MfG KHORN 1. Nen altes Druckerkabel zerschnitten 2. Alle adern freigelegt und die Isolierung entfernt 3. Ne Leer-Platine genommen, und alle 25 Adern drauf gelötet. 4. Auf die Platine25 steckerchen draufgelötet, sodass ich ne Paralelport-Docking-Station hatte. 5 Dieoden-Ringe an Leitungen 0-4 angechlossen 6. Üba BB Strom auf die Leitungen gegeben. 7. VOILA ^^

BtbN

Mi, Aug 31, 2005 13:49
Antworten mit Zitat

KHORN hat Folgendes geschrieben:

BORNtobeNAMELESS hat Folgendes geschrieben:

Dann ka, bei mir funzt meine Leuttafel auf diese Weise super xD

o.O !!!!!!!!!!!!!
Wie hast du das denn angestellt ?
Wie hast du es mit dem Rechner verbunden o. O ?
Das würde mich jetzt sehr interessieren.

MfG
KHORN

1. Nen altes Druckerkabel zerschnitten
2. Alle adern freigelegt und die Isolierung entfernt
3. Ne Leer-Platine genommen, und alle 25 Adern drauf gelötet.
4. Auf die Platine25 steckerchen draufgelötet, sodass ich ne Paralelport-Docking-Station hatte.
5 Dieoden-Ringe an Leitungen 0-4 angechlossen
6. Üba BB Strom auf die Leitungen gegeben.
7. VOILA ^^

	KHORN	Mi, Aug 31, 2005 16:26 Antworten mit Zitat
Cooool Muss auch mal was ähnliches probieren Zitat: 3. Ne Leer-Platine genommen, und alle 25 Adern drauf gelötet. 4. Auf die Platine25 steckerchen draufgelötet, sodass ich ne Paralelport-Docking-Station hatte. Versteh ich nicht ganz... Muss man ne Lee-Platine haben ? Und was macht es ? PS:Muss mal mein alten Drucker suchen Gruß KHORN

KHORN

Mi, Aug 31, 2005 16:26
Antworten mit Zitat

Cooool
Muss auch mal was ähnliches probieren Very Happy

Zitat:

3. Ne Leer-Platine genommen, und alle 25 Adern drauf gelötet.
4. Auf die Platine25 steckerchen draufgelötet, sodass ich ne Paralelport-Docking-Station hatte.

Versteh ich nicht ganz...
Muss man ne Lee-Platine haben ?
Und was macht es ?

PS:Muss mal mein alten Drucker suchen Rolling Eyes

Gruß KHORN

	KHORN	Mi, Aug 31, 2005 17:38 Antworten mit Zitat
Mr Hopp hat Folgendes geschrieben: Unknown runtime exception -> Out32(888,1) Bei mir auch :*-( (Hab jetz mein Kabel zurechtgeschnitten und der will nicht ) Gruß KHORN

KHORN

Mi, Aug 31, 2005 17:38
Antworten mit Zitat

Mr Hopp hat Folgendes geschrieben:

Unknown runtime exception

-> Out32(888,1)

Bei mir auch :*-(
(Hab jetz mein Kabel zurechtgeschnitten und der will nicht Mad

)

Gruß KHORN

	Mr Hopp	Mi, Aug 31, 2005 18:53 Antworten mit Zitat
Ich hab doch geschrieben, was dagegen hilft -> Windows XP hat ne eigene DLL

Mr Hopp

Mi, Aug 31, 2005 18:53
Antworten mit Zitat

Ich hab doch geschrieben, was dagegen hilft -> Windows XP hat ne eigene DLL

	BtbN	Mi, Aug 31, 2005 18:56 Antworten mit Zitat
Er hat mich per ICq angesprochen, und jetzt kann er ne Lampe an und aus machen ^^

BtbN

Mi, Aug 31, 2005 18:56
Antworten mit Zitat

Er hat mich per ICq angesprochen, und jetzt kann er ne Lampe an und aus machen ^^

	Mr Hopp	Mi, Aug 31, 2005 19:13 Antworten mit Zitat
Juhu Ich kauf mir erstmal nen Kosmoskasten, dann sehn' wa weiter

Mr Hopp

Mi, Aug 31, 2005 19:13
Antworten mit Zitat

Juhu

Ich kauf mir erstmal nen Kosmoskasten, dann sehn' wa weiter

	KHORN	Mi, Aug 31, 2005 19:16 Antworten mit Zitat
Kosmoskasten ? Was soll das denn sein ?^^ Die DLL ist voll witzig xD. Blos ich hab jetzt mein Druckerkabel etwas zu sehr "missbraucht". Ich hab jetzt 2 Anschlüsse, aber bei dem Rest muss ich raten o.O. Naja....^^ Ma sehen ich hol mir ein neues Kabel dann schau ich mal was sich so anschließen lässt xD Gruß KHORN

KHORN

Mi, Aug 31, 2005 19:16
Antworten mit Zitat

Kosmoskasten ?
Was soll das denn sein ?^^

Die DLL ist voll witzig xD.
Blos ich hab jetzt mein Druckerkabel etwas zu sehr "missbraucht".
Ich hab jetzt 2 Anschlüsse, aber bei dem Rest muss ich raten o.O.
Naja....^^
Ma sehen ich hol mir ein neues Kabel dann schau ich mal was sich so anschließen lässt xD

Gruß KHORN

Gehe zu Seite 1, 2, 3, 4, 5 Weiter

Übersicht

BlitzBasic

DLLs und Userlibs

Nach Oben

BlitzBasic Portal

Parallelport

Betreff: Parallelport