LuckyTeng

:: list path in set for human readable
@echo off
setlocal

set a=1

:LOOP
for /f "delims=;, tokens=%a%" %%i in ("%path%") do if  "%%i" neq "" (
  echo %%i
  set /a a=a+1

LuckyTeng

@echo off
setlocal enableDelayedExpansion

if not defined bin (
  :: set bin to current directory
  set bin=%~dp0
)

echo current dir %bin%