Líderes

Motivo do Tutorial: Criar um scripter prório. Adicionando a refêrencia MSSCriptControl. Explicação: a primeira parte é de adicionar a refêrencia, adicionando-a você tera as funcionalidades da MSScriptControl. Importando a refêrencia MSScriptControl. Explicação: assim você poderá usar o controle. Necessário: Botão e caixa de texto (ou utilize algo de seu gosto). Explicação: criando o button e o textbox é o jeito que utilizei para fazer o scripter, utilize algo do seu gosto com seu conhecimento é claro. Código do Button1: Explicação: escrevendo a função do clique do button1, primeiro declaramo que script é o MSScriptControl, depois declaramos a linguagem e depois executamos o codigo. Scripter em uso: Explicação: com tudo pronto pressione F5 para iniciar ou inicie você mesmo pelo menu. Adicionando um objeto. Explicação: declaramos igual o MSScriptControl como "script", declaramos a linguagem que é igual a "VBScript", depois adicionamos o objeto, e depois executa-o. Espero que entendam. Abraço

Ola galerinha, hoje vou ensinar a vc's como usar if, else, elseif, and e or em lua If, Else, ElseIF, Then Agora vamos ver oque é oque: Entendo o Script function onSay(cid, words) -- Função aoFalar if getPlayerVocation(cid) == 4 then -- Se a vocação do player for igual a 4 entao doPlayerSendTextMessage(cid, 22, "Eu sou um Knight") -- Mandar uma mensagem com o texto, dizendo sua vocação elseif getPlayerVocation(cid) == 3 then -- Se nao, se a vocação do player for igual a 3 entao doPlayerSendTextMessage(cid, 22, "Eu sou um Paladin") -- Mandar uma mensagem com o texto, dizendo sua vocação else -- Se nao doPlayerSendTextMessage(cid, 22, "Eu nao estou na lista") -- Mandar uma mensagem com o texto, dizendo um que nao esta na lista end -- Fecha o IF end -- Fecha o Script Regras Entendo o Script And: function onSay(cid, words) -- Função aoFalar if getCreatureHealth(cid) > 500 and getCreatureMana(cid) > 100 then -- Se a vida da criatura for maior que 500 E se a mana da criatura for maior que 100 entao doPlayerSendCancel(cid, "Eu tenho 500 de health e 100 de mana, ") -- Manda uma mensagem end -- Fecha o if end -- Fecha o Script[/code] [b]Or:[/b] [code]function onSay(cid, words) -- Função aoFalar if getCreatureHealth(cid) > 500 or getCreatureMana(cid) > 100 then -- Se a vida da criatura for maior que 500 ou se a mana da criatura for maior que 100 entao doPlayerSendCancel(cid, "Eu tenho 500 de health e 100 de mana, ") -- Manda uma mensagem end -- Fecha o if end -- Fecha o Script Regras É isso pessoal, Abraços And e Or Agora vamos ver oque é oque:

Olá olha eu denovo eu venho aqui trazer pra vocês um /save para o TFS v0.2 Mistyc Sprit para substituir aquele que é em talkaction =D A vantagem deste /save é que ele não causa lags, como o da talkactions =D Então vamos lá; Em commands.cpp abaixo de adicione isto: {"/save",&Commands::saveGame}, Ao fonal de commands.cpp adicione isto: void Commands::saveGame(Player* player, const std::string& cmd, const std::string& param) { AutoList<Player>::listiterator it = Player::listPlayer.list.begin(); g_game.saveGameState(); if(player) player->sendTextMessage(MSG_STATUS_CONSOLE_ORANGE, "Save server completed."); } E pra finalizar em commands.h adicione abaixo de: Adicione isto: void saveGame(Player* player, const std::string& cmd, const std::string& param); Simples... ultil e menos lags no seu server =D Até mais....

Ola gaaaaaaalera, é com muito prazer que venho trazer esse primeiro tutorial meu como Aprendiz do TibiaKing, Spells: Bom, spells sao as magias do nosso servidor, elas servem tanto para healar, atacar, dar suporte e etc ... Criar magias é algo muito simples, vc mesmo poderam criar quantas magias quiserem para o seu servidor seguindo esse tutorial, Muito bem, vamos começar ... Spells de Curar (Healing) Fazendo a sua Spell Nao precisamos mecher aqui Aqui sera, oque vai acontecer Aqui é o effect que saira quando o player usar a spell A spell nao vai agressivar, assim podendo ser usada em areas PZ Aqui sera um Extra, a spell ira curar paralyze Formula do magic level, quanto maior mais vai healar Nao precisamos mecher aqui tambem Legenda: × Mais efeito pode ser encontrados no final do Tutorial × Oque ira acontecer, poder ser encontrado no final do Tutorial × Condições, pode ser encontradas mais no final do Tutorial Obrigado a Todos, Estou terminando de fazer o SpellMaker para facilitar a vida de vc, Abraços Spells de Atacar (Attack) Fazendo a sua Spell Nao mechremos aqui Aqui sera o tipo de dano que a spell causara Aqui é o effect que saira quando o player usar a spell setAttackFormula(combat, COMBAT_FORMULA_LEVELMAGIC, 5, 5, 5, 12) Formula do magic level, quanto maior mais vai healar Area que a spell vai atingir, Nao mecheremos aqui tambem Legenda: × Areas, podem ser encontradas no final do Tutorial × Efeitos, podem ser encontrados no final do Tutorial × Danos, podem ser encontrados no final do Tutorial Spells de Suporte (Support) Fazendo a sua Spell Nao mechemos aqui Efeito da magia Magia nao agressiva, pode ser usada em areas PZ Condição de escudo de mana O tempo que demora para essa spell acabar, 1 segundo = 1000 Nao mechemos aqui Legenda: × Efeito, pode ser encontrados mais no final do Tutorial × Condições, pode ser encontradas mais no final do Tutorial Oque a Spell vai fazer Efeitos Areas Condições

Bem, como todos sabem, não da pra criar 2 items com o mesmo sprite, somente editando a source e o dat etc... Usando esse sistema que eu fiz voce nao precisara editar nada somente adicionar os scripts. Primeiramente vá na pasta lib e crie um arquivo ItemsEditedLib.lua e adicione isso dentro: function doPlayerAddEditedItem(cid, itemid) local newxml = io.open("data/items/newitems.xml", "r") local configs = {} for i in newxml:read("*a"):gmatch("<item (.-)</item>") do local itemid = i:match('id="(.-)"') local itemconfig = { ["spriteid"] = tonumber(i:match('spriteid.-=.-"(.-)"')), ["article"] = i:match('article.-=.-"(.-)"'), ["name"] = i:match('name.-=.-"(.-)"'), ["description"] = i:match('key.-=.-"description".-value.-=.-"(.-)"'), ["defense"] = tonumber(i:match('key.-=.-"defense".-value.-=.-"(.-)"')), ["attack"] = tonumber(i:match('key.-=.-"attack".-value.-=.-"(.-)"')), ["extradefense"] = tonumber(i:match('key.-=.-"extradef".-value.-=.-"(.-)"')), ["armor"] = tonumber(i:match('key.-=.-"armor".-value.-=.-"(.-)"')), ["extraattack"] = tonumber(i:match('key.-=.-"extraatk".-value.-=.-"(.-)"')), } configs[tonumber(itemid)] = itemconfig end if configs[itemid] then local item = doPlayerAddItem(cid, configs[itemid].spriteid) for i,x in pairs(configs[itemid]) do doItemSetAttribute(item, i, x) end end end Depois vá na pasta items e adicione um arquivo newitems.XML (XML NAO LUA!!!) e adicione isso dentro: <?xml version="1.0" encoding="UTF-8"?> <items> <item id="100" spriteid="2400" article="a" name="magic edited sword"> <attribute key="description" value="Arma editada." /> <attribute key="defense" value="45" /> <attribute key="attack" value="100" /> <attribute key="elementIce" value="34"/> <attribute key="extradef" value="10" /> <attribute key="extraatk" value="10" /> </item> <item id="101" spriteid="2472" article="a" name="master plate armor"> <attribute key="description" value="Armor editada." /> <attribute key="armor" value="19" /> </item> </items> Bem como voces podem ver, o xml guarda os novos items, o xml funciona praticamente como o items.xml so que tem um novo campo o "spriteid", nele fica o itemid original. Eu sei que ainda faltam atributos, com o tempo e com os pedidos eu vou adicionando. Atributos: "description" "defense" "attack" "extradefense" "armor" "extraattack" Para adicionar os novos itemids aos players use doPlayerAddEditedItem(cid, ITEMID) em vez de doPlayerAddItem... Não tinha onde postar entao foi aki mesmo.

oi pessoal tudo , bem ? bom eu tava meio desaparecido ensse forúm e tal e eu gostaria de razer um script otimo pra geral que quer caçar larva , o script funciona dessa maneira Vai de control+v (kk) Ankrahmun Larvas Nome do monstros: Larvas. Respawn: West ou East. Configurável no Setup. Vocação: Todas. Configurável no Setup. O que contem no Script: Refiller Pots e Ammo. Configurável no Setup. Banker SEM Loot Depositer (Não dropa nada da Larva) Sistema de Logout no Server Save funcionando perfeitamente. ( O char vai para uma área segura e dá "Logout", após o server save ele dá "Login" e volta a caçar.) Configurável no Setup. Logout se Low Stamina. Configurável no Setup. Requerimentos: Premium. Recomendações: Level 13+ de Plate set aguenta Recomendo alterar para usar apenas Health Potion no caso de ser Level 13 e usar o exura ico apenas como mana trainer, assim evita "wastiar" mp. Informações:* Exp: 10k/hr~ Lucro: 1k/hr~ Onde começar? no bank de Ankrahmun. BPs: Configurável no Setup SETUP: Em Hotkeys>Persistentlist>setup... *Pode variar dependendo de quantidade de players on, sorte, players no respaw. Versão 1.1: -Corrigido bug no Flaskdropper, no targetting automático e adicionado ferramenta para abrir as bps de dentro da goldBP quando a anterior ficar cheia. Versão 1.2: -Corrigido o reconnect, setup mais simples e com tradução para português. Versão 1.3: -Vocação agora é automaticamente detectada. Crédito: Mitiv's Scripts.Larvas v1.3 by Pv(2).rar

Oque é variavel? Variavel é aquilo que varia, ou seja nao tem um valor fixo, Em lua elas deixam o script mais facil, mais facil dos outros que nao entende muito de lua a modificar os script que fazemos Entendo: Sem variavel funciton onUse(cid, item) -- Função ao usar o item doPlayerAddMoney(cid, 1000) -- Adicionar dinheiro fixo end Com variavel funciton onUse(cid, item) -- Função ao usar o item local money = 1000 -- Variavel de dinheiro doPlayerAddMoney(cid, money) -- Adicionar dinheiro que esta na variavel end Exemplo de variaveis local variavel = 100 Como usar: doPlayerAddMoney(cid, variavel) variavel = 100 Como usar: doPlayerAddMoney(cid, variavel) local funcao = { Preco1 = 500, Preco2 = 600 } Como usar: doPlayerAddMoney(cid, variavel.Preco1) doPlayerAddMoney(cid, variavel.Preco2) Regras: O uso de variaveis nao é obrigatorio, como disse ele so serve para qm nao sabe de lua configurar o script

fica aqui data/actions/scripts/liquids/potions.lua esta nessa linha local exhaust = createConditionObject(CONDITION_EXHAUST) setConditionParam(exhaust, CONDITION_PARAM_TICKS, (getConfigInfo('timeBetweenExActions') - 100)) agora provavelmente o valor a ser mudado é o 100 la no final, tenta aumenta ele e ve se funciona. (Não manjo nada de scripting)

Cara eu ja tentei fazer para nao entrar em pz mais nao deu, Sobre o subir escadas, cara é como se fosse fire, eu ja falei fica tirando dano ate acabar Nao tem como mesmo

Não consegui achar uma img legal nesse tema q vc mandou, mas fiz com otra... Ta ae: Espero que goste... Pesso desculpas ao double post, e leiam as regras do topico pessoal, vlw.

é utilizando a TibiaAPI? se for segue o código Dim tile As Tile = c.Map.GetTile(coordenada) c.Inventory.UseItemOnTile(Rope.Id, tile) Onde em "coordenada" vai ser a coordenada no mapa. Para o Shovel, troque o "Rope.Id" por "Shovel.Id".

Ok, aqui esta: Kimoszin Mana Training.rar Se vc duvida de mim, Scan o Scan dectou 2 virus: ASPack é o programa que uso para deixar o .exe menor, se preferir nao baixe Vc pode usar o RedBot tambem

Ae: Espero que goste.

Primeiro, crie um timer e adicione esse código uint targetId = p.TargetId; foreach (Creature monster in c.BattleList.GetCreatures()) { if (monster.Id == targetId) { monster.Name = "Mother"; checkBox2.Checked = false; break; } } Depois crie um checkbox e adicione o seguinte código if (checkBox2.Checked != false) { timer_teste.Start(); } else { timer_teste.Stop(); } Pra funcionar, ative o checkbox e coloque para atacar o monstro, que em seguida ele irá mudar o nome. Eu acabei de testar no global. Abraço Kimos

Cara, não consegui fazer nada que vc pediu, mas ta ae:

Ta ae: http://i52.tinypic.com/35mr0ur.png Espero que goste...

Ta ae:

Cara, criatividade é uma coisa que eu não tenho, mas tá ae: