Вопрос по луа Опции

[dron4938]

Как переделать например такой скрипт на луа?

:aaa
sendex {f11}
wait 25 + random (23)
if нажата F1
goto bbb
end_if
goto aaa

:bbb
sendex {f12}
wait 25 + random (23)

[cirus]

код

Код

--lua
require("Kbd")

--===== все функции можно загружать через require  ====
function F1()
    while Key_Press() == 0 do   -- пока не нажата кнопка, если F1 выйдет из функции
        log (1) wait (30)       -- этот код выполняется при нажатии F1
    end
end

function F2()
    while Key_Press() == 0 do   -- пока не нажата другая кнопка, если F2 выйдет из функции
        log (2)  wait (30)      -- этот код выполняется при нажатии F2
    end
end

function F3()
    while Key_Press() == 0 do   -- пока не нажата другая кнопка, если F3 выйдет из функции
        log (3)  wait (30)      -- этот код выполняется при нажатии F3
    end
end

function Key_Press()     -- функция для отслеживания нажатий, чтобы выйти из текущей функции
    for i = 1, #arr do
        if  Kbd.IsKeyPress(arr[i]) then
            return 1
        end
        wait (1)
    end
    return 0
end
--===========

arr={112, 113, 114}  -- какие клавиши отслеживать, 112(F1), 113(F2) и т. д.
t={F1, F2, F3}    -- таблица с функциями
while 1 do
    for i = 1, #arr do
        if  Kbd.IsKeyPress(arr[i]) then   -- если нажата клавиша
            time = os.clock () + 0.5      -- если кнопка зажата на 0.5 секунды, то функция тоже выполнится
            while Kbd.IsKeyPress(arr[i]) and os.clock() < time do wait (10) end  -- ждём когда кнопка будет отпущена или зажата на 0.5 секунды
                t[i]()                 -- вызываем нужную функцию t[1] - при нажатии F1, t[2] - при нажатии F2
            while Kbd.IsKeyPress(arr[i]) do wait (10) end  -- ждём когда кнопка будет отпущена
        end
        wait (1)
    end
end

При нажатии F1 пишет в лог 1, до тех пор пока не будет нажата другая клавиша (тогда будет вызвана другая функция) или снова не нажата F1 (тогда выйдет из функции). При нажатии F2 пишет 2, F3 пишет 3.