unitbromas.pas

来自「远程控制软件」· PAS 代码 · 共 21 行

{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