Reduce the range of shouts PLEASE

float IGNORE_TIME = 60.0; // clear already_heard list every 60 seconds
float BREATH_TIME = 5.0;  // And don't shout mor ethan once every 5 seconds regardless.

list already_heard;
float last_shouted;
default
{
  state_entry()
  {
    llListen(0,"",NULL_KEY,"");
    llSetTimerEvent(IGNORE_TIME);
  }
  listen(integer chan,string name,key id,string message)
  {
    llSensor("",id,AGENT|ACTIVE,96,PI);
  }
  sensor(integer n)
  {
    // 20 meters is the limit, allow 5 meters extra in case they moved a bit.
    if(llVecDist(llDetectedPos(0),llGetPos()) < 25)
      return;
    // Limit repeat complaints.
    float now = llGetTime();
    if(last_shouted > now - BREATH_TIME)
      return;
    key id = llDetectedKey(0);
    if(llListFindList(already_heard,[id]) != -1)
      return;
    already_heard += [id];
    last_shouted = now;

    // Be more polite about people shouting.
    if(llDetectedType(0) == AGENT)
    {
      llInstantMessage(id,"Shhhh...");
      return;
    }

    // And less polite about scripts.
    llShout(0,"KEEP IT DOWN OUT THERE!");
  }
  timer()
  {
    already_heard = [];
  }
}

1. Reduce llShout(0, msg) to 40m, ie only for channel zero shouts
   
2. Give the client a box in which to specify the range for your message from 1m to 100m, with the default being 20m
   
3. Add the same functionality to scripts with an llBroadcast(channel, range, message) function, with a limit of 40m for channel zero and no limit for other channels (may go no further than neighbouring sims)
   

1. Special case... if the range is 0, the message is sent to all objects in the same sim (ie, as if it was 880, but there's no sim-sim traffic).