clauberbd

O arquivo wound cleasing.lua que é da magia exura ico tá escrito assim: local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_HEALING) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE) setCombatParam(combat, COMBAT_PARAM_DISPEL, CONDITION_PARALYZE) function getCombatFormulas(cid, lv, maglv) -- Formulas completly NOT accurate, and I never testes this spell. Please, someone send me an accurate formula -- Pedro B. at OTFans.net local formula_min = ((lv*3 + maglv*2) * 0.55) + 15 local formula_max = ((lv*4 + maglv*1) * 0.95) + 20 if(formula_max < formula_min) then --Normalize values local tmp = formula_max formula_max = formula_min formula_min = tmp end return formula_min, formula_max end setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "getCombatFormulas") function onCastSpell(cid, var) return doCombat(cid, combat, var) end

Aew galera! Quero deixar meu OT igual ao Tibia Global. Estou rodando só no meu pc. Só pra mim jogar mesmo, mas quero que ele fique igual ao Tibia, tipow... Eu crio um char igual ao meu char no Tibia Global, com os mesmo skills e equips, so que uma magia de cura, no OT ela cura mais que no Tibia, e umas potions também, aí eu queria que fosse igual, pra mim testar no OT, porque o meu OT eh de mapa global do Tibia, e eu quero usar pra descobrir lugares, aprender a caçar em alguns lugares e ver se eu mato determinado bixo... Tem como fazer isso? Tipow.. o meu kina, quando eu uso um "Exura ico" no OT ele recupera uns 220 Hp e no Tibia ele recupera 80 a 100 Hp... Queria que fosse igual.. o que eu faço???

Testei e funcionou, mas reinicei o PC e aparece agora "Não foi possível encontrar a server list"... o que pode ser?

Aewww.. achei aqui.. eh tibia/tibia Aff.. agora no ip changer ta dando.. Nao foi possivel encontrar a server list... nao fiz nada.. so reiniciei o PC.. desabilitei o firewall mas nao deu... o que pode ser?

Mas nao aparece Account Manage...

Nao tem que criar conta de GM ou de player pra mim poder acessar?

Estou usando as mesmas versoes... o ipchanger baixei aqui no forum..

tentei.. mas nao deu... dá Account name or password is not correct.

Não to conseguindo logar... o IP changer deu certinho e tals.. mas qual a senha para entrar???

Ae galera.. quero instalar um OTserv 9.1 no meu pc pra testar meu BOT. Baixei esse aí... como faço pra rodar? Nao entendo desses trem de OT...

Dei conta galera... fiz um autohealer.. kkkkkkkk.. ta aí o codigo... Private Sub timer_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles timer.Tick If p.Health <= txt1.Text And p.Health > txt3.Text And txt1.Text <> "" And txt3.Text <> "" Then c.Console.Say(txt2.Text) If p.Health <= txt3.Text And p.Health > txt4.Text And txt3.Text <> "" And txt4.Text <> "" Then If cmb1.Text = "F1" Then c.Input.SendKey(Keys.F1) If cmb1.Text = "F2" Then c.Input.SendKey(Keys.F2) If cmb1.Text = "F3" Then c.Input.SendKey(Keys.F3) If cmb1.Text = "F4" Then c.Input.SendKey(Keys.F4) If cmb1.Text = "F5" Then c.Input.SendKey(Keys.F5) If cmb1.Text = "F6" Then c.Input.SendKey(Keys.F6) If cmb1.Text = "F7" Then c.Input.SendKey(Keys.F7) If cmb1.Text = "F8" Then c.Input.SendKey(Keys.F8) If cmb1.Text = "F9" Then c.Input.SendKey(Keys.F9) If cmb1.Text = "F10" Then c.Input.SendKey(Keys.F10) If cmb1.Text = "F11" Then c.Input.SendKey(Keys.F11) If cmb1.Text = "F12" Then c.Input.SendKey(Keys.F12) End If If p.Health <= txt4.Text And txt4.Text <> "" Then If cmb2.Text = "F1" Then c.Input.SendKey(Keys.F1) If cmb2.Text = "F2" Then c.Input.SendKey(Keys.F2) If cmb2.Text = "F3" Then c.Input.SendKey(Keys.F3) If cmb2.Text = "F4" Then c.Input.SendKey(Keys.F4) If cmb2.Text = "F5" Then c.Input.SendKey(Keys.F5) If cmb2.Text = "F6" Then c.Input.SendKey(Keys.F6) If cmb2.Text = "F7" Then c.Input.SendKey(Keys.F7) If cmb2.Text = "F8" Then c.Input.SendKey(Keys.F8) If cmb2.Text = "F9" Then c.Input.SendKey(Keys.F9) If cmb2.Text = "F10" Then c.Input.SendKey(Keys.F10) If cmb2.Text = "F11" Then c.Input.SendKey(Keys.F11) If cmb2.Text = "F12" Then c.Input.SendKey(Keys.F12) End If End Sub

Achei a função no TibiaAPI c.Input.SendKey(Keys.F1) Agora deu certo Só não sei fazer puxar a key de um combobox.. vou tentar

Ja sei fazer o char usar um spell, mas como faço pra usar uma hotkey???

Vou ver se acho alguma coisa e se eu der conta posto aqui

Também to querendo fazer um auto looter só de GP. Poderia me dar uma ajuda ai nessas funções? Talvez eu consiga! Preciso saber o que é cada função. Quero que eu mesmo abra o corpo, aí o char pega os gps e joga pra uma bp.