Jumat, 23 Januari 2015

Cara Membuat Inject Telkomsel Sendiri Dengan Delphi Terbaru

Kali ini Saya akan bahas Cara Membuat Inject Telkomsel Sendiri Dengan Delphi 2017 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:

Cara Membuat Inject All Operator 2015

2. Langkah yang kedua Kemudian Cari tulisan INDY SERVERS pilih atau klik yang TCP kaya gambar dibawah ini:
 
Cara Membuat Inject Internet Gratis 2015

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

Cara Mudah Mencari Bugs Operator

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;

Cara Membuat Inject Indosat 2015

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;

Cara Membuat Inject AXIS 2015

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;

Cara Membuat Inject XL 2015

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]);

Cara Membuat Inject Smart Freen 2015

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.

Cara Membuat Inject Dengan Inject Maker Pro 2015

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.

Tutorial Buat Injek Terbaru 2015

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

Cara Membuat Inject Dengan Visual Basic VB

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

TRik tips mencari bugs operator paling berkulaitas tinggi

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)

Step by Step membuat bikin injector

Selanjutnya mungkin anda pernah bertanay 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.
Tutorial selanjutnya: Cara Menampilkan Nama Komputer dan IP Address di Inject Delphi

Baca Juga: Free SSH Lifetime Gratis Setiap Hari 2015

Dan hanya itu saja info kali ini seputar Cara Membuat Inject Telkomsel Sendiri Dengan Delphi 2015 semoga bermanfaat dan dapat membantu jika bermanfaat silahkan bagikan sebarkan ke saudara sahabat keluarga dan pacar anda , terima kasih.