Fullstrip (Random Strip)

[wOni]

Hi, question about fullstrip soul link, i know its kinda old but i have a new modification for this one.
 

Soul link > Full strip (Randomly Strip Headgear, weapon, shield and armor by lowchance)

i tried to copy old modification and reedit to my desire but no luck. here you go 
 

			if ( sd && tsc && sd->sc.data[SC_SPIRIT] && sd->sc.data[SC_SPIRIT]->val2 == SL_ROGUE && rand()%100 < 100
             &&
            ( skill_id == ST_FULLSTRIP && tsc->data[SC_CP_WEAPON] && tsc->data[SC_CP_HELM] && tsc->data[SC_CP_ARMOR] && tsc->data[SC_CP_SHIELD] ) ) {
            int item_id = 7139; // Glistening Coat
            int ii;
            ARR_FIND( 0, MAX_INVENTORY, ii, sd->status.inventory[ii].nameid == item_id );
            if ( ii < MAX_INVENTORY ) {
                pc_delitem( sd, ii, 1, 0, 0, LOG_TYPE_CONSUME);
				switch( rnd()%100 ){
                    case 1:
                        status_change_end( bl, SC_CP_WEAPON, INVALID_TIMER );
                        sc_start( NULL, bl, SC_STRIPWEAPON, 100, skill_lv, d );
                        break;
                    case 2:
                        status_change_end( bl, SC_CP_SHIELD, INVALID_TIMER );
                        sc_start( NULL, bl, SC_STRIPSHIELD, 100, skill_lv, d );
                        break;
                    case 3:
                        status_change_end( bl, SC_CP_ARMOR, INVALID_TIMER );
                        sc_start( NULL, bl, SC_STRIPARMOR, 100, skill_lv, d );
                        break;
                    case 4:
                        status_change_end( bl, SC_CP_HELM, INVALID_TIMER );
                        sc_start( NULL, bl, SC_STRIPHELM, 100, skill_lv, d );
                        break;
                }
                clif_skill_nodamage( src, bl, skill_id, skill_lv, i );
                break;
            }
        }

ps, i did reedit to 100% to test the random strip but it always strip weapon. 

can someone help me. Thank you