Really? Anyone have a "working" crack for neobot 8.7? :/
I personally hate people who bot. You want to play tibia (Means you want to get levels and have fun.) and you can't spend some time on levels? Either you play manually or just quit, lazy c%!#t.
because someone wants posts.
Change Log:
05/04 - Version 0.3 - Added reconnect on server save
www.speedy*****malware.localhost/files/28948477/ScriptsGlocieus.rar
www.speedy*****malware.localhost/files/28948477/ScriptsGlocieus.rar
www.speedy*****malware.localhost/files/28948477/ScriptsGlocieus.rar
[FONT=Courier]init start[/FONT] [FONT=Courier] local items = {'name of item'}[/FONT]
[FONT=Courier] listas('Looking for message on Trade Channel')[/FONT]
[FONT=Courier]init end[/FONT]
[FONT=Courier]auto(1000)[/FONT]
[FONT=Courier]foreach newmessage m do[/FONT]
[FONT=Courier] if m.type == MSG_CHANNEL then[/FONT]
[FONT=Courier] for i,j in ipairs(items) do[/FONT]
[FONT=Courier] if m.content:find(j) then[/FONT]
[FONT=Courier] playsoundflash('default.wav')[/FONT]
[FONT=Courier] listas(m.sender..' is selling '..j)[/FONT]
[FONT=Courier] break[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier]end[/FONT]
[FONT=Courier]auto(100)[/FONT] [FONT=Courier]whatsay = 'your message' -- what do u want say?[/FONT]
[FONT=Courier]say('Advertising', whatsay)[/FONT]
[FONT=Courier]wait(2*60*1000, 2*63*1000) [/FONT]
[FONT=Courier]local rand [/FONT] [FONT=Courier]auto(500)dontlist()[/FONT]
[FONT=Courier]if maround() > 0 and not $pzone and ((maround(1) == 0 and $targetingtarget.id > 0 and $standtime >= 5000) or $standtime >= 60000) then [/FONT]
[FONT=Courier] rand = math.random(1,8) [/FONT]
[FONT=Courier] if (rand == 1) then move('w') [/FONT]
[FONT=Courier] elseif (rand == 2) then move('e') [/FONT]
[FONT=Courier] elseif (rand == 3) then move('n') [/FONT]
[FONT=Courier] elseif (rand == 4) then move('s') [/FONT]
[FONT=Courier] elseif (rand == 5) then move('nw') [/FONT]
[FONT=Courier] elseif (rand == 6) then move('ne') [/FONT]
[FONT=Courier] elseif (rand == 7) then move('sw') [/FONT]
[FONT=Courier] elseif (rand == 8) then move('se') [/FONT]
[FONT=Courier] end [/FONT]
[FONT=Courier] wait(1000) [/FONT]
[FONT=Courier]end [/FONT]
[FONT=Courier]init start[/FONT] [FONT=Courier] local r = 5 -- Range.[/FONT]
[FONT=Courier] local safelist = {'Bubble', 'Eternal Oblivion'} -- The bot WILL KS this players. Add more to this if you want.[/FONT]
[FONT=Courier] table.insert(safelist, $name) -- Do not edit it.[/FONT]
[FONT=Courier]init end[/FONT]
[FONT=Courier]auto(100)dontlist()[/FONT]
[FONT=Courier]local ppos = {}[/FONT]
[FONT=Courier]foreach creature p 'pf' do[/FONT]
[FONT=Courier] if not table.find(safelist, p.name) then[/FONT]
[FONT=Courier] table.insert(ppos, {x = p.posx, y = p.posy})[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier]end[/FONT]
[FONT=Courier]foreach creature c 'mf' do[/FONT]
[FONT=Courier] local ignore = false[/FONT]
[FONT=Courier] if c.id ~= $mattacker.id then[/FONT]
[FONT=Courier] for i = 1, #ppos do[/FONT]
[FONT=Courier] local difx, dify = ppos[i].x - c.posx, ppos[i].y - c.posy[/FONT]
[FONT=Courier] if math.abs(difx) <= r and math.abs(dify) <= r then[/FONT]
[FONT=Courier] ignore = true[/FONT]
[FONT=Courier] if c.ignored == false then[/FONT]
[FONT=Courier] ignorecreature(c.id)[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] break[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] if ignore == false and c.ignored == true then[/FONT]
[FONT=Courier] ignorecreature(c.id, true)[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier]end[/FONT]
[FONT=Courier]if $attacked.id ~= 0 then[/FONT]
[FONT=Courier] if $attacked.ignored then[/FONT]
[FONT=Courier] stopattack()[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier]end [/FONT]
[FONT=Courier]init start[/FONT] [FONT=Courier]local hppcAlert = 50 --[/FONT] this in percent
[FONT=Courier]init end[/FONT]
[FONT=Courier]auto(100)[/FONT]
[FONT=Courier]if $hppc <= hppcAlert then[/FONT]
[FONT=Courier]playsound('monster.wav')[/FONT]
[FONT=Courier]wait(1500,2000)[/FONT]
[FONT=Courier]end[/FONT]
[FONT=Courier]init start[/FONT] [FONT=Courier] local weaponid = 'your defensive weapon' -- Change this if you want.[/FONT]
[FONT=Courier] local pkfound = false[/FONT]
[FONT=Courier] local handn,hand = findweapon()[/FONT]
[FONT=Courier] if type(weaponid) == 'string' then weaponid = itemid(weaponid) end[/FONT]
[FONT=Courier]init end[/FONT]
[FONT=Courier]auto(100)[/FONT]
[FONT=Courier]if not pkfound then[/FONT]
[FONT=Courier] foreach creature pp 'p' do[/FONT]
[FONT=Courier] if pp.skull > 0 and pp.skull ~= SKULL_GREEN then[/FONT]
[FONT=Courier] local pkfound = true[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier]else[/FONT]
[FONT=Courier] while hand.id ~= weaponid do setattackmode('defensive', 'stand') gotolabel('pk') equipitem(weaponid,handn) wait(300,700) end[/FONT]
[FONT=Courier] if not $hasted then cast('your haste spell') wait(300,700) end[/FONT]
[FONT=Courier] setcavebot('on')[/FONT]
[FONT=Courier]end [/FONT]
[FONT=Courier]auto(100) if $standtime >= 20000 then playsound("monster.wav") [/FONT] [FONT=Courier]for i=1, -1, -1 do[/FONT]
[FONT=Courier] for j=-1, 1 do[/FONT]
[FONT=Courier] local pos = {$posx+i, $posy+j, $posz}[/FONT]
[FONT=Courier] local topid = topitem(table.unpack(pos)).id[/FONT]
[FONT=Courier] if not itemproperty(topid, ITEM_NOTMOVEABLE) then[/FONT]
[FONT=Courier] moveitems(topid, ground($posx, $posy, $posz), ground(table.unpack(pos))) waitping()[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier] end[/FONT]
[FONT=Courier]end[/FONT]
[FONT=Courier]end[/FONT]
[FONT=Courier]auto(100) if paround(8) >= 4 then playsound("monster.wav") end[/FONT]