Vodkart

foto de biquini não tem gata? deve ter um corpinho eim :9 botei fé na moça pode pá que puff

function onUse(cid, item, frompos, item2, topos) local tp = {x=890, y=1186, z=7} local item = 8293 if getPlayerItemCount(cid,item) >= 1 then doTeleportThing(cid, tp) else doPlayerSendCancel(cid,"You dont have hallowed axe to enter.") end return TRUE end actions.xml <action actionid="6489" event="script" value="NOME DO SCRIPT.lua"/>

rs não tem mesmo storage enfim a sua magia só para vip ficaria assim: function onCastSpell(cid, var) if vip.hasVip(cid) == FALSE then doPlayerSendCancel(cid, "Desculpe,Só jogadores Vips usam está magia.") else return doCombat(cid, acombat, var) end return TRUE end

essas "ID" que você fala no caso são storage né mais eu estive pensando aqui,se toda vez que o jogador falar com o npc ganhar a strorage,o jogador poderia falar tudo de uma vez com o npc sem precisar fazer as missoes... olha if(msgcontains(msg, 'hi') or msgcontains(msg, 'HI')) then if getPlayerStorageValue(cid, 11480) == -1 then selfSay('vamos começar a prova? {yes}.', cid) talkState[talkUser] = 1 end if getPlayerStorageValue(cid, 11481) >= 1 then selfSay('hm vejo que vc termino a primeira missao vamos proseguir? {yes}.', cid) talkState[talkUser] = 2 end elseif msgcontains(msg, 'yes') and talkState[talkUser] == 1 then setPlayerStorageValue(cid, 11481, 1) selfSay('Ok, vá na caverna de dragons ao sul de venore e traga pra min um claw que você pode pegar nun bau', cid) talkState[talkUser] = 0 elseif msgcontains(msg, 'yes') and talkState[talkUser] == 2 then setPlayerStorageValue(cid, 11482, 1) selfSay('agr va ateh as colinas e come o cu do vilden emo xD ', cid) talkState[talkUser] = 0 acho que daria pra fazer tipo assim,a cada termino de missão ele ganhar uma storage ai colocar no npc e tipo o npc chekaria se ele termino a missão fizando assim: if getPlayerStorageValue(cid, 11481) >= 1 then -- storage do npc if getPlayerStorageValue(cid, 10480) >= 1 then -- storage na missao 1 selfSay('hm vejo que vc termino a primeira missao vamos proseguir para segunda? {yes}.', cid) talkState[talkUser] = 2 else selfSay('volte a falar comigo só quando terminar a primeira missão!.', cid) talkState[talkUser] = 0 end end oque vc acha? ideias? sugestoes?

http://www.xtibia.com/forum/topic/137086-mudar-o-nome-ao-comprar-vip/

@UP qual seu sistema vip?

que eu saiba o real server não tem sistema vip por storage... poderia me mostar o sistema vip do seu ot? porque a magia poderia ficar assim então: function onCastSpell(cid, var) if getPlayerStorageValue(cid, 55555) - os.time() <= 0 then doPlayerSendCancel(cid, "Desculpe,Só jogadores Vips usam está magia.") else return doCombat(cid, acombat, var) end return TRUE end

obs: coloquei para quando usar o anel dar addon full(altere ao modo que quiser) script.lua function onEquip(cid, item, position, fromPosition) local outfit = {lookType = getCreatureOutfit(cid).lookType, lookHead = getCreatureOutfit(cid).lookHead, lookBody = getCreatureOutfit(cid).lookBody, lookLegs = getCreatureOutfit(cid).lookLegs, lookFeet = getCreatureOutfit(cid).lookFeet, lookAddons = 3} local time = 15 -- tempo em minutos if(item.itemid == 2168 ) then doSetCreatureOutfit(cid, outfit, time*60*1000) doPlayerSendTextMessage(cid, MESSAGE_INFO_DESCR, "Sua aparencia mudou.") end return TRUE end function onDeEquip(cid, item, slot) if(item.itemid == 2168) then doRemoveCondition(cid, CONDITION_OUTFIT) end return TRUE end movements.xml <movevent type="Equip" itemid="2168" slot="ring" event="script" value="script.lua"/> <movevent type="DeEquip" itemid="2168" slot="ring" event="script" value="script.lua"/>

nesse caso coloquei para as voc 9, 10, 11 e 12...

só pra avisar o script não era meu eu nunca que usaria isso: doPlayerRemoveItem(cid,102,1) e sim doRemoveItem(item.uid, 1)

function onCastSpell(cid, var) if getPlayerStorageValue(cid,11487) >= 1 then -- storage 11487 return doCombat(cid, acombat, var) else doPlayerSendCancel(cid, "Desculpe,Só jogadores Vips usam está magia.") end return TRUE end sua spell local acombat = createCombatObject() local combat = createCombatObject() setCombatParam(combat, COMBAT_PARAM_TYPE, COMBAT_PHYSICALDAMAGE) setCombatParam(combat, COMBAT_PARAM_BLOCKARMOR, 0) setCombatParam(combat, COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE) function getCombatFormulas(cid, lv, maglv) local formula_min = -((lv*1.5 + maglv*3) * 1.8) local formula_max = -((lv*1.5 + maglv*3) * 2) if(formula_max < formula_min) then local tmp = formula_max formula_max = formula_min formula_min = tmp end return formula_min, formula_max end local arr = { {0, 1, 1, 1, 1, 1, 0}, {1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 3, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1}, {1, 1, 1, 1, 1, 1, 1}, {0, 1, 1, 1, 1, 1, 0} } local area = createCombatArea(arr) setCombatArea(acombat, area) function onTargetTile(cid, pos) doCombat(cid,combat,positionToVariant(pos)) end setCombatCallback(combat, CALLBACK_PARAM_LEVELMAGICVALUE, "getCombatFormulas") setCombatCallback(acombat, CALLBACK_PARAM_TARGETTILE, "onTargetTile") function onCastSpell(cid, var) if getPlayerStorageValue(cid,11487) >= 1 then return doCombat(cid, acombat, var) else doPlayerSendCancel(cid, "Desculpe,Só jogadores Vips usam está magia.") end return TRUE end

achei o npc muito simples por dois motivos. o primeiro é que nele tem uma falha,qualquer vocação pode usar esse npc,ou sejá um knight poderá virar um "vip sorcerer",já que não tem nenhuma função que faz a checkagem da voc do player. e a segunda é que o npc só da uma vocação,o certo seriam no minimo 4 vocações. procure melhorar amigo,você tem futuro espero novos trabalhos seus por aqui abraços

realmente bonita tem uma boca sexy bjs

pode cre pode cre maninho parabens a todos que participaram! vamos participar da proxima que o tema é desenho BJS

é porque o sistema dele é diferente mais vo arruma o topico pra funfa com o do realserve tbm vou editar o topico

hm seu servidor nao tem a funçao rs usa essa: local config = { showGamemasters = getBooleanFromString(getConfigValue('displayGamemastersWithOnlineCommand')) } function onSay(cid, words, param, channel) local players = getPlayersOnline() local strings = {""} local i, position = 1, 1 local added = false for _, pid in ipairs(players) do if(added) then if(i > (position * 7)) then strings[position] = strings[position] .. "," position = position + 1 strings[position] = "" else strings[position] = i == 1 and "" or strings[position] .. ", " end end if((config.showGamemasters == TRUE or getPlayerCustomFlagValue(cid, PlayerCustomFlag_GamemasterPrivileges) == TRUE or getPlayerCustomFlagValue(pid, PlayerCustomFlag_GamemasterPrivileges) ~= TRUE) and (isPlayerGhost(pid) ~= TRUE or getPlayerAccess(cid) > getPlayerAccess(pid))) then strings[position] = strings[position] i = i + 1 added = true else added = false end end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Há ".. (i - 1) .." Player(s) Online") return TRUE end

seria tipo essa http://www.xtibia.com/forum/topic/113008-spell-84x-arrow-fury/

ficaria assim: local config = { showGamemasters = getBooleanFromString(getConfigValue('displayGamemastersWithOnlineCommand')) } function onSay(cid, words, param, channel) local players = getPlayersOnline() local strings = {""} local i, position = 1, 1 local added = false for _, pid in ipairs(players) do if(added) then if(i > (position * 7)) then strings[position] = strings[position] .. "," position = position + 1 strings[position] = "" else strings[position] = i == 1 and "" or strings[position] .. ", " end end if((config.showGamemasters or getPlayerCustomFlagValue(cid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES) or not getPlayerCustomFlagValue(pid, PLAYERCUSTOMFLAG_GAMEMASTERPRIVILEGES)) and (not isPlayerGhost(pid) or getPlayerGhostAccess(cid) >= getPlayerGhostAccess(pid))) then strings[position] = strings[position] i = i + 1 added = true else added = false end end doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Há ".. (i - 1) .." Player(s) Online") return TRUE end

Uma imagem vale mais que mil palavras.

actions/script Roller.lua --[[ Roller Coaster System by Colex ]]-- --[[ Updated by Kydrai ]]-- -- Lib RollerCoaster = {} RollerCids = {} function RollerCoaster:onchangeLevel(cid, fromZ, toZ) return TRUE end function RollerCoaster:onmove(cid, rail, railInfo, pos) return TRUE end function RollerCoaster:onchangeSpeed(cid, power) if power == 2 then doSendAnimatedText(getCreaturePosition(cid),"TROC TROC",210) else doSendAnimatedText(getCreaturePosition(cid),"TSSSIIIIII",210) end return TRUE end function RollerCoaster:onTypeChange(cid, fromType, toType) return TRUE end function RollerCoaster:onExitQuery(cid) RollerCids[cid] = nil return TRUE end function RollerCoaster:onExit(cid) return TRUE end function RollerCoaster:onEnterQuery(cid, cart) return TRUE end function RollerCoaster:onEnter(cid, cartID) return TRUE end -- End Lib local TRAINS = {7131, 7132} local all = {7121, 7122, 7123, 7124, 7125, 7126, 7133, 7134, 7135, 7136} local ACTION_TRAIN = {1001, 1002} local RAILS = { {id = all[1], dirs = {{dir = SOUTH, out = 2},{dir = NORTH, out = 2}}}, {id = all[2], dirs = {{dir = EAST, out = 1},{dir = WEST, out = 1}}}, {id = all[3], dirs = {{dir = EAST, out = 1},{dir = SOUTH, out = 2}}}, {id = all[4], dirs = {{dir = WEST, out = 1},{dir = SOUTH, out = 2}}}, {id = all[5], dirs = {{dir = EAST, out = 1},{dir = NORTH, out = 2}}}, {id = all[6], dirs = {{dir = WEST, out = 1},{dir = NORTH, out = 2}}}, {id = all[7], stop = 1}, {id = all[8], stop = 1}, {id = all[9], stop = 1}, {id = all[10], stop = 1}, } local SLOW = 125 local FAST = 50 local INCREASE = 50 local DECREASE = 50 local DOWN_INCREASE = 450 local UP_DECREASE = 155 local INFOS = {} TRUE = 1 FALSE = 0 function getRail(pos) local stack = 1 local found = 0 local rail repeat pos.stackpos = stack rail = getThingfromPos(pos) if rail.itemid == 0 then break end for i, r in ipairs(RAILS) do if (rail.itemid == r.id) then found = 1 break end end stack = stack + 1 until (found == 1) return rail end function moveTrain(cid) local params, pos, rail, newid local dir = -1 if isCreature(cid) then params = INFOS[cid] pos = getCreaturePosition(cid) rail = getRail(pos) for i,r in ipairs(RAILS) do if rail.itemid == r.id then if RollerCoaster:onmove(cid, rail, r, pos) == FALSE then table.remove(INFOS, cid) return 1 end if r.stop ~= nil then if r.stop == 1 then RollerCoaster:onExitQuery(cid) addEvent(exitTrain, 200, cid) return 1 end end local change = rail.actionid - 1000 local power = 0 local power = change doChangeType(cid, r.id, INFOS[cid].beforeid) info = r.dirs[iNFOS[cid].type] dir = info.dir if power == 1 or power == 2 then if RollerCoaster:onchangeSpeed(cid, power) then if power == 2 then INFOS[cid].speed = INFOS[cid].speed - INCREASE elseif power == 1 then INFOS[cid].speed = INFOS[cid].speed + DECREASE end end end if INFOS[cid].currZ ~= pos.z then if RollerCoaster:onchangeLevel(cid, INFOS[cid].currZ, pos.z) then if INFOS[cid].currZ > pos.z then INFOS[cid].speed = INFOS[cid].speed + UP_DECREASE elseif params.currZ < pos.z then params.speed = params.speed - DOWN_INCREASE end end end if params.speed < 1 then params.speed = 1 end params.currZ = pos.z newid = TRAINS[info.out] INFOS[cid].beforeid = r.id break end end end if dir ~= -1 then doSetItemOutfit(cid, newid, -1) doMoveCreature(cid, dir) addEvent(moveTrain, params.speed, cid) else RollerCoaster:onExitQuery(cid) addEvent(exitTrain, 2000, cid) end end function exitTrain(cid) table.remove(INFOS, cid) RollerCoaster:onExit(cid) doSetItemOutfit(cid, TRAINS[1], 0) local pos = getCreaturePosition(cid) pos.y = pos.y - 1 doTeleportThing(cid, pos, 1) doCreatureSetNoMove(cid, 0) end function enterTrain(cid, item, type) if RollerCoaster:onEnter(cid, item) then doSetItemOutfit(cid, item, -1) local pos = getCreaturePosition(cid) table.insert(INFOS, cid, {type = type, speed = SLOW, currZ = pos.z}) addEvent(moveTrain, 1000, cid) end end function getSpeed(cid) if INFOS[cid].speed ~= nil then return INFOS[cid].speed end return FALSE end function setSpeed(cid, speed) if INFOS[cid].speed ~= nil then INFOS[cid].speed = speed return TRUE end return FALSE end function onUse(cid, item, fromPosition, itemEx, toPosition) if isInArray(ACTION_TRAIN, item.actionid) then if RollerCoaster:onEnterQuery(cid, item) and RollerCids[cid] == nil then doTeleportThing(cid, toPosition, 1) doCreatureSetNoMove(cid, 1) RollerCids[cid] = addEvent(enterTrain, 500, cid, item.itemid, item.actionid-1000) end end return TRUE end ----"No Scripting Needed" System----- local change = {} change[all[1]] = {all[3], all[4]} change[all[2]] = {all[4], all[6]} change[all[3]] = {all[1], all[4], all[6]} change[all[4]] = {all[1], all[2], all[3], all[5], all[6]} change[all[5]] = {all[4]} change[all[6]] = {all[2], all[3], all[4]} change[all[7]] = {} change[all[8]] = {} change[all[9]] = {} change[all[10]] = {} function doChangeType(cid, id, beforeID) if table.getn(change[id]) > 0 then if isInArray(change[id],beforeID) then if INFOS[cid].type == 1 then INFOS[cid].type = 2 else INFOS[cid].type = 1 end end end end actions.xml <action fromid="7131" toid="7132" script="Roller.lua"/> ai se nao me engano no carrinho que vai pra direita --> vc coloca ActionID 1001 e no carinho que vai pra esquerda <-- vc coloca actionID 1002

troque: local node1 = keywordHandler:addKeyword({'light healing'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Would you like to learn light healing for 170 gp?'}) travelNode:addChildKeyword({'yes'}, StdModule.learnSpell, {npcHandler = npcHandler, premium = false, spellName = 'light healing', vocation = 2, price = 170, level = 9}) travelNode:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Cant you handle the power of the spell?', reset = true}) por local node1 = keywordHandler:addKeyword({'light healing'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Would you like to learn light healing for 170 gp?'}) node1:addChildKeyword({'yes'}, StdModule.learnSpell, {npcHandler = npcHandler, premium = false, spellName = 'light healing', vocation = 2, price = 170, level = 9}) node1:addChildKeyword({'no'}, StdModule.say, {npcHandler = npcHandler, onlyFocus = true, text = 'Cant you handle the power of the spell?', reset = true}) flw

o lordz bateu no henrique na rl porque o henrique tinha falado que quem escuta restart é gay,ai dps de o henrique apanha ele foi contar para o gustavo entao o gustavo meteu uma bronca no lordz,ai que ficou revoltado como henrique e começou a chingar ele aqui no forum e pediu a remoçao do seu cargo. basicamente é isso flw

SAUDADES DO LORDZ VOLTE

usa esse: http://www.xtibia.com/forum/topic/131506-talkactions-deathlist-funcionando-tfs-036/

oque aconteceu? brinks