@echo off

cd /d %~dp0
cd ..

setlocal

if "%tkprog_X_path%" == "" (
rem tkprog_baseディレクトリを探す
	if exist "tkprog_base" (
	    set "work=d:\tkprog_base"
	    goto :found
	)

: 最初に見つかったtkprog_*ディレクトリを探す
	for /d %%d in (tkprog_*) do (
	    set tkprog_X_path=%%d
	    goto :found
	)

:found
	echo tkprog_X_path=%tkprog_X_path%
)


rem 一つ上のディレクトリを取得
for %%i in ("%tkprog_X_path%") do set parent_dir=%%~dpi

rem 最後の \ を削除
set parent_dir=%parent_dir:~0,-1%

python %parent_dir%\bin\ps.py %*

endlocal