Steuerung jedes Pines des Parallelports mit Win95 bis WinXP

[pmc]

1. Aufbau der Schnittstelle :

Der Parallelport ist in drei Register engeteilt,
Datenregister(output), Kontrollregister(Input/Output) und
StatusRegister(Input).

Datenregister :
Das Datenregister stellt 8 leitungen zur verfügung,
worüber die zu druckenden Daten an den Drucker geleitet werden.

• D0 bis D7 -> Pin 2 bis Pin 9 am PC-Stecker.

Kontrollregister :
Das Kontrollregister stellt 4 leitungen zur verfügung,
worüber der Drucker gesteuert wird.

• Strobe -> Pin 1 am PC-Stecker.
  AutoLF -> Pin 14 am PC-Stecker.
  Init -> Pin 16 am PC-Stecker.
  Select -> Pin 17 am PC-Stecker.

Statusregister :
Das Statusregister stellt 5 Leitungen zur Verfügung,
worüber der Drucker seinen Status an den Pc übermittelt.

1. Error -> Pin 15 am PC-Stecker.
   Online -> Pin 13 am PC-Stecker.
   Paper -> Pin 12 am PC-Stecker.
   Busy -> Pin 11 am PC-Stecker.
   ACK -> Pin 10 am PC-Stecker.

2. Verwendung :

Wichtig : Die Unit habe ich nur unter Win2K getestet, aber unter winXP
müsste es auch funktionieren!!!

Die Unit ParaPrcs stellt folgende Funktionen und Prozeduren zur Verfügung :

Function ReadCtrlLines : TCLines; ---> Liest die Leitungen des Kontroll-Registers der Parallelen Schnittstelle (Select - Init - AutoLF - Strobe)
Function ReadStateLines : TSLines; ---> Liest die Leitungen des Status-Registers der Parallelen Schnittstelle (Busy - ACK - Paper - Online - Error)

Procedure WriteDataLines(bits : TDBits); ---> Schreibt die Leitungen des Daten-Registers der Parallelen Schnittstelle (D0 bis D7)
Procedure WriteCtrlLines(cl : TCLines); ---> Schreibt die Leitungen des Kontroll-Registers der Parallelen Schnittstelle (Select - Init - AutoLF - Strobe)

Function PortReset : Boolean; ---> Setzt alle Leitungen auf LOW - Gibt True zurück wenn der Treiber geladen ist.


Hinweis zu den verwendeten Variablen-Typen :

1. TSLines = record
   Busy : boolean;
   Ack : boolean;
   Paper : boolean;
   Online : boolean;
   Error : boolean;
   end;
   
   TCLines = record
   Select : boolean;
   Init : boolean;
   AutoLF : boolean;
   Strobe : boolean;
   end;
   
   TDBits = array[0..7] of boolean;

Was man nun damit ansteuern will ist einem selbst überlassen.
Bei Fragen, Eamil an mich.

MFG PMC

[edit=sakura] Archiv als ZIP beigefügt. Mfg, sakura[/edit]

[dahaack]

Also bis jetzt hab ich nochnicht einmal gelötet; ich hab einfach ein Druckerkabel bei mir angeschlossen (OnBoard) und am anderen Ende stehen an den einzelnen Pins auch Zahlen von 1 - 25. Bei Pin 2,4,5,6,7,8,9 ist high und Bei Pin 3 ist low. Ich habe die Spannungen selber gemessen.

[pmc]

Dann überprüfe doch mal den pin drei von den beiden steckern mit einem durchgangsprüfer!!!

[dahaack]

Also wenn ich dein Programm benutze was du ganz am Anfang bereitgestellt hast, ändert sich nichts wenn ich an die Pins anklicke. Egal was ich da mach, jede Spannung bleibt wie sie ist, Pin 3 ist low alle anderen high.

[dahaack]

Alles klar Danke erstmal, Kabel ist kaputt, hab ein anderes genommen und es sind alle auf high. Das Programm funktioniert trotzdem nicht. Muss ich noch irgendwas machen wenn ich Pin 2 angeklickt habe? Soll dann Pin2 low oder high sein?

[pmc]

Wenn die auf checked sin dann muss die leitung auch auf high sein!!!

Das programm funtzt auf jeden fall...
hab es ausgiebig getestet!!!!

[dahaack]

Dann muesste es bei mir ja so sein, dass wenn ich das Programm starte die Datenleitungen alle low sind, sind sie aber nicht. Wenn ich die "anchecke" verändert sich die Spannung auch nicht. Muss ich fuer dieses Programm Delphi aufn Rechner installiert haben? Vielleicht gehts ja nicht weil ich Delphi3 habe. Mein Betriebssystem ist Windows NT.

[pmc]

Das programm ist fertig compiliert und deswegen bracuht man dafür ja auch nicht delphi...oder bracuhst du damit Word funktioniert Delphi aufm rechner???

Das programm ist schon in ordnung!!!
Es ist extra für die neuen betriebssysteme geschireben!!!!
Es kann nur am kabel liegen oder du mist die para-schnittstelle auf EPC im Bios umschalten....

[dahaack]

Häh? Wie jetzt? Wo muss ich im Bios was umstellen?

[pmc]

Ich sagte nur vielleicht!!!!!
Im Bios irgendwo .... wo genau weiss ich jetzt nicht...
Weil ich ja nicht jeden tag irgendwas im bios rumstelle!!!!

[dahaack]

Geil, geil, geil! (Falls dieses Wort hier erlaubt) Danke, danke, danke! Programm funktioniert jetzt. Ich hab das jetzt auf ECP gestellt und funktioniert. DAnke!