Ir para conteúdo
  • Cadastre-se

Lyu

Membro
  • Total de itens

    307
  • Registro em

  • Última visita

  • Dias Ganhos

    3

Lyu venceu a última vez em Agosto 30 2015

Lyu teve o conteúdo mais curtido!

3 Seguidores

Sobre Lyu

  • Rank
    "Você não é louco; Você tem super poderes."
  • Data de Nascimento 17/10/1995

Informação de Perfil

  • Genero
    Masculino
  • Localização
    Boqueirão-pb
  • Eu sou
    Programmer
  • Meu personagem
    Lyu
  • Interesses
    Ajudar à quem precisa.

Últimos Visitantes

1.796 visualizações
  1. Projeto bacana. Boa sorte @DiegoRulez @tataboy67.
  2. Não está encontrando a função executeCommand.
  3. Qualquer coisa mais tarde lhe mando uma mensagem lá. Abraços!
  4. eae meu mano @tataboy67! Fiquei sabendo sobre o acontecido relacionado ao seu projeto, é paia essas paradas em. Quiser começar um projetin, bora dar inicio em algo, tô com uns tempos sobrando.
  5. Lyu

    [Procuro Job] Lyu Development

    Lyu Development Visualizar Anúncio O que eu faço? Desenvolvimento de Sistemas & Eventos Desenvolvimento em Geral com LUA Correções de Bugs Melhorias de Scripts Ajustes em source (C++) Otimização de Códigos E outras coisas Tenho atuado bastante em servidores baseados em TFS 1.x mas também atuo em 0.4. Um de meus trabalhos (BÁSICO) : -- Legendary Lever was developed by ghost-code (Legendary Lever isn't public) if not randomitems then randomitems = {} function randomitems:saveLog(...) local message = '[%s] %s has found %s %s\n' local file = io.open('data/logs/randomitems/' .. ... .. '.log', 'a') if not file then return end io.output(file) io.write(message:format(os.date('%d/%m/%Y %H:%M'), ...)) io.close(file) end function randomitems:random(p, obj, exhaust, item) if not rawequal(type(obj), 'table') then return error('table of items not found.') end if not p:getGroup():getAccess() then -- double-click protect if obj.exhaust and obj.exhaust > os.time() then return p:getMoney() >= obj.coust and p:sendCancelMessage('Lever exhausted for ' .. obj.exhaust - os.time() ..' seconds.') or true end -- the exhaust of x object is global for all players obj.exhaust = os.time() + (not exhaust and 2 or exhaust) if obj.onlypremium and not p:isPremium() then return p:say('Sorry, only premium players can use this lever.', TALKTYPE_MONSTER_SAY) end if not p:removeMoney(obj.coust) then return p:say('Payment fail, you need ' .. obj.coust .. ' gold coins.', TALKTYPE_MONSTER_SAY) end if exhaust > 1 then item:transform(item.itemid + 1) addEvent(function() item:transform(item.itemid - 1) end, ((obj.exhaust - os.time())-1) * 1000) end end -- this function is necessary to repeat the loop if the result was nil local function randomize() for _, it in ipairs(obj) do if it.chance>=100-(math.random()*100) then local item = p:addItem(it.itemid, it.amount) local name = not rawequal(type(item), 'table') and item:getName() or item[1]:getName() self:saveLog(p:getName(), it.amount, name) p:save() -- [security] save player if it.broadcast then local msg = '[Legendary Levers] %s has found %s %s.' if not p:getGroup():getAccess() then Game.broadcastMessage(msg:format(p:getName(), rawequal(it.amount, 1) and 'a' or it.amount, name .. '' .. (it.amount > 1 and 's' or '')), MESSAGE_EVENT_ADVANCE) end end p:sendTextMessage(MESSAGE_INFO_DESCR, 'Congratulations, you have found ' .. (rawequal(it.amount, 1) and 'a' or it.amount) .. ' ' .. name .. '' .. (it.amount > 1 and 's.' or '.')) return not p:isInGhostMode() and p:getPosition():sendMagicEffect(it.broadcast and 7 or 15) end end -- repeat randomize() end -- called by self:random(...) randomize() return true end else error('>> randomitems/lib.lua loading failed.') end Anunciante Lyu Date 24/07/2018 Preço Categoria Procura Jobs
  6. Lyu

    Lyu Development

    ESTE ANÚNCIO EXPIROU!

    • PROCURO JOB
    • A combinar

    O que eu faço? Desenvolvimento de Sistemas & Eventos Desenvolvimento em Geral com LUA Correções de Bugs Melhorias de Scripts Ajustes em source (C++) Otimização em Geral E outras coisas Tenho atuado bastante em servidores baseados em TFS 1.x mas também atuo em 0.4. Um de meus trabalhos (BÁSICO) : -- Legendary Lever was developed by ghost-code (Legendary Lever isn't public) if not randomitems then randomitems = {} function randomitems:saveLog(...) local message = '[%s] %s has found %s %s\n' local file = io.open('data/logs/randomitems/' .. ... .. '.log', 'a') if not file then return end io.output(file) io.write(message:format(os.date('%d/%m/%Y %H:%M'), ...)) io.close(file) end function randomitems:random(p, obj, exhaust, item) if not rawequal(type(obj), 'table') then return error('table of items not found.') end if not p:getGroup():getAccess() then -- double-click protect if obj.exhaust and obj.exhaust > os.time() then return p:getMoney() >= obj.coust and p:sendCancelMessage('Lever exhausted for ' .. obj.exhaust - os.time() ..' seconds.') or true end -- the exhaust of x object is global for all players obj.exhaust = os.time() + (not exhaust and 2 or exhaust) if obj.onlypremium and not p:isPremium() then return p:say('Sorry, only premium players can use this lever.', TALKTYPE_MONSTER_SAY) end if not p:removeMoney(obj.coust) then return p:say('Payment fail, you need ' .. obj.coust .. ' gold coins.', TALKTYPE_MONSTER_SAY) end if exhaust > 1 then item:transform(item.itemid + 1) addEvent(function() item:transform(item.itemid - 1) end, ((obj.exhaust - os.time())-1) * 1000) end end -- this function is necessary to repeat the loop if the result was nil local function randomize() for _, it in ipairs(obj) do if it.chance>=100-(math.random()*100) then local item = p:addItem(it.itemid, it.amount) local name = not rawequal(type(item), 'table') and item:getName() or item[1]:getName() self:saveLog(p:getName(), it.amount, name) p:save() -- [security] save player if it.broadcast then local msg = '[Legendary Levers] %s has found %s %s.' if not p:getGroup():getAccess() then Game.broadcastMessage(msg:format(p:getName(), rawequal(it.amount, 1) and 'a' or it.amount, name .. '' .. (it.amount > 1 and 's' or '')), MESSAGE_EVENT_ADVANCE) end end p:sendTextMessage(MESSAGE_INFO_DESCR, 'Congratulations, you have found ' .. (rawequal(it.amount, 1) and 'a' or it.amount) .. ' ' .. name .. '' .. (it.amount > 1 and 's.' or '.')) return not p:isInGhostMode() and p:getPosition():sendMagicEffect(it.broadcast and 7 or 15) end end -- repeat randomize() end -- called by self:random(...) randomize() return true end else error('>> randomitems/lib.lua loading failed.') end

    Free

  7. Lyu

    Scripting Teleport Bug

    me diz qual source vocês usam, tenho que dar uma olhada melhor. Como eu disse acima, funcionou no otx 2.6
  8. Lyu

    Scripting Teleport Bug

    algo tá errado, testei na source otx 2.6 e funcionou perfeitamente. Vale lembrar que 'SetDestination encontra-se no início de seu arquivo teleport.cpp, então tá estranho dizer que não está declarado.
  9. Lyu

    Scripting Teleport Bug

    source amiguinho. Se eu achar um tempinho, vou dar uma olhada e lhe informo algo. @Notepad veja se isso resolve: em teleport.cpp, procure por if(Creature* creature = thing->getCreature()) e no início do escopo, adicione isso if(destination == creature->getPosition()) { setDestination(Position(0, 0, 0)); return; } se a posição de destino for a mesma posição do player, o código anula a posição do portal fazendo se tornar apenas um item sem posição configurada.
  10. se quer algo pronto na mão, desembolse. Ninguém tem tempo pra ajudar mais não, principalmente com essa atitude aí.
  11. Lyu

    Scripting SPELL

    @Kevin Araujo local combat1 = createCombatObject() setCombatParam(combat1, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat1, COMBAT_PARAM_EFFECT, 553) setCombatFormula(combat1, COMBAT_FORMULA_LEVELMAGIC, -80.2, -40, -1.5, 0) local combat2 = createCombatObject() setCombatParam(combat2, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat2, COMBAT_PARAM_EFFECT, 553) setCombatFormula(combat2, COMBAT_FORMULA_LEVELMAGIC, -80.2, -40, -1.5, 0) local combat3 = createCombatObject() setCombatParam(combat3, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat3, COMBAT_PARAM_EFFECT, 553) setCombatFormula(combat3, COMBAT_FORMULA_LEVELMAGIC, -80.2, -40, -1.5, 0) local combat4 = createCombatObject() setCombatParam(combat4, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat4, COMBAT_PARAM_EFFECT, 553) setCombatFormula(combat4, COMBAT_FORMULA_LEVELMAGIC, -80.2, -40, -1.5, 0) local arr1 = { {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, 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, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 0, 3, 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, 0, 0, 0, 1, 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, 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}, } local arr2 = { {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, 0, 0, 0, 1, 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, 1, 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, 1, 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, 1, 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}, } local 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, 1, 0, 0, 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, 1, 0, 0, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 0, 3, 0, 1, 0, 0, 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, 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, 0, 0}, } local arr4 = { {0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 0}, {0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0}, {0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0}, {0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0}, {0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0}, } local area1 = createCombatArea(arr1) local area2 = createCombatArea(arr2) local area3 = createCombatArea(arr3) local area4 = createCombatArea(arr4) setCombatArea(combat1, area1) setCombatArea(combat2, area2) setCombatArea(combat3, area3) setCombatArea(combat4, area4) local function onCastSpell1(parameters) if isCreature(parameters.cid) then doCombat(parameters.cid, combat1, parameters.var) end end local function onCastSpell2(parameters) if isCreature(parameters.cid) then doCombat(parameters.cid, combat2, parameters.var) end end local function onCastSpell3(parameters) if isCreature(parameters.cid) then doCombat(parameters.cid, combat3, parameters.var) end end local function onCastSpell4(parameters) if isCreature(parameters.cid) then doCombat(parameters.cid, combat4, parameters.var) end end function onCastSpell(cid, var) local parameters = { cid = cid, var = var} addEvent(onCastSpell1, 100, parameters) addEvent(onCastSpell2, 300, parameters) addEvent(onCastSpell3, 400, parameters) addEvent(onCastSpell4, 600, parameters) return TRUE end apenas utilizei isCreature(cid) para verificar se o player existe.
  12. local config = { money = 80000000, -- Dinheiro que vai custar item = 8300, -- ID do item que vai vender count = 1, -- Quantidade } function onUse(cid, item, fromPosition, itemEx, toPosition) -- VERIFICAÇÃO if getPlayerStorageValue(cid, 13615) == -1 then return true end pos = getCreaturePosition(cid) if item.itemid == 1945 then if doPlayerRemoveMoney(cid, config.money) == TRUE then doPlayerAddItem(cid, config.item, config.count) doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, "Você acaba de comprar "..config.count.." "..getItemNameById(config.item)..".") doSendMagicEffect(pos, CONST_ME_MAGIC_BLUE) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_DEFAULT, "Desculpe, mais você precisa de 80kk para comprar o Outfit VIP") doSendMagicEffect(pos, CONST_ME_POFF) end end end
  13. lembrando que se o seu sistema de VIP não for Premium Account, não irá adiantar muita coisa. Por isso perguntei antes.
  14. source manin, só fazer uma verificação nas funções addSpectator e removeSpectator, evitando assim que envie as mensagens de join e left caso seja God.
×
Close