CODE: SELECT ALL

@echo off

setlocal ENABLEEXTENSIONS ENABLEDELAYEDEXPANSION

(set CHAR[0]=000) & (set CHAR[1]=111) & (set CHAR[2]=222) & (set CHAR[3]=333)

(set CHAR[4]=444) & (set CHAR[5]=555) & (set CHAR[6]=666) & (set CHAR[7]=777)

(set CHAR[8]=888) & (set CHAR[9]=999) & (set CHAR[-]=—)

set TestPass=123-456-789

set TestPass2=%TestPass%

set "NewPass="

:again

set char=%TestPass2:~0,1%

set TestPass2=%TestPass2:~1%

set NewPass=%NewPass%!CHAR[%char%]!

if not "%TestPass2%"=="" goto :again

echo old password: %TestPass%

echo new password: %NewPass%