Difference between revisions of "ListXandY"

From Second Life Wiki
Jump to navigation Jump to search
m
m (<lsl> tag to <source>)
 
(2 intermediate revisions by 2 users not shown)
Line 1: Line 1:
{{LSL Header}} __NOTOC__
{{LSL Header}} __NOTOC__
[[Category:LSL_UD_Functions]]
[[Category:LSL_User-Defined Functions]]
<div id="box">
<div id="box">
== Function: [[list]] ListXandY([[list]] {{LSL Param|lx}}, [[list]] {{LSL Param|ly}}); ==
== Function: [[list]] ListXandY([[list]] {{LSL Param|lx}}, [[list]] {{LSL Param|ly}}); ==
Line 8: Line 8:
See also: [[List|Lists]]
See also: [[List|Lists]]


<lsl>
<source lang="lsl2">
list ListXandY(list lx, list ly) {// return a list of elements common to both lists
list ListXandY(list lx, list ly) {// return a list of elements common to both lists
     list lz = []; integer x;
     list lz = []; integer x;
Line 21: Line 21:
     return lz;
     return lz;
}
}
</lsl>
</source>




Example:<br />
Example:<br />


<lsl>
<source lang="lsl2">
list l1 = ["a","b","c","d"];
list l1 = ["a","b","c","d"];
list l2 = ["a","1","b","2","c","3"];
list l2 = ["a","1","b","2","c","3"];
list ListXandY(list lx, list ly) {// return a list of elements common to both lists
    list lz = []; integer x;
    for (x = 0; x < llGetListLength(ly); x++) {
        if (~llListFindList(lx,llList2List(ly,x,x))) {
            lz = lz + llList2List(ly,x,x);
        }
        else {
            ;
        }
    }
    return lz;
}


default{
default{
Line 36: Line 49:
   }
   }
}
}
</lsl>
</source>


</div>
</div>

Latest revision as of 15:24, 22 January 2015

Function: list ListXandY(list lx, list ly);

This function examines two lists, and returns a new list composed of the elements that both lists have in common.

See also: Lists

list ListXandY(list lx, list ly) {// return a list of elements common to both lists
    list lz = []; integer x;
    for (x = 0; x < llGetListLength(ly); x++) {
        if (~llListFindList(lx,llList2List(ly,x,x))) {
            lz = lz + llList2List(ly,x,x);
        }
        else {
            ;
        }
    }
    return lz;
}


Example:

list l1 = ["a","b","c","d"];
list l2 = ["a","1","b","2","c","3"];

list ListXandY(list lx, list ly) {// return a list of elements common to both lists
    list lz = []; integer x;
    for (x = 0; x < llGetListLength(ly); x++) {
        if (~llListFindList(lx,llList2List(ly,x,x))) {
            lz = lz + llList2List(ly,x,x);
        }
        else {
            ;
        }
    }
    return lz;
}

default{
   state_entry() {
      llSay(0, "The two lists have the following items in common: " + llList2CSV(ListXandY(l1,l2)) );
      //will say: a, b, c
   }
}

Posted with the kind permission of Very Keynes, who originated this script June 2007 in the SL scripters forum http://forums-archive.secondlife.com/54/e4/194138/1.html