%PDF-
%PDF-
Mini Shell
Mini Shell
%
% nodraw.mf
%
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
% Version 3.5 // Patchlevel=0
% (c) A.Khodulev
%
% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
% (and all this package as well) and to save it under the same name.
%
% Content:
%
% Disable almost all of cmbase drawing commands
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
LHver_check(3,5); % like |version_check| in ec
def addto text t = enddef; % Draw nothing
def filldraw text t = enddef;
%vardef serif(suffix $,$$,@) % serif at |z$| for stroke from |z$$|
% (expr darkness,jut) suffix modifier = enddef;
def dish_serif text t = enddef;
%def nodish_serif text t = enddef;
vardef sloped_serif.l(suffix $,$$,@)(expr darkness,jut,drop) = enddef;
vardef sloped_serif.r(suffix $,$$,@)(expr darkness,jut,drop) = enddef;
vardef arm(suffix $,$$,@)(expr darkness,jut) = % arm from |z$| to |z$$|
x@0=good.x(x$$r-jut); y@0=y$r;
if serifs: y@1=y$l; z@1=z$$l+whatever*(z$$r-z@0); z@2=.5[z$l,z@1]; fi
penlabels(@0,@1,@2); enddef;
def bulb(suffix $,$$,$$$) = z$$$r=z$$r; enddef;
def v_bulb(suffix $,$$)= enddef;
def dot(suffix $,$$) = enddef;
def comma(suffix $,@)(expr dot_size,jut,depth) = enddef;
def ammoc(suffix $,@)(expr dot_size,jut,depth) = enddef;
def f_stroke(suffix $,$$,@,left_serif,right_serif)(expr left_jut,right_jut)=
enddef;
def h_stroke(suffix $,@,@@,$$) =
penpos$$(x@@r-x@@l,0); x$$=x@@; bot y$$=0;
y@@=1/3[bar_height,x_height]; enddef;
def hook_out(suffix $,$$,$$$) suffix modifier= % |x$| and |x$$$| (only) are known
pos$(stem,0); pos$$(vair,90); x$$$:=hround(x$$$+.5hair-eps)-.5hair; pos$$$(hair,180);
y$=1/4x_height; bot y$$l=-oo; y$$$=1/3x_height;
if skewed.modifier: x$$=x$+1.25u; else: x$$=x$+1.5u; fi enddef; % hook
def hook_in(suffix $,$$,$$$)suffix modifier= % |x$| and |x$$$| (only) are known
x$:=hround(x$-.5hair)+.5hair; pos$(hair,180); pos$$(vair,90); pos$$$(stem,0);
y$=2/3x_height; top y$$r=x_height+oo; y$$$=3/4x_height;
if skewed.modifier: x$$=x$$$-1.25u; else: x$$=x$$$-1.5u; fi enddef; % hook
%def ital_arch(suffix $,$$,$$$) = enddef;
def draw_circle = enddef;
def left_paren(expr min_breadth, max_breadth) = enddef;
def right_paren(expr min_breadth, max_breadth) = enddef;
def left_bracket(expr breadth,do_top,do_bot) = enddef;
def right_bracket(expr breadth,do_top,do_bot) = enddef;
def left_curly(expr min_breadth, max_breadth) = enddef;
def right_curly(expr min_breadth, max_breadth) = enddef;
def left_angle(expr breadth) = enddef;
def right_angle(expr breadth) = enddef;
def big_slash(expr breadth) = enddef;
def big_blash(expr breadth) = enddef;
def big_sqrt = enddef;
def big_hat = enddef;
def big_tilde = enddef;
def labels text t = enddef;
def penlabels text t = enddef;
endinput;
vardef bar_stroke(expr left_jut,right_jut) = enddef;
vardef cyr_serif(suffix $,$$,@) % serif at |z$| for stroke from |z$$|
(expr darkness,beak_darkness,jut,beak_jut) =
enddef;
%end of file
Zerion Mini Shell 1.0