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

shailkiller · 11 Фев 2018

Код:

wait 228      
repeat
wait 0
until 0AB0: 54
8B21: not samp is_chat_opened
0ACD: show_text_highpriority "Anti-freeze OFF" time 1000
SAMP.WriteSAMPMemory(0x168E0, 1@, 2)
wait 228
end
end

Получилось частично, скрипт теперь не врубается при вкл чате, НО он выключить его можно, даже когда чат открыт, что надо делать в этой ситуации? Я вписал код так. Нужно туда Until добавить?

kawa operand · 11 Фев 2018

весь код дай и ваще какого хуя

shailkiller написал(а):
8B21: not samp is_chat_opened

это условие бля

shailkiller · 11 Фев 2018

kewa opcode написал(а):
весь код дай и ваще какого хуя

это условие бля

Код:

{$CLEO .cs}
0000:

0662: printstring "Anti-freeze"

repeat
wait 0
until SAMP.Available()
0AF8: samp add_message_to_chat "Anti-Freeze by shailkiller" color 0xFF0000

while true
wait 0
if and
0AB0: 54
8B21: not samp is_chat_opened
then
0ACD: show_text_highpriority "Anti-freeze ON" time 1000
SAMP.ReadSAMPMemory(1@, 0x168E0, 2)
SAMP.WriteSAMPMemory(0x168E0, 50064, 2)
wait 228     
repeat
wait 0
until 0AB0: 54
8B21: not samp is_chat_opened
0ACD: show_text_highpriority "Anti-freeze OFF" time 1000
SAMP.WriteSAMPMemory(0x168E0, 1@, 2)
wait 228
end
end

kawa operand · 11 Фев 2018

CLEO:

31@ = false
while true
    wait 0
    if 8B21: not samp is_chat_opened
    then
        if 0ADC:   test_cheat "6"
        then
            if 31@ == false
            then
            SAMP.WriteSAMPMemory(0x168E0, 50064, 2)
            31@ = true
            else
            SAMP.WriteSAMPMemory(0x168E0, 1@, 2)
            31@ = false
            end
        end
    end
end

shailkiller · 11 Фев 2018

kewa opcode написал(а):

CLEO:

31@ = false
while true
    wait 0
    if 8B21: not samp is_chat_opened
    then
        if 0ADC:   test_cheat "6"
        then
            if 31@ == false
            then
            SAMP.WriteSAMPMemory(0x168E0, 50064, 2)
            31@ = true
            else
            SAMP.WriteSAMPMemory(0x168E0, 1@, 2)
            31@ = false
            end
        end
    end
end

Нормально, всё работает, спасибо

Код:

if 0ADC:   test_cheat "6"

Через этот опкод можно же и чит-код забабахать, да?.

kawa operand · 11 Фев 2018

да hesoyam

Sashka · 11 Фев 2018

randazzo написал(а):
перебирай строки, получай текст через 0B48: samp 1@ = get_current_dialog_list_item и ищи нужный.

0b48 выдает какой номер строки выделен в данный момент, но не ищет текст в ней

kawa operand · 11 Фев 2018

Напиши в поиске опкодов НАВОДЯЩИЕ слова
get list text

Kristyan · 11 Фев 2018

Привет ребята, вот у меня есть проблемка.. Не знаю зачем вылетает игра если пишу ID не в зоне стрима.

CLEO:

{$CLEO}
0000:


repeat
wait 0
until SAMP.Available()


0B34: samp register_client_command "cpe" to_label @cpe

0BDE: pause_thread 0@


:cpe
SAMP.IsCommandTyped(20@)
if
0AD4: 20@ = scan_string 20@ format "%d" 21@
then
 IF 
    samp.IsPlayerConnected(21@)
    then
      0B20: samp 1@ = actor_handle_by_samp_player_id 21@ 
        if   and
        056D:   actor 1@ defined
        0104:   actor $PLAYER_ACTOR near_actor 1@ radius 5.0 5.0 5.0 sphere FALSE
        then
            0AF9: samp say_msg "text %d 10" 21@
            0AF9: samp say_msg "text %d " 21@
            0AF9: samp say_msg "text" 
        else
         chatmsg "near" -1
         end
    else
    chatmsg "connect" -1
    end
else
chatmsg "syntax" -1
end
SAMP.CmdRet()

Здесь декомпил

CLEO:

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP 

:Noname_2
wait 0 
   SAMP.Available
jf @Noname_2 
0B34: samp register_client_command "cpe" to_label @Noname_32 
0BDE: pause_thread 0@ 

:Noname_32
   SAMP.IsCommandTyped(20@)
if 
0AD4: 20@ = scan_string 20@ format "%d" 21@ 
jf @Noname_218 
if 
   SAMP.IsPlayerConnected(21@)
jf @Noname_197 
1@ = SAMP.GetActorHandleByPlayerID(21@)
if and
056D:   actor 1@ defined 
0104:   actor $PLAYER_ACTOR near_actor 1@ radius 5.0 5.0 5.0 sphere 0 
jf @Noname_179 
say "text %d 10" 21@ 
say "text %d " 21@ 
say "text" 
goto @Noname_190 

:Noname_179
chatmsg "near" -1 

:Noname_190
goto @Noname_211 

:Noname_197
chatmsg "connect" -1 

:Noname_211
goto @Noname_231 

:Noname_218
chatmsg "syntax" -1 

:Noname_231
SAMP.CmdRet

[/cleo]

LaRossa · 11 Фев 2018

Kristyan написал(а):

Привет ребята, вот у меня есть проблемка.. Не знаю зачем вылетает игра если пишу ID не в зоне стрима.

CLEO:

{$CLEO}
0000:


repeat
wait 0
until SAMP.Available()


0B34: samp register_client_command "cpe" to_label @cpe

0BDE: pause_thread 0@


:cpe
SAMP.IsCommandTyped(20@)
if
0AD4: 20@ = scan_string 20@ format "%d" 21@
then
 IF
    samp.IsPlayerConnected(21@)
    then
      0B20: samp 1@ = actor_handle_by_samp_player_id 21@
        if   and
        056D:   actor 1@ defined
        0104:   actor $PLAYER_ACTOR near_actor 1@ radius 5.0 5.0 5.0 sphere FALSE
        then
            0AF9: samp say_msg "text %d 10" 21@
            0AF9: samp say_msg "text %d " 21@
            0AF9: samp say_msg "text"
        else
         chatmsg "near" -1
         end
    else
    chatmsg "connect" -1
    end
else
chatmsg "syntax" -1
end
SAMP.CmdRet()

Здесь декомпил

CLEO:

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:Noname_2
wait 0
   SAMP.Available
jf @Noname_2
0B34: samp register_client_command "cpe" to_label @Noname_32
0BDE: pause_thread 0@

:Noname_32
   SAMP.IsCommandTyped(20@)
if
0AD4: 20@ = scan_string 20@ format "%d" 21@
jf @Noname_218
if
   SAMP.IsPlayerConnected(21@)
jf @Noname_197
1@ = SAMP.GetActorHandleByPlayerID(21@)
if and
056D:   actor 1@ defined
0104:   actor $PLAYER_ACTOR near_actor 1@ radius 5.0 5.0 5.0 sphere 0
jf @Noname_179
say "text %d 10" 21@
say "text %d " 21@
say "text"
goto @Noname_190

:Noname_179
chatmsg "near" -1

:Noname_190
goto @Noname_211

:Noname_197
chatmsg "connect" -1

:Noname_211
goto @Noname_231

:Noname_218
chatmsg "syntax" -1

:Noname_231
SAMP.CmdRet

[/cleo]

CLEO:

{$CLEO}
0000:
while not Samp.Available()
    wait 0
end

0B34: samp register_client_command "cpe" to_label @cmd
0BDE: pause_thread 0

:cmd
SAMP.IsCommandTyped(20@)
if
0AD4: 20@ = scan_string 20@ format "%d" 21@
then
if samp.IsPlayerConnected(21@)
    then
    0104: actor $PLAYER_ACTOR near_actor 1@ radius 5.0 5.0 5.0 sphere FALSE
    if 056D: actor 1@ defined
        then
        say "text %d 10" 21@
        say "text %d " 21@
        say "text"
        else
         chatmsg "near" -1
         end
    else
    chatmsg "connect" -1
    end
else
chatmsg "syntax" -1
end
SAMP.CmdRet()

Kristyan · 11 Фев 2018

LaRossa написал(а):

CLEO:

{$CLEO}
0000:
while not Samp.Available()
    wait 0
end

0B34: samp register_client_command "cpe" to_label @cmd
0BDE: pause_thread 0

:cmd
SAMP.IsCommandTyped(20@)
if
0AD4: 20@ = scan_string 20@ format "%d" 21@
then
if samp.IsPlayerConnected(21@)
    then
    0104: actor $PLAYER_ACTOR near_actor 1@ radius 5.0 5.0 5.0 sphere FALSE
    if 056D: actor 1@ defined
        then
        say "text %d 10" 21@
        say "text %d " 21@
        say "text"
        else
         chatmsg "near" -1
         end
    else
    chatmsg "connect" -1
    end
else
chatmsg "syntax" -1
end
SAMP.CmdRet()

Забыл handle...

Rus1k228 · 11 Фев 2018

Здравствуйте, вообщем мне нужно сделать так чтобы была проверка что в определённых координатах есть красный чекпоинт, и если он там есть, то я бежал по этим координатам через другие координаты. Если такое возможно. То хелпаните плеаз.

LaRossa · 12 Фев 2018

Kristyan написал(а):
Забыл handle...

Отпиши что ты хочешь. Я не понимаю почему у тебя проверка на игрока не в цикле. Возле тебя может быть не один человек...

randazzo · 12 Фев 2018

Rus1k228 написал(а):
Здравствуйте, вообщем мне нужно сделать так чтобы была проверка что в определённых координатах есть красный чекпоинт, и если он там есть, то я бежал по этим координатам через другие координаты. Если такое возможно. То хелпаните плеаз.

Проверяешь наличие пикапа на карте, получаешь его координаты и сравниваешь с нужными, функции есть в теме, ищи по слову checkpoint

grandpafromghetto · 12 Фев 2018

Здрасте, опытнейшие сенсеи скриптинга. Крч, я тут хочу бота написать (на клео), но вот этот опкод

CLEO:

AS_actor $PLAYER_ACTOR goto_point 2542.3572 -1295.8500 1044.1250 mode 4 time -1 ms

у меня работает как-то криво (но скорее всего я кривой), т.к. когда я включаю, то он бежит не на эти координаты а в какую-то залупу. Помогите мне, пожалуйста, этот ли опкод вообще нужен или как его настроить на верный лад. Заранее большое спасибо.

Поиск

Поиск

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

shailkiller

Известный

kawa operand

перерывпятьминут

shailkiller

Известный

kawa operand

перерывпятьминут

shailkiller

Известный

kawa operand

перерывпятьминут

Sashka

Известный

kawa operand

перерывпятьминут

Kristyan

Известный

LaRossa

Потрачен

Kristyan

Известный

Rus1k228

Новичок

LaRossa

Потрачен

randazzo

.

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ

Похожие темы