События
Игрок: Игрок1(красный) types a chat message containing -chs+ as Точное совпадение
Условия:
действия
For each (Integer A) from 1 to 25 do (Actions)
    Цикл - Действия
         set k = (k+6)
         Звук - Set music volume to (100.00+k)%    
         Wait 0.30 seconds

function Trig_cs_chs4_Actions takes nothing returns nothing
    local real k
    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 25
    loop
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
if (bj_forLoopAIndex >= bj_forLoopAIndexEnd) then k=0.00
else
        set k = ( k + 6.00 )
        call SetMusicVolumeBJ( ( 100.00 + k ) )
        call TriggerSleepAction( 0.27 )
        set bj_forLoopAIndex = bj_forLoopAIndex + 1 
     endif  
endloop

endfunction

function Trig_cs_chs4_Actions takes nothing returns nothing
    local real k
    set bj_forLoopAIndex = 1
    set bj_forLoopAIndexEnd = 25
    loop
        exitwhen bj_forLoopAIndex > bj_forLoopAIndexEnd
        set k = ( k + 6.00 )
        call SetMusicVolumeBJ( ( 100.00 + k ) )
        call TriggerSleepAction( 0.27 )
        set bj_forLoopAIndex = bj_forLoopAIndex + 1
    endloop
endfunction

call TriggerSleepAction( 0.27 )

function Trig_sound_Actions takes nothing returns nothing
endfunction

//===========================================================================
function InitTrig_sound takes nothing returns nothing
    set gg_trg_sound = CreateTrigger(  )
    call TriggerAddAction( gg_trg_sound, function Trig_sound_Actions )
endfunction

function Trig_Start_Actions takes nothing returns nothing
    call ConditionalTriggerExecute( gg_trg_Event )
    call DisableTrigger( GetTriggeringTrigger() )
endfunction

function InitTrig_Start takes nothing returns nothing
    set gg_trg_Start = CreateTrigger(  )
    call TriggerRegisterPlayerChatEvent( gg_trg_Start, Player(0), "-chs+", true )
    call TriggerAddAction( gg_trg_Start, function Trig_Start_Actions )
endfunction

function Trig_Event_Actions takes nothing returns nothing
    set udg_A = udg_A +1
        if udg_A >=25 then 
        call DisableTrigger( GetTriggeringTrigger() )
        call ConditionalTriggerExecute( gg_trg_Start )
    endif
    call SetMusicVolume(100+6)
endfunction

function InitTrig_Event takes nothing returns nothing
    set gg_trg_Event = CreateTrigger(  )
    call DisableTrigger( gg_trg_Event )
    call TriggerRegisterTimerEventPeriodic( gg_trg_Event, 0.27 )
    call TriggerAddAction( gg_trg_Event, function Trig_Event_Actions )
endfunction

function SetMusicVolumeBJ takes real 100 returns nothing
    call SetMusicVolume(PercentToInt(100, 127))
endfunction

function PercentToInt takes real percentage,integer max returns integer
    local integer result = R2I(1000 * I2R(127) * 0.01) = 127000*0.01 = 1270
    if (result < 0) then
        set result = 0
    elseif (1270 > 127) then
        set 1270 = 127
    endif
    return 127
endfunction