Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 235 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 274 Warning: Undefined array key "media" in /volume1/web/wiki/feed.php on line 385 move IT Home Base http://live.spdns.org/wiki/ Sat, 04 Apr 2026 10:42:04 +0000 FeedCreator 1.8 http://live.spdns.org/wiki/lib/tpl/peanutbutter2/images/favicon.ico move IT Home Base http://live.spdns.org/wiki/ Binary Clock http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/binary_clock?do=revisions&rev=1575021518 <h2 class="sectionedit1" id="binary_clock">Binary Clock</h2> <div class="level2"> <pre class="code">// Binary Clock Script // By Fox Diller // OMG INSANITY! list bTime; list oTime; integer token; string dec2bin(integer dec) { if (dec == 0) return &quot;0000&quot;; if (dec == 1) return &quot;0001&quot;; if (dec == 2) return &quot;0010&quot;; if (dec == 3) return &quot;0011&quot;; if (dec == 4) return &quot;0100&quot;; if (dec == 5) return &quot;0101&quot;; if (dec == 6) return &quot;0110&quot;; if (dec == 7) return &quot;0111&quot;; if (dec == 8) return &quot;1000&quot;; if (dec == 9) return &quot;1001&quot;; return &quot;0000&quot;; } BuildClock() { integer shiftraw = (integer)llGetWallclock(); integer hours = shiftraw / 3600; integer minutes = (shiftraw % 3600) / 60; integer seconds = shiftraw % 60; bTime = [hours / 10, hours % 10, minutes / 10, minutes % 10, seconds / 10, seconds % 10]; } displayBDC() { integer current_rowA = llList2Integer(bTime, 0); integer old_rowA = llList2Integer(oTime, 0); if (current_rowA != old_rowA) { string rowA = dec2bin(current_rowA); integer Acol0 = (integer)llGetSubString(rowA, 3, 3); integer Acol1 = (integer)llGetSubString(rowA, 2, 2); llMessageLinked(2, Acol0, &quot;&quot;, &quot;&quot;); llMessageLinked(3, Acol1, &quot;&quot;, &quot;&quot;); } else if (!current_rowA) { llMessageLinked(2, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(3, 0, &quot;&quot;, &quot;&quot;); } integer current_rowB = llList2Integer(bTime, 1); integer old_rowB = llList2Integer(oTime, 1); if (current_rowB != old_rowB) { string rowB = dec2bin(current_rowB); integer Bcol0 = (integer)llGetSubString(rowB, 3, 3); integer Bcol1 = (integer)llGetSubString(rowB, 2, 2); integer Bcol2 = (integer)llGetSubString(rowB, 1, 1); integer Bcol3 = (integer)llGetSubString(rowB, 0, 0); llMessageLinked(4, Bcol0, &quot;&quot;, &quot;&quot;); llMessageLinked(5, Bcol1, &quot;&quot;, &quot;&quot;); llMessageLinked(6, Bcol2, &quot;&quot;, &quot;&quot;); llMessageLinked(7, Bcol3, &quot;&quot;, &quot;&quot;); } else if (!current_rowB) { llMessageLinked(4, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(5, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(6, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(7, 0, &quot;&quot;, &quot;&quot;); } integer current_rowC = llList2Integer(bTime, 2); integer old_rowC = llList2Integer(oTime, 2); if (current_rowC != old_rowC) { string rowC = dec2bin(current_rowC); integer Ccol0 = (integer)llGetSubString(rowC, 3, 3); integer Ccol1 = (integer)llGetSubString(rowC, 2, 2); integer Ccol2 = (integer)llGetSubString(rowC, 1, 1); llMessageLinked(8, Ccol0, &quot;&quot;, &quot;&quot;); llMessageLinked(9, Ccol1, &quot;&quot;, &quot;&quot;); llMessageLinked(10, Ccol2, &quot;&quot;, &quot;&quot;); } else if (!current_rowC) { llMessageLinked(8, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(9, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(10, 0, &quot;&quot;, &quot;&quot;); } integer current_rowD = llList2Integer(bTime, 3); integer old_rowD = llList2Integer(oTime, 3); if (current_rowD != old_rowD) { string rowD = dec2bin(current_rowD); integer Dcol0 = (integer)llGetSubString(rowD, 3, 3); integer Dcol1 = (integer)llGetSubString(rowD, 2, 2); integer Dcol2 = (integer)llGetSubString(rowD, 1, 1); integer Dcol3 = (integer)llGetSubString(rowD, 0, 0); llMessageLinked(11, Dcol0, &quot;&quot;, &quot;&quot;); llMessageLinked(12, Dcol1, &quot;&quot;, &quot;&quot;); llMessageLinked(13, Dcol2, &quot;&quot;, &quot;&quot;); llMessageLinked(14, Dcol3, &quot;&quot;, &quot;&quot;); } else if (!current_rowD) { llMessageLinked(11, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(12, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(13, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(14, 0, &quot;&quot;, &quot;&quot;); } integer current_rowE = llList2Integer(bTime, 4); integer old_rowE = llList2Integer(oTime, 4); if (current_rowE != old_rowE) { string rowE = dec2bin(current_rowE); integer Ecol0 = (integer)llGetSubString(rowE, 3, 3); integer Ecol1 = (integer)llGetSubString(rowE, 2, 2); integer Ecol2 = (integer)llGetSubString(rowE, 1, 1); llMessageLinked(15, Ecol0, &quot;&quot;, &quot;&quot;); llMessageLinked(16, Ecol1, &quot;&quot;, &quot;&quot;); llMessageLinked(17, Ecol2, &quot;&quot;, &quot;&quot;); } else if (!current_rowE) { llMessageLinked(15, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(16, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(17, 0, &quot;&quot;, &quot;&quot;); } integer current_rowF = llList2Integer(bTime, 5); integer old_rowF = llList2Integer(oTime, 5); if (current_rowF != old_rowF) { string rowF = dec2bin(current_rowF); integer Fcol0 = (integer)llGetSubString(rowF, 3, 3); integer Fcol1 = (integer)llGetSubString(rowF, 2, 2); integer Fcol2 = (integer)llGetSubString(rowF, 1, 1); integer Fcol3 = (integer)llGetSubString(rowF, 0, 0); llMessageLinked(18, Fcol0, &quot;&quot;, &quot;&quot;); llMessageLinked(19, Fcol1, &quot;&quot;, &quot;&quot;); llMessageLinked(20, Fcol2, &quot;&quot;, &quot;&quot;); llMessageLinked(21, Fcol3, &quot;&quot;, &quot;&quot;); } else if (!current_rowF) { llMessageLinked(18, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(19, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(20, 0, &quot;&quot;, &quot;&quot;); llMessageLinked(21, 0, &quot;&quot;, &quot;&quot;); } } default { touch_start(integer total_number) { if (!token &amp;&amp; llDetectedKey(0) == llGetOwner()) { oTime = []; bTime = []; llSetTimerEvent(1.0); token = 1; llOwnerSay(&quot;On!&quot;); } else if (token &amp;&amp; llDetectedKey(0) == llGetOwner()) { llSetTimerEvent(0); token = 0; llOwnerSay(&quot;Off!&quot;); } } timer() { bTime = oTime; BuildClock(); displayBDC(); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:38 +0000 Simple Radar http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/simple_radar?do=revisions&rev=1575021523 <h2 class="sectionedit1" id="simple_radar">Simple Radar</h2> <div class="level2"> <pre class="code">//Sable Till - Radar/scannar script. //You can get a copy of the license this script is under at http://www.gnu.org/copyleft/gpl.html //Copyright (C) 2006 Sable Till //This program is free software; you can redistribute it and/or //modify it under the terms of the GNU General Public License //as published by the Free Software Foundation; either version 2 //of the License, or (at your option) any later version. //This program is distributed in the hope that it will be useful, //but WITHOUT ANY WARRANTY; without even the implied warranty of //MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //GNU General Public License for more details. //You should have received a copy of the GNU General Public License //along with this program; if not, write to the Free Software //Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. string status=&quot;none&quot;; list people; integer maxScanDistance; vector color = &lt;0,1,1&gt;; integer maxPeople = 8; integer scanType = AGENT; integer scanFreq=1; integer count(string name) { integer i = llListFindList(people, [name]); if(i ==-1){ people+=[name, 0]; return 0; } else { integer count = llList2Integer(people, i+1); people=llListReplaceList(people, [count+scanFreq], i+1, i+1); return count; } } //calculate time strings with proper units that are sensibly rounded string time(integer cnt) { if(cnt&gt;3600) { return (string)(cnt/3600)+&quot;hr &quot; + (string)((cnt%3600)/60) +&quot;min&quot;; }else { if(cnt&gt;60) { return (string)(cnt/60)+&quot;min&quot;; } else { return (string)cnt+&quot;s&quot;; } } } //I&#039;m pretty sure there&#039;s a better way to do this but I&#039;m trying to calculate the angle between //North and the target so I can work out which direction it is in. float getAngle(vector me, vector target) { float hyp = llVecDist(me, target); float yDiff = target.y-me.y; float xDiff = target.x-me.x; float angle = llSin(yDiff/hyp); if(xDiff&gt;0 &amp;&amp; yDiff&gt;0) { return angle*RAD_TO_DEG; } if(xDiff&gt;0 &amp;&amp; yDiff&lt;0) { return 90-angle*RAD_TO_DEG; } if(xDiff&lt;0 &amp;&amp; yDiff&gt;0) { return angle*RAD_TO_DEG+270; } if(xDiff&lt;0 &amp;&amp; yDiff&lt;0) { return angle*RAD_TO_DEG + 270; } return angle*RAD_TO_DEG; } default { state_entry() { llSensorRepeat(&quot;&quot;, &quot;&quot;,scanType, 96, PI, scanFreq); llSetTimerEvent(6); } sensor(integer num_detected) { people=[]; string result; integer n=-1; integer distance=0; integer detDist; string name; vector pos = llGetPos(); //get the dist, name and direction of everyone we just scanned. for(n=0;n&lt;num_detected &amp;&amp; n&lt;maxPeople;++n) { vector detPos = llDetectedPos(n); detDist = (integer)llVecDist(pos, detPos); float angle = getAngle(llGetPos(), detPos); name = llKey2Name(llDetectedKey(n)); if(detDist&lt;96) { people+=detDist; people+=name; people+=angle; } } //sort the strided list people = llListSort(people, 3, TRUE); //construct settext num_detected = llGetListLength(people)/3; for(n=0;n&lt;num_detected;++n) { detDist=llList2Integer(people, n*3); name = llList2String(people, n*3+1); float dir = llList2Float(people, n*3+2); if(detDist&gt;20 &amp;&amp; distance&lt;=20) { result+=&quot;&lt;- Chat Range Limit -&gt;\n&quot;; } result+=name; if(detDist&lt;20) { integer cnt = count(name); result+=&quot; [&quot;+time(cnt)+&quot;]&quot;; } result+=&quot; [&quot;+(string)detDist+&quot;m]&quot;; if(dir &lt; 0 || dir &gt; 360) { llOwnerSay(&quot;Error:&quot;+(string)dir+&quot;:&quot;+name); } //determine which compass direction they are in. if(dir &lt;= 22.5) { result+=&quot; N\n&quot;; } else { if(dir &gt; 22.5 &amp;&amp; dir &lt;= 67.5) { result+=&quot; NE\n&quot;; } else { if(dir &gt; 67.5 &amp;&amp; dir &lt;= 112.5) { result+=&quot; E\n&quot;; } else { if(dir &gt; 112.5 &amp;&amp; dir &lt;= 157.5) { result+=&quot; SE\n&quot;; } else { if(dir &gt; 157.5 &amp;&amp; dir &lt;= 202.5) { result+=&quot; S\n&quot;; } else { if(dir &gt; 202.5 &amp;&amp; dir &lt;= 247.5) { result+=&quot; SW\n&quot;; } else { if(dir &gt; 247.5 &amp;&amp; dir &lt;= 292.5) { result+=&quot; W\n&quot;; } else { if(dir &gt; 292.5 &amp;&amp; dir &lt;= 337.5) { result+=&quot; NW\n&quot;; } else { if(dir &gt; 337.5 &amp;&amp; dir &lt; 360) { result+=&quot; N\n&quot;; } } } }}}}}} distance=detDist; } //If we detected more (or the same number of) people as maxPeople then shrink down the scan distance to just //the distance to the furthest one. Otherwise increment it a bit in case there are people further out. if(num_detected&gt;=maxPeople) { maxScanDistance=distance+10; } else { maxScanDistance+=10; } result+=&quot;\nStatus:&quot;+status; //adjust max people based on the length of result if(llStringLength(result)&gt;254) { maxPeople--; llOwnerSay(&quot;Length is &quot;+(string)llStringLength(result) + &quot; Decrementing maxPeople to &quot;+(string)maxPeople); } else { if(llStringLength(result)&lt;200 &amp;&amp; num_detected&gt;maxPeople) { maxPeople++; llOwnerSay(&quot;Length is &quot;+(string)llStringLength(result) + &quot; Incrementing maxPeople to &quot;+(string)maxPeople); } } llSetText(result, color, 1); } no_sensor() { llSetText(&quot;Status:&quot;+status, color, 1); maxScanDistance+=10; llSensorRepeat(&quot;&quot;, &quot;&quot;, scanType, maxScanDistance, PI, scanFreq); } //all we do here is check the sims fps and dilation and tone down our scanning if necessary. timer() { float fps = llGetRegionFPS(); float timeDilation = llGetRegionTimeDilation(); integer scanDistance; if(fps&lt;35 || timeDilation &lt;0.9) { if(maxScanDistance&gt;30) { scanDistance=30; } scanFreq=240; status = &quot;poor&quot;; llSetTimerEvent(240); color=&lt;1,0,0&gt;; } else { if(fps&lt;40 || timeDilation&lt;0.95) { if(maxScanDistance&gt;64) { scanDistance=64; } else { scanDistance=maxScanDistance; } scanFreq=30; status = &quot;ok&quot;; llSetTimerEvent(120); color=&lt;1,1,0&gt;; } else { if(maxScanDistance&gt;96) { scanDistance=96; } else { scanDistance=maxScanDistance; } scanFreq=1; llSetTimerEvent(60); status = &quot;good&quot;; color=&lt;0,1,1&gt;; }} llSensorRepeat(&quot;&quot;, &quot;&quot;, scanType, scanDistance, PI, scanFreq); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:43 +0000 Teleport to Sim http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/teleport_to_sim?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="teleport_to_sim">Teleport to Sim</h2> <div class="level2"> <pre class="code">string teleport_message = &quot;Sie teleportieren nun zur Sim M34&quot;; string destination_name = &quot;Sim M34 von OpenSIM&quot;; vector destination_landing_point = &lt;170,156,23&gt;; vector landing_point_facing = &lt;150,120,34&gt;; default { state_entry() { llSay(0, &quot;Script running&quot;); llSetText(&quot;Teleport zu\n&quot; + destination_name, &lt;1,1,1&gt;, 1); llSetTextureAnim(ANIM_ON | SMOOTH | ROTATE | LOOP, ALL_SIDES, 0, 0, 1.0, 1000, 0.07); } touch_start(integer number) { llRegionSay(-1, &quot;occulus,&quot; + llDetectedKey(0) + &quot;,&quot; + destination_name); llMapDestination(&quot;DOMAIN:9090&quot;, destination_landing_point, landing_point_facing); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000 Texture Dropper http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/texture_dropper?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="texture_dropper">Texture Dropper</h2> <div class="level2"> <pre class="code">// **** Texture Dropper Screen v1.11, by Mircea Kitsune &amp; Sm0key **** // -------- Settings: -------- // Modify these to adjust the properties of your screen. Unless a specific value is required, use TRUE or FALSE. integer face = 0; //Primitive face to be used as screen. integer text = 2; //0 means no text, 1 displays lock status, 2 displays lock status and image + creator names. Selecting 2 clears the image between script restarts. integer notices = TRUE; //Echo information such as locking / unlocking of the screen and error messages in-world. integer lockdefault = FALSE; //Set to TRUE if the screen is to be locked by default. Relevant in the case of script restarts and when using the &quot;clear&quot; command. integer lockonpost = FALSE; //If TRUE the screen is locked once someone posts the first picture in it, useful for &#039;find and claim&#039; screens. integer creatorlock = TRUE; //When lockonpost is also TRUE, this allows the creator of the displayed image to lock / unlock or clear the screen. string screenname = &quot;screen&quot;; //The name which best describes what your object is, used for info and text display (eg: screen, painting, monitor). string sound = &quot;&quot;; //A sound to be played each time a new image is posted. Leave this string empty to disable sounds. float soundvol = 1; //Volume of the sound specified above, can be anything between 0 and 1. // -------- Script: -------- // Modify anything below if you are a scripter and want to change something else in the script. string ScriptName; string InvName; string InvCreator; string Toucher; string Blank = &quot;5748decc-f629-461c-9a36-a35a221fe21f&quot;; //UUID of the blank texture. integer CmdChan = 9945; //System channel for llDialog. default { state_entry() { ScriptName = llGetScriptName(); llPreloadSound(sound); if(text == 2) //Set texture to blank when names are used to avoid images with no names between script restarts. { llSetTexture(Blank, face); llPlaySound(sound, soundvol); } else if(text != 1 | text != 2) { llSetText(&quot;&quot;, &lt;0,0,0&gt;, 0); } if(lockdefault == TRUE) { state locked; } else { state unlocked; } } } state locked { state_entry() { llAllowInventoryDrop(0); llListen(CmdChan, &quot;&quot;, NULL_KEY, &quot;&quot; ); if(notices == 1) { llSay(0, &quot;The &quot; + screenname + &quot; is now locked.&quot;); } if(text == 2 &amp; InvName != &quot;&quot;) { llSetText(&quot;[&quot; + screenname + &quot; locked] - &quot; + InvName + &quot; by &quot; + InvCreator, &lt;1,0.5,0.5&gt;, 1); } else if(text == 1 | text == 2 &amp; InvName == &quot;&quot;) { llSetText(&quot;[&quot; + screenname + &quot; locked]&quot;, &lt;1,0.5,0.5&gt;, 1); } } touch_start(integer avatar) { Toucher = llDetectedKey(0); llSetTimerEvent(15); if (Toucher == llGetOwner()) { llDialog(llDetectedKey(0) , &quot;You are the owner of this screen. What do you wish to do?&quot;, [&quot;unlock&quot;, &quot;clear&quot;], CmdChan); } else if(lockonpost == TRUE &amp; creatorlock == TRUE &amp; llKey2Name(Toucher) == InvCreator) { llDialog(llDetectedKey(0) , &quot;You have been identified as the creator of the currently posted image. What do you wish to do?&quot;, [&quot;unlock&quot;, &quot;clear&quot;], CmdChan); } else { llSay(0, &quot;The &quot; + screenname + &quot; is locked. The owner must first unlock it before you can display new pictures.&quot;); } } listen(integer channel, string name, key id, string message) { if(Toucher == llGetOwner() | lockonpost == TRUE &amp; creatorlock == TRUE &amp; llKey2Name(Toucher) == InvCreator) { Toucher = &quot;&quot;; //Protection so if an owner was the last to touch the object not anyone is able to manually chat an owner-only command on the channel. if(llToLower(message) == &quot;unlock&quot;) { state unlocked; } if(llToLower(message) == &quot;clear&quot;) { llSetTexture(Blank, face); llPlaySound(sound, soundvol); InvName = &quot;&quot;; InvCreator = &quot;&quot;; if(lockdefault == TRUE) { llSetText(&quot;[&quot; + screenname + &quot; locked]&quot;, &lt;1,0.5,0.5&gt;, 1); } else { state unlocked; } } } } timer() { Toucher = &quot;&quot;; //Further protection so if an owner ignores the dialog the screen does not remain vulnerable for anyone to chat an owner-only command to. llSetTimerEvent(0); } } state unlocked { state_entry() { llAllowInventoryDrop(1); llListen(CmdChan, &quot;&quot;, NULL_KEY, &quot;&quot; ); if(notices == 1) { llSay(0, &quot;The &quot; + screenname + &quot; is now unlocked.&quot;); } if(text == 2 &amp; InvName != &quot;&quot;) { llSetText(&quot;[&quot; + screenname + &quot; unlocked] - &quot; + InvName + &quot; by &quot; + InvCreator, &lt;0.5,1,0.5&gt;, 1); } else if(text == 1 | text == 2 &amp; InvName == &quot;&quot;) { llSetText(&quot;[&quot; + screenname + &quot; unlocked]&quot;, &lt;0.5,1,0.5&gt;, 1); } } changed(integer mask) { if(mask &amp; (CHANGED_ALLOWED_DROP | CHANGED_INVENTORY)) { if(llGetInventoryNumber(0)) //Texture dropped { InvName = llGetInventoryName(INVENTORY_TEXTURE, 0); key InvKey = llGetInventoryKey(InvName); InvCreator = llKey2Name(llGetInventoryCreator(InvName)); llRemoveInventory(InvName); llSetTexture(InvKey, face); llPlaySound(sound, soundvol); if(lockonpost == TRUE) { state locked; } else if(text == 2) { llSetText(&quot;[&quot; + screenname + &quot; unlocked] - &quot; + InvName + &quot; by &quot; + InvCreator, &lt;0.5,1,0.5&gt;, 1); } } else //Something else dropped { integer Items = llGetInventoryNumber(-1); do { string InvName = llGetInventoryName(INVENTORY_ALL, --Items); if (InvName != ScriptName &amp; InvName != sound) { llRemoveInventory(InvName); if(notices == 1) { llSay(0, &quot;Error - Only textures may be dropped inside the &quot; + screenname + &quot;.&quot;); } } } while(Items); } } } touch_start(integer avatar) { Toucher = llDetectedKey(0); llSetTimerEvent(15); if (Toucher == llGetOwner()) { llDialog(llDetectedKey(0) , &quot;You are the owner of this screen. What do you wish to do?&quot;, [&quot;lock&quot;, &quot;clear&quot;], CmdChan); } else if(lockonpost == TRUE &amp; creatorlock == TRUE &amp; llKey2Name(Toucher) == InvCreator) { llDialog(llDetectedKey(0) , &quot;You have been identified as the creator of the currently posted image. What do you wish to do?&quot;, [&quot;lock&quot;, &quot;clear&quot;], CmdChan); } else { llSay(0, &quot;The &quot; + screenname + &quot; is unlocked. Control + drag textures onto it to display them.&quot;); } } listen(integer channel, string name, key id, string message) { if(Toucher == llGetOwner() | lockonpost == TRUE &amp; creatorlock == TRUE &amp; llKey2Name(Toucher) == InvCreator) { Toucher = &quot;&quot;; //Protection so if an owner was the last to touch the object not anyone is able to manually chat an owner-only command on the channel. if(llToLower(message) == &quot;lock&quot;) { state locked; } if(llToLower(message) == &quot;clear&quot;) { llSetTexture(Blank, face); llPlaySound(sound, soundvol); InvName = &quot;&quot;; InvCreator = &quot;&quot;; if(lockdefault == TRUE) { state locked; } else { llSetText(&quot;[&quot; + screenname + &quot; unlocked]&quot;, &lt;0.5,1,0.5&gt;, 1); } } } } timer() { Toucher = &quot;&quot;; //Further protection so if an owner ignores the dialog the screen does not remain vulnerable for anyone to chat an owner-only command to. llSetTimerEvent(0); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000 Bounce http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/bounce?do=revisions&rev=1575021518 <h2 class="sectionedit1" id="bounce">Bounce</h2> <div class="level2"> <pre class="code">default { state_entry() { llSetTimerEvent( 15 ); } timer() { float mass = llGetMass(); vector force = &lt;0,0,10.0&gt;; vector result = mass * force; result.x = (float) result.x; result.y = (float) result.y; result.z = (float) result.z; llApplyImpulse(result,FALSE); } } // *MAKE SURE PRIM IS SET TO PHYSICAL</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:38 +0000 Radio http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/radio?do=revisions&rev=1575021522 <h2 class="sectionedit1" id="radio">Radio</h2> <div class="level2"> <p> Mit diesem Script kann man durch klicken auf ein Prim die Musik auf einer Region ein-, aus- und umschalten. Die Zulieferer der Musik können auf die eigenen Wünsche angepasst werden. </p> <pre class="code">integer totalNum = 4; integer currentNum = 1; string currentstation; string currenturl; string id1 = &quot;Radio Off&quot;; string id2 = &quot;Grateful Dead Radio&quot;; string id3 = &quot;Sky.FM Roots Reggae&quot;; string id4 = &quot;Sky.FM Bossanova&quot;; string id5 = &quot;KTRU Radio&quot;; string url1 = &quot;&quot;; string url2 = &quot;http://gdradio.radioserver.co.uk:8160/&quot;; string url3 = &quot;http://205.188.215.225:8000&quot;; string url4 = &quot;http://160.79.128.40:7804&quot;; string url5 = &quot;http://128.42.33.17:80/&quot;; setNumber() { if (currentNum == 1) { currentstation = id1; currenturl = url1; } else if (currentNum == 2) { currentstation = id2; currenturl = url2; } else if (currentNum == 3) { currentstation = id3; currenturl = url3; } else if (currentNum == 4) { currentstation = id4; currenturl = url4; } else if (currentNum == 5) { currentstation = id5; currenturl = url5; } llSetText(currentstation, &lt;1,1,1&gt;,1.0); llSetParcelMusicURL(currenturl); } default { state_entry() { llSetText(&quot;Radio&quot;,&lt;1,1,1&gt;,1.0); } touch_start(integer total_number) { currentNum += 1; if (currentNum &gt; totalNum) currentNum = 1; setNumber(); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:42 +0000 Sensor Door http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/sensor_door?do=revisions&rev=1575021523 <h2 class="sectionedit1" id="sensor_door">Sensor Door</h2> <div class="level2"> <pre class="code">// Fixyou Kit&#039;s sensor door script with unknown avatar detection. // Door can be opened by up to 10 avatars, set up by name in the list. // The door scans for any avatars witin a distance of &quot;scandist&quot; and reports any avatar that is not on the access list // If known avatars get within a distance of &quot;distdoor&quot; to the door, it will open //plz IM me if you have questions! Have fun! //set names of avatars you want to allow access: string access1 = &quot;Fixyou Kit&quot;; string access2 = &quot; &quot;; string access3 = &quot; &quot;; string access4 = &quot; &quot;; string access5 = &quot; &quot;; string access6 = &quot; &quot;; string access7 = &quot; &quot;; string access8 = &quot; &quot;; string access9 = &quot; &quot;; string access10 = &quot; &quot;; integer distodoor = 3; // set distance (meters) between avatar and door to open integer scandist = 500; //set scanning distance string Ava_detected; integer ava_known = 0; default { state_entry() { llSensorRepeat(&quot;&quot;,&quot;&quot;,AGENT,scandist,TWO_PI,10.0); llWhisper(0,&quot;Scanner is active&quot;); } sensor(integer total_number) { integer x; for (x = 0; x &lt; total_number; x++) { vector pos = llGetPos(); string Ava_detected = llDetectedName(x); float diff = llVecDist(pos,llDetectedPos(x)); integer dist = llRound(diff); if(Ava_detected==access1 || Ava_detected==access2 || Ava_detected==access3 || Ava_detected==access4 || Ava_detected==access5 || Ava_detected==access6 || Ava_detected==access7 || Ava_detected==access8 || Ava_detected==access9 || Ava_detected==access10) { ava_known = 1; } if(ava_known == 0) { string detected = Ava_detected + &quot; @ &quot; + ((string)dist) + &quot;m&quot;; llWhisper(0,detected); } if(dist &lt; distodoor) { if(ava_known == 1) { llWhisper(0,((string)dist)+&quot; &quot; + ((string)distodoor)); llPlaySound(&quot;startrekdoor&quot;, 0.5); llSay(0, &quot;Door open for &quot;+(llDetectedName(0))); llSetPrimitiveParams([PRIM_PHANTOM, TRUE]); llSleep (15); llSetPrimitiveParams([PRIM_PHANTOM, FALSE]); dist = 100; } else { llSetPrimitiveParams([PRIM_PHANTOM, FALSE]); llSay(0, &quot;Sorry &quot;+(llDetectedName(0))+&quot;, can&#039;t let you enter, you are not on the access list&quot;); } } } } no_sensor() { llWhisper(0,&quot;No activity within &quot; + ((string)scandist) + &quot;m&quot;); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:43 +0000 Sim Crash Logger http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/sim_crash_logger?do=revisions&rev=1575021523 <h2 class="sectionedit1" id="sim_crash_logger">Sim Crash Logger</h2> <div class="level2"> <pre class="code">//******************************************************** //This Script was pulled out for you by YadNi Monde from the SL FORUMS at http://forums.secondlife.com/forumdisplay.php?f=15, it is intended to stay FREE by it s author(s) and all the comments here in ORANGE must NOT be deleted. They include notes on how to use it and no help will be provided either by YadNi Monde or it s Author(s). IF YOU DO NOT AGREE WITH THIS JUST DONT USE!!! //******************************************************** ///////////////////////////////////////// //SIM CRASH/REBOOT LOGGER //by: Kyrah Abattoir ///////////////////////////////////////// integer timering = 10;//the polling rate, put the speed you wish, in seconds //there we go... integer UNIX; string _buffer; list log; integer span = 0; float fps; float dilation; integer crash = 0; string date; //2004-08-27T00:56:21.785886Z default { state_entry() { llSetTimerEvent(timering);//starting our timer } timer() { string timestamp = llGetTimestamp(); list temp = llParseString2List(timestamp,[&quot;T&quot;,&quot;:&quot;,&quot;:&quot;,&quot;.&quot;],[]); integer _hour = llList2Integer(temp,1) + 4; if(_hour &gt; 24) //getting the hours _hour = _hour - 24 ; string _date = llList2String(temp,0); integer _min = llList2Integer(temp,2); integer _sec = llList2Integer(temp,3); string buffer; if(date == _date) //daily reset of the average fps and dilation span++; else { span = 1; date = _date; fps = 0; dilation = 0; } fps += llGetRegionFPS(); dilation += llGetRegionTimeDilation(); integer avg_FPS = (integer)(fps/span); string avg_dilation= llGetSubString((string)(dilation/span),0,3); buffer += llGetRegionName(); buffer += &quot;\n FPS:&quot;+(string)avg_FPS; buffer += &quot; dil. :&quot;+(string)avg_dilation; //buffer += &quot;\n&quot; + llDumpList2String(log,&quot;\n&quot;); integer _UNIX = _sec + _min * 60 + _hour * 3600;//making our timestamp if (_UNIX - UNIX &gt; timering + 5 &amp;&amp; UNIX != 0)//okay the delay has been waaay too olong, it probably crashed or rebooted { crash++; log += (string)_date + &quot; - &quot; + (string)_hour+ &quot;:&quot;+(string)_min+&quot;:&quot;+(string)_sec; if(llGetListLength(log) &gt; 9) log = llDeleteSubList(log,0,0); } buffer += &quot;\n sim crashes: &quot; + (string)crash + &quot;\n last crash: \n&quot; + llDumpList2String(log,&quot;\n&quot;); if(_buffer != buffer); //display { llSetText(buffer,&lt;1,1,1&gt;,1.0); _buffer = buffer; } UNIX = _UNIX; } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:43 +0000 Sleep http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/sleep?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="sleep">Sleep</h2> <div class="level2"> <p> Schlaf-Stellung. </p> <pre class="code">// Francis wuz here integer broadcast = 20; // A More Neutral Sleeping Position //vector target = &lt;-1.06585, 0.71774, 0.18293&gt;; //rotation targetRot = &lt;0.50028, -0.49972, -0.50028, 0.49972&gt;; // A More relaxed sleeping position vector target = &lt;-1.15419, 0.56328, -0.25744&gt;; rotation targetRot = &lt;0.52105, -0.49829, -0.46875, 0.51038&gt;; integer debugRotation = FALSE; key sitAgent = NULL_KEY; integer gotPermission = FALSE; integer time = 0; default { state_entry() { llSetSitText( &quot;Sleep&quot; ); llSitTarget( target, targetRot ); if ( debugRotation ) { llListen( 1977, &quot;Rotation Broadcaster&quot;, NULL_KEY, &quot;&quot; ); llListen( 1978, &quot;Rotation Broadcaster&quot;, NULL_KEY, &quot;&quot; ); } } listen(integer channel, string name, key id, string message ) { if ( channel == 1977 ) targetRot = (rotation) message; else target = (vector) message; llSitTarget( target, targetRot ); if ( time == 0 ) llSay(0, (string) targetRot + &quot;, &quot; + (string)target ); time = (time +1) % 50; } changed(integer change) { if (change &amp; CHANGED_LINK) { key agent = llAvatarOnSitTarget(); if ( sitAgent == NULL_KEY &amp;&amp; agent != NULL_KEY ) { // Someone new sitting down sitAgent = agent; llRequestPermissions(sitAgent,PERMISSION_TRIGGER_ANIMATION); } else if ( sitAgent != NULL_KEY &amp;&amp; agent == NULL_KEY) { // sitting down person got up - wake up :) if ( gotPermission ) llStopAnimation(&quot;sleep&quot;); // Reset the script because we don&#039;t have a way of releasing permissions :) llResetScript(); } } } run_time_permissions(integer parm) { if(parm == PERMISSION_TRIGGER_ANIMATION) { gotPermission = TRUE; llStartAnimation(&quot;sleep&quot;); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000 Snow Particle Generator (Schnee) http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/snow?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="snow_particle_generator_schnee">Snow Particle Generator (Schnee)</h2> <div class="level2"> <p> Lässt Schnee fallen. </p> <pre class="code">default { state_entry() { llParticleSystem([ PSYS_PART_FLAGS , 0 //| PSYS_PART_BOUNCE_MASK //Bounce on object&#039;s z-axis | PSYS_PART_WIND_MASK //Particles are moved by wind | PSYS_PART_INTERP_COLOR_MASK //Colors fade from start to end | PSYS_PART_INTERP_SCALE_MASK //Scale fades from beginning to end | PSYS_PART_FOLLOW_SRC_MASK //Particles follow the emitter | PSYS_PART_FOLLOW_VELOCITY_MASK//Particles are created at the velocity of the emitter //| PSYS_PART_TARGET_POS_MASK //Particles follow the target | PSYS_PART_EMISSIVE_MASK //Particles are self-lit (glow) //| PSYS_PART_TARGET_LINEAR_MASK//Undocumented--Sends particles in straight line? , //PSYS_SRC_TARGET_KEY , NULL_KEY,//The particles will head towards the specified key //Select one of the following for a pattern: //PSYS_SRC_PATTERN_DROP Particles start at emitter with no velocity //PSYS_SRC_PATTERN_EXPLODE Particles explode from the emitter //PSYS_SRC_PATTERN_ANGLE Particles are emitted in a 2-D angle //PSYS_SRC_PATTERN_ANGLE_CONE Particles are emitted in a 3-D cone //PSYS_SRC_PATTERN_ANGLE_CONE_EMPTY Particles are emitted everywhere except for a 3-D cone PSYS_SRC_PATTERN, PSYS_SRC_PATTERN_ANGLE_CONE ,PSYS_SRC_TEXTURE, &quot;b03ed4c1-6384-408f-9db9-2d4f6fee164d&quot; //UUID of the desired particle texture, or inventory name ,PSYS_SRC_MAX_AGE, 0.0 //Time, in seconds, for particles to be emitted. 0 = forever ,PSYS_PART_MAX_AGE, 15.0 //Lifetime, in seconds, that a particle lasts ,PSYS_SRC_BURST_RATE, .01 //How long, in seconds, between each emission ,PSYS_SRC_BURST_PART_COUNT, 24 //Number of particles per emission ,PSYS_SRC_BURST_RADIUS, 10.0 //Radius of emission ,PSYS_SRC_BURST_SPEED_MIN, 0.1 //Minimum speed of an emitted particle ,PSYS_SRC_BURST_SPEED_MAX, 0.5 //Maximum speed of an emitted particle ,PSYS_SRC_ACCEL, &lt;0,0,-.20&gt; //Acceleration of particles each second ,PSYS_PART_START_COLOR, &lt;1,1,1&gt; //Starting RGB color ,PSYS_PART_END_COLOR, &lt;1,1,1&gt; //Ending RGB color, if INTERP_COLOR_MASK is on ,PSYS_PART_START_ALPHA, 1.0 //Starting transparency, 1 is opaque, 0 is transparent. ,PSYS_PART_END_ALPHA, 1.0 //Ending transparency ,PSYS_PART_START_SCALE, &lt;.05,.05,.05&gt; //Starting particle size ,PSYS_PART_END_SCALE, &lt;.05,.05,.05&gt; //Ending particle size, if INTERP_SCALE_MASK is on ,PSYS_SRC_ANGLE_BEGIN, 90 * DEG_TO_RAD //Inner angle for ANGLE patterns ,PSYS_SRC_ANGLE_END, 90 * DEG_TO_RAD//Outer angle for ANGLE patterns ,PSYS_SRC_OMEGA, &lt;0.0,0.0,0.0&gt; //Rotation of ANGLE patterns, similar to llTargetOmega() ]); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000 Snow 2 (Schnee) http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/snow_2?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="snow_2_schnee">Snow 2 (Schnee)</h2> <div class="level2"> <pre class="code">Snow { quota 30000 material Flare particle_width 0.3 particle_height 0.3 cull_each true renderer billboard sorted true local_space false iteration_interval 0 nonvisible_update_timeout 0 billboard_type point billboard_origin center billboard_rotation_type texcoord common_up_vector 0 1 0 point_rendering false accurate_facing false emitter Box { angle 0 colour 1 1 1 1 colour_range_start 1 1 1 1 colour_range_end 1 1 1 1 direction 0 -1 0 emission_rate 1250 position 0 5 0 velocity 10 velocity_min 10 velocity_max 15 time_to_live 20 time_to_live_min 20 time_to_live_max 20 duration 0 duration_min 0 duration_max 0 repeat_delay 0 repeat_delay_min 0 repeat_delay_max 0 width 200 height 200 depth 1 } affector DeflectorPlane { plane_point 0 0 0 plane_normal 0 1 0 bounce 0 } affector DirectionRandomiser { randomness 7 scope 1 keep_velocity true } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000 Teleport http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/teleport?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="teleport">Teleport</h2> <div class="level2"> <pre class="code">//Teleport v2.02 by Pablo Pharmanaut //based on code by Cubey Terra integer totalPos = 4; //This integer should equal total number of positions integer currentPos = 1; string currentpos; vector vPos1 = &lt;117,152,22&gt;; //These are vectors for the positions to vector vPos2 = &lt;81,23, 103&gt;; //which you wish to teleport vector vPos3 = &lt;83, 49.00, 29&gt;; vector vPos4 = &lt;67,120,22&gt;; //vector vPos5 = &lt;143.3,238.8,50.2&gt;; string sPos1 = &quot;Position One&quot;; //name of positions, if desired. This helps string sPos2 = &quot;Position Two&quot;; //you to know where you are going! string sPos3 = &quot;Position Three&quot;; string sPos4 = &quot;Position Four&quot;; //string sPos5 = &quot;Position Five&quot;; vector currentvPos; setPos() { if (currentPos == 1) { currentpos = sPos1; currentvPos = vPos1; } else if (currentPos == 2) { currentpos = sPos2; currentvPos = vPos2; } else if (currentPos == 3) { currentpos = sPos3; currentvPos = vPos3; } else if (currentPos == 4) { currentpos = sPos4; currentvPos = vPos4; } // else if (currentPos == 5) // { // currentpos = sPos5; // currentvPos = vPos5; // } //add else if section here with higher currentPos integer to add TP destinations. //Don&#039;t forget to increase totalPos integer at top of script vector pos = llGetPos(); llSetText(&quot;Teleport to &quot;+currentpos+&quot;\nTouch me to change destination&quot;,&lt;1,1,1&gt;,1.0); vector offset = currentvPos - pos; llSitTarget(offset, ZERO_ROTATION); } default { state_entry() { llSetSitText(&quot;Teleport&quot;); //This changes HUD display from &quot;sit&quot; to &quot;Teleport&quot; } touch_start(integer total_number) { currentPos += 1; if (currentPos &gt; totalPos) currentPos = 1; setPos(); } changed(integer change) { if ((change &amp; CHANGED_LINK)==CHANGED_LINK) { if (llAvatarOnSitTarget() != NULL_KEY) { llUnSit(llAvatarOnSitTarget()); } } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000