@echo off
::支持空行wangwei070918qq251485609
:cxsr
cls
@echo.
SET /P gwjm=请将文件拉入本窗口:
if exist %gwjm% goto zx
@goto cxsr
:zx
@echo.
::检查文件总行数
for /f "tokens=3 delims= " %%i in ('find /v /c "" %gwjm%') do set m=%%i
SET /P YGJ= 需要从头保留多少行:
set /a ys=%YGJ%+1>nul
cd.>2.txt
for /f "delims=" %%i in ('findstr /n .* %gwjm%') do (
set /a sw=%%i 2>nul
set "v=%%i"
setlocal enabledelayedexpansion
set "v=!v:*:=!"
if !sw! EQU !ys! goto :tc
echo.!v!>>2.txt
endlocal
)
:tc