BATCH : Mouvement

Je sais mais je veut le faire en batch, mais c'est pour un projet

@echo off
title PION
mode 17,10
color f0
title Pion
set a1=.
set a2=.
set a3=.
set a4=.
set a5=.
set a6=.
set a7=.
set a8=.
set a9=.
set a10=.
set a11=.
set a12=.
set a13=.
set a14=.
set a15=.
set a16=.
set tour=0
set pip=1
set pi=%pip%
:menu2
if %pi%==1 set a1=.
if %pi%==2 set a2=.
if %pi%==3 set a3=.
if %pi%==4 set a4=.
if %pi%==5 set a5=.
if %pi%==6 set a6=.
if %pi%==7 set a7=.
if %pi%==8 set a8=.
if %pi%==9 set a9=.
if %pi%==10 set a10=.
if %pi%==11 set a11=.
if %pi%==12 set a12=.
if %pi%==13 set a13=.
if %pi%==14 set a14=.
if %pi%==15 set a15=.
if %pi%==16 set a16=.




if %pip%==1 set a1=X
if %pip%==2 set a2=X
if %pip%==3 set a3=X
if %pip%==4 set a4=X
if %pip%==5 set a5=X
if %pip%==6 set a6=X
if %pip%==7 set a7=X
if %pip%==8 set a8=X
if %pip%==9 set a9=X
if %pip%==10 set a10=X
if %pip%==11 set a11=X
if %pip%==12 set a12=X
if %pip%==13 set a13=X
if %pip%==14 set a14=X
if %pip%==15 set a15=X
if %pip%==16 set a16=X
set /a tour=tour+1
if %tour%==2 set a1=.
:menu
cls
echo.
echo %a1% %a2% %a3% %a4%
echo %a5% %a6% %a7% %a8%
echo %a9% %a10% %a11% %a12%
echo %a13% %a14% %a15% %a16%
echo.
echo z=haut/s=bas
echo q=gauche/d=droite
choice /c zsqd /n
if %errorlevel%==1 goto haut
if %errorlevel%==2 goto bas
if %errorlevel%==3 goto gauche
if %errorlevel%==4 goto droite
goto menu
:haut
if %pip%==1 goto menu
if %pip%==2 goto menu
if %pip%==3 goto menu
if %pip%==4 goto menu
set pi=%pip%
set /a pip=pip-4
goto menu2
:bas
if %pip%==13 goto menu
if %pip%==14 goto menu
if %pip%==15 goto menu
if %pip%==16 goto menu
set pi=%pip%
set /a pip=pip+4
goto menu2
:droite
if %pip%==4 goto menu
if %pip%==8 goto menu
if %pip%==12 goto menu
if %pip%==16 goto menu
set pi=%pip%
set /a pip=pip+1
goto menu2
:gauche
if %pip%==1 goto menu
if %pip%==5 goto menu
if %pip%==9 goto menu
if %pip%==13 goto menu
set pi=%pip%
set /a pip=pip-1
goto menu2