Тема: AutoHotkey: перевод имён файлов и папок на транслит
Иногда возникает необходимость использовать файлы в среде, не поддерживающей кириллицу, когда русские буквы в именах файлов превращаются в каракули. Скрипт ниже переводит названия файлов на транслит. Помещаем скрипт в папку, где лежат нужные файлы, запускаем. Срабатывает по нажатию F11. Скрипт работает внутри папки, где он лежит, будьте внимательны.
var := 0
xxx := 0
F11::
;
loop *, 0, ;
{ ;
var := var + 1 ;
c%var% = %A_LoopFileName% ;
} ;
LOOP, %var%
{
xxx := xxx+1
file := c%xxx%
sav := c%xxx%
StringReplace, file, file, а , a , All
StringReplace, file, file, б , b , All
StringReplace, file, file, в , v , All
StringReplace, file, file, г , g , All
StringReplace, file, file, д , d , All
StringReplace, file, file, е , e , All
StringReplace, file, file, ё , yo , All
StringReplace, file, file, ж , zh , All
StringReplace, file, file, з , z , All
StringReplace, file, file, и , i , All
StringReplace, file, file, й , i , All
StringReplace, file, file, к , k , All
StringReplace, file, file, л , l , All
StringReplace, file, file, м , m , All
StringReplace, file, file, н , n , All
StringReplace, file, file, о , o , All
StringReplace, file, file, п , p , All
StringReplace, file, file, р , r , All
StringReplace, file, file, с , s , All
StringReplace, file, file, т , t , All
StringReplace, file, file, у , u , All
StringReplace, file, file, ф , f , All
StringReplace, file, file, х , h , All
StringReplace, file, file, ц , tc , All
StringReplace, file, file, ч , ch , All
StringReplace, file, file, ш , sh , All
StringReplace, file, file, щ , sch , All
StringReplace, file, file, ъ , , All
StringReplace, file, file, ы , i , All
StringReplace, file, file, ь , , All
StringReplace, file, file, э , e , All
StringReplace, file, file, ю , yu , All
StringReplace, file, file, я , ya , All
StringReplace, file, file, А , A , All
StringReplace, file, file, Б , B , All
StringReplace, file, file, В , V , All
StringReplace, file, file, Г , G , All
StringReplace, file, file, Д , D , All
StringReplace, file, file, Е , E , All
StringReplace, file, file, Ё , Yo , All
StringReplace, file, file, Ж , Zh , All
StringReplace, file, file, З , Z , All
StringReplace, file, file, И , I , All
StringReplace, file, file, Й , I , All
StringReplace, file, file, К , K , All
StringReplace, file, file, Л , L , All
StringReplace, file, file, М , M , All
StringReplace, file, file, Н , N , All
StringReplace, file, file, О , O , All
StringReplace, file, file, П , P , All
StringReplace, file, file, Р , R , All
StringReplace, file, file, С , S , All
StringReplace, file, file, Т , T , All
StringReplace, file, file, У , U , All
StringReplace, file, file, Ф , F , All
StringReplace, file, file, Х , H , All
StringReplace, file, file, Ц , Tc , All
StringReplace, file, file, Ч , Ch , All
StringReplace, file, file, Ш , Sh , All
StringReplace, file, file, Щ , Sch , All
StringReplace, file, file, Ъ , , All
StringReplace, file, file, Ы , I , All
StringReplace, file, file, Ь , , All
StringReplace, file, file, Э , E , All
StringReplace, file, file, Ю , Yu , All
StringReplace, file, file, Я , Ya , All
StringReplace, file, file, %A_SPACE%, _, All
filemove, %sav%, %file%
}
F12:: ExitApp ;завершить программу
Автор скрипта - ypppu.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.