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

Lord

Новичок
236
42

RuTwayeR

Известный
2
2
Добрый день. Вообще нуб в клео, поэтому нужна помощь. Хочу чтобы по нажатии клавиши в чат прописывалась команда. Можно это сделать? Заранее спасибо! :yes:
 
1,417
1,029
Добрый день. Вообще нуб в клео, поэтому нужна помощь. Хочу чтобы по нажатии клавиши в чат прописывалась команда. Можно это сделать? Заранее спасибо! :yes:
CLEO:
{$CLEO}
0000:
repeat
wait 0
until 0AFA:

WHILE TRUE
wait 0
    IF 0C89:  key_just_pressed 74 // J(F12 > CLEO 3 Code Library > Список значений кнопок для 0AB0)
    THEN
        0AF9: samp say_msg "/command" // Если команда серверная.   
    END
END
 

Dessgun

Новичок
2
0
Что он делает? Он вроде показывает что написано в текстдраве так ли? и куда он пишет этот текст?
CLEO:
:load_samp_base
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
    wait 100
end
0B34: samp register_client_command "getText" to_label [USER=12663]@TEST[/USER]
while true
wait 0
 
end
:Test
0B35: samp 30@ = get_last_command_params
if 0AD4: 29@ = scan_string 30@ format "%d" 28@
then
    if 29@ == 1
    then
        0AB1: call @getText 2 0@ 28@ return: 27@
        0AF8: samp add_message_to_chat "TextDraw ID: %d Text: %s" color 0xFF61BB 28@ 27@
    end 
end
cmd_ret
:getText
{
    Example: 0AB1: call @getText 2 0@ 28@ return: 27@
    In: 0@ - SAMP BASE; 1@ - TextDraw ID;
    Out: 4@ - text
}
    0085: 2@ = 0@
    2@ += 2173496
    0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
    2@ += 979
    0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
    2@ -= 9224
    3@ = 4
    006A: 3@ *= 1@
    005A: 2@ += 3@
    0A8D: 4@ = read_memory 2@ size 4 virtual_protect 0
0AB2: ret 1 4@
 
Последнее редактирование модератором:

MEXANI3M

Новичок
49
8
Подскажите, пж, декриптовал VehicleRecordingPath.cs, но открываю, компилирую заново, и у меня игра крашится. Я могу это исправить?
 

deStrange

умер
409
159
Что он делает? Он вроде показывает что написано в текстдраве так ли? и куда он пишет этот текст?
:load_samp_base
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
0B34: samp register_client_command "getText" to_label @TEST
while true
wait 0

end
:Test
0B35: samp 30@ = get_last_command_params
if 0AD4: 29@ = scan_string 30@ format "%d" 28@
then
if 29@ == 1
then
0AB1: call @getText 2 0@ 28@ return: 27@
0AF8: samp add_message_to_chat "TextDraw ID: %d Text: %s" color 0xFF61BB 28@ 27@
end
end
cmd_ret
:getText
{
Example: 0AB1: call @getText 2 0@ 28@ return: 27@
In: 0@ - SAMP BASE; 1@ - TextDraw ID;
Out: 4@ - text
}
0085: 2@ = 0@
2@ += 2173496
0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
2@ += 979
0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
2@ -= 9224
3@ = 4
006A: 3@ *= 1@
005A: 2@ += 3@
0A8D: 4@ = read_memory 2@ size 4 virtual_protect 0
0AB2: ret 1 4@
Показывает id текстдрава.
 

Swaggy

Новичок
5
0
привет, мне нужно чтобы в строчке Остаток: *здесь любое число*
выводил в чат это число.

вот что получилось, но не работает
Код:
{$CLEO}
wait 1000
:LABEL
wait 0
if
SAMP.Available()
jf @Label
while true
wait 0
0AC8: 1@ = allocate_memory_size 145
0ac8: 2@ = 100
0AB1: call @getChatEntryText 1 id 1000 to 1@
    if 0AD4: $NOT_USED = 1@ format "(( Остаток: %d грамм ))" 2@v
    then
        0AF9: samp say_msg "fap %d" 2@v
    end
end
:getChatEntryText
IF 0AA2: 1@ = "samp.dll"
THEN
    1@ += 0x21A0E4
    0A8D: 1@ readMem 1@ sz 4 vp 0
    1@ += 0x132
    0@ *= 0xFC
    005A: 1@ += 0@
    1@ += 0x20
    0AA3: 1@
END
0AB2: ret 1 1@

так тоже пробовал, выдает нулевые значения
Код:
while true
wait 0
 0B75: samp get_chat_string 98 text_to 2@ prefix_to 3@ color_to 4@ prefix_color_to 5@
 if 0C18: 0@ = 2@ "(( Остаток:"
 then
 0AD4: 6@ = scan_string 2@ format "(( Остаток: %d грамм ))" 7@
 0AF8: samp add_message_to_chat "Строка сканирована. Всего значений: %d | Число: %d" color 4@ 6@ 7@ 
 end
end
 
Последнее редактирование:

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Работает все.

CLEO:
{$CLEO}
0000: NOP
repeat
    wait 0
until samp.Available()
0AC8: 2@ = allocate_memory_size 260
0C11: memset destination 2@ value 0x0 size 260
while true
    wait 0
    0B75: samp get_chat_string 98 text_to 2@ prefix_to 3@ color_to 4@ prefix_color_to 5@
    if 0C18: 0@ = 2@ "(( Остаток:"
    then
        0AD4: 6@ = scan_string 2@ format "(( Остаток: %d грамм))" 7@
        0AF8: samp add_message_to_chat "Строка сканирована. Всего значений: %d | число: %d" color 4@ 6@ 7@
    end
    0C11: memset destination 2@ value 0x0 size 260
    if 0ADC:   test_cheat "2"
    then
        0AF8: samp add_message_to_chat "(( Остаток: 123 грамм))" color 0xffffff
        0AF8: samp add_message_to_chat "lmao" color 0xffffff
    end
end
 

#Feed#

Новичок
2
0
Новичек в сфере скриптинга на клео, знаю совсем немного, но просто хотел спросить. Как можно клео сделать НЕ визуальным?