% Works only in LaTeX2.09

\font\sevheb = redis7 \hyphenchar\sevheb=-1
%nonexistent: \font\sevhebs = hebs7 \hyphenchar\sevhebs=-1
\font\egtheb = redis8 \hyphenchar\egtheb=-1
\font\egthebs = rediss8 \hyphenchar\egthebs=-1
\font\ninheb = redis9 \hyphenchar\ninheb=-1
\font\ninhebs = rediss9 \hyphenchar\ninhebs=-1
\font\tenheb = redis10 \hyphenchar\tenheb=-1
\font\tenhebs = rediss10 \hyphenchar\tenhebs=-1
\font\tenhebb = redisbx10 \hyphenchar\tenhebb=-1
\font\twlheb = redis12 \hyphenchar\twlheb=-1
\font\twlhebs = rediss12 \hyphenchar\twlhebs=-1
\font\svtnheb = redis17 \hyphenchar\svtnheb=-1
%nonexistent: \font\svtnhebs = rediss17 \hyphenchar\svtnhebs=-1

\def\heb{\protect\pheb}
\def\hebs{\protect\phebs}
\def\hebb{\protect\phebb}

\makeatletter

\def\sethebfont#1{\def\ivrit{#1}#1}
\def\@sethebfont#1{\noexpand\sethebfont\noexpand#1}

\def\@subhebfont#1#2{\sethebfont{\@@subfont#1#2}}
\def\@@subfont#1#2{\noexpand\@subfont\noexpand#1\noexpand#2}

\@addfontinfo\@vpt{\def\pheb{\@subhebfont\heb\sevheb}
	           \def\phebs{\@subhebfont\hebs\heb}
		   \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@vipt{\def\pheb{\@subhebfont\heb\sevheb}
	            \def\phebs{\@subhebfont\hebs\heb}
		    \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@viipt{\def\pheb{\@sethebfont{\sevheb}}
		     \def\phebs{\@subhebfont\hebs\heb}
		     \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@viiipt{\def\pheb{\@sethebfont{\egtheb}}
		      \def\phebs{\@sethebfont{\egthebs}}
		      \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@ixpt{\def\pheb{\@sethebfont{\ninheb}}
		    \def\phebs{\@sethebfont{\ninhebs}}
		    \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@xpt{\def\pheb{\@sethebfont{\tenheb}}
		   \def\phebs{\@sethebfont{\tenhebs}}
		   \def\phebb{\@sethebfont{\tenhebb}}}

\@addfontinfo\@xipt{\def\pheb{\@subhebfont\heb\tenheb}
	            \def\phebs{\@subhebfont\hebs\heb}
		    \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@xiipt{\def\pheb{\@sethebfont{\twlheb}}
		     \def\phebs{\@sethebfont{\twlhebs}}
		     \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@xivpt{\def\pheb{\@subhebfont\heb\twlheb}
	             \def\phebs{\@subhebfont\hebs\heb}
		     \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@xviipt{\def\pheb{\@sethebfont{\svtnheb}}
		      \def\phebs{\@subhebfont\hebs\heb}
		      \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@xxpt{\def\pheb{\@subhebfont\heb\svtnheb}
	            \def\phebs{\@subhebfont\hebs\heb}
		    \def\phebb{\@subhebfont\hebb\heb}}

\@addfontinfo\@xxvpt{\def\pheb{\@subhebfont\heb\svtnheb}
	             \def\phebs{\@subhebfont\hebs\heb}
		     \def\phebb{\@subhebfont\hebb\heb}}

\@normalsize

\makeatother