Ir para conteúdo

Vodkart

Herói
  • Total de itens

    3406
  • Registro em

  • Última visita

  • Dias Ganhos

    113

Tudo que Vodkart postou

  1. function onStepIn(cid, item, position, fromPosition) local quant_reset = 3 -- quantidade de resets para poder passar if (getPlayerResets(cid) < quant_reset) then doTeleportThing(cid, fromPosition, false) doSendMagicEffect(position, CONST_ME_MAGIC_BLUE) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Somente players com "..quant_reset.." ou mais podem passar.") return TRUE end return TRUE end
  2. 1° deixe assim: local color = TEXT_COLOR_RED 2° apague: local pos2 = {x=getCreaturePosition(attacker).x+1,y=getCreaturePosition(attacker).y,z=getCreaturePosition(attacker).z} doSendAnimatedText(pos2, "HIT", color)
  3. e não dá para fazer pelo items.xml? colocar na tag das parte do set <attribute key="manaGain" value="25" /> <attribute key="manaTicks" value="1000" /> ...
  4. fodastico mas pq n vai se fuder
  5. n sei testa local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) local talkState = {} 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(not npcHandler:isFocused(cid)) then return false end local talkUser = NPCHANDLER_CONVbehavior == CONVERSATION_DEFAULT and 0 or cid local msg = string.lower(msg) local promote = { ["promote"] = {level = 20, price = 20000, promotion = 1, premium = false}, ["vip"] = {level = 20, price = 50000, promotion = 2, premium = true} } if promote[msg] then if promote[msg].premium == true and not isPremium(cid) then npcHandler:say('You need a premium account in order to get promoted', cid) return true end if getPlayerPromotionLevel(cid) < promote[msg].promotion then if getPlayerLevel(cid) >= promote[msg].level then if doPlayerRemoveMoney(cid, promote[msg].price) then setPlayerPromotionLevel(cid, promote[msg].promotion) npcHandler:say('Congratulations! You are now promoted!', cid) else npcHandler:say('You need '..promote[msg].price..' gps to buy this promotion.', cid) end else npcHandler:say('I am sorry, but I can only promote you once you have reached level '..promote[msg].level, cid) end else npcHandler:say('You are already promoted!', cid) end end return true end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new())
  6. Vodkart

    System Points

    local itemid,count = 9020,100 local days = 30 if doPlayerRemoveItem(cid,itemid,count) then addVipDays(cid, days) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você adicionou "..days.." dia(s) de vip, agora você possui "..getVipDays(cid).." dia(s) de vip.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você precisa de "..count.." ".. getItemNameById(itemid).." para adicionar "..days.." dia(s) de vip.") end
  7. eu testei aqui e funfou '-' se pá eu posso fazer um npc pra vc tal
  8. gostei da versão com recompensa, criativo o script! parabéns
  9. Vodkart

    System Points

    Então meu server não tem sistema de vip é "Baiak", daqueles que já veem com premium account e ja cria conta com promotion, e acesso as outras areas são via quest que clica no báu e da storage pra passar em tal lugar, mas eu implantei o sistema que você postou acima de system points e está funcionando 100%. Então primeiro você tinha que instalar um sistema vip bom, para quando o jogador receber o item e clicar nele receber os "dias de vip", eu aconselho do vip account by kydrai
  10. vlw jhon ja adc ao script entao =]
  11. estranho, você colocou o parâmetro "premium = true" e ainda sim os free accounts estão comprando a segunda promotion?
  12. Vodkart

    System Points

    mas você já usa algum sistema vip?
  13. Mas já está configurado para mostrar só os 10 primeiros return getRankHit(cid, rank_hit[param][1],rank_hit[param][2], 10, "Rank "..param) Onde está o número 10 é o número max que vai aparecer no rank oq vc quis dizer com sem cada habilidade? --------------------------------- vcs acham que seria bom colocar um "info" que mostra os hits dos próprios jogadores? por exemplo eu uso o comando !rankhit info, ai mostra meus hits de todas as armas:
  14. a 2! > MAIOR QUE e maior que 1 é 2,3,4,5, etc..
  15. Vodkart

    System Points

    Nenhum, o points é pela database, como se fosse algo como "vip days"
  16. Vodkart

    System Points

    Ah entendi, mas nesse caso o baú é para vender item por points, o que você quer é que ele compre points por crystal coin não é isso?
  17. Vodkart

    System Points

    Simples, olhe a posição que eles tomam local points,item = 30,2494 2 variavéis antes do "=" e 2 complemento depois seria o mesmo que local points = 30 local item = 2494
  18. Vodkart

    (Pedido) Deathlist

    atualizado: http://www.xtibia.com/forum/topic/185506-talk-deathlist-para-server-sqlite/ e reportado para fechar esse tópico
  19. Atualizado V1.0: Mostra últimas mortes do servidor: você pode usar o comando !deathlist NOME ex: !deathlist Carlin: in your db execute this query: CREATE TABLE death_list ( id INTEGER NOT NULL, player_id INTEGER NOT NULL, date INTEGER NOT NULL, level INTEGER NOT NULL, killer_name INTEGER NOT NULL, PRIMARY KEY ( id ) ); creaturescript death_list.lua function onDeath(cid, corpse, deathList) local str = "" for _, pid in ipairs(deathList) do if isCreature(pid) == true then str = str.."".. (str == "" and "" or ",") ..""..getCreatureName(pid) else str = str.."".. (str == "" and "" or ",") .." a field item" end end str = str.."." death = str .. " ".. (getPlayerBlessing(cid, 5) and "[Blessed]" or getPlayerSlotItem(cid, 2).itemid == 2173 and "[AOL]" or "") db.executeQuery("INSERT INTO `death_list` (`player_id`, `date`, `level`, `killer_name`) VALUES ('".. getPlayerGUID(cid).."', '".. os.time() .."', '".. getPlayerLevel(cid) .."', '".. death .."');") return true end creaturescript.xml <event type="death" name="DeathList" event="script" value="death_list.lua"/> creaturescript/script/login.lua registerCreatureEvent(cid, "DeathList") talkactions deathlist.lua limit = 5 function onSay(cid, words, param, channel) str = "" if param == "" then local qry = db.getResult("SELECT `player_id`, `date`, `level`, `killer_name` FROM `death_list` ORDER BY `date` DESC LIMIT 0, " .. limit) if(qry:getID() ~= -1) then repeat str = str .."\n "..os.date("%d %B %Y %X ", qry:getDataInt("date")).." "..getPlayerNameByGUID(qry:getDataString("player_id")).." died at level "..qry:getDataInt("level").." by:\n"..qry:getDataString("killer_name") until not(qry:next()) qry:free() else str = "Não há mortes no servidor." end doPlayerPopupFYI(cid, "Last Deaths:\n\n" .. str) return true end local getGuid = getPlayerGUIDByName(param:lower()) if not getGuid then doPlayerSendCancel(cid, "Este Player não existe.") return true end local qry = db.getResult("SELECT `id`, `date`, `level`, `killer_name` FROM `death_list` WHERE `player_id` = " .. getGuid .." ORDER BY `date` DESC LIMIT 0, " .. limit) if(qry:getID() ~= -1) then repeat str = str .."\n "..os.date("%d %B %Y %X ", qry:getDataInt("date")).." died at level "..qry:getDataInt("level").." by:\n"..qry:getDataString("killer_name") until not(qry:next()) qry:free() else str = "Não há mortes." end doPlayerPopupFYI(cid, "Last Deaths of: " .. param .. ".\n\n" .. str) return true end talkactions.xml <talkaction words="!deathlist" script="deathlist.lua"/>
  20. http://www.xtibia.com/forum/topic/184457-resolvido-sistema-de-invasao/page__p__1241732#entry1241732 http://www.xtibia.com/forum/topic/156691-globalevents-invasao/
  21. Vodkart

    Outfit Por Vocation

    @Windu deixa assim no script function onLogin(cid) local x = { [1] = 40850, -- sorc [2] = 40851, -- druid [3] = 40852, -- paladin [4] = 40853, -- kina [5] = 40854, -- master sorc [6] = 40855, -- elder druid [7] = 40856, -- royal paladin [8] = 40857 -- elite kina } local v = x[getPlayerVocation(cid)] if (not v) then return true end for i = 1, #x do setPlayerStorageValue(cid,x[i],0) end setPlayerStorageValue(cid, v, 1) return TRUE end <outfit id="28" quest="40852"> <list type="female" looktype="159" name="Elf"/> <list type="male" looktype="159" name="Elf"/> </outfit> no caso só paladin vai poder usar essa outfit
  22. Vodkart

    Outfit Por Vocation

    no seu caso é que as outfits de Elite knight os knights não podem usar? lol
  23. Vodkart

    Quest Não Funciona

    então usa actionID <action actionid="1111" script="witch.lua"/>
  24. function onUse(cid, item, fromPosition, itemEx, toPosition) local id,pos,x = 671,{x=234, y=39, z=7},true if getTileItemById(pos, id).uid == 0 then x = false end if x == true then doRemoveItem(getThingfromPos(pos).uid,1) else doCreateItem(id, 1, pos) end doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end
  25. Vodkart

    Quest Não Funciona

    <action uniqueid="1111" event="script" value="witch.lua" /> function onUse(cid, item, frompos, item2, topos) local storage = 1111 local ganha,quantia = 2160,1 if getPlayerStorageValue(cid,storage) >= 1 then return doPlayerSendTextMessage(cid,22,"Você já completou a quest.") end setPlayerStorageValue(cid,storage,1) doPlayerAddItem(cid,ganha,quantia) doPlayerSendTextMessage(cid,22,"Você completou a quest.") return true end Verifique se no actions.xml não tem uma tag UNIQUEID = 1111 duplicada.
  • Quem Está Navegando   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.
×
×
  • Criar Novo...