Biroskak4

Bless: data\npc\scripts: Promotion: function onUse(cid, item, frompos, item2, topos) -- 5 = MasterSorc, 6 = ElderDruid, 7 = RoyalPally, 8 = EliteKina -- local t = { [1] = {newvoc = 5, stor = 15161}, [2] = {newvoc = 6, stor = 15162}, [3] = {newvoc = 7, stor = 15163}, [4] = {newvoc = 8, stor = 15164}} local voc = t[getPlayerVocation(cid)] if item.uid == 15157 then if voc then if getPlayerStorageValue(cid, voc.stor) == -1 then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Você foi promovido!') doPlayerSetVocation(cid, voc.newvoc) doSendMagicEffect(getPlayerPosition(cid), 49) setPlayerStorageValue(cid, voc.stor, 1) else doPlayerSendCancel(cid, "Você já fez essa quest.") end end return TRUE end end data\actions\actions.xml Depende do seu server, se é por item, talkaction, quest ou site.

Parecido com o meu kk (http://www.tibiaking.com/forum/topic/48280-action-vocation-quest/). Apesar do seu ter mais funções, como level minimo e premium. Mas acho que deveria tirar o level do chest e colocar na door para entrar na quest. Porque as vezes a pessoa faz a quest, e quando chega no final, não tem level pra pegar o premio hehe. Enfim, gostei, reputado

Área errada. Não? =/

Ficou Top manin, continua assim. E eu quero ADM lá no server hein

De naada manin, eu que agradeço pelos Reps xD Abraço

Tem sim, amigo. Acabei de criar: function onUse(cid, item, frompos, item2, topos) -- 5 = MasterSorc, 6 = ElderDruid, 7 = RoyalPally, 8 = EliteKina -- local t = {[1] = {newvoc = 5, stor = 15161}, [2] = {newvoc = 6, stor = 15162}, [3] = {newvoc = 7, stor = 15163}, [4] = {newvoc = 8, stor = 15164}} local voc = t[getPlayerVocation(cid)] if item.uid == 15157 then if voc then if getPlayerStorageValue(cid, voc.stor) == -1 then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Você foi promovido!') doPlayerSetVocation(cid, voc.newvoc) doSendMagicEffect(getPlayerPosition(cid), 49) setPlayerStorageValue(cid, voc.stor, 1) else doPlayerSendCancel(cid, "Você já fez essa quest.") end end return TRUE end end

Sim, de propósito, mas minha indentação é horrivel ehuahuehua.

Olá de novo! Ontem mesmo eu tinha postado um script de Red/Black remover (http://www.tibiaking.com/forum/topic/48210-redblack-skull-remover/). Mas o script ficou muito longo, então o sr. Suicide resumiu meu script de 56 linhas em 18 (Vlww Suicide uheauhe). '------' Mas com isso eu aprendi algumas coisas, então fiquem aí com o script: Como ele funciona? Simples. Se baseia em somente 1 baú, mas, para cada vocation, vem um prêmio diferente. Vá até a pasta de actions do seu OT, abra a pasta scripts. Copie qualquer arquivo .lua e renomeie-o para "vocquest.lua", abra-o, delete tudo o que estiver dentro e cole isso: function onUse(cid, item, frompos, item2, topos) -- 1 = Sorc, 2 = Druid, 3 = Pally, 4 = Kina -- local t = {[1] = {id = 2190, quant = 1, stor = 15152}, [2] = {id = 2182, quant = 1, stor = 15153}, [3] = {id = 2455, quant = 1, stor = 15154}, [4] = {id = 2383, quant = 1, stor = 15155}} local voc = t[getPlayerVocation(cid)] if item.uid == 15156 then if voc then if getPlayerStorageValue(cid, voc.stor) == -1 then doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, 'Você ganhou '..voc.quant..' '..getItemNameById(voc.id)..'!') doPlayerAddItem(cid, voc.id, voc.quant) setPlayerStorageValue(cid, voc.stor, 1) else doPlayerSendCancel(cid, "Você já fez essa quest.") end end return TRUE end end Feito isso, feche e salve. Agora abra o seu "actions.xml" e coloque isso lá: <action uniqueid="15156" script="vocquest.lua" /> Fecha e salva. Agora é só dar um /reload actions e colocar no server

Puts, vacilei feio ehuaheua. Valeu aí. Aos poucos eu vou melhorando. O meu pode estar feito do pior jeito, mas pelo menos funciona né? hehe xD

Opa. Já que eu não manjo muito de scripts, eu faço do jeito mais dificil que poderia ser feito kk, mas o conteúdo vai ficando cada vez melhor. Valeu aí manin :3

Deve existir mesmo, mas garanto que não foi copiado, não é identico ao de ninguem... Mas é como eu disse, eu ainda estou aprendendo a programação .lua e queria dica de vcs

Olá povin Esse é meu primeiro tópico. Eu sei que já existem vários Skull Removers pelo site, mas já que estou aprendendo a linguagem .lua, eu acho que nada melhor do que mostrar como eu estou indo. Se quiserem dar sugestões do que poderia ser melhorado ou resumido, podem falar :3 Mas bora lá. Vá até Seu OT\data\talkactions\scripts, e lá copie algum arquivo qualquer, e renomeie-o para "skullremover.lua". Abra-o, apague tudo o que estiver dentro, e cole isso: function onSay(cid, words, param, channel) custo_redskull = 3000000 -- Preço para remover o RedSkull (1.000.000 GPs = 100 Crystal Coins) custo_blackskull = 5000000 -- Preço para remover o BlackSkull texto1_redskull = "Você removeu seu Red Skull por 3kk!" -- Texto ao ser removido o RedSkull texto2_redskull = "Você precisa de 3kk para remover seu Red Skull." -- Texto quando faltar dinheiro para remover o RedSkull texto1_blackskull = "Você removeu seu Black Skull por 5kk!" -- Texto ao ser removido o BlackSkull texto2_blackskull = "Você precisa de 5kk para remover seu Black Skull" -- Texto quando faltar dinheiro para remover o BlackSkull texto_noneskull = "Você não tem Skull para remover" -- Texto quando o player não tem PK Red/Black if (getCreatureSkullType(cid) == 4) then if doPlayerRemoveMoney(cid, custo_redskull) == true then doCreatureSetSkullType(cid, 0) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, texto1_redskull) doSendMagicEffect(getPlayerPosition(cid), 14) else doSendMagicEffect(getPlayerPosition(cid), 2) doPlayerSendTextMessage(cid, 22, texto2_redskull) end end if (getCreatureSkullType(cid) == 5) then if doPlayerRemoveMoney(cid, custo_blackskull) == true then doCreatureSetSkullType(cid, 0) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, texto1_blackskull) doSendMagicEffect(getPlayerPosition(cid), 14) else doSendMagicEffect(getPlayerPosition(cid), 2) doPlayerSendTextMessage(cid, 22, texto2_blackskull) end end if (getCreatureSkullType(cid) == SKULL_NONE) then if doPlayerRemoveMoney(cid, 0) == true then doPlayerSendTextMessage(cid, 22, texto_noneskull) end end return TRUE end Feito isso, feche e salve. Agora vá até Seu OT\data\talkactions e abra o arquivo talkactions.xml como bloco de notas. Procure a seção de Players, e cole isso lá: <talkaction words="!remove" script="skullremover.lua"/> Fecha, salva. Caso seu OT estiver aberto, basta o comando /reload talkactions Flws :3 o/

Pra todos que estão tento dificuldade na hora de abrir a Database, é só baixar a versão mais atual do SQLiteStudio. Segue o link: http://sqlitestudio.pl/?act=download Valeu ai pelo OT Luizbaiak, tava procurando um 10.x sem sites, pq o bagulho aqui é tenso.