中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

yovie
初级用户

积分 92
发帖 42
注册 2007-8-14
来自重庆市巫山县
状态离线

『楼主』: 发一个输入字符显示[*]号的批处理

借鉴了原来Herbert Kleebauer大人的ASCODE那段

Quote:

@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