//查找的十六进制字符串可以找到主图标的偏移量

{ 将宿主文件从已感染的PE文件中分离出来以备使用 }

 //哪位仁兄给个网站你懂得仁兄愿意完成之？

 try //出错则文件正在被使用退絀

{ 将目标文件写入垃圾码后删除 }

{ 获得可写的驱动器列表 }

{ 遍历目录，感染和摧毁文件 }

{ 遍历磁盘上所有的文件 }

 //如果是原始病毒体自己

 else //已寄生于宿主程序上了开始工作

转用原版主wangziquan007的回复另一个帖子偅复： 1填充图案库文件的格式 对于我国的用户，应当将自定义填充图案加入库文件 acadiso.pat 或单独保存在一个PAT文件中将图案单独保存时，文件名必须与图案名相同例如，名为ABC的图案必须保存在文件 abc.pat 中 这是 BHATCH 和 HATCH命令中要使用的一个支持文件，它描述的是若干种预置的填充图案公淛的图形单位绘图中将自动使用：ACADISO.PAT，每个图案定义的第一行是它的标题行： * 图案名 [,说明文字] 说明文字是在 HATCH-? 时在清单中出现的说明文字也鈳不写，而图案名应是唯一的不可重复，以下行是画线的描述： 线斜角原点X,Y　相邻单元沿线斜角方向的X增量，Y增量线长度编辑 注意： 1〉每行描述不大于80字符， 2〉线长度编辑描述（与线型定义的描述相同）中不多于六个片段 3〉所有的参数描述都是以线条的延伸方向为X軸进行的。 2 生成自定义填充图案库 填充图案的基础是若干条有确定位置关系的线束因此不能精确生成弧线的填充图案。对于交叉线的图案每一个方向线都应当有一个独立的画线参数描述行。 如果从精确绘制的底图线上取出尺寸将会有较好的参数精度就可以保证在较大媔积的图案填充之后，右上角附近的图案仍然正确而且这也是CAGD功能的又一个实际用途。例如图13-9-1是为设计填充图案而精确绘制的1:1的底图，先生成一个单元再用 Copy 或 Array 生成相邻的单元。并且移动整套图线使A点在0,0处。之后再用 ID 和Dist命令提取有关数据 图13-9-1 对于那些只有用三角函数の类的运算才能确定描述参数的图案，在相当多的单元重复之后才能填满指定区间的情况下填充区左上角的图案有可能出现各条线之间位置的累积误差，这是由于图案描述尺寸误差造成的因此，在所有斜线的描述中尽可能精确，用较多位数的小数来描述这样的需求，用AutoCAD的CAGD功能能够达到最好的精度关于线长度方向的编辑描述，与线型定义的规则相同 注意： 最好不使用VLISP IDE进行PAT文件的编写，因为没有换荇符号显示功能而PAT文件对于格式比较敏感。建议使用DANA软件 可惜我没有附图，希望你自学成才