72 lines
2.8 KiB
Text
72 lines
2.8 KiB
Text
|
|
integer DEBUG = FALSE;
|
|
list g_lReqs;
|
|
string URL = "https://api.zontreck.dev/zni";
|
|
Send(string Req,string method){
|
|
g_lReqs += [Req,method];
|
|
Sends();
|
|
}
|
|
Sends(){
|
|
if(g_kCurrentReq == NULL_KEY){
|
|
DoNextRequest();
|
|
}
|
|
//g_lReqs += [llHTTPRequest(URL + llList2String(lTmp,0), [HTTP_METHOD, "POST", HTTP_MIMETYPE, "application/x-www-form-urlencoded"], llDumpList2String(llList2List(lTmp,1,-1), "?"))];
|
|
}
|
|
key g_kCurrentReq = NULL_KEY;
|
|
DoNextRequest(){
|
|
if(llGetListLength(g_lReqs)==0)return;
|
|
list lTmp = llParseString2List(llList2String(g_lReqs,0),["?"],[]);
|
|
//if(DEBUG)llSay(0, "SENDING "+llList2String(g_lReqs,1)+" REQUEST: "+URL+llList2String(g_lReqs,0));
|
|
|
|
string append = "";
|
|
if(llList2String(g_lReqs,1) == "GET")append = "?"+llDumpList2String(llList2List(lTmp,1,-1),"?");
|
|
|
|
g_kCurrentReq = llHTTPRequest(URL + llList2String(lTmp,0) + append, [HTTP_METHOD, llList2String(g_lReqs,1), HTTP_MIMETYPE, "application/x-www-form-urlencoded"], llDumpList2String(llList2List(lTmp,1,-1),"?"));
|
|
}
|
|
|
|
|
|
key g_kID = NULL_KEY;
|
|
default
|
|
{
|
|
state_entry()
|
|
{
|
|
llSetMemoryLimit(13000);
|
|
llWhisper(0, "Game Rewards Ready ("+(string)llGetFreeMemory()+"b Free)");
|
|
//llMessageLinked(LINK_SET, -30, "10", llGetOwner());
|
|
}
|
|
|
|
http_response(key r,integer s,list m,string b){
|
|
//llWhisper(0, b);
|
|
if(r==g_kCurrentReq){
|
|
g_kCurrentReq=NULL_KEY;
|
|
g_lReqs=llDeleteSubList(g_lReqs,0,1);
|
|
|
|
list lTmp = llParseString2List(b,[";;",";"],[]);
|
|
if(llList2String(lTmp,0)=="Get_Server_URL"){
|
|
string URL = llList2String(lTmp,2);
|
|
llHTTPRequest(URL, [HTTP_METHOD, "POST", HTTP_MIMETYPE, "application/x-www-form-urlencoded"], llList2Json(JSON_OBJECT, ["product", "Playing Card [ZNI]", "owner", g_kID]));
|
|
llHTTPRequest(URL, [HTTP_METHOD, "POST", HTTP_MIMETYPE, "application/x-www-form-urlencoded"], llList2Json(JSON_OBJECT, ["product", "Playing Card [ZNI]", "owner", g_kID]));
|
|
llMessageLinked(LINK_SET,-2,"","");
|
|
}
|
|
|
|
Sends();
|
|
}
|
|
}
|
|
|
|
link_message(integer s,integer n,string m,key i){
|
|
if(n==-30){
|
|
integer points=(integer)m;
|
|
if(points>=10){
|
|
// begin
|
|
llWhisper(0, "Stand by... sending reward : 2 Blank Cards");
|
|
g_kID=i;
|
|
Send("/Get_Server_URL.php?NAME=CRAFT", "GET");
|
|
}else{
|
|
llSay(0, "Sorry. A reward can only be sent if you won the game with 10 or more points. Try again next time!");
|
|
llMessageLinked(LINK_SET,-2,"","");
|
|
}
|
|
}else if(n==-1){
|
|
llResetScript();
|
|
}
|
|
}
|
|
}
|