\newcount\n
\n=0
\message{ }
\message{I can count!!}
\loop
   \advance\n by1
   \message{\number\n}
   \ifnum\n<101
\repeat
\end

.
