IF
True()
THEN
RESPONSE #100
CutSceneId("%IMOEN_DV%")
SmallWait(1)
GiveItemCreate("X#TOME","%IMOEN_DV%",1,1,0)
ReallyForceSpell(Myself,2050) // WIZARD_CHAOS_VISUALS_ONLY
Wait(1)
EndCutSceneMode()
END
