Re: Xerox DocumentCentre C450 PCL reference

Hi Peter,

mit folgender Zeile: send($sock, "\033%-12345X\@PJL INFO CONFIG\r\n",0);

kriege ich folgende Antwort:

@PJL INFO CONFIG
IN TRAYS [5 ENUMERATED]
        INTRAYMANUAL
        INTRAY1
        INTRAY2
        INTRAY3
        INTRAY4
IN TRAYS ATTRIBUTE [5 ENUMERATED]
        INTRAYMANUAL STANDARD
        INTRAY1 STANDARD
        INTRAY2 STANDARD
        INTRAY3 STANDARD
        INTRAY4 STANDARD
DUPLEX [1 ENUMERATED]
        DUPLEX
OUT TRAYS [4 ENUMERATED]
        OUTTRAYSTANDARD
        OUTTRAYMULTIFUNCTION
        OUTTRAYSHIFTUNIT
... und so weiter und so fort.

Aber in den Out Trays wären dann die Ausgabeschächte, die
Durchnumeriert sind (d.h. der Outtraystandard wäre nummer 1 usw. usf).
Du kannst dann (irgendwo im Datenstrom, vor der ersten Seite oder auch
zwischendrin) mit PJL den Schacht steuern:

Ich würde es mal mit PJL XTRAY=OUTTRAYMULTIFUNCTION (oder welchen auch
immer Dir das CONFIG gegeben hat) ausprobieren. Manchmal ist das auch
ein Raten und Duchprobieren, leider. Manchmal findet man aber auch
ältere PJL Referenzen und kann von da ableiten. Schlimmstenfalls einen
Windows Treiber der auf PCL eingestellt ist mithören auf Port 9100 und
schauen, wie der den Out Tray umstellt.

Sprich Du kannst in den Datenstrom PJL Kommandos einschleusen um den
Druck auf einen anderen Schacht umzuleiten. Meistens gibt es in den
Druckertreibern auch eine Initialisierung die Du mitgeben kannst.

Wie die genauen Befehle sind, findest Du in der Spezifikation Deines
Druckers (kriegst Du meist vom Hersteller). Oder ich würde auch mal
nach PJL Specification Xerox suchen, das sollte auch helfen.

Gruss
Armando

PS: am besten den Output des Perlscripts in ein File umleiten, weil am
Schluss ein Seitenvorschub (\f) geschickt wird. Natürlich könntest Du
das auch ausfiltern, ich war ein wenig zu faul dafür :-)

On Tue, May 7, 2013 at 9:01 AM, Peter Ross
<Peter.Ross(at)alumni.tu-berlin.de> wrote:
> Hi Armando,
>
> danke für die Antwort.
>
> On Tue, 7 May 2013, Armando Cambra wrote:
>
>> 2013/5/7 Peter Ross <Peter.Ross(at)alumni.tu-berlin.de>:
>>
>>>
>>>
>>> http://h20000.www2.hp.com/bizsupport/TechSupport/Document.jsp?objectID=bpl02705
>>>
>>> Paper destination - Left Output Bin: Ec&l2G
>>>
>>> Okay, nach etwas Friemeln mit sed (an Control-Sequencen gescheitert, wie
>>> stellt man Sorderzeichen in sed da?) mein Perlwissen entstaubt,
>>>
>>> #!/usr/bin/perl
>>>
>>> # Find the first <esc>E (PCL reset) and add a <esc>&l2G (output tray)
>
>
> ..
>
>>>
>>> Prima, Sequenz ist drin, nur bewirkt es nichts (habe auch mit <esc>&l1G
>>> etc.
>>> versucht)
>
>
>> #!/usr/bin/perl -w
>> use strict;
>> use IO::Socket;
>> if (@ARGV < 1){
>> print "usage: " . $0 . " ip-address\n";
>> exit
>> }
>> my $ip = $ARGV[0];
>> #open the socket
>> my $sock = new IO::Socket::INET (
>> PeerAddr => $ip,
>> PeerPort => '9100',
>> Proto => 'tcp',
>> ) || die "Could not create socket - $!\n";
>>
>> #send page query to socket
>> #
>> # ID Provides the printer model number, such as
>> # “LaserJet 4.�
>>
>> # CONFIG Provides configuration information, such as how
>> # many and which paper sizes are available in this
>> # printer.
>> # FILESYS Returns PJL file system information.
>> # MEMORY Identifies amount of memory available.
>> # PAGECOUNT Returns the number of pages printed by the
>> # print engine.
>> # STATUS Provides the current printer status.
>> # VARIABLES Lists environmental and printer
>> # language-dependent variables, the possible
>> # variable values, and the current variable
>> # settings.
>> # USTATUS Lists the unsolicited status variables provided by
>> # the printer, the possible variable values, and the
>> # current variable settings.
>>
>> send($sock, "\033%-12345X\@PJL INFO CONFIG\r\n",0);
>> print "request sent\n";
>> my $RESPONSE;
>> print "Answer: ",recv($sock,$RESPONSE,0xFFFFF,0);
>> print "answer received\n";
>> print $RESPONSE;
>> close($sock);
>
>
> Wie bekomme ich die Variablen abgefragt?
>
> # ./pcl_printer_test.pl prv3.vv.fda
> request sent
> Answer: answer received
> @PJL INFO CONFIG
>
> (Ändern: send($sock, "\033%-12345X\@PJL INFO ID\r\n",0);
>
> # ./pcl_printer_test.pl prv3.vv.fda
> request sent
> Answer: answer received
> @PJL INFO ID
>
> Na, das ist nur ein Echo-Dienst, irgendwas mache ich hier falsch.
>
> Kannst Du mich bitte aufklären?
>
> Danke
> Peter

To Unsubscribe: send mail to majordomo(at)de.FreeBSD.org
with "unsubscribe de-bsd-questions" in the body of the message
Received on Tue 07 May 2013 - 09:51:29 CEST