Textwindow.ForegroundColor="red"
TextWindow.WriteLine("Nom du salarié")
Textwindow.ForegroundColor="yellow"
Name = TextWindow.Read()
WHILE Name <> "FIN$"
  Textwindow.ForegroundColor="red"
  TextWindow.WriteLine("Taux horaire")
  Textwindow.ForegroundColor="yellow"
  T = TextWindow.Read()
  Textwindow.ForegroundColor="red"
  TextWindow.WriteLine("Nombre d'heures travaillées")
  Textwindow.ForegroundColor="yellow"
  H = TextWindow.Read()
  Textwindow.ForegroundColor="cyan"
  TextWindow.WriteLine ("Fiche de paie de Mr "+ Name)
  S = H * T
  TextWindow.WriteLine ("Salaire brut :  " + S + " FCfa")
  IF S > 100000 THEN 
    R = 100000 * 0.028 + (S - 100000) * 0.015 
      ELSE
     R = S * 0.028 
   endif
  R = Math.Round(R)
  TextWindow.WriteLine ("Retenue CNPS :   " + R + " FCfa")
  S1 = S - R
  TextWindow.WriteLine ("Salaire Net  :  " + S1 + " FCfa")
  Textwindow.ForegroundColor="white"
    TextWindow.WriteLine ("")
    TextWindow.WriteLine ("********************************")
    TextWindow.WriteLine ("")
  Textwindow.ForegroundColor="red"
  TextWindow.WriteLine ("Nom du salarié")
  Textwindow.ForegroundColor="yellow"
  Name = TextWindow.Read()
Endwhile
Textwindow.ForegroundColor="white"
TextWindow.WriteLine ("Fin du traitement")