Contatore di record che si azzera quando cambia cliente

[optime]

pigro!

conta=0
cliente=""
do
   ' leggi cliente
   if cliente_da_disco<>cliente then
      conta=0
      cliente=cliente_da_disco
   end if
   ' scrivi su disco
      conta=conta+1
      'scrivi prima riga
      conta=conta+1
      'scrivi seconda riga
      conta=conta+1
      'scrivi terza riga
loop