16轮TEA加解密算法汇编版

.如果真 (KEY编辑框.内容 ≠ “” 且 明文编辑框.内容 ≠ “”)
KEY ＝ ToBytes (KEY编辑框.内容)
.如果真 (GetBinLength (KEY) ＝ 16)
Bin ＝ ToBytes (明文编辑框.内容)
加密次数 ＝ 10000
Time ＝ 取启动时间 ()
.计次循环首 (加密次数, )
Bytes ＝ asmTea (Bin, KEY)
.计次循环尾 ()
Time ＝ 取启动时间 () － Time
结果编辑框.加入文本 (Format (Bytes) ＋ #换行符 ＋ #换行符 ＋ “汇编版加密 [” ＋ 到文本 (加密次数) ＋ “] 次用时:” ＋ 到文本 (Time) ＋ “ms” ＋ #换行符 ＋ #换行符)
返回 ()
.如果真结束

.如果真结束
信息框 (“KEY或明文不能为空”, 0, )

作为一种分组加密算法，TEA加密算法在其发展的过程中，目前出现了几种针对TEA算法设计的缺陷攻击方法，使得原有的TEA加密算法变得不安全，在过去的十几年中，TEA算法进行了若干次的改进，历经XTEA, Block TEA, XXTEA几个版本。目前最新的算法是XXTEA。

值得一提的QQ在利用TEA算法做加密时，采用了交织及随机填充随机数的技术，增加了密码分析者分析难度，从一定程度上保护了信息的安全。

QQ在进行TEA加密前采用ntohl函数对原文数据和加密密钥进行了变换，从网络字节顺序转换位主机字节顺序进行加密后，再通过htonl函数将数据转换为网络字节顺序的数据。