--lua
log "clear" log "mode compact"
local path = [[C:\1]]      -- путь к папке
local resultarray, count = dir (path, "*.txt") -- получить список всех файлов в формате 'wav', включая файлы в подпапках
log ("Найдено файлов: " .. count)
if  count then      -- если файлы найдены
    for i=1, #resultarray do
        log (resultarray[i][1])                          -- показать в логе список
        local file1 = io.open(resultarray[i][1], "rb") -- Открыть файл для чтения
        local file2 = io.open([[C:\NEW.txt]], "wb")   -- Куда будем записывать результат(файл создастся сам)

        if  file1 and file2 then                        -- если файлы открылись
            local s, n = file1:read("*a")               -- прочитать весь файл
            file1:close()                               -- закрыть файл

            -- заменяем текста
            s, n = s:gsub('"Action"', '"Экшены"')                 log("Экшены - замен: " .. n)
            s, n = s:gsub('"Adventure"', '"Приключения"')         log("Приключения - замен: " .. n)
            s, n = s:gsub('Приключения', '"Мои Приключения"')         log("Приключения - замен: " .. n)

            file2:write(s)                          -- пишем в другой файл
            file2:close()                           -- закрыть файл
            filedelete (resultarray[i][1])      -- удаляем старый файл
            filecopy ([["C:\NEW.txt"]], resultarray[i][1]) --копируем новый файл в папку с нужным именем и расширением
            filedelete ([["C:\NEW.txt"]])
        end
    end
end

log clear
log mode compact
//расширения файлов фото
set %form [1] jpg
set %form [2] jpeg
set %form [3] png
set %form [4] gif
set %form [5] svg
set %form [6] bmp
set $path "D:\ПапкаОткудаКопируем" //путь папки откуда нужно скопировать
For #i 1 size(%form)
    dir (%image $path *.%form[#i]*)             //поиск картинок в папке и загрузка их в массив
    log В папке найдено: size(%image) картинок c расширением %form[#i]
    for #j 1 size(%image)
        log %image [#j 1]  //имя картинки путь и расширение запишем в лог
        filecopy ("%image [#j 1]" "D:\КудаВставляем\%image[#j 3].%image[#j 4]")
        //FileDelete (%image [#j 1]) //удаляем файл из 1й папки
    end_for
end_for
end_script

есчо какой-то текст