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 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 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:40:10 +0000 FeedCreator 1.8 http://live.spdns.org/wiki/lib/tpl/peanutbutter2/images/favicon.ico move IT Home Base http://live.spdns.org/wiki/ 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 Dance Poseball http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/dance_poseball?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="dance_poseball">Dance Poseball</h2> <div class="level2"> <pre class="code">//////////////////////////////////////////// // Animation Script v1.2.1 // // Written by Xylor Baysklef //////////////////////////////////////////// /////////////// CONSTANTS /////////////////// list ANIMATIONS = [ &quot;Club Dance 1&quot; ]; list ANIMATIONS2 = [ &quot;Club Dance 2&quot; ]; list ANIMATIONS3 = [ &quot;Club Dance 3&quot; ]; list ANIMATIONS4 = [ &quot;Club Dance 4&quot; ]; ///////////// END CONSTANTS ///////////////// ///////////// GLOBAL VARIABLES /////////////// //integer gToggle = 0; integer gAnimNumber; integer gTotalAnims; string gAnimName = &quot;type&quot;; /////////// END GLOBAL VARIABLES ///////////// default { state_entry() { //llSay(0, &quot;Init...&quot;); llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); ANIMATIONS += ANIMATIONS2; ANIMATIONS2 = []; gTotalAnims = llGetListLength(ANIMATIONS); gAnimNumber = -1; llListen(0, &quot;&quot;, llGetOwner(), &quot;&quot;); } on_rez(integer param) { //llGiveInventory(llGetOwner(), &quot;Animation Names&quot;); llResetScript(); } listen(integer channel, string name, key id, string mesg) { string preamble = llGetSubString(mesg, 0, 3); if (preamble != &quot;anim&quot; &amp;&amp; preamble != &quot;stop&quot;) return; integer perm = llGetPermissions(); if ( !(perm &amp; PERMISSION_TRIGGER_ANIMATION)) { llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); return; } list parsed = llParseString2List(mesg, [ &quot; &quot; ], []); //llSay(0, (string)parsed); string anim = llList2String(parsed, 1); if (preamble == &quot;stop&quot;) { //llSay(0, &quot;Stopping: &quot; + llGetAnimation(llGetOwner())); //llStopAnimation(llGetAnimation(llGetOwner())); if (anim == &quot;&quot;) anim = gAnimName; if (anim == &quot;all&quot;) { integer i; llSay(0, &quot;Stopping all animations... please wait.&quot;); for (i=0; i&lt;gTotalAnims; i++) llStopAnimation(llList2String(ANIMATIONS, i)); llSay(0, &quot;Done.&quot;); return; } //llSay(0, &quot;Stopping: &quot; + anim); llStopAnimation(anim); return; } gAnimName = anim; //llSay(0, &quot;Animation: &quot; + gAnimName); llStartAnimation(gAnimName); } run_time_permissions(integer perm) { //llStopAnimation(gAnimName); //gToggle = 0; } attach(key id) { integer perm = llGetPermissions(); if (id != NULL_KEY) { if (! (perm &amp; PERMISSION_TRIGGER_ANIMATION)) { llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); } } else { if (perm &amp; PERMISSION_TRIGGER_ANIMATION) { llStopAnimation(gAnimName); } } } touch_start(integer total_number) { if (llDetectedKey(0) != llGetOwner()) return; integer perm = llGetPermissions(); if (perm &amp; PERMISSION_TRIGGER_ANIMATION) { if (gAnimNumber != -1) { llStopAnimation( llList2String(ANIMATIONS, gAnimNumber) ); } gAnimNumber++; if (gAnimNumber == gTotalAnims) gAnimNumber = 0; gAnimName = llList2String(ANIMATIONS, gAnimNumber); llStartAnimation( gAnimName ); llSay(0, &quot;Animation: &quot; + gAnimName); } else { llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +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 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 Besucherzähler mit E-Mail Benachrichtigung http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/besucherzaehler_email?do=revisions&rev=1575021518 <h2 class="sectionedit1" id="besucherzaehler_mit_e-mail_benachrichtigung">Besucherzähler mit E-Mail Benachrichtigung</h2> <div class="level2"> <p> Damit dieses Script funktionieren kann muss zuerst in der OpenSIM-Konfigurationsdatei opensim.ini die E-Mail Funktion im Abschnitt SMTP eingeschaltet und konfiguriert werden. </p> <pre class="code">// Besucherzähler mit E-Mail Benachrichtung // von Blub Blinker, www.swiss-sl.ch float range = 100; // sucht im Radius von 100 Metern nach Besuchern float rate = 10.0; // Zeitabstand in der erneut gesucht wird, 1,0 = 1 Sekunde // E-Mail Adresse auf die eigene anpassen string email_address = &quot;adresse@domain.xyz&quot;; // Name der zu kontrollierenden Region // Die versandte E-Mail beinhaltet die Koordinaten string location_name = &quot;OpenSIM-Region&quot;; list single_name_list; list visitor_list; integer isNameOnList( string name ) { list single_name_list; single_name_list += name; return (-1 != llListFindList( visitor_list, single_name_list ) ); } sendEmail() { string csv = llList2CSV( visitor_list ); llEmail( email_address, &quot;Visitor List: &quot; + location_name, csv ); } resetList() { single_name_list = llDeleteSubList(single_name_list, 0, llGetListLength(single_name_list)); llSay( 0, &quot;Reset abgeschlossen&quot;); } // Hilfe Befehle sayHelp( integer is_owner ) { if( is_owner ) { llSay( 0, &quot;Dieses Objekt speichert die Namen von jedem Avatars der&quot; ); llSay( 0, &quot;in den Bereich von &quot;+ (string)((integer)range) + &quot; Metern kommt.&quot; ); llSay( 0, &quot;Kommandos die der Besitzer sagen kann:&quot; ); llSay( 0, &quot;&#039;help&#039; - Zeigt diese Anleitung&quot; ); llSay( 0, &quot;&#039;say list&#039; - Zeigt die Namen aller Avatare auf der Liste&quot;); llSay( 0, &quot;&#039;reset list&#039; - Loescht die Namen auf der Liste&quot; ); llSay( 0, &quot;&#039; email list&#039; - Sendet die Namen auf der Liste als E-Mail&quot; ); } else { llSay( 0, &quot;Sorry, nur der Besitzer kann editieren.&quot; ); } } // Script-Start default { state_entry() { llSay(0, &quot;Besucherzaehler wurde gestartet.&quot;); llSay(0, &quot;Der Besitzer kann mit &#039;help&#039; eine Kurzanleitung anfordern.&quot;); llSensorRepeat( &quot;&quot;, &quot;&quot;, AGENT, range, TWO_PI, rate ); llListen(0, &quot;&quot;, llGetOwner(), &quot;&quot;); // Wechsle hier das Zeitintervall in der die E-Mail Benachrichtigung zugesandt werden soll (Standard ist 60x60 Sekunden) // = 3600 Sekunden = 1x pro Stunde llSetTimerEvent( 60 * 60 ); } // Sendet die E-Mail im oben angegebenem Zeitintervall timer() { sendEmail(); resetList(); } // Gibt den Hilfe-Befehl aus beim anklicken touch_start( integer num_detected ) { integer i; for( i = 0; i &lt; num_detected; i++ ) { sayHelp( llDetectedKey(i) == llGetOwner() ); } } // Erfasst die Avatare mit Zeitstempel sensor( integer number_detected ) { integer i; for( i = 0; i &lt; number_detected; i++ ) { // Den Eigentümer nicht mitzählen if( llDetectedKey( i ) != llGetOwner() ) { string detected_name = llDetectedName( i ); if( isNameOnList( detected_name ) == FALSE ) // Ja oder Nein, TRUE oder FALSE { float seconds = llGetWallclock(); float minutes = seconds / 60.0; float hours = minutes / 60.0; integer hours_int = (integer) hours; integer minutes_int = ((integer)minutes) % 60; if( minutes_int &lt; 10 ) { visitor_list += (string) hours_int + &quot;:0&quot; + (string) minutes_int; } else { visitor_list += (string) hours_int + &quot;:&quot; + (string) minutes_int; } visitor_list += detected_name; } } } } // Besitzer-Befehle listen( integer channel, string name, key id, string message ) { if( id != llGetOwner() ) { return; } if( message == &quot;help&quot; ) // Tippe im Chat /0 help und Du erhälst Hilfe zu den Befehlen { sayHelp( TRUE ); } else if( message == &quot;say list&quot; ) // Tippe im Chat /0 say list und Du erhälst eine Liste aller Avatare { llSay( 0, &quot;Avatar-Liste:&quot; ); integer len = llGetListLength( visitor_list ); integer i; for( i = 0; i &lt; len; i++ ) { llSay( 0, llList2String(visitor_list, i) ); } llSay( 0, &quot;Gesamt = &quot; + (string)len ); } else if( message == &quot;email list&quot; ) { sendEmail(); llSay(0, &quot;E-Mail wird versendet.&quot;); } else if( message == &quot;reset list&quot; ) // Tippe im Chat /0 reset list um die Liste zurückzusetzen { visitor_list = llDeleteSubList(visitor_list, 0, llGetListLength(visitor_list)); llSay( 0, &quot;Reset erfolgreich.&quot;); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:38 +0000 Fire Particle http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/fire_particle?do=revisions&rev=1575021520 <h2 class="sectionedit1" id="fire_particle">Fire Particle</h2> <div class="level2"> <pre class="code">//// &quot;Fire&quot; PARTICLE TEMPLATE v1 - by Jopsy Pendragon - 4/8/2008 //// You are free to use this script as you please, so long as you include this line: //** The original &#039;free&#039; version of this script came from THE PARTICLE LABORATORY. **// // SETUP: Drop one optional particle texture and this script into a prim. // Particles should start automatically. (Reset) the script if you insert a // particle texture later on. Add one or more CONTROLLER TEMPLATES to any // prims in the linked object to control when particles turn ON and OFF. // Customize the particle_parameter values below to create your unique // particle effect and click SAVE. Values are explained along with their // min/max and default values further down in this script. string CONTROLLER_ID = &quot;A&quot;; // See comments at end regarding CONTROLLERS. integer AUTO_START = TRUE; // Optionally FALSE only if using CONTROLLERS. list particle_parameters=[]; // stores your custom particle effect, defined below. list target_parameters=[]; // remembers targets found using TARGET TEMPLATE scripts. default { state_entry() { particle_parameters = [ // start of particle settings // Texture Parameters: PSYS_SRC_TEXTURE, llGetInventoryName(INVENTORY_TEXTURE, 0), PSYS_PART_START_SCALE, &lt;.4,.4,FALSE&gt;, PSYS_PART_END_SCALE, &lt;.5,.5, FALSE&gt;, PSYS_PART_START_COLOR, &lt;1,1,1&gt;, PSYS_PART_END_COLOR, &lt;.4,.1,0&gt;, PSYS_PART_START_ALPHA, (float).8, PSYS_PART_END_ALPHA, (float).0, // Production Parameters: PSYS_SRC_BURST_PART_COUNT, (integer)1, PSYS_SRC_BURST_RATE, (float) 0.0, PSYS_PART_MAX_AGE, (float)1.5, PSYS_SRC_MAX_AGE,(float) 0.0, // Placement Parameters: PSYS_SRC_PATTERN, (integer)2, // 1=DROP, 2=EXPLODE, 4=ANGLE, 8=ANGLE_CONE, // Placement Parameters (for any non-DROP pattern): PSYS_SRC_BURST_SPEED_MIN, (float).1, PSYS_SRC_BURST_SPEED_MAX, (float).3, // PSYS_SRC_BURST_RADIUS, 0.0, // Placement Parameters (only for ANGLE &amp; CONE patterns): PSYS_SRC_ANGLE_BEGIN, (float) .03*PI, PSYS_SRC_ANGLE_END, (float)0.00*PI, // PSYS_SRC_OMEGA, &lt;0,0,0&gt;, // After-Effect &amp; Influence Parameters: PSYS_SRC_ACCEL, &lt;0.0,0.0,1.5&gt;, // PSYS_SRC_TARGET_KEY, llGetLinkKey(llGetLinkNum() + 1), PSYS_PART_FLAGS, (integer)( 0 // Texture Options: | PSYS_PART_INTERP_COLOR_MASK | PSYS_PART_INTERP_SCALE_MASK | PSYS_PART_EMISSIVE_MASK | PSYS_PART_FOLLOW_VELOCITY_MASK // After-effect &amp; Influence Options: | PSYS_PART_WIND_MASK | PSYS_PART_BOUNCE_MASK // | PSYS_PART_FOLLOW_SRC_MASK // | PSYS_PART_TARGET_POS_MASK // | PSYS_PART_TARGET_LINEAR_MASK ) //end of particle settings ]; if ( AUTO_START ) llParticleSystem( particle_parameters ); } link_message( integer sibling, integer num, string mesg, key target_key ) { if ( mesg != CONTROLLER_ID ) { // this message isn&#039;t for me. Bail out. return; } else if ( num == 0 ) { // Message says to turn particles OFF: llParticleSystem( [ ] ); } else if ( num == 1 ) { // Message says to turn particles ON: llParticleSystem( particle_parameters + target_parameters ); } else if ( num == 2 ) { // Turn on, and remember and use the key sent us as a target: target_parameters = [ PSYS_SRC_TARGET_KEY, target_key ]; llParticleSystem( particle_parameters + target_parameters ); } else { // bad instruction number // do nothing. } } } //============================= About Parameters ============================= // There are 22-ish NAMED attributes that affect a particle display. // To customize a display you give each a VALUE. // For example: PSYS_PART_START_COLOR is a named attribute, // and &lt;1.0, 0.5, 0.0&gt; is a color VALUE (orange, in this case). // // As long as your &#039;names&#039; and &#039;values&#039; are paired up properly, they can // be in any order! Any you omit a pair, it reverts to a default value. //============================= Texture Parameters ============================= // // TEXTURE, can be an &quot;Asset UUID&quot; key copied from a texture // that you have full permissions to, or the name of // a texture in the prim&#039;s inventory. // // SCALE, (size) 0.0 to 4.0 meters wide, by 0.0 to 4.0 meters tall. (default 1x1) // Textures are FLAT, so the &#039;z&#039; part of the vector is ignored. // Values smaller than 0.04x0.04 may not get rendered at all. // Tiny particles vanish if the viewer is not near them. // // BEGIN_SCALE sets particle start size. // END_SCALE (end size) is ignored, if the INTERP_SCALE_MASK option is disabled. // // COLOR, &lt; RED, GREEN, BLUE &gt; from &lt;0.00,0.00,0.00&gt; (black) to &lt;1.00,1.00,1.00&gt; (white/default) // ALPHA, 1.0 = 100% visible(default), 0.0 = invisible. Less than 0.1 might not get seen. // START_COLOR and START_ALPHA set the color and transparency of newly created particles. // END_COLOR and END_ALPHA are ignored, if the INTERP_COLOR_MASK option is disabled. //============================= Production Parameters ============================= // // BURST_PART_COUNT: quantity of particles per burst, 1 to 4096 (default 1), // // BURST_RATE: seconds to delay between particle bursts. 0.0 to 30.0 (default 0.1) // // PART_MAX_AGE: particle lifespan in seconds, 0.00 to 30.0 (default=10.0) // PART_MAX_AGE less than 0.5 might not be visible. // // The default total number of particles that can be seen is 4096, if one or more // emitters try to create more than that, many will not be seen, and it may cause // viewer lag. Use as few particles as you can for your effect: // AGE/RATE * COUNT will tell you approximately how many particles your emitter creates. // // SRC_MAX_AGE: emitter auto shut-off timer. 1.0 to 60.0 seconds. 0.0 = never stop. (default) //============================= Placement Parameters ============================= // // PATTERN: // DROP, ignores all other placement settings. // EXPLODE, spray particles in all directions // ANGLE, sprays a flat &quot;fan&quot; shape defined by ANGLE_BEGIN and END values // CONE, sprays &quot;ring&quot; or &quot;cone&quot; shapes defined by ANGLE_BEGIN and END values // // RADIUS: 0.0 to 50.0? distance from emitter to create new particles // (RADIUS is disabled with DROP pattern and the FOLLOW_SRC &amp; TARGET_LINEAR options) // // SPEED: 0.00 to 50.0? Sets min/max starting velocities for non-drop patterns. (default: 1.0) // // ANGLE_BEGIN &amp; END: 0.00*PI (up) to 1.00*PI (down), (Only for ANGLE &amp; CONE patterns) // (Values work much like the Sphere-prim&#039;s DIMPLE attributes.) (defaults: 0.0) // // OMEGA: &lt;x,y,z&gt; Sets how much to rotate angle/cone spray direction after // every burst. 0.0 to PI? (default: &lt;0,0,0&gt;) //======================== After-Effects &amp; Influence Parameters ================ // // ACCEL, x,y,z 0.0 to 50.0? sets a constant force, (affects all patterns) // Causes particles to drift up/down or in a compass direction. // Use ACCEL to create the illusion of (anti-)gravity or a directional wind. // (ineffective with TARGET_LINEAR option) // // TARGET_KEY, &quot;key&quot;, (requires the TARGET option be enabled). // &quot;key&quot; can be a variety of many different things: // llGetOwner() // llGetKey() target self // llGetLinkKey(1) target parent prim // llGetLinkKey(llGetLinkNum() + 1) target next prim in link set // // WARNING: New copies of objects get new keys, you can&#039;t simply paste // a prim&#039;s key into your script and expect it to always work. Visit // the Particle Laboratory&#039;s section on TARGETS for a variety of ways // to dynamically find your target&#039;s key. There are different &#039;best ways&#039; // depending on if your target is linked to your emitter or not. //============================= About Options ============================= // // Each option may be ON/ENABLED (no leading // ) // or OFF/DISABLED (by putting a // in front of it.) // Options are combined together in a special way, (using the | symbol). // This creates one single Parameter for PSYS_PART_FLAGS. //============================= Texture Options ============================= // // EMISSIVE: identical to &quot;full bright&quot; setting on prims // // FOLLOW_VELOCITY: particle texture &#039;tilts&#039; towards the direction it&#039;s moving // // INTERP_COLOR: causes particle COLOR and ALPHA(transparency) to change over it&#039;s lifespan // // INTERP_SCALE: causes particle SCALE(size) to change over it&#039;s lifespan //======================== After-Effects &amp; Influences Options ================ // // BOUNCE: particles bounce up from the z-altitude of emitter, and cannot fall below it. // // WIND: the sim&#039;s wind will push particles around // // FOLLOW_SRC: makes particles move (but not rotate) if their emitter moves, (disables RADIUS) // // TARGET_POS: causes particles to arrive at a some target at end of of their lifespan. // // TARGET_LINEAR: forces particles to form into an even line from emitter to target // and forces a DROP-like pattern and disables effects of WIND and ACCEL //======================================================================== //======================== USING CONTROL TEMPLATES ======================= // // Want to control when your particles turn ON and OFF? You can! // // Drop one (or more) of the CONTROL TEMPLATES from the particle laboratory // into your object containing this script. That&#039;s it! // Your controls should be effective immediately. (Some controllers can be // adjusted and tuned, open them and read the USAGE notes to see.) // // One control template can control several particle templates in the // same object. (keep in mind that each prim can only have ONE // particle effect active at a time). // // The &#039;particle_effect_name&#039; value must be the same in both the control // and particle template to work. You can change that value and have // a controller for one effect, and a different controller for a different // effect in the same object. // //======================================== END ===============================default</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:40 +0000 Give Item http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/give_item?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="give_item">Give Item</h2> <div class="level2"> <pre class="code">// Idea and written by Criz Collins // Don&#039;t sell this FREE script!!! string giveitem = &quot;Willkommen&quot;; float giveevery = 24; // hours! ///////////////////////////////////////////// list visitors; list lastsent; integer n; default { on_rez( integer param ) { llResetScript(); } changed(integer change) { if (change &amp; CHANGED_INVENTORY) { llResetScript(); } } touch_start(integer total_number) { for (n=0; n&lt;total_number; n++) { integer giveallowed = 0; integer index = llListFindList( visitors, [ llDetectedKey(n) ] ); if (index == -1) { visitors = visitors + [ llDetectedKey(n) ]; lastsent = lastsent + [(integer)llGetUnixTime()]; giveallowed = 1; } else { if (llList2Integer(lastsent, index) &lt;= ((integer)llGetUnixTime() - (giveevery * 60 * 60))) { list replacer = [(integer)llGetUnixTime()]; list newlastsent = llListReplaceList(lastsent, replacer, index, index); lastsent = []; lastsent = newlastsent; giveallowed = 1; } else { giveallowed = 0; } } if (giveallowed == 1) { llGiveInventory(llDetectedKey(n), giveitem); } } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +0000 Pacman http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/pacman?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="pacman">Pacman</h2> <div class="level2"> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Pacman&quot;,&quot;hid&quot;:&quot;pacman&quot;,&quot;codeblockOffset&quot;:0,&quot;secid&quot;:1,&quot;range&quot;:&quot;1-20&quot;} --> <h3 class="sectionedit2" id="game">Game</h3> <div class="level3"> <pre class="code">// open pacman game server script by kefcom belgium (kefcom@hotmail.com) string currentplayer; integer score; integer maxscore; integer timesplayed; integer timecounter; string playername1; string playername2; string playername3; string playername4; string playername5; integer playerscore1; integer playerscore2; integer playerscore3; integer playerscore4; integer playerscore5; integer maxtime; default { state_entry() { ////////////////////////////////////////////////////////////////////////////////////// maxscore = 137; //change this value to the number of balls you have on the field maxtime = 500; ///////////////////////////////////////////////////////////////////////////////////// playername1 = &quot;nobody&quot;; playername2 = &quot;nobody&quot;; playername3 = &quot;nobody&quot;; playername4 = &quot;nobody&quot;; playername5 = &quot;nobody&quot;; playerscore1 = 300; playerscore2 = 300; playerscore3 = 300; playerscore4 = 300; playerscore5 = 300; timesplayed = 0; score = 0; llSetText(&quot;Game Server&quot;, &lt;1,1,1&gt;,1.0); llListen(1966, &quot;&quot;,&quot;&quot;,&quot;&quot;); } listen( integer channel, string name, key id, string msg) { if(msg==&quot;STOP&quot;) { llSetTimerEvent(0); llSay(0, &quot;Game stopped!&quot;); timecounter = 0; score = 0; currentplayer = &quot;nobody&quot;; llSetText(&quot;Game Server, click for stats&quot;, &lt;1,1,1&gt;,1.0); } if(msg==&quot;START&quot;) { score = 0; llSetText(&quot;Score: &quot; + (string) score, &lt;1,1,1&gt;, 1.0); currentplayer = name; timecounter = 0; timesplayed = timesplayed + 1; llSetTimerEvent(1); } if(msg==&quot;POINTS!&quot;) { score = score + 1; llSetText(&quot;Score: &quot; + (string) score, &lt;1,1,1&gt;, 1.0); if(score &gt;= maxscore) { //GAME OVER! llShout(0, &quot;Game over&quot;); llSetTimerEvent(0); llShout(0, &quot;You needed &quot; + (string) timecounter + &quot; Seconds to complete the game!&quot;); llSetText(&quot;Game Server, Click me for stats&quot;, &lt;1,1,1&gt;, 1.0); /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// CALCULATE PLACE IN TOP 5 //////////////////////////////////////// //////////////////////////////////////////////////////////////////////////////////////////// if(timecounter &lt; playerscore5) { if(timecounter &lt; playerscore4) { if(timecounter &lt; playerscore3) { if(timecounter &lt; playerscore2) { if(timecounter &lt; playerscore1) { //first place playerscore5 = playerscore4; playerscore4 = playerscore3; playerscore3 = playerscore2; playerscore2 = playerscore1; playerscore1 = timecounter; playername5 = playername4; playername4 = playername3; playername3 = playername2; playername2 = playername1; playername1 = currentplayer; llSay(0, &quot;You are in first place on the scoreboard!&quot;); }else{ //second place playerscore5 = playerscore4; playerscore4 = playerscore3; playerscore3 = playerscore2; playerscore2 = timecounter; playername5 = playername4; playername4 = playername3; playername3 = playername2; playername2 = currentplayer; llSay(0, &quot;You are in second place on the scoreboard!&quot;); } }else{ //third place playerscore5 = playerscore4; playerscore4 = playerscore3; playerscore3 = timecounter; playername5 = playername4; playername4 = playername3; playername3 = currentplayer; llSay(0, &quot;You are in third place on the scoreboard!&quot;); } }else{ //fourth place playerscore5 = playerscore4; playerscore4 = timecounter; playername5 = playername4; playername4 = currentplayer; llSay(0, &quot;You are in fourth place on the scoreboard!&quot;); } }else{ //fifth place playerscore5 = timecounter; playername5 = currentplayer; llSay(0, &quot;You are in fifth place on the scoreboard!&quot;); } }else{ llSay(0, &quot;You were not fast enough to get on the scoreboard&quot;); } } } } touch_start(integer numdetected) { //TYPE SCORE LIST!!! llSay(0, &quot;SCORE LIST:&quot;); llSay(0, &quot;1. &quot; + playername1 + &quot; - &quot; + (string) playerscore1 + &quot; seconds.&quot;); llSay(0, &quot;2. &quot; + playername2 + &quot; - &quot; + (string) playerscore2 + &quot; seconds.&quot;); llSay(0, &quot;3. &quot; + playername3 + &quot; - &quot; + (string) playerscore3 + &quot; seconds.&quot;); llSay(0, &quot;4. &quot; + playername4 + &quot; - &quot; + (string) playerscore4 + &quot; seconds.&quot;); llSay(0, &quot;5. &quot; + playername5 + &quot; - &quot; + (string) playerscore5 + &quot; seconds.&quot;); llSay(0, &quot;Game has been played &quot; + (string) timesplayed + &quot; times since reset&quot;); } timer() { timecounter = timecounter + 1; if(timecounter &gt;= maxtime) { llShout(1966, &quot;STOP&quot;); llSay (0, &quot;Game over due to timeout...&quot;); llSetTimerEvent(0); llSetText(&quot;Game Server, Touch for stats&quot;, &lt;1,1,1&gt;, 1.0); } } }</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Game&quot;,&quot;hid&quot;:&quot;game&quot;,&quot;codeblockOffset&quot;:0,&quot;secid&quot;:2,&quot;range&quot;:&quot;21-6350&quot;} --> <h3 class="sectionedit3" id="yellow_balls">Yellow Balls</h3> <div class="level3"> <pre class="code">// open pacman game server script by kefcom belgium (kefcom@hotmail.com) string currentplayer; integer score; integer maxscore; integer timesplayed; integer timecounter; string playername1; string playername2; string playername3; string playername4; string playername5; integer playerscore1; integer playerscore2; integer playerscore3; integer playerscore4; integer playerscore5; integer maxtime; default { state_entry() { ////////////////////////////////////////////////////////////////////////////////////// maxscore = 137; //change this value to the number of balls you have on the field maxtime = 500; ///////////////////////////////////////////////////////////////////////////////////// playername1 = &quot;nobody&quot;; playername2 = &quot;nobody&quot;; playername3 = &quot;nobody&quot;; playername4 = &quot;nobody&quot;; playername5 = &quot;nobody&quot;; playerscore1 = 300; playerscore2 = 300; playerscore3 = 300; playerscore4 = 300; playerscore5 = 300; timesplayed = 0; score = 0; llSetText(&quot;Game Server&quot;, &lt;1,1,1&gt;,1.0); llListen(1966, &quot;&quot;,&quot;&quot;,&quot;&quot;); } listen( integer channel, string name, key id, string msg) { if(msg==&quot;STOP&quot;) { llSetTimerEvent(0); llSay(0, &quot;Game stopped!&quot;); timecounter = 0; score = 0; currentplayer = &quot;nobody&quot;; llSetText(&quot;Game Server, click for stats&quot;, &lt;1,1,1&gt;,1.0); } if(msg==&quot;START&quot;) { score = 0; llSetText(&quot;Score: &quot; + (string) score, &lt;1,1,1&gt;, 1.0); currentplayer = name; timecounter = 0; timesplayed = timesplayed + 1; llSetTimerEvent(1); } if(msg==&quot;POINTS!&quot;) { score = score + 1; llSetText(&quot;Score: &quot; + (string) score, &lt;1,1,1&gt;, 1.0); if(score &gt;= maxscore) { //GAME OVER! llShout(0, &quot;Game over&quot;); llSetTimerEvent(0); llShout(0, &quot;You needed &quot; + (string) timecounter + &quot; Seconds to complete the game!&quot;); llSetText(&quot;Game Server, Click me for stats&quot;, &lt;1,1,1&gt;, 1.0); /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// CALCULATE PLACE IN TOP 5 //////////////////////////////////////// //////////////////////////////////////////////////////////////////////////////////////////// if(timecounter &lt; playerscore5) { if(timecounter &lt; playerscore4) { if(timecounter &lt; playerscore3) { if(timecounter &lt; playerscore2) { if(timecounter &lt; playerscore1) { //first place playerscore5 = playerscore4; playerscore4 = playerscore3; playerscore3 = playerscore2; playerscore2 = playerscore1; playerscore1 = timecounter; playername5 = playername4; playername4 = playername3; playername3 = playername2; playername2 = playername1; playername1 = currentplayer; llSay(0, &quot;You are in first place on the scoreboard!&quot;); }else{ //second place playerscore5 = playerscore4; playerscore4 = playerscore3; playerscore3 = playerscore2; playerscore2 = timecounter; playername5 = playername4; playername4 = playername3; playername3 = playername2; playername2 = currentplayer; llSay(0, &quot;You are in second place on the scoreboard!&quot;); } }else{ //third place playerscore5 = playerscore4; playerscore4 = playerscore3; playerscore3 = timecounter; playername5 = playername4; playername4 = playername3; playername3 = currentplayer; llSay(0, &quot;You are in third place on the scoreboard!&quot;); } }else{ //fourth place playerscore5 = playerscore4; playerscore4 = timecounter; playername5 = playername4; playername4 = currentplayer; llSay(0, &quot;You are in fourth place on the scoreboard!&quot;); } }else{ //fifth place playerscore5 = timecounter; playername5 = currentplayer; llSay(0, &quot;You are in fifth place on the scoreboard!&quot;); } }else{ llSay(0, &quot;You were not fast enough to get on the scoreboard&quot;); } } } } touch_start(integer numdetected) { //TYPE SCORE LIST!!! llSay(0, &quot;SCORE LIST:&quot;); llSay(0, &quot;1. &quot; + playername1 + &quot; - &quot; + (string) playerscore1 + &quot; seconds.&quot;); llSay(0, &quot;2. &quot; + playername2 + &quot; - &quot; + (string) playerscore2 + &quot; seconds.&quot;); llSay(0, &quot;3. &quot; + playername3 + &quot; - &quot; + (string) playerscore3 + &quot; seconds.&quot;); llSay(0, &quot;4. &quot; + playername4 + &quot; - &quot; + (string) playerscore4 + &quot; seconds.&quot;); llSay(0, &quot;5. &quot; + playername5 + &quot; - &quot; + (string) playerscore5 + &quot; seconds.&quot;); llSay(0, &quot;Game has been played &quot; + (string) timesplayed + &quot; times since reset&quot;); } timer() { timecounter = timecounter + 1; if(timecounter &gt;= maxtime) { llShout(1966, &quot;STOP&quot;); llSay (0, &quot;Game over due to timeout...&quot;); llSetTimerEvent(0); llSetText(&quot;Game Server, Touch for stats&quot;, &lt;1,1,1&gt;, 1.0); } } }</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Yellow Balls&quot;,&quot;hid&quot;:&quot;yellow_balls&quot;,&quot;codeblockOffset&quot;:1,&quot;secid&quot;:3,&quot;range&quot;:&quot;6351-12688&quot;} --> <h3 class="sectionedit4" id="start_button">Start Button</h3> <div class="level3"> <pre class="code">// open pacman game by kefcom belgium (kefcom@hotmail.com) default { state_entry() { llSetText(&quot;Klick me to play&quot;, &lt;1,1,1&gt;,1.0); } touch_start(integer num_detected) { llDialog(llDetectedKey(0), &quot;Press Start to play&quot;, [&quot;START&quot;, &quot;STOP&quot;],1966); } }</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Start Button&quot;,&quot;hid&quot;:&quot;start_button&quot;,&quot;codeblockOffset&quot;:2,&quot;secid&quot;:4,&quot;range&quot;:&quot;12689-&quot;} --> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +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 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 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 Visitor List Recorder http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/visitor_list_recorder?do=revisions&rev=1575021525 <h2 class="sectionedit1" id="visitor_list_recorder">Visitor List Recorder</h2> <div class="level2"> <pre class="code">// Global variables list visitor_list; float range = 10.0; // in meters float rate = 1.0; // in seconds // Functions integer isNameOnList( string name ) { integer len = llGetListLength( visitor_list ); integer i; for( i = 0; i &lt; len; i++ ) { if( llList2String(visitor_list, i) == name ) { return TRUE; } } return FALSE; } // States default { state_entry() { llSay(0, &quot;Visitor List Maker started...&quot;); llSay(0, &quot;The owner can say &#039;help&#039; for instructions.&quot;); llSensorRepeat( &quot;&quot;, &quot;&quot;, AGENT, range, TWO_PI, rate ); llListen(0, &quot;&quot;, llGetOwner(), &quot;&quot;); } sensor( integer number_detected ) { integer i; for( i = 0; i &lt; number_detected; i++ ) { if( llDetectedKey( i ) != llGetOwner() ) { string detected_name = llDetectedName( i ); if( isNameOnList( detected_name ) == FALSE ) { visitor_list += detected_name; } } } } listen( integer channel, string name, key id, string message ) { if( id != llGetOwner() ) { return; } if( message == &quot;help&quot; ) { llSay( 0, &quot;This object records the names of everyone who&quot; ); llSay( 0, &quot;comes within &quot;+ (string)range + &quot; meters.&quot; ); llSay( 0, &quot;Commands the owner can say:&quot; ); llSay( 0, &quot;&#039;help&#039; - Shows these instructions.&quot; ); llSay( 0, &quot;&#039;say list&#039; - Says the names of all visitors on the list.&quot;); llSay( 0, &quot;&#039;reset list&#039; - Removes all the names from the list.&quot; ); } else if( message == &quot;say list&quot; ) { llSay( 0, &quot;Visitor List:&quot; ); integer len = llGetListLength( visitor_list ); integer i; for( i = 0; i &lt; len; i++ ) { llSay( 0, llList2String(visitor_list, i) ); } llSay( 0, &quot;Total = &quot; + (string)len ); } else if( message == &quot;reset list&quot; ) { visitor_list = llDeleteSubList(visitor_list, 0, llGetListLength(visitor_list)); llSay( 0, &quot;Done resetting.&quot;); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:45 +0000 Webimage http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/webimage?do=revisions&rev=1575021525 <h2 class="sectionedit1" id="webimage">Webimage</h2> <div class="level2"> <pre class="code">default { state_entry() { llSay( 0, &quot;osSetDynamicTextureURL Tester&quot;); } touch_start(integer total_number) { llSay( 0, &quot;Testing.&quot;); string dynamicID=&quot;&quot;; integer refreshRate = 600; string contentType=&quot;image&quot;; string srcURL = &quot;http://www.yoururlgoeshere.com&quot;; // URL string URLTexture=osSetDynamicTextureURL(dynamicID, contentType ,srcURL , &quot;&quot;, refreshRate ); if (llStringLength(URLTexture)&gt;0) { llSay(0,&quot;URLTexture = &quot;+URLTexture); llSetTexture(URLTexture, ALL_SIDES); } } }</pre> <p> oder </p> <pre class="code">default { state_entry() { llSay( 0, &quot;osSetDynamicTextureURL Tester&quot;); } touch_start(integer total_number) { llSay( 0, &quot;Testing.&quot;); string dynamicID=&quot;&quot;; integer refreshRate = 600; string contentType=&quot;image&quot;; string srcURL1 = &quot;http://www.goes.noaa.gov/FULLDISK/GEVS.JPG&quot;; // Earth string srcURL2 = &quot;http://www.srh.noaa.gov/data/satellite/thumbs/ECI8.JPG&quot;; // US Weather string srcURL = &quot;http://ichart.finance.yahoo.com/b?s=%5EGSPC&quot;; // Stock market string URLTexture=osSetDynamicTextureURL(dynamicID, contentType ,srcURL , &quot;&quot;, refreshRate ); if (llStringLength(URLTexture)&gt;0) { llSay(0,&quot;URLTexture = &quot;+URLTexture); llSetTexture(URLTexture, ALL_SIDES); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:45 +0000 Avatar UUID http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/avatar_uuid?do=revisions&rev=1575021518 <h2 class="sectionedit1" id="avatar_uuid">Avatar UUID</h2> <div class="level2"> <pre class="code">default { state_entry() { llSetText(&quot;Touch me\nand I&#039;ll say\nyour UUID\n\n&quot;, &lt;1.0,1.0,1.0&gt;,1.0); llSetObjectName(&quot;UUID Speaker&quot;); } touch_start(integer total_number) { llSay(0, llDetectedName(0) + &quot;: &quot; + (string)llDetectedKey(0)); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:38 +0000 Basic Dialog http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/basic_dialog?do=revisions&rev=1575021518 <h2 class="sectionedit1" id="basic_dialog">Basic Dialog</h2> <div class="level2"> <pre class="code">// Basic dialog script integer CHANNEL = 42; // dialog channel list MENU_MAIN = [&quot;Color&quot;, &quot;Alpha&quot;]; // the main menu list MENU_OPTIONS = [&quot;Red&quot;, &quot;Green&quot;, &quot;Blue&quot;, &quot;...Back&quot;]; // a submenu list MENU_ALPHA = [&quot;Clear&quot;, &quot;Translucent&quot;, &quot;Opaque&quot;, &quot;...Back&quot;]; default { state_entry() { llListen(CHANNEL, &quot;&quot;, NULL_KEY, &quot;&quot;); // listen for dialog answers (from multiple users) llSetText(&quot;Dialog Test&quot;,&lt;1,1,1&gt;,1.0); } touch_start(integer total_number) { llDialog(llDetectedKey(0), &quot;What do you want to do?&quot;, MENU_MAIN, CHANNEL); // present dialog on click } listen(integer channel, string name, key id, string message) { if (message == &quot;Color&quot;) { llDialog(id, &quot;Pick a color&quot;, MENU_OPTIONS, CHANNEL); // present submenu on request } else if (message == &quot;Alpha&quot;) { llDialog(id, &quot;Pick alpha&quot;, MENU_ALPHA, CHANNEL); } else if (message == &quot;...Back&quot;) { llDialog(id, &quot;Select option&quot;, MENU_MAIN, CHANNEL); // present main menu on request to go back } else if (message == &quot;Red&quot;) { llSetColor(&lt;1,0,0&gt;,ALL_SIDES); } else if (message == &quot;Green&quot;) { llSetColor(&lt;0,1,0&gt;,ALL_SIDES); } else if (message == &quot;Blue&quot;) { llSetColor(&lt;0,0,1&gt;,ALL_SIDES); } else if (message == &quot;Clear&quot;) { llSetAlpha(0.0, ALL_SIDES); } else if (message == &quot;Translucent&quot;) { llSetAlpha(0.5, ALL_SIDES); } else if (message == &quot;Opaque&quot;) { llSetAlpha(1.0, ALL_SIDES); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:38 +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 Briefkasten http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/briefkasten?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="briefkasten">Briefkasten</h2> <div class="level2"> <p> Per Notecard eine Nachricht hinterlassen die per E-Mail zugestellt wird. </p> <pre class="code">default { state_entry() { llSetText(&quot;Bitte ziehe Deine Nachricht von Deinem Inventar auf den Briefkasten&quot;,&lt;1,1,1&gt;,1); llAllowInventoryDrop(TRUE); llSay(0, &quot;Please drag your Notecard from your Inventory to the Mailbox.&quot;); } changed(integer mask) { if(mask &amp; (CHANGED_ALLOWED_DROP | CHANGED_INVENTORY)) llWhisper(0, &quot;Thank you for submitting your Notecard ! Danke fuer Deine Nachricht !&quot;); integer count = llGetInventoryNumber(INVENTORY_NOTECARD); llInstantMessage(llGetOwner(), &quot;Sie haben &quot;+(string) count +&quot; neue Nachrichten&quot;); llEmail(&quot;adresse@domain.xyz&quot;, &quot;E-Mail von OpenSim&quot;, &quot;Sie haben &quot;+(string) count +&quot; neue Nachrichten&quot;); } } </pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +0000 Dimmen http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/dimmen?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="dimmen">Dimmen</h2> <div class="level2"> <p> Mit dem diesem Script kann ein Objekt generiert werden dass bei Berührung ein Menü öffnet und mit dem dann die Transparanz anderer Objekte kontrolliert werden kann. </p> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Dimmen&quot;,&quot;hid&quot;:&quot;dimmen&quot;,&quot;codeblockOffset&quot;:0,&quot;secid&quot;:1,&quot;range&quot;:&quot;1-189&quot;} --> <h3 class="sectionedit2" id="kontrollobjekt">Kontrollobjekt</h3> <div class="level3"> <p> Dieses Script muss in das Objekt, das quasi als Fernbedienung dienen soll. Die Namen werden dabei im Array WALL_OPTIONS festgelegt. </p> <pre class="code">// 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. // // (C) 2007 Abba Thiebaud&gt;SecondLifer // Please remember, I do not offer support for this script; your use of // this script is your acknowledgement and agreement to the above // terms. // // DO NOT REMOVE THE ABOVE HEADER FOR ANY REASON WHATSOEVER. // Window Controller Script (put into controller prim) list TINT_OPTIONS = [&quot;40%&quot;, &quot;20%&quot;, &quot;None&quot;, &quot;100%&quot;, &quot;80%&quot;, &quot;60%&quot;]; list WALL_OPTIONS = [&quot;Lower Front&quot;, &quot;Lower Back&quot;, &quot;Lower Sides&quot;, &quot;Upper Front&quot;, &quot;Upper Back&quot;, &quot;Upper Sides&quot;, &quot;Ceiling&quot;, &quot;All&quot;]; integer UPPER_FRONT = -28394; integer LOWER_FRONT = -28395; integer UPPER_BACK = -28396; integer LOWER_BACK = -28397; integer UPPER_SIDE = -28398; integer LOWER_SIDE = -28399; integer CEILING = -28400; integer CHANNEL = -28393; integer wallChannel; integer allWalls; PaintAllWalls(string tintLevel) { integer i; integer j; j = -28394; for (i = 0; i &lt; 7; i++) { llSay(j, tintLevel); j--; } // end for } // end PaintAllWalls default { state_entry() { llListen(CHANNEL, &quot;&quot;, NULL_KEY, &quot;&quot;); // listen for dialog answers (from multiple users) } // end state_entry() touch_start(integer total_number) { llDialog(llDetectedKey(0), &quot;Which wall would you like to tint?&quot;, WALL_OPTIONS, CHANNEL); // present dialog on click allWalls = 0; } // end touch_start() listen(integer channel, string name, key id, string message) { if (llListFindList(TINT_OPTIONS + WALL_OPTIONS, [message]) != -1) // verify dialog choice { if (message == &quot;Upper Front&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = UPPER_FRONT; } else if (message == &quot;Upper Back&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = UPPER_BACK; } else if (message == &quot;Upper Sides&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = UPPER_SIDE; } else if (message == &quot;Lower Front&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = LOWER_FRONT; } else if (message == &quot;Lower Back&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = LOWER_BACK; } else if (message == &quot;Lower Sides&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = LOWER_SIDE; } else if (message == &quot;Ceiling&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); wallChannel = CEILING; } else if(message == &quot;All&quot;) { llDialog(id, &quot;How much tint would you like?&quot;, TINT_OPTIONS, CHANNEL); allWalls = 1; } if (message == &quot;100%&quot;) { if(allWalls == 1) { PaintAllWalls(&quot;100&quot;); } else { llSay(wallChannel, &quot;100&quot;); } } else if (message == &quot;80%&quot;) { if(allWalls == 1) { PaintAllWalls(&quot;80&quot;); } else { llSay(wallChannel, &quot;80&quot;); } } else if (message == &quot;60%&quot;) { if(allWalls == 1) { PaintAllWalls(&quot;60&quot;); } else { llSay(wallChannel, &quot;60&quot;); } } else if (message == &quot;40%&quot;) { if(allWalls == 1) { PaintAllWalls(&quot;40&quot;); } else { llSay(wallChannel, &quot;40&quot;); } } else if (message == &quot;20%&quot;) { if(allWalls == 1) { PaintAllWalls(&quot;20&quot;); } else { llSay(wallChannel, &quot;20&quot;); } } else if (message == &quot;None&quot;) { if(allWalls == 1) { PaintAllWalls(&quot;0&quot;); } else { llSay(wallChannel, &quot;0&quot;); } } } // end if (valid message) } // end listen } // end default</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Kontrollobjekt&quot;,&quot;hid&quot;:&quot;kontrollobjekt&quot;,&quot;codeblockOffset&quot;:0,&quot;secid&quot;:2,&quot;range&quot;:&quot;190-5776&quot;} --> <h3 class="sectionedit3" id="dimm-objekt">Dimm-Objekt</h3> <div class="level3"> <p> Dieses Script muss in alle wählbaren Objekte. Dabei muss ein Channel durch Entfernen des Platzhalters aktiviert werden, wodurch das Objekt durch das Kontrollscript ansprechbar wird. </p> <pre class="code">//Here the target aka Windows, put this script into them. //integer chan = -28394; // uncomment for UPPER_FRONT //integer chan = -28395; // uncomment for LOWER_FRONT //integer chan = -28396; // uncomment for UPPER_BACK //integer chan = -28397; // uncomment for LOWER_BACK //integer chan = -28398; // uncomment for UPPER_SIDE //integer chan = -28399; // uncomment for LOWER_SIDE //integer chan = -28400; // uncomment for CEILING default { state_entry() { llListen(chan, &quot;&quot;, NULL_KEY, &quot;&quot; ); } listen( integer channel, string name, key id, string message ) { if ( message == &quot;100&quot; ) { llSetAlpha(1.0, ALL_SIDES); } else if ( message == &quot;80&quot; ) { llSetAlpha(0.8, ALL_SIDES); } else if ( message == &quot;60&quot; ) { llSetAlpha(0.6, ALL_SIDES); } else if ( message == &quot;40&quot; ) { llSetAlpha(0.4, ALL_SIDES); } else if ( message == &quot;20&quot; ) { llSetAlpha(0.2, ALL_SIDES); } else if ( message == &quot;0&quot; ) { llSetAlpha(0.0, ALL_SIDES); } } }</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Dimm-Objekt&quot;,&quot;hid&quot;:&quot;dimm-objekt&quot;,&quot;codeblockOffset&quot;:1,&quot;secid&quot;:3,&quot;range&quot;:&quot;5777-&quot;} --> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +0000 Door http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/door?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="door">Door</h2> <div class="level2"> <p> Mit diesem Script kann man Türen öffnen und schliessen. </p> <pre class="code">//door script vector gPos; default { state_entry() { llSetRot(llEuler2Rot(&lt;0,0,0&gt;)); } touch_start(integer total_number) { gPos = llGetPos(); llSetRot(llEuler2Rot(&lt;0,0,PI/2&gt;)); llSetTimerEvent(2.0); } timer() { llResetScript(); llSetPos(gPos); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +0000 Dynamic Texture http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/dynamic_texture?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="dynamic_texture">Dynamic Texture</h2> <div class="level2"> <p> Dieses Script kann Bilder im Format bmp, gif und jpg auf Webseiten auf Prims abbilden. Die URL´s der Bilder können im Script leicht an die persönlichen Bedürfnisse angepasst werden. Mit Klick auf das Prim werden die Bilder angezeigt. Lässt sich beispielsweise für Webcams gut nutzen. </p> <pre class="code">//cs // kinoc test script // each touch advances to the next picture integer picindex=0; LSL_Types.list urlarray = [] ; public void default_event_state_entry() { llSay( 0, &quot;cs osSetDynamicTextureURL Tester&quot;); urlarray.Add(&quot;http://www.goes.noaa.gov/FULLDISK/GEVS.JPG&quot;); urlarray.Add(&quot;http://www.goes.noaa.gov/FULLDISK/MTVS.JPG&quot;); urlarray.Add(&quot;http://www.goes.noaa.gov/FULLDISK/GIVS.JPG&quot;); urlarray.Add(&quot;http://www.goes.noaa.gov/FULLDISK/GMVS.JPG&quot;); urlarray.Add(&quot;http://www.osei.noaa.gov/IOD/OSEIiod.jpg&quot;); urlarray.Add(&quot;http://internettrafficreport.com/gifs/tr_map_global.gif&quot;); } public void default_event_touch_start(integer total_number) { llSay( 0, &quot;Fetching.&quot;); string dynamicID=&quot;&quot;; integer refreshRate = 600; string contentType=&quot;image&quot;; picindex = (picindex+1) % urlarray.Length; string srcURL = urlarray.GetSublist(picindex,picindex).ToString(); // URL string URLTexture=osSetDynamicTextureURL(dynamicID, contentType ,srcURL , &quot;&quot;, refreshRate ); if (llStringLength(URLTexture)&gt;0) { llSay(0,&quot;URLTexture = &quot;+srcURL); llSetTexture(URLTexture, ALL_SIDES); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +0000 Elevator http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/elevator?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="elevator">Elevator</h2> <div class="level2"> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Elevator&quot;,&quot;hid&quot;:&quot;elevator&quot;,&quot;codeblockOffset&quot;:0,&quot;secid&quot;:1,&quot;range&quot;:&quot;1-22&quot;} --> <h3 class="sectionedit2" id="elevator_main_script">Elevator Main Script</h3> <div class="level3"> <pre class="code">// From the book: // // Scripting Recipes for Second Life // by Jeff Heaton (Encog Dod in SL) // ISBN: 160439000X // Copyright 2007 by Heaton Research, Inc. // // This script may be freely copied and modified so long as this header // remains unmodified. // // For more information about this book visit the following web site: // // http://www.heatonresearch.com/articles/series/22/ integer CHANNEL = 42; // dialog channel list MENU_MAIN = [&quot;Floor 1&quot;, &quot;Floor 2&quot;, &quot;Floor 3&quot;, &quot;Floor 4&quot;, &quot;Floor 5&quot;, &quot;Floor 6&quot;, &quot;Floor 7&quot;, &quot;Floor 8&quot;, &quot;Floor 9&quot;, &quot;Floor 10&quot;,&quot;Roof&quot;]; // the main menu float BOTTOM = 22.260; float FLOOR_HEIGHT = 10; float SPEED = 2; float target; default { state_entry() { llListen(CHANNEL, &quot;&quot;, NULL_KEY, &quot;&quot;); // listen for dialog answers (from multiple users) llSitTarget(&lt;0,-0.5,0.5&gt;, llEuler2Rot(&lt;0,0,-90&gt;) ); llSetText(&quot;Sit Here to Ride Elevator&quot;,&lt;0,0,0&gt;,1.0); target = BOTTOM; } listen(integer channel, string name, key id, string message) { integer idx = llListFindList(MENU_MAIN, [message]); if( idx!=-1 ) { llSay(0,&quot;Elevator heading to &quot; + message + &quot;.&quot; ); target = BOTTOM + (idx*10); state moving; } } changed(integer Change) { llDialog(llAvatarOnSitTarget(), &quot;Where to?&quot;, MENU_MAIN, CHANNEL); } } state moving { state_entry() { llSetTimerEvent(0.1); } timer() { vector pos = llGetPos(); if( pos.z!=target ) { if( pos.z&gt;target ) { pos.z = pos.z - SPEED; } else { pos.z = pos.z + SPEED; } } if( llFabs(pos.z - target) &lt; SPEED ) { pos.z = target; llSetTimerEvent(0); llSetPos(pos); llSay(0,&quot;Elevator has reached its target.&quot; ); state default; } llSetPos(pos); } }</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Elevator Main Script&quot;,&quot;hid&quot;:&quot;elevator_main_script&quot;,&quot;codeblockOffset&quot;:0,&quot;secid&quot;:2,&quot;range&quot;:&quot;23-2117&quot;} --> <h3 class="sectionedit3" id="elevator_call_button">Elevator Call Button</h3> <div class="level3"> <pre class="code">integer CHANNEL = 42; // dialog channel default { state_entry() { llSetText(&quot;Touch to Call Elevator&quot;,&lt;0,0,0&gt;,1.0); } touch_start(integer total_number) { llRegionSay(42, &quot;Floor 1&quot;); } }</pre> </div> <!-- EDIT{&quot;target&quot;:&quot;section&quot;,&quot;name&quot;:&quot;Elevator Call Button&quot;,&quot;hid&quot;:&quot;elevator_call_button&quot;,&quot;codeblockOffset&quot;:1,&quot;secid&quot;:3,&quot;range&quot;:&quot;2118-&quot;} --> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +0000 Follower http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/follower?do=revisions&rev=1575021520 <h2 class="sectionedit1" id="follower">Follower</h2> <div class="level2"> <pre class="code">vector offset = &lt; -1, 0, 1&gt;; //1 meter behind and 1 meter above owner&#039;s center. default { state_entry() { llSetStatus(STATUS_PHYSICS, TRUE); // Little pause to allow server to make potentially large linked object physical. llSleep(0.1); // Look for owner within 20 metres in 360 degree arc every 1 seconds. llSensorRepeat(&quot;&quot;, llGetOwner(), AGENT, 20.0, PI,1.0); } sensor(integer total_number) { // Owner detected... // Get position and rotation vector pos = llDetectedPos(0); rotation rot = llDetectedRot(0); // Offset back one metre in X and up one metre in Z based on world coordinates. // use whatever offset you want. vector worldOffset = offset; // Offset relative to owner needs a quaternion. vector avOffset = offset * rot; pos += avOffset; // use the one you want, world or relative to AV. llMoveToTarget(pos,0.4); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:40 +0000 Load URL http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/load_url?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="load_url">Load URL</h2> <div class="level2"> <p> Durch Anklicken eines Prims eine Webseite öffnen, entweder durch den internen Browser, oder durch den externen Webbrowser. </p> <pre class="code"> //Load URL default { state_entry() { llSleep(0.5); //do something here } touch_start(integer total_number) { llLoadURL(llDetectedKey(0), &quot;Google&quot;, &quot;http://www.google.com&quot;); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +0000 Media Viewer http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/media_viewer?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="media_viewer">Media Viewer</h2> <div class="level2"> <pre class="code">integer Channel = 1; //Command Channel. key Song; key Picture; default { state_entry() { llSetObjectName(&quot;Media Viewer&quot;); Picture = llGetTexture(ALL_SIDES); Song = llGetObjectDesc(); llListen(Channel, &quot;&quot;, NULL_KEY, &quot;&quot;); } touch_start(integer total_number) { llOwnerSay(&quot;\nSay commands on channel &quot; + (string)Channel + &quot;.\nSound: &#039;play &lt;key&gt;&#039;/&#039;stop&#039;\nImage: &#039;show &lt;key&gt;&#039;/&#039;hide&#039;&quot;); } listen(integer channel, string name, key id, string message) { list Cmd = llParseString2List(message, [&quot; &quot;], [&quot;&quot;]); if(llToUpper(llList2String(Cmd, 0)) == &quot;PLAY&quot;) { llStopSound(); if(llList2String(Cmd, 1) != &quot;&quot;) { Song = llList2String(Cmd, 1); llSetObjectDesc(Song); } llLoopSound(Song, 1); } if(llToUpper(llList2String(Cmd, 0)) == &quot;STOP&quot;) { llStopSound(); } if(llToUpper(llList2String(Cmd, 0)) == &quot;SHOW&quot;) { if(llList2String(Cmd, 1) != &quot;&quot;) { Picture = llList2String(Cmd, 1); } llSetTexture(Picture, ALL_SIDES); llSetColor(&lt;1,1,1&gt;, ALL_SIDES); llSetAlpha(1, ALL_SIDES); } if(llToUpper(llList2String(Cmd, 0)) == &quot;HIDE&quot;) { llSetAlpha(0, ALL_SIDES); llSetColor(ZERO_VECTOR, ALL_SIDES); llSetTexture(&quot;5748decc-f629-461c-9a36-a35a221fe21f&quot;, ALL_SIDES); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +0000 Particle System http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/particle_system?do=revisions&rev=1575021522 <h2 class="sectionedit1" id="particle_system">Particle System</h2> <div class="level2"> <pre class="code">//Originally by Ama Omega default { state_entry() { llSleep(1); // Do something.. } touch_start(integer total_number) { // mask flags - set to TRUE (or 1) to enable integer bounce = 0; // Make particles bounce on Z plane of object integer glow = 1; // Make the particles glow integer interpColor = 1; // Go from start to end color integer interpSize = 1; // Go from start to end size integer followSource = 1; // Particles follow the source integer followVel = 1; // Particles turn to velocity direction integer wind = 0; // Particles affected by wind //pattern: //integer pattern = PSYS_SRC_PATTERN_ANGLE; //integer pattern = PSYS_SRC_PATTERN_ANGLE_CONE_EMPTY; //integer pattern = PSYS_SRC_PATTERN_ANGLE_CONE; //integer pattern = PSYS_SRC_PATTERN_DROP; integer pattern = PSYS_SRC_PATTERN_EXPLODE; // Select a target for particles to go towards // &quot;&quot; for no target, &quot;owner&quot; will follow object owner // and &quot;self&quot; will target this object // or put the key of an object for particles to go to //key target = &quot;&quot;; key target = &quot;self&quot;; //key target = &quot;owner&quot;; // particle parameters float age = 20; // Life of each particle float maxSpeed = 1; // Max speed each particle is spit out at float minSpeed = 1; // Min speed each particle is spit out at string texture = &quot;168e6813-096e-07ea-97ae-fd416826f627&quot;; // Texture used for particles float startAlpha = 0; // Start alpha (transparency) value float endAlpha = 1; // End alpha (transparency) value (if interpColor = TRUE) vector startColor = &lt;0,0,1&gt;; // Start color of particles &lt;R,G,B&gt; vector endColor = &lt;1,0,0&gt;; // End color of particles &lt;R,G,B&gt; (if interpColor = TRUE) vector startSize = &lt;1,1,0&gt;; // Start size of particles &lt;x,y&gt; vector endSize = &lt;1,1,0&gt;; // End size of particles (if interpSize == TRUE) vector push = &lt;0,0,0.05f&gt;; // Force pushed on particles // system parameters float life = 0; // Life in seconds for the system to make particles integer count = 10; // How many particles to emit per BURST float rate = 0.03f; // How fast (rate) to emit particles float radius = 0.5; // Radius to emit particles for BURST pattern float outerAngle = 1.54; // Outer angle for all ANGLE patterns float innerAngle = 1.55; // Inner angle for all ANGLE patterns vector omega = &lt;0,0,1&gt;; // Rotation of ANGLE patterns around the source integer flags = 0; if (target == &quot;owner&quot;) target = llGetOwner(); if (target == &quot;self&quot;) target = llGetKey(); if (glow == 1) flags = flags | PSYS_PART_EMISSIVE_MASK; if (bounce == 1) flags = flags | PSYS_PART_BOUNCE_MASK; if (interpColor == 1) flags = flags | PSYS_PART_INTERP_COLOR_MASK; if (interpSize == 1) flags = flags | PSYS_PART_INTERP_SCALE_MASK; if (wind == 1) flags = flags | PSYS_PART_WIND_MASK; if (followSource == 1) flags = flags | PSYS_PART_FOLLOW_SRC_MASK; if (followVel == 1) flags = flags | PSYS_PART_FOLLOW_VELOCITY_MASK; if (target != &quot;&quot;) flags = flags | PSYS_PART_TARGET_POS_MASK; llParticleSystem([ PSYS_PART_MAX_AGE,7, PSYS_PART_FLAGS,flags, PSYS_PART_START_COLOR, startColor, PSYS_PART_END_COLOR, endColor, PSYS_PART_START_SCALE,startSize, PSYS_PART_END_SCALE,endSize, PSYS_SRC_PATTERN, pattern, PSYS_SRC_BURST_RATE,(float)rate, PSYS_SRC_ACCEL, push, PSYS_SRC_BURST_PART_COUNT,count, PSYS_SRC_BURST_RADIUS,(float)radius, PSYS_SRC_BURST_SPEED_MIN,(float)minSpeed, PSYS_SRC_BURST_SPEED_MAX,(float)maxSpeed, PSYS_SRC_TARGET_KEY,target, PSYS_SRC_INNERANGLE,(float)innerAngle, PSYS_SRC_OUTERANGLE,(float)outerAngle, PSYS_SRC_OMEGA, omega, PSYS_SRC_MAX_AGE, (float)life, PSYS_SRC_TEXTURE, texture, PSYS_PART_START_ALPHA, (float)startAlpha, PSYS_PART_END_ALPHA, (float)endAlpha ]); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:42 +0000 Poseball http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/poseball?do=revisions&rev=1575021522 <h2 class="sectionedit1" id="poseball">Poseball</h2> <div class="level2"> <pre class="code">// Jippen Faddoul&#039;s Poseball script - Low ram/lag posepall thats just drag-and drop simple // Copyright (C) 2007 Jippen Faddoul // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License version 3, as // published by the Free Software Foundation. // // 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, see &lt;http://www.gnu.org/licenses/&gt; //This text will appear in the floating title above the ball string TITLE=&quot;Sit here&quot;; //You can play with these numbers to adjust how far the person sits from the ball. ( &lt;X,Y,Z&gt; ) vector offset=&lt;0.0,0.0,0.5&gt;; ///////////////////// LEAVE THIS ALONE \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ string ANIMATION; integer visible = TRUE; key avatar; vector COLOR = &lt;1.0,1.0,1.0&gt;; float ALPHA_ON = 1.0; float ALPHA_OFF = 0.0; show(){ visible = TRUE; llSetText(TITLE, COLOR,ALPHA_ON); llSetAlpha(ALPHA_ON, ALL_SIDES); } hide(){ visible = FALSE; llSetText(&quot;&quot;, COLOR,ALPHA_ON); llSetAlpha(ALPHA_OFF, ALL_SIDES); } default{ state_entry() { llSitTarget(offset,ZERO_ROTATION); if((ANIMATION = llGetInventoryName(INVENTORY_ANIMATION,0)) == &quot;&quot;){ llOwnerSay(&quot;Error: No animation&quot;); ANIMATION = &quot;sit&quot;; } llSetSitText(TITLE); show(); } touch_start(integer detected) { //llOwnerSay(&quot;Memory: &quot; + (string)llGetFreeMemory()); if(visible){ hide(); } else { show(); } } changed(integer change) { if(change &amp; CHANGED_LINK) { avatar = llAvatarOnSitTarget(); if(avatar != NULL_KEY){ //SOMEONE SAT DOWN hide(); llRequestPermissions(avatar,PERMISSION_TRIGGER_ANIMATION); return; }else{ //SOMEONE STOOD UP if (llGetPermissionsKey() != NULL_KEY){ llStopAnimation(ANIMATION); } show(); return; } } if(change &amp; CHANGED_INVENTORY) { llResetScript(); } if(change &amp; CHANGED_OWNER) { llResetScript(); } } run_time_permissions(integer perm) { if(perm &amp; PERMISSION_TRIGGER_ANIMATION) { llStopAnimation(&quot;sit&quot;); llStartAnimation(ANIMATION); hide(); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:42 +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 Skype Online Status http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/skype?do=revisions&rev=1575021523 <h2 class="sectionedit1" id="skype_online_status">Skype Online Status</h2> <div class="level2"> <pre class="code">string skype_handle = &quot;PUT-SKYPE-NAME-HERE&quot;; key skype_request_id = NULL_KEY; // id of http request showStatus(string skype_status) { // build up our message string message = &quot;Skype&quot;; message += &quot;\nName: &quot; + skype_handle; message += &quot;\nStatus: &quot; + skype_status; // write out the message as hovering text llSetText(message, &lt;.5,.5,1&gt;, 1); } default { touch_start(integer total_number) { // make sure owner has specified handle if(skype_handle == &quot;&quot;) { // send message to debugger llWhisper(DEBUG_CHANNEL, &quot;skype_handle can not be empty.&quot;); return; } // prevent extra requests happening at the same time if(skype_request_id != NULL_KEY) return; // make a request over the internet skype_request_id = llHTTPRequest(&quot;http://mystatus.skype.com/&quot; + skype_handle + &quot;.txt&quot;, [HTTP_METHOD, &quot;GET&quot;], &quot;&quot;); // set a timeout for http request llSetTimerEvent(5); } http_response(key request_id, integer status, list metadata, string body) { // is this a response to our request? if(request_id == skype_request_id) { // show status showStatus(body); // change to view state state viewing; } } timer() { // didn&#039;t get a response in time. showStatus(&quot;No Response&quot;); // change to view state state viewing; } } state viewing { state_entry() { // set next timer for 3 minutes llSetTimerEvent(180); } timer() { state default; } state_exit() { // stop the timer llSetTimerEvent(0); // hide the text llSetText(&quot;&quot;, ZERO_VECTOR, 0); // reset the request id skype_request_id = NULL_KEY; } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:43 +0000 Skype Online Status - Multi-User Version http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/skype_multiuser?do=revisions&rev=1575021523 <h2 class="sectionedit1" id="skype_online_status_-_multi-user_version">Skype Online Status - Multi-User Version</h2> <div class="level2"> <pre class="code">// zwischen die Anführungszeichen Deinen Skype-Name einfügen string skype_handle = &quot;&quot;; // you are done! no more changes! key notecode; string notecard; integer noteline; key skype_request_id = NULL_KEY; // id of http request showStatus(string skype_status) { // build up our message string message = &quot;Skype&quot;; message += &quot;\nName: &quot; + skype_handle; message += &quot;\nStatus: &quot; + skype_status; // write out the message as hovering text llSetText(message, &lt;.5,.5,1&gt;, 1); } // AMD64 ADD: readnotecard() liest eine zeile // Im Dataserver Event wird die gewünschte Variable dann gefüllt // Sollte einmal beim rezzen/reseten und Inventory Change durchgeführt werden readnotecard() { // Der name der NC ist egal notecard = llGetInventoryName(INVENTORY_NOTECARD, 0); // Wenn aber keine da ist, setze die Variable auch auf leer und beende das ganze if (notecard == &quot;&quot;) { skype_handle = &quot;&quot;; return; } // Lesen beginnen bei Zeile Null (anfang) noteline = 0; // Ab hier gehts im Dataserver Event weiter notecode = llGetNotecardLine(notecard, noteline); } default { on_rez(integer start_param) { readnotecard(); } state_entry() { llSetTimerEvent(0); readnotecard(); } changed(integer change) { // Änderung im Inventar des Objekts if (change &amp; CHANGED_INVENTORY) { // NC am besten neu einlesen readnotecard(); } } dataserver(key queryid, string data) { if (queryid == notecode) { // Für den Fall dass die NC leer ist if (data != EOF) { skype_handle = data; } else { skype_handle = &quot;&quot;; } } } touch_start(integer total_number) { // make sure owner has specified handle if(skype_handle == &quot;&quot;) { // send message to debugger llWhisper(DEBUG_CHANNEL, &quot;skype_handle can not be empty.&quot;); return; } // prevent extra requests happening at the same time if(skype_request_id != NULL_KEY) return; // make a request over the internet skype_request_id = llHTTPRequest(&quot;http://mystatus.skype.com/&quot; + skype_handle + &quot;.txt&quot;, [HTTP_METHOD, &quot;GET&quot;], &quot;&quot;); // set a timeout for http request llSetTimerEvent(5); } http_response(key request_id, integer status, list metadata, string body) { // is this a response to our request? if(request_id == skype_request_id) { // show status showStatus(body); // change to view state state viewing; } } timer() { // Didn&#039;t get a response in time. showStatus(&quot;No Response&quot;); // change to view state state viewing; } } state viewing { state_entry() { // Set next timer for 3 minutes llSetTimerEvent(180); } timer() { state default; } state_exit() { // stop the timer llSetTimerEvent(0); // hide the text llSetText(&quot;&quot;, ZERO_VECTOR, 0); // reset the request id skype_request_id = NULL_KEY; } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:43 +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 Spin http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/spin?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="spin">Spin</h2> <div class="level2"> <pre class="code">integer Switch = FALSE; default { state_entry() { llTargetOmega(&lt;0,0,1&gt;,0,1.0); // stop spinning } touch_start(integer total_number) { if(Switch == FALSE) { Switch = TRUE; llSay(0, &quot;On&quot;); llTargetOmega(&lt;0,0,1&gt;,PI,1.0); //start spinning } else { Switch = FALSE; llSay(0, &quot;Off&quot;); llTargetOmega(&lt;0,0,1&gt;,0,1.0); // stop spinning } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:44 +0000 Takecontrol Drive http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/takecontrol_drive?do=revisions&rev=1575021524 <h2 class="sectionedit1" id="takecontrol_drive">Takecontrol Drive</h2> <div class="level2"> <pre class="code">float speed=0.2; rotation rot; float locx; float locy; vector pos; default { touch_start(integer total_number) {llRequestPermissions(llDetectedKey(0), PERMISSION_TAKE_CONTROLS);} run_time_permissions(integer perm) {if(PERMISSION_TAKE_CONTROLS &amp; perm) {llTakeControls( CONTROL_FWD | CONTROL_BACK | CONTROL_LEFT | CONTROL_RIGHT | CONTROL_ROT_LEFT | CONTROL_ROT_RIGHT | CONTROL_UP | 0, TRUE, FALSE); }} control(key id, integer button, integer edge){ if (button==CONTROL_UP) {llSay(0,&quot;Controls Released!&quot;);llReleaseControls( );} if (button&amp;CONTROL_ROT_LEFT) {rot = llGetRot(); rotation delta = llEuler2Rot(&lt;0,0,(1 * PI)/45&gt;); rot = delta * rot; llSetRot(rot);} if (button&amp;CONTROL_ROT_RIGHT) {rot = llGetRot(); rotation delta = llEuler2Rot(&lt;0,0,(-1 * PI)/45&gt;); rot = delta * rot; llSetRot(rot);} if (button&amp;CONTROL_FWD){vector rotvec = llRot2Euler (llGetRot()); pos = llGetPos(); locx = (llCos(rotvec.z))*speed; locy = (llSin(rotvec.z))*speed; pos = pos + (&lt;locx,locy,0&gt;); llSetPos(pos);} }}</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 Touch http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/touch?do=revisions&rev=1575021525 <h2 class="sectionedit1" id="touch">Touch</h2> <div class="level2"> <pre class="code">//touch switch integer Switch = FALSE; default { state_entry() { llSleep(0.5); } touch_start(integer total_number) { if(Switch == FALSE) { Switch = TRUE; llSay(0, &quot;On&quot;); } else { Switch = FALSE; llSay(0, &quot;Off&quot;); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:45 +0000 Zero Lag Poseball http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/zero_lag_poseball?do=revisions&rev=1575021525 <h2 class="sectionedit1" id="zero_lag_poseball">Zero Lag Poseball</h2> <div class="level2"> <pre class="code">// Jippen Faddoul&#039;s Poseball script - Low ram/lag posepall thats just drag-and drop simple // Copyright (C) 2007 Jippen Faddoul // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License version 3, as // published by the Free Software Foundation. // // 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, see &lt;http://www.gnu.org/licenses/&gt; //This text will appear in the floating title above the ball string TITLE=&quot;Sit here&quot;; //You can play with these numbers to adjust how far the person sits from the ball. ( &lt;X,Y,Z&gt; ) vector offset=&lt;0.0,0.0,0.5&gt;; ///////////////////// LEAVE THIS ALONE \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ string ANIMATION; integer visible = TRUE; key avatar; vector COLOR = &lt;1.0,1.0,1.0&gt;; float ALPHA_ON = 1.0; float ALPHA_OFF = 0.0; show(){ visible = TRUE; llSetText(TITLE, COLOR,ALPHA_ON); llSetAlpha(ALPHA_ON, ALL_SIDES); } hide(){ visible = FALSE; llSetText(&quot;&quot;, COLOR,ALPHA_ON); llSetAlpha(ALPHA_OFF, ALL_SIDES); } default{ state_entry() { llSitTarget(offset,ZERO_ROTATION); if((ANIMATION = llGetInventoryName(INVENTORY_ANIMATION,0)) == &quot;&quot;){ llOwnerSay(&quot;Error: No animation&quot;); ANIMATION = &quot;sit&quot;; } llSetSitText(TITLE); show(); } touch_start(integer detected) { //llOwnerSay(&quot;Memory: &quot; + (string)llGetFreeMemory()); if(visible){ hide(); } else { show(); } } changed(integer change) { if(change &amp; CHANGED_LINK) { avatar = llAvatarOnSitTarget(); if(avatar != NULL_KEY){ //SOMEONE SAT DOWN hide(); llRequestPermissions(avatar,PERMISSION_TRIGGER_ANIMATION); return; }else{ //SOMEONE STOOD UP if (llGetPermissionsKey() != NULL_KEY){ llStopAnimation(ANIMATION); } show(); return; } } if(change &amp; CHANGED_INVENTORY) { llResetScript(); } if(change &amp; CHANGED_OWNER) { llResetScript(); } } run_time_permissions(integer perm) { if(perm &amp; PERMISSION_TRIGGER_ANIMATION) { llStopAnimation(&quot;sit&quot;); llStartAnimation(ANIMATION); hide(); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:45 +0000