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

[FYP]

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

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

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

 

[frit]

decompile please

второй открыт, код сам посмотри

 

[корбус]

decomp pls
мне для фикса(он не робит)

второй открыт, код сам посмотри

плиз

 

[vladmany]

второй открыт, код сам посмотри

Второй не открыт, он просто переименован в .lua, но код посмотреть не получиться.

 

[Misha_mm]

декопилируйте плиз

 

[Virsachi]

Приветствую прошу декомпильнуть Asi очень надо

 

[SXN7R]

decompile please

 

[Мира]

сам файл где?

 

[aezakmi123]

Помогите пожалуйста Декомпильнуть, срочно
Буду очень благодарен

 

[thug cult]

decomp

 

[AngelWeezy]

decompile, еть ли ратник?

 

[NoSamp]

буду очень признателен)

 

[GrishaMazzlov]

Декомпильните и проверьте на дерьмо, скажите чем докомпилите пожалуйста ибо у меня луаджит декомп выдает какую-то херню.
Заранее спасибо!

 

[Cocu]

bot_-decompiled.lua

а чем декомпайлил? luajit вроде псевдокод только выдаёт ведь

 

[chapo]

.

 

[sᴀxᴏɴ]

.

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

//-------------MAIN---------------
wait 0
   SAMP.Available
else_jump @Label000002
0@ = 0
1@ = 0
8@ = 0
Dialog.Create(5@, "Record RPC/Packet by AIR")
Dialog.SetRECT(5@, 500, 500, 200, 70)
Dialog.AddCheckBox(5@, 1, "Record RPC", 0, 0, 200, 20)
Dialog.AddCheckBox(5@, 2, "Record Packet", 0, 30, 200, 20)
Dialog.SetVisible(5@, 0)
0BE1: raknet setup_outcoming_rpc_hook -943
0BE2: raknet setup_outcoming_packet_hook -1539
0BE3: raknet setup_incoming_rpc_hook -652
0BE4: raknet setup_incoming_packet_hook -1236
wait 0
if
   Dialog.PopEvent(5@, 6@, 7@)
else_jump @Label00023A
if
  6@ == 1025
else_jump @Label00023A
if
  7@ == 1
else_jump @Label000189
if
   Dialog.CheckBoxIsChecked(5@, 7@)
else_jump @Label00012F
0@ = 1
printf "~g~Start RPC Recording" 500
jump @Label000189
0@ = 0
if
0AAB:   file_exists "CLEO\RecordR-P.txt"
else_jump @Label000170
printf "~g~Save..." 500
jump @Label000189
printf "~g~End RPC Record" 500
if
  7@ == 2
else_jump @Label00023A
if
   Dialog.CheckBoxIsChecked(5@, 7@)
else_jump @Label0001DD
1@ = 1
printf "~g~Start Packet Recording" 500
jump @Label00023A
1@ = 0
if
0AAB:   file_exists "CLEO\RecordR-P.txt"
else_jump @Label00021E
printf "~g~Save..." 500
jump @Label00023A
printf "~g~End Packet Record" 500
if
0ADC:   test_cheat "RRP"
else_jump @Label000285
0B12: 8@ = 8@ XOR 1
if
  8@ == 1
else_jump @Label00027A
Dialog.SetVisible(5@, 1)
SAMP.ToggleCursor(1)
jump @Label000285
Dialog.SetVisible(5@, 0)
SAMP.ToggleCursor(0)
jump @Label0000B1
if
  0@ == 1
else_jump @Label0003AB
0BE5: raknet 2@ = get_hook_param 1
0BF8: raknet 3@ = get_rpc_name 2@
if
0AAB:   file_exists "CLEO\RecordR-P.txt"
else_jump @Label000348
4@ = File.Open("CLEO\RecordR-P.txt", "at")
0AD9: write_formatted_text "RPC ID: %d, RPC Name: %s (Incoming) by AIR %c" in_file 4@ 2@ 3@ 10
printf "~g~Record..." 500
File.Close(4@)
jump @Label0003A0
printf "No File '%s'!~n~RPC ID: %d, RPC Name: %s ~n~(Incoming)" 500 "CLEO\RecordR-P.txt" 2@ 3@
0BE0: raknet hook_ret 1
jump @Label0003AF
0BE0: raknet hook_ret 1
if
  0@ == 1
else_jump @Label0004D0
0BE5: raknet 2@ = get_hook_param 1
0BF8: raknet 3@ = get_rpc_name 2@
if
0AAB:   file_exists "CLEO\RecordR-P.txt"
else_jump @Label00046C
4@ = File.Open("CLEO\RecordR-P.txt", "at")
0AD9: write_formatted_text "RPC ID: %d, RPC Name: %s (Outcoming) by AIR %c" in_file 4@ 2@ 3@ 10
printf "~g~Record..." 500
File.Close(4@)
jump @Label0004C5
printf "No File '%s'!~n~RPC ID: %d, RPC Name: %s ~n~(Outcoming)" 500 "CLEO\RecordR-P.txt" 2@ 3@
0BE0: raknet hook_ret 1
jump @Label0004D4
0BE0: raknet hook_ret 1
if
  1@ == 1
else_jump @Label0005FF
0BE5: raknet 2@ = get_hook_param 1
0BF9: raknet 3@ = get_packet_name 2@
if
0AAB:   file_exists "CLEO\RecordR-P.txt"
else_jump @Label000596
4@ = File.Open("CLEO\RecordR-P.txt", "at")
0AD9: write_formatted_text "Packet ID: %d, Packet Name: %s (Incoming) by AIR %c" in_file 4@ 2@ 3@ 10
printf "~g~Record..." 500
File.Close(4@)
jump @Label0005F4
printf "No File '%s'!~n~Packet ID: %d, Packet Name: %s ~n~(Incoming)" 500 "CLEO\RecordR-P.txt" 2@ 3@
0BE0: raknet hook_ret 1
jump @Label000603
0BE0: raknet hook_ret 1
if
  1@ == 1
else_jump @Label000730
0BE5: raknet 2@ = get_hook_param 1
0BF9: raknet 3@ = get_packet_name 2@
if
0AAB:   file_exists "CLEO\RecordR-P.txt"
else_jump @Label0006C6
4@ = File.Open("CLEO\RecordR-P.txt", "at")
0AD9: write_formatted_text "Packet ID: %d, Packet Name: %s (Outcoming) by AIR %c" in_file 4@ 2@ 3@ 10
printf "~g~Record..." 500
File.Close(4@)
jump @Label000725
printf "No File '%s'!~n~Packet ID: %d, Packet Name: %s ~n~(Outcoming)" 500 "CLEO\RecordR-P.txt" 2@ 3@
0BE0: raknet hook_ret 1
jump @Label000734
0BE0: raknet hook_ret 1