Vodkart

local time = 1 local s = 11456 -- não mexa local function SayText(cid) local pos = getPlayerPosition(cid) local effectPositions = { {x = pos.x, y = pos.y - 1, z = pos.z}, {x = pos.x, y = pos.y + 1, z = pos.z}, {x = pos.x - 1, y = pos.y, z = pos.z}, {x = pos.x + 1, y = pos.y, z = pos.z}, {x = pos.x - 1, y = pos.y - 1, z = pos.z}, {x = pos.x + 1, y = pos.y - 1, z = pos.z}, {x = pos.x + 1, y = pos.y + 1, z = pos.z}, {x = pos.x - 1, y = pos.y + 1, z = pos.z} } if isCreature(cid) == TRUE then doSendMagicEffect(effectPositions[math.random(#effectPositions)], math.random(28, 30)) month = addEvent(SayText, time * 1000 / 2, cid) end end function onEquip(cid, item, position, fromPosition) if(item.itemid == 2123 ) then if getPlayerStorageValue(cid, s) == -1 then month = addEvent(SayText, time * 1000, cid) setPlayerStorageValue(cid,s,1) end end return TRUE end function onDeEquip(cid, item, slot) if(item.itemid == 2123) then stopEvent(month) setPlayerStorageValue(cid,s,-1) return TRUE end stopEvent(month) return TRUE end

Guilhermee56 Vodkart luisfe23

ah entendi é tipo um math.random de posiçoes uma hr sai na frente,outra hr sai atras,dps nos lados é isso?

sim... dps vc edita as area que vai pegar o efeito... coloquei em volta dele local time = 5 local s = 11456 -- não mexa local function SayText(cid) local pos = getPlayerPosition(cid) local effectPositions = { {x = pos.x, y = pos.y - 1, z = pos.z}, {x = pos.x, y = pos.y + 1, z = pos.z}, {x = pos.x - 1, y = pos.y, z = pos.z}, {x = pos.x + 1, y = pos.y, z = pos.z}, {x = pos.x - 1, y = pos.y - 1, z = pos.z}, {x = pos.x + 1, y = pos.y - 1, z = pos.z}, {x = pos.x + 1, y = pos.y + 1, z = pos.z}, {x = pos.x - 1, y = pos.y + 1, z = pos.z} } if isCreature(cid) == TRUE then for _, ePos in ipairs(effectPositions) do doSendDistanceShoot(pos, ePos, math.random(28, 30)) doSendMagicEffect(ePos, math.random(28, 30)) end month = addEvent(SayText, time * 1000 / 2, cid) end end function onEquip(cid, item, position, fromPosition) if(item.itemid == 2123 ) then if getPlayerStorageValue(cid, s) == -1 then month = addEvent(SayText, time * 1000, cid) setPlayerStorageValue(cid,s,1) end end return TRUE end function onDeEquip(cid, item, slot) if(item.itemid == 2123) then stopEvent(month) setPlayerStorageValue(cid,s,-1) return TRUE end stopEvent(month) return TRUE end

ah pode cre ja editei vlw apocarai

rs eu gostei das magias achei os efeitos delas legais eu que nao sei cria magia vc podia me da uns toque dps em fera REP + abraços

pra não perde exp adicione doPlayerSetLossPercent(cid, experience, 0) flw

NOME DO SEU SCRIPT.LUA function onUse(cid, item, frompos, item2, topos) local config = { time = 2, -- tempo em minutos pos = {x=180,y=57,z=7}, -- posição da parede que ira sumir paredeid = 2703 -- id da parede } function criar() doCreateItem(config.paredeid, 1, config.pos) end local parede = getTileItemById(config.pos, config.paredeid) if item.uid == 8005 and item.itemid == 1945 then if parede then doRemoveItem(parede.uid, 1) addEvent(criar, config.time*60*1000) doTransformItem(item.uid,item.itemid+1) else doPlayerSendCancel(cid,"espere a parede ser criada novamente.") end elseif item.uid == 8005 and item.itemid == 1946 then doTransformItem(item.uid,item.itemid-1) else doPlayerSendCancel(cid,"Sorry, not possible.") end return TRUE end caso queira em segundos troque ad dEvent(criar, config.time*60*1000) por addEvent(criar, config.time*1000) actions.xml <action actionid="8005" script="NOME DO SEU SCRIPT.lua" />

removido

se tem problema eu não sei porque eu só testei com aneis mesmo não com doll... qualquer coisa da um toque abraços

não podem porque para usar o comando /addvip e /delvip tem que ter acesso(no caso 5 = god) flw

esse item 6567 não é um doll? arrumei o script ta 100% em movements/script crie um arquivo.lua e renomeie para effectring.lua local time = 5 local s = 11456 -- não mexa local function SayText(cid) if isCreature(cid) == TRUE then doSendAnimatedText(getCreaturePosition(cid), "[OI]", math.random(01,255)) doSendMagicEffect(getCreaturePosition(cid), math.random(28, 30)) month = addEvent(SayText, time * 1000 / 2, cid) end end function onEquip(cid, item, position, fromPosition) if(item.itemid == 2123 ) then if getPlayerStorageValue(cid, s) == -1 then month = addEvent(SayText, time * 1000, cid) setPlayerStorageValue(cid,s,1) end end return TRUE end function onDeEquip(cid, item, slot) if(item.itemid == 2123) then stopEvent(month) setPlayerStorageValue(cid,s,-1) return TRUE end stopEvent(month) return TRUE end em movements.xml adicione: <movevent type="Equip" itemid="2123" slot="ring" event="script" value="effectring.lua"/> <movevent type="DeEquip" itemid="2123" slot="ring" event="script" value="effectring.lua"/>

function onLogin(cid) local rate = 1.3 -- 30% local config = { vip = "Você tem "..((rate - 1)*100).."% de exp a mais agora!", notvip = "Tornesse vip e ganhe "..((rate - 1)*100).."% a mais de experiencia!", } if vip.hasVip(cid) == FALSE then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.notvip) else doPlayerSetExperienceRate(cid, rate) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, config.vip) end return TRUE end

não entendi nada desse npc ele não pega os talons? talons sao os itens né?

o script não é meu só fiz algumas altarações... ok em Creaturescript/script crie um arquivo.lua e renomeie para ItemKill.lua function onDeath(cid, corpse, deathList) if isPlayer(cid) then local v = { killer_name = getCreatureName(deathList[1]), target_name = getCreatureName(cid) } local reward = doAddContainerItem(corpse.uid, 5943, 1) doItemSetAttribute(reward, "description", "o jogador "..v.target_name .." foi morto por " .. v.killer_name .. ".") doItemSetAttribute(reward, "name", v.target_name .." Heart") end return TRUE end em Creaturescript/script/login.lua adicione: registerCreatureEvent(cid, "KillItem") em creaturescript.xml adicione a tag: <event type="death" name="KillItem" event="script" value="ItemKill.lua"/>

@UP isso provavelmente não é um bug do amuleto e sim do seu distro veja as configurações de ambas skull no config.lua. abraços

@Kakilo que eu saiba o sistema vip do real serve não é por storage.

@UP tem que usar essa: http://www.xtibia.com/forum/topic/133669-vip-door-system-10/

aqui funfo :X function onLogin(cid) if getVipTime(cid) > 0 and isVip(cid) == FALSE then local townid = 1 doPlayerSetTown(cid, townid) local templePos = getTownTemplePosition(getPlayerTown(cid)) doTeleportThing(cid, templePos, false) if isInArray({9,10,11,12}, getPlayerVocation(cid)) then doPlayerSetVocation(cid,getPlayerVocation(cid)-4) end setVipTime(cid, 0) doTeleportPlayers(cid, templePos) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sua Vip acabou!") else local duration = getVipDate(cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você possui "..getVipDays(cid).." dia(s) de vip."..(duration and (" Ela irá durar até "..duration..".") or "")) end return TRUE end

esqueci que identificar a variavel function onLogin(cid) if getVipTime(cid) > 0 and isVip(cid) == FALSE then local townid = 1 doPlayerSetTown(cid, townid) local templePos = getTownTemplePosition(getPlayerTown(cid)) doTeleportThing(cid, templePos, false) local voc = getPlayerVocation(cid) if(isInArray({9, 10, 11, 12}, getPlayerVocation(cid))) then doPlayerSetVocation(cid, voc-4) end setVipTime(cid, 0) doTeleportPlayers(cid, templePos) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sua Vip acabou!") else local duration = getVipDate(cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você possui "..getVipDays(cid).." dia(s) de vip."..(duration and (" Ela irá durar até "..duration..".") or "")) end return TRUE end

ai vc tem que remover o showInDescription="0" <vocation id="1"/> <vocation id="5"/> <vocation id="2"/> <vocation id="6"/>

Data/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 em Actions.xml adicione a tag: <action fromid="7131" toid="7132" script="Roller.lua"/> ai se não me engano na propriedade do carrinho quando o carrinho vai pra direita é ActionID = 1001 e quando o carrinho vai pra esquerda é ActionID = 1002

ah sim falha minha desculpe rs de qualquer forma topico reportado para que movam abraços

@TOPIC function onLogin(cid) if getVipTime(cid) > 0 and isVip(cid) == FALSE then local townid = 1 doPlayerSetTown(cid, townid) local templePos = getTownTemplePosition(getPlayerTown(cid)) doTeleportThing(cid, templePos, false) if(isInArray({9, 10, 11, 12}, getPlayerVocation(cid))) then doPlayerSetVocation(cid, voc-4) end setVipTime(cid, 0) doTeleportPlayers(cid, templePos) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Sua Vip acabou!") else local duration = getVipDate(cid) doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_BLUE, "Você possui "..getVipDays(cid).." dia(s) de vip."..(duration and (" Ela irá durar até "..duration..".") or "")) end return TRUE end @Kakilo sim funciona em servidores 8.54+ e aconselho a usar no seu servidor,esse sistema é melhor que o do MOCK. flw

http://www.xtibia.com/forum/topic/134593-talkaction-teleport-por-talk-para-vip/