hex
01 02 03 04 05 06 07 08 09 10 11 12 13 14 15
end

/*
 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
*/
0AF8: samp add_message_to_chat "DMG Informer {ff0000}v 0.1.1 {ffffff}(0.3.7 RC2) by {ff0000}p1cador" color 0xffffff



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

9@ = 0
3@ = -1
25@ = 0
26@ = 0
14@ = 0
15@ = 0
16@ = 0
17@ = 0
//0952: load_soundtrack 1149
//qoloqol3.mp3
while true
wait 0
if 0AAC: 0@ = load_audiostream "CLEO\p1cador.mp3"
then
//0AC1: 9@ = load_audiostream_with_3d_support "CLEO\qoloqol3.mp3"
0B78: log "{F44336}[p1cador] > Audio Loaded!"
0ABC: set_audiostream 0@ volume 1.0
 break
 else
 end
 end

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} ВЫЕБАН" 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@
        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