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

REMI99

Известный
38
1
Torej. Vsi poznamo avtomobil s sestavnimi deli poplav. kdorkoli mi lahko pomaga in ga naredim tako, da ko pritisnem 1, se vhodna vrata zrušijo. Prosim, dajte mi vir
 

hnnssy

Известный
Друг
2,684
2,762
Torej. Vsi poznamo avtomobil s sestavnimi deli poplav. kdorkoli mi lahko pomaga in ga naredim tako, da ko pritisnem 1, se vhodna vrata zrušijo. Prosim, dajte mi vir
poskusite tako
CLEO:
{$CLEO}
0000:

while true
    wait 0
    if and
    Actor.Driving($PLAYER_ACTOR)
    0AB0: 49
    then
        00D9: 1@ = actor $PLAYER_ACTOR car
        0689: set_car 1@ remove_door 2 removed_door_visible 1
        while 0AB0: 49
            wait 0
        end
    end
end
 

loganhackerdff

Известный
868
519
парни, помогите пж, как скин человека и его деньги получить? через структуру@hnnssy
0A8E: 2@ = 1@ + 0x756wordКоличество денег
 
Последнее редактирование:

alohadance123

Новичок
2
0
Код:
{$CLEO}
0000:NOP

wait 3000


:warelock
wait 0
if and
not SAMP.IsDialogActive(-1)
not SAMP.ChatInputOpened()
0AB0:   key_pressed 76
not key_down 18
jf @warelock
0AF9: samp say_msg "/warelock"
wait 200
Что не так?
 

Kristyan

Известный
165
16
Код:
{$CLEO}
0000:NOP

wait 3000


:warelock
wait 0
if and
not SAMP.IsDialogActive(-1)
not SAMP.ChatInputOpened()
0AB0:   key_pressed 76
not key_down 18
jf @warelock
0AF9: samp say_msg "/warelock"
wait 200
Что не так?
CLEO:
{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()

while true
wait 0

     if and
     not SAMP.IsDialogActive(-1)
     not SAMP.ChatInputOpened()
     0AB0:   key_pressed 76
     not key_down 18
     then
            0AF9: samp say_msg "/warelock"
            wait 200
     end

END
 

Isov

Известный
109
19
Ребят помогите, в Cleo не шарю но надо собрать код а он не собирается, инклуда нету толи я хуй пойму, подскажите может где взять его и как его установить, ребят только не предлагайте самим собрать, мне там с задержкой играться нужно...
 

Вложения

  • Безымянный.jpg
    Безымянный.jpg
    80.4 KB · Просмотры: 195

Snoopcheg

Известный
151
82
Ну я тип лах, и вот.... пишу такой скрипт, всё ок, там команду регаю, потом создаю диалог в стиле list, добавляю элементы. Добавляю чек на нажатия пунктов и тд, но когда в игре выбираю пунктик и нажимаю enter ничего не происходит, только после повторного ввода команды. Шо робить?))))
 

D3.Pheonix

🎹
Модератор
2,867
1,643
Ну я тип лах, и вот.... пишу такой скрипт, всё ок, там команду регаю, потом создаю диалог в стиле list, добавляю элементы. Добавляю чек на нажатия пунктов и тд, но когда в игре выбираю пунктик и нажимаю enter ничего не происходит, только после повторного ввода команды. Шо робить?))))
Код скинуть, не?
 

Snoopcheg

Известный
151
82
Код скинуть, не?
нет, зачем оно xD
CLEO:
{$CLEO}
0000:

const
         DIALOG_STYLE_LIST = 2
end

repeat
    wait 400
until 0AFA:  is_samp_available

0B34: samp register_client_command "pizdec" to_label @pizdec

while true
    wait 0
end

:pizdec
0ac8: alloc 0@ size 256
0ad3: format_stirng 0@ = "first%csecond" 0xA
0B3B: samp show_dialog id 85 caption "Pizdec" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
if 0B3C: samp is_dialog_responded id 85 button 1@ list_item 3@ input_text 0
then
    if 1@ == 1
    then
        if 3@ == 0
        then
            actor.PutAt(1609.124 971.5497 17.6145)
        end
    else
    end
end
0ac9: free 0@
0B43: samp cmd_ret
 

Kristyan

Известный
165
16
нет, зачем оно xD
CLEO:
{$CLEO}
0000:

const
         DIALOG_STYLE_LIST = 2
end

repeat
    wait 400
until 0AFA:  is_samp_available

0B34: samp register_client_command "pizdec" to_label @pizdec

while true
    wait 0
end

:pizdec
0ac8: alloc 0@ size 256
0ad3: format_stirng 0@ = "first%csecond" 0xA
0B3B: samp show_dialog id 85 caption "Pizdec" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
if 0B3C: samp is_dialog_responded id 85 button 1@ list_item 3@ input_text 0
then
    if 1@ == 1
    then
        if 3@ == 0
        then
            actor.PutAt(1609.124 971.5497 17.6145)
        end
    else
    end
end
0ac9: free 0@
0B43: samp cmd_ret


CLEO:
while true
    wait 0

    if 0B3C: samp is_dialog_responded id 85 button 1@ list_item 3@ input_text 0
    then
        if 1@ == 1
        then
                if 3@ == 0
                then
                     actor.PutAt(1609.124 971.5497 17.6145)
                end
          end
     end

end

:pizdec
0ac8: alloc 0@ size 256
0ad3: format_stirng 0@ = "first%csecond" 0xA
0B3B: samp show_dialog id 85 caption "Pizdec" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
0ac9: free 0@
0B43: samp cmd_ret
 

Snoopcheg

Известный
151
82
https://blast.hk/threads/2346/ описана очень интересная фигня, но вот правда интересно узнать про файлы checklocal.bat и checkurl.bat, функции данных файлов я понимаю, но вот когда пытаюсь открыть ссылку на скачивание меня дропбокс посылает с 403 ошибкой. Есть ли какая-то замена данным файлам или эти файлы, только там, где я могу нормально их скачать?