Get stall scripts functional

This commit is contained in:
zontreck 2024-08-13 23:21:51 -07:00
parent b6a59a6673
commit cf5144befb
4 changed files with 204 additions and 81 deletions

View file

@ -1,10 +1,6 @@
MainMenu(key kAv)
{
list lAppend = [];
// Check against ZNI Support roster
UtilsMenu(key kAv) {
list lAppend = ["Reboot", "main.."];
integer iAdmin=0;
string sAppend;
string sTag = llList2String(llGetObjectDetails(kAv,[OBJECT_GROUP_TAG]),0);
if(llListFindList(g_lSupport, [(string)kAv])!=-1 || llListFindList(g_lAdminTag, [sTag])!=-1){
if(g_kLeasedTo!=NULL)lAppend += ["PermaLease"];
@ -13,12 +9,33 @@ MainMenu(key kAv)
lAppend += ["Import", "Export", "MemStick"];
}
if(g_kLeasedTo == NULL) {
}else if(g_kLeasedTo == kAv || iAdmin || g_kOwner == kAv) {
lAppend += [Checkbox(bool(g_iMask & MASK_LOGO), "Logo"), Checkbox(bool(g_iMask & MASK_CUSTOM_TEXT_COLOR), "CustomTxt"), "SetTxtC", Checkbox(bool(g_iMask & MASK_WHITEFRAME), "White Frame"), "*RESET*"];
}
string sAppend = "\nUtility Menu";
Menu(g_kAuthorized, MAIN_MENU_TEXT+sAppend, lAppend, "menu~utils");
}
MainMenu(key kAv)
{
list lAppend = ["Utils.."];
// Check against ZNI Support roster
integer iAdmin=0;
string sAppend;
string sTag = llList2String(llGetObjectDetails(kAv,[OBJECT_GROUP_TAG]),0);
if(llListFindList(g_lSupport, [(string)kAv])!=-1 || llListFindList(g_lAdminTag, [sTag])!=-1){
iAdmin=1;
}
if(llListFindList(g_lManagerTag, [sTag])!=-1)iAdmin=1;
if(g_kLeasedTo == NULL){
lAppend += ["Lease"];
}else if(g_kLeasedTo == kAv || iAdmin || g_kOwner == kAv){
lAppend += ["End Lease", sSetor((g_iFlags&4)," ", "Renew"), "Set Picture", "Set Owner", sSetor ((g_iFlags & 2),"TransferLease", " "), "Set Name", Checkbox(bool(g_iMask & MASK_WHITEFRAME), "White Frame"), Checkbox(bool(g_iMask & MASK_LOGO), "Logo"), Checkbox(bool(g_iMask & MASK_CUSTOM_TEXT_COLOR), "CustomTxt"), "SetTxtC", "*RESET*"];
lAppend += ["End Lease", sSetor((g_iFlags&4), " ", "Renew"), "Set Picture", "Set Owner", sSetor ((g_iFlags & 2),"TransferLease", " "), "Set Name"];
sAppend += "\n* CustomTxt, and SetTxtC relate to custom text colors.";
}
@ -146,6 +163,83 @@ DeletePayload()
RestoreFromKVP()
{
g_kLeasedTo = llLinksetDataRead("lease");
if(g_kLeasedTo == "")
{
g_kLeasedTo=NULL;
llMessageLinked(LINK_SET, 0, "No Restore Info", "fw_data");
llSleep(6);
g_iHaveKVP=1;
#if DEVELOPER == 0
llMessageLinked(LINK_SET, 0, "<!c=green>Vacant - Available","fw_data");
#else
llMessageLinked(LINK_SET,0,(string)llGetFreeMemory()+" bytes free", "fw_data");
#endif
return;
}
g_kTexture = llLinksetDataRead("texture");
g_iExpireAt = (integer)llLinksetDataRead("expire");
g_kOwner = llLinksetDataRead("owner");
g_iMask = (integer)llLinksetDataRead("mask");
g_iNotification = (integer)llLinksetDataRead("notif");
g_sPreferredName = llLinksetDataRead("name");
g_kTransferID = llLinksetDataRead("transfer");
g_iTransferTimeout = (integer)llLinksetDataRead("transfer_expire");
g_vCustomColorText = (vector)llLinksetDataRead("customtxtcolor");
integer iChange=0;
if(!g_iHaveKVP)
g_iState = mask(SET, g_iState, STATE_REBOOT_PENDING);
g_iHaveKVP=1;
if(g_kLeasedTo == NULL_KEY){
DeletePayload();
llSleep(10);
llResetScript();
return;
}
if(g_kTexture == ""){
g_kTexture = NULL_KEY;
iChange++;
}
if(g_kTransferID == ""){
g_kTransferID=NULL_KEY;
g_iTransferTimeout=0;
iChange++;
}
if(llStringLength(g_kOwner) != 36){
if(g_kOwner == ""){
g_kOwner = NULL_KEY;
iChange++;
}
}
if(iChange){
SavePayload();
}
llMessageLinked(LINK_SET, 0, "<!c=red>Restored Information", "fw_data");
llSleep(10);
llSetTimerEvent(5);
//state rebootfast;
}
PartialRestoreKVP()
{
g_kLeasedTo = llLinksetDataRead("lease");
if(g_kLeasedTo==""){