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

[grandpafromghetto]

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

нихуя вы раскошерились мажоры бля... а я бедняг справочкой сб пользуюсь

 

[Kristyan]

Тут скорей уже нужно пересмотреть твое условие нажатой клавиши

Зачем? Мне нужно просто поставить в цикл один опкод (наверное), чтобы игрок не сбивал работу скрипта...

if
1@== true
Then
Repeat
//Отключения клавиши
Until 1@== false
End

 

[Royan_Millans]

Я хотел, именно флудер кнопки Enter. Что бы скрипт флудил кнопкой Enter. Кому не тяжело помогите пж.

{$CLEO}
{$NOSOURCE}

0000:

repeat
wait 0
until Samp.Available()


while true
wait 0
if 0AB0:   key_pressed 113 // id клавиши F2 (Активация скрипта)
then
    repeat
    wait 0
    0C72: set_virtual_key 13 down true // ID клавиши Enter (Та клавиша, которой он флудит)
    wait 150
    0C72: set_virtual_key 13 down false // ID клавиши Enter (Та клавиша, которой он флудит)
    until 0AB0:   key_pressed 114 // // id клавиши F3 (Деактивация скрипта)
end
end

 

[Forgionokt]

{$CLEO}
{$NOSOURCE}

0000:

repeat
wait 0
until Samp.Available()


while true
wait 0
if 0AB0:   key_pressed 113 // id клавиши F2 (Активация скрипта)
then
    repeat
    wait 0
    0C72: set_virtual_key 13 down true // ID клавиши Enter (Та клавиша, которой он флудит)
    wait 150
    0C72: set_virtual_key 13 down false // ID клавиши Enter (Та клавиша, которой он флудит)
    until 0AB0:   key_pressed 114 // // id клавиши F3 (Деактивация скрипта)
end
end

Спасибо, но пишет неизвестная команда Samp.Available()

 

[grandpafromghetto]

Спасибо, но пишет неизвестная команда Samp.Available()

установи опкоды сф

 

[Kristyan]

Хочу как-то отправлять серверу что я НЕ нажимаю на клавишу 2, но не получается.. хлп

{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()

0b34: "go" @start


while true
wait 0

if and
actor.Driving($PLAYER_ACTOR)
key_down 50
1@ == true
then
0C72: set_virtual_key 50 down false
chatmsg "Lol" -1
end
END


:start
0B12: 1@ = 1@ XOR 1
if
1@ == true
then
chatmsg "ON" -1
else
chatmsg "OFF" -1
end
samp.CmdRet()

 

[Royan_Millans]

{$CLEO}

0000: NOP
const
    DIALOG_STYLE_MSGBOX = 0 // Ñ òåêñòîì
    DIALOG_STYLE_INPUT = 1 // Ñ ïîëåì äëÿ ââîäà òåêñòà
    DIALOG_STYLE_LIST = 2 // Ñî ñïèñêîì
    DIALOG_STYLE_PASSWORD = 3 // Ñ ïîëåì äëÿ ââîäà òåêñòà, òåêñò çàìåíÿåòñÿ òî÷êàìè
    DIALOG_STYLE_TABLIST = 4 // Ïîõîæ íà DIALOG_STYLE_LIST, íî ìîæåò áûòü ðàçáèò íà íåñêîëüêî êîëîíîê
    DIALOG_STYLE_TABLIST_HEADERS = 5 // Òîò æå, ÷òî è DIALOG_STYLE_TABLIST, íî èìååò çàãîëîâêè äëÿ êîëîíîê
end
repeat
wait 0
until samp.Available()


if 8AAB:   not file_exists "Cleo\nastr.ini"
then
0AF8: samp add_message_to_chat "Âíèìàíèå! Ó Âàñ íå íàñòðîåí ñêðèïò" color 0xFFFFFF
0AF8: samp add_message_to_chat "Íàñòðîèòü ìîæíî ïðè ïîìîùè - /nastr" color 0xFFFFFF
end

0B34: samp register_client_command "nastr" to_label @nasrt
0BDE: pause_thread 0@


:nasrt
if 8AAB:   not file_exists "Cleo\nastr.ini"
then
    0AF1: write_int 0 to_ini_file "Cleo\nastr.ini" section "Nastr" key "Lvl"
    0AF1: write_int 0 to_ini_file "Cleo\nastr.ini" section "Nastr" key "Medcart"
    0AF1: write_int 0 to_ini_file "Cleo\nastr.ini" section "Nastr" key "Zakon"
    alloc 0@ 256
    0AD3: 0@ = format "Òðåáóåìûé ËÂË [Íåèçâåñòíî]%cÒðåáóåòñÿ ëè Ìåä êàðòà [Íåèçâåñòíî]%cÒðåáóåìàÿ çàêîíêà [Íåèçâåñòíî]" 0xA 0xA
    0B3B: samp show_dialog id 476 caption "Íàñòðîéêè" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
    free 0@
    10@ = 1
        while 10@ == 1
        wait 0
        if 0B3C:  samp is_dialog_responded id 476 button 2@ list_item 3@ input_text 0
        then
        if 2@ == 1
        then
            if 3@ == 0
            then
                0B3B: samp show_dialog id 477 caption "Òðåáóåìûé ËÂË" text "Âïèøèòå ñþäà ÷èñëî" button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_INPUT
                repeat
                wait 0
                until 0B3C:  samp is_dialog_responded id 477 button 2@ list_item 3@ input_text 4@
                if 2@ == 1
                    then
                    0C1A: 4@ = atoi 5@
                    0AF1: write_int 5@ to_ini_file "Cleo\nastr.inii" section "Nastr" key "Lvl"
                    0AF8: samp add_message_to_chat "Ëâë áûë èçìåíåí íà: [%d]" color 0xFFFFFF params 5@
                    alloc 0@ 256
                    0AD3: 0@ = format "Òðåáóåìûé ËÂË [Íåèçâåñòíî]%cÒðåáóåòñÿ ëè Ìåä êàðòà [Íåèçâåñòíî]%cÒðåáóåìàÿ çàêîíêà [Íåèçâåñòíî]" 0xA 0xA
                    0B3B: samp show_dialog id 476 caption "Íàñòðîéêè" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
                    free 0
                    else
                    alloc 0@ 256
                    0AD3: 0@ = format "Òðåáóåìûé ËÂË [Íåèçâåñòíî]%cÒðåáóåòñÿ ëè Ìåä êàðòà [Íåèçâåñòíî]%cÒðåáóåìàÿ çàêîíêà [Íåèçâåñòíî]" 0xA 0xA
                    0B3B: samp show_dialog id 476 caption "Íàñòðîéêè" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
                    free 0
                end
            end
        else
        10@ = 0
        end
        end
    end 
end
0B43: samp cmd_ret

Почему крашит после ввода команды?

 

[Musaigen]

{$CLEO}

0000: NOP
const
    DIALOG_STYLE_MSGBOX = 0 // Ñ òåêñòîì
    DIALOG_STYLE_INPUT = 1 // Ñ ïîëåì äëÿ ââîäà òåêñòà
    DIALOG_STYLE_LIST = 2 // Ñî ñïèñêîì
    DIALOG_STYLE_PASSWORD = 3 // Ñ ïîëåì äëÿ ââîäà òåêñòà, òåêñò çàìåíÿåòñÿ òî÷êàìè
    DIALOG_STYLE_TABLIST = 4 // Ïîõîæ íà DIALOG_STYLE_LIST, íî ìîæåò áûòü ðàçáèò íà íåñêîëüêî êîëîíîê
    DIALOG_STYLE_TABLIST_HEADERS = 5 // Òîò æå, ÷òî è DIALOG_STYLE_TABLIST, íî èìååò çàãîëîâêè äëÿ êîëîíîê
end
repeat
wait 0
until samp.Available()


if 8AAB:   not file_exists "Cleo\nastr.ini"
then
0AF8: samp add_message_to_chat "Âíèìàíèå! Ó Âàñ íå íàñòðîåí ñêðèïò" color 0xFFFFFF
0AF8: samp add_message_to_chat "Íàñòðîèòü ìîæíî ïðè ïîìîùè - /nastr" color 0xFFFFFF
end

0B34: samp register_client_command "nastr" to_label @nasrt
0BDE: pause_thread 0@


:nasrt
if 8AAB:   not file_exists "Cleo\nastr.ini"
then
    0AF1: write_int 0 to_ini_file "Cleo\nastr.ini" section "Nastr" key "Lvl"
    0AF1: write_int 0 to_ini_file "Cleo\nastr.ini" section "Nastr" key "Medcart"
    0AF1: write_int 0 to_ini_file "Cleo\nastr.ini" section "Nastr" key "Zakon"
    alloc 0@ 256
    0AD3: 0@ = format "Òðåáóåìûé ËÂË [Íåèçâåñòíî]%cÒðåáóåòñÿ ëè Ìåä êàðòà [Íåèçâåñòíî]%cÒðåáóåìàÿ çàêîíêà [Íåèçâåñòíî]" 0xA 0xA
    0B3B: samp show_dialog id 476 caption "Íàñòðîéêè" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
    free 0@
    10@ = 1
        while 10@ == 1
        wait 0
        if 0B3C:  samp is_dialog_responded id 476 button 2@ list_item 3@ input_text 0
        then
        if 2@ == 1
        then
            if 3@ == 0
            then
                0B3B: samp show_dialog id 477 caption "Òðåáóåìûé ËÂË" text "Âïèøèòå ñþäà ÷èñëî" button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_INPUT
                repeat
                wait 0
                until 0B3C:  samp is_dialog_responded id 477 button 2@ list_item 3@ input_text 4@
                if 2@ == 1
                    then
                    0C1A: 4@ = atoi 5@
                    0AF1: write_int 5@ to_ini_file "Cleo\nastr.inii" section "Nastr" key "Lvl"
                    0AF8: samp add_message_to_chat "Ëâë áûë èçìåíåí íà: [%d]" color 0xFFFFFF params 5@
                    alloc 0@ 256
                    0AD3: 0@ = format "Òðåáóåìûé ËÂË [Íåèçâåñòíî]%cÒðåáóåòñÿ ëè Ìåä êàðòà [Íåèçâåñòíî]%cÒðåáóåìàÿ çàêîíêà [Íåèçâåñòíî]" 0xA 0xA
                    0B3B: samp show_dialog id 476 caption "Íàñòðîéêè" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
                    free 0
                    else
                    alloc 0@ 256
                    0AD3: 0@ = format "Òðåáóåìûé ËÂË [Íåèçâåñòíî]%cÒðåáóåòñÿ ëè Ìåä êàðòà [Íåèçâåñòíî]%cÒðåáóåìàÿ çàêîíêà [Íåèçâåñòíî]" 0xA 0xA
                    0B3B: samp show_dialog id 476 caption "Íàñòðîéêè" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
                    free 0
                end
            end
        else
        10@ = 0
        end
        end
    end
end
0B43: samp cmd_ret

Почему крашит после ввода команды?

Потому что в командах нельзя использовать wait. Выноси в основной цикл.

 

[kawa operand]

Хочу как-то отправлять серверу что я НЕ нажимаю на клавишу 2, но не получается.. хлп

{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()

0b34: "go" @start


while true
wait 0

if and
actor.Driving($PLAYER_ACTOR)
key_down 50
1@ == true
then
0C72: set_virtual_key 50 down false
chatmsg "Lol" -1
end
END


:start
0B12: 1@ = 1@ XOR 1
if
1@ == true
then
chatmsg "ON" -1
else
chatmsg "OFF" -1
end
samp.CmdRet()

ты так не на сервер отправляешь а у себя отжимаешь и вообще хуйню какую то ты написал

 

[Kristyan]

ты так не на сервер отправляешь а у себя отжимаешь и вообще хуйню какую то ты написал

Да знаю что хуйню сделал, но поможешь мне? Как сложно вам сказать в чём проблема, комментатор хренов

 

[kawa operand]

с чем тебе помочь лмао
хукай плеер снюс и там будет кнопка

 

[NookieONE]

Скиньте ссылку, где указаны все типы переменных.
%s %d и т.д.

 

[p1cador]

@NookieONE
гугл

 

[Kristyan]

с чем тебе помочь лмао

Типа рофл, да?

плеер снюс

Что за хук, скажи нормально...

 

[kawa operand]

структура которая отправляется чтобы синхронизировать твое положение (но какого то хуя там еще и кнопки есть) onfoot_data