I have a script that modifies the user profile depending on the size of share.
sShare = 700 --// ?????? ???? ? Gb
sBot = "[VIP_????]" --// ??? ????
sOpChatName = SetMan.GetString(24) --// ?????? ' SetMan.GetString(24) ' ? "YourOpsChatName" ?? ?????? ???????? ????
function MyINFOArrival(user,data)
Core.GetUserAllData(user)
if (user.iProfile == 3) and (user.iShareSize/1073741824) >= sShare then
local sNick = user.sNick
local sPass = RegMan.GetReg(user.sNick).sPassword
RegMan.DelReg(sNick)
RegMan.AddReg(sNick,sPass,2)
Core.SendPmToNick(sNick,sBot,"?????? ????? ???? ?????? ?????? VIP, ??? ??????? ??? ????????, ?????????? ??????????? ?? ??? ??? ??? VIP.")
-- Core.SendPmToOps(sBot," ????: "..sNick.." ??? ??????? ?? VIP, ?.?. ? ???? ????? "..sShare.."gb ????.")
Core.Disconnect(sNick)
elseif (user.iProfile == 2) and (user.iShareSize/1073741824) < sShare then
local sNick = user.sNick
local sPass = RegMan.GetReg(user.sNick).sPassword
RegMan.DelReg(sNick)
RegMan.AddReg(sNick,sPass,3)
Core.SendPmToNick(sNick,sBot,"???? ???? ???????????, ?? ???? ???????? ?? Reg ?????. ??????????? ?? ???.")
-- Core.SendPmToOps(sBot," ????: "..sNick.." ??? ??????? ?? ReG, ?.?. ? ???? ????? "..sShare.."gb ????.")
Core.Disconnect(sNick)
end
end
Some DC clients, such GreyLink can emulate share. Is it possible to insert in the script checks share what it is not counterfeit?