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

Gouvere

Новичок
13
0
Помогите, плз. Мне нужно получить текст из диалога.
Я его беру так:

0AC8: 1@ = allocate_memory_size 12600
0BD7: samp get_dialog_text 1@

Но в тексте в самом начале указан цвет {FFFFFF}, который мне нужно убрать.
Как можно это сделать?
 

Gouvere

Новичок
13
0
Как записать в переменную 1@ длинный текст прямо в скрипте?
Ну типа
1@ = "тут очень длинный текст с переносами
ываыва
ываыва
ываыва
"

И чтобы переносы сохранились
 

DarkP1xel

Сила воли наше всё.
BH Team
3,635
4,962
Не знаешь что может быть не так? У меня игра сначала подвисает, а потом что-то с ней творится, выбрасывает камеру как при входе и мерцает все.
Проверь свою папку CLEO на наличие IniFiles.CLEO . Возможно тебя крашит из-за отсутствия этого плагина для CLEO . Повторяю, у меня всё работает.

CLEO:
{$CLEO}
0000:

:SAMPAv
wait 0
0AFA:  is_samp_available
jf @SAMPAv
0B34: samp register_client_command "pos" to_label @Pos

:Main
wait 0
0039:   25@ == 1
jf @Main
0B5E: get_cursor_pos 0@ 1@
0B69: render draw_box_pos 0@ 1@ size 50 50 color 0xFFFFFFFF
0AB0: key_pressed 0x01
jf @Main
0B12: 25@ = 25@ XOR 1
0AF1: write_int 0@ to_ini_file "cleo\inStream.ini" section "Position" key "ListPosX"
0AF1: write_int 1@ to_ini_file "cleo\inStream.ini" section "Position" key "ListPosY"
jump @Main

:Pos
0B12: 25@ = 25@ XOR 1
0B5D: samp toggle_cursor 1
0B43: samp cmd_ret
 
  • Нравится
Реакции: kraft1k и AWRage

AWRage

Активный
642
141
Проверь свою папку CLEO на наличие IniFiles.CLEO . Возможно тебя крашит из-за отсутствия этого плагина для CLEO . Повторяю, у меня всё работает.

CLEO:
{$CLEO}
0000:

:SAMPAv
wait 0
0AFA:  is_samp_available
jf @SAMPAv
0B34: samp register_client_command "pos" to_label @Pos

:Main
wait 0
0039:   25@ == 1
jf @Main
0B5E: get_cursor_pos 0@ 1@
0B69: render draw_box_pos 0@ 1@ size 50 50 color 0xFFFFFFFF
0AB0: key_pressed 0x01
jf @Main
0B12: 25@ = 25@ XOR 1
0AF1: write_int 0@ to_ini_file "cleo\inStream.ini" section "Position" key "ListPosX"
0AF1: write_int 1@ to_ini_file "cleo\inStream.ini" section "Position" key "ListPosY"
jump @Main

:Pos
0B12: 25@ = 25@ XOR 1
0B5D: samp toggle_cursor 1
0B43: samp cmd_ret
Да, нету у меня такого плагина. Благодарю! :)
 

hnnssy

Известный
Друг
2,684
2,749
Вроде всё правильно сделал,а считывается последняя строка ....
Код:
{$CLEO .cs}
0000: NOP                           

0662: printstring "kraft1k"  0x33FFCC

repeat
wait 0
until SAMP.Available()
0B34: samp register_client_command "drugsbot" to_label @Dialog

While True
wait 0
if 10@ == 1
then
say "/makedrugs"
wait 160
if
SAMP.IsDialogActive(3684)
then
alloc 0@ 1024
alloc 2@ 1024
alloc 3@ 1024
  memset 0@ 0x0 1024
  0BD7: samp get_dialog_text 0@
  0A9A: 1@ = openfile "CLEO\dialogtext.txt" mode "wt"
  0AD8: write_string_to_file 1@ from 0@
  0A9B: closefile 1@
if
SAMP.IsDialogActive(3684)
then
0A9A: 1@ = openfile "CLEO\dialogtext.txt" mode "rt"
repeat
    if 0AD7: read_string_from_file 1@ to 2@ size 1024
    then
        0AD4: 0@ = scan_string 2@ format "%d - {4BB85A}подлежит обработке{ffffff}" 3@
    end
until 0AD6:   end_of_file 1@ reached
SAMP.SetDialogInputBoxText(3@)
wait 3000
SAMP.CloseDialog(3684)
0A9B: closefile 1@
wait 1000
end
end
end
end



:Dialog
0B12: 10@ = 10@ XOR 1
if 10@ == 1
then
0acd: "[Kraft1k]DRUGS BOT ~r~ON" 1500
else
0acd: "[Kraft1k]DRUGS BOT ~r~OFF" 1500
end
SAMP.Cmdret()
repeat
0AD7: read_string_from_file 1@ to 2@ size 1024
if 0AD4: 0@ = scan_string 2@ format "%d - {4BB85A}подлежит обработке{ffffff}" 3@
then break
end
until 0AD6: end_of_file 1@ reached
 

valdan666

Известный
Проверенный
941
357
Пацаны, кто подскажет, как эмулировать нажатие ЛКМ ? Опкод 0C72: set_virtual_key 0x01 down 1 работает,но работает только с клавишами клавиатуры, а вот мышку эмулировать не хочет....в чем может быть причина? Или есть другие способы?