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

D

Dikson777

Новичок
45
0
#Skywalker написал(а):
Координаты только измени.
Код: 
{$CLEO .cs}
{$INCLUDE SF}
0000:

0B34: samp register_client_command "on" to_label @cmd_on


while true
wait 0
if 28@ == 1
then
0AB1: call_scm_func @SendOnFootPosition 3 -1833.13 -1612.35 210.09 // числа по "3", это X Y Z
28@ = 0
end
end

:cmd_on
wait 0
28@ = 1
chatmsg "Script on" 0xFF0000
SAMP.CmdRet()

:SendOnFootPosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
alloc 4@ 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
5@ = RakNet.NewBitStream()
BitStream.Write(5@, 212, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
Нажмите для раскрытия...

Можешь каждую строку объяснить, пожалуйста. Я не все тут понял
 
D

Dikson777

Новичок
45
0
Правильный код?

Код: 
{$CLEO .cs}
{$INCLUDE SF}

0000:

0B34: samp register_client_command "svarm" to_label @cmd_on


while true
wait 0
if 28@ == 1
then
0AB1: call_scm_func @SendOnFootPosition 3 153.7127,1847.1963,17.6406 // числа по "3", это X Y Z
28@ = 0
end
end

:cmd_on
wait 0
28@ = 1
chatmsg "[CLEO] FastARMY by DIKSON | Выполнено!" 0xFFCC33
SAMP.CmdRet()

:SendOnFootPosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
alloc 4@ 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
5@ = RakNet.NewBitStream()
BitStream.Write(5@, 212, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
 
D

Dikson777

Новичок
45
0
#Skywalker написал(а):
Да правильный.
Нажмите для раскрытия...
Не работает, я вот зашел в игру (ARP). Ввел команду /svarm и у меня напечатало только текст "
[CLEO] FastARMY by DIKSON | Выполнено!". А телепортация не произошла. У меня координаты стоят для получения брони в Сухопутный Войсках, а броня не появляется и пикап не исчезает..
 
O

OtherWeather

Новичок
39
2
Как сделать, чтобы DXTU диалог открывался по команде и закрывался по кнопке, созданной в нём?
 
itsLegend

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
  • Нравится
Реакции: OtherWeather
X

Xample

Новичок
89
1
Подскажите как зделать чтобы скрипт продолжал работать если игра на паузе?
а то из скрипта вызываю эмуляцию клавиши ESC потом задержка потом снова ESC но второй раз уже не нажимает, т.к. игра на паузе
 
itsLegend

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
Dikson777 написал(а):
Правильный код?

Код: 
{$CLEO .cs}
{$INCLUDE SF}

0000:

0B34: samp register_client_command "svarm" to_label @cmd_on


while true
wait 0
if 28@ == 1
then
0AB1: call_scm_func @SendOnFootPosition 3 153.7127,1847.1963,17.6406 // числа по "3", это X Y Z
28@ = 0
end
end

:cmd_on
wait 0
28@ = 1
chatmsg "[CLEO] FastARMY by DIKSON | Выполнено!" 0xFFCC33
SAMP.CmdRet()

:SendOnFootPosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
alloc 4@ 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
5@ = RakNet.NewBitStream()
BitStream.Write(5@, 212, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
Нажмите для раскрытия...
153.7127,1847.1963,17.6406
здесь не нужно указывать запятые.
 
E

Enjoy

Новичок
Проверенный
164
11
Xample написал(а):
Подскажите как зделать чтобы скрипт продолжал работать если игра на паузе?
а то из скрипта вызываю эмуляцию клавиши ESC потом задержка потом снова ESC но второй раз уже не нажимает, т.к. игра на паузе
Нажмите для раскрытия...
Эмуляция клавиш, как мне известно, не работает в свернутом режиме.
 
O

OtherWeather

Новичок
39
2
В чем ошибка?
При заходе в игру диалог уже отображается и все текстуры мерцают.
Код: 
{$CLEO}
{$INCLUDE SF}

const
EVENT_BUTTON_CLICKED                = 257
EVENT_COMBOBOX_SELECTION_CHANGED    = 513
EVENT_RADIOBUTTON_CHANGED           = 769
EVENT_CHECKBOX_CHANGED              = 1025
EVENT_SLIDER_VALUE_CHANGED          = 1281
EVENT_EDITBOX_STRING                = 1537
EVENT_EDITBOX_CHANGE                = 1538
EVENT_LISTBOX_ITEM_DBLCLK           = 1793
EVENT_LISTBOX_SELECTION             = 1794
end
0000:
repeat
    wait 300
until 0AFA:  is_samp_available
wait 0

0B80: dialog 0@ = create "First dialog"
0B84: dialog 0@ set_pos_XY 900 440 size 300 500
0B82: dialog 0@ add_button id 2 text "Close" pos_XY 0 0 size 100 30
0B91: dialog 0@ add_static id 3 text "Text" pos_XY 2 105 size 150 20
while true
    wait 0
    if 0B81: dialog 0@ pop_event_to 1@ control_id_to 2@
    then
        if 1@ == EVENT_BUTTON_CLICKED
        then
            if 2@ == 1
            then
            0B86: dialog 0@ set_visible false
        end
    end
end

0b34: "dialog" @dialog

:dialog
0B86: dialog 0@ set_visible true
samp.CmdRet()
 
D

DubStep_

Известный
292
52
OtherWeather написал(а):
В чем ошибка?
При заходе в игру диалог уже отображается и все текстуры мерцают.
Код: 
{$CLEO}
{$INCLUDE SF}

const
EVENT_BUTTON_CLICKED                = 257
EVENT_COMBOBOX_SELECTION_CHANGED    = 513
EVENT_RADIOBUTTON_CHANGED           = 769
EVENT_CHECKBOX_CHANGED              = 1025
EVENT_SLIDER_VALUE_CHANGED          = 1281
EVENT_EDITBOX_STRING                = 1537
EVENT_EDITBOX_CHANGE                = 1538
EVENT_LISTBOX_ITEM_DBLCLK           = 1793
EVENT_LISTBOX_SELECTION             = 1794
end
0000:
repeat
    wait 300
until 0AFA:  is_samp_available
wait 0

0B80: dialog 0@ = create "First dialog"
0B84: dialog 0@ set_pos_XY 900 440 size 300 500
0B82: dialog 0@ add_button id 2 text "Close" pos_XY 0 0 size 100 30
0B91: dialog 0@ add_static id 3 text "Text" pos_XY 2 105 size 150 20
while true
    wait 0
    if 0B81: dialog 0@ pop_event_to 1@ control_id_to 2@
    then
        if 1@ == EVENT_BUTTON_CLICKED
        then
            if 2@ == 1
            then
            0B86: dialog 0@ set_visible false
        end
    end
end

0b34: "dialog" @dialog

:dialog
0B86: dialog 0@ set_visible true
samp.CmdRet()
Нажмите для раскрытия...
Изи
PHP: 
{$CLEO}
{$INCLUDE SF}
0000:
repeat
    wait 300
until 0AFA:  is_samp_available
const
EVENT_BUTTON_CLICKED                = 257
EVENT_COMBOBOX_SELECTION_CHANGED    = 513
EVENT_RADIOBUTTON_CHANGED           = 769
EVENT_CHECKBOX_CHANGED              = 1025
EVENT_SLIDER_VALUE_CHANGED          = 1281
EVENT_EDITBOX_STRING                = 1537
EVENT_EDITBOX_CHANGE                = 1538
EVENT_LISTBOX_ITEM_DBLCLK           = 1793
EVENT_LISTBOX_SELECTION             = 1794
end

0B80: dialog 0@ = create "First dialog"
0B84: dialog 0@ set_pos_XY 900 440 size 300 500
0B82: dialog 0@ add_button id 2 text "Close" pos_XY 0 0 size 100 30
0B91: dialog 0@ add_static id 3 text "Text" pos_XY 2 105 size 150 20    
0B86: dialog 0@ set_visible false
0b34: "dialog" @dialog

while true
wait 0
    if
    0B87:  dialog 0@ is_visible
    then
        repeat
        wait 0
        until 0B81: dialog 0@ pop_event_to 1@ control_id_to 2@
            if 1@ == EVENT_BUTTON_CLICKED
            then
            if 2@ == 1
                then
                0B86: dialog 0@ set_visible false
            end
        end
    end
end

:dialog
0B86: dialog 0@ set_visible true
samp.CmdRet()
 
  • Нравится
Реакции: OtherWeather
D

Dikson777

Новичок
45
0
Ребят, в чем ошибка?
Не работает, я вот зашел в игру (ARP). Ввел команду /svarm и у меня напечатало только текст "
[CLEO] FastARMY by DIKSON | Выполнено!". А телепортация не произошла. У меня координаты стоят для получения брони в Сухопутный Войсках, а броня не появляется и пикап не исчезает..

Код: 
{$CLEO .cs}
{$INCLUDE SF}


0000:

:Begin

0B34: samp register_client_command "svarm" to_label @cmd_on


while true
wait 0
if 28@ == 1
then
0AB1: call_scm_func @SendOnFootPosition 3 153.7127 1847.1963 17.6406 // числа по "3", это X Y Z
28@ = 0
end
end

:cmd_on
wait 0
28@ = 1
chatmsg "[CLEO] FastARMY by DIKSON | Выполнено!" 0xFFCC33
SAMP.CmdRet()

:SendOnFootPosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
alloc 4@ 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
5@ = RakNet.NewBitStream()
BitStream.Write(5@, 212, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
 
D

DubStep_

Известный
292
52
legend2360 написал(а):
Не закрыто условие if 2@ == 1
Нажмите для раскрытия...
Не в этом дело, там реистрация даже не происходит . Отсюда и краш
Dikson777 написал(а):
Ребят, в чем ошибка?
Не работает, я вот зашел в игру (ARP). Ввел команду /svarm и у меня напечатало только текст "
[CLEO] FastARMY by DIKSON | Выполнено!". А телепортация не произошла. У меня координаты стоят для получения брони в Сухопутный Войсках, а броня не появляется и пикап не исчезает..

Код: 
{$CLEO .cs}
{$INCLUDE SF}


0000:

:Begin

0B34: samp register_client_command "svarm" to_label @cmd_on


while true
wait 0
if 28@ == 1
then
0AB1: call_scm_func @SendOnFootPosition 3 153.7127 1847.1963 17.6406 // числа по "3", это X Y Z
28@ = 0
end
end

:cmd_on
wait 0
28@ = 1
chatmsg "[CLEO] FastARMY by DIKSON | Выполнено!" 0xFFCC33
SAMP.CmdRet()

:SendOnFootPosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55
alloc 4@ 68
0C10: memcpy destination 4@ source 3@ size 68
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
5@ = RakNet.NewBitStream()
BitStream.Write(5@, 212, BS_TYPE_BYTE, 1)
BitStream.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.LiteSend(5@)
RakNet.DeleteBitStream(5@)
free 4@
ret 0
Нажмите для раскрытия...
Отправь RPC что ты поднял пикап
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  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
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу