// script for detecting hidden objects (not doors)

void main()
{

    object oPC=GetEnteringObject();

    // if I have been triggered or somehow the PC is not valid, return
    if ((GetLocalInt(OBJECT_SELF,"triggered")==TRUE)||(!GetIsObjectValid(oPC)))
    {
    return;
    }

    // if the entering object is not a PC and neither is its master, return. NB this
    // does allow familiars to find things
    if ((!GetIsPC(oPC))&&(!GetIsPC(GetMaster(oPC))))
    {
    return;
    }

    // We get the search skill of the entering object
    int nSkill=GetSkillRank(SKILL_SEARCH,oPC);

    //if the skill is untrained, just return
    if (nSkill==-1)
    {
    return;
    }

    // sMyTag refers to the tag of the trigger
    // sTag refers to the tag of the object we want to make
    // sWayTag is the tag of the waypoint it should appear at. It is the tag
    // of the hidden object with _appear_wp after it.

    string sMyTag = GetTag(OBJECT_SELF);

    // get how long the tag of the trigger is
    int nLength = GetStringLength(sMyTag);

    // the tag must begin secret_ which is 7 letters.
    int nTag=nLength-7;
    // so the tag of the object we are making must be the same length - 7

    // this should give us the tag of the object we are trying to make
    string sTag=GetStringRight(sMyTag,nTag);
    // DEBUG
   // SpeakString (sTag);

    // This goves us the tag of the waypoiny it should appear at
    string sWayTag=sTag+"_appear_wp";
    // DEBUG
    //SpeakString (sWayTag);

    // This is the location of the waypoint
    location locLoc = GetLocation (GetWaypointByTag(sWayTag));

    // the DC is put into the key tag field in the trigger.
    string sDC=GetTrapKeyTag(OBJECT_SELF);
    int nDC=StringToInt(sDC);
    // DEBUG
    //SpeakString (sDC);

    // we have a D20 dice roll which is added to the search skill
    int nMod = d20();

    int nTotalSkill=nSkill+nMod;

            // did we find it.
       if (nTotalSkill>=nDC)
       {

            object oItem;
            // yes we found it, now create the object itself.
            oItem = CreateObject(OBJECT_TYPE_ITEM,sTag,locLoc,TRUE);

            ApplyEffectAtLocation(DURATION_TYPE_INSTANT,EffectVisualEffect(VFX_IMP_CHARM),locLoc);
            FloatingTextStringOnCreature("You spot a hidden item",oPC);

            // set a local int on the object for clean up purposes
            SetLocalInt(oItem,"jw_hidden_int",TRUE);

            // Register that the hidden object has been found and cannot be found again
            SetLocalInt(OBJECT_SELF,"triggered",TRUE);

       }




}