Welcome to the Second Life Forums Archive

These forums are CLOSED. Please visit the new forums HERE

Library: Elite Spanker v2.0 By BigJohn Jade

BigJohn Jade
Registered User
Join date: 5 Aug 2003
Posts: 93
11-21-2007 06:30
I just post new code for Elite Spanker v4.0. No need for this one anymore and the post should show up soon.
Nada Epoch
The Librarian
Join date: 4 Nov 2002
Posts: 1,423
11-25-2007 11:24
<swat>
_____________________
i've got nothing. ;)
Void Singer
Int vSelf = Sing(void);
Join date: 24 Sep 2005
Posts: 6,973
Ahahahahahaha
11-25-2007 11:47
From: Nada Epoch
<swat>

Thanks Nada... as if the tittle didn't get me laughing enough hehehe

er and good work, very cool to include links to animations
_____________________
|
| . "Cat-Like Typing Detected"
| . This post may contain errors in logic, spelling, and
| . grammar known to the SL populace to cause confusion
|
| - Please Use PHP tags when posting scripts/code, Thanks.
| - Can't See PHP or URL Tags Correctly? Check Out This Link...
| -
Taarius Huet
Registered User
Join date: 2 Feb 2007
Posts: 7
Allow?
12-10-2007 02:51
Hey John,

thanks for that script, it's great. I wonder if there's a way to set permissions who is allowed to spank the wearer of the spanker. Like an allow-list or right in the script. That would really be great. I might even pay for a spanker with a configurable 'allow' feature ;)


Thanks

Taarius
Void Singer
Int vSelf = Sing(void);
Join date: 24 Sep 2005
Posts: 6,973
12-10-2007 12:15
From: Taarius Huet
Hey John,

thanks for that script, it's great. I wonder if there's a way to set permissions who is allowed to spank the wearer of the spanker. Like an allow-list or right in the script. That would really be great. I might even pay for a spanker with a configurable 'allow' feature ;)


Thanks

Taarius

simplest way? add a list at the top, include the names of people allowed, in the touch event
if (~llListFindList( allowed_list, llDetectedName( 0 ) )){
//-- rest of the touch code
}

more complex would be to add a notecard reader, that fills that list
_____________________
|
| . "Cat-Like Typing Detected"
| . This post may contain errors in logic, spelling, and
| . grammar known to the SL populace to cause confusion
|
| - Please Use PHP tags when posting scripts/code, Thanks.
| - Can't See PHP or URL Tags Correctly? Check Out This Link...
| -
Taarius Huet
Registered User
Join date: 2 Feb 2007
Posts: 7
Ty :)
12-12-2007 07:38
Thanks for your answer Void, but how would that look as a whole script then? *blushes* I have no clue about scripting as it seems ;)
Gabriellea Ferrentino
Registered User
Join date: 4 Oct 2007
Posts: 4
completed Spanker...
12-27-2007 10:45
Id love to get the completed won with the allowed list inserted too!! Id even give you the first spanking!! lol
Void Singer
Int vSelf = Sing(void);
Join date: 24 Sep 2005
Posts: 6,973
12-30-2007 01:00
because I was bored
CODE
// Elite Spanker v2.0 By BigJohn Jade

// You cant resale this script code in any object at all.

// Spam chat free Spanker that also tracks how many times person has been spanked, the counter will reset when you take it off and put it back on.

// The spanker will rename to your first name then Spanker-v2.0-hovertext (Wear Me!) when attach the object.

// You can download the Avatar Animations from this url: http://secondlife.com/community/avatar.php

// Just upload the animation called avatar_express_embarrased and make sure that you don't loop it, you can make your own animation as well cause the script can read any animation from the content.

// Sound UUID file.
string SoundFile ="475a3e83-6801-49c6-e7ad-d6386b2ecc29";

// End name of the spanker
string ObjectName="Spanker-v2.0-hovertext (Wear Me!)";

// Text color white.
vector Vector_Color = <1.00000, 1.00000, 1.00000>;

//-- added by Void Singer
list gListAllowedNames = ["Void Singer", "Gabriellea Ferrentino", "Taarius Huet"];

// Don't edit under this line.
integer IHavePermission = FALSE;
integer GetAttach = FALSE;
integer lT;
list UserName;
string FirstName;
float TimeIt = 3.0;
integer Count;
integer TotalA;
list lA;
integer WHICH;

integer CheckForAnimations()
{
integer i;
TotalA = llGetInventoryNumber(INVENTORY_ANIMATION);

// clear and rebuild the animation list
lA = llDeleteSubList(lA,0,-1);
for ( i = 0; i < TotalA; i++ )
{
lA += llGetInventoryName(INVENTORY_ANIMATION,i);
}
if (TotalA < 1)
{
llInstantMessage(llGetOwner(),"Sorry no animations was found, you must add 1 animation to the content of this object.");

return TRUE;
}
return FALSE;
}
integer CheckForMaxAnimations()
{
integer i;
TotalA = llGetInventoryNumber(INVENTORY_ANIMATION);

// clear and rebuild the animation list
lA = llDeleteSubList(lA,0,-1);
for ( i = 0; i < TotalA; i++ )
{
lA += llGetInventoryName(INVENTORY_ANIMATION,i);
}
if (TotalA > 1)
{
llInstantMessage(llGetOwner(),"Sorry max animations are 1, you must remove some animations from the content of this object.");

return TRUE;
}
return FALSE;
}
LetsTimeIt()
{
lT = (integer)llGetTime() + (integer)TimeIt;
llSetTimerEvent(1);
}


PlaySoundFile()
{
float volume = 0.8;
llStopSound();
llPlaySound(SoundFile, volume);
}

default
{
state_entry()
{
UserName = llParseString2List(llKey2Name(llGetOwner()),[" ","| "," |"," | "],[]);
FirstName = llList2String(UserName,0);
llSetObjectName((string)FirstName+"'s "+ObjectName);
llSetText("",Vector_Color, 1);
}
attach(key id)
{
if(id == NULL_KEY)
{
GetAttach = FALSE;
llSetObjectName((string)FirstName+"'s "+ObjectName);
return;
}
else
if(CheckForMaxAnimations())
{
return;
}
else
if(CheckForAnimations())
{
return;
}
else
GetAttach = TRUE;
Count = 0;
llRequestPermissions(id,PERMISSION_TRIGGER_ANIMATION);
UserName = llParseString2List(llKey2Name(llGetOwner()),[" ","| "," |"," | "],[]);
FirstName = llList2String(UserName,0);
llSetObjectName((string)FirstName+"'s "+ObjectName);
llInstantMessage(llGetOwner(),"Ready (bytes free"+" "+(string)llGetFreeMemory()+")");
}

touch_start(integer total_number)
{
//-- if statemenet added by Void Singer
if (~llListFindList( gListAllowedNames, (list)llDetectedName( 0 ) )){
integer TouchTrack;
key person = llDetectedKey(TouchTrack);
string user;
if(!GetAttach)
{
llInstantMessage(person,"I must be attach before you can use me!");
return;
}
else
LetsTimeIt();
PlaySoundFile();
integer i;
TotalA = llGetInventoryNumber(INVENTORY_ANIMATION);

// clear and rebuild the animation list
lA = llDeleteSubList(lA,0,-1);
for ( i = 0; i < TotalA; i++ )
{
lA += llGetInventoryName(INVENTORY_ANIMATION,i);
}
llStartAnimation(llList2String(lA, WHICH));
WHICH++;
if (WHICH >= TotalA)
{
WHICH = 0;
}
if (person == llGetOwner())
{
llSetText("\n\n"+(string)FirstName+" has spanked their own ass!\n\n"+(string)FirstName+"'s ass has been spanked "+(string)Count+" times.",Vector_Color, 1);
return;
}
else
Count++;
user+="\n"+llKey2Name(person)+" has spanked that ass!\n\n"+(string)FirstName+"'s ass has been spanked "+(string)Count+" times.";
llSetText("\n"+user,Vector_Color, 1);
}
}
run_time_permissions(integer permissions)
{
if (permissions == PERMISSION_TRIGGER_ANIMATION)
{
IHavePermission = TRUE;
}
}

timer()
{
if(llGetTime() > lT)
{
llSetText("",Vector_Color, 1);
llSetTimerEvent(0.0);
}
}
}

just put the names you want after gListAllowedNames
_____________________
|
| . "Cat-Like Typing Detected"
| . This post may contain errors in logic, spelling, and
| . grammar known to the SL populace to cause confusion
|
| - Please Use PHP tags when posting scripts/code, Thanks.
| - Can't See PHP or URL Tags Correctly? Check Out This Link...
| -
Usagi Musashi
UM ™®
Join date: 24 Oct 2004
Posts: 6,083
12-30-2007 01:20
Very nice, and its good to see BigJohn Jade posting again..........


Usagi
Gabriellea Ferrentino
Registered User
Join date: 4 Oct 2007
Posts: 4
12-30-2007 11:13
Thank you Big John! Muah!
Void Singer
Int vSelf = Sing(void);
Join date: 24 Sep 2005
Posts: 6,973
12-30-2007 17:47
when did my name become big john? I just cut, pasted, and inserted the changes
_____________________
|
| . "Cat-Like Typing Detected"
| . This post may contain errors in logic, spelling, and
| . grammar known to the SL populace to cause confusion
|
| - Please Use PHP tags when posting scripts/code, Thanks.
| - Can't See PHP or URL Tags Correctly? Check Out This Link...
| -