Summoning Corpses

[Cisyouc]

-edit- Revised the command to work without the spells_us.txt implementation.

Insert the following into the said locations:

-edit-
If its not already,
Parser.cpp

#include "PlayerCorpse.h"

Embparser.cpp

//Cisyouc: Function for summoning corpse
"sub scorpse{push(@cmd_queue,{func=>'scorpse',args=>join(',',@_)});}"

Parser.cpp

						 	else if (!strcmp(strlwr(command,"scorpse")){/* Cisyouc: Summons corpse in current zone */

							 Corpse* corpse=entity_list.GetCorpseByOwner(mob->CastToClient());

							 if(corpse != NULL)
							 {
								corpse->Summon(mob->CastToClient(),TRUE);
		mob->Message(15, "You feel your corpse being summoned to your side.");
							 }
							 else
							 {
								 mob->Message(13,"You do not appear to have any corpses in this zone.");
								 mob->Message(13,"If you feel this in error, petition as soon as possible.");
							 }
						 }