CLEO Help decrypt

CLEO related
Status
Not open for further replies.

ready01

New member
Joined
Dec 27, 2018
Messages
2
Reaction score
0
I need help to unlocking this cleo script.. Just need to edit!
Or just tell me how
 

Attachments

  • DMG INFORMER by p1c.cs
    24.5 KB · Views: 8

SpnKO

Member
Joined
Mar 17, 2014
Messages
17
Reaction score
3
Code:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP 
8AFA:   not is_samp_available 
004D: jump_if_false @Noname_37 
0001: wait 100 ms 
0002: jump @Noname_17 
0AF8: samp add_message_to_chat "DMG Informer {ff0000}v 0.1 {ffffff}(0.3.7 RC2) by {ff0000}p1cador" color 16777215 
0006: 9@ = 0 
0006: 3@ = -1 
0006: 25@ = 0 
0006: 26@ = 0 
0006: 14@ = 0 
0006: 15@ = 0 
0006: 16@ = 0 
0006: 17@ = 0 
0952: load_soundtrack 1149 
0AAC: 0@ = load_audiostream "CLEO\p1cador.mp3" 
0B78: log "{F44336}[p1cador] > Audio Loaded!" 
0B6D: render 31@ = create_font "Arial" height 10 flags 12 
0B6D: render 30@ = create_font "Arial" height 21 flags 13 
0AC8: 29@ = allocate_memory_size 48 
0AC8: 28@ = allocate_memory_size 48 
0007: 10@ = 339.0 
0007: 11@ = 174.0 
0BE1: raknet setup_outcoming_rpc_hook -805 
0001: wait 0 ms 
00D6: if 
0039:   25@ == 9 

:Noname_307
004D: jump_if_false @Noname_548 
000A: 9@ += 1 
0007: 10@ = 384.0 
0B60: convert_game_screen_coords 10@ 11@ to_window_screen_coords 12@ 13@ 
00D6: if 
0B5C:  samp is_player 4@ paused 
004D: jump_if_false @Noname_402 
0AD3: 28@ = format "{FFFFFF}AFK" 
0002: jump @Noname_467 
00D6: if 
0118:   actor 7@ dead 
004D: jump_if_false @Noname_451 
0AD3: 28@ = format "{ff0000} ÂÛÅÁÀÍ" 15@ 
0002: jump @Noname_467 
0AD3: 28@ = format "-%.2f" 15@ 
0B6F: render font 30@ draw_text 28@ pos 12@ 13@ color -1879113728 
0B6C: render 24@ = font 30@ draw_height 
005A: 24@ += 13@ // (int) 
0AD3: 29@ = format "%s[%d]" 8@ 14@ 
0B6F: render font 31@ draw_text 29@ pos 12@ 24@ color -251658241 
0002: jump @Noname_548 
00D6: if 
0039:   26@ == 10 
004D: jump_if_false @Noname_758 
000A: 9@ += 1 
0007: 10@ = 294.0 
0B60: convert_game_screen_coords 10@ 11@ to_window_screen_coords 12@ 13@ 
0B6B: render 23@ = font 31@ draw_text 29@ length 
0063: 12@ -= 23@ // (float) 
00D6: if or
0118:   actor $PLAYER_ACTOR dead 
8256:   not player $PLAYER_ACTOR defined 
004D: jump_if_false @Noname_660 
0AD3: 28@ = format "" 
0AD3: 29@ = format "" 
0002: jump @Noname_697 
0AD3: 28@ = format "- %.2f" 17@ 
0AD3: 29@ = format "%s[%d]" 18@ 16@ 
0B6F: render font 30@ draw_text 28@ pos 12@ 13@ color 2147418112 
0B6C: render 24@ = font 30@ draw_height 
005A: 24@ += 13@ // (int) 
0B6F: render font 31@ draw_text 29@ pos 12@ 24@ color -251674689 
0002: jump @Noname_758 
00D6: if 
0039:   9@ == 450 
004D: jump_if_false @Noname_798 
0006: 25@ = -1 
0006: 26@ = -1 
0002: jump @Noname_798 
0002: jump @Noname_307 
0BE5: raknet 2@ = get_hook_param 1 
00D6: if 
0039:   2@ == 115 
004D: jump_if_false @Noname_1032 
0BE5: raknet 1@ = get_hook_param 0 
0BE7: raknet 3@ = bit_stream_read 1@ type 1 
0BE7: raknet 4@ = bit_stream_read 1@ type 2 
0BE7: raknet 5@ = bit_stream_read 1@ type 3 
0BE7: raknet 6@ = bit_stream_read 1@ type 3 
0BE7: raknet 6@ = bit_stream_read 1@ type 3 
0006: 9@ = 0 
00D6: if 
0039:   3@ == 0 
004D: jump_if_false @Noname_965 
0006: 25@ = 9 
0085: 14@ = 4@ // (int) 
0085: 15@ = 5@ // (int) 
0B20: samp 7@ = actor_handle_by_samp_player_id 14@ 
0B36: samp 8@ = get_player_nickname 14@ 
0AAD: set_mp3 0@ perform_action 1 
0002: jump @Noname_965 
00D6: if 
0039:   3@ == 1 
004D: jump_if_false @Noname_1021 
0006: 26@ = 10 
0085: 16@ = 4@ // (int) 
0085: 17@ = 5@ // (int) 
0B36: samp 18@ = get_player_nickname 16@ 
0002: jump @Noname_1021 
0BE0: raknet hook_ret 1 
0002: jump @Noname_1036 
0BE0: raknet hook_ret 1 

:Noname_1021 // Note: a jump to this label will crash the game
 

ready01

New member
Joined
Dec 27, 2018
Messages
2
Reaction score
0
Anyway.. If someone need it:

Code:
/*
 0@ - p1cador.mp3
 1@ - get_hook_param PARAM_BITSTREAM
 2@ - RPC_GIVETAKEDAMAGE
 3@ - 0 = give / 1 =take
 4@ - Player ID
 5@ - ammount damage(FLOAT)
 6@ - GUN -> BodyPart
 7@ - handle
 8@ - nickname
 9@ - COUNTER
 10@ - прицел INGAME X
 11@ - прицел INGAME Y
 12@ - прицел WINDOW X
 13@ - прицел WINDOW Y
 14@ - 4@
 15@ - 5@
 16@ - 4@
 17@ - 5@
 18@ - nickname(2)
 19@ - MAIN TRIGGER 0-600ms
 20@ - ACTOR X
 21@ - ACTOR Y
 22@ - ACTOR Z
 23@ - length 31@ 29@
 24@ - font 30@ высота
 25@ - TRIGGER 1
 26@ - TRIGGER 2
 27@ - length 31@  <-------------------
 28@ - alloc dmg                      |
 29@ - alloc name                     |
 30@ - FONT dmg                       |
 31@ - FONT name  <--------------------
 32@ -
 */
 {$CLEO} 
{$INCLUDE SF}   
0000:
    
while not SAMP.Available()
wait 100
end

////////////////////////////////////////
/*alloc 30@ 128

0b6d: render 31@ = create_font "Arial" height 15 flags 12

0B5A: get_screen_resolution 1@ 2@
0062: 1@ -= 1@
//0062: 2@ -= 2@
2@ -= 25


while true
    wait 0           
    format 30@ "{ffffff}DMG Informer 0.3.7 RC2 {BEBEBE}v 0.1"
    0B6F: render font 31@ draw_text 30@  pos 1@ 2@ color 0xFFffffff
     //0B6C: render 3@ = font 31@ draw_height 
    0062:    2@ -= 3@
        format 30@ "{ffffff}by {ff0000}p{ffffff}1cador"
    0B6F: render font 31@ draw_text 30@  pos 1@ 2@ color 0xFFffff
    005a:     2@ += 3@
    

    
  
    
    if 0B61: samp is_local_player_spawned
        then break
    end
end
*/



/////////////////////////////////////

9@ = 0
3@ = -1
25@ = 0
26@ = 0           
14@ = 0
15@ = 0
16@ = 0
17@ = 0
0952: load_soundtrack 1149
//qoloqol3.mp3
0AAC: 0@ = load_audiostream "CLEO\p1cador.mp3"   
//0AC1: 9@ = load_audiostream_with_3d_support "CLEO\qoloqol3.mp3"
0B78: log "{F44336}[p1cador] > Audio Loaded!"


0b6d: render 31@ = create_font "Arial" height 10 flags 12
0b6d: render 30@ = create_font "Arial" height 21 flags 13
alloc 29@ 48
alloc 28@ 48
 
10@ = 339.0  // ПРИЦЕЛ //10@ += 45.0 
11@ = 174.0  // ПРИЦЕЛ


    
0BE1: raknet setup_outcoming_rpc_hook @outRPC   
//thread "qol"

//0085: 13@ = 11@ // (int)
//0087: 17@ = 3@ // (float)

//003B:   12@ == 21@  // (int)
//0045:   85@ == 69@  // (float)

while true
    wait 0
    
    
    if 25@ == 9         
        then
        9@ += 1
        10@ = 384.0
        0B60: convert_game_screen_coords 10@ 11@ to_window_screen_coords 12@ 13@ 
        if SAMP.IsPlayerPaused(4@)
            then
            format 28@ "{FFFFFF}AFK"
            else
                if Actor.Dead(7@)
                    then
                    format 28@ "{ff0000}NOOB" 15@
                    else
                    format 28@ "-%.2f" 15@
                end
            end
        0b6f: render font 30@ draw_text 28@ pos 12@ 13@ color 0x8fff0000
        0B6C: render 24@ = font 30@ draw_height
        005a: 24@ -= 13@ //error opcode   
                                            
        
        format 29@ "%s[%d]" 8@ 14@         
        0b6f: render font 31@ draw_text 29@ pos 12@ 24@ color 0xf0ffffff //ff00ff00
                    
        else
    end
    
    if 26@ == 10 
        then
        9@ += 1
        10@ = 294.0
        
        0B60: convert_game_screen_coords 10@ 11@ to_window_screen_coords 12@ 13@     
        0B6B: render 23@ = font 31@ draw_text 29@ length
        0063: 12@ -= 23@
        
        if or
            actor.dead($PLAYER_ACTOR)
            not player.Defined($PLAYER_ACTOR)
            then
            format 28@ ""
            format 29@ ""
            else
            format 28@ "- %.2f" 17@
            format 29@ "%s[%d]" 18@ 16@
        end
        0b6f: render font 30@ draw_text 28@ pos 12@ 13@ color 0x7fff0000 
        0B6C: render 24@ = font 30@ draw_height
        005a: 24@ -= 13@//error opcode
        
        //format 29@ "%s[%d]" 18@ 16@               //TAKE         
        0b6f: render font 31@ draw_text 29@ pos 12@ 24@ color 0xf0FFBFBF
          
                
        else
    end 
 
        
    if 9@ == 450
    then
    25@ = -1
    26@ = -1
    //0AF8: samp add_message_to_chat "GAVENDA" color 0xFFF000
    else
    end
 
end
                                

//0BDE: pause_thread 0

:outRPC     
0BE5: raknet 2@ = get_hook_param PARAM_PACKETID
IF 0039: 2@ == RPC_GIVETAKEDAMAGE
    THEN
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BE7: raknet 3@ = bit_stream_read 1@ type BS_TYPE_BOOL      //give/take
    0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_SHORT     //Player
    0BE7: raknet 5@ = bit_stream_read 1@ type BS_TYPE_INT       //ammount(FLOAT)
    0BE7: raknet 6@ = bit_stream_read 1@ type BS_TYPE_INT       //GUN
    0BE7: raknet 6@ = bit_stream_read 1@ type BS_TYPE_INT       //BodyPart
    9@ = 0                                             
    if 3@ == 0
        then 
        25@ = 9
        0085: 14@ = 4@
        0085: 15@ = 5@
        0B20: samp 7@ = actor_handle_by_samp_player_id 14@ 
        0B36: samp 8@ = get_player_nickname 14@
        0ABC: set_audiostream 0@ volume 0.1
        0AAD: set_mp3 0@ perform_action 1
          
        //0B78: log "{F44336}[MyTestScript] > Audio Action Changed."     
        //0AF8: samp add_message_to_chat "GIVE %d %.2f" color 0x00ff00 4@ 5@ //%.1f             
        else
    end
    
    if 3@ == 1
        then
        26@ = 10
        0085: 16@ = 4@
        0085: 17@ = 5@
        //0B20: samp 7@ = actor_handle_by_samp_player_id 14@ 
        0B36: samp 18@ = get_player_nickname 16@
        //0AAD: set_mp3 0@ perform_action 1   
        //0B78: log "{F44336}[MyTestScript] > Audio Action Changed."     
        //0AF8: samp add_message_to_chat "TAKE %d %.2f" color 0xff0000 4@ 5@ //%.1f             
        else
    end
        
        
    
    0BE0: raknet hook_ret true
    ELSE 0BE0: raknet hook_ret TRUE 
END
 
Status
Not open for further replies.
Top