Adding missing natures.

This commit is contained in:
Sergiotarxz 2024-03-10 21:47:50 +01:00
parent 27bddb53f8
commit d7da1100fe
1 changed files with 21 additions and 0 deletions

View File

@ -0,0 +1,21 @@
package Rsaves::Constants::Emerald::Natures;
use v5.16.3;
use strict;
use warnings;
our @NATURES = (
'HARDY', 'LONELY', 'BRAVE', 'ADAMANT', 'NAUGHTY', 'BOLD',
'DOCILE', 'RELAXED', 'IMPISH', 'LAX', 'TIMID', 'HASTY',
'SERIOUS', 'JOLLY', 'NAIVE', 'MODEST', 'MILD', 'QUIET',
'BASHFUL', 'RASH', 'CALM', 'GENTLE', 'SASSY', 'CAREFUL',
'QUIRKY',
);
our %NATURE_TO_ID;
for (my $i = 0; $i < scalar @NATURES; $i++) {
my $nature = $NATURES[$i];
$NATURE_TO_ID{$nature} = $i;
}
1;