Guest User

Untitled

a guest
Oct 21st, 2019
89
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. @echo off
  2. setlocal enabledelayedexpansion
  3.  
  4. if "%1"=="help" (
  5. echo *Вставь сюда текст, кто сделал эту программу
  6. echo *Вставь сюда текст на англ как эта программа работает
  7. exit /b
  8. )
  9. set *ИМЯ ПЕРЕМЕННОЙ НА АНГЛ*=
  10. for /F %%i in ('findstr "^"') do (set *ИМЯ ПЕРЕМЕННОЙ НА АНГЛ*=%%i)
  11. CALL :LoCase *ИМЯ ПЕРЕМЕННОЙ НА АНГЛ*
  12. echo %*ИМЯ ПЕРЕМЕННОЙ НА АНГЛ*% 2>&1
  13. goto:EOF
  14.  
  15. :LoCase
  16. FOR %%i IN ("A=a" "B=b" "C=c" "D=d" "E=e" "F=f" "G=g" "H=h" "I=i" "J=j" "K=k" "L=l" "M=m" "N=n" "O=o" "P=p" "Q=q" "R=r" "S=s" "T=t" "U=u" "V=v" "W=w" "X=x" "Y=y" "Z=z") DO CALL SET "%1=%%%1:%%~i%%"
  17. GOTO:EOF
RAW Paste Data