Here is a little script that will cast 96% rez on your corpse. I wrote it and attached to some npc's in the guild lobby. Could probably use a little tweaking but works fine for my needs.
Code:
#NPC Rez script by druid64 01-16-2012
sub EVENT_SAY {
my $charid = $client->GetID();
my $saylink1 = quest::saylink("rez");
if ($text =~ /hail/i) {
$client->Message(315, "I can try and [$saylink1] your corpse if you like.");
}
if($text=~/rez/i) {
my $corpse = $entity_list->GetCorpseByOwner($client);
$client->Message(315,'I will now try and rez '.$corpse->GetOwnerName().'\'s corpse');
$corpse_id = $corpse->GetID();
$npc->CastSpell(1524,$corpse_id);
}
}