Vodkart

na verdade só ganha 1 dia de premium,porque a storage é dada ao jogador mesmo que relogue varias e varias vezes só vai dar a premium se ele não tiver a storage

adiciona em login.lua antes do return true if getPlayerStorageValue(cid, 98648) <= 0 then doPlayerAddPremiumDays(cid, 1) doPlayerSendTextMessage(cid, 22, "Você acaba de receber 1 dia de VIP.Por favor Relogue e tenha Bom Jogo!") setPlayerStorageValue(cid, 98648, 1) return TRUE end

Bou te explicar checar: getPlayerPromotionLevel(cid) == 0 -- se eles tiver a voc 1,2,3,4 getPlayerPromotionLevel(cid) == 1 -- se eles tiver a voc 5,6,7,8 getPlayerPromotionLevel(cid) == 2 -- se eles tiver a voc 9,10,11,12 Dar promote: setPlayerPromotionLevel(cid, 0) -- Aqui ele vai dar as voc 1,2,3,4 setPlayerPromotionLevel(cid, 1) -- Aqui ele vai dar as voc 5,6,7,8 setPlayerPromotionLevel(cid, 2) -- nesse caso ele vai da as voc 9,10,11,12 ---- Agora que você já sabe,só alterar ali no script abraços

ta ai: em creaturescript/script/login.lua antes do último return true adicione: if isVip(cid) and getPlayerPromotionLevel(cid) == 0 then setPlayerPromotionLevel(cid, 1) elseif isVip(cid) == FALSE and getPlayerPromotionLevel(cid) == 1 then setPlayerPromotionLevel(cid, 0) end

tenta: ----------------------------------- ---------SCRIPT por PC98------------ NAO REMOVA OS CREDITOS ----------------------------------- function onUse(cid, item, frompos, item2, topos) ------------------ Inicio das Config ------------ local castle_one_name = "Ratim Bum" -- Nome do castelo 1 local storages = {154154,54321,123123,96584} -- Storages ( se vc eh iniciante, deixe como está...) -------PREMIOs I N D I V I D U A L --------- local premio_por_vezes = 1 -- Premio por vezes de conquista de castelo. (1) = Ativo (0) = Desativa. local premio_vezes = 13 -- Caso ativo, a quantidade de conquista que o player tem, para ganhar PREMIO. local premio = 2472 -- ID do Premio local premio_cont = 1 -- Quantidade do Premio local premio_reset = 1 -- Resetar o contador do premio depois que atingir a meta?? (1) = SIM (0) = NAO local time = 10 -- tempo em minutos para exauste da alavanca -------FIM PREMIOs I N D I V I D U A L --------- ----------------- FIM DAS CONFIG ----------------- local sto_ativ = getGlobalStorageValue(storages[2]) position = getCreaturePosition(cid) if getGlobalStorageValue(storages[4]) >= os.time() then minutos = math.floor((getGlobalStorageValue(storages[4]) - os.time())/(60)) if minutos >= 1 then doPlayerSendCancel(cid, "Você deve esperar ".. (minutos < 0 and 0 or minutos) .." Minutos para usar a alavanca denovo.") else doPlayerSendCancel(cid, "Você deve esperar ".. getGlobalStorageValue(storages[4]) - os.time() .." segundos para usar a alavanca denovo.") end return TRUE end if isPlayerGuild(cid) == TRUE then if sto_ativ == 1 or sto_ativ == -1 then guildname = getPlayerGuildName(cid) guild = getPlayerGuildId(cid) guild_sto = getGlobalStorageValue(storages[3]) if guild ~= guild_sto then setPlayerStorageValue(cid,guild_sto,guild) if getPlayerStorageValue(cid,storages[1]) == -1 then setPlayerStorageValue(cid,storages[1],0) end sto_vezes = getPlayerStorageValue(cid,storages[1]) setGlobalStorageValue(storages[3],getPlayerGuildId(cid)) setPlayerStorageValue(cid,storages[1], sto_vezes + 1) sto_vezes_total = getPlayerStorageValue(cid,storages[1]) doBroadcastMessage("O(a) "..getCreatureName(cid).." acabou de conquistar o castelo "..castle_one_name.." para a guild \""..guildname.."\" pela "..sto_vezes_total.."ª vez(s).", 22) doSendMagicEffect(position, 39) setGlobalStorageValue(storages[4],os.time()+time*60) if premio_por_vezes == 1 then if getPlayerStorageValue(cid,storages[1]) == premio_vezes then if getItemWeightById(premio,1) <= getPlayerFreeCap(cid) then doBroadcastMessage("O "..getCreatureName(cid).." ganhou uma(o) "..getItemNameById(premio).." como recompensa das suas "..premio_vezes.." conquistas!", 21) doPlayerAddItem(cid, premio,premio_cont) doPlayerSendTextMessage(cid, 18, "Voce recebeu o(a) "..getItemNameById(premio).." como recompensa das suas "..premio_vezes.." conquistas!") setGlobalStorageValue(storages[4],os.time()+time*60) ----------------------------------------------- -- if premio_reset == 1 then -- setPlayerStorageValue(cid,storages[1],0) -- Resetar a contagem end -- ----------------------------------------------- -- else doPlayerSendTextMessage(cid, 18, "Voce nao tem capacidade para ganhar o item. Vamos verificar novamente em 10 segundos!") addEvent(additem,10000,cid,premio,premio_cont,premio_reset) end end end else doPlayerSendCancel(cid,"Este castelo ja foi conquistado pela sua guild!") doSendMagicEffect(position, 2) end else doPlayerSendCancel(cid,"O sistema está desativado") end else doPlayerSendCancel(cid,"É nescessario ter guild para dominar o castelo!") doSendMagicEffect(position, 2) end end ------------------------- por pc98 function additem(cid,premio,premio_cont,premio_reset) if getItemWeightById(premio,1) <= getPlayerFreeCap(cid) then doPlayerAddItem(cid, premio,premio_cont) doPlayerSendTextMessage(cid, 18, "Voce recebeu o(a) "..getItemNameById(premio).." como recompensa das suas "..premio_vezes.." conquistas!") if premio_reset == 1 then setPlayerStorageValue(cid,storages[1],0) end stopEvent(additem) else doPlayerSendTextMessage(cid, 18, "Voce nao tem capacidade para ganhar o item. Verificando novamente em 10 segundos!") addEvent(additem,10000,cid) end end ------------------------- por pc98 function isPlayerGuild(cid) if getPlayerGuildName(cid) ~= "" then return TRUE else return FALSE end end

@helanio vai em creaturescript/script/login.lua antes do ultimo "return true" adiciona o script @UP já existem varios tiles "donates" que no caso só jogadores vip/premium passam

function onAdvance(cid, skill, oldLevel, newLevel) local new_level = 20 local text = "Parabens, " .. getCreatureName(cid) .. " você avançou de level,você recebeu 20k para promote!" if skill == 8 then if (oldLevel < new_level ) and (newLevel >= new_level) and getPlayerStorageValue(cid, 32647) <= 0 then doPlayerSendTextMessage(cid,19,text) doPlayerAddItem(cid,2160,2) setPlayerStorageValue(cid, 32647, 1) return TRUE end end return TRUE end

exemplo: function getResets(cid) resets = getPlayerStorageValue(cid,2310) if resets < 0 then resets = 0 end return resets end local min_reset = 5 -- quantidade de reset que precisa ter para usar a magia function onCastSpell(cid, var) if getResets(cid) < min_reset then doPlayerSendTextMessage(cid, 23, "Sorry, you need a ".. min_reset .." reset's to use this.") end doCombat(cid, acombat, var) return TRUE end

----------------------------------- ---------SCRIPT por PC98------------ NAO REMOVA OS CREDITOS ----------------------------------- function onUse(cid, item, frompos, item2, topos) ------------------ Inicio das Config ------------ local castle_one_name = "Ratim Bum" -- Nome do castelo 1 local storages = {154154,54321,123123,96584} -- Storages ( se vc eh iniciante, deixe como está...) -------PREMIOs I N D I V I D U A L --------- local premio_por_vezes = 1 -- Premio por vezes de conquista de castelo. (1) = Ativo (0) = Desativa. local premio_vezes = 13 -- Caso ativo, a quantidade de conquista que o player tem, para ganhar PREMIO. local premio = 2472 -- ID do Premio local premio_cont = 1 -- Quantidade do Premio local premio_reset = 1 -- Resetar o contador do premio depois que atingir a meta?? (1) = SIM (0) = NAO local time = 10 -- tempo em minutos para exauste da alavanca -------FIM PREMIOs I N D I V I D U A L --------- ----------------- FIM DAS CONFIG ----------------- local sto_ativ = getGlobalStorageValue(storages[2]) position = getCreaturePosition(cid) if isPlayerGuild(cid) == TRUE then if sto_ativ == 1 or sto_ativ == -1 then if getGlobalStorageValue(storages[4]) <= os.time() then guildname = getPlayerGuildName(cid) guild = getPlayerGuildId(cid) guild_sto = getGlobalStorageValue(storages[3]) if guild ~= guild_sto then setPlayerStorageValue(cid,guild_sto,guild) if getPlayerStorageValue(cid,storages[1]) == -1 then setPlayerStorageValue(cid,storages[1],0) end sto_vezes = getPlayerStorageValue(cid,storages[1]) setGlobalStorageValue(storages[3],getPlayerGuildId(cid)) setPlayerStorageValue(cid,storages[1], sto_vezes + 1) sto_vezes_total = getPlayerStorageValue(cid,storages[1]) doBroadcastMessage("O(a) "..getCreatureName(cid).." acabou de conquistar o castelo "..castle_one_name.." para a guild \""..guildname.."\" pela "..sto_vezes_total.."ª vez(s).", 22) doSendMagicEffect(position, 39) if premio_por_vezes == 1 then if getPlayerStorageValue(cid,storages[1]) == premio_vezes then if getItemWeightById(premio,1) <= getPlayerFreeCap(cid) then doBroadcastMessage("O "..getCreatureName(cid).." ganhou uma(o) "..getItemNameById(premio).." como recompensa das suas "..premio_vezes.." conquistas!", 21) doPlayerAddItem(cid, premio,premio_cont) doPlayerSendTextMessage(cid, 18, "Voce recebeu o(a) "..getItemNameById(premio).." como recompensa das suas "..premio_vezes.." conquistas!") setGlobalStorageValue(storages[4],os.time()+time*60) ----------------------------------------------- -- if premio_reset == 1 then -- setPlayerStorageValue(cid,storages[1],0) -- Resetar a contagem end -- ----------------------------------------------- -- else doPlayerSendTextMessage(cid, 18, "Voce nao tem capacidade para ganhar o item. Vamos verificar novamente em 10 segundos!") addEvent(additem,10000,cid,premio,premio_cont,premio_reset) end end end else doPlayerSendCancel(cid,"Este castelo ja foi conquistado pela sua guild!") doSendMagicEffect(position, 2) end else minutos = math.floor((getGlobalStorageValue(storages[4]) - os.time())/(60)) if minutos >= 1 then doPlayerSendCancel(cid, "Você deve esperar ".. (minutos < 0 and 0 or minutos) .." Minutos para usar a alavanca denovo.") else doPlayerSendCancel(cid, "Você deve esperar ".. getGlobalStorageValue(storages[4]) - os.time() .." segundos para usar a alavanca denovo.") end end else doPlayerSendCancel(cid,"O sistema está desativado") end doPlayerSendCancel(cid,"É nescessario ter guild para dominar o castelo!") doSendMagicEffect(position, 2) end end ------------------------- por pc98 function additem(cid,premio,premio_cont,premio_reset) if getItemWeightById(premio,1) <= getPlayerFreeCap(cid) then doPlayerAddItem(cid, premio,premio_cont) doPlayerSendTextMessage(cid, 18, "Voce recebeu o(a) "..getItemNameById(premio).." como recompensa das suas "..premio_vezes.." conquistas!") if premio_reset == 1 then setPlayerStorageValue(cid,storages[1],0) end stopEvent(additem) else doPlayerSendTextMessage(cid, 18, "Voce nao tem capacidade para ganhar o item. Verificando novamente em 10 segundos!") addEvent(additem,10000,cid) end end ------------------------- por pc98 function isPlayerGuild(cid) if getPlayerGuildName(cid) ~= "" then return TRUE else return FALSE end end

sim function onLogin(cid) local pos = {x = 157, y = 50, z = 7} -- posiçao do templo. if isPremium(cid) then setPlayerStorageValue(cid, 9899, 1) elseif getPlayerStorageValue(cid, 9899) >= 1 and isPremium(cid) == FALSE then doTeleportThing(cid, pos) doPlayerPopupFYI(cid, "Sua Premium Account acabou.") setPlayerStorageValue(cid, 9899, -1) end return TRUE end

não sabia que isso: /attr marriage existia

Parece um ótimo sistema,obrigado por compartilhar

achei a magia muito simples :X

oloco brother bom trabalho *-* gostei mto

Carro medieval? PQP já criaram as montarias no maximo seria aquelas carroças puxadas por bois...

Maluko Sherman Caverna

vc tem que colocar a tag no movements.xml <movevent type="StepIn" uniqueid="13700" event="script" value="viptile.lua"/> ai coloca na propriedade do tile UNIQUEID = 13700

e qual UniqueID ta no piso lá no mappereditor?

vai em movements/script e posta o seu viptile.lua

o sistema vip do seu servidor não é aquele do MOCK?

claro amigo xd um exemplo: function onSay(cid, words, param) m = {"Demon", "Hydra", "Morgaroth", "Bear","Cat"} local str = "" str = str .. "Monster Names :\n\n" for i = 1, table.maxn(m) do str = str..m[i].."\n" end str = str .. "" doShowTextDialog(cid, 6579, str) return TRUE end nesse caso vai retornar em uma janela todos os montros presente na tabela abraços

vai na frente da placa e usa o comando /attr set text "SEU TEXTO AQUI

Ué testei aqui e funciono,como vc edito o script? posta ae...

vc tem que trocar a tag no globalevents por essa: <globalevent name="save" time="00:00" event="script" value="save.lua"/>