Informasi Seputar Teknologi

Wednesday, 21 May 2014

Filled Under: ,

Tutorial Membuat Inject, Free Internet Unlimited

Tutorial Membuat Inject, Free Internet Unlimited
  • IdMappedPortTCP1.Bindings.Add.Ip:='127.0.0.1'; // ini adalah Proxy Default
  • IdMappedPortTCP1.Bindings.Add.Port:=StrToInt('8080'); // ini Listen Port, bisa Kalian Ubah Sesuka hati
  • IdMappedPortTCP1.MappedHost:='202.152.240.50'; // Ini adalah Proxy dari Operator , saya contohkan XL : 202.152.240.50
  • IdMappedPortTCP1.MappedPort:=StrToInt('8080'); // ini adalah Port dari Proxy Operator, Port XL : 8080
  • IdMappedPortTCP1.Active:=True; // ini Untuk Mengaktifkan TCP Server
  • Button1.Enabled:=False; // Ini Untuk Menonaktifkan Button1 atau Start
  • Button2.Enabled:=True; // ini Untuk Mengaktifkan Button2 atau Stop

  • IdMappedPortTCP1.Active:=False; // ini untuk menonaktifkan TCP Server
  • IdMappedPortTCP1.Bindings.Clear; // ini Untuk Membersihkan koneksi TCP Server
  • Button1.Enabled:=True; // ini untuk mengaktifkan kembali Button1 atau Start
  • Button2.Enabled:=False; // ini untuk menonaktifkan Button1 atau Stop

  • var
  • ESIND:string; //Perintah Untuk Menghubungkan dan Letakkan di atas Begin
  • ESIND:='GET http://BUGSKAMU/ HTTP/1.1'+#13#10+'User-Agent: Mozilla/5.0 (Windows NT6.1; rv:14.0) Gecko/20100101 Firefox/14.0 Host : BUGSKAMU'#13#10#13#10#13#10+athread.NetData; 
  • if pos('CONNECT',athread.NetData) <>0 then
  • athread.NetData:=athread.NetData+ESIND; // Merupakan Methode untuk menghubungkan ke Server


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]); // Ini Berfungsi Untuk MeReplace Jika ada Bugs Yang Harus di Replace.
 By : Edi

2 komentar: