Jump to content
Alloder.pro: about Allods with love
Search In
  • More options...
Find results that contain...
Find results in...

New program for writers

We turn from quantity to quality and tell you how we will supplement the Allods Team program with rewards in rubles.

More

The new Updater

Let us to introduce the new addon updater software and to share the details

Read more

Alloder 2.0

We have started the process of project evolve, and this relates not only, and not even primarily of the site's view

Read more

1 Screenshot

About This File

Аддон оповещает о срабатывании амулетов колдуна.

Черное крыло - атакующая бафка.

Белое крыло - защитная бафка.

Not ready for EU/US game versions yet (needs localization).

с таким кодом будет информативней

--------------------------------------------------------------------------------

Global( "wtLight", nil)
Global( "wtDark", nil)

--------------------------------------------------------------------------------

function OnEventObjectBuffAdded( params)
if (params.objectId == avatar.GetId()) then
local avatarBuffs = object.GetBuffInstances( params.objectId, params.buffId )
for key, value in avatarBuffs do
local buffInfo = object.GetBuffInfo( value )
local nam = userMods.FromWString(buffInfo.name)
local find = string.find(nam, "Стремление к тьме")
if find then
StartBlack()
end
find = string.find(nam, "Стремление к свету")
if find then
StartWhite( )
end
end
end
end
-- Включение панели таймера, Запуск таймера

Global( "WHITE_PLACE", nil )
Global( "BLACK_PLACE", nil )
Global( "WHITE_PLACE_TO", nil )
Global( "BLACK_PLACE_TO", nil )

function StartWhite( )
wtLight:Show(true)
wtLight:PlayResizeEffect( WHITE_PLACE, WHITE_PLACE_TO, 15000, EA_MONOTONOUS_INCREASE )
end

function StartBlack()
wtDark:Show(true)
wtDark:PlayResizeEffect( BLACK_PLACE, BLACK_PLACE_TO, 15000, EA_MONOTONOUS_INCREASE )
end

function OnEventEffectFinished( params )

if params.wtOwner:GetName() == "Dark" then
wtDark:Show(false)
wtDark:SetPlacementPlain(BLACK_PLACE)
elseif params.wtOwner:GetName() == "Light" then
wtLight:Show(false)
wtLight:SetPlacementPlain(WHITE_PLACE)
end
end

--------------------------------------------------------------------------------
-- INITIALIZATION
--------------------------------------------------------------------------------

function Init()
wtLight = mainForm:GetChildChecked( "Light", true )
wtLight:Show(false);
WHITE_PLACE = wtLight:GetPlacementPlain()
WHITE_PLACE_TO = wtLight:GetPlacementPlain()
WHITE_PLACE_TO.sizeY = 20
wtDark = mainForm:GetChildChecked( "Dark", true )
wtDark:Show(false);
BLACK_PLACE = wtDark:GetPlacementPlain()
BLACK_PLACE_TO = wtDark:GetPlacementPlain()
BLACK_PLACE_TO.sizeY = 20
common.RegisterEventHandler( OnEventEffectFinished, "EVENT_EFFECT_FINISHED" )
common.RegisterEventHandler( OnEventObjectBuffAdded, "EVENT_OBJECT_BUFF_ADDED" )
end

--------------------------------------------------------------------------------
Init()
--------------------------------------------------------------------------------
 Share


×
×
  • Create New...

Important Information

By using our site you agree to the Terms of Use