Info <- array( getMaxPlayers(), null );

function onPlayerJoin( player )
{
    local values = ClanCheck( player );
    local clan = GetTok( values, " ", 1 ), status = GetTok( values, " ", 2 );
    print( player.Name + "'s clan: " + clan + ", status: " + status );
}

function ClanCheck(player)
{
    local ne = player.Name.tolower();
    local ccc,cccc;
    ccc = player.Name.slice(0,3).tolower();
    cccc = player.Name.slice(0,4).tolower();
    if ( ccc == "ulk" )
    {
        MessagePlayer("You are a ULK",player);
        local q = QuerySQL(aDB, "SELECT Nick,Status FROM ulklist WHERE Nick = '"+ne+"'" );
        MessagePlayer(" "+GetSQLColumnData(q,0)+" "+GetSQLColumnData(q,1)+"",player);
        if ( GetSQLColumnData(q,0) == null)
        {
            MessagePlayer(" Your Nick wasnt Found in the clan database . \n Please Contact your clan leader or visit the Forums " , player );
            KickPlayer(player);
            q = GetSQLNextRow(q);
        }
        else
        {
            MessagePlayer("Worked.",player);
            MessagePlayer("Worked again " , player);
            local clan = "ULK";
            local Sttus = GetSQLColumnData (q,1 );
            Info[ player.ID ].Clan = clan;
            clan[ player.ID ].Status = Sttus;
            return ( clan + " " + Sttus )
        }
    }
}