cmd not to be seen in main
 

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

cmd not to be seen in main

Started by (=CyberPimp=), 18 June, 2004, 00:16:35

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

(=CyberPimp=)

Can someone fix this bot so the command +joke don?t
show on main... PLZ


-- JokeBot .lua by Cloud
--Some more content by [ANCIENT]Klismo :P

botname = "JokeBot"

sec = 1000
min = 60 * sec
hour = 60 * min

Command = "+Joke"

jokes = {

"SHE WAS SO BLONDE THAT... She thought a quarterback was a refund.",
}


function Main()
frmHub:RegBot(botname)
SetTimer(2 * hour)
StartTimer()
end



function DataArrival(user, data)
if (strsub(data, 1, 1) == "<") or ( strsub(data, 1, 4) == "$To:" ) then
data = strsub(data,1,strlen(data)-1)

if (strfind(strlower(data), strlower(Command))) then
Joke = jokes[random(1,getn(jokes))]
user:SendPM(botname, ""..Joke.." =P")

end
end
end

pHaTTy

QuoteOriginally posted by (=CyberPimp=)
Can someone fix this bot so the command +joke don?t
show on main... PLZ


-- JokeBot .lua by Cloud
--Some more content by [ANCIENT]Klismo :P

botname = "JokeBot"

sec = 1000
min = 60 * sec
hour = 60 * min

Command = "+Joke"

jokes = {

"SHE WAS SO BLONDE THAT... She thought a quarterback was a refund.",
}


function Main()
frmHub:RegBot(botname)
SetTimer(2 * hour)
StartTimer()
end



function DataArrival(user, data)
if (strsub(data, 1, 1) == "<") or ( strsub(data, 1, 4) == "$To:" ) then
data = strsub(data,1,strlen(data)-1)

if (strfind(strlower(data), strlower(Command))) then
Joke = jokes[random(1,getn(jokes))]
user:SendPM(botname, ""..Joke.." =P")

end
end
end


add return 1 below this line: user:SendPM(botname, ""..Joke.." =P")
Resistance is futile!

(=CyberPimp=)

Thx this has been bugging me for long time hehe  :D

pHaTTy

QuoteOriginally posted by (=CyberPimp=)
Thx this has been bugging me for long time hehe  :D

np, but if u check out in the finished scripts, or seacrh for edited joke bot i think ya will find one much beter ;-)
Resistance is futile!

SMF spam blocked by CleanTalk