Postado Fevereiro 21, 2012 13 anos Tipo Assim Galera Meu Ot Tem 1 Systema Unico De Pescar Monstros Edited Tipo Tem Essa LVL 1K Vc Comessa A pescar Quaras Ate o 4k 5k Vc Jah Comessa A Pescar Sea Serpent Oceanus e Wyrm Aew Tipo Eu Queria Por Para Pescar 20k Satan Se Auguem Tiver Esse Script Ou Saiba Ajudar Eu Garanto Meu Rep + Segue o Exemplo Há Baixo [local config = { waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}, } local ctfArena = { frompos = {x=659, y=483, z=7}, topos = {x=769, y=569, z=7}, } local warArena = { frompos = {x=638, y=711, z=7}, topos = {x=751, y=780, z=7}, } function onUse(cid, item, fromPosition, itemEx, toPosition) local pos = getCreaturePosition(cid) local fishSkill = getPlayerSkill(cid, SKILL_FISHING) local maxChance2 = 400 - fishSkill local maxChance = 200 - fishSkill local minChance = 1 local chance = math.random(minChance,maxChance) if isInArea(getPlayerPosition(cid), ctfArena.frompos, ctfArena.topos) or isInArea(getPlayerPosition(cid), warArena.frompos, warArena.topos) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you cannot fish in the arena.") return true end if isInArray(config.waterIds, itemEx.itemid) then if getTilePzInfo(pos) == false then if getPlayerItemCount(cid, ITEM_WORM) > 0 or item.itemid == 10223 then if math.random(1, (100 + fishSkill / 10)) < fishSkill then if (item.itemid ~= 10223) then doPlayerRemoveItem(cid, ITEM_WORM, 1) end doPlayerAddSkillTry(cid, SKILL_FISHING, 1) doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) --summon smallboss-- if getPlayerLevel(cid) >= 500 and chance == 1 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Hydromancer", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Hydromancer!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Hydromancer!") end if getPlayerLevel(cid) >= 500 and chance == 2 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Constrictor", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Constrictor!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Constrictor!") end --summon mediumboss-- if getPlayerLevel(cid) >= 1500 and chance == 3 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Mantassin", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Mantassin!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Mantassin!") end if getPlayerLevel(cid) >= 1500 and chance == 4 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Pincher", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Pincher!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Pincher!") end --summon mediumboss-- if getPlayerLevel(cid) >= 3000 and chance == 5 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Predator", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Predator!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Predator!") end if getPlayerLevel(cid) >= 3000 and chance == 6 then doSendMagicEffect(toPosition, 33) doCreateMonster("Serpent Spawn", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Serpent Spawn!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Serpent Spawn!") end --summon hardboss-- if getPlayerLevel(cid) >= 5000 and chance == 7 then doSendMagicEffect(toPosition, 33) doCreateMonster("Wyrm", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Wyrm!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Wyrm!") end if getPlayerLevel(cid) >= 5000 and chance == 8 then doSendMagicEffect(toPosition, 33) doCreateMonster("Sea Serpent", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Sea Serpent!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Sea Serpent!") end if getPlayerLevel(cid) >= 5000 and fishSkill > 100 and math.random(1,maxChance2) == 10 then doSendMagicEffect(toPosition, 33) doCreateMonster("Oceanus", pos, false) doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Goddess of Water, Oceanus!',TALKTYPE_CHANNEL_W,10) end else doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) end else doPlayerSendCancel(cid, "You do not have any worms.") end else doPlayerSendCancel(cid, "You may not fish from a protection zone.") end else doPlayerSendCancel(cid, "Cast into open water.") end return true end Mob Que Eu Quero Que Pesque Com 130 De Fishing e LVL 20K E ESSE ! <?xml version="1.0"?> <monster name="Satan" nameDescription="the adversary" experience="150000000" speed="420" race="Fire"> <health now="1500000" max="1500000"/> <look type="248" corpse="7091"/> <strategy attack="720" defense="450"/> <targetchange speed="5420" chance="10"/> <flags> <flag canpushitems="1"/> <flag canpushcreatures="1"/> <flag hostile="1"/> <flag attackable="1"/> <flag pushable="0"/> <flag staticattack="1"/> <flag targetdistance="1"/> <flag skull="5" /> </flags> <attacks> <attack name="ice" interval="1000" chance="100" min="-50000" max="-100000" range="6"> <attribute key="areaEffect" value="energyarea"/> <attribute key="shootEffect" value="etherealspear"/> </attack> <attack name="death" interval="1500" chance="95" min="-20000" max="-45000" radius="6" target="0"> <attribute key="areaEffect" value="mortarea"/> <attribute key="shootEffect" value="spear"/> </attack> </attacks> <defenses defense="45" armor="10"> <defense name="healing" interval="1000" chance="95" min="175666" max="245000"> <attribute key="areaEffect" value="blueshimmer"/> </defense> </defenses> <immunities> <immunity name="lifedrain"/> <immunity name="outfit"/> <immunity name="paralyze"/> <immunity name="invisible"/> <immunity name="drown"/> <immunity name="drunk"/> </immunities> <voices speed="2200" chance="50"> <voice sentence="I will taste your FLESH!" yell="1"/> <voice sentence="You will be frozen by man's sin!" yell="1"/> </voices> <loot> <item id="6536" countmax="1" chance="100"/> <!--tear of satan--> <item id="7443" countmax="1" chance="3000"/> <!--soul potion--> <item id="9971" countmax="25" chance="5000"/> <!--gold bars--> <item id="4441" countmax="1" chance="2000"/> <!--trial manashield ring--> <item id="8306" countmax="1" chance="5000"/> <!--upgrade crystal--> <item id="4567" countmax="1" chance="5000"/> <!--upgrade crystal--> <item id="4455" countmax="1" chance="5000"/> <!--upgrade crystal--> </loot> </monster> Agradesse Quem Ajudar ! Editado Fevereiro 21, 2012 13 anos por raell5 (veja o histórico de edições)
Postado Fevereiro 21, 2012 13 anos Bem, é facil configurar, vou lhe ensinar ! Bote isso no seu fishing.lua (deve estár em tool na pasta dos actions) : local config = { waters = {4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625, 4665, 4666, 4820, 4821, 4822, 4823, 4824, 4825}, fishable = {4608, 4609, 4610, 4611, 4612, 4613, 7236}, spawning = {4614, 4615, 4616, 4617, 4618, 4619}, holes = {7236}, corpses = { -- [corpse] = {[aid] = { {itemid, countmax, chance} }} [10499] = { [101] = { {2226, 1, 16000}, --fish bone {2238, 1, 15000}, --leather boots {2148, 1, 15000}, --gold coin {2376, 1, 14000}, --sword {2152, 1, 13000}, --platinum {7589, 1, 13000}, --strong mana potion {7588, 1, 13000}, --strong health potion {2168, 1, 11500}, --life ring {2167, 1, 15000}, --energy ring {9810, 1, 9500}, --rusty armor {9813, 1, 9500}, --rusty legs {7632, 1, 8600}, --giant shimmering pearl {7633, 1, 8600}, --giant shimmering pearl {7158, 1, 3100}, --rainbow trout {7159, 1, 3100}, --green perch {2146, 1, 11500}, --small sapphire {2149, 2, 11500}, --small emerald {10220, 1, 1500} --leviathan's amulet }, [102] = { {2226, 1, 16000}, --fish bone {2238, 1, 15000}, --leather boots {2148, 1, 15000}, --gold coin {2376, 1, 14000}, --sword {2152, 1, 14000}, --platinum {7589, 1, 14000}, --strong mana potion {7588, 1, 14000}, --strong health potion {2168, 1, 15500}, --life ring {2167, 1, 16000}, --energy ring {9810, 1, 11500}, --rusty armor {9813, 1, 11500}, --rusty legs {7632, 1, 9600}, --giant shimmering pearl {7633, 1, 9600}, --giant shimmering pearl {7158, 1, 5100}, --rainbow trout {7159, 1, 5100}, --green perch {2146, 1, 13500}, --small sapphire {2149, 2, 13500}, --small emerald {10220, 1, 2500} --leviathan's amulet } } }, checkCorpseOwner = getConfigValue("checkCorpseOwner"), rateLoot = getConfigValue("rateLoot"), summons = { -- {skill, name, chance, bossName, bossChance} }, rateSpawn = getConfigValue("rateSpawn"), baitFailRemoveChance = 10, allowFromPz = false, useBait = true, baitCount = 1, fishes = 1 } config.checkCorpseOwner = getBooleanFromString(config.checkCorpseOwner) function onUse(cid, item, fromPosition, itemEx, toPosition) if(isInArray(config.waters, itemEx.itemid)) then if(isInArray(config.spawning, itemEx.itemid)) then doPlayerSendDefaultCancel(cid, RETURNVALUE_NOTPOSSIBLE) end doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) return true end local corpse = config.corpses[itemEx.itemid] if(corpse ~= nil and corpse ~= 0) then corpse = corpse[itemEx.actionid] if(corpse ~= nil and corpse ~= 0) then if(config.checkCorpseOwner and not getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES)) then local owner = getItemAttribute(itemEx.uid, "corpseowner") if(owner ~= 0 and owner ~= nil and owner ~= getPlayerGUID(cid)) then doPlayerSendDefaultCancel(cid, RETURNVALUE_YOUARENOTTHEOWNER) return true end end local chance, items, default, max = math.random(0, 100000) / config.rateLoot, {}, {}, 0 for _, data in ipairs(corpse) do if(data[3] >= chance) then local tmp = {data[1], math.random(1, data[2])} table.insert(items, tmp) end if(data[3] > max) then default = data max = data[3] end end local itemCount = table.maxn(items) if(itemCount > 0) then local loot = items[math.random(1, itemCount)] doPlayerAddItem(cid, loot[1], loot[2]) else doPlayerAddItem(cid, default[1], default[2]) end doTransformItem(itemEx.uid, getItemInfo(itemEx.itemid).decayTo) doSendMagicEffect(toPosition, CONST_ME_WATERSPLASH) doDecayItem(itemEx.uid) return true end end if(not isInArray(config.fishable, itemEx.itemid)) then return false end local position, formula, tries = getThingPosition(cid), getPlayerSkill(cid, SKILL_FISHING) / 200 + 0.85 * math.random(), 0 config.allowFromPz = config.allowFromPz or not getTileInfo(position).protection if(item.itemid ~= ITEM_MECHANICAL_FISHING_ROD) then if(config.allowFromPz and (not config.useBait or getPlayerItemCount(cid, ITEM_WORM) >= config.baitCount)) then tries = 1 if(isInArray(config.holes, itemEx.itemid)) then if(doPlayerRemoveItem(cid, ITEM_WORM, config.baitCount)) then tries = 2 if(formula > 0.83) then doPlayerAddItem(cid, ITEM_RAINBOW_TROUT, config.fishes) elseif(formula > 0.7) then doPlayerAddItem(cid, ITEM_NORTHERN_PIKE, config.fishes) elseif(formula > 0.5) then doPlayerAddItem(cid, ITEM_GREEN_PERCH, config.fishes) else doPlayerAddItem(cid, ITEM_FISH, config.fishes) end end elseif(formula > 0.7 and doPlayerRemoveItem(cid, ITEM_WORM, config.baitCount)) then tries = 2 if(table.maxn(config.summons) > 0 and getDistanceBetween(position, toPosition) < 2) then local skill, summon = getPlayerLevel(cid), {name = "", chance = 0, bossName = "", bossChance = 0} for _, data in pairs(config.summons) do if(skill >= data[1] and getPlayerSkill(cid, SKILL_FISHING) >= 130) then summon.name = data[2] summon.chance = data[3] summon.bossName = data[4] summon.bossChance = data[5] end end local random = math.random(1, 100000) / config.rateSpawn if(summon.bossName ~= "" and summon.bossChance >= random) then doCreateMonster(summon.bossName, position) tries = 4 elseif(summon.name ~= "" and summon.chance >= random) then doCreateMonster(summon.name, position) tries = 3 else doPlayerAddItem(cid, ITEM_FISH, config.fishes) end else doPlayerAddItem(cid, ITEM_FISH, config.fishes) end end end elseif(config.allowFromPz and (not config.useBait or getPlayerItemCount(cid, ITEM_NAIL) >= config.baitCount)) then if(formula > 0.7 and doPlayerRemoveItem(cid, ITEM_NAIL, config.baitCount)) then doPlayerAddItem(cid, ITEM_MECHANICAL_FISH, config.fishes) tries = 2 else tries = 1 end end if(tries > 1) then doPlayerAddSkillTry(cid, SKILL_FISHING, tries) if(not isInArray(config.holes, itemEx.itemid)) then doTransformItem(itemEx.uid, itemEx.itemid + 6) else doTransformItem(itemEx.uid, itemEx.itemid + 1) end doDecayItem(itemEx.uid) elseif(tries > 0) then doPlayerAddSkillTry(cid, SKILL_FISHING, 1) if(config.baitFailRemoveChance >= math.random(1, 100)) then if(item.itemid == ITEM_MECHANICAL_FISHING_ROD) then doPlayerRemoveItem(cid, ITEM_NAIL, config.baitCount) else doPlayerRemoveItem(cid, ITEM_FISH, config.baitCount) end end end doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) return true end Aonde estiver isso : -- {skill, name, chance, bossName, bossChance} Só modificar, exemplo : {85, demon, 50, orshabaal, 10} Vou ler isso : Quando o player estiver skill 85, ele vai pescar demon com 50% de chance, e ainda podendo pescar Orshabaal com 10% de chance... Caso você queira adicionar duas barras dessas você precisa fazer isso : summons = { -- {skill, name, chance, bossName, bossChance}, -- {skill, name, chance, bossName, bossChance} }, Preste muita atenção na virgula que está ali em cima, a ultima tag não pode por virgula só nas demais ! Espero ter ajudado ! @edit Agora só pescar se o player for level 20000 ou +, e skill + de 130 ! Att. Huziwara no Mokou Editado Fevereiro 21, 2012 13 anos por Huziwara (veja o histórico de edições)
Postado Fevereiro 21, 2012 13 anos Autor Jah Tenho 1 Pasta Quero so por ele Satan ! mas Vc Postou Muita Coisa aew !
Postado Fevereiro 21, 2012 13 anos [local config = { waterIds = {493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625}, } local ctfArena = { frompos = {x=659, y=483, z=7}, topos = {x=769, y=569, z=7}, } local warArena = { frompos = {x=638, y=711, z=7}, topos = {x=751, y=780, z=7}, } function onUse(cid, item, fromPosition, itemEx, toPosition) local pos = getCreaturePosition(cid) local fishSkill = getPlayerSkill(cid, SKILL_FISHING) local maxChance2 = 400 - fishSkill local maxChance = 200 - fishSkill local minChance = 1 local chance = math.random(minChance,maxChance) if isInArea(getPlayerPosition(cid), ctfArena.frompos, ctfArena.topos) or isInArea(getPlayerPosition(cid), warArena.frompos, warArena.topos) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sorry, you cannot fish in the arena.") return true end if isInArray(config.waterIds, itemEx.itemid) then if getTilePzInfo(pos) == false then if getPlayerItemCount(cid, ITEM_WORM) > 0 or item.itemid == 10223 then if math.random(1, (100 + fishSkill / 10)) < fishSkill then if (item.itemid ~= 10223) then doPlayerRemoveItem(cid, ITEM_WORM, 1) end doPlayerAddSkillTry(cid, SKILL_FISHING, 1) doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) --summon smallboss-- if getPlayerLevel(cid) >= 500 and chance == 1 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Hydromancer", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Hydromancer!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Hydromancer!") end if getPlayerLevel(cid) >= 500 and chance == 2 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Constrictor", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Constrictor!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Constrictor!") end --summon mediumboss-- if getPlayerLevel(cid) >= 1500 and chance == 3 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Mantassin", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Mantassin!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Mantassin!") end if getPlayerLevel(cid) >= 1500 and chance == 4 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Pincher", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Pincher!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Pincher!") end --summon mediumboss-- if getPlayerLevel(cid) >= 3000 and chance == 5 then doSendMagicEffect(toPosition, 33) doCreateMonster("Quara Predator", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Predator!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Quara Predator!") end if getPlayerLevel(cid) >= 3000 and chance == 6 then doSendMagicEffect(toPosition, 33) doCreateMonster("Serpent Spawn", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Quara Serpent Spawn!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Serpent Spawn!") end --summon hardboss-- if getPlayerLevel(cid) >= 5000 and chance == 7 then doSendMagicEffect(toPosition, 33) doCreateMonster("Wyrm", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Wyrm!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Wyrm!") end if getPlayerLevel(cid) >= 5000 and chance == 8 then doSendMagicEffect(toPosition, 33) doCreateMonster("Sea Serpent", pos, false) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You caught a Sea Serpent!") doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE,"You caught a Sea Serpent!") end if getPlayerLevel(cid) >= 5000 and fishSkill > 100 and math.random(1,maxChance2) == 10 then doSendMagicEffect(toPosition, 33) doCreateMonster("Oceanus", pos, false) doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Goddess of Water, Oceanus!',TALKTYPE_CHANNEL_W,10) end if getPlayerLevel(cid) >= 20000 and fishSkill > 130 and math.random(1,maxChance2) == 10 then doSendMagicEffect(toPosition, 33) doCreateMonster("Santan", pos, false) doPlayerSendChannelMessage(cid, false, ''..getPlayerName(cid)..' has angered the Titan Of Hell, Santan !',TALKTYPE_CHANNEL_W,10) end else doSendMagicEffect(toPosition, CONST_ME_LOSEENERGY) end else doPlayerSendCancel(cid, "You do not have any worms.") end else doPlayerSendCancel(cid, "You may not fish from a protection zone.") end else doPlayerSendCancel(cid, "Cast into open water.") end return true end Eu nao testei mais ve se pega ai e o da Huziwara e melhor ____________________________________________________ Se ajudei Da REP+ Editado Fevereiro 21, 2012 13 anos por Alberess (veja o histórico de edições)
Participe da conversa
Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.