checks share
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

checks share

Started by F_O_X, 12 March, 2008, 07:31:28

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

F_O_X

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?

SMF spam blocked by CleanTalk