:GeneratorUnitRateLimit=(10000-:StoredBatteryPower)/85 goto1