@echo off&cls
chcp 437>nul&graftabl 936>nul
for /f "delims=: tokens=1" %%i in ('findstr /i /n "^:writepass$" "%~f0"') do set line=%%i
<"%~f0" more +%line%|debug>nul
set "ps="
set n=0
set /p=请输入密码:<nul
:start
if %n%==256 (
echo &&goto e
) else (
for /f "delims=" %%i in ('password.com') do (
if "%%i"=="?" goto e
set "q=%%i"
if "%%i" equ "?" (call :p "%%i") else (
if "%%i" lss "? " (GOTO :start)
set /p=*<nul
set /a n+=1
if "%%i" geq "? " call set "ps=%%ps%%%%q:~1%%"
)))
goto start
:p
if not "%ps%" equ "" (
set "ps=%ps:~0,-1%"
SET /p= <nul
)
GOTO :eof
:e
:::Here you can do what you wanna do:::
echo.
echo 密码为:"%ps%"
del password.com
pause>nul
goto :eof
::下面的请不要随意修改::
:writepass
A
MOV DX,111
MOV AH,09
INT 21
MOV AH,01
INT 21
MOV AH,4C
INT 21
INT 20
DB '?'24 0D 0A 1A
R CX
108
N password.com
W
Q
来源:
www.cn-dos.net/forum ...
挑出这些代码:
set /p=*<nul
set /a n+=1
set "ps=%ps:~0,-1%"
SET /p= <nul
这类<nul的用法论坛里简直多成马咧,可我就是看不懂,一直在学习,
高人咋还这么悍哪!!!
不过还是感谢suntb,让我又学了一招,嘿嘿!
还有那位高人在潜水呀?出来帮帮俺哪,