From 1d0bfbe0388309d17839d091e6069b0942b07efb Mon Sep 17 00:00:00 2001 From: David Walter Seikel Date: Tue, 22 Apr 2014 14:22:30 +1000 Subject: Move the test sim to the media directory. --- .../~poser 2.lsl | 200 --------------------- 1 file changed, 200 deletions(-) delete mode 100644 LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~poser 2.lsl (limited to 'LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~poser 2.lsl') diff --git a/LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~poser 2.lsl b/LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~poser 2.lsl deleted file mode 100644 index fc976c4..0000000 --- a/LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~poser 2.lsl +++ /dev/null @@ -1,200 +0,0 @@ -// MPLV2 2.3 by Learjeff Innis, based on -// MLP MULTI-LOVE-POSE V1.2 - Copyright (c) 2006, by Miffy Fluffy (BSD License) -// OpenSim port by Jez Ember -// Meta 7 fixes by onefang Rejected - -integer ch; -string animation = "stand"; -key avatar; - -integer ExprEnabled = TRUE; -string Expression; -float ExprTimer; - -integer BallNum; - -list Expressions = [ - "" - , "express_open_mouth" // 1 - , "express_surprise_emote" // 2 - , "express_tongue_out" // 3 - , "express_smile" // 4 - , "express_toothsmile" // 5 - , "express_wink_emote" // 6 - , "express_cry_emote" // 7 - , "express_kiss" // 8 - , "express_laugh_emote" // 9 - , "express_disdain" // 10 - , "express_repulsed_emote" // 11 - , "express_anger_emote" // 12 - , "express_bored_emote" // 13 - , "express_sad_emote" // 14 - , "express_embarrassed_emote" // 15 - , "express_frown" // 16 - , "express_shrug_emote" // 17 - , "express_afraid_emote" // 18 - , "express_worry_emote" // 19 - , "SLEEP" // 20 -]; - - -stopAnim() { - key id = llGetPermissionsKey(); - list anims = llGetAnimationList(id); - integer ix; - for (ix = 0; ix < llGetListLength(anims); ++ix) { - string anim = llList2String(anims, ix); - if (anim != "") { - llStopAnimation(anim); - } - } - llSetTimerEvent(0.0); -} - -startAnim(string anim) { - if (Expression != "") { - if (Expression == "SLEEP") { - llStartAnimation("express_disdain"); - llStartAnimation("express_smile"); - } else { - llStartAnimation(Expression); - } - if (ExprEnabled) { - llSetTimerEvent(ExprTimer); - } - } else { - stopAnim(); - } - if (anim != "") { - llStartAnimation(anim); - } -} - -// Animation names with a "*" suffix get open mouth -// Those with a suffix of "::" followed by a number -// get the expression associated with that number. -// This can optionally be followed by another "::" delim, -// with a timer value following. -// Return the anim name without the suffix. -string getExpression(string anim) { - if (llGetSubString(anim,-1,-1) == "*") { - Expression = llList2String(Expressions, 1); - ExprTimer = 0.5; - return llGetSubString(anim, 0, -2); - } - integer ix = llSubStringIndex(anim, "::"); - if (ix == -1) { - Expression = ""; - ExprTimer = 0.5; - return anim; - } - - list parms = llParseString2List(anim, ["::"], []); - anim = llList2String(parms, 0); - integer exprIx = (integer) llList2String(parms, 1); - Expression = llList2String(Expressions, exprIx); - ExprTimer = (float) llList2String(parms,2); - - if (ExprTimer <= 0.0) { - ExprTimer = 0.5; - } - - return anim; -} - -getChan() { - BallNum = (integer) llGetSubString(llGetScriptName(),-1,-1); //offset from script name suffix - ch = BallNum - + (integer)("0x"+llGetSubString((string)llGetKey(),-4,-1)); //fixed channel for prim -} - -default { - state_entry() { - state s_on; - } -} - -state s_on { - state_entry() { - getChan(); - llListen(ch+8,"",NULL_KEY,""); - } - - on_rez(integer arg) { - state default; - } - - link_message(integer from, integer num, string an, key id) { //an animation is set - if (an == "PRIMTOUCH") { - return; - } - - if (num != ch) return; - an = getExpression(an); // get & save expression, and return unadorned anim - - if (avatar == llGetPermissionsKey() - && avatar != NULL_KEY - && animation != "") { - llStopAnimation(animation); - llMessageLinked(LINK_SET, -11002, (string)BallNum + "|" + an, avatar); - startAnim(an); - } - animation = an; - } - - timer() { // timer to keep mouth open - if (Expression == "SLEEP") { - llStartAnimation("express_disdain"); - llStartAnimation("express_smile"); - } else if (Expression != "") { - llStartAnimation(Expression); - } - } - - listen(integer channel, string name, key id, string str) { - if (str == "ALIVE" || str == "DIE") { - llMessageLinked(LINK_THIS,2,str,""); //send msg from ball to menu - if (str == "DIE") { - avatar = NULL_KEY; - llSetTimerEvent(0.0); - } - return; - } - - avatar = (key) str; //avatar (sit) or NULL_KEY (stand up) - if (avatar == NULL_KEY) { - if (llGetPermissions() & PERMISSION_TRIGGER_ANIMATION) { - stopAnim(); - llMessageLinked(LINK_SET, -11001, (string)BallNum, llGetPermissionsKey()); - } - // llReleaseControls(); - return; - } - - if (avatar != llGetPermissionsKey() - || ! (llGetPermissions() & PERMISSION_TRIGGER_ANIMATION)) { - ExprEnabled = TRUE; - llRequestPermissions(avatar, PERMISSION_TRIGGER_ANIMATION); - } else { - stopAnim(); - llMessageLinked(LINK_SET, -11000, (string)BallNum + "|" + animation, avatar); - startAnim(animation); - } - } - - run_time_permissions(integer perm) { - if (avatar != llGetPermissionsKey()) { - llWhisper(DEBUG_CHANNEL, "avatar != perm key"); - return; - } - - if (perm & PERMISSION_TRIGGER_ANIMATION) { - stopAnim(); - llMessageLinked(LINK_SET, -11000, (string)BallNum + "|" + animation, avatar); - startAnim(animation); - } else { - llMessageLinked(LINK_SET, -11001, (string)BallNum, avatar); - llSetTimerEvent(0.0); - } - } -} -- cgit v1.1