Adding missing natures.
This commit is contained in:
parent
27bddb53f8
commit
d7da1100fe
|
@ -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;
|
Loading…
Reference in New Issue