plugin::vtell

[Akkadius]

Another attempt to make, "cosmetics" easier in my scripting I made a plugin for voice tells, considering the command is completely integer based, it's very annoying to do anything with it.

Another thing that is rather annoying is the NPC tells will take up your reply cache so I use them sparingly.

But regardless, this cuts down on the time consumption when using this feature.

Note: Froglok, Vah-Shir, and Iksar (Drakkin was not even found closely) are not 100% as there was no clear integer that I found right away that matched them, so they are relative. Regardless it is going to make doing any form of voicetells cake compared to messing around with integers. Hope you enjoy it.

Race List:

"human" => 0,
"barbarian" => 1,
"erudin" => 2,
"woodelf" => 3,
"highelf" => 4,
"darkelf" => 5,
"halfelf" => 6,
"dwarf" => 7,
"troll" => 8,
"ogre" => 9,
"halfling" => 10,
"gnome" => 11,
"iksar" => 12,
"froglok" => 13,
"vahshir" => 15,

USAGE:

 plugin::vtell("message","race-name","sex(malefemale)");

so

plugin::vtell("battle","barbarian","male");

Just name the file "voicetell.pl" and put it in your plugins folder to get it to work.

sub vtell
{
	my $GreetName = $_[0];
	my $RaceName = $_[1];
	my $Sex = $_[2];
	%GreetId = (
		"agree" => 1,
		"battle" => 2,
		"disagree" => 3,
		"follow" => 4,
		"greet" => 5,
		"heal" => 6,
		"help" => 7,
		"laugh" => 8,
		"part" => 9,
		"retreat" => 10,
		"stop" => 11,
		"thanks" => 12,
	);
		%RaceID = (
		"human" => 0,
		"barbarian" => 1,
		"erudin" => 2,
		"woodelf" => 3,
		"highelf" => 4,
		"darkelf" => 5,
		"halfelf" => 6,
		"dwarf" => 7,
		"troll" => 8,
		"ogre" => 9,
		"halfling" => 10,
		"gnome" => 11,
		"iksar" => 12,
		"froglok" => 13,
		"vahshir" => 15,
	);
		%SexName = (
		"male" => 2,
		"female" => 3,
	);
	my $name = plugin::val('$name');
	quest::voicetell($name, $GreetId{$GreetName}, $RaceID{$RaceName}, $SexName{$Sex});
}

return 1;

I hope you all enjoy this!