WBKIT()
{
    if(wbkit){
        integer n = llGetNumberOfPrims();
        integer i;
        llTriggerSound(snd_tsfr, 0.7);
        for(i=0;i<n;i++){
        string s = llList2String(llGetLinkPrimitiveParams(i, [PRIM_DESC]),0);
        if(llSubStringIndex(s,"WBRF")>-1){ llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, 0.18, 0.0>]); }
        else if(llSubStringIndex(s,"WBRB")>-1){ llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, 0.23, 0.0>]); }
        else if(llSubStringIndex(s,"WBLF")>-1){ llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, -0.18, 0.0>]); }
        else if(llSubStringIndex(s,"WBLB")>-1){ llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, -0.23, 0.0>]); }
        else if(llSubStringIndex(s,"WBKA")>-1){ llSetLinkAlpha(i, 1.0, ALL_SIDES); } }
        wbkit=FALSE;
        }
    else{
        integer n = llGetNumberOfPrims();
        integer i;
        llTriggerSound(snd_tsfr2, 0.7);
        for(i=0;i<n;i++){
        string s = llList2String(llGetLinkPrimitiveParams(i, [PRIM_DESC]),0);
        if(llSubStringIndex(s,"WBRF")>-1){ llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, -0.18, 0.0>]); }
        else if(llSubStringIndex(s,"WBRB")>-1){ llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, -0.23, 0.0>]); }
        else if(llSubStringIndex(s,"WBLF")>-1){  llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, 0.18, 0.0>]); }
        else if(llSubStringIndex(s,"WBLB")>-1){  llSetLinkPrimitiveParamsFast(i,[PRIM_POS_LOCAL,llGetLocalPos()+<0.0, 0.23, 0.0>]); }
        else if(llSubStringIndex(s,"WBKA")>-1){ llSetLinkAlpha(i, 0.0, ALL_SIDES); } }
        wbkit=TRUE;
        }
}