кароче Kora реально не видит "-" в условиях!
нус, открываем файл
Utils.pm и добавляем "-?", т.е. либо есть у нас минус, либо нету:
sub getRange {
my $param = shift;
return if (!defined $param);
# remove % from the first number here (i.e. hp 50%..60%) because it's easiest
if ($param =~ /(-?\d+(?:\.\d+)?)\%?\s*(?:-|\.\.)\s*(-?\d+(?:\.\d+)?)/) {
return ($1, $2, 1);
} elsif ($param =~ />\s*(-?\d+(?:\.\d+)?)/) {
return ($1, undef, 0);
} elsif ($param =~ />=\s*(-?\d+(?:\.\d+)?)/) {
return ($1, undef, 1);
} elsif ($param =~ /<\s*(-?\d+(?:\.\d+)?)/) {
return (undef, $1, 0);
} elsif ($param =~ /<=\s*(-?\d+(?:\.\d+)?)/) {
return (undef, $1, 1);
} elsif ($param =~/^(-?\d+(?:\.\d+)?)/) {
return ($1, $1, 1);
}
}
regexp мать его..
теперь у нас точно работают условия:
target_deltaHp -X
target_deltaHp -X..-Y
target_deltaHp -X--Y (тожесамое, что и предыдущее) кстате нафига 2 одинаковых?
target_deltaHp >-X
target_deltaHp >=-X
target_deltaHp <-X
target_deltaHp <=-X