:GenRate=:MinEPS*:Min_EPS+(10000-:Battery)/50 goto1