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

FYP

FYP

Известный
Автор темы
Администратор
1,758
5,722
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
Реакции: wait(-1), dmnik, hNNy и 43 других
™

™ ChipFamily

По ту сторону надежды.
5,144
1,980
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
DoNaT1k написал(а):
1
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

:Noname_2
0001: wait 100 ms
0AFA:  is_samp_available
004D: jump_if_false @Noname_2
0AC8: 2@ = allocate_memory_size 260
0006: 0@ = 0
0006: 11@ = 87
0006: 12@ = 83
0006: 13@ = 65
0006: 14@ = 68
0B34: samp register_client_command "autozvejyba" to_label @Noname_444

:Noname_78
0001: wait 0 ms
00D6: if
0039:   0@ == 1
004D: jump_if_false @Noname_437
0006: 1@ = 0

:Noname_107
00D6: if
0C5D: samp textdraw 1@ is_exists
004D: jump_if_false @Noname_415
0C5A: samp textdraw 1@ get_string_to 2@
00D6: if
0C29: $4 = stristr string1 2@ string2 "LD_BEAT:"
004D: jump_if_false @Noname_415
00D6: if or
0B21:     samp is_chat_opened
0B4C:  samp is_dialog_active -1
004D: jump_if_false @Noname_212
0C72: set_virtual_key 11@ down 0
0C72: set_virtual_key 12@ down 0
0C72: set_virtual_key 13@ down 0
0C72: set_virtual_key 14@ down 0
0002: jump @Noname_415

:Noname_212
00D6: if
0C29: $4 = stristr string1 2@ string2 "LD_BEAT:down"
004D: jump_if_false @Noname_263
0C72: set_virtual_key 11@ down 1
0001: wait 50 ms
0C72: set_virtual_key 11@ down 0

:Noname_263
00D6: if
0C29: $4 = stristr string1 2@ string2 "LD_BEAT:up"
004D: jump_if_false @Noname_312
0C72: set_virtual_key 12@ down 1
0001: wait 50 ms
0C72: set_virtual_key 12@ down 0

:Noname_312
00D6: if
0C29: $4 = stristr string1 2@ string2 "LD_BEAT:right"
004D: jump_if_false @Noname_364
0C72: set_virtual_key 13@ down 1
0001: wait 50 ms
0C72: set_virtual_key 13@ down 0

:Noname_364
00D6: if
0C29: $4 = stristr string1 2@ string2 "LD_BEAT:left"
004D: jump_if_false @Noname_415
0C72: set_virtual_key 14@ down 1
0001: wait 50 ms
0C72: set_virtual_key 14@ down 0

:Noname_415
000A: 1@ += 1
0019:   1@ > 4096
004D: jump_if_false @Noname_107

:Noname_437
0002: jump @Noname_78

:Noname_444
0001: wait 0 ms
00D6: if
0039:   0@ == 1
004D: jump_if_false @Noname_504
0006: 0@ = 0
0AF8: samp add_message_to_chat "Auto юvejyba iрjungta." color -1
0B43: samp cmd_ret

:Noname_504
00D6: if
0039:   0@ == 0
004D: jump_if_false @Noname_581
0006: 0@ = 1
0AF8: samp add_message_to_chat "Auto юvejyba бjungta, gali pradлti юvejoti!" color -1
0B43: samp cmd_ret

:Noname_581
0B43: samp cmd_ret
2
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
0AC8: 1@ = allocate_memory_size 260
0AC8: 2@ = allocate_memory_size 260
0AC8: 3@ = allocate_memory_size 260
0AC8: 4@ = allocate_memory_size 260

:Noname_34
0001: wait 1000 ms
0AFA:  is_samp_available
004D: jump_if_false @Noname_34

:Noname_48
0001: wait 0 ms
0AB1: call_scm_func @Noname_377 1 99 1@
0AB1: call_scm_func @Noname_377 1 98 2@
0AB1: call_scm_func @Noname_377 1 97 3@
00D6: if or
0AD4: $4 = scan_string 1@ format "Pagavai юuvб, tai {37DB45}%s" $4
0AD4: $4 = scan_string 2@ format "Pagavai юuvб, tai {37DB45}%s" $4
0AD4: $4 = scan_string 3@ format "Pagavai юuvб, tai {37DB45}%s" $4
004D: jump_if_false @Noname_48
0AF0: 20@ = get_int_from_ini_file "cleo\zvejybosbot.ini" section "autozvejyba" key "minlaikas"
0AF0: 21@ = get_int_from_ini_file "cleo\zvejybosbot.ini" section "autozvejyba" key "maxlaikas"
0209: 22@ = random_int_in_ranges 20@ 21@
0001: wait 22@ ms
0AF9: samp say_msg "/zvejoti"
0001: wait 10000 ms
0002: jump @Noname_48

:Noname_377
0AB1: call_scm_func @Noname_451 0 1@
000A: 1@ += 2203876
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0
000A: 1@ += 310
0012: 0@ *= 252
005A: 1@ += 0@ // (int)
000A: 1@ += 28
0AB2: ret 1 1@

:Noname_451
0AA2: 31@ = load_library "kernel32.dll" // IF and SET
0AA4: 30@ = get_proc_address "GetModuleHandleA" library 31@ // IF and SET
0AA7: call_function 30@ num_params 1 pop 0 "samp.dll" 0@
0AB2: ret 1 0@
3
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

:Noname_2
0001: wait 100 ms
0AFA:  is_samp_available
004D: jump_if_false @Noname_2
0AC8: 19@ = allocate_memory_size 260
0AC8: 20@ = allocate_memory_size 260
0AC8: 29@ = allocate_memory_size 260
0006: 0@ = 0
0006: 2@ = 0
0006: 3@ = 0
0B6D: render 10@ = create_font "IMPACT" height 14 flags 8
0B34: samp register_client_command "parasas" to_label @Noname_1070
0B00: delete_file "cleo/cleo_saves/parasas.png" // IF and SET

:Noname_124
0001: wait 0 ms
00D6: if
0039:   0@ == 1
004D: jump_if_false @Noname_900
0B5A: get_screen_resolution 23@ 24@
000E: 23@ -= 420
000E: 24@ -= 250
0006: 25@ = 160
0006: 26@ = 200
005A: 25@ += 24@ // (int)
005A: 26@ += 24@ // (int)
0AD3: 20@ = format "http:%c%csarg.lt/signature/%s/66FF00/FFFFFF/1.png" 47 47 29@
0C65: 21@ = download_url 20@ to_file "cleo/cleo_saves/parasas.png"
0006: 22@ = -1

:Noname_310
0039:   22@ == -1
004D: jump_if_false @Noname_369
0001: wait 0 ms
0C66: 22@ = get_download 21@ state
0B6F: render font 10@ draw_text "Laukiama..." pos 23@ 24@ color -1
0002: jump @Noname_310

:Noname_369
0C7D: release_download 21@
0B71: render 1@ = load_texture_from_file "cleo/cleo_saves/parasas.png"
0B00: delete_file "cleo/cleo_saves/parasas.png" // IF and SET
0AD3: 20@ = format "http:%c%csarg.lt/signature/%s/0/0/1.png" 47 47 29@
0C65: 21@ = download_url 20@ to_file "cleo/cleo_saves/parasas.png"
0006: 22@ = -1

:Noname_537
0039:   22@ == -1
004D: jump_if_false @Noname_596
0001: wait 0 ms
0C66: 22@ = get_download 21@ state
0B6F: render font 10@ draw_text "Laukiama..." pos 23@ 24@ color -1
0002: jump @Noname_537

:Noname_596
0C7D: release_download 21@
0B71: render 8@ = load_texture_from_file "cleo/cleo_saves/parasas.png"
0B00: delete_file "cleo/cleo_saves/parasas.png" // IF and SET
0AD3: 20@ = format "http:%c%csarg.lt/signature/%s/1/0/1.png" 47 47 29@
0C65: 21@ = download_url 20@ to_file "cleo/cleo_saves/parasas.png"
0006: 22@ = -1

:Noname_764
0039:   22@ == -1
004D: jump_if_false @Noname_823
0001: wait 0 ms
0C66: 22@ = get_download 21@ state
0B6F: render font 10@ draw_text "Laukiama..." pos 23@ 24@ color -1
0002: jump @Noname_764

:Noname_823
0C7D: release_download 21@
0B71: render 9@ = load_texture_from_file "cleo/cleo_saves/parasas.png"
0B00: delete_file "cleo/cleo_saves/parasas.png" // IF and SET
0006: 2@ = 1

:Noname_900
0001: wait 0 ms
00D6: if
0039:   2@ == 1
004D: jump_if_false @Noname_124
0B6F: render font 10@ draw_text "Blogas V_P!" pos 23@ 24@ color -1
0B73: render draw_texture 1@ pos 23@ 24@ size 410 160 rotation 0 color -1
0B73: render draw_texture 8@ pos 23@ 25@ size 410 40 rotation 0 color -1
0B73: render draw_texture 9@ pos 23@ 26@ size 410 40 rotation 0 color -1
000A: 3@ += 1
00D6: if
04B5:   3@ >= 500 // @ >= constant
004D: jump_if_false @Noname_1063
0006: 0@ = 0
0006: 2@ = 0
0006: 3@ = 0
0002: jump @Noname_124

:Noname_1063
0002: jump @Noname_900

:Noname_1070
0001: wait 0 ms
0B35: samp 29@ = get_last_command_params
00D6: if
0039:   2@ == 0
004D: jump_if_false @Noname_1104
0006: 0@ = 1

:Noname_1104
0B43: samp cmd_ret
Нажмите для раскрытия...
Декриптор by Тим?
 
D

DarkL1ght

Новичок
252
112
MAHEKEH написал(а):
Please
Нажмите для раскрытия...
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
03A4: name_thread "HP_HUD_Editor"

:HP_HUD_Editor_34
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @HP_HUD_Editor_34
0AF8: samp add_message_to_chat "Moneycolor by Black Jesus" color 9902251 
0001: wait 0 ms
00D6: if
0AAB:   file_exists "CLEO\moneycolor.ini"
004D: jump_if_false @HP_HUD_Editor_412
0AF0: 1@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_WAIT"
0AF0: 2@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_1"
0AF0: 3@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_2"
0AF0: 4@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_3"
0AF0: 5@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_4"
0AF0: 6@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_5"
0002: jump @HP_HUD_Editor_706

:HP_HUD_Editor_412
0AF1: write_int 100 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_WAIT"
0AF1: write_int 9702251 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_1"
0AF1: write_int 9702251 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_2"
0AF1: write_int 9702251 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_3"
0AF1: write_int 9702251 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_4"
0AF1: write_int 9702251 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_5"

:HP_HUD_Editor_706
0001: wait 0 ms
00D6: if
0256:   player 0 defined
004D: jump_if_false @HP_HUD_Editor_706
00D6: if
0AB0:   key_pressed 106
0002: jump @HP_HUD_Editor_740

:HP_HUD_Editor_740
0001: wait 0 ms
0AF0: 1@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_WAIT"
0AF0: 2@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_1"
0AF0: 3@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_2"
0AF0: 4@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_3"
0AF0: 5@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_4"
0AF0: 6@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_5"
0A8C: write_memory 12235312 size 4 value 2@ virtual_protect 1
0001: wait 1@ ms
0A8C: write_memory 12235312 size 4 value 3@ virtual_protect 1
0001: wait 1@ ms
0A8C: write_memory 12235312 size 4 value 4@ virtual_protect 1
0001: wait 1@ ms
0A8C: write_memory 12235312 size 4 value 5@ virtual_protect 1
0001: wait 1@ ms
0A8C: write_memory 12235312 size 4 value 6@ virtual_protect 1
0001: wait 1@ ms
00D6: if
8AB0:   not key_pressed 106
004D: jump_if_false @HP_HUD_Editor_706
0002: jump @HP_HUD_Editor_740
 
Freym

Freym

Известный
487
203
Декриптни,Спасибо.
 

Вложения

  • Fmop v2.cs
    19.7 KB · Просмотры: 5
R

rraggerr

проверенный какой-то
1,626
846
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
плэс
 

Вложения

  • fake_time.cs
    1,010 байт · Просмотры: 7
asdzxcjqwe

asdzxcjqwe

¯\_(ツ)_/¯
Друг
621
704
MAHEKEH написал(а):
Пж
Нажмите для раскрытия...
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
thread "HP_HUD_Editor"

:Label000022
wait 0
   SAMP.Available
else_jump @Label000022
chatmsg "Moneycolor by Black Jesus" 0x9718AB
wait 0
if
0AAB:   file_exists "CLEO\moneycolor.ini"
else_jump @Label00019C
0AF0: 1@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_WAIT"
0AF0: 2@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_1"
0AF0: 3@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_2"
0AF0: 4@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_3"
0AF0: 5@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_4"
0AF0: 6@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_5"
jump @Label0002C2

:Label00019C
0AF1: write_int 0x64 to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_WAIT"
0AF1: write_int 0x940B6B to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_1"
0AF1: write_int 0x940B6B to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_2"
0AF1: write_int 0x940B6B to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_3"
0AF1: write_int 0x940B6B to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_4"
0AF1: write_int 0x940B6B to_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_5"

:Label0002C2
wait 0
if
   Player.Defined(0)
else_jump @Label0002C2
if
key_down 106
jump @Label0002E4

:Label0002E4
wait 0
0AF0: 1@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_WAIT"
0AF0: 2@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_1"
0AF0: 3@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_2"
0AF0: 4@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_3"
0AF0: 5@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_4"
0AF0: 6@ = get_int_from_ini_file "CLEO\moneycolor.ini" section "MONEYCOLOR" key "COLOR_5"
0A8C: write_memory 0xBAB230 size 4 value 2@ virtual_protect 1
wait 1@
0A8C: write_memory 0xBAB230 size 4 value 3@ virtual_protect 1
wait 1@
0A8C: write_memory 0xBAB230 size 4 value 4@ virtual_protect 1
wait 1@
0A8C: write_memory 0xBAB230 size 4 value 5@ virtual_protect 1
wait 1@
0A8C: write_memory 0xBAB230 size 4 value 6@ virtual_protect 1
wait 1@
if
   not key_down 0x6A
else_jump @Label0002C2
jump @Label0002E4


rraggerr написал(а):
плэс
Нажмите для раскрытия...
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 "Fake Time: Arizona-Rp"
0662: printstring "Автор скрипта: Ded_Fedot"
0662: printstring "Контакты: vk.com/idedfedot"

:Label000064
wait 0
   SAMP.Available
jf @Label000064
0B34: samp register_client_command "ftm" to_label @Label0000A8
alloc 5@ 128
alloc 7@ 128
alloc 8@ 128
alloc 9@ 128

:Label00009D
wait 0
goto @Label00009D

:Label0000A8
   SAMP.IsCommandTyped(0@)
if
0AD4: 4@ = scan_string 0@ format "%d %s %d %d %d" 5@ 16@v 7@ 8@ 9@
jf @Label000155
0605: actor $PLAYER_ACTOR perform_animation "Coplook_watch" IFP "COP_AMBIENT" framedelta 4.1 loop 0 lockX 0 lockY 0 lockF 0 time -1
0ACF: show_formatted_styled_text "~y~%d %s~n~~w~%d:%d~n~~g~played ~w~%d min." time 3000 style 2 5@ 16@v 7@ 8@ 9@
SAMP.CmdRet

:Label000155
chatmsg "{FF3D3D}Ошибка: {FFFFFF}/ftm {F0CD59}[День] [Месяц] {FFFFFF}[Часы] [Минуты] {5DAC4A}[Онлайн]" -1
SAMP.CmdRet


декриптор для funcprotector всё еще работает, стоило проверить самим
 
  • Нравится
Реакции: MAHEKEH
LaRossa

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Уася1337 написал(а):
плез
Нажмите для раскрытия...
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

:Noname_2
wait 0
   SAMP.Available
else_jump @Noname_2
0B34: samp register_client_command "bot_tp" to_label @Noname_1351
0B34: samp register_client_command "bot_farm" to_label @Noname_1026

:Noname_47
wait 0
if
  0@ == 1
else_jump @Noname_962

:Noname_69                                             
wait 0
if
  0@ == 1
else_jump @Noname_125
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -105.6598 100.0832
jump @Noname_132

:Noname_125
jump @Noname_166

:Noname_132
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -105.6598 100.0832 radius 0.2 0.2 on_foot
else_jump @Noname_69

:Noname_166
call @Noname_969 0

:Noname_176
wait 0
if
  0@ == 1
else_jump @Noname_232
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -106.8536 92.3437
jump @Noname_239

:Noname_232
jump @Noname_273

:Noname_239
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -106.8536 92.3437 radius 0.2 0.2 on_foot
else_jump @Noname_176

:Noname_273
call @Noname_969 0

:Noname_283
wait 0
if
  0@ == 1
else_jump @Noname_339
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -99.4389 59.712
jump @Noname_346

:Noname_339
jump @Noname_380

:Noname_346
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -99.4389 59.712 radius 0.2 0.2 on_foot
else_jump @Noname_283

:Noname_380
wait 0
if
  0@ == 1
else_jump @Noname_436
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -73.6303 34.5414
jump @Noname_443

:Noname_436
jump @Noname_477

:Noname_443
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -73.6303 34.5414 radius 0.2 0.2 on_foot
else_jump @Noname_380

:Noname_477
wait 0
if
  0@ == 1
else_jump @Noname_533
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -49.1097 26.0075
jump @Noname_540

:Noname_533
jump @Noname_574

:Noname_540
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -49.1097 26.0075 radius 0.2 0.2 on_foot
else_jump @Noname_477

:Noname_574
wait 0
if
  0@ == 1
else_jump @Noname_630
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -74.3477 34.6517
jump @Noname_637

:Noname_630
jump @Noname_671

:Noname_637
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -74.3477 34.6517 radius 0.2 0.2 on_foot
else_jump @Noname_574

:Noname_671
wait 0
if
  0@ == 1
else_jump @Noname_727
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -96.0434 56.8801
jump @Noname_734

:Noname_727
jump @Noname_768

:Noname_734
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -96.0434 56.8801 radius 0.2 0.2 on_foot
else_jump @Noname_671

:Noname_768
wait 0
if
  0@ == 1
else_jump @Noname_824
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -105.4906 81.6758
jump @Noname_831

:Noname_824
jump @Noname_865

:Noname_831
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -105.4906 81.6758 radius 0.2 0.2 on_foot
else_jump @Noname_768

:Noname_865
wait 0
if
  0@ == 1
else_jump @Noname_921
SAMP.SetGameKeyState(1, -255)
call @Noname_1295 2 -105.8174 94.5329
jump @Noname_928

:Noname_921
jump @Noname_962

:Noname_928
00ED:   actor $PLAYER_ACTOR sphere 0 near_point -105.8174 94.5329 radius 0.2 0.2 on_foot
else_jump @Noname_865

:Noname_962
jump @Noname_47

:Noname_969
0@ = 0

:Noname_976
if
0C5D: samp textdraw 0@ is_exists
else_jump @Noname_997
0BCA: samp send_click_textdraw 0@

:Noname_997
0@ += 1
  0@ > 50000
else_jump @Noname_976
ret 0

:Noname_1026
wait 0
if
   not 0@ == 1
else_jump @Noname_1173
chatmsg "{FF8000} [Фермер]{9AFE2E} Активирован!{58ACFA} Автор: Kuleer Пишу скрипты под заказ: vk.com/krasnopiorik" -1
0@ = 1
jump @Noname_1293

:Noname_1173
chatmsg "{FF8000} [Фермер]{FF0000} Деактивирован!{58ACFA} Автор: Kuleer Пишу скрипты под заказ: vk.com/krasnopiorik" -1
0@ = 0

:Noname_1293
SAMP.CmdRet

:Noname_1295
Actor.StorePos($PLAYER_ACTOR, 2@, 3@, 4@)
0063: 0@ -= 2@ // (float)
0063: 1@ -= 3@ // (float)
0604: get_Z_angle_for_point 0@ 1@ store_to 5@
Actor.Angle($PLAYER_ACTOR) = 5@
Camera.Restore_WithJumpCut
ret 0

:Noname_1351
wait 0
Actor.PutAt($PLAYER_ACTOR, -85.6306, 83.2417, 3.1172)
SAMP.CmdRet
 
  • Нравится
Реакции: SiTrak и DarkL1ght
sаnеk

sаnеk

Всефорумный sanek
Друг
2,107
2,057
MAHEKEH написал(а):
:-[
Нажмите для раскрытия...
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

:Noname_2
wait 400
   SAMP.Available
else_jump @Noname_2
30@ = Render.CreateFont("Segoe UI", 12, 1)
0B34: samp register_client_command "bcfg" to_label @Noname_940
0B34: samp register_client_command "bh" to_label @Noname_949
alloc 10@ 16
gosub @Noname_1002
if
  25@ == 1
else_jump @Noname_141
chatmsg "Bone-hp by{0e7575} KENNEX{ffffff} | loaded." -1

:Noname_141
wait 0
if
  24@ == 1
else_jump @Noname_888
call @Noname_895 5 $PLAYER_ACTOR 1 2@ 3@ 4@ 5@ 6@ 7@
SAMP.Convert3DCoordsToScreen(5@, 6@, 7@, 5@, 6@)
29@ = Actor.Health($PLAYER_ACTOR)
if
   not 29@ > 100
else_jump @Noname_256
29@ *= 1.1
jump @Noname_263

:Noname_256
29@ = 110

:Noname_263
5@ -= 60
Render.DrawBorderedBox(5@, 6@, 29@, 16, 21@, 0, -1442840576)
Render.DrawBorderedBox(5@, 6@, 110, 16, 22@, 14@, -16777216)
if
  26@ == 1
else_jump @Noname_462
04DD: 9@ = actor $PLAYER_ACTOR armour
if
  9@ > 0
else_jump @Noname_462
if
   not 9@ > 100
else_jump @Noname_395
9@ *= 1.1
jump @Noname_402

:Noname_395
9@ = 110

:Noname_402
6@ -= 26
Render.DrawBorderedBox(5@, 6@, 9@, 16, 23@, 0, -1442840576)
Render.DrawBorderedBox(5@, 6@, 110, 16, 22@, 14@, -16777216)
6@ += 26

:Noname_462
if
  13@ == 1
else_jump @Noname_494
5@ += 23
jump @Noname_551

:Noname_494
if
  13@ == 2
else_jump @Noname_526
5@ += 55
jump @Noname_551

:Noname_526
if
  13@ == 3
else_jump @Noname_551
5@ += 86

:Noname_551
if
  15@ == 1
else_jump @Noname_695
5@ -= 16
Render.DrawBorderedBox(5@, 6@, 34, 16, 1677721600, 1, -1442840576)
5@ += 16
if
  26@ == 1
else_jump @Noname_695
if
  9@ > 0
else_jump @Noname_695
6@ -= 26
5@ -= 16
Render.DrawBorderedBox(5@, 6@, 34, 16, 1677721600, 1, -1442840576)
6@ += 26
5@ += 16

:Noname_695
29@ = Actor.Health($PLAYER_ACTOR)
format 10@ "%d" 29@
12@ = 0
12@ = Render.FontDrawLength(30@, 10@)
12@ /= 2
0062: 5@ -= 12@ // (int)
6@ -= 4
Render.DrawText(30@, 10@, 5@, 6@, 20@)
005A: 5@ += 12@ // (int)
if
  26@ == 1
else_jump @Noname_888
04DD: 9@ = actor $PLAYER_ACTOR armour
if
  9@ > 0
else_jump @Noname_888
format 10@ "%d" 9@
12@ = Render.FontDrawLength(30@, 10@)
12@ /= 2
0062: 5@ -= 12@ // (int)
6@ -= 26
Render.DrawText(30@, 10@, 5@, 6@, 20@)

:Noname_888
jump @Noname_141

:Noname_895
0A96: 8@ = actor 0@ struct
0AA6: call_method 6160832 struct 8@ num_params 3 pop 0 1 1@ 2@v 
ret 3 2@ 3@ 4@

:Noname_940
gosub @Noname_1002
SAMP.CmdRet

:Noname_949
0B12: 24@ = 24@ XOR 1
0AF1: write_int 24@ to_ini_file "cleo\bone-hp.ini" section "Main" key "Activation"
SAMP.CmdRet

:Noname_1002
if
0AAB:   file_exists "cleo\bone-hp.ini"
else_jump @Noname_1911
0AF0: 16@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Text" key "A"
0AF0: 17@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Text" key "R"
0AF0: 18@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Text" key "G"
0AF0: 19@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Text" key "B"
0B67: render a 16@ r 17@ g 18@ b 19@ to_argb 20@
0AF0: 16@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Armour" key "A"
0AF0: 17@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Armour" key "R"
0AF0: 18@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Armour" key "G"
0AF0: 19@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Armour" key "B"
0B67: render a 16@ r 17@ g 18@ b 19@ to_argb 23@
0AF0: 16@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Health" key "A"
0AF0: 17@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Health" key "R"
0AF0: 18@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Health" key "G"
0AF0: 19@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Health" key "B"
0B67: render a 16@ r 17@ g 18@ b 19@ to_argb 21@
0AF0: 16@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Background" key "A"
0AF0: 17@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Background" key "R"
0AF0: 18@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Background" key "G"
0AF0: 19@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Background" key "B"
0B67: render a 16@ r 17@ g 18@ b 19@ to_argb 22@
0AF0: 24@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Main" key "Activation"
0AF0: 26@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Main" key "ActivationArmour"
0AF0: 25@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Main" key "Show message author"
0AF0: 14@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Main" key "Border"
0AF0: 15@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Main" key "Square"
0AF0: 13@ = get_int_from_ini_file "cleo\bone-hp.ini" section "Main" key "Text-pos"
jump @Noname_2700

:Noname_1911
0AF1: write_int 1 to_ini_file "cleo\bone-hp.ini" section "Main" key "Show message author"
0AF1: write_int 1 to_ini_file "cleo\bone-hp.ini" section "Main" key "Activation"
0AF1: write_int 1 to_ini_file "cleo\bone-hp.ini" section "Main" key "ActivationArmour"
0AF1: write_int 2 to_ini_file "cleo\bone-hp.ini" section "Main" key "Border"
0AF1: write_int 1 to_ini_file "cleo\bone-hp.ini" section "Main" key "Square"
0AF1: write_int 1 to_ini_file "cleo\bone-hp.ini" section "Main" key "Text-pos"
0AF1: write_int 255 to_ini_file "cleo\bone-hp.ini" section "Text" key "A"
0AF1: write_int 204 to_ini_file "cleo\bone-hp.ini" section "Text" key "R"
0AF1: write_int 204 to_ini_file "cleo\bone-hp.ini" section "Text" key "G"
0AF1: write_int 204 to_ini_file "cleo\bone-hp.ini" section "Text" key "B"
0AF1: write_int 200 to_ini_file "cleo\bone-hp.ini" section "Health" key "A"
0AF1: write_int 255 to_ini_file "cleo\bone-hp.ini" section "Health" key "R"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Health" key "G"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Health" key "B"
0AF1: write_int 200 to_ini_file "cleo\bone-hp.ini" section "Armour" key "A"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Armour" key "R"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Armour" key "G"
0AF1: write_int 255 to_ini_file "cleo\bone-hp.ini" section "Armour" key "B"
0AF1: write_int 100 to_ini_file "cleo\bone-hp.ini" section "Background" key "A"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Background" key "R"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Background" key "G"
0AF1: write_int 0 to_ini_file "cleo\bone-hp.ini" section "Background" key "B"

:Noname_2700
return
 
  • Нравится
Реакции: MAHEKEH
Войдите или зарегистрируйтесь для ответа.

Похожие темы

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