removed useless _ folders

This commit is contained in:
Fred Beckhusen
2015-08-09 16:54:31 -05:00
parent fde850293c
commit 948a44dfba
5204 changed files with 2425579 additions and 0 deletions

View File

@@ -0,0 +1,3 @@
<Solution name="Chat_Logger_Script">
<Project name="Chat_Logger_Script" path="Chat_Logger_Script\Chat_Logger_Script.prj" active="true"/>
</Solution>

View File

@@ -0,0 +1,6 @@
<Project name="Chat_Logger_Script" guid="D6F773F6-6C00-1014-B904-200204C60A89">
<Object name="Object" guid="D6F774E5-6C00-1014-B904-200204C60A89">
<Script name="Chat_Logger_Script_1.lsl" guid="D6F794E2-6C00-1014-B904-200204C60A89">
</Script>
</Object>
</Project>

View File

@@ -0,0 +1,88 @@
// :CATEGORY:Chat
// :NAME:Chat_Logger_Script
// :AUTHOR:Anonymous
// :CREATED:2010-01-10 05:20:56.000
// :EDITED:2013-09-18 15:38:50
// :ID:169
// :NUM:240
// :REV:1.0
// :WORLD:Second Life
// :DESCRIPTION:
// Chat Logger Script.lsl
// :CODE:
list names;
list speech;
list colours=["002EB8","FF6633","006600","660066","660033","663300","1A9900","FF14B1","001A99","#B88A00"];
list unique_names;
default
{
state_entry()
{
llSetText("This is a chat logger - currently only for testing",<0,0,0>,1.0);
integer i;
integer c;
for (i=0;i<llGetListLength(names);i++)
{
c = llListFindList(unique_names,llList2List(names,i,i) );
while (c >= llGetListLength(colours)) // dont crash if I run out of colours
c -= llGetListLength(colours);
llSetObjectName("[color=#" + llList2String(colours,c)
+ "]" + llList2String(names,i) );
llOwnerSay( llList2String(speech,i) + "[/color]" );
}
names = [];
speech = [];
unique_names = [];
llSetObjectName("Patch's Funky Chat Logger");
}
on_rez(integer i)
{
llResetScript();
}
touch_start(integer total_number)
{
if (llDetectedKey(0) == llGetOwner() )
{
llSay(0, "logging on!.");
state logging_chat;
}
}
}
state logging_chat
{
state_entry()
{
llListen(0,"",NULL_KEY,"");
}
on_rez(integer i)
{
llOwnerSay("Logging still on! Touch to get playback");
}
touch_start(integer total_number)
{
if (llDetectedKey(0) == llGetOwner() )
{
llSay(0, "chat logging now off - replaying log!.");
state default;
}
}
listen(integer channel, string name, key id, string message)
{
if(llListFindList(unique_names,[name]) == -1)
{
unique_names += name;
}
names += name;
speech += message;
}
}
// END //