Date:
06.01.2014 - 00:35:12
Author:
Rewrite:
Type here:
-- Script orgiginally by: -- Script remade by: WibbenZ @ OTLand local config = { coinItemId = 2152, -- ID of the coin that the spell will use (2148 = gold coin, 2152 = platinum coin, 2160 = crystal coin) intervalRemovalOfCoins = 2000, -- Coin wasting interval (miliseconds) removeCoinsPerInterval = 2, -- Number of coins to use during the interval minCoinsToInitTransformation = 10, -- Number of coins needed to trigger the transformation minCoinsToInitRing = 20, -- Number of coins needed to execute script (must be higher than the minCoinsToInitTransformation variable) warnPlayerLowAmount = true, -- Warn player when runing short on coins, true or false minCoinsToWarnPlayer = 20, -- Number of coins to trigger the warn player function storage = 8555, itemId = 2121 } local outfitMale = {lookType = 12, lookHead = 19, lookBody = 79, lookLegs = 3, lookFeet = 81, lookAddons = 0} local outfitFemale = {lookType = 12, lookHead = 19, lookBody = 53, lookLegs = 92, lookFeet = 79, lookAddons = 0} local ringInit = false 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 condition3 = createConditionObject(CONDITION_ATTRIBUTES) setConditionParam(condition3, CONDITION_PARAM_TICKS, -1) setConditionParam(condition3, CONDITION_PARAM_SKILL_FIST, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_FISHING, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_CLUB, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_SWORD, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_AXE, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_DISTANCE, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_SHIELD, 120) setConditionParam(condition3, CONDITION_PARAM_SKILL_FISHING, 120) setConditionParam(condition3, CONDITION_PARAM_STAT_MAGICPOINTS, 120) setConditionParam(condition3, CONDITION_PARAM_STAT_MAXHITPOINTSPERCENT, 195) setConditionParam(condition3, CONDITION_PARAM_STAT_MAXMANAPOINTSPERCENT, 195) local condition2 = createConditionObject(CONDITION_HASTE) setConditionParam(condition2, CONDITION_PARAM_TICKS, -1) setConditionFormula(condition2, 2.5, 0, 3.0, 0) function coinsLeftCheck(cid) local pos = getCreaturePosition(cid) if(isPlayer(cid) and getPlayerSlotItem(cid, CONST_SLOT_RING).itemid == config.itemId) then doPlayerRemoveItem(cid, config.coinItemId, config.removeCoinsPerInterval) doSendMagicEffect(pos, CONST_ME_YELLOW_RINGS) doSendMagicEffect(pos, CONST_ME_BLOCKHIT) if(getPlayerItemCount(cid, config.coinItemId) < config.removeCoinsPerInterval) then setPlayerStorageValue(cid, config.storage, 0) local ringInit = false doPlayerSendTextMessage(cid, MESSAGE_EVENT_DEFAULT, "You do not have enough money!") doRemoveCondition(cid, CONDITION_OUTFIT) doRemoveCondition(cid, CONDITION_ATTRIBUTES) doRemoveCondition(cid, CONDITION_HASTE) doSendDistanceShoot(pos, {x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendMagicEffect({x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) else addEvent(coinsLeftCheck, config.intervalRemovalOfCoins, cid) end end end function initRing(cid) local pos = getCreaturePosition(cid) if(isPlayer(cid) and getCreatureStorage(cid, config.storage) == 1 and getPlayerSlotItem(cid, CONST_SLOT_RING).itemid == config.itemId) then doSendDistanceShoot(pos, {x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendMagicEffect({x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect(pos, CONST_ME_YELLOW_RINGS) doSendMagicEffect(pos, CONST_ME_BLOCKHIT) if(getPlayerSex(cid) == 1) then doSetCreatureOutfit(cid, outfitMale, -1) else doSetCreatureOutfit(cid, outfitFemale, -1) end if(getPlayerItemCount(cid, 9003) > 0) then doAddCondition(cid, condition3) else doAddCondition(cid, condition1) end doAddCondition(cid, condition2) if(getPlayerSlotItem(cid, CONST_SLOT_RING).itemid == config.itemId) then doPlayerRemoveItem(cid, config.coinItemId, config.minCoinsToInitTransformation) addEvent(coinsLeftCheck, config.removeCoinsPerInterval, cid) local coinsLeft = getPlayerItemCount(cid, config.coinItemId) if(coinsLeft < config.minCoinsToWarnPlayer and config.warnPlayerLowAmount) then doPlayerSendTextMessage(cid, MESSAGE_STATUS_CONSOLE_RED, "Coins left: " ..coinsLeft.. ".") end else return true end else return true end end function onEquip(cid, item, slot) if(getPlayerItemCount(cid, config.coinItemId) > config.minCoinsToInitRing) then local ringInit = true setPlayerStorageValue(cid, config.storage, 1) if(getPlayerSlotItem(cid, CONST_SLOT_RING).itemid == config.itemId) then addEvent(initRing, 100, cid) else return true end end return true end function onDeEquip(cid, item, slot) local pos = getCreaturePosition(cid) if(isPlayer(cid)) then setPlayerStorageValue(cid, config.storage, 0) doSetCreatureOutfit(cid, {lookType = 88, lookHead = 0, lookAddons = 0, lookLegs = 0, lookbody = 0, lookFeet = 0}, 43200000) doRemoveCondition(cid, CONDITION_OUTFIT) doRemoveCondition(cid, CONDITION_ATTRIBUTES) doRemoveCondition(cid, CONDITION_HASTE) doSendDistanceShoot(pos, {x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendDistanceShoot(pos, {x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ANI_SMALLHOLY) doSendMagicEffect({x = pos.x, y = pos.y - 3, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x, y = pos.y + 3, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 3, y = pos.y, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 2, y = pos.y - 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x + 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect({x = pos.x - 2, y = pos.y + 2, z = pos.z, stackpos = 255}, CONST_ME_HOLYAREA) doSendMagicEffect(pos, CONST_ME_YELLOW_RINGS) doSendMagicEffect(pos, CONST_ME_BLOCKHIT) end return true end