~ K A L I ~
UNAME : Linux web65.extendcp.co.uk 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64SERVER IP : 10.0.187.65 -________-
CLIENT IP : 216.73.216.230 MINI SHELL D ZAB '
Current File : //usr/share/enscript/simple.hdr |
%
% Default simple header.
% Copyright (c) 1995 Markku Rossi.
% Author: Markku Rossi <mtr@iki.fi>
%
% Modified: Chris Josefy, USA, MAY 2006
% + Added line wrapping to header to work more like AIX enscript
% + This assumes that one does not change the header font size from the default
% + This also assumes that the line only wraps once
%
% This file is part of GNU Enscript.
%
% Enscript is free software: you can redistribute it and/or modify
% it under the terms of the GNU General Public License as published by
% the Free Software Foundation, either version 3 of the License, or
% (at your option) any later version.
%
% Enscript is distributed in the hope that it will be useful,
% but WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
% GNU General Public License for more details.
%
% You should have received a copy of the GNU General Public License
% along with Enscript. If not, see <http://www.gnu.org/licenses/>.
%
% -- code follows this line --
%Format: fmodstr $D{%a %b %d %H:%M:%S %Y}
%Format: pagenumstr $V$%
%HeaderHeight: 44
/do_header { % print default simple header
gsave
d_header_x d_header_y HFpt_h 3 div add translate
HF setfont
user_header_p {
5 0 moveto user_header_left_str show
d_header_w user_header_center_str stringwidth pop sub 2 div
0 moveto user_header_center_str show
d_header_w user_header_right_str stringwidth pop sub 5 sub
0 moveto user_header_right_str show
} {
fname length fmodstr length add pagenumstr length add 95 6 idiv add d_header_w 6 idiv le{
5 0 moveto fname show
45 0 rmoveto fmodstr show
45 0 rmoveto pagenumstr show
} {
5 0 moveto fmodstr show
45 0 rmoveto pagenumstr show
fname length d_header_w 6 idiv idiv 1 add 10 mul 5 exch moveto
1 1 fname length d_header_w 6 idiv idiv
{
dup fname exch 1 sub d_header_w 6 idiv mul d_header_w 6 idiv getinterval show
5 exch 10 mul fname length d_header_w 6 idiv idiv 1 add 10 mul exch sub moveto
} for
5 10 moveto
fname fname length d_header_w 6 idiv idiv d_header_w 6 idiv mul dup fname length exch sub getinterval show
}ifelse
}ifelse
grestore
} def
Coded by KALI :v Greetz to DR HARD ../ kali.zbi@hotmail.com