removed useless _ folders
This commit is contained in:
214
Dialog_module/Dialog_module/Object/Dialog_module_2.lsl
Normal file
214
Dialog_module/Dialog_module/Object/Dialog_module_2.lsl
Normal file
@@ -0,0 +1,214 @@
|
||||
// :CATEGORY:Dialog
|
||||
// :NAME:Dialog_module
|
||||
// :AUTHOR:Strife Onizuka
|
||||
// :CREATED:2010-01-10 05:20:56.000
|
||||
// :EDITED:2013-09-18 15:38:51
|
||||
// :ID:233
|
||||
// :NUM:320
|
||||
// :REV:1.0
|
||||
// :WORLD:Second Life
|
||||
// :DESCRIPTION:
|
||||
//
|
||||
// Dialog Module:
|
||||
// :CODE:
|
||||
//////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
//
|
||||
|
||||
// Dialog Module
|
||||
|
||||
// Version 9.3 Release
|
||||
|
||||
// Copyright (C) 2004-2006, Strife Onizuka
|
||||
|
||||
// http://home.comcast.net/~mailerdaemon/
|
||||
|
||||
// http://secondlife.com/badgeo/wakka.php?wakka=LibraryDialogModule
|
||||
|
||||
//
|
||||
|
||||
// This library is free software; you can redistribute it and/or
|
||||
|
||||
// modify it under the terms of the GNU Lesser General Public License
|
||||
|
||||
// as published by the Free Software Foundation; either
|
||||
|
||||
// version 2.1 of the License, or (at your option) any later version.
|
||||
|
||||
//
|
||||
|
||||
// This library 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 Lesser General Public License for more details.
|
||||
|
||||
//
|
||||
|
||||
// You should have received a copy of the GNU Lesser General Public License
|
||||
|
||||
// along with this library; if not, write to the Free Software
|
||||
|
||||
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
//
|
||||
|
||||
//////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
||||
//////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
//Don't change anything else unless you *really* need to.
|
||||
|
||||
|
||||
|
||||
list handles;
|
||||
|
||||
list time;
|
||||
|
||||
list chans;
|
||||
|
||||
string users;//save memory
|
||||
|
||||
list answer;
|
||||
|
||||
list button;
|
||||
|
||||
list prim;
|
||||
|
||||
list mask;
|
||||
|
||||
list intchan;
|
||||
|
||||
|
||||
|
||||
integer ticks;
|
||||
|
||||
|
||||
|
||||
remove(integer a)
|
||||
|
||||
{
|
||||
|
||||
llListenRemove(llList2Integer(handles,a));
|
||||
|
||||
handles = llDeleteSubList(handles,a,a);
|
||||
|
||||
time = llDeleteSubList(time, a,a);
|
||||
|
||||
chans = llDeleteSubList(chans, a,a);
|
||||
|
||||
answer = llDeleteSubList(answer, a,a);
|
||||
|
||||
button = llDeleteSubList(button, a,a);
|
||||
|
||||
prim = llDeleteSubList(prim, a,a);
|
||||
|
||||
mask = llDeleteSubList(mask, a,a);
|
||||
|
||||
intchan = llDeleteSubList(intchan,a,a);
|
||||
|
||||
users = llDeleteSubString(users,a*=36,a+35);
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
list TightListParse(string a) {
|
||||
|
||||
string b = llGetSubString(a,0,0);//save memory
|
||||
|
||||
return llParseStringKeepNulls(llDeleteSubString(a,0,0), [a=b],[]);
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
clear()
|
||||
|
||||
{
|
||||
|
||||
integer a = llGetListLength(handles);
|
||||
|
||||
while(a)
|
||||
|
||||
{
|
||||
|
||||
llListenRemove(llList2Integer(handles,--a));
|
||||
|
||||
if(llList2Integer(mask,a)&0x20000)
|
||||
|
||||
llMessageLinked(llList2Integer(prim,a), llList2Integer(intchan,a),
|
||||
|
||||
llList2String(answer,a), "|-2||"+llGetSubString(users,a * 36,(a * 36) + 35)+"||-1");
|
||||
|
||||
}
|
||||
|
||||
llSetTimerEvent(ticks = 0);
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
default
|
||||
|
||||
{
|
||||
|
||||
state_entry()
|
||||
|
||||
{
|
||||
|
||||
|
||||
|
||||
llOwnerSay("Dialog Module, Version 9.2, Released Under the GNU Lesser General Public License");
|
||||
|
||||
llOwnerSay("Copyright (C) 2004-2006, Strife Onizuka, http://secondlife.com/badgeo/wakka.php?wakka=LibraryDialogModule");
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
}
|
||||
|
||||
on_rez(integer a)
|
||||
|
||||
{
|
||||
|
||||
clear();
|
||||
|
||||
}
|
||||
|
||||
link_message(integer a, integer b, string c, key d)
|
||||
|
||||
{
|
||||
|
||||
if(b == 12)
|
||||
|
||||
{
|
||||
|
||||
b = llSubStringIndex(llDeleteSubString(c,0,0), llGetSubString(c,0,0));
|
||||
|
||||
list e = TightListParse(d);
|
||||
|
||||
integer buttonmask = (integer)llList2String(e,3);
|
||||
|
||||
string user = llList2String(e,0);
|
||||
|
||||
list buttons = llDeleteSubList(e,0,3);
|
||||
|
||||
float timeout = (float)llList2String(e,2);
|
||||
|
||||
integer cat = (integer)llFrand(-2147483392.0) - 255;
|
||||
|
||||
integer chan = (integer)llDeleteSubString(c, b + 1, 0);
|
||||
|
||||
string ans = llDeleteSubString(c,0,b);
|
||||
|
||||
|
||||
|
||||
if(buttonmask & 0x100000)
|
||||
|
||||
clear();
|
||||
Reference in New Issue
Block a user