Demonbholder
Infante-
Total de itens
1551 -
Registro em
-
Última visita
-
Dias Ganhos
24
Tudo que Demonbholder postou
-
Não é tão difícil não. Na verdade, nos meus últimos dois sistemas eu fiz coisas parecidas. Precisa usar a biblioteca socket e a biblioteca wxlua, e é claro, o player também precisaria ter.
-
já vi a sua foto verdadeira, vc não é assim. logo, fake.
-
[Arquivado]Reestruturação Otserv # Veja O Modelo
tópico respondeu ao Henrique Moura de Demonbholder em Noticias - Arquivo
@Gustavo Bibliotecas é onde ficam as funções feitas em lua, exemplo: function() print("Bibliotecas") end Sistema é quando você faz um sistema (obviamente) que use mais e um script, por exemplo, uma action e uma talkaction. -
Fechar não, mover para sub-seção de Dúvidas Sanadas.
-
Não foi rip, você realmente acha que o Oneshot iria ripar alguma coisa?
-
Galera, vocês tão falando do Oneshot, um dos 5 melhores scripters do eks. Devilmoon, só você que sabe né? Quer duelar então?
-
Aula 2 - Lógica, Algoritmo E Operadores
tópico respondeu ao Oneshot de Demonbholder em Tutoriais de Programação
Cara, você poderia fazer um tópico linkando todos os tutoriais já prontos, ai fixam ele e fica mais fácil. Espero que continue com os tutoriais -
Substitua isso: function onCastSpell(cid, var) return doCombat(cid, combat, var) end Por isso: local min = 0 -- resets function getResets(cid) -- MarcelloMkez resets = getPlayerStorageValue(cid,2310) if resets < 0 then resets = 0 end return resets end function onCastSpell(cid, var) if getResets(cid) >= min then return doCombat(cid, combat, var) end doPlayerSendCancel(cid, "Você precisa de " .. min .. " resets para usar esta spell.") return false end Não esqueça de colocar o min ali para quanto você quiser.
-
Npc Quest - Traga Tal Item E Ganhe Tal Recompensa
tópico respondeu ao pessoa93 de Demonbholder em NPCs, monsters e raids
Da pra trabalhar mais nele, por exemplo, se for a primeira vez que o jogador falar com o npc, ai ele manda buscar, ai na segunda vez ele checa o item e da a recompensa. Bom script, até. -
talkaction [Talkaction] Additem | Coloque Um Item Na Bp De Um Jogador
tópico respondeu ao dwhfms de Demonbholder em Actions e Talkactions
nice, parabéns, embora não esperava te ver por aqui. -
talkaction [Talkaction] Additem | Coloque Um Item Na Bp De Um Jogador
tópico respondeu ao dwhfms de Demonbholder em Actions e Talkactions
por que vc declarou uma variável com o mesmo valor de uma já existente? -
local acombat1 = createCombatObject() local acombat2 = createCombatObject() local acombat3 = createCombatObject() local acombat4 = createCombatObject() local acombat5 = createCombatObject() local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -115.3, 1.5, -115.3, 10) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat2, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -105.3, 1.5, -105.3, 10) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat3, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat3, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -105.3, 1.5, -105.3, 10) local combat4 = createCombatObject() setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat4, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat4, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -125.3, 1.5, -125.3, 10) local combat5 = createCombatObject() setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat5, COMBAT_PARAM_EFFECT, 49) setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -125.3, 1.5, -125.3, 10) arr1 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr2 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr3 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr4 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr5 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) local area3 = createCombatArea(arr3) local area4 = createCombatArea(arr4) local area5 = createCombatArea(arr5) setCombatArea(combat1, area1) setCombatArea(combat2, area2) setCombatArea(combat3, area3) setCombatArea(combat4, area4) setCombatArea(combat5, area5) function onTargetTile(cid, pos) doCombat(cid,combat1,positionToVariant(pos)) end function onTargetTile2(cid, pos) doCombat(cid,combat2,positionToVariant(pos)) end function onTargetTile3(cid, pos) doCombat(cid,combat3,positionToVariant(pos)) end function onTargetTile4(cid, pos) doCombat(cid,combat4,positionToVariant(pos)) end function onTargetTile5(cid, pos) doCombat(cid,combat5,positionToVariant(pos)) end setCombatCallback(acombat1, CALLBACK_PARAM_TARGETTILE, "onTargetTile") setCombatCallback(acombat2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2") setCombatCallback(acombat3, CALLBACK_PARAM_TARGETTILE, "onTargetTile3") setCombatCallback(acombat4, CALLBACK_PARAM_TARGETTILE, "onTargetTile4") setCombatCallback(acombat5, CALLBACK_PARAM_TARGETTILE, "onTargetTile5") local function onCastSpell1(parameters) doCombat(parameters.cid, acombat1, parameters.var) end local function onCastSpell2(parameters) doCombat(parameters.cid, acombat2, parameters.var) end local function onCastSpell3(parameters) doCombat(parameters.cid, acombat3, parameters.var) end local function onCastSpell4(parameters) doCombat(parameters.cid, acombat4, parameters.var) end local function onCastSpell5(parameters) doCombat(parameters.cid, acombat5, parameters.var) end local min = 0 -- resets function getPlayerReset(cid) -- Marcello Mkez local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..getPlayerGUID(cid)..";") rss = qr:getDataInt("reset", getPlayerGUID(cid)) if rss < 0 then rss = 0 end return rss end function onCastSpell(cid, var) if getPlayerReset(cid) >= min then local parameters = { cid = cid, var = var} addEvent(onCastSpell1, 100, parameters) addEvent(onCastSpell2, 800, parameters) addEvent(onCastSpell3, 1600, parameters) addEvent(onCastSpell4, 2400, parameters) addEvent(onCastSpell5, 2600, parameters) return true end doPlayerSendCancel(cid, "Você precisa de " .. min .. " resets para usar esta spell.") return false end
-
Aula 2 - Lógica, Algoritmo E Operadores
tópico respondeu ao Oneshot de Demonbholder em Tutoriais de Programação
Nossa, eu achei que a outra aula estava boa, mas essa superou com certeza. Pelo visto você irá criar uma série destes tutoriais, certo? No aguardo, parabéns. Até. -
Realmente muito bom. Introduz bem a linguagem e da um grande incentivo para aprender. Por mim está aprovadíssimo.
-
O problema não seria na pasta monster. Sugiro trocar de otserver, pois é um erro comprometedor e muito extenso.
-
local acombat1 = createCombatObject() local acombat2 = createCombatObject() local acombat3 = createCombatObject() local acombat4 = createCombatObject() local acombat5 = createCombatObject() local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat1, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -115.3, 1.5, -115.3, 10) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat2, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat2, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -105.3, 1.5, -105.3, 10) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat3, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat3, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -105.3, 1.5, -105.3, 10) local combat4 = createCombatObject() setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat4, COMBAT_PARAM_DISTANCEEFFECT, 30) setCombatParam(combat4, COMBAT_PARAM_EFFECT, 39) setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -125.3, 1.5, -125.3, 10) local combat5 = createCombatObject() setCombatParam(combat5, COMBAT_PARAM_TYPE, COMBAT_HOLYDAMAGE) setCombatParam(combat5, COMBAT_PARAM_EFFECT, 49) setCombatFormula(combat5, COMBAT_FORMULA_LEVELMAGIC, -125.3, 1.5, -125.3, 10) arr1 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr2 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr3 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr4 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } arr5 = { {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, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 3, 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}, {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) local area3 = createCombatArea(arr3) local area4 = createCombatArea(arr4) local area5 = createCombatArea(arr5) setCombatArea(combat1, area1) setCombatArea(combat2, area2) setCombatArea(combat3, area3) setCombatArea(combat4, area4) setCombatArea(combat5, area5) function onTargetTile(cid, pos) doCombat(cid,combat1,positionToVariant(pos)) end function onTargetTile2(cid, pos) doCombat(cid,combat2,positionToVariant(pos)) end function onTargetTile3(cid, pos) doCombat(cid,combat3,positionToVariant(pos)) end function onTargetTile4(cid, pos) doCombat(cid,combat4,positionToVariant(pos)) end function onTargetTile5(cid, pos) doCombat(cid,combat5,positionToVariant(pos)) end setCombatCallback(acombat1, CALLBACK_PARAM_TARGETTILE, "onTargetTile") setCombatCallback(acombat2, CALLBACK_PARAM_TARGETTILE, "onTargetTile2") setCombatCallback(acombat3, CALLBACK_PARAM_TARGETTILE, "onTargetTile3") setCombatCallback(acombat4, CALLBACK_PARAM_TARGETTILE, "onTargetTile4") setCombatCallback(acombat5, CALLBACK_PARAM_TARGETTILE, "onTargetTile5") local function onCastSpell1(parameters) doCombat(parameters.cid, acombat1, parameters.var) end local function onCastSpell2(parameters) doCombat(parameters.cid, acombat2, parameters.var) end local function onCastSpell3(parameters) doCombat(parameters.cid, acombat3, parameters.var) end local function onCastSpell4(parameters) doCombat(parameters.cid, acombat4, parameters.var) end local function onCastSpell5(parameters) doCombat(parameters.cid, acombat5, parameters.var) end local min = 0 -- resets function getPlayerReset(cid) -- Marcello Mkez local qr = db.getResult("SELECT `reset` FROM `players` WHERE `id`= "..getPlayerGUID(cid)..";") rss = qr:getDataInt("reset", getPlayerGUID(cid)) if rss < 0 then rss = 0 end return rss end function onCastSpell(cid, var) if getPlayerReset(cid) >= min then local parameters = { cid = cid, var = var} addEvent(onCastSpell1, 100, parameters) addEvent(onCastSpell2, 800, parameters) addEvent(onCastSpell3, 1600, parameters) addEvent(onCastSpell4, 2400, parameters) addEvent(onCastSpell5, 2600, parameters) return true end return false end
-
Ajude Um Membro Com Script De Storage Com Tempo
tópico respondeu ao Vitinhowcq de Demonbholder em Lixeira Pública
use a função os.time(): http://www.lua.org/manual/5.1/manual.html#pdf-os.time http://www.lua.org/manual/5.1/pt/manual.html#pdf-os.time -
retired.
-
Qual o seu sistema de reset?
-
Tenta: function onLogin(cid) if (isVip(cid) == TRUE and getPlayerStorageValue(cid, 56000) == -1) or (isVip(cid) == FALSE and getPlayerStorageValue(cid, 56000) == 1) then doPlayerSendTextMessage(cid, 4, "Sua vida e mana foram alterados.") if isVip(cid) then setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)*2) setCreatureMaxMana(cid, getCreatureMaxMana(cid)*2) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)*2) doCreatureAddMana(cid, getCreatureMaxMana(cid)*2) setPlayerStorageValue(cid, 56000, 1) else setCreatureMaxHealth(cid, getCreatureMaxHealth(cid)/2) setCreatureMaxMana(cid, getCreatureMaxMana(cid)/2) doCreatureAddHealth(cid, getCreatureMaxHealth(cid)/2) doCreatureAddMana(cid, getCreatureMaxMana(cid)/2) setPlayerStorageValue(cid, 56000, -1) end end return true end
-
Pois é cara, o problema disso é que a parte do account manager fica nas sources ou no site. Ai não sei, de repente poderia fazer um globalevent que ficasse checando a cada tanto tempo se alguém criou um char com o nome e então excluísse o char, mas seria meio gambiarra.
-
[Arquivado]Reestruturação Otserv # Veja O Modelo
tópico respondeu ao Henrique Moura de Demonbholder em Noticias - Arquivo
Não sei não, são poucos tópicos na seção de bibliotecas, mas se juntar com Mods vai ficar uma confusão. Eu deixaria separado, mas... Minha opinião: -
pips deles > nossas pips
-
Tile Que Só Pisa Premium! Ajuda Ae!
tópico respondeu ao othereality de Demonbholder em Lixeira Pública
é esse o erro sim, porque não existe a variável fromposition, mas sim a variável frompos. prova: onStepIn(cid, item, pos, frompos) você vê frompos, mas não fromposition. -
vou falar direito: cala a boca kakilo.
-
Quem Está Navegando 0 membros estão online
- Nenhum usuário registrado visualizando esta página.