Vodkart

function onSay(cid, words, param, channel) local config = { s = 11548, -- n mexa exhau = 30 -- tempo em seegundos para salvar denovo } if (getPlayerStorageValue(cid, config.s) <= os.time()) then doPlayerSave(cid) setPlayerStorageValue(cid,config.s,os.time()+config.exhau) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Char salvo com sucesso.") else doPlayerSendCancel(cid, "Você tem que esperar " .. getPlayerStorageValue(cid, config.s) - os.time() .. " segundos para salvar novamente.") end return TRUE end

só faltou postar o creaturescript para quando o vip dele acabar ser removido o [VIP] do nome fera :]

isso é o type da mensagem por exemplo se ela vai sair no default ou na tela,a cor dela,se é branca,verde,etc...

ta ai,só adicionar mais itens e configurar do jeito que quiser: local items = { -- pode adicionar mais itens [1988] = {new= 11257,effect = 10}, [11257] = {new= 1988,effect = 28} } function onUse(cid, item, fromPosition, itemEx, toPosition) local e = items[item.itemid] doTransformItem(item.uid, e.new) doSendMagicEffect(getThingPos(item.uid),e.effect) return TRUE end

Muito simples,irei dar um exemplo como ficaria a da magic longsword: local weapon = 2390 -- id do item function onCastSpell(cid, var) if getPlayerItemCount(cid,weapon) >= 1 then if (getPlayerSlotItem(cid, 5).itemid == weapon) or (getPlayerSlotItem(cid, 6).itemid == weapon) then return doCombat(cid, acombat, var) else doPlayerSendTextMessage(cid, 23, "Sorry, you need use ".. getItemNameById(weapon) .." in your hands to use this.") end else doPlayerSendTextMessage(cid, 23, "Sorry, you need a ".. getItemNameById(weapon) .." to use this Spell.") end return TRUE end explicação getPlayerSlotItem(cid, 5) -- slot da left hand getPlayerSlotItem(cid, 6) -- slot da right hand lista dos numeros para vc:

ta aqui o autografo gato: 8========================D se gosto né iuSHUISHSUIhuishSUIhiushIUHSuius bjs

eu tenho um pircing no nariz só que é argolinha,o seu ai ta muito gay namoral troca essa merda

--[[script By Vodkart]]-- function onSay(cid, words, param) local config = { pz = true, -- players precisam estar em protection zone para usar? (true or false) battle = true, -- players deve estar sem battle (true or false) custo = true, -- se os teleport irão custa (true or false) need_level = true, -- se os teleport irão precisar de level (true or false) premium = true -- se precisa ser premium account (true or false) } --[[ Config lugares]]-- local lugar = { ["depot"] = { -- nome do lugar pos = {x=129, y=54, z=6},level = 5,price = 1000}, ["templo"] = { -- nome do lugar pos = {x=160, y=54, z=7},level = 10, price = 2000}, ["arena"] = { -- nome do lugar pos = {x=125, y=31, z=9},level = 15,price = 3000}, ["area vip"] ={ -- nome do lugar pos = {x=280, y=87, z=4},level = 20,price = 4000} } --[[ Lista de Viagem (Não mexa) ]]-- if (param == "lista") then local str = "" str = str .. "lista de viagem :\n\n" for name, pos in pairs(lugar) do str = str..name.."\n" end str = str .. "" doShowTextDialog(cid, 6579, str) return TRUE end local a = lugar[param] if not(a) then doPlayerSendTextMessage(cid, 22, "desculpe,este lugar não existe") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE elseif config.pz == true and getTilePzInfo(getCreaturePosition(cid)) == FALSE then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT,"você precisa estar em protection zone pra poder teleportar.") return TRUE elseif config.premium == true and not isPremium(cid) then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Apenas players com premium account podem teleportar.") return TRUE elseif config.battle == true and getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE then doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Você precisa estar sem battler pra poder teleportar.") return TRUE elseif config.need_level == true and getPlayerLevel(cid) < a.level then doPlayerSendTextMessage(cid, 22, "Desculpe,Voce não tem level. voce precisa "..a.level.." level ou mais para ser teleportado.") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE elseif config.custo == true and doPlayerRemoveMoney(cid, a.price) == FALSE then doPlayerSendTextMessage(cid, 22, "Desculpe,voce nao tem dinheiro suficiente. Voce precisa "..a.price.." gp para ser teleportado.") doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) return TRUE end doSendMagicEffect(getCreaturePosition(cid), CONST_ME_POFF) addEvent(doSendMagicEffect, 200, a.pos, CONST_ME_TELEPORT) addEvent(doTeleportThing, 150, cid, a.pos) doPlayerSendTextMessage(cid, 22, "" .. getPlayerName(cid) .. " foi teleportado para: \n " .. param .. ".") return TRUE end

acho que ja existia isso: function onCastSpell(cid, var) local jogadorpos = getCreaturePosition(cid) local target = getCreatureTarget(cid) local playerpos = getCreaturePosition(target) if target == isPlayer then if (getTilePzInfo(target) == FALSE) and (getTilePzInfo(jogadorpos) == FALSE) then doTeleportThing(cid,playerpos) doTeleportThing(target,jogadorpos) doSendMagicEffect(jogadorpos, 65) doSendMagicEffect(monsterpos, 65) else doPlayerSendTextMessage(cid,20,'Os jogadores precisam estar fora de PZ') end else doPlayerSendTextMessage(cid,20,'Você só pode usar em jogadores') end return TRUE end

PQP velho,está tudo errado...o certo é function onCastSpell(cid, var) if isVip(cid) then -- se for vip return doCombat(cid, combat, var) else doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Voce Precisa Ser Vip Para Usar Esta Magia.") doSendMagicEffect(getThingPos(cid), 2) end return TRUE end ou se não function onCastSpell(cid, var) if isVip(cid) == FALSE then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_ORANGE, "Voce Precisa Ser Vip Para Usar Esta Magia.") doSendMagicEffect(getThingPos(cid), 2) return TRUE end return doCombat(cid, combat, var) end e pelo jeito só tem o vip do kydrai ai

eu Não entendi direito brother... Você quer 2 efeitos é isso? um efeito na pos que o jogador está e um outro na pos que o jogador vai ao usar o comando é isso?

A pos você vai digitar tipo /comando 154,60,7 ou pode usar direito pra identificar sua pos "getCreaturePosition(cid)"?

No forum existe varios sistemas vips,não precisava criar esse tópico,isso é vadiagem sua de vez de procurar quer tudo de mão beijada.

tenta: function onSay(cid, words, param) local config = { loss_life = 500, storage_check = 19469, time = 7, pos_preso = {x=930, y=1003, z=7}, -- pos da sua prisao pos_solto = {x=932, y=1003, z=7} -- pos pra onde ele vai dps que acabar o tempo na prisao } if getTilePzInfo(getCreaturePosition(cid)) == FALSE then if getCreatureCondition(cid, CONDITION_INFIGHT) == TRUE then doCreatureAddHealth(cid, -config.loss_life) doPlayerSendTextMessage(cid, 22,"Chingar mae é feio voce perde "..config.loss_life.." de life por fazer isso.") else doTeleportThing(cid, config.pos_preso) doPlayerSendTextMessage(cid, 22," Chingar mae nao vale. Voce está preso por "..config.time.." minutos .") addEvent(setPlayerStorageValue, config.time*60*1000-1000, cid, config.storage_check, -1) addEvent(doTeleportThing, config.time*60*1000-500, cid, config.pos_solto) end else if getPlayerStorageValue(cid, config.storage_check) <= 0 then doPlayerSendTextMessage(cid, 22,"Chingar mae nao vale. Proxima vez ira preso.") setPlayerStorageValue(cid, config.storage_check, 1) else doTeleportThing(cid, config.pos_preso) doPlayerSendTextMessage(cid, 22," Chingar mae nao vale. Voce está preso por "..config.time.." minutos .") addEvent(setPlayerStorageValue, config.time*60*1000-1000, cid, config.storage_check, -1) addEvent(doTeleportThing, config.time*60*1000-500, cid, config.pos_solto) end end return TRUE end

refiz os 2 npc... Primeiro: NOME DO SEU NPC.XML <?xml version="1.0"?> <npc name="NOME DO SEU NPC" script="data/npc/scripts/quest_letter1.lua" walkinterval="5000" floorchange="0"> <health now="100" max="100"/> <look type="134" head="78" body="88" legs="0" feet="88" addons="3"/> <parameters> <parameter key="message_greet" value="Ola |PLAYERNAME|.Voce poderia me {ajudar}? "/> </parameters> </npc> Em Npc/script Crie um arquivo.lua e renomeie para: quest_letter1.lua 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 carta_id = 2333 local Storage = 4350 if(msgcontains(msg, 'ajudar') or msgcontains(msg, 'AJUDAR')) then if getPlayerStorageValue(cid, Storage) <= 0 then selfSay('Fui preso por roubar comida,Mas não é oque parece, meus {filhos} estavão com fome e eu sem emprego, E minha Mulher Doente...Era necessario ', cid) talkState[talkUser] = 1 else selfSay('Eu já lhe entreguei a carta,por favor leve para minha esposa!', cid) talkState[talkUser] = 0 end elseif msgcontains(msg, 'filhos') and talkState[talkUser] == 1 then selfSay('Sim, Tenho 2 pequenos,Bom preciso que você leve esta Carta para minha esposa, Nela escrevi que estou bem e em pouco tempo estarei livre, Você pode Levar a carta para minha Esposa? {yes}', cid) talkState[talkUser] = 2 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 2 then selfSay('Muito Obrigado! A casa fica a leste de Malfer City, Serei grato eternamente a você, meu caro rapaz', cid) setPlayerStorageValue(cid,Storage,1) doPlayerAddItem(cid,carta_id,1) talkState[talkUser] = 0 elseif msg == "no" and talkState[talkUser] >= 1 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()) SEGUNDO NPC: NOME DO SEU NPC.XML <?xml version="1.0"?> <npc name="NOME DO SEU NPC" script="data/npc/scripts/quest_letter2.lua" walkinterval="5000" floorchange="0"> <health now="100" max="100"/> <look type="134" head="78" body="88" legs="0" feet="88" addons="3"/> <parameters> <parameter key="message_greet" value="Ola |PLAYERNAME|.Mas que vida {cruel},nao acha meu jovem..."/> </parameters> </npc> novamente em NPC/SCRIPT crie um arquivo.lua e renomeie para: quest_letter2. 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 carta_id = 2333 local Storage = 4350 local recompensa = 2131 if(msgcontains(msg, 'cruel') or msgcontains(msg, 'CRUEL')) then if getPlayerStorageValue(cid, Storage) == 1 then selfSay('O Rei mandou prender meu pobre {marido}, E ele so estava tetando dar oque comer a nossos filhos...', cid) talkState[talkUser] = 1 else selfSay('Não quero nada com você agora,volte depois!', cid) talkState[talkUser] = 0 end elseif msgcontains(msg, 'marido') and talkState[talkUser] == 1 then selfSay('Sim, Meu pobre {ramon}...}', cid) talkState[talkUser] = 2 elseif msgcontains(msg, 'ramon') and talkState[talkUser] == 2 then selfSay('Por acaso sabe algo sobre meu Ramon? {yes}', cid) talkState[talkUser] = 3 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 3 then selfSay('hmmmm, Então ele te deu esta carta? Bom pelomenos assim sei que ele ainda Está vivo...Me de a {carta}', cid) talkState[talkUser] = 4 elseif msgcontains(msg, 'carta') and talkState[talkUser] == 4 then if (getPlayerItemCount(cid, carta_id) >= 1) then setPlayerStorageValue(cid,Storage,2) doPlayerAddItem(cid,recompensa,1) doPlayerRemoveItem(cid, carta_id, 1) selfSay('Obrigado por nós ajudar!', cid) talkState[talkUser] = 0 else selfSay('Você não está com a carta que ramon lhe deu,volte e me traga!', cid) talkState[talkUser] = 0 end elseif msg == "no" and talkState[talkUser] >= 1 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())

fizeram o rapaz chorar... Coitado do cara,deviam se sentir envergonhados cambada de marmanjo brincando com cyberbullying que pode ser pior do que a violência real. Ele só veio postar a foto dele para pegar umas mina nerd e vocês ficam brincando com isso,facepalm para todos vocês iushIUSHUIhsuihsiuHSUIhsiuHuishIUSHusUI Brinks

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 price = 20000 local vocations = {5,6,7,8} if(msgcontains(msg, 'second promote') or msgcontains(msg, 'SECOND PROMOTE')) then selfSay('Você quer ser promovido por '..price..' gps? {yes} ', cid) talkState[talkUser] = 1 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 1 then if isInArray(vocations, getPlayerVocation(cid)) then if doPlayerRemoveMoney(cid,price) == TRUE then setPlayerPromotionLevel(cid, 3) selfSay('Parabens,você foi promovido !', cid) talkState[talkUser] = 0 else selfSay('Você não tem ' .. price .. ' gps para ser promovido', cid) talkState[talkUser] = 0 end else selfSay('Desculpe mais você não tem vocação paraser promovido.', cid) talkState[talkUser] = 0 end elseif msg == "no" and talkState[talkUser] >= 1 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())

KKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKK COMEDINHAS VAI SAIR NA G MAGAZINE FRAGA ELE

relaxa comedia mulher pra ti não falta brother,vc é rico e tem papo só dar uma malhada que tbm fica legal,liga pro pessoal não... depois tem como tirar uma foto só de cueca? quero fazer um poster seu e colocar atrás da porta do meu quarto deliçia -kkkkkkkkkkkkkkkk

é ta certo,sem ofensas ai pessoal bota moral ai comedia (:

eu coloquei como premium só,porque varia muito o sistema vip de cada usuario e não to mto afim de postar 4 ou 5 scripts iguais onde só muda o sistema vip.

(Imagem ofensiva removida)

NOME DO SEU NPC.XML <?xml version="1.0"?> <npc name="NOME DO SEU NPC" script="data/npc/scripts/presente_natal.lua" walkinterval="5000" floorchange="0"> <health now="100" max="100"/> <look type="134" head="78" body="88" legs="0" feet="88" addons="3"/> <parameters> <parameter key="message_greet" value="Ola |PLAYERNAME|. o natal chegou! e Papai noel resolveu presentea-lo com seu Gorro diga {quest} para saber mais." /> </parameters> </npc> NPC/Scripts crie um arquivo.lua e renomeie para: presente_natal.lua 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 if (msgcontains(msg, 'quest') or msgcontains(msg, 'QUEST')) then selfSay('Você quer trocar 30 '..getItemNameById(1900)..' e 10 '..getItemNameById(1995)..' por um '..getItemNameById(7967)..'? {yes} ', cid) talkState[talkUser] = 1 elseif (msgcontains(msg, 'yes') and talkState[talkUser] == 1) then if Remover(cid) then doPlayerAddItem(cid,7967,1) selfSay("Obrigado tome seu item!",cid) talkState[talkUser] = 0 else selfSay("Desculpe,mais você não tem os itens que eu pedi!",cid) talkState[talkUser] = 0 end elseif msg == "no" and talkState[talkUser] >= 1 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()) function Remover(cid) if doPlayerRemoveItem(cid,1900,30) then if doPlayerRemoveItem(cid,1995,10) then return TRUE else doPlayerAddItem(cid,1900,30) end end end

feliz ano novo tbm brother