JASS tags bug

[GhostWolf]

When ever I type something in JASS tags and then edit my post (or even get into the edit and then going back) it deletes all my code except the first line.

Help !!

 

[Marcelo Hossomi]

Try goiing advanced and editing it, I've just experienced that and worked don't know why xD

 

[GhostWolf]

Worked, its still kinda annoying but it works ^^

Thanks Hossomi

 

[redmarine]

But still the administrators could kill the bug.

 

[Wolverabid]

Worked, its still kinda annoying but it works ^^

Indeed: an advanced edit always does the trick. I'll remind Ralle of this minor glitch (it's come up in the past).

 

[PurplePoot]

test
test
test
test

EDIT: It works fine for me. Try disabling full WYSIWYG editing.

 

[Dr Super Good]

Whats wrong is that appon updating it looks messed up (all code is on 1 line).

To fix, simply refresh the web page.

 

[Earth-Fury]

These
 
lines
 
should
 
be
 
double
 
spaced
 
but
 
are
 
not.

fix plx and thx.

 

[Dr Super Good]

I still think the ones on WC3search were superior to these.

They used to auto indent and colourise the JASS as well as supporting unilamted spaces between functions and even in functions.

 

[Earth-Fury]

struct extends interface needs library requires scope defaults uses static method
:< no vJASS for THW :<

    <-- that is a tab, but not 4 spaces wide. (Conversion to 4 spaces plox)
    debug function <-- come on! thats not even vJASS!

again

with

the

line

spacing

issue

:<

Really, I must say, the

 tags here truly do fall short in so many ways. Lets hope Ralle can adress all my concerns with the [code=jass] tags! :3

 

[Dr Super Good]

The tab thing can not be classed as a bug, as normally you can not input tabs into your browser as it is by default the skip button that goes to another object that you can interact with.

The lack of support for blank lines is a bug however that should eventually be fixed, I have knowen about this for ages but at the time development of the tags stopped so it never was corrected.

vJASS support is not really required since although it would be nice, 90% or more of all inputted code is normal JASS and so it may not be worth the extra work.

I also say the ability for auto indent that the tags at WC3search had would be nice in them. However as configurable option so as to enable people to choose weather they want auto indent or not.

 

[HINDYhat]

Please add vJass support. Here's the list of syntax you'd need to cover:

struct endstruct
interface endinterface
debug
library endlibrary
requires
needs
uses
scope endscope
method endmethod
defaults
private
public
static
operator
keyword
readonly
initializer

All of the above would be bold styled.

//! This is a preprocessor comment

The above line should be bold and grey.

Please add this if possible! :<

 

[Ralle]

I don't see any indenting bugs. Can you record it and send over?

 

[HINDYhat]

Yay for Ralle! Thanks for adding all of that vJass syntax! The only thing left is the bold grey preprocessor comment ( //! ) but that's not really important.
+Rep

 

[PurplePoot]

There is also library_once.

 

[Silvenon]

And maybe onDestroy? But that's probably stupid.....

 

[PurplePoot]

No, that's just a function (well, method), not an identifier or whatever you call them...

 

[Silvenon]

I'm just used to having that bolded also, because TESH bolds it.

 

[Dr Super Good]

TESH is over ratted, it does crap all. Well that is atleast what I have seen it do.

 

[wd40bomber7]

TESH is over ratted, it does crap all. Well that is atleast what I have seen it do.

I'm sorry, I don't quite get your meaning there. TESH isn't really overrated. It works great. If your using an external skin it may not work correctly. It actually has more features then Jasscraft and its in WE, what more could you want. (Besides vJASS!)

 

[Dr Super Good]

It fails to do anything. WE still looks the same as normal WE and there is no syntax highlighting at all.

 

[wd40bomber7]

Wierd. It works absolutely fine for me. I don't know why it wouldn't work for you.

 

[HINDYhat]

Wayyy back, when I was running on french wc3, it didn't work. That might be DSG's issue, or maybe he's just really stubborn.

 

[Dr Super Good]

Well I am running english TFT on a swiss XP computer. But still I did everything it says and it does not work.

Even when I run it outside JNGP it comes up with some error saying a .dll can not be found and even if its right next to the file or anywhere else it can possiably look for it. I say bad programming of the utility that I can not locate vital components some times.

 

[HINDYhat]

You cannot run it outside JNGP... JNGP packs all of these wonderful utilities into one mega editor.

 

[Need_O2]

One more thing with Jass Tags
When I copy

LoL
LoL

it coppies as LoL LoL
make it copy
LoL
LoL

(I know I can copy from Quote but SHOULD BE FIXED)

 

[HINDYhat]

That works when using Internet Explorer. There's probably something in Firefox's options that you can change to make that work, but I dunno... whenever I want to copy Jass like that, I just open IE.

 

[Need_O2]

its ok on wc3c
(own3d)

 

[Ralle]

its ok on wc3c
(own3d)

Please stop going off-topic.

I will see what I can do to this problem

 

[Dr Super Good]

Works fine when copying in IE 7.

I think it is caused by firefox's slightly less developed graphics engine and so the makers may eventually fix the problem.

 

[Ralle]

I have done some serious debugging today. Please try the tag again and do everything you can to screw it up!

 

[DesKaladA]

I accept your chanenge
TASTE COMON J

TATE IT

//===========================================================================

// 

// Just another Warcraft III map

// 

//   Warcraft III map script

//   Generated by the Warcraft III World Editor

//   Date: Sat Nov 17 17:36:47 2007

//   Map Author: Unknown

// 

//===========================================================================



//***************************************************************************

//*

//*  Global Variables

//*

//***************************************************************************



globals

    // Generated

    trigger                 gg_trg_Instructions        = null

    trigger                 gg_trg_DragDropCombine     = null

    trigger                 gg_trg_Weapons             = null

    trigger                 gg_trg_Initialization      = null

endglobals



function InitGlobals takes nothing returns nothing

endfunction



//***************************************************************************

//*

//*  Items

//*

//***************************************************************************



function CreateAllItems takes nothing returns nothing

    local integer itemID



    call CreateItem( 'FC0A', 129.3, 235.8 )

    call CreateItem( 'FC0A', 222.8, 169.3 )

    call CreateItem( 'FC0B', 225.2, -81.9 )

    call CreateItem( 'FC0B', 217.4, 54.8 )

    call CreateItem( 'PL00', 267.5, 239.3 )

    call CreateItem( 'PL00', -49.2, 302.2 )

    call CreateItem( 'PL10', 62.4, 306.6 )

    call CreateItem( 'PL20', 193.5, 304.6 )

endfunction



//***************************************************************************

//*

//*  Unit Creation

//*

//***************************************************************************



//===========================================================================

function CreateUnitsForPlayer0 takes nothing returns nothing

    local player p = Player(0)

    local unit u

    local integer unitID

    local trigger t

    local real life



    set u = CreateUnit( p, 'Hblm', 7.9, 5.3, 30.851 )

endfunction



//===========================================================================

function CreatePlayerBuildings takes nothing returns nothing

endfunction



//===========================================================================

function CreatePlayerUnits takes nothing returns nothing

    call CreateUnitsForPlayer0(  )

endfunction



//===========================================================================

function CreateAllUnits takes nothing returns nothing

    call CreatePlayerBuildings(  )

    call CreatePlayerUnits(  )

endfunction



//***************************************************************************

//*

//*  Custom Script Code

//*

//***************************************************************************

//TESH.scrollpos=0

//TESH.alwaysfold=0



//***************************************************************************

//*

//*  Triggers

//*

//***************************************************************************



//===========================================================================

// Trigger: DragDropCombine

//===========================================================================

//TESH.scrollpos=36

//TESH.alwaysfold=0

library DragDropCombine initializer Init

    globals

        private trigger t

        private gamecache g

    endglobals



    //===============================================================================================

    function SetDragDropCombo takes integer itemid, integer gem, integer result returns nothing

        call StoreInteger(g,I2S(gem),I2S(itemid),result)

    endfunction



    //===============================================================================================

    function SetDragDropComboDouble takes integer i1, integer i2, integer result returns nothing

     local string k1=I2S(i1)

     local string k2=I2S(i2)

        call StoreInteger(g,k1,k2,result)

        call StoreInteger(g,k2,k1,result)

     set g=null

    endfunction



    //===============================================================================================

    function SetDragDropSound takes integer itemid, string soundpath returns nothing

        call StoreString(g,"sounds",I2S(itemid),soundpath)

    endfunction



    //===============================================================================================

    private function Trig_DragDropCombine_Conditions takes nothing returns boolean

     local integer i=GetIssuedOrderId()

        return (i>=852002) and (i<=852007)

    endfunction



    //===============================================================================================

    private function Trig_DragDropCombine_Actions takes nothing returns nothing

     local integer i=GetIssuedOrderId()-852002

     local unit u=GetTriggerUnit()

     local item it=GetOrderTargetItem()

     local item ot=UnitItemInSlot(u,i)

     local string k1=I2S(GetItemTypeId(it))

     local string k2

     local sound snd

        if HaveStoredString(g,"sounds",k1) then

            set snd=CreateSound(GetStoredString(g,"sounds",k1), false, false, true, 12700, 12700, "")

            if GetLocalPlayer()==GetOwningPlayer(u) then

                call StartSound(snd)

            endif

            call KillSoundWhenDone(snd)

           set snd=null

        endif

        if (ot!=null) then

            set k2=I2S(GetItemTypeId(ot))

            if HaveStoredInteger(g,k1,k2) then

                call RemoveItem(it)

                call RemoveItem(ot)

                call UnitAddItemToSlotById(u,GetStoredInteger(g,k1,k2), i)

            endif

        endif

     set u=null

     set it=null

     set ot=null

     set g=null

    endfunction



    private function Init takes nothing returns nothing

     set t = CreateTrigger(  )

     set g = InitGameCache("dragdropcombo.vx")

        call TriggerRegisterAnyUnitEventBJ(t, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER )

        call TriggerAddCondition(t, Condition( function Trig_DragDropCombine_Conditions ) )

        call TriggerAddAction(t, function Trig_DragDropCombine_Actions )

    endfunction

endlibrary//===========================================================================

// Trigger: Weapons

//===========================================================================

//TESH.scrollpos=0

//TESH.alwaysfold=0

library Weapons initializer Init requires DragDropCombine

    globals

    

    endglobals

    

    private function Init takes nothing returns nothing

        call SetDragDropCombo('PL00','FC0A','PL0A')

        call SetDragDropCombo('PL00','FC0B','PL0B')

    endfunction

endlibrary//===========================================================================

// Trigger: Initialization

//

// Default melee game initialization for all players

//===========================================================================

function Trig_Initialization_Actions takes nothing returns nothing

endfunction



//===========================================================================

function InitTrig_Initialization takes nothing returns nothing

    set gg_trg_Initialization = CreateTrigger(  )

    call TriggerAddAction( gg_trg_Initialization, function Trig_Initialization_Actions )

endfunction



//===========================================================================

function InitCustomTriggers takes nothing returns nothing

    call InitTrig_DragDropCombine(  )

    call InitTrig_Weapons(  )

    call InitTrig_Initialization(  )

endfunction



//===========================================================================

function RunInitializationTriggers takes nothing returns nothing

    call ConditionalTriggerExecute( gg_trg_Initialization )

endfunction



//***************************************************************************

//*

//*  Players

//*

//***************************************************************************



function InitCustomPlayerSlots takes nothing returns nothing



    // Player 0

    call SetPlayerStartLocation( Player(0), 0 )

    call SetPlayerColor( Player(0), ConvertPlayerColor(0) )

    call SetPlayerRacePreference( Player(0), RACE_PREF_HUMAN )

    call SetPlayerRaceSelectable( Player(0), true )

    call SetPlayerController( Player(0), MAP_CONTROL_USER )



endfunction



function InitCustomTeams takes nothing returns nothing

    // Force: TRIGSTR_006

    call SetPlayerTeam( Player(0), 0 )



endfunction



//***************************************************************************

//*

//*  Main Initialization

//*

//***************************************************************************



//===========================================================================

function main takes nothing returns nothing

    call SetCameraBounds( -3328.0 + GetCameraMargin(CAMERA_MARGIN_LEFT), -3584.0 + GetCameraMargin(CAMERA_MARGIN_BOTTOM), 3328.0 - GetCameraMargin(CAMERA_MARGIN_RIGHT), 3072.0 - GetCameraMargin(CAMERA_MARGIN_TOP), -3328.0 + GetCameraMargin(CAMERA_MARGIN_LEFT), 3072.0 - GetCameraMargin(CAMERA_MARGIN_TOP), 3328.0 - GetCameraMargin(CAMERA_MARGIN_RIGHT), -3584.0 + GetCameraMargin(CAMERA_MARGIN_BOTTOM) )

    call SetDayNightModels( "Environment\\DNC\\DNCLordaeron\\DNCLordaeronTerrain\\DNCLordaeronTerrain.mdl", "Environment\\DNC\\DNCLordaeron\\DNCLordaeronUnit\\DNCLordaeronUnit.mdl" )

    call NewSoundEnvironment( "Default" )

    call SetAmbientDaySound( "VillageDay" )

    call SetAmbientNightSound( "VillageNight" )

    call SetMapMusic( "Music", true, 0 )

    call CreateAllItems(  )

    call CreateAllUnits(  )

    call InitBlizzard(  )

    call InitGlobals(  )

    call InitCustomTriggers(  )

    call RunInitializationTriggers(  )



endfunction



//***************************************************************************

//*

//*  Map Configuration

//*

//***************************************************************************



function config takes nothing returns nothing

    call SetMapName( "TRIGSTR_001" )

    call SetMapDescription( "TRIGSTR_003" )

    call SetPlayers( 1 )

    call SetTeams( 1 )

    call SetGamePlacement( MAP_PLACEMENT_USE_MAP_SETTINGS )



    call DefineStartLocation( 0, 0.0, 0.0 )



    // Player setup

    call InitCustomPlayerSlots(  )

    call SetPlayerSlotAvailable( Player(0), MAP_CONTROL_USER )

    call InitGenericPlayerSlots(  )

endfunction

//===========================================================================

// 

// Just another Warcraft III map

// 

//   Warcraft III map script

//   Generated by the Warcraft III World Editor

//   Date: Sat Nov 17 17:36:47 2007

//   Map Author: Unknown

// 

//===========================================================================



//***************************************************************************

//*

//*  Global Variables

//*

//***************************************************************************



globals

    // Generated

    trigger                 gg_trg_Instructions        = null

    trigger                 gg_trg_DragDropCombine     = null

    trigger                 gg_trg_Weapons             = null

    trigger                 gg_trg_Initialization      = null

endglobals



function InitGlobals takes nothing returns nothing

endfunction



//***************************************************************************

//*

//*  Items

//*

//***************************************************************************



function CreateAllItems takes nothing returns nothing

    local integer itemID



    call CreateItem( 'FC0A', 129.3, 235.8 )

    call CreateItem( 'FC0A', 222.8, 169.3 )

    call CreateItem( 'FC0B', 225.2, -81.9 )

    call CreateItem( 'FC0B', 217.4, 54.8 )

    call CreateItem( 'PL00', 267.5, 239.3 )

    call CreateItem( 'PL00', -49.2, 302.2 )

    call CreateItem( 'PL10', 62.4, 306.6 )

    call CreateItem( 'PL20', 193.5, 304.6 )

endfunction



//***************************************************************************

//*

//*  Unit Creation

//*

//***************************************************************************



//===========================================================================

function CreateUnitsForPlayer0 takes nothing returns nothing

    local player p = Player(0)

    local unit u

    local integer unitID

    local trigger t

    local real life



    set u = CreateUnit( p, 'Hblm', 7.9, 5.3, 30.851 )

endfunction



//===========================================================================

function CreatePlayerBuildings takes nothing returns nothing

endfunction



//===========================================================================

function CreatePlayerUnits takes nothing returns nothing

    call CreateUnitsForPlayer0(  )

endfunction



//===========================================================================

function CreateAllUnits takes nothing returns nothing

    call CreatePlayerBuildings(  )

    call CreatePlayerUnits(  )

endfunction



//***************************************************************************

//*

//*  Custom Script Code

//*

//***************************************************************************

//TESH.scrollpos=0

//TESH.alwaysfold=0



//***************************************************************************

//*

//*  Triggers

//*

//***************************************************************************



//===========================================================================

// Trigger: DragDropCombine

//===========================================================================

//TESH.scrollpos=36

//TESH.alwaysfold=0

library DragDropCombine initializer Init

    globals

        private trigger t

        private gamecache g

    endglobals



    //===============================================================================================

    function SetDragDropCombo takes integer itemid, integer gem, integer result returns nothing

        call StoreInteger(g,I2S(gem),I2S(itemid),result)

    endfunction



    //===============================================================================================

    function SetDragDropComboDouble takes integer i1, integer i2, integer result returns nothing

     local string k1=I2S(i1)

     local string k2=I2S(i2)

        call StoreInteger(g,k1,k2,result)

        call StoreInteger(g,k2,k1,result)

     set g=null

    endfunction



    //===============================================================================================

    function SetDragDropSound takes integer itemid, string soundpath returns nothing

        call StoreString(g,"sounds",I2S(itemid),soundpath)

    endfunction



    //===============================================================================================

    private function Trig_DragDropCombine_Conditions takes nothing returns boolean

     local integer i=GetIssuedOrderId()

        return (i>=852002) and (i<=852007)

    endfunction



    //===============================================================================================

    private function Trig_DragDropCombine_Actions takes nothing returns nothing

     local integer i=GetIssuedOrderId()-852002

     local unit u=GetTriggerUnit()

     local item it=GetOrderTargetItem()

     local item ot=UnitItemInSlot(u,i)

     local string k1=I2S(GetItemTypeId(it))

     local string k2

     local sound snd

        if HaveStoredString(g,"sounds",k1) then

            set snd=CreateSound(GetStoredString(g,"sounds",k1), false, false, true, 12700, 12700, "")

            if GetLocalPlayer()==GetOwningPlayer(u) then

                call StartSound(snd)

            endif

            call KillSoundWhenDone(snd)

           set snd=null

        endif

        if (ot!=null) then

            set k2=I2S(GetItemTypeId(ot))

            if HaveStoredInteger(g,k1,k2) then

                call RemoveItem(it)

                call RemoveItem(ot)

                call UnitAddItemToSlotById(u,GetStoredInteger(g,k1,k2), i)

            endif

        endif

     set u=null

     set it=null

     set ot=null

     set g=null

    endfunction



    private function Init takes nothing returns nothing

     set t = CreateTrigger(  )

     set g = InitGameCache("dragdropcombo.vx")

        call TriggerRegisterAnyUnitEventBJ(t, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER )

        call TriggerAddCondition(t, Condition( function Trig_DragDropCombine_Conditions ) )

        call TriggerAddAction(t, function Trig_DragDropCombine_Actions )

    endfunction

endlibrary//===========================================================================

// Trigger: Weapons

//===========================================================================

//TESH.scrollpos=0

//TESH.alwaysfold=0

library Weapons initializer Init requires DragDropCombine

    globals

    

    endglobals

    

    private function Init takes nothing returns nothing

        call SetDragDropCombo('PL00','FC0A','PL0A')

        call SetDragDropCombo('PL00','FC0B','PL0B')

    endfunction

endlibrary//===========================================================================

// Trigger: Initialization

//

// Default melee game initialization for all players

//===========================================================================

function Trig_Initialization_Actions takes nothing returns nothing

endfunction



//===========================================================================

function InitTrig_Initialization takes nothing returns nothing

    set gg_trg_Initialization = CreateTrigger(  )

    call TriggerAddAction( gg_trg_Initialization, function Trig_Initialization_Actions )

endfunction



//===========================================================================

function InitCustomTriggers takes nothing returns nothing

    call InitTrig_DragDropCombine(  )

    call InitTrig_Weapons(  )

    call InitTrig_Initialization(  )

endfunction



//===========================================================================

function RunInitializationTriggers takes nothing returns nothing

    call ConditionalTriggerExecute( gg_trg_Initialization )

endfunction



//***************************************************************************

//*

//*  Players

//*

//***************************************************************************



function InitCustomPlayerSlots takes nothing returns nothing



    // Player 0

    call SetPlayerStartLocation( Player(0), 0 )

    call SetPlayerColor( Player(0), ConvertPlayerColor(0) )

    call SetPlayerRacePreference( Player(0), RACE_PREF_HUMAN )

    call SetPlayerRaceSelectable( Player(0), true )

    call SetPlayerController( Player(0), MAP_CONTROL_USER )



endfunction



function InitCustomTeams takes nothing returns nothing

    // Force: TRIGSTR_006

    call SetPlayerTeam( Player(0), 0 )



endfunction



//***************************************************************************

//*

//*  Main Initialization

//*

//***************************************************************************



//===========================================================================

function main takes nothing returns nothing

    call SetCameraBounds( -3328.0 + GetCameraMargin(CAMERA_MARGIN_LEFT), -3584.0 + GetCameraMargin(CAMERA_MARGIN_BOTTOM), 3328.0 - GetCameraMargin(CAMERA_MARGIN_RIGHT), 3072.0 - GetCameraMargin(CAMERA_MARGIN_TOP), -3328.0 + GetCameraMargin(CAMERA_MARGIN_LEFT), 3072.0 - GetCameraMargin(CAMERA_MARGIN_TOP), 3328.0 - GetCameraMargin(CAMERA_MARGIN_RIGHT), -3584.0 + GetCameraMargin(CAMERA_MARGIN_BOTTOM) )

    call SetDayNightModels( "Environment\\DNC\\DNCLordaeron\\DNCLordaeronTerrain\\DNCLordaeronTerrain.mdl", "Environment\\DNC\\DNCLordaeron\\DNCLordaeronUnit\\DNCLordaeronUnit.mdl" )

    call NewSoundEnvironment( "Default" )

    call SetAmbientDaySound( "VillageDay" )

    call SetAmbientNightSound( "VillageNight" )

    call SetMapMusic( "Music", true, 0 )

    call CreateAllItems(  )

    call CreateAllUnits(  )

    call InitBlizzard(  )

    call InitGlobals(  )

    call InitCustomTriggers(  )

    call RunInitializationTriggers(  )



endfunction



//***************************************************************************

//*

//*  Map Configuration

//*

//***************************************************************************



function config takes nothing returns nothing

    call SetMapName( "TRIGSTR_001" )

    call SetMapDescription( "TRIGSTR_003" )

    call SetPlayers( 1 )

    call SetTeams( 1 )

    call SetGamePlacement( MAP_PLACEMENT_USE_MAP_SETTINGS )



    call DefineStartLocation( 0, 0.0, 0.0 )



    // Player setup

    call InitCustomPlayerSlots(  )

    call SetPlayerSlotAvailable( Player(0), MAP_CONTROL_USER )

    call InitGenericPlayerSlots(  )

endfunction

 

[Ralle]

Are the double line-breaks on purpose?

 

[Wolverabid]

Outstanding bug extermination Chieftain!

//===================================
//Spell: Cluster Bombs
//Author: paskovich
//
//If you want to import this spell,
//make sure you copy the dummy units
//from the object editor,
//and set the raw codes below!
//
//For damage values, copy and edit
//the 'Cluster Damage' ability.
//
//It uses the Handle Vars and 
//     REQUIRES vJASS!!
//
//Thanks to Shadow1500 for the
//parabola function!
//
//
//Don't forget to give a credit!
//===================================

//=============RAW CODES=============
//Make sure you set the proper raw codes!

constant function ClusterBombs_SpellId takes nothing returns integer
    return 'A000' //The main ability's raw code
endfunction

constant function ClusterBombs_DummyId takes nothing returns integer
    return 'e000' //The generic dummy's raw code
endfunction

constant function ClusterBombs_AoEDamageAbility takes nothing returns integer
    return 'A001' //The AoE damage ability's raw code (it's called "Cluster Damage" in the object editor)
endfunction


//===========SPELL OPTIONS===========

constant function ClusterBombs_NumberOfBombs takes integer level returns integer
    return 1 + level //This defines the number of bombs falling from the sky.
endfunction

constant function ClusterBombs_NumberOfClusters takes nothing returns integer
    return 3 //The number of clusters that a bomb falls apart to.
endfunction

constant function ClusterBombs_AoE takes nothing returns real
    return 500.0 //The radius of the AoE. (Set this the same that you set in the object editor for the hero ability.)
endfunction

constant function ClusterBombs_Delay takes nothing returns real
    return 0.9 //The delay time between falling bombs.
endfunction

//=======================================
//============CLUSTER BOMBS==============
//=======================================
struct ClusterBombData
    unit c
    unit p
    real tx
    real ty
    real ang
    real dist
    real mdist
endstruct

function Trig_ClusterBomb_Conditions takes nothing returns boolean
    return GetSpellAbilityId() == ClusterBombs_SpellId()
endfunction

function Timer_ClusterBombSplinter takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local ClusterBombData dat3 = ClusterBombData(GetHandleInt(t,"data3"))
    local unit s = dat3.p
    local real a = dat3.ang
    local real h = GetParabolaHeight(dat3.dist, dat3.mdist, 1)
    local real offset = ClusterBombs_AoE() / 28
    call SetUnitX(s, GetUnitX(s)+offset*Cos(a*bj_DEGTORAD))
    call SetUnitY(s, GetUnitY(s)+offset*Sin(a*bj_DEGTORAD))
    call SetUnitFlyHeight(s,h,0)
    set dat3.dist = dat3.dist + offset
    if dat3.dist >= dat3.mdist then
        call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Other\\Incinerate\\FireLordDeathExplode.mdl",GetUnitX(s),GetUnitY(s)))
        call KillUnit(s)
        call PauseTimer(t)
        call FlushHandleLocals(t)
        call DestroyTimer(t)
        call ClusterBombData.destroy(dat3)
    endif
    set t = null
    set s = null
endfunction

function Timer_ClusterBombFall takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local ClusterBombData dat2 = ClusterBombData(GetHandleInt(t,"data2"))
    local ClusterBombData dat3
    local unit b = null
    local real a = 0
    local timer tt = null
    local unit s = null
    local real offset = ClusterBombs_AoE() / 25
    if dat2.dist >= dat2.mdist then
        set b = dat2.p
        set a = dat2.ang
        call ShowUnit(b,true)
        call SetUnitX(b, GetUnitX(b) + offset * Cos(a*bj_DEGTORAD))
        call SetUnitY(b, GetUnitY(b) + offset * Sin(a*bj_DEGTORAD))
        call SetUnitFlyHeight(b, GetUnitFlyHeight(b) - 60, 0)
        if GetUnitFlyHeight(b) <= 40 then
            call PauseTimer(t)
            call DestroyEffect(AddSpecialEffect("Abilities\\Weapons\\LordofFlameMissile\\LordofFlameMissile.mdl",GetUnitX(b),GetUnitY(b)))
            set a = 0
            loop
                set a = a + 1
                exitwhen a > ClusterBombs_NumberOfClusters()
                set s = CreateUnit(GetOwningPlayer(b),ClusterBombs_DummyId(),GetUnitX(b),GetUnitY(b),0)
                call AddSpecialEffectTarget("abilities\\weapons\\DemolisherMissile\\DemolisherMissile.mdl",s,"origin")
                call UnitAddAbility(s, ClusterBombs_AoEDamageAbility())
                call SetUnitScale(s, 0.5, 0.5, 0.5)
                set tt = CreateTimer()
                set dat3 = ClusterBombData.create()
                set dat3.p = s
                set dat3.ang = GetRandomReal(1,360)
                set dat3.dist = 0
                set dat3.mdist = GetRandomReal(ClusterBombs_AoE()/8,ClusterBombs_AoE()/1.8)
                call SetHandleInt(tt,"data3",dat3)
                call TimerStart(tt, 0.04, true, function Timer_ClusterBombSplinter)
                set tt = null
            endloop
            call RemoveUnit(b)
            call FlushHandleLocals(t)
            call DestroyTimer(t)
            call ClusterBombData.destroy(dat2)
        endif
    else
        set dat2.dist = dat2.dist + 0.04
    endif
    set t = null
    set b = null
endfunction

function Timer_ClusterBombFlash takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local ClusterBombData dat = ClusterBombData(GetHandleInt(t,"data"))
    local ClusterBombData dat2
    local unit u = dat.c
    local unit p = dat.p
    local real a = dat.ang
    local real h = GetParabolaHeight(dat.dist, dat.mdist, 2)
    local timer tt = null
    local integer c = 0
    local real tx = 0
    local real ty = 0
    local real offset = 4 * ClusterBombs_AoE() / 57
    call SetUnitX(p, GetUnitX(p)+offset*Cos(a*bj_DEGTORAD))
    call SetUnitY(p, GetUnitY(p)+offset*Sin(a*bj_DEGTORAD))
    call SetUnitFlyHeight(p, h, 0)
    set dat.dist = dat.dist + offset
    if dat.dist >= dat.mdist then
        call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Human\\Flare\\FlareCaster.mdl",GetUnitX(p),GetUnitY(p)))
        call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Human\\Flare\\FlareTarget.mdl",GetUnitX(p),GetUnitY(p)))
        call KillUnit(p)
        loop
            set c = c + 1
            exitwhen c > ClusterBombs_NumberOfBombs(GetUnitAbilityLevel(u,ClusterBombs_SpellId()))
            set a = GetRandomReal(1,360)
            set h = GetRandomReal(ClusterBombs_AoE()/1.3,ClusterBombs_AoE()/0.66)
            set tx = dat.tx + h * Cos(a*bj_DEGTORAD)
            set ty = dat.ty + h * Sin(a*bj_DEGTORAD)
            set p = CreateUnit(GetOwningPlayer(u),ClusterBombs_DummyId(),tx,ty,a)
            call AddSpecialEffectTarget("Abilities\\Weapons\\Mortar\\MortarMissile.mdl", p, "origin")
            call SetUnitFlyHeight(p,1700,0)
            call ShowUnit(p,false)
            set tt = CreateTimer()
            set dat2 = ClusterBombData.create()
            set dat2.p = p
            set dat2.ang = a+180
            set dat2.dist = 0
            set dat2.mdist = c * ClusterBombs_Delay()
            call SetHandleInt(tt,"data2",dat2)
            call TimerStart(tt, 0.04, true, function Timer_ClusterBombFall)
            set tt = null
        endloop
        call PauseTimer(t)
        call FlushHandleLocals(t)
        call DestroyTimer(t)
        call ClusterBombData.destroy(dat)
    endif
    set t = null
    set u = null
    set p = null
endfunction

function Trig_ClusterBomb_Actions takes nothing returns nothing
    local unit u = GetTriggerUnit()
    local location l = GetSpellTargetLoc()
    local real tx = GetLocationX(l)
    local real ty = GetLocationY(l)
    local timer t = CreateTimer()
    local unit p = CreateUnit(GetOwningPlayer(u),ClusterBombs_DummyId(),GetUnitX(u),GetUnitY(u),0)
    local ClusterBombData dat = ClusterBombData.create()
    call RemoveLocation(l)
    set l = null
    call SetUnitFlyHeight(u,20,0)
    call AddSpecialEffectTarget("Abilities\\Weapons\\BloodElfMissile\\BloodElfMissile.mdl",p,"origin")
    set dat.c = u
    set dat.p = p
    set dat.tx = tx
    set dat.ty = ty
    set dat.ang = AngleBetweenPointsXY(GetUnitX(u),GetUnitY(u),tx,ty)
    set dat.dist = 0
    set dat.mdist = DistanceBetweenPointsXY(GetUnitX(u),GetUnitY(u),tx,ty)
    call SetHandleInt(t,"data",dat)
    call TimerStart(t, 0.04, true, function Timer_ClusterBombFlash)
    set u = null
    set t = null
    set p = null
endfunction

//===========================================================================
function InitTrig_ClusterBomb takes nothing returns nothing
    set gg_trg_ClusterBomb = CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ(gg_trg_ClusterBomb, EVENT_PLAYER_UNIT_SPELL_EFFECT)
    call TriggerAddCondition(gg_trg_ClusterBomb, Condition( function Trig_ClusterBomb_Conditions))
    call TriggerAddAction(gg_trg_ClusterBomb, function Trig_ClusterBomb_Actions)
    call RemoveUnit(CreateUnit(Player(15),ClusterBombs_DummyId(),0,0,0))
    call Preload("Abilities\\Weapons\\BloodElfMissile\\BloodElfMissile.mdl")
    call Preload("Abilities\\Weapons\\Mortar\\MortarMissile.mdl")
    call Preload("Abilities\\Spells\\Human\\Flare\\FlareCaster.mdl")
    call Preload("Abilities\\Spells\\Human\\Flare\\FlareTarget.mdl")
    call Preload("abilities\\weapons\\DemolisherMissile\\DemolisherMissile.mdl")
    call Preload("Abilities\\Weapons\\LordofFlameMissile\\LordofFlameMissile.mdl")
    call Preload("Abilities\\Spells\\Other\\Incinerate\\FireLordDeathExplode.mdl")
endfunction

» REP DUMP «

 

[Silvenon]

Whoa.......? You fixed the CnP thing too?? Nice job!

I think I'm gonna take a look at that Wolverabid's rep dump link....

 

[Need_O2]

Nice...
no no NICE!!!
I love you

 

[DesKaladA]

Are the double line-breaks on purpose?

yep

its a formating ting

 

[Earth-Fury]

Problem 1

    call Preload("Abilities\\Weapons\\LordofFlameMissile\\LordofFlameMissile.mdl")
    call Preload("Abilities\\Weapons\\LordofFlameMissile\\LordofFlameMissile.mdlmorecraptoillustrait")

Long lines wrap to two lines at a space, but scroll off the end properly without one. This also seems to happen in the edit box now. Its more annoying than a lack of proper spacing

---

Problem 2

[jass=Copied from Wolves post from quoting it] set dat2.mdist = c * ClusterBombs_Delay()
call SetHandleInt(tt,"data2",dat2)
call TimerStart(tt, 0.04, true, function Timer_ClusterBombFall)
set tt = null
endloop[/code]


[jass=Copied from Wolves post from within the compiled JASS tag] set dat2.mdist = c * ClusterBombs_Delay()
call SetHandleInt(tt,"data2",dat2)
call TimerStart(tt, 0.04, true, function Timer_ClusterBombFall)
set tt = null
endloop[/code]

the line set tt = null displays and copys without the spaces.

---

Problem 3

	if true then
		loop
			if true then
				exitwhen true
			endif
		endloop
	endif

Tabs are now completely collapsed and do not display, it seems.

---

Problem 4

library endlibrary
library_once endlibrary

The library_once keyword works exactly like library but you can declare the same library name twice, it would just ignore the second declaration and avoid to add its contents instead of showing a syntax error, it is useful in combination with textmacros.

---

Feature Request 1

//! textmacro
//! endtextmacro

Preprocessor comments highlighted differently than normal comments plox.

---

Feature Request 2

//code
//code

[code=jass]
//code
//code
[/code]

//code
//code

[code=jass]//code
//code[/code]

Would be nice if both compiled to the same thing. The first example displays with an additional line at the top.

---

Misc.

Firefox version 2.0.0.12 with Noscript (hiveworkshop.com is whitelisted.)
Safari (Some shitty windows version)
Opera (Too lazy to check version)

All 3 display the same.

IE 7

Displays a vertical scroll bar in the first example, cuts off the right border of the quote box, and does not center the horizontal rules. (hr) I could check 6, 5.55, 5.01, and 4 too if you care

 

[Ralle]

Check out the jass tag now!

 

[Pyritie]

It'd be nice if the jass boxes had a wider width, or at least one that stretched.

Because I'm on a huge resolution and the jass box only takes up a third of the screen. Which is annoying having to fiddle with the scrollbar all the time.

 

[PurgeandFire]

Pyritie, you can always just do this. Use ljass tags. And type whatever. Then it will stretch the page like so. But I don't think other people use the ljass tags. xP

So yeah, I guess the width should definitely be increased at least a bit.

//! textmacro

Textmacro tags are usually gray but whatever xD I like them red anyway.

Looks awesome Ralle! +rep

 

[Ralle]

I can make the //! comments gray if you guys want it. I just needed it to be different

 

[HINDYhat]

Yeah, usually they are grey and bolded (?)

Other than that, GREAT work Ralle!

 

[busterkomo]

bolded (?)

Na, they aren't bolded.

 

[Silvenon]

Na, they aren't bolded.

Yes they are. Check out Wc3Campaign's jass tags for example.

EDIT: Btw, why are hvo's diamonds smaller and....err....changing colors and stuff? It's not that I'm jealous, just curious.

 

[Pyritie]

Yes they are. Check out Wc3Campaign's jass tags for example.

EDIT: Btw, why are hvo's diamonds smaller and....err....changing colors and stuff? It's not that I'm jealous, just curious.

Read the Reputation FAQ sticky in the Site Discussion forum.

 

[Ralle]

Wc3c is not the template of how things are done. How does the mainstream syntax highlighters highlight it?

 

[Silvenon]

Sorry, I didn't mean it like that. Other than wc3campaigns, there is also TESH highlighting (that's gray and bold). I don't know any other references, put any style you wish Ralle, just not pink.

 

[Ralle]

I'll make it pink. Thanks!

Any other highlighters? Is TESH mainstream? How does Vexorian's vim extension highlight it?

 

[DesKaladA]

Ralle TESH is mainsteream for vjass because whoever made it also adds tesh to vjass