CLEO Help Masked Man Checker

CLEO related
Status
Not open for further replies.
ha.sh

ha.sh

Active member
Joined
Nov 14, 2018
Messages
66
Reaction score
0
This script is not working, i don't know why. I've try anything but, still not working. Please help me.
When I activated "MSK" then i go nearest player, and nothing happen.

Code: 
// 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
wait 0
   SAMP.Available

:Noname_8
wait 0
if
0ADC:   test_cheat "MSK"
jf @Noname_164
if
  0@ == 1
jf @Noname_110
0@ = 0
printf "~r~OFF ~w~- Maskman Checker by Doublesix" 1000
goto @Noname_164

:Noname_110
0@ = 1
printf "~g~ON ~w~- Maskman Checker by Doublesix" 1000

:Noname_164
if
  0@ == 1   
jf @Noname_272
04C4: store_coords_to 5@ 6@ 7@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0             
if and
   SAMP.IsPlayerConnected(2@)
   not 1@ == -1
0AE1: 1@ = random_actor_near_point 5@ 6@ 7@ in_radius 10.0 find_next 0 pass_deads 0
jf @Noname_272
2@ = SAMP.GetSAMPPlayerIDByActorHandle(1@)
3@ = SAMP.GetPlayerNickname(2@)
printf "~w~Nickname: ~y~%s ~w~ID: ~y~%d" 5000 3@ 2@
wait 1000

:Noname_272
goto @Noname_8
 
Sort by date Sort by votes
ha.sh

ha.sh

Active member
Joined
Nov 14, 2018
Messages
66
Reaction score
0
Parazitas said:
PHP: 
{$CLEO .cs}

0000: NOP

REPEAT
    WAIT 0
UNTIL 0AFA:  SAMP_IS_READY


WHILE TRUE
    WAIT 0
  
IF
056D:   actor $PLAYER_ACTOR defined
THEN
wait 0
// GET ALL STREAMED PEDS 
0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
000A: 29@ += 0x4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
FOR 30@ = 0 to 35584 step 0x100
    0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
    000A: 29@ += 0x1
    IF AND
        0029:  31@ >= 0x00
        001B:  0x80 > 31@
    THEN
        005A: 31@ += 30@
            IF AND
            803B:   31@ == $PLAYER_ACTOR  // (int)
            056D:   actor 31@ defined
            THEN
                0B2B: samp 0@ = get_player_id_by_actor_handle 31@
                0B36: samp 10@ = get_player_nickname 0@
                00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
                00A0: store_actor 31@ position_to 4@ 5@ 6@
                0509: 7@ = distance_between_XY 1@ 2@ and_XY 4@ 5@
                IF
                7@ <= 1.0 /// You can set distance here, max is 300.0(Float)
                THEN
                    Printf "ID: %d Nick: %s" 5000 0@ 10@
                END
           END
       END
   END
END

END
Click to expand...
Thanks man it work, can i add any hotkey at that code?
 

Attachments

  • sa-mp-177.png
    sa-mp-177.png
    899.6 KB · Views: 8
Upvote 0 Downvote
ha.sh

ha.sh

Active member
Joined
Nov 14, 2018
Messages
66
Reaction score
0
Parazitas said:
Yes u can add hotkeys, also u can edit distance on this line "7@ <= 1.0"
Click to expand...
I added hotkey like this, but why is freezing when i tested it?
Code: 
// 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

:Noname_15
wait 0
if and
056D:   actor $PLAYER_ACTOR defined
key_down 114
jf @Noname_292
wait 0
0A8D: 29@ = read_memory 12010640 size 4 virtual_protect 0
29@ += 4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
30@ = 0

:Noname_79
0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
29@ += 1
if and
  31@ >= 0
  128 > 31@
jf @Noname_267
005A: 31@ += 30@ // (int)
if and
803B:   not  31@ == $PLAYER_ACTOR // (int)
056D:   actor 31@ defined
jf @Noname_267
0@ = SAMP.GetSAMPPlayerIDByActorHandle(31@)
10@ = SAMP.GetPlayerNickname(0@)
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)
Actor.StorePos(31@, 4@, 5@, 6@)
0509: 7@ = distance_between_XY 1@ 2@ and_XY 4@ 5@
if
   not 7@ > 1.0
jf @Noname_267
printf "~w~Nickname: ~y~%s ~w~ID: ~y~%d" 5000 0@ 10@

:Noname_267
30@ += 256
  30@ > 35584
jf @Noname_79

:Noname_292
goto @Noname_15
 
Upvote 0 Downvote
Parazitas

Parazitas

God
Staff member
Joined
Jan 2, 2017
Messages
3,315
Solutions
7
Reaction score
936
Location
Lithuania
PHP: 
{$CLEO .cs}

0000: NOP

REPEAT
    WAIT 0
UNTIL 0AFA:  SAMP_IS_READY


WHILE TRUE
    WAIT 0
  
IF
056D:   actor $PLAYER_ACTOR defined
THEN
wait 0
// GET ALL STREAMED PEDS 
0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
000A: 29@ += 0x4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
FOR 30@ = 0 to 35584 step 0x100
    0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
    000A: 29@ += 0x1
    IF AND
        0029:  31@ >= 0x00
        001B:  0x80 > 31@
    THEN
        005A: 31@ += 30@
            IF AND
            803B:   31@ == $PLAYER_ACTOR  // (int)
            056D:   actor 31@ defined
            THEN
                0B2B: samp 0@ = get_player_id_by_actor_handle 31@
                0B36: samp 10@ = get_player_nickname 0@
                00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
                00A0: store_actor 31@ position_to 4@ 5@ 6@
                0509: 7@ = distance_between_XY 1@ 2@ and_XY 4@ 5@
                IF AND
                0AB0:   114
                7@ <= 1.0 /// You can set distance here, max is 300.0(Float)
                THEN
                    Printf "ID: %d Nick: %s" 5000 0@ 10@
                END
           END
       END
   END
END

END
 
Upvote 0 Downvote
ha.sh

ha.sh

Active member
Joined
Nov 14, 2018
Messages
66
Reaction score
0
Parazitas said:
PHP: 
{$CLEO .cs}

0000: NOP

REPEAT
    WAIT 0
UNTIL 0AFA:  SAMP_IS_READY


WHILE TRUE
    WAIT 0
 
IF
056D:   actor $PLAYER_ACTOR defined
THEN
wait 0
// GET ALL STREAMED PEDS
0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
000A: 29@ += 0x4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
FOR 30@ = 0 to 35584 step 0x100
    0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
    000A: 29@ += 0x1
    IF AND
        0029:  31@ >= 0x00
        001B:  0x80 > 31@
    THEN
        005A: 31@ += 30@
            IF AND
            803B:   31@ == $PLAYER_ACTOR  // (int)
            056D:   actor 31@ defined
            THEN
                0B2B: samp 0@ = get_player_id_by_actor_handle 31@
                0B36: samp 10@ = get_player_nickname 0@
                00A0: store_actor $PLAYER_ACTOR position_to 1@ 2@ 3@
                00A0: store_actor 31@ position_to 4@ 5@ 6@
                0509: 7@ = distance_between_XY 1@ 2@ and_XY 4@ 5@
                IF AND
                0AB0:   114
                7@ <= 1.0 /// You can set distance here, max is 300.0(Float)
                THEN
                    Printf "ID: %d Nick: %s" 5000 0@ 10@
                END
           END
       END
   END
END

END
Click to expand...
Thanks bro. it work.
 
Upvote 0 Downvote
Status
Not open for further replies.
Top