Descrição: "Quando você equipar este anel, seu personagem vai se tornar super poderoso e sua aparência vai mudar!"

Como isso funciona? Literalmente, um pouco como quando "Sonic" vai para "Super Forma" em "Sonic Adventure 2 (Dreamcast)

* Primeiro você precisa ter moedas de ouro suficiente para desencadear a transformação (padrão: 100)

* Se você tem o suficiente, as habilidades de seu personagem irá aumentar em 120 cada (incluindo pesca), mana e hitpoints max max vai aumentar em 80%

* A cada segundo que você está transformado você irá perder uma moeda de ouro (Sonic perde um anel)

"Em outras palavras: Ele transforma suas moedas em poder!"

E tem uma seção de configuração para que você possa modificá-lo.

Crie um script na pasta movements\scripts chamado "chaosbangle.lua" e coloque isso dentro:

-- >> Config --

local outfit =
{
   -- Girls
   {
       lookType   = 12,
       lookHead   = 19,
       lookBody   = 53,
       lookLegs   = 92,
       lookFeet   = 79,
       lookAddons = 0
   },
   -- Boys
   {
       lookType   = 12,
       lookHead   = 19,
       lookBody   = 79,
       lookLegs   = 3,
       lookFeet   = 81,
       lookAddons = 0
   }
}

local coinID          = ITEM_GOLD_COIN
local wastingInterval = 1000
local wastingQuantity = 1
local triggerQuantity = 100
local warnOnLowSupply = TRUE
local lowSupplyMargin = 200
local storage         = 50780

-- Config << --

local condition1 = createConditionObject(CONDITION_ATTRIBUTES)
setConditionParam(condition1, CONDITION_PARAM_TICKS, -1)
setConditionParam(condition1, CONDITION_PARAM_SKILL_FIST,                120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_FISHING,             120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_CLUB,                120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_SWORD,               120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_AXE,                 120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_DISTANCE,            120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_SHIELD,              120)
setConditionParam(condition1, CONDITION_PARAM_SKILL_FISHING,             120)
setConditionParam(condition1, CONDITION_PARAM_STAT_MAGICPOINTS,          120)
setConditionParam(condition1, CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT,  180)
setConditionParam(condition1, CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT, 180)

local condition2 = createConditionObject(CONDITION_HASTE)
setConditionParam(condition2, CONDITION_PARAM_TICKS, -1)
setConditionFormula(condition2, 2.5, 0, 3.0, 0)

local area = createCombatArea({
   {0, 0, 0, 1, 0, 0, 0},
   {0, 1, 0, 0, 0, 1, 0},
   {0, 0, 0, 0, 0, 0, 0},
   {1, 0, 0, 2, 0, 0, 1},
   {0, 0, 0, 0, 0, 0, 0},
   {0, 1, 0, 0, 0, 1, 0},
   {0, 0, 0, 1, 0, 0, 0}
})

local animCombat =
{
   createCombatObject(),
   createCombatObject()
}

local sexyEffect =
{
   CONST_ME_FIREWORK_RED,
   CONST_ME_FIREWORK_YELLOW,
   CONST_ME_MAGIC_RED,
   CONST_ME_MAGIC_GREEN
}

setCombatParam(animCombat[2], COMBAT_PARAM_EFFECT, CONST_ME_HOLYAREA)
setCombatParam(animCombat[2], COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_SMALLHOLY)
setCombatParam(animCombat[1], COMBAT_PARAM_EFFECT, CONST_ME_FIREWORK_RED)
setCombatParam(animCombat[1], COMBAT_PARAM_DISTANCEEFFECT, CONST_ANI_FIRE)

setCombatArea(animCombat[2], area)
setCombatArea(animCombat[1], area)

local function StopSuperForm(cid)
   if (getPlayerStorageValue(cid, storage) == 1) then
       setPlayerStorageValue(cid, storage, 0)
       doRemoveCondition(cid, CONDITION_OUTFIT)
       doRemoveCondition(cid, CONDITION_ATTRIBUTES)
       doRemoveCondition(cid, CONDITION_HASTE)
   end
   return TRUE
end

local function SuperForm(cid, sexIndex)
   if (isCreature(cid)) then
       if (getPlayerStorageValue(cid, storage) == 1) then
           local goldLeft = getPlayerItemCount(cid, coinID)
           if (goldLeft >= wastingQuantity) then
               local position = getCreaturePosition(cid)
               doPlayerRemoveItem(cid, coinID, wastingQuantity)
               doSendMagicEffect(position, sexyEffect[sexIndex + 2])
               doSendMagicEffect(position, sexyEffect[sexIndex])
               if (goldLeft <= lowSupplyMargin and warnOnLowSupply == TRUE) then
                   doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Coins left: " ..(goldLeft - wastingQuantity) .. "!")
               end
               addEvent(SuperForm, wastingInterval, cid, sexIndex)
           else
               doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "Your bangle has been destroyed!")
               doPlayerRemoveItem(cid, 2127, 1)
               return StopSuperForm(cid)
           end
       end
   end
end

function onEquip(cid, item, slot)
   if (getPlayerItemCount(cid, coinID) > triggerQuantity and getPlayerStorageValue(cid, storage) ~= 1) then
       local sexIndex = getPlayerSex(cid) + 1
       doCombat(cid, animCombat[sexIndex], numberToVariant(cid))
       doSetCreatureOutfit(cid, outfit[sexIndex], -1)
       setPlayerStorageValue(cid, storage, 1)
       doAddCondition(cid, condition1)
       doAddCondition(cid, condition2)
       doCreatureAddHealth(cid, getCreatureMaxHealth(cid) - getCreatureHealth(cid))
       doPlayerAddMana(cid, getPlayerMaxMana(cid) - getPlayerMana(cid))
       doPlayerRemoveItem(cid, coinID, triggerQuantity)
       SuperForm(cid, sexIndex)
   elseif (getPlayerStorageValue(cid, storage) == 1) then
       doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You cannot equip this now!")
   else
       doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You do not have enough coins!")
   end
   return TRUE
end

function onDeEquip(cid, item, slot)
   return StopSuperForm(cid)
end

Agora coloque isso no movements.xml:

<movevent type="Equip" itemid="2127" slot="ring" event="script" value="chaosbangle.lua"/>
<movevent type="DeEquip" itemid="2127" slot="ring" event="script" value="chaosbangle.lua"/>

Meninas: Animação Fire ( Burning Blaze )

Antes:

Depois:

Meninos: Animação da Energia ( Super Sonic )

Antes:

Depois:

Creditos:

Admin Jontz (de outro forum)

Eu somente traduzi e trouxe pra cá.

Belo script! vlw vou testar aki

Será que tem como colocar por vocação.

Cada vocação se transforma em um monstro, com esse mesmo sistema.

como faço para consumir moedas de cristal em vez de moedas de ouro? porque tenho planos para um anel como esse... ajuda ae brother!!

#o anel buga meu serv da dc no servidor..

Deadly123

só editar essa parte

local coinID = ITEM_GOLD_COIN

boa noite

queria saber se tem como modificar os rings

"exemplo axe ring"

quando usado se transformar em algum bixo e ganhar +20 skills de axe

por 30 minutos!

Como eu faso pra consegui o anel?

Vlw ótimo funciono direitinho vlw's Rep :button_ok:

perfeito... rep+

Coloquei tudo certinho, mais quando fui deixar o Ot on apareceu a seguinte mensagem :ERROR: Unable to load MoveEvents!

Por favor me ajudem.

Coloquei tudo certinho, mais quando fui deixar o Ot on apareceu a seguinte mensagem :ERROR: Unable to load MoveEvents!

Por favor me ajudem.