anti clone script
 

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

anti clone script

Started by neechan, 27 September, 2004, 19:19:38

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

neechan

all i need done is to exclude operators in this script

can someone please help me out ?

------
--Clone Alert 1.0
--by Mutor The Ugly
--PM Clone login to Opchat
--
--
OpChatName = frmHub:GetOpChatName()   --Use this line for inbuilt Px opchat
--OpChatName = "opschat"      --Use this line for a scripted opchat
 
function Main()
frmHub:EnableFullData(1)
end

function DataArrival(curUser,sdata)
local _,_, user1 = strfind(sdata,"$GetINFO%s+(%S+)%s+")
if user1 ~= curUser.sName then
   user1 = GetItemByName(user1)
      
      
if user1 ~= nil then
   if user1.sIP == curUser.sIP    then
      SendPmToOps(OpChatName, "*** Cloned user = "..curUser.sName.." logged in, User is a clone of = "..user1.sName)

   end
end
end
end
-----------------

nErBoS

#1
Hi,

Here you have...

--Clone Alert 1.0 
--by Mutor The Ugly 
--PM Clone login to Opchat 
-- 
-- 
OpChatName = frmHub:GetOpChatName() --Use this line for inbuilt Px opchat 
--OpChatName = "opschat" --Use this line for a scripted opchat 

function Main() 
frmHub:EnableFullData(1) 
end 

function DataArrival(curUser,sdata) 
local _,_, user1 = strfind(sdata,"$GetINFO%s+(%S+)%s+") 
if user1 ~= curUser.sName then 
user1 = GetItemByName(user1) 

if user1 ~= nil then 
if (not user1.bOperator) then
if user1.sIP == curUser.sIP then 
SendPmToOps(OpChatName, "*** Cloned user = "..curUser.sName.." logged in, User is a clone of = "..user1.sName) 

end 
end 
end
end 
end

Best regards, nErBoS
--## nErBoS Spot ##--

neechan


SMF spam blocked by CleanTalk