Board logo

标题: [游戏娱乐] 批处理模仿黑客记事本 [打印本页]

作者: novaa    时间: 2007-12-11 19:45     标题: 批处理模仿黑客记事本

本批处理版面格式借用了NAMEJM的
本批处理中建立文件夹的代码在3742668的代码基础上进行了修改.
以后估计不写这么长的代码了,好要时间过。呵呵。
  1. ::code by novaa @ bbs.bathome.net
  2. @echo off&title 黑客记事本&color 02&setlocal enabledelayedexpansion
  3. goto :Begin
  4. 禁止默认共享
  5. net share ipc$ /delete
  6. net share admin$ /delete
  7. net share c$ /delete
  8. net share d$ /delete
  9. 建立IPC$空连接:
  10. net use \\IP\ipc$ "" /user:"" (一定要注意:这一行命令中包含了3个空格)
  11. 建立IPC$非空连接:
  12. net use \\IP\ipc$ "用户名" /user:"密码"
  13. 映射默认共享:
  14. net use z: \\IP\c$ "密码" /user:"用户名" (即可将对方的c盘映射为自己的z盘,其他盘类推)
  15. 如果已经和目标建立了ipc$,则可以直接用IP+盘符+$访问,具体命令 net use z: \\IP\c$
  16. 删除一个ipc$连接
  17. net use \\IP\ipc$ /del
  18. 删除共享映射
  19. net use c: /del 删除映射的c盘,其他盘类推
  20. net use * /del 删除全部,会有提示要求按y确认
  21. 添加系统用户
  22. net user 用户名 密码 /add
  23. net localgroup administrators 用户名 /add
  24. 删除用户
  25. net user 用户名 /del
  26. 查看进程
  27. tasklist
  28. 结束进程
  29. taskkill /f /pid 进程PID号
  30. 查看开放端口
  31. netstat
  32. 查看IP及DNS和MAC
  33. ipconfig /all
  34. 查看共享
  35. net view
  36. net share
  37. 开启服务
  38. start 服务名
  39. :Begin
  40. if not exist File.ini (cd.>File.ini
  41. echo 华夏黑客联盟 www.77169.com>>File.ini
  42. echo 爱国者黑客 www.3800hk.com>>File.ini
  43. echo 黑客动画吧 www.hack58.com>>File.ini
  44. echo 第八军团 www.juntuan.net>>File.ini
  45. echo 网络安全焦点 www.xfocus.net>>File.ini
  46. echo 冰兰技术联盟 www.icehack.cn>>File.ini
  47. echo 黑客手册 www.nohack.cn
  48. echo 邪恶八进制 forum.eviloctal.com>>File.ini
  49. )
  50. :Menu
  51. cls
  52. ::显示功能
  53. ::本批处理版面格式借用了NAMEJM的
  54. ::本批处理中建立文件夹的代码在3742668的代码基础上进行了修改.
  55. echo.
  56. echo.
  57. echo ╭────────╮
  58. echo ╭─────────┤Novaa 黑客记事本├─────────╮
  59. echo │ ╰────────╯ │
  60. echo │ │
  61. echo │ │
  62. echo │ 功能 1.常登入的黑客网站 │
  63. echo │ │
  64. echo │ 2.注册表操作 │
  65. echo │ │
  66. echo │ 3.常用入侵及DOS命令 │
  67. echo │ │
  68. echo │ 4.运行里可输入的命令集合 │
  69. echo │ │
  70. echo │ 5.打开记事本 │
  71. echo │ │
  72. echo │ 6.建立黑客文件夹分类 │
  73. echo │ │
  74. echo │ 7.查看本机IP │
  75. echo │ │
  76. echo ╰────────────────────────────╯
  77. echo 请选择功能 退出请输入 0
  78. echo ────────────────────
  79. set /p Choice=
  80. if "%Choice%"=="0" exit
  81. for %%i in (1,2,3,4,5,6,7) do if "%%i"=="%Choice%" set Go=1
  82. if defined Go (goto :Choice%Choice%) else (
  83. echo 错误的输入,请重新输入.
  84. goto :Menu
  85. )
  86. :Choice1
  87. cls&echo\&echo\&echo\
  88. echo 添加网站请输入:1&echo\&echo\
  89. echo 打开网站请输入:2&echo\&echo\
  90. echo 返回上一层菜单请输入:3
  91. set /p Choice_1=
  92. if "%Choice_1%"=="1" goto :Choice_1
  93. if "%Choice_1%"=="2" goto :Choice_2
  94. if "%Choice_1%"=="3" goto :Menu
  95. :Choice_1
  96. cls&echo\&echo\&echo\
  97. set /p Choice_netname= 请输入你想添加的网站名称:&echo\&echo\
  98. set /p Choice_netadd= 请输入该网站的域名(无需 http://):
  99. echo %Choice_netname% %Choice_netadd%>>File.ini
  100. cls&echo.&echo.&echo.&echo.&echo 网站已经添加!&ping /n 3 127.1>nul
  101. goto :Choice1
  102. :Choice_2
  103. cls&echo\&echo\&echo\
  104. findstr /n .* File.ini&echo\
  105. set /p Choice1=请输入你想登入的网站代码:
  106. for /f "tokens=1,2* delims=: " %%i in ('findstr /n .* File.ini') do (
  107. if "%Choice1%"=="%%i" start http://%%k
  108. )
  109. goto :Menu
  110. :Choice2
  111. cls&echo\&echo\&echo\
  112. echo 有些功能需要重启电脑后方可生效!&echo\
  113. echo 1.禁用(解禁)注册表&echo\
  114. echo 2.禁用(解禁)开始菜单中的运行&echo\
  115. echo 3.禁用(解禁)开始菜单中的控制面板&echo\
  116. echo 4.禁用(解禁)网上邻居&echo\
  117. echo 5.禁用(解禁)任务管理器&echo\
  118. echo 6.禁用(解禁)右键快捷菜单&echo\
  119. echo 7.禁用(解禁)在开始菜单拖放快捷键&echo\
  120. echo 8.禁止更改"主页"&echo\
  121. echo 请选择功能(输入代号+功能:禁用输入1.解禁输入0)
  122. echo 比如 输入 11表示禁用注册表&echo\
  123. echo 输入错误将返回主菜单
  124. set /p Reg_2=请输入:
  125. set Reg_21=%Reg_2:~0,1%
  126. set Reg_22=%Reg_2:~1,1%
  127. for %%i in (1,2,3,4,5,6,7,8) do if "%%i"=="%Reg_21%" set Go_1=1
  128. if defined Go_1 (call :%Reg_21% & goto :Choice2_2) else echo 错误的输入&ping /n 3 127.1>nul&goto :Menu
  129. :1
  130. ::禁用注册表
  131. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableRegistryTools /t REG_DWORD /d %
  132. Reg_22% /f
  133. goto :eof
  134. :2
  135. ::禁用开始菜单中的运行
  136. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoRun /t REG_DWORD /d %Reg_22% /f
  137. goto :eof
  138. :3
  139. ::禁用开始菜单中的控制面板
  140. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoSetFolders /t REG_DWORD /d %Reg_22% /f
  141. goto :eof
  142. :4
  143. ::禁用网上邻居
  144. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoNetHood /t REG_DWORD /d %Reg_22% /f
  145. goto :eof
  146. :5
  147. ::禁用任务管理器
  148. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\System /v DisableTaskMgr /t REG_DWORD /d %Reg_22% /f
  149. goto :eof
  150. :6
  151. ::禁用右键快捷菜单
  152. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoViewContextMenu /t REG_DWORD /d %
  153. Reg_22% /f
  154. goto :eof
  155. :7
  156. ::禁用在开始菜单拖放快捷键
  157. reg add HkCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer /v NoChangeStartMenu /t REG_DWORD /d %
  158. Reg_22% /f
  159. goto :eof
  160. :8
  161. ::禁止更改"主页"
  162. reg add HKCU\Software\Policies\Microsoft\Internet Explorer\Control Panel /v HomePage /t REG_DWOED /d 1
  163. goto :eof
  164. :Choice2_2
  165. cls&echo\&echo\&echo\&echo\&echo\&echo\
  166. echo 继续请输入:1
  167. echo\&echo\
  168. echo 任意键回到主目录
  169. set /p Choice2_2=
  170. if "%Choice2_2%" == 1 (goto :Choice2) else goto :Menu
  171. :Choice3
  172. color 02
  173. set LineNum=38
  174. for /f "tokens=1* delims=:" %%i in ('findstr /n .* "%~0"') do (
  175. if %%i leq %LineNum% set "_%%i=%%j"
  176. )
  177. set "_1=命令都是教常用的"
  178. set "_2=希望对大家有帮助"
  179. set "_3=By Novaa"
  180. cls&echo\&echo\
  181. for /l %%i in (1 1 38) do set /p= !_%%i!<NUL&ECHO\
  182. echo\&echo\
  183. echo 退出请输入:1&echo\
  184. echo 任意键返回
  185. set /p Choice3_1=请输入:
  186. if "%Choice3_1%" == "1" (goto :eof) else goto :Menu
  187. :Choice4
  188. color 02
  189. ::找出"winver:检查Windows版本" 所在的行.
  190. for /f "tokens=1* delims=:" %%i in ('findstr /n .* "%~0"') do (
  191. if "%%j"=="winver:检查Windows版本" set SkipLine=%%i
  192. )
  193. set /a SkipLine=SkipLine-1
  194. cls&echo\&echo\&echo\
  195. set num=1
  196. for /f "skip=%SkipLine% delims=" %%i in ('findstr .* "%~0"') do set /p= !num!.%%i<NUL&ECHO\&SET num+="1
  197. echo 执行命令请输入:1
  198. echo 返回主菜单请输入:2
  199. set /p Choice_12=
  200. if "%Choice_12%"=="1" goto:Choice_4
  201. if "%choice_12%"=="2" (goto :Menu) else (cls&echo 错误的输入!&ping /n 127.1>nul&goto :Menu)
  202. :Choice_4
  203. if exist Choice_4.ini del Choice_4.ini
  204. cls&echo\&echo\&echo\
  205. for /f "tokens=1* delims=:" %%i in ('findstr /n .* "%~0"') do (
  206. if "%%j"=="winver:检查Windows版本" set SkipLine=%%i
  207. )
  208. set /a SkipLine=SkipLine-1
  209. cls&echo\&echo\&echo\
  210. set num=1
  211. for /f "skip=%SkipLine% delims=" %%i in ('findstr .* "%~0"') do echo !num!.%%i>>Choice_4.ini&echo\&set /a num+=1
  212. findstr .* Choice_4.ini
  213. set /p Choice4_1=请输入命令的编号:
  214. for /f "tokens=1,2* delims=.:" %%i in ('findstr .* Choice_4.ini') do (
  215. if "%Choice4_1%"=="%%i" start %%j
  216. )
  217. goto :Menu
  218. :Choice5
  219. start notepad
  220. goto :Menu
  221. :Choice6
  222. :Choice_Help
  223. cls&echo\&echo\&echo\&echo\
  224. echo 本功能能够按照你的需要建立完整的工具文件夹结构&echo\
  225. echo 请将你需要的分类按照下面的格式保存为Tool.txt放在同目录下&echo\
  226. echo 1 扫描
  227. echo 流光 X_SCAN Superscan
  228. echo 2
  229. echo 1 远程监控
  230. echo 灰鸽子 黑洞 Radmin
  231. echo 2
  232. echo 1 木马后门
  233. echo 自己写了
  234. echo 2
  235. echo\
  236. echo 1在新类前;2在类别结束后&echo\&echo\
  237. echo 已经准备好了?&echo\&echo\&echo\
  238. echo 准备好了请输入:1
  239. echo\
  240. echo 返回主目录请输入:2
  241. echo\
  242. set /p Choice_6=请输入
  243. if "%Choice_6%"=="2" goto :Menu
  244. if "%Choice_6%"=="1" (goto :Choice6_ok) else (cls&echo\&echo\&echo\&echo 错误的输入! &ping /n 3
  245. 127.1>nul&goto :Choice_Help)
  246. :Choice6_ok
  247. cls&echo\&echo\&echo\&echo\
  248. ::这段代码非原创
  249. ::code by 3742668 2006-9-22 modified by jm
  250. set /p Holder=请输入你想要保存文件夹的路径:
  251. copy Tool.txt %Holder%
  252. pushd %Holder%
  253. for /f "tokens=*" %%i in (Tool.txt) do call :Create %%i
  254. del Tool.txt
  255. goto :Menu
  256. :Create
  257. if "%1" == "2" popd
  258. if "%1" == "1" (if exist %2 rd /q /s %2
  259. if exist 2 rd /q /s 2
  260. md %2
  261. pushd %2
  262. ) else (
  263. if exist %* rd /q /s %*
  264. md %*
  265. if exist 2 rd /q /s 2
  266. )
  267. goto :eof
  268. :Choice7
  269. cls&echo\&echo\&echo\&echo\&echo\
  270. for /f "tokens=15" %%i in ('ipconfig ^| find /i "ip address"') do set ip=%%i
  271. echo %ip%&echo\&echo 任意键返回
  272. pause>nul
  273. goto :Menu
  274. winver:检查Windows版本
  275. wmimgmt.msc:打开windows管理体系结构
  276. wupdmgr:windows更新程序
  277. winver:检查Windows版本
  278. wmimgmt.msc:打开windows管理体系结构
  279. wupdmgr:windows更新程序
  280. wwww:windows脚本宿主设置
  281. write:写字板
  282. winmsd:系统信息
  283. wiaacmgr:扫描仪和照相机向导
  284. winchat:XP自带局域网聊天
  285. mem.exe:显示内存使用情况
  286. Msconfig.exe:系统配置实用程序
  287. mplayer2:简易widnows media player
  288. mspaint:画图板
  289. mstsc:远程桌面连接
  290. mplayer2:媒体播放机
  291. magnify:放大镜实用程序
  292. mmc:打开控制台
  293. mobsync:同步命令
  294. dxdiag:检查DirectX信息
  295. drwtsn32:系统医生
  296. devmgmt.msc:设备管理器
  297. dfrg.msc:磁盘碎片整理程序
  298. diskmgmt.msc:磁盘管理实用程序
  299. dcomcnfg:打开系统组件服务
  300. ddeshare:打开DDE共享设置
  301. dvdplay:DVD播放器
  302. net stop messenger:停止信使服务
  303. net start messenger:开始信使服务
  304. notepad:打开记事本
  305. nslookup:网络管理的工具向导
  306. ntbackup:系统备份和还原
  307. narrator:屏幕"讲述人"
  308. ntmsmgr.msc:移动存储管理器
  309. ntmsoprq.msc:移动存储管理员操作请求
  310. netstat :an:(TC)命令检查接口
  311. syncapp:创建一个公文包
  312. sysedit:系统配置编辑器
  313. sigverif:文件签名验证程序
  314. sndrec32:录音机
  315. shrpubw:创建共享文件夹
  316. secpol.msc:本地安全策略
  317. syskey:系统加密,一旦加密就不能解开,保护windows xp系统的双重密码
  318. services.msc:本地服务设置
  319. Sndvol32:音量控制程序
  320. sfc.exe:系统文件检查器
  321. sfc /scannow:windows文件保护
  322. tsshutdn:60秒倒计时关机命令
  323. tourstart:xp简介(安装完成后出现的漫游xp程序)
  324. taskmgr:任务管理器
  325. eventvwr:事件查看器
  326. eudcedit:造字程序
  327. explorer:打开资源管理器
  328. packager:对象包装程序
  329. perfmon.msc:计算机性能监测程序
  330. progman:程序管理器
  331. regedit.exe:注册表
  332. rsop.msc:组策略结果集
  333. regedt32:注册表编辑器
  334. rononce :p :15秒关机
  335. regsvr32 /u *.dll:停止dll文件运行
  336. regsvr32 /u zipfldr.dll:取消ZIP支持
  337. cmd.exe:CMD命令提示符
  338. chkdsk.exe:Chkdsk磁盘检查
  339. certmgr.msc:证书管理实用程序
  340. calc:启动计算器
  341. charmap:启动字符映射表
  342. cliconfg:SQL SERVER 客户端网络实用程序
  343. Clipbrd:剪贴板查看器
  344. conf:启动netmeeting
  345. compmgmt.msc:计算机管理
  346. cleanmgr:**整理
  347. ciadv.msc:索引服务程序
  348. osk:打开屏幕键盘
  349. odbcad32:ODBC数据源管理器
  350. oobe/msoobe /a:检查XP是否激活
  351. lusrmgr.msc:本机用户和组
  352. logoff:注销命令
  353. iexpress:木马捆绑工具,系统自带
  354. Nslookup:IP地址侦测器
  355. fsmgmt.msc:共享文件夹管理器
  356. utilman:辅助工具管理器
  357. gpedit.msc:组策略
复制代码

作者: meishishen    时间: 2008-1-3 22:58

运行不起来,有点问题
作者: 柴火垛    时间: 2008-2-3 14:59

运行的起来啊,看似不错,。
作者: lixiaodaoaaa    时间: 2008-2-13 15:31     标题: 不错

试了一下,真的不错!
这个工具很管用的
作者: heiing    时间: 2008-2-14 15:48

嗯,确实不错,收藏了
作者: 宇宙浪人    时间: 2008-3-8 22:02

运行的起来啊,看似不错
作者: listen    时间: 2008-5-5 14:09

帮楼主修改好了
作者: listen    时间: 2008-5-5 14:17

总的来说..还是不能用...
作者: hfjgood    时间: 2008-7-21 18:47     标题: 制成批处理

怎样才能把那些代码制成批处理呢
作者: gxprg    时间: 2008-7-27 20:18

能运行,有启发。谢谢。
作者: cyfw    时间: 2008-8-3 22:40

hao!!good!!
作者: 84918930    时间: 2008-8-14 13:32

LZ辛苦,,
继续努力
作者: 糖水嘟嘟    时间: 2008-8-17 15:44

楼主辛苦了   ,楼主加油啊
作者: wzahj    时间: 2009-12-4 15:59

谢谢楼主 支持啊  呵呵呵
作者: symsymsym    时间: 2009-12-20 14:48

神人啊  我觉得我原来都是白学的
作者: fskyboy    时间: 2010-3-18 12:47

我把它编译成EXE的,最后诺顿给报毒了,楼主改改代码哈
作者: BatCoder    时间: 2010-3-18 14:29     标题: 回复 16楼 的帖子

很多bat2exe工具转化之后的exe都会引起杀软误报,不一定是源代码的问题。
作者: antony521    时间: 2010-4-5 19:59     标题: 好啊!

看了之后有当黑客的想法了
作者: Taurus    时间: 2010-7-3 05:07

10kb呢......
作者: garyng    时间: 2011-9-1 20:42

解释的在详细点我就真的可以变成黑客啦~~
作者: web    时间: 2012-10-16 22:21

谢谢楼主 支持啊  呵呵呵
作者: 4692980    时间: 2012-11-29 09:00

很好 楼主厉害啊
作者: faladi    时间: 2012-12-3 20:27

记事本中如何输出“echo ────────────────────”中的横线!
作者: faladi    时间: 2012-12-3 20:29

记事本中如何输出“echo ────────────────────”中的横线?
作者: accer    时间: 2013-4-10 19:18

呵呵,谢谢楼主分享!
作者: lky216    时间: 2013-4-10 21:01

先回帖表示谢谢 再发表评论
作者: lky216    时间: 2013-4-10 21:03

回复 7# listen


windows 2012测试不通过 按1-7都退出了
作者: lky216    时间: 2013-4-10 21:07

回复 1# novaa

l楼主的测试通过
作者: 路随梦寻    时间: 2013-4-20 11:38

试了一下,真的不错!
这个工具很管用的
作者: 狱渊    时间: 2013-4-28 19:42

回复 1# novaa


    ip 的  打开不




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2