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

FYP

FYP

Известный
Автор темы
Администратор
1,770
6,012
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. Сообщения по типу "спасибо, помог" по правилам форума считаются флудом и скорее всего будут удалены. Если вам помогли, вы можете нажать кнопку Мне нравится под ответом - это даст понять, что ответ верный.
 
Последнее редактирование:
  • Нравится
  • Bug
  • Влюблен
Реакции: Ghost13, Miguel Molina, stearless и 53 других
У

Удалённый пользователь 257097

Гость
Прошу):drink:
 

Вложения

  • drp_autoad.cs
    1.7 KB · Просмотры: 7
sep

sep

Известный
712
79
astap_

astap_

Известный
Всефорумный модератор
626
605
Andrey_Supe написал(а):
декрипт
Нажмите для раскрытия...
CLEO: 
{$CLEO .cs}
{$INCLUDE SF}
0000:
repeat
wait 0
until samp.Available()
0B34: samp register_client_command "kill" to_label @XI
0BE2: raknet setup_outcoming_packet_hook @BypassAntiCheatOt_0xPATRON
0BE3: raknet setup_incoming_rpc_hook @Nop_SetPos
chatmsg "[WallKiller] Автор скрипта Patrick Headdyson > /kill [id игрока]" 0xFF4040

repeat
wait 0
    if 0@ == 1
    then
        samp.IsCommandTyped(1@)
        if 0AD4: 4@ = scan_string 1@ format "%d" 2@
        then
            041A: 15@ = actor $PLAYER_ACTOR weapon 24 ammo
            call @Calculate_HowManyBullets 1 2@ 18@
            if 002D:   15@ >= 18@
            then
                if 0449:   actor $PLAYER_ACTOR in_a_car
                then
                print "Wallkiller ~y~You can't be in a car" 1337
                else
                    if 0B20: samp 3@ = actor_handle_by_samp_player_id 2@
                    then
                        if 0B5C:  samp is_player 2@ paused
                        then
                        print "Wallkiller ~y~Player Is ~r~AFK" 1337
                        else
                        repeat
                        wait 0
                        call @SetArmedWeapon 1 24
                        0470: 15@ = actor $PLAYER_ACTOR current_weapon
                        until 15@ == 24
                        call @ToggleControllable 1 0
                        wait 100
                        0B25: samp 11@ = get_player_health 2@
                        04C4: store_coords_to 5@ 6@ 7@ from_actor 3@ with_offset 0.0 0.0 6.0
                        actor.StorePos($PLAYER_ACTOR,8@,9@,10@)
                        call @SendFakePlayerPosition 3 5@ 6@ 7@
                        wait 0
                        //
                        25@ = 0
                        repeat
                        wait 0
                        call @FAKEDAMAGE 1 2@
                        25@ += 1
                        until 002D:   25@ >= 18@
                        25@ = 0
                        //
                        call @SendFakePlayerPosition 3 8@ 9@ 10@
                        041A: 15@ = actor $PLAYER_ACTOR weapon 24 ammo
                        0062: 15@ -= 18@
                        017B: set_actor $PLAYER_ACTOR weapon 24 ammo_to 15@
                        call @ToggleControllable 1 1
                        wait 100
                        repeat
                        wait 0
                        call @SetArmedWeapon 1 0
                        0470: 15@ = actor $PLAYER_ACTOR current_weapon
                        until 15@ == 0
                        wait 400
                        0B25: samp 12@ = get_player_health 2@
                            if 002D:   12@ >= 11@
                            then
                            0B36: samp 23@ = get_player_nickname 2@
                            0AD0: show_formatted_text_lowpriority "Wallkiller ~y~%s[%d] ~r~IS GODMOD" time 2000 23@ 2@
                            else
                                0B36: samp 23@ = get_player_nickname 2@
                                0AD0: show_formatted_text_lowpriority "Wallkiller ~y~%s[%d] ~r~IS GODMOD" time 2000 23@ 2@
                                if 0118:   actor 3@ dead
                                then
                                0B36: samp 23@ = get_player_nickname 2@
                                0AD0: show_formatted_text_lowpriority "Wallkiller ~y~%s[%d] ~g~Died Successfully" time 2000 23@ 2@
                                end
                            end
                        end
                    else
                    print "Wallkiller ~y~Player Not Found" 1337
                    end
                end
            else
            0AD0: show_formatted_text_lowpriority "Wallkiller ~y~You Need Desert Eagle And At Least %d Bullets" time 1337 18@
            end
        else
        print "Wallkiller ~y~/kill [playerid]" 1337
        end
    0@ = 0
    end
until false

:XI
0@ = 1
samp.CmdRet()

:FAKEDAMAGE
0B20: samp 9@ = actor_handle_by_samp_player_id 0@
04C4: store_coords_to 13@ 14@ 15@ from_actor 9@ with_offset 0.0 0.0 0.0
0AC8: 5@ = allocate_memory_size 40
0C0D: struct 5@ offset 0 size 1 = 1
0C0D: struct 5@ offset 1 size 2 = 0@
0C0D: struct 5@ offset 3 size 4 = 13@
0C0D: struct 5@ offset 7 size 4 = 14@
0C0D: struct 5@ offset 11 size 4 = 15@
0C0D: struct 5@ offset 15 size 4 = 13@
0C0D: struct 5@ offset 19 size 4 = 14@
0C0D: struct 5@ offset 23 size 4 = 15@
0C0D: struct 5@ offset 27 size 4 = 0.0
0C0D: struct 5@ offset 31 size 4 = 0.0
0C0D: struct 5@ offset 35 size 4 = 0.5
0C0D: struct 5@ offset 39 size 1 = 24
0B3D: raknet 6@ = new_bit_stream
0B40: raknet bit_stream 6@ write 206 type 0 size 1
0B40: raknet bit_stream 6@ write 5@ type 5 size 40
0B8B: raknet send bit_stream 6@
0B3E: raknet delete_bit_stream 6@
0AC9: free_allocated_memory 5@
0AB2: ret 0

:SendFakePlayerPosition
0AC8: 4@ = allocate_memory_size 68
0B2B: samp 3@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0BBA: samp store_player 3@ onfoot_data 4@
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
0C0D: struct 4@ offset 30 size 1 = 100
0BC0: samp send_onfoot_data 4@
0AC9: free_allocated_memory 4@
0AB2: ret 0

:BypassAntiCheatOt_0xPATRON
0BE5: raknet 19@ = get_hook_param 1
if and
    19@ == 207
    0@ == 1
    then
        0BE5: raknet 20@ = get_hook_param 0
        0AC8: 21@ = allocate_memory_size 69
        0BE8: raknet bit_stream 20@ read_array 21@ size 69
        0C0D: struct 21@ offset 63 size 2 = 1
        0BEA: raknet bit_stream 20@ reset_write_pointer
        0B40: raknet bit_stream 20@ write 21@ type 5 size 69
        0AC9: free_allocated_memory 21@
    end
0BE0: raknet hook_ret 1

:Calculate_HowManyBullets
0B25: samp 1@ = get_player_health 0@
0B26: samp 2@ = get_player_armor 0@
008F: 1@ = integer 1@ to_float
008F: 2@ = integer 2@ to_float
0017: 1@ /= 47.0
0017: 2@ /= 47.0
005B: 1@ += 2@
0092: 3@ = float 1@ to_integer
3@ += 1
0AB2: ret 1 3@

:SetArmedWeapon
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write 0@ type BS_TYPE_INT size 4
0BF6: raknet emul_rpc_receive RPC_SCRSETPLAYERARMEDWEAPON bit_stream 5@
0B3E: raknet delete_bit_stream 5@
0AB2: ret 0

:ToggleControllable
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write 0@ type BS_TYPE_BYTE size 1
0BF6: raknet emul_rpc_receive RPC_SCRTOGGLEPLAYERCONTROLLABLE bit_stream 5@
0B3E: raknet delete_bit_stream 5@
0AB2: ret 0

:Nop_SetPos
0BE5: raknet 27@ = get_hook_param 1
if and
27@ == RPC_SCRSETPLAYERPOS
0@ == 1
then
0BE0: raknet hook_ret 0
end
0BE0: raknet hook_ret 1
Clarence написал(а):
можно декрипт пожалуйста?
Нажмите для раскрытия...
ставь галочку на IGNORE_UNKNOWN.
Wissan написал(а):
decrypt
Нажмите для раскрытия...
CLEO: 
{$CLEO}
{$INCLUDE SF}
0000:

repeat
wait 1337
until SAMP.Available()

if 0AAB:   file_exists "CLEO\[v2] TargetFinder_K.cs"
jf @file


alloc 9@ 256
alloc 8@ 128

chatmsg "{FFFFFF}>>{F1081C}TargetFinder v2 for Hitman loaded.{FFFFFF}<< " -1
chatmsg "{F1081C}>>{FFFFFF}Author: Kristyan [bugged.ro] {F1081C} || [/h.finder]<<" -1


0b34: "h.finder" @help
0b34: "undercover" @undercover
0b34: "gethit" @gethit
0b34: "target" @target
0b34: "cancelhit" @cancel
0b34: "rr.finder" @finder
0b34: "turn" @turn
0B34: "reload" @reload

0BE3: raknet setup_incoming_rpc_hook @on_new_chatline 

while true
    wait 0
   
    if
    22@ == 1
    then 
        call @gethit_chat 2 9@ 8@ | 20@ 18@
             
        if not 20@ == -1
        then
            0085: 15@ = 20@
            say "/turn off"
            say "/find %d" 15@
            say "/undercover"
            10@ = 0
            077E: get_active_interior_to 11@
            if 11@ > 0
            then
                say "/order 1"
                say "/order 1"
                say "/order 1"
            end
            0C72: set_virtual_key 119 down true //Auto-SS F8
            wait 1
            0C72: set_virtual_key 119 down false
        end
       
        if 18@ > 0
        then
            0C5E: samp textdraw 500 delete
            0C5E: samp textdraw 600 delete
            0C5E: samp textdraw 700 delete
            0C5E: samp textdraw 800 delete
            0C5E: samp textdraw 900 delete
            0C5E: samp textdraw 950 delete
            19@ = 0
            16@ = 5 
            repeat
            alloc 17@ 50
            format 17@  "Time left: ~r~%d min" 16@
            0C48: samp textdraw 1000 create 17@ pos 635.0 335.0
            0C4E: samp textdraw 1000 set_outline 1 color 0xFF000000 
            0C4A: samp textdraw 1000 set_align 3
            0C4B: samp textdraw 1000 set_proportional true 
            16@ -= 1
            free 17@
            wait 60000
            until 16@ == 0 
            0C5E: samp textdraw 1000 delete
            18@ = 0
        end
        22@ = 0
    end
     
     
if and
19@ == 1
16@ == 0 
then 
    if and
    02D8: actor $PLAYER_ACTOR current_weapon == 34
    0B20: samp 30@ = actor_handle_by_samp_player_id 15@
    then
        if 0ab1: @distance 1 30@
        then
        0665: get_char_model 30@ store_to 24@ 
        0ab1: @getSkinParams 1 30@ | {x,y,w,h} 26@ 27@ 28@ 29@
        0ab1: @shoot 4 26@ 27@ 28@ 29@  | 25@ 
        0ab1: @player_status 1 30@
            if 25@ == 1
            then
                if not 23@ == 3
                then
                    23@ = 1
                    0C5E: samp textdraw 700 delete
                    0C5E: samp textdraw 800 delete
                end
            else
                if not 23@ == 4
                then
                    23@ = 2
                end           
            end
        else
            23@ = 0
            0C5E: samp textdraw 500 delete
            0C5E: samp textdraw 600 delete
            0C5E: samp textdraw 700 delete
            0C5E: samp textdraw 800 delete
            0C5E: samp textdraw 900 delete
        end
    end
   
   
    if and
    not Actor.Driving($PLAYER_ACTOR)
    02D8: actor $PLAYER_ACTOR current_weapon == 34
    not SAMP.ChatInputOpened()
    key_down 2
    then       
        if 10@ == 0
        then
            if 13@ == 1
            then
                01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0 
                printf "~r~Phone is ON!!!" 2000                                 
                23@ = 0                                                                             
                0C5E: samp textdraw 500 delete                                                           
                0C5E: samp textdraw 600 delete
                0C5E: samp textdraw 700 delete                                                                                 
                0C5E: samp textdraw 800 delete
                0C5E: samp textdraw 900 delete
                0C5E: samp textdraw 950 delete                                                   
            else 
                0ab1: @nick 1 15@
                if 23@ == 1                                                                                                           
                then
                    0C48: samp textdraw 500 create "Sniper" pos 535.0 180.0
                    0C49: samp textdraw 500 set_box true color 0xffff0000 size 100.0 100.0
                    0C4C: samp textdraw 500 set_style 5
                    0C4F: samp textdraw 500 set_model 24@ rotation 0.0 0.0 0.0 zoom 1.1 veh_color 0 0 
                    0C48: samp textdraw 600 create "TargetFinder" pos 585.0 275.0
                    0C4E: samp textdraw 600 set_outline 1 color 0xFF000000 
                    0C4A: samp textdraw 600 set_align 2
                    0C4B: samp textdraw 600 set_proportional true
                    0C4D: samp textdraw 600 set_shadow 1 color 0xFF000000 
                    0C49: samp textdraw 600 set_box true color 0xff00ff00 size 100.0 100.0  //green
                    23@ = 3
                else
                    if 23@ == 2
                    then
                        0C48: samp textdraw 700 create "Sniper" pos 535.0 180.0
                        0C49: samp textdraw 700 set_box true color 0xffff0000 size 100.0 100.0
                        0C4C: samp textdraw 700 set_style 5
                        0C4F: samp textdraw 700 set_model 24@ rotation 0.0 0.0 0.0 zoom 1.1 veh_color 0 0 
                        0C48: samp textdraw 800 create "TargetFinder" pos 585.0 275.0
                        0C4E: samp textdraw 800 set_outline 1 color 0xFF000000 
                        0C4A: samp textdraw 800 set_align 2
                        0C4B: samp textdraw 800 set_proportional true
                        0C4D: samp textdraw 800 set_shadow 1 color 0xFF000000 
                        0C49: samp textdraw 800 set_box true color 0xffff0000 size 100.0 100.0 //red 
                        23@ = 4
                    end
                end
            end
        else
            01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0
            printf "~r~Undercover!!!" 2000
            23@ = 0
            0C5E: samp textdraw 500 delete
            0C5E: samp textdraw 600 delete
            0C5E: samp textdraw 700 delete
            0C5E: samp textdraw 800 delete
            0C5E: samp textdraw 900 delete
            0C5E: samp textdraw 950 delete
        end
    else
        23@ = 0
        0C5E: samp textdraw 500 delete
        0C5E: samp textdraw 600 delete
        0C5E: samp textdraw 700 delete
        0C5E: samp textdraw 800 delete
        0C5E: samp textdraw 900 delete 
    end
end     
   
END

:distance {0@-Handle}
Actor.StorePos($PLAYER_ACTOR, 29@, 30@, 31@)
Actor.StorePos(0@, 26@, 27@, 28@)
050A: 25@ = distance_between_XYZ 29@ 30@ 31@ and_XYZ 26@ 27@ 28@ 
0092: 25@ = float 25@ to_integer
if and
key_down 2
25@ > 100
then
    if not 25@ >= 250
    then
        alloc 24@ 50
        format 24@  "Distance: ~y~%d m" 25@
        0C48: samp textdraw 950 create 24@ pos 635.0 315.0
        free 24@
    else
        0C48: samp textdraw 950 create "Distance: ~r~Too far!!!" pos 635.0 315.0
    end
    0485:  return_true
    0C4E: samp textdraw 950 set_outline 1 color 0xFF000000 
    0C4A: samp textdraw 950 set_align 3
    0C4B: samp textdraw 950 set_proportional true
else
    0C5E: samp textdraw 950 delete
    if and
    25@ < 100
    not Actor.Driving($PLAYER_ACTOR)
    then       
        0470: 24@ = actor $PLAYER_ACTOR current_weapon
        if 24@ == 34
        then
            01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0
            print "~r~Target to close!!!" 1000
        end
    end
    059A:  return_false
end
ret 0
   

:gethit_chat 
0B75: samp get_chat_string 99 text_to 0@ prefix_to 0 color_to 0 prefix_color_to 0
if 0C18: 0 = strstr string1 0@ string2 "You have a contract on"
then
    0AA5: call 0x8220AD num_params 4 pop 4 29@v 1@ "You have a contract on %[^(](%d)" 0@
    0B36: samp 28@ = get_player_nickname 29@
    if and
    SAMP.IsPlayerConnected(29@)
    0C14: strcmp string1 28@ string2 1@
    then
        chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF}Set on ID: %d" -1 29@
    else
        chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF}ID-ul nu a fost gasit, foloseste [/target ID] pentru setare manuala." -1
        29@ = -1
    end
else 
    29@ = -1
    if 0C18: 0 = strstr string1 0@ string2 "has succesfully completed the contract"
    then
        0B75: samp get_chat_string 98 text_to 0@ prefix_to 0 color_to 0 prefix_color_to 0
        if or
        0AD4: 0 = scan_string 0@ format "Targets killed: %d/%d" 25@ 26@
        0AD4: 0 = scan_string 0@ format "Contracte efectuate: %d/%d" 25@ 26@
        then   
            printf "~g~ WELL DONE! :)" 1000   
            0C5E: samp textdraw 900 delete
        end
    end
end

ret 2 29@ 26@

:nick
31@ = SAMP.GetPlayerColor(0@)
if and
0038: $707 == 17
31@ == 0xFFCECECE
then
    0C48: samp textdraw 900 create "Player status: ~y~SLEEPING" pos 635.0 300.0 
else
    if and
    0038: $707 == 19
    31@ == 0xCECECE
    then
        0C48: samp textdraw 900 create "Player status: ~y~SLEEPING" pos 635.0 300.0 
    end
end
0C4E: samp textdraw 900 set_outline 1 color 0xFF000000 
0C4A: samp textdraw 900 set_align 3
0C4B: samp textdraw 900 set_proportional true
ret 0


:player_status {0@-HandleP || 1@- Font}
if
044B:   actor 0@ on_foot
then 
    0C48: samp textdraw 900 create "Player status: ~y~ON FOOT" pos 635.0 300.0
else
    if Actor.Driving(0@)
    then
        31@ = Actor.CurrentCar(0@)
        046C: 30@ = car 31@ driver
        if 003B: 30@ == 0@
        then 
            0C48: samp textdraw 900 create "Player status: ~y~DRIVER" pos 635.0 300.0
        else
            0C48: samp textdraw 900 create "Player status: ~y~PASSENGER" pos 635.0 300.0
        end
    else
        if Actor.Dead(0@)
        then
            0C48: samp textdraw 900 create "Player status: ~y~DEAD" pos 635.0 300.0
        end
    end
end 
    0C4E: samp textdraw 900 set_outline 1 color 0xFF000000 
    0C4A: samp textdraw 900 set_align 3
    0C4B: samp textdraw 900 set_proportional true
    //
ret 0

:target
if SAMP.IsCommandTyped(15@)
then
    0C1A: 15@ = atoi 15@
    if SAMP.IsPlayerConnected(15@)
    then
        if and
        20@ <= 0
        not 19@ == 0
        not 18@ > 0
        then
            chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF}Set on ID: %d" -1 15@
            say "/turn off"
            say "/undercover"
            say "/find %d" 15@
            10@ = 0
            077E: get_active_interior_to 11@
            if 11@ > 0
            then
                say "/order 1"
                say "/order 1"
                say "/order 1"
            end
            0C72: set_virtual_key 119 down true //Auto-SS F8
            0C72: set_virtual_key 119 down false
            19@ = 1
        else
            chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF}Nu poti folosi aceasta comanda acum!" -1
        end
    else
        chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF} ID-ul indicat nu exista!" -1
    end
else
    chatmsg "{efe81f}Syntax:{C0C0C0} /target <ID>" -1
end
SAMP.CmdRet()

:turn
SAMP.IsCommandTyped(14@)
if and
19@ == 1
0c14: 14@ "on"
then
    say "/turn on"
    13@ = 1
else
    if 0c14: 14@ "off"
    then
        say "/turn off"
        13@ = 0
    else
        say "/turn %s" 14@
        13@ = 0
    end
end
SAMP.CmdRet()
       
:finder
15@ = -1
20@ = -1
18@ = 0
19@ = 0
23@ = 0
0C5E: samp textdraw 500 delete
0C5E: samp textdraw 600 delete
0C5E: samp textdraw 700 delete
0C5E: samp textdraw 800 delete
0C5E: samp textdraw 900 delete
0C5E: samp textdraw 1000 delete
0C5E: samp textdraw 950 delete
chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF} Mod resetat!" -1
if not 16@ == 0
then
    16@ = 1
end
SAMP.CmdRet()

:undercover
say "/undercover"     
0B12: 10@ = 10@ XOR 1
SAMP.CmdRet()


:cancel
15@ = -1
say "/cancelhit"
20@ = -1
18@ = 0
19@ = 0
23@ = 0
0C5E: samp textdraw 500 delete
0C5E: samp textdraw 600 delete
0C5E: samp textdraw 700 delete
0C5E: samp textdraw 800 delete
0C5E: samp textdraw 900 delete
0C5E: samp textdraw 1000 delete
0C5E: samp textdraw 950 delete
if not 16@ == 0
then 
    16@ = 1
end
SAMP.CmdRet() 

:gethit
if and
19@ == 1
18@ > 0
then
    chatmsg "{00ff00}[{F1081C}TargetFinder{00ff00}] {FFFFFF}Nu poti folosi aceasta comanda acum!" -1
else
say "/gethit"
say "/mycontract"
19@ = 1
end
SAMP.CmdRet()

:help
chatmsg "========{F1081C}Comenzi{FFFFFF}========" -1
chatmsg "{00ff00}[{F1081C}/gethit{00ff00}] {FFFFFF}- comanda principala" -1
chatmsg "{00ff00}[{F1081C}/target ID{00ff00}] {FFFFFF}- setare manuala daca eroarea a aparut!" -1
chatmsg "{00ff00}[{F1081C}/rr.finder{00ff00}] {FFFFFF}- resetare mod, poate fi folosita la timer" -1
chatmsg "========{F1081C}Have fun!{FFFFFF}========" -1 
SAMP.CmdRet()   


:on_new_chatline
0BE5: raknet 21@ = get_hook_param PARAM_PACKETID
if 21@ == RPC_ScrClientMessage
then
22@ = 1
end
0BE0: raknet hook_ret true 

:getSkinParams
//0x5E4280
0A96: 15@ = actor 0@ struct

0AC7: 16@ = var 16@ offset
0AA6: call_method 0x5E4280 struct 15@ num_params 3 pop 0 1 24 16@ // 16@ 17@ 18@ x y z
0B55: convert_3D_coords 16@ 17@ 18@ to_screen 16@ 17@
0B5F: convert_window_screen_coords 16@ 17@ to_game_screen_coords 19@ 20@ // 22

0AC7: 16@ = var 16@ offset
0AA6: call_method 0x5E4280 struct 15@ num_params 3 pop 0 1 34 16@ // 16@ 17@ 18@ x y z
0B55: convert_3D_coords 16@ 17@ 18@ to_screen 16@ 17@
0B5F: convert_window_screen_coords 16@ 17@ to_game_screen_coords 16@ 17@ // 32

0509: 21@ = distance_between_XY 16@ 17@ 19@ 20@ //21@ - ШИРИНА

0AC7: 16@ = var 16@ offset
0AA6: call_method 0x5E4280 struct 15@ num_params 3 pop 0 1 53 16@ // 16@ 17@ 18@ x y z
0B55: convert_3D_coords 16@ 17@ 18@ to_screen 16@ 17@
0B5F: convert_window_screen_coords 16@ 17@ to_game_screen_coords 19@ 20@ // 22

0AC7: 16@ = var 16@ offset
0AA6: call_method 0x5E4280 struct 15@ num_params 3 pop 0 1 6 16@ // 16@ 17@ 18@ x y z
0B55: convert_3D_coords 16@ 17@ 18@ to_screen 16@ 17@
0B5F: convert_window_screen_coords 16@ 17@ to_game_screen_coords 16@ 17@ // 32

0509: 22@ = distance_between_XY 16@ 17@ 19@ 20@ //22@ - ВЫСОТА 

0AC7: 16@ = var 16@ offset
0AA6: call_method 0x5E4280 struct 15@ num_params 3 pop 0 1 3 16@ // 16@ 17@ 18@ x y z
0B55: convert_3D_coords 16@ 17@ 18@ to_screen 16@ 17@
0B5F: convert_window_screen_coords 16@ 17@ to_game_screen_coords 16@ 17@ // 32
0ab2: 4 16@ 17@ 21@ 22@

:shoot
0@ -= 320.0
1@ -= 224.0
0097: make 0@ absolute_float
0097: make 1@ absolute_float
2@ /= 2.0
3@ /= 2.0

if and
8035: 0@ <= 2@
8035: 1@ <= 3@
then
    5@ = 1
else
    5@ = 0
end
0ab2: 1 5@   

:reload
0A92: create_custom_thread "[v2] TargetFinder_K.cs"
0A93: end_custom_thread
samp.CmdRet()

:file
chatmsg "{F1081C} NU MODIFICA NUMELE DE LA MOD OMULE. Salutari de la TargetFinder!!!" -1
chatmsg "{F1081C} NU MODIFICA NUMELE DE LA MOD OMULE. Salutari de la TargetFinder!!!" -1
chatmsg "{F1081C} NU MODIFICA NUMELE DE LA MOD OMULE. Salutari de la TargetFinder!!!" -1
chatmsg "{F1081C} MOD OPRIT" -1
0A93: end_custom_thread
 
sаnеk

sаnеk

Всефорумный sanek
Друг
2,129
2,180
slackie написал(а):
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
0@ = 0

:NONAME_9
   not SAMP.Available
else_jump @NONAME_30
wait 400
jump @NONAME_9

:NONAME_30
wait 1000
chatmsg "{A3E900}[BulletRebuff]: {FFFFFF}Успешно загружен. Автор: {A3E900}Niko" -1
chatmsg "{A3E900}[BulletRebuff]: {FFFFFF}Специально для сайта: {A3E900}SAmods.ru" -1
10@ = Render.CreateFont("Tahoma", 11, 4)
0B34: samp register_client_command "br" to_label @NONAME_264
0B34: samp register_client_command "b" to_label @NONAME_394
0BE4: raknet setup_incoming_packet_hook @NONAME_415
0C74: 8@ = create_timer_interval 5 on_label @NONAME_686
0C78: set_timer 8@ active 0
alloc 14@ 32
0BDE: pause_thread 0

:NONAME_264
0B12: 0@ = 0@ XOR 1
if
  0@ == 1
else_jump @NONAME_345
chatmsg "{A3E900}[BulletRebuff]: {FFFFFF}Включен" -1
jump @NONAME_392

:NONAME_345
chatmsg "{A3E900}[BulletRebuff]: {FFFFFF}Выключен" -1

:NONAME_392
SAMP.CmdRet

:NONAME_394
format 14@ "Тест"
0C78: set_timer 8@ active 1
SAMP.CmdRet

:NONAME_415
if
  0@ == 1
else_jump @NONAME_682
0BE5: raknet 1@ = get_hook_param 1
if
  1@ == 206
else_jump @NONAME_682
0BE5: raknet 2@ = get_hook_param 0
alloc 3@ 40
BitStream.IgnoreBits(2@, 8)
4@ = BitStream.Read(2@, 2)
BitStream.ReadArray(2@, 3@, 40)
5@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
0C0C: 6@ = struct 3@ offset 1 size 2
0C0C: 7@ = struct 3@ offset 39 size 1
if
003B:   6@ == 5@ // (int)
else_jump @NONAME_677
01B9: set_actor $PLAYER_ACTOR armed_weapon_to 7@
call @NONAME_774 2 4@ 7@
call @NONAME_1015 0 16@
0BCB: samp send_give_damage playerid 4@ damage 16@ weapon 7@ bodypart 0
alloc 15@ 24
15@ = SAMP.GetPlayerNickname(4@)
format 14@ "Игрок: %s[%d] стреляет в вас" 15@ 4@
9@ = 0
0C78: set_timer 8@ active 1
free 15@

:NONAME_677
free 3@

:NONAME_682
0BE0: raknet hook_ret 1

:NONAME_686
0B60: convert_game_screen_coords 638.0 0.0 to_window_screen_coords 11@ 12@
13@ = Render.FontDrawLength(10@, 14@)
0062: 11@ -= 13@ // (int)
Render.DrawText(10@, 14@, 11@, 12@, -1)
9@ += 1
if
  9@ == 150
else_jump @NONAME_772
0C78: set_timer 8@ active 0

:NONAME_772
SAMP.CmdRet

:NONAME_774
alloc 2@ 40
0C0D: struct 2@ offset 0 size 1 = 1
0C0D: struct 2@ offset 1 size 2 = 0@
Actor.StorePos($PLAYER_ACTOR, 3@, 4@, 5@)
0C0D: struct 2@ offset 3 size 4 = 3@
0C0D: struct 2@ offset 7 size 4 = 4@
0C0D: struct 2@ offset 11 size 4 = 5@
6@ = SAMP.GetActorHandleByPlayerID(0@)
Actor.StorePos(6@, 7@, 8@, 9@)
0C0D: struct 2@ offset 15 size 4 = 7@
0C0D: struct 2@ offset 19 size 4 = 8@
0C0D: struct 2@ offset 23 size 4 = 9@
0C0D: struct 2@ offset 27 size 4 = 0.0
0C0D: struct 2@ offset 31 size 4 = 0.0
0C0D: struct 2@ offset 35 size 4 = 0.5
0C0D: struct 2@ offset 39 size 1 = 1@
10@ = RakNet.NewBitStream()
BitStream.Write(10@, 206, BS_TYPE_BYTE, 1)
BitStream.Write(10@, 2@, BS_TYPE_ARRAY, 40)
RakNet.LiteSend(10@)
RakNet.DeleteBitStream(10@)
free 2@
ret 0

:NONAME_1015
0A96: 2@ = actor $PLAYER_ACTOR struct
2@ += 1836
0A8D: 2@ = read_memory 2@ size 1 virtual_protect 0
0470: 0@ = actor $PLAYER_ACTOR current_weapon
0085: 1@ = 0@ // (int)
if
  2@ == 2
else_jump @NONAME_1084
1@ += 25

:NONAME_1084
if
  2@ == 3
else_jump @NONAME_1109
1@ += 36

:NONAME_1109
1@ *= 112
1@ += 13150904
1@ += 34
0A8D: 1@ = read_memory 1@ size 2 virtual_protect 0
0093: 1@ = integer 1@ to_float
if and
  0@ >= 22
   not 0@ == 25
   not 0@ == 26
   not 0@ == 27
   not 0@ > 34
else_jump @NONAME_1209
1@ /= 3.043478

:NONAME_1209
ret 1 1@
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. LinkelnAweil
    • Закрыта
    Lua Декомпиляция скриптов
    Ответы
    3
    Просмотры
    7K
    Другое
    Mirrorka
    Mirrorka
  2. LeonardoDiCaprioAndDaVinc
    • Вопрос
    Декомпиляция скриптов Lua и Cleo
    Ответы
    4
    Просмотры
    3K
    Помощь
    YarikVL
    YarikVL
  3. K
    • Вопрос
    Декомпиляция
    Ответы
    3
    Просмотры
    2K
    Вопросы
    degrando
    degrando
  4. F
    • Решено
    Декомпиляция .luac скриптов
    Ответы
    7
    Просмотры
    5K
    Помощь
    deleted-user-411329
    D
  5. Dec0d3r
    Исполнитель Декомпиляция AHK-скриптов
      • Bug
    Ответы
    1
    Просмотры
    687
    Работа и услуги
    Z1triXXXXX
    Z1triXXXXX
Сверху Снизу