//function      script  unbind  {
 
-       script  unbinding_system        -1,{
 
        
 
OnStartBinding: 
 
        set .id, 29990; // or any item id that would correspond to your item/scroll that you wish to use.
 
        
 
        setarray .itemid[0],0;
 
        setarray .name$[0],"";
 
        setarray .identify[0],0;
 
        setarray .attrib[0],0;
 
        setarray .refine[0],0;
 
        setarray .card1[0],0;
 
        setarray .card2[0],0;
 
        setarray .card3[0],0;
 
        setarray .card4[0],0;
 
        
 
        getinventorylist;
    // Item IDs that cannot be bound
    setarray .@blacklist[0], 1201, 1207, 2301;
 
    // Check blacklist
    for (.@i = 0; .@i < getarraysize(.@blacklist); .@i++) {
        if (@inventorylist_id[.@item] == .@blacklist[.@i]) {
            mes "Sorry, but "+ getitemname(@inventorylist_id[.@item]) +" is blacklisted from being bound.";
            close;
        }
    }
        set @count,0;
 
        for(set @i, 0; @i <@inventorylist_count; set @i, @i + 1) 
 
        {
 
                if(@inventorylist_bound[@i] && @inventorylist_equip[@i]==0)
 
                {
 
                        set .itemid[@count], @inventorylist_id[@i];
 
                        set .name$[@count], getitemname(@inventorylist_id[@i]);
 
                        set .identify[@count], @inventorylist_identify[@i];
 
                        set .attrib[@count], @inventorylist_attribute[@i];
 
                        set .refine[@count], @inventorylist_refine[@i];
 
                        set .card1[@count], @inventorylist_card1[@i];
 
                        set .card2[@count], @inventorylist_card2[@i];
 
                        set .card3[@count], @inventorylist_card3[@i];
 
                        set .card4[@count], @inventorylist_card4[@i];
 
                        set @count,@count+1;
 
                }
 
        }
 
        if(getarraysize(.itemid)==0)
 
        {
 
                message strcharinfo(0), "No unbindable item found in the inventory.";
 
                end;
 
        }
 
        else
 
        {
 
                set @id, select(implode(.name$,":"));
 
                delitem2 .itemid[@id-1],1,.identify[@id-1],.refine[@id-1],.attrib[@id-1],.card1[@id-1],.card2[@id-1],.card3[@id-1],.card4[@id-1];
 
                getitem2 .itemid[@id-1],1,.identify[@id-1],.refine[@id-1],.attrib[@id-1],.card1[@id-1],.card2[@id-1],.card3[@id-1],.card4[@id-1];
 
                delitem .id,1;
 
                message strcharinfo(0), "Item has been unbinded.";
 
                end;
 
        }
 
}