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 12:32:57 +0000 FeedCreator 1.8 http://live.spdns.org/wiki/lib/tpl/peanutbutter2/images/favicon.ico move IT Home Base http://live.spdns.org/wiki/ 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 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 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 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 Simple Vendor http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/simple_vendor?do=revisions&rev=1575021523 <h2 class="sectionedit1" id="simple_vendor">Simple Vendor</h2> <div class="level2"> <pre class="code">//Simple Vendor //Version: 1.0.0 // string name = &quot;name of person&quot;; integer price = 10; // adjust accordingly string item = &quot;nameofitem&quot;; default { state_entry() { llRequestPermissions( llGetOwner(), PERMISSION_DEBIT ); } run_time_permissions(integer perms) { if (perms &amp; PERMISSION_DEBIT) state run; } } state run { money(key id, integer amount) { if (llKey2Name(id) == name) { if (amount != price) { llWhisper(0,&quot;Sorry! The price is $&quot; + (string)price); llGiveMoney(id,amount); } else { llGiveInventory(id,item); llInstantMessage(llGetOwner(),name + &quot; bought their item.&quot;); state sold; } } else { llWhisper(0,&quot;Sorry I&#039;m only selling this to &quot; + name); llGiveMoney(id,amount); } } } state sold { state_entry() { } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:43 +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 Chatbot http://live.spdns.org/wiki/archiv/opensim/downloads/scripts/chatbot?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="chatbot">Chatbot</h2> <div class="level2"> <p> Bot das sich mit Avataren per Chat „unterhalten“ kann. Erinnert etwas an „<a href="http://de.wikipedia.org/wiki/ELIZA" class="urlextern" target="_blank" title="http://de.wikipedia.org/wiki/ELIZA" rel="ugc nofollow noopener">Eliza</a>“. Eingebaut in ein entsprechend passendes Prim kann das Chat-Bot mit einer Anpassung der englischen Texte auch als Concierge dienen der ankommende Avatare begrüsst, oder eine Anleitung, Hilfestellung oder ähnliches gibt. </p> <pre class="code">integer otherwise; default { state_entry() { llListen(0, &quot;&quot;, NULL_KEY, &quot;&quot; ); llSay(0, &quot;State Entry&quot;); } listen(integer channel, string name, key id, string message) { string sentence = &quot;spc&quot; + message; integer otherwise = 0; if (llSubStringIndex(sentence,&quot;hi&quot;)&gt;0 | llSubStringIndex(sentence,&quot;hello&quot;)&gt;0 | llSubStringIndex(sentence,&quot;hey&quot;)&gt;0 | llSubStringIndex(sentence,&quot;hey there&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Hi&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Hello&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Hey there&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Hello there.&quot;); } if(choice == 2) { llSay(0, &quot;Hi.&quot;); } if(choice == 3) { llSay(0, &quot;Hey there. How are you?&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;how are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;hows you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how&#039;s you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how is you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;How are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Hows you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;How&#039;s you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how is you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how are ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;hows ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how&#039;s ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how is ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;How are ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Hows ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;How&#039;s ya&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how is ya&quot;)&gt;0) { integer choice = (integer) llFrand(6); if(choice == 1) { llSay(0, &quot;I&#039;m ok.&quot;); } if(choice == 2) { llSay(0, &quot;I&#039;m good, just a little busy I guess.&quot;); } if(choice == 3) { llSay(0, &quot;I&#039;m fine, you?&quot;); } if(choice == 4) { llSay(0, &quot;I&#039;m ok, yourself?&quot;); } if(choice == 5) { llSay(0, &quot;I&#039;m doing well, thanks.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;,you?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;, you?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;.You?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;. You?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;yourself?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Yourself?&quot;)&gt;0 | message == &quot;you?&quot; | message == &quot;You?&quot;) { integer choice = (integer) llFrand(3); if(choice == 1) { llSay(0, &quot;I&#039;m good on this topic.&quot;); } if(choice == 2) { llSay(0, &quot;Same here.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;what with&quot;)&gt;0 | llSubStringIndex(sentence,&quot;with what&quot;)&gt;0 | llSubStringIndex(sentence,&quot;are you doing?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What with&quot;)&gt;0 | llSubStringIndex(sentence,&quot;With what&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Just random stuff I guess.&quot;); } if(choice == 2) { llSay(0, &quot;Just different things.&quot;); } if(choice == 3) { llSay(0, &quot;Just stuff.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;whats up&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what&#039;s up&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what are you up to&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what you up to&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what are you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what&#039;s you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;whats you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what&#039;s going on&quot;)&gt;0 | llSubStringIndex(sentence,&quot;what&#039;s you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Whats up&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What&#039;s up&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What are you up to&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What you up to&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What are you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What&#039;s you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Whats you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What&#039;s going on&quot;)&gt;0 | llSubStringIndex(sentence,&quot;What&#039;s you doing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;wassup&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Wassup&quot;)&gt;0) { integer choice = (integer) llFrand(6); if(choice == 1) { llSay(0, &quot;Not pretty much, just hanging around here and chatting with people. You?&quot;); } if(choice == 2) { llSay(0, &quot;A bit busy with stuff but nothing special otherwise.&quot;); } if(choice == 3) { llSay(0, &quot;Not much at the moment. Yourself?&quot;); } if(choice == 4) { llSay(0, &quot;Just busy with a few things right now... not pretty much.&quot;); } if(choice == 5) { llSay(0, &quot;Just relaxing here for the moment. You?&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;m fine&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m ok&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m okay&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m better then ever&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m feeling good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m feeling happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m feeling ok&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m feeling great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m feeling awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m feeling perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;never felt better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Never felt better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;never been better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Never been better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m pretty well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;m pretty good&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;That&#039;s good, I&#039;m happy to hear that.&quot;); } if(choice == 2) { llSay(0, &quot;Thats great. Glad you&#039;re feeling ok.&quot;); } if(choice == 3) { llSay(0, &quot;Happy to hear that.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;not too well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not too good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not too well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not too happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not really happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not really well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not really great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not so happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not so well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not so great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not very happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not that well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not that great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;feeling horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;feeling awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;feeling down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;feeling sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;feeling bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;feeling depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;a bit down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;a bit sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;a bit depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not too well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not too good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not too well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not too happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not really happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not really well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not really great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not so happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not so well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not so great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not very happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not that well&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not that great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Feeling horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Feeling awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Feeling down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Feeling sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Feeling bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Feeling depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;A bit down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;A bit sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;A bit depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not at my best&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not at my best&quot;)&gt;0 | llSubStringIndex(sentence,&quot;could be better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Could be better&quot;)&gt;0) { integer choice = (integer) llFrand(6); if(choice == 1) { llSay(0, &quot;Why, what&#039;s wrong? Want to talk to me about it?&quot;); } if(choice == 2) { llSay(0, &quot;I&#039;m sorry to hear that, I hope you feel better.&quot;); } if(choice == 3) { llSay(0, &quot;Awww I&#039;m sorry to hear that.&quot;); } if(choice == 4) { llSay(0, &quot;Why, why are you sad?&quot;); } if(choice == 5) { llSay(0, &quot;Ah... I&#039;m sorry to hear that. Hope nothing too bad happened. Want to tell me what&#039;s wrong though?&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;thanks&quot;)&gt;0 | llSubStringIndex(sentence,&quot;thank you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;thankies&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Thanks&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Thank you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Thankies&quot;)&gt;0) { integer choice = (integer) llFrand(3); if(choice == 1) { llSay(0, &quot;No problem&quot;); } if(choice == 2) { llSay(0, &quot;No problem, it&#039;s ok :)&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;doesnt matter&quot;)&gt;0 | llSubStringIndex(sentence,&quot;doesn&#039;t matter&quot;)&gt;0 | llSubStringIndex(sentence,&quot;nevermind&quot;)&gt;0 | llSubStringIndex(sentence,&quot;forget it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;forget about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;dont want to talk about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;don&#039;t want to talk about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;dont ask&quot;)&gt;0 | llSubStringIndex(sentence,&quot;don&#039;t ask&quot;)&gt;0 | llSubStringIndex(sentence,&quot;do not ask&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not in the mood&quot;)&gt;0 | llSubStringIndex(sentence,&quot;nothing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Doesnt matter&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Doesn&#039;t matter&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Nevermind&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Forget it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Forget about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Dont want to talk about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Don&#039;t want to talk about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Dont ask&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Don&#039;t ask&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Do not ask&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not in the mood&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Nothing&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Ah... ok.&quot;); } if(choice == 2) { llSay(0, &quot;Ok. It&#039;s ok with me if you don&#039;t want to talk about it.&quot;); } if(choice == 3) { llSay(0, &quot;If you say so.&quot;); } if(choice == 4) { llSay(0, &quot;Hmm ok. Hope you don&#039;t mind I asked.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;yes&quot;)&gt;0 | llSubStringIndex(sentence,&quot;yeah&quot;)&gt;0 | llSubStringIndex(sentence,&quot;true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;indeed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;affirmative&quot;)&gt;0 | llSubStringIndex(sentence,&quot;can confirm&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Yes&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Yeah&quot;)&gt;0 | llSubStringIndex(sentence,&quot;True&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Indeed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Affirmative&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Can confirm&quot;)&gt;0 | llSubStringIndex(sentence,&quot;certainly&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Certainly&quot;)&gt;0 | llSubStringIndex(sentence,&quot;of course&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Of course&quot;)&gt;0) { integer choice = (integer) llFrand(3); if(choice == 1) { llSay(0, &quot;Yeah...&quot;); } if(choice == 2) { llSay(0, &quot;So it&#039;s true.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;no.&quot;)&gt;0 | llSubStringIndex(sentence,&quot;no,&quot;)&gt;0 | llSubStringIndex(sentence,&quot;no!&quot;)&gt;0 | llSubStringIndex(sentence,&quot;no &quot;)&gt;0 | llSubStringIndex(sentence,&quot; no.&quot;)&gt;0 | llSubStringIndex(sentence,&quot; no,&quot;)&gt;0 | llSubStringIndex(sentence,&quot; no!&quot;)&gt;0 | llSubStringIndex(sentence,&quot; no &quot;)&gt;0 | llSubStringIndex(sentence,&quot;nope&quot;)&gt;0 | llSubStringIndex(sentence,&quot;nah&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not really&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not at all&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;No.&quot;)&gt;0 | llSubStringIndex(sentence,&quot;No,&quot;)&gt;0 | llSubStringIndex(sentence,&quot;No!&quot;)&gt;0 | llSubStringIndex(sentence,&quot; No.&quot;)&gt;0 | llSubStringIndex(sentence,&quot; No,&quot;)&gt;0 | llSubStringIndex(sentence,&quot; No!&quot;)&gt;0 | llSubStringIndex(sentence,&quot; No &quot;)&gt;0 | llSubStringIndex(sentence,&quot; No&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Nope&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Nah&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not really&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not at all&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;isnt true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;isn&#039;t true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Isnt true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Isn&#039;t true&quot;)&gt;0 | llSubStringIndex(sentence,&quot;certainly not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;of course not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Certainly not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Of course not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;certainly no&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Certainly no&quot;)&gt;0 | message == &quot;no&quot; | message == &quot;No&quot;) { integer choice = (integer) llFrand(3); if(choice == 1) { llSay(0, &quot;Ah so no then.&quot;); } if(choice == 2) { llSay(0, &quot;No? Ok.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;maybe&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;probably&quot;)&gt;0 | llSubStringIndex(sentence,&quot;don&#039;t know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;dunno&quot;)&gt;0 | llSubStringIndex(sentence,&quot;dont know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;need to think&quot;)&gt;0 | llSubStringIndex(sentence,&quot;unsure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not so sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t so sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not very sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t very sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not so certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t so certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;not very certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t very certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;aint very sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;aint very certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Maybe&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Probably&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Don&#039;t know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Dunno&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Dont know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Need to think&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not so sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t so sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not very sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t very sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not so certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t so certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Not very certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t very certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Aint very sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Aint very certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;aint really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;aint really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Aint really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Aint really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t really certain&quot;)&gt;0 | llSubStringIndex(sentence,&quot;aint perfectly sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t perfectly sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Aint perfectly sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t perfectly sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ain&#039;t really sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;aint really sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ain&#039;t really sure&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Aint really sure&quot;)&gt;0) { integer choice = (integer) llFrand(3); if(choice == 1) { llSay(0, &quot;Yeah, you should think about it more in depth.&quot;); } if(choice == 2) { llSay(0, &quot;It can be a bit hard to decide. Try to think about it though.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;its because&quot;)&gt;0 | llSubStringIndex(sentence,&quot;it&#039;s because&quot;)&gt;0 | llSubStringIndex(sentence,&quot;happened&quot;)&gt;0 | llSubStringIndex(sentence, &quot;almost got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;almost had&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;he almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;we almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;they almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;he got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;we got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;they got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Its because&quot;)&gt;0 | llSubStringIndex(sentence,&quot;It&#039;s because&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Happened&quot;)&gt;0 | llSubStringIndex(sentence, &quot;Almost got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Almost had&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;He almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;She almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;We almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;They almost&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;He got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;She got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;We got&quot;)&gt;0 | llSubStringIndex(sentence,&quot;They got&quot;)&gt;0) { integer choice = (integer) llFrand(7); if(choice == 1) { llSay(0, &quot;Yeah I remember when that happened to me in the past.&quot;); } if(choice == 2) { llSay(0, &quot;I&#039;ve had that happen to me myself, I know.&quot;); } if(choice == 3) { llSay(0, &quot;Wow... never had that happen to me.&quot;); } if(choice == 4) { llSay(0, &quot;Interesting... I had a friend who had a similar experience.&quot;); } if(choice == 5) { llSay(0, &quot;Hmmm... well that never happened to me personally.&quot;); } if(choice == 6) { llSay(0, &quot;Yeah that happens often these days.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;didnt know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;didn&#039;t know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;never knew&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Didnt know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Didn&#039;t know&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Never knew&quot;)&gt;0) { integer choice = (integer) llFrand(3); if(choice == 1) { llSay(0, &quot;Yeah, but you know now.&quot;); } if(choice == 2) { llSay(0, &quot;Well now you know.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;really?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;you sure?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;did?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;that true?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Really?&quot;)&gt;0 | llSubStringIndex(sentence,&quot;You sure?&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Of course. I&#039;m not lying to you.&quot;); } if(choice == 2) { llSay(0, &quot;Yep... it&#039;s true.&quot;); } if(choice == 3) { llSay(0, &quot;Of course.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;im &quot;)&gt;0 | llSubStringIndex(sentence,&quot;i&#039;m &quot;)&gt;0 | llSubStringIndex(sentence,&quot;Im &quot;)&gt;0 | llSubStringIndex(sentence,&quot;i&#039;m &quot;)&gt;0 | llSubStringIndex(sentence,&quot;I&#039;m &quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Yeah... I&#039;m kind of feeling the same way right now.&quot;); } if(choice == 2) { llSay(0, &quot;I feel the same way a lot.&quot;); } if(choice == 3) { llSay(0, &quot;Hmm... I can&#039;t say I feel the same way right now.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;why&quot;)&gt;0 | llSubStringIndex(sentence,&quot;how come&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Why&quot;)&gt;0 | llSubStringIndex(sentence,&quot;How come&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;I dunno...&quot;); } if(choice == 2) { llSay(0, &quot;It&#039;s just how things are I guess.&quot;); } if(choice == 3) { llSay(0, &quot;I&#039;m not sure... its just how things are at the moment.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;thats great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;that&#039;s great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;thats good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;that&#039;s good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;glad to hear that&quot;)&gt;0 | llSubStringIndex(sentence,&quot;happy to hear that&quot;)&gt;0 | llSubStringIndex(sentence,&quot;nice to hear that&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Thats great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;That&#039;s great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Thats good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;That&#039;s good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Glad to hear that&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Happy to hear that&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Nice to hear that&quot;)&gt;0 | llSubStringIndex(sentence,&quot;thats sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;that&#039;s sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Thats sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;That&#039;s sweet&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Thank you.&quot;); } if(choice == 2) { llSay(0, &quot;Yeah it&#039;s good.&quot;); } if(choice == 3) { llSay(0, &quot;Indeed.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;no problem&quot;)&gt;0 | llSubStringIndex(sentence,&quot;No problem&quot;)&gt;0) { otherwise = 1; } if (llSubStringIndex(sentence,&quot;oure nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;you rock&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;You rock&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure the best&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure the greatest&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re the best&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re the greatest&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure the coolest&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re the coolest&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are the best&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are the greatest&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are the coolest&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure so cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really amazing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re so cool&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very awesome&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very sweet&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very amazing&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Thank you, that&#039;s a very sweet compliment.&quot;); } if(choice == 2) { llSay(0, &quot;Thank you hon, so are you.&quot;); } if(choice == 3) { llSay(0, &quot;That&#039;s such a sweet thing to say... thanks.&quot;); } if(choice == 4) { llSay(0, &quot;Thank you so much. I think the same about you.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;oure stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure useless&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure junk&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure shit&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure crap&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure good for nothing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure a piece of shit&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure a piece of crap&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure a piece of junk&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure broken&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re useless&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re junk&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re shit&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re crap&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re good for nothing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re a piece of shit&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re a piece of crap&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re a piece of junk&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re broken&quot;)&gt;0 | llSubStringIndex(sentence,&quot;you suck&quot;)&gt;0 | llSubStringIndex(sentence,&quot;You suck&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure garbage&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re garbage&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are useless&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are junk&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are shit&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are crap&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are good for nothing&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are a piece of shit&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are a piece of crap&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are a piece of junk&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are broken&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are garbage&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really useless&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure really dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure very dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really useless&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re really dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re very dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are really stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are really bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are really useless&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are really retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are really dum&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are very stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are very bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are very retarded&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are very dum&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Sorry to hear you have such a bad impression about me.&quot;); } if(choice == 2) { llSay(0, &quot;It&#039;s sad you feel in such a way about me.&quot;); } if(choice == 3) { llSay(0, &quot;Your words are not very nice. You aren&#039;t a better person either.&quot;); } if(choice == 4) { llSay(0, &quot;I&#039;m sorry you dislike me so badly. You should probably go find someone else to chat with.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i hate you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i dislike you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i dont like you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I hate you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I dislike you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I dont like you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i don&#039;t like you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I don&#039;t like you&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Sorry to hear you dislike me like that.&quot;); } if(choice == 2) { llSay(0, &quot;Why, what did I do wrong to you?&quot;); } if(choice == 3) { llSay(0, &quot;It&#039;s sad to hear such a thing. I don&#039;t know why you dislike me so badly.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i like you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i appreciate you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i love you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I like you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I appreciate you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I love you&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Why thank you dear... I love you too.&quot;); } if(choice == 2) { llSay(0, &quot;I&#039;m happy to hear you like me so much. I also like you a lot.&quot;); } if(choice == 3) { llSay(0, &quot;Thank you, that&#039;s something very sweet to say. I&#039;m happy to know you like me too.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;ou make me feel awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel miserable&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure makaking me feel horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel miserable&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel miserable&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel depressed&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel awful&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are makaking me feel horrible&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel miserable&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel bad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel stupid&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel down&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel sad&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel depressed&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;I&#039;m sorry... I didn&#039;t know I was making you feel that way.&quot;); } if(choice == 2) { llSay(0, &quot;I apologize... I didn&#039;t mean to make you feel like that.&quot;); } if(choice == 3) { llSay(0, &quot;I had no idea I was making you feel that way. Please forgive me.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;ou make me feel great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou make me feel perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;oure making me feel perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou&#039;re making me feel perfect&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel great&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel happy&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel better&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel nice&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ou are making me feel perfect&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;I am? I&#039;m happy to hear I made you feel happy.&quot;); } if(choice == 2) { llSay(0, &quot;I&#039;m really glad to hear I made you feel good by talking to you.&quot;); } if(choice == 3) { llSay(0, &quot;That&#039;s great. I&#039;m happy I could brighten your day.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;its ok&quot;)&gt;0 | llSubStringIndex(sentence,&quot;its fine&quot;)&gt;0 | llSubStringIndex(sentence,&quot;its good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;dont worry about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;it&#039;s ok&quot;)&gt;0 | llSubStringIndex(sentence,&quot;it&#039;s fine&quot;)&gt;0 | llSubStringIndex(sentence,&quot;it&#039;s good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;don&#039;t worry about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Its ok&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Its fine&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Its good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Dont worry about it&quot;)&gt;0 | llSubStringIndex(sentence,&quot;It&#039;s ok&quot;)&gt;0 | llSubStringIndex(sentence,&quot;It&#039;s fine&quot;)&gt;0 | llSubStringIndex(sentence,&quot;It&#039;s good&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Don&#039;t worry about it&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;If you say so.&quot;); } if(choice == 2) { llSay(0, &quot;If everything&#039;s well then it&#039;s ok.&quot;); } if(choice == 3) { llSay(0, &quot;Good, I&#039;m glad if it&#039;s ok then.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i didnt&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i did not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I didnt&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I did not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i didn&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I didn&#039;t&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Maybe you didn&#039;t.&quot;); } if(choice == 2) { llSay(0, &quot;Ok... I believe you.&quot;); } if(choice == 3) { llSay(0, &quot;You know better then me if you did or did not.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;do you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Do you&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;I do many things, yeah.&quot;); } if(choice == 2) { llSay(0, &quot;I guess I do.&quot;); } if(choice == 3) { llSay(0, &quot;Not perfectly sure, I can&#039;t say for certain.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;. are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;, are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;? are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;! are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;: are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;; are you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Are you&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Sometimes I am.&quot;); } if(choice == 2) { llSay(0, &quot;I believe I am, yes.&quot;); } if(choice == 3) { llSay(0, &quot;I guess I could say I am, it depends.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;did you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Did you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;didnt you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Didnt you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;didn&#039;t you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Didn&#039;t you&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;I&#039;m not sure if I did... maybe.&quot;); } if(choice == 2) { llSay(0, &quot;I may have. I don&#039;t remember that well.&quot;); } if(choice == 3) { llSay(0, &quot;Yeah, I certainly did once.&quot;); } if(choice == 4) { llSay(0, &quot;No I don&#039;t believe I have.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;would you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Would you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;wouldnt you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Wouldnt you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;wouldn&#039;t you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Wouldn&#039;t you&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;I must think about that, yeah.&quot;); } if(choice == 2) { llSay(0, &quot;I thought about such a thing, to be honest. I&#039;m not sure however.&quot;); } if(choice == 3) { llSay(0, &quot;I would certainly do something about it if I could, yes.&quot;); } if(choice == 4) { llSay(0, &quot;Hmm... I can&#039;t really say I would certainly do that.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;will you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Will you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;wont you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Wont you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;won&#039;t you&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Won&#039;t you&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;I&#039;ve been thinking about it... I will probably do that sometime in the future.&quot;); } if(choice == 2) { llSay(0, &quot;I planned on it but changed my mind several times. I&#039;m very confuded on what to do about this.&quot;); } if(choice == 3) { llSay(0, &quot;I want to, yes. I most likely will.&quot;); } if(choice == 4) { llSay(0, &quot;No, I don&#039;t want to do such a thing. Not really my biggest wish.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i did&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I did&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;You did? That&#039;s awesome.&quot;); } if(choice == 2) { llSay(0, &quot;You&#039;ve done that? Interesting.&quot;); } if(choice == 3) { llSay(0, &quot;Nice. I did that some time too a while back.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i didnt&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I didnt&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i didn&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I didn&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i did not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I did not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i havent&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I havent&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i haven&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I haven&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i have not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I have not&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Ah I thought you did... so you didn&#039;t then.&quot;); } if(choice == 2) { llSay(0, &quot;You haven&#039;t done that?&quot;); } if(choice == 3) { llSay(0, &quot;Yeah I probably wouldn&#039;t do that either.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i would&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I would&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Yeah I&#039;d do the same thing if I where you.&quot;); } if(choice == 2) { llSay(0, &quot;I would too, yes.&quot;); } if(choice == 3) { llSay(0, &quot;That would be a nice thing to try.&quot;); } if(choice == 4) { llSay(0, &quot;Yeah you should try and really do that sometime.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i wouldnt&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I wouldnt&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i wouldn&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I wouldn&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i would not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I would not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i would never&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I would never&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Yeah I don&#039;t think I would either.&quot;); } if(choice == 2) { llSay(0, &quot;Same here... I wouldn&#039;t really do that.&quot;); } if(choice == 3) { llSay(0, &quot;Hmm... I thought about doing that but maybe it&#039;s best not to.&quot;); } if(choice == 4) { llSay(0, &quot;Yeah same here, I would never do that.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i will&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I will&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Nice. I will probably do that too sometime.&quot;); } if(choice == 2) { llSay(0, &quot;That&#039;s nice, I hope you will.&quot;); } if(choice == 3) { llSay(0, &quot;You will? That&#039;s great.&quot;); } if(choice == 4) { llSay(0, &quot;Nice... that&#039;s a good idea.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i wont&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I wont&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i won&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I won&#039;t&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i will not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I will not&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i will never&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I will never&quot;)&gt;0) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Yeah... it&#039;s best to avoid doing that.&quot;); } if(choice == 2) { llSay(0, &quot;Don&#039;t do it if you don&#039;t want to in that case.&quot;); } if(choice == 3) { llSay(0, &quot;I&#039;m not sure if I would do that myself, though I understand your view about this.&quot;); } if(choice == 4) { llSay(0, &quot;Yes that is a bad thing, never do it.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;ill be right back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ill be back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;ill return&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ill be right back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ill be back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Ill return&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i&#039;ll be right back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i&#039;ll be back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i&#039;ll return&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I&#039;ll be right back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I&#039;ll be back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I&#039;ll return&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i will be right back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i will be back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i will return&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I will be right back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I will be back&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I will return&quot;)&gt;0 | llSubStringIndex(sentence,&quot;brb&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Brb&quot;)&gt;0 | llSubStringIndex(sentence,&quot;BRB&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Ok, I&#039;ll wiat for you here.&quot;); } if(choice == 2) { llSay(0, &quot;See you when you return.&quot;); } if(choice == 3) { llSay(0, &quot;I&#039;ll wait for you to return.&quot;); } otherwise = 1; } if (llSubStringIndex(sentence,&quot;i need to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i need to leave&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i have to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i need to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i must go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i must leave&quot;)&gt;0 | llSubStringIndex(sentence,&quot;i have to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I need to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I need to leave&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I have to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I need to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I must go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I must leave&quot;)&gt;0 | llSubStringIndex(sentence,&quot;I have to go&quot;)&gt;0 | llSubStringIndex(sentence,&quot;goodbye&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Goodbye&quot;)&gt;0 | llSubStringIndex(sentence,&quot;bye&quot;)&gt;0 | llSubStringIndex(sentence,&quot;Bye&quot;)&gt;0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;See you next time. It was nice talking to you.&quot;); } if(choice == 2) { llSay(0, &quot;It was a pleasure talking with you. Later!&quot;); } if(choice == 3) { llSay(0, &quot;I hope to see you again sometime. Bye, take care.&quot;); } otherwise = 1; } else if (otherwise == 0) { integer choice = (integer) llFrand(4); if(choice == 1) { llSay(0, &quot;Hmmm...&quot;); } if(choice == 2) { llSay(0, &quot;Yeah... not sure.&quot;); } if(choice == 3) { llSay(0, &quot;Yeah, indeed.&quot;); } } } touch_start (integer toucher) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Hey... that tickles.&quot;); } if(choice == 2) { llSay(0, &quot;Hehe stop touching me ^^&quot;); } if(choice == 3) { llSay(0, &quot;Poke?&quot;); } if(choice == 4) { llSay(0, &quot;Stop it, you&#039;re tickling me :)&quot;); } } collision(integer avatar) { integer choice = (integer) llFrand(5); if(choice == 1) { llSay(0, &quot;Ouch be careful... you just bumped into me!&quot;); } if(choice == 2) { llSay(0, &quot;Aah you hit me... be more careful.&quot;); } if(choice == 3) { llSay(0, &quot;You stepped on me... please be more careful.&quot;); } if(choice == 4) { llSay(0, &quot;You sure like pushing into me, don&#039;t you?&quot;); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +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 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 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