Пишу клео но немного коряво Помогите!

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

SaMMpeR Cheats

Новичок
Автор темы
49
5
Пишу скрипт работает 1 команда /dfast но /fskill и /scroll нет
CLEO:
{$CLEO}

0000:
repeat
wait 0
until Samp.Available()

0B34: samp register_client_command "dfast" to_label @dfast
0B34: samp register_client_command "fskill" to_label @fskill
0B34: samp register_client_command "scroll" to_label @scroll

while true
wait 0
    if
    30@ == true
    then
        0393: actor $PLAYER_ACTOR perform_animation "python_crouchfire" at 1.5 times_normal_rate
        0393: actor $PLAYER_ACTOR perform_animation "python_fire" at 1.5 times_normal_rate
        0393: actor $PLAYER_ACTOR perform_animation "python_fire_poor" at 1.5 times_normal_rate
    end
end

while true
wait 0
    if
    31@ == true
    then
        :SKILL_11
        wait 0
        if
        Player.Defined($PLAYER_CHAR)
        else_jump @SKILL_11
        0627: update_integer_stat 72 to 100.0
        0627: update_integer_stat 78 to 100.0
        0627: update_integer_stat 71 to 100.0
        0627: update_integer_stat 76 to 100.0
        0627: update_integer_stat 79 to 100.0
        0627: update_integer_stat 77 to 100.0
        0627: update_integer_stat 70 to 100.0
        jump @SKILL_11
    end
end

while true
wait 0
    if
    32@ == true
    then
        :SCROLL_BY_SAMMPER_23
        wait 0
        if and
        0ab0: 113
        SAMP.Available
        SAMP.IsLocalPlayerSpawned
        jf @SCROLL_BY_SAMMPER_23
        print "~w~SCROLL ~g~ON" 1337
        wait 500
        goto @SCROLL_BY_SAMMPER_56
       
        :SCROLL_BY_SAMMPER_56
        wait 0
        0A96: 0@ = actor $PLAYER_ACTOR struct
        0A8E: 1@ = 0@ + 0x0718
        0A8D: 1@ = read_memory 1@ size 1 virtual_protect 0
        1@ *= 0x1C
        0A8E: 2@ = 0@ + 0x5A0
        005a: 2@ += 1@
        2@ += 0x8
        0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
        if
        2@ == 2
        jf @SCROLL_BY_SAMMPER_160
        0470: 5@ = actor $PLAYER_ACTOR current_weapon
        06AB: set_actor $PLAYER_ACTOR all_weapons_hidden 1
        wait 100
        01B9: set_actor $PLAYER_ACTOR armed_weapon_to 5@ 
        goto @SCROLL_BY_SAMMPER_56
       
        :SCROLL_BY_SAMMPER_160
        wait 0
        if
        0ab0: 113
        jf @SCROLL_BY_SAMMPER_56
        print "~w~SCROLL ~r~OFF" 1337
        wait 500
        goto @SCROLL_BY_SAMMPER_23
    end
end
   
:dfast
if
30@ == true
then
    30@ = false
    0AF8: samp add_message_to_chat "[Fast Deagle]: Äåàêòèâèðîâàí" color 0xFF0000
    else
    30@ = true
    0AF8: samp add_message_to_chat "[Fast Deagle]: Àêòèâèðîâàí" color 0xFF0000
    end
SAMP.CmdRet()

:fskill
if
31@ == true
then
    31@ = false
    0AF8: samp add_message_to_chat "[Fake Skills]: Äåàêòèâèðîâàí" color 0xFF0000
    else
    31@ = true
    0AF8: samp add_message_to_chat "[Fake Skills]: Àêòèâèðîâàí" color 0xFF0000
    end
SAMP.CmdRet()

:scroll
if
32@ == true
then
    32@ = false
    0AF8: samp add_message_to_chat "[Auto Scroll]: Äåàêòèâèðîâàí" color 0xFF0000
    else
    32@ = true
    0AF8: samp add_message_to_chat "[Auto Scroll]: Àêòèâèðîâàí" color 0xFF0000
    end
SAMP.CmdRet()
 

©Ded_Fedot

КГБ
2,139
1,263
Пишу скрипт работает 1 команда /dfast но /fskill и /scroll нет
CLEO:
{$CLEO}

0000:
repeat
wait 0
until Samp.Available()

0B34: samp register_client_command "dfast" to_label @dfast
0B34: samp register_client_command "fskill" to_label @fskill
0B34: samp register_client_command "scroll" to_label @scroll

while true
wait 0
    if
    30@ == true
    then
        0393: actor $PLAYER_ACTOR perform_animation "python_crouchfire" at 1.5 times_normal_rate
        0393: actor $PLAYER_ACTOR perform_animation "python_fire" at 1.5 times_normal_rate
        0393: actor $PLAYER_ACTOR perform_animation "python_fire_poor" at 1.5 times_normal_rate
    end
end

while true
wait 0
    if
    31@ == true
    then
        :SKILL_11
        wait 0
        if
        Player.Defined($PLAYER_CHAR)
        else_jump @SKILL_11
        0627: update_integer_stat 72 to 100.0
        0627: update_integer_stat 78 to 100.0
        0627: update_integer_stat 71 to 100.0
        0627: update_integer_stat 76 to 100.0
        0627: update_integer_stat 79 to 100.0
        0627: update_integer_stat 77 to 100.0
        0627: update_integer_stat 70 to 100.0
        jump @SKILL_11
    end
end

while true
wait 0
    if
    32@ == true
    then
        :SCROLL_BY_SAMMPER_23
        wait 0
        if and
        0ab0: 113
        SAMP.Available
        SAMP.IsLocalPlayerSpawned
        jf @SCROLL_BY_SAMMPER_23
        print "~w~SCROLL ~g~ON" 1337
        wait 500
        goto @SCROLL_BY_SAMMPER_56
      
        :SCROLL_BY_SAMMPER_56
        wait 0
        0A96: 0@ = actor $PLAYER_ACTOR struct
        0A8E: 1@ = 0@ + 0x0718
        0A8D: 1@ = read_memory 1@ size 1 virtual_protect 0
        1@ *= 0x1C
        0A8E: 2@ = 0@ + 0x5A0
        005a: 2@ += 1@
        2@ += 0x8
        0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
        if
        2@ == 2
        jf @SCROLL_BY_SAMMPER_160
        0470: 5@ = actor $PLAYER_ACTOR current_weapon
        06AB: set_actor $PLAYER_ACTOR all_weapons_hidden 1
        wait 100
        01B9: set_actor $PLAYER_ACTOR armed_weapon_to 5@
        goto @SCROLL_BY_SAMMPER_56
      
        :SCROLL_BY_SAMMPER_160
        wait 0
        if
        0ab0: 113
        jf @SCROLL_BY_SAMMPER_56
        print "~w~SCROLL ~r~OFF" 1337
        wait 500
        goto @SCROLL_BY_SAMMPER_23
    end
end
  
:dfast
if
30@ == true
then
    30@ = false
    0AF8: samp add_message_to_chat "[Fast Deagle]: Äåàêòèâèðîâàí" color 0xFF0000
    else
    30@ = true
    0AF8: samp add_message_to_chat "[Fast Deagle]: Àêòèâèðîâàí" color 0xFF0000
    end
SAMP.CmdRet()

:fskill
if
31@ == true
then
    31@ = false
    0AF8: samp add_message_to_chat "[Fake Skills]: Äåàêòèâèðîâàí" color 0xFF0000
    else
    31@ = true
    0AF8: samp add_message_to_chat "[Fake Skills]: Àêòèâèðîâàí" color 0xFF0000
    end
SAMP.CmdRet()

:scroll
if
32@ == true
then
    32@ = false
    0AF8: samp add_message_to_chat "[Auto Scroll]: Äåàêòèâèðîâàí" color 0xFF0000
    else
    32@ = true
    0AF8: samp add_message_to_chat "[Auto Scroll]: Àêòèâèðîâàí" color 0xFF0000
    end
SAMP.CmdRet()
Жесткий код пздц
 

hnnssy

Известный
Друг
2,684
2,762
в общем у тебя 3 цикла while, работа кода дальше первого цикла не уйдёт
делай такое расположение:
while true
wait 0
if 30@ == 1
then
..
end
if 31@ == 1
then
..
end
end
32@ замени на что-то другое, значение этой переменной увеличивается каждую секунду на тысячу
 
  • Нравится
Реакции: ©Ded_Fedot
Статус
В этой теме нельзя размещать новые ответы.