Komunikace parakerniho portu pres /dev/lp?

[Tomas Srb]

No... ve FreePascalu (www.freepascal.org) by se to udelalo zhruba takhle:

uses Ports, Linux;
begin
 if not IOPerm($378,2,1) then
 begin
  WriteLn(ParamStr(0),': Nemohu prevzit port !');
  Halt(1);
 end;
 while True do
 begin
  if Port[$379] and 32 = 32 then Write(' Power OK   '^M)
                            else Write(' Power DOWN '^M);
  Select(0,nil,nil,nil,1000);
 end;
end.


----- Original Message -----
> Ales Martinek wrote:
>
> >Potreboval bych poradit jak napsat program pomoci ktereho bych mohl
> >komunikovta s praralerni portem pres /dev/lp? jako pres instrukce in a
out.