Pls, can you pass me a unit move detector?

[HerlySQR]

What the title says.

 

[A]mun]

There is one in this Damage Engine 5.7.1.2

 

[HerlySQR]

Ok, thanks.

 

[Elprede]

There are a bunch of them on the Hive:
Motion Sensor
IsUnitMoving - the official thread for Bribe's system
IsUnitMoving - vJASS version of Bribe's
Unit Movement

Some of these systems have more features than the others.

 

[HerlySQR]

Motion Sensor

Can you give me a simple example of how this works?, because the example that it gives is not simple.

 

[Elprede]

Simple Example

globals
    unit footman
endglobals

function print takes string s returns nothing
    call DisplayTimedTextToPlayer(Player(0), 0, 0, 10, s)
endfunction

function Trig_Example_Actions takes nothing returns nothing
    local real x = GetRandomReal(0, 9999)
    local real y = GetRandomReal(0, 9999)
    if GetUnitCurrentOrder(footman) == 0 then
        call IssuePointOrder(footman, "attack", x, y)
    endif
endfunction

function CheckMovement takes nothing returns nothing
    if IsUnitMoving(footman) then
        call print(GetUnitName(footman) + " is moving.")
    else
        call print(GetUnitName(footman) + " is not moving.")
    endif
endfunction

//===========================================================================
function InitTrig_Example takes nothing returns nothing
    set footman = CreateUnit(Player(0), 'hfoo', 0, 0, 0)
 
    //Register unit to system
    call SensorAddUnit(footman)
 
    call TimerStart(CreateTimer(), 1.0, true, function CheckMovement)
    call TimerStart(CreateTimer(), 1.0, true, function Trig_Example_Actions)
endfunction

Register Events

globals
    unit footman
endglobals

function print takes string s returns nothing
    call DisplayTimedTextToPlayer(Player(0), 0, 0, 10, s)
endfunction

function Trig_Example_Actions takes nothing returns nothing
    local real x = GetRandomReal(0, 9999)
    local real y = GetRandomReal(0, 9999)
    if GetUnitCurrentOrder(footman) == 0 then
        call IssuePointOrder(footman, "attack", x, y)
    endif
endfunction

function OnStart takes nothing returns nothing
    call print(GetUnitName(footman) + " has started moving.")
endfunction

function OnStop takes nothing returns nothing
    call print(GetUnitName(footman) + " has stop moving.")
endfunction

function OnChange takes nothing returns nothing
    call print(GetUnitName(footman) + " is preparing to stop or start moving.")
endfunction

//===========================================================================
function InitTrig_Example takes nothing returns nothing
    set footman = CreateUnit(Player(0), 'hfoo', 0, 0, 0)
 
    //Register unit to system
    call SensorAddUnit(footman)
 
    //Trigger an event when unit starts moving
    call RegisterMotionStartEvent(function OnStart)
 
    //Trigger an event when unit stops moving
    call RegisterMotionStopEvent(function OnStop)
 
    //Trigger an event when unit starts or stops moving
    call RegisterMotionChangeEvent(function OnChange)
 
    call TimerStart(CreateTimer(), 1.0, true, function Trig_Example_Actions)
endfunction

Actually, you will not need the footman global variable since AGD provides one to retrieve the triggering unit during the events.

 

[HerlySQR]

Simple Example

globals
    unit footman
endglobals

function print takes string s returns nothing
    call DisplayTimedTextToPlayer(Player(0), 0, 0, 10, s)
endfunction

function Trig_Example_Actions takes nothing returns nothing
    local real x = GetRandomReal(0, 9999)
    local real y = GetRandomReal(0, 9999)
    if GetUnitCurrentOrder(footman) == 0 then
        call IssuePointOrder(footman, "attack", x, y)
    endif
endfunction

function CheckMovement takes nothing returns nothing
    if IsUnitMoving(footman) then
        call print(GetUnitName(footman) + " is moving.")
    else
        call print(GetUnitName(footman) + " is not moving.")
    endif
endfunction

//===========================================================================
function InitTrig_Example takes nothing returns nothing
    set footman = CreateUnit(Player(0), 'hfoo', 0, 0, 0)
 
    //Register unit to system
    call SensorAddUnit(footman)
 
    call TimerStart(CreateTimer(), 1.0, true, function CheckMovement)
    call TimerStart(CreateTimer(), 1.0, true, function Trig_Example_Actions)
endfunction

Register Events

globals
    unit footman
endglobals

function print takes string s returns nothing
    call DisplayTimedTextToPlayer(Player(0), 0, 0, 10, s)
endfunction

function Trig_Example_Actions takes nothing returns nothing
    local real x = GetRandomReal(0, 9999)
    local real y = GetRandomReal(0, 9999)
    if GetUnitCurrentOrder(footman) == 0 then
        call IssuePointOrder(footman, "attack", x, y)
    endif
endfunction

function OnStart takes nothing returns nothing
    call print(GetUnitName(footman) + " has started moving.")
endfunction

function OnStop takes nothing returns nothing
    call print(GetUnitName(footman) + " has stop moving.")
endfunction

function OnChange takes nothing returns nothing
    call print(GetUnitName(footman) + " is preparing to stop or start moving.")
endfunction

//===========================================================================
function InitTrig_Example takes nothing returns nothing
    set footman = CreateUnit(Player(0), 'hfoo', 0, 0, 0)
 
    //Register unit to system
    call SensorAddUnit(footman)
 
    //Trigger an event when unit starts moving
    call RegisterMotionStartEvent(function OnStart)
 
    //Trigger an event when unit stops moving
    call RegisterMotionStopEvent(function OnStop)
 
    //Trigger an event when unit starts or stops moving
    call RegisterMotionChangeEvent(function OnChange)
 
    call TimerStart(CreateTimer(), 1.0, true, function Trig_Example_Actions)
endfunction

Actually, you will not need the footman global variable since AGD provides one to retrieve the triggering unit during the events.

I see.