1. if LoadInteger(udg_DroneHash,GetHandleId(GetEnumUnit()),6) == 1 then
  2. set l3 = GetUnitLoc(GetEnumUnit())
  3. call SaveInteger(udg_DroneHash,GetHandleId(GetEnumUnit()),6,2)
  4. else
  5. set l4 = GetUnitLoc(GetEnumUnit())
  6. call SaveInteger(udg_DroneHash,GetHandleId(GetEnumUnit()),6,1)
  7. if LoadInteger(udg_DroneHash,GetHandleId(GetEnumUnit()),6) == 3 then
  8. set l3 = GetUnitLoc(GetEnumUnit())
  9. endif
  10. endif
  11. if DistanceBetweenPoints(l3,l4) >= 100 then
  12. call GroupRemoveUnit(udg_DroneTargets2,GetEnumUnit())
  13. call GroupAddUnit(udg_DroneTargets1,GetEnumUnit())
  14. set i = 1
  15. loop
  16. call SaveBoolean(udg_DroneHash,GetHandleId(LoadUnitHandle(udg_DroneHash,GetHandleId(GetEnumUnit()),i)),6,false)
  17. endloop
  18. call RemoveLocation(l3)
  19. call RemoveLocation(l4)
  20. set l1 = null
  21. set l2 = null
  22. set l3 = null
  23. set l4 = null
  24. return
  25. endif

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

Neuen Code Posten


Text-Kopier-Fenster