Инфо В Чате (как На Verlihub)

sMsg=[[
<Hub-Security>
- [::] Your info:
- [::] Nick: [NICK]
- [::] IP: [IP]
- [::] Class: [PROFILE]

]]
sBot=nil
bNewApi=true
sOwner="Setuper"

profiles={
[-1]="Незарегистрированный пользователь",
[0]="Админ",
[1]="ОПератор",
[2]="VIP",
[3]="Пользователь"
}

function Main()
bNewApi=false
if not sBot then sBot=frmHub:GetHubBotName() end
end

function OnStartup()
if not sBot then sBot=(SetMan.GetString(21) or "Hub-Security") end
end

function NewUserConnected(tUser)
sMsg=string.gsub(sMsg,"%[HUBNAME%]",frmHub:GetHubName())
sMsg=string.gsub(sMsg,"%[OWNER%]",sOwner)
sMsg=string.gsub(sMsg,"%[BOTNAME%]",frmHub:GetHubBotName())
sMsg=string.gsub(sMsg,"%[ONLINE%]",TimeOnline(frmHub:GetUpTime()))
sMsg=string.gsub(sMsg,"%[SHARE%]",GetNormalShare(frmHub:GetCurrentShareAmount()+tUser.iShareSize))
sMsg=string.gsub(sMsg,"%[NICK%]",tUser.sName)
sMsg=string.gsub(sMsg,"%[IP%]",tUser.sIP)
sMsg=string.gsub(sMsg,"%[SHARESIZE%]",GetNormalShare(tUser.iShareSize))
sMsg=string.gsub(sMsg,"%[PERCENT%]",SharePerc(tUser,frmHub:GetCurrentShareAmount()))
sMsg=string.gsub(sMsg,"%[PROFILE%]",profiles[tUser.iProfile])
sMsg=string.gsub(sMsg,"%[TAG%]",tUser.sTag)
sMsg=string.gsub(sMsg,"%[DESC%]",tUser.sDescription~="" and tUser.sDescription or "не выбрано")
sMsg=string.gsub(sMsg,"%[EMAIL%]",tUser.sEmail~="" and tUser.sEmail~=" " and tUser.sEmail or "не выбран")
sMsg=string.gsub(sMsg,"%[CONNECTION%]",tUser.sConnection)
tUser:SendData(sMsg)
end

function UserConnected(tUser)
Core.GetUserAllData(tUser)
sMsg=string.gsub(sMsg,"%[HUBNAME%]",SetMan.GetString(0))
sMsg=string.gsub(sMsg,"%[OWNER%]",sOwner)
sMsg=string.gsub(sMsg,"%[BOTNAME%]",SetMan.GetString(21))
sMsg=string.gsub(sMsg,"%[ONLINE%]",TimeOnline(Core.GetUpTime()))
sMsg=string.gsub(sMsg,"%[SHARE%]",GetNormalShare(Core.GetCurrentSharedSize()+tUser.iShareSize))
sMsg=string.gsub(sMsg,"%[NICK%]",tUser.sNick)
sMsg=string.gsub(sMsg,"%[IP%]",tUser.sIP)
sMsg=string.gsub(sMsg,"%[SHARESIZE%]",GetNormalShare(tUser.iShareSize))
sMsg=string.gsub(sMsg,"%[PERCENT%]",SharePerc(tUser,Core.GetCurrentSharedSize()))
sMsg=string.gsub(sMsg,"%[PROFILE%]",profiles[tUser.iProfile])
sMsg=string.gsub(sMsg,"%[TAG%]",tUser.sTag)
sMsg=string.gsub(sMsg,"%[DESC%]",tUser.sDescription~="" and tUser.sDescription or "не выбрано")
sMsg=string.gsub(sMsg,"%[EMAIL%]",tUser.sEmail~="" and tUser.sEmail~=" " and tUser.sEmail or "не выбран")
sMsg=string.gsub(sMsg,"%[CONNECTION%]",tUser.sConnection)
Core.SendToUser(tUser,sMsg)
end

function TimeOnline(iSec)
local iCount, iTime, sResult, sSumb = 0, 0, "", ""
if tonumber(iSec) then
iCount = tonumber(iSec)
else
iCount = 0
end
if iCount >= 60 then
iTime = math.floor(iCount / 60)
if iTime <= 20 then
if iTime == 1 then return tostring(iTime).." минуту"
elseif iTime > 1 and iTime < 5 then return tostring(iTime).." минуты"
else return tostring(iTime).." минут" end
else
local iTmp = tonumber(string.sub(tostring(iTime), string.len(tostring(iTime)), -1))
if iTmp == 1 then return tostring(iTime).." минуту"
elseif iTmp > 1 and iTmp < 5 then return tostring(iTime).." минуты"
else return tostring(iTime).." минут" end
end
else
return "1 минуту"
end
end

function SharePerc(tUser,s)
local iSharePerc=100
if (tUser.iShareSize+s)~=0 then
iSharePerc=math.floor(100*tUser.iShareSize/(tUser.iShareSize+s))
end
if tUser.iShareSize==0 then
return "0%%"
else
if iSharePerc < 1 then
return "<1%%"
else
return tostring(iSharePerc).."%%"
end
end
end

function GetNormalShare(iShare)
local iCount = 0
if tonumber(iShare) then
iCount = tonumber(iShare)
else
iCount = 0
end
if iCount >= 1099511627776 then return tostring(math.floor(1000 * iCount / 1099511627776) / 1000).." TБ"
elseif iCount >= 1073741824 then return tostring(math.floor(1000 * iCount / 1073741824) / 1000).." ГБ"
elseif iCount >= 1048576 then return tostring(math.floor(1000 * iCount / 1048576) / 1000).." МБ"
elseif iCount >= 1024 then return tostring(math.floor(1000 * iCount / 1024) / 1000).." КБ"
else return tostring(iCount).." Б"
end
end

RegConnected=UserConnected

function OpConnected(tUser)
if bNewApi then UserConnected(tUser)
else NewUserConnected(tUser) end
end

function UserConnected(tUser)
local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg"
Core.SendToUser(tUser,"\n[::] Your info: \n[::] Nick: "..tUser.sNick.." \n[::] Class: "..Profile.." ("..tUser.iProfile..") \n[::] IP: "..tUser.sIP.." \n[::] Country Code: "..tostring(IP2Country.GetCountryCode(tUser.sIP)))
end
RegConnected = UserConnected
OpConnected = UserConnected

function UserConnected(tUser)
local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg"
Core.SendToUser(tUser,"\n[::] Your info: \n[::] Nick: "..tUser.sNick.." \n[::] Class: "..Profile.." ("..tUser.iProfile..") \n[::] IP: "..tUser.sIP.." \n[::] Country Code: "..tostring(IP2Country.GetCountryName(tUser)))
end
RegConnected = UserConnected
OpConnected = UserConnected