local Item it = Item.create()
   call it.GetItemData(itid)

    if it.exsist then
    
     if it.Class == WEAPON then // Оружие
      if it.Type == TWO_HAND then
       if (GetSlotStatus(plar,RIGHT) == true) and (GetSlotStatus(plar,LEFT) == true) then

         set LEFT_SLOT [plar] = NOT_AVL
         set RIGHT_SLOT[plar] = itid
          BJDebugMsg("Go calc "+I2S(it.Str)) - выдаёт 15 ( то, что нужно )
         call CalcStats(plar,it) - вызываю функцию
          BJDebugMsg("end "+I2S(it.Str)) - выдает опять же 15
        // обе
        return

       endif
      endif

 ...

private function CalcStats takes Item link,integer plar returns nothing
   BJDebugMsg("Calcing.. dbg "+I2S(link.Str)) - выдает 0
   if link.Str > 0 then - тут следовательно не проходит
    call SetCustomStr(plar,GetCostumStr(plar,false)+link.Str)
    BJDebugMsg("Added "+I2S(link.Str))
   endif

...