%written by Basil Solomykov, Russia
%(C) Copyright 2011 LPPL (LaTeX Project Public License)
%Font Ordinary New (Obyknovennaya novaya), Small Capitals

design_size := 10pt#;
o# := .45pt#;
u# := 19/35pt#;
bar# := 10/36pt#;
slab# := 10/36pt#;
cap_bar# := 10/36pt#;
vair# := 10/36pt#;
hair# := 10/36pt#;
jut# := 20/36pt#;
cap_jut# := 26/36pt#;
stem# := 30/36pt#;
curve# := 31/36pt#;
cap_stem# := 36/36pt#;
cap_curve# := 37.2/36pt#;
s# := 0.4pt#;
c# := .2pt#;

input obn_lcyw_code.mf;
font_identifier "OBNSC";
mode_setup;
clear_pen_memory;

font_size design_size*pt#;
asc_height# := 24/36*design_size*pt#;
cap_height# := 24/36*design_size*pt#;
body_height# := 27/36*design_size*pt#;
x_height# := 15.4/36*design_size*pt#;
desc_depth# := 8/36*design_size*pt#;
body_depth# := 9/36*design_size*pt#;
comma_depth# := 5/36*design_size*pt#;
x_depth# := 4/5comma_depth#;
bar_height# := .52x_height#;
cap_bar_height# := .52cap_height#;
cap_bar2_height# := .45cap_height#;
border_height# := comma_depth#;
cap_drop_round# := 3.7*slab#;
drop_round# := 6/8cap_drop_round#;

bracket# := pt#;

font_x_height x_height#;
font_normal_space 6u#;
font_normal_stretch 4u#;
font_normal_shrink 2u#;
font_quad 16u#;
font_extra_space 6u#;

k# := .8u#;
kk# := 1.5u#;
kkk# := 3u#;

serif_darkness := 1/30;
define_pixels(bracket,cap_o_width,sss_width,css_width);
define_pixels(c,s,cap_bar_height,cap_bar2_height);
define_pixels(border_height,A_bracket,cap_drop_round,x_depth,drop_round);
define_whole_blacker_pixels(stem,cap_stem,curve,cap_curve,bar,slab,cap_bar,vair,hair);
define_whole_pixels(asc_height,cap_height,x_height,u,desc_depth,comma_depth,bar_height,body_height,body_depth,u,o,cap_jut,jut);
%define_corrected_pixels();
lowres_fix(stem,curve) 1.2;
lowres_fix(cap_stem,cap_curve) 1.2;
if jut=cap_jut: jut:=jut-1; fi

def serif(suffix $)(expr breadth, theta, left_jut, right_jut)=
penpos$(breadth/abs sind theta, 0);
z$a-z$l=z$f-z$r=(bracket/abs sind theta)*dir theta;
y$c=y$d; y$b=y$e=y$; y$b-y$c=if theta < 0: -fi slab;
x$b=x$c=x$g if left_jut=0: -1/2slab fi +1/2slab; x$d=x$e=x$h if right_jut=0: +1/2slab fi-1/2slab;
x$g=x$l-left_jut; x$h=x$r+right_jut;			%Крайние то