can anyone help
 

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

can anyone help

Started by damo, 22 September, 2004, 10:48:53

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

damo

when you run the cmd it posts in main for all to see is there any way to stop the cmd from being shown.   this is the script.
BotName = "LeonBot"
SeenTrigger = "!seen"

minLen = 4
maxLen = 20
seenArray={}

function Main()
frmHub:RegBot(BotName)
end

function NewUserConnected(curUser)
local boolDisc = 0
if strlen(curUser.sName) < minLen then
curUser:SendPM(BotName, "Your nick is to short, a minimum of "..minLen.." chars is required!")
curUser:SendPM(BotName, "Disconnecting...")
curUser:Disconnect()
boolDisc = 1
elseif strlen(curUser.sName) > maxLen then
curUser:SendPM(BotName, "Your nick is to long, a maximum of "..maxLen.." chars is required!")
curUser:SendPM(BotName, "Disconnecting...")
curUser:Disconnect()
boolDisc = 1
elseif ( strfind (curUser.sName, " ", 1, 1) ) then
curUser:SendPM(BotName, "Spaces not allowed in nicknames!")
curUser:SendPM(BotName, "Disconnecting...")
curUser:Disconnect()
boolDisc = 1
end
if (boolDisc == 0) then
seenArray[strlower(curUser.sName)]=date(curUser.sName.." connected at %d/%m/%Y %T and is still here.")
end
end

function OpConnected(curUser)
seenArray[strlower(curUser.sName)]=date(curUser.sName.." connected at %d/%m/%Y %T and is still here.")
end

function OpDisconnected(curUser)
seenArray[strlower(curUser.sName)]=date(curUser.sName.." disconnected at %d/%m/%Y %T and has not been seen since.")
end

function UserDisconnected(curUser)
seenArray[strlower(curUser.sName)]=date(curUser.sName.." disconnected at %d/%m/%Y %T and has not been seen since.")
end

function DataArrival(curUser, data)
seenArray[strlower(curUser.sName)]=date(curUser.sName.." was last seen at %d/%m/%Y %T writing things.")
if( strsub(data, 1, 1) == "<" ) then
data=strsub(data,1,strlen(data)-1)
_,_,cmd,arg = strfind( data, "%b<>%s+(%S+)%s+(%S+)" )
if (cmd == SeenTrigger) then
if (strlower(arg) == strlower(curUser.sName)) then
SendToAll(BotName, "You should not do #seen's for yourself ;)" )
elseif (seenArray[strlower(arg)] ~= nil) then
SendToAll(BotName, "User: "..seenArray[strlower(arg)] )
else
SendToAll(BotName, "I have not seen "..arg.."!" )
end
end
end
end

NightLitch

BotName = "LeonBot" 
SeenTrigger = "!seen" 

minLen = 4 
maxLen = 20 
seenArray={} 

function Main() 
frmHub:RegBot(BotName) 
end 

function NewUserConnected(curUser) 
	local boolDisc = 0 
	if strlen(curUser.sName) < minLen then 
		curUser:SendPM(BotName, "Your nick is to short, a minimum of "..minLen.." chars is required!") 
		curUser:SendPM(BotName, "Disconnecting...") 
		curUser:Disconnect() 
		boolDisc = 1 
	elseif strlen(curUser.sName) > maxLen then 
		curUser:SendPM(BotName, "Your nick is to long, a maximum of "..maxLen.." chars is required!") 
		curUser:SendPM(BotName, "Disconnecting...") 
		curUser:Disconnect() 
		boolDisc = 1 
	elseif ( strfind (curUser.sName, " ", 1, 1) ) then 
		curUser:SendPM(BotName, "Spaces not allowed in nicknames!") 
		curUser:SendPM(BotName, "Disconnecting...") 
		curUser:Disconnect() 
		boolDisc = 1 
	end 
	if (boolDisc == 0) then 
		seenArray[strlower(curUser.sName)]=date(curUser.sName.." connected at %d/%m/%Y %T and is still here.") 
	end 
end 

function OpConnected(curUser) 
	seenArray[strlower(curUser.sName)]=date(curUser.sName.." connected at %d/%m/%Y %T and is still here.") 
end 

function OpDisconnected(curUser) 
	seenArray[strlower(curUser.sName)]=date(curUser.sName.." disconnected at %d/%m/%Y %T and has not been seen since.") 
end 

function UserDisconnected(curUser) 
	seenArray[strlower(curUser.sName)]=date(curUser.sName.." disconnected at %d/%m/%Y %T and has not been seen since.") 
end 

function DataArrival(curUser, data) 
	seenArray[strlower(curUser.sName)]=date(curUser.sName.." was last seen at %d/%m/%Y %T writing things.") 
	if( strsub(data, 1, 1) == "<" ) then 
		data=strsub(data,1,strlen(data)-1) 
		local _,_,cmd,arg = strfind( data, "%b<>%s+(%S+)%s+(%S+)" ) 
		if (cmd == SeenTrigger) then 
			if (strlower(arg) == strlower(curUser.sName)) then 
				SendToAll(BotName, "You should not do #seen's for yourself ;)" ) 
			elseif (seenArray[strlower(arg)] ~= nil) then 
				SendToAll(BotName, "User: "..seenArray[strlower(arg)] ) 
			else 
				SendToAll(BotName, "I have not seen "..arg.."!" ) 
			end 
			return 1
		end 
	end 
end

This should do the trick...

/NL
//NL

damo

cheers nightlitch works fine now

SMF spam blocked by CleanTalk