mirror of
https://github.com/GearsProgress/Poke_Transporter_GB.git
synced 2026-03-22 01:44:36 -05:00
391 lines
12 KiB
C++
391 lines
12 KiB
C++
#include <tonc.h>
|
|
#include "pokemon.h"
|
|
#include "pokemon_data.h"
|
|
|
|
#define pkmn_size ((gen == 1) ? 44 : 48)
|
|
#define name_size 11
|
|
|
|
byte gen_2_char_array[0x80]{
|
|
0xBB, 0xBC, 0xBD, 0xBE, 0xBF, 0xC0, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7, 0xC8, 0xC9, 0xCA,
|
|
0xCB, 0xCC, 0xCD, 0xCE, 0xCF, 0xD0, 0xD1, 0xD2, 0xD3, 0xD4, 0x5C, 0x5D, 0xF0, 0x36, 0x5C, 0x5D,
|
|
0xD5, 0xD6, 0xD7, 0xD8, 0xD9, 0xDA, 0xDB, 0xDC, 0xDD, 0xDE, 0xDF, 0xE0, 0xE1, 0xE2, 0xE3, 0xE4,
|
|
0xE5, 0xE6, 0xE7, 0xE8, 0xE9, 0xEA, 0xEB, 0xEC, 0xED, 0xEE, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
|
|
0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
|
|
0xD8, 0xE0, 0xE1, 0xE6, 0xE7, 0xE8, 0xEA, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x7B,
|
|
0xB4, 0xCA, 0xC7, 0xAE, 0x00, 0x00, 0xAC, 0xAB, 0xAD, 0x2D, 0x1B, 0x7C, 0x00, 0xEF, 0x00, 0xB5,
|
|
0xB7, 0xEC, 0xAD, 0xBA, 0xB8, 0xB6, 0xA1, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 0xA7, 0xA8, 0xA9, 0xAA};
|
|
|
|
Pokemon::Pokemon(){
|
|
};
|
|
|
|
void Pokemon::load_data(int gen, int index, byte *party_data)
|
|
{
|
|
int party_offset = 21 + (index * pkmn_size);
|
|
int ot_offset = 21 + (6 * pkmn_size) + (index * name_size);
|
|
int name_offset = 21 + (6 * pkmn_size) + (6 * name_size) + (index * name_size);
|
|
|
|
switch (gen)
|
|
{
|
|
case 1:
|
|
|
|
break;
|
|
case 2:
|
|
species_index = party_data[party_offset + 0x00];
|
|
copy_from_to(&party_data[party_offset + 0x02], &moves[0], 4, false);
|
|
copy_from_to(&party_data[party_offset + 0x06], &trainer_id[0], 2, false);
|
|
copy_from_to(&party_data[party_offset + 0x08], &exp[0], 3, true);
|
|
copy_from_to(&party_data[name_offset], &nickname[0], 10, false);
|
|
copy_from_to(&party_data[ot_offset + 0x00], &trainer_name[0], 7, false);
|
|
copy_from_to(&party_data[party_offset + 0x15], &dvs[0], 2, false);
|
|
copy_from_to(&party_data[party_offset + 0x17], &pp_values[0], 4, false);
|
|
pokerus = party_data[party_offset + 0x1C];
|
|
copy_from_to(&party_data[party_offset + 0x1D], &caught_data[0], 2, false);
|
|
level = party_data[party_offset + 0x1F];
|
|
break;
|
|
}
|
|
}
|
|
|
|
void Pokemon::convert_to_gen_three(u32 random_32)
|
|
{
|
|
// Generate PID
|
|
u32 n_pid = generate_pid(species_index, *(vu32 *)exp % 25, &dvs[0], random_32);
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
pid[i] = (n_pid >> (i * 8)) & 0xFF;
|
|
}
|
|
|
|
// Make sure Level is not over 100 based on EXP
|
|
if (*(vu32 *)exp > get_max_exp(species_index))
|
|
{
|
|
*(vu32 *)exp = get_max_exp(species_index);
|
|
}
|
|
|
|
// Separate the PP Up values from the Move PP values
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
pure_pp_values[i] = (pp_values[i] & 0b00111111);
|
|
pp_bonus |= (pp_values[i] & 0b11000000) >> (6 - i * 2);
|
|
}
|
|
|
|
// Convert and set IVs
|
|
int hp_iv = 0;
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
ivs[i + 1] = (dvs[i / 2] >> (((i + 1) % 2) * 4)) & 0b1111;
|
|
hp_iv |= ((ivs[i + 1] & 0x1) << i);
|
|
};
|
|
ivs[0] = hp_iv;
|
|
ivs[5] = ivs[4];
|
|
|
|
for (int i = 0; i < 6; i++)
|
|
{
|
|
ivs[i] = (ivs[i] * 2) + 1;
|
|
iv_egg_ability |= ((ivs[i] & 0b11111) << (i * 5));
|
|
}
|
|
|
|
// Determine and set Ability
|
|
iv_egg_ability |= ((pid[0] & 0x1) ? get_num_abilities(species_index) : 1) << 31;
|
|
|
|
// Origin info
|
|
origin_info |= ((caught_data[0] & 0b10000000) << 8); // OT gender - We would shift left 15 bits, but the bit is already shifted over 7
|
|
origin_info |= (4 << 11); // Ball
|
|
origin_info |= (((gen == 1) ? 4 : 7) << 7); // Game
|
|
origin_info |= level; // Level met
|
|
|
|
// Ribbons and Obedience
|
|
ribbons[1] |= 0b00000100; // Artist Ribbon
|
|
if (species_index == 151 || species_index == 251) // Checks for Mew or Celebi
|
|
ribbons[3] |= 0x10000000; // Fateful Encounter flag
|
|
|
|
copy_from_to(&pid[0], &gen_3_pkmn[0], 4, false); // Personality Value
|
|
copy_from_to(&trainer_id[0], &gen_3_pkmn[4], 2, true); // TID
|
|
if (is_shiny)
|
|
{
|
|
}
|
|
else
|
|
{
|
|
copy_from_to(&blank_word[0], &gen_3_pkmn[6], 2, false); // SID
|
|
}
|
|
copy_from_to(convert_text(&nickname[0], 10, 2), &gen_3_pkmn[8], 10, false); // Nickname
|
|
gen_3_pkmn[18] = 2; // Language, set to English
|
|
gen_3_pkmn[19] = 0b00000010; // Egg Name
|
|
copy_from_to(convert_text(&trainer_name[0], 7, 2), &gen_3_pkmn[20], 7, false); // OT Name
|
|
gen_3_pkmn[27] = 0b00000000; // Markings
|
|
// ???
|
|
|
|
// Data:
|
|
data_section_G[0] = species_index;
|
|
data_section_G[1] = 0x00; // Species Index, check for glitch Pokemon
|
|
copy_from_to(&exp[0], &data_section_G[4], 3, false);
|
|
data_section_G[8] = pp_bonus;
|
|
|
|
data_section_A[0] = moves[0]; // Move 1
|
|
data_section_A[2] = moves[1]; // Move 2
|
|
data_section_A[4] = moves[2]; // Move 3
|
|
data_section_A[6] = moves[3]; // Move 4
|
|
copy_from_to(&pure_pp_values[0], &data_section_A[8], 4, false); // PP Values
|
|
|
|
// Data section E is all zero (EVs and Contest Stats)
|
|
|
|
data_section_M[0] = pokerus;
|
|
data_section_M[1] = 0xFF; // Met location - set to Fateful Encounter (separate from flag), cannot be seen by player and is replaced by Pal Park in gen 4
|
|
data_section_M[2] = origin_info & 0x00FF; // Lower origins info
|
|
data_section_M[3] = (origin_info >> 8) & 0xFF; // Upper origins info
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
data_section_M[i + 4] = (iv_egg_ability >> (i * 8) & 0xFF); // Set IVs, Egg, and Ability
|
|
}
|
|
copy_from_to(&ribbons[0], &data_section_M[8], 4, false); // Ribbons and Fateful Encounter
|
|
|
|
// Checksum:
|
|
checksum = 0x0000;
|
|
for (int i = 0; i < 12; i = i + 2)
|
|
{
|
|
checksum = checksum + ((data_section_G[i + 1] << 8) | data_section_G[i]);
|
|
checksum = checksum + ((data_section_A[i + 1] << 8) | data_section_A[i]);
|
|
checksum = checksum + ((data_section_E[i + 1] << 8) | data_section_E[i]);
|
|
checksum = checksum + ((data_section_M[i + 1] << 8) | data_section_M[i]);
|
|
}
|
|
|
|
gen_3_pkmn[28] = checksum & 0xFF;
|
|
gen_3_pkmn[29] = (checksum & 0xFF00) >> 8;
|
|
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
encryption_key[i] = gen_3_pkmn[4 + i] ^ pid[i]; // XOR SID and TID with PID
|
|
}
|
|
|
|
for (int i = 0; i < 12; i++)
|
|
{
|
|
unencrypted_data[i] = data_section_G[i];
|
|
data_section_G[i] ^= encryption_key[i % 4];
|
|
unencrypted_data[12 + i] = data_section_A[i];
|
|
data_section_A[i] ^= encryption_key[i % 4];
|
|
unencrypted_data[24 + i] = data_section_E[i];
|
|
data_section_E[i] ^= encryption_key[i % 4];
|
|
unencrypted_data[36 + i] = data_section_M[i];
|
|
data_section_M[i] ^= encryption_key[i % 4];
|
|
}
|
|
|
|
// Puts the four data chunks into their correct locations based on the PID
|
|
alocate_data_chunks(data_section_G, data_section_A, data_section_E, data_section_M);
|
|
}
|
|
|
|
void Pokemon::copy_from_to(byte *source, byte *destination, int size, bool reverse_endian)
|
|
{
|
|
if (reverse_endian)
|
|
{
|
|
for (int i = 0; i < size; i++)
|
|
{
|
|
destination[(size - 1) - i] = source[i];
|
|
}
|
|
}
|
|
else
|
|
{
|
|
for (int i = 0; i < size; i++)
|
|
{
|
|
destination[i] = source[i];
|
|
}
|
|
}
|
|
}
|
|
|
|
void Pokemon::alocate_data_chunks(byte *G, byte *A, byte *E, byte *M)
|
|
{
|
|
// reverse_endian(pid, 4); // This PERMANENTLY reverses the PID which is 'okay' because it is not used again. Bad practice though...
|
|
word full_pid = (pid[3] << 24 | pid[2] << 16 | pid[1] << 8 | pid[0]);
|
|
byte mod_pid = full_pid % 24;
|
|
unencrypted_data[48] = mod_pid;
|
|
// This is such a stupid way to do this, but I can't for the life of me find a formula for the permutation table.
|
|
switch (mod_pid)
|
|
{
|
|
case 0:
|
|
insert_data(G, A, E, M);
|
|
break;
|
|
case 1:
|
|
insert_data(G, A, M, E);
|
|
break;
|
|
case 2:
|
|
insert_data(G, E, A, M);
|
|
break;
|
|
case 3:
|
|
insert_data(G, E, M, A);
|
|
break;
|
|
case 4:
|
|
insert_data(G, M, A, E);
|
|
break;
|
|
case 5:
|
|
insert_data(G, M, E, A);
|
|
break;
|
|
case 6:
|
|
insert_data(A, G, E, M);
|
|
break;
|
|
case 7:
|
|
insert_data(A, G, M, E);
|
|
break;
|
|
case 8:
|
|
insert_data(A, E, G, M);
|
|
break;
|
|
case 9:
|
|
insert_data(A, E, M, G);
|
|
break;
|
|
case 10:
|
|
insert_data(A, M, G, E);
|
|
break;
|
|
case 11:
|
|
insert_data(A, M, E, G);
|
|
break;
|
|
case 12:
|
|
insert_data(E, G, A, M);
|
|
break;
|
|
case 13:
|
|
insert_data(E, G, M, A);
|
|
break;
|
|
case 14:
|
|
insert_data(E, A, G, M);
|
|
break;
|
|
case 15:
|
|
insert_data(E, A, M, G);
|
|
break;
|
|
case 16:
|
|
insert_data(E, M, G, A);
|
|
break;
|
|
case 17:
|
|
insert_data(E, M, A, G);
|
|
break;
|
|
case 18:
|
|
insert_data(M, G, A, E);
|
|
break;
|
|
case 19:
|
|
insert_data(M, G, E, A);
|
|
break;
|
|
case 20:
|
|
insert_data(M, A, G, E);
|
|
break;
|
|
case 21:
|
|
insert_data(M, A, E, G);
|
|
break;
|
|
case 22:
|
|
insert_data(M, E, G, A);
|
|
break;
|
|
case 23:
|
|
insert_data(M, E, A, G);
|
|
break;
|
|
}
|
|
}
|
|
|
|
void Pokemon::insert_data(byte *first, byte *second, byte *third, byte *fourth)
|
|
{
|
|
copy_from_to(&first[0], &gen_3_pkmn[32], 12, false);
|
|
copy_from_to(&second[0], &gen_3_pkmn[44], 12, false);
|
|
copy_from_to(&third[0], &gen_3_pkmn[56], 12, false);
|
|
copy_from_to(&fourth[0], &gen_3_pkmn[68], 12, false);
|
|
}
|
|
|
|
byte Pokemon::get_gen_3_data(int index)
|
|
{
|
|
return gen_3_pkmn[index];
|
|
}
|
|
|
|
byte *Pokemon::get_full_gen_3_array()
|
|
{
|
|
return gen_3_pkmn;
|
|
}
|
|
|
|
byte Pokemon::get_unencrypted_data(int index)
|
|
{
|
|
return unencrypted_data[index];
|
|
}
|
|
|
|
byte *Pokemon::convert_text(byte *text_array, int size, int gen)
|
|
{
|
|
switch (gen)
|
|
{
|
|
case 2:
|
|
for (int i = 0; i < size; i++)
|
|
{
|
|
if (text_array[i] == 0x50)
|
|
{
|
|
text_array[i] = 0xFF;
|
|
}
|
|
else if (text_array[i] >= 0x80)
|
|
{
|
|
text_array[i] = gen_2_char_array[text_array[i] - 0x80];
|
|
}
|
|
else
|
|
{
|
|
text_array[i] = 0x00;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return text_array;
|
|
}
|
|
|
|
u32 Pokemon::generate_pid(byte pid_species_index, byte nature, byte *pid_dvs, u32 seed)
|
|
{
|
|
// Set Unown Letter
|
|
u32 new_pid = 0;
|
|
byte letter = 0;
|
|
Poke_Random random_num(seed);
|
|
if (pid_species_index == 0xC9)
|
|
{
|
|
letter |= ((pid_dvs[0] >> 5) & 0b11) << 6;
|
|
letter |= ((pid_dvs[0] >> 1) & 0b11) << 4;
|
|
letter |= ((pid_dvs[1] >> 5) & 0b11) << 2;
|
|
letter |= ((pid_dvs[1] >> 1) & 0b11);
|
|
letter = letter / 10;
|
|
|
|
byte letter_mod = rand_reverse_mod(28, letter, random_num.get_rand());
|
|
for (int i = 0; i < 4; i++)
|
|
{
|
|
new_pid |= ((letter_mod >> (i * 2)) & 0b11) << (8 * i);
|
|
}
|
|
|
|
// Randomize rest of PID
|
|
new_pid |= random_num.get_rand() & 0xFCFCFCFC;
|
|
|
|
// Set Nature
|
|
while ((new_pid % 25) != nature)
|
|
{
|
|
new_pid = (new_pid & 0xFFFFFF00) | ((new_pid & 0xFF) + 4);
|
|
}
|
|
return new_pid;
|
|
}
|
|
else
|
|
{
|
|
// Set the correct gender for the Pokemon
|
|
new_pid |= get_rand_gender_byte(pid_species_index, ((pid_dvs[0] >> 4) & 0b1111), seed);
|
|
|
|
// Randomize rest of PID
|
|
new_pid |= random_num.get_rand() & 0xFFFFFF00;
|
|
|
|
while(new_pid % 25 != nature)
|
|
{
|
|
new_pid = new_pid + 256;
|
|
}
|
|
return new_pid;
|
|
}
|
|
}
|
|
|
|
byte Pokemon::rand_reverse_mod(byte modulo_divisor, byte target_mod, u32 seed)
|
|
{
|
|
return (modulo_divisor * convert_random(seed, 0, (255 - target_mod) / modulo_divisor)) + target_mod;
|
|
}
|
|
|
|
byte Pokemon::get_rand_gender_byte(byte index_num, byte attack_DVs, u32 seed)
|
|
{
|
|
byte gen2_threshold = get_gender_threshold(index_num, false);
|
|
byte gen3_threshold = get_gender_threshold(index_num, true);
|
|
if (gen2_threshold == -1) // Is one gender or is genderless
|
|
{
|
|
return convert_random(seed, 0, 256);
|
|
} else if (attack_DVs < gen2_threshold) // Is Female
|
|
{
|
|
return convert_random(seed, 0, gen3_threshold);
|
|
}
|
|
else // Is Male
|
|
{
|
|
return convert_random(seed, gen3_threshold, 256);
|
|
}
|
|
}
|