globals
real MouseX0 = 0
real MouseY0 = 0
real MouseX1 = 0
real MouseY1 = 0
real MouseX2 = 0
real MouseY2 = 0
real MouseX3 = 0
real MouseY3 = 0
real MouseX4 = 0
real MouseY4 = 0
real MouseX5 = 0
real MouseY5 = 0
real MouseX6 = 0
real MouseY6= 0
real MouseX7 = 0
real MouseY7 = 0
real MouseX8 = 0
real MouseY8 = 0
endglobals
//===========================================================================
// Trigger: MickeyMouse
//===========================================================================
function Trig_MickeyMouse_Actions takes nothing returns nothing
local player p= GetTriggerPlayer()
local player p0= Player(0)
local player p1= Player(1)
local player p2= Player(2)
local player p3= Player(3)
local player p4= Player(4)
local player p5= Player(5)
local player p6= Player(6)
local player p7= Player(7)
local player p8= Player(8)
if p == p0 then
set MouseX0=BlzGetTriggerPlayerMouseX()
set MouseY0=BlzGetTriggerPlayerMouseY()
endif
if p == p1 then
set MouseX1=BlzGetTriggerPlayerMouseX()
set MouseY1=BlzGetTriggerPlayerMouseY()
endif
if p == p2 then
set MouseX2=BlzGetTriggerPlayerMouseX()
set MouseY2=BlzGetTriggerPlayerMouseY()
endif
if p == p3 then
set MouseX3=BlzGetTriggerPlayerMouseX()
set MouseY3=BlzGetTriggerPlayerMouseY()
endif
if p == p4 then
set MouseX4=BlzGetTriggerPlayerMouseX()
set MouseY4=BlzGetTriggerPlayerMouseY()
endif
if p == p5 then
set MouseX5=BlzGetTriggerPlayerMouseX()
set MouseY5=BlzGetTriggerPlayerMouseY()
endif
if p == p6 then
set MouseX6=BlzGetTriggerPlayerMouseX()
set MouseY6=BlzGetTriggerPlayerMouseY()
endif
if p == p7 then
set MouseX7=BlzGetTriggerPlayerMouseX()
set MouseY7=BlzGetTriggerPlayerMouseY()
endif
if p == p8 then
set MouseX8=BlzGetTriggerPlayerMouseX()
set MouseY8=BlzGetTriggerPlayerMouseY()
endif
set p0=null
set p1=null
set p2=null
set p3=null
set p4=null
set p5=null
set p6=null
set p7=null
set p8=null
set p=null
endfunction

//===========================================================================
function InitTrig_MickeyMouse takes nothing returns nothing
    local trigger t= CreateTrigger()
local code cot= function Trig_MickeyMouse_Actions
local integer index= 0
local player p = null
local playerevent evenk = null
loop
set p=Player(index)
set evenk=EVENT_PLAYER_MOUSE_MOVE
call TriggerRegisterPlayerEvent(t, p, evenk)
set p=null
set evenk=null
set index=index + 1
exitwhen index == 9
endloop
    call TriggerAddAction(t, cot)
set cot=null
set t=null
endfunction

function Timer takes takes nothing returns nothing
    local timer t = GetExpiredTimer()                   //создаём локальную переменную таймера и присваеваем ей истёкший таймер
   local integer id = GetHandleId(t)                   //узнаём id этого таймера
   local unit test = LoadUnitHandle(udg_hash, id, 1)   //загружаем юнита-цель, если это нужный таймер(id васё определит)     
call UnitAddSleepPerm( test, false )                //будим нужного юнита
call FlushChildHashtable(Hash,GetHandleId(t))  // чистим хеш чтобы не вызывал утечек
call DestroyTimer(t) // удаляем таймер чтобы не было утечек
 endfunction

function Trig_Test_Actions takes nothing returns nothing
     local timer t = CreateTimer()                   //создаём локальный таймер
     local integer id = GetHandleId(t)               //находим id таймера
     local unit test = GetSpellTargetUnit()          //берём юнита-цель способности
    TimerStart(t, 10, false, Timer)                 //создаём таймер на 10 сек и активируем функцию по истечению тайсера
    call UnitAddSleepPerm( test, true )             //приказваем юнита-цель уснуть
     call SaveUnitHandle(udg_hash, id, 1, test)           //сохраняем юнита-цель в таблице по id таймера
 endfunction