CLの日記

CLの日記兼備忘録

pcとかの情報をあげるかも

東方紅魔郷 超高速化パッチ半自動導入するのを作った

東方紅魔郷で高速化するので毎回d3d8.dll enbconvertor.ini を毎回手動で入れてたんですがついにめんどくさくなったのでbatファイルを作りました

 

対象: 東方紅魔郷 東方妖々夢 東方萃夢想 東方永夜抄 

東方花映塚 東方文花帖

紅魔郷以外でバグったことないけど文花帖まで起きるらしいから)

フォルダごとダウンロードして中のbatを管理者権限で起動すればやってくれます

TH6~9.5DX9 - Google ドライブ

 

 ダウンロードが嫌な人は下のをTXTにコピーして.batに変えてって感じでも

 

@echo off
timeout 1 >nul
set L=%~dp0
set L=%L:~0,-1%
for %%L in (%L%) do set L=%%~dpL
echo このバッチファイルの現在地は(%~dp0)です
echo 現在時刻は%date%%time%です
if exist "%L%enbconvertor_dx8_dx9_v0036\d3d8.dll" ( set y=1 ) else ( set y=0 )
if exist "%L%enbconvertor_dx8_dx9_v0036\enbconvertor.ini" ( set x=1 ) else ( set x=0 )
if exist "%L%enbconvertor_dx8_dx9_v0036\license_en.txt" ( set w=1 ) else ( set w=0 )
if exist "%L%enbconvertor_dx8_dx9_v0036\readme_en.txt" ( set v=1 ) else ( set v=0 )
set H=OK
echo -----------------------
if %y% equ 1 ( echo d3d8.dll ) else ( SET Y=00 echo ER-H0 d3d8.dll が見つかりません )
if %x% equ 1 ( echo enbconvertor.ini ) else ( SET X=00 echo enbconvertor.ini が見つかりません )
if %w% equ 1 ( echo license_en.txt ) else ( SET W=00 echo license_en.txt が見つかりません )
if %v% equ 1 ( echo readme_en.txt ) else ( SET H=00 )
if exist "%L%enbconvertor_dx8_dx9_v0036\nul" ( echo フォルダ"enbconvertor_dx8_dx9_v0036"が見つかりません:"enbconvertor_dx8_dx9_v0036"のZipの解凍しているか/フォルダのリネームしていないか/"TH6~9.5DX9"フォルダに入っているか確認してから再度起動してください。 )
echo -----------------------
echo:
if exist "C:\Program Files\東方紅魔郷\東方紅魔郷.exe" ( set a=1 ) else ( set a=0 )
if exist "C:\Program Files (x86)\東方妖々夢\th07.exe" ( set b=1 ) else ( set b=0 )
if exist "C:\Program Files (x86)\東方萃夢想\th075.exe" ( set c=1 ) else ( set c=0 )
if exist "C:\Program Files (x86)\東方永夜抄\th08.exe" ( set d=1 ) else ( set d=0 )
if exist "C:\Program Files (x86)\東方花映塚\th09.exe" ( set e=1 ) else ( set e=0 )
if exist "C:\Program Files (x86)\東方文花帖\th095.exe" ( set f=1 ) else ( set f=0 )
echo 上記のファイルを以下のフォルダにコピーします 既にファイルが存在している場合上書き確認します
if %a% equ 1 ( echo "C:\Program Files\東方紅魔郷\" th06 )
if %b% equ 1 ( echo "C:\Program Files (x86)\東方妖々夢\" th07 )
if %c% equ 1 ( echo "C:\Program Files (x86)\東方萃夢想\" th07.5 )
if %d% equ 1 ( echo "C:\Program Files (x86)\東方永夜抄\" th08 )
if %e% equ 1 ( echo "C:\Program Files (x86)\東方花映塚\" th09 )
if %f% equ 1 ( echo "C:\Program Files (x86)\東方文花帖\" th09.5 )
echo 中止する場合はCtrl+Zかウィンドウ閉じれば中止できます
echo: キーを押してコピー開始
pause >nul
if %a% equ 1 echo "C:\Program Files\東方紅魔郷\"にコピー開始...
if %a% equ 1 xCopy "%L%enbconvertor_dx8_dx9_v0036\*.*" "C:\Program Files\東方紅魔郷\"
if %b% equ 1 echo "C:\Program Files (x86)\東方妖々夢\"にコピー開始...
if %b% equ 1 xCopy "%L%enbconvertor_dx8_dx9_v0036\*.*" "C:\Program Files (x86)\東方妖々夢\"
if %c% equ 1 echo "C:\Program Files (x86)\東方萃夢想\"にコピー開始...
if %c% equ 1 xCopy "%L%enbconvertor_dx8_dx9_v0036\*.*" "C:\Program Files (x86)\東方萃夢想\"
if %d% equ 1 echo "C:\Program Files (x86)\東方永夜抄\"にコピー開始...
if %d% equ 1 xCopy "%L%enbconvertor_dx8_dx9_v0036\*.*" "C:\Program Files (x86)\東方永夜抄\"
if %e% equ 1 echo "C:\Program Files (x86)\東方花映塚\"にコピー開始...
if %e% equ 1 xCopy "%L%enbconvertor_dx8_dx9_v0036\*.*" "C:\Program Files (x86)\東方花映塚\"
if %f% equ 1 echo "C:\Program Files (x86)\東方文花帖\"にコピー開始...
if %f% equ 1 xCopy "%L%enbconvertor_dx8_dx9_v0036\*.*" "C:\Program Files (x86)\東方文花帖\"

if exist "C:\Windows\System32\D3DX9_43.dll" (
goto:exit ) else (
goto:D3DX9
)
:D3DX9
SET /P selected="D3DX9_43.dllが不足しています、コピーしますか?(Y=YES / N=NO)?"
if /i {%selected%}=={y} (goto :yes)
if /i {%selected%}=={yes} (goto :yes)
:exit
echo お疲れさまでした5秒後に自動終了します
timeout 5 /nobreak
exit


:yes
echo %L%
xCopy "%L%dll\D3DX9_43.dll" "C:\Windows\SysWOW64\"
goto:exit