Finished base_pkmn::set_form