Vodkart

FacePalm Como que alguém quer ganhar dinheiro desse jeito? Lamentável, não entende e não procura saber nada, só vem aqui faz o pedido e acha que vai ser entregue de mão beijada, como se dinheiro caísse de arvore tbm --'

1° Lib > functions.lua adc death_tabble = {before_exp = 135215,after_exp = 135216, check = 251201} creaturescript/script exp_buy.lua function onLogin(cid) registerCreatureEvent(cid, "Exp_P") if getPlayerStorageValue(cid, death_tabble.check) >= 1 then setPlayerStorageValue(cid, death_tabble.after_exp, getPlayerExperience(cid)) setPlayerStorageValue(cid, death_tabble.check, -1) end return true end function onPrepareDeath(cid, lastHitKiller, mostDamageKiller) setPlayerStorageValue(cid, death_tabble.before_exp, getPlayerExperience(cid)) setPlayerStorageValue(cid, death_tabble.check, 1) return TRUE end creaturescript.xml <event type="preparedeath" name="Exp_P" event="script" value="exp_buy.lua"/> <event type="login" name="Exp_L" event="script" value="exp_buy.lua"/> NPC: 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 itemid,count = 9020,10 -- edite o id e count do item aqui if isInArray({"recover","recuperar","exp","experience"}, msg) then npcHandler:say("você deseja recuperar a exp perdida após á sua morte por "..count.." "..getItemNameById(itemid).."? {yes}", cid) talkState[talkUser] = 1 elseif (msgcontains(msg, 'yes') and talkState[talkUser] == 1) then if getPlayerStorageValue(cid, death_tabble.before_exp) ~= -1 and getPlayerExperience(cid) < getPlayerStorageValue(cid, death_tabble.before_exp) then if doPlayerRemoveItem(cid, itemid, count) == TRUE then local count = (getPlayerStorageValue(cid, death_tabble.before_exp) - getPlayerStorageValue(cid, death_tabble.after_exp)) doPlayerAddExp(cid, count) npcHandler:say("Obrigado! aqui está sua experiência.", cid) else npcHandler:say("Desculpe, você não tem "..getItemNameById(itemid).." suficientes!", cid) talkState[talkUser] = 0 end else npcHandler:say("Desculpe, você não morreu ou já recuperou sua exp perdida!", cid) talkState[talkUser] = 0 end elseif msg == "no" then selfSay("Then not", cid) talkState[talkUser] = 0 npcHandler:releaseFocus(cid) end return TRUE end npcHandler:setCallback(CALLBACK_MESSAGE_DEFAULT, creatureSayCallback) npcHandler:addModule(FocusModule:new()) 2° o jogador só vai poder escolher uma vocação e depois não vai poder trocar mais? e seria por talk ou npc?

Pronto script foi atualizado, não tem mais bugs, o corpse fica no chão!

kk deixa assim: local color = 145 funfo \o/ REP Teria como colocar pra tipo ir somando nas menssagens: good x1, good x2, good x3 e assim vai até mudar o tipo de "classificação" ou até ganhar a recompensa... e outra coisa, fazer com que não ganhe recompensa em determinados bichos (ex.: trainer), se não o player fica rico só treinando '-' dá sim, esse negócio de ir somando é só colocar para retornar a storage, o ruim é que a função é limitada, acho que só pode 10 letras por aí, ai o texto ia sair pela metade =s e o outro tbm dá para fazer, só colocar em uma tabela os nomes de monstro que não somam hit ex: block = {"Monk","Rat","Training Monk"} vou falar com o zmolvir para ele atualizar o script =d

it's true, never thought of that... xd

tem sim por ex: getItemWeaponType(getPlayerSlotItem(cid, CONST_SLOT_RIGHT).uid) 0 = first 1 = sword 2 = club 3 = axe 4 = shield 5 = dist agora só wand e rod que não dá para pegar =[ 6 = rod e wand lol ai por isso eu fiz por todos em uma tabela, acho que vou colocar do jeito que você falou mesmo k mas irei deixar a tabela de wands e rods ----------------------- pronto atualizado

bem pensando! a maioria joga muitos lixos no templo, parabéns cara rep + sem dúvida

CONST_SLOT_FIRST = 1 CONST_SLOT_HEAD = CONST_SLOT_FIRST CONST_SLOT_NECKLACE = 2 CONST_SLOT_BACKPACK = 3 CONST_SLOT_ARMOR = 4 CONST_SLOT_RIGHT = 5 CONST_SLOT_LEFT = 6 CONST_SLOT_LEGS = 7 CONST_SLOT_FEET = 8 CONST_SLOT_RING = 9 CONST_SLOT_AMMO = 10 CONST_SLOT_LAST = CONST_SLOT_AMMO

vou ver, o anel é fácil, só colocar para checar slot do anel e o id dele.

local s = { ["Catirus"] = {x = 1025, y = 1002, z = 6}, ["Tribrehith"] = {x = 1023, y = 1002, z = 6}, ["Umac"] = {x = 1021, y = 1002, z = 6}, } t = {} for k, v in pairs(s) do table.insert(t,k) end local item = 1252 doPlayerAddItemEx(cid, item,1) doItemSetAttribute(item, "present", t[math.random(1, #t)]) --- para que a pos então? porque não fez uma tabela simples local s = {"Demon","Dragon","Rat"} local item = 1252 doPlayerAddItemEx(cid, item,1) doItemSetAttribute(item, "present", s[math.random(1, #s)]) ...

local s = { {"Dragon",{x = 1025, y = 1002, z = 6}}, {"Rat",{x = 1023, y = 1002, z = 6}}, {"Dragon Lord",{x = 1021, y = 1002, z = 6}} } r = math.random(1, #s) doCreateMonster(s[r][1], s[r][2])

function getPlayersInArea(area) local players = {} for x = area.fromx,area.tox do for y = area.fromy,area.toy do for z = area.fromz,area.toz do local m = getTopCreature({x=x, y=y, z=z}).uid if m ~= 0 and isPlayer(m) then table.insert(players, m) end end end end return players end

Se eu não me engano o redskull é contado por semana ou por mês, mesmo que a red skull sair ainda vai estar contando os frags, logo se ele matar ele volta a ser red skull

lol é só colocar no parametro o level '-' local keywordHandler = KeywordHandler:new() local npcHandler = NpcHandler:new(keywordHandler) NpcSystem.parseParameters(npcHandler) 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 local travelNode = keywordHandler:addKeyword({'enigma city'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you wish to travel to Enigma City for 50 gold coins?'}) travelNode:addChildKeyword({'yes'}, StdModule.travel, {npcHandler = npcHandler, premium = true, level = 1000, cost = 50, destination = {x=942, y=978, z=6} }) travelNode:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, reset = true, text = 'Too expensive, eh?'}) keywordHandler:addKeyword({'destination'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'I can take you to \'Enigma City\' for just a small fee.'}) npcHandler:addModule(FocusModule:new()) premium = true -- se precisa ser premium level = 1000 -- que level precisa ter cost = 50 -- o custo da viagem destination = {x=942, y=978, z=6} -- a pos para onde ele vai

para criar o item só adicionar antes de doTeleportThing(tid, t.saida, false) isso: doCreateItem(5787, 1, t.entrada)

function onUse(cid, item, fromPosition, itemEx, toPosition) local monstros ={ {{x = 187, y = 56, z = 7}, "Demon"}, {{x = 187, y = 59, z = 7}, "Demon"}, {{x = 191, y = 59, z = 7}, "Ghazbaran"} } if Create() == false then return doPlayerSendCancel(cid, "sorry already have monster.") end for _, summon in pairs(monstros) do doCreateMonster(summon[2], summon[1]) end doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end function Create() local fromPosition,toPosition = {x = 183, y = 54, z = 7},{x = 192, y = 60, z = 7} -- começo e final da ára for x = fromPosition.x, toPosition.x do for y = fromPosition.y, toPosition.y do local pos = {x=x, y=y, z=fromPosition.z} local m = getTopCreature(pos).uid if m ~= 0 and isMonster(m) then return false end doCleanTile(pos) end end return true end

está difícil de entender rs function onUse(cid, item, fromPosition, itemEx, toPosition) local monstros ={ {{x = 187, y = 56, z = 7}, "Demon"}, {{x = 187, y = 59, z = 7}, "Demon"}, {{x = 191, y = 59, z = 7}, "Ghazbaran"} } for _, summon in pairs(monstros) do local creature = getTopCreature(summon[1]).uid if(creature < 1 and not isPlayer(creature)) then CleanPos() doCreateMonster(summon[2], summon[1]) end end doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end function CleanPos() local fromPosition,toPosition = {x = 182, y = 54, z = 7},{x = 192, y = 59, z = 7} -- começo e final da área for x = fromPosition.x, toPosition.x do for y = fromPosition.y, toPosition.y do local pos = {x=x, y=y, z=fromPosition.z} doCleanTile(pos) end end end

function onUse(cid, item, fromPosition, itemEx, toPosition) local monstros ={ {{x = 187, y = 56, z = 7}, "Demon"}, {{x = 187, y = 59, z = 7}, "Demon"}, {{x = 191, y = 59, z = 7}, "Ghazbaran"} } for _, summon in pairs(monstros) do local creature = getTopCreature(summon[1]).uid if(creature > 0 and not isPlayer(creature)) then return doPlayerSendCancel(cid, "sorry already have monster.") end CleanPos() doCreateMonster(summon[2], summon[1]) end doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end function CleanPos() local fromPosition,toPosition = {x = 180, y = 51, z = 7},{x = 198, y = 59, z = 7} -- começo e final da área for x = fromPosition.x, toPosition.x do for y = fromPosition.y, toPosition.y do local pos = {x=x, y=y, z=fromPosition.z} doCleanTile(pos) end end return true end

ai vc vai em talkactions/script nome do seu script.lua function onSay(cid, words, param, channel) for i = 1,48 do doPlayerAddMount(cid, i) end return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"você recebeu todas as mounts") end talkactions.xml <talkaction words="!mounts" script="nome do seu script.lua"/>

posta o seu talkactions.xml aki

mas ai só tem 42 mounts não é? e ainda estão repetidas algumas '-' function onSay(cid, words, param, channel) for i = 1,42 do doPlayerAddMount(cid, i) end return doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"você recebeu todas as mounts") end 1,42 coloquei 42 porque é o limite de mounts do seu server?

talkactions/script a tag é essa <talkaction words="!buyvip" event="script" value="nome do seu script.lua"/>

function onUse(cid, item, pos) local days = tonumber(30) or 1 local price = 3000000 if doPlayerRemoveMoney(cid, price) then vip.addVipByAccount(getPlayerAccount(cid) ,vip.getDays(days)) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Foram adicionados "..tonumber(days).." dias de vip na sua account.") else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "você precisa de "..price.." gps para comprar vip!.") end return true end

isso, ele vai comprar por gps ou por uma moeda especial?

usa for '-' local t = { entrada = { {x = 192, y = 57, z = 7}, {x = 191, y = 57, z = 7}, {x = 190, y = 57, z = 7} }, saida = { {x = 192, y = 59, z = 7}, {x = 191, y = 59, z = 7}, {x = 190, y = 59, z = 7} } } function onUse(cid, item, fromPosition, itemEx, toPosition) local check = {} for _, k in ipairs(t.entrada) do local x = getTopCreature(k).uid if(isPlayer(x)) then table.insert(check, x) end end if(#check < 2) then return doPlayerSendCancel(cid, 'Está faltando player.') end for i, tid in ipairs(check) do doSendMagicEffect(t.entrada[i], CONST_ME_POFF) doTeleportThing(tid, t.saida[i], false) setPlayerStorageValue(tid,78455,1) doSendMagicEffect(t.saida[i], CONST_ME_ENERGYAREA) end doTransformItem(item.uid, item.itemid == 1945 and 1946 or 1945) return true end coloquei para dar a storage 78455