【.cmd】バッチファイルスクリプト %12 【.bat】©2ch.net

**デフォルトの名無しさん転載ダメ©2ch.net** · 2017/03/11(土) 13:47:11.66

**デフォルトの名無しさん** · 2017/03/11(土) 14:16:25.14

2GET

**デフォルトの名無しさん** · 2017/03/11(土) 17:24:01.08

そろそろ次スレ立てた方がいいと思う

**デフォルトの名無しさん** · 2017/03/11(土) 19:08:44.39

ﾀﾋ

**デフォルトの名無しさん** · 2017/03/12(日) 22:04:13.40

達人の方々！お教えください
set文による文字列の置き換えで
=を置き換えたいのですが
どのように記述すればよいのでしょうか？

**デフォルトの名無しさん** · 2017/03/13(月) 02:51:46.65

>>5
setの文字列置換では無理
=の個数が決まっているのならforでderims==
不特定なら一文字ずつ=かどうかを判定し=なら置換したい文字列を付け足し
テストしてないから不備があるかもだけど以下みたいな感じで出来ると思う

:ReplaceEqual
if "%~1"=="" (echo ERROR&exit /b)
set "str=%~1"
set output=
:CheckEqual
if not defined str exit /b
pause
if "%str:~0,1%"=="=" (
set "output=%output%置換後文字列"
set "str=%str:~1%"
goto :CheckEqual
)
set "output=%output%%str:~0,1%"
set "str=%str:~1%"
goto :CheckEqual

**デフォルトの名無しさん** · 2017/03/13(月) 02:56:02.96

済まん pause テストするつもりで入れてたのを消すの忘れてた
まあそのままテストしてみて

**デフォルトの名無しさん** · 2017/03/13(月) 03:26:40.42

:ReplaceEqual
set "str=%~1"
set output=
:CheckEqual
if "%str:~0,1%"=="=" (
set "output=%output%置換後文字列"
set "str=%str:~1%"
) else (
set "output=%output%%str:~0,1%"
set "str=%str:~1%"
)
if defined str goto :CheckEqual
exit /b

**デフォルトの名無しさん** · 2017/03/13(月) 07:40:38.20

>>6-8
ありがとうございます
色々試して見ます

**デフォルトの名無しさん** · 2017/03/13(月) 22:53:05.48

>>8と同じだけど、もう少し使いやすいI/Fにしたもの
@echo off
rem 文字列中には、",%(1つのみ) を入れないこと
set "var==abc=def=!#$&'()=^~|-+*;:{}<>,./?\_%%"
call :replace var "=" "＝"
echo "%var%"

rem savety stopper
goto :eof
:replace
setlocal
set i=0
set s=
:replace_loop
call set "c=%%%1:~%i%,1%%"
if not defined c (endlocal&set "%1=%s%"&goto :eof)
if "%c%" equ "%~2" (set "s=%s%%~3") else (set "s=%s%%c%")
set /a i+=1
goto :replace_loop

**デフォルトの名無しさん** · 2017/03/15(水) 08:22:32.42

cmderいいな
この手のツールで表示が崩れたりせずまともに動くやつ見るの初めてだ

【.cmd】 バッチファイルスクリプト %12 【.bat】©2ch.net

【.cmd】バッチファイルスクリプト %12 【.bat】©2ch.net