Sculptie Damage Script - SecondLife Armor

sculptie_damage.lsl

// This is an initial finished prototype demonstrating Sculptie based armor that is affected by damage. (multiple stages of degradation, bullit holes etc)
integer damageStage = -1;

SendStatus(integer dmg)
{
    string texture = llGetInventoryName(INVENTORY_TEXTURE,dmg);
    list params = [PRIM_TYPE, PRIM_TYPE_SCULPT, texture, PRIM_SCULPT_TYPE_SPHERE];
    llSetLinkPrimitiveParams(LINK_ALL_OTHERS,params);
}

DamageIncrease()
{
    damageStage++;
    integer totalSculpts = llGetInventoryNumber(INVENTORY_TEXTURE);
    if (damageStage >= totalSculpts)
        damageStage -= totalSculpts;
    string texture = llGetInventoryName(INVENTORY_TEXTURE,damageStage);

    list params = [PRIM_TYPE, PRIM_TYPE_SCULPT, texture, PRIM_SCULPT_TYPE_SPHERE];
    llSetPrimitiveParams(params);

    SendStatus(damageStage + 1);

}

default
{
    state_entry()
    {
        llSetLinkAlpha(LINK_ALL_OTHERS, 0.0,ALL_SIDES);
        DamageIncrease();
    }

    collision_end(integer total_number)
    {
        DamageIncrease();
        llSay(0,"success");
    }

    touch_end(integer total_number)
    {
        DamageIncrease();
        llOwnerSay("success");
    }
}