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

[FYP]

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

Рекомендации:

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

 

[deleted-user-299196]

ты скинул очень старую версию. Мне нужна именна та которую я кинул
Декомпилируйте именно эту версию. Спасибо. 😌

 

[Yarikzzzz]

опен

 

[Tranzit]

ты скинул очень старую версию. Мне нужна именна та которую я кинул
Декомпилируйте именно эту версию. Спасибо. 😌

LuaJIT, чел

 

[deleted-user-299196]

опен

Разве не открытый?

 

[sep]

плиз !!!!!!!!!!!!!!!!!!!!!

 

[trudeaubrn]

опен плиз

 

[deleted-user-150045]

Плиз декомп

 

[cheremuxa]

Плиз декомп

он нерабочий даже...

 

[paulohardy]

Плиз декомп

лоадер, там запись символов из таблицы через string byte и сохранение в gtaweap3.saa(дллка)

 

[DarkEagle]

decode please

 

[NIET]

Вот эту хуйню можно?

 

[DarkP1xel]

Вот эту хуйню можно?

Это стилер.

decode please

{$CLEO}
{$INCLUDE SF}

const
EVENT_BUTTON_CLICKED                = 257
EVENT_COMBOBOX_SELECTION_CHANGED    = 513
EVENT_RADIOBUTTON_CHANGED           = 769
EVENT_CHECKBOX_CHANGED              = 1025
EVENT_SLIDER_VALUE_CHANGED          = 1281
EVENT_EDITBOX_STRING                = 1537
EVENT_EDITBOX_CHANGE                = 1538
EVENT_LISTBOX_ITEM_DBLCLK           = 1793
EVENT_LISTBOX_SELECTION             = 1794
end

0000:
repeat
wait 0
until samp.Available()
chatmsg "{FFF08B}[MicaPublicitate] {FFFFFF}by {5AD9F9}gumball3000 {FFFFFF}has loaded!" -1
chatmsg "{FFF08B}Use /adshow to show the list of ads." -1


0B34: samp register_client_command "adshow" to_label @KIG
6@ = 0

{

//OLOLOLOLOL    easy bro
//repeat
//wait 500
//until 6@ == 1

repeat
wait 0
if 6@ == 1
then
}
0B80: dialog 0@ = create "Mica publicitate by gumball3000"
0B84: dialog 0@ set_pos_XY 50 220 size 1000 360
0BE3: raknet setup_incoming_rpc_hook @chat_number


0B82: dialog 0@ add_button id 1 text "SMS" pos_XY 700 300 size 100 40
0B82: dialog 0@ add_button id 2 text "CALL" pos_XY 800 300 size 100 40
0B82: dialog 0@ add_button id 4 text "CLOSE" pos_XY 900 300 size 100 40
0B99: dialog 0@ add_listbox id 3 pos_XY 0 0 size  1000 300
Dialog.AddEditBox(0@, 5, "", 400, 300, 300, 40)
dialog.SetVisible(0@, 0)



while true
    wait 0
    if
    dialog.IsVisible(0@)
    then
    SAMP.ToggleCursor(1)
            alloc 19@ 256
            0A8C: write_memory 19@ size 1 value 0 virtual_protect 0
            Dialog.GetControlText(0@, 5, 19@)
            0C17: 20@ = strlen 19@
            FREE 19@
        if
        20@ > 0
        THEN
        0B79: samp set_chat_input_enabled 0
        END
    end
    if
    0B81: dialog 0@ pop_event_to 1@ control_id_to 2@
    then
        if 1@ == EVENT_BUTTON_CLICKED
        then
            if
            2@ == 1
            then
            alloc 19@ 256
            0A8C: write_memory 19@ size 1 value 0 virtual_protect 0
            Dialog.GetControlText(0@, 5, 19@)
            0C17: 20@ = strlen 19@
                if
                20@ > 0
                then
                dialog.SetControlText(0@,5, "")
                0B9B: dialog 0@ listbox 3 selected_element_to 11@ elements_count_to 12@
                alloc 3@ 256
                alloc 8@ 256
                    //0C11: memset destination 12@ value 0 size 256 
                    //0C11: memset destination 13@ value 0 size 256
                    0A8C: write_memory 3@ size 1 value 0 virtual_protect 0
                    0A8C: write_memory 8@ size 1 value 0 virtual_protect 0
                    0B9D: dialog 0@ listbox 3 element 11@ store_text_to 3@ data_to 5@
                     if
                     5@ == -1
                     then
                     11@ -= 1
                     0B9D: dialog 0@ listbox 3 element 11@ store_text_to 3@ data_to 5@
                     end
                               if
                    5@ < 10
                    then
                    format 8@ "000%d" 5@
                    else
                        if
                        5@ < 100
                        then
                        format 8@ "00%d" 5@
                        else
                            if
                            5@< 1000
                            then
                            format 8@ "0%d" 5@
                            else
                            format 8@ "%d" 5@
                            end
                        end
                    end
                    //chatmsg "%s" -1 8@
                //0AD4: $NOT_USED = scan_string 12@ format "%d" 14@
                say "/sms %s %s" 8@ 19@
                6@ = 0
                free 3@
                free 8@
                end
                free 19@
            end
            
            if 2@ == 2
            then
            0B9B: dialog 0@ listbox 3 selected_element_to 11@ elements_count_to 12@
            alloc 3@ 256
            alloc 8@ 256
                            //0C11: memset destination 12@ value 0 size 256 
                //0C11: memset destination 13@ value 0 size 256
                0A8C: write_memory 3@ size 1 value 0 virtual_protect 0
                0A8C: write_memory 8@ size 1 value 0 virtual_protect 0
            0B9D: dialog 0@ listbox 3 element 11@ store_text_to 3@ data_to 5@
                 if
                 5@ == -1
                 then
                 11@ -= 1
                 0B9D: dialog 0@ listbox 3 element 11@ store_text_to 3@ data_to 5@
                 end
                           if
                5@ < 10
                then
                format 8@ "000%d" 5@
                else
                    if
                    5@ < 100
                    then
                    format 8@ "00%d" 5@
                    else
                        if
                        5@< 1000
                        then
                        format 8@ "0%d" 5@
                        else
                        format 8@ "%d" 5@
                        end
                    end
                end
                //chatmsg "%s" -1 8@
            //0AD4: $NOT_USED = scan_string 12@ format "%d" 14@
            say "/call %s" 8@
            6@ = 0
            free 3@
            free 8@
            end
            
            if 2@ == 4
            then
            0B86: dialog 0@ set_visible false
            SAMP.ToggleCursor(0)
            dialog.SetControlText(0@,5, "")
            6@ = 0
            end
        end
          



end
end


        
                      


:KIG
// OLOLOLOLOL
0B12: 6@ = 6@ XOR 1   // aktivacia
if 6@ == 0
then
6@ = 1
end
IF
6@ == 1
THEN
dialog.SetVisible(0@, 6@)
END

samp.CmdRet()

:chat_number
5@ = 0
0BE5: raknet 31@ = get_hook_param PARAM_PACKETID
if 31@ == RPC_ScrClientMessage
then
    alloc 27@ 256
    0C11: memset destination 27@ value 0 size 256
    
    0BE5: raknet 30@ = get_hook_param PARAM_BITSTREAM
    0BE7: raknet 29@ = bit_stream_read 30@ type BS_TYPE_INT //color
    0BE7: raknet 28@ = bit_stream_read 30@ type BS_TYPE_INT //lenght
    0BE8: raknet bit_stream 30@ read_array 27@ size 28@
    0C0D: struct 27@ offset 28@ size 1 = 0
    
    if 0C18: $NOT_STRING = strstr string1 27@ string2 "Ad by"
    then   
 
            //alloc 5@ 256
            //0C11: memset destination 5@ value 0 size 256     
            //0AA5: call 0x8220AD num_params 3 pop 3 5@ "%*[^:]: %*[^|]| %*[^:]: %s" 27@
            
            //0AA5: call 0x8220AD num_params 3 pop 3 5@ "%*[^}]}%s{%*[^\n]" 27@
            if
            0AD4: $NOT_USED = scan_string 27@ format "%*[^}]}%d{%*[^\n]" 5@
            then
                //chatmsg "%d" -1 5@
                //5@ += 8
                //format 8@ "%s" 5@
                alloc 9@ 256
                //chatmsg "%d" -1 5@
                //chatmsg "%d" -1 29@
                format 9@ "{00FF00}%s" 27@
                0B9A: dialog 0@ listbox 3 insert_element 9@ with_data 5@ after 0       
                free 9@
            end 
    end
        if 0C18: $NOT_STRING = strstr string1 27@ string2 "..."
    then   
        if
        29@ == 16711850
        then
                alloc 9@ 256
                format 9@ "{00FF00}%s" 27@
                0B9A: dialog 0@ listbox 3 insert_element 9@ with_data -1 after 1       
                free 9@
        end 
    end
    
end
    0BE0: raknet hook_ret true

 

[NIET]

Это стилер.

99% был уверен, потому что с ютуба. Спасибо.

 

[sep]

плиз !!!!

 

[Priwo]

откройте пожалуйста, заранее спасибо.