Help Cleo.

ZyZ.MaxiM

Active member
Joined
Nov 14, 2022
Messages
93
Solutions
2
Reaction score
4
Hello again, i created a CMD for my samp server and i want to add a feature that when i type the command "/qt" it will say in chat like:
Attention! The game will close in 15 seconds.
Attention! The game will close in 10 seconds.
Attention! The game will close in 5 seconds.
with a delay of 5 seconds between messages, after that to wait another five seconds and automatically use the command /q.

here is the code:​

{$CLEO}

0662: "Samp CMD by ZesMAXIM"
thread "Version 1.0"
wait 2500
0B34: samp register_client_command "helpcmd" to_label @cmd_1
0B34: samp register_client_command "bcd" to_label @cmd_2
0B34: samp register_client_command "slc" to_label @cmd_3
0B34: samp register_client_command "cs" to_label @cmd_4
0B34: samp register_client_command "sh" to_label @cmd_5
0B34: samp register_client_command "jb" to_label @cmd_6
0B34: samp register_client_command "emote" to_label @cmd_7
0B34: samp register_client_command "st" to_label @cmd_8
0B34: samp register_client_command "oc" to_label @cmd_9
0B34: samp register_client_command "bc" to_label @cmd_10
0B34: samp register_client_command "gt" to_label @cmd_11
0B34: samp register_client_command "tp" to_label @cmd_12
0B34: samp register_client_command "lu" to_label @cmd_13
0B34: samp register_client_command "sl" to_label @cmd_14
0B34: samp register_client_command "vch" to_label @cmd_15

0AB1: call_scm_func @chatmsg 0

:SYNDER_3
wait 0
jump @SYNDER_3

:cmd_1
SAMP.IsCommandTyped(0@)
0AC6: 17@ = label @SYNDER_2 offset
SAMP.ShowDialog(7777, "{FFC300}CMD by {FFFFFF}Zes{800000}MAXIM", 17@, "Close", "", 0)
SAMP.CmdRet

:SYNDER_2
hex
7b 38 30 30 30 30 30 7d 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 20 46 75 63 6b 20 59 6f 75 20 42 69 74 63 68 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 0d 0a 7b 46 46 46 46 46 46 7d 2f 62 63 64 20 2d 20 43 75 6d 70 65 72 69 20 63 72 65 64 69 74 65 20 63 61 73 69 6e 6f 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 6c 63 20 2d 20 56 69 6e 7a 69 20 63 72 65 64 69 74 65 20 63 61 73 69 6e 6f 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 63 73 20 2d 20 56 65 7a 69 20 70 72 6f 67 72 65 73 20 69 6e 20 63 6c 61 6e 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 68 20 2d 20 53 70 61 72 67 65 20 70 72 65 6d 69 75 6d 20 70 6f 69 6e 74 73 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 6a 62 20 2d 20 56 65 7a 69 20 63 61 74 20 61 69 20 6d 75 6e 63 69 74 20 70 65 6e 74 72 75 20 6a 6f 62 67 6f 61 6c 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 65 6d 6f 74 65 20 2d 20 56 69 6e 7a 69 20 65 6d 6f 74 65 20 63 72 61 74 65 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 74 20 2d 20 56 65 7a 69 20 73 74 61 74 69 73 74 69 63 69 6c 65 20 63 6f 6e 74 75 6c 75 69 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 6f 63 20 2d 20 44 65 73 63 68 69 7a 69 20 63 72 61 74 65 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 62 63 20 2d 20 43 75 6d 70 65 72 69 20 63 72 61 74 65 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 67 74 20 2d 20 50 72 69 6d 65 73 74 69 20 63 61 64 6f 75 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 74 70 20 2d 20 50 61 72 74 69 63 69 70 69 20 6c 61 20 65 76 65 6e 74 20 66 61 63 75 74 20 64 65 20 61 64 6d 69 6e 69 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 6c 75 20 2d 20 50 61 72 74 69 63 69 70 69 20 6c 61 20 4c 75 63 6b 79 20 46 69 73 68 65 72 6d 61 6e 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 6c 20 2d 20 44 6f 72 6d 69 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 76 63 68 20 2d 20 46 6f 6c 6f 73 65 73 74 69 20 63 6f 6d 61 6e 64 61 20 2f 76 6f 75 63 68 65 72 73 0d 0a 7b 38 30 30 30 30 30 7d 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 20 46 75 63 6b 20 59 6f 75 20 42 69 74 63 68 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 20 20 00
end


:cmd_2
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/buycredit"
SAMP.CmdRet()

:cmd_3
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/sellcredit"
SAMP.CmdRet()

:cmd_4
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/clanstats"
SAMP.CmdRet()

:cmd_5
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/shop"
SAMP.CmdRet()

:cmd_6
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/jobgoal"
SAMP.CmdRet()

:cmd_7
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/sellemotecrate"
SAMP.CmdRet()

:cmd_8
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/stats"
SAMP.CmdRet()

:cmd_9
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/opencrate"
SAMP.CmdRet()

:cmd_10
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/buycrate"
SAMP.CmdRet()

:cmd_11
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/getgift"
SAMP.CmdRet()

:cmd_12
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/tpevent"
SAMP.CmdRet()

:cmd_13
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/joinlucky"
SAMP.CmdRet()

:cmd_14
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/sleep"
SAMP.CmdRet()

:cmd_15
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/vouchers"
SAMP.CmdRet()

:chatmsg
0AA2: 0@ = load_library "samp.dll" // IF and SET
0085: 1@ = 0@ // (int)
1@ += 2203876
0A8D: 3@ = read_memory 1@ size 4 virtual_protect 1
0085: 2@ = 0@ // (int)
2@ += 409616
chatmsg "Chat CMD by ZesMAXIM [version 1.0]" -1
chatmsg "#$#$#$#$#$#$ FUCK YOU #$#$#$#$#$#$" -1
0AB2: ret 0
Calling to all cheaters, scripters and idk! Thank you!
 

Zin

Expert
Joined
Aug 1, 2013
Messages
1,716
Solutions
1
Reaction score
111
Code:
{$CLEO}

0662: "Samp CMD by ZesMAXIM"
thread "Version 1.0"
wait 2500
0B34: samp register_client_command "helpcmd" to_label @cmd_1
0B34: samp register_client_command "bcd" to_label @cmd_2
0B34: samp register_client_command "slc" to_label @cmd_3
0B34: samp register_client_command "cs" to_label @cmd_4
0B34: samp register_client_command "sh" to_label @cmd_5
0B34: samp register_client_command "jb" to_label @cmd_6
0B34: samp register_client_command "emote" to_label @cmd_7
0B34: samp register_client_command "st" to_label @cmd_8
0B34: samp register_client_command "oc" to_label @cmd_9
0B34: samp register_client_command "bc" to_label @cmd_10
0B34: samp register_client_command "gt" to_label @cmd_11
0B34: samp register_client_command "tp" to_label @cmd_12
0B34: samp register_client_command "lu" to_label @cmd_13
0B34: samp register_client_command "sl" to_label @cmd_14
0B34: samp register_client_command "vch" to_label @cmd_15

0B34: samp register_client_command "qt" to_label @QT

0AB1: call_scm_func @chatmsg 0

WHILE TRUE
    WAIT 0
    
    IF
        31@ == TRUE
    THEN
        0BFE: 29@ = get_tick_count // current time
        0062: 29@ -= 30@ // time elapsed
        IF
            29@ >= 5000
        THEN
            28@ -= 5 // countdown to /q
            0BFE: 30@ = get_tick_count // reset start time to 0
            CHATMSG "Attention! The game will close in %d seconds." -1 28@
        END
        IF
            28@ == 0
        THEN
             0AA5: call 8535003 3 pop 3 0 0 0 // - QUIT GAME
        END     
    END
    
END

:QT
CHATMSG "Attention! The game will close in 15 seconds." -1
0B12: 31@ = 31@ XOR 1 // SWITCHES 31@ BETWEEN 1 AND 0
0BFE: 30@ = get_tick_count // start time in ms
28@ = 15 // Max seconds
SAMP.CmdRet()

:cmd_1
SAMP.IsCommandTyped(0@)
0AC6: 17@ = label @SYNDER_2 offset
SAMP.ShowDialog(7777, "{FFC300}CMD by {FFFFFF}Zes{800000}MAXIM", 17@, "Close", "", 0)
SAMP.CmdRet

:SYNDER_2
hex
7b 38 30 30 30 30 30 7d 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 20 46 75 63 6b 20 59 6f 75 20 42 69 74 63 68 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 0d 0a 7b 46 46 46 46 46 46 7d 2f 62 63 64 20 2d 20 43 75 6d 70 65 72 69 20 63 72 65 64 69 74 65 20 63 61 73 69 6e 6f 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 6c 63 20 2d 20 56 69 6e 7a 69 20 63 72 65 64 69 74 65 20 63 61 73 69 6e 6f 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 63 73 20 2d 20 56 65 7a 69 20 70 72 6f 67 72 65 73 20 69 6e 20 63 6c 61 6e 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 68 20 2d 20 53 70 61 72 67 65 20 70 72 65 6d 69 75 6d 20 70 6f 69 6e 74 73 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 6a 62 20 2d 20 56 65 7a 69 20 63 61 74 20 61 69 20 6d 75 6e 63 69 74 20 70 65 6e 74 72 75 20 6a 6f 62 67 6f 61 6c 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 65 6d 6f 74 65 20 2d 20 56 69 6e 7a 69 20 65 6d 6f 74 65 20 63 72 61 74 65 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 74 20 2d 20 56 65 7a 69 20 73 74 61 74 69 73 74 69 63 69 6c 65 20 63 6f 6e 74 75 6c 75 69 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 6f 63 20 2d 20 44 65 73 63 68 69 7a 69 20 63 72 61 74 65 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 62 63 20 2d 20 43 75 6d 70 65 72 69 20 63 72 61 74 65 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 67 74 20 2d 20 50 72 69 6d 65 73 74 69 20 63 61 64 6f 75 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 74 70 20 2d 20 50 61 72 74 69 63 69 70 69 20 6c 61 20 65 76 65 6e 74 20 66 61 63 75 74 20 64 65 20 61 64 6d 69 6e 69 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 6c 75 20 2d 20 50 61 72 74 69 63 69 70 69 20 6c 61 20 4c 75 63 6b 79 20 46 69 73 68 65 72 6d 61 6e 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 73 6c 20 2d 20 44 6f 72 6d 69 2e 0d 0a 7b 46 46 46 46 46 46 7d 2f 76 63 68 20 2d 20 46 6f 6c 6f 73 65 73 74 69 20 63 6f 6d 61 6e 64 61 20 2f 76 6f 75 63 68 65 72 73 0d 0a 7b 38 30 30 30 30 30 7d 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 20 46 75 63 6b 20 59 6f 75 20 42 69 74 63 68 20 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 5b 5d 20 20 00
end


:cmd_2
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/buycredit"
SAMP.CmdRet()

:cmd_3
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/sellcredit"
SAMP.CmdRet()

:cmd_4
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/clanstats"
SAMP.CmdRet()

:cmd_5
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/shop"
SAMP.CmdRet()

:cmd_6
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/jobgoal"
SAMP.CmdRet()

:cmd_7
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/sellemotecrate"
SAMP.CmdRet()

:cmd_8
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/stats"
SAMP.CmdRet()

:cmd_9
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/opencrate"
SAMP.CmdRet()

:cmd_10
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/buycrate"
SAMP.CmdRet()

:cmd_11
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/getgift"
SAMP.CmdRet()

:cmd_12
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/tpevent"
SAMP.CmdRet()

:cmd_13
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/joinlucky"
SAMP.CmdRet()

:cmd_14
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/sleep"
SAMP.CmdRet()

:cmd_15
SAMP.IsCommandTyped(20@)
0AF9: samp say_msg "/vouchers"
SAMP.CmdRet()

:chatmsg
0AA2: 0@ = load_library "samp.dll" // IF and SET
0085: 1@ = 0@ // (int)
1@ += 2203876
0A8D: 3@ = read_memory 1@ size 4 virtual_protect 1
0085: 2@ = 0@ // (int)
2@ += 409616
chatmsg "Chat CMD by ZesMAXIM [version 1.0]" -1
chatmsg "#$#$#$#$#$#$ FUCK YOU #$#$#$#$#$#$" -1
0AB2: ret 0
 

Zin

Expert
Joined
Aug 1, 2013
Messages
1,716
Solutions
1
Reaction score
111
/Quit thing from below.
 
Top