Help Decrypting cleos

kazkaS

Well-Known Member
Joined
Mar 30, 2018
Messages
137
Likes
13
Points
18
10
can you decrypt this one =)
Per lengva žmogau, per lengva...

Code:
{$CLEO}
0000: NOP
repeat
wait 50
until 0AFA: is_samp_structures_available

0B34: "kicks" @kicks
0B34: "kicksrr" @kicksrr
0B34: "kinfo" @kinfo

:savininkas
wait 0
0B2B: samp [email protected] = get_player_id_by_actor_handle $PLAYER_ACTOR
0B36: samp [email protected] = get_player_nickname [email protected]
if or
0C14: strcmp string1 [email protected] string2 "Valiuks_Daletore"
0C14: strcmp string1 [email protected] string2 "Juozas_Daletore"
0C14: strcmp string1 [email protected] string2 "Jokubas_Bugattiz"
then
jump @load
else
jump @leidimas
end

:leidimas
wait 0
0AF8: samp add_message_to_chat "{FF0000}Neturi Leidimo, ne tau jis sukurtas" color 16250516
0AF8: samp add_message_to_chat "{FF0000}Neturi Leidimo, ne tau jis sukurtas" color 16250516 
0AF8: samp add_message_to_chat "{FF0000}Neturi Leidimo, ne tau jis sukurtas" color 16250516 
0AF8: samp add_message_to_chat "{FF0000}Neturi Leidimo, ne tau jis sukurtas" color 16250516 
0AF8: samp add_message_to_chat "{FF0000}Neturi Leidimo, ne tau jis sukurtas" color 16250516 
0B28: samp disconnect_with_reason [email protected]

:load
wait 0
if
0B61:  samp is_local_player_spawned
jf @load 
0AF8: samp add_message_to_chat "{ff0000}[ADMIN] {FF1493}KICKS SCRIPTAS. SUKURTAS/DESIGN VALIUKSO/JUOZUKO" color 16250516

[email protected] = 0

:main
wait 0
    if
    [email protected] == 1  // ar ijungtas
    then
        if
        [email protected] == 250  // jei zaidejo idas bus 100
        then
        [email protected] = 0 // tada isjunk scripta
        [email protected] = 0
        wait 1000
        jump @main
        else //jeigu idas ne 250
        0AF8: samp add_message_to_chat "{f88000}Tikrinu Zaideju Lastkicks %d ID!" color 16250516 [email protected]
            if
                0B23:  samp is_player_connected [email protected]   // tada patikrink ar tas idas yra prisijunges
            then
                0B36: samp [email protected] = get_player_nickname [email protected]  //jei yra prisijunges isgauk nicka
                wait 500
                0AF9: samp say_msg "/lastkicks %s" [email protected]  //parases gauja prie [email protected] pridek 1
                [email protected] += 1
                wait 500
                jump @lentele
            else
                [email protected] += 1 //jeigu zaidejas nera prisijunges pridek 1
                jump @main
            end
        end
    end
        
jump @main

:lentele
wait 0
if
    samp.IsCursorActive()
then
    wait 500
    jump @lentele
else
    jump @main
end
jump @lentele
    



:kicks
WAIT 0
0B12: [email protected] = [email protected] XOR 1
IF
    [email protected] == 1
THEN
    0AF8: "{FFA500}[Kicks] {FF1493}Scriptas {1aff1a}Ijungtas" color 16250516
ELSE
    0AF8: "{FFA500}[Kicks] {FF1493}Scriptas {ff0000}Isjungtas" color 16250516  
END
SAMP.CmdRet()

:kicksrr
WAIT 0
[email protected] = 0
[email protected] = 0
0AF8: "{FFA500}[Kicks] {FF1493}Scriptas {1aff1a}resetintas!" color 16250516
SAMP.CmdRet()

:kinfo
wait 0
0AF8: "{ff0000}[ADMIN] {1aff1a}Komandos" color 16250516
0AF8: "{ff0000}[ADMIN] {1aff1a}/kicks - Ijungia/Isjungia Scripta" color 16250516 
0AF8: "{ff0000}[ADMIN] {1aff1a}/kickrr - Restartina scripta (pradeda skaiciuoti nuo 0 vel)" color 16250516
SAMP.CmdRet()
 
Joined
Sep 6, 2018
Messages
21
Likes
3
Points
3
Any chance you could decrypt this one, please?
I made that cleo.

Code:
{$CLEO .cs}

0000: NOP
 
 
:APUNTARID
wait 150
if and
0AD2: [email protected] = actor $PLAYER_CHAR targeted_ACTOR
0AB0: 66
jf @APUNTARCMD
if 0104: actor $PLAYER_ACTOR near_actor [email protected] radius  12.0  12.0  12.0 sphere  0 //distance between you and targeted player
    then
        0B2B: samp [email protected] = get_player_id_by_CHAR_handle [email protected]
        0B36: samp [email protected] = get_player_nickname [email protected]
        0AF9: samp say_msg "/id %d" [email protected]
    else
    jump @APUNTARID
    end
:APUNTARCMD
jump @APUNTARID
 
Joined
Nov 11, 2018
Messages
10
Likes
1
Points
3
I made that cleo.

Code:
{$CLEO .cs}

0000: NOP


:APUNTARID
wait 150
if and
0AD2: [email protected] = actor $PLAYER_CHAR targeted_ACTOR
0AB0: 66
jf @APUNTARCMD
if 0104: actor $PLAYER_ACTOR near_actor [email protected] radius  12.0  12.0  12.0 sphere  0 //distance between you and targeted player
    then
        0B2B: samp [email protected] = get_player_id_by_CHAR_handle [email protected]
        0B36: samp [email protected] = get_player_nickname [email protected]
        0AF9: samp say_msg "/id %d" [email protected]
    else
    jump @APUNTARID
    end
:APUNTARCMD
jump @APUNTARID
Fair enough. Thanks a lot!
 
Top