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://itclive.spdns.de/wiki/ Mon, 06 Apr 2026 01:40:46 +0000 FeedCreator 1.8 http://itclive.spdns.de/wiki/lib/tpl/peanutbutter2/images/favicon.ico move IT Home Base http://itclive.spdns.de/wiki/ Chatbot http://itclive.spdns.de/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 Poseball http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/poseball?do=revisions&rev=1575021522 <h2 class="sectionedit1" id="poseball">Poseball</h2> <div class="level2"> <pre class="code">// Jippen Faddoul&#039;s Poseball script - Low ram/lag posepall thats just drag-and drop simple // Copyright (C) 2007 Jippen Faddoul // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License version 3, as // published by the Free Software Foundation. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see &lt;http://www.gnu.org/licenses/&gt; //This text will appear in the floating title above the ball string TITLE=&quot;Sit here&quot;; //You can play with these numbers to adjust how far the person sits from the ball. ( &lt;X,Y,Z&gt; ) vector offset=&lt;0.0,0.0,0.5&gt;; ///////////////////// LEAVE THIS ALONE \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ string ANIMATION; integer visible = TRUE; key avatar; vector COLOR = &lt;1.0,1.0,1.0&gt;; float ALPHA_ON = 1.0; float ALPHA_OFF = 0.0; show(){ visible = TRUE; llSetText(TITLE, COLOR,ALPHA_ON); llSetAlpha(ALPHA_ON, ALL_SIDES); } hide(){ visible = FALSE; llSetText(&quot;&quot;, COLOR,ALPHA_ON); llSetAlpha(ALPHA_OFF, ALL_SIDES); } default{ state_entry() { llSitTarget(offset,ZERO_ROTATION); if((ANIMATION = llGetInventoryName(INVENTORY_ANIMATION,0)) == &quot;&quot;){ llOwnerSay(&quot;Error: No animation&quot;); ANIMATION = &quot;sit&quot;; } llSetSitText(TITLE); show(); } touch_start(integer detected) { //llOwnerSay(&quot;Memory: &quot; + (string)llGetFreeMemory()); if(visible){ hide(); } else { show(); } } changed(integer change) { if(change &amp; CHANGED_LINK) { avatar = llAvatarOnSitTarget(); if(avatar != NULL_KEY){ //SOMEONE SAT DOWN hide(); llRequestPermissions(avatar,PERMISSION_TRIGGER_ANIMATION); return; }else{ //SOMEONE STOOD UP if (llGetPermissionsKey() != NULL_KEY){ llStopAnimation(ANIMATION); } show(); return; } } if(change &amp; CHANGED_INVENTORY) { llResetScript(); } if(change &amp; CHANGED_OWNER) { llResetScript(); } } run_time_permissions(integer perm) { if(perm &amp; PERMISSION_TRIGGER_ANIMATION) { llStopAnimation(&quot;sit&quot;); llStartAnimation(ANIMATION); hide(); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:42 +0000 Zero Lag Poseball http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/zero_lag_poseball?do=revisions&rev=1575021525 <h2 class="sectionedit1" id="zero_lag_poseball">Zero Lag Poseball</h2> <div class="level2"> <pre class="code">// Jippen Faddoul&#039;s Poseball script - Low ram/lag posepall thats just drag-and drop simple // Copyright (C) 2007 Jippen Faddoul // This program is free software: you can redistribute it and/or modify // it under the terms of the GNU General Public License version 3, as // published by the Free Software Foundation. // // This program is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU General Public License for more details. // // You should have received a copy of the GNU General Public License // along with this program. If not, see &lt;http://www.gnu.org/licenses/&gt; //This text will appear in the floating title above the ball string TITLE=&quot;Sit here&quot;; //You can play with these numbers to adjust how far the person sits from the ball. ( &lt;X,Y,Z&gt; ) vector offset=&lt;0.0,0.0,0.5&gt;; ///////////////////// LEAVE THIS ALONE \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ string ANIMATION; integer visible = TRUE; key avatar; vector COLOR = &lt;1.0,1.0,1.0&gt;; float ALPHA_ON = 1.0; float ALPHA_OFF = 0.0; show(){ visible = TRUE; llSetText(TITLE, COLOR,ALPHA_ON); llSetAlpha(ALPHA_ON, ALL_SIDES); } hide(){ visible = FALSE; llSetText(&quot;&quot;, COLOR,ALPHA_ON); llSetAlpha(ALPHA_OFF, ALL_SIDES); } default{ state_entry() { llSitTarget(offset,ZERO_ROTATION); if((ANIMATION = llGetInventoryName(INVENTORY_ANIMATION,0)) == &quot;&quot;){ llOwnerSay(&quot;Error: No animation&quot;); ANIMATION = &quot;sit&quot;; } llSetSitText(TITLE); show(); } touch_start(integer detected) { //llOwnerSay(&quot;Memory: &quot; + (string)llGetFreeMemory()); if(visible){ hide(); } else { show(); } } changed(integer change) { if(change &amp; CHANGED_LINK) { avatar = llAvatarOnSitTarget(); if(avatar != NULL_KEY){ //SOMEONE SAT DOWN hide(); llRequestPermissions(avatar,PERMISSION_TRIGGER_ANIMATION); return; }else{ //SOMEONE STOOD UP if (llGetPermissionsKey() != NULL_KEY){ llStopAnimation(ANIMATION); } show(); return; } } if(change &amp; CHANGED_INVENTORY) { llResetScript(); } if(change &amp; CHANGED_OWNER) { llResetScript(); } } run_time_permissions(integer perm) { if(perm &amp; PERMISSION_TRIGGER_ANIMATION) { llStopAnimation(&quot;sit&quot;); llStartAnimation(ANIMATION); hide(); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:45 +0000 Simple Radar http://itclive.spdns.de/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 Avatar Trace Cam http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/avatar_trace_cam?do=revisions&rev=1575021518 <h2 class="sectionedit1" id="avatar_trace_cam">Avatar Trace Cam</h2> <div class="level2"> <p> Überwachungskamera die automatisch in die Richtung zu einem Avatar zeigt. </p> <pre class="code">default { state_entry() { llSetStatus(STATUS_PHYSICS,TRUE); // Gibt dem Objekt physikalische Eigenschaften. llSetHoverHeight(1.0,FALSE,1); // Das objekt schwebt einen Meter über dem Boden. llSensorRepeat(&quot;&quot;,&quot;&quot;,AGENT,10,PI,11); // Ein Sensor sucht nach Agenten im Umkeis von 10 Metern im 11 Sekunden Takt. } sensor(integer det) { vector pos = llDetectedPos(0); // Die Position des am nachsten stehenden Avatars wird zugewiesen. llLookAt(pos,1,1); // Das Objekt zeigt in Richtung des Avatars. } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:38 +0000 Dimmen http://itclive.spdns.de/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 Online Indicator http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/online_indicator?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="online_indicator">Online Indicator</h2> <div class="level2"> <pre class="code">//////////////////////////////////////////////////////////////////////////////////////////////// // Copyright (c) 2008 by Kristy Fanshaw // //////////////////////////////////////////////////////////////////////////////////////////////// // 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 3 of the License, or // // (at your option) any later version. // // // // Vendor System 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. // // // // To get a copy of the GNU General Public License, see &lt;http://www.gnu.org/licenses/&gt;. // //////////////////////////////////////////////////////////////////////////////////////////////// key user_key = &quot;00000000-0000-0000-0000-000000000000&quot;; // must be agent UUID whose status it will indicate integer time = 30; // time within the message should be written. string url = &quot;http://world.secondlife.com/resident/&quot;; key blank = &quot;5748decc-f629-461c-9a36-a35a221fe21f&quot;; string name; key toucher; string status; default { state_entry() { llSetText(&quot;&quot;, &lt;1,0,0&gt;, 1.0); llSetTexture(blank, ALL_SIDES); llRequestAgentData( user_key, DATA_NAME); } dataserver(key queryid, string data) { name = data; llSetObjectName(name + &quot;&#039;s Online Detector&quot;); state show; } } state show { state_entry() { llSetTimerEvent(10); } timer() { llHTTPRequest( url + (string)user_key,[HTTP_METHOD,&quot;GET&quot;],&quot;&quot;); llRequestAgentData( user_key, DATA_ONLINE); } on_rez(integer start_param) { llSetText(&quot;&quot;, &lt;1,0,0&gt;, 1.0); llSetTexture(blank, ALL_SIDES); } http_response(key request_id,integer status, list metadata, string body) { if (llSubStringIndex(body, &quot;blank.jpg&quot;) == -1) { integer start_UUID = llSubStringIndex(body,&quot;&lt;img alt=\&quot;profile image\&quot; src=\&quot;http://secondlife.com/app/image/&quot;) + llStringLength(&quot;&lt;img alt=\&quot;profile image\&quot; src=\&quot;http://secondlife.com/app/image/&quot;); integer end_UUID = llSubStringIndex(body,&quot;\&quot; class=\&quot;parcelimg\&quot; /&gt;&quot;) - 3; string profile_pic = llGetSubString(body, start_UUID, end_UUID); llSetTexture((key)profile_pic, ALL_SIDES); } else { llSetTexture(blank, ALL_SIDES); } } dataserver(key queryid, string data) { if ( data == &quot;1&quot; ) { status = &quot; is online&quot;; llSetText(name + status, &lt;0,1,0&gt;, 1.0); } else if (data == &quot;0&quot;) { status = &quot; is offline&quot;; llSetText(name + status, &lt;1,0,0&gt;, 1.0); } } touch_start(integer num_detected) { toucher = llDetectedKey(0); state msg; } } state msg { state_entry() { llListen(0,&quot;&quot;,toucher,&quot;&quot;); llInstantMessage(toucher, &quot;write your message to &quot; + name +&quot; - you have &quot; +(string)time + &quot; seconds&quot;); llInstantMessage(toucher, &quot;to see &quot; + name +&quot;&#039;s profile, click this link here: secondlife:///app/agent/&quot; + (string)user_key + &quot;/about&quot;); llSetTimerEvent(time); } listen(integer ch, string name, key id, string msg) { llInstantMessage(user_key, llKey2Name(toucher) + &quot; sent you a message from &quot; + llGetRegionName() + &quot;: &quot; + msg); llInstantMessage(toucher, &quot;message is sent.&quot;); llListenRemove(0); state show; } timer() { llInstantMessage(toucher, &quot;time is up - touch again to write a message&quot;); llListenRemove(0); state show; } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +0000 Skype Online Status - Multi-User Version http://itclive.spdns.de/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 Dance Poseball http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/dance_poseball?do=revisions&rev=1575021519 <h2 class="sectionedit1" id="dance_poseball">Dance Poseball</h2> <div class="level2"> <pre class="code">//////////////////////////////////////////// // Animation Script v1.2.1 // // Written by Xylor Baysklef //////////////////////////////////////////// /////////////// CONSTANTS /////////////////// list ANIMATIONS = [ &quot;Club Dance 1&quot; ]; list ANIMATIONS2 = [ &quot;Club Dance 2&quot; ]; list ANIMATIONS3 = [ &quot;Club Dance 3&quot; ]; list ANIMATIONS4 = [ &quot;Club Dance 4&quot; ]; ///////////// END CONSTANTS ///////////////// ///////////// GLOBAL VARIABLES /////////////// //integer gToggle = 0; integer gAnimNumber; integer gTotalAnims; string gAnimName = &quot;type&quot;; /////////// END GLOBAL VARIABLES ///////////// default { state_entry() { //llSay(0, &quot;Init...&quot;); llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); ANIMATIONS += ANIMATIONS2; ANIMATIONS2 = []; gTotalAnims = llGetListLength(ANIMATIONS); gAnimNumber = -1; llListen(0, &quot;&quot;, llGetOwner(), &quot;&quot;); } on_rez(integer param) { //llGiveInventory(llGetOwner(), &quot;Animation Names&quot;); llResetScript(); } listen(integer channel, string name, key id, string mesg) { string preamble = llGetSubString(mesg, 0, 3); if (preamble != &quot;anim&quot; &amp;&amp; preamble != &quot;stop&quot;) return; integer perm = llGetPermissions(); if ( !(perm &amp; PERMISSION_TRIGGER_ANIMATION)) { llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); return; } list parsed = llParseString2List(mesg, [ &quot; &quot; ], []); //llSay(0, (string)parsed); string anim = llList2String(parsed, 1); if (preamble == &quot;stop&quot;) { //llSay(0, &quot;Stopping: &quot; + llGetAnimation(llGetOwner())); //llStopAnimation(llGetAnimation(llGetOwner())); if (anim == &quot;&quot;) anim = gAnimName; if (anim == &quot;all&quot;) { integer i; llSay(0, &quot;Stopping all animations... please wait.&quot;); for (i=0; i&lt;gTotalAnims; i++) llStopAnimation(llList2String(ANIMATIONS, i)); llSay(0, &quot;Done.&quot;); return; } //llSay(0, &quot;Stopping: &quot; + anim); llStopAnimation(anim); return; } gAnimName = anim; //llSay(0, &quot;Animation: &quot; + gAnimName); llStartAnimation(gAnimName); } run_time_permissions(integer perm) { //llStopAnimation(gAnimName); //gToggle = 0; } attach(key id) { integer perm = llGetPermissions(); if (id != NULL_KEY) { if (! (perm &amp; PERMISSION_TRIGGER_ANIMATION)) { llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); } } else { if (perm &amp; PERMISSION_TRIGGER_ANIMATION) { llStopAnimation(gAnimName); } } } touch_start(integer total_number) { if (llDetectedKey(0) != llGetOwner()) return; integer perm = llGetPermissions(); if (perm &amp; PERMISSION_TRIGGER_ANIMATION) { if (gAnimNumber != -1) { llStopAnimation( llList2String(ANIMATIONS, gAnimNumber) ); } gAnimNumber++; if (gAnimNumber == gTotalAnims) gAnimNumber = 0; gAnimName = llList2String(ANIMATIONS, gAnimNumber); llStartAnimation( gAnimName ); llSay(0, &quot;Animation: &quot; + gAnimName); } else { llRequestPermissions(llGetOwner(), PERMISSION_TRIGGER_ANIMATION); } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:39 +0000 Freeview Media Screen http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/freeview_media_screen?do=revisions&rev=1575021520 <h2 class="sectionedit1" id="freeview_media_screen">Freeview Media Screen</h2> <div class="level2"> <pre class="code">//XEngine: //FreeView 1.2 WebGuide (revision 3) - By CrystalShard Foo //Multifunctional Picture viewer and Video control script with webguide support //This script is distributed for free and must stay that way. // *** DO NOT SELL THIS SCRIPT UNDER ANY CIRCUMSTANCE. *** //Help for using this script can be obtained at: http://www.slguide.com/help //Feel free to modify this script and post your improvement. Leave the credits intact but feel free to add your name at its bottom. //Whats new: //- Now using FULL_BRIGHT instead of PRIM_MATERIAL_LIGHT for the screen display //- Added an ownership-change code to handle cases where FreeView gets deeded to group post Video Init. //- Renamed WebGuide to TV-Guide to reflect what this thing does better. //- Added a &#039;Fix Scale&#039; button to Picture mode to help against user texture-scale changes. //- Additional minor help-tips and code improvements //Enjoy! //Constants integer PICTURE_ROTATION_TIMER = 60; //In whole seconds integer DISPLAY_ON_SIDE = ALL_SIDES; //Change this to change where the image will be displayed key VIDEO_DEFAULT = &quot;71b8ff26-087d-5f44-285b-d38df2e11a81&quot;; //Test pattern - Used as default video texture when one is missing in parcel media key BLANK = &quot;5748decc-f629-461c-9a36-a35a221fe21f&quot;; //Blank texture - Used when there are no textures to display in Picture mode string NOTECARD = &quot;bookmarks&quot;; //Used to host URL bookmarks for video streams integer VIDEO_BRIGHT = TRUE; //FULL_BRIGHT status for Video integer PICTURE_BRIGHT = TRUE; //FULL_BRIGHT status for Picture integer REMOTE_CHANNEL = 9238742; integer mode = 0; //Freeview mode. //Mode 0 - Power off //Mode 1 - Picture viewer //Mode 2 - Video integer listenHandle = -1; //Dialog menu listen handler integer listenUrl = -1; //listen handler for channel 1 for when a URL is being added integer listenTimer = -1; //Timer variable for removing all listeners after 2 minutes of listener inactivity integer listenRemote = -1; //listen handler for the remote during initial setup integer encryption = 0; integer numberofnotecardlines = 0; //Stores the current number of detected notecard lines. integer notecardline = 0; //Current notecard line integer loop_image = FALSE; //Are we looping pictures with a timer? (picture mode) integer current_texture = 0; //Current texture number in inventory being displayed (picture mode) integer chan; //llDialog listen channel integer notecardcheck = 0; key video_texture; //Currently used video display texture for parcel media stream string moviename; string tempmoviename; key notecardkey = NULL_KEY; key tempuser; //Temp key storge variable string tempurl; //Temp string storge variable integer isGroup = TRUE; key groupcheck = NULL_KEY; key last_owner; key XML_channel; pictures() //Change mode to Picture Viewer { //Initilize variables //Change prim to Light material while coloring face 0 black to prevent light-lag generation. llSetPrimitiveParams([PRIM_BUMP_SHINY, DISPLAY_ON_SIDE, PRIM_SHINY_NONE, PRIM_BUMP_NONE, PRIM_COLOR, DISPLAY_ON_SIDE, &lt;1,1,1&gt;, 1.0, PRIM_MATERIAL, PRIM_MATERIAL_PLASTIC, PRIM_FULLBRIGHT, DISPLAY_ON_SIDE, PICTURE_BRIGHT]); integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check == 0) { report(&quot;No pictures found.&quot;); llSetTexture(BLANK,DISPLAY_ON_SIDE); return; } else if(current_texture &gt; check) //Set to first texture if available current_texture = 0; display_texture(current_texture); } video() //Change mode to Video { //Change prim to Light material while coloring face 0 black to prevent light-lag generation. llSetPrimitiveParams([PRIM_BUMP_SHINY, DISPLAY_ON_SIDE, PRIM_SHINY_NONE, PRIM_BUMP_NONE, PRIM_COLOR, DISPLAY_ON_SIDE, &lt;1,1,1&gt;, 1.0, PRIM_MATERIAL, PRIM_MATERIAL_PLASTIC, PRIM_FULLBRIGHT, DISPLAY_ON_SIDE, VIDEO_BRIGHT, PRIM_TEXTURE, DISPLAY_ON_SIDE, &quot;62dc73ca-265f-7ca0-0453-e2a6aa60bb6f&quot;, llGetTextureScale(DISPLAY_ON_SIDE), llGetTextureOffset(DISPLAY_ON_SIDE), llGetTextureRot(DISPLAY_ON_SIDE)]); report(&quot;Video mode&quot;+moviename+&quot;: Stopped&quot;); if(finditem(NOTECARD) != -1) tempuser = llGetNumberOfNotecardLines(NOTECARD); video_texture = llList2Key(llParcelMediaQuery([PARCEL_MEDIA_COMMAND_TEXTURE]),0); if(video_texture == NULL_KEY) { video_texture = VIDEO_DEFAULT; llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_TEXTURE,VIDEO_DEFAULT]); llSay(0,&quot;No parcel media texture found. Setting texture to default: &quot;+(string)VIDEO_DEFAULT); if(llGetLandOwnerAt(llGetPos()) != llGetOwner()) llSay(0,&quot;Error: Cannot modify parcel media settings. &quot;+llGetObjectName()+&quot; is not owned by parcel owner.&quot;); } llSetTexture(video_texture,DISPLAY_ON_SIDE); } off() { report(&quot;Click to power on.&quot;); llSetPrimitiveParams([PRIM_BUMP_SHINY, DISPLAY_ON_SIDE, PRIM_SHINY_LOW, PRIM_BUMP_NONE, PRIM_COLOR, DISPLAY_ON_SIDE, &lt;0.1,0.1,0.1&gt;, 1.0,PRIM_MATERIAL, PRIM_MATERIAL_PLASTIC, PRIM_FULLBRIGHT, DISPLAY_ON_SIDE, FALSE, PRIM_TEXTURE, DISPLAY_ON_SIDE, BLANK, llGetTextureScale(DISPLAY_ON_SIDE), llGetTextureOffset(DISPLAY_ON_SIDE), llGetTextureRot(DISPLAY_ON_SIDE)]); } integer finditem(string name) //Finds and returns an item&#039;s inventory number { integer i; for(i=0;i&lt;llGetInventoryNumber(INVENTORY_NOTECARD);i++) if(llGetInventoryName(INVENTORY_NOTECARD,i) == NOTECARD) return i; return -1; } seturl(string url, key id) //Set parcel media URL { if(mode != 2) { video(); mode = 2; } moviename = tempmoviename; if(moviename) moviename = &quot; [&quot;+moviename+&quot;]&quot;; tempmoviename = &quot;&quot;; string oldurl = llList2String(llParcelMediaQuery([PARCEL_MEDIA_COMMAND_URL]),0); if(oldurl != &quot;&quot;) llOwnerSay(&quot;Setting new media URL. The old URL was: &quot;+oldurl); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_URL,url]); if(id!=NULL_KEY) menu(id); else { report(&quot;Video mode&quot;+moviename+&quot;: Playing&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_PLAY]); } if(isGroup) llSay(0,&quot;New media URL set.&quot;); else llOwnerSay(&quot;New media URL set: &quot;+url); } string mediatype(string ext) //Returns a string stating the filetype of a file based on file extension { ext = llToLower(ext); if(ext == &quot;swf&quot;) return &quot;Flash&quot;; if(ext == &quot;mov&quot; || ext == &quot;avi&quot; || ext == &quot;mpg&quot; || ext == &quot;mpeg&quot; || ext == &quot;smil&quot;) return &quot;Video&quot;; if(ext == &quot;jpg&quot; || ext == &quot;mpeg&quot; || ext == &quot;gif&quot; || ext == &quot;png&quot; || ext == &quot;pict&quot; || ext == &quot;tga&quot; || ext == &quot;tiff&quot; || ext == &quot;sgi&quot; || ext == &quot;bmp&quot;) return &quot;Image&quot;; if(ext == &quot;txt&quot;) return &quot;Text&quot;; if(ext == &quot;mp3&quot; || ext == &quot;wav&quot;) return &quot;Audio&quot;; return &quot;Unknown&quot;; } browse(key id) //Image browser function for picture viewer mode { integer check = llGetInventoryNumber(INVENTORY_TEXTURE); string header; if(check &gt; 0) header = &quot;(&quot;+(string)(current_texture+1)+&quot;/&quot;+(string)check+&quot;) &quot;+llGetInventoryName(INVENTORY_TEXTURE,current_texture); else header = &quot;No pictures found.&quot;; llDialog(id,&quot;** Monitor Control **\n Picture Viewer mode\n- Image browser\n- &quot;+header,[&quot;Back&quot;,&quot;Next&quot;,&quot;Menu&quot;],chan); extendtimer(); } report(string str) { llSetObjectDesc(str); } extendtimer() //Add another 2 minute to the Listen Removal timer (use when a Listen event is triggered) { if(listenHandle == -1) listenHandle = llListen(chan,&quot;&quot;,&quot;&quot;,&quot;&quot;); listenTimer = (integer)llGetTime() + 120; if(loop_image == FALSE) llSetTimerEvent(45); } config(key id) //Configuration menu { extendtimer(); llDialog(id,&quot;Current media URL:\n&quot;+llList2String(llParcelMediaQuery([PARCEL_MEDIA_COMMAND_URL]),0)+&quot;\nTip: If the picture is abit off, try &#039;Align ON&#039;&quot;,[&quot;Set URL&quot;,&quot;Align ON&quot;,&quot;Align OFF&quot;,&quot;Menu&quot;,&quot;Set Remote&quot;],chan); } tell_remote(string str) { llShout(REMOTE_CHANNEL,llXorBase64Strings(llStringToBase64((string)encryption + str), llStringToBase64((string)encryption))); } menu(key id) //Dialog menus for all 3 modes { list buttons = []; string title = &quot;** Monitor control **&quot;; extendtimer(); if(mode != 0) { if(mode == 1) //Pictures menu { title+=&quot;\n Picture Viewer mode&quot;; buttons+=[&quot;Browse&quot;]; if(loop_image == FALSE) buttons+=[&quot;Loop&quot;]; else buttons+=[&quot;Unloop&quot;]; buttons+=[&quot;Video&quot;,&quot;Power off&quot;,&quot;Help&quot;,&quot;Fix scale&quot;]; } else //Video menu { title+=&quot;\n Video display mode\n&quot;+moviename+&quot;\nTip:\nClick &#039;TV Guide&#039; to view the Online bookmarks.&quot;; buttons+=[&quot;Pictures&quot;,&quot;Configure&quot;,&quot;Power off&quot;,&quot;Loop&quot;,&quot;Unload&quot;,&quot;Help&quot;,&quot;Play&quot;,&quot;Stop&quot;,&quot;Pause&quot;,&quot;TV Guide&quot;,&quot;Bookmarks&quot;,&quot;Set URL&quot;]; } } else buttons += [&quot;Pictures&quot;,&quot;Video&quot;,&quot;Help&quot;]; llDialog(id,title,buttons,chan); } display_texture(integer check) //Display texture and set name in description (picture mode) { //&quot;Check&quot; holds the number of textures in contents. The function uses &quot;current_texture&quot; to display. string name = llGetInventoryName(INVENTORY_TEXTURE,current_texture); llSetTexture(name,DISPLAY_ON_SIDE); report(&quot;Showing picture: &quot;+name+&quot; (&quot;+(string)(current_texture+1)+&quot;/&quot;+(string)check+&quot;)&quot;); } next() //Change to next texture (picture mode) { //This function is used twice - by the menu and timer. Therefor, it is a dedicated function. current_texture++; integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check == 0) { llSetTexture(BLANK,DISPLAY_ON_SIDE); current_texture = 0; report(&quot;No pictures found.&quot;); return; } if(check == current_texture) current_texture = 0; display_texture(check); return; } default { state_entry() { chan = (integer)llFrand(1000) + 1000; //Pick a random listen channel for the listener if(PICTURE_ROTATION_TIMER &lt;= 0) //Ensure the value is no less or equal 0 PICTURE_ROTATION_TIMER = 1; llListenRemove(listenHandle); listenHandle = -1; last_owner = llGetOwner(); groupcheck = llRequestAgentData(llGetOwner(),DATA_NAME); off(); llOpenRemoteDataChannel(); } on_rez(integer i) { llResetScript(); } touch_start(integer total_number) { //------------------------------------------------------------------------------- //Listen only to owner or group member. Edit this code to change access controls. if(llDetectedKey(0) != llGetOwner() &amp;&amp; llDetectedGroup(0) == FALSE) return; //------------------------------------------------------------------------------- if(llGetOwnerKey(llGetKey()) != last_owner) //Sense if object has been deeded to group for Web Guide function { isGroup = TRUE; last_owner = llGetOwner(); groupcheck = llRequestAgentData(llGetOwner(),DATA_NAME); if(mode == 2) { llSay(0,&quot;Detected change in ownership. Attempting to obtain current parcel media texture...&quot;); video(); } } menu(llDetectedKey(0)); } changed(integer change) { if(change == CHANGED_INVENTORY) //If inventory change if(mode == 1) //If picture mode { integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check != 0) { current_texture = 0; display_texture(check); } else { llSetTexture(BLANK,DISPLAY_ON_SIDE); report(&quot;No pictures found.&quot;); } } else if(mode == 2) //If video mode if(finditem(NOTECARD) != -1) //And bookmarks notecard present if(notecardkey != llGetInventoryKey(NOTECARD)) tempuser = llGetNumberOfNotecardLines(NOTECARD); //Reload number of lines } listen(integer channel, string name, key id, string message) { if(message == &quot;Pictures&quot;) { if(mode == 2) llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_STOP]); pictures(); mode = 1; menu(id); return; } if(message == &quot;Video&quot;) { video(); mode = 2; menu(id); return; } if(message == &quot;Power off&quot;) { if(mode == 2) llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_UNLOAD]); off(); mode = 0; return; } if(message == &quot;Help&quot;) { llSay(0,&quot;Help documentation is available at: http://www.slguide.com/help&quot;); if(isGroup) { if(id == NULL_KEY) { llSay(0,&quot;FreeView cannot load help pages while set to group without the remote.&quot;); llSay(0,&quot;For further assistance, please consult: http://slguide.com/help&quot;); } else tell_remote(&quot;HELP&quot;+(string)id+(string)XML_channel); } else llLoadURL(id,&quot;Help pages for FreeView&quot;,&quot;http://www.slguide.com?c=&quot;+(string)XML_channel+&quot;&amp;help=1&quot;); } if(mode == 1) { if(message == &quot;Browse&quot;) { loop_image = FALSE; browse(id); return; } if(message == &quot;Next&quot;) { extendtimer(); next(); browse(id); } if(message == &quot;Back&quot;) { extendtimer(); current_texture--; integer check = llGetInventoryNumber(INVENTORY_TEXTURE); if(check == 0) { llSetTexture(BLANK,DISPLAY_ON_SIDE); current_texture = 0; report(&quot;No pictures found.&quot;); return; } if(current_texture &lt; 0) current_texture = check - 1; display_texture(check); browse(id); return; } if(message == &quot;Menu&quot;) { menu(id); return; } if(message == &quot;Loop&quot;) { llSetTimerEvent(PICTURE_ROTATION_TIMER); loop_image = TRUE; llOwnerSay(&quot;Picture will change every &quot;+(string)PICTURE_ROTATION_TIMER+&quot; seconds.&quot;); return; } if(message == &quot;Unloop&quot;) { loop_image = FALSE; llOwnerSay(&quot;Picture loop disabled.&quot;); return; } if(message == &quot;Fix scale&quot;) { llSay(0,&quot;Setting display texture to 1,1 repeats and 0,0 offset.&quot;); llScaleTexture(1, 1, DISPLAY_ON_SIDE); llOffsetTexture(0, 0, DISPLAY_ON_SIDE); return; } } if(mode == 2) { if(channel == REMOTE_CHANNEL) { if(encryption == 0) encryption = (integer)message; llListenRemove(listenRemote); listenRemote = -1; llSay(0,&quot;Remote configured (&quot;+(string)id+&quot;)&quot;); } if(message == &quot;TV Guide&quot;) { if(isGroup) { if(!encryption) { llSay(0,&quot;** Error - This FreeView object has been deeded to group. You must use a Remote control to open the TV Guide.&quot;); llSay(0,&quot;You can set up the remote control from the Video -&gt; Configuration menu. Please refer to the notecard for further assistance.&quot;); return; } tell_remote((string)id+(string)XML_channel+(string)llGetOwner()); } else llLoadURL(id, &quot;Come to the Guide to Start Your Viewer Playing!&quot;, &quot;http://slguide.com/index.php?v=&quot; + (string)llGetKey() + &quot;&amp;c=&quot; + (string)XML_channel + &quot;&amp;o=&quot; + (string)llGetOwner() + &quot;&amp;&quot;); return; } string header = &quot;Video mode&quot;+moviename+&quot;: &quot;; if(message == &quot;&lt;&lt; Prev&quot;) { notecardline--; if(notecardline &lt; 0) notecardline = numberofnotecardlines - 1; tempuser = id; llGetNotecardLine(NOTECARD,notecardline); return; } if(message == &quot;Next &gt;&gt;&quot;) { notecardline++; if(notecardline &gt;= numberofnotecardlines) notecardline = 0; tempuser = id; llGetNotecardLine(NOTECARD,notecardline); return; } if(message == &quot;Use&quot;) { if(tempurl == &quot;** No URL specified! **&quot;) tempurl = &quot;&quot;; seturl(tempurl,id); return; } if(message == &quot;Menu&quot;) { menu(id); return; } if(message == &quot;Configure&quot;) { config(id); return; } if(message == &quot;Bookmarks&quot;) { if(notecardcheck != -1) { llDialog(id,&quot;Error: No valid bookmark data found in notecard &#039;&quot;+NOTECARD+&quot;&#039;.&quot;,[&quot;Menu&quot;],chan); return; } if(finditem(NOTECARD) != -1) { tempuser = id; if(numberofnotecardlines &lt; notecardline) notecardline = 0; llGetNotecardLine(NOTECARD,notecardline); } else llDialog(id,&quot;Error: No notecard named &quot;+NOTECARD+&quot; found in contents.&quot;,[&quot;Menu&quot;],chan); return; } if(llGetLandOwnerAt(llGetPos()) != llGetOwner()) //If we do not have permissions to actually do the following functions { llSay(0,&quot;Error: Cannot modify parcel media settings. &quot;+llGetObjectName()+&quot; is not owned by parcel owner.&quot;); menu(id); return; //Abort } if(listenUrl != -1 &amp;&amp; channel == 1) //Incoming data from &quot;Set URL&quot; command (user spoke on channel 1) { llListenRemove(listenUrl); listenUrl = -1; tempmoviename = &quot;&quot;; seturl(message,id); } if(message == &quot;Play&quot;) { report(header+&quot;Playing&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_PLAY]); return; } if(message == &quot;Stop&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_STOP]); return; } if(message == &quot;Pause&quot;) { report(header+&quot;Paused&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_PAUSE]); return; } if(message == &quot;Unload&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_UNLOAD]); return; } if(message == &quot;Loop&quot;) { llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_LOOP]); return; } //URL , Auto-Scale, if(message == &quot;Set URL&quot;) { report(header+&quot;Stopped&quot;); listenUrl = llListen(1,&quot;&quot;,id,&quot;&quot;); llDialog(id,&quot;Please type the URL of your choice with /1 in thebegining. For example, /1 www.google.com&quot;,[&quot;Ok&quot;],938); return; } if(message == &quot;Align ON&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_AUTO_ALIGN,TRUE]); menu(id); return; } if(message == &quot;Align OFF&quot;) { report(header+&quot;Stopped&quot;); llParcelMediaCommandList([PARCEL_MEDIA_COMMAND_AUTO_ALIGN,FALSE]); menu(id); return; } if(message == &quot;Set Remote&quot;) { llSay(0,&quot;Configuring remote...&quot;); encryption = 0; llListenRemove(listenRemote); listenRemote = llListen(REMOTE_CHANNEL,&quot;&quot;,&quot;&quot;,&quot;&quot;); llSay(REMOTE_CHANNEL,&quot;SETUP&quot;); } } } dataserver(key queryid, string data) { if(queryid == groupcheck) //Test if object is deeded to group { groupcheck = NULL_KEY; isGroup = FALSE; return; } if(queryid == tempuser) //If just checking number of notecard lines { numberofnotecardlines = (integer)data; notecardkey = llGetInventoryKey(NOTECARD); notecardcheck = 0; llGetNotecardLine(NOTECARD,notecardcheck); return; } if(notecardcheck != -1) { if(data != EOF) { if(data == &quot;&quot;) { notecardcheck++; llGetNotecardLine(NOTECARD,notecardcheck); } else { notecardcheck = -1; return; } } else return; } if(data == &quot;&quot; &amp;&amp; notecardline &lt; numberofnotecardlines) //If user just pressed &quot;enter&quot; in bookmarks, skip { notecardline++; llGetNotecardLine(NOTECARD,notecardline); return; } if(data == EOF) { notecardline = 0; llGetNotecardLine(NOTECARD,notecardline); return; } list parsed = llParseString2List(data,[&quot;|&quot;,&quot;| &quot;,&quot; |&quot;,&quot; | &quot;],[]); //Ensure no blank spaces before &quot;http://&quot;. string name = llList2String(parsed,0); tempurl = llList2String(parsed,1); if(tempurl == &quot;&quot;) tempurl = &quot;** No URL specified! **&quot;; tempmoviename = name; llDialog(tempuser,&quot;Bookmarks notecard (&quot;+(string)(notecardline+1)+&quot;/&quot;+(string)numberofnotecardlines+&quot;)\n&quot;+name+&quot; (&quot;+mediatype(llList2String(llParseString2List(tempurl,[&quot;.&quot;],[]),-1))+&quot;)\n&quot;+tempurl,[&quot;&lt;&lt; Prev&quot;,&quot;Use&quot;,&quot;Next &gt;&gt;&quot;,&quot;Menu&quot;],chan); } remote_data(integer type, key channel, key message_id, string sender, integer ival, string sval) { if (type == REMOTE_DATA_CHANNEL) { XML_channel = channel; } else if(type == REMOTE_DATA_REQUEST) { list media_info = llParseString2List(sval, [&quot;|&quot;], []); tempmoviename = llList2String(media_info,0); seturl(llList2String(media_info,1),NULL_KEY); llRemoteDataReply(channel, message_id, sval, 1); } } timer() { if(llGetTime() &gt; listenTimer) //If listener time expired... { llListenRemove(listenHandle); //Remove listeneres. llListenRemove(listenUrl); llListenRemove(listenRemote); listenHandle = -1; listenUrl = -1; listenRemote = -1; listenTimer = -1; if(loop_image == FALSE || mode != 1) //If we&#039;re not looping pictures or are in picture mode at all llSetTimerEvent(0.0); //Remove timer } if(loop_image == TRUE &amp;&amp; mode == 1) //If we&#039;re looping pictures and and we&#039;re in picture mode... next(); //Next picture } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:40 +0000 Give Item http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/give_item?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="give_item">Give Item</h2> <div class="level2"> <pre class="code">// Idea and written by Criz Collins // Don&#039;t sell this FREE script!!! string giveitem = &quot;Willkommen&quot;; float giveevery = 24; // hours! ///////////////////////////////////////////// list visitors; list lastsent; integer n; default { on_rez( integer param ) { llResetScript(); } changed(integer change) { if (change &amp; CHANGED_INVENTORY) { llResetScript(); } } touch_start(integer total_number) { for (n=0; n&lt;total_number; n++) { integer giveallowed = 0; integer index = llListFindList( visitors, [ llDetectedKey(n) ] ); if (index == -1) { visitors = visitors + [ llDetectedKey(n) ]; lastsent = lastsent + [(integer)llGetUnixTime()]; giveallowed = 1; } else { if (llList2Integer(lastsent, index) &lt;= ((integer)llGetUnixTime() - (giveevery * 60 * 60))) { list replacer = [(integer)llGetUnixTime()]; list newlastsent = llListReplaceList(lastsent, replacer, index, index); lastsent = []; lastsent = newlastsent; giveallowed = 1; } else { giveallowed = 0; } } if (giveallowed == 1) { llGiveInventory(llDetectedKey(n), giveitem); } } } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +0000 Invisible Prim 2 http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/invisible_prim_2?do=revisions&rev=1575021521 <h2 class="sectionedit1" id="invisible_prim_2">Invisible Prim 2</h2> <div class="level2"> <pre class="code">// Invisible Prim Public v1.1b // last updated Mar. 22, 2006 init() { llSetPrimitiveParams([PRIM_BUMP_SHINY, ALL_SIDES, PRIM_SHINY_NONE, PRIM_BUMP_BRIGHT]); llOffsetTexture(0.468, 0.0, ALL_SIDES); llScaleTexture(0.0, 0.0, ALL_SIDES); llSetAlpha(1.0, ALL_SIDES); } refresh() { llSetTexture(&quot;38b86f85-2575-52a9-a531-23108d8da837&quot;, ALL_SIDES); llSleep(30); llSetTexture(&quot;e97cf410-8e61-7005-ec06-629eba4cd1fb&quot;, ALL_SIDES); } default { state_entry() { init(); llSetTimerEvent(5); } on_rez(integer start_param) { init(); } timer() { if ((integer)llGetWallclock() % 60 &lt; 10) { refresh(); } } } </pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:41 +0000 Tip Jar / Donation Box http://itclive.spdns.de/wiki/archiv/opensim/downloads/scripts/tip_jar?do=revisions&rev=1575021525 <h2 class="sectionedit1" id="tip_jardonation_box">Tip Jar / Donation Box</h2> <div class="level2"> <pre class="code">//Keknehv Psaltery Updated Version of DONATION BOX By jean cook, ama omega, and nada epoch Debugged by YadNi Monde (LoL) Yea, that s a Bunch O Peeps =) //Summary: The following script will make an object accept donations on your behalf. //Usage: stick it on any object you own(my favorite is a top hat), and it will promptly display: //&quot;&lt;your name&gt;&#039;s donation hat. //Donate if you are so inclined.&quot; //at which point anyone can right click on it and give you a tip. also, the script tells the donator thanks, and then tells you who donated how much //also shows the total amount donated integer totaldonated; string owner; default { on_rez( integer sparam ) { llResetScript(); } state_entry() { owner = llKey2Name( llGetOwner() ); llSetText( owner + &quot;&#039;s Tip Jar.\nPlease tip if you are so inclined!\n$L0 Donated so far&quot;,&lt;.25,1,.65&gt;,1); //Red Light flash llParticleSystem ([ PSYS_PART_FLAGS, PSYS_PART_INTERP_COLOR_MASK| PSYS_PART_FOLLOW_SRC_MASK| PSYS_PART_EMISSIVE_MASK, PSYS_SRC_PATTERN, PSYS_SRC_PATTERN_ANGLE_CONE, PSYS_SRC_INNERANGLE, 0.0, PSYS_SRC_OUTERANGLE, 0.1, PSYS_SRC_BURST_SPEED_MIN, 0.0, PSYS_SRC_BURST_SPEED_MAX, 0.0, PSYS_SRC_BURST_RADIUS, 0.0, PSYS_SRC_BURST_PART_COUNT, 5, PSYS_SRC_BURST_RATE, 1.0, PSYS_PART_MAX_AGE, 1.0, PSYS_PART_START_SCALE, &lt;1,1,1&gt;, PSYS_PART_START_COLOR, &lt;1,0.2,0.2&gt;, PSYS_PART_END_COLOR, &lt;1,0,0&gt;, PSYS_PART_START_ALPHA, 1.0, PSYS_PART_END_ALPHA, 0.0 ]); // Rotate llTargetOmega(&lt;0,0,0.05&gt;,PI,0.05); } money(key id, integer amount) { totaldonated += amount; llSetText( owner + &quot;&#039;s Tip Jar.\nPlease tip if you are so inclined!\n$L&quot; + (string)amount + &quot; Was donated last!\n&quot; + &quot;$L&quot; + (string)totaldonated + &quot; Donated so far&quot;,&lt;.25,1,.65&gt;,1); llInstantMessage(id,&quot;Thanks for the tip! I really appreciate it.&quot;); llInstantMessage(llGetOwner(),(string)llKey2Name(id)+&quot; donated $&quot; + (string)amount); } }</pre> </div> anonymous@undisclosed.example.com (Anonymous) archiv:opensim:downloads:scripts Fri, 29 Nov 2019 10:58:45 +0000