De DigiWiki.
/*
Bornslippy Ruby presents...
TruthGame v0.7.3
This script can handle: Avatar, Chat, Communications, Dialog, Detection, Math, MultiStates, Owner, Primitive, Scripts, Sensor, Touch, todo
The tipical game to play under the tree with some friends.
Who wins? The true people.
Copyright (c) 2010 Bornslippy Ruby
Permission is hereby granted, free of charge, to any person obtaining a
copy of this software and associated documentation files (the "TruthGame v0.7.3"), to
deal in TruthGame v0.7.3 without restriction, including without limitation the rights to
use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of TruthGame v0.7.3, and to permit persons to whom TruthGame v0.7.3 is furnished to do so,
subject to the following conditions:
The above copyright notice and this permission notice shall be
included in all copies or substantial portions of the software.
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
OTHER DEALINGS IN THE SOFTWARE.
http://secondlife.coolminds.org
*/
//TODO: Ogni 9 players mandare un dialog diverso
key owner = NULL_KEY;
key source = NULL_KEY;
key target = NULL_KEY;
string target_name;
string header = "\n---------------------------\nThe Truth Game\n---------------------------\n\n";
float radius = 40.0;
integer intervals = 8;
integer questions = 0;
integer totalques = 0;
integer queschan = 3;
integer players = 0;
integer channel = 0;
integer chchan = FALSE;
integer random = FALSE;
integer public = FALSE;
integer counted = FALSE;
//
//
//
list order_buttons( list buttons )
{
return llList2List(buttons, -3, -1) + llList2List(buttons, -6, -4) +
llList2List(buttons, -9, -7) + llList2List(buttons, -12, -10);
}
integer randInt(integer n)
{
return (integer)llFrand(n + 1);
}
integer rand(integer min, integer max)
{
return min + randInt(max - min);
}
resetScript()
{
source = NULL_KEY;
target = NULL_KEY;
target_name = "";
players = 0;
}
//
//
//
default
{
on_rez(integer x)
{
llResetScript();
if(owner != llGetOwner())
owner = llGetOwner();
}
changed(integer change)
{
llResetScript();
if (change & CHANGED_OWNER)
owner = llGetOwner();
}
state_entry()
{
owner = llGetOwner();
channel = (integer)(llFrand(-1000000000.0) - 1000000000.0);
questions = 0;
llListen(channel, "", owner, "");
if(counted)
{
counted = FALSE;
if( source == llGetOwner() )
llDialog(
llGetOwner(),
header + "Current radius: " + (string)radius + "\nCurrent Players: " + (string)players + "\n\nClick on \"Start\" to playing the Truth Game.",
order_buttons(["Start", "Settings"]),
channel
);
else if( public )
llDialog(
source,
header + "Current radius: " + (string)radius + "\nCurrent Players: " + (string)players + "\n\nClick on \"Start\" to playing the Truth Game.",
order_buttons(["Start", "Settings"]),
channel
);
else llInstantMessage(
source,
"The game is not started. Ask " + llKey2Name(owner) + " to start it!"
);
source = NULL_KEY;
}
//llSay(
// 0,
// header + "The game is ready. Ask " + llKey2Name( owner ) + " to start the game.\n\n"
//);
}
state_exit()
{
llListenRemove(channel);
}
touch_start( integer total_number )
{
chchan = FALSE;
if(players <= 1)
{
source = llDetectedKey(0);
state CountPlayers;
}
if( llDetectedKey(0) == llGetOwner() )
llDialog(
llGetOwner(),
header + "Current radius: " + (string)radius + "\nCurrent Players: " + (string)players + "\n\nClick on \"Start\" to playing the Truth Game.",
order_buttons(["Start", "Settings"]),
channel
);
else if( public )
llDialog(
llDetectedKey(0),
header + "Current radius: " + (string)radius + "\nCurrent Players: " + (string)players + "\n\nClick on \"Start\" to playing the Truth Game.",
order_buttons(["Start", "Settings"]),
channel
);
else llInstantMessage(
llDetectedKey(0),
"The game is not started. Ask " + llKey2Name(owner) + " to start it!"
);
}
listen(integer _chan, string _name, key _id, string _option)
{
if( _option == "Start" )
llDialog(
llGetOwner(),
header + "Choose the game mode to start playing the Truth Game.",
order_buttons(["On Request", "Random"]),
channel
);
else if( _option == "Public" )
{
public = TRUE;
}
else if( _option == "Private" )
{
public = FALSE;
}
else if( _option == "Settings" )
{
string pub;
if( public ) pub = "Private";
else pub = "Public";
llDialog(
llGetOwner(),
header + "Choose one option below:",
order_buttons([pub, "Channel", "Radius"]),
channel
);
}
else if( _option == "On Request" )
{
llSay(
0,
header + "(onRequest mode)\nThe game is started!\n\nTouch me to reserve your turn.\n\n"
);
random = FALSE;
state GameStarted;
}
else if( _option == "Random" )
{
llSay(
0,
header + "(random mode)\nThe game is started!\n\nNow I'll choose the first who will ask something...\nLet me look around!\n\n"
);
random = TRUE;
state SearchingSource;
}
else if( _option == "Channel" )
{
chchan = TRUE;
llDialog(
llGetOwner(),
"Choose the game channel where the players will types the questions into:",
order_buttons(["1","2","3","4","5","6","7","8","9"]),
channel
);
}
else if( _option == "Radius" )
llDialog(
llGetOwner(),
"Choose the radius where I can find the players",
order_buttons(["10","20","30","40","50","60","70","80","90"]),
channel
);
else if( chchan && (integer)_option >= 1 )
{
queschan = (integer) _option;
llInstantMessage(
owner,
"The new game channel is: " + (string) queschan
);
}
else if( (integer)_option >= 10 )
{
radius = (float)_option;
players = 1;
}
}
}
state CountPlayers
{
state_entry()
{
llSensorRepeat(
"",
NULL_KEY,
AGENT,
radius,
PI,
1
);
}
state_exit()
{
llSensorRemove();
}
sensor( integer total_number )
{
counted = TRUE;
players = total_number;
state default;
}
}
state SetTargetUUID
{
state_entry()
{
llSensorRepeat(
"",
NULL_KEY,
AGENT,
radius,
PI,
1
);
}
state_exit()
{
llSensorRemove();
}
sensor( integer total_number )
{
integer x;
for(x=0;x <= total_number;x++)
if(llKey2Name(llDetectedKey(x)) == target_name )
target = llDetectedKey(x);
if(target == NULL_KEY)
{
llSay(
0,
"I'm afraid, I can't find " + target_name + "! Choose another target..."
);
if(random) state SearchingTarget;
else state GameStarted;
} else state WaitingQuestion;
}
no_sensor()
{
resetScript();
if(random) state SearchingSource;
else state GameStarted;
}
}
state GameStarted
{
state_entry()
{
}
touch_start( integer total_number )
{
if( source != NULL_KEY && source != llDetectedKey(0) )
llInstantMessage(
llDetectedKey(0),
"Please wait your turn, " + llKey2Name(source) + " is writing his question. Thanks"
);
else
{
source = llDetectedKey(0);
state SearchingTarget;
}
}
}
state SearchingSource
{
state_entry()
{
llSensorRepeat( "",
NULL_KEY,
AGENT,
radius,
PI,
1
);
}
state_exit()
{
llSensorRemove();
}
sensor( integer total_number )
{
integer x;
x = rand( 0, ( total_number - 1 ) );
source = llDetectedKey(x);
llSay(
0,
"The lucky one is: " + llKey2Name( source )
);
state SearchingTarget;
}
no_sensor()
{
resetScript();
state GameStarted;
}
}
state SearchingTarget
{
state_entry()
{
channel = (integer)(llFrand(-1000000000.0) - 1000000000.0);
llListen(channel, "", source, "");
if(!random)
llSay(
0,
header + llKey2Name(source) + " wanna ask something..\n\n"
);
llSensorRepeat( "",
NULL_KEY,
AGENT,
radius,
PI,
intervals
);
}
state_exit()
{
llListenRemove(channel);
llSensorRemove();
}
sensor( integer total_number )
{
integer x;
list buttons;
if( total_number <= 9 )
{
if(!random)
buttons = ["Cancel"];
if(source == llGetOwner() || public )
buttons += ["CloseGame"];
for(x=0;x <= total_number;x++)
if((string)llKey2Name(llDetectedKey(x)) != "" && llDetectedKey(x) != source)
buttons += [(string)llKey2Name(llDetectedKey(x))];
llDialog(
source,
header + "Please choose a target who will receive the question:",
order_buttons(buttons),
channel
);
} else {
integer y;
integer cycles;
integer total;
cycles = total_number / 9;
for(y=0;y <= cycles;y++)
{
total += 9;
for(1;x <= total;x++)
if((string)llKey2Name(llDetectedKey(x)) != "" && llDetectedKey(x) != source)
buttons += [(string)llKey2Name(llDetectedKey(x))];
llDialog(
source,
header + "Please choose a target who will receive the question:",
order_buttons(buttons),
channel
);
}
}
}
no_sensor()
{
resetScript();
if(random) state SearchingSource;
else state GameStarted;
}
listen(integer _chan, string _name, key _id, string _option)
{
if( _option == "CloseGame" && _id == llGetOwner() )
{
llSay(
0,
header + "The game is ended!\n\nThanks everyone, come back soon.\n\n"
);
state default;
}
else if( _option == "Cancel" )
{
llSay(
0,
header + llKey2Name(source) + " looks like shy and he/she doesn't wanna ask anymore..\n\nI'm able again now for another question!\n\n"
);
resetScript();
if(random) state SearchingSource;
else state GameStarted;
}
else
{
target_name = _option;
state SetTargetUUID;
}
}
}
state WaitingQuestion
{
state_entry()
{
llListen(queschan, "", source, "");
llInstantMessage(
source,
"Now you can tell me your question for " + target_name + " by typing /" + (string) queschan + " blahblah"
);
}
state_exit()
{
llListenRemove(queschan);
}
listen(integer _chan, string _name, key _id, string _option)
{
string next;
if(random) next = "Now " + target_name + " have to choose the new question target!";
else next = "Now I'm available to manage another question... come on, touch me again!";
questions++;
totalques++;
llSay(
0,
header + "Question " + (string)questions + " of " + (string) totalques + " total questions.\n\nFrom: " + llKey2Name(source) + "\nTo: " + target_name + "\n\nQuestion:\n" + _option + "\n\n" + next + "\n\n"
);
if(random) {
source = target;
target = NULL_KEY;
target_name = "";
state SearchingTarget;
}
else {
resetScript();
state GameStarted;
}
}
}
