function MakeWeaponDamage takes unit u, unit v, real r, real x returns nothing
//Функция - переработанный для скиллов вариант нанесения урона в зависимости от физ. урона героя
local real dmg
local real res
local integer i = 0
local integer ix = 0 
local real ab = 0

set dmg = ( r + ((WeaponDamage(u)/100)* x ))
 call DisplayTimedTextToForce( GetPlayersAll(), 15.00, ( "Weapon Damage: " + I2S(R2I(dmg)) ) )
//Это сообщение в игре выводится
 set i = 1
    loop
        exitwhen i > udg_DB_ITEMCOUNT
          set ix = 1
          loop
             exitwhen ix > 6
          if ( GetItemTypeId(UnitItemInSlotBJ(v, ix)) == udg_DB_Item[i] )  then
          if ( LoadRealBJ(( 17 ), i, udg_ITEM_STATS) != 0.00 ) then
           set res = res + ( LoadRealBJ(( 17 ), i, udg_ITEM_STATS))
 call DisplayTimedTextToForce( GetPlayersAll(), 15.00, ( "Resist: " + I2S(R2I(res)) ) )
//тестирование идет по не-героям, по этому в этом сообщении - тишина
           else
            endif
      else
      endif

       if ( GetItemTypeId(UnitItemInSlotBJ(v, ix)) == udg_DB_Item[i] )  then
          if ( LoadRealBJ(( 47 ), i, udg_ITEM_STATS) != 0.00 ) then
            set ab = ab + ( LoadRealBJ(( 47 ), i, udg_ITEM_STATS))
            call DisplayTimedTextToForce( GetPlayersAll(), 15.00, ( "Damage Reduce: " + I2S(R2I(ab)) ) )
//аналогичная ситуация тут
            else
            endif     
            else
            endif 

    set ix = ix + 1
    endloop
    set i = i + 1
    endloop

 if ( res > 50.00 ) then 
 set res = 50
 else
 endif
 
 set dmg = (( dmg  * ( 1.0 - (res / 100))))

call DisplayTimedTextToForce( GetPlayersAll(), 15.00, ( "Final Weapon Damage: " + I2S(R2I(dmg)) ) )
//это сообщение уже молчит

 if ( ab > dmg ) then
 set ab = ( ab - ( ( ab - dmg ) + 3 )) 
 else
 endif
 
 
 call UnitDamageTargetBJ( u, v, (dmg - ab) , ATTACK_TYPE_CHAOS, DAMAGE_TYPE_UNIVERSAL ) 

 set dmg = 0
 set res = 0
 set ix = 0
 set i = 0
 set ab = 0
 
 endfunction

function MakeWeaponDamage takes unit z, unit x, real d, real c returns nothing
local real dmg
local real r = 0
local integer i = 0
local integer ix = 0 
local real ab = 0

set dmg = ( d + ((WeaponDamage(z)/100)* c ))

 set i = 1
    loop
        exitwhen i > udg_DB_ITEMCOUNT
          set ix = 1
          loop
             exitwhen ix > 6
          if ( GetItemTypeId(UnitItemInSlotBJ(x, ix)) == udg_DB_Item[i] )  then
          if ( LoadRealBJ(( 17 ), i, udg_ITEM_STATS) != 0.00 ) then
            set r = r + ( LoadRealBJ(( 17 ), i, udg_ITEM_STATS))
            else
            endif
      else
      endif

       if ( GetItemTypeId(UnitItemInSlotBJ(x, ix)) == udg_DB_Item[i] )  then
          if ( LoadRealBJ(( 47 ), i, udg_ITEM_STATS) != 0.00 ) then
            set ab = ab + ( LoadRealBJ(( 47 ), i, udg_ITEM_STATS))
            else
            endif     
            else
            endif 

    set ix = ix + 1
    endloop
    set i = i + 1
    endloop


 if ( r > 50) then
 set r = 50
 else
 endif

 set dmg = (( dmg  * ( 1.0 - (r / 100))))


 if ( ab > dmg ) then
 set ab = ( ab - ( ( ab - dmg ) + 3 )) 
 else
 endif
 
 
 call UnitDamageTargetBJ( z, x, (dmg - ab) , ATTACK_TYPE_CHAOS, DAMAGE_TYPE_UNIVERSAL ) 

 set dmg = 0
 set r = 0
 set ix = 0
 set i = 0
 set ab = 0
 set z = null
 set x = null
 
 endfunction

// 1
local real res // Внезапное
set res = res + ( LoadRealBJ(( 17 ), i, udg_ITEM_STATS)) // рес = внезапное + что-то

// 2
local real r = 0 // Не внезапное, да?
set r = r + ( LoadRealBJ(( 17 ), i, udg_ITEM_STATS)) // р = р + что-то

res=SOMETHING + число

res=0 + число