characters_printed := 0;
<b><u>while</b></u> <b><u>not</b></u> end-of-text
{
   <b><u>print</b></u> the next character;
   <b><u>increment</b></u> characters_printed;
   <b><u>if</b></u> characters_printed >= max characters per line
   {
      <b><u>print</b></u> newline;
      characters_printed := 0
   }
}