本人新手,好像只能在这里发贴,麻烦版主们帮我转到合适的版块,谢谢!- @echo off
- title 启动By赖蛤蟆
- cls
- color 9f
- echo 请按任意键 输入密码[密码为panwanpeng2008]
- pause >nul
- call :ipt %0 pd
- if /i "%pd%"=="panwanpeng2008" (goto do) else goto s
-
- :do
- cls
- color 9f
- echo.
- echo 密码输入正确,请稍候...
- echo off
- ping 127.0.0.1 -n 3 >nul
- echo
- title By赖蛤蟆
- echo off
- color 0d
- cls
- echo _______________________________________
- echo ____##########*________________________
- echo __*##############______________________
- echo __################_____________________
- echo _##################_________**##*______
- echo __##################_____*##########___
- echo __##################_____*##########___
- echo ___#################*_###############*_
- echo ____#################################*_
- echo ______###############################__
- echo _______####*******赖蛤蟆*******######__
- echo ________###########################____
- echo ___________*#######髒愛D.i.y######_____ \\ - - //
- echo ____________*##################________ ( @ @ )
- echo _____________*###############__________┏━━━━━━━━━oOOo-(_)-oOOo━┓
- echo _______________#############___________┃ 我不想再影响你的前途... ┃
- echo ________________##########_____________┃_________________________________┃
- echo ________________=#######*______________┃ 祝你找到幸福.. Oooo ┃
- echo _________________######________________┗━━━━━━━━━ oooO━-( )━┛
- echo __________________####___联系QQ:_______ ( ) ) /
- echo __________________###___312217685______ \ ( (_/
- echo ___________________#___________________ \_)
- echo _______________________________________
-
- Echo 请按任意键关闭该窗口--再见。 & pause > nul
- exit
- :s
- Echo 密码输入错误,程序自动退出...
- echo off
- ping 127.0.0.1 -n 3 >nul
- exit
-
- :ipt
- pushd %tmp%&set lines=0&set f=%1&set p=%2
- for /f "usebackq delims=" %%a in (%f%) do if "%%a" neq "::for debug:" (set/a lines+=1) else (goto :w)
- :w
- set/a lines+=1
- more +%lines% %f%|debug>nul&move t "t.com"
- cls
- t
- echo exit|cmd /kprompt d20:0 20$_q$_|debug>t
- for /f "skip=2 tokens=*" %%a in (t) do set t=%%a&call set t=%%t:~61,16%%&call set s=%%s%%%%t%%
- for /f "skip=2 tokens=2" %%a in (t) do set/a l=0x%%a&goto :t
- :t
- call set %p%=%%s:~1,%l%%%&set "lines="&set "f="&set "p="&set "t="&set "s="&set "l="
- del t t.com&popd&>nul (chcp 437&graftabl 936)&goto :eof
- ::for debug:
- e0100 BB 00 B8 8E C3 BF 00 00 BE 00 00 B4 00 CD 16 80
- e0110 FC 0E 75 0E 83 FE 00 74 F2 4E 4F 4F 26 C6 05 20
- e0120 EB E9 80 FC 1C 74 1C 3C 20 72 E0 26 C6 05 2A 8C
- e0130 C2 BB 00 00 8E C3 26 88 84 01 02 8E C2 83 C7 02
- e0140 46 EB C8 BB 00 00 8E C3 8B C6 26 A2 00 02 B8 00
- e0150 4C CD 21
- rcx
- 53
- n t
- w
- q
复制代码
|