Advanced Anti Bot System

Pening · Feb 2, 2009

HOW IT WORKS?

From time to time player will get message with mathematical equation. Example: 20+20 = 40, then you should say !antibot 40. If answer wont be valid, or he wont wrote it he'll be teleported.

creaturescripts.xml

Code:

<event type="login" name="AntiBotLogin" script="antibot.lua"/>
<event type="logout" name="AntiBotLogout" script="antibot.lua"/>

Create new file data/creaturescripts/scripts/antibot.lua

Code:

-- configs
local mintoanswer = 2 -- minutes to answer anti bot system
local delayAntiBot = 30 -- minutes of delay of delayAntiBot
local maxgroupid = 1 -- groupid higher than this don't have antiBotSystem Activated
local prisionpos = {x=83,y=122,z=7} -- if don't answer, go to this pos
local prisionminutes = 10 -- time inside the prision
local templepos = {x=95, y=117, z=7} -- after the prisionminutes, back to this position (temple is recommended)
-- end configs

-- local variables
local storages = {first_num = 20123, second_num = 20124, result = 20125, answer = 20126, prisioned = 20127, prisiontime = 20128, wrong_answers = 20129}
-- end local variables


function onLogin(cid)
local prisioned = getPlayerStorageValue(cid,storages.prisioned)
if (prisioned == 1) then
local prisiontime = getPlayerStorageValue(cid,storages.prisiontime)
local timenow = os.time()
if (timenow >= prisiontime) then
setPlayerStorageValue(cid,storages.prisiontime,0)
setPlayerStorageValue(cid,storages.prisioned,0)
doTeleportThing(cid, templepos)
else
prisionEvent = addEvent(checkprisioned,1000,{cid=cid})
doTeleportThing(cid, prisionpos)
end
end


if (delayAntiBot <= mintoanswer) then
debugPrint("Error! Anti Bot System debugs: variable delayAntiBot need to be higher than mintoanswer.")
else
if (getPlayerGroupId(cid) <= maxgroupid) then
antiBotEvent = addEvent(antiBot,1000,{cid=cid})
else
doPlayerSendTextMessage(cid, 20, "People with group ID higher than ".. maxgroupid .." don't have this system.")
end
end
return TRUE
end

function onLogout(cid)
stopEvent(prisionEvent)
stopEvent(antiBotEvent)
stopEvent(checkAnswerEvent)


setPlayerStorageValue(cid,storages.first_num,0)
setPlayerStorageValue(cid,storages.second_num,0)
setPlayerStorageValue(cid,storages.result,0)
setPlayerStorageValue(cid,storages.answer,0)
setPlayerStorageValue(cid,storages.wrong_answers,0)
return TRUE
end

function antiBot(parameters)
local cid = parameters.cid

local playerpos = getCreaturePosition(cid)
local playerpz = getTilePzInfo(playerpos)
local playername = getPlayerName(cid)
local prisioned = getPlayerStorageValue(cid,storages.prisioned)
if (playerpz ~= 1 and prisioned ~= 1) then
local first_num = math.random(1,9)
local second_num = math.random(1,9)
local result = first_num+second_num

setPlayerStorageValue(cid,storages.first_num,first_num)
setPlayerStorageValue(cid,storages.second_num,second_num)
setPlayerStorageValue(cid,storages.result,result)
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: Hello, "..playername.."! You have ".. mintoanswer .." minute(s) to answer how much is ".. first_num .." + ".. second_num ..". To answer say: !antibot \"number.")
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: Example: 20+20 = 40, then you would say !antibot \"40.")
checkAnswerEvent = addEvent(checkAnswer,mintoanswer*60*1000,{cid=cid})
end
antiBotEvent = addEvent(antiBot,delayAntiBot*60*1000,{cid=cid})
end

function checkAnswer(parameters)
local cid = parameters.cid
local first_num, second_num, result, answer, prisioned = getPlayerStorageValue(cid,storages.first_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.result), getPlayerStorageValue(cid,storages.answer), getPlayerStorageValue(cid,storages.prisioned)
local wrong_answers = getPlayerStorageValue(cid,storages.wrong_answers)
if (wrong_answers > 3) then
doTeleportThing(cid, prisionpos)
setPlayerStorageValue(cid,storages.wrong_answers,0)
setPlayerStorageValue(cid,storages.first_num,0)
setPlayerStorageValue(cid,storages.second_num,0)
setPlayerStorageValue(cid,storages.result,0)
setPlayerStorageValue(cid,storages.answer,0)
setPlayerStorageValue(cid,storages.prisioned,1)
setPlayerStorageValue(cid,storages.prisiontime,os.time()+(prisionminutes*60))
doPlayerSendTextMessage(cid, 20, "Time limit! You had been prisioned for ".. prisionminutes .." minute(s) because answered many wrong times.")
prisionEvent = addEvent(checkprisioned,1000,{cid=cid})
else
if (answer ~= 1 and prisioned ~= 1 and result > 0) then
doTeleportThing(cid, prisionpos)
setPlayerStorageValue(cid,storages.first_num,0)
setPlayerStorageValue(cid,storages.second_num,0)
setPlayerStorageValue(cid,storages.result,0)
setPlayerStorageValue(cid,storages.answer,0)
setPlayerStorageValue(cid,storages.prisioned,1)
setPlayerStorageValue(cid,storages.wrong_answers,0)
setPlayerStorageValue(cid,storages.prisiontime,os.time()+(prisionminutes*60))
doPlayerSendTextMessage(cid, 20, "Time limit! You had been prisioned for ".. prisionminutes .." minute(s).")
prisionEvent = addEvent(checkprisioned,1000,{cid=cid})
else
setPlayerStorageValue(cid,storages.first_num,0)
setPlayerStorageValue(cid,storages.second_num,0)
setPlayerStorageValue(cid,storages.result,0)
setPlayerStorageValue(cid,storages.answer,0)
setPlayerStorageValue(cid,storages.prisioned,0)
setPlayerStorageValue(cid,storages.wrong_answers,0)
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: You are ok, but in some minutes you are going to be asked again.")
end
end
end

function checkprisioned(parameters)
local cid = parameters.cid
local prisioned = getPlayerStorageValue(cid,storages.prisioned)
local prisiontime = getPlayerStorageValue(cid,storages.prisiontime)
local timenow = os.time()
if (prisioned == 1) then
if (timenow >= prisiontime) then
doPlayerSendTextMessage(cid, 20, "You had completed your time here in the prision! You may now relog to go to the city.")
else
prisionEvent = addEvent(checkprisioned,1000,{cid=cid})
end
end
end

talkactions.xml

Code:

<talkaction words="!antibot" script="antibot.lua"/>

Create new file data/talkactions/scripts/antibot.lua

Code:

-- local variables
local storages = {first_num = 20123, second_num = 20124, result = 20125, answer = 20126, prisioned = 20127, prisiontime = 20128, wrong_answers = 20129}
-- end local variables

function onSay(cid, words, param)
local first_num, second_num, result, answer, prisioned = getPlayerStorageValue(cid,storages.first_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.result), getPlayerStorageValue(cid,storages.answer), getPlayerStorageValue(cid,storages.prisioned)


param = tonumber(param)

if (prisioned ~= 1 and answer ~= 1 and result > 0) then
if (param == result) then
if (getPlayerStorageValue(cid,storages.wrong_answers) <= 3) then
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: Right answer, thank you for answering.")
setPlayerStorageValue(cid,storages.wrong_answers,0)
setPlayerStorageValue(cid,storages.answer,1)
setPlayerStorageValue(cid,storages.first_num,0)
setPlayerStorageValue(cid,storages.second_num,0)
setPlayerStorageValue(cid,storages.result,0)
else
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: Right answer, but you had already answered more than 3 wrong times.")
end
else
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: Wrong answer!")
wrong_answers_now = getPlayerStorageValue(cid,storages.wrong_answers)
setPlayerStorageValue(cid,storages.wrong_answers,wrong_answers_now+1)
doPlayerSendTextMessage(cid, 20, "Yunie Anti Bot System: You had already got ".. getPlayerStorageValue(cid,storages.wrong_answers).." wrong answers! The limit is 3.")
end
end
end

Credits to Yunie.

Inteligentny · Feb 2, 2009

hah its nice idea, Never saw something like this ^^ gz, I have one thing to ask, pmed u.

Keraxel · Feb 2, 2009

local first_num = getPlayerStorageValue(cid,storages.first_num)
local second_num = getPlayerStorageValue(cid,storages.second_num)
local result = getPlayerStorageValue(cid,storages.result)
local answer = getPlayerStorageValue(cid,storages.answer)
local prisioned = getPlayerStorageValue(cid,storages.prisioned)

I'm not sure but It probably can be wrote as:

Code:

local first_num, second_num, result, answer, prisioned = getPlayerStorageValue(cid,storages.first_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.result), getPlayerStorageValue(cid,storages.answer), getPlayerStorageValue(cid,storages.prisioned)

A bit shorter ;p

Master-m · Feb 2, 2009

Very cool wen hunting demons on low exp server >.>.
Also it is possible to capture the packet and let the bot answer it.

Pening · Feb 2, 2009

Master-m said:
Very cool wen hunting demons on low exp server >.>.
Also it is possible to capture the packet and let the bot answer it.

I know

All is possible :S

Keraxel said:

I'm not sure but It probably can be wrote as:

Code:

local first_num, second_num, result, answer, prisioned = getPlayerStorageValue(cid,storages.first_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.second_num), getPlayerStorageValue(cid,storages.result), getPlayerStorageValue(cid,storages.answer), getPlayerStorageValue(cid,storages.prisioned)

A bit shorter ;p

Thanks, edited.

StreamSide · Feb 2, 2009

mmm... good but:

Code:

local templepos = {x=95, y=117, z=7}

Should be

Code:

local templepos = getPlayerMasterPos(cid)

:>

Jano · Feb 2, 2009

Do it gglobalevent as i did.
onthink ....
get players online
make a question
addevent to check if answer....
check if answer...
if not answered then kick him and a notification.
if answered then storage is restarted...
then the globalevent start again.

DaNDaNrOxX · Feb 2, 2009

Exiva "credits

justin234 · Feb 2, 2009

Very Good Idea!

[02/02/2009 16:00:15] Warning: [Event::loadScript] Can not load script. data/talkactions/scripts/anti_bot.lua
[02/02/2009 16:00:15] data/talkactions/scripts/anti_bot.lua:7: unexpected symbol near ')'

Rizz · Feb 2, 2009

justin234 said:
Very Good Idea!

remove the ) on line 7 and it should work

justin234 · Feb 2, 2009

Also, this is a problem...

16:08 Anti Bot System: Hello, Account Manager! You have 2 minute(s) to answer how much is 7 + 9. To answer say: !antibot "number.

The account manager? lol.

justin234 · Feb 2, 2009

16:16 Anti Bot System: Wrong answer!
16:16 Anti Bot System: You had already got 1 wrong answers! The limit is 3.

The answer was correct...

Renusek · Feb 2, 2009

It works on Mystic Spirit ? 23 patch...

justin234 · Feb 2, 2009

I get those errors on mystic spirit, but yes.

Yunie · Feb 2, 2009

Only posted in XTIBIA FORUMS by me... you gonna get it closed.
Topic: Yunie Anti Bot System - XTibia - A sua comunidade de Tibia e OTserv

Look at the date, bb...

Sharp · Feb 2, 2009

ever thought of the possibility
He gets the maths question wrong ?
hes in demons afk
,waiting for respawn
making breakfast
and gets teleported ?

Serginov · Feb 2, 2009

Nice! I will use this for sure

justin234 · Feb 3, 2009

It doesnt work correctly.
The answer was right, but it said it was wrong.

Darth_Salva · Feb 3, 2009

Same as sharp:

What if the player is simply afk for 2 mins just staying there, or waiting respawn, or too busy doing a hard quest?

I like a lot the idea of ask a simple random question, the best way (i think) to get rid automatically of bots... But maybe is annoying for all other players...

justin234 · Feb 3, 2009

Stop playing the "What if game"

What if the world stopped spinning?
and we all floated away for more than 2 mins...

Advanced Anti Bot System

Pingwin :P

Im not.

Ω Obfuscator Ω

Need help? Just ask!

Pingwin :P

Joseluis Gonzalez

oturhaN

Oi belezura bejos me liga

New Member

Quited with Tibia/OT

New Member

New Member

beton beton beton punk!

New Member

Yunie~

Veteran OT User

Onkonkoronkonk

New Member

New Member

New Member