Декомпиляция скриптов

FYP

Известный
Автор темы
Администратор
1,770
6,008
GVWUrNJ.png
eNo5cSj.png


Общая тема для просьб о помощи в декомпиляциии и декриптованиии скриптов, плагинов и приложений.
Запрещено просить о декомпиляции/декриптовании софта, выставленного на продажу на нашем сайте.

Рекомендации:
  1. Сначала воспользуйтесь поиском по теме и по форуму, возможно его в декомпилированном виде или с исходным кодом уже выкладывали у нас на сайте.
  2. Попытайтесь декомпилировать самостоятельно: CLEO - декриптор, декомпилятор; AHK - распаковщик .exe; LuaJIT - декомпилятор1, декомпилятор2.
  3. Просить о декомпиляции .asi, .sf, .dll, .exe почти бесполезно, часто такие просьбы остаются без ответа и вряд ли вам это что-то даст. Можете попробовать сами, IDA Pro или Ghidra к вашим услугам.
    • Это не касается .exe, которые являются скомпилированными AutoHotKey-скриптами (.ahk).
  4. Добавьте название скрипта к сообщению, если оно известно - это поможет другим пользователям найти его с помощью поиска.
  5. Сообщения по типу "спасибо, помог" по правилам форума считаются флудом и скорее всего будут удалены. Если вам помогли, вы можете нажать кнопку Мне нравится под ответом - это даст понять, что ответ верный.
 
Последнее редактирование:

™ ChipFamily

По ту сторону надежды.
5,143
1,992
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
декомпильните пжлст
Lua:
function randomFunction    main ()
    var_0_0 = isSampfuncsLoaded()
    if var_0_0 then
        --jump to 0009 (if previous if statement is false) --0009 JMP-JMP
        var_0_0 = isSampLoaded()
        if not var_0_0 then
        end -- maybe?
    else
        --location 0009--0009 LOCATION-LOCATION_
        return
    end
    var_0_0 = isSampAvailable()
    if not var_0_0 then
        --jump to 0019 (if previous if statement is false) --0019 JMP-JMP
        repeat
        var_0_1 = 100 --var_0_1 NUMBER-NUMBER
        wait(var_0_1)
    else
        --location 0019--0019 LOCATION-LOCATION_
        until false or (previous if statement is true) --location 0019
        var_0_1 = "{808080}Perfect-soft.net | Fast Report {" --strings longer than 40 characters get cut off, so check to see if there's more!
        var_0_2 = 16777215 --var_0_2 NUMBER-NUMBER
        sampAddChatMessage(var_0_1, var_0_2)
        sampRegisterChatCommand("aim", aim)
        sampRegisterChatCommand("god", gm)
        sampRegisterChatCommand("damag", dmg)
        sampRegisterChatCommand("sh", sh)
        sampRegisterChatCommand("cheat", cheat)
        sampRegisterChatCommand("pvh", pvh)
        repeat
        var_0_1 = 0 --var_0_1 NUMBER-NUMBER
        wait(var_0_1)
        --jump to 0047 (if previous if statement is false) --0047 JMP-JMP
        until false or (previous if statement is true) --location 0052
        return
    end
   
   

function randomFunction    aim (INPUT_VAR_0_)
    if INPUT_VAR_0_ ~= nil then
        --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
        var_1_2 = INPUT_VAR_0_
        var_1_1 = tonumber(var_1_2)
        var_1_5 = var_1_1
        sampSendChat( string.format("/report %s Аим!", var_1_5) )
    end
    return
end


function randomFunction(INPUT_VAR_0_)
    if INPUT_VAR_0_ ~= nil then
        --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
        var_2_2 = INPUT_VAR_0_
        var_2_1 = tonumber(var_2_2)
        var_2_5 = var_2_1
        sampSendChat( string.format("/report %s GM!", var_2_5) )
    end
    return
end


function randomFunction    dmg (INPUT_VAR_0_)
    if INPUT_VAR_0_ ~= nil then
        --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
        var_3_2 = INPUT_VAR_0_
        var_3_1 = tonumber(var_3_2)
        var_3_5 = var_3_1
        sampSendChat( string.format("/report %s Damager!", var_3_5) )
    end
    return
end


function randomFunction    sh (INPUT_VAR_0_)
    if INPUT_VAR_0_ ~= nil then
        --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
        var_4_2 = INPUT_VAR_0_
        var_4_1 = tonumber(var_4_2)
        var_4_5 = var_4_1
        sampSendChat( string.format("/report %s Speed hack!", var_4_5) )
    end
    return
end


function randomFunction    cheat (INPUT_VAR_0_)
    if INPUT_VAR_0_ ~= nil then
        --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
        var_5_2 = INPUT_VAR_0_
        var_5_1 = tonumber(var_5_2)
        var_5_5 = var_5_1
        sampSendChat( string.format("/report %s Cheat!", var_5_5) )
    end
    return
end


function randomFunction    pvh (INPUT_VAR_0_)
    if INPUT_VAR_0_ ~= nil then
        --jump to 0013 (if previous if statement is false) --0013 JMP-JMP
        var_6_2 = INPUT_VAR_0_
        var_6_1 = tonumber(var_6_2)
        var_6_5 = var_6_1
        sampSendChat( string.format("/report %s Подкидывает машины читом!", var_6_5) )
    end
    return
end


function someFunc7()
    script_name("Fast Report")
    script_author("BUTCHERS")
    script_version("v1.0")
    require("lib.moonloader")
    var_7_0 = 271 --var_7_0 NUMBER-NUMBER
    local randomFunction0 = function() end -- starts at  test.lua:0
    main = randomFunction0
    local randomFunction1 = function() end -- starts at  test.lua:0
    aim = randomFunction1
    local randomFunction2 = function() end -- starts at  test.lua:0
    until false or (previous if statement is true) --location 0019
    gm = randomFunction2
    local randomFunction3 = function() end -- starts at  test.lua:0
    dmg = randomFunction3
    local randomFunction4 = function() end -- starts at  test.lua:0
    sh = randomFunction4
    local randomFunction5 = function() end -- starts at  test.lua:0
    cheat = randomFunction5
    local randomFunction6 = function() end -- starts at  test.lua:0
    pvh = randomFunction6
    return
end

CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:Label00011F
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @Label00011F
0BE1: raknet setup_outcoming_rpc_hook @Label00048D
0BE3: raknet setup_incoming_rpc_hook @Label00048D
0006: 8@ = 0
0B34: samp register_client_command "cslp" to_label @Label00021B

:Label00014E
0001: wait 0 ms
00D6: if
0039:   8@ == 1
004D: jump_if_false @Label000214
0001: wait 100 ms
03C0: 9@ = actor $PLAYER_ACTOR car
0B2C: samp 10@ = get_vehicle_id_by_car_handle 9@
0050: gosub @Label000495
0AB1: call_scm_func @Label00051A 4 3@ 4@ 5@ 3.5 
0AB1: call_scm_func @Label00051A 4 3@ 4@ 5@ 3.5 
0001: wait 350 ms
0BE1: raknet setup_outcoming_rpc_hook @Label00048D
0BE3: raknet setup_incoming_rpc_hook @Label00048D
0006: 8@ = 0
0AF8: samp add_message_to_chat "[SlapCar {CC0000}by AIR {CDFF00}for HitOk{33FF33}]: {FFFFFF}Send!" color 3407667 

:Label000214
0002: jump @Label00014E

:Label00021B
00D6: if
0039:   8@ == 0
004D: jump_if_false @Label000437
0B35: samp 2@ = get_last_command_params
00D6: if
0AD4: 2@ = scan_string 2@ format "%d" 1@ 
004D: jump_if_false @Label0003D4
00D6: if
0B23:  samp is_player_connected 1@
004D: jump_if_false @Label00036F
0B20: samp 0@ = actor_handle_by_samp_player_id 1@
00D6: if and
056D:   actor 0@ defined
056D:   actor $PLAYER_ACTOR defined
004D: jump_if_false @Label00030C
00D6: if
00DF:   actor $PLAYER_ACTOR driving
004D: jump_if_false @Label0002AD
0BE1: raknet setup_outcoming_rpc_hook @Label000491
0BE3: raknet setup_incoming_rpc_hook @Label000491
0050: gosub @Label000495
0006: 8@ = 1
0002: jump @Label000305

:Label0002AD
0AF8: samp add_message_to_chat "[SlapCar {CC0000}by AIR {CDFF00}for HitOk{33FF33}]: {FFFFFF}You is not driver!" color 3407667 

:Label000305
0002: jump @Label000368

:Label00030C
0AF8: samp add_message_to_chat "[SlapCar {CC0000}by AIR {CDFF00}for HitOk{33FF33}]: {FFFFFF}Player is not defined!" color 3407667 

:Label000368
0002: jump @Label0003CD

:Label00036F
0AF8: samp add_message_to_chat "[SlapCar {CC0000}by AIR {CDFF00}for HitOk{33FF33}]: {FFFFFF}Player is not connected!" color 3407667 

:Label0003CD
0002: jump @Label000430

:Label0003D4
0AF8: samp add_message_to_chat "[SlapCar {CC0000}by AIR {CDFF00}for HitOk{33FF33}]: {FFFFFF}Use: /cslp [PlayerID]!" color 3407667 

:Label000430
0002: jump @Label00048B

:Label000437
0AF8: samp add_message_to_chat "[SlapCar {CC0000}by AIR {CDFF00}for HitOk{33FF33}]: {FFFFFF}Please wait..." color 3407667 

:Label00048B
0B43: samp cmd_ret

:Label00048D
0BE0: raknet hook_ret 1

:Label000491
0BE0: raknet hook_ret 0

:Label000495
00D6: if
00DF:   actor 0@ driving
004D: jump_if_false @Label000502
03C0: 7@ = actor 0@ car
046C: 6@ = car 7@ driver
00D6: if
003B:   0@ == 6@ // (int)
004D: jump_if_false @Label0004E5
0AB1: call_scm_func @Label0005C0 1 1@ 3@ 4@ 5@ 
0002: jump @Label0004FB

:Label0004E5
0AB1: call_scm_func @Label000610 1 1@ 3@ 4@ 5@ 

:Label0004FB
0002: jump @Label000518

:Label000502
0AB1: call_scm_func @Label000570 1 1@ 3@ 4@ 5@ 

:Label000518
0051: return

:Label00051A
0B2B: samp 26@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 25@ = allocate_memory_size 67
0BBB: samp store_player 26@ incar_data 25@
0C0D: struct 25@ offset 24 size 4 = 0@
0C0D: struct 25@ offset 28 size 4 = 1@
0C0D: struct 25@ offset 32 size 4 = 2@
0C0D: struct 25@ offset 44 size 4 = 3@
0BC1: samp send_incar_data 25@
0AC9: free_allocated_memory 25@
0AB2: ret 0

:Label000570
0AC8: 25@ = allocate_memory_size 68
0BBA: samp store_player 0@ onfoot_data 25@
0C0C: 20@ = struct 25@ offset 6 size 4
0C0C: 21@ = struct 25@ offset 10 size 4
0C0C: 22@ = struct 25@ offset 14 size 4
0AC9: free_allocated_memory 25@
000B: 22@ += 0.3
0AB2: ret 3 20@ 21@ 22@

:Label0005C0
0AC8: 25@ = allocate_memory_size 67
0BBB: samp store_player 0@ incar_data 25@
0C0C: 20@ = struct 25@ offset 24 size 4
0C0C: 21@ = struct 25@ offset 28 size 4
0C0C: 22@ = struct 25@ offset 32 size 4
0AC9: free_allocated_memory 25@
000F: 22@ -= 0.3
0AB2: ret 3 20@ 21@ 22@

:Label000610
0AC8: 25@ = allocate_memory_size 24
0BBC: samp store_player 0@ passenger_data 25@
0C0C: 20@ = struct 25@ offset 12 size 4
0C0C: 21@ = struct 25@ offset 16 size 4
0C0C: 22@ = struct 25@ offset 20 size 4
0AC9: free_allocated_memory 25@
000F: 22@ -= 0.3
0AB2: ret 3 20@ 21@ 22@
 
Последнее редактирование модератором:

™ ChipFamily

По ту сторону надежды.
5,143
1,992
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
decript pls я просто еблан
CLEO:
// 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

:Label000002
0001: wait 0 ms
00D6: if
0AFA:  is_samp_available
004D: jump_if_false @Label000002
0AF8: samp add_message_to_chat "{ff0000}[Hack]: {ffffff}Óñïåøíî çàãðóæåí. Àâòîð: {ff0000}Dartua" color 16777215 
0AF8: samp add_message_to_chat "{ff0000}[Hack]: {ffffff}Cïåöèàëüíî äëÿ êàíàëà: {ff0000}Arzik" color 16777215 
0B34: samp register_client_command "hp" to_label @Label0000BD
0B34: samp register_client_command "arm" to_label @Label000147
0BDE: pause_thread 0

:Label0000BD
0001: wait 0 ms
0ACF: show_formatted_styled_text "Health" time 3000 style 2 16711935 
0B2E: 3@ = read_samp_memory offset 88992 size 2
0B2D: write_samp_memory offset 88992 value 50064 size 2
018C: play_sound 1139 at 0.0 0.0 0.0
0223: set_actor $PLAYER_ACTOR health_to 100
0AF8: samp add_message_to_chat "{ff0000}[Hack]: {ffffff}Çäîðîâüå ïîïîëíåíî." color 16777215 
0002: jump @Label0001CE

:Label000147
0001: wait 0 ms
0ACF: show_formatted_styled_text "Armour" time 3000 style 2 16711935 
0B2E: 1@ = read_samp_memory offset 94624 size 2
0B2D: write_samp_memory offset 94624 value 50064 size 2
018C: play_sound 1139 at 0.0 0.0 0.0
035F: actor $PLAYER_ACTOR armour += 100
0AF8: samp add_message_to_chat "{ff0000}[Hack]: {ffffff}Áðîíÿ ïîïîëíåíà." color 16777215 
0002: jump @Label0001CE

:Label0001CE
0B43: samp cmd_ret
 
  • Нравится
Реакции: thx killa

™ ChipFamily

По ту сторону надежды.
5,143
1,992
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
CLEO:
// 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
0662: printstring "deddosouru"

:Label000010
0001: wait 0 ms
0256:   player $PLAYER_ACTOR defined
004D: jump_if_false @Label000010
0A8D: 13@ = read_memory 7603296 size 1 virtual_protect 1

:Label00002E
0001: wait 0 ms
00D6: if
0ADC:   test_cheat "JESUSHELPMEKILLEM"
004D: jump_if_false @Label000059
0050: gosub @Label0000F4

:Label000059
00D6: if and
0039:   0@ == 1
02D8:   actor $PLAYER_ACTOR current_weapon == 24
004D: jump_if_false @Label0000B3
0A8D: 12@ = read_memory 7603296 size 1 virtual_protect 1
00D6: if
003B:   12@ == 13@ // (int)
004D: jump_if_false @Label0000A8
0A8C: write_memory 7603296 size 1 value 144 virtual_protect 1
0002: jump @Label0000AC

:Label0000A8
0001: wait 0 ms

:Label0000AC
0002: jump @Label0000ED

:Label0000B3
0A8D: 12@ = read_memory 7603296 size 1 virtual_protect 1
00D6: if
001D:   13@ > 12@ // (int)
004D: jump_if_false @Label0000E9
0A8C: write_memory 7603296 size 1 value 13@ virtual_protect 1
0002: jump @Label0000ED

:Label0000E9
0001: wait 0 ms

:Label0000ED
0002: jump @Label00002E

:Label0000F4
0B12: 0@ = 0@ XOR 1
00D6: if
0039:   0@ == 1
004D: jump_if_false @Label00013B
0ACB: show_styled_text "~w~JESUS ~g~IS WATCHING YOU" time 2000 style 2
0002: jump @Label000163

:Label00013B
0ACB: show_styled_text "~w~JESUS ~r~IS NOT WATCHING YOU" time 2000 style 2

:Label000163
0051: return
 
  • Нравится
Реакции: shinoa
D

deleted-user-224036

Гость
plz
 

Вложения

  • Anti Drive-By.cs
    463 байт · Просмотры: 5

™ ChipFamily

По ту сторону надежды.
5,143
1,992
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0662: printstring "Anti Drive-By | made by andre500"

:Label000024
0001: wait 0 ms
0256:   player $PLAYER_CHAR defined
004D: jump_if_false @Label000024
00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
0A8D: 29@ = read_memory 12010640 size 4 virtual_protect 0
000A: 29@ += 4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
0006: 30@ = 0

:Label00006A
0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
000A: 29@ += 1
00D6: if and
0029:   31@ >= 0
001B:   128 > 31@
004D: jump_if_false @Label0000E9
005A: 31@ += 30@ // (int)
00D6: if and
056D:   actor 31@ defined
803C:   not  $PLAYER_ACTOR == 31@ // (int)
004D: jump_if_false @Label0000E9
00DF:   actor 31@ driving
004D: jump_if_false @Label0000E9
02AB: set_actor $PLAYER_ACTOR immunities BP 0 FP 0 EP 0 CP 1 MP 0
0A8C: write_memory 4928287 size 6 value -1869574000 virtual_protect 1
0002: jump @Label000024

:Label0000E9
000A: 30@ += 256
0019:   30@ > 35584
004D: jump_if_false @Label00006A
02AB: set_actor $PLAYER_ACTOR immunities BP 0 FP 0 EP 0 CP 0 MP 0
0006: 0@ = 137
0A8C: write_memory 4928287 size 1 value 0@ virtual_protect 1
0006: 0@ = 150
0A8C: write_memory 4928288 size 1 value 0@ virtual_protect 1
0006: 0@ = 64
0A8C: write_memory 4928289 size 1 value 0@ virtual_protect 1
0006: 0@ = 5
0A8C: write_memory 4928290 size 1 value 0@ virtual_protect 1
0006: 0@ = 0
0A8C: write_memory 4928291 size 1 value 0@ virtual_protect 1
0006: 0@ = 0
0A8C: write_memory 4928292 size 1 value 0@ virtual_protect 1
0002: jump @Label000024
 
  • Нравится
Реакции: deleted-user-224036

™ ChipFamily

По ту сторону надежды.
5,143
1,992
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.

Вложения

  • sBot.txt
    21.5 KB · Просмотры: 6
Последнее редактирование:

SoniQ

Новичок
13
2
Хелпаните эти два клео открыть
 

Вложения

  • DMG INFORMER 2.cs
    33 KB · Просмотры: 11
  • bizid.cs
    1.3 KB · Просмотры: 13

NoNameCoder

Известный
40
12
DMG Informer
----------------------------------
Код:
{$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
Хелпаните эти два клео открыть
 

™ ChipFamily

По ту сторону надежды.
5,143
1,992
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Хелпаните эти два клео открыть
bizid.cs - код открыт.
CLEO:
// 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
0AB0:   key_pressed 49

:Label000006
0001: wait 400 ms
0AFA:  is_samp_available
004D: jump_if_false @Label000006
0B34: samp register_client_command "bizid" to_label @Label00002D

:Label000022
0001: wait 0 ms
0002: jump @Label000022

:Label00002D
0B35: samp 0@ = get_last_command_params
0C1A: 1@ = atoi 0@
00D6: if and
0029:   1@ >= 0
8019:   not  1@ > 1000
004D: jump_if_false @Label000084
0AC6: 0@ = label @Label000086 offset
0AC6: 1@ = label @Label0000AA offset
0B3B: samp show_dialog id 45 caption 0@ text 1@ button_1 "Çàêðûòü" button_2 "" style 0
0AC9: free_allocated_memory 0@

:Label000084
0B43: samp cmd_ret

:Label000086
hex
43 61 70 49 6E 66 6F 20 7C 20 7B 45 41 45 41 45
41 7D C0 E2 F2 EE F0 3A 20 4E 69 6B 6F 5F 42 65
6C 69 63 00
end

:Label0000AA
hex
42 69 7A 20 49 44 20 3A 20 30 20 2D 20 D6 E5 ED
F2 F0 20 C0 EC EC EE 20 4C 53 0A 42 69 7A 20 49
44 20 3A 20 31 20 2D 20 D6 E5 ED F2 F0 20 C0 EC
EC EE 20 53 46 0A 42 69 7A 20 49 44 20 3A 20 32
20 2D 20 D0 E5 F1 F2 EE F0 E0 ED 20 D0 CC 0A 42
69 7A 20 49 44 20 3A 20 33 20 2D 20 C1 E0 F0 20
C1 E0 E9 EA E5 F0 EE E2 0A 42 69 7A 20 49 44 20
3A 20 34 20 2D 20 C1 E0 F0 20 33 20 E1 E8 E7 E0
0A 42 69 7A 20 49 44 20 3A 20 35 20 2D 20 CA EB
F3 E1 20 4A 69 7A 7A 79 0A 42 69 7A 20 49 44 20
3A 20 36 20 2D 20 CF E8 E3 20 CF E5 ED 0A 42 69
7A 20 49 44 20 3A 20 37 20 2D 20 C1 E0 F0 20 53
46 52 0A 42 69 7A 20 49 44 20 3A 20 38 20 2D 20
C1 E0 F0 20 47 72 6F 6F 76 65 0A 42 69 7A 20 49
44 20 3A 20 39 20 2D 20 C0 EB FC F5 E0 EC E1 F0
E0 0A 42 69 7A 20 49 44 20 3A 20 31 30 20 2D 20
D1 F2 F0 E8 EF 20 28 33 20 E1 E8 E7 E0 29 0A 42
69 7A 20 49 44 20 3A 20 31 31 20 2D 20 C1 E0 F0
20 59 61 6B 75 7A 61 0A 42 69 7A 20 49 44 20 3A
20 31 32 20 2D 20 D0 E5 F1 F2 EE F0 E0 ED 20 4C
53 50 44 0A 42 69 7A 20 49 44 20 3A 20 31 33 20
2D 20 C1 F3 F0 B8 ED EA E0 0A 42 69 7A 20 49 44
20 3A 20 31 34 20 2D 20 C0 EC EC EE 20 47 72 6F
76 65 0A 42 69 7A 20 49 44 20 3A 20 31 35 20 2D
20 C0 EC EC EE 20 33 20 E4 F0 E0 EA EE ED E0 0A
42 69 7A 20 49 44 20 3A 20 31 36 20 2D 20 C0 EC
EC EE 20 EA E0 F0 FC E5 F0 E0 0A 42 69 7A 20 49
44 20 3A 20 31 37 20 2D 20 C0 EC EC EE 20 E4 E5
F0 E5 E2 ED FF 20 D0 CC 0A 42 69 7A 20 49 44 20
3A 20 31 38 20 2D 20 C0 EC EC EE 20 F1 F2 F0 E8
F2 EE E2 0A 42 69 7A 20 49 44 20 3A 20 31 39 20
2D 20 C0 EC EC EE 20 33 20 E1 E8 E7 E0 0A 42 69
7A 20 49 44 20 3A 20 32 30 20 2D 20 C0 EC EC EE
20 CA D5 31 0A 42 69 7A 20 49 44 20 3A 20 32 31
20 2D 20 C0 EC EC EE 20 C4 C1 31 0A 42 69 7A 20
49 44 20 3A 20 32 32 20 2D 20 C1 E0 F1 EA E5 F2
2E EF EB EE F9 E0 E4 EA E0 0A 42 69 7A 20 49 44
20 3A 20 32 33 20 2D 20 C0 EC EC EE 20 F1 F2 2E
CC FD F0 E8 E8 0A 42 69 7A 20 49 44 20 3A 20 32
34 20 2D 20 C1 E8 ED EA EE 20 4C 56 0A 42 69 7A
20 49 44 20 3A 20 32 35 20 2D 20 C1 E8 ED EA EE
20 53 46 0A 42 69 7A 20 49 44 20 3A 20 32 36 20
2D 20 C1 E8 ED EA EE 20 4C 53 0A 42 69 7A 20 49
44 20 3A 20 32 37 20 2D 20 C0 EC EC EE 20 E7 E0
EA F3 EF EA E0 0A 42 69 7A 20 49 44 20 3A 20 32
38 20 2D 20 C0 EC EC EE 20 D0 CC 0A 42 69 7A 20
49 44 20 3A 20 32 39 20 2D 20 C0 EC EC EE 20 ED
EE E2 2E CC FD F0 E8 E8 0A 42 69 7A 20 49 44 20
3A 20 33 30 20 2D 20 C0 EC EC EE 20 45 6C 20 43
6F 72 6F 6E 6F 73 0A 42 69 7A 20 49 44 20 3A 20
33 31 20 2D 20 C0 EC EC EE 20 42 61 6C 6C 61 73
0A 42 69 7A 20 49 44 20 3A 20 33 32 20 2D 20 C0
EC EC EE 20 4A 69 7A 7A 79 0A 42 69 7A 20 49 44
20 3A 20 33 33 20 2D 20 CA E0 E7 E8 ED EE 20 D1
D4 0A 42 69 7A 20 49 44 20 3A 20 33 34 20 2D 20
CA E0 E7 E8 ED EE 20 CB D1 0A 42 69 7A 20 49 44
20 3A 20 33 35 20 2D 20 CA E0 E7 E8 ED EE 20 CB
C2 0A 42 69 7A 20 49 44 20 3A 20 33 36 20 2D 20
C1 E0 F0 20 56 61 67 6F 73 0A 42 69 7A 20 49 44
20 3A 20 33 37 20 2D 20 C1 E0 F0 20 53 74 72 65
65 74 20 52 61 63 65 72 73 0A 42 69 7A 20 49 44
20 3A 20 33 38 20 2D 20 CA EB F3 E1 20 4C 56 50
44 0A 42 69 7A 20 49 44 20 3A 20 33 39 20 2D 20
C1 E0 F0 20 CA E0 F0 FC E5 F0 E0 0A 42 69 7A 20
49 44 20 3A 20 34 30 20 2D 20 C1 E0 F0 20 36 39
0A 42 69 7A 20 49 44 20 3A 20 34 31 20 2D 20 CD
EE E2 EE E5 20 C1 E8 ED EA EE 20 4C 53 0A 42 69
7A 20 49 44 20 3A 20 34 32 20 2D 20 CD EE E2 EE
E5 20 C1 E8 ED EA EE 20 4C 56 0A 42 69 7A 20 49
44 20 3A 20 34 33 20 2D 20 C1 E0 F0 20 44 69 6C
6C 69 6D 6F 72 65 0A 42 69 7A 20 49 44 20 3A 20
34 34 20 2D 20 C1 E0 F0 2E 20 CF EB FF E6 20 CB
D1 00