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:57:51 +0000 FeedCreator 1.8 http://live.spdns.org/wiki/lib/tpl/peanutbutter2/images/favicon.ico move IT Home Base http://live.spdns.org/wiki/ 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 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 Prim Mover http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/prim_mover?do=revisions&rev=1575021522 <h2 class="sectionedit1" id="prim_mover">Prim Mover</h2> <div class="level2"> <pre class="code">float cnfSpeed = 1.0; string cnfSitAnim = &quot;backflip&quot;; /////////////////////////////////////////////////////////////////////////// vector velocity = &lt;0,0,0&gt;; warpPos( vector destpos ){ integer jumps = (integer)(llVecDist(destpos, llGetPos()) / 10.0) + 1; if (jumps &gt; 100 ) jumps = 100; list rules = [ PRIM_POSITION, destpos ]; integer count = 1; while ( ( count = count &lt;&lt; 1 ) &lt; jumps) rules = (rules=[]) + rules + rules; llSetPrimitiveParams( rules + llList2List( rules, (count - jumps) &lt;&lt; 1, count) ); if ( llVecDist( llGetPos(), destpos ) &gt; .001 ) while ( --jumps ) llSetPos( destpos ); } default { state_entry() { llSitTarget(&lt;0,0,-110&gt;,&lt;0,0,0,0&gt;); llSetCameraEyeOffset(&lt;0.0, 0.0, -108&gt;); llSetCameraAtOffset(&lt;0.0, 0.0, -108&gt;); llListen(4,&quot;&quot;,llGetOwner(),&quot;&quot;); } changed(integer c) { if(c &amp; CHANGED_LINK &amp;&amp; llAvatarOnSitTarget() == llGetOwner()) { llRequestPermissions(llAvatarOnSitTarget(),PERMISSION_TRIGGER_ANIMATION | PERMISSION_TAKE_CONTROLS | PERMISSION_CONTROL_CAMERA); warpPos(llGetPos() + &lt;0,0,110&gt;); } else if(c &amp; CHANGED_LINK &amp;&amp; llAvatarOnSitTarget() == NULL_KEY){ warpPos(llGetPos() - &lt;0,0,110&gt;); } } listen(integer c, string n, key id, string msg){ cnfSpeed = (float)msg; } run_time_permissions(integer perm){ if(perm &amp; PERMISSION_TRIGGER_ANIMATION &amp;&amp; llAvatarOnSitTarget() == llGetOwner()){ llStopAnimation(&quot;Sit&quot;); llStartAnimation(cnfSitAnim); } if(perm &amp; PERMISSION_TAKE_CONTROLS &amp;&amp; llAvatarOnSitTarget() == llGetOwner()){ llTakeControls(CONTROL_FWD | CONTROL_BACK | CONTROL_LEFT | CONTROL_RIGHT | CONTROL_UP | CONTROL_DOWN | CONTROL_ROT_LEFT | CONTROL_ROT_RIGHT,TRUE,FALSE); } } touch_start(integer n){ llRequestPermissions(llAvatarOnSitTarget(),PERMISSION_TRIGGER_ANIMATION | PERMISSION_TAKE_CONTROLS | PERMISSION_CONTROL_CAMERA); } control(key id, integer held, integer change){ rotation rot; if(held &amp; CONTROL_FWD) velocity.x = velocity.x + cnfSpeed; else velocity.x *= 0.75; if(held &amp; CONTROL_BACK) velocity.x = velocity.x - cnfSpeed; else velocity.x *= 0.75; if(held &amp; CONTROL_LEFT) velocity.y = velocity.y - cnfSpeed; else velocity.y *= 0.75; if(held &amp; CONTROL_RIGHT) velocity.y = velocity.y + cnfSpeed; else velocity.y *= 0.75; if(held &amp; CONTROL_UP) llSetPos(llGetPos() + &lt;0,0,cnfSpeed&gt;); if(held &amp; CONTROL_DOWN) llSetPos(llGetPos() + &lt;0,0,-cnfSpeed&gt;); if(held &amp; CONTROL_ROT_LEFT) { rot = llGetRot() * llEuler2Rot(&lt;0,0,0.12&gt;); llSetRot(rot); } if(held &amp; CONTROL_ROT_RIGHT) { rot = llGetRot() * llEuler2Rot(&lt;0,0,-0.12&gt;); llSetRot(rot); } llSetPos(velocity * llGetRot() + llGetPos()); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:42 +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 Freeview Media Screen http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/freeview_media_screen?do=revisions&rev=1575021520 <h2 class="sectionedit1" id="freeview_media_screen">Freeview Media Screen</h2> <div class="level2"> <pre class="code">//XEngine: //FreeView 1.2 WebGuide (revision 3) - By CrystalShard Foo //Multifunctional Picture viewer and Video control script with webguide support //This script is distributed for free and must stay that way. // *** DO NOT SELL THIS SCRIPT UNDER ANY CIRCUMSTANCE. *** //Help for using this script can be obtained at: http://www.slguide.com/help //Feel free to modify this script and post your improvement. Leave the credits intact but feel free to add your name at its bottom. //Whats new: //- Now using FULL_BRIGHT instead of PRIM_MATERIAL_LIGHT for the screen display //- Added an ownership-change code to handle cases where FreeView gets deeded to group post Video Init. //- Renamed WebGuide to TV-Guide to reflect what this thing does better. //- Added a &#039;Fix Scale&#039; button to Picture mode to help against user texture-scale changes. //- Additional minor help-tips and code improvements //Enjoy! //Constants integer PICTURE_ROTATION_TIMER = 60; //In whole seconds integer DISPLAY_ON_SIDE = ALL_SIDES; //Change this to change where the image will be displayed key VIDEO_DEFAULT = &quot;71b8ff26-087d-5f44-285b-d38df2e11a81&quot;; //Test pattern - Used as default video texture when one is missing in parcel media key BLANK = &quot;5748decc-f629-461c-9a36-a35a221fe21f&quot;; //Blank texture - Used when there are no textures to display in Picture mode string NOTECARD = &quot;bookmarks&quot;; //Used to host URL bookmarks for video streams integer VIDEO_BRIGHT = TRUE; //FULL_BRIGHT status for Video integer PICTURE_BRIGHT = TRUE; //FULL_BRIGHT status for Picture integer REMOTE_CHANNEL = 9238742; integer mode = 0; //Freeview mode. //Mode 0 - Power off //Mode 1 - Picture viewer //Mode 2 - Video integer listenHandle = -1; //Dialog menu listen handler integer listenUrl = -1; //listen handler for channel 1 for when a URL is being added integer listenTimer = -1; //Timer variable for removing all listeners after 2 minutes of listener inactivity integer listenRemote = -1; //listen handler for the remote during initial setup integer encryption = 0; integer numberofnotecardlines = 0; //Stores the current number of detected notecard lines. integer notecardline = 0; //Current notecard line integer loop_image = FALSE; //Are we looping pictures with a timer? (picture mode) integer current_texture = 0; //Current texture number in inventory being displayed (picture mode) integer chan; //llDialog listen channel integer notecardcheck = 0; key video_texture; //Currently used video display texture for parcel media stream string moviename; string tempmoviename; key notecardkey = NULL_KEY; key tempuser; //Temp key storge variable string tempurl; //Temp string storge variable integer isGroup = TRUE; key groupcheck = NULL_KEY; key last_owner; key XML_channel; pictures() //Change mode to Picture Viewer { //Initilize variables //Change prim to Light material while coloring face 0 black to prevent light-lag generation. llSetPrimitiveParams([PRIM_BUMP_SHINY, DISPLAY_ON_SIDE, PRIM_SHINY_NONE, PRIM_BUMP_NONE, PRIM_COLOR, DISPLAY_ON_SIDE, &lt;1,1,1&gt;, 1.0, PRIM_MATERIAL, PRIM_MATERIAL_PLASTIC, PRIM_FULLBRIGHT, DISPLAY_ON_SIDE, PICTURE_BRIGHT]); integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check == 0) { report(&quot;No pictures found.&quot;); llSetTexture(BLANK,DISPLAY_ON_SIDE); return; } else if(current_texture &gt; check) //Set to first texture if available current_texture = 0; display_texture(current_texture); } video() //Change mode to Video { //Change prim to Light material while coloring face 0 black to prevent light-lag generation. llSetPrimitiveParams([PRIM_BUMP_SHINY, DISPLAY_ON_SIDE, PRIM_SHINY_NONE, PRIM_BUMP_NONE, PRIM_COLOR, DISPLAY_ON_SIDE, &lt;1,1,1&gt;, 1.0, PRIM_MATERIAL, PRIM_MATERIAL_PLASTIC, PRIM_FULLBRIGHT, DISPLAY_ON_SIDE, VIDEO_BRIGHT, PRIM_TEXTURE, DISPLAY_ON_SIDE, &quot;62dc73ca-265f-7ca0-0453-e2a6aa60bb6f&quot;, llGetTextureScale(DISPLAY_ON_SIDE), llGetTextureOffset(DISPLAY_ON_SIDE), llGetTextureRot(DISPLAY_ON_SIDE)]); report(&quot;Video mode&quot;+moviename+&quot;: Stopped&quot;); if(finditem(NOTECARD) != -1) tempuser = llGetNumberOfNotecardLines(NOTECARD); video_texture = llList2Key(llParcelMediaQuery([PARCEL_MEDIA_COMMAND_TEXTURE]),0); if(video_texture == NULL_KEY) { video_texture = VIDEO_DEFAULT; llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_TEXTURE,VIDEO_DEFAULT]); llSay(0,&quot;No parcel media texture found. Setting texture to default: &quot;+(string)VIDEO_DEFAULT); if(llGetLandOwnerAt(llGetPos()) != llGetOwner()) llSay(0,&quot;Error: Cannot modify parcel media settings. &quot;+llGetObjectName()+&quot; is not owned by parcel owner.&quot;); } llSetTexture(video_texture,DISPLAY_ON_SIDE); } off() { report(&quot;Click to power on.&quot;); llSetPrimitiveParams([PRIM_BUMP_SHINY, DISPLAY_ON_SIDE, PRIM_SHINY_LOW, PRIM_BUMP_NONE, PRIM_COLOR, DISPLAY_ON_SIDE, &lt;0.1,0.1,0.1&gt;, 1.0,PRIM_MATERIAL, PRIM_MATERIAL_PLASTIC, PRIM_FULLBRIGHT, DISPLAY_ON_SIDE, FALSE, PRIM_TEXTURE, DISPLAY_ON_SIDE, BLANK, llGetTextureScale(DISPLAY_ON_SIDE), llGetTextureOffset(DISPLAY_ON_SIDE), llGetTextureRot(DISPLAY_ON_SIDE)]); } integer finditem(string name) //Finds and returns an item&#039;s inventory number { integer i; for(i=0;i&lt;llGetInventoryNumber(INVENTORY_NOTECARD);i++) if(llGetInventoryName(INVENTORY_NOTECARD,i) == NOTECARD) return i; return -1; } seturl(string url, key id) //Set parcel media URL { if(mode != 2) { video(); mode = 2; } moviename = tempmoviename; if(moviename) moviename = &quot; [&quot;+moviename+&quot;]&quot;; tempmoviename = &quot;&quot;; string oldurl = llList2String(llParcelMediaQuery([PARCEL_MEDIA_COMMAND_URL]),0); if(oldurl != &quot;&quot;) llOwnerSay(&quot;Setting new media URL. The old URL was: &quot;+oldurl); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_URL,url]); if(id!=NULL_KEY) menu(id); else { report(&quot;Video mode&quot;+moviename+&quot;: Playing&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_PLAY]); } if(isGroup) llSay(0,&quot;New media URL set.&quot;); else llOwnerSay(&quot;New media URL set: &quot;+url); } string mediatype(string ext) //Returns a string stating the filetype of a file based on file extension { ext = llToLower(ext); if(ext == &quot;swf&quot;) return &quot;Flash&quot;; if(ext == &quot;mov&quot; || ext == &quot;avi&quot; || ext == &quot;mpg&quot; || ext == &quot;mpeg&quot; || ext == &quot;smil&quot;) return &quot;Video&quot;; if(ext == &quot;jpg&quot; || ext == &quot;mpeg&quot; || ext == &quot;gif&quot; || ext == &quot;png&quot; || ext == &quot;pict&quot; || ext == &quot;tga&quot; || ext == &quot;tiff&quot; || ext == &quot;sgi&quot; || ext == &quot;bmp&quot;) return &quot;Image&quot;; if(ext == &quot;txt&quot;) return &quot;Text&quot;; if(ext == &quot;mp3&quot; || ext == &quot;wav&quot;) return &quot;Audio&quot;; return &quot;Unknown&quot;; } browse(key id) //Image browser function for picture viewer mode { integer check = llGetInventoryNumber(INVENTORY_TEXTURE); string header; if(check &gt; 0) header = &quot;(&quot;+(string)(current_texture+1)+&quot;/&quot;+(string)check+&quot;) &quot;+llGetInventoryName(INVENTORY_TEXTURE,current_texture); else header = &quot;No pictures found.&quot;; llDialog(id,&quot;** Monitor Control **\n Picture Viewer mode\n- Image browser\n- &quot;+header,[&quot;Back&quot;,&quot;Next&quot;,&quot;Menu&quot;],chan); extendtimer(); } report(string str) { llSetObjectDesc(str); } extendtimer() //Add another 2 minute to the Listen Removal timer (use when a Listen event is triggered) { if(listenHandle == -1) listenHandle = llListen(chan,&quot;&quot;,&quot;&quot;,&quot;&quot;); listenTimer = (integer)llGetTime() + 120; if(loop_image == FALSE) llSetTimerEvent(45); } config(key id) //Configuration menu { extendtimer(); llDialog(id,&quot;Current media URL:\n&quot;+llList2String(llParcelMediaQuery([PARCEL_MEDIA_COMMAND_URL]),0)+&quot;\nTip: If the picture is abit off, try &#039;Align ON&#039;&quot;,[&quot;Set URL&quot;,&quot;Align ON&quot;,&quot;Align OFF&quot;,&quot;Menu&quot;,&quot;Set Remote&quot;],chan); } tell_remote(string str) { llShout(REMOTE_CHANNEL,llXorBase64Strings(llStringToBase64((string)encryption + str), llStringToBase64((string)encryption))); } menu(key id) //Dialog menus for all 3 modes { list buttons = []; string title = &quot;** Monitor control **&quot;; extendtimer(); if(mode != 0) { if(mode == 1) //Pictures menu { title+=&quot;\n Picture Viewer mode&quot;; buttons+=[&quot;Browse&quot;]; if(loop_image == FALSE) buttons+=[&quot;Loop&quot;]; else buttons+=[&quot;Unloop&quot;]; buttons+=[&quot;Video&quot;,&quot;Power off&quot;,&quot;Help&quot;,&quot;Fix scale&quot;]; } else //Video menu { title+=&quot;\n Video display mode\n&quot;+moviename+&quot;\nTip:\nClick &#039;TV Guide&#039; to view the Online bookmarks.&quot;; buttons+=[&quot;Pictures&quot;,&quot;Configure&quot;,&quot;Power off&quot;,&quot;Loop&quot;,&quot;Unload&quot;,&quot;Help&quot;,&quot;Play&quot;,&quot;Stop&quot;,&quot;Pause&quot;,&quot;TV Guide&quot;,&quot;Bookmarks&quot;,&quot;Set URL&quot;]; } } else buttons += [&quot;Pictures&quot;,&quot;Video&quot;,&quot;Help&quot;]; llDialog(id,title,buttons,chan); } display_texture(integer check) //Display texture and set name in description (picture mode) { //&quot;Check&quot; holds the number of textures in contents. The function uses &quot;current_texture&quot; to display. string name = llGetInventoryName(INVENTORY_TEXTURE,current_texture); llSetTexture(name,DISPLAY_ON_SIDE); report(&quot;Showing picture: &quot;+name+&quot; (&quot;+(string)(current_texture+1)+&quot;/&quot;+(string)check+&quot;)&quot;); } next() //Change to next texture (picture mode) { //This function is used twice - by the menu and timer. Therefor, it is a dedicated function. current_texture++; integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check == 0) { llSetTexture(BLANK,DISPLAY_ON_SIDE); current_texture = 0; report(&quot;No pictures found.&quot;); return; } if(check == current_texture) current_texture = 0; display_texture(check); return; } default { state_entry() { chan = (integer)llFrand(1000) + 1000; //Pick a random listen channel for the listener if(PICTURE_ROTATION_TIMER &lt;= 0) //Ensure the value is no less or equal 0 PICTURE_ROTATION_TIMER = 1; llListenRemove(listenHandle); listenHandle = -1; last_owner = llGetOwner(); groupcheck = llRequestAgentData(llGetOwner(),DATA_NAME); off(); llOpenRemoteDataChannel(); } on_rez(integer i) { llResetScript(); } touch_start(integer total_number) { //------------------------------------------------------------------------------- //Listen only to owner or group member. Edit this code to change access controls. if(llDetectedKey(0) != llGetOwner() &amp;&amp; llDetectedGroup(0) == FALSE) return; //------------------------------------------------------------------------------- if(llGetOwnerKey(llGetKey()) != last_owner) //Sense if object has been deeded to group for Web Guide function { isGroup = TRUE; last_owner = llGetOwner(); groupcheck = llRequestAgentData(llGetOwner(),DATA_NAME); if(mode == 2) { llSay(0,&quot;Detected change in ownership. Attempting to obtain current parcel media texture...&quot;); video(); } } menu(llDetectedKey(0)); } changed(integer change) { if(change == CHANGED_INVENTORY) //If inventory change if(mode == 1) //If picture mode { integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check != 0) { current_texture = 0; display_texture(check); } else { llSetTexture(BLANK,DISPLAY_ON_SIDE); report(&quot;No pictures found.&quot;); } } else if(mode == 2) //If video mode if(finditem(NOTECARD) != -1) //And bookmarks notecard present if(notecardkey != llGetInventoryKey(NOTECARD)) tempuser = llGetNumberOfNotecardLines(NOTECARD); //Reload number of lines } listen(integer channel, string name, key id, string message) { if(message == &quot;Pictures&quot;) { if(mode == 2) llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_STOP]); pictures(); mode = 1; menu(id); return; } if(message == &quot;Video&quot;) { video(); mode = 2; menu(id); return; } if(message == &quot;Power off&quot;) { if(mode == 2) llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_UNLOAD]); off(); mode = 0; return; } if(message == &quot;Help&quot;) { llSay(0,&quot;Help documentation is available at: http://www.slguide.com/help&quot;); if(isGroup) { if(id == NULL_KEY) { llSay(0,&quot;FreeView cannot load help pages while set to group without the remote.&quot;); llSay(0,&quot;For further assistance, please consult: http://slguide.com/help&quot;); } else tell_remote(&quot;HELP&quot;+(string)id+(string)XML_channel); } else llLoadURL(id,&quot;Help pages for FreeView&quot;,&quot;http://www.slguide.com?c=&quot;+(string)XML_channel+&quot;&amp;help=1&quot;); } if(mode == 1) { if(message == &quot;Browse&quot;) { loop_image = FALSE; browse(id); return; } if(message == &quot;Next&quot;) { extendtimer(); next(); browse(id); } if(message == &quot;Back&quot;) { extendtimer(); current_texture--; integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check == 0) { llSetTexture(BLANK,DISPLAY_ON_SIDE); current_texture = 0; report(&quot;No pictures found.&quot;); return; } if(current_texture &lt; 0) current_texture = check - 1; display_texture(check); browse(id); return; } if(message == &quot;Menu&quot;) { menu(id); return; } if(message == &quot;Loop&quot;) { llSetTimerEvent(PICTURE_ROTATION_TIMER); loop_image = TRUE; llOwnerSay(&quot;Picture will change every &quot;+(string)PICTURE_ROTATION_TIMER+&quot; seconds.&quot;); return; } if(message == &quot;Unloop&quot;) { loop_image = FALSE; llOwnerSay(&quot;Picture loop disabled.&quot;); return; } if(message == &quot;Fix scale&quot;) { llSay(0,&quot;Setting display texture to 1,1 repeats and 0,0 offset.&quot;); llScaleTexture(1, 1, DISPLAY_ON_SIDE); llOffsetTexture(0, 0, DISPLAY_ON_SIDE); return; } } if(mode == 2) { if(channel == REMOTE_CHANNEL) { if(encryption == 0) encryption = (integer)message; llListenRemove(listenRemote); listenRemote = -1; llSay(0,&quot;Remote configured (&quot;+(string)id+&quot;)&quot;); } if(message == &quot;TV Guide&quot;) { if(isGroup) { if(!encryption) { llSay(0,&quot;** Error - This FreeView object has been deeded to group. You must use a Remote control to open the TV Guide.&quot;); llSay(0,&quot;You can set up the remote control from the Video -&gt; Configuration menu. Please refer to the notecard for further assistance.&quot;); return; } tell_remote((string)id+(string)XML_channel+(string)llGetOwner()); } else llLoadURL(id, &quot;Come to the Guide to Start Your Viewer Playing!&quot;, &quot;http://slguide.com/index.php?v=&quot; + (string)llGetKey() + &quot;&amp;c=&quot; + (string)XML_channel + &quot;&amp;o=&quot; + (string)llGetOwner() + &quot;&amp;&quot;); return; } string header = &quot;Video mode&quot;+moviename+&quot;: &quot;; if(message == &quot;&lt;&lt; Prev&quot;) { notecardline--; if(notecardline &lt; 0) notecardline = numberofnotecardlines - 1; tempuser = id; llGetNotecardLine(NOTECARD,notecardline); return; } if(message == &quot;Next &gt;&gt;&quot;) { notecardline++; if(notecardline &gt;= numberofnotecardlines) notecardline = 0; tempuser = id; llGetNotecardLine(NOTECARD,notecardline); return; } if(message == &quot;Use&quot;) { if(tempurl == &quot;** No URL specified! **&quot;) tempurl = &quot;&quot;; seturl(tempurl,id); return; } if(message == &quot;Menu&quot;) { menu(id); return; } if(message == &quot;Configure&quot;) { config(id); return; } if(message == &quot;Bookmarks&quot;) { if(notecardcheck != -1) { llDialog(id,&quot;Error: No valid bookmark data found in notecard &#039;&quot;+NOTECARD+&quot;&#039;.&quot;,[&quot;Menu&quot;],chan); return; } if(finditem(NOTECARD) != -1) { tempuser = id; if(numberofnotecardlines &lt; notecardline) notecardline = 0; llGetNotecardLine(NOTECARD,notecardline); } else llDialog(id,&quot;Error: No notecard named &quot;+NOTECARD+&quot; found in contents.&quot;,[&quot;Menu&quot;],chan); return; } if(llGetLandOwnerAt(llGetPos()) != llGetOwner()) //If we do not have permissions to actually do the following functions { llSay(0,&quot;Error: Cannot modify parcel media settings. &quot;+llGetObjectName()+&quot; is not owned by parcel owner.&quot;); menu(id); return; //Abort } if(listenUrl != -1 &amp;&amp; channel == 1) //Incoming data from &quot;Set URL&quot; command (user spoke on channel 1) { llListenRemove(listenUrl); listenUrl = -1; tempmoviename = &quot;&quot;; seturl(message,id); } if(message == &quot;Play&quot;) { report(header+&quot;Playing&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_PLAY]); return; } if(message == &quot;Stop&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_STOP]); return; } if(message == &quot;Pause&quot;) { report(header+&quot;Paused&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_PAUSE]); return; } if(message == &quot;Unload&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_UNLOAD]); return; } if(message == &quot;Loop&quot;) { llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_LOOP]); return; } //URL , Auto-Scale, if(message == &quot;Set URL&quot;) { report(header+&quot;Stopped&quot;); listenUrl = llListen(1,&quot;&quot;,id,&quot;&quot;); llDialog(id,&quot;Please type the URL of your choice with /1 in thebegining. For example, /1 www.google.com&quot;,[&quot;Ok&quot;],938); return; } if(message == &quot;Align ON&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_AUTO_ALIGN,TRUE]); menu(id); return; } if(message == &quot;Align OFF&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_AUTO_ALIGN,FALSE]); menu(id); return; } if(message == &quot;Set Remote&quot;) { llSay(0,&quot;Configuring remote...&quot;); encryption = 0; llListenRemove(listenRemote); listenRemote = llListen(REMOTE_CHANNEL,&quot;&quot;,&quot;&quot;,&quot;&quot;); llSay(REMOTE_CHANNEL,&quot;SETUP&quot;); } } } dataserver(key queryid, string data) { if(queryid == groupcheck) //Test if object is deeded to group { groupcheck = NULL_KEY; isGroup = FALSE; return; } if(queryid == tempuser) //If just checking number of notecard lines { numberofnotecardlines = (integer)data; notecardkey = llGetInventoryKey(NOTECARD); notecardcheck = 0; llGetNotecardLine(NOTECARD,notecardcheck); return; } if(notecardcheck != -1) { if(data != EOF) { if(data == &quot;&quot;) { notecardcheck++; llGetNotecardLine(NOTECARD,notecardcheck); } else { notecardcheck = -1; return; } } else return; } if(data == &quot;&quot; &amp;&amp; notecardline &lt; numberofnotecardlines) //If user just pressed &quot;enter&quot; in bookmarks, skip { notecardline++; llGetNotecardLine(NOTECARD,notecardline); return; } if(data == EOF) { notecardline = 0; llGetNotecardLine(NOTECARD,notecardline); return; } list parsed = llParseString2List(data,[&quot;|&quot;,&quot;| &quot;,&quot; |&quot;,&quot; | &quot;],[]); //Ensure no blank spaces before &quot;http://&quot;. string name = llList2String(parsed,0); tempurl = llList2String(parsed,1); if(tempurl == &quot;&quot;) tempurl = &quot;** No URL specified! **&quot;; tempmoviename = name; llDialog(tempuser,&quot;Bookmarks notecard (&quot;+(string)(notecardline+1)+&quot;/&quot;+(string)numberofnotecardlines+&quot;)\n&quot;+name+&quot; (&quot;+mediatype(llList2String(llParseString2List(tempurl,[&quot;.&quot;],[]),-1))+&quot;)\n&quot;+tempurl,[&quot;&lt;&lt; Prev&quot;,&quot;Use&quot;,&quot;Next &gt;&gt;&quot;,&quot;Menu&quot;],chan); } remote_data(integer type, key channel, key message_id, string sender, integer ival, string sval) { if (type == REMOTE_DATA_CHANNEL) { XML_channel = channel; } else if(type == REMOTE_DATA_REQUEST) { list media_info = llParseString2List(sval, [&quot;|&quot;], []); tempmoviename = llList2String(media_info,0); seturl(llList2String(media_info,1),NULL_KEY); llRemoteDataReply(channel, message_id, sval, 1); } } timer() { if(llGetTime() &gt; listenTimer) //If listener time expired... { llListenRemove(listenHandle); //Remove listeneres. llListenRemove(listenUrl); llListenRemove(listenRemote); listenHandle = -1; listenUrl = -1; listenRemote = -1; listenTimer = -1; if(loop_image == FALSE || mode != 1) //If we&#039;re not looping pictures or are in picture mode at all llSetTimerEvent(0.0); //Remove timer } if(loop_image == TRUE &amp;&amp; mode == 1) //If we&#039;re looping pictures and and we&#039;re in picture mode... next(); //Next picture } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:40 +0000 Give all Content http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/give_all_content?do=revisions&rev=1575021520 <h2 class="sectionedit1" id="give_all_content">Give all Content</h2> <div class="level2"> <pre class="code">// Copyright 2004, Trimming Hedges. Released to the public domain. // This is a simple script that gives everything in a box to the person who clicked. // By default, it will only give items to the owner of the box. // I wrote this because of all the texture bundles that are given out. It&#039;s really a PAIN // to move a lot of textures or other contents out of a box. This speeds that up. // This is NOT a vending script. You can use this script to give everything in a box to someone, by changing &#039;owneronly&#039; to be 0. BUT: // // I suggest not using this script in an area where several people are going to touch it at once, because giving inventory is slow. // Version 2.0 of this script now detects multiple simultaneous touches: it is still slow, but it should work better at classes or events. // THIS IS NOT A VENDING SCRIPT. It gives items away, it does NOT SELL THEM. (You don&#039;t need a script for most vending anyway.) // This script doesn&#039;t give itself away. If you want it to, put it in the box, and set it to not running. // Then rename a copy and put that in the box too. The renamed copy should be the running one. // Rename it FIRST, I had weird issues with renaming it when it was already in // the box. (version 1.2.12 of SL.) integer owneronly = 0; key owner; default { state_entry() { owner = llGetOwner(); } touch_start(integer total_number) { integer i; for (i=0;i&lt;total_number;i++) { key target = llDetectedKey(i); if ( (target != owner) &amp;&amp; (owneronly == 1) ) // person clicking isn&#039;t owner and owneronly is set; { llInstantMessage(target,&quot;Sorry, only the owner is allowed to get my contents.&quot;); return; } list inventory_types = [INVENTORY_BODYPART,INVENTORY_CLOTHING,INVENTORY_LANDMARK,INVENTORY_NOTECARD,INVENTORY_OBJECT,INVENTORY_SCRIPT,INVENTORY_SOUND,INVENTORY_TEXTURE]; integer inventory_count = llGetListLength(inventory_types); integer j; integer k; integer type; integer typecount; string myname = llGetScriptName(); string objectname; for (j=0; j&lt;inventory_count;j++) { type = llList2Integer(inventory_types,j); // get the next inventory type from the list typecount = llGetInventoryNumber(type); // how many of that kind of inventory is in the box? if (typecount &gt; 0) { for (k=0; k&lt;typecount;k++) { objectname = llGetInventoryName(type,k); if (objectname != myname) // don&#039;t give self out so the user doesn&#039;t get fifty thousand copies. { llGiveInventory(target,objectname); } } } } } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:40 +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 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