//Для нанесения урона используеться функция ATTACK_Unit(unit u,real radius,integer damage,real krit).
// u - юнит который наносит урон.
// radius - радиус разброса урона, урон наносится юнитам на 120 впереди u, в указанном радиусе.
// damage - наносимый урон.
// krit - шанс нанести критический удар в процентах. Что бы отключить крит установите его 0.Если число будет больше чем 100 , то процент будет равен двум последним цифрам этого числа.
// Так же есть ещё 3.доп параметра attacktype, damagetype, и weapontype, которые указывать не обязательно.
// Стандартные значения:
// attacktype=ATTACK_TYPE_HERO
// damagetype=DAMAGE_TYPE_NORMAL
// weapontype=WEAPON_TYPE_WHOKNOWS

define {
ATTACK_Unit(u,radius,damage,krit)=ATTACK##_Unit(u,radius,damage,krit,ATTACK_TYPE_HERO,DAMAGE_TYPE_NORMAL,WEAPON_TYPE_WHOKNOWS)
ATTACK_Un       it(u,radius,damage,krit,at,dt,wt)=ATTACK##_Unit(u,radius,damage,krit,at,dt,wt)
//Цифры здесь можно менять.
TexTagTime=1.5//Время исчезания плавающего текста в секундах.
TextTagSize=9 //Размер плавающего текста
}
//Дальше менять нельзя!

library ATTACK{

public unit CASTER
private real Damag

nothing AddTXT(unit u,real z,integer r,integer g,integer b,real size,real time,string text){ //Создание затухающегося плавающего текста.
texttag t=CreateTextTag()
SetTextTagColor(t,r,g,b,100);SetTextTagText(t,text,size*0.023/10);SetTextTagVelocity(t,0.,.05)
SetTextTagPosUnit(t,u,z);SetTextTagPermanent(t,false);SetTextTagLifespan(t,time);SetTextTagFadepoint(t,0.)
t=null}

real ConvertRealMinMax(real r,real min,real max){whilenot r<max{r-=max};whilenot r>min{r+=max}; return r}//Возвращает число в диапозоне от min до max.

private nothing GroupNumbersEnum(){bj_groupCountUnits++}
public integer GroupNumbers(group g){bj_groupCountUnits=0; ForGroup(g,function GroupNumbersEnum); return bj_groupCountUnits}//Количество юнитов в группе.

private boolean GetLifeAndEnemy(){return IsUnitEnemy(GetFilterUnit(),GetOwningPlayer(CASTER)) and GetWidgetLife(GetFilterUnit())>.0}//Условие для нанесения урона.

private nothing DamageReturn() {trigger t=GetTriggeringTrigger();Damag=GetEventDamage();TriggerClearActions(t);DestroyTrigger(t);t=null}

public nothing Unit(unit u,real radius,integer damage,real krit,attacktype at,damagetype dt,weapontype wt) {
group g=CreateGroup() ; unit gu
boolexpr cond=Condition(function GetLifeAndEnemy)
real f=GetUnitFacing(u)*.0174532, x=GetWidgetX(u) ,y=GetWidgetY(u);trigger t
krit=ConvertRealMinMax(krit,-1,101)//Получаем число в диапозоне от 0 до 100.
CASTER=u
GroupEnumUnitsInRange(g,x+120*Cos(f),y+120*Sin(f),radius,cond)//Добавление юнитов в группу, с проверкой.
           if GroupNumbers(g)>0{
               do {
                   gu=FirstOfGroup(g)
                   exitwhen gu==null
                   t=CreateTrigger()
                   TriggerRegisterUnitEvent(t,gu,EVENT_UNIT_DAMAGED)
                   Trigge rAd dAc tio n(t ,fu nction DamageReturn)
                       if GetRandomReal(1,100)<=krit
                           damage*=2
                           UnitDamageTarget(u,gu,damage,true,false,at,dt,wt)  
                           A     ddTXT(gu,0,255,0,0,TextTagSize,TexTagTime,"Критичесский удар "+I2S(R2I(Damag)))
                       else
                           UnitDamageTarget(u,gu,damage,true,false,at,dt,wt)
                           A     ddT XT(gu,0,255,0,0,TextTagSize,TexTagTime,I2S(R2I(Damag)))
                       endif
                   GroupRemoveUnit(g,gu)
               }  
           e   l se
               G roupEnumUnitsInRange(g,x,y,300,cond)
                   //Если юниты есть в радиусе 300, и кастер по ним не попал будет сообщение о промахе.
                   if GroupNumbers(g)>0 {AddTXT(u,0,255,0,0,TextTagSize,TexTagTime,GetPlayerName(GetOwningPlayer(u))+" Промахнулся");GroupClear(g)}
                   //==================================================================================
           }
DestroyBoolExpr(cond);DestroyGroup(g);t=null;cond=null;g=null}//Устранение утечек и обнуление локалок.
}