Skyforever

FELA DA PPUTA TOMEI 1 SUSTO DO KRL

Não vou participar porquê não quero passar fiasco mais boa sorte pra glr ai. tem um errinho no logo não seria Mapping of the week? não weak?

Obrigado Daaniel. Poderiam dar dicas doque colocar nele leilão pra player tô trabalhando nele.

Pqp, saudades uheuheuhe baixei até agora 8 episodio vo fica d madrugada assistindo

Hum. muda item.uid pelo id da runa que vocÊ usa

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLICE) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -3.1, -180, -2.6, -120) function onCastSpell(cid, var) doTransformItem(item.uid, xxxx) return doCombat(cid, combat, var) end

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLICE) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -3.1, -180, -2.6, -120) function onCastSpell(cid, var) doPlayerRemoveItem(cid, id da runa que usa, 1) doPlayerAddItem(cid, runa que vai ganha, 1) return doCombat(cid, combat, var) end só muda os id

Até presumo oque aconteceu alguém uso RvBot foi banido e espanco o Robson ou não @Topic podia liberar as sources ai néh

Legal mais tu usa auto border demais.

Tu mudo o nome do mapa na pasta world? tem que ser Baiak Infinity senão dá erro.

Baixa o rme 8.6 no site oficial do rme @off ou vai em meu computador disco local da delete e aperta enter

Curisença, bem legal o mapa o script também. reputado

alêm de ficar rico 150 cada um euhehueuheuhe mto fofuxinhos

Tipo tfs 0.4 é em milisegundos então você tem que almentar tudo.

Vlws, e então paro com as aulas porquê?

Olá, galerinha vim trazer o sistema de leilão Imagens primeiramente vá em /data/talkactions/scripts crie um arquivo chamado leilao.lua e adicione isso dentro function onSay(cid, words, param) config = { acess = 4, time = 5, storage = {25601,25602,650213} } function getWinnerLeilao() local w = tostring(getGlobalStorageValue(config.storage[1])):gsub(':', ''):explode(',') if not getPlayerByNameWildcard(w[4]) then local item = doCreateItemEx(w[1]-1, w[2]) local x = doItemSetAttribute(item, "description", "Item comprado em leilão por "..w[3].." gps.") doPlayerSendMailByName(w[4], item) else local x = doPlayerAddItem(getPlayerByNameWildcard(w[4]), w[1], w[2]) doItemSetAttribute(x, "description", "Item comprado em leilão por "..w[3].." gps.") end doBroadcastMessage("O item ["..getItemNameById(w[1]).." : "..w[2].."] Foi vendido para o jogador "..w[4].." por "..w[3].." gps!") setGlobalStorageValue(config.storage[1],-1) setGlobalStorageValue(config.storage[2],-1) for _, pid in pairs(getPlayersOnline()) do setPlayerStorageValue(pid, config.storage[3], -1) end return db.executeQuery("DELETE FROM `player_storage` WHERE `key` = "..config.storage[3]) end if words == "/leilao" then if getPlayerAccess(cid) < config.acess then doPlayerSendTextMessage(cid, 28, "Você não pode executar essa ação.") return true end local t = string.explode(param, ",") if not tonumber(getGlobalStorageValue(config.storage[1])) then doPlayerSendTextMessage(cid, 27, "Já há um leilão ativo no momento.") return true elseif not tonumber(t[1]) or not tonumber(t[2]) or not tonumber(t[3]) then doPlayerSendTextMessage(cid, 28, "Faltou parametro.")return true elseif not isItemMovable(t[1]) then doPlayerSendTextMessage(cid, 28, "Você não pode adicionar esse item no leilão.")return true end setGlobalStorageValue(config.storage[1], ":"..t[1]..",:"..(isItemStackable(t[1]) and t[2] or 1)..",:"..t[3]..",:"..getCreatureName(cid)) setGlobalStorageValue(config.storage[2], os.time()+ config.time*60) doBroadcastMessage("[Leilão] O item ["..getItemNameById(t[1]).." : "..(isItemStackable(t[1]) and t[2] or 1).."] Está em leilão até "..os.date("%X ", getGlobalStorageValue(config.storage[2])).."\nLance Minimo: "..t[3].." gps.") addEvent(getWinnerLeilao, config.time*1000*60) elseif words == "!lance" then if tonumber(getGlobalStorageValue(config.storage[1])) then doPlayerSendTextMessage(cid, 27, "Não tem nenhum leilão ativo no momento.") return true end local s = tostring(getGlobalStorageValue(config.storage[1])):gsub(':', ''):explode(',') if param == "lista" then doShowTextDialog(cid,s[1], "Item: "..getItemNameById(s[1]).."\n\nQuantidade: "..s[2].."\n\nMaior lance atual: "..s[3].."\n\nJogador: "..s[4].."\n\nPrazo Final: "..os.date("%X ", getGlobalStorageValue(config.storage[2]))) return true elseif not tonumber(param) or tonumber(param) <= 0 or tonumber(param) > 9999999 then doPlayerSendTextMessage(cid, 28, "digite um número válido.") return true end local li = getPlayerStorageValue(cid, config.storage[3]) < 0 and 0 or getPlayerStorageValue(cid, config.storage[3]) local conta = (li + tonumber(param)) if conta <= tonumber(s[3]) then doPlayerSendTextMessage(cid, 28, "você tem que dar um lance maior que "..s[3].." gps") return true elseif not doPlayerRemoveMoney(cid, tonumber(param)) then doPlayerSendTextMessage(cid, 28, "você não tem gps suficientes para dar um lance") return true end setPlayerStorageValue(cid, config.storage[3], conta) setGlobalStorageValue(config.storage[1], ":"..s[1]..",:"..s[2]..",:"..conta..",:"..getCreatureName(cid)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Parabéns, agora você deu o maior lance de "..conta.." gps no item [Nome: "..getItemNameById(s[1]).."] [Count: "..s[2].."]") end return true end talkactions.xml <talkaction words="/leilao;!lance" script="leilao.lua"/> Como usar GOD fala /leilao item, quantidade, lançe minimo player fala !lance lançe player fala !lance lista para ver as info do leilão Créditos Eu Vodkart

Sim, mais é meio tenso pegar grana dentro de house depois faço por query pra pegar dos off tbm

function getServerCash() local cash = 0 for _, pid in ipairs(getPlayersOnline()) do cash = cash + getPlayerMoney(pid) + getPlayerBalance(pid) end return cash end retorna a grana do sv exemplo function onSay(cid, words, param) return doPlayerSendTextMessage(cid, 27, "O servidor " .. getConfigValue(serverName) .. " tem " .. getServerCash() .. " gp's atualmente.") end

Tem uma attributekey nos items description só você colocar lá lol

Ou faz por .lua mesmo /data/creaturescripts/scripts nome_do_seu_script.lua function onLogin(cid) registerCreatureEvent(cid, "tpNewbie") local tabble = { -- [ vocação ] = posição [1] = {x = 123, y = 123, z = 7}, [2] = {x = 123, y = 123, z = 7}, [3] = {x = 123, y = 123, z = 7}, [4] = {x = 123, y = 123, z = 7} } local p = tabble[getPlayerVocation(cid)] if p and getPlayerStorageValue(cid, 1234) < 1 then setPlayerStorageValue(cid, 1234, 1) doTeleportThing(cid, p) end return true end creaturescripts.xml <event type="login" name="tpNewbie" event="script" value="nome_do_seu_script.lua"/>

Olá, trago minha primeira spell Ice Penitence! vá em /data/spells/scripts/attack crie um arquivo e renomeie para IcePen.lua e adicione isso dentro function onCastSpell(cid, var) local pos1 = {x = getPlayerPosition(getCreatureTarget(cid)).x - 2, y = getPlayerPosition(getCreatureTarget(cid)).y , z = getPlayerPosition(getCreatureTarget(cid)).z} local pos2 = {x = getPlayerPosition(getCreatureTarget(cid)).x + 2, y = getPlayerPosition(getCreatureTarget(cid)).y , z = getPlayerPosition(getCreatureTarget(cid)).z} local pos3 = {x = getPlayerPosition(cid).x + 2, y = getPlayerPosition(cid).y , z = getPlayerPosition(cid).z} local pos4 = {x = getPlayerPosition(cid).x + -2, y = getPlayerPosition(cid).y , z = getPlayerPosition(cid).z} local min, max = 100, 300 -- dano minimo, maximo! addEvent(doSendDistanceShoot, 1000, pos1, getPlayerPosition(getCreatureTarget(cid)), 28, cid) addEvent(doSendDistanceShoot, 1000, pos2, getPlayerPosition(getCreatureTarget(cid)), 28, cid) doSendDistanceShoot(getPlayerPosition(cid), pos3, 28) doSendDistanceShoot(getPlayerPosition(cid), pos4, 28) addEvent(doTargetCombatHealth, 1000, cid, getCreatureTarget(cid), 512, - min, - max, 43) return true end spells.xml </instant> <instant name="Ice Desorder" words="ice penitence" lvl="150" mana="400" prem="1" range="5" needtarget="1" blockwalls="1" needweapon="1" exhaustion="1800" needlearn="0" event="script" value="attack/IcePen.lua"> <vocation id="2"/> <vocation id="6"/> Explicando em local min, max = 100, 300 ali é o dano minimo e dano maximo o resto presumo que vocês já sabem ~~ Créditos ~~ Skyforever(Por quase tudo) Vodkart( me ajudou nessa linha) addEvent(doTargetCombatHealth, 1000, cid, getCreatureTarget(cid), 512, - min, - max, 43) Imagens

Nome:João Nickname: Para que isso? Data de nascimento/Ou somente idade: 12 anos Tipo de maker: WTF? Função desejada(s): Scripter Algum trabalho a apresentar?:Na minha assinatura Ja esteve em alguma equipe ou projeto antes?:Sim, Shadow Worlds RPG! Tempo disponivel:Depende( 6 a 10 horas )

Olá, novamente galerinha do Tibia King aqui trago-lhes outra função ele soma os valores dentro de um array function math.SumArray(array) local soma,numbers = 0,{} for _, n in pairs(array) do if type(n) == "number" then table.insert(numbers, n) end end for _, i in pairs(numbers) do soma = soma + i end return soma end Exemplo local array = {21,31,23} print(math.SumArray(array)) retornando 75 ~~ Créditos ~~ Eu Vodkart ( colocou para somar somente números )

Olá, galerinha do Tibia King vim trazer outra função function getPlayersInLevel(level) local x = {} for _, pid in ipairs(getPlayersOnline()) do if getPlayerLevel(pid) == tonumber(level) then table.insert(level, pid) end end return x end exemplo de uso function onSay(cid, words, param) if tonumber(param) then doPlayerSendTextMessage(cid, 27, "Tem " .. #getPlayersInLevel(tonumber(param)) .. " player's no level " .. tonumber(param) .. ".") return true end return doPlayerSendTextMessage(cid, 28, "Digite !comando é um número válido.") end espero que gostem

Confesso não confesar nada