Версия для печати темы

hint timestamp (timer)

  set timer        // Сброс таймера контроля времени
  set #lim 300000   // Предел времени выполнения цикла в мсек
  set #a           // Контроль остатка времени
  while #a = #a  // Цикл ожидания
    if #a < 0      // Если прошло более предела
       break       // Прерывание цикла ожидания
    end_if
    set #a #lim - timer
    set #v div (#a 1000)
    hint div(#v 60) : mod(#v 60)   // вывод сколько осталось ждать
  end_while

--lua
function _wait(ms)
    local t = os.clock() + ms
    while t - os.clock() > 0 do
        hint (os.date("%M:%S", t - os.clock()))
        wait (1)
    end
end

_wait(5) -- ждать 5 секунд
log (111)
_wait(3) -- ждать 3 секунды
log(222)

            if color (1786, 947) ~= 123 and color (1517, 1027) ~= 6 and color (510, 1054) ~= 321 then
                sendex ("5")
            end

local timeout = os.clock() + 5
while timeout > os.clock() then
    log("вася")
    wait(1000)
end

set %u FindWindow (Path of Exile)
set workwindow %u[1 1]
hint (20 clRed 800 900 -1 -1 (ВКЛ))
get color #pupok 31 1012
get color #hp 170 948
get color #mp 1786 947
get color #mptop 1807 897
repeat 10
    sendex 5
end_repeat
wait 100
get color #mbottle 510 1054
set timer 0
while 1 = 1
if 31, 1012 #pupok
    if_not 170, 948 #hp
        sendex 1
        wait 200
    end_if
        if #mpuse = 1 and 1807, 897 #mptop
            set #mpuse 0
            set #full 1
        end_if
        if_not (1786, 947 #mp or 1517, 1027 6 or 510, 1054 #mbottle) or (timer < 4500 and #full = 0)
            sendex 5
            set timer 0
            set #mpuse 1
            set #full 0
        end_if
end_if
end_while

--lua
local u = findwindow ("Path of Exile")
workwindow (u[1][1])
hint ('ВКЛ')
local x = 0
local pupok = color (31, 1012)
local hp = color (170, 948)
local mp = color (1786, 947)
local mptop = color (1807, 897)
local t = 0
repeat
    x = x + 1
    sendex("5")
until x == 10
wait (100)
local mbottle = color (510, 1054)
while 1 == 1 do
    if color (31, 1012) == pupok then
        if color (170, 948) ~= hp then
            sendex ("1")
            wait (200)
        end
        if mpuse == 1 and color (1807, 897) == mptop then
            local mpuse = 0
            local full = 1
        end

            if (color (1786, 947) ~= mp and color (1517, 1027) ~= 6 and color (510, 1054) ~= mbottle) then 
                sendex ("5")

                local mpuse = 1
                local full = 0
            end
    end
end

local timeout = os.clock() + 4.5
if timeout > os.clock() then
    ...
    if .... then -- reset
        timeout = os.clock() + 4.5
    end
end

local timer = function(reset_flag)end
do
    local t = os.clock()
    timer = function(reset_flag)
       if reset_flag then
            t = os.clock()
            return 0
       else
            return os.clock() - t
        end
    end
end

log(tostring(timer))


log(timer())
wait(123)
log(timer())
log(timer("0"))
log(timer())
wait(1000)
log(timer())

local t1 = os.clock()
while 1 == 1 do
    if (os.clock() - t1) > 4.5 then
        t1 = os.clock
    end
end

--lua
local pupok = 2893595
while 1 == 1 do
    if color (31, 1012) == pupok then
--    wait (500)
    else
--        wait (500)
    end
end

--lua
local mp = color (1786, 947)  -- 11892493
log (mp)
while 1 == 1 do
    local c = findcolor([[1728, 913, 1851, 1026 , 1, 1 (mp) %arr 2]])
    if c then
       log (c)
    end
    wait (3000)
end