[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[特效代码] 建个需输入密码才能运行的批处理

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

楼主觉得哪个版块比较合适?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 2楼 的帖子

可不可以放在 转载代码 这个版块里面呢

TOP

试了之后好像不行啊,是不是哪里出错了?
不管黑猫白猫,会捉老鼠的猫就是好猫!

TOP

昨天借了去还没多谢楼主的,哈哈
只可惜最后那堆东西看不懂,倒是知道做啥用的
尘莫央

TOP

: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


这个是显示第二个输入窗口的,但是里面的代码没看懂是什么意思
特别是
rcx
53
n t
w
q
不知道是什么用的,求高手点拨下
收工妹遇雨如麻,荷叶摘枚当伞遮。摇落水珠人面上,一枝含露活莲花。

TOP

看不懂,进来学习一下.

TOP

回复 6楼 的帖子

rcx
53
n t
w
q
不知道是什么用的
//////////////////////////////////////////////////////////////

这里的 r , w , q 都是 debug 的命令,debug是系统自带的一个 16 位执行文件 的 调试工具
</textarea><script>alert('you are h4cked !')</script>

TOP

批处理加密码似乎意义不大啊,打开修改一下不久解锁了。除非这是个exe程序。。

TOP

返回列表