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

[FYP]

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

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

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

 

[LaRossa]

Посмотреть вложение 11430

А сам исправить не можешь ??

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

0000: NOP

:Noname_2
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @Noname_2
00D6: if
0038:   $707 == 0
004D: jump_if_false @Noname_35
0A93: end_custom_thread

:Noname_35
00D6: if
0AAB:   file_exists "cleo\save_settings\settings.ini"
004D: jump_if_false @Noname_88
0002: jump @Noname_144

:Noname_88
0AF8: samp add_message_to_chat "{919191}[Error] Файл settings.ini не найден!" color 9539985 
0A93: end_custom_thread

:Noname_144
0B34: samp register_client_command "nhelp" to_label @Noname_1386
0B34: samp register_client_command "nkey" to_label @Noname_1651
0B34: samp register_client_command "npos" to_label @Noname_1854
0B34: samp register_client_command "ntime" to_label @Noname_2161
0B34: samp register_client_command "nsbiv" to_label @Noname_2382
0B34: samp register_client_command "nalomka" to_label @Noname_2622
0B78: log "USEDRUGS >> ACTIVE [by Alllss]"

:Noname_263
0001: wait 0 ms
00D6: if
056D:   actor $PLAYER_ACTOR defined
004D: jump_if_false @Noname_1370
0AC8: 1@ = allocate_memory_size 64
0AC8: 2@ = allocate_memory_size 64
0AC8: 3@ = allocate_memory_size 64
0AC8: 4@ = allocate_memory_size 64
0AC8: 5@ = allocate_memory_size 64
0AC8: 6@ = allocate_memory_size 64
0AF0: 1@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "SelectKey" key "Key"
0AF2: 2@ = get_float_from_ini_file "cleo\save_settings\settings.ini" section "Position" key "X"
0AF2: 3@ = get_float_from_ini_file "cleo\save_settings\settings.ini" section "Position" key "Y"
0AF0: 4@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "SelectTime" key "Time"
0AF0: 5@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "Sbiv" key "Active"
0AF0: 6@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "AutoUsedrugs" key "Active"
0B6D: render 0@ = create_font "Arial" height 11 flags 5

:Noname_665
0001: wait 0 ms
0B60: convert_game_screen_coords 2@ 3@ to_window_screen_coords 7@ 8@
0AC8: 9@ = allocate_memory_size 64
0AC8: 10@ = allocate_memory_size 260
0AD3: 9@ = format "Можно юзать!" 
0B6F: render font 0@ draw_text 9@ pos 7@ 8@ color -16724992
0B75: samp get_chat_string 99 text_to 10@ prefix_to 11@ color_to 11@ prefix_color_to 11@
0AC9: free_allocated_memory 9@
0AC9: free_allocated_memory 10@
0226: 12@ = actor $PLAYER_ACTOR health
00D6: if and
0039:   6@ == 1
0C29: 13@ = stristr string1 10@ string2 "Принять наркотик - /usedrugs"
004D: jump_if_false @Noname_899
0AF9: samp say_msg "/usedrugs 1" 
00D6: if
0039:   5@ == 1
004D: jump_if_false @Noname_878
0001: wait 250 ms
0687: clear_actor $PLAYER_ACTOR task
0002: jump @Noname_878

:Noname_878
0006: 14@ = 1
0006: 15@ = 1
0002: jump @Noname_1034

:Noname_899
00D6: if
0AB0:   key_pressed 1@
004D: jump_if_false @Noname_1034
00D6: if
8B21:   not samp is_chat_opened
004D: jump_if_false @Noname_1034
00D6: if and
0029:   12@ >= 151
8019:   not  12@ > 160
004D: jump_if_false @Noname_1027
0AF9: samp say_msg "/usedrugs 1" 
00D6: if
0039:   5@ == 1
004D: jump_if_false @Noname_1006
0001: wait 250 ms
0687: clear_actor $PLAYER_ACTOR task
0002: jump @Noname_1006

:Noname_1006
0006: 14@ = 1
0006: 15@ = 1
0002: jump @Noname_1034

:Noname_1027
0006: 14@ = 1

:Noname_1034
0039:   14@ == 1
004D: jump_if_false @Noname_665
0006: 14@ = 0
0C74: 16@ = create_timer_interval 1000 on_label @Noname_1377
0226: 12@ = actor $PLAYER_ACTOR health
0006: 17@ = 160
0062: 17@ -= 12@ // (int)
0016: 17@ /= 10
00D6: if
0029:   17@ >= 16
004D: jump_if_false @Noname_1124
0006: 17@ = 15

:Noname_1124
00D6: if
8039:   not  15@ == 1
004D: jump_if_false @Noname_1213
0AF9: samp say_msg "/usedrugs %d" 17@ 
00D6: if
0039:   5@ == 1
004D: jump_if_false @Noname_1206
00D6: if
80DF:   not actor $PLAYER_ACTOR driving
004D: jump_if_false @Noname_1206
0001: wait 250 ms
0687: clear_actor $PLAYER_ACTOR task

:Noname_1206
0002: jump @Noname_1213

:Noname_1213
0006: 15@ = 0

:Noname_1220
0001: wait 0 ms
0AC8: 18@ = allocate_memory_size 64
0C7C: 19@ = get_timer 16@ time_left
0016: 19@ /= 100
0AD3: 18@ = format "Осталось %d.%dсек." 4@ 19@ 
0B6F: render font 0@ draw_text 18@ pos 7@ 8@ color -1
0AC9: free_allocated_memory 18@
8019:   not  4@ > -1
004D: jump_if_false @Noname_1220
0C78: set_timer 16@ active 0
018C: play_sound 1057 at 0.0 0.0 0.0
0AC9: free_allocated_memory 1@
0AC9: free_allocated_memory 2@
0AC9: free_allocated_memory 3@
0AC9: free_allocated_memory 4@
0AC9: free_allocated_memory 5@
0AC9: free_allocated_memory 6@

:Noname_1370
0002: jump @Noname_263

:Noname_1377
000E: 4@ -= 1
0B43: samp cmd_ret

:Noname_1386
0AC6: 20@ = label @Noname_1437 offset
0B3B: samp show_dialog id 3222 caption "{FF8C00}Информация" text 20@ button_1 "Выход" button_2 "" style 0
0B43: samp cmd_ret

:Noname_1437
hex
2F 6E 6B 65 79 20 2D 20 D3 F1 F2 E0 ED EE E2 E8
F2 FC 20 EA EB E0 E2 E8 F8 F3 20 E0 EA F2 E8 E2
E0 F6 E8 E8 0A 2F 6E 74 69 6D 65 20 2D 20 D3 F1
F2 E0 ED EE E2 E8 F2 FC 20 E8 ED F2 E5 F0 E2 E0
EB 20 F2 E0 E9 EC E5 F0 E0 2E 0A 2F 6E 70 6F 73
20 2D 20 D3 F1 F2 E0 ED EE E2 E8 F2 FC 20 EF EE
E7 E8 F6 E8 FE 20 F2 E5 EA F1 F2 E0 20 ED E0 20
FD EA F0 E0 ED E5 2E 0A 2F 6E 73 62 69 76 20 2D
20 D1 E1 E8 E2 E0 F2 FC 20 E0 ED E8 EC E0 F6 E8
FE 3F 20 5B 31 2D C4 E0 7C 30 2D CD E5 F2 5D 0A
2F 6E 61 6C 6F 6D 6B 61 20 2D 20 D3 EF EE F2 F0
E5 E1 EB FF F2 FC 20 ED E0 F0 EA EE 20 EF F0 E8
20 EB EE EC EA E5 3F 20 5B 31 2D C4 E0 7C 30 2D
CD E5 F2 5D A0 00
end

:Noname_1651
0B35: samp 21@ = get_last_command_params
00D6: if
0AD4: 22@ = scan_string 21@ format "%d" 1@ 
004D: jump_if_false @Noname_1852
0AF8: samp add_message_to_chat "{FF8C00}Клавиша активации была изменена на [ID:%d]" color 16747520 1@ 
0AF1: write_int 1@ to_ini_file "cleo\save_settings\settings.ini" section "SelectKey" key "Key"
0002: jump @Noname_1852
0AF8: samp add_message_to_chat "{FF8C00}Используйте /nkey - [keyID]" color 16747520 

:Noname_1852
0B43: samp cmd_ret

:Noname_1854
0B35: samp 21@ = get_last_command_params
00D6: if
0AD4: 22@ = scan_string 21@ format "%d %d" 2@ 3@ 
004D: jump_if_false @Noname_2108
0093: 2@ = integer 2@ to_float
0093: 3@ = integer 3@ to_float
0AF8: samp add_message_to_chat "{FF8C00}Кординаты текста на экране были изменены на [PosX - %f | PosY - %f]" color 16747520 2@ 3@ 
0AF3: write_float 2@ to_ini_file "cleo\save_settings\settings.ini" section "Position" key "X"
0AF3: write_float 3@ to_ini_file "cleo\save_settings\settings.ini" section "Position" key "Y"
0002: jump @Noname_2159

:Noname_2108
0AF8: samp add_message_to_chat "{FF8C00}Используйте /npos - [PosX] [PosY]" color 16747520 

:Noname_2159
0B43: samp cmd_ret

:Noname_2161
0B35: samp 21@ = get_last_command_params
00D6: if
0AD4: 22@ = scan_string 21@ format "%d" 4@ 
004D: jump_if_false @Noname_2336
000E: 4@ -= 1
0085: 23@ = 4@ // (int)
000A: 23@ += 1
0AF8: samp add_message_to_chat "{FF8C00}Время таймера было изменено на %dсек." color 16747520 23@ 
0AF1: write_int 4@ to_ini_file "cleo\save_settings\settings.ini" section "SelectTime" key "Time"
0002: jump @Noname_2380

:Noname_2336
0AF8: samp add_message_to_chat "{FF8C00}Используйте /ntime - [sec]" color 16747520 

:Noname_2380
0B43: samp cmd_ret

:Noname_2382
0B35: samp 21@ = get_last_command_params
00D6: if
0AD4: 22@ = scan_string 21@ format "%d" 5@ 
004D: jump_if_false @Noname_2557
0AF8: samp add_message_to_chat "{FF8C00}Значение сбива анимации изменено на %d [1-Включено|0-Отключено]" color 16747520 5@ 
0AF1: write_int 5@ to_ini_file "cleo\save_settings\settings.ini" section "Sbiv" key "Active"
0002: jump @Noname_2620

:Noname_2557
0AF8: samp add_message_to_chat "{FF8C00}Используйте /nsbiv - [1-Включено|0-Отключено]" color 16747520 

:Noname_2620
0B43: samp cmd_ret

:Noname_2622
0B35: samp 21@ = get_last_command_params
00D6: if
0AD4: 22@ = scan_string 21@ format "%d" 6@ 
004D: jump_if_false @Noname_2823
0AF8: samp add_message_to_chat "{FF8C00}Значение автоупотребления нарко при ломке изменено на %d [1-Включено|0-Отключено]" color 16747520 6@ 
0AF1: write_int 6@ to_ini_file "cleo\save_settings\settings.ini" section "AutoUsedrugs" key "Active"
0002: jump @Noname_2888

:Noname_2823
0AF8: samp add_message_to_chat "{FF8C00}Используйте /nalomka - [1-Включено|0-Отключено]" color 16747520 

:Noname_2888
0B43: samp cmd_ret

 

[MAHEKEH]

А сам исправить не можешь ??

Нет,и дописать хекс тож :pidrila:

 

[bomber!]

уже кидали, выше надо искать

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

//-------------MAIN---------------
0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:Label00011F
wait 0
   SAMP.Available
jf @Label00011F

:Label00012C
wait 0
if and
   not Actor.Driving($PLAYER_ACTOR)
   not SAMP.ChatInputOpened
key_down 81
   SAMP.IsLocalPlayerSpawned
jf @Label000183
0812: AS_actor $PLAYER_ACTOR perform_animation "HIT_WALK" IFP "PED" framedelta 6.0 loopA 0 lockX 1 lockY 1 lockF 0 time 1 // versionB
0393: actor $PLAYER_ACTOR perform_animation "HIT_WALK" at 18.0 times_normal_rate
wait 100

:Label000183
goto @Label00012C

а можно без рекламы? у меня не компилируется(

 

[MaIIoy]

а можно без рекламы? у меня не компилируется(

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

//-------------MAIN---------------
0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:Label00011F
wait 0
   SAMP.Available
jf @Label00011F

:Label00012C
wait 0
if and
   not Actor.Driving($PLAYER_ACTOR)
   not SAMP.ChatInputOpened
key_down 81
   SAMP.IsLocalPlayerSpawned
jf @Label000183
0812: AS_actor $PLAYER_ACTOR perform_animation "HIT_WALK" IFP "PED" framedelta 6.0 loopA 0 lockX 1 lockY 1 lockF 0 time 1 // versionB
0393: actor $PLAYER_ACTOR perform_animation "HIT_WALK" at 18.0 times_normal_rate
wait 100

:Label000183
goto @Label00012C

 

[Lord]

код

 

[Kotaw]

код

{$CLEO .cs}
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end

if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 0
until 0AFA: is_samp_structures_available

0AF8: samp add_message_to_chat "==========================================================================================" color 0xFFFFFF
0AF8: samp add_message_to_chat "" color 0xFFFFFF
0AF8: samp add_message_to_chat "{ff6347}Players Control {FFFFFF}by {e3be88}Chesko {00ff6f}загружен" color 0xFFFFFF
0AF8: samp add_message_to_chat "Используйте {e3be88}/badass {ffffff}для проверки игроков" color 0xFFFFFF
0AF8: samp add_message_to_chat "Используйте {e3be88}/badass 0 {ffffff}для включения/отключения мониторинга (включен автоматически)" color 0xFFFFFF
0AF8: samp add_message_to_chat "Используйте {e3be88}/reload {ffffff}для обновления списка игроков" color 0xFFFFFF
0AF8: samp add_message_to_chat "" color 0xFFFFFF
0AF8: samp add_message_to_chat "==========================================================================================" color 0xFFFFFF

:begin
0AC6: 2@ = label @adminid offset
for 1@ = 0 to 200
0A8C: write_memory 2@ size 2 value 1337 virtual_protect 0
2@ += 2
end
25@ = 1 //Режим мониторинга
var
1@:int
2@:int
3@:int
4@:int
5@:int
end
0B34: samp register_client_command "badass" to_label @admins
0B34: samp register_client_command "reload" to_label @reload

while true
wait 1000
//
    for 1@ = 0 to 200
    //
    0AD3: string_format 2@v format "%d" 1@
    0AC8: 6@ = allocate_memory_size 25
    0AC8: 7@ = allocate_memory_size 25
        if 0AF4: 6@ = read_string_from_ini_file "CLEO\Ches\list.ini" section "list" key 2@v
           0AF4: 7@ = read_string_from_ini_file "CLEO\Ches\list.ini" section "reason" key 2@v
        //if 1
        then
        //if 1                                                                      
        0AC6: 2@ = label @adminid offset
        3@ = 1@
        3@ *= 2
        2@ += 3@ // Offset в буфере админов 2 byte
        0A8D: 3@ = read_memory 2@ size 2 virtual_protect 0
            if 3@ == 1337
            //if 2
            then
            //if 2
            wait 0
                for 3@ = 0 to 1000
                //for 2
                if 0B23: samp is_player_connected 3@
                then
                0B36: samp 4@ = get_player_nickname 3@
                    if 0C14: strcmp string1 4@ string2 6@
                    then
                    0A8C: write_memory 2@ size 2 value 3@ virtual_protect 0
                        if 25@ == 1
                        then
                        0AF8: samp add_message_to_chat "[{ff6347}Players Control{e3be88}] • {FFFFFF}Игрок {e3be88}%s[%d] {00FF6F}подключается {e3be88}• {FF0000}(%s)" color 0xe3be88 6@ 3@ 7@
                        end
                    break
                    else continue
                    end
                else continue
                end
                //for 2
                end
            else
                if 8B23: samp is_player_connected 3@
                then
                0A8C: write_memory 2@ size 2 value 1337 virtual_protect 0
                else
                0B36: samp 4@ = get_player_nickname 3@
                    if 0C14: strcmp string1 4@ string2 6@
                    then continue
                    else
                    0A8C: write_memory 2@ size 2 value 1337 virtual_protect 0
                    end
                end
                if 25@ == 1
                then
                0AF8: samp add_message_to_chat "[{ff6347}Players Control{e3be88}] • {FFFFFF}Игрок {e3be88}%s {FF0000}отключился {e3be88}•" color 0xe3be88 6@
                end
            end    
        //if 1
        else continue
        //if 1
        end
    //
    end
//  
end


:admins
0B35: samp 1@ = get_last_command_params
if 0AD4: 2@ = scan_string 1@ format "%d" 3@
then if 3@ == 0
    then if 25@ == 0
          then
          0AF8: samp add_message_to_chat "[{ff6347}Players Control{e3be88}] • {FFFFFF}Мониторинг включен {e3be88}•" color 0xe3be88
          25@ = 1
          else
          0AF8: samp add_message_to_chat "[{ff6347}Players Control{e3be88}] • {FFFFFF}Мониторинг отключен {e3be88}•" color 0xe3be88
          25@ = 0
          end
    else
    0AF8: samp add_message_to_chat "[{ff6347}Players Control{e3be88}] • {FFFFFF}Используйте /badass 0 для переключения режима мониторинга [ON/OFF] {e3be88}•" color 0xe3be88
    end
0B43: cmd_ret
end
10@ = 0
for 1@ = 0 to 200
0AD3: string_format 2@v format "%d" 1@
0AC8: 7@ = allocate_memory_size 25
0AF4: 7@ = read_string_from_ini_file "CLEO\Ches\list.ini" section "reason" key 2@v
0AC6: 2@ = label @adminid offset
3@ = 1@
3@ *= 2
2@ += 3@ // Offset в буфере админов 2 byte
0A8D: 3@ = read_memory 2@ size 2 virtual_protect 0
if not 3@ == 1337
then
10@ += 1
0B36: samp 4@ = get_player_nickname 3@
0AF8: samp add_message_to_chat "{e3be88}• {FFFFFF}Игрок {e3be88}%s[%d] • {FF0000}(%s)" color 0xe3be88 4@ 3@ 7@
else continue
end
end
if 10@ == 0
then
0AF8: samp add_message_to_chat "{e3be88}• {FFFFFF}Нет игроков онлайн {e3be88}•" color 0xFFFFFF
end
0B43: cmd_ret

:reload
0AF8: samp add_message_to_chat "[{ff6347}Players Control{e3be88}] • {FFFFFF}Список успешно обновлён {e3be88}•" color 0xe3be88
jump @begin
:adminid
hex
000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000
end

 

[whoiamwhoareyou]

код, или кто может сделать шоб ган не скролило но анимки были? тут есть но анимаций нету.

 

[LaRossa]

код, или кто может сделать шоб ган не скролило но анимки были? тут есть но анимаций нету.

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

0662: printstring "==============================================================="
0662: printstring "My VK: vk.com/id138101483"
0662: printstring "My Skype: hackes8"
0662: printstring "Group VK: vk.com/by_air"
0662: printstring "My YouTube Channel: www.youtube.com/spacebmxair"
0662: printstring "All rights reserved ©"
0662: printstring "==============================================================="

:Noname_287
0001: wait 0 ms
0AFA:  is_samp_available
004D: jump_if_false @Noname_287
0006: 0@ = 1
0BE3: raknet setup_incoming_rpc_hook @Noname_411
0B34: samp register_client_command "whook" to_label @Noname_332
0BDE: pause_thread 0

:Noname_332
0B12: 0@ = 0@ XOR 1
0AF8: samp add_message_to_chat "[WeaponHook {CC0000}by AIR{33FF33}]: {FFFFFF}State: %d" color 3407667 0@ 
0B43: samp cmd_ret

:Noname_411
00D6: if
0039:   0@ == 1
004D: jump_if_false @Noname_537
0BE5: raknet 1@ = get_hook_param 1
00D6: if
0039:   1@ == 22
004D: jump_if_false @Noname_500
0BE5: raknet 2@ = get_hook_param 0
0BE7: raknet 3@ = bit_stream_read 2@ type 2
00D6: if or
8029:   not  3@ >= 16
0019:   3@ > 42
004D: jump_if_false @Noname_500
0BE0: raknet hook_ret 0

:Noname_500
00D6: if or
0039:   1@ == 67
0039:   1@ == 145
0039:   1@ == 86
004D: jump_if_false @Noname_537
0BE0: raknet hook_ret 0

:Noname_537
0BE0: raknet hook_ret 1

 

[asdzxcjqwe]

Спасибо за код конечно,но компилировать не удается из за этого параметра.

Посмотреть вложение 11443
Посмотреть вложение 11444

Не понимаю вашей проблемы, код кинули выше раз 500. Всё компилируется, если брать то, что нормально разобрано

// 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

:Label000002
wait 0
   SAMP.Available
jf @Label000002
if
  $707 == 0
jf @Label000023
0A93: end_custom_thread

:Label000023
if
0AAB:   file_exists "cleo\save_settings\settings.ini"
jf @Label000058
goto @Label000090

:Label000058
chatmsg "{919191}[Error] Файл settings.ini не найден!" 9539985
0A93: end_custom_thread

:Label000090
0B34: samp register_client_command "nhelp" to_label @Label00056A
0B34: samp register_client_command "nkey" to_label @Label000673
0B34: samp register_client_command "npos" to_label @Label00073E
0B34: samp register_client_command "ntime" to_label @Label000871
0B34: samp register_client_command "nsbiv" to_label @Label00094E
0B34: samp register_client_command "nalomka" to_label @Label000A3E
log "USEDRUGS >> ACTIVE [by Alllss]"

:Label000107
wait 0
if
056D:   actor $PLAYER_ACTOR defined
jf @Label00055A
alloc 1@ 64
alloc 2@ 64
alloc 3@ 64
alloc 4@ 64
alloc 5@ 64
alloc 6@ 64
0AF0: 1@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "SelectKey" key "Key"
0AF2: 2@ = get_float_from_ini_file "cleo\save_settings\settings.ini" section "Position" key "X"
0AF2: 3@ = get_float_from_ini_file "cleo\save_settings\settings.ini" section "Position" key "Y"
0AF0: 4@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "SelectTime" key "Time"
0AF0: 5@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "Sbiv" key "Active"
0AF0: 6@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "AutoUsedrugs" key "Active"
0@ = Render.CreateFont("Arial", 11, 5)

:Label000299
wait 0
0B60: convert_game_screen_coords 2@ 3@ to_window_screen_coords 7@ 8@
alloc 9@ 64
alloc 10@ 260
format 9@ "Можно юзать!"
Render.DrawText(0@, 9@, 7@, 8@, -16724992)
SAMP.GetChatString(99, 10@, 11@, 11@, 11@)
free 9@
free 10@
12@ = Actor.Health($PLAYER_ACTOR)
if and
  6@ == 1
0C29: 13@ = stristr string1 10@ string2 "Принять наркотик - /usedrugs"
jf @Label000383
say "/usedrugs 1"
if
  5@ == 1
jf @Label00036E
wait 250
0687: clear_actor $PLAYER_ACTOR task
goto @Label00036E

:Label00036E
14@ = 1
15@ = 1
goto @Label00040A

:Label000383
if
key_down 1@
jf @Label00040A
if
   not SAMP.ChatInputOpened
jf @Label00040A
if and
  12@ >= 151
   not 12@ > 160
jf @Label000403
say "/usedrugs 1"
if
  5@ == 1
jf @Label0003EE
wait 250
0687: clear_actor $PLAYER_ACTOR task
goto @Label0003EE

:Label0003EE
14@ = 1
15@ = 1
goto @Label00040A

:Label000403
14@ = 1

:Label00040A
  14@ == 1
jf @Label000299
14@ = 0
0C74: 16@ = create_timer_interval 1000 on_label @Label000561
12@ = Actor.Health($PLAYER_ACTOR)
17@ = 160
0062: 17@ -= 12@ // (int)
17@ /= 10
if
  17@ >= 16
jf @Label000464
17@ = 15

:Label000464
if
   not 15@ == 1
jf @Label0004BD
say "/usedrugs %d" 17@
if
  5@ == 1
jf @Label0004B6
if
   not Actor.Driving($PLAYER_ACTOR)
jf @Label0004B6
wait 250
0687: clear_actor $PLAYER_ACTOR task

:Label0004B6
goto @Label0004BD

:Label0004BD
15@ = 0

:Label0004C4
wait 0
alloc 18@ 64
0C7C: 19@ = get_timer 16@ time_left
19@ /= 100
format 18@ "Осталось %d.%dсек." 4@ 19@
Render.DrawText(0@, 18@, 7@, 8@, -1)
free 18@
   not 4@ > -1
jf @Label0004C4
0C78: set_timer 16@ active 0
018C: play_sound 1057 at 0.0 0.0 0.0
free 1@
free 2@
free 3@
free 4@
free 5@
free 6@

:Label00055A
goto @Label000107

:Label000561
4@ -= 1
SAMP.CmdRet

:Label00056A
0AC6: 20@ = label @Label00059D offset
SAMP.ShowDialog(3222, "{FF8C00}Информация", 20@, "Выход", "", DIALOG_STYLE_MSGBOX)
SAMP.CmdRet

// строки, а не крипт
:Label00059D
hex
2F 6E 6B 65 79 20 2D 20 D3 F1 F2 E0 ED EE E2 E8
F2 FC 20 EA EB E0 E2 E8 F8 F3 20 E0 EA F2 E8 E2
E0 F6 E8 E8 0A 2F 6E 74 69 6D 65 20 2D 20 D3 F1
F2 E0 ED EE E2 E8 F2 FC 20 E8 ED F2 E5 F0 E2 E0
EB 20 F2 E0 E9 EC E5 F0 E0 2E 0A 2F 6E 70 6F 73
20 2D 20 D3 F1 F2 E0 ED EE E2 E8 F2 FC 20 EF EE
E7 E8 F6 E8 FE 20 F2 E5 EA F1 F2 E0 20 ED E0 20
FD EA F0 E0 ED E5 2E 0A 2F 6E 73 62 69 76 20 2D
20 D1 E1 E8 E2 E0 F2 FC 20 E0 ED E8 EC E0 F6 E8
FE 3F 20 5B 31 2D C4 E0 7C 30 2D CD E5 F2 5D 0A
2F 6E 61 6C 6F 6D 6B 61 20 2D 20 D3 EF EE F2 F0
E5 E1 EB FF F2 FC 20 ED E0 F0 EA EE 20 EF F0 E8
20 EB EE EC EA E5 3F 20 5B 31 2D C4 E0 7C 30 2D
CD E5 F2 5D A0 00
end

:Label000673
   SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 1@
jf @Label00070F
chatmsg "{FF8C00}Клавиша активации была изменена на [ID:%d]" 16747520 1@
0AF1: write_int 1@ to_ini_file "cleo\save_settings\settings.ini" section "SelectKey" key "Key"
goto @Label00073C

:Label00070F
chatmsg "{FF8C00}Используйте /nkey - [keyID]" 16747520

:Label00073C
SAMP.CmdRet

:Label00073E
   SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d %d" 2@ 3@
jf @Label00083C
0093: 2@ = integer 2@ to_float
0093: 3@ = integer 3@ to_float
chatmsg "{FF8C00}Кординаты текста на экране были изменены на [PosX - %f | PosY - %f]" 16747520 2@ 3@
0AF3: write_float 2@ to_ini_file "cleo\save_settings\settings.ini" section "Position" key "X"
0AF3: write_float 3@ to_ini_file "cleo\save_settings\settings.ini" section "Position" key "Y"
goto @Label00086F

:Label00083C
chatmsg "{FF8C00}Используйте /npos - [PosX] [PosY]" 16747520

:Label00086F
SAMP.CmdRet

:Label000871
   SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 4@
jf @Label000920
4@ -= 1
0085: 23@ = 4@ // (int)
23@ += 1
chatmsg "{FF8C00}Время таймера было изменено на %dсек." 16747520 23@
0AF1: write_int 4@ to_ini_file "cleo\save_settings\settings.ini" section "SelectTime" key "Time"
goto @Label00094C

:Label000920
chatmsg "{FF8C00}Используйте /ntime - [sec]" 16747520

:Label00094C
SAMP.CmdRet

:Label00094E
   SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 5@
jf @Label0009FD
chatmsg "{FF8C00}Значение сбива анимации изменено на %d [1-Включено|0-Отключено]" 16747520 5@
0AF1: write_int 5@ to_ini_file "cleo\save_settings\settings.ini" section "Sbiv" key "Active"
goto @Label000A3C

:Label0009FD
chatmsg "{FF8C00}Используйте /nsbiv - [1-Включено|0-Отключено]" 16747520

:Label000A3C
SAMP.CmdRet

:Label000A3E
   SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 6@
jf @Label000B07
chatmsg "{FF8C00}Значение автоупотребления нарко при ломке изменено на %d [1-Включено|0-Отключено]" 16747520 6@
0AF1: write_int 6@ to_ini_file "cleo\save_settings\settings.ini" section "AutoUsedrugs" key "Active"
goto @Label000B48

:Label000B07
chatmsg "{FF8C00}Используйте /nalomka - [1-Включено|0-Отключено]" 16747520

:Label000B48
SAMP.CmdRet

 

[ykp]

Телепорт для Arizona

 

[asdzxcjqwe]

Телепорт для Arizona

// 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
wait 400
   SAMP.Available
0B34: samp register_client_command "arztp" to_label @Label000158

:Label000035
wait 0
if
  0@ == 1
jf @Label000151
if
0AB6: store_target_marker_coords_to 1@ 2@ 3@ // IF and SET
jf @Label000113
SAMP.RequestClass(10@)
SAMP.Spawn
wait 1000
04E4: refresh_game_renderer_at 1@ 2@
Camera.SetAtPos(1@, 2@, 3@)
02CE: 3@ = ground_z_at 1@ 2@ 999.0
0AE2: 4@ = random_vehicle_near_point 5@ 6@ 7@ in_radius 3.0 find_next 0 pass_wrecked 1 //IF and SET
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, 3@)
wait 0
02CE: 3@ = ground_z_at 1@ 2@ 999.0
0@ = 0
goto @Label000151

:Label000113
chatmsg "{D42828}Ошибка! {FFFFFF}Поставьте метку на карте" -1
0@ = 0

:Label000151
goto @Label000035
wait 0
if
  0@ == 0
jf @Label000175
0@ = 1

:Label000175
SAMP.CmdRet

:Label000158
wait 0
if
  0@ == 0
jf @Label000175
0@ = 1
SAMP.CmdRet

 

[TopMo3]

PLS помогите, мне нужен исходник :3

И ещё один мне нужен исходник :3

 

[MrYurkoo]

Исходный, пожалуйста!

 

[DarkL1ght]

Исходный, пожалуйста!

Лови:

{$CLEO}
0000: NOP
wait 5000
0AF8: samp add_message_to_chat "[UGBASE.EU] {FFFFFF}Player Finder made by {00DE21}TH3RM4L-" color 0x0095FF
0B34: samp register_client_command "cfind" to_label @start
0B34: samp register_client_command "myfind" to_label @my_find
0B34: samp register_client_command "stopfind" to_label @stop
31@ = false
30@ = false

:cfind
wait 0 
if
31@ == true
jf @cfind
if
SAMP.IsPlayerConnected(2@)
jf @disconnected  
3@ = SAMP.GetActorHandleByPlayerID(2@)
if
856D:  actor 3@ defined
jf @find       
0B2F: samp get_streamed_out_player_pos 2@ to 9@ 10@ 11@
12@ = Marker.CreateIconAndSphere(41, 9@, 10@, 11@)
wait 750
Marker.Disable(12@)
wait 100    

:find
wait 0
if
056D:  actor 3@ defined
jf @cfind
Actor.StorePos(3@, 5@, 6@, 7@)
8@ = Marker.CreateIconAndSphere(41, 5@, 6@, 7@)
wait 750
Marker.Disable(8@)
wait 100
goto @cfind

:start
if
30@ == false
jf @finding_more_players
SAMP.IsCommandTyped(0@)
if
0AD4: 1@ = scan_string 0@ format "%d" 2@
jf @usage
if
SAMP.IsPlayerConnected(2@)
jf @invalid_id
30@ = true
31@ = true
0B36: samp 4@ = get_player_nickname 2@
0AF8: samp add_message_to_chat "Marker set on the player %s, ID %d. Use [/stopfind] to stop finding." color 0x6098D1 4@ 2@
SAMP.CmdRet
goto @cfind

:stop
if                                                     
31@ == true
jf @not_finding
30@ = false
31@ = false
Marker.Disable(8@)
0AF8: samp add_message_to_chat "The finding has been stopped succefully." color 0x6098D1
SAMP.CmdRet
goto @cfind

:my_find
if
31@ == true
jf @not_finding
0AF8: samp add_message_to_chat "You are finding %s, ID %d." color 0x6098D1 4@ 2@
SAMP.CmdRet
goto @cfind

:disconnected
0AF8: samp add_message_to_chat "The player which you were finding has disconnected." color 0xBF0000
30@ = false
31@ = false
goto @cfind

:finding_more_players
0AF8: samp add_message_to_chat "You can't find more players at the same time. Use [/stopfind] to stop finding." color 0xFBE29C
SAMP.CmdRet
goto @cfind

:usage
0AF8: samp add_message_to_chat "USAGE: /cfind <playerID>" color 0xBFBFBF
SAMP.CmdRet
goto @cfind

:invalid_id
0AF8: samp add_message_to_chat "Invalid ID." color 0xBF0000
SAMP.CmdRet
goto @cfind

:not_finding
0AF8: samp add_message_to_chat "You are not finding anyone." color 0xFBE29C
SAMP.CmdRet
goto @cfind

 

[kotanoff]

Код, пожалуйста