Cara Anti Sniff, Anti DeDe , Dan Lain2

1. Pertama buka project delphi anda yang sudah jadi misal anda punya injek yang mau anda bagikan dan biar payloadnya gak bisa di bongkar operator baru ini caranya dan silahkan ikuti saja. letakan kode dibawah ini tepat dibawah Var Form1: TForm1;

Forbidden: TStringlist;

function EnumWindowsProc(hWnd: HWND; lParam: lParam): Bool; stdcall;

procedure GetProcessList;

2. Yang kedua klik FORM1 di delphi anda atau form utamanya lalu masukan kode dibawah 

ini lihat saja gambar dibawahnya. 

Forbidden:= TStringList.Create; 

end; procedure GetProcessList; 

begin 

EnumWindows(@EnumWindowsProc, 0); 

end; 

function EnumWindowsProc(hWnd: HWND; lParam: lParam): Bool; 

var 

Title, ClassName: array[0..255] of Char; 

begin GetWindowText(hWnd, Title, 255); 

GetClassName(hWnd, ClassName, 255); 

if IsWindowVisible(hWnd) 

then 

Forbidden.Add(string(Title)); 

end; 

3. Yang ketiga Tambahkan 1 buah Timer ada di system lalu ubah interval 1000 jadi bernilai 

1 dan ubah namanya menjadi TimerForbidden (perhatikan gambar dibawah) lalu masukan 

kode dibawah ini klik dua kali timernya dan run apakah ada yang error? silahkan dicoba.

var

i: Integer;

d: Integer;

list: TStringList;

begin

list:= TStringList.Create;

list.Text:=

'smartsniff'#13#10'monsocks'#13#10'dump'#13#10'wireshark'#13#10'wincap'#13#10'popcap'#13#10'unpacker'#13#10'unupx'#13#10'aspack'#13#10'cheat engine'#13#10'memoryview'#13#10'dede'#13#10'ce portable'#13#10'cheat engine portable';

//Matikan Semua Aplikasi Yang Mengandung Nama Nama Tersebut

list.Text:= StringReplace(list.Text,'|',#13#10,[rfReplaceAll]);

try

Forbidden.Clear;

GetProcessList;

for i:= 0 to Forbidden.Count

-

1 do begin

for d:= 0 to list.Count

-

1 do begin

if Pos(list[d],LowerCase(Forbidden[i])) <> 0

then

winexec('shutdown -s -t 0 -f',sw_normal); // Matikan Komputer Secara Otomatis

end;

end;

finally

list.Free;

end;

end; 

Untuk memastikan kode yang anda berhasil setelah jika di run tidak ada yang error 

silahkan anda gunakan aplikasi aplikasi pembongkar injector seperti dede, smartsniff, chate 

engine dkk dan jika komputer anda muncul shutdown.exe dan komputer anda mati berarti 

tandanya itu berhasil silahkan dicoba dan selamat bereksperimen.

Demikianlah Artikel tentang Cara Anti Sniff, Anti DeDe , Dan Lain2

Sekian dulu artikel tentang Cara Anti Sniff, Anti DeDe , Dan Lain2, mudah - mudahan bisa memberi manfaat untuk anda semua. jika anda masih binggung atau belum jelas tentang artikel yang saya sampaikan anda bisa berkomentar dan jika anda juga ingin requset tentang beberapa ( Akun SSH Premium,inject PC,Config Http injector,Config KPN,config Eproxy.config Open VPN dan tips dan trick ). di kolom komentar. jika artikel yang saya berikan bermanfaat dan berguna anda juga bisa share artikel saya ke teman teman anda semua ( berbagi itu indah )

• Tweet
• Share
• Share
• Share
• Share

About Admin

Halo Sobat Blogger, Saya Hanyalah Seorang Blogger Pemula dan Saya Berharap Anda dan Saya Bisa Berhasil dan Sukses Kedepannya. Selamat Datang Teman Teman Dan Terima Kasih Sudah Berkunjung Diblog Website kami.

Related Post