k = 0;
            if( !sc || (sc && !sc->data[spheres[0]]) ) { //GM Unconditional Check
                for( i = 0; i < 4; i++ ) {
                    switch(i) {
                        case 1:  subskill = WL_TETRAVORTEX_FIRE; k |= 1; break;
                        case 2:  subskill = WL_TETRAVORTEX_WIND; k |= 4; break;
                        case 3: subskill = WL_TETRAVORTEX_WATER; k |= 2; break;
                        case 4: subskill = WL_TETRAVORTEX_GROUND; k |= 8; break;
                    }
                skill_addtimerskill(src, tick + i * 200, bl->id, k, 0, subskill, skill_lv, i, flag);
                clif_skill_nodamage(src, bl, subskill, skill_lv, 1);
                }
            } else {
                for( i = 0; i < 4; i++ ) {
                    switch( sc->data[spheres[i]]->val1 )
                    {
                        case WLS_FIRE:  subskill = WL_TETRAVORTEX_FIRE; k |= 1; break;
                        case WLS_WIND:  subskill = WL_TETRAVORTEX_WIND; k |= 4; break;
                        case WLS_WATER: subskill = WL_TETRAVORTEX_WATER; k |= 2; break;
                        case WLS_STONE: subskill = WL_TETRAVORTEX_GROUND; k |= 8; break;
                    }
                    skill_addtimerskill(src, tick + i * 200, bl->id, k, 0, subskill, skill_lv, i, flag);
                    clif_skill_nodamage(src, bl, subskill, skill_lv, 1);
                    status_change_end(src, spheres[i], INVALID_TIMER);
                }
            }
            if (spheres[4]) // fix to remove last sphere if 5 are present, on official even though only 4 spheres are used, all spheres are removed
                status_change_end(src, spheres[4], INVALID_TIMER);