void DMItemTeleportActivated(object oDM, object oTarget);

void DMItemTeleportActivated(object oDM, object oTarget)
{
    if (oTarget == OBJECT_INVALID)
    {
        SendMessageToPC(oDM, "Targeted object is invalid.");
        return;
    }

    object oTeleTalk = CreateObject(OBJECT_TYPE_PLACEABLE, "tp_tb_dmteletlk0",GetLocation(oDM), FALSE);
    SetLocalObject(oTeleTalk, "oTeleportTarget", oTarget);
    SetCustomToken(2000, GetName(GetLocalObject(oTeleTalk, "oTeleportTarget")));

    AssignCommand(oDM, ActionStartConversation(oTeleTalk, "", TRUE));
    return;
}