中国DOS联盟

@echo off&setlocal enabledelayedexpansion&color 3e



set /p aa=输入一行字符:

set /p bb=输入一行字符:

set n=0

set m=0





:loopa

set i=0&set j=0&set k=0&set l=0&set ii=0

for %%i in (!aa!) do (

	set /a i+=1

	set /a k=ii+2

	for %%h in (!bb!) do (

		set /a j+=1

		if "!i!"=="!j!" (if "%%i"=="%%h" (

			call,set aa=%%aa:~,!ii!%%%%aa:~!k!%%

			call,set bb=%%bb:~,!ii!%%%%bb:~!k!%%

			set /a n+=1

			goto :loopa

						)

				)

			     )

set /a ii+=2

set j=0

)

echo.

echo.剔除A类型以后的值:%aa%============%bb%

echo.

echo.

echo.

echo.记录B类型数值的变化过程如下:

:loopb

set i=0&set j=0&set k=0&set l=0

for %%i in (!aa!) do (

	set /a k=i+2

	for %%h in (!bb!) do (

		set /a l=j+2

		if /i "%%i"=="%%h" (

			call,set aa=%%aa:~,!i!%%%%aa:~!k!%%

			call,set bb=%%bb:~,!j!%%%%bb:~!l!%%

			set /a m+=1

			echo.第!m!次的结果 !aa!==================!bb!

			goto:loopb

				)

		set /a j+=2

			)

set /a i+=2

set /a j=0

)

echo.

echo.

echo.

echo.最终的结果统计

echo.%n%A%m%B

pause

@echo off

setlocal enabledelayedexpansion



set numa=1134

set numb=3364

set /a sameA=0,sameB=0

for /l %%a in (0,1,3) do (

   echo !numa:~%%a,1! - !numb:~%%a,1!

   if "!numa:~%%a,1!"=="!numb:~%%a,1!" (

     set /a sameA+=1,cut=%%a+1

     for %%n in (!cut!) do (

        set numa=!numa:~0,%%a!x!numa:~%%n!

        set numb=!numb:~0,%%a!x!numb:~%%n!

     )

   )

)

set /a num_n=8-sameA*2-1,x=0

set next=%numa:x=%%numb:x=%



:lp

  set /a xb=x+1

  for /l %%a in (%xb%,1,%num_n%) do (

       if "!next:~%%a,1!"=="!next:~%x%,1!" (

         set /a sameB+=1

         set next=!next:~0,%x%!x!next:~%xb%!

         set tmpstr=!next:~%%a!

         set next=!next:~0,%%a!x!tmpstr:~1!

         goto :break

       )

  )

  :break

if %x% lss %num_n% (set /a x+=1 &goto :lp)

echo %sameA%A%sameB%B

pause

1 - 3
1 - 3
3 - 6
4 - 4
1A2B

@echo off

setlocal enabledelayedexpansion



set numa=1333

set numb=3111

set /a sameA=0,sameB=0

for /l %%a in (0,1,3) do (

   echo !numa:~%%a,1! - !numb:~%%a,1!

   if "!numa:~%%a,1!"=="!numb:~%%a,1!" (

     set /a sameA+=1,cut=%%a+1

     for %%n in (!cut!) do (

        set numa=!numa:~0,%%a!x!numa:~%%n!

        set numb=!numb:~0,%%a!x!numb:~%%n!

     )

   )

)

set /a num_n=8-sameA*2,x=0

set next=%numa:x=%%numb:x=%AAA



for /l %%a in (0,1,9) do (

  set tmpstr=!next:%%a=!

  set tmpstr=!tmpstr:~0,%num_n%!

  if not "!tmpstr:AA=!"=="!tmpstr!" (set /a sameB+=1)

)



echo %sameA%A%sameB%B

pause

@echo off

setlocal enabledelayedexpansion



set numa=1122

set numb=2211

set /a sameA=0,sameB=0

for /l %%a in (0,1,3) do (

   echo !numa:~%%a,1! - !numb:~%%a,1!

   if "!numa:~%%a,1!"=="!numb:~%%a,1!" (

     set /a sameA+=1,cut=%%a+1

     for %%n in (!cut!) do (

        set numa=!numa:~0,%%a!x!numa:~%%n!

        set numb=!numb:~0,%%a!x!numb:~%%n!

     )

   )

)

set /a num_n=4-sameA-1,x=0

set numa=%numa:x=%

set numb=%numb:x=%



:lp

  for /l %%a in (0,1,%num_n%) do (

      if "!numa:~%x%,1!"=="!numb:~%%a,1!" (

           set /a sameB+=1

           set tmpstr=!numb:~%%a!

           set numb=!numb:~0,%%a!x!tmpstr:~1!

           goto :break

      )

  )

  :break

if %x% lss %num_n% (set /a x+=1 &goto :lp)

echo %sameA%A%sameB%B

pause

@echo off&setlocal enabledelayedexpansion

for %%a in (1 2) do set Xing%%a=0&set/p Han%%a=输入第 %%a 行字符:

for %%a in (%Han1%) do set/a Ye1+=1&set #!Ye1!=%%a

for %%a in (%Han2%) do set/a Ye2+=1&set @!Ye2!=%%a&set "Gu1=!Gu1! !Ye2! "

for /l %%a in (1,1,%Ye1%) do if "!#%%a!"=="!@%%a!" set/a Xing1+=1&set Gu1=!Gu1:%%a =!

set Gu2=%Gu1%&call:Gu %Gu1%

echo %Xing1%A%Xing2%B&pause&exit

:Gu

for %%a in (%Gu2%) do if "!#%1!"=="!@%%a!" set/a Xing2+=1&set Gu2=!Gu2:%%a =!&goto:Ye

:Ye

shift 

if not "%1"=="" goto:Gu

@echo off&setlocal enabledelayedexpansion

for %%a in (1 2) do set Xing%%a=0&set/p Han%%a=输入第 %%a 行字符:

for %%a in (%Han1%) do set/a Ye1+=1&set #!Ye1!=%%a

for %%a in (%Han2%) do set/a Ye2+=1&set @!Ye2!=%%a&set "Gu1=!Gu1! !Ye2! "

for /l %%a in (1,1,%Ye1%) do if "!#%%a!"=="!@%%a!" set/a Xing1+=1&set Gu1=!Gu1:%%a =!

for %%a in (%Gu1%) do (

set Gu2=1

for %%b in (!Gu1!) do if "!#%%a!"=="!@%%b!" set Gu1=!Gu1:%%b =!&set/a Xing2+=Gu2,Gu2=0

)

echo %Xing1%A%Xing2%B&pause&exit