FlameArcixt

se precisar de mais algo Arcixt#1329

cade o script??

agora foi

local NPCBattle = { ["Brock"] = {artig = "He is", cidbat = "Pewter"}, ["Misty"] = {artig = "She is", cidbat = "Cerulean"}, ["Blaine"] = {artig = "He is", cidbat = "Cinnabar"}, ["Sabrina"] = {artig = "She is", cidbat = "Saffron"}, --alterado v1.9 \/ peguem tudo! ["Kira"] = {artig = "She is", cidbat = "Viridian"}, ["Koga"] = {artig = "He is", cidbat = "Fushcia"}, ["Erika"] = {artig = "She is", cidbat = "Celadon"}, ["Surge"] = {artig = "He is", cidbat = "Vermilion"}, } local shinys = { ["Shiny Abra"] = "Dark Abra", ["Shiny Onix"] = "Crystal Onix", ["Shiny Gyarados"] = "Red Gyarados", ["Shiny Charizard"] = "Elder Charizard", ["Shiny Venusaur"] = "Ancient Venusaur", ["Shiny Blastoise"] = "Ancient Blastoise", ["Shiny Farfetch'd"] = "Elite Farfetch'd", ["Shiny Hitmonlee"] = "Elite Hitmonlee", ["Shiny Himonchan"] = "Elite Hitmonchan", ["Shiny Snorlax"] = "Big Snorlax", } function onLook(cid, thing, position, lookDistance) local str = {} local isTrade = false if lookDistance == 0 then isTrade = true end -- trade lookDistanc end if not isCreature(thing.uid) then local iname = getItemInfo(thing.itemid) if isPokeball(thing.itemid) and getItemAttribute(thing.uid, "poke") then local isDittoBall = isInArray({"Ditto", "Shiny Ditto"}, getItemAttribute(thing.uid, "poke")) and true or false unLock(thing.uid) local lock = getItemAttribute(thing.uid, "lock") local pokename = isDittoBall and getItemAttribute(thing.uid, "copyName") or getItemAttribute(thing.uid, "poke") local heldx = getItemAttribute(thing.uid, "xHeldItem") local heldy = getItemAttribute(thing.uid, "yHeldItem") local megaID = getItemAttribute(thing.uid, "megaID") if heldx == "none" then heldx = nil end if heldy == "none" then heldy = nil end local pokeBallName = getItemAttribute(thing.uid, "ball") if not pokeBallName then doItemSetAttribute(thing.uid, "ball", "poke") pokeBallName = "Poke" end if isGod(cid) then table.insert(str, "ItemID[".. thing.itemid .."].\n") end table.insert(str, "You see ".. doCorrectString(pokeBallName) .."ball.") if getItemAttribute(thing.uid, "unique") then table.insert(str, " It's an unique item.") end table.insert(str, "\nIt contains "..getArticle(pokename).." "..pokename.. (isDittoBall and " (Ditto)" or "") .. ".\n") if lock and lock > 0 then table.insert(str, "It will unlock in ".. os.date("%d/%m/%y %X", lock)..".\n") end local boost = getItemAttribute(thing.uid, "boost") or 0 if boost > 0 then table.insert(str, "Boost level: +"..boost..".\n") end -- if getItemAttribute(thing.uid, "level") then -- table.insert(str, "Level: "..getItemAttribute(thing.uid, "level")..".") -- local check = getItemAttribute(thing.uid, "spatt") -- if check == nil or check == '' then -- table.insert(str, "\nNever used pokeball") -- else -- local pb = thing -- local clanatt = math.ceil(getItemAttribute(pb.uid, "clanatt")) -- local clandef = math.ceil(getItemAttribute(pb.uid, "clandef")) -- local clanhp = math.ceil(getItemAttribute(pb.uid, "clanhp")) -- local def =math.ceil(getItemAttribute(pb.uid, "def")) -- local hp =math.ceil(getItemAttribute(pb.uid, "hp")) -- local spattack = math.ceil(getItemAttribute(pb.uid, "spatt")) -- table.insert(str, "\nSp. Attack: "..spattack.."") -- if clanatt > 0 then -- table.insert(str, "(+"..clanatt..").") -- end -- table.insert(str, "\nDef : %"..math.ceil(def)..".") -- if clandef > 0 then -- table.insert(str, "(+"..clandef..").") -- end -- table.insert(str, "\nHP Max: "..hp.."") -- if clanhp > 0 then -- table.insert(str, "(+"..clanhp..").") -- end -- end -- end if getItemAttribute(thing.uid, "expneed") then table.insert(str, "\nExperience: "..math.ceil(getItemAttribute(thing.uid, "exp")).."/"..getItemAttribute(thing.uid, "expneed")..".\n") end -- local multiplicador = getItemAttribute(thing.uid, "multiplier") if getItemAttribute(thing.uid, "porcentaje") then local porcentaje = getItemAttribute(thing.uid, "porcentaje") table.insert(str, porcentaje.."% perfecto.\n") end if getItemAttribute(thing.uid, "nick") then table.insert(str, "It's nickname is: "..getItemAttribute(thing.uid, "nick")..".\n") end local heldName, heldTier = "", "" local heldYName, heldYTier = "", "" if heldx or heldy then if heldx then heldName, heldTier = string.explode(heldx, "|")[1], string.explode(heldx, "|")[2] end if heldy then heldYName, heldYTier = string.explode(heldy, "|")[1], string.explode(heldy, "|")[2] end local heldString = heldName .. " (tier: " .. heldTier .. ")" local heldYString = heldYName .. (not isInArray({"Mega", "GHOST"}, heldYTier) and " (tier: " .. heldYTier .. ")" or "") if heldx and heldy then table.insert(str, "Holding: " .. heldString .. " and " .. heldYString .. ". ") elseif heldx then table.insert(str, "Holding: "..heldString..". ") elseif heldy then table.insert(str, "Holding: "..heldYString ..". ") end end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false elseif getItemAttribute(thing.uid, "pokeName") and string.find(getItemAttribute(thing.uid, "pokeName"), "fainted") then local lootName = getItemAttribute(thing.uid, "pokeName") if isGod(cid) then table.insert(str, "ItemID[".. thing.itemid .."].\n") end table.insert(str, "You see a "..string.lower(lootName)..". ") if isContainer(thing.uid) then table.insert(str, "(Vol: "..getContainerCap(thing.uid)..")") end if getItemAttribute(thing.uid, "corpseowner") then if getItemAttribute(thing.uid, "corpseowner") == "asçdlkasçldkaçslkdçaskdçaslkdçlsakdçkaslç" then table.insert(str, "\nSuicidou-se.") else table.insert(str, "\nEste fue matado por: ("..getItemAttribute(thing.uid, "corpseowner")..")") end end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false elseif isContainer(thing.uid) then --containers if isGod(cid) then table.insert(str, "ItemID[".. thing.itemid .."].\n") end if getItemAttribute(thing.uid, "iname") then table.insert(str, "You see "..iname.article.." "..iname.name..". (Vol:"..getContainerCap(thing.uid)..").") table.insert(str, getItemAttribute(thing.uid, "iname")..".") else table.insert(str, "You see "..iname.article.." "..iname.name..". (Vol:"..getContainerCap(thing.uid)..").") end if getPlayerGroupId(cid) >= 4 and getPlayerGroupId(cid) <= 6 then table.insert(str, "\nItemID: ["..thing.itemid.."]") local pos = getThingPos(thing.uid) table.insert(str, "\nPosition: [X: "..pos.x.."][Y: "..pos.y.."][Z: "..pos.z.."]") end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false elseif getItemAttribute(thing.uid, "unique") then if isGod(cid) then table.insert(str, "ItemID[".. thing.itemid .."].\n") end local p = getThingPos(thing.uid) table.insert(str, "You see ") if thing.type > 1 then table.insert(str, thing.type.." "..iname.plural..".") else table.insert(str, iname.article.." "..iname.name..".") end table.insert(str, " It's an unique item.\n"..iname.description) if getPlayerGroupId(cid) >= 4 and getPlayerGroupId(cid) <= 6 then table.insert(str, "\nItemID: ["..thing.itemid.."]") table.insert(str, "\nPosition: ["..p.x.."]["..p.y.."]["..p.z.."]") end sendMsgToPlayer(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false else return true end end local npcname = getCreatureName(thing.uid) if ehNPC(thing.uid) and NPCBattle[npcname] then --npcs duel table.insert(str, "You see "..npcname..". "..NPCBattle[npcname].artig.." leader of the gym from "..NPCBattle[npcname].cidbat..".") doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false end if getPlayerStorageValue(thing.uid, 697548) ~= -1 then table.insert(str, getPlayerStorageValue(thing.uid, 697548)) local pos = getThingPos(thing.uid) if youAre[getPlayerGroupId(cid)] then table.insert(str, "\nPosition: [X: "..pos.x.."][Y: "..pos.y.."][Z: "..pos.z.."]") end doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false end if not isPlayer(thing.uid) and not isMonster(thing.uid) then --outros npcs table.insert(str, "You see "..getCreatureName(thing.uid)..".") doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false end if isPlayer(thing.uid) then --player doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, getPlayerDesc(cid, thing.uid, false)) return false end if getCreatureName(thing.uid) == "Evolution" then return false end if not isSummon(thing.uid) then --monstros table.insert(str, "You see a wild "..string.lower(getCreatureName(thing.uid))..".\n") if isGod(cid) then table.insert(str, "Hit Points: "..getCreatureHealth(thing.uid).." / "..getCreatureMaxHealth(thing.uid)..".\n") end table.insert(str, "Level: ?\n") doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) return false elseif isSummon(thing.uid) and not isPlayer(thing.uid) then --summons local boostlevel = getItemAttribute(getPlayerSlotItem(getCreatureMaster(thing.uid), 8).uid, "boost") or 0 local isDittoBall = isInArray({"Ditto", "Shiny Ditto"}, getItemAttribute(getPlayerSlotItem(getCreatureMaster(thing.uid), 8).uid, "poke")) and true or false if getCreatureMaster(thing.uid) == cid then local myball = getPlayerSlotItem(cid, 8).uid table.insert(str, "You see your "..doCorrectString(getCreatureName(thing.uid)).. (isDittoBall and " (Ditto)" or "") ..".") if boostlevel > 0 then table.insert(str, "\nBoost level: +"..boostlevel..".") end local nick = doCorrectString(getCreatureName(cid)) local pb = getPlayerSlotItem(getCreatureMaster(cid), ? -- local levelon = getItemAttribute(pb.uid, "level") local def =math.ceil(getItemAttribute(pb.uid, "def")) local hp =math.ceil(getItemAttribute(pb.uid, "hp")) -- local lvl =math.ceil(getItemAttribute(pb.uid, "level")) local spattack = math.ceil(getItemAttribute(pb.uid, "spatt")) local clanatt = math.ceil(getItemAttribute(pb.uid, "clanatt")) local clandef = math.ceil(getItemAttribute(pb.uid, "clandef")) local clanhp = math.ceil(getItemAttribute(pb.uid, "clanhp")) -- table.insert(str, "\nLevel :"..lvl..".") table.insert(str, "\nSp. Attack: "..spattack.."") if clanatt > 0 then table.insert(str, "(+"..clanatt..").") end table.insert(str, "\nDef : %"..math.ceil(def).."") if clandef > 0 then table.insert(str, "(+"..clandef..").") end table.insert(str, "\nHP Max: "..hp.."") if clanhp > 0 then table.insert(str, "(+"..clanhp..").") end table.insert(str, "\n"..getPokemonHappinessDescription(thing.uid)) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, table.concat(str)) else local estestring = "" local pb = getPlayerSlotItem(getCreatureMaster(thing.uid), ? local levelon = getItemAttribute(pb.uid, "level") local def =math.ceil(getItemAttribute(pb.uid, "def")) local hp =math.ceil(getItemAttribute(pb.uid, "hp")) local spattack = math.ceil(getItemAttribute(pb.uid, "spatt")) local clanatt = math.ceil(getItemAttribute(pb.uid, "clanatt")) local clandef = math.ceil(getItemAttribute(pb.uid, "clandef")) local clanhp = math.ceil(getItemAttribute(pb.uid, "clanhp")) estestring = estestring .. "\nLevel :"..levelon.."." estestring = estestring .. "\nSp. Attack: "..spattack.."" if clanatt > 0 then estestring = estestring .. "(+"..clanatt..")." end estestring = estestring .. "\nDef : %"..math.ceil(def).."" if clandef > 0 then estestring = estestring .. "(+"..clandef..")." end estestring = estestring .. "\nHP: "..hp.."" if clanhp > 0 then estestring = estestring .. "(+"..clanhp..")." end local health = "\nHit points: "..getCreatureHealth(thing.uid).."/"..getCreatureMaxHealth(thing.uid).."." doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You see a "..doCorrectString(getCreatureName(thing.uid)).. (isDittoBall and " (Ditto)" or "") ..".\nIt belongs to "..getCreatureName(getCreatureMaster(thing.uid)).."."..estestring .. (isGod(cid) and health or "") ) end return false end return true end

tenta usar assim agora

local config = { -- X -- [itemid] = {attribute = "x", 1, 0}, -- life crystal, atributo que ela da, quantidade, quanto de atributo pode ter na arma [itemid] = {attribute = "x", 1, 15}, -- iron crystal, atributo que ela da, quantidade, quanto de atributo pode ter na arma } function onUse(cid, item, frompos, item2, topos) if not config[item.itemid] then return false end local held = config[item.itemid] if held then if getItemAttribute(item2.uid, held.attribute) == held[3] then return doPlayerSendCancel(cid,"Seu item não pode receber mais desse atributo") end doSetItemAttribute(item2.uid, held.attribute) doRemoveItem(item.uid, 1) doSendMagicEffect(getThingPos(cid), 14) doPlayerSendCancel(cid, "Seu "..getItemNameById(item2.uid).." ganhou um novo Atributo:"..held.attribute..".") return true end

function onUse(player, item, fromPosition, itemEx, toPosition) local bossName = "Urmahlullu The Weakened" local playersTable = {} local fromPosition_ = Position(33909, 31634, 8) local toPosition_ = Position(33932, 31661, 8) local exitPosition = Position(33919, 31623, 8) local storage_lulu = 100001 if item:getId() == 9825 then if doCheckBossRoom(player:getId(), bossName, fromPosition_, toPosition_) then for i = 33918, 33922, 1 do local newpos = Position(i, 31626, 8) local nplayer = Tile(newpos):getTopCreature() if nplayer and nplayer:isPlayer() and not nplayer:getStorageValue(storage_lulu) == 0 or nplayer:getStorageValue(storage_lulu) == -1 then nplayer:teleportTo(Position(33919, 31658, 8), true) nplayer:getPosition():sendMagicEffect(CONST_ME_TELEPORT) table.insert(playersTable, nplayer:getId()) nplayer:setStorageValue(storage_lulu, os.stime() + 20*60*60) -- AQUI SERIA O STORAGE E O TEMPO PARA SAIR A STORAGE E O PLAYER FAZER DE NOVO, NO CASO 20H end end local oberon = Game.createMonster("Urmahlullu The Weakened", Position(33918, 31644, 8)) -- Boss addEvent(kickPlayersAfterTime, 30*60*1000, playersTable, fromPosition_, toPosition_, exitPosition) end end return true end

editado

function buff_bijuu(cid, pointsSkill, time, subId) local buff_bijuu = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(buff_bijuu, CONDITION_PARAM_TICKS, time*1000) setConditionParam(buff_bijuu, CONDITION_PARAM_STAT_MAGICLEVEL, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SKILL_FIST, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SKILL_SWORD, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SKILL_AXE, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SKILL_CLUB, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SKILL_DISTANCE, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SKILL_SHIELD, pointsSkill) setConditionParam(buff_bijuu, CONDITION_PARAM_SUBID, subId) return doAddCondition(cid, buff_bijuu) end function buff_life(cid, health, time, subId) local buff_life = createConditionObject(CONDITION_REGENERATION) setConditionParam(buff_life, CONDITION_PARAM_SUBID, subId) setConditionParam(buff_life, CONDITION_PARAM_TICKS, time*1000) setConditionParam(buff_life, CONDITION_PARAM_HEALTHGAIN, health) setConditionParam(buff_life, CONDITION_PARAM_HEALTHTICKS, 1000) return doAddCondition(cid, buff_life) end function onCastSpell(cid, var) local tempocoldown = 40 -- Tempo de exhaustion em segundos local sto = 45645896 -- Storage de Spell, nunca usar a mesma em outra spell, a menos que não queira usar duas spell juntas! if exhaustion.check(cid, sto) then doPlayerSendCancel(cid, "Aguarde " .. exhaustion.get(cid, sto) .. " segundos para usar essa spell novamente.") return false end if jin.getPlayerBijuu(cid) ~= 0 then if not getCreatureCondition(cid, CONDITION_ATTRIBUTES, jin_cond_id) then doSetCreatureOutfit(cid, {lookType = jin_bijuus[jin.getPlayerBijuu(cid):lower()].bijuu_outfit} , jin_bijuus[jin.getPlayerBijuu(cid):lower()].time_buff*1000) buff_bijuu(cid, jin_bijuus[jin.getPlayerBijuu(cid):lower()].skill_p, jin_bijuus[jin.getPlayerBijuu(cid):lower()].time_buff, jin_cond_id) buff_life(cid, jin_bijuus[jin.getPlayerBijuu(cid):lower()].health, jin_bijuus[jin.getPlayerBijuu(cid):lower()].time_buff, jin_cond_id) exhaustion.set(cid, 45645896, 30) doPlayerSendTextMessage(cid, MESSAGE_EVENT_ORANGE, "Bijuu Mode Ativado!!") doSendMagicEffect(getThingPosition(cid), jin_bijuus[jin.getPlayerBijuu(cid):lower()].effBuff) else return false, doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Você já está com o buff de sua bijuu.") end else return false, doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Você precisa selar algum bijuu para usar !bijumode.") end exhaustion.set(cid, sto, tempocoldown) return true end Topico resolvido? marca a resposta como solução, e se puder deixar uma reação "obrigado" eu agradeço.

editado.

local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -53.2, 1, -54.2, 1) function onCastSpell(cid, var) local tempocoldown = 3 -- Tempo de exhaustion em segundos local sto = 150000 -- Storage de Spell, nunca usar a mesma em outra spell, a menos que não queira usar duas spell juntas! if exhaustion.check(cid, sto) then doPlayerSendCancel(cid, "Aguarde " .. exhaustion.get(cid, sto) .. " segundos para usar essa spell novamente.") return false end if exhaustion.check(cid, 45645896) then local position1 = {x=getThingPosition(getCreatureTarget(cid)).x, y=getThingPosition(getCreatureTarget(cid)).y-1, z=getThingPosition(getCreatureTarget(cid)).z} local position2 = {x=getThingPosition(getCreatureTarget(cid)).x+2, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z} local position3 = {x=getThingPosition(getCreatureTarget(cid)).x-1, y=getThingPosition(getCreatureTarget(cid)).y+1, z=getThingPosition(getCreatureTarget(cid)).z} local position4 = {x=getThingPosition(getCreatureTarget(cid)).x+3, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z} local position5 = {x=getThingPosition(getCreatureTarget(cid)).x, y=getThingPosition(getCreatureTarget(cid)).y, z=getThingPosition(getCreatureTarget(cid)).z} doSendMagicEffect(position1, 304) doSendMagicEffect(position2, 304) doSendMagicEffect(position3, 302) doSendMagicEffect(position4, 302) doSendMagicEffect(position5, 304) exhaustion.set(cid, sto, tempocoldown) return doCombat(cid, combat, var) else return doPlayerSendCancel(cid, "Você só pode usar essa spell com buff") end end

Preciso do script da spell pra fazer isso, você tem?

Se voce souber a pasta que ta salvando no seu old, eu tento encontrar a solução

O nome da bag é no item.xml ou outro é no client/modules/game_skills

Essa tfs nao tem animatedtext, tem que por na source kk

config = { [259005] = {1002}, -- storage, efeito que vai sair se tiver a sto [STO] = {12}, [STO] = {12}, } local time = 5 function effect(cid) if isPlayer(cid) then if getPlayerStorageValue(cid, config[sto]) == 1 then doSendMagicEffect(getThingPos(cid), config[sto][2]) addEvent(effect, time * 1000, cid) end end end function onLogin(cid) if getPlayerStorageValue(cid, config[sto]) == 1 then doSendMagicEffect(getThingPos(cid),config[sto][1]) addEvent(effect, time * 1000, cid) end return true end Tem formas menos sujas de fazer, mas to sem tempo então é isso ai, todas storages configuradas em um script tmj

Acho que ele nao quer que saia todos os textos juntos, e sim aleatorios, eu acho kkk pelo que eu li o topico é isso

function onKill(cid, target, lastHit) local EXP = 100 -- experience que o player vai receber, somada a experience do target if(isPlayer(cid) and isPlayer(target)) then if getPlayerIp(cid) ~= getPlayerIp(target) then doPlayerAddExperience(cid, (getPlayerExperience(target)+EXP)) -- you will likely want to introduce a formula here else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"You will not receive anything for killing players of the same IP.") end end return true end

function onUse(cid, item, fromPos, item2, toPos) local STORAGE_OUTFIT = 181656 local dias = 1 if doRemoveItem(item.uid, 1) then setPlayerStorageValue(cid,STORAGE_OUTFIT,os.time() + (1*60*60*24*dias)) doPlayerSendCancel(cid, "Recebeu uma outfit.") return true else doPlayerSendCancel(cid, "Não recebeu a outfit.") end return true end

function onUse(cid, item, fromPos, item2, toPos) local STORAGE_OUTFIT = 181656 local dias = 1 if doRemoveItem(item.uid, 1) then setPlayerStorageValue(cid,STORAGE_OUTFIT,os.time() + (1*60*60*24*Dias)) doPlayerSendCancel(cid, "Recebeu uma outfit.") return true else doPlayerSendCancel(cid, "Não recebeu a outfit.") end return true end

aperta em add, depois vai aparecer a janela, vc pressiona a hotkey que quer adicionar depois configura ela

A, vc usa 12x, foi mal, nao vou saber te responder sobre o 12x...

Editei

Em data/creaturescript/creaturescript.xml adicione Vá em data/creaturescript/script/ crie um arquivo com nome "advancedsummon.lua" e cole o codigo: Depois em data/creaturescript/login.lua registre