Peak shaving and load leveling