Записи участника ([DUОS]) - Форум


Правила форума ·

Результаты поиска

[DUОS]

#153 | Тема: Speed Hill System
Code
function SH_Filter takes nothing returns boolean
     local unit u = GetFilterUnit()
     local real a = GetUnitFacing(u)
     local real x = GetUnitX(u)+80.*Cos(a*.0174532)
     local real y = GetUnitY(u)+80.*Sin(a*.0174532)
     local location l = Location(x,y)
     local location l2 = GetUnitLoc(u)
     local real z = GetLocationZ(l)
     local real z2 = GetLocationZ(l2)
     local real z3Rb = z - z2
     local real dms = GetUnitDefaultMoveSpeed(u)  
      
     if IsUnitType(u,UNIT_TYPE_GROUND) or IsUnitType(u, UNIT_TYPE_HERO) then
          
         if z3Rb > 30. and z3Rb < 69. then
             call SetUnitMoveSpeed(u,dms*.3)
         endif
          
         if z3Rb > 70. and z3Rb < 179. then
             call SetUnitMoveSpeed(u,dms*.1)
         endif
          
         if z3Rb > 180. and z3Rb < 999. then
             call SetUnitMoveSpeed(u,0.)
         endif

         if z3Rb >= -15. and z3Rb <= 15. then
             call SetUnitMoveSpeed(u,dms)
         endif
          
         if z3Rb < -30. and z3Rb > -69. then
             call SetUnitMoveSpeed(u,dms*1.5)
         endif
          
         if z3Rb < -80. and z3Rb > -999. then
             call SetUnitMoveSpeed(u,dms*2.)
         endif
       
     endif
      
     call RemoveLocation(l)
     call RemoveLocation(l2)
   
     return false
endfunction

function SH_Ac takes nothing returns nothing
     local group g = CreateGroup()    
      
     call GroupEnumUnitsInRect(g,GetWorldBounds(),Filter(function SH_Filter))

     call DestroyGroup(g)
     set g = null
endfunction

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

function InitTrig_hill_System takes nothing returns nothing
     set gg_trg_hill_System = CreateTrigger()
     call TriggerRegisterTimerEvent(gg_trg_hill_System,.20,true)
     call TriggerAddAction(gg_trg_hill_System,function SH_Ac)
endfunction


Вот он - нормальный безутечный код твоей системы.
Школа - это место, где шлифуют булыжники и портят алмазы. © Роберт Ингерсолл

[DUОS]

#157 | Тема: Octo Push
Название: Octo Push
Категория: Melee
Кол-во игроков: 1-8
Описание: Стандартное Melee с 8-ю горами.
Прикрепления: 4375148.jpg (32.9 Kb)
Школа - это место, где шлифуют булыжники и портят алмазы. © Роберт Ингерсолл

[DUОS]

#158 | Тема: Официальные модификации от Blizzard



Прикрепления: 4336455.jpg (65.9 Kb) · 6701169.jpg (75.4 Kb) · 2642095.jpg (72.9 Kb) · 0358410.jpg (85.0 Kb)
Сообщение отредактировал [DUOS] - Вс, 15.04.12, 14:25
Школа - это место, где шлифуют булыжники и портят алмазы. © Роберт Ингерсолл

[DUОS]

#161 | Тема: [ВАЖНО] Предложения на модерацию
Quote (nikikin)
надо изменить дизайн кнопок)

Не забывай, что у меня накрылся комп и я с линукса. Но дизайн кнопок я постараюсь как можно скорее поменять.
Школа - это место, где шлифуют булыжники и портят алмазы. © Роберт Ингерсолл

[DUОS]

#165 | Тема: Edgus
Edgus,
Однозначно хороший, трушный чел.
Школа - это место, где шлифуют булыжники и портят алмазы. © Роберт Ингерсолл
Поиск: