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

D3.Pheonix

D3.Pheonix

🎹
Модератор
2,866
1,650
noobik.cs написал(а):
Код: 
0B34: samp register_client_command "cmd" to_label @cmd
0BDE: pause_thread 0

:cmd
0B35: samp 1@ = get_last_command_params
if 0AD4: 2@ = scan_string 1@ format "%d %s" 3@ 5@
then
say "cmd %d %s" 3@ 5@v
end
0B43: samp cmd_ret

В 5@v может храниться до 16 символов. Как сделать их бесконечными т.е. все что введется после "/cmd цифра" копировалось
Нажмите для раскрытия...
Выдели память под обычную переменную
 
B

Black_Bird

Участник
59
4
Какой опкод для прикрепления объекта на персонажа ? ( что бы был визуальный )
 
A

AXE_CAMERON

Участник
66
0
Код: 
{$CLEO}
{$NOSOURCE}
0000:

:0
wait 0
if
samp.Available()
jf @0

:1
wait 0
if or
not actor.Dead($PLAYER_ACTOR)
not actor.Driving($PLAYER_ACTOR)
jf @1
jump @2

:2     // СФ
wait 0
if and
0AB0:   key_pressed 16
0AB0:   key_pressed 65
0AB0:   key_pressed 67
not SAMP.ChatInputOpened()
jf @1
0A96: 10@ = actor $PLAYER_ACTOR struct
0C0C: 11@ = struct 10@ offset 0x14 size 4
0C0D: struct 11@ offset 0x30 size 4 = -675,028992 //X
0C0D: struct 11@ offset 0x34 size 4 = -2166,0 //Y
0C0D: struct 11@ offset 0x38 size 4 = 1501,1 //Z
jump 3

:3      //ЛВ
wait 0
if and
0AB0:   key_pressed 16
0AB0:   key_pressed 75
0AB0:   key_pressed 68
not SAMP.ChatInputOpened()
jf @1
0A96: 10@ = actor $PLAYER_ACTOR struct
0C0C: 11@ = struct 10@ offset 0x14 size 4
0C0D: struct 11@ offset 0x30 size 4 = 235,257996 //X
0C0D: struct 11@ offset 0x34 size 4 = 1187,0 //Y
0C0D: struct 11@ offset 0x38 size 4 = 1080,3 //Z
jump @1
Почему пишет, что ожидалось 4 параметра? :(
Помогите сделать код, чтобы он работал (ТП по координатам для сампа)
 
astap_

astap_

Известный
Всефорумный модератор
626
603
Black_Bird написал(а):
Какой опкод для прикрепления объекта на персонажа ? ( что бы был визуальный )
Нажмите для раскрытия...
CLEO: 
Object.Create(0@ , 19131 , 0.0 , 0.0 , 0.0) // создаём объект(0@) с моделью 19131 на кордах 0 0 0
069B: attach_object 0@ to_actor $PLAYER_ACTOR with_offset 0.0 0.1 0.5 rotation 0.0 0.0 0.0 // прикрепляем объект к себе
AXE_CAMERON написал(а):
Код: 
{$CLEO}
{$NOSOURCE}
0000:

:0
wait 0
if
samp.Available()
jf @0

:1
wait 0
if or
not actor.Dead($PLAYER_ACTOR)
not actor.Driving($PLAYER_ACTOR)
jf @1
jump @2

:2     // СФ
wait 0
if and
0AB0:   key_pressed 16
0AB0:   key_pressed 65
0AB0:   key_pressed 67
not SAMP.ChatInputOpened()
jf @1
0A96: 10@ = actor $PLAYER_ACTOR struct
0C0C: 11@ = struct 10@ offset 0x14 size 4
0C0D: struct 11@ offset 0x30 size 4 = -675,028992 //X
0C0D: struct 11@ offset 0x34 size 4 = -2166,0 //Y
0C0D: struct 11@ offset 0x38 size 4 = 1501,1 //Z
jump 3

:3      //ЛВ
wait 0
if and
0AB0:   key_pressed 16
0AB0:   key_pressed 75
0AB0:   key_pressed 68
not SAMP.ChatInputOpened()
jf @1
0A96: 10@ = actor $PLAYER_ACTOR struct
0C0C: 11@ = struct 10@ offset 0x14 size 4
0C0D: struct 11@ offset 0x30 size 4 = 235,257996 //X
0C0D: struct 11@ offset 0x34 size 4 = 1187,0 //Y
0C0D: struct 11@ offset 0x38 size 4 = 1080,3 //Z
jump @1
Почему пишет, что ожидалось 4 параметра? :(
Помогите сделать код, чтобы он работал (ТП по координатам для сампа)
Нажмите для раскрытия...
в нецелых числах ставь точки , а не запятые
 
  • Нравится
Реакции: ehxqu
A

AXE_CAMERON

Участник
66
0
astap_ написал(а):
CLEO: 
Object.Create(0@ , 19131 , 0.0 , 0.0 , 0.0) // создаём объект(0@) с моделью 19131 на кордах 0 0 0
069B: attach_object 0@ to_actor $PLAYER_ACTOR with_offset 0.0 0.1 0.5 rotation 0.0 0.0 0.0 // прикрепляем объект к себе

в нецелых числах ставь точки , а не запятые
Нажмите для раскрытия...

Ай, вот я тупанул))
Спасибо
 
N

NookieONE

Участник
128
1
На cleo 4.3 не определяет уровень
CLEO: 
:cmd
Samp.IsCommandTyped(0@)
if
0AD4: 1@ = scan_string 0@ format "%d" 2@
then
    if
        Samp.IsPlayerConnected(2@)
    then
        3@ = Samp.GetPlayerScore(2@)
            if 3@ <= 4
            then
                say "/cmd1 %d" 2@
            else
                say "/cmd2 %d" 2@
            end
    else
    chatmsg "Игрок с ID: %d не найден" -1 2@
    end 
end
0B43: samp cmd_ret
 
A

AXE_CAMERON

Участник
66
0
Как сделать телепорт для серверов по типу аризона рп, чтобы не кикало после тп хотя бы секунд 5?
 
astap_

astap_

Известный
Всефорумный модератор
626
603
NookieONE написал(а):
На cleo 4.3 не определяет уровень
CLEO: 
:cmd
Samp.IsCommandTyped(0@)
if
0AD4: 1@ = scan_string 0@ format "%d" 2@
then
    if
        Samp.IsPlayerConnected(2@)
    then
        3@ = Samp.GetPlayerScore(2@)
            if 3@ <= 4
            then
                say "/cmd1 %d" 2@
            else
                say "/cmd2 %d" 2@
            end
    else
    chatmsg "Игрок с ID: %d не найден" -1 2@
    end
end
0B43: samp cmd_ret
Нажмите для раскрытия...
юзай опкод
CLEO: 
0B65: samp 2@ = player 1@ score // 2@ - score[int] , 1@ - id[int]
 
B

Black_Bird

Участник
59
4
astap_ написал(а):
CLEO: 
Object.Create(0@ , 19131 , 0.0 , 0.0 , 0.0) // создаём объект(0@) с моделью 19131 на кордах 0 0 0
069B: attach_object 0@ to_actor $PLAYER_ACTOR with_offset 0.0 0.1 0.5 rotation 0.0 0.0 0.0 // прикрепляем объект к себе

в нецелых числах ставь точки , а не запятые
Нажмите для раскрытия...
Де хваняться
astap_ написал(а):
CLEO: 
Object.Create(0@ , 19131 , 0.0 , 0.0 , 0.0) // создаём объект(0@) с моделью 19131 на кордах 0 0 0
069B: attach_object 0@ to_actor $PLAYER_ACTOR with_offset 0.0 0.1 0.5 rotation 0.0 0.0 0.0 // прикрепляем объект к себе

в нецелых числах ставь точки , а не запятые
Нажмите для раскрытия...
Как сделать что бы этот объект оставался на земле после педа?:)
 
astap_

astap_

Известный
Всефорумный модератор
626
603
Black_Bird написал(а):
Да
или как вызвать кровавый след? А то кровотечение я сделал, а что бы был именно кровавый след - хз
Нажмите для раскрытия...
вроде прикольно получилось, я даже себе оставлю. а с объектами забей, это ебля конкретная
CLEO: 
{$CLEO}
0000:
thread 'astap'

while not SAMP.Available()
    wait 0
end
0B34: samp register_client_command "bstep" to_label @sled

while true
wait 0
    if 31@ == true
    then
        Actor.StorePos($PLAYER_ACTOR , 0@ 1@ 2@)
        2@ += -1.0
        09B8: create_blood_gush_at 0@ 1@ 2@ with_offset 0.0 0.0 0.0 density 300 on_actor $PLAYER_ACTOR
    end
end

:sled
if 31@ == false
    then
    31@ = true
    print "~y~enable" 1000
 
    else
    31@ = false
    print "~r~disable" 1000
end
cmdret
 
Последнее редактирование:
  • Нравится
Реакции: Black_Bird
B

Black_Bird

Участник
59
4
astap_ написал(а):
вроде прикольно получилось, я даже себе оставлю. а с объектами забей, это ебля конкретная
CLEO: 
{$CLEO}
0000:
thread 'astap'

while not SAMP.Available()
    wait 0
end
0B34: samp register_client_command "bstep" to_label @sled

while true
wait 0
    if 31@ == true
    then
        Actor.StorePos($PLAYER_ACTOR , 0@ 1@ 2@)
        2@ += -1.0
        09B8: create_blood_gush_at 0@ 1@ 2@ with_offset 0.0 0.0 0.0 density 300 on_actor $PLAYER_ACTOR
    end
end

:sled
if 31@ == false
    then
    31@ = true
    print "~y~enable" 1000
 
    else
    31@ = false
    print "~r~disable" 1000
end
cmdret
Нажмите для раскрытия...
Благо
astap_ написал(а):
вроде прикольно получилось, я даже себе оставлю. а с объектами забей, это ебля конкретная
CLEO: 
{$CLEO}
0000:
thread 'astap'

while not SAMP.Available()
    wait 0
end
0B34: samp register_client_command "bstep" to_label @sled

while true
wait 0
    if 31@ == true
    then
        Actor.StorePos($PLAYER_ACTOR , 0@ 1@ 2@)
        2@ += -1.0
        09B8: create_blood_gush_at 0@ 1@ 2@ with_offset 0.0 0.0 0.0 density 300 on_actor $PLAYER_ACTOR
    end
end

:sled
if 31@ == false
    then
    31@ = true
    print "~y~enable" 1000
 
    else
    31@ = false
    print "~r~disable" 1000
end
cmdret
Нажмите для раскрытия...
Крч, как сделать следы на снегу?:D
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. YarikVL
    [Перезапуск] Интервью с ARMOR
      • Bug
      • Нравится
      • Ха-ха
    Ответы
    25
    Просмотры
    4K
    Общение
    Арсений Пиво
    Арсений Пиво
  2. G
    • Закрыта
    [CLEO] Счётчик убийств/смертей.
      • Нравится
    Ответы
    15
    Просмотры
    21K
    Другое
    Забавный Бандит
    З
  3. iTz_WEEZY
    • Закрыта
    Помогите сделать [Авто Викторина]
    Ответы
    6
    Просмотры
    2K
    Архив
    iTz_WEEZY
    iTz_WEEZY
  4. PanSeek
    Интервью с DarkP1xel
      • Нравится
      • Влюблен
      • Злость
    Ответы
    55
    Просмотры
    11K
    Общение
    nikusyaxxs
    nikusyaxxs
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    4K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу