How to use Yggdrasil Leaf item correctly?

For everything NOT server specific support. Do NOT ask for connectivity help here!.

Moderator: Moderators

forbbs
Human
Human
Posts: 30
Joined: 26 Jul 2011, 21:03
Noob?: Yes

How to use Yggdrasil Leaf item correctly?

#1 Post by forbbs »

example:dead player id:0;Yggdrasil Leaf id:5,distance between player and bot is less than 3.

I tried "ip 5 0",then bot used a yggdrasil leaf indeed.But the dead player didn't be revivified actually.
In RO client,I can see the bot just do nothing.

I'd like to know how to use yggdrasil leaf correctly?Thanks.
forbbs
Human
Human
Posts: 30
Joined: 26 Jul 2011, 21:03
Noob?: Yes

Re: How to use Yggdrasil Leaf item correctly?

#2 Post by forbbs »

It seems there's some problems in item_skill function of Receive\kRO\Sakexe_0.pm.
I did some cheap hack to resolve it.

Code: Select all

sub item_skill {
	my ($self, $args) = @_;

	my $skillID = $args->{skillID};
	my $targetType = $args->{targetType}; # we don't use this yet
	my $skillLv = $args->{skillLv};
	my $sp = $args->{sp}; # we don't use this yet
	my $skillName = $args->{skillName};

	my $skill = new Skill(idn => $skillID, level => $skillLv);
	message TF("Permitted to use %s (%d), level %d\n", $skill->getName, $skill->getIDN, $skill->getLevel);
	my $useID = $accountID;
	my $range = $args->{unknown2};
debug "$skillID, $skillLv, $sp, $skillName, $targetType, $range, $useID itemskill\n", "myPacket";
	if ($skillID == 54) {
			my $players = $playersList->getItems();
			foreach my $p (@{$players}) {
				if ($p->{hp} == 0) {
					$useID = $p->{ID};
					last;
				}
			}
	}
	unless ($config{noAutoSkill}) {
		$messageSender->sendSkillUse($skillID, $skillLv, $useID);
		undef $char->{permitSkill};
	} else {
		$char->{permitSkill} = $skill;
	}

	Plugins::callHook('item_skill', {
		ID => $skillID,
		level => $skillLv,
		name => $skillName
	});
}