精易论坛

标题: 【文本文件类加密】ANSI文本干扰 [打印本页]

作者: 鲁凯啸 时间: 2013-12-8 20:22
标题: 【文本文件类加密】ANSI文本干扰
本帖最后由鲁凯啸于 2013-12-8 20:23 编辑

上图为使用此源码写的一个例程可模块化编辑bat文件并生成加密文件。

本源码可简单加密文本类文件。
说实在的其实不是加密，而是直接干扰notpad程序，导致编码分析失误，
致使使用notpad程序打开文件显示乱码而已，使用其他程序仍可正常打开查看文件。
但对于简单的程序配置文件的保存，应该足够了吧？

直接甩源码：
===================================================================
[e]
.版本 2

.子程序加密_ANSI文本干扰, 逻辑型, 公开, 文本文件类加密；加密级别最低，建议多次加密
.参数源文件, 文本型
.参数加扰, 逻辑型, 可空, 加扰为真，除扰为假
.参数目标文件, 文本型, 可空, 如果要写回到原文件请留空
.局部变量 id, 整数型
.局部变量干扰码, 字节集

干扰码＝ { 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 37, 37, 97, 32, 13, 10 }
.如果 (是否为空 (目标文件))
目标文件＝源文件
.否则
复制文件 (源文件, 目标文件)
.如果结束

id ＝打开文件 (目标文件, 6, )
.如果真 (id ＝ 0)
关闭文件 (id)
返回 (假)
.如果真结束
移到文件首 (id)
.如果 (加扰)
.如果真 (插入字节集 (id, 干扰码))
移到文件尾 (id)
.如果真 (取读写位置 (id) ％ 2 ＝ 1)
.如果真 (写出字节集 (id, { 0 }))
关闭文件 (id)
返回 (真)
.如果真结束

.如果真结束

.如果真结束

.否则
.如果 (读入字节集 (id, 518) ＝干扰码)
.如果真 (移到文件首 (id))
.如果真 (删除数据 (id, 518))
关闭文件 (id)
返回 (真)
.如果真结束

.如果真结束

.否则
关闭文件 (id)
返回 (真)
.如果结束

.如果结束
关闭文件 (id)
返回 (假)

[/e]

补充内容 (2013-12-18 15:48):
将 0.txt 进行处理生成 1.txt 文件，调用方式：加密_ANSI文本干扰("c:\0.txt",真,"c:\1.txt")
大家有什么地方不懂，请提出来，我做个解释！
原理演示：在记事本中输入“联通”二字保存后重新打开便显示为乱码~

作者: Violation 时间: 2013-12-8 20:53
沙发谢谢分享。

作者: Hoibben 时间: 2013-12-8 20:54
哇，支持下！

作者: 无＼月 时间: 2013-12-8 22:10
支持！

作者: 小熊君 时间: 2013-12-9 12:26
很高级的样子。。。。

作者: 音速 时间: 2013-12-10 20:10
看不懂 - -

作者: Cand 时间: 2013-12-10 23:41
太牛逼了. 就是厉害

作者: 提拉米苏god 时间: 2013-12-11 01:16
支持原创啊

作者: 鲁凯啸 时间: 2013-12-11 14:01

qq4297270 发表于 2013-12-10 20:10
看不懂 - -

哪里不懂我做个说明~

作者: 冬天风雪来 时间: 2013-12-11 20:18
哥也来帮忙赞一个

作者: 宇智波·佐助 时间: 2013-12-16 22:55
没看明白呵呵

作者: 鲁凯啸 时间: 2013-12-18 15:42

宇智波·佐助发表于 2013-12-16 22:55
没看明白呵呵

哪里不明白，提出来~

作者: 丿勿忘心安 时间: 2014-12-2 16:12
流弊！~

作者: 温柔gg 时间: 2015-1-29 19:25
哇塞大神作品；厉害！

作者: 特超级大忽悠 时间: 2017-11-14 14:48
感谢分享！！！！！！！

欢迎光临精易论坛 (https://125.confly.eu.org/)