Newsgroups: fj.comp.texhax
Path: galaxy.trc.rwcp.or.jp!coconuts.jaist!wnoc-tyo-news!etlnews.etl.go.jp!etlinn.etl.go.jp!etl.go.jp!trc.rwcp!rwc-tyo!news.iij.ad.jp!triton.ad.jp!news1.pu-toyama.ac.jp!icews5!newssinet!hakata!ie.u-ryukyu.ac.jp!suzuki
From: suzuki@fatal.ie.u-ryukyu.ac.jp (Suzuki Ken'ichi)
Subject: Re: [Q]: How to use Adobe fonts in LaTeX2e?
X-Newsreader: mnews [version 1.19] 1995-07/21(Fri)
Sender: news@spn.ie.u-ryukyu.ac.jp (News System Admin)
Organization: Dept. of Elect. & Info. Eng., Univ. of the Ryukyus, Okinawa, Japan
Lines: 221
Message-ID: <Du2wr5.Cxz@spn.ie.u-ryukyu.ac.jp>
References: <DtIA79.1uy@spn.ie.u-ryukyu.ac.jp>
	<4qr05c$1lgs@sutknews.ed.kagu.sut.ac.jp>
	<DtM4t7.2su@spn.ie.u-ryukyu.ac.jp>
	<4qtct4$1nj8@sutknews.ed.kagu.sut.ac.jp>
	<Dto1q8.501@spn.ie.u-ryukyu.ac.jp>
	<4rg19i$1kna@sutknews.ed.kagu.sut.ac.jp>
X-Nntp-Posting-Host: fatal.ie.u-ryukyu.ac.jp
Date: Fri, 5 Jul 1996 16:35:29 GMT
Xref: galaxy.trc.rwcp.or.jp fj.comp.texhax:8169
X-originally-archived-at: http://galaxy.rwcp.or.jp/text/cgi-bin/newsarticle2?ng=fj.comp.texhax&nb=8169&hd=a
X-reformat-date: Mon, 18 Oct 2004 15:18:22 +0900
X-reformat-comment: Tabs were expanded into 4 column tabstops by the Galaxy's archiver. See http://katsu.watanabe.name/ancientfj/galaxy-format.html for more info.

  $BNkLZ!wN05eBg$G$9!#(B

j1296083@ed.kagu.sut.ac.jp$B$5$s$O=q$-$^$7$?!#(B

 | dvi2ps-1.91j $B$O%U%)%s%H$rG'<1$9$k$h$&$K$J$C$F$-$^$7$?$,!"(B
 | $B9g;z!J(Bfi, fl $B$J$I!K$d%&%`%i%&%H$J$I$,>C$($F$7$^$$$^$9!#(B
 |$B!J$?$H$($P(Bfirst $B$,(B rst $B$@$1$K$J$j!"9T$N1&C<$bB7$o$J$$!K(B

  $B$@$+$i2?!)$H$$$&0UCO0-$O$*$$$H$$$F!&!&!&!#(B

  p???8r $B$N%(%s%3!<%I$r(BPS$B$KAH$_9~$`$3$H$r8+Mn$H$7$F$$$?$h$&$G$9!#(B
$B$?$7$+$I$3$+$K(B 8r.enc $B$H$$$&%U%!%$%k$,$"$k$H;W$$$^$9!#$3$l$OB?J,(B
dvips$BMQ$N%(%s%3!<%I%U%!%$%k(B(postscript)$B$G$9!#$h$C$F!"$=$N$^$^$G$O(B
dvi2ps$B$K$O;H$($^$;$s!#(B
  $B$7$+$7!"$$$m$$$m;W9M:x8m$N>e!"$3$l$r(Bdvi2ps$BMQ$K=q$-D>$9$3$H$,$G$-(B
$B$?$N$G!"$=$N%U%!%$%k$r2<$KIU$1$^$9!#$3$N%U%!%$%k(B(8r.enc)$B$r(B
psfonts2.ps$B$NBe$o$j$K(Binclude$B$7$F2<$5$$!#(B
$B$^$?!"%U%)%s%H%^%C%W$bIU$1$F$*$-$^$9!#(B($B>/!9%P%0M-$j$@$H;W$$$^$9$,!"(B
$BD>$9$3$H$,$G$-$J$$(B)

  $B$"$H<XB-$G$9$,!"(Bdvi2ps $B$GJQ49$7$?(BPS$B%U%!%$%k$r(Bghostscript$B$G$_$k$H!"(B
$B1&C<$N9T$,B7$o$J$$>l9g$,$"$j$^$9!#$3$l$O!"(Bghostscript$B$N;}$C$F$$$k(B
$B%U%)%s%H$N%a%H%j%C%/$,!"%"%I%S$N$=$l$H0c$&$3$H$K5/0x$7$F$$$k$H9M$((B
$B$i$l$^$9!#$7$+$7!"%W%j%s%?$K=P$9$H$-$A$s$HB7$C$F$$$k$O$:$G$9!#(B

# $B$3$l$G$3$C$A$G$b(Bps$B%U%)%s%H$,;H$($k$h$&$K$J$C$?$<!#$7$+$7!"<+J,0J(B
# $B304n$V?M$,$$$J$$!#<d$7$$$<!#(B
    $B!2!2(B
  $B!?(B $B"~(B $BN05eBg3X(B  $B?.9f=hM}8&5f<<(B($B<+>N(B)        $BNkLZ(B  $B7r0l(B
$B!:(B               E-mail  suzuki@kinjo1.ie.u-ryukyu.ac.jp    $B"w(B
                              $B"~(B                  $B"~(B       $B!?(B
                           $B!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1!1(B
----- mypsfonts.map -----
defineadb/opt/local/lib/texmf/fonts/adobe
fontvf*0$adb/courier/vf/%f.vf
fonttfm*0$adb/courier/tfm/%f.tfm
builtinpcrb8rTSTR"/Courier-Bold TeXBase1Encode"
builtinpcrbo8rTSTR"/Courier-BoldOblique TeXBase1Encode"
builtinpcrr8rTSTR"/Courier TeXBase1Encode"
builtinpcrro8rTSTR"/Courier-Oblique TeXBase1Encode"
fontvf*0$adb/helvetic/vf/%f.vf
fonttfm*0$adb/helvetic/tfm/%f.tfm
builtinphvb8rTSTR"/Helvetica-Bold TeXBase1Encode"
builtinphvbo8rTSTR"/Helvetica-BoldOblique TeXBase1Encode"
builtinphvbon8rTSTR"/Helvetica-Narrow-BoldOblique TeXBase1Encode"
builtinphvbrn8rTSTR"/Helvetica-Narrow-Bold TeXBase1Encode"
builtinphvr8rTSTR"/Helvetica TeXBase1Encode"
builtinphvro8rTSTR"/Helvetica-Oblique TeXBase1Encode"
builtinphvron8rTSTR"/Helvetica-Narrow-Oblique TeXBase1Encode"
builtinphvrrn8rTSTR"/Helvetica-Narrow TeXBase1Encode"
builtinpsyrTSTRSymbol
fontvf*0$adb/times/vf/%f.vf
fonttfm*0$adb/times/tfm/%f.tfm
builtinptmb8rTSTR"/Times-Bold TeXBase1Encode"
builtinptmbi8rTSTR"/Times-BoldItalic TeXBase1Encode"
builtinptmr8rTSTR"/Times-Roman TeXBase1Encode"
builtinptmri8rTSTR"/Times-Italic TeXBase1Encode"
builtinptmbo8rTSTR"/Times-Bold .167 SlantFont"
builtinptmro8rTSTR"/Times-Roman .167 SlantFont"
----- end mypsfonts.map -----

------ 8r.enc ------
%%BeginProcSet: 8r.enc 1 1
TeXDict begin
/s1 ( ) def

/TeXBase1Encoding [
% 0x00 (encoded characters from Adobe Standard not in Windows 3.1)
  /.notdef /dotaccent /fi /fl
  /fraction /hungarumlaut /Lslash /lslash
  /ogonek /ring /.notdef
  /breve /minus /.notdef 
% These are the only two remaining unencoded characters, so may as
% well include them.
  /Zcaron /zcaron 
% 0x10
 /caron /dotlessi 
% (unusual TeX characters available in, e.g., Lucida Bright)
 /dotlessj /ff /ffi /ffl 
 /.notdef /.notdef /.notdef /.notdef
 /.notdef /.notdef /.notdef /.notdef
 % very contentious; it's so painful not having quoteleft and quoteright
 % at 96 and 145 that we move the things normally found there down to here.
 /grave /quotesingle 
% 0x20 (ASCII begins)
 /space /exclam /quotedbl /numbersign
 /dollar /percent /ampersand /quoteright
 /parenleft /parenright /asterisk /plus /comma /hyphen /period /slash
% 0x30
 /zero /one /two /three /four /five /six /seven
 /eight /nine /colon /semicolon /less /equal /greater /question
% 0x40
 /at /A /B /C /D /E /F /G /H /I /J /K /L /M /N /O
% 0x50
 /P /Q /R /S /T /U /V /W
 /X /Y /Z /bracketleft /backslash /bracketright /asciicircum /underscore
% 0x60
 /quoteleft /a /b /c /d /e /f /g /h /i /j /k /l /m /n /o
% 0x70
 /p /q /r /s /t /u /v /w
 /x /y /z /braceleft /bar /braceright /asciitilde
 /.notdef % rubout; ASCII ends
% 0x80
 /.notdef /.notdef /quotesinglbase /florin
 /quotedblbase /ellipsis /dagger /daggerdbl
 /circumflex /perthousand /Scaron /guilsinglleft
 /OE /.notdef /.notdef /.notdef
% 0x90
 /.notdef /.notdef /.notdef /quotedblleft
 /quotedblright /bullet /endash /emdash
 /tilde /trademark /scaron /guilsinglright
 /oe /.notdef /.notdef /Ydieresis
% 0xA0
 /.notdef % nobreakspace
 /exclamdown /cent /sterling
 /currency /yen /brokenbar /section
 /dieresis /copyright /ordfeminine /guillemotleft
 /logicalnot
 /hyphen % Y&Y (also at 45); Windows' softhyphen
 /registered
 /macron
% 0xD0
 /degree /plusminus /twosuperior /threesuperior
 /acute /mu /paragraph /periodcentered
 /cedilla /onesuperior /ordmasculine /guillemotright
 /onequarter /onehalf /threequarters /questiondown
% 0xC0
 /Agrave /Aacute /Acircumflex /Atilde /Adieresis /Aring /AE /Ccedilla
 /Egrave /Eacute /Ecircumflex /Edieresis
 /Igrave /Iacute /Icircumflex /Idieresis
% 0xD0
 /Eth /Ntilde /Ograve /Oacute
 /Ocircumflex /Otilde /Odieresis /multiply
 /Oslash /Ugrave /Uacute /Ucircumflex
 /Udieresis /Yacute /Thorn /germandbls
% 0xE0
 /agrave /aacute /acircumflex /atilde
 /adieresis /aring /ae /ccedilla
 /egrave /eacute /ecircumflex /edieresis
 /igrave /iacute /icircumflex /idieresis
% 0xF0
 /eth /ntilde /ograve /oacute
 /ocircumflex /otilde /odieresis /divide
 /oslash /ugrave /uacute /ucircumflex
 /udieresis /yacute /thorn /ydieresis
] def

/CopyFont {
    1 index maxlength add dict begin
{
    1 index /FID ne
    2 index /UniqueID ne and {
def
    }{
pop pop
    } ifelse
} forall
currentdict
    end
} bind def

/ModifyFont {
    4 1 roll
    /es exch def
    /proc exch def
    /newfn exch def
    MFSupp
} bind def
    
/MFSupp {
    dup length es add dict begin
{
    1 index /FID ne
    2 index /UniqueID ne and
    {
def
    }{
pop pop
    } ifelse
} forall
FontType 0 ne {
    proc
}{
    FDepVector dup length array copy /FDepVector exch def
    0 1 FDepVector length 1 sub {
FDepVector exch 2 copy get
MFSupp put
    } for
} ifelse
newfn currentdict definefont
    end
} bind def

% fontname encoding TeXEBase1Encoding dict
/TeXBase1Encode {
    findfont 1 CopyFont
    begin
/Encoding TeXBase1Encoding def
currentdict
    end
    definefont pop
} bind def

    /ObliqueSlant {
[1 0 4 -1 roll dup sin exch cos div 1 0 0]
exch findfont exch makefont definefont pop
    } bind def

    /SlantFont {
[1 0 4 -1 roll 1 0 0]
exch findfont exch makefont definefont pop
    } def 

    /ExtendFont {
[exch 0 0 1 0 0]
exch findfont exch makefont definefont pop
    } def

end % TeXDict
%%EndProcSet
----- end 8r.enc -----
