String Compare
Revision as of 16:39, 25 May 2007 by Xaviar Czervik (talk | contribs)
LSL Portal | Functions | Events | Types | Operators | Constants | Flow Control | Script Library | Categorized Library | Tutorials |
Created by Xaviar Czervik, do whatever you want with this function. Sell it (good luck), or use it, but at least someone is using it now.
The following code returns 1, -1 or 0. The 1 and -1 are essentially random, however it will return the same value every time the script is executed. 0 Is returned when, and only when, the strings are exactly equal.
I have used this script for comparing the Keys of two objects in a dynamic set of sensors, to decide which one should be the "Master" in the region to tell me information. I'm sure there can be more uses to this...
If someone could please optimize the script, as it is currently very inefficient.
integer compare(string s1, string s2) { if (s1 == s2) { return 0; } else if (llStringLength(s1) < llStringLength(s2)) { return 1; } else if (llStringLength(s1) > llStringLength(s2)) { return -1; } else { if (llStringLength(s1) > 32) { s1 = llMD5String(s1, 0); s2 = llMD5String(s2, 0); } integer i = 0; list l1 = llParseString2List(s1, [""], []); list l2 = llParseString2List(s2, [""], []); s1 = llStringToBase64(s1); s2 = llStringToBase64(s2); string com = "1234567890QWERTYUIOPASDFGHJKLZXCVBNMqwertyuiopasdfghjklzxcvbnm=+"; integer a; integer b; while (i < llStringLength(s1)) { a = llSubStringIndex(com, llList2String(l1, i)); b = llSubStringIndex(com, llList2String(l2, i)); if (a < b) { return -1; } else if (a > b) { return 1; } i++; } } return 0; }