RevScripts Spell: convert to RevScript

[thetibjohn1]

Hi OTLanders, i have this script in TFS 0.x and i want to convert it to TFS 1.5 8.60, can anybody help me?

function onTargetTile(cid, position)
position.stackpos = 255
doConvinceCreature(cid, doCreateMonster("headcaptor", position, false))
doSendMagicEffect(position, CONST_ME_MAGIC_BLUE)
return true
end
local arr = {
{1, 0, 1},
{0, 2, 0},
{1, 0, 1},
}
local removeTime = 1.0 --time to remove the clones


local function removeCreatures(cid, creature)
        if isCreature(creature) == TRUE then
                doRemoveCreature(creature)
        end
end

function onTargetTile(cid, pos)
local creature = doSummonCreature("headcaptor", pos)
        doCreatureAddMana(cid, -2000)
    doCreatureSay(cid, "Utevo Mort", TALKTYPE_ORANGE_1)
        doConvinceCreature(cid, creature)
        addEvent(removeCreatures, removeTime * 1000, cid, creature)
        return TRUE
end



local area, combat = createCombatArea(arr), createCombatObject()
setCombatArea(combat, area)
setCombatParam(combat, COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
setCombatCallback(combat, CALLBACK_PARAM_TARGETTILE, "onTargetTile")
function onCastSpell(cid, var)
return doCombat(cid, combat, var)
end

[XML]
</instant>
<instant name="utevo mort" words="utevo mort" lvl="300" mana="1000" maglv="90" prem="1" range="5" needtarget="1" exhaustion="22000" blockwalls="1" needlearn="0" script="pbot/utevo mort.lua">
<vocation id="10"/>
<vocation id="9"/>
</instant>

 

[Sarah Wesker]

local removeTime = 1.0 -- tiempo para remover las criaturas

local arr = {
    {1, 0, 1},
    {0, 2, 0},
    {1, 0, 1},
}

local function removeCreatures(creatureId)
    local creature = Creature(creatureId)
    if creature then
        creature:remove()
    end
end

function onTargetTile(creature, position)
    local monster = Game.createMonster("headcaptor", position)
    if monster then
        creature:addMana(-2000)
        creature:say("Utevo Mort", TALKTYPE_MONSTER_SAY)
        creature:addSummon(monster)
        addEvent(removeCreatures, removeTime * 1000, monster:getId())
        position:sendMagicEffect(CONST_ME_MAGIC_BLUE)
    end
    return true
end

local area = createCombatArea(arr)
local combat = Combat()
combat:setParameter(COMBAT_PARAM_EFFECT, CONST_ME_MAGIC_BLUE)
combat:setArea(area)
combat:setCallback(CALLBACK_PARAM_TARGETTILE, "onTargetTile")

function onCastSpell(creature, variant)
    return combat:execute(creature, variant)
end

 

[johnsamir]

im trying to convert this script to rev script @Sarah Wesker i took it from here TFS 1.X+ - utevo lux bonus for premium [TFS 1.2] (https://otland.net/threads/utevo-lux-bonus-for-premium-tfs-1-2.281786/)
but im sure it's wrong, can you help me please? it's utevo lux or full light for premium player

local condition = Condition(CONDITION_LIGHT)
condition:setParameter(CONDITION_PARAM_LIGHT_LEVEL, 11)
condition:setParameter(CONDITION_PARAM_LIGHT_COLOR, 215)
condition:setParameter(CONDITION_PARAM_TICKS, -1)

local loginPremiumLightEvents = CreatureEvent("LoginPremiumLightEvents")

function onLogin(player)
    if player:isPremium() then
        player:addCondition(condition)
    end

    return true
end

loginPremiumLightEvents:register()

 

[Mateus Robeerto]

im trying to convert this script to rev script @Sarah Wesker i took it from here TFS 1.X+ - utevo lux bonus for premium [TFS 1.2] (https://otland.net/threads/utevo-lux-bonus-for-premium-tfs-1-2.281786/)
but im sure it's wrong, can you help me please? it's utevo lux or full light for premium player

local condition = Condition(CONDITION_LIGHT)
condition:setParameter(CONDITION_PARAM_LIGHT_LEVEL, 11)
condition:setParameter(CONDITION_PARAM_LIGHT_COLOR, 215)
condition:setParameter(CONDITION_PARAM_TICKS, -1)

local loginPremiumLightEvents = CreatureEvent("LoginPremiumLightEvents")

function onLogin(player)
    if player:isPremium() then
        player:addCondition(condition)
    end

    return true
end

loginPremiumLightEvents:register()

local condition = Condition(CONDITION_LIGHT)
condition:setParameter(CONDITION_PARAM_LIGHT_LEVEL, 11)
condition:setParameter(CONDITION_PARAM_LIGHT_COLOR, 215)
condition:setParameter(CONDITION_PARAM_TICKS, -1)

local onLoginLux = CreatureEvent("onLoginLux")

function onLoginLux.onLogin(player)
    if player:isPremium() then
        player:addCondition(condition)
    else
    end

    return true
end

onLoginLux:register()

Man, just follow the tutorial. Check GitHub to see how it should be. It’s very clear and easy to understand.

Revscriptsys

A free and open-source MMORPG server emulator written in C++ - otland/forgottenserver

github.com

 

[johnsamir]

i did something like this. edit oh i see thaat you added the script thank you veyr much

local loginPremiumLightevent = CreatureEvent("LoginPremiumLightEvents")

local condition = Condition(CONDITION_LIGHT)
condition:setParameter(CONDITION_PARAM_LIGHT_LEVEL, 11)
condition:setParameter(CONDITION_PARAM_LIGHT_COLOR, 215)
condition:setParameter(CONDITION_PARAM_TICKS, -1)

function loginPremiumLightevent.onLogin(player)
    if player:isPremium() then
        player:addCondition(condition)
    end

    return true
end


loginPremiumLightevent:register()