Использование переменной\массива в имени переменной и массива Опции

[3axap]

День добрый.
Подскажите, возможно\планируется ли реализовать использование переменной\массива в имени переменной и массива?

Пример

Код

set #fc 3

set %Depcow[1 1] 111
set %Deppig[1 1] 211
set %Depsable[1 1] 311

set %animal[1 1] cow
set %animal[2 1] pig
set %animal[3 1] sable
set #ac size (%animal)

set #z1 0
for #z1 1 #fc
    set #z 0
    for #z 1 #ac
        set #tmp #ac + #z1
        set $tmp #tmp
        set $animal %animal[#z 1]
        set %SQ$animal[#z1 1] $tmp
        set %SQ$animal[#z1 2] %Dep$animal[#z1 1]
        set %SQ%animal[#z 1][#z1 4] $tmp
        log %SQ%animal[#z 1][#z1 4] %SQ$animal[#z1 2] %SQ$animal[#z1 1]
        end_for
end_for

end_script

[DarkMaster]

А зачем? Обычно это решается массивами. Через eval я где-то многомерные массивы описывал, как делать, думаю по аналогичной схеме может получиться.

[3axap]

Имеются объекты над которыми нужно производить одинаковые операции. Сейчас их 3. Код на 1000+ строк. Хотелось бы сократить раза в 3-4 используя сею фичу. Плюс заложить возможность без проблемного расширения количества объектов путем не наращивания объема кода а добавлением дополнительных переменных.
Что за eval? не могу найти как его можно использовать...
Из описаного Вами примера сложно понять как это должно работать.

[cirus]

код

Код

set %Depcow[1 1] 111
set %Deppig[1 1] 211
set %Depsable[1 1] 311

set %animal[1 1] cow
set %animal[2 1] pig
set %animal[3 1] sable


//вывод в лог
for #i 1 size(%animal)
log eval (%Dep%animal[#i 1][1 1])
end_for

//назначение переменных
set %a [1] %Dep
for #i 1 size(%animal)
eval (set %a[1]%animal[#i 1][1 1] #i)
end_for
log %Depcow[1 1]   %Deppig[1 1]   %Depsable[1 1]
stop_script

Хотя никакого смысла в этом не вижу. Сложно для понимания, читаемости 0, никаких гарантий что будет корректно работать. Проще обычными массивами всё делать.

[3axap]

Спасибо! Вариант с "set %a [1] %Dep" помог заставить работать eval.

Вот что получилось у меня

Код

set #fc 1

set %Depcow[1 1] 111
set %Deppig[1 1] 211
set %Depsable[1 1] 311

set %animal[1 1] cow
set %animal[2 1] pig
set %animal[3 1] sable
set #ac size (%animal)
set %a[1] %SQ
set %a[2] %Dep

set #z1 0
for #z1 1 #fc
    set #z 0
    for #z 1 #ac
        set #tmp eval (%a[2]$animal[#z1 1])
        set $tmp #tmp
        set $animal %animal[#z 1]
        eval (set %a[1]$animal[#z1 1] $tmp)
        eval (set %a[1]$animal[#z1 2] %a[2]$animal[#z1 1])
        eval (set %a[1]%animal[#z 1][#z1 4] $tmp)
        log eval(%SQ%animal[#z 1][#z1 1] %a[1]$animal[#z1 2] %a[1]%animal[#z 1][#z1 4])
        end_for
end_for
log eval(%a[2]%animal[1 1] %a[2]%animal[2 1] %a[2]%animal[3 1])
end_script

[FREEON]

все разобрался