[Movements] Ring Transform Vocation

lucasatak · Abril 6, 2010

Peguei esse script do otland creditos ao Molinero.

Explicando:voce poe o ring,ele te transforma para o outfit do elf arcanist e te da vocaçao suprema,ou seja,Epic elite knight,ou epic elder druid etc. E voce ganhará efeitos especiais.

vamo lá, data/movements/scripts crie 1 arquivo chamado epic.lua e cole isto:

-- Original script by Molinero -- The Super-Ultimate Transformation Ring --
-- Super Vocation Transformation script made by Arthur, aka artofwork --
-- You can assign an item to this script and the benifits the item will bring are --
-- A totally new vocation for each current vocation, check your vocations.xml for the new vocations --
-- Independent Skills and Magic Level Boost for each new vocation --
-- Auto Mana Shield for new mage vocations, Auto Super Haste for all new vocations --
-- Independent Auto HP and Mana gain rates for each new vocation --
-- For each new vocation the new vocation recieves a new outfit and has an independent special effect added to help idenify the new vocation -- 
-- This script is set to inifnite, but can be set to have mana taken from the player, when mana runs out the item will be destroyed --

local storage = 18009 -- storage value for the vocation transformation --
local sorcerervoc = 9 -- 9 number is the vocation id of an epic master sorcerer in vocations.xml --
local druidvoc = 10   -- 10 number is the vocation id of a epic elder druid in vocations.xml --
local paladinvoc = 11 -- 11 number is the vocation id of a epic royal paladin in vocations.xml --
local knightvoc = 12  -- 12 number is the vocation id of an epic elite knight in vocations.xml --

local svoc = 5
local dvoc = 6
local pvoc = 7
local kvoc = 8

local outfitSorc = -- sorcerer new outfit after transformation --
{
lookType = 130,
lookHead = 19,
lookBody = 71,
lookLegs = 128,
lookFeet = 128,
lookAddons = 3
}

local outfitDruid = -- druid new outfit after transformation --
{
lookType = 63,
lookHead = 20,
lookBody = 30,
lookLegs = 40,
lookFeet = 50,
lookAddons = 3
}

local outfitPaladin = -- paladin new outfit after transformation --
{
lookType = 129,
lookHead = 95,
lookBody = 116,
lookLegs = 121,
lookFeet = 115,
lookAddons = 3
}


local outfitKnight = -- knight new outfit after transformation --
{
lookType = 131,
lookHead = 95,
lookBody = 95,
lookLegs = 95,
lookFeet = 95,
lookAddons = 3
}


-- warning do not modify these settings, unless you want to take mana from player --
local manatimeinterval = 1000 -- time interval (miliseconds) --
local numberofmanaused = 0 -- number of mana used or added up during time interval --
local mananeededtoexec = 0 -- number of mana needed to execute script, keep this setting this 0 --
local warnplaya = 1 -- warns player when runing out of mana, 1 = yes --
local numberofmanatriggerwarn = 20 -- number of mana that triggers the warnings --

local sorcerfirsteffect = CONST_ME_ENERGYAREA
local sorcersecondeffect = CONST_ME_BLOCKHIT
local sorcerflingeffect = CONST_ANI_SMALLHOLY
local sorcerlandeffect = CONST_ME_TELEPORT
local sorcerringwaste = CONST_ME_FIREWORK_YELLOW
local sorcerringsorb = CONST_ME_FIREATTACK

local druidfirsteffect = CONST_ME_ICEATTACK
local druidsecondeffect = CONST_ME_ICETORNADO
local druidflingeffect = CONST_ME_ICETORNADO
local druidlandeffect = CONST_ME_ICETORNADO
local druidringwaste = CONST_ME_FIREWORK_BLUE
local druidringsorb = CONST_ME_MAGIC_BLUE

local knightfirsteffect = CONST_ME_EXPLOSIONAREA
local knightsecondeffect = CONST_ME_FIREAREA
local knightflingeffect = CONST_ANI_FIRE
local knightlandeffect = CONST_ME_FIREWORK_RED
local knightringwaste = CONST_ME_FIREWORK_RED
local knightringsorb = CONST_ME_MAGIC_RED

local paladinfirsteffect = CONST_ME_YELLOW_RINGS
local paladinsecondeffect = CONST_ME_BLOCKHIT
local paladinflingeffect = CONST_ANI_SMALLHOLY
local paladinlandeffect = CONST_ME_HOLYAREA
local paladinringwaste = CONST_ME_FIREWORK_YELLOW
local paladinringsorb = CONST_ME_MAGIC_GREEN

-- skills of the sorcerer after transformation --
local sorcerercondition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(sorcerercondition, CONDITION_PARAM_TICKS, -1)            -- the -1 is to allow conditions to run forever -
setConditionParam(sorcerercondition, CONDITION_PARAM_SKILL_SHIELD, 20)     -- add 50 shielding to current shield skill --
setConditionParam(sorcerercondition, CONDITION_PARAM_STAT_MAGICLEVEL, 35) -- add 100 levels of magic to the player's current magic level --
setConditionParam(sorcerercondition, CONDITION_PARAM_STAT_MAXHEALTH, 100)  -- add 100 health to the player's current hp --
setConditionParam(sorcerercondition, CONDITION_PARAM_STAT_MAXMANA, 700)   -- add 5000 mana to the players current mana --
-- skills of the druid after transformation --
local druidcondition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(druidcondition, CONDITION_PARAM_TICKS, -1)               
setConditionParam(druidcondition, CONDITION_PARAM_SKILL_SHIELD, 20)
setConditionParam(druidcondition, CONDITION_PARAM_STAT_MAGICLEVEL, 35)
setConditionParam(druidcondition, CONDITION_PARAM_STAT_MAXHEALTH, 100)
setConditionParam(druidcondition, CONDITION_PARAM_STAT_MAXMANA, 700)
-- skills of the paladin after transformation --
local paladincondition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(paladincondition, CONDITION_PARAM_TICKS, -1)
setConditionParam(paladincondition, CONDITION_PARAM_SKILL_DISTANCE, 35)
setConditionParam(paladincondition, CONDITION_PARAM_SKILL_SHIELD, 30)
setConditionParam(paladincondition, CONDITION_PARAM_STAT_MAGICLEVEL, 15)
setConditionParam(paladincondition, CONDITION_PARAM_STAT_MAXHEALTH, 400)
setConditionParam(paladincondition, CONDITION_PARAM_STAT_MAXMANA, 350)
-- skills of the knight after transformation --
local knightcondition = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(knightcondition, CONDITION_PARAM_TICKS, -1)
setConditionParam(knightcondition, CONDITION_PARAM_SKILL_FIST, 50)
setConditionParam(knightcondition, CONDITION_PARAM_SKILL_CLUB, 50)
setConditionParam(knightcondition, CONDITION_PARAM_SKILL_SWORD, 50)
setConditionParam(knightcondition, CONDITION_PARAM_SKILL_AXE, 50)
setConditionParam(knightcondition, CONDITION_PARAM_SKILL_SHIELD, 75)
setConditionParam(knightcondition, CONDITION_PARAM_STAT_MAGICLEVEL, 10)
setConditionParam(knightcondition, CONDITION_PARAM_STAT_MAXHEALTH, 1000)
setConditionParam(knightcondition, CONDITION_PARAM_STAT_MAXMANA, 250)

-- settings for health and mana regeneration per second --
local sorcererregen = createConditionObject(CONDITION_REGENERATION)
setConditionParam(sorcererregen, CONDITION_PARAM_TICKS, -1)
setConditionParam(sorcererregen, CONDITION_PARAM_HEALTHGAIN, 35) -- the players health will regenerate at 100 hp per second --
setConditionParam(sorcererregen, CONDITION_PARAM_MANAGAIN, 150)   -- the players mana will regenerate at 500 mana per second --

local druidregen = createConditionObject(CONDITION_REGENERATION)
setConditionParam(druidregen, CONDITION_PARAM_TICKS, -1)
setConditionParam(druidregen, CONDITION_PARAM_HEALTHGAIN, 35)
setConditionParam(druidregen, CONDITION_PARAM_MANAGAIN, 150)

local paladinregen = createConditionObject(CONDITION_REGENERATION)
setConditionParam(paladinregen, CONDITION_PARAM_TICKS, -1)
setConditionParam(paladinregen, CONDITION_PARAM_HEALTHGAIN, 100)
setConditionParam(paladinregen, CONDITION_PARAM_MANAGAIN, 100)

local knightregen = createConditionObject(CONDITION_REGENERATION)
setConditionParam(knightregen, CONDITION_PARAM_TICKS, -1)
setConditionParam(knightregen, CONDITION_PARAM_HEALTHGAIN, 150)
setConditionParam(knightregen, CONDITION_PARAM_MANAGAIN, 50)


local combat = createCombatObject()
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatParam(combat, COMBAT_PARAM_AGGRESSIVE, 0)

local condition2 = createConditionObject(CONDITION_HASTE) -- Auto super haste --
setConditionParam(condition2, CONDITION_PARAM_TICKS, -1)
setConditionFormula(condition2, 2.5, 0, 3.0, 0)
setCombatCondition(combat, condition2)

local condition3 = createConditionObject(CONDITION_MANASHIELD) -- Auto mana shield --
setConditionParam(condition3, CONDITION_PARAM_TICKS, -1)
setCombatCondition(combat, condition3)


function superform1(param)
if param.crca == 1 then
local cointype = getPlayerMaxMana(param.cid)
local pos = getCreaturePosition(param.cid)
local voca = getPlayerVocation(param.cid)

local nha = {x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}
local sha = {x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}
local wha = {x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}
local eha = {x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}

local nwa = {x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}
local nea = {x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}
local sea = {x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}
local swa = {x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}

if voca == 9 then
doSendMagicEffect(pos, sorcerfirsteffect)
doSendMagicEffect(pos, sorcersecondeffect)

doSendDistanceShoot(pos, nha, sorcerflingeffect)
doSendDistanceShoot(pos, sha, sorcerflingeffect)
doSendDistanceShoot(pos, wha, sorcerflingeffect)
doSendDistanceShoot(pos, eha, sorcerflingeffect)
doSendDistanceShoot(pos, nwa, sorcerflingeffect)
doSendDistanceShoot(pos, nea, sorcerflingeffect)
doSendDistanceShoot(pos, sea, sorcerflingeffect)
doSendDistanceShoot(pos, swa, sorcerflingeffect)

doSendMagicEffect(nha, sorcerlandeffect)
doSendMagicEffect(sha, sorcerlandeffect)
doSendMagicEffect(wha, sorcerlandeffect)
doSendMagicEffect(eha, sorcerlandeffect)
doSendMagicEffect(nwa, sorcerlandeffect)
doSendMagicEffect(nea, sorcerlandeffect)
doSendMagicEffect(sea, sorcerlandeffect)
doSendMagicEffect(swa, sorcerlandeffect)

doSetCreatureOutfit(param.cid, outfitSorc, -1) -- set new vocation outfit --
doAddCondition(param.cid, sorcerercondition)   -- add skills and magic level to new vocation -
doAddCondition(param.cid, condition3)          -- add auto mana shield to new vocation --
doAddCondition(param.cid, sorcererregen)       -- add regeneration to new vocation --

else if voca == 10 then
doSendMagicEffect(pos, druidfirsteffect)
doSendMagicEffect(pos, druidsecondeffect)

doSendDistanceShoot(pos, nha, druidflingeffect)
doSendDistanceShoot(pos, sha, druidflingeffect)
doSendDistanceShoot(pos, wha, druidflingeffect)
doSendDistanceShoot(pos, eha, druidflingeffect)
doSendDistanceShoot(pos, nwa, druidflingeffect)
doSendDistanceShoot(pos, nea, druidflingeffect)
doSendDistanceShoot(pos, sea, druidflingeffect)
doSendDistanceShoot(pos, swa, druidflingeffect)

doSendMagicEffect(nha, druidlandeffect)
doSendMagicEffect(sha, druidlandeffect)
doSendMagicEffect(wha, druidlandeffect)
doSendMagicEffect(eha, druidlandeffect)
doSendMagicEffect(nwa, druidlandeffect)
doSendMagicEffect(nea, druidlandeffect)
doSendMagicEffect(sea, druidlandeffect)
doSendMagicEffect(swa, druidlandeffect)

doSetCreatureOutfit(param.cid, outfitDruid, -1)   -- set new vocation outfit --
doAddCondition(param.cid, druidcondition)         -- add skills and magic level to new vocation --
doAddCondition(param.cid, condition3)             -- add auto mana shield to new vocation --
doAddCondition(param.cid, druidregen)             -- add regeneration to new vocation --
else if voca == 11 then
doSendMagicEffect(pos, paladinfirsteffect)
doSendMagicEffect(pos, paladinsecondeffect)

doSendDistanceShoot(pos, nha, paladinflingeffect)
doSendDistanceShoot(pos, sha, paladinflingeffect)
doSendDistanceShoot(pos, wha, paladinflingeffect)
doSendDistanceShoot(pos, eha, paladinflingeffect)
doSendDistanceShoot(pos, nwa, paladinflingeffect)
doSendDistanceShoot(pos, nea, paladinflingeffect)
doSendDistanceShoot(pos, sea, paladinflingeffect)
doSendDistanceShoot(pos, swa, paladinflingeffect)

doSendMagicEffect(nha, paladinlandeffect)
doSendMagicEffect(sha, paladinlandeffect)
doSendMagicEffect(wha, paladinlandeffect)
doSendMagicEffect(eha, paladinlandeffect)
doSendMagicEffect(nwa, paladinlandeffect)
doSendMagicEffect(nea, paladinlandeffect)
doSendMagicEffect(sea, paladinlandeffect)
doSendMagicEffect(swa, paladinlandeffect) 
doSetCreatureOutfit(param.cid, outfitPaladin, -1)     -- set new vocation outfit --
doAddCondition(param.cid, paladincondition)           -- add skills and magic level to new vocation --
doAddCondition(param.cid, paladinregen)               -- add regeneration to new vocation --
else if voca == 12 then
doSendMagicEffect(pos, knightfirsteffect)
doSendMagicEffect(pos, knightsecondeffect)

doSendDistanceShoot(pos, nha, knightflingeffect)
doSendDistanceShoot(pos, sha, knightflingeffect)
doSendDistanceShoot(pos, wha, knightflingeffect)
doSendDistanceShoot(pos, eha, knightflingeffect)
doSendDistanceShoot(pos, nwa, knightflingeffect)
doSendDistanceShoot(pos, nea, knightflingeffect)
doSendDistanceShoot(pos, sea, knightflingeffect)
doSendDistanceShoot(pos, swa, knightflingeffect)

doSendMagicEffect(nha, knightlandeffect)
doSendMagicEffect(sha, knightlandeffect)
doSendMagicEffect(wha, knightlandeffect)
doSendMagicEffect(eha, knightlandeffect)
doSendMagicEffect(nwa, knightlandeffect)
doSendMagicEffect(nea, knightlandeffect)
doSendMagicEffect(sea, knightlandeffect)
doSendMagicEffect(swa, knightlandeffect) 
doSetCreatureOutfit(param.cid, outfitKnight, -1)      -- set new vocation outfit --
doAddCondition(param.cid, knightcondition)            -- add skills and magic level to new vocation --
doAddCondition(param.cid, knightregen)                -- add regeneration to new vocation --
end
end
end
end

doAddCondition(param.cid, condition2)                 -- add super haste to all new vocations --

local mhp = getCreatureMaxHealth(param.cid)
local mma = getPlayerMaxMana(param.cid)
local chp = getCreatureHealth(param.cid)
local cma = getPlayerMana(param.cid)

local dhp = mhp - chp
local dma = mma - cma

doCreatureAddHealth(param.cid, dhp)
doPlayerAddMana(param.cid, dma) 

param.crcb = 1
param.voca = voca

setPlayerStorageValue(param.cid, 50781, 1)

addEvent(superform2, 1, param)
end
end
function superform2(param)

if param.crca == 1 and param.crcb == 1 and isCreature(param.cid) == TRUE and getPlayerStorageValue(param.cid, 50781) == 1 then
local pos = getCreaturePosition(param.cid)
doPlayerAddMana(param.cid, numberofmanaused) -- this function is global and effects all vocations equally, setting it to negative will remove mana --

if param.voca == 9 then 
doSendMagicEffect(pos, sorcerringwaste)
doSendMagicEffect(pos, sorcerringsorb)


else if param.voca == 10 then 
doSendMagicEffect(pos, druidringwaste)
doSendMagicEffect(pos, druidringsorb)


else if param.voca == 11 then 
doSendMagicEffect(pos, paladinringwaste)
doSendMagicEffect(pos, paladinringsorb)

else if param.voca == 12 then 
doSendMagicEffect(pos, knightringwaste)
doSendMagicEffect(pos, knightringsorb)

end
end
end
end
local manaleft = getPlayerMana(param.cid)
if manaleft < numberofmanatriggerwarn then -- if numberofmanaused is not set to 0 then this condition will activate based on if current mana is less then numberofmanatriggerwarn's value --
end
if manaleft < numberofmanaused then -- this is a fail safe if the mana becomes a negative value or if u assign a + or - to it then it will destroy the ring, im sure a better routine can be written for this --
param.crca = 0
param.crcb = 0
setPlayerStorageValue(param.cid, 50781, 0) -- removes storage value of transformation --
old = getPlayerStorageValue(cid, storage) -- get players old vocation and assign it to old --
doPlayerSetVocation(cid,old)               -- set players vocation using old's value --
setPlayerStorageValue(cid, 18009, 0) -- removes storage value --
doPlayerRemoveItem(param.cid, 7708) -- destroys the ring --


local pos = getCreaturePosition(param.cid)

local nha = {x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}
local sha = {x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}
local wha = {x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}
local eha = {x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}

local nwa = {x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}
local nea = {x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}
local sea = {x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}
local swa = {x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}

-- removes the outfit, attributes, super haste, mana shield, hp/mp regeneration --
doRemoveCondition(param.cid, CONDITION_OUTFIT) 
doRemoveCondition(param.cid, CONDITION_ATTRIBUTES)
doRemoveCondition(param.cid, CONDITION_HASTE)
doRemoveCondition(param.cid, CONDITION_MANASHIELD)
doRemoveCondition(param.cid, CONDITION_REGENERATION)


if (isPlayer(param.cid) == FALSE) then
param.crca = 0
param.crcb = 0
setPlayerStorageValue(param.cid, 50781, 0) -- removes storage value of transformation --
old = getPlayerStorageValue(cid, storage) -- get players old vocation and assign it to old --
doPlayerSetVocation(cid,old)               -- set players vocation using old's value --
setPlayerStorageValue(cid, 18009, 0) -- removes storage value --
end

if param.voca == 9 then
doSendMagicEffect(pos, sorcerfirsteffect)
doSendMagicEffect(pos, sorcersecondeffect)

doSendDistanceShoot(pos, nha, sorcerflingeffect)
doSendDistanceShoot(pos, sha, sorcerflingeffect)
doSendDistanceShoot(pos, wha, sorcerflingeffect)
doSendDistanceShoot(pos, eha, sorcerflingeffect)
doSendDistanceShoot(pos, nwa, sorcerflingeffect)
doSendDistanceShoot(pos, nea, sorcerflingeffect)
doSendDistanceShoot(pos, sea, sorcerflingeffect)
doSendDistanceShoot(pos, swa, sorcerflingeffect)

doSendMagicEffect(nha, sorcerlandeffect)
doSendMagicEffect(sha, sorcerlandeffect)
doSendMagicEffect(wha, sorcerlandeffect)
doSendMagicEffect(eha, sorcerlandeffect)
doSendMagicEffect(nwa, sorcerlandeffect)
doSendMagicEffect(nea, sorcerlandeffect)
doSendMagicEffect(sea, sorcerlandeffect)
doSendMagicEffect(swa, sorcerlandeffect)

else if param.voca == 10 then
doSendMagicEffect(pos, druidfirsteffect)
doSendMagicEffect(pos, druidsecondeffect)

doSendDistanceShoot(pos, nha, druidflingeffect)
doSendDistanceShoot(pos, sha, druidflingeffect)
doSendDistanceShoot(pos, wha, druidflingeffect)
doSendDistanceShoot(pos, eha, druidflingeffect)
doSendDistanceShoot(pos, nwa, druidflingeffect)
doSendDistanceShoot(pos, nea, druidflingeffect)
doSendDistanceShoot(pos, sea, druidflingeffect)
doSendDistanceShoot(pos, swa, druidflingeffect)

doSendMagicEffect(nha, druidlandeffect)
doSendMagicEffect(sha, druidlandeffect)
doSendMagicEffect(wha, druidlandeffect)
doSendMagicEffect(eha, druidlandeffect)
doSendMagicEffect(nwa, druidlandeffect)
doSendMagicEffect(nea, druidlandeffect)
doSendMagicEffect(sea, druidlandeffect)
doSendMagicEffect(swa, druidlandeffect)

else if param.voca == 11 then
doSendMagicEffect(pos, paladinfirsteffect)
doSendMagicEffect(pos, paladinsecondeffect)

doSendDistanceShoot(pos, nha, paladinflingeffect)
doSendDistanceShoot(pos, sha, paladinflingeffect)
doSendDistanceShoot(pos, wha, paladinflingeffect)
doSendDistanceShoot(pos, eha, paladinflingeffect)
doSendDistanceShoot(pos, nwa, paladinflingeffect)
doSendDistanceShoot(pos, nea, paladinflingeffect)
doSendDistanceShoot(pos, sea, paladinflingeffect)
doSendDistanceShoot(pos, swa, paladinflingeffect)

doSendMagicEffect(nha, paladinlandeffect)
doSendMagicEffect(sha, paladinlandeffect)
doSendMagicEffect(wha, paladinlandeffect)
doSendMagicEffect(eha, paladinlandeffect)
doSendMagicEffect(nwa, paladinlandeffect)
doSendMagicEffect(nea, paladinlandeffect)
doSendMagicEffect(sea, paladinlandeffect)
doSendMagicEffect(swa, paladinlandeffect)

else if param.voca == 12 then
doSendMagicEffect(pos, knightfirsteffect)
doSendMagicEffect(pos, knightsecondeffect)

doSendDistanceShoot(pos, nha, knightflingeffect)
doSendDistanceShoot(pos, sha, knightflingeffect)
doSendDistanceShoot(pos, wha, knightflingeffect)
doSendDistanceShoot(pos, eha, knightflingeffect)
doSendDistanceShoot(pos, nwa, knightflingeffect)
doSendDistanceShoot(pos, nea, knightflingeffect)
doSendDistanceShoot(pos, sea, knightflingeffect)
doSendDistanceShoot(pos, swa, knightflingeffect)

doSendMagicEffect(nha, knightlandeffect)
doSendMagicEffect(sha, knightlandeffect)
doSendMagicEffect(wha, knightlandeffect)
doSendMagicEffect(eha, knightlandeffect)
doSendMagicEffect(nwa, knightlandeffect)
doSendMagicEffect(nea, knightlandeffect)
doSendMagicEffect(sea, knightlandeffect)
doSendMagicEffect(swa, knightlandeffect)
end
end
end

end
else
addEvent(superform2, manatimeinterval, param) -- call superform2 based on manatimeinterval settings --
end

end
end
function onEquip(cid, item, slot)
local param = {cid = cid, item = item, slot = slot}
local currentmana = getPlayerMana(cid) -- get players current mana --
if currentmana >= mananeededtoexec then  -- check to see if the players current mana is greater then or equal to mana needed to transform player --

local temp = getPlayerVocation(cid) -- get players voc and store it in temp --
if temp == 9 then
doPlayerSetVocation(cid,svoc) -- this will prevent people from loggin out and logging in with their new vocation being saved
else if temp == 10 then
doPlayerSetVocation(cid,dvoc)
else if temp == 11 then
doPlayerSetVocation(cid,pvoc)
else if temp == 12 then
doPlayerSetVocation(cid,kvoc)
end
end
end
end

local tempvoc = getPlayerVocation(cid) -- get players voc and store it in temp --
setPlayerStorageValue(cid, storage, getPlayerVocation(cid)) -- store players voc in storage for later use --
if (tempvoc == 1 or tempvoc == 5) then  -- these if and else if statements will check the current voc prior to transformation --
    doPlayerSetVocation(cid,sorcerervoc) -- if the players vocation == tempvoc then a new vocation will be assigned to the player --
else if (tempvoc == 2 or tempvoc == 6) then
    doPlayerSetVocation(cid,druidvoc)
else if (tempvoc == 3 or tempvoc == 7) then
    doPlayerSetVocation(cid,paladinvoc)
else if (tempvoc == 4 or tempvoc == 8) then
    doPlayerSetVocation(cid,knightvoc)
end
end
    end
    end

local pos = getPlayerPosition(cid)
doCreatureSay(cid, "Rutilus Vox", TALKTYPE_ORANGE_1) -- do animated text while transformation takes place --

param.crca = 1
addEvent(superform1, 1, param) -- call the function superform1 immediately --
end
return TRUE
end

function onDeEquip(cid, item, slot)
if isPlayer(cid) and getPlayerStorageValue(cid, 50781) == 1 then
old = getPlayerStorageValue(cid, storage) -- get players old vocation and assign it to old --
doPlayerSetVocation(cid,old)               -- set players vocation using old's value --
setPlayerStorageValue(cid, 18009, 0) -- remove vocation
-- removes the outfit, attributes, super haste, mana shield, hp/mp regeneration --
doTransformItem(item.uid, item.itemid - 11)
doRemoveCondition(cid, CONDITION_OUTFIT) 
doRemoveCondition(cid, CONDITION_ATTRIBUTES)
doRemoveCondition(cid, CONDITION_HASTE)
doRemoveCondition(cid, CONDITION_MANASHIELD)
doRemoveCondition(cid, CONDITION_REGENERATION)

local temptwo = getPlayerVocation(cid) -- get players voc and store it in temp --
if temptwo == 9 then
doPlayerSetVocation(cid,svoc) -- just incase they die and loose the ring they will not keep the new voc -
else if temptwo == 10 then
doPlayerSetVocation(cid,dvoc)
else if temptwo == 11 then
doPlayerSetVocation(cid,pvoc)
else if temptwo == 12 then
doPlayerSetVocation(cid,kvoc)
end
end
end
end
local pos = getCreaturePosition(cid)
doCreatureSay(cid, "Aufero Meus Donum", TALKTYPE_ORANGE_1) -- do animated text while de-transformation takes place --
setPlayerStorageValue(cid, 50781, 0)     -- removes storage value of transformation --
local voca = getPlayerVocation(cid) 

local nha = {x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}
local sha = {x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}
local wha = {x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}
local eha = {x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}

local nwa = {x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}
local nea = {x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}
local sea = {x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}
local swa = {x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}

if voca == 1 or voca == 5 then
doSendMagicEffect(pos, sorcerfirsteffect)
doSendMagicEffect(pos, sorcersecondeffect)

doSendDistanceShoot(pos, nha, sorcerflingeffect)
doSendDistanceShoot(pos, sha, sorcerflingeffect)
doSendDistanceShoot(pos, wha, sorcerflingeffect)
doSendDistanceShoot(pos, eha, sorcerflingeffect)
doSendDistanceShoot(pos, nwa, sorcerflingeffect)
doSendDistanceShoot(pos, nea, sorcerflingeffect)
doSendDistanceShoot(pos, sea, sorcerflingeffect)
doSendDistanceShoot(pos, swa, sorcerflingeffect)

doSendMagicEffect(nha, sorcerlandeffect)
doSendMagicEffect(sha, sorcerlandeffect)
doSendMagicEffect(wha, sorcerlandeffect)
doSendMagicEffect(eha, sorcerlandeffect)
doSendMagicEffect(nwa, sorcerlandeffect)
doSendMagicEffect(nea, sorcerlandeffect)
doSendMagicEffect(sea, sorcerlandeffect)
doSendMagicEffect(swa, sorcerlandeffect)

else if voca == 2 or voca == 6 then
doSendMagicEffect(pos, druidfirsteffect)
doSendMagicEffect(pos, druidsecondeffect)

doSendDistanceShoot(pos, nha, druidflingeffect)
doSendDistanceShoot(pos, sha, druidflingeffect)
doSendDistanceShoot(pos, wha, druidflingeffect)
doSendDistanceShoot(pos, eha, druidflingeffect)
doSendDistanceShoot(pos, nwa, druidflingeffect)
doSendDistanceShoot(pos, nea, druidflingeffect)
doSendDistanceShoot(pos, sea, druidflingeffect)
doSendDistanceShoot(pos, swa, druidflingeffect)

doSendMagicEffect(nha, druidlandeffect)
doSendMagicEffect(sha, druidlandeffect)
doSendMagicEffect(wha, druidlandeffect)
doSendMagicEffect(eha, druidlandeffect)
doSendMagicEffect(nwa, druidlandeffect)
doSendMagicEffect(nea, druidlandeffect)
doSendMagicEffect(sea, druidlandeffect)
doSendMagicEffect(swa, druidlandeffect)

else if voca == 3 or voca == 7 then
doSendMagicEffect(pos, paladinfirsteffect)
doSendMagicEffect(pos, paladinsecondeffect)

doSendDistanceShoot(pos, nha, paladinflingeffect)
doSendDistanceShoot(pos, sha, paladinflingeffect)
doSendDistanceShoot(pos, wha, paladinflingeffect)
doSendDistanceShoot(pos, eha, paladinflingeffect)
doSendDistanceShoot(pos, nwa, paladinflingeffect)
doSendDistanceShoot(pos, nea, paladinflingeffect)
doSendDistanceShoot(pos, sea, paladinflingeffect)
doSendDistanceShoot(pos, swa, paladinflingeffect)

doSendMagicEffect(nha, paladinlandeffect)
doSendMagicEffect(sha, paladinlandeffect)
doSendMagicEffect(wha, paladinlandeffect)
doSendMagicEffect(eha, paladinlandeffect)
doSendMagicEffect(nwa, paladinlandeffect)
doSendMagicEffect(nea, paladinlandeffect)
doSendMagicEffect(sea, paladinlandeffect)
doSendMagicEffect(swa, paladinlandeffect)

else if voca == 4 or voca == 8 then
doSendMagicEffect(pos, knightfirsteffect)
doSendMagicEffect(pos, knightsecondeffect)

doSendDistanceShoot(pos, nha, knightflingeffect)
doSendDistanceShoot(pos, sha, knightflingeffect)
doSendDistanceShoot(pos, wha, knightflingeffect)
doSendDistanceShoot(pos, eha, knightflingeffect)
doSendDistanceShoot(pos, nwa, knightflingeffect)
doSendDistanceShoot(pos, nea, knightflingeffect)
doSendDistanceShoot(pos, sea, knightflingeffect)
doSendDistanceShoot(pos, swa, knightflingeffect)

doSendMagicEffect(nha, knightlandeffect)
doSendMagicEffect(sha, knightlandeffect)
doSendMagicEffect(wha, knightlandeffect)
doSendMagicEffect(eha, knightlandeffect)
doSendMagicEffect(nwa, knightlandeffect)
doSendMagicEffect(nea, knightlandeffect)
doSendMagicEffect(sea, knightlandeffect)
doSendMagicEffect(swa, knightlandeffect)
end
end
end
end
end
end

em movements.xml cole isto:

<!--  Epic  -->
<movevent type="Equip" itemid="7697" slot="ring" function="onEquipItem"/>
<movevent type="Equip" itemid="7708" slot="ring" function="onEquipItem" script="epic.lua"/>
<movevent type="DeEquip" itemid="7708" slot="ring" function="onDeEquipItem" script="epic.lua"/>

agora em data/XML/vocations substitua tudo oque tem dentro por isso:

<?xml version="1.0" encoding="UTF-8"?>
<vocations>
   <vocation id="0" name="None" description="none" needpremium="0" gaincap="5" gainhp="5" gainmana="5" gainhpticks="6" gainhpamount="1" gainmanaticks="6" gainmanaamount="1" manamultiplier="4.0" attackspeed="750" soulmax="100" gainsoulticks="120" fromvoc="0" attackable="no">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="1" name="Sorcerer" description="a sorcerer" needpremium="0" gaincap="10" gainhp="5" gainmana="30" gainhpticks="6" gainhpamount="5" gainmanaticks="3" gainmanaamount="5" manamultiplier="1.1" attackspeed="750" soulmax="100" gainsoulticks="120" fromvoc="1">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="2" name="Druid" description="a druid" needpremium="0" gaincap="10" gainhp="5" gainmana="30" gainhpticks="6" gainhpamount="5" gainmanaticks="3" gainmanaamount="5" manamultiplier="1.1" attackspeed="750" soulmax="100" gainsoulticks="120" fromvoc="2">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="1.8" sword="1.8" axe="1.8" distance="1.8" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="3" name="Paladin" description="a paladin" needpremium="0" gaincap="20" gainhp="10" gainmana="15" gainhpticks="4" gainhpamount="5" gainmanaticks="4" gainmanaamount="5" manamultiplier="1.4" attackspeed="600" soulmax="100" gainsoulticks="120" fromvoc="3">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.2" club="1.2" sword="1.2" axe="1.2" distance="1.1" shielding="1.1" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="4" name="Knight" description="a knight" needpremium="0" gaincap="25" gainhp="15" gainmana="5" gainhpticks="3" gainhpamount="5" gainmanaticks="6" gainmanaamount="5" manamultiplier="3.0" attackspeed="600" soulmax="100" gainsoulticks="120" fromvoc="4">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.4" shielding="1.1" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="5" name="Master Sorcerer" description="a master sorcerer" needpremium="1" gaincap="10" gainhp="5" gainmana="30" gainhpticks="4" gainhpamount="10" gainmanaticks="2" gainmanaamount="10" manamultiplier="1.1" attackspeed="500" soulmax="200" gainsoulticks="15" fromvoc="1" lessloss="30">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="6" name="Elder Druid" description="an elder druid" needpremium="1" gaincap="10" gainhp="5" gainmana="30" gainhpticks="4" gainhpamount="10" gainmanaticks="2" gainmanaamount="10" manamultiplier="1.1" attackspeed="500" soulmax="200" gainsoulticks="15" fromvoc="2" lessloss="30">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="1.8" sword="1.8" axe="1.8" distance="1.8" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="7" name="Royal Paladin" description="a royal paladin" needpremium="1" gaincap="20" gainhp="10" gainmana="15" gainhpticks="3" gainhpamount="10" gainmanaticks="3" gainmanaamount="10" manamultiplier="1.4" attackspeed="350" soulmax="200" gainsoulticks="15" fromvoc="3" lessloss="30">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.2" club="1.2" sword="1.2" axe="1.2" distance="1.1" shielding="1.1" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="8" name="Elite Knight" description="an elite knight" needpremium="1" gaincap="25" gainhp="15" gainmana="5" gainhpticks="2" gainhpamount="10" gainmanaticks="4" gainmanaamount="10" manamultiplier="3.0" attackspeed="350" soulmax="200" gainsoulticks="15" fromvoc="4" lessloss="30">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.4" shielding="1.1" fishing="1.1" experience="1.0"/>
   </vocation>

   <vocation id="9" name="Epic Master Sorcerer" description="an epic master sorcerer" needpremium="0" gaincap="10" gainhp="5" gainmana="30" gainhpticks="4" gainhpamount="10" gainmanaticks="2" gainmanaamount="10" manamultiplier="1.1" attackspeed="400" soulmax="200" gainsoulticks="15" fromvoc="5" lessloss="50">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="2.0" sword="2.0" axe="2.0" distance="2.0" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="10" name="Epic Elder Druid" description="an epic elder druid" needpremium="0" gaincap="10" gainhp="5" gainmana="30" gainhpticks="4" gainhpamount="10" gainmanaticks="2" gainmanaamount="10" manamultiplier="1.1" attackspeed="400" soulmax="200" gainsoulticks="15" fromvoc="6" lessloss="50">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.5" club="1.8" sword="1.8" axe="1.8" distance="1.8" shielding="1.5" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="11" name="Epic Royal Paladin" description="an epic royal paladin" needpremium="0" gaincap="20" gainhp="10" gainmana="15" gainhpticks="3" gainhpamount="10" gainmanaticks="3" gainmanaamount="10" manamultiplier="1.4" attackspeed="250" soulmax="200" gainsoulticks="15" fromvoc="7" lessloss="50">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.2" club="1.2" sword="1.2" axe="1.2" distance="1.1" shielding="1.1" fishing="1.1" experience="1.0"/>
   </vocation>
   <vocation id="12" name="Epic Elite Knight" description="an epic elite knight" needpremium="0" gaincap="25" gainhp="15" gainmana="5" gainhpticks="8" gainhpamount="10" gainmanaticks="4" gainmanaamount="10" manamultiplier="3.0" attackspeed="250" soulmax="200" gainsoulticks="15" fromvoc="8" lessloss="50">
       <formula meleeDamage="1.0" distDamage="1.0" wandDamage="1.0" magDamage="1.0" magHealingDamage="1.0" defense="1.0" armor="1.0"/>
       <skill fist="1.1" club="1.1" sword="1.1" axe="1.1" distance="1.4" shielding="1.1" fishing="1.1" experience="1.0"/>
   </vocation>

</vocations>

Em items.xml substitua no ID:7697 por isso:

</item>
<item id="7697" article="a" name="Transform Epic Ring">
                                   <attribute key="weight" value="40"/>
                                   <attribute key="slotType" value="ring"/>
                                   <attribute key="transformEquipTo" value="7708"/>
                                   <attribute key="showduration" value="1"/>
                                   <attribute key="stopduration" value="1"/>

Fim & creditos ao Molinero!

satan666 · Abril 6, 2010

à idéia foi boa, já o script ta péssimo.

lucasatak · Abril 6, 2010

porque está pessimo,muito grande ?

NatsuMcDonald · Abril 7, 2010

Tipo, tenho aqui no meu ot, vocaçoes com nomes diferentes, vou ter que editar o script todo?

lucasatak · Abril 7, 2010

tenho quase certeza que não,modifique apenas em vocations.xml

Doidin · Abril 7, 2010

Cara a ideia é ótima mais você devia adicionar algumas tables para diminuir o tamanho do script, continue trazendo conteúdo para o XTibia.

Abraços...

Editado Abril 7, 2010 por DoidinMapper

Adriez · Agosto 28, 2011

fmz manos ?? teria como o cara so poder usa o item se tiver 20 reset e o ring dura pra sempre ?? flws fmz

Entrar

[Movements] Ring Transform Vocation

Posts Recomendados

lucasatak 14

Link para o comentário

Compartilhar em outros sites

satan666 12

Link para o comentário

Compartilhar em outros sites

lucasatak 14

Link para o comentário

Compartilhar em outros sites

NatsuMcDonald 14

Link para o comentário

Compartilhar em outros sites

lucasatak 14

Link para o comentário

Compartilhar em outros sites

Doidin 275

Link para o comentário

Compartilhar em outros sites

Adriez 6

Link para o comentário

Compartilhar em outros sites

Quem Está Navegando 0 membros estão online

Conteúdo Similar

script alguém pode me ajudar nessa spells aqui, queira que colocassem pro meu personagem ficar inatingível por 6 segundos e podendo atacar livremente

Letreiro ao entrar em local

event Erro LineAnimation Snowball Event

Autoloot não stacka os items coletados

Mob sangra Gold / Monster bleeds gold

Fóruns

Tutoriais

Suporte