globals
// Булены для проверки дан ли бонус  
    boolean array AT_Bonus
    boolean array ARM_Bonus
// Переменныех,хранящие данные об бонусах предмета    
    integer array AP_Bonus
    integer array SP_Bonus
    integer array DP_Bonus
    integer array MS_Bonus
// Переменные для проверки предмета    
    integer array AT_TofI
    integer array ARM_TofI
endglobals 

function ItemsLiborary takes integer id, unit u_ch, integer i returns nothing
integer AP
integer SP
integer DP
integer MS
//                               Мечи

//Короткий меч
if id == 'I000' then
    if AT_Bonus[i] == false then
    set AP = 6 // Бонус силы атаки
    set SP = 6 // Бонус скорости атаки
    call SetUnitAbilityLevel(u_ch, 'APbs', AP + 1)
    call SetUnitAbilityLevel(u_ch, 'SPbs', SP + 1)
    set AT_Bonus[i] = true
    set AP_Bonus[i] = AP + 1
    set SP_Bonus[i] = SP + 1
    set AT_TofI[i] = id
    set AP = 0
    set SP = 0
    else
    call SetUnitAbilityLevel(u_ch, 'APbs', 1)
    call SetUnitAbilityLevel(u_ch, 'SPbs', 1)
    set AT_Bonus[i] = false
    set AP_Bonus[i] = 0
    set SP_Bonus[i] = 0
    set AT_TofI[i] = 0
    endif