Better smilage. B-)

1 files changed, 7 insertions, 6 deletions

diff --git a/1AOor2.lsl b/1AOor2.lsl
index 2910faa..d8e3095 100644
--- a/1AOor2.lsl
+++ b/1AOor2.lsl
@@ -341,9 +341,10 @@ integer doThing(key id, string button, string fr, string cmd, string data, integ
     else if ("SMILE" == cmd)
     {   // The built in express_* animations are too short, but live with it.
         animEnd(llGetOwner(), Smile);
-        Smile = llList2String(Smiles, (integer) llFrand(2.5));
-        addEvent(3.0 + llFrand(5.0), cmd);
+        Smile = llList2String(Smiles, (integer) llFrand((float) llGetListLength(Smiles)));
+        addEvent(3.0 + llFrand(2.0), cmd);
         animBegin(llGetOwner(), Smile);
+    }
     else if ("SLOWER_-" == cmd)
     {
         integer sp = llListFindList(AOspeeds, [getSetting("SPEED")]);
@@ -734,12 +735,12 @@ string nextState;       // AO state name.
 // Smiler
 integer SmileCounter = 0;
 string Smile = "express_toothsmile";
-list Smiles = 
+list Smiles =
 [
-    "express_smile",
     "express_toothsmile",
-    "express_wink_emote",
-    "express_tongue_out"
+    "express_embarrassed_emote",
+    "express_smile",
+    "express_wink_emote"
 ];
 
 // Couples