\newcount\fcount\fcount=0
\newdimen\footnotebaselineskip
\footnotebaselineskip=\baselineskip
\let\ftnote=\footnote
\def\footnote{\global\advance\fcount by 1\relax
%\bgroup\baselineskip=\footnotebaselineskip
\ftnote{$\strut^{\number\fcount}$}}