Coisa Facil E Rapida

[nyuchiha 108]

O problema é que tenho um RING DE TRANSFORMAÇÃO.

Ele gasta crystal coins quando usado.

O problema é que quando os crystais coins acabam o ring se quebra, queria tirar isso. ( si n os player vão ter que ficar comprando esse ring toda hora)

((( Quando o dinheiro acabar o player deve voltar ao normal )))))

 

 

 

-- >> 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 = 2160

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, 3200)

setConditionParam(condition1, CONDITION_PARAM_SKILL_SWORD, 3200)

setConditionParam(condition1, CONDITION_PARAM_SKILL_AXE, 3200)

setConditionParam(condition1, CONDITION_PARAM_SKILL_DISTANCE, 3200)

setConditionParam(condition1, CONDITION_PARAM_SKILL_SHIELD, 120)

setConditionParam(condition1, CONDITION_PARAM_SKILL_FISHING, 120)

setConditionParam(condition1, CONDITION_PARAM_STAT_MAGICPOINTS, 15000)

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

 

 

 

E uma Versão 8.40 Da Mochila A Jato do lucasatak

 

http://www.xtibia.co...mochila-a-jato/

 

Eu cheguei a pedir pra ele , so que ele n respondeu

 

 

 

 

E AQUILO QUE AS PESSOAS CHAMAM DE OT FALANTE

UM JEITO DO OT FICA FAZENDO PROPAGANDO DE UMA CERTA COISA EM UM DETERMINADO TEMPO

 

VLWWWWWWWWWW :D:D:D:D:D:D:D:D:D:D:D

Editado Maio 8, 2010 por DeathAngels

[guedes100 56]

acho que é só tirar essa linha:

 

doPlayerRemoveItem(cid, 2127, 1)

[nyuchiha 108]

Duvida Sanada Vlw ae Nicekid !!

[LorDz 14]

Dúvida sanada,

Tópico Fechado.

 

Abraços

[Diogo 29]

Nem fechou rsrs

 

Só uma dica DeathAngels, NUNCA peça ajuda dizendo que é fácil.

 

Se fosse fácil você mesmo faria.

 

"Ah, mas é fácil pra quem sabe..."

 

Exato, mas ele não ficou sabendo do nada, teve que estudar pra isso. Falando que é fácil você tira o crédito do cara que sabe.

 

Beijos.

[LorDz 14]

Acontece nas melhores familias heuaehu,

é muita coisa na cabeça me desculpem.

Abraços