一乐电子

 找回密码
 请使用微信账号登录和注册会员

QQ登录

只需一步,快速开始

微信扫码登录

手机号码,快捷登录

手机号码,快捷登录

搜索
楼主: fang316

利用copy dos命令做了一个小批处理

  [复制链接]
发表于 2013-1-10 16:46 | 显示全部楼层
刚看了,想研究的话这个是源代码


  1. @shift
  2. %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a
  3. cls
  4. @ECHO OFF
  5. @title 图片玄机 Code BY MAKE
  6. @color 85
  7. ::@mode con cols=45 lines=3
  8. @set a=0
  9. @set b=0

  10. :re
  11. @set /a a+=10
  12. @set /a b+=1

  13. @mode con: cols=%a% lines=%b%
  14. @if %a% lss 60 goto re

  15. @echo                 这个小批处理能做什么?
  16. @echo                 在图片中 嵌入 压缩文件
  17. @echo.
  18. @echo        支持的图片格式 BMP JPG JPEG PNG GIF TIFF PCX
  19. @echo       支持的压缩包格式 RAR ZIP 7Z ***按任意键继续***

  20. PAUSE>nul

  21. :res
  22. @set /a a-=5
  23. @set /a b-=1

  24. @mode con: cols=%a% lines=%b%
  25. @if %a% gtr 45 goto res

  26. :main
  27. ::@echo 请选择第一个文件(一般选择一张图片)
  28. @cls
  29. @echo .
  30. @echo                请选择一张图片
  31. @ping /n 2 127.0.0.1>nul
  32. @FOR /F "tokens=*" %%A in ('%Myfiles%\ConGetFile') Do Set file1=%%A
  33. @echo %file1%|findstr /i "\.bmp$">nul && goto go
  34. @echo %file1%|findstr /i "\.jpg$">nul && goto go
  35. @echo %file1%|findstr /i "\.png$">nul && goto go
  36. @echo %file1%|findstr /i "\.jpeg$">nul && goto go
  37. @echo %file1%|findstr /i "\.gif$">nul && goto go
  38. @echo %file1%|findstr /i "\.tiff$">nul && goto go
  39. @echo %file1%|findstr /i "\.pcx$">nul && goto go
  40. @echo .
  41. @echo   不正确的图片!!!(要取消请直接关闭窗口)
  42. @ping /n 3 127.0.0.1>nul
  43. @goto main

  44. :go
  45. @cls
  46. ::@echo 请选择第二个文件(一般为压缩包)
  47. @echo .
  48. @echo               请选择一个压缩包
  49. @ping /n 2 127.0.0.1>nul
  50. @FOR /F "tokens=*" %%B in ('%Myfiles%\ConGetFile') Do Set file2=%%B
  51. @echo %file2%|findstr /i "\.zip$">nul && goto todo
  52. @echo %file2%|findstr /i "\.rar$">nul && goto todo
  53. @echo %file2%|findstr /i "\.7z$">nul && goto todo
  54. @cls
  55. @echo .
  56. @echo 不正确的压缩包!!!(要取消请直接关闭窗口)
  57. @ping /n 3 127.0.0.1>nul
  58. @goto go

  59. :todo
  60. @cls
  61. @echo 请输入生成文件的文件名:
  62. @set /p file3=
  63. @echo %file1%|findstr /i "\.bmp$">nul && set  ectn=bmp
  64. @echo %file1%|findstr /i "\.jpg$">nul && set  ectn=jpg
  65. @echo %file1%|findstr /i "\.png$">nul && set  ectn=png
  66. @echo %file1%|findstr /i "\.jpeg$">nul && set  ectn=jpeg
  67. @echo %file1%|findstr /i "\.gif$">nul && set  ectn=gif
  68. @echo %file1%|findstr /i "\.tiff$">nul && set  ectn=tif
  69. @echo %file1%|findstr /i "\.pcx$">nul && set  ectn=pcx

  70. @copy/b %file1%+%file2% %file3%.%ectn%
  71. @cls
  72. @echo %file3%.%ectn%
  73. @echo                  已经生成
  74. @ping /n 4 127.0.0.1>nul
  75. :resss
  76. @set /a a-=15
  77. @set /a b-=1
  78. @mode con: cols=%a% lines=%b%
  79. @if %a% gtr 1 goto resss
  80. exit
复制代码
客官来玩啊。
回复

使用道具 举报

 楼主| 发表于 2013-1-10 16:54 | 显示全部楼层
回复 11# 72hour


    被你发现了,在temp目录可以找到,打开时注意编码就行了
回复

使用道具 举报

发表于 2013-1-10 17:58 | 显示全部楼层
这玩意,想藏成人大片?人家死也不信一张破图有几个G。。。。
回复

使用道具 举报

发表于 2013-1-10 18:17 | 显示全部楼层
隐藏解决不了问题,俺还是相信加密.
回复

使用道具 举报

发表于 2013-1-10 20:50 | 显示全部楼层

标题

回复

使用道具 举报

发表于 2013-1-10 21:27 | 显示全部楼层
什么加密软件简单方便安全可靠?最好是不受注册表的影响,别重装系统就没法解密了
benli 发表于 2013-1-10 20:50



    我用GNUPG,加一个WIN的SHELL用.只要密钥在手,再重装都可以解的.我是放在U盘上用,不装在机器上.
回复

使用道具 举报

 楼主| 发表于 2013-1-17 23:46 | 显示全部楼层
本帖最后由 fang316 于 2013-1-17 23:48 编辑

回复 11# 72hour


    更新代码,生成时加入路径
  1. %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a %%a
  2. cls
  3. @ECHO OFF
  4. @title 图片玄机 Code BY MAKE
  5. @color 85
  6. ::@mode con cols=45 lines=3
  7. @set a=0
  8. @set b=0

  9. :res
  10. @set /a a+=10
  11. @set /a b+=1

  12. @mode con: cols=%a% lines=%b%
  13. @if %a% lss 60 goto res

  14. @echo                 这个小批处理能做什么?
  15. @echo                 在图片中 嵌入 压缩文件
  16. @echo.
  17. @echo        支持的图片格式 BMP JPG JPEG PNG GIF TIFF PCX
  18. @echo       支持的压缩包格式 RAR ZIP 7Z ***按任意键继续***

  19. PAUSE>nul

  20. :ress
  21. @set /a a-=5
  22. @set /a b-=1

  23. @mode con: cols=%a% lines=%b%
  24. @if %a% gtr 45 goto ress

  25. :main

  26. @cls
  27. @echo.
  28. @echo                请选择一张图片
  29. @ping /n 2 127.0.0.1>nul
  30. @FOR /F "tokens=*" %%A in ('%Myfiles%\ConGetFile') Do Set file1=%%A
  31. @echo %file1%|findstr /i "\.bmp$">nul && goto go
  32. @echo %file1%|findstr /i "\.jpg$">nul && goto go
  33. @echo %file1%|findstr /i "\.png$">nul && goto go
  34. @echo %file1%|findstr /i "\.jpeg$">nul && goto go
  35. @echo %file1%|findstr /i "\.gif$">nul && goto go
  36. @echo %file1%|findstr /i "\.tiff$">nul && goto go
  37. @echo %file1%|findstr /i "\.pcx$">nul && goto go
  38. @echo.
  39. @echo   不正确的图片!!!(要取消请直接关闭窗口)
  40. @ping /n 3 127.0.0.1>nul
  41. @goto main

  42. :go
  43. @cls

  44. @echo.
  45. @echo               请选择一个压缩包
  46. @ping /n 2 127.0.0.1>nul
  47. @FOR /F "tokens=*" %%B in ('%Myfiles%\ConGetFile') Do Set file2=%%B
  48. @echo %file2%|findstr /i "\.zip$">nul && goto todo
  49. @echo %file2%|findstr /i "\.rar$">nul && goto todo
  50. @echo %file2%|findstr /i "\.7z$">nul && goto todo
  51. @cls
  52. @echo.
  53. @echo 不正确的压缩包!!!(要取消请直接关闭窗口)
  54. @ping /n 3 127.0.0.1>nul
  55. @goto go

  56. :todo
  57. @cls
  58. @echo.
  59. @echo               请输入文件名保存
  60. @ping /n 2 127.0.0.1>nul
  61. @FOR /F "tokens=*" %%C in ('%Myfiles%\ConGetFile') Do Set file3=%%C
  62. @echo %file1%|findstr /i "\.bmp$">nul && set  ectn=bmp
  63. @echo %file1%|findstr /i "\.jpg$">nul && set  ectn=jpg
  64. @echo %file1%|findstr /i "\.png$">nul && set  ectn=png
  65. @echo %file1%|findstr /i "\.jpeg$">nul && set  ectn=jpeg
  66. @echo %file1%|findstr /i "\.gif$">nul && set  ectn=gif
  67. @echo %file1%|findstr /i "\.tiff$">nul && set  ectn=tiff
  68. @echo %file1%|findstr /i "\.pcx$">nul && set  ectn=pcx

  69. @copy/b "%file1%"+"%file2%" "%file3%.%ectn%"
  70. @cls
  71. @echo.
  72. @echo                恭喜,已经完成!
  73. @ping /n 4 127.0.0.1>nul
  74. :resss
  75. @set /a a-=15
  76. @set /a b-=1
  77. @mode con: cols=%a% lines=%b%
  78. @if %a% gtr 1 goto resss
  79. @exit
复制代码
图片玄机.rar (82.84 KB, 下载次数: 224)
回复

使用道具 举报

本版积分规则

QQ|一淘宝店|手机版|商店|一乐电子 ( 粤ICP备09076165号 ) 公安备案粤公网安备 44522102000183号

GMT+8, 2025-9-11 04:04 , Processed in 0.041068 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表