|
如何加密启动光碟
仔细一点忙!!!!
转载自 http://star1668.xilubbs.com/
:start
cls
print 1
print 光盘启动菜单
print
print
print
print
print 输入密码
print
print 密码:[***********]错误!
print
print
print
print
print
print
print
print
print
print
print
print
print
print
print
print
;
:next0
print 1
getkey
onkey 0x1970 goto pass1
onkey bs goto next0
onkey entr goto error0
goto next1
;
:next1
print 2
getkey
onkey bs goto next0
onkey entr goto error0
goto next2
;
:next2
print 3
getkey
onkey bs goto next1
onkey entr goto error0
goto next3
;
:next3
print 4
getkey
onkey bs goto next2
onkey entr goto error0
goto next4
;
:next4
print 5
getkey
onkey bs goto next3
onkey entr goto error0
goto next5
;
:next5
print 6
getkey
onkey bs goto next4
onkey entr goto error0
goto next6
;
:next6
print 7
getkey
onkey bs goto next5
onkey entr goto error0
goto next7
;
:next7
print 8
getkey
onkey bs goto next6
onkey entr goto error0
goto next8
;
:next8
print 9
getkey
onkey bs goto next7
onkey entr goto error0
goto next9
;
:next9
print a
getkey
onkey bs goto next8
onkey entr goto error0
goto nexta
;
:nexta
print b
getkey
onkey bs goto next9
onkey entr goto error0
goto nextb
;
:nextb
print c
getkey
onkey bs goto nexta
onkey entr goto error0
goto nextb
;
:pass1
print 2
getkey
onkey 0x1E61 goto pass2
onkey bs goto next0
onkey entr goto error0
goto next2
;
:pass2
print 3
getkey
onkey 0x1F73 goto pass3
onkey bs goto pass1
onkey entr goto error0
goto next3
;
:pass3
print 4
getkey
onkey 0x1F73 goto pass4
onkey bs goto pass2
onkey entr goto error0
goto next4
;
:pass4
print 5
getkey
onkey 0x1177 goto pass5
onkey bs goto pass3
onkey entr goto error0
goto next5
;
:pass5
print 6
getkey
onkey 0x186F goto pass6
onkey bs goto pass4
onkey entr goto error0
goto next6
;
:pass6
print 7
getkey
onkey 0x1372 goto pass7
onkey bs goto pass5
onkey entr goto error0
goto next7
;
:pass7
print 8
getkey
onkey 0x2064 goto pass8
onkey bs goto pass6
onkey entr goto error0
goto next8
;
:pass8
print 9
getkey
onkey bs goto pass7
onkey entr goto passok
goto next9
;
:pass9
print a
getkey
onkey bs goto pass8
onkey entr goto error0
goto nexta
;
:passa
print b
getkey
onkey bs goto pass9
onkey entr goto error0
goto nextb
;
:passb
print c
getkey
onkey bs goto passa
onkey entr goto error0
goto passb
;
:error0
print d
getkey
goto next0
:passok
cls
run boot.img
getkey
goto start
;eof
|
|