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.

---
 .../~pos.lsl                                       | 108 ---------------------
 1 file changed, 108 deletions(-)
 delete mode 100644 LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~pos.lsl

(limited to 'LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~pos.lsl')

diff --git a/LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~pos.lsl b/LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~pos.lsl
deleted file mode 100644
index 3b93b64..0000000
--- a/LuaSL/Test sim/objects/onefang%27s%20test%20bed.5cb927d5-1304-4f1a-9947-308251ef2df0/~pos.lsl	
+++ /dev/null
@@ -1,108 +0,0 @@
-// MLPV2 Version 2.3j, 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 and one by Tatjana Kidd.
-
-integer MAX_BALLS   = 6;
-
-integer ch;
-integer swap;
-integer BallCount;
-
-string  pr1;
-string  pr2;
-
-integer Zoffset;
-
-vector  RefPos;
-rotation RefRot;
-
-getRefPos() {   //reference position
-    RefPos = llGetPos();
-    RefRot = llGetRot();
-    Zoffset = (integer)llGetObjectDesc();
-    RefPos.z += (float) Zoffset / 100.;
-}
-
-list Pdata;
-
-getPosNew(string pdata) {
-    Pdata = llParseString2List(pdata, [" "],[]);
-}
-
-setPos() {
-    pr1 = (string)((vector)llList2String(Pdata, 0) * RefRot + RefPos);
-    pr2 = (string)((vector)llList2String(Pdata, 2) * RefRot + RefPos);
-    pr1 += (string)(llEuler2Rot((vector)llList2String(Pdata, 1) * DEG_TO_RAD) * RefRot);
-    pr2 += (string)(llEuler2Rot((vector)llList2String(Pdata, 3) * DEG_TO_RAD) * RefRot);
-    if (BallCount > 1) {
-        llSay(ch+swap,pr1);     //msg to ball1/2
-        llSay(ch+!swap,pr2);
-    } else {
-        llSay(ch,pr1);          //msg to ball1/2
-    }
-
-    integer ix;
-    for (ix = 2; ix < BallCount; ++ix) {
-        llSay(ch + ix, (string)((vector)llList2String(Pdata, 2*ix) * RefRot + RefPos)
-            + (string)(llEuler2Rot((vector)llList2String(Pdata, 2*ix + 1) * DEG_TO_RAD) * RefRot));
-    }
-}
-
-getChan() {
-    ch = (integer)("0x"+llGetSubString((string)llGetKey(),-4,-1));          //fixed channel for prim
-}
-
-default {
-    state_entry() {
-        getRefPos();
-        getChan();
-    }
-
-    on_rez(integer arg) {
-        getRefPos();
-        getChan();
-    }
- 
-    link_message(integer from, integer num, string cmd, key pkey) {
-        if (cmd == "PRIMTOUCH"){
-            return;
-        }
-
-        if (num == 1 && cmd == "STOP") {
-            swap = 0;
-            return;
-        }
-
-        if (num) return;
-
-        if (cmd == "POSE") {
-            list parms = llCSV2List((string)pkey);
-            BallCount = llList2Integer(parms,1);
-            return;
-        } else if (cmd == "POSEPOS") {
-            // p = (integer)((string)pkey
-            getPosNew((string)pkey);
-            setPos();
-        } else if (cmd == "SWAP") {
-            swap = (integer)((string)pkey) & 1;
-            llSay(ch+swap,pr1);         //msg to ball1/2
-            llSay(ch+!swap,pr2);
-        } else if (cmd == "REPOS") {
-            getRefPos();
-        } else if (llGetSubString(cmd, 0, 0) == "Z") {
-            // Changed by Tatjana to make it work :)
-            integer change;
-            if (llGetSubString(cmd,1,1) == "+") change = (integer)llGetSubString(cmd,2,10);
-            else change = (integer)llGetSubString(cmd,1,10);
-            // End Tatjana changing (Penny helped, of course!)
-            Zoffset += change;
-            RefPos.z += (float)change/100.;
-            setPos();
-            llOwnerSay("Height Adjustment: change by " + (string) change + "cm, new offset: " + (string)Zoffset + "cm");
-            llSetObjectDesc((string)Zoffset);
-        } else if (cmd == "GETREFPOS") {
-            llMessageLinked(LINK_THIS,8,(string)RefPos,(string)RefRot);   //send reference position to pose
-        }
-    }
-}
-- 
cgit v1.1