Looking for Collision Auto Group Invite

I am looking for a collision group invite script. Not something an avatar has to click on, but something that automatically promts you to join group when teleporting in.

Thanks, Angelis Dreamscape

I posted here in case anyone else would like. The script assumes the group you are inviting to join is an open group. Also you want to put the name of the group to join into the description box of the collision prim.

default
{
state_entry()
{
}

collision_start(integer total_number)
{
integer x;
for(x=0;x<total_number;x=x+1)
{
llInstantMessage(llDetectedKey(x), "Please open your chat history and click this link to join the "+llGetObjectDesc()+" group : " + "secondlife:///app/group/" + (string)(llGetObjectDetails(llGetKey(), [OBJECT_GROUP])) + "/about";
}
}

on_rez(integer num)
{
llResetScript();
}
}