Jump Spell

[HydraRancher]

//***************************************************************************
//*                                                                         *
//* Jumping Spell Template v3                                               *
//* ¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯            **URL in the works                 *
//* Parabola function by Shadow1500                                         *
//* System by emjlr3                                                        *
//*                                                                         *
//* Requires:                                                               *
//* ¯¯¯¯¯¯¯¯¯                                                               *
//*                                                                         *
//* - A vJASS Preprocessor                                                 *
//*                                                                         *
//***************************************************************************

library JST initializer InitJST

globals
    // Speed at which unit's periodic movement is completed (.01-.04 recommended)
    private constant real Interval          = .025
    // Value which represents the arc of the jump movement (1.-2.), closer to 2. for a flatter arc
    private constant real Arc               = 1.3 
    // Rawcode of the Crow Form ability in your map.  This need only be changed if you have edited this ability
    // in which case, create a new, unedited copy and use it here
    private constant integer CrowForm       = 'Amrf' 
    // Rawcode of peasant unit in your map.  This need only be changed if you have edited this unit
    // in which case, create a new, unedited copy and ise it here
    private constant integer Peasant        = 'hpea'
endglobals

//=====No touching past this point=====\\

globals
    private real Game_MaxX 
    private real Game_MinX 
    private real Game_MaxY 
    private real Game_MinY
    
    private constant real Runs = 1./Interval
    private constant integer HalfRuns = R2I(Runs/2.)
    
    private location L
    
    private sound S = CreateSoundFromLabel( "InterfaceError",false,false,false,10,10)
endglobals

private function Parabola takes real dist, real maxdist returns real
    local real t = (dist*2)/maxdist-1
    return (-t*t+1)*(maxdist/Arc)
endfunction
private function InitJST takes nothing returns nothing
    set Game_MaxX = GetRectMaxX(bj_mapInitialPlayableArea)-50.
    set Game_MinX = GetRectMinX(bj_mapInitialPlayableArea)+50.
    set Game_MaxY = GetRectMaxY(bj_mapInitialPlayableArea)-50.
    set Game_MinY = GetRectMinY(bj_mapInitialPlayableArea)+50.
endfunction

public function CheckLocPathing takes location l returns boolean
    local unit u = CreateUnitAtLoc( Player(13), Peasant, l, 0. )
    local real x = GetUnitX(u) - GetLocationX(l)
    local real y = GetUnitY(u) - GetLocationY(l)
    local boolean b = false
    
    if x < 1. and x > -1. and  y < 1. and y > -1. then        
        set b = true
    endif
    call ShowUnit(u,false)
    call KillUnit(u)
    
    call RemoveLocation(l)
    set u = null
    return b
endfunction

private function SafeX takes real x returns real
    if x<Game_MinX then
        return Game_MinX
    elseif x>Game_MaxX then
        return Game_MaxX
    endif
    return x
endfunction
private function SafeY takes real y returns real
    if y<Game_MinY then
        return Game_MinY
    elseif y>Game_MaxY then
        return Game_MaxY
    endif
    return y
endfunction

private struct dat
    unit u
    real area
    real damage
    real maxdist
    real movedist
    real cos
    real sin
    real diff
    real start_z
    string sfx  
    integer i = 0
endstruct

globals
    private timer T = CreateTimer()
    private dat array D
    private integer Total = 0
endglobals

//Spell:
private function Filt takes nothing returns boolean
    return IsUnitEnemy(GetFilterUnit(),bj_groupEnumOwningPlayer) and IsUnitType(GetFilterUnit(),UNIT_TYPE_FLYING)!=true
endfunction    
private function Damage takes unit u, real dam, real x, real y, real area returns nothing
    local group g = CreateGroup()
    local unit v

    set bj_groupEnumOwningPlayer = GetOwningPlayer(u)
    call GroupEnumUnitsInRange(g, x, y, area, Condition(function Filt))
    loop
        set v = FirstOfGroup(g)
        exitwhen v == null
        call GroupRemoveUnit(g,v)
        call UnitDamageTarget(u,v,dam,false,false,ATTACK_TYPE_NORMAL,DAMAGE_TYPE_NORMAL,null)
    endloop 
   
    call DestroyGroup(g)
    set g = null
endfunction

private function Movement takes nothing returns nothing
    local dat d
    local integer i = 1
    local real dist  
    local real height
    local real x
    local real y
    
    loop
        exitwhen i>Total
        set d = D<i>
    
        set d.i = d.i + 1
        set dist = d.i*d.movedist
        
        set L = GetUnitLoc(d.u)
        set height = GetLocationZ(L)
        if height&lt;d.start_z then
            set height = (d.start_z-height)+Parabola(dist,d.maxdist)
        elseif height&gt;d.start_z then
            if d.start_z+Parabola(dist,d.maxdist)&lt;=height then
                set height = 0.
            else
                set height = Parabola(dist,d.maxdist)-(height-d.start_z)
            endif
        else
            set height = Parabola(dist,d.maxdist)
        endif
        call RemoveLocation(L)
        
        call SetUnitX(d.u,SafeX(GetUnitX(d.u)+d.movedist*d.cos))
        call SetUnitY(d.u,SafeY(GetUnitY(d.u)+d.movedist*d.sin))
        call SetUnitFlyHeight(d.u,height,0.)
        
        if d.i == HalfRuns then
            call SetUnitTimeScale(d.u, 1.)
        elseif height&lt;=1. then
            call PauseUnit( d.u,false )
            call SetUnitPathing( d.u, true )           
            call SetUnitFlyHeight(d.u,GetUnitDefaultFlyHeight(d.u),0.) 
            call SetUnitAnimation(d.u,&quot;stand&quot;)
            set x = GetUnitX(d.u) + d.diff * d.cos
            set y = GetUnitY(d.u) + d.diff * d.sin 
            call DestroyEffect(AddSpecialEffect(d.sfx, x,y))  
            call Damage(d.u, d.area, x, y, d.damage)  
            
            call d.destroy() 
            set D<i> = D[Total]
            set Total = Total - 1
            set i = i - 1
            if Total==0 then
                call PauseTimer(T)
            endif
        endif
        
        set i = i + 1
    endloop
endfunction     

//===========================================================================
public function Cast takes unit u, real damage, real area, real diff, string anim, string sfx returns boolean
    local dat d      
    local real ux
    local real uy   
    local location l 
    local real ang
    local real x
    local real y 
    
    if u==null or damage&lt;0. or area&lt;0. then
        if GetLocalPlayer()==GetOwningPlayer(u) then
            call ClearTextMessages()
            call BJDebugMsg(&quot;|c00FF0000JST Error: Invalid inputs in function Cast.&quot;)
            call StartSound(S)
        endif
        return false
    endif
    
    set d = dat.create()       
    set ux = GetUnitX(u)
    set uy = GetUnitY(u)   
    set l = GetSpellTargetLoc() 
    set ang = Atan2((GetLocationY(l)-uy),(GetLocationX(l)-ux))
    set x = GetLocationX(l) - diff * Cos(ang)
    set y = GetLocationY(l) - diff * Sin(ang)
    
    set d.u = u
    set d.damage = damage
    set d.area = area
    set d.sfx = sfx
    set d.maxdist = SquareRoot((ux-x)*(ux-x) + (uy-y)*(uy-y))
    set d.cos = Cos(ang)
    set d.sin = Sin(ang)
    set d.movedist = d.maxdist/Runs
    set d.diff = diff
    set L = GetUnitLoc(d.u)
    set d.start_z = GetLocationZ(L)
    call RemoveLocation(L)
   
    call PauseUnit( u,true )
    call SetUnitPathing( u, false )
    call UnitAddAbility( u,CrowForm )
    call UnitRemoveAbility( u,CrowForm )
    call SetUnitAnimation(u, anim) 
    call SetUnitTimeScale(u, .30) 
    
    set Total = Total + 1
    if Total == 1 then
        call TimerStart(T,Interval,true,function Movement) 
    endif
    set D[Total] = d
    
    call RemoveLocation(l)
    set l = null 
    return true
endfunction

endlibrary</i></i>

this is the DIRECT C+P trigger in my map.
Its by emjlr3 although, when I attempt it, a cloud effect appears yet nothing else happens, I am also able to cast it anywhere:nuts:.

 

[Builder Bob]

Doubt you'll get much more help in the Jass section actually, as I wouldn't think the error is in the code.

How do you call the jump function? Can we see that part of your code?

 

[HydraRancher]

I didnt make this, this is a direct c+p from the 1 trigger I have, jump spell template.

 

[chovynz]

Nevermind.

 

[Builder Bob]

Regardless of whether you made it yourself or not (I know Emjlr3 made it), nothing will happen in your map unless you call the function Cast from this template in one of your spell triggers. That's why I ask for the rest of your triggers. If you don't have any, then that's the reason it's not doing anything.

Did any more documentation come with this template?

 

[HydraRancher]

The instructions said just c+p THIS trigger but there were others.

 

[HydraRancher]

bump

 

[Builder Bob]

The instructions said just c+p THIS trigger but there were others.

Well, what did they say?

 

[Tom Jones]

Well, what did they say?

They are just examples. I would like to see how you use the JST_Cast function.

 

[HydraRancher]

hmm? I dont understand

 

[Tt112233]

Just copying and pasting this code will do absolutely nothing. You have to somehow call the code (JST_Jump in this case) somewhere in your trigger. If you haven't done this, then you should go do it now. If yes, then post the code that calls JST_Jump as that's where the problem lies.

 

[wraithseeker]

If you want a jump, you can try manipulating Extended knockback System, it has some sort of a jump too

 

[HydraRancher]

Sorry I am absolutely HORRIBLE at Jass and I dont know much . What does this mean - calling a function?

 

[saw792]

To make it work add a custom script line in your spell actions:

call JST_Cast(udg_YourUnit, <Damage amount>, <Damage AOE>, <Speed>, <Animation to be player>, <SFX string path>)

So just set a unit to a variable and fill in the remaining fields.

 

[HydraRancher]

Where do I put this code? can someone show a fixed ver?

 

[emjlr3]

custom script in a GUI trigger divider

you should really read the Read Me packaged in the demo map