Командная строка, батники, сценарии (bat, cmd) - [4484] :: Программы

Код:

@echo off
setlocal enabledelayedexpansion
setlocal enableextensions

set "kmlfiles_input_dir=%~dp0"
set "kmlfiles_output_dir=%~dp0"
set "kmlfiles_output_postfix=_ru"
set "count=1"

for /f "delims=*" %%h in ('dir /b /s /a-d "!kmlfiles_input_dir!\*.kml"') do (
set "csvfile=!kmlfiles_output_dir!\%%~nh.csv"
for /f "tokens=2,3 delims=<>" %%i in ('findstr "<name> <state>" "%%h"') do (
if /i "%%i"=="name" set "name=%%j"
if /i "%%i"=="state" (set "state=%%j" && echo !name!;!state! >> !csvfile!.tmp)
if !count! lss 200 (set /a "count=!count!+1") else call :translate
)
call :translate
)

goto :eof

:translate
curl -v -A "Opera/9.80 (Windows NT 6.0; U; ru) Presto/2.8.131 Version/11.11" --data-urlencode "text@!csvfile!.tmp" "http://translate.google.ru/translate_a/t?client=x" | sed -e "s/\x22trans\x22:\x22/\r\n\0/g" | sed -n -e "s/\x22trans\x22:\x22\([^\x22]*\)\x22.*/\1/p" | sed -e "s/\\r\\n//g" >>!csvfile!.result
echo. >>!csvfile!.result
set "count=1"
type !csvfile!.tmp >>!csvfile!
del /q !csvfile!.tmp
exit /b

Модерирует : gyra, Maz
articlebot (21-06-2016 11:40): Следующая часть - Командная строка, батники, сценарии (bat, cmd)	Версия для печати • Подписаться • Добавить в закладки
На первую страницу • к этому сообщению • к последнему сообщению