[Spellpack] Mago Sanguinario
+48
Phantom Walker
Boss_bruoly
Woz
Keko
D14Bl0
edwardjo
Kurookami
santiarchi2
Ladislao Gibert
Kokox
emancipacion
paillan
febetu16
armando368
Nicoplox95
anthonio2013
rober009
creatorocker
anikilador1
xerocheco
eloah
mgueletorrec
Devilman3D
LordWilson94
pindleskin
evaevileva7
bonestrike
sargeras3000
abadon456
villaxd123
KeiverJ
humberto25
dariem
SkarY
Heber12
alex20693
chamanexo
Profetus
Blade Master
Taurus459
jefferson940
mondragon
el_rokhan
Adram
ILoGy
XxDarkneosxX
Napo
Marcos_M
52 participantes
Página 1 de 3.
Página 1 de 3. • 1, 2, 3 
Sáb Sep 14, 2013 2:57 pm
Otro spellpack de héroe de Melee
En este caso es el siempre amado:
Los requisitos están en el mapa, pero son estos
Llamarada Gigante: El mago sanguinario prepara sus llamaradas una a una y luego las hace explotar al unísono.
Lazo etéreo: La magia arcana permite al mago sanguinario trascender el cuerpo y conectarse con el espíritu, incluso con el de sus enemigos. Crea un lazo que roba un porcentaje de vida, maná, velocidad de ataque y velocidad de movimiento y convierte al mago sanguinario y al objetivo en étereos mientras estén atados.
Escudo Arcano: El mago sanguinario es un maestro en la magia arcana, lo que le permite crear un escudo a partir de esta magia. Una porción de todo daño que reciba quemará maná al enemigo en base al daño causado y restaurará un poco de maná al mago sanguinario y esa porción será disuelta.
Vuelo del Fénix: Invoca un fénix que gira alrededor del Mago sanguinario dañando a todos los enemigos cercanos.
El modelo Dummy es de autor desconocido :\
Recuerda elegir tu especialidad o que estás interesado en aprender aquí
https://www.worldofeditors.net/t192-anuncio-sistema-de-especialidades-o-profesiones-del-editor
Link del map
En este caso es el siempre amado:
Mago Sanguinario
![[Spellpack] Mago Sanguinario Character](https://2img.net/h/media.playdota.com/hero/118/character.gif)
Los requisitos están en el mapa, pero son estos
- Requisitos:
- MS AS Modifier:
- [jass]library MSASModifier initializer Init
// By Marcos_M
// Agradecimientos a MuSe por librería Slow que sirvió de base
globals
// ID DEL DUMMY
private constant integer DUMMY_ID = 'h000'
// HABILIDADES IDs
private constant integer REDUCCION_MOVIMIENTO_ID = 'A008'
private constant integer AUMENTO_MOVIMIENTO_ID = 'A009'
private constant integer REDUCCION_ATAQUE_ID = 'A007'
private constant integer AUMENTO_ATAQUE_ID = 'A006'
//Estas habilidades solo sirven para mostrar el BUFF de AS
private constant integer BUFF_DUMMY_REDUCCION_AS_ID = 'A005'
private constant integer BUFF_DUMMY_AUMENTO_AS_ID = 'A004'
//BUFF IDs
private constant integer REDUCCION_MOVIMIENTO_BUFF_ID = 'B003'
private constant integer AUMENTO_MOVIMIENTO_BUFF_ID = 'B002'
private constant integer REDUCCION_ATAQUE_BUFF_ID = 'B000'
private constant integer AUMENTO_ATAQUE_BUFF_ID = 'B001'
////////////////////////////////////
private constant string SLOWORDER_ID = "slow"
private hashtable HTAS = InitHashtable()
private hashtable HTMS = InitHashtable()
private timer t1 = CreateTimer()
private timer t2 = CreateTimer()
private integer c = 0
private group GROUPAS = CreateGroup()
private group GROUPMS = CreateGroup()
private real PERIODIC = 0.05
private unit DUMMY
endglobals
private function ApplyAS takes unit u, integer slow returns nothing
if slow == 0 then
call UnitRemoveAbility(u, AUMENTO_ATAQUE_ID)
call UnitRemoveAbility(u, AUMENTO_ATAQUE_BUFF_ID)
call UnitRemoveAbility(u, BUFF_DUMMY_AUMENTO_AS_ID)
call UnitRemoveAbility(u, REDUCCION_ATAQUE_ID)
call UnitRemoveAbility(u, REDUCCION_ATAQUE_BUFF_ID)
call UnitRemoveAbility(u, BUFF_DUMMY_REDUCCION_AS_ID)
elseif slow > 0 then
call UnitRemoveAbility(u, AUMENTO_ATAQUE_ID)
call UnitRemoveAbility(u, AUMENTO_ATAQUE_BUFF_ID)
call UnitRemoveAbility(u, BUFF_DUMMY_AUMENTO_AS_ID)
if GetUnitAbilityLevel(u, BUFF_DUMMY_REDUCCION_AS_ID) > 0 then
call SetUnitAbilityLevel(u, REDUCCION_ATAQUE_ID, slow)
else
call UnitAddAbility(u, REDUCCION_ATAQUE_ID)
call UnitAddAbility(u, BUFF_DUMMY_REDUCCION_AS_ID)
call SetUnitAbilityLevel(u, REDUCCION_ATAQUE_ID, slow)
endif
else
call UnitRemoveAbility(u, REDUCCION_ATAQUE_ID)
call UnitRemoveAbility(u, REDUCCION_ATAQUE_BUFF_ID)
call UnitRemoveAbility(u, BUFF_DUMMY_REDUCCION_AS_ID)
if GetUnitAbilityLevel(u, BUFF_DUMMY_AUMENTO_AS_ID) > 0 then
call SetUnitAbilityLevel(u, AUMENTO_ATAQUE_ID, -slow)
else
call UnitAddAbility(u, AUMENTO_ATAQUE_ID)
call UnitAddAbility(u, BUFF_DUMMY_AUMENTO_AS_ID)
call SetUnitAbilityLevel(u, AUMENTO_MOVIMIENTO_ID, -slow)
endif
endif
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
private function ApplyMS takes unit u, integer slow returns nothing
if slow == 0 then
call UnitRemoveAbility(u, AUMENTO_MOVIMIENTO_BUFF_ID)
call UnitRemoveAbility(u, REDUCCION_MOVIMIENTO_BUFF_ID)
elseif slow > 0 then
call UnitRemoveAbility(u, AUMENTO_MOVIMIENTO_BUFF_ID)
call UnitAddAbility(DUMMY, REDUCCION_MOVIMIENTO_ID)
call SetUnitAbilityLevel(DUMMY, REDUCCION_MOVIMIENTO_ID, slow)
else
call UnitRemoveAbility(u, REDUCCION_MOVIMIENTO_BUFF_ID)
call UnitAddAbility(DUMMY, AUMENTO_MOVIMIENTO_ID)
call SetUnitAbilityLevel(DUMMY, AUMENTO_MOVIMIENTO_ID, -slow)
endif
call IssueTargetOrder(DUMMY, SLOWORDER_ID, u)
call UnitRemoveAbility(DUMMY, AUMENTO_MOVIMIENTO_ID)
call UnitRemoveAbility(DUMMY, REDUCCION_MOVIMIENTO_ID)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
private function LoopAS takes nothing returns nothing
local unit u = GetEnumUnit()
local integer Id = GetHandleId(u)
local integer i = LoadInteger(HTAS, Id, StringHash("0"))
local integer Slow = LoadInteger(HTAS, Id, 0)
local real duration
local integer slow
local effect e
local integer n = LoadInteger(HTAS, Id, StringHash("0"))
local boolean B = true
local integer N = 0
loop
exitwhen i == 0
if LoadBoolean(HTAS, Id, StringHash(("Bool" + I2S(i)))) then
set duration = LoadReal(HTAS, Id, StringHash(("Dur" + I2S(i)))) - PERIODIC
call SaveReal(HTAS, Id, StringHash(("Dur" + I2S(i))), duration)
if duration <= 0.00 then
call SaveBoolean(HTAS, Id, StringHash(("Bool" + I2S(i))), false)
set slow = Slow - LoadInteger(HTAS, Id, StringHash(("Lenteo" + I2S(i))))
set e = LoadEffectHandle(HTAS, Id, StringHash(("Efecto" + I2S(i))))
call SaveInteger(HTAS, Id, 0, slow)
call RemoveSavedInteger(HTAS, Id, StringHash(("Buff" + I2S(i))))
call DestroyEffect(e)
call ApplyAS(u, slow)
loop
set B = LoadBoolean(HTAS,Id, StringHash(("Bool" + I2S(n))))
set n = n - 1
exitwhen n < 0
if not(B) then
set N = N + 1
endif
set B = true
endloop
if N == LoadInteger(HTAS, Id, StringHash("0")) then
call GroupRemoveUnit(GROUPAS, u)
call FlushChildHashtable(HTAS, Id)
if FirstOfGroup(GROUPAS) == null then
call PauseTimer(t1)
endif
endif
endif
endif
set i = i - 1
endloop
////////////////////////
////////////////////////
set e = null
set u = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
private function LoopMS takes nothing returns nothing
local unit u = GetEnumUnit()
local integer Id = GetHandleId(u)
local integer i = LoadInteger(HTMS, Id, StringHash("0"))
local integer Slow = LoadInteger(HTMS, Id, 0)
local real duration
local integer buff1
local integer slow
local effect e
local integer n = LoadInteger(HTMS, Id, StringHash("0"))
local boolean B = true
local integer N = 0
loop
exitwhen i == 0
if LoadBoolean(HTMS, Id, StringHash(("Bool" + I2S(i)))) then
set duration = LoadReal(HTMS, Id, StringHash(("Dur" + I2S(i)))) - PERIODIC
call SaveReal(HTMS, Id, StringHash(("Dur" + I2S(i))), duration)
if duration <= 0.00 then
call SaveBoolean(HTMS, Id, StringHash(("Bool" + I2S(i))), false)
set slow = Slow - LoadInteger(HTMS, Id, StringHash(("Lenteo" + I2S(i))))
set e = LoadEffectHandle(HTMS, Id, StringHash(("Efecto" + I2S(i))))
call SaveInteger(HTMS, Id, 0, slow)
call RemoveSavedInteger(HTMS, Id, StringHash(("Buff" + I2S(i))))
call DestroyEffect(e)
call ApplyMS(u, slow)
loop
set B = LoadBoolean(HTMS,Id, StringHash(("Bool" + I2S(n))))
set n = n - 1
exitwhen n < 0
if not(B) then
set N = N + 1
endif
set B = true
endloop
if N == LoadInteger(HTMS, Id, StringHash("0")) then
call GroupRemoveUnit(GROUPMS, u)
call FlushChildHashtable(HTMS, Id)
if FirstOfGroup(GROUPMS) == null then
call PauseTimer(t2)
endif
endif
endif
endif
set i = i - 1
endloop
////////////////////////
////////////////////////
set e = null
set u = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
private function TimerAS takes nothing returns nothing
call ForGroup(GROUPAS, function LoopAS)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
private function TimerMS takes nothing returns nothing
call ForGroup(GROUPMS, function LoopMS)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function RemoveBuffAS takes unit u, integer buff1 returns nothing
local integer Id = GetHandleId(u)
local integer i = LoadInteger(HTAS, Id, StringHash("0"))
local integer Slow = LoadInteger(HTAS, Id, 0)
local effect e
local real duration
local integer slow
local integer n
local integer n1 = LoadInteger(HTAS, Id, StringHash("0"))
local integer N = 0
local boolean B = true
loop
exitwhen i == 0
set n = LoadInteger(HTAS, Id, StringHash(("Buff" + I2S(i))))
if n == buff1 then
call SaveBoolean(HTAS, Id, StringHash(("Bool" + I2S(i))), false)
set slow = Slow - LoadInteger(HTAS, Id, StringHash(("Lenteo" + I2S(i))))
set e = LoadEffectHandle(HTAS, Id, StringHash(("Efecto" + I2S(i))))
call SaveInteger(HTAS, Id, 0, slow)
call RemoveSavedInteger(HTAS, Id, StringHash(("Buff" + I2S(i))))
call DestroyEffect(e)
call ApplyAS(u, slow)
loop
set B = LoadBoolean(HTAS,Id, StringHash(("Bool" + I2S(n1))))
set n1 = n1 - 1
exitwhen n1 < 0
if not(B) then
set N = N + 1
endif
set B = true
endloop
if N == LoadInteger(HTAS, Id, StringHash("0")) then
call GroupRemoveUnit(GROUPAS, u)
call FlushChildHashtable(HTAS, Id)
if FirstOfGroup(GROUPAS) == null then
call PauseTimer(t1)
endif
endif
endif
set i = i - 1
endloop
/////////////////////
/////////////////////
set e = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function RemoveSlowAS takes unit u returns nothing
local integer Id = GetHandleId(u)
local integer i = LoadInteger(HTAS, Id, StringHash("0"))
local effect e
loop
exitwhen i == 0
set e = LoadEffectHandle(HTAS, Id, StringHash(("Efecto" + I2S(i))))
call RemoveSavedInteger(HTAS, Id, StringHash(("Buff" + I2S(i))))
call DestroyEffect(e)
set i = i - 1
endloop
call UnitRemoveAbility(u, REDUCCION_ATAQUE_ID)
call UnitRemoveAbility(u, BUFF_DUMMY_REDUCCION_AS_ID)
call UnitRemoveAbility(u, REDUCCION_ATAQUE_BUFF_ID)
call UnitRemoveAbility(u, AUMENTO_ATAQUE_ID)
call UnitRemoveAbility(u, BUFF_DUMMY_AUMENTO_AS_ID)
call UnitRemoveAbility(u, AUMENTO_ATAQUE_BUFF_ID)
call GroupRemoveUnit(GROUPAS, u)
call FlushChildHashtable(HTAS, Id)
if FirstOfGroup(GROUPAS) == null then
call PauseTimer(t1)
endif
/////////////////////
/////////////////////
set e = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function AddSlowAS takes unit u, real duration, integer slow, integer buff1, string attachpoint returns nothing
local integer Id = GetHandleId(u)
local integer NewSlow = LoadInteger(HTAS, Id, 0) + slow
local effect e = AddSpellEffectTargetById(buff1, EFFECT_TYPE_TARGET, u, attachpoint)
local integer i = LoadInteger(HTAS, Id, StringHash("0"))
local boolean B = false
local integer buff2
loop
set buff2 = LoadInteger(HTAS,Id, StringHash(("Buff" + I2S(i))))
set i = i - 1
exitwhen i < 0
if buff1 == buff2 then
set B = true
endif
endloop
if not(B) then
if FirstOfGroup(GROUPAS) == null then
call TimerStart(t1, PERIODIC, true, function TimerAS)
endif
call ApplyAS(u, NewSlow)
call SaveInteger(HTAS, Id, 0, NewSlow)
set i = LoadInteger(HTAS, Id, StringHash("0")) + 1
call SaveInteger(HTAS, Id, StringHash("0"), i)
call SaveReal(HTAS, Id, StringHash(("Dur" + I2S(i))), duration)
call SaveInteger(HTAS, Id, StringHash(("Buff" + I2S(i))), buff1)
call SaveEffectHandle(HTAS, Id, StringHash(("Efecto" + I2S(i))), e)
call SaveInteger(HTAS, Id, StringHash(("Lenteo" + I2S(i))), slow)
call SaveBoolean(HTAS, Id, StringHash(("Bool" + I2S(i))), true)
call GroupAddUnit(GROUPAS, u)
else
call DestroyEffect(e)
endif
///////////////////////////////////////////////////////
set e = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function AddBonusAS takes unit u, real duration, integer slow, integer buff1, string attachpoint returns nothing
call AddSlowAS(u, duration, -slow, buff1, attachpoint)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function GetSlowAS takes unit u returns integer
return LoadInteger(HTAS, GetHandleId(u), 0)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function GetBonusAS takes unit u returns integer
return -LoadInteger(HTAS, GetHandleId(u), 0)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function RemoveBuffMS takes unit u, integer buff1 returns nothing
local integer Id = GetHandleId(u)
local integer i = LoadInteger(HTMS, Id, StringHash("0"))
local integer Slow = LoadInteger(HTMS, Id, 0)
local effect e
local real duration
local integer slow
local integer n
local integer n1 = LoadInteger(HTMS, Id, StringHash("0"))
local integer N = 0
local boolean B = true
loop
exitwhen i == 0
set n = LoadInteger(HTMS, Id, StringHash(("Buff" + I2S(i))))
if n == buff1 then
call SaveBoolean(HTMS, Id, StringHash(("Bool" + I2S(i))), false)
set slow = Slow - LoadInteger(HTMS, Id, StringHash(("Lenteo" + I2S(i))))
set e = LoadEffectHandle(HTMS, Id, StringHash(("Efecto" + I2S(i))))
call SaveInteger(HTMS, Id, 0, slow)
call RemoveSavedInteger(HTMS, Id, StringHash(("Buff" + I2S(i))))
call DestroyEffect(e)
call ApplyMS(u, slow)
loop
set B = LoadBoolean(HTMS,Id, StringHash(("Bool" + I2S(n1))))
set n1 = n1 - 1
exitwhen n1 < 0
if not(B) then
set N = N + 1
endif
set B = true
endloop
if N == LoadInteger(HTMS, Id, StringHash("0")) then
call GroupRemoveUnit(GROUPMS, u)
call FlushChildHashtable(HTMS, Id)
if FirstOfGroup(GROUPMS) == null then
call PauseTimer(t2)
endif
endif
endif
set i = i - 1
endloop
/////////////////////
/////////////////////
set e = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function RemoveSlowMS takes unit u returns nothing
local integer Id = GetHandleId(u)
local integer i = LoadInteger(HTMS, Id, StringHash("0"))
local effect e
loop
exitwhen i == 0
set e = LoadEffectHandle(HTMS, Id, StringHash(("Efecto" + I2S(i))))
call RemoveSavedInteger(HTMS, Id, StringHash(("Buff" + I2S(i))))
call DestroyEffect(e)
set i = i - 1
endloop
call UnitRemoveAbility(u, REDUCCION_MOVIMIENTO_ID)
call UnitRemoveAbility(u, REDUCCION_MOVIMIENTO_BUFF_ID)
call GroupRemoveUnit(GROUPMS, u)
call FlushChildHashtable(HTMS, Id)
if FirstOfGroup(GROUPMS) == null then
call PauseTimer(t2)
endif
/////////////////////
/////////////////////
set e = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function AddSlowMS takes unit u, real duration, integer slow, integer buff1, string attachpoint returns nothing
local integer Id = GetHandleId(u)
local integer NewSlow = LoadInteger(HTMS, Id, 0) + slow
local effect e = AddSpellEffectTargetById(buff1, EFFECT_TYPE_TARGET, u, attachpoint)
local integer i = LoadInteger(HTMS, Id, StringHash("0"))
local boolean B = false
local integer buff2
loop
set buff2 = LoadInteger(HTAS,Id, StringHash(("Buff" + I2S(i))))
set i = i - 1
exitwhen i < 0
if buff1 == buff2 then
set B = true
endif
endloop
if not(B) then
if FirstOfGroup(GROUPMS) == null then
call TimerStart(t2, PERIODIC, true, function TimerMS)
endif
call ApplyMS(u, NewSlow)
call SaveInteger(HTMS, Id, 0, NewSlow)
set i = LoadInteger(HTMS, Id, StringHash("0")) + 1
call SaveInteger(HTMS, Id, StringHash("0"), i)
call SaveReal(HTMS, Id, StringHash(("Dur" + I2S(i))), duration)
call SaveInteger(HTMS, Id, StringHash(("Buff" + I2S(i))), buff1)
call SaveEffectHandle(HTMS, Id, StringHash(("Efecto" + I2S(i))), e)
call SaveInteger(HTMS, Id, StringHash(("Lenteo" + I2S(i))), slow)
call SaveBoolean(HTMS, Id, StringHash(("Bool" + I2S(i))), true)
call GroupAddUnit(GROUPMS, u)
else
call DestroyEffect(e)
endif
///////////////////////////////////////////////////////
set e = null
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function AddBonusMS takes unit u, real duration, integer slow, integer buff1, string attachpoint returns nothing
call AddSlowMS(u, duration, -slow, buff1, attachpoint)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function GetSlowMS takes unit u returns integer
return LoadInteger(HTMS, GetHandleId(u), 0)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
function GetBonusMS takes unit u returns integer
return -LoadInteger(HTMS, GetHandleId(u), 0)
endfunction
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////////////
private function Init takes nothing returns nothing
set DUMMY = CreateUnit(Player(15), DUMMY_ID, 0,0,0)
call UnitAddAbility(DUMMY, REDUCCION_MOVIMIENTO_ID)
call UnitAddAbility(DUMMY, AUMENTO_MOVIMIENTO_ID)
call UnitAddAbility(DUMMY, AUMENTO_ATAQUE_ID)
call UnitAddAbility(DUMMY, REDUCCION_ATAQUE_ID)
call UnitRemoveAbility(DUMMY, REDUCCION_MOVIMIENTO_ID)
call UnitRemoveAbility(DUMMY, AUMENTO_MOVIMIENTO_ID)
call UnitRemoveAbility(DUMMY, AUMENTO_ATAQUE_ID)
call UnitRemoveAbility(DUMMY, REDUCCION_ATAQUE_ID)
endfunction
endlibrary[/jass]
- ParametricX y ParametricY:
- [jass]function ParametricX takes real t, real Largo, real Alto, real Grados returns real
return Largo * Cos(t) * Cos(Grados) - Alto * Sin(t) * Sin(Grados)
endfunction
function ParametricY takes real t, real Largo, real Alto, real Grados returns real
return Largo * Cos(t) * Sin(Grados) + Alto * Sin(t) * Cos(Grados)
endfunction[/jass]
Estas 2 funciones las copian en su código personalizado
- Deto Init:
- [gui]Init
Acontecimientos
Map initialization
Condiciones
Acciones
Tabla hash - Create a hashtable
Set HashTable = (Last created hashtable)
Set ID_DUMMY = DUMMY
[/gui]
Este detonador sirve para que seteen el dummy(usen un dummy que sea caster y modelo dummy) y se cree la Hastable (se aconseja que usen el mismo nombre para la Hashtable, si tienen una con ese nombre, no necesitan crear otra)
Llamarada Gigante: El mago sanguinario prepara sus llamaradas una a una y luego las hace explotar al unísono.
- Código:
- [gui]Llamarada Gigante Constantes
Acontecimientos
Map initialization
Condiciones
Acciones
Set LG_HabiDummy = Llamarada
Set LG_Habilidad = Llamarada Gigante
Set LG_ModeloEfecto = Abilities\Spells\Human\FlameStrike\FlameStrikeTarget.mdl
Set LG_Orden = flamestrike
[/gui]
[gui]Llamarada Gigante
Acontecimientos
Unidad - A unit Inicia el efecto de una habilidad
Condiciones
(Ability being cast) Igual a (==) LG_Habilidad
Acciones
Set _Caster = (Triggering unit)
Custom script: call AddSlowAS(udg__Target,15.00, 100, 'Bslo', "origin")
Set _Punto = (Position of (Triggering unit))
Set _Punto2 = (Target point of ability being cast)
Custom script: set udg__Angulo = Atan2(GetLocationY(udg__Punto2) - GetLocationY(udg__Punto), GetLocationX(udg__Punto2) - GetLocationX(udg__Punto))
Set _Distancia = (Distance between _Punto and _Punto2)
Set LG_Numero = ((Integer(_Distancia)) / 125)
Efecto especial - Create a special effect at _Punto2 using LG_ModeloEfecto
Set _Efecto = (Last created special effect)
Unidad - Create 1 Campesino for (Triggering player) at _Punto facing Vista edificio predeterminada (270.0) degrees
Custom script: call GroupAddUnit(udg_LG_IdentificadoresGrupo, bj_lastCreatedUnit)
Unidad - Hide (Last created unit)
Unidad - Activar pausa (Last created unit)
Set _Identificador = (Last created unit)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Distancia"), 0.00)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Instance"), 0)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Angulo"), udg__Angulo)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("X" + I2S(udg_LG_Numero))), GetLocationX(udg__Punto2))
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Y" + I2S(udg_LG_Numero))), GetLocationY(udg__Punto2))
Custom script: call SaveEffectHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Efecto" + I2S(udg_LG_Numero))), udg__Efecto)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("i"), udg_LG_Numero)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Numero"), udg_LG_Numero)
Custom script: call SaveUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"), udg__Caster)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("X0"), GetLocationX(udg__Punto))
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Y0"), GetLocationY(udg__Punto))
-------- ------------------------------------------------------------------------- --------
Custom script: if CountUnitsInGroup(udg_LG_IdentificadoresGrupo) == 1 then
Detonador - Turn on LlamaradaGigante
Custom script: endif
Custom script: call RemoveLocation(udg__Punto)
Custom script: call RemoveLocation(udg__Punto2)
[/gui]
[gui]LlamaradaGigante
Acontecimientos
Tiempo - Every 0.04 seconds of game time
Condiciones
Acciones
Custom script: if FirstOfGroup(udg_LG_IdentificadoresGrupo) != null then
-------- Spells Activos Mayor a 0 --------
Grupo de unidad - Pick every unit in LG_IdentificadoresGrupo and do (Actions)
Bucle: Acciones
Custom script: local real X = LoadReal(udg_HashTable, GetHandleId(GetEnumUnit()), StringHash("X0"))
Custom script: local real Y = LoadReal(udg_HashTable, GetHandleId(GetEnumUnit()), StringHash("Y0"))
Set _Identificador = (Picked unit)
Custom script: set udg__Instancia = LoadInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Instance")) + 1
Custom script: set udg__Distancia = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Distancia"))
Custom script: set udg__Angulo = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Angulo"))
Custom script: set udg_LG_Numero = LoadInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("i"))
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
_Instancia Mayor que (>) 5
Entonces: Acciones
Set _Instancia = 0
Set _Distancia = (_Distancia + 125.00)
Set LG_Numero = (LG_Numero - 1)
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
LG_Numero Igual a (==) 0
Entonces: Acciones
Custom script: set udg__Caster = LoadUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"))
Custom script: set udg_LG_Numero = LoadInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Numero"))
Custom script: set X = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("X" + I2S(udg_LG_Numero))))
Custom script: set Y = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Y" + I2S(udg_LG_Numero))))
Custom script: set udg__Punto = Location(X, Y)
Do Multiple ActionsFor each (Integer A) from 1 to LG_Numero, do (Actions)
Bucle: Acciones
Custom script: set X = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("X" + I2S(bj_forLoopAIndex))))
Custom script: set Y = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Y" + I2S(bj_forLoopAIndex))))
Custom script: set udg__Efecto = LoadEffectHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Efecto" + I2S(bj_forLoopAIndex))))
Custom script: call DestroyEffect(udg__Efecto)
Custom script: set bj_lastCreatedUnit = CreateUnit(GetOwningPlayer(udg__Identificador), udg_ID_DUMMY, X, Y, 0.00)
Custom script: call UnitApplyTimedLife(bj_lastCreatedUnit, 'BHbf', 1.00)
Custom script: call UnitAddAbility(bj_lastCreatedUnit, udg_LG_HabiDummy)
Custom script: call SetUnitAbilityLevel(bj_lastCreatedUnit, udg_LG_HabiDummy, GetUnitAbilityLevel(udg__Caster, udg_LG_Habilidad))
Custom script: call IssuePointOrder(bj_lastCreatedUnit, udg_LG_Orden, X, Y)
Do Multiple ActionsFor each (Integer A) from 1 to 4, do (Actions)
Bucle: Acciones
Set _Punto2 = (_Punto offset by 225.00 towards (-45.00 + (90.00 x (Real((Integer A))))) degrees)
Unidad - Create 1 ID_DUMMY for (Owner of _Identificador) at _Punto2 facing Vista edificio predeterminada (270.0) degrees
Unidad - Add a 1.00 second GenÃ
rico expiration timer to (Last created unit)
Unidad - Add LG_HabiDummy to (Last created unit)
Unidad - Set level of LG_HabiDummy for (Last created unit) to (Level of LG_Habilidad for _Caster)
Unidad - Order (Last created unit) to Humano mago sanguinario - Llamarada _Punto2
Custom script: call RemoveLocation(udg__Punto2)
Custom script: call RemoveLocation(udg__Punto)
Grupo de unidad - Remove _Identificador from LG_IdentificadoresGrupo
Custom script: call FlushChildHashtable(udg_HashTable, GetHandleId(udg__Identificador))
Unidad - Remove _Identificador from the game
Otros: Acciones
Custom script: set X = X + udg__Distancia * Cos(udg__Angulo)
Custom script: set Y = Y + udg__Distancia * Sin(udg__Angulo)
Custom script: set udg__Efecto = AddSpecialEffect(udg_LG_ModeloEfecto, X, Y)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Distancia"), udg__Distancia)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("X" + I2S(udg_LG_Numero))), X)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Y" + I2S(udg_LG_Numero))), Y)
Custom script: call SaveEffectHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash(("Efecto" + I2S(udg_LG_Numero))), udg__Efecto)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("i"), udg_LG_Numero)
Otros: Acciones
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Instance"), udg__Instancia)
Custom script: else
-------- 0 Spells Activos --------
Detonador - Turn off (This trigger)
Custom script: endif
[/gui]
- Screenshot:
![[Spellpack] Mago Sanguinario 0ca1c59464](https://puu.sh/uo0uF/0ca1c59464.jpg)
Lazo etéreo: La magia arcana permite al mago sanguinario trascender el cuerpo y conectarse con el espíritu, incluso con el de sus enemigos. Crea un lazo que roba un porcentaje de vida, maná, velocidad de ataque y velocidad de movimiento y convierte al mago sanguinario y al objetivo en étereos mientras estén atados.
- Requisito:
- Este spell necesita la librería "MS AS Modifier", es el único spell de los 4 que la usa
- Código:
- [gui]Lazo Etereo Constantes
Acontecimientos
Map initialization
Condiciones
Acciones
Set LE_Habilidad = Lazo etÃreo
Set LE_ModeloRayo = Robar vida
-------- El modelo de los buffs tambiÃn funciona como efecto en el spell --------
Set LE_BuffBenefico = Consumir maná (hechicero)
Set LE_BuffNegativo = Consumir maná (objetivo)
Set LE_DistanciaMAX = 1000.00
Set LE_Attachpoint = chest
Set LE_HabilidadDummy = Desaparición
[/gui]
[gui]Lazo Etereo
Acontecimientos
Unidad - A unit Inicia el efecto de una habilidad
Condiciones
(Ability being cast) Igual a (==) LE_Habilidad
Acciones
Set _Caster = (Triggering unit)
Set _Target = (Target unit of ability being cast)
Set _Damage = (Real((Level of LE_Habilidad for (Triggering unit))))
Set _Punto = (Position of (Triggering unit))
Unidad - Create 1 ID_DUMMY for (Triggering player) at _Punto facing Vista edificio predeterminada (270.0) degrees
Unidad - Add LE_HabilidadDummy to (Last created unit)
Unidad - Add a 1.00 second GenÃrico expiration timer to (Last created unit)
Unidad - Order (Last created unit) to Mago sanguinario humano- Desaparición _Caster
Unidad - Order (Last created unit) to Mago sanguinario humano- Desaparición _Target
Set _Punto2 = (Position of (Target unit of ability being cast))
Rayo - Create a LE_ModeloRayo lightning effect from source _Punto to target _Punto2
Set _Rayo = (Last created lightning effect)
Unidad - Create 1 Campesino for (Triggering player) at _Punto facing Vista edificio predeterminada (270.0) degrees
Custom script: call GroupAddUnit(udg_LE_IdentificadoresGrupo, bj_lastCreatedUnit)
Unidad - Hide (Last created unit)
Unidad - Activar pausa (Last created unit)
Set _Identificador = (Last created unit)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Instance"), 0)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("ASMS"), R2I(udg__Damage))
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Damage"), udg__Damage)
Custom script: call SaveLightningHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Rayo"), udg__Rayo)
Custom script: call SaveUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Target"), udg__Target)
Custom script: call SaveUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"), udg__Caster)
-------- ------------------------------------------------------------------------- --------
Custom script: if CountUnitsInGroup(udg_LE_IdentificadoresGrupo) == 1 then
Detonador - Turn on LazoEtereo
Custom script: endif
Custom script: call RemoveLocation(udg__Punto)
Custom script: call RemoveLocation(udg__Punto2)
[/gui]
[gui]LazoEtereo
Acontecimientos
Tiempo - Every 0.04 seconds of game time
Condiciones
Acciones
Custom script: if FirstOfGroup(udg_LE_IdentificadoresGrupo) != null then
-------- Spells Activos Mayor a 0 --------
Grupo de unidad - Pick every unit in LE_IdentificadoresGrupo and do (Actions)
Bucle: Acciones
Set _Identificador = (Picked unit)
Custom script: set udg__Instancia = LoadInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Instance")) + 1
Custom script: set udg__Damage = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Damage"))
Custom script: set udg__Rayo = LoadLightningHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Rayo"))
Custom script: set udg__Caster = LoadUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"))
Custom script: set udg__Target = LoadUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Target"))
Set _Punto = (Position of _Caster)
Set _Punto2 = (Position of _Target)
Rayo - Move _Rayo to source _Punto and target _Punto2
Set _Distancia = (Distance between _Punto and _Punto2)
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
_Distancia Mayor que o igual a (>=) LE_DistanciaMAX
Entonces: Acciones
Unidad - Order _Caster to Detener
Otros: Acciones
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
_Instancia Igual a (==) 25
Entonces: Acciones
Custom script: set udg__Instancia = LoadInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("ASMS"))
Custom script: call RemoveBuffAS(udg__Caster, udg_LE_BuffBenefico)
Custom script: call RemoveBuffMS(udg__Caster, 0000)
Custom script: call RemoveBuffAS(udg__Target, udg_LE_BuffNegativo)
Custom script: call RemoveBuffMS(udg__Target, 0000)
Custom script: call AddBonusAS(udg__Caster,15.00, udg__Instancia, udg_LE_BuffBenefico, udg_LE_Attachpoint)
Custom script: call AddSlowAS(udg__Target,15.00, udg__Instancia, udg_LE_BuffNegativo, udg_LE_Attachpoint)
Custom script: call AddBonusMS(udg__Caster,15.00, udg__Instancia, 0000, null)
Custom script: call AddSlowMS(udg__Target,15.00, udg__Instancia, 0000, null)
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("ASMS"), udg__Instancia + R2I(udg__Damage))
Unidad - Set life of _Caster to ((Percentage life of _Caster) + _Damage)%
Unidad - Set life of _Target to ((Percentage life of _Target) - _Damage)%
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
(Maná máx. of _Target) Mayor que (>) 0.00
Entonces: Acciones
Unidad - Set mana of _Caster to ((Percentage life of _Caster) + _Damage)%
Unidad - Set mana of _Target to ((Percentage life of _Target) - _Damage)%
Otros: Acciones
Set _Instancia = 0
Otros: Acciones
Custom script: call SaveInteger(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Instance"), udg__Instancia)
Custom script: call RemoveLocation(udg__Punto)
Custom script: call RemoveLocation(udg__Punto2)
Custom script: else
-------- 0 Spells Activos --------
Detonador - Turn off (This trigger)
Custom script: endif
[/gui]
[gui]Lazo Etereo Stop
Acontecimientos
Unidad - A unit Finaliza el lanzamiento de una habilidad
Unidad - A unit Detiene el lanzamiento de una habilidad
Condiciones
(Ability being cast) Igual a (==) LE_Habilidad
Acciones
Grupo de unidad - Pick every unit in LE_IdentificadoresGrupo and do (Actions)
Bucle: Acciones
Set _Identificador = (Picked unit)
Custom script: set udg__Caster = LoadUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"))
Custom script: set udg__Rayo = LoadLightningHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Rayo"))
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
(Triggering unit) Igual a (==) _Caster
Entonces: Acciones
Custom script: call DestroyLightning(udg__Rayo)
Grupo de unidad - Remove _Identificador from LE_IdentificadoresGrupo
Custom script: call FlushChildHashtable(udg_HashTable, GetHandleId(udg__Identificador))
Unidad - Remove _Identificador from the game
Otros: Acciones
[/gui]
- Screenshot:
Escudo Arcano: El mago sanguinario es un maestro en la magia arcana, lo que le permite crear un escudo a partir de esta magia. Una porción de todo daño que reciba quemará maná al enemigo en base al daño causado y restaurará un poco de maná al mago sanguinario y esa porción será disuelta.
- Código:
- [gui]Escudo Arcano Constantes
Acontecimientos
Map initialization
Condiciones
Acciones
-------- Aquà cuenta la animación Death --------
Set EA_ModeloEfecto = Abilities\Spells\Items\WandOfNeutralization\NeutralizationMissile.mdl
Set EA_Attachpoint = head
-------- Estas 2 variables DEBEN ser iguales --------
Set EA_Habilidad = Escudo Arcano
Set EA_Habilidad1 = Escudo Arcano
[/gui]
[gui]Escudo Arcano Init
Acontecimientos
Unidad - A unit Adquiere una habilidad
Condiciones
(Learned Hero Skill) Igual a (==) EA_Habilidad
(Learned skill level) Igual a (==) 1
Acciones
Detonador - Add to Escudo Arcanothe event (Unidad - (Triggering unit) Recibe daño)
[/gui]
[gui]Escudo Arcano
Acontecimientos
Condiciones
(Damage taken) Mayor que o igual a (>=) 20.00
Acciones
Set _Caster = (Triggering unit)
Set _Target = (Damage source)
Set _Damage = ((Damage taken) x (0.16 x (Real((Level of EA_Habilidad1 for _Caster)))))
Efecto especial - Create a special effect attached to the EA_Attachpoint of _Caster using EA_ModeloEfecto
Efecto especial - Destroy (Last created special effect)
Efecto especial - Create a special effect attached to the EA_Attachpoint of _Target using EA_ModeloEfecto
Efecto especial - Destroy (Last created special effect)
Unidad - Set life of _Caster to ((Vida of _Caster) + _Damage)
Unidad - Set mana of _Caster to ((Maná of _Caster) + _Damage)
Unidad - Set mana of _Target to ((Maná of _Target) - _Damage)
[/gui]
Vuelo del Fénix: Invoca un fénix que gira alrededor del Mago sanguinario dañando a todos los enemigos cercanos.
- Requisito:
- Este es el único spell que utiliza ParametricX y ParametricY
- Código:
- [gui]Vuelo del Fenix Constantes
Acontecimientos
Map initialization
Condiciones
Acciones
Set VF_Habilidad = Vuelo del FÃnix
Set VF_HabiDummy = Fuego de fÃnix (Spell)
Set VF_AoEDamage = 175.00
Set VF_AoESpell = 500.00
Set VF_AltoParabola = 150.00
Set VF_PeriodosPorSegundo = 0.75
Set VF_DuracionSpell = (5.00 / VF_PeriodosPorSegundo)
Set VF_ModeloFenix = units\human\phoenix\phoenix.mdl
-------- Este daño será recibida por las unidades que "choquen" contra el fÃnix. El DPS se configura desde la habilidad dummy --------
Set VF_Damage = 125.00
[/gui]
[gui]Vuelo del Fenix
Acontecimientos
Unidad - A unit Inicia el efecto de una habilidad
Condiciones
(Ability being cast) Igual a (==) VF_Habilidad
Acciones
Set _Caster = (Triggering unit)
Set _Punto = (Position of (Triggering unit))
Unidad - Create 1 ID_DUMMY for (Triggering player) at _Punto facing Vista edificio predeterminada (270.0) degrees
Unidad - Add VF_HabiDummy to (Last created unit)
Set _Dummy = (Last created unit)
Efecto especial - Create a special effect attached to the chest of (Last created unit) using VF_ModeloFenix
Set _Efecto = (Last created special effect)
Unidad - Create 1 Campesino for (Triggering player) at _Punto facing Vista edificio predeterminada (270.0) degrees
Custom script: call GroupAddUnit(udg_VF_IdentificadoresGrupo, bj_lastCreatedUnit)
Unidad - Hide (Last created unit)
Unidad - Activar pausa (Last created unit)
Set _Identificador = (Last created unit)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("t"), 0.00)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Tiempo"), 0.00)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Angulo"), 0.00)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Dist"), udg_VF_AoESpell / 2)
Custom script: call SaveGroupHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Grupo"), CreateGroup())
Custom script: call SaveUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Dummy"), udg__Dummy)
Custom script: call SaveUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"), udg__Caster)
Custom script: call SaveEffectHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Efecto"), udg__Efecto)
-------- ------------------------------------------------------------------------- --------
Custom script: if CountUnitsInGroup(udg_VF_IdentificadoresGrupo) == 1 then
Detonador - Turn on VuelodelFenix
Custom script: endif
Custom script: call RemoveLocation(udg__Punto)
[/gui]
[gui]VuelodelFenix
Acontecimientos
Tiempo - Every 0.04 seconds of game time
Condiciones
Acciones
Custom script: if FirstOfGroup(udg_VF_IdentificadoresGrupo) != null then
-------- Spells Activos Mayor a 0 --------
Grupo de unidad - Pick every unit in VF_IdentificadoresGrupo and do (Actions)
Bucle: Acciones
-------- Variables locales, siempre útiles --------
Custom script: local unit Picked
Custom script: local real X
Custom script: local real Y
Custom script: local real ParaX
Custom script: local real ParaY
Custom script: local real NewY
Custom script: local real NewX
Custom script: local real Facing
Custom script: local real t = LoadReal(udg_HashTable, GetHandleId(GetEnumUnit()),StringHash("T")) + (0.04) * udg_VF_PeriodosPorSegundo * (2* bj_PI)
-------- Cargamos los valores necesarios --------
Set _Identificador = (Picked unit)
Custom script: set udg__Angulo = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Angulo")) + (2.50 * bj_DEGTORAD)
Custom script: set udg__Caster = LoadUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Caster"))
Custom script: set udg__Dummy = LoadUnitHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Dummy"))
Custom script: set udg__Duracion = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Tiempo")) + 0.04
Custom script: set udg__Distancia = LoadReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Dist"))
Custom script: set udg_VF_GrupoNoDamage = LoadGroupHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Grupo"))
-------- Seteos de posición del dummy y facing angle --------
Custom script: set X = GetUnitX(udg__Caster) + udg__Distancia * Cos(udg__Angulo)
Custom script: set Y = GetUnitY(udg__Caster) + udg__Distancia * Sin(udg__Angulo)
Custom script: set ParaY = ParametricY(t, udg_VF_AoESpell / 2, udg_VF_AltoParabola, udg__Angulo)
Custom script: set ParaX = ParametricX(t, udg_VF_AoESpell / 2, udg_VF_AltoParabola, udg__Angulo)
Custom script: set NewX = X + ParaX
Custom script: set NewY = Y + ParaY
Custom script: set Facing = bj_RADTODEG * Atan2(NewY - GetUnitY(udg__Dummy), NewX - GetUnitX(udg__Dummy))
Custom script: call SetUnitFacingTimed( udg__Dummy, Facing, 0.00 )
Custom script: call SetUnitPosition(udg__Dummy, NewX, NewY)
Multiple FunctionsIf (All Conditions are True) then do (Then Actions) else do (Else Actions)
Si: Condiciones
_Duracion Menor que (<) VF_DuracionSpell
Entonces: Acciones
-------- Aquà se provoca el daño a las unidades cercanas --------
Custom script: set udg__Punto = Location(NewX, NewY)
Set _Grupo = (Units within VF_AoEDamage of _Punto matching ((((Matching unit) is Una estructura) Igual a (==) False) and ((((Matching unit) is Inmune a la magia) Igual a (==) False) and ((((Matching unit) is in VF_GrupoNoDamage) Igual a (==) False) and (((Matching unit) b
Grupo de unidad - Add all units of _Grupo to VF_GrupoNoDamage
Custom script: loop
Custom script: set Picked = FirstOfGroup(udg__Grupo)
Custom script: call GroupRemoveUnit(udg__Grupo, Picked)
Custom script: exitwhen Picked == null
Custom script: call UnitDamageTarget(udg__Caster, Picked, udg_VF_Damage, true, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_NORMAL, null)
Custom script: endloop
Custom script: call DestroyGroup(udg__Grupo)
Custom script: call RemoveLocation(udg__Punto)
Otros: Acciones
-------- Nulleamos el spell --------
Custom script: set udg__Efecto = LoadEffectHandle(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Efecto"))
Efecto especial - Destroy _Efecto
Custom script: call DestroyGroup(udg_VF_GrupoNoDamage)
Unidad - Kill _Dummy
Grupo de unidad - Remove _Identificador from VF_IdentificadoresGrupo
Custom script: call FlushChildHashtable(udg_HashTable, GetHandleId(udg__Identificador))
Unidad - Remove _Identificador from the game
-------- Guardamos los valores modificados para la próxima instancia --------
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Tiempo"), udg__Duracion)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("Angulo"), udg__Angulo)
Custom script: call SaveReal(udg_HashTable, GetHandleId(udg__Identificador), StringHash("t"), t)
Custom script: else
-------- 0 Spells Activos --------
Detonador - Turn off (This trigger)
Custom script: endif
[/gui]
- Screenshot:
![[Spellpack] Mago Sanguinario 97a2c99107](https://puu.sh/uo0tP/97a2c99107.jpg)
El modelo Dummy es de autor desconocido :\
Recuerda elegir tu especialidad o que estás interesado en aprender aquí
https://www.worldofeditors.net/t192-anuncio-sistema-de-especialidades-o-profesiones-del-editor
Link del map
Última edición por Marcos_M el Mar Feb 28, 2017 3:33 pm, editado 2 veces
Marcos_M
- Barra de Salud :
Mensajes : 3686
Reputación : 739
Monedas de Oro : 11337
![[Spellpack] Mago Sanguinario Empty](https://2img.net/i/fa/empty.gif)
- Pasatiempo FavoritoPertenecer en el Top 5 de Redactores del Foro.
Sáb Sep 14, 2013 3:37 pm
Supongo que hay que comentar para descargar 
NapoCapitán - Barra de Salud : Mensajes : 152 Reputación : 22
Monedas de Oro : 698
- Visionario AudiovisualTercer Puesto en el Concurso de Cinemáticas
Sáb Sep 14, 2013 4:13 pm
Wow que buenas habilidades!
Son buenas y creativas
PD: Haras un Spellpack de tu Invoker?
Son buenas y creativas
PD: Haras un Spellpack de tu Invoker?
XxDarkneosxXCapitán - Barra de Salud :
Mensajes : 159 Reputación : 20
Monedas de Oro : 169
Sáb Sep 14, 2013 4:37 pm
Puedo subir los spells del invoker. Pero el sistema noXxDarkneosxX escribió:Wow que buenas habilidades!
Son buenas y creativas
PD: Haras un Spellpack de tu Invoker?
Marcos_M- Barra de Salud : Mensajes : 3686 Reputación : 739
Monedas de Oro : 11337
- Pasatiempo FavoritoPertenecer en el Top 5 de Redactores del Foro.
Mar Sep 24, 2013 12:44 pm
Buen spellpack no encontré errores y todo parece andar como deberia, así que APRUEBO
no encontré errores y todo parece andar como deberia, así que APRUEBO 
ILoGyCaballero - Barra de Salud : Mensajes : 405 Reputación : 81
Monedas de Oro : 2442
- Creador del ApocaplisisTercer Puesto en el Concurso de BossesPensador de HéroesTercer Puesto en el Concurso de Ideas Heroicas
Mar Sep 24, 2013 2:12 pm
me gusto mucho el fenix
![[Spellpack] Mago Sanguinario Blackbaradenultimatefor](https://2img.net/r/ihimizer/v2/550x270q90/16/blackbaradenultimatefor.jpg)
Adram
- Barra de Salud : Mensajes : 250 Reputación : 31
Monedas de Oro : 520
Vie Nov 01, 2013 1:48 am
Genial sigue asi
el_rokhanAprendiz - Barra de Salud : Mensajes : 17 Reputación : 1
Monedas de Oro : 60
Vie Nov 29, 2013 9:03 pm
el escudo arcano es como el escudo de mana del warcraft mele ?
mondragonAprendiz - Barra de Salud : Mensajes : 16 Reputación : 0
Monedas de Oro : 24
Vie Nov 29, 2013 10:52 pm
No, el escudo de maná produce que el maná de la unidad absorba el daño recibido(pero sin reducciones). Mi escudo arcano absorbe una parte de daño, transformandolo en maná para el mago sanguinario y reduciendo esa cantidad de maná al enemigomondragon escribió:el escudo arcano es como el escudo de mana del warcraft mele ?
No entiendes lo que digo cuando comento??
https://www.worldofeditors.net/t184-glosario-de-terminos-en-we
Poderes sin canalizarse
Crear poderes pasivos y poderes autocast
Marcos_M- Barra de Salud : Mensajes : 3686 Reputación : 739
Monedas de Oro : 11337
- Pasatiempo FavoritoPertenecer en el Top 5 de Redactores del Foro.
Mar Dic 24, 2013 3:39 pm
comento para ver la descarga
mi versión de Dota AI
http://www.epicwar.com/maps/237928/
mi mapa Arena AI
http://www.epicwar.com/maps/239139/
jefferson940Peón - Barra de Salud : Mensajes : 40 Reputación : 1
Monedas de Oro : 257
Jue Dic 26, 2013 12:53 am
Buen aporte. Descargando...
Son nuestras elecciones las que definen lo que somos, más que nuestras habilidades...
Taurus459Iniciado - Barra de Salud : Mensajes : 3 Reputación : 0
Monedas de Oro : 3
Lun Dic 30, 2013 2:11 am
Aver si comento aparece link de dowload?? jeje
Blade MasterCapitán - Barra de Salud : Mensajes : 181 Reputación : 2
Monedas de Oro : 611
Sáb Feb 01, 2014 11:11 pm
Luce prometedor voy a ver.
Pd: muy creativos los spells
Pd: muy creativos los spells
Profetus mapper
Guerras infernales oficial:https://www.worldofeditors.net/t961-guerras-infernales-oficial
ProfetusAprendiz - Barra de Salud : Mensajes : 18 Reputación : 0
Monedas de Oro : 159
Miér Feb 12, 2014 10:42 pm
comentado jejeje
chamanexoAprendiz - Barra de Salud :
Mensajes : 24 Reputación : 0
Monedas de Oro : 24
Lun Mar 03, 2014 11:46 am
esto se ve genial
alex20693Aprendiz - Barra de Salud : Mensajes : 12 Reputación : 0
Monedas de Oro : 12
Dom Mayo 04, 2014 4:32 am
Muy bueno
AGUANTE ONE PIECE CHICOS Y CHICAS
Heber12Aprendiz - Barra de Salud : Mensajes : 29 Reputación : 0
Monedas de Oro : 90
Dom Jun 15, 2014 12:43 am
Comento para ver enlace.
Nombre Mapa: SMW [Simple mapa de Warcraft]
Progreso: %20
Héroes Actuales: 7
SkarYPeón - Barra de Salud : Mensajes : 31 Reputación : 3
Monedas de Oro : 43
-
Jue Jul 03, 2014 6:22 pm
curiosidad x el spell
dariemPeón - Barra de Salud : Mensajes : 38 Reputación : 1
Monedas de Oro : 105
Lun Jul 28, 2014 8:21 pm
a probarlo
humberto25Peón - Barra de Salud : Mensajes : 55 Reputación : 6
Monedas de Oro : 211
Mar Ago 05, 2014 3:39 pm
biien
KeiverJIniciado - Barra de Salud : Mensajes : 4 Reputación : 0
Monedas de Oro : 4
Contenido patrocinado
Página 1 de 3. • 1, 2, 3
Temas similares» Necesito Modelo: Arquero a caballo elfo sanguinario
» Sakura's SpellPack [GUI]
» Darkterror Spellpack[GUI]
» [Spellpack] Volibear v1.1
» [Spellpack]Cazador de Sombras
» Sakura's SpellPack [GUI]
» Darkterror Spellpack[GUI]
» [Spellpack] Volibear v1.1
» [Spellpack]Cazador de Sombras
Página 1 de 3.
Permisos de este foro:
No puedes responder a temas en este foro.|
|
|
![[Spellpack] Mago Sanguinario Voteba10](https://i.servimg.com/u/f80/18/80/18/54/voteba10.png){kind=small}
» 【CONCURSO】 Creación de Héroes III / Forjando Campeones
» [Aporte] Mapas de las campañas de Warcraft III - por Gerhalt
» DotA 6.83d_AI 1.8 "Kokox" Español
» Otro editor de mundos?
» Salón de la Fama
» 【CREAR SPELLS EN WC3】 Naruto - Rasengan
» [ANUNCIO] [2023] Nuevo Estilo!
» Sistema de Buff para GUI
» Íconos ocultos por defecto
» Fucion de objetos con inventario lleno (tutomap)
» Has Tu DOTA y no jodas mas [+IA] = By ArOn
» Problema con el world editor
» [Spellpack] Mago Sanguinario
» Habilidad pasiva que haga que falles