2. function SlidePick takes nothing returns nothing
  3. ForGroup(GetUnitsInRectAll(GetPlayableMapRect()), function Sliding)
  4. endfunction
  6. function Sliding takes nothing returns nothing
  7. local unit Runner = GetEnumUnit()
  8. local real Ms = GetUnitMoveSpeed(Runner)/1.5
  9. local real x = GetUnitX(Runner)
  10. local real y = GetUnitY(Runner)
  11. if GetTerrainType(GetUnitX(Runner),GetUnitY(Runner)) == 'Nice' then
  12. call SetUnitX(Runner, x+Ms*Cos(GetUnitFacing(Runner)* bj_PI/180.0))
  13. call SetUnitY(Runner,y+Ms*Sin(GetUnitFacing(Runner)* bj_PI/180.0))
  14. call IssueImmediateOrder(Runner,"stop")
  15. endif
  17. endfunction
  19. //===========================================================================
  20. function InitTrig_Slide takes nothing returns nothing
  21. local trigger Slide = CreateTrigger( )
  22. call TriggerRegisterTimerEventPeriodic( Slide, 0.01 )
  23. call TriggerAddAction( Slide,function SlidePick )
  24. endfunction

Diesen Code in Standard-Formatierung anzeigen
goto:
Vergleichen mit :

Neuen Code Posten


Text-Kopier-Fenster