Skydangerous

Script: Deixando um item forever Função: Após morrer, não perderá o item, bom para items vip Testado: Versão 8.6 INSTALANDO vá na pasta creaturescript/scripts e cria um arquivo no formato .lua com o nome de forever e cole isto: function onPrepareDeath(cid, lastHitKiller, mostDamageKiller) if (getPlayerSlotItem(cid,2).itemid == 2173) then end return true end em seguida, em login.lua adicione o evento registerCreatureEvent(cid, "forever") depois em creaturescript.xml adicione a tag: <event type="preparedeath" name="forever" event="script" value="forever.lua"/> Como Editar: itemid == 2173 No lugar de 2173, troque para o item. getPlayerSlotItem(cid,2) No lugar do 2, troque para a posição daonde o item irá ficar. CONST_SLOT_HEAD = 1 CONST_SLOT_NECKLACE = 2 CONST_SLOT_BACKPACK = 3 CONST_SLOT_ARMOR = 4 CONST_SLOT_RIGHT = 5 CONST_SLOT_LEFT = 6 CONST_SLOT_LEGS = 7 CONST_SLOT_FEET = 8 CONST_SLOT_RING = 9 CONST_SLOT_AMMO = 10 Script Exclusivo Tibia King

A ideia é bem legal. Além de deixar o fórum mais organizado, fica mais fácil de achar os conteudos

Hm.. Script bem elaborado Curti, é isso ai maninho está de parabéns !

AI Brotherzinho. Seja Bem-vindo néah ! Vamos postar bastante script aqui uUHAU'.

vlw fire Nova Feature. Agora lista do shop Usar: !shop lista Até !

Pronto. Adiconei 3 features novas. -PZ -Battle -Premium , fiquem a vontade para editar do seu gosto.

Sim. Já estou adicionando novas features Como comprar só em pz.. e uma talkaction pra saber qual item e preco pra poder comprar

Script: Shop System by Skydangerous Função: Voce pode comprar items na loja Testado: Versão 8.6 INSTALANDO vá na pasta talkaction/scripts e cria um arquivo no formato .lua com o nome de shop e cole isto: local loja = { ["Fire Sword"] = {id = 2160, preco = 21000, cargas = 2 } } local config = { pz = true, battle = true, premium = true } function onSay(cid, words, param, channel) if(param == "") then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Command param required.") return true end if param == 'lista' then local str = "" for name,preco in pairs(loja) do str = ("Item: " ..name .. ",\n Preço: " .. preco.preco .. "") end str = str .. "" doShowTextDialog(cid, 6579, str) return TRUE end local sky = loja[param] local iten = getItemWeightById(sky.id,1) if config.pz == true and getTilePzInfo(getCreaturePosition(cid)) == FALSE then doPlayerSendTextMessage(cid, 21,"Voce so pode comprar um item em protect zone.") return TRUE end if config.premium == true and not isPremium(cid) then doPlayerSendTextMessage(cid, 21, "Voce so pode comprar um item se for premium.") return TRUE end if config.battle == true and getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE then doPlayerSendTextMessage(cid, 21, "Voce so pode comprar um item sem battle.") return TRUE end if getPlayerFreeCap(cid) < iten then doPlayerSendCancel(cid, "Voce nao tem cap para pegar o item") return TRUE end if getPlayerMoney(cid) < sky.preco then doPlayerSendCancel(cid, "Voce nao tem dinheiro para comprar o item.") return TRUE else doPlayerAddItem(cid,sky.id,1) doPlayerRemoveMoney(cid, sky.preco) doPlayerSendTextMessage(cid, 21, "Parabens, voce comprou um item na loja!") end return TRUE end agora no talkaction.xml cole esta tag: <talkaction words="!shop" event="script" value="shop.lua"/> Modo de Usar: !shop nome do item Adicionando novos items: ["test"] = {id = 2160, preco = 1} ["test"] = Nome do item que o player irá dizer ID = Id do item preco = Quanto irá custar (1 = 1 gp) Lista de Items Script Exclusivo Tibia King

heheheh'. Vlw gente Eu fiz esse script, pq tava jogando global .. e quando upa recupera a mana e vida

Script: Level up = Ful Mana e Full Health Função: Ao evoluir sua vida e mana regenera no máximo Testado: Versão 8.6 INSTALANDO vá na pasta creaturescript/scripts e cria um arquivo no formato .lua com o nome de fullmh e cole isto: function onAdvance(cid, skill, oldlevel, newlevel) if skill == SKILL__LEVEL then doCreatureAddHealth(cid, getCreatureMaxHealth(cid)) doCreatureAddMana(cid, getCreatureMaxMana(cid)) end return TRUE end em seguida, em login.lua adicione o evento registerCreatureEvent(cid, "fullmh") depois em creaturescript.xml adicione a tag: <event type="advance" name="fullmh" event="script" value="fullmh.lua"/> Script Exclusivo Tibia King

@Maik Obrigado pelo reconhecimento e pelo bem-vindo @Comedinhasss é isso ai, irmãozinho T_T

Bom, a alguns tempo venho conhecendo o fórum, analisando ele .. e gostei muito porquê além de terem uma equipe que apoia, ajuda ainda é permitido postagens de bot e tudo mais. Alguns devem me conhecer, por causa do outro fórum e alguns por verem alguns post meus aqui Sou o Skydangerous, mas se quiser podem ser apenas sky ou skyd. A alguns tempos mecho em otserv, principalmente na parte de programação e mapas. Pretendo ajudar em dúvidas de script, programação e mapas aqui no forum e também irei postar alguns waypoints de bots que eu faço. Espero que gostem de mim, sou uma pessoa legal

Queria um script que não ataca-se o monstro do player, pra não arrumar confusão e ficarem dizendo que estou no bot !

Por enquanto nada KKKK', ai você quiser pode editar do seu gosto. mas irei implementar na versão próxima;

Olá, venho trazer o um novo tipo de egg system, que eu tive a ideia de criar e quero agradecer a mega ajuda do ONESHOT crie um arquivo na pasta scripts dos npc com nome de eggsystem.lua local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} function onCreatureAppear(cid) npcHandler:onCreatureAppear(cid) end function onCreatureDisappear(cid) npcHandler:onCreatureDisappear(cid) end function onCreatureSay(cid, type, msg) npcHandler:onCreatureSay(cid, type, msg) end function onThink() npcHandler:onThink() end function onCreatureSayCallback(cid, type, msg) local config = { price = 50000, delay = 5 * 60, control = {10555, 10556}, eggn = 4850 } if not npcHandler:isFocused(cid) then return false end local talkUser = NPCHANDLER_CONVBEHAVIOR == CONVERSATION_DEFAULT and 0 or cid if msgcontains(msg, "care") then local p = (config.price % 1000 == 0 and (config.price / 1000) or config.price) if getPlayerStorageValue(cid, config.control) > os.time() then selfSay("Sorry, but I am already caring one of your eggs.", cid) else selfSay("Do you want me to take care of your egg for ".. p .." ".. (p == config.price and "" or "k") .."?", cid) talkState[talkUser] = 1 end elseif msgcontains(msg, "back") then if getPlayerStorageValue(cid, config.control[2]) == 1 then selfSay("Hello, do you came to pick up your egg?", cid) talkState[talkUser] = 2 else selfSay("Sorry, but I am not caring eggs from you.", cid) end elseif msgcontains(msg, "check") then local t = getPlayerStorageValue(cid, config.control[1]) if getPlayerStorageValue(cid, config.control[2]) == -1 then selfSay("Sorry, but I am not caring eggs from you.", cid) else if t < os.time() then selfSay("Yay, your egg has started to hatch, take it.", cid) setPlayerStorageValue(cid, config.control[1], -1) setPlayerStorageValue(cid, config.control[2], -1) else selfSay("I will be caring your egg for more ".. (math.floor((t - os.time()) / 60) > 0 and "".. math.floor((t - os.time()) / 60) .." minutes and" or "") .." ".. (t - os.time()) % 60 .." seconds.", cid) end end end if talkState[talkUser] == 1 then if msgcontains(msg, "yes") then if getPlayerStorageValue(cid, config.control[2]) == -1 then if doPlayerRemoveMoney(cid, config.price) then setPlayerStorageValue(cid, config.control[2], 1) setPlayerStorageValue(cid, config.control[1], os.time()+config.delay) selfSay("Okay! Check back soon.", cid) else selfSay("Sorry, you don't have enough money. You need more ".. (config.price - getPlayerMoney(cid)) .." coins.", cid) end else selfSay("I am already taking care of a egg for you.", cid) end elseif msgcontains(msg, "no") then selfSay("Too pricey for you, heh?", cid) end elseif talkState[talkUser] == 2 then local x = getPlayerStorageValue(cid, config.control) local t = getPlayerStorageValue(cid, config.control[1]) if msgcontains(msg, "yes") then if x > os.time() then local item = doPlayerAddItem(cid, config.eggn, 1) doItemSetAttribute(item, "description", "A hatched egg.") selfSay("Take it!", cid) setPlayerStorageValue(cid, control[2], -1) setPlayerStorageValue(cid, control[1], -1) else selfSay("Sorry, but your egg need care for more ".. (math.floor((t - os.time()) / 60) > 0 and "".. math.floor((t - os.time()) / 60) .." minutes and" or "") .." ".. (t - os.time()) % 60 .." seconds.", cid) end end end return true end npcHandler:setMessage(MESSAGE_GREET, "Hello, |PLAYERNAME|. I am a pet egg carer. Do you want me to {care} your pet eggs? Also you can {check} the egg status and if you have any egg here, you can get it {back}.") npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, onCreatureSayCallback) npcHandler:addModule(FocusModule:new()) Agora crie um npc chamado mary <?xml version="1.0" encoding="UTF-8"?> <npc name="Mary" script="eggsystem.lua" walkinterval="2000" floorchange="0"> <health now="100" max="100"/> <look type="138" head="20" body="39" legs="45" feet="7" addons="3"/> </npc> Como Funciona: 1- Você pega um ovo qualquer. 2- Leva para o NPC 3- Ele cuidará dele 4- Depois de um tempo você pega ele de volta Função do NPC: ~> Paga 50k para cuidar do seu ovo ~>Checa o tempo necessário para ele chocar ~>Pegar o ovo chocado

Sim. Iremos lançar essas que você disse. Por enquanto no beta iremos lançar apenas 2.

Seja Bem-Vindos ! Bom, irei falar com poucas palavras sobre o projeto, para não ficar um tópico muito cansativo. O começo: Ao entrar no servidor, você passará por etapas antes de escolher sua tribo, podendo assim adquirir experiência antes de começar a enfrentar monstros ou membros de outras tribos. Tribos: Será totalizada 4 tribos, os nomes não foram definidos, cada tribo viverá em uma ilha, sendo na sua ilha terá missões a serem completadas, monstros a ser derrotados e level a ser evoluido. Porém pessoas da mesma tribo não pode ser atacado viverá em paz. Guerra: As tribos poderá guerriar entre elas, como se você uma war normal no tibia, porém teremos sistemas exclusivos onde as outras tribos não poderá ajudar ou interferir na guerra. Domínio: Futuramente, iremos implementar o sistema de domínio, onde cada tribo terá um "ponto fraco" , ao ser dominado ou seja atacado e derrotado todos da aliança receberão um prêmio de experiência e dinheiro, além de muitas outras vantagens. O domínio será de 1 semana no máximo, após essa data automaticamente as outras tribos não poderão entrar na cidade. Vantagens: No começo do projeto, iremos apresentar apenas 4 vocações as normais (Sorc, Druid,Pala,Knight) sendo usadas em todas as tribos, porém futuramente, iremos implementar elementos e vocações novas que irá diferenciar cada tribo ou seja cada tribo terá um ponto forte. Sprites: Não, as sprites serão normais. o que eu irei fazer e adicionar novos ids de items Mas esse projeto está no papel ou tem algo pronto: Não, está apenas no papel, mas nas ferias irei começar a implementar os sistemas e provavelmente se tudo ocorrer como planejado irei lançar ele. Poderá demorar pois é muito complexo, devo testar e principalmente a fazer os mapas. Construção: Não temos vagas para scripter. Vagas: Criador de Histórias: 2 Vagas Mapper Experiente : 2 Vagas

Cave de frost troll =

se possivél me ajuda plxxx

OI Alguem poderia me ajudar, bom eu gostaria de adicionar novos menus no tibia. Ex: existe opções look , use with , use .. queria por uma opção nova .. alguem pode me indicar quais os programas que usa e algum tutorial? seria para tibia 8.54 até 8.7

Thanks *_* Só que ainda acho muito difícil de intender essas funções, mas vlw.

ok. thanks joão meu amor :* irei tentar, caso não conseguir postarei novamente

Bom gente, eu estou fazendo um script e preciso que me ajudem. Eu preciso de uma função que salva a posição do jogador quando morreu, e quando ele logar automaticamente ele irá para esse lugar. Alguem pode dar uma ajuda?

Esse sistema é bem legal para aqueles que gostam de tipo tibia gta , o script não é perfeito mas é bem criativo e legal. Crie um arquivo em nas pata action com nome de arma.lua Cole isso function isWalkable(pos, creature, proj, pz)-- by Nord if getTileThingByPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}).itemid == 0 then return false end if getTopCreature(pos).uid > 0 and creature then return false end if getTileInfo(pos).protection and pz then return false, true end local n = not proj and 3 or 2 for i = 0, 255 do pos.stackpos = i local tile = getTileThingByPos(pos) if tile.itemid ~= 0 and not isCreature(tile.uid) then if hasProperty(tile.uid, n) or hasProperty(tile.uid, 7) then return false end end end return true end function doShootEffect(distancetotarget, effect, l, y) -- l = localpos(lookdirpos), y = dirvalue for i = 0, distancetotarget-1 do if isInArray({0,3}, y) then local _J = y == 0 and {x = l.x, y = l.y-i, z = l.z} or y == 3 and {x = l.x-i, y = l.y, z = l.z} doSendMagicEffect(_J, effect) else _J = y == 1 and {x = l.x+i, y = l.y, z = l.z} or y == 2 and {x = l.x, y = l.y+i, z = l.z} doSendMagicEffect(_J, effect) end end return true end local items = { [2534] = { balaid = 2545, level = 1, skillup = 5, mindamage = -1, maxdamage = -5255, damagetype = COMBAT_HOLYDAMAGE, } } local _MIT = {} local shootmode = "shooteffect mode" -- "effect mode" or "shooteffect mode" function onUse(cid, item, fromPosition, itemEx, toPosition) local function getFirstThingInArea(pos) for areax = pos.x, pos.x do for areay = pos.y, pos.y do local area = {x = areax, y = areay, z = pos.z} if isCreature(getTopCreature(area).uid) or not isWalkable(area) then table.insert(_MIT, getThingFromPos(area).uid) for s = 1, #_MIT-1 do table.remove(_MIT, s+1) end end end end return true end local l = getPlayerLookPos(cid) local y = getCreatureLookDirection(cid) local g = items[item.itemid] if g then if getPlayerLevel(cid) < g.level then return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You need level ".. g.level .." or higher.") end if getTilePzInfo(getCreaturePosition(cid)) then return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "You cannot use a gun in a protection zone.") end if item.uid ~= getPlayerSlotItem(cid, 5).uid then return doPlayerSendCancel(cid, "Equip your gun on gun slot.") end if getPlayerSlotItem(cid, 10).itemid == g.balaid then doRemoveItem(getPlayerSlotItem(cid, 10).uid, 1) doPlayerAddSkillTry(cid, g.skillup, 1) for T = 0, 20 do local _g = y == 0 and {x = l.x, y = l.y-T, z = l.z} or y == 3 and {x = l.x-T, y = l.y, z = l.z} or y == 1 and {x = l.x+T, y = l.y, z = l.z} or y == 2 and {x = l.x, y = l.y+T, z = l.z} getFirstThingInArea(_g) end if #_MIT >= 1 then local mpos = getThingPos(_MIT[1]) local ppos = getDistanceBetween(mpos, l) local ft = y == 0 and {x = l.x, y = l.y-ppos, z = l.z} or y == 1 and {x = l.x+ppos, y = l.y, z = l.z} or y == 2 and {x = l.x, y = l.y+ppos, z = l.z} or y == 3 and {x = l.x-ppos, y = l.y, z = l.z} if isCreature(getTopCreature(mpos).uid) then doAreaCombatHealth(0, g.damagetype, ft, 0, g.mindamage, g.maxdamage, 0) else doSendMagicEffect(ft, 3) end if shootmode == "shooteffect mode" then doShootEffect(ppos, 12, l, y) elseif shootmode == "effect mode" then doSendDistanceShoot(l, mpos, 40) end table.remove(_MIT, 1) end else doPlayerSendCancel(cid, "You do not have munition.") end end return true end Cole isso agora em action.xml <action itemid="2534" event="script" value="arma.lua"/> Explicação: local shootmode <-- Pode trocar para effect mode [2534] = { <-- ID DA ARMA balaid = 2545, <-- ID DA BALA level = 1, <-- Level para usar skillup = 5, <-- SKILL UP mindamage = -1, <-- MINIMO DE DANO maxdamage = -5255, <-- MAXIMO DE DANO damagetype = COMBAT_HOLYDAMAGE, <-- EFEITO DO TIRO <action itemid="2534"/> Id da arma , preste atenção se mudar também no script. Video demostrando: KylerXxX Skydangerous - Explica&#231;&#227;o , tutorial e video Créditos:

Tutorial: Importando e Exportando Tabelas em MYSQL Autor: SkyDangerous(EU) Nivél Tutorial: Iniciante Programa Usado: XAMPP Siga os passoa a seguir , e não seja curioso e pule ou faça outras coisas ! Importando Tabelas: 1 Passo: Iremos primeiro de tudo abrir o local onde fica o nosso banco de dados(PHPMYADMIN) utilizando esse código http://localhost:8090/phpmyadmin/. 2 Passo: Pronto , agora criamos a nosso banco de dados , com qualquer nome e então selecionamos ele e clicamos em importar. 3 Passo: Agora clique na opção "Escolher Arquivo" , lembrando que ele só irá abrir arquivos em formato SQL 4 Passo: Agora clica na opção "Executar" la embaixo no canto direito. 5 Passo: Fazendo isso certinho , aparecerá uma mensagem assim Importa&#231;&#227;o finalizada com sucesso, 71 consultas executadas. 6 Passo: Pronto , você importou suas tabelas , seja feliz :thumbsupsmiley: OBservações: Existem outros métodos , porém esse é o melhor Exportanto Tabelas: 1 Passo: Vamos entrar em nosso banco de dados criado já e importado. 2 Passo: Agora , vamos clicar na opção "Exportar". 3 Passo: Segue a baixo o que deve fazer. 4 Passo: Pronto , agora clicando em executar , ele aparecerá a tela de salvar arquivo , salve ele em um local. 5 Passo: Agora , voce salvou o arquivo e pode levar para todos os lugares