Хороший скрипт, написанный с головой!

//настраиваемые переменные
set $attlevel mid         //уровень атакуемого монстра (low, mid, hi)

//обозначения действий в комбинациях
//not - нет действия
//wait - ожидание 5сек
//top - верхний удар
//mid - средний удар
//btm - нижний удар
//block - включение/выключение блока
//inv1...4 - использование слотов инвентаря

//действие в случае низкого уровня жизни
set $on_dngr inv2

//действие в самом начале боя (выполняется один раз)
//например выпить эль гиганта, или уйти в блок на весь бой
set $first_hit not

set #combolengh 3    //количество действий в комбинации
//список действий в комбинации
set %hits[1] btm
set %hits[2] mid
set %hits[3] top

:repeat

//системные переменные
set #hitcount 1
set $hit

//ожидание кнопки для атаки
while_not 70, 371 7004918 
    wait 1s
end_while

//атака монстра
if $attlevel = 'hi'
    left 70, 230
end_if
if $attlevel = 'mid'
    left 70, 290
end_if
if $attlevel = 'low'
    left 70, 350
end_if

//ожидание начала боя
while_not 82, 364 7820338 
    wait 1s
end_while

//одноразовое действие перед боем
while_not 303, 299 4599336
    wait 1s
end_while

set $hit $first_hit
:do_hit        
        if $hit = 'wait'
            wait 5s
        end_if
        if $hit = 'top'
            left 351, 253
        end_if
        if $hit = 'mid'
            left 379, 299
        end_if
        if $hit = 'btm'
            left 354, 349
        end_if
        if $hit = 'block'
            left 269, 298
        end_if
        if $hit = 'inv1'
            left 82, 203 
        end_if
        if $hit = 'inv2'
            left 82, 240 
        end_if
        if $hit = 'inv3'
            left 82, 278 
        end_if
        if $hit = 'inv4'
            left 82, 314
        end_if
return

//бой
while_not 299, 313 122
    wait 100
    if 303, 299 4599336 
        if_not 170, 128 263331
            set $hit $on_dngr
            gosub do_hit
            wait 5s
        end_if        
        set $hit %hits[#hitcount]
        gosub do_hit
        set #hitcount #hitcount + 1
        if #hitcount > #combolengh
            set #hitcount 1
        end_if
    end_if
end_while

//закрытие окна победы/поражения
left 299, 313 

//ожидание окна статистики
while_not 277, 468 207
    wait 1s
end_while

//закрытие окна статистики
left 277, 468 

//end_script
goto repeat