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

itsLegend

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
0@ = Samp.GetPlayerNickname(1@)
В 0@ возвращается указатель, поэтому выделение памяти не нужно.
 
G

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
Sidbox написал(а):
Крч когда сворачиваю игру и меняю текст в INI файле и захожу краш.
Нажмите для раскрытия...
Если не поможет, то что сказал legend, значит жди обновы SF, скорее всего просто из-за того что сворачиваешь игру крашит.
 
SR_team

SR_team

like pancake
BH Team
4,815
6,514
Sidbox написал(а):
Код: 
{$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()
Крч когда сворачиваю игру и меняю текст в INI файле и захожу краш.
Нажмите для раскрытия...

Я не про, но вот это
Код: 
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
вроде должно быть перед
Код: 
{$CLEO}
 
Е

Евгенийокда

Известный
6
0
Вообще написал код, клавиши активации не работают. Что не так?

Код: 
{$CLEO .cs}
 
//-------------------------
0000: NOP
if not 0@ = SAMP.Base()
then
        end_thread
end
 
repeat
        wait 400
until 0afa: struct
 
while true
wait 0
        if and
        0ab0: 18 // Alt
        0ab0: 65 // A
        then
 
        repeat
        wait 0
        0B2E: 1@ = read_samp_memory offset 0x13FA0 size 2 //NOP SetPlayerPos
        0B2D:  write_samp_memory offset 0x13FA0 value 0xC390 size 2
        0acd: "On" 1500
        until 0ab0: 53 // 5
        0B2D:  write_samp_memory offset 0x13FA0 value 1@ size 2 
        0acd: "Off" 1500
        end
en
 
san0

san0

Известный
Друг
411
268
PHP: 
{$CLEO .cs}
 
0662: "nop krc"
 
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
 
while true
wait 0
        if and
        0ab0: 18 // Alt
        0ab0: 65 // A
        2@ == 0 
        then
            0B2E: 1@ = read_samp_memory offset 0x13FA0 size 2 //NOP SetPlayerPos
            0B2D:  write_samp_memory offset 0x13FA0 value 0xC390 size 2
            0acd: "On" 1500
            0B12: 2@ = 2@ XOR 1
        end
        if and
        0ab0: 53 // 5
        2@ == 1
        then
          0B2D:  write_samp_memory offset 0x13FA0 value 1@ size 2
          0acd: "Off" 1500
          0B12: 2@ = 2@ XOR 1 
        end
end
 
Е

Евгенийокда

Известный
6
0
san0 написал(а):
PHP: 
{$CLEO .cs}
 
0662: "nop krc"
 
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
 
while true
wait 0
        if and
        0ab0: 18 // Alt
        0ab0: 65 // A
        2@ == 0
        then
            0B2E: 1@ = read_samp_memory offset 0x13FA0 size 2 //NOP SetPlayerPos
            0B2D:  write_samp_memory offset 0x13FA0 value 0xC390 size 2
            0acd: "On" 1500
            0B12: 2@ = 2@ XOR 1
        end
        if and
        0ab0: 53 // 5
        2@ == 1
        then
          0B2D:  write_samp_memory offset 0x13FA0 value 1@ size 2
          0acd: "Off" 1500
          0B12: 2@ = 2@ XOR 1
        end
end
Нажмите для раскрытия...

Та же история
 
SR_team

SR_team

like pancake
BH Team
4,815
6,514
Как проверить есть ли в каре водитель? Мне очень нужно, но 046C не катит, т.к. из-за него при частой проверке игра лагает. Мб как-нибудь через память можно узнать?
 
itsLegend

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
SR_team написал(а):
что-то я не совсем понял. CPed это структура? и если да, то где ее взять? опкод поиска игроков не видит игроков в карах
Нажмите для раскрытия...

Код: 
0A8D: 0@ = read_memory 0xB74490 size 4 virtual_protect 0
000A: 0@ += 0x4
0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
for 1@ = 0 to 35584 step 0x100
    0A8D: 2@ = read_memory 0@ size 1 virtual_protect 0
    000A: 0@ += 0x1
    if and
        0029: 2@ >= 0x00
        001B: 0x80 > 2@
    then
        005A: 2@ += 1@
        if 056D: actor 2@ defined
        then
            0A96: 3@ = actor 2@ struct
            3@ += 0x530
            0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
            if 4@ == 50
            then // driver
            end
        end
    end
end
Скорее всего, это будет проверка типа Actor.Driving(2@)...

Вот может...:
Код: 
0A8D: 0@ = read_memory 0xB74494 size 4 virtual_protect 0
000A: 0@ += 0x4
0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
for 1@ = 0 to 0x6D00 step 0x100
    0A8D: 2@ = read_memory 0@ size 1 virtual_protect 0
    000A: 0@ += 0x1
    if and
        0029: 2@ >= 0x00 
        001B: 0x80 > 2@
    then 
        005A: 2@ += 1@
        if 056E: car 2@ defined
        then
            0A97: 3@ = car 2@ struct
            
            3@ += 0x460
            0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
            if 056D: actor 4@ defined
            then // 4@ - driver
            end
        end
    end
end

Все функи искал на югбейс давным давно. :)
 
SR_team

SR_team

like pancake
BH Team
4,815
6,514
legend2360 написал(а):
Код: 
0A8D: 0@ = read_memory 0xB74490 size 4 virtual_protect 0
000A: 0@ += 0x4
0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
for 1@ = 0 to 35584 step 0x100
    0A8D: 2@ = read_memory 0@ size 1 virtual_protect 0
    000A: 0@ += 0x1
    if and
        0029: 2@ >= 0x00
        001B: 0x80 > 2@
    then
        005A: 2@ += 1@
        if 056D: actor 2@ defined
        then
            0A96: 3@ = actor 2@ struct
            3@ += 0x530
            0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
            if 4@ == 50
            then // driver
            end
        end
    end
end
Скорее всего, это будет проверка типа Actor.Driving(2@)...

Вот может...:
Код: 
0A8D: 0@ = read_memory 0xB74494 size 4 virtual_protect 0
000A: 0@ += 0x4
0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
for 1@ = 0 to 0x6D00 step 0x100
    0A8D: 2@ = read_memory 0@ size 1 virtual_protect 0
    000A: 0@ += 0x1
    if and
        0029: 2@ >= 0x00
        001B: 0x80 > 2@
    then
        005A: 2@ += 1@
        0A97: 3@ = car 2@ struct
   
        3@ += 0x460
        0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
        if 056D: actor 4@ defined
        then // 4@ - driver
        end
    end
end

Все функи искал на югбейс давным давно. :)
Нажмите для раскрытия...

Я нуб :( 0@ - это что? И он тут еще и кар что ли ищет?
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

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