用最简单的方法实现。

大家测试一下有没有问题。希望大家多做一些探测出来，然后我公开如何加入exe 

不改变大小，　和修改日期 也就是大家所说的感染 这些技术都纯属做测试。。。请不要乱用



版本 2

通用对话框1.打开 ()
文件号 ＝ 打开文件 (通用对话框1.文件名, , 1)
移动读写位置 (文件号, 1, 25360)
.如果真 (读入一行 (文件号) ＝ “TLOSS error”)
  信息框 (“该文件是易语言！！　加入文件后不能运行了!!”, 0, )
  关闭文件 (文件号)
  返回 ()
.如果真结束
移到文件尾 (文件号)
插入字节集 (文件号, 到字节集 (“哈哈”))
关闭文件 (文件号)