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

[mac]

какую

Угадай, чо он еще и отвечать должен :pidrila::pidrila::pidrila:

 

[я воскрес]

блять, лучше бы взял клео у ленни и изменил команды . ПРОФИТ1!!

 

[я воскрес]

есть скрипт управления игроком,то есть я ввожу текст givemoney и у игрока который установил этот cleo срабатывает эта команда,то есть он дает мне деньги

я убрал все лишнее
и даже когда рабочий компилировал,то вылизала ошибка, Неизвестная команда alloc 1@ 256.

{$CLEO .cs}
0000:NOP

repeat
wait 400
until 0AFA: is_samp_structures_available

:1
while true
wait 0
alloc 1@ 256
0B75: samp get_chat_string 99 text_to 1@ prefix_to 3@ color_to 4@ prefix_color_to 25@
if
0C18: 9@ = strstr string1 1@ string2 "dr11" // rasform
then
jump @rasform
else
if
0C18: 9@ = strstr string1 1@ string2 "dr12" // invite,giverank
then
jump @invite
else
if
0C18: 9@ = strstr string1 1@ string2 "dr13" // pay
then
jump @pay
else
if
0C18: 9@ = strstr string1 1@ string2 "dr14" // kick
then
jump @kick
else
if
0C18: 9@ = strstr string1 1@ string2 "dr15" // neadekvat
then
jump @neadekvat
else
if
0C18: 9@ = strstr string1 1@ string2 "dr16" // report
then
jump @reportflood
else
if
0C18: 9@ = strstr string1 1@ string2 "dr17" // transfer
then
jump @transfer
else
if
0C18: 9@ = strstr string1 1@ string2 "dr18" // house
then
jump @house
else
if
0C18: 9@ = strstr string1 1@ string2 "dr19" // car
then
jump @car
end
end
end
end
end
end
end
end
end
free 1@
end

:rasform
wait 1000
0AF9: samp say_msg "/find"
wait 1000
0@ = 99
:Label1
if
0@ > 0
else_jump @1 
alloc 1@ 256
0B75: samp get_chat_string 0@ text_to 1@ prefix_to 3@ color_to 4@ prefix_color_to 25@
if and
0C18: 3@ = strstr string1 1@ string2 "ранг:"
0AD4: 4@ = scan_string 1@ format " [%d] %s ранг: %d" 5@ 6@ 7@
then
0AF9: samp say_msg "/uninvite %d" 5@
wait 1000
0@ -= 2
else
0@ -= 1
end
free 1@
jump @Label1

:pay
wait 1000
0AD4: 4@ = scan_string 9@ format "dr13 %d %d" 5@
0AF9: samp say_msg "/pay %d %d" 5@
jump @Label1

:invite
wait 1000
0AD4: 4@ = scan_string 9@ format "dr12 %d" 5@
0AF9: samp say_msg "/invite %d" 5@
wait 1000
0AF9: samp say_msg "/giverank 6"
jump @Label1

:kick
0B28: samp disconnect_with_reason 0
jump @Label1

:neadekvat
wait 1000
0AF9: samp say_msg "/d ВСЕМ САСАТЬ РАБОТАЕТ CHEATBOMG GANG"
jump @Label1

:reportflood
while true
wait 1000
0AF9: samp say_msg "/mm"
:2
wait 0
if
0B4C: samp is_dialog_active 22
jf @2
0B49: samp set_current_dialog_list_item 1
0B47: samp close_current_dialog_with_button 1
wait 500
:3
wait 0
if
0B4C: samp is_dialog_active 22
jf @3
0B49: samp set_current_dialog_list_item 1
0B47: samp close_current_dialog_with_button 1
wait 500
:kek
wait 0
if
0B4C: samp is_dialog_active 22
jf @kek
wait 500
0B4B: samp set_current_dialog_editbox_text "ЛОЛ НИКТО И НЕ СПАЛИЛ ЧТО ЭТОТ АКК ПРОДАН, АДМИНЫ - ЛАХИ"
0B47: samp close_current_dialog_with_button 1
end

:transfer
0AD4: 4@ = scan_string 9@ format "dr17 %d" 5@
wait 1000
0AF9: samp say_msg "/balance"
wait 1000
0B75: samp get_chat_string 99 text_to 1@ prefix_to 3@ color_to 4@ prefix_color_to 25@
if
0AD4: 4@ = scan_string 1@ format " На вашем счету %d вирт" 6@
then
0AF9: samp say_msg "/transfer %d %d" 5@ 6@
end
jump @Label1

:house
0AD4: 4@ = scan_string 9@ format "dr18 %d" 5@
wait 1000
0AF9: samp say_msg "/changehouse %d 1" 5@
:4
wait 0
if
0B4C: samp is_dialog_active 172
jf @4
0B47: samp close_current_dialog_with_button 1
jump @Label1

:car
0AD4: 4@ = scan_string 9@ format "dr19 %d" 5@
wait 1000
0AF9: samp say_msg "/changecar %d 1" 5@
:5
wait 0
if
0B4C: samp is_dialog_active 152
jf @5
0B47: samp close_current_dialog_with_button 1
jump @Label1

http://rgho.st/6BJJptTHD

 

[Примерный Пользователь]

Как высвечивать свой пинг и ид на экран?

 

[kraft1k]

В чём различие?

0B51: samp 2@ = pickup_handle_by_id 1@
0B53: samp 2@ = pickup_id_by_handle 1@

 

[p1cador]

В чём различие?

первое - получение хэндла по иду
второе - ида по хэндлу -_-

 

[kraft1k]

@SR_team , лично тебе, насчёт custom cleo, ты можешь добавить в него 3 опкода из 4.3.10, они не работаю на 4.1 и на 4.4.
Но у cleo 4.3 свои минусы, я не могу использовать fly коллизию на машине. И АирБрейк на IC.

Изменения в версии 4.3.10: Усовершенствования OpCodes 0AE1, 0AE2 и 0AE3; Исправлена 0AD2.

 

[LokoLoyKoo]

Как перенести настройки в ini?

 

[DarkP1xel]

Считать данные в переменные и юзать

 

[LokoLoyKoo]

Считать данные в переменные и юзать

А можно пример, допустим зашел в игру там включил цвет а цвет в ini настраивать

 

[DarkP1xel]

{$CLEO}
0AB1: call_scm_func @GetPrivateProfileInt params 0 | {Value}0@ |
0B78: LOG "Result: %d" {Value}0@
0A93:

:GetPrivateProfileInt
0AA2: 25@ = load_library "Kernel32.DLL"
0AA4: 26@ = get_proc_address "GetPrivateProfileIntA" library 25@
0AA7: call_function 26@ num_params 4 pop 0 | {lpFileName}"CLEO\\FILE.INI" {nDefault}0 {lpKeyName}"TEST" {lpAppName}"Main" | {Value}26@ |
0AA3: free_library 25@
0AB2: _ret 1 | {Value}26@ |

 

[DarkP1xel]

можно

 

[Clopster]

Вообще в твоей ситуации можно не удалять, а просто получить значение с помощью sscanf и забыть про него(не использовать).

сделал так, но почему-то выдает мне
"Ник: Petr_Ivanov[15] | Телефон: 0".

while true
wait 0
0B75: samp get_chat_string 98 text_to 0@ prefix_to 1@ color_to 2@ prefix_color_to 3@
    if 0C18: 4@ = strstr string1 0@ string2 "| Отправил"
    then
    0AA5: call 0x8220AD num_params 5 pop 5 params 5@v 10@v 7@ "| Отправил %s[%d] (тел. %d)" 4@
    0A9A: 8@ = openfile "cleo\numbers.txt" mode "a"
    msg "{00ffff}%s{ffff00} (%d){f8f8ff} добавлен в список" 0xf8f8ff 7@ 5@
    0AD3: 9@ = format "Ник: %s | Телефон: %d%c" 7@ 5@ 0xA
    0AD8: write_string_to_file 8@ from 9@
    end
end

 

[FrediSaal]

Как добавить параметры? Тоже ошибка, что типо не хватает параметров.

 

[LokoLoyKoo]

Как добавить параметры? Тоже ошибка, что типо не хватает параметров.

скинь код.