function OnStartup()
    if loadfile(MsgBoardFile) then
        dofile(MsgBoardFile)
    end    
    Core.RegBot(BotName,"Бот доска барыг","",true)
end

rprofiles = {[0]=1,        -- Which profiles may read the board? / Какие профили могут читать доску?
            [1]=1,
            [2]=1,
            [3]=1,
            [-1]=1}      -- UnReg user
wprofiles = {[0]=1,        -- Which profiles may write to the board? / Какие профили могут писать на доске объявлений?
            [1]=1,
            [2]=1,
            [3]=1,
            [-1]=1}      -- UnReg user
dprofiles = {[0]=1,        -- Which profiles may delete messages? / Какие профили могут удалять сообщения?
            [1]=1,
            [2]=1}

local tProfiles = {      -- 1 - нет информации, 0 - есть информация
   [0] = 1,      -- Мастер
   [1] = 1,      -- Оператор
   [2] = 1,      -- VIP
   [3] = 0,      -- Зарегистрированный пользователь
  [-1] = 0,      -- Незарегистрированный пользователь
}

function UserConnected(user,data)
    if tProfiles[user.iProfile] ==0 then
    if Core.GetUserData(user,0) ~= "P" then
        Core.SendPmToUser(user, SetMan.GetString(21), "***   Внимание, "..user.sNick.."!  Вы находитесь в пассивном режиме. Бля-бля-бля...")
        return true
        end
    end
end
RegConnected = UserConnected