home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
clipart
/
gs22.zip
/
GDEVS.PS
< prev
next >
Wrap
Text File
|
1989-06-20
|
2KB
|
47 lines
% Copyright (C) 1989 Aladdin Enterprises. All rights reserved.
% Distributed by Free Software Foundation, Inc.
%
% This file is part of Ghostscript.
%
% Ghostscript is distributed in the hope that it will be useful, but
% WITHOUT ANY WARRANTY. No author or distributor accepts responsibility
% to anyone for the consequences of using it or for whether it serves any
% particular purpose or works at all, unless he says so in writing. Refer
% to the Ghostscript General Public License for full details.
%
% Everyone is granted permission to copy, modify and redistribute
% Ghostscript, but only under the conditions described in the Ghostscript
% General Public License. A copy of this license is supposed to have been
% given to you along with Ghostscript so you can know your rights and
% responsibilities. It should be in a file named COPYING. Among other
% things, the copyright notice and this notice must be preserved on all
% copies.
% Device-specific initialization for Ghostscript, version 1.3.
% The interpreter predefines the name defaultdevicename
% as a string which is the default (currently, the only) device name.
/defaultdevicename defaultdevicename def % only evaluate once
/.ifdevice { defaultdevicename eq { exec stop } { pop } ifelse } def
{
% Device parameters for X Windows
{ /.device.width 8.5 72 mul cvi def
/.device.height 11 72 mul def
/.pixel.size 1 def % pixel width in points
/.aspect.ratio 1 def % pixel height/width
} (X) .ifdevice
% Device parameters for EGA
{ /.device.width 640 def
/.device.height 350 def
/.pixel.size 1 def
/.aspect.ratio 14 11 div def
} (EGA) .ifdevice
% Undefined device
(Unknown device ) print defaultdevicename print (\n) print flush
} stopped pop