Создаем плавающую переменную set: #A1 #A2 ... #A(#i) Опции

[FREEON]

Как скриптом создать имя плавающей переменной и затем вывести ее в лог?

Код

for #i 1 5
    set #a(#i) #i
    log #a(#i)
end_for
log #a(4) //вывести содержание переменной из середины
end_script

и при выдаче в лог нужную переменную нам не выдает. лог:

1(1)
2(2)
3(3)
4(4)
5(5)
5(4)

с массивом же норм работает и можно обратиться к нужному имени

Код

for #i 1 5
    init_arr %a(#i) #i
    log %a(#i) [1]
end_for
log %a(4) [1]
end_script

лог:

1
2
3
4
5
4

но при попытке представить массив в качестве переменной set #a(#i) %a(#i)[1] не получается и обратиться к ней тоже не выходит

[FREEON]

обошол кастылями

Код

while 1 = 1
    if  295, 63 16777215                                   //условие когда нам необходимо сохранить часть экрана(сделать скриншот)
        set $b DateNow TimeNow  //дата время
        //log $b
        set $i ":" // что ищем
        set $c "-" // чем заменяем
        set $s string_replace ($b $i $c all)
        log $s
        init_arr %b $s       // перевести в %
        log %b[1] %b[2]                       // вывести в дату и время
        set %a GetImage  (582, 208 590, 220 )       // сохранить в памяти часть экранной области
        set $jpg SaveImage (%a [1 1] D:\123\%b[1] %b[2].jpg) // сохранить в файл на дискс именем (дата-время)
        set $b DeleteImage  (%a [1 1])              // удалить из памяти часть экранной области
    end_if
end_while
End_script 

оказывается можно сделать проще:

Код

while 1 = 1
    if  295, 63 16777215                                   //условие когда нам необходимо сохранить часть экрана(сделать скриншот)
        init_arr %b (1) day . month . year _ hour . min . sec
        log %b[1]                       // вывести в дату и время
        set %a GetImage  (582, 208 590, 220 )       // сохранить в памяти часть экранной области
        set $jpg SaveImage (%a [1 1] D:\123\%b[1].jpg) // сохранить в файл на диск C:\
        set $b DeleteImage  (%a [1 1])              // удалить из памяти часть экранной области
    end_if
end_while
End_script

Сообщение отредактировал FREEON - 9.10.2019, 22:48