gate_probe_server

integer on = 0;
default
{
    state_entry()
    {
        llListen(-905000, "", "", "");
        llListen(-805000, "", "", "");
        llListen(-505000, "", "", "");
        llListen(-605000, "", "", "");
    }
    listen(integer c, string n, key id, string message)
    {
        integer a = llSubStringIndex(message, "destination");
        if (a != -1)
        {
            llWhisper(0,"Send Probe Command");
            on = 1;
            llSleep(5);
            llShout(-804000,"stargate probe");
            llShout(-904000,"stargate probe");
            llShout(-604000,"stargate probe");
            llShout(-504000,"stargate probe");
        }
        integer f = llSubStringIndex(message, "probe");
        if (f != -1 && on == 1)
        {
                on = 0;
                list probeL = llParseString2List(message,["|"],["|"]);
                string parcel = llList2String(probeL,4);
                string desc = llList2String(probeL,5);
                string fps = llList2String(probeL,2);
                string time = llList2String(probeL,3);
                string dam = llList2String(probeL,7);
                string scr = llList2String(probeL,8);
                string ava = llList2String(probeL,6);
                string probe_chat = "Parcel Name: "+parcel+" Parcel Desc: "+desc+" FPS: "+fps+" Sim Time: "+time+" Damage: "+dam+" Sripts: "+scr+" Avatare: "+ava;
                llSay(0,probe_chat);
        }
    }
}