Plot[1-862/625*Exp[-17240* t] *Sin[12500*t]-Exp[-17240*t] *Cos[12500*t], {t,0,0.0005}]