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

[FYP]

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

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

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

 

[DeppieDoww]

Код открыт.

Но почему-то ошибку выводит...

 

[™ ChipFamily]

Но почему-то ошибку выводит...

Если ошибку выдает - это не значит что скрипт именно закриптован.
Исправь, и не будет ошибки. а не понимаешь, не лезь.

 

[MAR | SAIMON SHOP]

Привет,короче есть скрипт AHK , в формате SAMPFUNCS,его нужно декомпилировать для то,чтобы обойти привязку к железу. По силам? Если да,то с условием не сливать,только пользоваться тебе и мне. В лс если можешь

 

[™ ChipFamily]

Привет,короче есть скрипт AHK , в формате SAMPFUNCS,его нужно декомпилировать для то,чтобы обойти привязку к железу. По силам? Если да,то с условием не сливать,только пользоваться тебе и мне. В лс если можешь

Сам хоть понял что написал?

Спойлер: Скриншот

 

[deleted-user-224036]

pozhalysta

 

[™ ChipFamily]

pozhalysta

Уже кидал код этого скрипта, смотри на других страницах.

 

[Вффафа]

Привет ребятки не могу открыть .exe файлик , надо перевести в ahk. С помощью Exe2Ahk_patched пытался но там выдает ошибку "NOTarc" , серфил по нетику не чего не нашел с помощью какого еще ПО можно открыть. Если можете открыть будет вообще супер , всем за ранее спасибо.

 

[imring]

Привет ребятки не могу открыть .exe файлик , надо перевести в ahk. С помощью Exe2Ahk_patched пытался но там выдает ошибку "NOTarc" , серфил по нетику не чего не нашел с помощью какого еще ПО можно открыть. Если можете открыть будет вообще супер , всем за ранее спасибо.

source.ahk — RGhost — файлообменник^{(http://rgho.st/6JxB7KWqP)}

 

[Вффафа]

source.ahk — RGhost — файлообменник^{(http://rgho.st/6JxB7KWqP)}

Господи друг , спасибо огромное , не скажешь как ты это сделал ?

 

[imring]

Господи друг , спасибо огромное , не скажешь как ты это сделал ?

AHK - распаковщик .exe;

 

[™ ChipFamily]

Господи друг , спасибо огромное , не скажешь как ты это сделал ?

Если этот распаковщик не поможет, тогда уже нужно через OllgyDBG ковырять.

 

[Вффафа]

Вот вопрос , может не по теме , я изменил что хотел в данном скрипте , вроде как обратно в .exe перегнал , но вот в игре он не работает в чем может быть проблема , не подскажешь ?
p.s уже измененные скрипты

 

[imring]

Вот вопрос , может не по теме , я изменил что хотел в данном скрипте , вроде как обратно в .exe перегнал , но вот в игре он не работает в чем может быть проблема , не подскажешь ?
p.s уже измененные скрипты

ошибок в коде нету?

 

[клешь рояль]

Пж

 

[™ ChipFamily]

Пж

{$CLEO .cs}
0000:
repeat
wait 0
until samp.Available()
0B34: samp register_client_command "agun" to_label @cmd

repeat
    wait 0
        if 20@ == 1
        then
        0ac8: alloc 12@ size 450
        0ad3: format_stirng 12@ = "{00FF00}-----Grove Street-----%cDeagle%cShotGun%cM4%c{6A5ACD}-----The Rifa-----" 0xA 0xA 0xA 0xA
        0ad3: 12@ = "%s%cDeagle%cShotGun%cM4%c{00FFFF}-----Varios Los Aztecas-----%cDeagle%cShotGun%cM4" 12@ 0xA 0xA 0xA 0xA 0xA 0xA 0xA
        0ad3: 12@ = "%s%c{FFFF00}-----Los Santos Vagos-----%cDeagle%cShotGun%cM4" 12@ 0xA 0xA 0xA 0xA
        0ad3: 12@ = "%s%c{FF00FF}-----The Ballas-----%cDeagle%cShotGun%cM4" 12@ 0xA 0xA 0xA 0xA
        0B3B: samp show_dialog id 224 caption "guns by babulya for adrik" text 12@ button_1 "Выбрать" button_2 "Закрыть" style 2     
        0ac9: free 12@
        20@ = 0
    end
    if and
    0B3C: samp is_dialog_responded id 224 button 10@ list_item 3@ input_text 0
    10@ == 1
        then
        wait 0
            if 3@ == 1
            then
            actor.StorePos($PLAYER_ACTOR 5@,1@,7@)
            call @SendFakeFootData 3 2494.5344 -1684.6302 13.5106
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            call @SendFakeFootData 3 5@ 1@ 7@
            end
        if 3@ == 2
        then
            actor.StorePos($PLAYER_ACTOR 14@,15@,16@)
            call @SendFakeFootData 3 2494.5344 -1684.6302 13.5106
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            call @SendFakeFootData 3 14@ 15@ 16@
            end
        if 3@ == 3
        then
            actor.StorePos($PLAYER_ACTOR 21@,22@,23@)
            call @SendFakeFootData 3 2494.5344 -1684.6302 13.5106
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            call @SendFakeFootData 3 21@ 22@ 23@
            end
        if 3@ == 5
        then
            actor.StorePos($PLAYER_ACTOR 24@,25@,26@)
            call @SendFakeFootData 3 2776.6616 -1925.9163 13.5394
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            call @SendFakeFootData 3 24@ 25@ 26@
            end
        if 3@ == 6
        then
            actor.StorePos($PLAYER_ACTOR 27@,28@,29@)
            call @SendFakeFootData 3 2776.6616 -1925.9163 13.5394
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            call @SendFakeFootData 3 27@ 28@ 29@
            end
        if 3@ == 7
        then
            actor.StorePos($PLAYER_ACTOR 8@,9@,6@)
            call @SendFakeFootData 3 2776.6616 -1925.9163 13.5394
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            call @SendFakeFootData 3 8@ 9@ 6@
            end
        if 3@ == 9
        then
            actor.StorePos($PLAYER_ACTOR 24@,25@,26@)
            call @SendFakeFootData 3 1680.6016 -2112.9126 13.5469
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            call @SendFakeFootData 3 24@ 25@ 26@
            end
        if 3@ == 10
        then
            actor.StorePos($PLAYER_ACTOR 27@,28@,29@)
            call @SendFakeFootData 3 1680.6016 -2112.9126 13.5469
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            call @SendFakeFootData 3 27@ 28@ 29@
            end
        if 3@ == 11
        then
            actor.StorePos($PLAYER_ACTOR 8@,9@,6@)
            call @SendFakeFootData 3 1680.6016 -2112.9126 13.5469
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            call @SendFakeFootData 3 8@ 9@ 6@
            end
        if 3@ == 13
        then
            actor.StorePos($PLAYER_ACTOR 24@,25@,26@)
            call @SendFakeFootData 3 2749.3445 -1177.1213 69.4044
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            call @SendFakeFootData 3 24@ 25@ 26@
            end
        if 3@ == 14
        then
            actor.StorePos($PLAYER_ACTOR 27@,28@,29@)
            call @SendFakeFootData 3 2749.3445 -1177.1213 69.4044
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            call @SendFakeFootData 3 27@ 28@ 29@
            end
        if 3@ == 15
        then
            actor.StorePos($PLAYER_ACTOR 8@,9@,6@)
            call @SendFakeFootData 3 2749.3445 -1177.1213 69.4044
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            call @SendFakeFootData 3 8@ 9@ 6@
            end
        if 3@ == 17
        then
            actor.StorePos($PLAYER_ACTOR 24@,25@,26@)
            call @SendFakeFootData 3 2022.4775 -1124.3026 26.0005
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 4 input ""
            call @SendFakeFootData 3 24@ 25@ 26@
            end
        if 3@ == 18
        then
            actor.StorePos($PLAYER_ACTOR 27@,28@,29@)
            call @SendFakeFootData 3 2022.4775 -1124.3026 26.0005
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 5 input ""
            call @SendFakeFootData 3 27@ 28@ 29@
            end
        if 3@ == 19
        then
            actor.StorePos($PLAYER_ACTOR 8@,9@,6@)
            call @SendFakeFootData 3 2022.4775 -1124.3026 26.0005
            say "/get guns"
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            0BC9: samp send_dialog_response dialog 9599 button 1 listitem 8 input ""
            call @SendFakeFootData 3 8@ 9@ 6@
            end           
        end
until false
   
:cmd
20@ = 1
samp.CmdRet()

:SendFakeFootData //0@ - x / 1@ - y / 2@ - z
alloc 3@ 68
0B2B: samp 4@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0BBA: samp store_player 4@ onfoot_data 3@
0C0D: struct 3@ offset 6 size 4 = 0@
0C0D: struct 3@ offset 10 size 4 = 1@
0C0D: struct 3@ offset 14 size 4 = 2@
0BC0: samp send_onfoot_data 3@
free 3@
0AB2: ret 0