@echo off
title 延时关机
mode con: cols=32 lines=3
color 1f
cls
set time=
echo.
set /p time= 请输入在多少秒后关机: 
title 延时 %time% 秒关机
echo.
echo   电脑将在 %time% 秒后关机.
shutdown -s -f -t %time% >nul
ping -n 15 127.0.0.1>nul
复制代码

@echo off
:bgn
set /p time=请输入在多少秒后关机:
if "%time%" geq "0" if "%time%" lss "a" cls & goto next
cls & echo 错误: 请输入数字!&echo.&echo.按任意键返回. . .
pause>nul & cls & goto bgn

:next
title 延时 %time% 秒关机
echo 电脑将在 %time% 秒后关机.
pause
复制代码

@Echo Off
:Loop
If not defined var set "var=abcd"
Echo %var%| Findstr "[^0-9]">nul && (Echo 只能是纯数字&set "var=1234" & goto :Loop)
Pause
复制代码

@echo off
set /p input=输入:
set /a a=1/(%input%1) 2>nul && echo 数字 || echo 非数字
pause
复制代码

@echo off
title 延时关机
mode con: cols=32 lines=3
color 1f
cls
set time=
echo.
set /p time= 请输入在多少秒后关机: 
title 延时 %time% 秒关机
echo.
echo   电脑将在 %time% 秒后关机.
set /a time+=1
ping -n %time% 127.1 >nul
shutdown -s -f -t 0
复制代码

@echo off
:loop
setlocal
set /p var= &cls
set num=a%var%
for /l %%a in (0 1 9) do call set num=%%num:%%a=%%
if "%num%"=="a" (echo %var% 是纯数字) else echo %var% 不是纯数字
pause
endlocal
goto loop
复制代码

@echo off
title 延时关机
mode con: cols=32 lines=3
color 1f
:begin
cls
set time=
echo.
set /p time= 请输入在多少秒后关机: 
set /a a=1/(%time%1) 2>nul && cls || goto begin
title 延时 %time% 秒关机
echo.
echo   电脑将在 %time% 秒后关机.
shutdown -s -f -t %time% >nul
ping -n 15 127.0.0.1 >nul
复制代码

echo %input%|findstr "^[0-9]*$">nul&&echo 输入正确||echo 含有非法字符
复制代码

@echo off & setlocal
if "%~1" neq "-new" start "" "%~f0" -new & exit/b
set /p s=Please Input:
call :IsNumeric "%s%" && echo True || echo False
pause & exit



:IsNumeric
setlocal
for /f "tokens=1* delims=:" %%a in ('findstr /n "^:IsNumeric$" "%~f0"') do set /a n=%%a+4
(echo e11d '%~1' ff&more /e +%n% "%~f0")|debug>nul
goto :eof 
a100
MOV     BX,011D
CMP     BYTE PTR [BX],30
JB      0117
CMP     BYTE PTR [BX],39
JA      0117
INC     BX
CMP     BYTE PTR [BX],FF
JNZ     0103
MOV     AL,00
JMP     0119
MOV     AL,01
MOV     AH,4C
INT     21

g
q
goto :eof
复制代码

set /a 1/%time% 2>nul||goto loop
复制代码