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

[Terratomorf]

Скрипт должен нажимать numpad1 но он почему то просто начинает медленно шагать назад

{$CLEO}
0000:

while true
wait 0
    if 0C89:  key_just_pressed 112
    then
        repeat
        wait 0
        0B56: set_game_key 61 state 255
        wait 25
       
   until 0C89:  key_just_pressed 112
    end   
end

 

[egorka8]

Каким опкодом можно узнать текущие координаты игрока?

 

[DarkL1ght]

Каким опкодом можно узнать текущие координаты игрока?

{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()
0B34: samp register_client_command "coord" to_label @coord

repeat
wait 0
    if 0@ == true
    then
        00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
        0AF8: samp add_message_to_chat "{FF0000}Coord Position: %f %f %f" color 0xFFFFFF 1@ 2@ 3@
        end
    0@ = false
until false

:coord
0@ = true
SAMP.CmdRet()

 

[Musaigen]

Скрипт должен нажимать numpad1 но он почему то просто начинает медленно шагать назад

{$CLEO}
0000:

while true
wait 0
    if 0C89:  key_just_pressed 112
    then
        repeat
        wait 0
        0B56: set_game_key 61 state 255
        wait 25
      
   until 0C89:  key_just_pressed 112
    end  
end

Потому что игровой клавиши "61" не существует.

 

[Musaigen]

Ребята как сделать чтоб DXUT диалог появлялся и закрывался на команду помогите пожалуйста

0B34: samp register_client_command "dxut" to_label @DXUT

dialog.Create(0@, "Dialog By CMD")
dialog.SetRECT(0@, 450, 450, 450, 232)
Dialog.SetVisible(0@, false)


while true
wait 0
    if 1@ == 1
    then
        0B12: 2@ = 2@ XOR 1
        if 2@ == 1
        then
            Dialog.SetVisible(0@, true)
            Samp.ToggleCursor(true)
            1@ = 0
        else
            Dialog.SetVisible(0@, false)
            Samp.ToggleCursor(false)
            1@ = 0
        end
    end           
end


:DXUT
1@ = 1
samp.CmdRet()

 

[itsOkke]

ну вместо wait 525 поставь wait 5@

 

[kuleer]

можно ли как то получить последнюю позицию указателя строки в файле, чтобы каждый раз бралась следующая строка?

1
2
3

берём 1, отчищаем переменную от этой строки, берём 2, и тоже самое после 3

 

[NookieONE]

Игровая клавиша F8 aka скрина какой id?

 

[itsOkke]

а нахуй тебе именно Игровая

 

[NookieONE]

а нахуй тебе именно Игровая

Не на игровую, по идеи не будет делаться скрин

 

[axelino]

Хочу, чтобы скрипт выключался, когда персонаж находится в воде на мотоцикле и включался, когда персонаж уже не находится в воде, сидя на мотоцикле.

{$CLEO .cs}

0000: NOP

:NONAME_2
wait 0
if
Player.Defined($PLAYER_CHAR)
else_jump @NONAME_2
08C6: set_actor $PLAYER_ACTOR stay_on_bike 1
jump @NONAME_2

 

[itsOkke]

с хуя ли

 

[grandpafromghetto]

Как сделать, чтобы срипт активировался по надписи на экране
Пример: на экране при входе "Добро пожаловать" чтобы после этого что-то активировалось

Через гейм текст хук

 

[NookieONE]

Через гейм текст хук

Все. Сделал. Спасибо

{$CLEO}
{$INCLUDE SF}
0000: NOP
0BE3: raknet setup_incoming_rpc_hook @iRPC

WHILE TRUE
WAIT 0
END

:iRPC
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
IF 0@ == 73
    THEN
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BE9: raknet bit_stream 1@ reset_read_pointer
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_INT
    0BE7: raknet 3@ = bit_stream_read 1@ type BS_TYPE_INT
    0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_INT
    0AC8: 5@ = allocate_memory_size 125
    0BE8: raknet bit_stream 1@ read_array 5@ size 4@
    0C1E: array 5@ element 4@ el_size 1 = 0
    IF 0C29: 6@ = stristr string1 5@ string2 "tekst"
        THEN
        wait 5000
        say "/cmd"
    END
    0AC9: free_allocated_memory 5@
    0BE9: raknet bit_stream 1@ reset_read_pointer  
END
0BE0: raknet hook_ret TRUE

Как сделать, чтобы работал
wait 5000

 

[grandpafromghetto]

{$CLEO}
{$INCLUDE SF}
0000: NOP
0BE3: raknet setup_incoming_rpc_hook @iRPC

WHILE TRUE
WAIT 0
END

:iRPC
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
IF 0@ == 73
    THEN
    0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
    0BE9: raknet bit_stream 1@ reset_read_pointer
    0BE7: raknet 2@ = bit_stream_read 1@ type BS_TYPE_INT
    0BE7: raknet 3@ = bit_stream_read 1@ type BS_TYPE_INT
    0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_INT
    0AC8: 5@ = allocate_memory_size 125
    0BE8: raknet bit_stream 1@ read_array 5@ size 4@
    0C1E: array 5@ element 4@ el_size 1 = 0
    IF 0C29: 6@ = stristr string1 5@ string2 "tekst"
        THEN
        wait 5000
        say "/cmd"
    END
    0AC9: free_allocated_memory 5@
    0BE9: raknet bit_stream 1@ reset_read_pointer
END
0BE0: raknet hook_ret TRUE

Как сделать, чтобы работал
wait 5000

в этих функах вейт не пашет, вернее, игнорируется