Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.2 9/18/84; site cornell.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!mhuxt!mhuxj!houxm!vax135!cornell!pugh
From: pugh@cornell.UUCP (William Pugh)
Newsgroups: net.micro.mac
Subject: Font Doubler program
Message-ID: <744@cornell.UUCP>
Date: Thu, 20-Dec-84 13:19:23 EST
Article-I.D.: cornell.744
Posted: Thu Dec 20 13:19:23 1984
Date-Received: Fri, 21-Dec-84 02:16:54 EST
References: <72@tektools.UUCP>
Reply-To: pugh@gvax.UUCP (William Pugh)
Distribution: net
Organization: Cornell Univ. CS Dept.
Lines: 205
Summary: 

The following is a program I wrote which will double any font (subject to the
32K byte size limitation on resources).  To use it, you specify the name and
size of a font installed in the system file, and the program will double it and
install the doubled copy in the system file (with a font size equal to twice
the original).
	The program uses some fancy tricks to expand the bit map of the font
so that diagonal lines come out correctly, and curves look pretty good.  You
may wish to touch up the resulting font with the font editor a bit, but it's
a lot less work than you would have to do if you used the font editor to scale
up a font.
	Question:  Does anybody out there know how to make the Print manager
print in high-resolution???  Now that I've developed this niffty algorithm,
I'd like to write a program to print MacPaint files in high-resolution, 
using my doubling algorithm, as opposed to the MacPaint high-res mode, which
simply prints a block of 4 dots for each dot in the original image.
Inside Mac is very vague on how to do high-res printing (and printing in 
general).
			Bill Pugh, Cornell Univeristy


(This file must be converted with BinHex.Hex)
#APPL$0000
***COMPRESSED
***RESOURCE FORK
(    0   !6J   4J@   *(                     
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(    !@    H   !!     @    @   _/  !J?    \0
(     %"ITY6_^!A)B -68 O  1  ,HK0/[\J&ZH_JD2
($ZZ /1*@&8$3KH$IJGT     $*G+SQ#3T1%/SP _ZF@
(" ?9P  T"\ 0J9F8F2"1(
(-7"U<,P ^)(4T!K!D);3OK_^"!47$A1A&M((!@B&#H 
($A X$@\ .0(9P  #E, 9RHB>O]*&X !+G\     &?R+F[__"! 3M1*@&L(
($J!:P  $& *2H%L   01(!$@6 .1(%A"D2!3G5$@$[Z
(/_V+@%(1\[ /PH[$'N_\Q#[O_<(#P    (H"Y(;O_
($'N_J0@"$ZZ_91![OZ6( A.NOV*0>[^B" (3KK]@$ZZ
(/P62H!G   $J?2H4$*GJ7M"IS\\ &-"IR\\_____ZE\
("!?+4C^:D*G2&[^6JF1#&X  OY:9@  !*GT+R[^:C\\
(  #2&[^:$AN_EQ(;OY@J8TO+OY<2&[^W*F02&[^W$AN
(/_>J0 O+OYJ/SP !$AN_FA(;OY<2&[^8*F-+R[^7$AN
(/[
(#\N_]RI A ?2@!G!$JN__AG!B!N__A*D&8  "A"IS\\
( !B0J[^B" (0>[^SB((0>[^I"0(
($'N_H F""@\     BH\_____DZZ^-I![OZ(( A![O[.
("((0>[^I"0(0>[^@"8(*#S____^*CS____^3KKXLDAN
(/ZR2&[^I$AN_GA(;OYX0F="IZCL2&[^LDAN_I9(;OYX
($AN_GA"9T*GJ.Q";OZ","[^?%- /4#^A# N_GY30#U 
(/Z&/7P  ?YZ/7P  ?YX0>[^>$/N_G @/     B@+DAN
(/ZR2&[^I$AN_H!(;OYX/SP !T*GJ.Q(;OZ /SP  4)G
(*BH2&[^>#\\__]"9ZBH2&[^LDAN_I9(;OZ 2&[^>#\\
(  '0J>H[$AN_H!"9S\\  &HJ$AN_I9(;OZD2&[^>$AN
(/Z /SP  4*GJ.P@+OZ6(CP   @ 3KKVI$*G0>[^LB (
($'N_J0B"$'N_I8D"$'N_G F""@\     BH\     2P\
(/____].NO<"6$\O//____]![OZR( A![OZD(@A![OZ6
("0(0>[^<"8(*#P    !*CP    "0H9.NO;06$]"IT'N
(/ZR( A![OZD(@A![OZ6) A![OYP)@@H/     (J//__
(/__+#S_____3KKVGEA/+SS_____0>[^LB (0>[^I"((
($'N_I8D"$'N_G F""@\_____RH\     D*&3KKV;%A/
("\\_____T'N_K(@"$'N_J0B"$'N_I8D"$'N_G F""@\
(     (J/     $L//____].NO8V6$\O//____]![OZR
(" (0>[^I"((0>[^EB0(0>[^<"8(*#P    !*CP    "
("P\_____TZZ]@!83R\\     4'N_K(@"$'N_J0B"$'N
(/Z6) A![OYP)@@H/     (J//____\L//____].NO7*
(%A/+SS_____0>[^LB (0>[^I"((0>[^EB0(0>[^<"8(
("@\_____RH\     BP\     4ZZ]9183TAN_I9(;OZD
($AN_G!(;OYP/SP  4*GJ.Q(;OZ(2&[^I$AN_G!(;OYP
(#\\  -"IZCL2&[^>#\\ &X_/  \/SP!*S\\ /FHITAN
(/YX(&W^_-'\    PB\(J*5![OYP0^[^>" \    "* N
($AN_G@_/  */SP "JBH2&[^I"!N_E94B"\(2&[^<$AN
(/YX0F="IZCL0F[^># N_G130#U _GP@;O_H("[_X..(
(-' /5#^>B!N_^@@+O_@XXC1P# 0T&[^=E- /4#^?DAN
(/ZD2&[^P$AN_G!(;OYX0F="IZCL("[_X%* (&[_Z..(
(-' ,*[^?M[\_^!.^@ >(&[_Z" N_^#CB-' ("[_X%* 
(")N_^CCB-/ ,I @;O_L("[_X..(T< B;O_D("[_X..(
(-/ ,I @;O_L("[_X..(TIF2!N__2@22\N_E:I%$Y>6(].=0 -
("!$;W5B;&EN9RXN+B @       &_X$!   $_]H@;O_P
(" N_^#CB-' ("[_X%* (F[_\..(T\ P$+!1;   #%-N
(/[,,"[^S%) 3OK_Q# N_LP&0  /Z$#C2#U _L0P+O[*
(,'N_L0&@    !H@;O_X(E @;O_X)% R*0 $DFH  E9!
(.5)2,'0@2U _^ ,K@  @ #_X&T  "A"IS\\ &%"IR\\
(/____^I?"!?+4C^:D*G2&[^6JF1+R[^:JF#J?0@+O_@
(*$B+4C_]"!N__1*D&8   2I]"!N__2@*2!N__@@4")N
(/_T(E$@/    !J@+B!N__0B4# I  ;C2%- (&[_]")0
(#-   8@;O_T(E#CZ0 ((&[_]")0,"D "N-(4T @;O_T
(")0,T  "B!N__0B4#-N_LH #"!N__0B4#-N_LH #B!N
(/_T(E P*0 2XTA30"!N__0B4#-  !(@;O_T(E#CZ0 4
("!N__0B4./I !8P+O[$XD @;O_T(E S0  8(&[_]")0
("!N__0D4# I !C!Z@ .6( @;O_T(E R*0 $2,'0@2!N
(/_T(E R*0 "2,&0@5: 4X @;O_T(E S0  0(&[_]")0
(-/\    &"!N__0D4"!N__0F4# J  [!ZP 8XXC3P%2)
(    !H 00 ; +X!SP   1\ I@      805%4E)/4@  
(  : #P 'P"D <(   %  .(      &(%15)23U(    F
(  [ !, Y '-   !50!5      !C$49O;G0@1&]U8FQE
('(@5C$N,    .@  @      $P / #, +R "        
(  C $  5 %$"%-$;W5B;&EN9R!T:&%T(&9O;G0@=V]U
(&QD(&-R96%T92!A(&9O;G0@;&%R9V5R('1H86X@,S)K
("!B>71E
( !. +N0        7P!3 &\ ;Y         ]  D 2@!7
((@*1F]N="!N86UE.@      7P ) &\ 3(@*1F]N="!S
(&EZ93H       H "P P ;&(>JD@,3DX-"!B>2!7:6QL
(&EA;2!0=6=H+"!W GZJ*&HGMEL
(  $V6P !DYU_P#_ /\ _P!!^ GZ(FL