{$CLEO}
0000:

var
1@ :float
2@ :float
3@ :float
4@ :float
5@ :float
6@ :float
7@ :float
8@ :float
9@ :float
10@ :float
11@ :float
12@ :float
13@ :float
14@ :float
15@ :float
end

0ab1: @checkFile 0

while true
    wait 0
    0ab1: @getKeyAiming 0 16@ 17@
            while key 17@
            wait 0
            0ab1: @getKeyAiming 0 16@ 17@
            if and
                //Actor.Defined($player_actor)
                056D:   actor $player_actor defined
                not Actor.Driving($player_actor)
            then
                if 0AD2: 0@ = player $player_char targeted_actor
                then
                    if not Actor.Dead(0@)
                    then
                        if and
                            0ab0: 16@
                            //Actor.Defined(0@)
                            056D: 0@
                            not Actor.Dead(0@)
                            not Actor.Driving(0@)
                        then
                            068D: get_camera_position_to 1@ 2@ 3@
                            Actor.StorePos(0@, 4@, 5@, 6@)
                            Actor.StorePos($player_actor, 7@, 8@, 9@)
                            1@ -= 4@
                            2@ -= 5@
                            0C00: math 1@ = abs 1@ // Aa
                            0C00: math 2@ = abs 2@ // Ab
                            10@ = 1@
                            11@ = 2@
                            10@ *= 10@
                            11@ *= 11@
                            10@ += 11@
                            01FB: 10@ = square_root 10@ // Ac
                            11@ = 1@ // Aa vrem
                            12@ = 10@ // Ac vrem
                            11@ /= 12@
                            0C04: math 12@ = arcsine 11@ // alpha
                            0C06: math 13@ = arccosine 11@ // beta
                            if 0ab1: @getSlotWeapon 0 16@
                            then if 0ab1: @getAngleForCam 7 4@ 5@ 7@ 8@ 12@ 13@ 16@ 15@
                    then if 0ab1: @checkObject 6 4@ 5@ 6@ 7@ 8@ 9@
                    then
                    15@ += 0.0389
                    0A8C: write_memory 0xB6F258 size 4 value 15@ virtual_protect 0
                    end
                    end
                            end
                        end
                    end         
                end
            end
        end

end

:checkObject
if 06BD:  no_obstacles_between 3@ 4@ 5@ and 0@ 1@ 2@ solid 1 car 0 actor 0 object 1 particle 0
then 0485: return_true
else 059A: return_false
end
0ab2: 0

:getAngleForCam
var
    0@ : float
end
if 6@ == 5
then
    7@ = 0.0100
    8@ = 0.0100
    9@ = 1.5607
    10@ = 1.5807
else if 6@ == 6
    then
        7@ = 0.0180
        8@ = 0.0200
        9@ = 1.5507
        10@ = 1.5907
    else
        7@ = 0.0
        8@ = 0.0
        9@ = 1.5707
        10@ = 1.5707
    end
end

if and
    2@ > 0@
    3@ > 1@
then
    5@ -= 8@
    15@ = 5@
end
                   
if and
    2@ > 0@
    3@ < 1@
then
    5@ *= -1.0
    5@ -= 7@
    15@ = 5@
end
                   
if and
    2@ < 0@
    3@ > 1@
then
    4@ += 9@
    15@ = 4@
end
                   
if and
    2@ < 0@
    3@ < 1@
then
    4@ *= -1.0
    4@ -= 10@
    15@ = 4@
end

0A8D: 11@ = read_memory 0xB6F258 size 4 virtual_protect 0
11@ -= 15@
if and
    11@ < 0.1800
    11@ > -0.1800
then 0485: return_true
else 059A: return_false
end
0ab2: 1 15@

:getSlotWeapon
0A96: 0@ = actor $player_actor struct
0@ += 0x718
0A8D: 1@ = read_memory 0@ size 1 virtual_protect 0
if or
    1@ == 2
    1@ == 3
    1@ == 4
    1@ == 5
    1@ == 6
    1@ == 7
then 0485: return_true
else 059A: return_false
end
0ab2: 1 1@

:getKeyAiming
0AF0: 0@ = get_int_from_ini_file "CLEO\set\aimbotsettings.ini" section "Settings" key "keyaiming"
0AF0: 1@ = get_int_from_ini_file "CLEO\set\aimbotsettings.ini" section "Settings" key "keyactivation"
0ab2: 2 0@ 1@

:checkFile
if 8AE4: not directory_exist "CLEO\set"
then
    repeat
        wait 0
    until 0AE5: create_directory "CLEO\set"
end

if 8AAB: not file_exists "CLEO\set\aimbotsettings.ini"
then
    0AF1: write_int 0x01 to_ini_file "CLEO\set\aimbotsettings.ini" section "Settings" key "keyaiming"
    0AF1: write_int 0x79 to_ini_file "CLEO\set\aimbotsettings.ini" section "Settings" key "keyactivation"
end
0ab2: 0

{$CLEO}
0000:

repeat
wait 0
until samp.Available()
chatmsg "{008cf0}[AimRey]{ffffff}Çàãðóæåí. Àâòîð: {ffa500}Jerry"
0AF0: 0@ = get_int_from_ini_file "cleo\Aim_Rey.ini" section "MAIN" key "delay"
0AF0: 1@ = get_int_from_ini_file "cleo\Aim_Rey.ini" section "MAIN" key "sharpness"

repeat
wait 0
if and
not actor.Driving($PLAYER_ACTOR)
0AB0:   key_pressed 17
then
0C72: set_virtual_key 102 down true
wait 0@
0C72: set_virtual_key 102 down false
wait 1@
0C72: set_virtual_key 100 down true
wait 0@
0C72: set_virtual_key 100 down false
wait 1@
0C72: set_virtual_key 100 down true
wait 0@
0C72: set_virtual_key 100 down false
wait 1@
0C72: set_virtual_key 102 down true
wait 0@
0C72: set_virtual_key 102 down false
wait 150
end
until false