hex
01 02 03 04 05 06 07 08 09 10 11 12 13 14 15
end
{$CLEO}
{$INCLUDE SF}
0000:
while not SAMP.Available()
wait 100
end
0B34: samp register_client_command "q3" to_label @p1_reload
//10@ = 339.0
//11@ = 174.0
32@ = 1201
33@ = 1201
28@ = 1
27@ = 1
26@ = 1
25@ = 1
8@ = 0
//alloc 2@ 64
alloc 29@ 64
//0C11: memset destination 2@ value 0 size 64
0C11: memset destination 29@ value 0 size 64
0B6D: render 31@ = create_font "Arial Black" height 13 flags 12 //DAMAGE
0B6D: render 30@ = create_font "Arial Black" height 9 flags 13 //Nickname
0B34: samp register_client_command "dmghelp" to_label @p1_dmghelp
0B34: samp register_client_command "dmgi" to_label @p1_dmg_global //28@ == 1
0B34: samp register_client_command "dmgnames" to_label @p1_dmgnames //27@ == 1
0B34: samp register_client_command "dmginc" to_label @p1_dmginc //26@ == 1
0B34: samp register_client_command "dmgoutc" to_label @p1_dmgoutc //25@ == 1
0B34: samp register_client_command "dmglol" to_label @p1_dmglol //8@ == 0
0AF8: samp add_message_to_chat "p1cador: {ff0000}DMG Informer 2.0{ffffff}. Иструкция {00BFFF}/dmghelp" color 0xffffff
while true
wait 0
if 0AAC: 0@ = load_audiostream "CLEO\p1_bell.mp3"
then
0B78: log "{ff0000}[p1cador] {fff000}> Audio Loaded!"
break
else
0AF8: samp add_message_to_chat "p1cador: {ff0000}DMG Informer 2.0{ffffff}. Аудиофайл {00bfff}p1_bell.mp3 {ff0000}не загружен" color 0xffffff
break
end
end
/*while true
wait 100
if 0B61: samp is_local_player_spawned
then
0B2B: samp 24@ = get_player_id_by_actor_handle $PLAYER_ACTOR
break
end
end */
0BE1: raknet setup_outcoming_rpc_hook @outRPC
while true
wait 0
while 28@ == 0
wait 100
end
if and
0029: 14@ >= 1
25@ == 1
then
if 32@ <= 1200 //0->1200
then
0B60: convert_game_screen_coords 415.0 16@ to_window_screen_coords 18@ 20@
0AB1: call_scm_func @OUTC_DMG_RENDER 12 text0 29@ font1 31@ posX_2 18@ posY_3 20@ color4 0x5fc100 alpha5 14@ id6 10@ dmg7 6@ popad8 22@ last_id9 24@ rand10 3@ killmsg11 8@ | last_pop0 22@ last_id1 24@
0B60: convert_game_screen_coords 415.0 182.0 to_window_screen_coords 18@ 20@
if 27@ == 1
then
0AB1: call_scm_func @OUTC_NICKNAME_RENDER 7 text0 29@ font1 30@ posX_2 18@ posY_3 20@ color4 12@ alpha5 255 id6 10@
end
14@ -= 2
16@ -= 0.3
32@ += 1
else
free 10@
free 6@
free 14@
free 16@
end
end
if and
0029: 15@ >= 1
26@ == 1
then
if 33@ <= 1200
then
0B60: convert_game_screen_coords 240.0 17@ to_window_screen_coords 19@ 21@
0AB1: call_scm_func @INC_DMG_RENDER 8 text0 29@ font1 31@ posX_2 19@ posY_3 21@ color4 0xbb0000 /*13@*/ alpha5 15@ id6 11@ dmg7 7@
0B60: convert_game_screen_coords 240.0 182.0 to_window_screen_coords 19@ 21@
if 27@ == 1
then
0AB1: call_scm_func @INC_NICKNAMES_RENDER 8 text0 29@ font1 30@ posX_2 19@ posY_3 21@ color4 13@ alpha5 255 id6 11@ last_id7 23@ | last_id 23@
end
15@ -= 2
17@ -= 0.2
33@ += 1
end
end
end
:OUTC_DMG_RENDER
0B66: render argb 4@ to_a 15@ r 16@ g 17@ b 18@
0B20: samp 15@ = actor_handle_by_samp_player_id 6@
if or
001d: 9@ > 6@ //если ид предыдущей цели
001d: 6@ > 9@ //не равен иду теущей цели
then 8@ = 1 //обнулить счетчик попаданий
end
//0AF8: samp add_message_to_chat "%d" color 0x00ff00 10@
if and
Actor.Dead(15@)
11@ == 1
then
// 0AD3: 0@ format "{ff0000}ВЫЕБАН"
if 10@ == 1
then
0AD3: 0@ format "{b60000}ОПУЩЕН" //purpure
else
if 10@ == 2
then
0AD3: 0@ format "{b60000}ВЫЕБАН" //red
else
if 10@ == 3
then
0AD3: 0@ format "{b60000}ОБОССАН" //yellow
else
if 10@ == 4
then
0AD3: 0@ format "{b60000}УНИЖЕН" //green
else
if 10@ == 5
then
0AD3: 0@ format "{b60000}ОБОСРАН" //blue
else
0AD3: 0@ format "{b60000}ВЫЕБАН" //red
end
end
end
end
end
else
if Samp.IsPlayerPaused(6@)
then
16@ = 255
17@ = 255
18@ = 255
0AD3: 0@ format "afk"
else
0AD3: 0@ format "%.1f {bb0000}(x%d)" 7@ 8@
end
end
0B67: render a 5@ r 16@ g 17@ b 18@ to_argb 19@
0B6B: render 20@ = font 1@ draw_text 0@ length
0062: 2@ -= 20@
0B6F: render font 1@ draw_text 0@ pos 2@ 3@ color 19@
0AB2: ret 2 8@ 6@
:OUTC_NICKNAME_RENDER
0B36: samp 15@ = get_player_nickname 6@
0AD3: 0@ format "%s[%d]" 15@ 6@
0B6B: render 20@ = font 1@ draw_text 0@ length
20@ /= 2
0062: 2@ -= 20@
0B6F: render font 1@ draw_text 0@ pos 2@ 3@ color 4@
0AB2: ret 0
:INC_DMG_RENDER
0B66: render argb 4@ to_a 15@ r 16@ g 17@ b 18@
0B67: render a 5@ r 16@ g 17@ b 18@ to_argb 19@
0AD3: 0@ format "-%.2f" 7@
0B6F: render font 1@ draw_text 0@ pos 2@ 3@ color 19@
0AB2: ret 0
:INC_NICKNAMES_RENDER
if Actor.Dead($PLAYER_ACTOR)
then 0085: 6@ = 7@
else
end
0B36: samp 15@ = get_player_nickname 6@
0AD3: 0@ format "%s[%d]" 15@ 6@
0B6B: render 20@ = font 1@ draw_text 0@ length
20@ /= 2
0062: 2@ -= 20@
0B6F: render font 1@ draw_text 0@ pos 2@ 3@ color 4@
0AB2: ret 1 id 6@
:outRPC
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
IF 0039: 1@ == RPC_GIVETAKEDAMAGE
THEN
0BE5: raknet 2@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 3@ = bit_stream_read 2@ type BS_TYPE_BOOL //give/take
0BE7: raknet 4@ = bit_stream_read 2@ type BS_TYPE_SHORT //Player
0BE7: raknet 5@ = bit_stream_read 2@ type BS_TYPE_INT //ammount(FLOAT)
//0BE7: raknet 6@ = bit_stream_read 2@ type BS_TYPE_INT //GUN
//0BE7: raknet 7@ = bit_stream_read 1@ type BS_TYPE_INT //BodyPart
if 3@ == 0
then
0AAD: set_mp3 0@ perform_action 1
32@ = 0
0085: 10@ = 4@ //id
0087: 6@ = 5@ //dmg
0B37: samp 12@ = get_player_color 10@
14@ = 255 //alpha
16@ = 174.0 //Y
22@ += 1 //попадания += 1
if 8@ == 1
then
0209: 3@ = random_int_in_ranges 1 6
end
//===================================
else
//===================================
if 3@ == 1
then
33@ = 0
0085: 11@ = 4@ //id
0087: 7@ = 5@ //dmg
0B37: samp 13@ = get_player_color 11@
15@ = 255 //alpha
17@ = 174.0 //Y
end
end
0BE0: raknet hook_ret true
ELSE 0BE0: raknet hook_ret TRUE
END
:p1_dmghelp
0AF8: samp add_message_to_chat " " color 0xffffff
0AF8: samp add_message_to_chat "============== {ff0000}DMG Informer 2.0{ffffff} ============" color 0xffffff
0AF8: samp add_message_to_chat "Перед тем, как пиздеть, что колокольчик не звинит" color 0xffffff
0AF8: samp add_message_to_chat "Включи звук радио и перезайди в игру." color 0xffffff
0AF8: samp add_message_to_chat ".mp3 файл должен лежать в папке клео и иметь название p1_bell.mp3" color 0xffffff
0AF8: samp add_message_to_chat " " color 0xffffff
if 28@ == 1
then
9@v = "{00ff00}вкл"
else
9@v = "{ff0000}выкл"
end
0AF8: samp add_message_to_chat "{ff0000}/dmgi {ffffff}- вкл/выкл {00BFFF}весь скрипт{ffffff} (сейчас: %s{ffffff})" color 0xffffff 9@v
if 26@ == 1
then
9@v = "{00ff00}вкл"
else
9@v = "{ff0000}выкл"
end
0AF8: samp add_message_to_chat "{ff0000}/dmginc {ffffff}- вкл/выкл отображение {00BFFF}получаемого {ffffff}урона (сейчас: %s{ffffff})" color 0xffffff 9@v
if 25@ == 1
then
9@v = "{00ff00}вкл"
else
9@v = "{ff0000}выкл"
end
0AF8: samp add_message_to_chat "{ff0000}/dmgoutc {ffffff}- вкл/выкл отображение {00BFFF}нанесенного {ffffff}урона (сейчас: %s{ffffff})" color 0xffffff 9@v
if 27@ == 1
then
9@v = "{00ff00}вкл"
else
9@v = "{ff0000}выкл"
end
0AF8: samp add_message_to_chat "{ff0000}/dmgnames {ffffff}- вкл/выкл отображение {00BFFF}ников{ffffff} (сейчас: %s{ffffff})" color 0xffffff 9@v
if 8@ == 1
then
9@v = "{00ff00}вкл"
else
9@v = "{ff0000}выкл"
end
0AF8: samp add_message_to_chat "{ff0000}/dmglol {ffffff}- вкл/выкл {00BFFF}сообщения при убийстве{ffffff} (сейчас: %s{ffffff})" color 0xffffff 9@v
0AF8: samp add_message_to_chat "============== by {ff0000}p1cador {ffffff}================" color 0xffffff
0b43: samp cmd_ret
:p1_dmg_global
0AB1: call_scm_func @p1_trigger 1 28@ 28@
if 28@ == 1
then 0AF8: samp add_message_to_chat "p1cador: {00FF00}DMG Informer включен" color 0xffffff
end
if 28@ == 0
then 0AF8: samp add_message_to_chat "p1cador: {FF0000}DMG Informer выключен" color 0xffffff
end
0b43: samp cmd_ret
:p1_dmgnames
0AB1: call_scm_func @p1_trigger 1 27@ 27@
if 27@ == 1
then 0AF8: samp add_message_to_chat "p1cador: отображение ников {00ff00}включено" color 0xffffff
end
if 27@ == 0
then 0AF8: samp add_message_to_chat "p1cador: отображение ников {ff0000}отключено" color 0xffffff
end
0b43: samp cmd_ret
:p1_dmginc
0AB1: call_scm_func @p1_trigger 1 26@ 26@
if 26@ == 1
then 0AF8: samp add_message_to_chat "p1cador: отображение получаемого урона {00ff00}включено" color 0xffffff
end
if 26@ == 0
then 0AF8: samp add_message_to_chat "p1cador: отображение получаемого урона {ff0000}отключено" color 0xffffff
end
0b43: samp cmd_ret
:p1_dmgoutc
0AB1: call_scm_func @p1_trigger 1 25@ 25@
if 25@ == 1
then 0AF8: samp add_message_to_chat "p1cador: отображение нанесенного урона {00ff00}включено" color 0xffffff
end
if 25@ == 0
then 0AF8: samp add_message_to_chat "p1cador: отображение нанесенного урона {ff0000}отключено" color 0xffffff
end
0b43: samp cmd_ret
:p1_dmglol
0AB1: call_scm_func @p1_trigger 1 8@ 8@
if 8@ == 1
then 0AF8: samp add_message_to_chat "p1cador: сообщения при убийстве {00FF00}включены" color 0xffffff
end
if 8@ == 0
then 0AF8: samp add_message_to_chat "p1cador: сообщения при убийстве {FF0000}выключены" color 0xffffff
end
0b43: samp cmd_ret
:p1_trigger
if 0@ == 1
then
0@ = 0
else
if 0@ == 0
then
0@ = 1
else
end
end
0AB2: ret 1 0@
:p1_reload
free 29@
//free 2@
0B6E: render release_font 31@
0B6E: render release_font 30@
0A92: create_custom_thread "q3.CS"
0A93: end_custom_thread
0b43: samp cmd_ret