Cara membuat Inject Telkomsel Dengan Delphi7 2015

Kali ini Saya akan bahas Cara Membuat Inject Telkomsel Dengan Delphi 2015 dan cara pembuatan injek dasar sederhana ini sebenarnya bisa digunakan buat operator lainnya baik buat indosat xl axis smart karena yang paling membedakan dan cara kerja atau mati tidaknya suatu injek adalah konsep payload yang anda gunakan, jadi kuncinya jika injek yang anda buat mati maka yang perlu anda lakukan adalah mengotak atik bagian payloadnya, dan langsung saja disimak ya, oh iya bagi anda yang membutuhkan seputar tips tips internet gratis lainnya bisa di klik pada tab tips ssh dan vpn saja ya. yuk kita langsung meluncur saja ya.

Sebelum anda lanjutkan tutorialnya mungkin anda ingin membuat injek yang lebih dinamis silahkan baca nanti disini Cara Lain Membuat Injek Dasar Delphi Terbaru 2015

1. Langkah Pertama siapkan 1 buah foleder beri nama LATIHAN BUAT INJEK biar nanti anda tidak bingung save as dimana, lalu buka aplikasi delphi anda saya menggunakan delphi 7 belum pake alpaskin, lalu buat 2 BUAH BUTTON kaya gambar dibawah ini:

2. Langkah yang kedua Kemudian Cari tulisan INDY SERVERS pilih atau klik yang TCP kaya gambar dibawah ini:

  

3. Langkah yang ketiga Silahkan klik BUTTON 1 dan ganti nama CAPTION tulisan terserah anda mau START bisa, ON bisa, MULAI bisa, MAJU bisa silahkan tulis saja menurut anda dan ganti juga pada BUTTON 2 lalukan seperti pada BUTTON 1

4. Pada langkah yang keempat silahkan klik 2x atau double klik BUTTON1/START/ON (sesuai dengan kehendak anda tadi), lalu masukan kode dibawah ini tepat dibawah tulisan BEGIN

IdMappedPortTCP1.Bindings.Add.Ip:='127.0.0.1';
IdMappedPortTCP1.Bindings.Add.Port:=StrToInt('1985');
IdMappedPortTCP1.MappedHost:='10.1.89.130';
IdMappedPortTCP1.MappedPort:=StrToInt('8000');
IdMappedPortTCP1.Active:=True;
Button1.Enabled:=False;
Button2.Enabled:=True;

Keterangan tambahan: angka 10.1.89.130 dan 8000 adalah proxy dan port default milik operator telkomsel silahkan sesuaikan proxynya dengan operator anda masing-masing, dan angka 1985 adalah out port yang terhubung nantinya ke BITVISE silahkan ubah angka 1985 tersebut sesuai dengan selera anda saja, yang penting jangan lupa saja karena itu port buat di setting ke bitvise nantinya.

5. Langkah yang kelima klik 2x BUTTON2/OFF (sesuai tulisan anda pada point3 diatas) atau double klik saja, lalu masukan kode dibawah ini tepat dibawah BEGIN

IdMappedPortTCP1.Active:=False;
IdMappedPortTCP1.Bindings.Clear;
Button1.Enabled:=True;
Button2.Enabled:=False; 

6. Langkah yang keenam silahkan klik 2x TCP > EVENTS > ONEXECUTE lalu masukan source kode dibawah ini , karena disana sudah ada tulisan BEGIN anda bisa hapus saja dulu biar gak bingung lalu ganti dengan kode dibawah ini:

var
Header,Payload:string;
begin
Header := StringReplace(header,' #13#10 + #13#10, #13#10 + ',' + #13#10 + #13#10 200 ok', [rfReplaceAll]);
Payload:='POST http://ISI BUGS OPSEL/ HTTP/1.1 SSH-2.0-1.91 sshlib: Bitvise SSH Client (Tunnelier) 4.60'+#13#10+'User-Agent: Mozilla/5.0 (Windows NT6.1; rv:14.0) Gecko/20100101 Firefox/14.0'+#13#10+'Connection: Keep-Alive'+#13#10+' Host : ISI BUGS OPSEL'#13#10+athread.NetData;
if pos('CONNECT',athread.NetData) <>0 then
athread.NetData:=athread.NetData+Payload;

Keterangan tambahan: silahkan ganti tulisan isi bugs opsel dengan bugs andalan anda, pastikan bugs yang akan anda pasangkan adalah bugs yang masih open, karena jika tidak open maka tidak akan konek dan akan bla...bla..bla.. HTTP Respone di log bitvisenya.

7. Langkah ke tujuh lakukan seperti langkah yang keenam, klik 2x TCP > EVENTS > ONOUTBUNDCONNECT lalu masukan kode replace dibawah ini tepat dibawah tulisan BEGIN

AThread.NetData := stringreplace(AThread.NetData,' :22 ',' :443',[rfReplaceAll]);
AThread.NetData := stringreplace(AThread.NetData,' 403 Forbidden',' 200 OK',[rfReplaceAll]);
AThread.NetData := StringReplace(AThread.NetData,'HTTP/1.1 302 Found','HTTP/1.1 200 Ok',[rfReplaceAll, rfIgnoreCase]);

Keterangan tambahan: tujuan kode replace diatas adalah mungkin saja ada bug host yang anda pasangkan atau mau anda gunakan harus di replace hostnya dan pernah saya bahas tentang replace replace ini silahkan anda cari tutorialnya di blog ini.

8. Langkah kedelapan jika dirasa sudah selesai silahkan pilih FILE dan SAVE AS lalu simpan pada folder LATIHAN BUAT INJEK tadi yang sudah saya suruh pada nomer 1 diatas.

9. Langkah yang kesembilan untuk melihat hasilnya silahkan klik tanda SEGITIGA HIJAU jika tampilannya masih kurang srek silahkan anda edit kembali untuk mengatur lebar tingginya tinggal anda arahkan kursor anda ke pinggirnya dan tarik mundur maju saja.

10. Langkah yang kesepuluh untuk mengganti tulisan kaya dibawah ini , silahkan anda cari saja tulisan CAPTION kaya dibawah ini.

11. Langkah yang kesebelas bagi yang mau mengganti iconnya silahkan klik ICON lalu loda dan cari icon yang akan anda gunakan lalu klik ok.

12. Langkah yang terakhir adalah memberi warna dasar silahkan klik CLOR dan ssuaikan dengan warna favorit anda, ingat ini masih terbilang monoton dari segi tampilannya karena untuk tampilan yang lebih waw harus menginstal alphaskin. (SELESAI)

Selanjutnya mungkin anda pernah bertanya giman sih cara agar bisa MULTI HOST, bisa pakai muncul ip, bisa pasang led blind, atau pasang log request dan respone nanti akan saya sambung karena tutorial tutorial tersebut adalah kelanjutan dari tutorial yang sekarang ini. Terimakasih

Author : Unknown

Share this

Related Posts