integer deathChan = -86349612387; //to tell overhead to start blood particle

integer deathChan2 = -75676434317; // to tell movelock to stop blood particle

integer keyAskChan = -12121232321; //asks hud for key on attach

integer keyGiveChan = -554345654347; //get key from hud so this script only listens to that HUD
key object;

key me;
default
{
    attach(key attached)
    {
        if(attached)
        {
            llResetScript();
        }
    }
    state_entry()
    {
        llWhisper(keyAskChan, (string)llGetOwner() + ":" + "key");
        llParticleSystem([]);
         llListen(deathChan, "", object, "");
        llListen(deathChan2, "", object, "");

    }



    listen(integer channel, string name, key id, string message)
    {
        if(channel == keyGiveChan)
        {
            llOwnerSay(message);
            list msgData = llParseString2List(message, [":"], []);
            key me = llList2Key(msgData, 0);
            key HUD = llList2Key(msgData, 1);

            if(me == llGetOwner())
            {
                llOwnerSay("key added");
                object = HUD;
                llOwnerSay((string)object);
                llListen(deathChan, "", object, "");
                llListen(deathChan2, "", object, "");
            }
        }

        if(channel == deathChan)
        {

            list msgData = llParseString2List(message, [":"], []);

            key myKey = llList2Key(msgData, 0);
            string req = llList2String(msgData, 1);


            if(myKey == me && req == "death")
            {

        llParticleSystem([
            PSYS_PART_FLAGS,( 0
                |PSYS_PART_INTERP_COLOR_MASK
                |PSYS_PART_INTERP_SCALE_MASK ),
            PSYS_SRC_PATTERN, PSYS_SRC_PATTERN_EXPLODE ,
            PSYS_PART_START_ALPHA,0.901961,
            PSYS_PART_END_ALPHA,1,
            PSYS_PART_START_COLOR,<0.4,0.4,0.4> ,
            PSYS_PART_END_COLOR,<0.6,0.6,0.6> ,
            PSYS_PART_START_SCALE,<0.1875,0.21875,0>,
            PSYS_PART_END_SCALE,<0.15625,0.09375,0>,
            PSYS_PART_MAX_AGE,2.39844,
            PSYS_SRC_MAX_AGE,0,
            PSYS_SRC_ACCEL,<0,0,-1.5>,
            PSYS_SRC_BURST_PART_COUNT,3,
            PSYS_SRC_BURST_RADIUS,0.296875,
            PSYS_SRC_BURST_RATE,0.25,
            PSYS_SRC_BURST_SPEED_MIN,0,
            PSYS_SRC_BURST_SPEED_MAX,0.046875,
            PSYS_SRC_ANGLE_BEGIN,0,
            PSYS_SRC_ANGLE_END,0,
            PSYS_SRC_OMEGA,<0,0,0>,
            PSYS_SRC_TEXTURE, (key)"15dca669-6bc3-ef34-df7a-dfd6fd4e5399",
            PSYS_SRC_TARGET_KEY, (key)""
         ]);
    }
}
        if(channel == deathChan2)
        {
            list msgData = llParseString2List(message, [":"], []);

            key myKey = llList2Key(msgData, 0);
            string req = llList2String(msgData, 1);

            if(myKey == llGetOwner() && req == "nodeath")
            {
                llParticleSystem([]);
            }
        }
    }
}