- Joined
- Feb 12, 2012
- Messages
- 413
Requires:
- Ice fairy or something ? 0.0...
- Ice fairy or something ? 0.0...
JASS:
//*********************Disable/Enable attack by Elphis v0.0.4*********************
//*********************Allow you disable/enable attack staus of unit*********************
// API:
// - function DisableAttack takes unit u returns nothing
// **Allow you disable attack of unit**
// - function EnableAttack takes unit u returns nothing
// **Enable attack of unit**
// - function DisableAttackAOE takes unit u,real radius returns nothing
// **Allow you disable attack of unit in wide Area**
// - function EnableAttackAOE takes unit u returns nothing
// **Enable attack of unit in wide Area**
//********************************************************************************************************
//********************************************************************************************************
// - Installation:
// - Import/copy the required libraries and Attack Staus code to your map
// - Copy DummyUnit of this map into your map
// - Import/copy the custom ability to your map and change the ORDER, DISABLE_ABI_ID, BUFF_ID if needed
// - You may view the raw ID of the objects by pressing CTRL+D in the object editor
// - You may play with the configurables below
//
// - Special Thank to TriggerHappy, who help me to improve this code.
//*************************************************************************************
//
library DisableAttack initializer Init
globals
private constant integer ORDER = 0xD0270
private constant integer SPELL_ID = 'DISA' // Rawcode of Ability Disable, changes if needed
private constant integer BUFF_ID = 'BDIS' // Rawcode of Buff Disable, changes if needed
private constant integer DUMMY_ID = 'xeca' //Dummy rawcode
private group Swap = CreateGroup()
private group Temp
/*=Non - Configurables=*/
private unit Dummy
endglobals
function UnitDisableAttack takes unit u returns boolean
if GetUnitAbilityLevel(u,BUFF_ID) > 0 then
return false
endif
call SetUnitX(Dummy,GetUnitX(u))
call SetUnitY(Dummy,GetUnitY(u))
call IssueTargetOrderById(Dummy,ORDER,u)
return true
endfunction
function UnitEnableAttack takes unit u returns boolean
return UnitRemoveAbility(u,BUFF_ID)
endfunction
private function SwapGroup takes group Group returns nothing
set Temp = Group
set Group = Swap
set Swap = Temp
endfunction
function GroupDisableAttack takes group g returns nothing
local unit FoG
loop
set FoG=FirstOfGroup(g)
exitwhen FoG==null
//
call UnitDisableAttack(FoG)
//
call GroupAddUnit(Swap,FoG)
call GroupRemoveUnit(g,FoG)
endloop
call SwapGroup(g)
endfunction
function GroupEnableAttack takes group g returns nothing
local unit FoG
loop
set FoG=FirstOfGroup(g)
exitwhen FoG==null
//
call UnitEnableAttack(FoG)
//
call GroupAddUnit(Swap,FoG)
call GroupRemoveUnit(g,FoG)
endloop
call SwapGroup(g)
endfunction
function Init takes nothing returns nothing
set Dummy = CreateUnit(Player(15),DUMMY_ID,0.,0.,0.)
if GetUnitAbilityLevel(Dummy,SPELL_ID) == 0 then
call UnitAddAbility(Dummy,SPELL_ID)
endif
endfunction
endlibrary[/HIDDEN]
Last edited:
