This commit is contained in:
Fred Beckhusen
2015-08-07 15:34:30 -05:00
parent ce47ec2f3e
commit fde850293c
8080 changed files with 0 additions and 2443112 deletions

View File

@@ -1,214 +0,0 @@
// :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();