Adding finished salamence.

This commit is contained in:
Sergiotarxz 2023-11-14 18:14:46 +01:00
parent a574e6f530
commit ca9030cbe0
3 changed files with 16 additions and 16 deletions

View File

@ -9,7 +9,7 @@ use feature 'signatures';
use Rsaves
qw/read_save check_correct_size get_saves find_current_save_index check_correct_size find_pokemon_substruct change_gender read_pc_storage save_pc_changes enable_eon_ticket save_changes pokemon_set_shiny read_pkm_file_box enable_mirage_island_for_pokemon parse_version_name pokemon_fill_pp to_3rd_encoding translate_3rd_encoding/;
use Rsaves::Constants::Global
qw/$MOVE_SPIKES $MOVE_DRILL_PECK $MOVE_HIDDEN_POWER $MOVE_TAUNT $MOVE_THUNDERBOLT $MOVE_ROAR $MOVE_THUNDER_WAVE $ITEM_LEFTOVERS $MOVE_DRAGON_DANCE $MOVE_ROCK_SLIDE $MOVE_EARTHQUAKE $MOVE_TAUNT $MOVE_FLAMETHROWER $MOVE_WILL_O_WISP $MOVE_HYDRO_PUMP $MOVE_ICE_BEAM $MOVE_FOCUS_PUNCH $MOVE_PSYCHIC $MOVE_FIRE_PUNCH $MOVE_WISH $MOVE_PROTECT $MOVE_TOXIC $MOVE_LEECH_SEED $MOVE_RECOVER $MOVE_RAPID_SPIN $MOVE_EXPLOSION $MOVE_SURF $MOVE_REFRESH/;
qw/$MOVE_SPIKES $MOVE_DRILL_PECK $MOVE_HIDDEN_POWER $MOVE_TAUNT $MOVE_THUNDERBOLT $MOVE_ROAR $MOVE_THUNDER_WAVE $ITEM_LEFTOVERS $MOVE_DRAGON_DANCE $MOVE_ROCK_SLIDE $MOVE_EARTHQUAKE $MOVE_TAUNT $MOVE_FLAMETHROWER $MOVE_WILL_O_WISP $MOVE_HYDRO_PUMP $MOVE_ICE_BEAM $MOVE_FOCUS_PUNCH $MOVE_PSYCHIC $MOVE_FIRE_PUNCH $MOVE_WISH $MOVE_PROTECT $MOVE_TOXIC $MOVE_LEECH_SEED $MOVE_RECOVER $MOVE_RAPID_SPIN $MOVE_EXPLOSION $MOVE_SURF $MOVE_REFRESH $MOVE_BRICK_BREAK $MOVE_DRAGON_CLAW $MOVE_FIRE_BLAST/;
use Rsaves::Constants::Ruby::Global qw/$MALE $FEMALE/;
@ -25,7 +25,7 @@ sub start {
my $save = $saves[$current_save_index];
my $pc = read_pc_storage($save);
my $skarmory = $pc->{boxes}[13][0];
my $salamence = $pc->{boxes}[13][0];
my $celebi = $pc->{boxes}[13][1];
my $jirachi = $pc->{boxes}[13][2];
my $claydol = $pc->{boxes}[13][3];
@ -33,7 +33,7 @@ sub start {
my $tyranitar = $pc->{boxes}[13][5];
modifyJirachi($jirachi);
modifyCelebi($celebi);
modifySkarmory($skarmory);
modifySalamence($salamence);
modifyClaydol($claydol);
modifyMilotic($milotic);
modifyTyranitar($tyranitar);
@ -46,7 +46,7 @@ sub start {
#
pokemon_fill_pp($jirachi);
pokemon_fill_pp($celebi);
pokemon_fill_pp($skarmory);
pokemon_fill_pp($salamence);
pokemon_fill_pp($claydol);
pokemon_fill_pp($milotic);
pokemon_fill_pp($tyranitar);
@ -254,8 +254,8 @@ sub modifyCelebi ($pokemon) {
$pokemon->{substructures}[0]{experience} = 1_059_862;
}
sub modifySkarmory ($pokemon) {
$pokemon->{personality} = 0xC6C32B9F;
sub modifySalamence ($pokemon) {
$pokemon->{personality} = 0x39D14879;
my $ivs_egg_status_and_ability =
$pokemon->{substructures}[3]{ivs_egg_status_and_ability};
@ -271,7 +271,7 @@ sub modifySkarmory ($pokemon) {
(
$iv_hp, $iv_attack, $iv_defense, $iv_special_attack,
$iv_special_defense, $iv_speed, $ability
) = ( 30, 31, 30, 10, 30, 30, 0 );
) = ( 30, 31, 30, 30, 11, 31, 0 );
$ivs_egg_status_and_ability = 0;
$ivs_egg_status_and_ability |= ( ( $ability & 1 ) << 31 );
@ -285,17 +285,17 @@ sub modifySkarmory ($pokemon) {
$pokemon->{substructures}[3]{ivs_egg_status_and_ability} =
$ivs_egg_status_and_ability;
$pokemon->{substructures}[2]{hp_ev} = 240;
$pokemon->{substructures}[2]{attack_ev} = 0;
$pokemon->{substructures}[2]{hp_ev} = 0;
$pokemon->{substructures}[2]{attack_ev} = 4;
$pokemon->{substructures}[2]{defense_ev} = 0;
$pokemon->{substructures}[2]{special_attack_ev} = 0;
$pokemon->{substructures}[2]{special_defense_ev} = 244;
$pokemon->{substructures}[2]{speed_ev} = 24;
$pokemon->{substructures}[2]{special_attack_ev} = 252;
$pokemon->{substructures}[2]{special_defense_ev} = 0;
$pokemon->{substructures}[2]{speed_ev} = 252;
$pokemon->{substructures}[1]{movements}[0] = $MOVE_DRILL_PECK;
$pokemon->{substructures}[1]{movements}[1] = $MOVE_TAUNT;
$pokemon->{substructures}[1]{movements}[2] = $MOVE_ROAR;
$pokemon->{substructures}[1]{movements}[3] = $MOVE_SPIKES;
$pokemon->{substructures}[1]{movements}[0] = $MOVE_BRICK_BREAK;
$pokemon->{substructures}[1]{movements}[1] = $MOVE_DRAGON_CLAW;
$pokemon->{substructures}[1]{movements}[2] = $MOVE_FIRE_BLAST;
$pokemon->{substructures}[1]{movements}[3] = $MOVE_HIDDEN_POWER;
$pokemon->{substructures}[0]{held_item} = $ITEM_LEFTOVERS;
$pokemon->{substructures}[0]{experience} = 1_250_000;
}

BIN
sergioTeam2Salamence.gba Normal file

Binary file not shown.

BIN
sergioTeam2Salamence.sav Normal file

Binary file not shown.