get("action", "none"); if($act eq "unlock") { $EQW->UnlockWorld(); } elsif($act eq "lock") { $EQW->LockWorld(); } elsif($act eq "lsreconnect") { $EQW->LSReconnect(); } print "{"; if($EQW->LSConnected()) { print "\"connected\" : \"1\","; } else { print "\"connected\" : \"0\","; } if($EQW->GetConfig("Locked") eq "true") { print "\"locked\" : \"1\""; } else { print "\"locked\" : \"0\""; } print "}"; ?>