Tudo que DSR postou
-
Spells
gostaria que essa magia apos alguem usar ela todos os target que tomarem o dano da area não possa usar a magia super speed , e nem speed up local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_FIREDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 211) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -110.2, 1, -120.2, 1) local condition = createConditionObject(CONDITION_PARALYZE) setConditionParam(condition, CONDITION_PARAM_TICKS, 20000) setConditionParam(condition, CONDITION_PARAM_SPEED, -104214120000) setConditionFormula(condition, -0.9, 0, -0.9, 0) setCombatCondition(combat1, condition) arr1 = { {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1} } local area1 = createCombatArea(arr1) setCombatArea(combat1, area1) local function onCastSpell1(parameters) return isPlayer(parameters.cid) and doCombat(parameters.cid, combat1, parameters.var) end function onCastSpell(cid, var) local parameters = { cid = cid, var = var} local position = {x=getPlayerPosition(cid).x, y=getPlayerPosition(cid).y, z=getPlayerPosition(cid).z} addEvent(onCastSpell1, 200, parameters) doSendMagicEffect(position, 134) return TRUE end
-
Nginx Erro
Bom Queria Passar Meu Site Para Nginx Só Que Ele Entra Normalmente no site mais quando vai em ultimas morte ou login , criar conta etc ele retorna esse erro 500 Internal Server Error se alguem poder me ajudar
-
Ajuda Morte
up , ngm???????
- Ajuda Morte
-
Ajuda Bug Skill
1Teste Sword41280 < skill de sword que o char pega do nada o char ele upa sword normalmente mais quando chega a uma skill elevada tipo 90 , 100 , 110 se o char bate no trainer o server cai e qnd vai ver no site o personagem aparece com 491280 de sword skill
- Ajuda Morte
-
Ajuda Morte
Não toda vezes algumas vezes quando um player mata outro no server acontece esse bug e o player mata o cara 1 x e conta umas 300x 28 Apr 2017, 18:12Dark killed at Level 656 by deidara of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by kikkai of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by deidara of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by prisoner of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by kikkai of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by hidan of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by nidaime of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by sasori of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by black shinobi of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by nukenin of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by shinobi archer of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by frozen shinobi of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by Kakuzo of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by Killer Bean and Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by Jet Bean and Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by hidan of Killer Bean. 28 Apr 2017, 18:12Dark killed at Level 656 by karasu of Killer Bean. 28 Apr 2017, 18:11Dark killed at Level 656 by sound shinobi of Killer Bean. 28 Apr 2017, 18:11Dark killed at Level 656 by hidan of Killer Bean. Killer Bean 251 < Frags conto 251 frags de uma vez pro cara
- Ajuda Site Dbo
-
Ajuda Site Dbo
up vou testar se não der eu dou retorno
- Ajuda Site Dbo
- Ajuda Site Dbo
- Ajuda Site Dbo
- Ajuda Site Dbo
-
Ajuda Site Dbo
uppppppppppp
-
Ajuda Site Dbo
up ngm???
- Ajuda Site Dbo
-
Ajuda Site Dbo
uppp up
-
Ajuda Site Dbo
vou tentar da uma olhada não deu certo ;/ ta foda resolver isso up ? ngm pra dar uma ajuda?
- Ajuda Site Dbo
-
Ajuda Site Dbo
Bom Eu Uso NGINX e estou com um poblema no site Do Servidor bom quando procurar um nome que nao tenha espaço por exemplo Khanzo ele acha como pode ver nas prints [/img] agora se o nome conter espaço ele nao acha como aqui na print observerm [/img] meio que da um redirect pra aba de escrever o nome dnv up up
-
spell
bom tenho uma spell aqui e gostaria que ela desce paralyze quando o player estivesse usando o addon druid full sem o addon druid full nao desce paralyze local combat = createCombatObject() local meteor = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -11.2, -52, -11.2, 6) local stun = createConditionObject(CONDITION_PARALYZE) setConditionParam(stun, CONDITION_PARAM_TICKS, 5000) setConditionFormula(stun, -0.8, 0, -0.9, 0) setCombatCondition(meteor, stun) local arr = { {0, 0, 0, 0, 0}, {0, 0, 1, 0, 0}, {0, 1, 3, 1, 0}, {0, 0, 1, 0, 0}, {0, 0, 0, 0, 0} } local area = createCombatArea(arr) setCombatArea(combat, area) local function meteorCast(p) doCombat(p.cid, p.combat, positionToVariant(p.pos)) end local function stunEffect(cid) doSendMagicEffect(getThingPos(cid), CONST_ME_STUN) end function onTargetTile(cid, pos) if (math.random(0, 0) == 0) then local ground = getThingfromPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}) if (isInArray(water, ground.itemid) == TRUE) then local newpos = {x = pos.x + 7, y = pos.y - 6, z = pos.z} doSendDistanceShoot(newpos, pos, CONST_ANI_ICE) addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water}) else local newpos = {x = pos.x + 7, y = pos.y - 6, z = pos.z} doSendDistanceShoot(newpos, pos, CONST_ANI_ICE) addEvent(meteorCast, 200, {cid = cid,pos = pos, combat = meteor}) end end end setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile") function onCastSpell(cid, var) return doCombat(cid, combat, var) end Bom tenho uma spell e gostaria que e ela esta dando paralyze toda hora gostaria que ela desce paralyze so se o player tivesse druid full e se nao tivesse ela nao da paralyze local combat = createCombatObject() local meteor = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(combat, COMBAT_PARAM_EFFECT, 43) setCombatFormula(combat, COMBAT_FORMULA_LEVELMAGIC, -11.2, -52, -11.2, 6) local stun = createConditionObject(CONDITION_PARALYZE) setConditionParam(stun, CONDITION_PARAM_TICKS, 5000) setConditionFormula(stun, -0.8, 0, -0.9, 0) setCombatCondition(meteor, stun) local arr = { {0, 0, 0, 0, 0}, {0, 0, 1, 0, 0}, {0, 1, 3, 1, 0}, {0, 0, 1, 0, 0}, {0, 0, 0, 0, 0} } local area = createCombatArea(arr) setCombatArea(combat, area) local function meteorCast(p) doCombat(p.cid, p.combat, positionToVariant(p.pos)) end local function stunEffect(cid) doSendMagicEffect(getThingPos(cid), CONST_ME_STUN) end function onTargetTile(cid, pos) if (math.random(0, 0) == 0) then local ground = getThingfromPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 0}) if (isInArray(water, ground.itemid) == TRUE) then local newpos = {x = pos.x + 7, y = pos.y - 6, z = pos.z} doSendDistanceShoot(newpos, pos, CONST_ANI_ICE) addEvent(meteorCast, 200, {cid = cid, pos = pos, combat = meteor_water}) else local newpos = {x = pos.x + 7, y = pos.y - 6, z = pos.z} doSendDistanceShoot(newpos, pos, CONST_ANI_ICE) addEvent(meteorCast, 200, {cid = cid,pos = pos, combat = meteor}) end end end setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile") function onCastSpell(cid, var) return doCombat(cid, combat, var) end upppppp up up up pode trancar esse topico ja tem 4 dias e ninguem ajudou up
- Dicer Script
-
Script De Refinamento
pode me sugerir algum @edit cara eu pesquisei nao e isso que eu quero eu quero q os atributo tipo sword magic e distance so seja adicionado em itens que dao esses atributo tipo fireborn se eu tava um flawless ice crystal vai dar extra sword skill + 2 royal scale robe se eu taca um flawless vai dar extra magic level +2 e tipo isso up ninguem?
-
Script De Refinamento
Bom Tenho Um Script De Refinamento So Que Ele Nao Esta Do Geito Que Eu Quero Eu Queria Que Quando Refinase Um Item Que Tem Tipo sword skill, magic level , distance skill ele desse um bonus e aumentasse a skill do item tipo uma fireborn ela aumenta sword cada 1 refinamento sem falha aumente + 1 de sword skill ou magic skill dependendo do item claro se for de ml aumenta ml se for de sword aumenta sword Exemplo: 23:39 You see a shield of corruption +5 (Def:38, sword fighting +3). It can only be wielded properly by knights of level 80 or higher. Atributos adicionais: Extra defense +2 Sword skill +5 -- 23:40 You see a snake god's wristguard +4 (Def:16, magic level +3). It can only be wielded properly by sorcerers and druids of level 100 or higher. It weighs 28.00 oz. Atributos adicionais: Extra defense +2 Magic level +2 -- &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+(2)',loseAttack='&a-(1)', gainDefense='&d+(1)',loseDefense='&d-(1)', chance='(200/math.sqrt((((@/2)+(#*2))/@)*#*2))', maxlvl = 100, 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, "Voce Nao Pode Refinar Este 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, "O Item Ja Esta No Nivel Maximo.") 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
-
spell
funcionou rep +++ nao sei se e pedir muito mais eu queria que voce figesse o mesmo so que com essa magia aqui so que agora o addon que tem que ser usado e druid full local water = {490, 491, 492, 493, 4608, 4609, 4610, 4611, 4612, 4613, 4614, 4615, 4616, 4617, 4618, 4619, 4620, 4621, 4622, 4623, 4624, 4625} local combat = createCombatObject() local meteor = createCombatObject() setCombatParam(meteor, COMBAT_PARAM_TYPE, COMBAT_ICEDAMAGE) setCombatParam(meteor, COMBAT_PARAM_EFFECT, CONST_ME_ICEATTACK) setCombatFormula(meteor, COMBAT_FORMULA_LEVELMAGIC, -7.2, -400, -6.3, -400) local stun = createConditionObject(CONDITION_PARALYZE) setConditionParam(stun, CONDITION_PARAM_TICKS, 0000) setConditionFormula(stun, -0.9, 1, -0.9, 1) setCombatCondition(meteor, stun) local meteor_water = createCombatObject() setCombatParam(meteor_water, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(meteor_water, COMBAT_PARAM_EFFECT, CONST_ME_LOSEENERGY) setCombatFormula(meteor_water, COMBAT_FORMULA_LEVELMAGIC, -7.2, -400, -6.3, -400) combat_arr = { {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 3, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } local combat_area = createCombatArea(combat_arr) setCombatArea(combat, combat_area) local function meteorCast(p) doCombat(p.cid, p.combat, positionToVariant(p.pos)) end local function stunEffect(cid) doSendMagicEffect(getThingPos(cid), CONST_ME_STUN) end function onTargetTile(cid, pos) if (math.random(0, 0) == 0) then local ground = getThingfromPos({x = pos.x, y = pos.y, z = pos.z, stackpos = 1}) if (isInArray(water, ground.itemid) == TRUE) then local newpos = {x = pos.x + 9, y = pos.y - 8, z = pos.z} doSendDistanceShoot(newpos, pos, 28) addEvent(meteorCast, 100, {cid = cid, pos = pos, combat = meteor_water}) else local newpos = {x = pos.x + 9, y = pos.y - 8, z = pos.z} doSendDistanceShoot(newpos, pos, 28) addEvent(meteorCast, 100, {cid = cid,pos = pos, combat = meteor}) end end end setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile") function onCastSpell(cid, var) return doCombat(cid, combat, var) end