void main()
{

object oPC = GetPCSpeaker();

object oTarget;
object oSpawn;
location lTarget;
oTarget = GetWaypointByTag("WP_SPn_Roggor");

lTarget = GetLocation(oTarget);

oSpawn = CreateObject(OBJECT_TYPE_CREATURE, "roggor", lTarget);

oTarget = oSpawn;

AssignCommand(oTarget, ActionStartConversation(oPC, ""));


oTarget = GetObjectByTag("Basharat2");

AssignCommand(oTarget, ActionMoveToObject(GetObjectByTag("WP_Basharat2")));

oTarget = GetObjectByTag("Basharat2");

int nInt;
nInt = GetObjectType(oTarget);

oTarget = GetObjectByTag("Basharat2");

DestroyObject(oTarget, 3.0);



}