elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


 


  Mostrar Mensajes
Páginas: [1] 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ... 31
1  Programación / Scripting / Re: [VBS] Función para hacer "spread" a fichero ZIP en: 15 Abril 2014, 20:42
me gustaria traducirlo a delphi pero lo veo para avanzados.
2  Programación / Programación General / [Delphi] DH Icon Changer 0.5 en: 11 Abril 2014, 18:36
Version final de este programa para cambiarle el icono a cualquier programa (eso creo).

Una imagen :



El codigo.

Código
  1. // DH Icon Changer 0.5
  2. // (C) Doddy Hackman 2014
  3. // Based on IconChanger By Chokstyle
  4. // Thanks to Chokstyle
  5.  
  6. unit icon;
  7.  
  8. interface
  9.  
  10. uses
  11.  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
  12.  System.Classes, Vcl.Graphics,
  13.  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, madRes, Vcl.StdCtrls,
  14.  Vcl.Imaging.pngimage, Vcl.ExtCtrls, Vcl.ComCtrls, about;
  15.  
  16. type
  17.  TForm1 = class(TForm)
  18.    Image1: TImage;
  19.    GroupBox1: TGroupBox;
  20.    Edit1: TEdit;
  21.    Button1: TButton;
  22.    OpenDialog1: TOpenDialog;
  23.    StatusBar1: TStatusBar;
  24.    GroupBox2: TGroupBox;
  25.    GroupBox3: TGroupBox;
  26.    Button2: TButton;
  27.    GroupBox4: TGroupBox;
  28.    Button3: TButton;
  29.    Button4: TButton;
  30.    Button5: TButton;
  31.    Edit2: TEdit;
  32.    Image2: TImage;
  33.    OpenDialog2: TOpenDialog;
  34.    procedure Button1Click(Sender: TObject);
  35.    procedure Button4Click(Sender: TObject);
  36.    procedure Button5Click(Sender: TObject);
  37.    procedure FormCreate(Sender: TObject);
  38.    procedure Button2Click(Sender: TObject);
  39.    procedure Button3Click(Sender: TObject);
  40.  private
  41.    { Private declarations }
  42.  public
  43.    { Public declarations }
  44.  end;
  45.  
  46. var
  47.  Form1: TForm1;
  48.  
  49. implementation
  50.  
  51. {$R *.dfm}
  52.  
  53. procedure TForm1.Button1Click(Sender: TObject);
  54. begin
  55.  if OpenDialog1.Execute then
  56.  begin
  57.    Edit1.Text := OpenDialog1.FileName;
  58.  end;
  59. end;
  60.  
  61. procedure TForm1.Button2Click(Sender: TObject);
  62. begin
  63.  
  64.  if OpenDialog2.Execute then
  65.  begin
  66.    Image2.Picture.LoadFromFile(OpenDialog2.FileName);
  67.    Edit2.Text := OpenDialog2.FileName;
  68.  end;
  69.  
  70. end;
  71.  
  72. procedure TForm1.Button3Click(Sender: TObject);
  73. var
  74.  op: string;
  75.  change: dword;
  76.  valor: string;
  77.  
  78. begin
  79.  
  80.  valor := IntToStr(128);
  81.  
  82.  op := InputBox('Backup', 'Backup ?', 'Yes');
  83.  
  84.  if op = 'Yes' then
  85.  begin
  86.    CopyFile(PChar(Edit1.Text), PChar(ExtractFilePath(Application.ExeName) +
  87.      'backup' + ExtractFileExt(Edit1.Text)), True);
  88.  end;
  89.  
  90.  try
  91.    begin
  92.      change := BeginUpdateResourceW(PWideChar(wideString(Edit1.Text)), false);
  93.      LoadIconGroupResourceW(change, PWideChar(wideString(valor)), 0,
  94.        PWideChar(wideString(Edit2.Text)));
  95.      EndUpdateResourceW(change, false);
  96.      StatusBar1.Panels[0].Text := '[+] Changed !';
  97.      Form1.StatusBar1.Update;
  98.    end;
  99.  except
  100.    begin
  101.      StatusBar1.Panels[0].Text := '[-] Error';
  102.      Form1.StatusBar1.Update;
  103.  
  104.    end;
  105.  end;
  106. end;
  107.  
  108. procedure TForm1.Button4Click(Sender: TObject);
  109. begin
  110.  Form2.Show;
  111. end;
  112.  
  113. procedure TForm1.Button5Click(Sender: TObject);
  114. begin
  115.  Form1.Close();
  116.  Form2.Close();
  117. end;
  118.  
  119. procedure TForm1.FormCreate(Sender: TObject);
  120. begin
  121.  
  122.  OpenDialog1.InitialDir := GetCurrentDir;
  123.  OpenDialog2.InitialDir := GetCurrentDir;
  124.  OpenDialog2.Filter := 'Icons|*.ico|';
  125.  
  126. end;
  127.  
  128. end.
  129.  
  130. // The End ?
  131.  

Si quieren bajar el programa lo pueden hacer de aca.
3  Programación / Scripting / Re: [Python/Tkinter](Kyurem v2.0)Consola de comandos hecha en python (Continuación) en: 8 Abril 2014, 19:20
el clasico matrix , esta bueno el diseño.
4  Programación / Scripting / Re: [Python/Tkinter](Kyurem v2.0)Consola de comandos hecha en python (Continuación) en: 7 Abril 2014, 18:19
pone una imagen de como quedo el tk.
5  Programación / Programación General / [Delphi] LocateIP 0.5 en: 4 Abril 2014, 20:16
Version final de este programa para localizar la IP y DNS de una pagina.

Una imagen :



El codigo :

Código
  1. // LocateIP 0.5
  2. // (C) Doddy Hackman 2014
  3. // Credits :
  4. // Based on the services :
  5. // To get IP -- http://whatismyipaddress.com/
  6. // To locate IP -- http://www.melissadata.com/
  7. // To get DNS -- http://www.ip-adress.com/
  8. // Thanks to whatismyipaddress.com , www.melissadata.com , www.ip-adress.com
  9.  
  10. unit locate;
  11.  
  12. interface
  13.  
  14. uses
  15.  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
  16.  System.Classes, Vcl.Graphics,
  17.  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls,
  18.  IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdHTTP, PerlRegEx,
  19.  IdMultipartFormData, Vcl.Imaging.pngimage, Vcl.ExtCtrls;
  20.  
  21. type
  22.  TForm1 = class(TForm)
  23.    GroupBox1: TGroupBox;
  24.    Edit1: TEdit;
  25.    Button1: TButton;
  26.    GroupBox2: TGroupBox;
  27.    Edit2: TEdit;
  28.    Edit3: TEdit;
  29.    Edit4: TEdit;
  30.    StatusBar1: TStatusBar;
  31.    Label1: TLabel;
  32.    Label2: TLabel;
  33.    Label3: TLabel;
  34.    IdHTTP1: TIdHTTP;
  35.    Image1: TImage;
  36.    GroupBox3: TGroupBox;
  37.    ListBox1: TListBox;
  38.    procedure Button1Click(Sender: TObject);
  39.  private
  40.    { Private declarations }
  41.  public
  42.    { Public declarations }
  43.  end;
  44.  
  45. var
  46.  Form1: TForm1;
  47.  
  48. implementation
  49.  
  50. {$R *.dfm}
  51.  
  52. procedure TForm1.Button1Click(Sender: TObject);
  53. var
  54.  regex: TPerlRegEx;
  55.  par: TIdMultiPartFormDataStream;
  56.  rta: string;
  57.  z: integer;
  58.  
  59. begin
  60.  
  61.  regex := TPerlRegEx.Create();
  62.  
  63.  par := TIdMultiPartFormDataStream.Create;
  64.  par.AddFormField('DOMAINNAME', Edit1.text);
  65.  
  66.  StatusBar1.Panels[0].text := '[+] Getting IP ...';
  67.  Form1.StatusBar1.Update;
  68.  
  69.  rta := IdHTTP1.Post('http://whatismyipaddress.com/hostname-ip', par);
  70.  
  71.  regex.regex := 'Lookup IP Address: <a href=(.*)>(.*)<\/a>';
  72.  regex.Subject := rta;
  73.  
  74.  if regex.Match then
  75.  begin
  76.    Edit1.text := regex.Groups[2];
  77.  
  78.    StatusBar1.Panels[0].text := '[+] Locating ...';
  79.    Form1.StatusBar1.Update;
  80.  
  81.    rta := IdHTTP1.Get
  82.      ('http://www.melissadata.com/lookups/iplocation.asp?ipaddress=' +
  83.      Edit1.text);
  84.  
  85.    regex.regex := 'City<\/td><td align=(.*)><b>(.*)<\/b><\/td>';
  86.    regex.Subject := rta;
  87.  
  88.    if regex.Match then
  89.    begin
  90.      Edit2.text := regex.Groups[2];
  91.    end
  92.    else
  93.    begin
  94.      Edit2.text := 'Not Found';
  95.    end;
  96.  
  97.    regex.regex := 'Country<\/td><td align=(.*)><b>(.*)<\/b><\/td>';
  98.    regex.Subject := rta;
  99.  
  100.    if regex.Match then
  101.    begin
  102.      Edit3.text := regex.Groups[2];
  103.    end
  104.    else
  105.    begin
  106.      Edit3.text := 'Not Found';
  107.    end;
  108.  
  109.    regex.regex := 'State or Region<\/td><td align=(.*)><b>(.*)<\/b><\/td>';
  110.    regex.Subject := rta;
  111.  
  112.    if regex.Match then
  113.    begin
  114.      Edit4.text := regex.Groups[2];
  115.    end
  116.    else
  117.    begin
  118.      Edit4.text := 'Not Found';
  119.    end;
  120.  
  121.    StatusBar1.Panels[0].text := '[+] Getting DNS ...';
  122.    Form1.StatusBar1.Update;
  123.  
  124.    ListBox1.Items.Clear;
  125.  
  126.    rta := IdHTTP1.Get('http://www.ip-adress.com/reverse_ip/' + Edit1.text);
  127.  
  128.    regex.regex := 'whois\/(.*?)\">Whois';
  129.    regex.Subject := rta;
  130.  
  131.    while regex.MatchAgain do
  132.    begin
  133.      for z := 1 to regex.GroupCount do
  134.        ListBox1.Items.Add(regex.Groups[z]);
  135.    end;
  136.  
  137.  end
  138.  else
  139.  begin
  140.    StatusBar1.Panels[0].text := '[-] Error';
  141.    Form1.StatusBar1.Update;
  142.  end;
  143.  
  144.  StatusBar1.Panels[0].text := '[+] Finished';
  145.  Form1.StatusBar1.Update;
  146.  
  147.  regex.Free;
  148.  
  149. end;
  150.  
  151. end.
  152.  
  153. // The End ?
  154.  

Si lo quieren bajar lo pueden hacer de aca.
6  Programación / Scripting / [Perl] Radio X 0.4 en: 28 Marzo 2014, 16:29
Actualice mi programa en perl llamado "Radio X" debido a que las emisoras no me gustaban , asi que actualice el hash con 31 estaciones , todas de diferentes generos , aunque la unica que siempre escucho siempre es la de musica clasica.

Aclaracion de dependencia :

Aclaro que necesitan bajar el mplayer , esta el link de descarga en el script , una vez que lo tengan descargado y descomprimido creen una carpeta llamada
"mplayer" y copian todos los archivos del archivo descomprimido en la carpeta recien creada , todo esto tiene que ser en el mismo directorio donde este el script.

El codigo :

Código
  1. #!usr/bin/perl
  2. #Radio X
  3. #Version 0.4
  4. #(C) Doddy Hackman 2014
  5. #
  6. #Download : http://www.mplayerhq.hu/MPlayer/releases/win32/MPlayer-mingw32-1.0rc2.zip
  7. #
  8.  
  9. use Cwd;
  10.  
  11. my @emisoras = (
  12.  
  13.    {},
  14.  
  15.    {
  16.  
  17.        "nombre" => "idobi Radio",
  18.        "genero" => "Alternative",
  19.        "link"   => "http://69.46.88.21:80"
  20.  
  21.    },
  22.  
  23.    {
  24.  
  25.        "nombre" => "BLUES RADIO (1.FM TM)",
  26.        "genero" => "Blues",
  27.        "link"   => "http://205.164.35.58:80"
  28.  
  29.    },
  30.  
  31.    {
  32.  
  33.        "nombre" => "Venice Classic Radio Italia",
  34.        "genero" => "Classical",
  35.        "link"   => "http://174.36.206.197:8000"
  36.  
  37.    },
  38.  
  39.    {
  40.  
  41.        "nombre" => "100hitz - New Country",
  42.        "genero" => "Country",
  43.        "link"   => "http://69.4.234.186:9210"
  44.  
  45.    },
  46.  
  47.    {
  48.  
  49.        "nombre" => "RADIO 7 - POLNOCNE",
  50.        "genero" => "Decades",
  51.        "link"   => "http://94.23.36.107:443"
  52.  
  53.    },
  54.  
  55.    {
  56.  
  57.        "nombre" => "COOLfahrenheit 93",
  58.        "genero" => "Easy Listening",
  59.        "link"   => "http://203.150.225.77:8400"
  60.  
  61.    },
  62.  
  63.    {
  64.  
  65.        "nombre" => "Ibiza Global Radio",
  66.        "genero" => "Electronic",
  67.        "link"   => "http://198.50.197.161:8024"
  68.  
  69.    },
  70.  
  71.    {
  72.  
  73.        "nombre" => "HBR1.com - I.D.M. Tranceponder",
  74.        "genero" => "Trance",
  75.        "link"   => "http://ubuntu.hbr1.com:19800/trance.ogg"
  76.  
  77.    },
  78.  
  79.    {
  80.  
  81.        "nombre" => "COOL radio - Beograd",
  82.        "genero" => "Folk",
  83.        "link"   => "http://176.9.30.66:80"
  84.  
  85.    },
  86.  
  87.    {
  88.  
  89.        "nombre" => "COOL radio - Beograd",
  90.        "genero" => "Folk",
  91.        "link"   => "http://176.9.30.66:80"
  92.  
  93.    },
  94.  
  95.    {
  96.  
  97.        "nombre" => "HPR4",
  98.        "genero" => "Inspirational",
  99.        "link"   => "http://50.7.77.179:8024"
  100.  
  101.    },
  102.  
  103.    {
  104.  
  105.        "nombre" => "Radio Carsija - Melli",
  106.        "genero" => "International",
  107.        "link"   => "http://80.237.153.95:19406"
  108.  
  109.    },
  110.  
  111.    {
  112.  
  113.        "nombre" => "TheJazzGroove.com",
  114.        "genero" => "Jazz",
  115.        "link"   => "http://199.180.72.2:8015"
  116.  
  117.    },
  118.  
  119.    {
  120.  
  121.        "nombre" => "Paisa Estereo",
  122.        "genero" => "Latin",
  123.        "link"   => "http://199.217.118.10:7094"
  124.  
  125.    },
  126.  
  127.    {
  128.  
  129.        "nombre" => "RockRadio1.Com",
  130.        "genero" => "Metal",
  131.        "link"   => "http://77.74.192.50:8000"
  132.  
  133.    },
  134.  
  135.    {
  136.  
  137.        "nombre" => "Adom 106.3FM",
  138.        "genero" => "Misc",
  139.        "link"   => "http://67.159.60.45:8100"
  140.  
  141.    },
  142.  
  143.    {
  144.  
  145.        "nombre" => "Healing",
  146.        "genero" => "New Age",
  147.        "link"   => "http://222.122.178.183:11070"
  148.  
  149.    },
  150.  
  151.    {
  152.  
  153.        "nombre" => "RADIO SOUND POP",
  154.        "genero" => "Pop",
  155.        "link"   => "http://99.198.118.250:8076"
  156.  
  157.    },
  158.  
  159.    {
  160.  
  161.        "nombre" => "Latido 90.1 FM",
  162.        "genero" => "Public Radio",
  163.        "link"   => "http://64.251.21.48:42000"
  164.  
  165.    },
  166.  
  167.    {
  168.  
  169.        "nombre" => "Radio Mandela",
  170.        "genero" => "Funk",
  171.        "link"   => "http://184.154.150.93:9010"
  172.  
  173.    },
  174.  
  175.    {
  176.  
  177.        "nombre" => "Boneyaad Radio",
  178.        "genero" => "Rap",
  179.        "link"   => "http://69.175.103.226:8180"
  180.  
  181.    },
  182.  
  183.    {
  184.  
  185.        "nombre" => "Reggae141.com",
  186.        "genero" => "Reggae",
  187.        "link"   => "http://184.107.197.154:8002"
  188.  
  189.    },
  190.  
  191.    {
  192.  
  193.        "nombre" => "Classic Rock 915",
  194.        "genero" => "Rock",
  195.        "link"   => "http://117.53.175.113:15018"
  196.  
  197.    },
  198.  
  199.    {
  200.  
  201.        "nombre" => "181.fm - Rock 181 (Active Rock)",
  202.        "genero" => "Rock",
  203.        "link"   => "http://108.61.73.118:14008"
  204.  
  205.    },
  206.  
  207.    {
  208.  
  209.        "nombre" => "181.FM - The Buzz",
  210.        "genero" => "Rock",
  211.        "link"   => "http://108.61.73.119:14126"
  212.  
  213.    },
  214.  
  215.    {
  216.  
  217.        "nombre" => "181.FM - Good Time Oldies",
  218.        "genero" => "Rock",
  219.        "link"   => "http://108.61.73.118:14046"
  220.  
  221.    },
  222.  
  223.    {
  224.  
  225.        "nombre" => "Top40",
  226.        "genero" => "Pop Dance R&B Rock",
  227.        "link"   => "http://95.141.24.79:80"
  228.  
  229.    },
  230.  
  231.    {
  232.  
  233.        "nombre" => "MUSIK.ORIENTAL",
  234.        "genero" => "Seasonal and Holiday",
  235.        "link"   => "http://193.34.51.40:80"
  236.  
  237.    },
  238.  
  239.    {
  240.  
  241.        "nombre" => "NOVA 100.3",
  242.        "genero" => "Soundtracks",
  243.        "link"   => "http://117.53.175.113:15010"
  244.  
  245.    },
  246.  
  247.    {
  248.  
  249.        "nombre" => "Alex Jones - Infowars.com",
  250.        "genero" => "Talk",
  251.        "link"   => "http://50.7.130.109:80"
  252.  
  253.    },
  254.  
  255.    {
  256.  
  257.        "nombre" => "illusive Radio Punta",
  258.        "genero" => "Themes",
  259.        "link"   => "http://38.96.148.141:9996"
  260.  
  261.    }
  262.  
  263. );
  264.  
  265. $SIG{INT} = \&retorno;
  266.  
  267. chdir( getcwd() . "/mplayer/" );
  268.  
  269. menu();
  270.  
  271. sub retorno {
  272.    print "\n\n[+] Press any key for return to the menu\n\n";
  273.    <stdin>;
  274.    clean();
  275.    menu();
  276. }
  277.  
  278. sub menu {
  279.  
  280.    head();
  281.  
  282.    print "\n\n[+] Listing ["
  283.      . int( @emisoras - 1 ) . "] "
  284.      . "stations found ...\n";
  285.  
  286.    for my $em ( 1 .. @emisoras - 1 ) {
  287.  
  288.        print "\n[+] ID : " . $em . "\n";
  289.        print "[+] Name : " . $emisoras[$em]->{nombre} . "\n";
  290.        print "[+] Type : " . $emisoras[$em]->{genero} . "\n";
  291.  
  292.        #print "[$em] - ".$emisoras[$em]->{genero}."\n";
  293.  
  294.    }
  295.  
  296.    print "\n[+] Write exit to go out\n";
  297.  
  298.    print "\n[+] Option : ";
  299.    chomp( my $op = <stdin> );
  300.  
  301.    if ( $op eq "exit" ) {
  302.        copyright();
  303.    }
  304.  
  305.    if ( $op =~ /\d+/ ) {
  306.        print "\n[!] Listening : " . $emisoras[$op]->{link} . " ...\n\n";
  307.        system("mplayer $emisoras[$op]->{link}");
  308.    }
  309.  
  310.    copyright();
  311.  
  312. }
  313.  
  314. sub head {
  315.  
  316.    clean();
  317.  
  318.    print qq(
  319.  
  320.  
  321. @@@@@     @    @@@@    @   @@@@     @     @
  322. @    @    @    @   @   @  @    @    @     @
  323. @    @   @ @   @    @  @  @    @     @   @
  324. @    @   @ @   @    @  @  @    @      @ @  
  325. @@@@@   @   @  @    @  @  @    @       @  
  326. @    @  @   @  @    @  @  @    @      @ @  
  327. @    @  @@@@@  @    @  @  @    @     @   @
  328. @    @ @     @ @   @   @  @    @    @     @
  329. @    @ @     @ @@@@    @   @@@@     @     @
  330.  
  331. );
  332.  
  333. }
  334.  
  335. sub copyright {
  336.    print "\n\n-- == (C) Doddy Hackman 2014 == --\n\n";
  337.    <stdin>;
  338.    exit(1);
  339. }
  340.  
  341. sub clean {
  342.    my $os = $^O;
  343.    if ( $os =~ /Win32/ig ) {
  344.        system("cls");
  345.    }
  346.    else {
  347.        system("clear");
  348.    }
  349. }
  350.  
  351. #The End ?
  352.  
  353.  

Un ejemplo de uso

Código:



 @@@@@     @    @@@@    @   @@@@     @     @
 @    @    @    @   @   @  @    @    @     @
 @    @   @ @   @    @  @  @    @     @   @
 @    @   @ @   @    @  @  @    @      @ @
 @@@@@   @   @  @    @  @  @    @       @
 @    @  @   @  @    @  @  @    @      @ @
 @    @  @@@@@  @    @  @  @    @     @   @
 @    @ @     @ @   @   @  @    @    @     @
 @    @ @     @ @@@@    @   @@@@     @     @



[+] Listing [31] stations found ...

[+] ID : 1
[+] Name : idobi Radio
[+] Type : Alternative

[+] ID : 2
[+] Name : BLUES RADIO (1.FM TM)
[+] Type : Blues

[+] ID : 3
[+] Name : Venice Classic Radio Italia
[+] Type : Classical

[+] ID : 4
[+] Name : 100hitz - New Country
[+] Type : Country

[+] ID : 5
[+] Name : RADIO 7 - POLNOCNE
[+] Type : Decades

[+] ID : 6
[+] Name : COOLfahrenheit 93
[+] Type : Easy Listening

[+] ID : 7
[+] Name : Ibiza Global Radio
[+] Type : Electronic

[+] ID : 8
[+] Name : HBR1.com - I.D.M. Tranceponder
[+] Type : Trance

[+] ID : 9
[+] Name : COOL radio - Beograd
[+] Type : Folk

[+] ID : 10
[+] Name : COOL radio - Beograd
[+] Type : Folk

[+] ID : 11
[+] Name : HPR4
[+] Type : Inspirational

[+] ID : 12
[+] Name : Radio Carsija - Melli
[+] Type : International

[+] ID : 13
[+] Name : TheJazzGroove.com
[+] Type : Jazz

[+] ID : 14
[+] Name : Paisa Estereo
[+] Type : Latin

[+] ID : 15
[+] Name : RockRadio1.Com
[+] Type : Metal

[+] ID : 16
[+] Name : Adom 106.3FM
[+] Type : Misc

[+] ID : 17
[+] Name : Healing
[+] Type : New Age

[+] ID : 18
[+] Name : RADIO SOUND POP
[+] Type : Pop

[+] ID : 19
[+] Name : Latido 90.1 FM
[+] Type : Public Radio

[+] ID : 20
[+] Name : Radio Mandela
[+] Type : Funk

[+] ID : 21
[+] Name : Boneyaad Radio
[+] Type : Rap

[+] ID : 22
[+] Name : Reggae141.com
[+] Type : Reggae

[+] ID : 23
[+] Name : Classic Rock 915
[+] Type : Rock

[+] ID : 24
[+] Name : 181.fm - Rock 181 (Active Rock)
[+] Type : Rock

[+] ID : 25
[+] Name : 181.FM - The Buzz
[+] Type : Rock

[+] ID : 26
[+] Name : 181.FM - Good Time Oldies
[+] Type : Rock

[+] ID : 27
[+] Name : Top40
[+] Type : Pop Dance R&B Rock

[+] ID : 28
[+] Name : MUSIK.ORIENTAL
[+] Type : Seasonal and Holiday

[+] ID : 29
[+] Name : NOVA 100.3
[+] Type : Soundtracks

[+] ID : 30
[+] Name : Alex Jones - Infowars.com
[+] Type : Talk

[+] ID : 31
[+] Name : illusive Radio Punta
[+] Type : Themes

[+] Write exit to go out

[+] Option : 3

[!] Listening : http://174.36.206.197:8000 ...

MPlayer 1.0rc2-4.2.1 (C) 2000-2007 MPlayer Team
CPU: AMD Sempron(tm) 140 Processor (Family: 16, Model: 6, Stepping: 2)
CPUflags:  MMX: 1 MMX2: 1 3DNow: 1 3DNow2: 1 SSE: 1 SSE2: 1
Compiled with runtime CPU detection.

Playing http://174.36.206.197:8000.
Connecting to server 174.36.206.197[174.36.206.197]: 8000...
Name   : Venice Classic Radio Italia
Genre  : Classical
Website: http://www.veniceclassicradio.eu/
Public : yes
Bitrate: 128kbit/s
Cache size set to 320 KBytes
Cache fill:  0.00% (0 bytes)   No bind found for key ''.

Cache fill:  7.50% (24576 bytes)
ICY Info: StreamTitle='Frederic Chopin (1810-1849) - 'Allegro de concert' per pi
anoforte in la Maggiore Op.46 (11:37)  {+info: veniceclassicradio.eu}';StreamUrl
='';
Cache fill: 17.50% (57344 bytes)
Audio file file format detected.
==========================================================================
Opening audio decoder: [mp3lib] MPEG layer-2, layer-3
mpg123: Can't rewind stream by 154 bits!
AUDIO: 44100 Hz, 2 ch, s16le, 128.0 kbit/9.07% (ratio: 16000->176400)
Selected audio codec: [mp3] afm: mp3lib (mp3lib MPEG layer-2, layer-3)
==========================================================================
AO: [dsound] 44100Hz 2ch s16le (2 bytes per sample)
Video: no video
Starting playback...

ICY Info: StreamTitle='Mauro Giuliani (1781-1829) - Variazioni su 'Deh! Calma, o
h ciel!' per chitarra e quartetto (08:00)  {+info: veniceclassicradio.eu}';Strea
mUrl='';

ICY Info: StreamTitle='Johann Sebastian Bach (1685-1750) - 'Il clavicembalo ben
temperato' - Libro I - Praeludium et Fuga in si bemolle Maggiore BWV866 (02:42)
 {+info: veniceclassicradio.eu}';StreamUrl='';

ICY Info: StreamTitle='Antonio Palella (1692-1761) - Concerto a 4  in sol Maggio
re (12:42)  {+info: veniceclassicradio.eu}';StreamUrl='';

ICY Info: StreamTitle='Anton Reicha (1770-1836) - Sonata per fagotto e pianofort
e (16:19)  {+info: veniceclassicradio.eu}';StreamUrl='';

ICY Info: StreamTitle='Gioachino Rossini (1792-1868) - Sonata per archi in mi be
molle Maggiore No.5 (14:51)  {+info: veniceclassicradio.eu}';StreamUrl='';

ICY Info: StreamTitle='Fernand De La Tombelle (1854-1928) - Andante espressivo p
er violoncello e pianoforte (04:39)  {+info: veniceclassicradio.eu}';StreamUrl='
';

ICY Info: StreamTitle='Franz Schubert (1797-1828) - Sinfonia in re Maggiore No.3
 D200 (23:09)  {+info: veniceclassicradio.eu}';StreamUrl='';


Eso es todo.
7  Programación / Java / Re: [Java] MD5 Cracker 1.0 en: 23 Marzo 2014, 23:34
si , fue un bug de los feos.
8  Programación / Java / Re: [Java] MD5 Cracker 1.0 en: 22 Marzo 2014, 13:43
si , anoche lo vi al error me olvide de modificar la variable , cuando tenga tiempo lo actualizo.

gracias por las sugerencias.

edito : fixeado.
9  Programación / Java / Re: [Java] MD5 Cracker 1.0 en: 21 Marzo 2014, 22:53
es que no hay mucho que decir , solo busca el hash usando el servicio online de una pagina.
10  Programación / Java / [Java] MD5 Cracker 1.0 en: 21 Marzo 2014, 22:04
Un simple programa en Java para crackear un hash MD5.

Una imagen :



Si lo quieren bajar lo pueden hacer de aca.
11  Programación / Scripting / Re: [UTILIDAD] Si pierdes tu USB.. en: 20 Marzo 2014, 21:43
esa si es una idea original.
12  Programación / Scripting / Re: PasteBin Downloader VBScript en: 18 Marzo 2014, 16:30
estaria bueno traducirlo a ruby.
13  Programación / Java / Re: [Java] BingHackTool 1.0 en: 15 Marzo 2014, 16:50
en si , no tiene mucha ciencia , solo busca paginas vulnerables a SQLI usando un dork aclarado por vos en el programa , tambien te pide la cantidad de paginas que queres revisar en bing , despues de de encontrar paginas con el dork marcado comienza a revisar cada pagina usando "-1+union+select+666--".
14  Programación / Java / [Java] BingHackTool 1.0 en: 14 Marzo 2014, 16:17
Un simple programa en Java para buscar paginas vulnerables a SQLI usando Bing.

Una imagen :



Si lo quieren bajar lo pueden hacer de aca.
Páginas: [1] 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 ... 31
Powered by SMF 1.1.19 | SMF © 2006-2008, Simple Machines