Anti Stalker

Quote:

---

Originally Posted by Raphael

Anti Stalker

Description

Attacks invisible creatures that attack you.


Configuration

Edit the invisCreatures variable on the init block to specify which creatures go invisible. Also, edit stuckTime to specify how many miliseconds it should be stuck before attacking the creatures and spellToUse so the bot knows which spell to use.


Code

init start

	-- local SCRIPT_VERSION = '1.0.1'



	local invisCreatures = {'Stalker'}

	local stuckTime = 0 -- Set to 0 to always attack

	local spellToUse = 'exori'



	-- DO NOT EDIT BELOW THIS LINE --

	table.lower(invisCreatures)

	local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

	if spellToUseInfo.castarea == 'None' then

		spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

	end

init end



auto(100)



if $standtime >= stuckTime then

	foreach newmessage m do

		if m.type == MSG_STATUSLOG then

			local _, _, name = m.content:match(REGEX_DMG_TAKEN)

			if name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

				if spellType == 'spell' and cancastspell(spellToUseInfo) then

					cast(spellToUseInfo.words)

					waitping()

				elseif spellType == 'rune' then

					useoncreature(spellToUseInfo.itemid, $self)

					waitping()

				end

			end

		end

	end

end

Git

---

Rapha sorry for bothering again, just have a question :D

why the code doesnt work if I change the "REGEX_DMG_TAKEN" to

local _, _, name = m.content:match('^You lose (%d+) (%1+) due to an attack by ?a?n? (.-)%.$')

also will it be possible that it will only detect damage 30 and above?
really sorry to bother. just this left for my code to work properly. run out of option :(

Quote:

---

Originally Posted by Harvey

Rapha sorry for bothering again, just have a question :D

why the code doesnt work if I change the "REGEX_DMG_TAKEN" to

local _, _, name = m.content:match('^You lose (%d+) (%1+) due to an attack by ?a?n? (.-)%.$')

also will it be possible that it will only detect damage 30 and above?
really sorry to bother. just this left for my code to work properly. run out of option :(

---

That's because (1+) is not a valid pattern while (l+) is (notice the difference between 1 and l). But why would you even want to replace REGEX_DMG_TAKEN?

As for your other request, I've edited the script on the first post to allow for it.

Quote:

---

Originally Posted by Raphael

That's because (1+) is not a valid pattern while (l+) is (notice the difference between 1 and l). But why would you even want to replace REGEX_DMG_TAKEN?

As for your other request, I've edited the script on the first post to allow for it.

---

hahaha damn i didnt notice that
Thank you sooooo much raph :D :D :D

so it can only detect damage 30 and above hehe trying to figure how to do it :D

Quote:

---

Originally Posted by Harvey

so it can only detect damage 30 and above hehe trying to figure how to do it :D

---

Quote:

---

Originally Posted by Raphael

As for your other request, I've edited the script on the first post to allow for it.

---

<div style="opacity:0;">Read it</div>

Quote:

---

Originally Posted by Raphael

<div style="opacity:0;">Read it</div>

---

ty much raph :* :* :*

btw raph, there is a typo error on minDmgTaken and your local minDamageTaken :P just informing :D

@Raphael

I made something the other day for an Anti Stalker/whatever script.. Triggered by "Sorry, not possible", since i'm a tanky dude and will not take damage from those and it will just anti them if they are blocking my path. Did you think of this?

Quote:

---

Originally Posted by Riku

@Raphael

I made something the other day for an Anti Stalker/whatever script.. Triggered by "Sorry, not possible", since i'm a tanky dude and will not take damage from those and it will just anti them if they are blocking my path. Did you think of this?

---

Not really...

this script dont work...

Quote:

---

Originally Posted by Pukielos

this script dont work...

---

More info plax?

@Edit
work but must have in server log information to lose x hp and etc

What should I add to be safe for pvp servers?

error in Persistent script NewPersistentScript:
[" if dmg >= minDmgTak..."]:NewPersistentScript:23 attempt to compare number with string

init start

    -- local SCRIPT_VERSION = '1.1.1'



    local invisCreatures = {'Stalker'}

    local stuckTime = 0 -- Set to 0 to always attack

    local minDmgTaken = 0 -- Set to 0 to always attack

    local spellToUse = 'thunderstorm rune'



    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end



auto(100)



if $standtime >= stuckTime then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)

            if dmg >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    useoncreature(spellToUseInfo.itemid, $self)

                    waitping()

                end

            end

        end

    end

end

How do I make mindmgTaken into a number?

Could you do this:

auto(100)

if $standtime=>3000 && $zpos=15 && maround(7)=>3

useoncreature("thunderstorm rune", $self)

wait(2000)

@Sea take this.

Quote:

---

Originally Posted by Sea

error in Persistent script NewPersistentScript:
[" if dmg >= minDmgTak..."]:NewPersistentScript:23 attempt to compare number with string

PHP Code:

---

init start
    -- local SCRIPT_VERSION = '1.1.1'

    local invisCreatures = {'Stalker'}
    local stuckTime = 0 -- Set to 0 to always attack
    local minDmgTaken = 0 -- Set to 0 to always attack
    local spellToUse = 'thunderstorm rune'

    -- DO NOT EDIT BELOW THIS LINE --
    table.lower(invisCreatures)
    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'
    if spellToUseInfo.castarea == 'None' then
        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'
    end
init end

auto(100)

if $standtime >= stuckTime then
    foreach newmessage m do
        if m.type == MSG_STATUSLOG then
            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)
            if dmg and dmg >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then
                if spellType == 'spell' and cancastspell(spellToUseInfo) then
                    cast(spellToUseInfo.words)
                    waitping()
                elseif spellType == 'rune' then
                    useoncreature(spellToUseInfo.itemid, $self)
                    waitping()
                end
            end
        end
    end
end 


---

---

@Raphael didn't conver string to number, nooba!

init start

    -- local SCRIPT_VERSION = '1.1.1'









    local invisCreatures = {'Stalker'}

    local stuckTime = 0 -- Set to 0 to always attack

    local minDmgTaken = 0 -- Set to 0 to always attack

    local spellToUse = 'thunderstorm rune'









    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end









auto(100)









if $standtime >= stuckTime then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)

            if dmg and tonumber(dmg) >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    useoncreature(spellToUseInfo.itemid, $self)

                    waitping()

                end

            end

        end

    end

end

so dmg is a string and by adding tonumber(dmg) you convert the string to number?\

xd new error: error in Persistent script NewPersistentScript:
[" if tonumber(dmg) >=..."]:NewPersistentScript:27 attempt to compare number with nil

Quote:

---

Originally Posted by Sea

so dmg is a string and by adding tonumber(dmg) you convert the string to number?\

xd new error: error in Persistent script NewPersistentScript:
[" if tonumber(dmg) >=..."]:NewPersistentScript:27 attempt to compare number with nil

---

try now ;o

No error when enabling script will see when it works when I deposit.

If it doesnt I will try my own pro script

auto(200)

if $standtime >= 7000 and $posz==15 and maround(7)>=3 and itemcount('thunderstorm rune')>=0 then

useoncreature("thunderstorm rune", $self)

wait(2000)

end

Q: What difference does 'blabla' make with "blabla"? So between single ' and double "

Quote:

---

Originally Posted by Sea

No error when enabling script will see when it works when I deposit.

If it doesnt I will try my own pro script

auto(200)

if $standtime >= 7000 and $posz==15 and maround(7)>=3 and itemcount('thunderstorm rune')>=0 then

useoncreature("thunderstorm rune", $self)

wait(2000)

end

Q: What difference does 'blabla' make with "blabla"? So between single ' and double "

---

There's no diff like f.e in C++, only thing is that u can enclose ' ' inside double quotes f.e

local var = "Hello 'noob' "

Hmm ok so u can include people with ' in character names. Completed demon oak on a character today gotta see if script is running good and get next char on the task.

Quote:

---

Originally Posted by mistgun

@Sea take this.


@Raphael didn't conver string to number, nooba!

...

---

Oh, thanks for letting me know after 2 months.

Quote:

---

Originally Posted by Sea

Hmm ok so u can include people with ' in character names. Completed demon oak on a character today gotta see if script is running good and get next char on the task.

---

You can include ' inside strings quoted with ' too, but you gotta escape it with \:

print('Raphael\'s da best') -- Raphael's da best

print("She said: \"Raphael's da best\"") -- She said "Raphael's da best"

Quote:

---

Originally Posted by mistgun

@Sea take this.


@Raphael didn't conver string to number, nooba!

init start

    -- local SCRIPT_VERSION = '1.1.1'









    local invisCreatures = {'Stalker'}

    local stuckTime = 0 -- Set to 0 to always attack

    local minDmgTaken = 0 -- Set to 0 to always attack

    local spellToUse = 'thunderstorm rune'









    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end









auto(100)









if $standtime >= stuckTime then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)

            if dmg and tonumber(dmg) >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    useoncreature(spellToUseInfo.itemid, $self)

                    waitping()

                end

            end

        end

    end

end

---

I have copied the script above but it shoot GFB only sometimes not always when there's a stalker around. Is there anything wrong?

what's wrong with this?
I'ts not gfbing stalkers for me.

init start
function inputevents(e)
print(e)
end

filteruseroptions(true)
init end
auto(1000)
-- your script here --
init start
local invisCreatures = {"Stalker"}
local stuckTime = 0 -- Set to 0 to always attack

-- Do not edit below
table.lower(invisCreatures)
local spellToUseInfo = spellinfo(spellToUse)
if spellToUseInfo.castarea == 'None' then
spellToUseInfo = runeinfo(spellToUse)
end
init end
auto(100)

if $standtime >= stuckTime then
foreach newmessage m do
if m.type == MSG_STATUSLOG then
local _, _, name = m.content:match('^You lose (%d+) (%l+) due to an attack by ?a?n? (.-)%.$')
if name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then
if ((paround(10) == 0 and pvp and $timems - $playerlastseen > 6000) or not pvp) then
pausewalking(1000)
useoncreature("Great Fireball Rune" , $self)
pausewalking(0)
end
end
end
end
end


if $standtime > 3000 and $wptsection == 'Hunt' and ((paround(10) == 0 and pvp and $timems - $playerlastseen > 6000) or not pvp) and (not $looting) then
pausewalking(1000)
useoncreature("Great Fireball Rune" , $self)
pausewalking(0)
end

does this script if u use runes use on self or shoot area where last seen?..... im in need for an anti invis script that works on warlocks with Stone Shower Runes.
pm me if u can help me out @Raphael :D

Quote:

---

error in Cavebot script AntiStakler:
[" if dmg >= minDmgTaken and n..."]:AntiStakler:25 attempt to compare number with nil

---

What is it ?

It work with cancel invisibility ? It would be great for warlocks if you put the attack mode for chasing!

I'm getting this error when trying with utana vid, didn't tested with runes.
22:19:38 error in Hotkey script NewHotkey:
[" if dmg >= minDmgTaken and nam..."]:NewHotkey:25 attempt to compare number with nil

@Raphael, do u know why this is happening?

22:19:38 error in Hotkey script NewHotkey:
[" if dmg >= minDmgTaken and nam..."]:NewHotkey:25 attempt to compare number with nil

I am using this one.

init start

	-- local SCRIPT_VERSION = '1.0.1'

 

	local invisCreatures = {'Stalker'}

	local stuckTime = 0 -- Set to 0 to always attack

	local spellToUse = 'avalanche rune'

 

	-- DO NOT EDIT BELOW THIS LINE --

	table.lower(invisCreatures)

	local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

	if spellToUseInfo.castarea == 'None' then

		spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

	end

init end

 

auto(100)

 

if $standtime >= stuckTime and paround(7) == 0 then

	foreach newmessage m do

		if m.type == MSG_STATUSLOG then

			local _, _, name = m.content:match(REGEX_DMG_TAKEN)

			if name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

				if spellType == 'spell' and cancastspell(spellToUseInfo) then

					cast(spellToUseInfo.words)

					waitping()

				elseif spellType == 'rune' then

					useoncreature(spellToUseInfo.itemid, $self)

					waitping()

				end

			end

		end

	end

end

@Dworak, thanks :p

Ive created a script at drefia necromancers, but i keep getting problem with the stalkers. When a stalker goes invisible and stands infront of me the bot wont do anything, it keeps trying to walk in on that tile the stalker's in (making it bump back n forth).
Im a knight so id like it to do Exori spell, i used the code on this thread but it wont do anything still. Here is the code and please let me know whats wrong

init start
-- local SCRIPT_VERSION = '1.0.1'

local invisCreatures = {'Stalker'}
local stuckTime = 1000 -- Set to 0 to always attack
local spellToUse = 'exori'

-- DO NOT EDIT BELOW THIS LINE --
table.lower(invisCreatures)
local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'
if spellToUseInfo.castarea == 'None' then
spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'
end
init end

auto(100)
if $standtime >= stuckTime and ($wptsection == "ToHunt" or $wptsection == "Hunt" or $wptsection == "refill") then
foreach newmessage m do
if m.type == MSG_STATUSLOG then
local _, _, name = m.content:match(REGEX_DMG_TAKEN)
if (name and table.find(invisCreatures, name:lower())) then
if spellType == 'spell' and cancastspell(spellToUseInfo) then
cast(spellToUseInfo.words)
waitping()
elseif spellType == 'rune' then
if $standtime < 5000 then
pausewalking(5000)
end
wait(200)
if maround(10, "Demon Skeleton", "Green Djinn") > 0 then
useoncreature("avalanche rune", $self)
else
useoncreature("great fireball rune", $self)
end

wait(400)
pausewalking(0)
end
end
end
end
end

Quote:

---

Originally Posted by Raiven

Ive created a script at drefia necromancers, but i keep getting problem with the stalkers. When a stalker goes invisible and stands infront of me the bot wont do anything, it keeps trying to walk in on that tile the stalker's in (making it bump back n forth).
Im a knight so id like it to do Exori spell, i used the code on this thread but it wont do anything still. Here is the code and please let me know whats wrong

init start

    -- local SCRIPT_VERSION = '1.0.1'



    local invisCreatures = {'Stalker'}

    local stuckTime = 1000 -- Set to 0 to always attack

    local spellToUse = 'exori'



    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end



auto(100)

if $standtime >= stuckTime and ($wptsection == "ToHunt" or $wptsection == "Hunt" or $wptsection == "refill") then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local _, _, name = m.content:match(REGEX_DMG_TAKEN)

            if (name and table.find(invisCreatures, name:lower())) then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    if $standtime < 5000 then

                        pausewalking(5000)

                    end

                    wait(200)

                    if maround(10, "Demon Skeleton", "Green Djinn") > 0 then

                        useoncreature("avalanche rune", $self)

                    else

                        useoncreature("great fireball rune", $self)

                    end

                    

                    wait(400)

                     pausewalking(0)

                end

            end

        end

    end

end

---

do you have server log msgs on?

Quote:

---

Originally Posted by ozzix

do you have server log msgs on?

---

nope, maybe thats why XD thanks, i changed it now so ill check on it when stalker comes around again :P

it does not work.. :/

Quote:

---

Originally Posted by Wasrea

it does not work.. :/

---

check all options in tibia->options->conole.
also, when something isn't work try to be more descriptive

Quote:

---

Originally Posted by mistgun

check all options in tibia->options->conole.
also, when something isn't work try to be more descriptive

---

error here:
[" if dmg >= minDmgTaken and nam..."]:NewHotkey:25 attempt to compare number with nil

and my console is all activated

how did you set up minDmgTaken variable?

Quote:

---

Originally Posted by mistgun

how did you set up minDmgTaken variable?

---

init start

    -- local SCRIPT_VERSION = '1.1.2'



    local invisCreatures = {'Souleater'}

    local stuckTime = 500 -- Set to 0 to always attack

    local minDmgTaken  = 120 -- Set to 0 to always attack

    local spellToUse = 'great fireball rune'



    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end



auto(100)



if $standtime >= stuckTime then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)

            dmg = tonumber(dmg)

            

            if dmg >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    useoncreature(spellToUseInfo.itemid, $self)

                    waitping()

                end

            end

        end

    end

end

try this

init start

    -- local SCRIPT_VERSION = '1.1.2'





    local invisCreatures = {'Souleater'}

    local stuckTime = 0 -- Set to 0 to always attack

    local minDmgTaken  = 0 -- Set to 0 to always attack

    local spellToUse = 'exori'





    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end





auto(100)





if $standtime >= stuckTime then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)

            dmg = tonumber(dmg)

            

            if dmg and dmg >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    useoncreature(spellToUseInfo.itemid, $self)

                    waitping()

                end

            end

        end

    end

end

Thanks is working!

it's not work for me :(

Quote:

---

Originally Posted by Raphael

Anti Stalker

Description

Attacks invisible creatures that attack you.


Configuration

Edit the invisCreatures variable on the init block to specify which creatures go invisible. Also, edit stuckTime to specify how many miliseconds it should be stuck before attacking the creatures and spellToUse so the bot knows which spell to use.


Code

init start

    -- local SCRIPT_VERSION = '1.1.2'



    local invisCreatures = {'Stalker'}

    local stuckTime = 0 -- Set to 0 to always attack

    local minDmgTaken  = 0 -- Set to 0 to always attack

    local spellToUse = 'exori'



    -- DO NOT EDIT BELOW THIS LINE --

    table.lower(invisCreatures)

    local spellToUseInfo, spellType = spellinfo(spellToUse), 'spell'

    if spellToUseInfo.castarea == 'None' then

        spellToUseInfo, spellType = runeinfo(spellToUse), 'rune'

    end

init end



auto(100)



if $standtime >= stuckTime then

    foreach newmessage m do

        if m.type == MSG_STATUSLOG then

            local dmg, _, name = m.content:match(REGEX_DMG_TAKEN)

            dmg = tonumber(dmg)

            

            if dmg >= minDmgTaken and name and table.find(invisCreatures, name:lower()) and maround(7, name:lower()) == 0 then

                if spellType == 'spell' and cancastspell(spellToUseInfo) then

                    cast(spellToUseInfo.words)

                    waitping()

                elseif spellType == 'rune' then

                    useoncreature(spellToUseInfo.itemid, $self)

                    waitping()

                end

            end

        end

    end

end

Git

---

Can you help me where is the error?
Phono in link below.

Thx

Attachment 9861