统计文本中字符出现的个数，频率法破解密码 - DOS批处理 & 脚本技术（批处理室） - 中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

可以用于解码。。。这些天看到前辈们喜欢加密，而我的爱好是解码。根据字符出现的概率破解也算是解码的一种方法，但一个一个数太麻烦了，所以就写了这么一个小小程序。。。思路来自于www.cn-dos.net/forum ... PS。。。也可以说是抄袭 ^_^

@echo off&setlocal enabledelayedexpansion
for /f "tokens=*" %%a in (Scrambled.txt) do (
	set str=%%a
	set str=!str: =!
	call :lp
)
echo 共%x%个字符。。。
for %%a in (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 1 2 3 4 5 6 7 8 9 0) do (
	set/a xy+=1
	if defined .%%a (
	set/p= %%a: !.%%a!/%x%  <nul
	) else (
	set/p= %%a: 0/%x%  <nul
	)
	if !xy! equ 2 echo.&set xy=0
)
pause>nul&exit/b



:lp
if defined str (
	set var=!str:~,1!
	if "!var!" neq "" if "!var!" neq " " (
	set/a .%var%+=1
	set/a x+=1
)
	set str=!str:~1!
	goto lp
)

[ Last edited by pusofalse on 2008-6-26 at 07:01 PM ]