Вопросы по CLEO-скриптингу

S

Sidbox

Потрачен
26
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Код: 
{$CLEO}
{$NOSOURCE}
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
if
not 29@ = samp.Base()
then
end_thread
else
        while not samp.Available()
        wait 0
        end
end
0B34: samp register_client_command "fakefrisk" to_label @fakefrisk
0662: "Made by san0"
0662: "Finalized Sidbox"
while true
        wait 0
end
:fakefrisk
0B35: samp 0@ = get_last_command_params
if 0AD4: 1@ = scan_string 0@ format "%d" 2@ //IF and SET
then
        if 2@ < 1000
        then
                Actor.EmulateFromPlayer($PLAYER_ACTOR, $PLAYER_CHAR)
                4@ = Samp.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
                0AC8: 3@ = allocate_memory_size 128
                0AC8: 5@ = allocate_memory_size 128
                3@ = Samp.GetPlayerNickname(2@)
                5@ = Samp.GetPlayerNickname(4@)
                if 0AAB: file_exists "Cleo\INI\fakefrisk.ini"
                then
                        0AC8: 15@ = allocate_memory_size 256
                        0AC8: 16@ = allocate_memory_size 256
                        0AC8: 17@ = allocate_memory_size 256
                        0AC8: 18@ = allocate_memory_size 256
                        0AC8: 19@ = allocate_memory_size 256
                        0AF4: 15@ = read_string_from_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "1"
                        0AF4: 16@ = read_string_from_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "2"
                        0AF4: 17@ = read_string_from_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "3"
                        0AF4: 18@ = read_string_from_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "4"
                        0AF4: 19@ = read_string_from_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "5"
                        0AF8: samp add_message_to_chat "|__________ Найденные вещи у %s __________|" color 0x32CD32 3@
                        0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xFFFFFF 32 32 32 32 15@
                        0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xFFFFFF 32 32 32 32 16@
                        0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xBEBEBE 32 32 32 32 17@
                        0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xBEBEBE 32 32 32 32 18@
                        0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xBEBEBE 32 32 32 32 19@
                        0AF8: samp add_message_to_chat "%s обыскал %s" color 0xFFC2A2DA 5@ 3@
                        0AC9: free_allocated_memory 15@
                        0AC9: free_allocated_memory 16@
                        0AC9: free_allocated_memory 16@
                        0AC9: free_allocated_memory 17@
                        0AC9: free_allocated_memory 18@
                        0AC9: free_allocated_memory 19@
                        0AC9: free_allocated_memory 3@
                        0AC9: free_allocated_memory 5@
                else
                        0A9A: $file = openfile "Cleo\INI\fakefrisk.ini" mode "wt+"  // IF and SET
                        0AD9: write_formatted_text "; Made by San0 | Finalized Sidbox |" in_file $file
                        0AD9: write_formatted_text "%c; Файл создан с помощью cleo fakefrisk for Crime-Strets" in_file $file 10
                        0AD9: write_formatted_text "%c; Секция Fake и соответствующие номера соответствуют строкам фейка" in_file $file 10
                        0A9B: closefile $file
                        0AD3: 20@v = format "Наркотики"
                        0AF5: write_string 20@v to_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "1"
                        0AD3: 21@v = format "Телефонная книга"
                        0AF5: write_string 21@v to_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "2"
                        0AD3: 22@v = format "Deagle с 200 патронами"
                        0AF5: write_string 22@v to_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "3"
                        0AD3: 23@v = format "Балончик с 1500 патронами"
                        0AF5: write_string 23@v to_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "4"
                        0AD3: 23@v = format "Фотокамера с 26 патронами"
                        0AF5: write_string 23@v to_ini_file "Cleo\INI\fakefrisk.ini" section "Frisk" key "5"
                        0AF1: write_int 1 to_ini_file "Cleo\INI\fakefrisk.ini" section "General" key "DrawInfo"
                        0AF0: 11@ = get_int_from_ini_file "Cleo\INI\fakefrisk.ini" section "General" key "DrawInfo"
                        if 11@ == 1
                        then
                                0AF8: samp add_message_to_chat "{FakeFrisk} Создался .ini файл с настройками {a51347}(Cleo\INI\fakefrisk.ini)" color 0xa51347 3@  0
                        else
                                0ACD: show_text_highpriority "~b~ Type incorrect params" time 750
                        end
                end
        else
                0AF0: 11@ = get_int_from_ini_file "Cleo\INI\fakefrisk.ini" section "General" key "DrawInfo"
                if 11@ == 1
                then
                        0AF8: samp add_message_to_chat "{FakeFrisk} Введён неправльный id игрока {a51347}(/fakefrisk id игрока)" color 0xa51347 3@  0
                else
                        0ACD: show_text_highpriority "~b~ Type incorrect params" time 750
                end
        end
end
Samp.CmdRet()
Сделайте,чтобы работал на новым СФ 3.1 (научите если не сложно) ;)
 
itsLegend

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,463
Код: 
{$CLEO}
 
const
    S_FILE = "CLEO\INI\fakefrisk.ini"
end
 
0662: "Made by san0"
0662: "Finalized Sidbox"
0662: "Лигенд жи круть"
 
thread 'legend2360'
0662: "by legend2360"
0662: "BlastHack - Cheating is art"
 
if 8AF7: get_samp_base_to 33@
then 0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
 
0B34: samp register_client_command "fakefrisk" to_label @cmd
 
while true
    wait 0
end
 
:cmd
0B35: samp 0@ = get_last_command_params
if 0AD4: 31@ = scan_string 0@ format "%d" 1@
then
    if SAMP.IsPlayerConnected(1@)
    then
        if 0aab: file_ex S_FILE
        then
            2@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
            3@ = SAMP.GetPlayerNickname(2@) // My nick
            4@ = SAMP.GetPlayerNickname(1@) // Player nick
       
            0AC8: 5@ 64
            0c11: memset 5@ 0 64
 
            // Start
            0AF8: samp add_message_to_chat "|__________ Найденные вещи у %s __________|" color 0x32CD32 4@
            0AF4: 5@ = read_string_from_ini_file S_FILE section "Frisk" key "1"
            0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xFFFFFF 32 32 32 32 5@
 
            0AF4: 5@ = read_string_from_ini_file S_FILE section "Frisk" key "2"
            0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xFFFFFF 32 32 32 32 5@
 
            0AF4: 5@ = read_string_from_ini_file S_FILE section "Frisk" key "3"
            0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xBEBEBE 32 32 32 32 5@
 
            0AF4: 5@ = read_string_from_ini_file S_FILE section "Frisk" key "4"
            0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xBEBEBE 32 32 32 32 5@
 
            0AF4: 5@ = read_string_from_ini_file S_FILE section "Frisk" key "5"
            0AF8: samp add_message_to_chat "%c%c%c-%c%s" color 0xBEBEBE 32 32 32 32 5@
           
            0AF8: samp add_message_to_chat "%s обыскал %s" color 0xFFC2A2DA 3@ 4@
           
            // End
            0AC9: clear 5@
        else
            if 0A9A: 30@ = openfile S_FILE mode "wt"
            then
                0AD9: write_formatted_text "; Made by San0 | Finalized Sidbox |%c" in_file 30@ 0xA
                0AD9: write_formatted_text "; Файл создан с помощью cleo fakefrisk for Crime-Strets%c" in_file 30@ 0xA
                0AD9: write_formatted_text "; Секция Fake и соответствующие номера соответствуют строкам фейка%c%c" in_file 30@ 0xA 0xA
                0A9B: closefile 30@
               
                // INI
                0AF5: write_string "Наркотики" to_ini_file S_FILE section "Frisk" key "1"
                0AF5: write_string "Телефонная книга" to_ini_file S_FILE section "Frisk" key "2"
                0AF5: write_string "Deagle с 200 патронами" to_ini_file S_FILE section "Frisk" key "3"
                0AF5: write_string "Балончик с 1500 патронами" to_ini_file S_FILE section "Frisk" key "4"
                0AF5: write_string "Фотокамера с 26 патронами" to_ini_file S_FILE section "Frisk" key "5"
 
                0AF1: write_int true to_ini_file S_FILE section "General" key "DrawInfo"
                0AF8: samp add_message_to_chat "{FakeFrisk} Создался .ini файл с настройками {a51347}(%s)" color 0xa51347 S_FILE
            end
        end
    end
end
SAMP.CmdRet
 
hnnssy

hnnssy

Известный
Друг
2,684
2,753
На 3.1, как я понял, не работают теперь wait в командах, чем тогда заменить можно? :\
Юзал такую хуету, теперь ноп вырубается без задержки и сообщение видно в чате.
Код: 
0B2E: 30@ = read_samp_memory offset 0xB110 size 2
0B2D: write_samp_memory offset 0xB110 value 0xC390 size 2
say "hi"
wait 400
0B2D: write_samp_memory offset 0xB110 value 30@ size 2
 
G

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
hnnssy написал(а):
На 3.1, как я понял, не работают теперь wait в командах, чем тогда заменить можно? :\
Юзал такую хуету, теперь ноп вырубается без задержки и сообщение видно в чате.
Код: 
0B2E: 30@ = read_samp_memory offset 0xB110 size 2
0B2D: write_samp_memory offset 0xB110 value 0xC390 size 2
say "hi"
wait 400
0B2D: write_samp_memory offset 0xB110 value 30@ size 2
Нажмите для раскрытия...
while true
wait 0
if
13@ == 1
then
0B2E: 30@ = read_samp_memory offset 0xB110 size 2
0B2D: write_samp_memory offset 0xB110 value 0xC390 size 2
say "hi"
wait 400
0B2D: write_samp_memory offset 0xB110 value 30@ size 2
13@ = 0
end
end
:cmd
13@ = 1
samp cmd ret
 
  • Нравится
Реакции: hnnssy
L

legioner1234

Новичок
32
0
Выбивает ошибку при компилировании Неизвестная команда / This file was decompiled using SASCM.ini published by GTAG.
вот сам скрипт
Код: 
/ 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
if
0@ = SAMP.Base()
else_jump @NONAME_46
 
:NONAME_18
  not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
 
:NONAME_39
jump @NONAME_48
 
:NONAME_46
end_thread
 
:NONAME_48
0@ = 0
 
:NONAME_55
wait 0
if
  0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947
print "~Y~CLEO ~G~ACTIVATED" 1500
 
:NONAME_195
jump @NONAME_348
 
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
 
:NONAME_348
jump @NONAME_55
 
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
0AC8: 4@ = allocate_memory_size 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_STRING size 68
0B42: raknet send bit_stream 5@ priority 1 reliability 7 ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
ret 0
 
:NONAME_523
2@ -= 1
3@ = 0
 
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D:  3@ > 2@ // (int)
else_jump @NONAME_537
ret 0
Если кто сможет, переведите этот скрип на 0.3z
 
hnnssy

hnnssy

Известный
Друг
2,684
2,753
legioner1234 написал(а):
Выбивает ошибку при компилировании Неизвестная команда / This file was decompiled using SASCM.ini published by GTAG.
вот сам скрипт
Код: 
/ 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
if
0@ = SAMP.Base()
else_jump @NONAME_46
 
:NONAME_18
  not SAMP.Available
else_jump @NONAME_39
wait 500
jump @NONAME_18
 
:NONAME_39
jump @NONAME_48
 
:NONAME_46
end_thread
 
:NONAME_48
0@ = 0
 
:NONAME_55
wait 0
if
  0@ == 0
else_jump @NONAME_202
if
key_down 74
else_jump @NONAME_195
0@ = 1
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ВКЛЮЧЕН, ЧТОБЫ ВЫКЛЮЧИТЬ ЗАЖМИТЕ КЛАВИШУ \"5\"." color 6736947
print "~Y~CLEO ~G~ACTIVATED" 1500
 
:NONAME_195
jump @NONAME_348
 
:NONAME_202
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
call @NONAME_355 3 2230.781 -2285.63 14.3751
call @NONAME_355 3 1@ 2@ 3@
wait 1
wait 1
key_down 53
else_jump @NONAME_202
0AF8: samp add_message_to_chat "[FASTBOT] БОТ ОТКЛЮЧЕН." color 13382400
print "~Y~CLEO ~R~DEACTIVATED" 1500
0@ = 0
 
:NONAME_348
jump @NONAME_55
 
:NONAME_355
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
0AC8: 4@ = allocate_memory_size 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_STRING size 68
0B42: raknet send bit_stream 5@ priority 1 reliability 7 ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
ret 0
 
:NONAME_523
2@ -= 1
3@ = 0
 
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D:  3@ > 2@ // (int)
else_jump @NONAME_537
ret 0
Если кто сможет, переведите этот скрип на 0.3z
Нажмите для раскрытия...

Самую верхнюю строку удали и скомпилируется.
 
MISTER_GONWIK

MISTER_GONWIK

Всефорумный гонщик
Всефорумный модератор
1,260
1,742
legioner1234 написал(а):
Где их прописать ?
можешь в коде прописать их, а я гляну что бы на будущее знать.
Нажмите для раскрытия...

не слушай его, у тебя кейворды не прописаны прост

в сф в данных SB лежит файл keywords.ini, скопируй его и замени файл в папке сани билдера, на этот
 
L

legioner1234

Новичок
32
0
MISTER_GONWIK написал(а):
не слушай его, у тебя кейворды не прописаны прост

в сф в данных SB лежит файл keywords.ini, скопируй его и замени файл в папке сани билдера, на этот
Нажмите для раскрытия...

Всё равно пишет ожидалось 4 параметра. Кинул папку из Sf в Sanny Builder в папку sa, заменил но нечего не происходит как была ошибка так и осталась.


P.S Когда обнову собейта выложишь ?
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. YarikVL
    [Перезапуск] Интервью с ARMOR
      • Bug
      • Нравится
      • Ха-ха
    Ответы
    21
    Просмотры
    2K
    Общение
    ARMOR
    ARMOR
  2. G
    • Закрыта
    [CLEO] Счётчик убийств/смертей.
      • Нравится
    Ответы
    15
    Просмотры
    20K
    Другое
    Забавный Бандит
    З
  3. iTz_WEEZY
    • Закрыта
    Помогите сделать [Авто Викторина]
    Ответы
    6
    Просмотры
    2K
    Архив
    iTz_WEEZY
    iTz_WEEZY
  4. PanSeek
    Интервью с DarkP1xel
      • Нравится
      • Влюблен
      • Злость
    Ответы
    54
    Просмотры
    8K
    Общение
    GrishaMazzlov
    GrishaMazzlov
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    3K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу