//Please do not sell this script. You may give it away or modify it but please do not sell it 
//except as part of a larger creation.

integer lm=1;
default
{
    state_entry()
    {
        llListen(lm,"","","");
        llListen(lm+1,"","","");
        llListen(lm+2,"","","");
        llListen(lm+3,"","","");
        llListen(lm+4,"","","");
        llListen(lm+5,"","","");
        llListen(lm+6,"","","");
        llListen(lm+7,"","","");
        llListen(lm+8,"","","");
        llListen(lm+9,"","","");
        llListen(lm+10,"","","");
        llListen(lm+11,"","","");
        llListen(lm+12,"","","");
        llListen(lm+13,"","","");
        llListen(lm+14,"","","");
        llListen(lm+15,"","","");
        llListen(lm+16,"","","");
        llListen(lm+17,"","","");
        llListen(lm+18,"","","");
        llListen(lm+19,"","","");
        llListen(lm+20,"","","");
        llListen(lm+21,"","","");
        llListen(lm+22,"","","");
        llListen(lm+23,"","","");
        llListen(lm+24,"","","");
        llListen(lm+25,"","","");
        llListen(lm+26,"","","");
        llListen(lm+27,"","","");
        llListen(lm+28,"","","");
        llListen(lm+29,"","",""); 
        llListen(lm+30,"","","");
        llListen(lm+31,"","","");
        llListen(lm+32,"","","");
        llListen(lm+33,"","","");
        llListen(lm+34,"","","");
        llListen(lm+35,"","","");
        llListen(lm+36,"","","");
        llListen(lm+37,"","","");
        llListen(lm+38,"","","");
        llListen(lm+39,"","","");
        llListen(lm+40,"","","");
        llListen(lm+41,"","","");
        llListen(lm+42,"","","");
        llListen(lm+43,"","","");
        llListen(lm+44,"","","");
        llListen(lm+45,"","","");
        llListen(lm+46,"","","");
        llListen(lm+47,"","","");
        llListen(lm+48,"","","");
        llListen(lm+49,"","","");      
    }

    listen(integer channel,string name,key id,string message)
    {
        llOwnerSay(message + " said on channel "+ (string)channel);
    }
}

// Modified to use a loop for listening to channels - easier to read and edit?
// Also added the speaker / object name to the announcement on listen which would come in handy in general use.
// - Rove Stromer

integer lm=1;
default
{
    state_entry()
    {
            integer i;
            for(i = 0; i < lm + 50; i++)
            {
                llListen(i,"","","");
            }
            llSay(0,"Now listening on set channels.");
    }

    listen(integer channel,string name,key id,string message)
    {
        llOwnerSay(name + ": " + message + " | Channel: "+ (string)channel);
        // To be contacted wherever you are on the grid eg. remote listener, uncomment the following line
        // llInstantMessage(llGetOwner(),name + ": " + message + " | Channel: "+ (string)channel);
    }
}