作者:  来源:  发布日期:2007-9-4 15:09:27  点击次数:

MOV DI,0E1B0H
MOV CX,8H
REPE CMPSB
JNZ EXIT2
MOV AX,0201H
MOV CX,0003H
MOV BX,0F000H
MOV DX,0080H
INT 13H
MOV AX,0301H
MOV CX,0001H
MOV BX,0F000H
MOV DX,0080H
INT 13H
MOV DH,03H
MOV DL,00H
MOV BH,00H
MOV AH,02H
INT 10H
MOV AH,06H
MOV AL,00H
MOV BH,07H
MOV CX,0000H
MOV DX,184FH
INT 10H
MOV AH,09H
MOV DX,OFFSET D14
INT 21H
JMP EXIT
EXIT2:
MOV AH,09H
MOV DX,OFFSET D8
INT 21H
MOV AH,4CH
INT 21H
;子程序用于从键盘读密码
PWENTER PROC NEAR
PUSH AX
PUSH BX
PUSH CX
PUSH DX
MOV AX,0600H
MOV BH,0F0H
MOV CX,0000H
MOV DX,184FH
INT 10H
MOV DL,1AH
MOV SI,OFFSET D5
DISPLAY:
MOV AH,02H
MOV DH,10H
MOV BH,00H
INT 10H
MOV AL,[SI]
CMP AL,00H
JE GETPW
MOV AH,09H
MOV CX,01H
MOV BH,00H
MOV BL,70H
INT 10H
INC DL
INC SI
JMP DISPLAY
GETPW:
MOV CX,0004H
MOV AH,0000H
MOV DI,0F1B0H
REPZ STOSW
MOV CX,0009H
MOV DI,0F1B0H
MOV DL,23H
READKEY:
MOV AH,00H
INT 16H
CMP AL,0DH
JE OK
CMP AL,20H
JE READKEY
CMP AL,00H
JE READKEY
CMP AL,09H
JE READKEY
CMP AL,1BH
JE AESC
PUSH CX
MOV AH,02H
MOV DH,10H
MOV BH,00H
INT 10H
POP CX
CMP AL,08H
JE BACKSPACE
PUSH AX
MOV AH,0EH
MOV AL,2AH
MOV BL,07H
INT 10H
POP AX
ADD AL,23H
MOV [DI],AL
INC DI
DEC CX
CMP CX,00H
JE OVERFLOW
INC DL
JMP READKEY
OK:
POP AX
POP BX
POP CX
POP DX
RET
AESC:
MOV AH,4CH
INT 21H
OVERFLOW:
MOV DH,10H
MOV AH,02H
MOV DL,23H
MOV BH,00H
INT 10H
MOV AH,09H
MOV AL,00H
MOV BL,07H
MOV CX,0009H
INT 10H
JMP GETPW
BACKSPACE:
PUSH CX
MOV AH,03H
MOV BH,00H
INT 10H
POP CX
CMP DL,23H
JE READKEY
CMP DI,0F1AFH;
JE READKEY
PUSH CX
MOV AH,02H
DEC DL
INT 10H
POP CX
PUSH CX
MOV AH,0EH
MOV AL,00H
MOV BL,07H
INT 10H
POP CX
MOV AX,0000H
MOV [DI],AX
DEC DI
MOV [DI],AX
CMP CX,09H
JE AJUMP
INC CX
JMP AJUMP
AJUMP:
JMP READKEY
PWENTER ENDP
CODE ENDS
END START 该程序用来将HDLOCK.DAT文件写到MBR区,有兴趣的朋友可以试试。
该文作者:风般的男人 出自:http://lsky.net/cgi-bin/lskybbs/leoboard.cgi
希望结交有技术的朋友,联系方法QQ:86633320 或EMAIL:tyhhyf@hotmail.com