Vodkart

hmm saquei,falta muita função ainda nos distros,então é isso ai,tem que esperar atualiza os servidores 8.7 para a maioria dos códigos/script funcionarem. abraços

gean eu to baixando as souce,tentei copila ja 2x sendo sources diferentes e sempre ta vindo com erro,isso que é do otland vip... qndo eu copilar eu mando de boa

ta adc xd certo não seria em tutoriais de scripting?

nome do seu script.lua function onStepIn(cid, item, position, fromPosition) local config = { msgDenied = "Somente vip users passam por aqui.", msgWelcome = "Seja Bem Vindo a Area vip." } if getPlayerStorageValue(cid, 13540) - os.time() <= 0 then doTeleportThing(cid, fromPosition, true) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgDenied) doSendMagicEffect(getThingPos(cid), CONST_ME_MAGIC_BLUE) return true end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.msgWelcome) return true end movements.xml <movevent type="StepIn" actionid="13800" event="script" value="nome do seu script.lua"/>

tenta if item.actionid > 0 and getPlayerLevel(cid) >= item.actionid - 1000 then doTransformItem(item.uid, item.itemid + 1) doTeleportThing(cid, toPosition, TRUE) else doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "You need "..item.actionid.." level to pass this door.") end

ta na mão local config = { guildTalksEnabled = getBooleanFromString(getConfigValue('ingameGuildManagement')) } function onSay(cid, words, param, channel) local playerAccess, t = getPlayerAccess(cid), {} for i, talk in ipairs(getTalkActionList()) do if(not talk.hide and playerAccess >= talk.access) then local tmp = talk.words:sub(1, 1):trim() if((guildTalksEnabled or (talk.words ~= "!joinguild" and talk.words ~= "!createguild")) and (tmp == "!" or tmp == "/")) then table.insert(t, talk) end end end table.sort(t, function(a, b) return a.access > b.access end) local lastAccess, str = -1, "" for i, talk in ipairs(t) do local line = "" if(lastAccess ~= talk.access) then if(i ~= 1) then line = "\n" end lastAccess = talk.access end str = str .. line .. talk.words .. "\n" end doShowTextDialog(cid, 2160, str) return true end

claro,se a gente souber qual seu sistema vip ficaria mais fácil não acha?

parabéns,você acaba de criar o tópico número 7826454375464532452473 ensinando como fazer um teleport falante! abraços champz você é o cara!

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 function SellItem(cid, message, keywords, parameters, node) if(not npcHandler:isFocused(cid)) then return false end if (getPlayerItemCount(cid, 2146) < parameters.count) then if doPlayerRemoveMoney(cid, parameters.price) == TRUE then doPlayerAddItem(cid,parameters.item,parameters.count) doTeleportThing(cid, parameters.teleport) else npcHandler:say('Sorry, you dont have ' .. parameters.price .. ' gps!', cid) end else npcHandler:say('Sorry,you already have 30 diamonds!', cid) end npcHandler:resetNpc() return true end local node1 = keywordHandler:addKeyword({'reward'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you want buy 30 ' .. getItemNameById(2146) .. 's for 500 gps?'}) node1:addChildKeyword({'yes'}, SellItem, {price = 500,item = 2146,count = 30,teleport = {x = 160, y = 54, z = 7}}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Ok, then.', reset = true}) npcHandler:addModule(FocusModule:new())

você pode até mecher na database do player mais ele vai ter que estar offline vou passar uma função que eu fiz,você pode tentar adptar com o primeiro script para ve se funciona. function doPlayerChangeVocation(cid, vocation) local pid = getPlayerGUID(cid) doRemoveCreature(cid,true) db.executeQuery("UPDATE `players` SET `vocation` = ".. vocation .." WHERE `id` = "..pid) return TRUE end

function onUse(cid, item, frompos, item2, topos) local storage = 10006 local pokename = 'abra Pokeball' local boxid = 2531 if getPlayerStorageValue(cid,storage) <= 0 then doPlayerSendTextMessage(cid,22,'You have found a '..pokename..'.') b = doPlayerAddItem(cid, boxid, 1) doItemSetAttribute(b, "name", pokename) setPlayerStorageValue(cid,storage,1) else doPlayerSendTextMessage(cid,22,'It is empty.') end return TRUE end

tenho esse script,ve se ajuda: function onKill(cid, target) --config---------------------------- local lvl = getPlayerLevel(cid) --players level local nlvl = getPlayerLevel(cid) + 5 -- add 5 levels --end------------------------------- if isPlayer(target) == TRUE then if getPlayerIp(cid) ~= getPlayerIp(target) then local exp = (50 * (lvl) * (lvl) * (lvl) - 150 * (lvl) * (lvl) + 400 * (lvl)) / 5 local nexp = (50 * (nlvl) * (nlvl) * (nlvl) - 150 * (nlvl) * (nlvl) + 400 * (nlvl)) / 5 local newexp = nexp - exp doPlayerAddExp(cid,newexp) doSendAnimatedText(getPlayerPosition(cid), "Orgasmic~", 198) else doPlayerAddExperience(cid, -50000) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE,"You have been punished for killing a player of the same IP.") end end return TRUE end

tenta assim: function onLogin(cid) if vip.hasVip(cid) == TRUE then if getPlayerPromotionLevel(cid) == 1 then setPlayerPromotionLevel(cid, 2) end elseif vip.hasVip(cid) == FALSE then if getPlayerPromotionLevel(cid) == 2 then setPlayerPromotionLevel(cid, 1) end end return TRUE end

qual seu servidor pokemon? pokeflash,pokedash,pokeserve qual?

deixa eu ve se eu entendi direito oque vc quer... O npc só vai vender novamente os diamond se o jogador não tiver nenhum diamond na bag é isso? caso contrario ele compra os diamond e é teleportado denovo?

está aqui o sistema para quem quiser: http://otland.net/f81/updated-block-ips-0-3-6-a-93613/

ta errado mesmo,não é esse o XML do npc NOME DO SEU NPC.xml <?xml version="1.0"?> <npc name="NOME DO SEU NPC" script="data/npc/scripts/nome do seu script.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="Hello |PLAYERNAME|. I can {reward} you..." /> </parameters> </npc> ai em npc/script nome do seu script.lua 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 function SellItem(cid, message, keywords, parameters, node) if(not npcHandler:isFocused(cid)) then return false end if getPlayerStorageValue(cid, parameters.storage) <= 0 then if doPlayerRemoveMoney(cid, parameters.price) == TRUE then setPlayerStorageValue(cid, parameters.storage, 1) doPlayerAddItem(cid,parameters.item,parameters.count) doTeleportThing(cid, parameters.teleport) else npcHandler:say('Sorry, you dont have ' .. parameters.price .. ' gps!', cid) end else npcHandler:say('Sorry,I already gave the items for you!', cid) end npcHandler:resetNpc() return true end local node1 = keywordHandler:addKeyword({'reward'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you want buy 30 ' .. getItemNameById(2146) .. 's for 500 gps?'}) node1:addChildKeyword({'yes'}, SellItem, {price = 500,item = 2146,count = 30,teleport = {x = 160, y = 54, z = 7},storage = 90897}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Ok, then.', reset = true}) npcHandler:addModule(FocusModule:new())

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 function SellItem(cid, message, keywords, parameters, node) if(not npcHandler:isFocused(cid)) then return false end if getPlayerStorageValue(cid, parameters.storage) <= 0 then if doPlayerRemoveMoney(cid, parameters.price) == TRUE then setPlayerStorageValue(cid, parameters.storage, 1) doPlayerAddItem(cid,parameters.item,parameters.count) doTeleportThing(cid, parameters.teleport) else npcHandler:say('Sorry, you dont have ' .. parameters.price .. ' gps!', cid) end else npcHandler:say('Sorry,I already gave the items for you!', cid) end npcHandler:resetNpc() return true end local node1 = keywordHandler:addKeyword({'reward'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Do you want buy 30 ' .. getItemNameById(2146) .. 's for 500 gps?'}) node1:addChildKeyword({'yes'}, SellItem, {price = 500,item = 2146,count = 30,teleport = {x = 160, y = 54, z = 7},storage = 90897}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Ok, then.', reset = true}) npcHandler:addModule(FocusModule:new())

área errada. o npc só vai teleportar o jogador uma vez? ou o jogador sempre que pagar 500gp pro ncp recebe 30 diamonds e é teleportado?

nome do seu script.lua function onEquip(cid, item, position, fromPosition) local pos = {x = 160, y = 54, z = 7} -- para onde ele vai ser teleportado doTeleportThing(cid, pos) doRemoveItem(item.uid) return TRUE end movements.xml <movevent type="Equip" itemid="ID DO SEU ANEL" slot="ring" event="script" value="nome do seu script.lua"/>

só mais uma coisa,o jogador vai ser teleportado e o anel irá sumir? e o anel só irá teleportar uma vez o jogador? vlw

é simples de fazer,só me fala uma coisa,todos vão ser teleportados para o mesma pos? ou vai depender da vocação talz,queria mais detalhes. vlw

e também as porcentagem dava para colocar números Verdadeiro por exmeplo: 50% = 50% 10 = 10% que no caso do seu 400 = 40% ou 500 = 50%...

Dá para usar o seu sistema para criar muitas coisas legais no servidor,tipo top Rep do mes,os 10 primeiros recebem items ou premium days por ajuda no servidor,sei lá,vai depende da criativadade de cada um rep+

é porque continua executando a função mesmo sem o jogador ali :X ai a mensagem não chega pro jogador em questão. tenta colocar 1 segundo ou function onLogout(cid) if cid then doRemoveCreature(cid,true) return false end end