[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
方法:把26位字母与1-26相应的数字对应起来,密文即为明文字母对应的数字与密钥字母对应的数字相加-1所对应的字母。
  1. @echo off&setlocal enabledelayedexpansion
  2. set "code=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z"
  3. for %%i in (%code%) do (
  4.     set /a num+=1
  5.     set t!num!=%%i
  6.     set p%%i=!num!
  7. )
  8. :begin
  9. set /p text=请输入明文:&set /p key=请输入密钥:&set /p=密文:<nul
  10. :loop
  11. set "_text=%text:~,1%"&set "_key=%key:~,1%"
  12. set "text=%text:~1%"&set "key=%key:~1%%_key%"
  13. set /a n=!p%_text%!+!p%_key%!
  14. set /a n=!n!%%26-1
  15. set /p=!t%n%! <nul
  16. if defined text goto loop
  17. echo.&echo.&goto begin
复制代码
set "key=%key:~1%%_key%"一句借鉴了batman的,感觉好多种方法这种最简洁。
  1. 哦,好像和上楼的思想一样啊,不好意思啊,发表以后才仔细看。把标头去了!
复制代码

[ 本帖最后由 lhjoanna 于 2008-11-19 01:24 编辑 ]
1

评分人数

TOP

翻了一个不得了的帖子出来, 有很多东西可以学

TOP

  1. @echo off&setlocal enabledelayedexpansion
  2. set "x=ABCDEFGHIJKLMNOPQRSTUVWXYZ"&set code=!x!&set "miwen="
  3. for /l %%a in (1 1 26) do (
  4.    set /a .!x:~0,1!=%%a
  5.    set code2=!code2! !x:~0,1!
  6.    set "x=!x:~1!"
  7. )
  8. set /p my=请输入密匙
  9. set /p mw=请输入明文
  10. for %%a in (!code2!) do set mw=!mw:%%a= %%a !
  11. for %%a in (!mw!) do (
  12.    if not defined my_ set "my_=!my!"
  13.    set /a yum=.!my_:~0,1!,w=.%%a-1
  14.    for %%i in (!yum!) do set "codex=!my_:~0,1!!code:~%%i!!code:~0,%%i!"
  15.    for %%i in (!w!) do set "miwen=!miwen!!codex:~%%i,1!"
  16.    set "my_=!my_:~1!"
  17. )
  18. echo 密文:  !miwen!
  19. pause
复制代码
2

评分人数

技术问题请到论坛发帖求助!

TOP

  1. @echo off&setlocal enabledelayedexpansion
  2. set x=ABCDEFGHIJKLMNOPQRSTUVWXYZ
  3. set miwen=&set yum=miwen
  4. for /l %%a in (0 1 25) do (
  5.    set /a n=%%a+1,#!x:~%%a,1!=n
  6.    set #!n!=!x:~%%a,1!
  7. )
  8. set /p my=请输入密匙
  9. set /p mw=请输入明文
  10. set m=0
  11. :lp
  12. set/a mm=m+99
  13. for /l %%a in (!m!,1,!mm!) do (
  14. for %%b in (!yum!) do (
  15.   set miwen=!miwen!!#%%b!
  16.   if "!mw:~%%a!" equ "" goto :ok
  17.   set /a "yum=(#!my:~0,1!+#!mw:~%%a,1!+24)%%26+1",m=%%a+1
  18.   set my=!my:~1!!my:~0,1!
  19. )
  20. )
  21. goto :lp
  22. :ok
  23. echo 密文:  !miwen!
  24. pause
复制代码

[ 本帖最后由 netbenton 于 2009-5-14 12:54 编辑 ]
1

评分人数

TOP

我来学习下

TOP

为什么不能加解密带数字的字符串啊

TOP

我彻底晕了   明文密钥是做什么的?

TOP

回复 22# 狱渊



解密算法是动态的,有“无限种”可能
密钥能确定其中的一种,并以此推算出明文

TOP

话说怎么把加密好的密文输出到比如c:\123.txt

TOP

回复 1# pusofalse
看看我这行吗
附件: 您需要登录才可以下载或查看附件。没有帐号?注册

TOP

返回列表