mistressanubisra
-
Posts
6 -
Joined
-
Last visited
Content Type
Forums
Blogs
Knowledge Base
Posts posted by mistressanubisra
-
-
so a new error has occurried where when Fspin is launched it spits out the access error message Sorry, only owner can access to this menu in cordination of the spin and i have no access to the access functions to change it from owner group list or anyone any suggestions that may help ?
-
Thanks Again ^^
- 1
-
thank you
- 1
-
ok now further issue is that Fspin is not functioning
-
so the issue so far is that timer is coming back with a syntax error normally i dont have much issues but im at a block and could use advice and knowledge from the community
Quotelist notecardsList;
float CRATE = 20.0;
integer listener;
integer mainMenuChannel;
integer accessChannel;
integer check = 0;
integer notecardLine;
string notecardName = "!access";
key query;
string access = "Owner";
list accessList;
integer randomNumber()
{
return (integer)(llFrand(99999.0))*-1;
}
menu(key user,integer channel,string title,list buttons)
{
llListenRemove(listener);
listener = llListen(channel,"","","");
llDialog(user,title,buttons,channel);
llSetTimerEvent(25.0);
}
mainMenu(key id)
{
llListenRemove(listener);
mainMenuChannel = randomNumber();
menu(id,mainMenuChannel,"MainMenu",["-", "QSpin", "HSpin", "Fspin", "Access"]);
}
integer isOnList(list src, list find)
{
return (llListFindList(src,find) > -1);
}
integer checkAccess(key id)
{
string name = llToLower(llKey2Name(id));
return (id == llGetOwner()) || (llSameGroup(id) && access == "Group") || ( (isOnList(accessList,[name]) && (access == "List") ) || (access == "Anyone") );
}
accessMenu(key id)
{
accessChannel = randomNumber();
menu(id,accessChannel,"Access Menu " + "\n \n \n *Actual Access Level = " + access,["Owner","Group","Anyone","<< Back","List"]);
}
default
{
state_entry()
{
if (llGetInventoryType(notecardName) == INVENTORY_NOTECARD)
{
llOwnerSay("Configuring, please wait...");
notecardLine = 0;
query = llGetNotecardLine(notecardName,notecardLine);
llTargetOmega(<0,0,0.5>,0.3,PI);
}
else
{
state ready;
}
}
dataserver(key requested, string data)
{
if (requested == query)
{
if (data != EOF)
{
if ( (llGetSubString(data,0,0) != "#") && (data != "") )
{
string name = llToLower(llStringTrim(data,STRING_TRIM));
if (llGetFreeMemory() >= 1024)
{
accessList = (accessList = []) + accessList + [name];
}
else
{
llOwnerSay(name + " could not be added because the script is running out of memory");
state ready;
}
}
notecardLine++;
query = llGetNotecardLine(notecardName,notecardLine);
}
else
{
state ready;
}
}
}
on_rez(integer n)
{
if (llGetInventoryType("!config") == INVENTORY_TEXTURE)
{
llOwnerSay("Configuring, please wait...");
notecardLine = 0;
query = llGetNotecardLine(notecardName,notecardLine);
}
else
{
state ready;
}
}
}
state ready
{
state_entry()
{
llOwnerSay("--- Ready ---");
}
changed (integer c)
{
if (c & CHANGED_INVENTORY)
{
llResetScript();
}
}
touch_start(integer total_number)
{
key toucher = llDetectedKey(0);
if (checkAccess(toucher))
{
mainMenu(toucher);
}
else
{
llSay(0,"Sorry you don't have access to the main menu, current access level: " + access);
}
}
listen(integer channel, string name, key id, string message)
{
if (channel == mainMenuChannel)
{
if (message == "-")
{
}
llSetTimerEvent(0);
if (message == "QSpin")
{
llSay(0," Has Quarter Turned Me");
llTargetOmega(<0,0,-0.5>, 8.0, PI);
llSleep(0.25);
llTargetOmega(<0,0,0.5>,0.3,PI);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
check = 1;
}
if (message == "HSpin")
{
llSay(0, " Has Half Turned Me");
llTargetOmega(<0,0,-0.5>, 8.0, PI);
llSleep(0.5);
llTargetOmega(<0,0,0.5>,0.3,PI);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
check = 1;
}
if (message == "FSpin")
{
llSay(0," Has Turned Me a Full Rotation");
llTargetOmega(<0,0,-0.5>, 8.0, PI);
llSleep(1.0);
llTargetOmega(<0,0,0.5>,0.3,PI);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
llRegionSayTo(llGetOwner(),-9999999, "charge " + (string)CRATE);
check = 0;
if ( (message == "Access") && (id == llGetOwner()))
{
accessMenu(id);
}
else
{
llSay(0,"Sorry, only owner can access to this menu");
}
}
else if (channel == accessChannel)
{
if (message == "<< Back")
{
mainMenu(id);
return;
}
access = message;
llOwnerSay("Access Mode: " + message);
accessMenu(id);
}
}
timer()
{
llListenRemove(listener);
llSetTimerEvent(0);
}
}
Looking For Help With Dialog Menu Script
in LSL Scripting
Posted · Edited by mistressanubisra
wrong code submit
this is the new edits any suggestions