Hi,Ich habe mir in Perl einen Treiber für eine LED-Anzeigetafel geschreiben, welche über den LPT gesteuert wird. Da der Onboard-LPT für den Drucker gebraucht wird, habe ich mir eine I/O-Karte zugelegt. Ich schaffe es aber nicht, Perl zu sagen, er soll die I/O-Karte nehmen. Egal was ich tue, er gibt es immer auf dem Onboard-LPT aus.
Ich benutze Device-ParalelPort und INPOUT32.DLL
Das Script schaut, ohne das ganze if-then-bla, im Prinzip so aus:
use Device::ParallelPort;
use Device::ParallelPort::drv::win32;
$clock = Device::ParallelPort->new('win32');
$lpt_addr = "387";
$clock -> set_byte(chr($lpt_addr), $var1);
$clock -> set_control($var2);
Laut dem synopsys von cpan zu dem Modul, gibt man mit der Variable, die hier $lpt_addr heisst, die Startadresse des gewünschten LPT an. Läuft aber nicht. Das lustige ist, er gibt es auch auf dem Onboard-LPT aus, wenn ich als Adresse z.b. "3" angebe. Nach stundenlangem rumsuchen und versuchen, resigniere ich: help!
Grüße und frohe Feiertage,
Riffuchs
Datum: 26.12.2005-01:32
