Aimbot

unit uCSS;

interface

uses
  Windows, D3DX9, Math;

var
AngleX, AngleY: Single;

function MousePos:PD3DXVector2;
function MyPos: PD3DXVector3;
function PosEnemy: PD3DXVector3;
procedure CalcAngle(var src, dst :TD3DXVector3; var angles:TD3DXVector2);

implementation

function MousePos:PD3DXVector2;
begin
  Result:= Ptr(GetModuleHandle('engine.dll')+$458D04);
end;

function MyPos: PD3DXVector3;
begin
  Result := Ptr(PDword(PDword(GetModuleHandle('server.dll')+$005BCA74)^+$20)^+$248);
end;

function PosEnemy: PD3DXVector3;
begin
  Result := Ptr(PDword(PDword(GetModuleHandle('server.dll')+$005BCA84)^+$20)^+$248);
end;

procedure CalcAngle(var src, dst :TD3DXVector3; var angles:TD3DXVector2);
var
  Delta : TD3DXVector3;
  hyp : Single;
begin
  D3DXVec3Subtract(Delta, src, dst);
 hyp := sqrt(delta.x * delta.x + delta.y * delta.y);
 //angles.x := Tanh({atan}Tanh(delta.z / hyp));
 angles.x := Sinh(delta.z/hyp) * 57.295779513082;
 angles.y := Tanh(delta.y / delta.x) * 57.295779513082;

 if delta.x >= 0.0 then
  angles.y := Angles.y + 180.0;
end;

end.