// ssm2017 Binder : ssm_welcome_message 
// @copyright  Copyright (C) 2007 ssm2017 Binder (S.Massiaux). All rights reserved.
// @license  GNU/GPL, http://www.gnu.org/licenses/gpl-2.0.html 
// ssm2017_authdoor_diaph is free software. This version may have been modified pursuant to the 
// GNU General Public License, and as distributed it includes or is derivative 
// of works licensed under the GNU General Public License 
// or other free or open source software licenses.  
// common vars 
list avats = [];
string name;
// time to delete the list
float time = 300;
default
{
    state_entry()
    {
        llSetTimerEvent(time);
    }
    collision_start(integer num)
    {
        name = llDetectedName(0);
        string msg = "VOICE FRANCE vous souhaite la bienvenue " + name + "/Welcome to VOICE FRANCE " + name;
        if ( llListFindList( avats, (list)name)== -1 )
        {
            llWhisper(0, msg);
            avats += [name];
        }
    }
    timer()
    {
        avats = [];
    }
}