// Use buried vampire
void main()
{
    object oPC=GetLastUsedBy();
    AssignCommand(oPC,ClearAllActions());
    AssignCommand(oPC,ActionStartConversation(oPC,"unbury_vamp",TRUE,FALSE));
}