AriasCreations/StallBoard
3
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Get stall scripts functional

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

88
LSL/raw/Menu.lsl
View file

@ -21,10 +21,9 @@ default
g_iAuthorized=1;
g_kAuthorized=i;
RestoreFromKVP();
PartialRestoreKVP();
MainMenu(i);
}else if(n == 0x004f) {
API_SERVER = DecipherService(m,"api");
} else if(n == 0x1D)
{
g_lSupport = llJson2List(m);
@ -37,24 +36,21 @@ default
}
} else if(n == LINK_MENU_RETURN)
{
list returnMenu = llParseString2List(m,["|"],[]);
string sIdent = llList2String(returnMenu,0);
string sButton = llList2String(returnMenu,1);
string sIdent = llJsonGetValue(m, ["id"]);
string sExtra = llJsonGetValue(m, ["extra"]);
string sButton = llJsonGetValue(m,["reply"]);
switch(sIdent)
{
case "menu~main":{
switch(sButton){
case "Import":{
GetArbitraryData(i, IMPORT_MENU_TEXT, "main~import");
case "Utils..": {
UtilsMenu(i);
break;
}
case "-exit-":{
llInstantMessage(i, "Menu Closed!");
llMessageLinked(LINK_THIS, LINK_MENU_REMOVE, "", i);
break;
}
case "Export":{
llWhisper(5, llList2Json(JSON_OBJECT,["cmd","set_memstick","leasee",g_kLeasedTo,"expire_time",g_iExpireAt,"texture",g_kTexture,"owner",g_kOwner]));
break;
}
case "Lease":{
@ -100,15 +96,6 @@ default
}
break;
}
case "PermaLease":{
llMessageLinked(LINK_SET, 0x3E, llList2Json(JSON_OBJECT, ["op", "perma"]), "");
break;
}
case "*RESET*":{
llMessageLinked(LINK_SET, 0x3E, llList2Json(JSON_OBJECT, ["op", "reset"]), "");
llResetScript();
break;
}
case "TimeRemain":{
if(g_iExpireAt == -1){
llSay(0, "No Expiration is set");
@ -130,10 +117,6 @@ default
GetArbitraryData(i, HEADER+"What is the owner's secondlife name?", "main~owner");
break;
}
case "MemStick":{
llGiveInventory(i,"Stall Board Flash Drive [ZNI]");
break;
}
case "TransferLease":{
GetArbitraryData(i, HEADER+"Enter the username of the person you want to transfer this lease to", "main~leasetrans");
break;
@ -142,6 +125,50 @@ default
GetArbitraryData(i, HEADER+"Enter the name you want displayed on the panel. This is useful when Unicode is showing as question marks. Please only input ASCII.\n \n* To clear the current preference, submit the leave the box empty and hit submit.", "main~name");
break;
}
default:{
MainMenu(i);
llSay(0, "Button : "+sButton+" not implemented");
break;
}
}
break;
}
case "menu~utils": {
switch(sButton) {
case "-exit-":{
llInstantMessage(i, "Menu Closed!");
break;
}
case "Import":{
GetArbitraryData(i, IMPORT_MENU_TEXT, "main~import");
break;
}
case "Reboot":{
llMessageLinked(LINK_SET, 0x3E, llList2Json(JSON_OBJECT, ["op", "reboot"]), i);
break;
}
case "PermaLease":{
llMessageLinked(LINK_SET, 0x3E, llList2Json(JSON_OBJECT, ["op", "perma"]), i);
break;
}
case "*RESET*":{
llMessageLinked(LINK_SET, 0x3E, llList2Json(JSON_OBJECT, ["op", "reset"]), i);
llResetScript();
break;
}
case "main..": {
MainMenu(i);
break;
}
case "MemStick":{
llGiveInventory(i,"Stall Board Flash Drive [ZNI]");
break;
}
case "Export":{
llWhisper(5, llList2Json(JSON_OBJECT,["cmd","set_memstick","leasee",g_kLeasedTo,"expire_time",g_iExpireAt,"texture",g_kTexture,"owner",g_kOwner]));
break;
}
case Checkbox(bool(g_iMask & MASK_WHITEFRAME), "White Frame"):{
g_iMask = mask(TOGGLE, g_iMask, MASK_WHITEFRAME);
@ -151,10 +178,6 @@ default
break;
}
case "Reboot":{
llMessageLinked(LINK_SET, 0x3E, llList2Json(JSON_OBJECT, ["op", "reboot"]), "");
break;
}
case Checkbox(bool(g_iMask & MASK_LOGO),"Logo"):{
g_iMask = mask(TOGGLE, g_iMask, MASK_LOGO);
@ -178,11 +201,6 @@ default
Menu(i, "Pick a color, or enter a custom one", ["colormenu"], "CTxt");
break;
}
default:{
MainMenu(i);
llSay(0, "Button : "+sButton+" not implemented");
break;
}
}
break;
}