   for ( ;  ; )
   {
      if (RANDD>PSuccess)
      {
         FailCount++;
         if (FailCount>=NumFail)
         {
            break;
         }
      }
      else
      {
         SuccessCount++;
      }
   }
