CLEO Help Crash in game and error on compile

CLEO related
Status
Not open for further replies.

TraCerX

Active member
Joined
Oct 17, 2014
Messages
114
Reaction score
0
Hello ive got the script below and when i enter game i get crashed and i get error when i change key and when i compile i get following error: Unknown directive wait 0.
Please someone who know cleo scripting help me with crash and fixing compiling error

Code:
Script 
-----------------------------
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
{$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
 
 
while true
    wait 0
    if 0ab0: 121
    then
        0AD1: "AimBot ~g~enabled" 1200
        repeat
            wait 0
        until 8ab0: 123
        repeat
            wait 0
            if and
                0256: $player_actor
                not Actor.Driving($player_actor)
            then
                if 0AD2: 0@ = player $player_char targeted_actor
                then
                    if not Actor.Dead(0@)
                    then
                        if and
                            0ab0: 1
                            0256: 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@
                            0097: make 1@ absolute_float
                            0097: make 2@ absolute_float
                            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@
                            0AA5: call 0x4207A0 num_params 1 pop 1 _value 11@ // asin
                            0AE9: pop_float 12@ 
                            0AA5: call 0x48DE40 num_params 1 pop 1 _value 11@ // acos
                            0AE9: pop_float 13@ 
                            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
        until 0ab0: 121
        0AD1: "AimBot ~r~disabled" 1200
        repeat
            wait 0
        until 8ab0: 123
    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@
-----------------------------
 
Status
Not open for further replies.
Top