osric-cgi/lib/OSRIC/Class/Druid.pm

24 lines
424 B
Perl
Raw Normal View History

2015-01-22 07:39:45 -05:00
package OSRIC::Class::Druid;
use parent qw(OSRIC::Class);
2015-01-07 11:13:22 -05:00
use OSRIC::Util qw/d/;
# A sub to get the maximum amount of starting gold (for sorting) and one to get
# an actual amount of starting gold:
sub max_starting_gold { 180 }
sub get_gold { ((d(6) + d(6) + d(6)) * 10) } # 3d6 * 10
# Minimum score requirements:
sub minimum_scores
{
{
str => 6,
dex => 6,
con => 6,
int => 6,
wis => 12,
cha => 15,
}
}
1;