[数值计算] [已解决]批处理怎么对比即时输入的200个4位数？

@echo off
:a
set a=%random:~-1%%random:~-1%%random:~-1%%random:~-1%
if defined #%a% (echo;%a%重复&goto:a) else set #%a%==&set/ab+=1
if %b% lss 200 goto:a
set #&pause
复制代码

@echo off & setlocal enableDelayedExpansion
set nl=^


set dataSet=!nl!
for /l %%i in (1 1 0xffff) do (
  set /p var="Please input a new data No. %%i: "
  for %%v in (!var!) do (
    if "!dataSet:%%v-=!"=="!dataSet!" (
      echo It's a new data.!nl!
    ) else (
      echo This data: %%v has been entered:
      for /f "delims=" %%s in ("!dataSet!") do (
        set sect=%%s
        if not "!sect:%%v-=!"=="!sect!" echo No. !sect:%%v-=!
      )
      echo.
    )
    set dataSet=!dataSet!%%v-%%i!nl!
  )
)
复制代码

@echo off & setlocal enableDelayedExpansion
set str=,
for /l %%i in () do (
	set /p n=请输入数值
	for /f %%a in (",!n!,") do if "!str:%%a=!"=="!str!" (
		set str=,!n!!str!
		set /a m+=1
	) else echo 已存在!n!
	if !m! gtr 200 for %%a in (!str!) do echo %%a
)
pause
复制代码

@echo off
set /a n=0
set /a maxnum=240

:DO
	set /p x=Input:
	if defined #%x% (call :SHOWOK) else (set "#%x%=v")
	set /a n+=1
	if %n% geq %maxnum% (goto :END)
	goto :DO

:SHOWOK
	echo.找到一个重复的: %x%
	exit /b

:END	
	echo.结束
	pause
	EXIT
复制代码

@echo off & setlocal enableDelayedExpansion
set dataSet=,
set cnt=0
for /l %%i in (0 0 0) do (
  cls & color 07 & echo dataSet (!cnt! items^): !dataSet:~1,-1!
  set /a cnt+=1
  echo. & set /p var="Please input the No. !cnt! data: "
  for %%v in (!var!) do (
    if "!dataSet:,%%v,=!"=="!dataSet!" (
      set dataSet=!dataSet!%%v,
    ) else (
      color 0c
      echo This data: %%v has been entered: & pause
      set /a cnt-=1
    )
  )
)
复制代码