функ. гонщика не робит, можешь скомпилировать проверить, пишет "не найдено"
{$CLEO}
0000: NOP
alloc 0@ 128
alloc 1@ 128
:n_1
wait 1000
:n_2
wait 0
if
0ab0: 53
jf @n_2
wait 100
06D2: 0@v = "kto ne skachet tot moskal" // @v = string
0AD3: 0@ = format "%s" 0@v
06D2: 1@v = "skachet" // @v = string
0AD3: 1@ = format "%s" 1@v
if
call @search_text_in_the_text 2 0@ 1@ // 0@ - текст, 1@ - слово
jf @n_3
0AF8: samp add_message_to_chat "найдено" 0xBA0FFF
wait 500
jump @n_2
:n_3
wait 0
0AF8: samp add_message_to_chat "не найдено" 0xBA0FFF
wait 500
jump @n_2
:search_text_in_the_text
var
2@:int
3@:int
4@:int
5@:int
7@:int
8@:int
end
7@ = 0
0C17: 4@ = strlen 0@
0C17: 8@ = strlen 1@
if or
8@ > 4@
8@ <= 0
then
059A: return_false
ret 0
end
0AC8: 6@ = 1024
0C11: memset destination 6@ value 0 size 1024
0C10: memcpy destination 6@ source 1@ size 8@
for 5@ = 0 to 4@
0A8D: 2@ = read_memory 0@ size 1 virtual_protect 0
0A8D: 3@ = read_memory 1@ size 1 virtual_protect 0
if 2@ == 3@
then
inc(1@)
inc(7@)
else
7@ = 0
0C10: memcpy destination 1@ source 6@ size 8@
end
if 7@ == 8@
then
0485: return_true
ret 0
end
inc(0@)
end
059A: return_false
0AC9: 6@
ret 0
а с диалогом, твой скрипт скомпилировал - не работает, попробовал свой переделать, и вот что узнал. "проверка 1" в чат пишется, а проверка 2 нихуя. т.е. никак не работает этот опкод. если без первого пункта еще обойдусь, то текст из диалога пиздец как нужен для создания моего мегаскрипта. помогите кто может.
{$CLEO .cs}
0000: NOP
alloc 4@ 128
:n_1
wait 1000
0B4E: samp 1@ = get_current_dialog_id
if
1@ == 24 // диалог репорта на самп-рп
jf @n_1
0AF8: samp add_message_to_chat "проверка 1" 0xBA0FFF //это пишет
:n_3
wait 0
if
0B3C: samp is_dialog_responded id 24 button 2@ list_item 3@ input_text 4@
jf @n_3
0AF8: samp add_message_to_chat "проверка 2" 0xBA0FFF // до этой строки не доходит скрипт
if
2@ == 1
jf @n_1
0AF8: samp add_message_to_chat "dialog closed %s" 0xBA0FFF 4@
0A93: end_custom_thread