[CLEO] Вопрос - Ответ - Страница 270 - Форум Cheat-Master.ru
Модератор форума: Alowir, Sanoxxx  
[CLEO] Вопрос - Ответ
[CM]Рафаэль Дата: Суббота, 05.09.2015, 20:19 | Сообщение # 1
Cheat-Master
Сообщений: 3080
Статус: Offline

В этой теме задаются вопросы по CLEO, конкретным опкодам (например, назначение того или иного опкода) и т.д.


Форма вопроса:
Код
[color=#1E90FF][b]Вопрос:[/b][/color] text


Форма ответа:
Код
[color=#1E90FF][b]Ответ:[/b][/color] text



Мой Shop
Официальный гарант

Контактные данные:
VK: vk.com/ali_benua
Skype: lvinyipen
Telegram: @AliBenua
ICQ: 552-090-283
BlackxWhite Дата: Воскресенье, 12.02.2017, 17:23 | Сообщение # 4036
Новичок
Сообщений: 22
Статус: Offline
Всем привет!
Не подскажет никто, есть ли еще "dgun" для Advance-Rp (рабочий)
Если да, то где скачать ?)
P.s. в поиске ничего не нашел, спасибо за помощь.
SunsetStorm Дата: Среда, 01.03.2017, 16:03 | Сообщение # 4037
Новичок
Сообщений: 6
Статус: Offline
Как сделать при вводе локальной команды использование 2-3х серверных команд?
roma_caddy Дата: Среда, 01.03.2017, 18:24 | Сообщение # 4038
Боец
Сообщений: 89
Статус: Offline
Цитата SunsetStorm ()
Как сделать при вводе локальной команды использование 2-3х серверных команд?

Код
{$CLEO}
0000:
repeat
wait 0
until SAMP.Available()

0B34: samp register_client_command {òâîÿ êîìàíäà}"cmd" to_label @label

while true
wait 0
    if 30@ == 1
    then
        say {òâîé òåêñò}" "
        wait{çàäåæêà ìåæäó ñîîáùåíèåì} 1000
        say {òâîé òåêñò}" "
        wait{çàäåæêà ìåæäó ñîîáùåíèåì} 1000
        say {òâîé òåêñò}" "
        30@ = 0
    end
end

:label
30@ = 1
samp.CmdRet()

вставь в сани билдер и коментарии будут на русском.


Сообщение отредактировал roma_caddy - Среда, 01.03.2017, 18:25
SunsetStorm Дата: Среда, 01.03.2017, 21:17 | Сообщение # 4039
Новичок
Сообщений: 6
Статус: Offline
Цитата roma_caddy ()
вставь в сани билдер и коментарии будут на русском.

Забыл уточнить, что мне надо, чтобы там была переменная с идом игрока. Ну ладно, дальше я сам разберусь, спасибо smile
UPD: Не разобрался. Нужна хелпа biggrin


Сообщение отредактировал SunsetStorm - Среда, 01.03.2017, 21:34
roma_caddy Дата: Четверг, 02.03.2017, 16:02 | Сообщение # 4040
Боец
Сообщений: 89
Статус: Offline
Цитата SunsetStorm ()
UPD: Не разобрался. Нужна хелпа

Код
{$CLEO}
0000:
repeat
wait 0
until SAMP.Available()

0B34: samp register_client_command {твоя команда}"cmd" to_label @label

while true
wait 0
    if 30@ == 1
    then
        say {твой текст}"Я ввел после команды цифру - %d" 1@
        wait{задежка между сообщением} 1000
        say {твой текст}" "
        wait{задежка между сообщением} 1000
        say {твой текст}" "
        30@ = 0
    end
end

:label
0B35: samp 0@ = get_last_command_params
0AD4: 0@ = scan_string 0@ format "%d" 1@
jf @err
{ так мы просканировав строку после команды, получаем введеный ид в переменную 1@ в ней теперь ид игрока, если команда была введена без каких либо значений, прыгаем на лабел :err }
30@ = 1 // присваеваем переменной 30@ = 1 чтобы цикл начал работу
samp.CmdRet()

:err
samp.CmdRet()

вроде понятно там прокоментировал. в переменной 1@ запишется число которое ты ввел после команды, вводи ид игрока.
SunsetStorm Дата: Четверг, 02.03.2017, 17:43 | Сообщение # 4041
Новичок
Сообщений: 6
Статус: Offline
roma_caddy,
Цитата roma_caddy ()
вроде понятно там прокоментировал. в переменной 1@ запишется число которое ты ввел после команды, вводи ид игрока.

У меня проблема образовалась. Как сделать несколько команд по такому принципу? 1 команду я настроил и благодаря тебе я разобрался как это все делается и понял. Я приготовил еще несколько команд, но я не знаю как их собрать в 1 скрипт?
roma_caddy Дата: Четверг, 02.03.2017, 20:04 | Сообщение # 4042
Боец
Сообщений: 89
Статус: Offline
Цитата SunsetStorm ()
У меня проблема образовалась. Как сделать несколько команд по такому принципу? 1 команду я настроил и благодаря тебе я разобрался как это все делается и понял. Я приготовил еще несколько команд, но я не знаю как их собрать в 1 скрипт?

Код
{$CLEO}
0000:
repeat
wait 0
until SAMP.Available()

0B34: samp register_client_command "cmd" to_label @label
0B34: samp register_client_command "cmd2" to_label @label2
0B34: samp register_client_command "cmd3" to_label @label3

while true
wait 0
    if 30@ == 1
    then
        say {text} "ÿ ââåë ïåðâóþ êîìàíäó è ïîñëå íåå - %d " 1@
        wait 1000
        say {text} " - %d " 1@
        wait 1000
        say {text} " - %d " 1@
        30@ = 0
    end
    
    if 29@ == 1
    then
        say {text} "ÿ ââåë âòîðóþ êîìàíäó è ïîñëå íåå - %d " 1@
        wait 1000
        say {text} " - %d " 1@
        wait 1000
        say {text} "- %d " 1@
        29@ = 0
    end
    
    if 28@ == 1
    then
        say {text} "ÿ ââåë òðåòüþ êîìàíäó è ïîñëå íåå - %d " 1@
        wait 1000
        say {text} " - %d " 1@
        wait 1000
        say {text} "- %d " 1@
        28@ = 0
    end
end

:label
0B35: samp 0@ = get_last_command_params
0AD4: 0@ = scan_string 0@ format "%d" 1@
jf @err
30@ = 1
samp.CmdRet()

:label2
0B35: samp 0@ = get_last_command_params
0AD4: 0@ = scan_string 0@ format "%d" 1@
jf @err
29@ = 1
samp.CmdRet()

:label3
0B35: samp 0@ = get_last_command_params
0AD4: 0@ = scan_string 0@ format "%d" 1@
jf @err
28@ = 1
samp.CmdRet()

:err
samp.CmdRet()


Cоздаешь другую команду, назначаешь в ней активацию на другую переменную. и переменные в цикл(в коде покопайся, поймешь)
Могу посоветовать канал DarkP1xel'a самые годные уроки по cleo скриптам - сlick
SunsetStorm Дата: Пятница, 03.03.2017, 14:22 | Сообщение # 4043
Новичок
Сообщений: 6
Статус: Offline
Поискал в интернете, чет не нашел. Как сделать отправку рандомной команды?
Пример: Пишу /privet - в чат отправляется "/s Привет", либо "/s Здарова", либо "/s Здравствуй".
Alllss Дата: Пятница, 03.03.2017, 20:07 | Сообщение # 4044
Боец
Сообщений: 67
Статус: Offline
Цитата SunsetStorm ()
Как сделать отправку рандомной команды?

0209: 2@ = random_int_in_ranges 0@ 1@
Дальше у тебя выше есть пример
SunsetStorm Дата: Среда, 08.03.2017, 01:47 | Сообщение # 4045
Новичок
Сообщений: 6
Статус: Offline
Код
    repeat
    wait 0
    until 0B61: samp is_local_player_spawned
    wait 4000
    0af9: "/cvet 87"
end

:dead
wait 0
if
Actor.Dead($PLAYER_ACTOR)
else_jump @dead
wait 3500
0AF9: samp say_msg "/cvet 87"

:dead2
wait 0
if
not Actor.Dead($PLAYER_ACTOR)
else_jump @dead2
jump @dead
samp.CmdRet()


У меня цикл не прекращается. Вот как пофиксить, я не понимаю(((


Сообщение отредактировал SunsetStorm - Среда, 08.03.2017, 10:44
Igor1331 Дата: Среда, 08.03.2017, 12:54 | Сообщение # 4046
Новичок
Сообщений: 1
Статус: Offline
Всем привет! Хотел спросить вот , а возможно сделать так что бы cleo скрипт работал в машине , пользуюсь старой игрой gta 3.
Помогите пожалуйста может нужно дополнить что-то в файле .cs ?
Mda_Heh Дата: Четверг, 09.03.2017, 11:22 | Сообщение # 4047
Любитель
Сообщений: 44
Статус: Offline
Вопрос: Как сделать автоматическое нажатие кнопки в диалоге САМПа? Не пункта в меню, а именно кнопки. Если кому не трудно - дайте готовый код с пояснениями.

Сообщение отредактировал Mda_Heh - Четверг, 09.03.2017, 11:30
roma_caddy Дата: Четверг, 09.03.2017, 17:24 | Сообщение # 4048
Боец
Сообщений: 89
Статус: Offline
Цитата Mda_Heh ()
Вопрос: Как сделать автоматическое нажатие кнопки в диалоге САМПа? Не пункта в меню, а именно кнопки. Если кому не трудно - дайте готовый код с пояснениями.

0B47: samp close_current_dialog_with_button 1@ // id

Добавлено (09.03.2017, 17:24)
---------------------------------------------
Цитата SunsetStorm ()
    repeat
wait 0
until 0B61: samp is_local_player_spawned
wait 4000
0af9: "/cvet 87"
end

:dead
wait 0
if
Actor.Dead($PLAYER_ACTOR)
else_jump @dead
wait 3500
0AF9: samp say_msg "/cvet 87"

:dead2
wait 0
if
not Actor.Dead($PLAYER_ACTOR)
else_jump @dead2
jump @dead
samp.CmdRet()

У меня цикл не прекращается. Вот как пофиксить, я не понимаю(((

юзай не else jump, a jump if false. то есть jf | else jump используется в другом случае, почитай учебник SB найдешь проблему
_____
пора уже начать кодить высокоуровневыми конструкциями - https://www.youtube.com/watch?v=1TNxqFgv1Us


Сообщение отредактировал roma_caddy - Четверг, 09.03.2017, 17:28
SunsetStorm Дата: Пятница, 10.03.2017, 16:30 | Сообщение # 4049
Новичок
Сообщений: 6
Статус: Offline
Цикл все равно не прекращается
roma_caddy Дата: Суббота, 11.03.2017, 07:39 | Сообщение # 4050
Боец
Сообщений: 89
Статус: Offline
Цитата SunsetStorm ()
Цикл все равно не прекращается

Код
{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()

repeat
wait 0
until 0B61:  samp is_local_player_spawned
wait 500
say "/clist 16"

while true
wait 0
    if actor.Dead($PLAYER_ACTOR)
    then
        30@ = 1
    end
    
    if and
    Not Actor.Dead($PLAYER_ACTOR)
    30@ == 1
    then
        wait 500
        say "/clist 16"
        30@ = 0
    end
end
    
    

Разберись в коде, проверял на сервере, на котором играю, перепиши под себя


Сообщение отредактировал roma_caddy - Суббота, 11.03.2017, 07:39
Поиск:
Статистика Форума