hp1020 lapok szama

[Szasz Imre]

Fodor Zsolt írta 2006. január  4, szerda, 11:21-kor:

> HP1020-asnál le lehet-e kérdezni valahogy, hogy hány oldalt
> nyomtattak vele eddig? A leírást néztem, ott nem leltem fel.

Ha linux alól akarod, nekem 1015 és 1300-ra működik.

szaszi
--------- következő rész ---------
#!/usr/bin/perl

use strict;
my $DEV = "/dev/usb/lp0";

binmode(STDOUT);
select(STDOUT);
$|=1;

open (PRINTER, "> $DEV") or die "Nem tudok írni rá: $DEV\n";
print PRINTER "\033%%-12345X\@PJL\n\@PJL INFO PAGECOUNT\n\033%%-12345X";
close (PRINTER);
sleep 3;

open (PRINTER, "< $DEV") or die "Nem tudom olvasni: $DEV\n";
while ( (my $oldal = <PRINTER>) =~ s/[\015\014]//) { print $oldal if $oldal =~ /^[0-9]+/; }
close (PRINTER);
close (STDOUT);