Group key finder

The Group Key Finder

Place this script in a prim and touch it to find out the set group's key.

<lsl>//Emmas Seetan
//21 September, 16:41

default
{
    state_entry()
    {
       llSetText("Touch to learn\nGroup Key", <1,1,1>, 1); //Like it says
    }

    touch_start(integer total_number)
    {
        list a = llGetObjectDetails(llGetKey(), [OBJECT_GROUP]);
        string b = llList2String(a,0);
        if (b == "00000000-0000-0000-0000-000000000000") //Black UUID, group key will fill this in
        {
            llWhisper(0, "Please set the Group for this object in EDIT under the GENERAL tab first."); //Set the group you  want
        }
        else
        {
            llWhisper(0, "This object's Group Key is: " + b); //Blank gets replaced by the group's UUID
        }
    }
}</lsl>