创建了一群 单位,对他们发动移动命令阵型的问题

akasha

按阵型创建了一群 单位,对他们发动移动命令,结果阵型乱了....可能是太挤了的缘故....

我有关碰撞和设为飞行单位,还是要乱.怎么办呢?

冰块

阵型？
魔兽你是不能保持阵型的吧

马甲君

在平地上是可以保持阵型的！！！

冰块

一攻击也就散架了吧

马甲君

废话！

楼主要的是在移动时保持阵型好吧，再说了，你见过哪个游戏近战单位攻击时还能保持阵型的？

马甲君

引用第5楼jhonny于2008-08-22 19:14发表的  :
SC2能够保持么

演示视频里面反正是没有

akasha

天,我的意思是像dota里面的希瓦一样,像冰环一样的技能,围者一个单位按圆形创造冰环单位,然后按着阵型角度像外移动,看起来就像向外扩散的圆形波一样.......但是我移动他们他们就有点乱了...

冰块

...
这个是阵型问题么...
用极点坐标不断移动单位就是了

马甲君

引用第7楼akasha于2008-08-22 19:16发表的  :
天,我的意思是像dota里面的希瓦一样,像冰环一样的技能,围者一个单位按圆形创造冰环单位,然后按着阵型角度像外移动,看起来就像向外扩散的圆形波一样.......但是我移动他们他们就有点乱了...

唉，好像是某位语文老师的语文没学好~~~~~~

akasha

用极点坐标不断移动单位就是了 是怎么移动?

我用的RB+TIMER .035设置单位X,Y轴,但是比DOTA里面卡一些

所以就想是不是哪里不对..

总的来说还是比较流畅,但是感觉比DOTA卡一点点,怎么办啊

akasha

另外,总共创建了48个单位,每.02秒的话在我的测试机上就更卡了,但是在家里的电脑测试没感觉

冰块

把代码发上来

large

[jass]

function JHFilter takes nothing returns boolean
    return IsUnitEnemy(GetFilterUnit(),GetOwningPlayer(udg_U_temp))and GetUnitAbilityLevel(GetFilterUnit(),'A001')==0 and GetUnitState(GetFilterUnit(),UNIT_STATE_LIFE)>1 and IsUnitType(GetFilterUnit(),UNIT_TYPE_STRUCTURE)==false
endfunction
function removeJH takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local unit u = ConvertUnit( GetStoredInteger(CacheValue(), HandleName(t), "UTG"))
    call UnitRemoveAbility( u, 'A001' )
    call FlushStoredMission( CacheValue(), HandleName(t) )
    call DestroyTimer( t )
    set t = null
endfunction

function JHActions takes nothing returns nothing
    local timer tt = CreateTimer()
    local location p = GetUnitLoc(GetEnumUnit())
    call UnitAddAbility( GetEnumUnit(), 'A001' )
    call AddSpecialEffectLocBJ( p, "Abilities\\\\Spells\\\\Undead\\\\FrostNova\\\\FrostNovaTarget.mdl" )
    call DestroyEffect( GetLastCreatedEffectBJ() )
    call RemoveLocation(p)
    set p = null
    call UnitDamageTarget( udg_U_temp2, GetEnumUnit(), 200.00, false, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_FIRE, WEAPON_TYPE_WHOKNOWS )
    call StoreInteger( CacheValue(), HandleName(tt), "UTG", ConvertHandleInt(GetEnumUnit()) )
    call TimerStart( tt, 3 , false, function removeJH )  
    set tt = null
    //call UnitRemoveAbility( GetEnumUnit(), 'A001' )
endfunction
function boo takes nothing returns nothing
    local timer t = GetExpiredTimer()
    local unit u1 = ConvertUnit( GetStoredInteger(CacheValue(), HandleName(t), "UTG") )
    local unit u2 = ConvertUnit( GetStoredInteger(CacheValue(), HandleName(t), "UBOO"))
    local integer cs =  GetStoredInteger(CacheValue(), HandleName(t), "INT")
    local real angle = 0
    local real tempX = 0
    local real tempY = 0
    local boolexpr lCheck=Condition(function JHFilter)   
    local group lGroup=CreateGroup()
    set angle =  GetUnitFacing(u2)
    set tempX = GetUnitX( u2 ) + 23 * Cos( (3.14159/180) * angle  )
    set tempY = GetUnitY( u2 ) + 23 * Sin( (3.14159/180) * angle  )
    call SetUnitX( u2, tempX )
    call SetUnitY( u2, tempY )
    set cs = cs + 23
    set udg_U_temp = u1
    call GroupEnumUnitsInRange(lGroup,tempX,tempY,90,lCheck)
    if(IsUnitGroupEmptyBJ(lGroup) == false) then
    set udg_U_temp2 = u1
    call ForGroupBJ(lGroup,function JHActions)
    endif
    call DestroyGroup(lGroup)
    set lGroup = null
    call StoreInteger( CacheValue(), HandleName(t), "INT", cs )
    if(cs>546) then
    call KillUnit(u2)
    call FlushStoredMission( CacheValue(), HandleName(t) )
    call DestroyTimer( t )
    endif
    set t = null
    set u1 = null
    set u2 = null
endfunction



function JHCheck takes nothing returns boolean
    return GetSpellAbilityId()=='Aroa'
endfunction
function Trig_NewTrigger_001_Actions takes nothing returns nothing
    local timer t
    local integer xunhuan = 0
    local location p2 = GetUnitLoc(GetTriggerUnit())
    local real angle
    loop
    exitwhen xunhuan > 47
        set t = CreateTimer()  
        set angle = ( ( I2R(xunhuan) + 1 ) * 7.5 )
        call CreateNUnitsAtLoc( 1, 'ewsp', GetOwningPlayer(GetTriggerUnit()), p2, angle )
        set xunhuan = xunhuan + 1
        call StoreInteger( CacheValue(), HandleName(t), "UTG", ConvertHandleInt(GetTriggerUnit()) )  
        call StoreInteger( CacheValue(), HandleName(t), "UBOO", ConvertHandleInt(GetLastCreatedUnit()) )
        call StoreInteger( CacheValue(), HandleName(t), "INT", 0 )
        call TimerStart( t, .03, true, function boo )  
        set t = null
    endloop
    call RemoveLocation(p2)
    set p2 = null
endfunction

//===========================================================================
function InitTrig_NewTrigger_001 takes nothing returns nothing
    set gg_trg_NewTrigger_001 = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_NewTrigger_001, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition(gg_trg_NewTrigger_001,Condition(function JHCheck))
    call TriggerAddAction( gg_trg_NewTrigger_001, function Trig_NewTrigger_001_Actions )
endfunction

[/jass]

akasha

发了。

actboy168

1 timer一个就够了
2 没考虑每个单位只能受到一次伤害
3 BJ函数很多

akasha

那个,是有考虑每个单位只受一次伤害的....local boolexpr lCheck=Condition(function JHFilter)      的
JHFilter不知道为什么发掉了,里面有考虑到,测试的时候一个单位只受到一次伤害是通过了的

另外,就算没有伤害效果,只是移动单位创造视觉上的效果,还是比DOTA卡,这个移动单位必须每个单位创造一个即使器吧?因为我不知道怎么用缓存保存单位数组,不能一个即使器里面用FOR做48次...另外如果用单位组的话,就会更卡....

akasha

难道for48次缓存所有的单位?那样的硬盘读写会更慢吧?

actboy168

用单位组绑定计时器