//::///////////////////////////////////////////////
//:: FileName d_weap
//:://////////////////////////////////////////////
//:://////////////////////////////////////////////
//:: Created By: Script Wizard
//:: Created On: 1/14/2004 8:16:13 PM
//:://////////////////////////////////////////////
#include "nw_i0_plot"
#include "rd_misc"

void main()
{
string sTag;
string sArea;

sArea = GetZone(GetPCSpeaker());
if (sArea == "SS1")
    sTag = "en4_cm1_mer";
else if (sArea == "DW1")
    sTag = "en4_cm2_mer";
else if (sArea == "IP1")
    sTag = "en4_cm3_mer";

    // Either open the store with that tag or let the user know that no store exists.
    object oStore = GetObjectByTag(sTag);
    if(GetObjectType(oStore) == OBJECT_TYPE_STORE)
        gplotAppraiseOpenStore(oStore, GetPCSpeaker());
    else
        ActionSpeakStringByStrRef(53090, TALKVOLUME_TALK);
}