Sharing is Caring: Custom Spells

[NatedogEZ]

Custom spells using quests? Because I love doing that!

AoE rez spell I wrote awhile ago... (edited it a bit)
uses spell 994 to resurrect.. but whatever spell its attached to needs to be self only targettype to trigger the quest script..

spellid.pl (example 11.pl) in the global\spells folder

sub EVENT_SPELL_EFFECT_CLIENT {
	my @corpselist = $entity_list->GetCorpseList();
	foreach $CL (@corpselist) {
		next unless $CL->IsPlayerCorpse();
		next if $CL->IsRezzed();
		next if $client->CalculateDistance($CL->GetX(), $CL->GetY(), $CL->GetZ()) > 100;
		quest::castspell(994,$CL->GetID()); 
	}
}

[chrsschb]

Originally Posted by NatedogEZ

Custom spells using quests? Because I love doing that!

AoE rez spell I wrote awhile ago... (edited it a bit)
uses spell 994 to resurrect.. but whatever spell its attached to needs to be self only targettype to trigger the quest script..

spellid.pl (example 11.pl) in the global\spells folder

sub EVENT_SPELL_EFFECT_CLIENT {
	my @corpselist = $entity_list->GetCorpseList();
	foreach $CL (@corpselist) {
		next unless $CL->IsPlayerCorpse();
		next if $CL->IsRezzed();
		next if $client->CalculateDistance($CL->GetX(), $CL->GetY(), $CL->GetZ()) > 100;
		quest::castspell(994,$CL->GetID()); 
	}
}

That's pretty badass.