Source code in the batch programming language

@echo off
setlocal enabledelayedexpansion
set /p string=Your string :
set count=0
:loop
	if "!%string%:~%count%,1!" neq "" (
		set reverse=!%string%:~%count%,1!!reverse!
		set /a count+=1
		goto loop
	)
set palindrome=isn't
if "%string%"=="%reverse%" set palindrome=is
echo %string% %palindrome% a palindrome.
pause
exit

@echo off
set /p testString=Your string (all same case please) : 
call :isPalindrome result %testString: =%
if %result%==1 echo %testString% is a palindrome
if %result%==0 echo %testString% isn't a palindrome
pause
goto :eof

:isPalindrome
	set %1=0
	set string=%2
	if "%string:~2,1%"=="" (
		set %1=1
		goto :eof
	)
	if "%string:~0,1%"=="%string:~-1%" (
		call :isPalindrome %1 %string:~1,-1%
	)
	goto :eof