CLEO Help AntiAim/GhostMode

CLEO related
Status
Not open for further replies.

Edvincik

Well-known member
Joined
Mar 15, 2016
Messages
399
Reaction score
26
How to remove flight animation bug and enable skin collision that the only thing that this cleo would make is remove of green triangle?
Code:
{$CLEO}
IF 0038:   $707 == FALSE
THEN 0A93:
END
IF 8AF7: NOT samp 0@ = get_base
THEN 0A93:
END
03A4: name_thread "GhostMode"
0B34: samp register_client_command "GMode" to_label @GhostMode
0C7F: samp set_client_command "GMode" description "{FFD3E0}Made by iTz_XG4M3R{D5DADD}"
0B6D: render 0@ = create_font "Segoe UI" height 10 flags 13
0BE3: raknet setup_incoming_rpc_hook @iRPC
0BE2: raknet setup_outcoming_packet_hook @oPacket

WHILE TRUE
0001: WAIT 0 MS

    IF 0039:   1@ == {GhostStatus}TRUE
    THEN 
    03F0: _enable_text_draw TRUE
    0B60: convert_game_screen_coords 0.3 320.0 to_window_screen_coords 3@ 4@
        IF 0039:   2@ == {Mode}1
        THEN
        0B69: render draw_box_pos 3@ 4@ size 143 20 color 0x7F000000
        0B6F: render font 0@ draw_text "{FFD3E0}GhostMode{FFFFFF}: Óìíûé" pos 3@ 4@ color 0xFFFFFFFF
        ELSE
        0B69: render draw_box_pos 3@ 4@ size 120 20 color 0x7F000000
        0B6F: render font 0@ draw_text "{FFD3E0}GhostMode{FFFFFF}: Full" pos 3@ 4@ color 0xFFFFFFFF
        END
    END
    
END

:CheckMode
IF OR
003B:   0@ == 1@
003B:   2@ == 3@
THEN
END
0AB2: RET 0 ||

:iRPC
IF 0039:   1@ == {GhostStatus}TRUE
THEN 0BE5: raknet 3@ = get_hook_param {PARAM_PACKETID}1
    IF 0039:   3@ == {RPC_SCRSETPLAYERPOS}12
    THEN
        IF 0039:   {Mode}2@ == 1
        THEN
        0BE5: raknet 3@ = get_hook_param {PARAM_BITSTREAM}0
        0BE9: raknet bit_stream 3@ reset_read_pointer
        0BE7: raknet 4@ = bit_stream_read 3@ type {BS_TYPE_FLOAT}4
        0BE7: raknet 5@ = bit_stream_read 3@ type {BS_TYPE_FLOAT}4
        0BE7: raknet 6@ = bit_stream_read 3@ type {BS_TYPE_FLOAT}4
            IF 00FF:   actor $PLAYER_ACTOR sphere 0 in_sphere 4@ 5@ 6@ radius 3.7 3.7 3.7 on_foot
            THEN 0BE0: raknet hook_ret FALSE
            END
        ELSE 0BE0: raknet hook_ret FALSE
        END   
    END
END
0BE0: raknet hook_ret TRUE 

:oPacket
IF 0039:   1@ == {GhostStatus}TRUE
THEN 0BE5: raknet 3@ = get_hook_param {PARAM_PACKETID}1
    IF 0039:   3@ == {PACKET_PLAYER_SYNC}207
    THEN
    0BE5: raknet 3@ = get_hook_param {PARAM_BITSTREAM}0
    0BF3: raknet 3@ = bit_stream 3@ get_data_ptr
    0C0C: 4@ = struct 3@ offset {sSurfingVehicleID}63 size 2
        
        IF 8AFF: NOT samp 5@ = car_handle_by_samp_vehicle_id 4@
        THEN   
            FOR 4@ = 1 TO {MAX_VEHICLES}2000 [STEP = 1]
                IF 8AFF: NOT samp 5@ = car_handle_by_samp_vehicle_id 4@
                THEN
                0C0D: struct 3@ offset {sSurfingVehicleID}63 size 2 = 4@
                BREAK
                END
            END       
        ELSE
            IF 8547:   NOT actor $PLAYER_ACTOR colliding_with_car 5@
            THEN 0C0D: struct 3@ offset {sSurfingVehicleID}63 size 2 = 0
            END
        END                   
                
    END   
END
0BE0: raknet hook_ret TRUE

:GhostMode
IF 0B35: samp 3@ = get_last_command_params
THEN 0C1A: 3@ = atoi 3@
    IF 0AB1: _call_scm_func @CheckMode params 4 | {If1}3@ == 1 OR {If2}3@ == 2 ||
    THEN
    0085: {Mode}2@ = 3@
    0B12: {GhostStatus}1@ = 1@ XOR 1
    ELSE 0AF8: samp add_message_to_chat "[{%X}GhostMode{%X}] > Îøèáêà. Âûáåðèòå ðåæèì îò 1 äî 2." color 0xFFFFFF | {cL}0xFFD3E0 {cL}0xFFFFFF |
    END
ELSE 0AF8: samp add_message_to_chat "[{%X}GhostMode{%X}] > Èñïîëüçóéòå: /GMode 1 èëè 2 ." color 0xFFFFFF | {cL}0xFFD3E0 {cL}0xFFFFFF |
END       
0B43: samp cmd_ret
 
Status
Not open for further replies.
Top