\input fig4tex.tex
%
% 1. Definition of characteristic points
\figinit{2pt}
\figpt 1:(-10,10)
\figpt 2:(110,40)
\figpt 3:(50,-10)
\figptorthoprojline 11:$H_1\scriptstyle\figcoord2$=1/2,3/
\figptorthoprojline 12:$H_2\scriptstyle\figcoord2$=2/1,3/
\figptorthoprojline 13:$H_3\scriptstyle\figcoord2$=3/1,2/
%
% 2. Creation of the graphical file
\psbeginfig{}
\psline[1,2,3,1]
\def\Dim{5}
\psset (color=\Redrgb)
\psaltitude \Dim[3,2,1]
\psset second(dash=7)
\psaltitude \Dim[1,3,2]
\psaltitude \Dim[2,3,1]
\psendfig
%
% 3. Writing text on the figure
\figvisu{\figBoxA}{
\vbox{\hbox{The three altitudes in a triangle. $H_i$ is the foot of}
\hbox{the altitude from $A_i, i=1,2,3$, with its coordinates.}}}{
\figwritenw 1:(2pt)\figwritee 2:(2pt)\figwrites 3:(4pt)
\figwritese 11:(2pt)\figwritese 12:(2pt)\figwritege 13:(3pt,-0.1pt)
}
\box\figBoxA
%
\bye