crisin38012

@kauan13 Eu testei a segunda forma é aki esta saindo o efeito de /z 42 porem os outros efeitos estão saindo junto por conta q seja efeito do proprio hit creio eu.

Tente assim : ou assim:

Meu apache da esse erro quando inicio ele. alguem saberia me dizer oq pode ser ? 11:48:04 [Apache] Error: Apache shutdown unexpectedly. 11:48:04 [Apache] This may be due to a blocked port, missing dependencies, 11:48:04 [Apache] improper privileges, a crash, or a shutdown by another method. 11:48:04 [Apache] Press the Logs button to view error logs and check 11:48:04 [Apache] the Windows Event Viewer for more clues 11:48:04 [Apache] If you need more help, copy and post this 11:48:04 [Apache] entire log window on the forums

Tendi Obg cara.

alguém teria o map tracker na versão 10.41 pra me arrumar ?

alguem erro no distro ?

@UP

Assim que voce quer ? Script do presente vá em data/actions/scripts/crie um arquivo com nome presente.lua e cole isso dentro function onUse(cid, item, fromPosition, itemEx, toPosition) local rand = math.random(0, 24) local lotteryid = 1990 if item.itemid == lotteryid then if rand == 0 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 1 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2506,1) doRemoveItem(cid, item.uid, 1) elseif rand == 2 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2469,1) doRemoveItem(cid, item.uid, 1) elseif rand == 3 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2492,1) doRemoveItem(cid, item.uid, 1) elseif rand == 4 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 5958,1) doRemoveItem(cid, item.uid, 1) elseif rand == 5 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2472,1) doRemoveItem(cid, item.uid, 1) elseif rand == 6 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2470,1) doRemoveItem(cid, item.uid, 1) elseif rand == 7 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 8 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 9 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 10 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 11 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 12 then doCreatureSay(cid, "Present!", TALKTYPE_ORANGE_1) doPlayerAddItem(cid, 2160,1) doRemoveItem(cid, item.uid, 1) elseif rand == 13 then end end return TRUE end Aqui vc coloca o id ea quantidade do item q vc quer q ganhe doPlayerAddItem(cid, 2160,1) Aqui o id do presente mais n ira presisar pq ai ja ta local lotteryid = 1990 Add isso no actions.xml <action itemid="1990" event="script" value="present.lua"/> Agora o NPC vá em data/npcs/crie um arquivo chamado Papai noel.xml e cole isso dentro <?xml version="1.0" encoding="UTF-8"?> <npc name="Papai Noel" script="data/npc/scripts/natal.lua" floorchange="0" access="5" level="1" maglevel="1"> <health now="150" max="150"/> <look type="69" head="0" body="0" legs="0" feet="0" corpse="2212"/> <parameters> <parameter key="message_greet" value="Ola |PLAYERNAME|. diga {presente} para receber seu presente." /> </parameters> </npc> agora em npcs/scripts/crie um arquivo chamado natal.lua e cole isso dentro local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local qua = 1 -- quantos item que vai precisa pra troca local troca = 6512 -------------- id do item que vai ser trocado local id = 1990 --- id do item que vai ganhar dps da troca 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 creatureSayCallback(cid, type, msg) if msgcontains(msg, 'presente') then if doPlayerRemoveItem(cid,troca,qua) then doPlayerAddItem(cid,id,1) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "aqui esta") -- edita aqui else doPlayerSendCancel(cid,"Você não possui o item santa doll.") -- edita aqui end end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())

Assim que voce queria ? Aqui o tempo q vai durar aqui no caso esta 15 minutos local tempo = 15 * 60 * 1000 local tempo = 15 * 60 * 1000 local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_RED) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE) setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, FALSE) local condition = createConditionObject(CONDITION_ATTRIBUTES) local condition = createConditionObject(CONDITION_REGENERATION) setConditionParam(condition, CONDITION_PARAM_SUBID, 100) setConditionParam(condition, CONDITION_PARAM_BUFF, TRUE) setConditionParam(condition, CONDITION_PARAM_TICKS, tempo) setConditionParam(condition, CONDITION_PARAM_HEALTHGAIN,300) setConditionParam(condition, CONDITION_PARAM_HEALTHTICKS,2000) setConditionParam(condition, CONDITION_PARAM_MANAGAIN,300) setConditionParam(condition, CONDITION_PARAM_MANATICKS,2000) setCombatCondition(combat, condition) local area = createCombatArea(AREA_CIRCLE3X3) setCombatArea(combat, area) function onCastSpell(cid, var) return doCombat(cid, combat, var) end

Ajuda alguem ajudaria a arrumar esse script de refinamento tipo queria q quando desse +1 nos items de ML (spellbooks,capes e etc) ele desse +1 de magic level ao dar +1, e que desse também para refinar wands tipo quando refina-se ela almentava tantos % (configuravel) no atack dela... Alguem para ajudar ? Aki esta o script -- &a = weapon attack -- &d = weapon defense -- &s = shield defense -- &p = armor defense -- # = nivel do item -- @ = max level local gain = { gainArmor='&p+(1)',loseArmor='&p-(1)', gainShield='&s+(1)',loseShield='&s-(1)', gainAttack='&a+(1)',loseAttack='&a-(1)', gainDefense='&d+(1)',loseDefense='&d-(1)', chance='(200/math.sqrt((((@/2)+(#*2))/@)*#*2))', maxlvl = 10, blocked_ids = {} } local it = { --[itemid] = [percent] [8300] = 0, -- 0% additional } if not setItemName then function setItemName(uid,name) return doItemSetAttribute(uid,'name',name) end function setItemArmor(uid,name) return doItemSetAttribute(uid,'armor',name) end function setItemDefense(uid,name) return doItemSetAttribute(uid,'defense',name) end function setItemAttack(uid,name) return doItemSetAttribute(uid,'attack',name) end function getItemAttack(uid) return getItemAttribute(uid,'attack') end function getItemDefense(uid) return getItemAttribute(uid,'defense') end function getItemArmor(uid) if type(uid) == 'number' then return getItemAttribute(uid,'armor') else return getItemInfo(uid.itemid).armor end end end local function isArmor(uid) if (getItemInfo(uid.itemid).armor ~= 0) and (getItemWeaponType(uid.uid) == 0) then return true end return false end local function isWeapon(uid) uid = uid or 0 local f = getItemWeaponType(uid) if f == 1 or f == 2 or f == 3 then return true end return false end local function isShield(uid) uid = uid or 0 if getItemWeaponType(uid) == 5 then return true end return false end local function isBow(uid) uid = uid or 0 if getItemWeaponType(uid) == 4 then return true end return false end local function getWeaponLevel(uid) uid = uid or 0 local name = getItemName(uid.uid) or getItemInfo(uid.itemid).name or '' local lvl = string.match(name,'%s%+(%d+)%s*') return tonumber(lvl) or 0 end local function doTransform(s,i) -- Function by Mock the bear. local c = string.gsub(s,'@',gain.maxlvl) local c = string.gsub(c,'&a',(getItemAttack(i.uid) ~= 0 and getItemAttack(i.uid) or getItemInfo(i.itemid).attack)) local c = string.gsub(c,'&d',(getItemDefense(i.uid) ~= 0 and getItemDefense(i.uid) or getItemInfo(i.itemid).defense)) local c = string.gsub(c,'&s',(getItemDefense(i.uid) ~= 0 and getItemDefense(i.uid) or getItemInfo(i.itemid).defense)) local c = string.gsub(c,'&p',(getItemArmor(i.uid) ~= 0 and getItemArmor(i.uid) or getItemInfo(i.itemid).armor)) local c = string.gsub(c,'#',getWeaponLevel(i)) local q = assert(loadstring('return '..c)) return math.floor(assert(q())) end function onUse(cid, item, fromPosition, itemEx, toPosition) if item.uid == 0 or item.itemid == 0 then return false end toPosition.stackpos = 255 if isInArray(gain.blocked_ids, itemEx.itemid) or (not getItemWeaponType(itemEx.uid) or getItemWeaponType(itemEx.uid) > 5) or (getItemWeaponType(itemEx.uid) == 0 and not isArmor(itemEx)) or itemEx.itemid == 0 or itemEx.type > 1 or isItemStackable(itemEx.uid) then doPlayerSendCancel(cid, "You cant refine this item.") return TRUE end if isCreature(itemEx.uid) == TRUE then return FALSE end local level = getWeaponLevel(itemEx) local chance = doTransform(gain.chance,itemEx) if level == gain.maxlvl then doSendMagicEffect(toPosition, 2) return doPlayerSendCancel(cid, "Your item is on max level, you can't upgrade it.") end doPlayerSendCancel(cid, "Trying refine with "..(chance+it[item.itemid] > 100 and 100 or chance+it[item.itemid]).."% of sucess!") if chance+it[item.itemid] >= math.random(0,100) then local nm = getItemName(itemEx.uid) local slot = nm:match('(%[.+%])') or '' ---If you server use slot system dont change it slot = slot~='' and ' '..slot or slot setItemName(itemEx.uid, getItemNameById(itemEx.itemid)..' +'..(level+1)..slot) doSendAnimatedText(getCreaturePosition(cid), 'Updrade', 144, cid) doSendMagicEffect(toPosition, 39) if isArmor(itemEx) then local get = doTransform(gain.gainArmor,itemEx) setItemArmor(itemEx.uid,get) elseif isBow(itemEx.uid) then setItemAttack(itemEx.uid, doTransform(gain.gainAttack,itemEx)) elseif isWeapon(itemEx.uid) then setItemAttack(itemEx.uid, doTransform(gain.gainAttack,itemEx)) setItemDefense(itemEx.uid, doTransform(gain.gainDefense,itemEx)) elseif isShield(itemEx.uid) then setItemDefense(itemEx.uid, doTransform(gain.gainShield,itemEx)) end else if level == 0 then addEvent(doPlayerSendCancel,500,cid, "No effect.") doSendMagicEffect(toPosition, 2) elseif level > 0 then local nm = getItemName(itemEx.uid) local slot = nm:match('(%[.+%])') or '' ---If you server use slot system dont change it slot = slot~='' and ' '..slot or slot if level == 1 then setItemName(itemEx.uid, getItemNameById(itemEx.itemid)..slot) addEvent(doPlayerSendCancel,500,cid, "Your item back to normal.") else setItemName(itemEx.uid, getItemNameById(itemEx.itemid)..' +'..(level-1)..slot) end if isArmor(itemEx) then setItemArmor(itemEx.uid,doTransform(gain.loseArmor ,itemEx)) elseif isWeapon(itemEx.uid) then setItemAttack(itemEx.uid, doTransform(gain.loseAttack,itemEx)) setItemDefense(itemEx.uid, doTransform(gain.loseDefense,itemEx)) elseif isBow(itemEx.uid) then setItemAttack(itemEx.uid, doTransform(gain.loseAttack,itemEx)) elseif isShield(itemEx.uid) then setItemDefense(itemEx.uid, doTransform(gain.loseShield,itemEx)) end end doSendAnimatedText(getCreaturePosition(cid), 'Failed', 144, cid) doSendMagicEffect(toPosition, 3) doRemoveItem(itemEx.uid, 2256) end doRemoveItem(item.uid,1) return true end

Poderia arrumar a imagem para min ver como é +- q add o sistema ?

xWhiteWolf vlw ae poblema resolvido muito obrigado !

Alguém poderia passa esse script de clean em determinada posição para talkaction aki ele esta como globalevent. local created_by_otswe = true -- Do not edit, if you touch this line the script will not work propely local otswe = { Clean_Time = 1, -- When the warning text has been broadcast, for how many seconds should it take to execute the clean Warning_Text_Before_Clean = "", -- Here can you edit the warning text Done_Text = "" -- Here you can edit the done text } local OtsweCleaningAreaPositions = { from = {x=1122,y=593,z=7}, -- From top left -- Top left of the cleaning area to = {x=1135,y=602,z=7} -- to bottom right -- Bottom left of the cleaning area } function isCleanAbleArea(pos) pos.stackpos = 0 local tile = getThingfromPos(pos, false) if tile ~= 0 and not hasProperty(tile.uid, CONST_PROP_BLOCKSOLID) and not isCreature(getTopCreature(pos).uid) then return true end end function executeOtsweAreaClean() doBroadcastMessage(otswe.Done_Text) for x = OtsweCleaningAreaPositions.from.x, OtsweCleaningAreaPositions.to.x do for y = OtsweCleaningAreaPositions.from.y, OtsweCleaningAreaPositions.to.y do local p = {x=x,y=y,z=OtsweCleaningAreaPositions.from.z} if isCleanAbleArea(p) or created_by_otswe == true then doCleanTile(p,false) end end end end function onThink(cid, interval, lastExecution) addEvent(executeOtsweAreaClean, otswe.Clean_Time*1000) doBroadcastMessage(otswe.Warning_Text_Before_Clean) return true end

cheguei tarde kkk

Vlw mais eu queria o comando desse clean so em determinada posição e ele tire-se tudo MW,fogo,veneno e talz teria como ?

Ajuda alguém poderia passar esse script globalevents ele é queria ele com talkactions Ai esta ele. local created_by_otswe = true -- Do not edit, if you touch this line the script will not work propely local otswe = { Clean_Time = 1, -- When the warning text has been broadcast, for how many seconds should it take to execute the clean Warning_Text_Before_Clean = "", -- Here can you edit the warning text Done_Text = "" -- Here you can edit the done text } local OtsweCleaningAreaPositions = { from = {x=1122,y=593,z=7}, -- From top left -- Top left of the cleaning area to = {x=1135,y=602,z=7} -- to bottom right -- Bottom left of the cleaning area } function isCleanAbleArea(pos) pos.stackpos = 0 local tile = getThingfromPos(pos, false) if tile ~= 0 and not hasProperty(tile.uid, CONST_PROP_BLOCKSOLID) and not isCreature(getTopCreature(pos).uid) then return true end end function executeOtsweAreaClean() doBroadcastMessage(otswe.Done_Text) for x = OtsweCleaningAreaPositions.from.x, OtsweCleaningAreaPositions.to.x do for y = OtsweCleaningAreaPositions.from.y, OtsweCleaningAreaPositions.to.y do local p = {x=x,y=y,z=OtsweCleaningAreaPositions.from.z} if isCleanAbleArea(p) or created_by_otswe == true then doCleanTile(p,false) end end end end function onThink(cid, interval, lastExecution) addEvent(executeOtsweAreaClean, otswe.Clean_Time*1000) doBroadcastMessage(otswe.Warning_Text_Before_Clean) return true end

UP

Script muito bom mais teria como adicionar um efeito de chuva caindo em cima das moedas ?

Teria como passar esse script para talkactions para ficar tipo de comando ?

@UP

sim e isso mesmo so n tava conseguindo explicar hahaha

sim tipo ele ao morrer recebe recompensa tipo 10 crystal coin e talz

Olá sou novo aki então me descupe se estou na area errada,eu gostaria de um sistema de survival q fica 4 player em tal posição ae o 1° player puxa a alavanca e é teleportado para tal lugar ae la começa a nascer bixos e quando o player morre ele recebe uma recompensa e teria q esperar 24h para ir de novo