|
|
| Line 8: |
Line 8: |
| | | | |
| | == == | | == == |
| − |
| |
| − | == Protector Script ==
| |
| − |
| |
| − | /* ================ A World Star Production =================
| |
| − | Xengine: lsl/oss
| |
| − | Script Name: Avatar ip Security (Teleporter)
| |
| − | Creator: World Star
| |
| − | Data: 19.2.2010
| |
| − | Version: v1
| |
| − | COPYRIGHT LICENCE: Does not sell
| |
| − | Greetings by World Star
| |
| − | =============== www.virtual.world.ch.vu =============== */
| |
| − |
| |
| − | float range = 250.0; // sq. meters to scan
| |
| − | float rate = 20.0; // seconds between scanning for new visitors (higher is less lag)
| |
| − | string destination = "metaversesims.net:9000"; // Destination Region can be used in HG mode or non
| |
| − | vector landing_facing = <128,128,34>; // Landing rotation
| |
| − | vector landing_pos = <128, 128, 25>; // Landing Point
| |
| − | string ip_url = "http://astral.dyndns-server.com/php/denied inworld.txt"; //list in .txt format "127.0.0.1","123.123.123.123"
| |
| − | string Message = "You're recorded as negative!";
| |
| − | list ip_list; // = ["109.117.159.166","74.84.138.70","80.69.94.143"]; // if you dont wonna use an html request addon this
| |
| − | string detected_avatar_ip;
| |
| − | key ip_id;
| |
| − |
| |
| − | Request_allowed()
| |
| − | {
| |
| − | ip_id = llHTTPRequest(ip_url, [], "");
| |
| − | }
| |
| − |
| |
| − | boot(key id)
| |
| − | {
| |
| − | if (llOverMyLand(id) == TRUE)
| |
| − | {
| |
| − | osTeleportAgent(id,destination,landing_pos,landing_facing);
| |
| − | }
| |
| − | }
| |
| − |
| |
| − |
| |
| − | default
| |
| − | {
| |
| − | state_entry()
| |
| − | {
| |
| − | Request_allowed();// if you dont wonna use an html request remowe this
| |
| − | llSensorRepeat( "", "", AGENT, range, TWO_PI, rate );
| |
| − | llSay(0, "Sensor Running");
| |
| − | }
| |
| − |
| |
| − | sensor( integer number_detected )
| |
| − | {
| |
| − | integer i;
| |
| − | key detected_key = llDetectedKey(i);
| |
| − | detected_avatar_ip = osGetAgentIP(detected_key);
| |
| − | if(~llListFindList(ip_list,detected_avatar_ip))
| |
| − | {
| |
| − | llInstantMessage(llDetectedKey(i),Message);
| |
| − | boot(llDetectedKey(i));
| |
| − | }
| |
| − | }
| |
| − |
| |
| − | http_response(key request_id, integer status, list metadata, string body)
| |
| − | {
| |
| − | if (request_id == ip_id)
| |
| − | {
| |
| − | list ip_list = "["+body+"]";
| |
| − | llSay(0,"IP List "+body+"\n");
| |
| − | }
| |
| − | if(body=="Not Fund")
| |
| − | {
| |
| − | llSay(0,"IP List "+body+"\n");
| |
| − | }
| |
| − | }
| |
| − | }
| |
