Cheat Source Code ??

MalikeiraOPoder

Well-Known Member
Joined
Mar 16, 2019
Messages
54
Likes
2
Points
8
5
#1
I would like to know where I can get the source code of each cheat Example, the source code about NoSpread, Aimbot, BulletSync etc ... to add in my mod CLEO
 

ini

Well-Known Member
Joined
Sep 28, 2015
Messages
326
Likes
126
Points
73
Website
ascensioncheats.com
15
#2
well for aimbots it's very common to see source codes on forums, but bulletsync, nospread are different things, i suggest you to take a look into mod_sa src, you can get some important info for learn how things are done.
 
OP
OP
M

MalikeiraOPoder

Well-Known Member
Joined
Mar 16, 2019
Messages
54
Likes
2
Points
8
5
#4
PHP:
{$CLEO .cs}
{$INCLUDE SF}

Thread "MENU TEST"

CONST
PLAYER          $PLAYER_ACTOR
CHAR            $PLAYER_CHAR
D_HELP          666
D_WIDTH         160    // 320
D_HEIGHT        135    // 305
K_MENU          113 //F2 for open the Dialog
HEX_G           0x66FF33 //Green
END

repeat
    wait 40
until SAMP.Available()

//DIALOG
Dialog.Create([email protected], "MENU")
Dialog.SetRECT([email protected], 0, 0, D_WIDTH, D_HEIGHT)
Dialog.AddCheckBox([email protected], 1, "NoReload Guns", 5, 30, 180, 15)
Dialog.AddCheckBox([email protected], 2, "Aimbot", 5, 50, 180, 15)
Dialog.AddCheckBox([email protected], 3, "No Fall", 5, 70, 180, 15)
Dialog.AddCheckBox([email protected], 4, "Infinite Run", 5, 90, 180, 15)

//Buttons
Dialog.AddButton([email protected], 5, "NoSPREAD", 5, 110, 125, 25)
Dialog.AddButton([email protected], 6, "Matrix JUMP", 5, 130, 125, 25)
Dialog.AddButton([email protected], 7, "BackFlip", 5, 150, 125, 25)
Dialog.AddButton([email protected], 8, "MegaJump", 5, 170, 125, 25)
Dialog.SetVisible([email protected], 0)

wait 3000

WHILE TRUE
WAIT 0

IF
0AB0: K_MENU
THEN
    REPEAT
        WAIT 0
    UNTIL 8AB0: K_MENU // ANTI SPAM KEY
   
    IF 0B87: dialog [email protected] is_visible
    THEN
        IF
        8B92:  dialog [email protected] checkbox 1 is_checked
        THEN
            0330: set_player CHAR infinite_run 0
            04D8: set_actor PLAYER drowns_in_water 1
            08C6: set_actor PLAYER stay_on_bike 0
        END
        02AB: set_actor PLAYER immunities BP 0 FP 0 EP 0 CP 0 MP 0
        [email protected] = 0
    ELSE
        00A0: store_actor PLAYER position_to [email protected] [email protected] [email protected]
        0980: extinguish_all_fires_at [email protected] [email protected] [email protected] radius 200.0
        [email protected] = 1
    END
    0AB1:  @ToggleDialog 2 [email protected] [email protected]
    wait 200
END
       
IF
0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]
THEN
    //018C: play_sound 1083 at 0.0 0.0 0.0
    IF AND
    [email protected] == 2 // ID
    [email protected] == 257 // pressed
    THEN
        IF
        [email protected] == FALSE
        THEN
            [email protected] = TRUE
        ELSE
            [email protected] = FALSE
        END
    END
       
    IF
    [email protected] == TRUE
    THEN
        IF
        0B87: dialog [email protected] is_visible
        THEN
            alloc [email protected] 20
            format [email protected] "{%X}NoSPREAD: ON" HEX_G
            Dialog.SetControlText([email protected], 2, [email protected])
            free [email protected]
            // noSpread Code Here when is ON
        END
    ELSE
        IF
        0B87: dialog [email protected] is_visible
        THEN
            Dialog.SetControlText([email protected], 2, "NoSPREAD")
            // noSpread Code here When is OFF
        END
    END
   
END // END 0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]

END // WHILE TRUE

:ToggleDialog
0B86: [email protected] [email protected]
0B5D: [email protected]
ret 0
@Opcode.eXe
@shanker
@_=Gigant=_
@Parazitas
@monday
HELP ME
 

Parazitas

Well-Known Member
Joined
Jan 2, 2017
Messages
1,325
Likes
140
Points
78
Location
Lithuania
Website
ugbase.eu
15
#11
@Parazitas boi he made this himself and he want help so help him?
@Parazitas
Maybe i will help with nospread just it
Ok. He made it himself http://ugbase.eu/index.php?threads/menu-button-and-checkbox.20467/#post-119721

PHP:
:NO_SPREAD
{
    0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0 
}
[email protected] += 36
[email protected] *= 112
[email protected] += 13150960
0A8C: write_memory [email protected] size 4 value [email protected] virtual_protect 0
RET 0
 
OP
OP
M

MalikeiraOPoder

Well-Known Member
Joined
Mar 16, 2019
Messages
54
Likes
2
Points
8
5
#12
PHP:
{$CLEO .cs}
{$INCLUDE SF}

Thread "MENU TEST"

CONST
PLAYER          $PLAYER_ACTOR
CHAR            $PLAYER_CHAR
D_HELP          666
D_WIDTH         160    // 320
D_HEIGHT        135    // 305
K_MENU          113 //F2 for open the Dialog
HEX_G           0x66FF33 //Green
END

repeat
    wait 40
until SAMP.Available()

//DIALOG
Dialog.Create([email protected], "MENU")
Dialog.SetRECT([email protected], 0, 0, D_WIDTH, D_HEIGHT)
Dialog.AddCheckBox([email protected], 1, "NoReload Guns", 5, 30, 180, 15)
Dialog.AddCheckBox([email protected], 2, "Aimbot", 5, 50, 180, 15)
Dialog.AddCheckBox([email protected], 3, "No Fall", 5, 70, 180, 15)
Dialog.AddCheckBox([email protected], 4, "Infinite Run", 5, 90, 180, 15)

//Buttons
Dialog.AddButton([email protected], 5, "NoSPREAD", 5, 110, 125, 25)
Dialog.AddButton([email protected], 6, "Matrix JUMP", 5, 130, 125, 25)
Dialog.AddButton([email protected], 7, "BackFlip", 5, 150, 125, 25)
Dialog.AddButton([email protected], 8, "MegaJump", 5, 170, 125, 25)
Dialog.SetVisible([email protected], 0)

wait 3000

WHILE TRUE
WAIT 0

IF
0AB0: K_MENU
THEN
    REPEAT
        WAIT 0
    UNTIL 8AB0: K_MENU // ANTI SPAM KEY
  
    IF 0B87: dialog [email protected] is_visible
    THEN
        IF
        8B92:  dialog [email protected] checkbox 1 is_checked
        THEN
            0330: set_player CHAR infinite_run 0
            04D8: set_actor PLAYER drowns_in_water 1
            08C6: set_actor PLAYER stay_on_bike 0
        END
        02AB: set_actor PLAYER immunities BP 0 FP 0 EP 0 CP 0 MP 0
        [email protected] = 0
    ELSE
        00A0: store_actor PLAYER position_to [email protected] [email protected] [email protected]
        0980: extinguish_all_fires_at [email protected] [email protected] [email protected] radius 200.0
        [email protected] = 1
    END
    0AB1:  @ToggleDialog 2 [email protected] [email protected]
    wait 200
END
      
IF
0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]
THEN
    //018C: play_sound 1083 at 0.0 0.0 0.0
    IF AND
    [email protected] == 2 // ID
    [email protected] == 257 // pressed
    THEN
        IF
        [email protected] == FALSE
        THEN
            [email protected] = TRUE
        ELSE
            [email protected] = FALSE
        END
    END
      
    IF
    [email protected] == TRUE
    THEN
        IF
        0B87: dialog [email protected] is_visible
        THEN
            alloc [email protected] 20
            format [email protected] "{%X}NoSPREAD: ON" HEX_G
            Dialog.SetControlText([email protected], 2, [email protected])
            free [email protected]
            // noSpread Code Here when is ON
        END
    ELSE
        IF
        0B87: dialog [email protected] is_visible
        THEN
            Dialog.SetControlText([email protected], 2, "NoSPREAD")
            // noSpread Code here When is OFF
        END
    END
  
END // END 0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]

END // WHILE TRUE

:ToggleDialog
0B86: [email protected] [email protected]
0B5D: [email protected]
ret 0
Can u do in this code ? I tried and i can't :(
 

Parazitas

Well-Known Member
Joined
Jan 2, 2017
Messages
1,325
Likes
140
Points
78
Location
Lithuania
Website
ugbase.eu
15
#14
Here example .:
PHP:
{$CLEO .cs}

Thread "MENU TEST"

CONST
PLAYER          $PLAYER_ACTOR
CHAR            $PLAYER_CHAR
D_HELP          666
D_WIDTH         160    // 320
D_HEIGHT        135    // 305
K_MENU          113 //F2 for open the Dialog
HEX_G           0x66FF33 //Green
END

repeat
    wait 40
until SAMP.Available()

//DIALOG
Dialog.Create([email protected], "MENU")
Dialog.SetRECT([email protected], 0, 0, D_WIDTH, D_HEIGHT)
Dialog.AddCheckBox([email protected], 1, "NoReload Guns", 5, 30, 180, 15)
Dialog.AddCheckBox([email protected], 2, "Aimbot", 5, 50, 180, 15)
Dialog.AddCheckBox([email protected], 3, "No Fall", 5, 70, 180, 15)
Dialog.AddCheckBox([email protected], 4, "Infinite Run", 5, 90, 180, 15)

//Buttons
Dialog.AddButton([email protected], 5, "NoSPREAD", 5, 110, 125, 25)
Dialog.AddButton([email protected], 6, "Matrix JUMP", 5, 130, 125, 25)
Dialog.AddButton([email protected], 7, "BackFlip", 5, 150, 125, 25)
Dialog.AddButton([email protected], 8, "MegaJump", 5, 170, 125, 25)
Dialog.SetVisible([email protected], 0)

WHILE TRUE
WAIT 0

IF
0AB0: K_MENU
THEN
    REPEAT
        WAIT 0
    UNTIL 8AB0: K_MENU // ANTI SPAM KEY
  
    IF 0B87: dialog [email protected] is_visible
    THEN
        IF
        8B92:  dialog [email protected] checkbox 1 is_checked
        THEN
            0330: set_player CHAR infinite_run 0
            04D8: set_actor PLAYER drowns_in_water 1
            08C6: set_actor PLAYER stay_on_bike 0
        END
        02AB: set_actor PLAYER immunities BP 0 FP 0 EP 0 CP 0 MP 0
        [email protected] = 0
    ELSE
        00A0: store_actor PLAYER position_to [email protected] [email protected] [email protected]
        0980: extinguish_all_fires_at [email protected] [email protected] [email protected] radius 200.0
        [email protected] = 1
    END
    0AB1:  @ToggleDialog 2 [email protected] [email protected]
    wait 200
END
      
IF
0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]
THEN
    //018C: play_sound 1083 at 0.0 0.0 0.0
    IF AND
    [email protected] == 5 // ID
    [email protected] == 257 // pressed
    THEN
        IF
        [email protected] == FALSE
        THEN
            [email protected] = TRUE
        ELSE
            [email protected] = FALSE
        END
    END
      
    IF
    [email protected] == TRUE
    THEN
        IF 02D8:   actor $PLAYER_ACTOR current_weapon == 24
        THEN 0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0
        END
    END  
  
END // END 0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]

END // WHILE TRUE

:ToggleDialog
0B86: [email protected] [email protected]
0B5D: [email protected]
RET 0

:NO_SPREAD
{
    0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0 
}
[email protected] += 36
[email protected] *= 112
[email protected] += 13150960
0A8C: write_memory [email protected] size 4 value [email protected] virtual_protect 0
RET 0
Now start doing something , stop write help help ..., focus ! start doing something...
 
OP
OP
M

MalikeiraOPoder

Well-Known Member
Joined
Mar 16, 2019
Messages
54
Likes
2
Points
8
5
#15
Here example .:
PHP:
{$CLEO .cs}

Thread "MENU TEST"

CONST
PLAYER          $PLAYER_ACTOR
CHAR            $PLAYER_CHAR
D_HELP          666
D_WIDTH         160    // 320
D_HEIGHT        135    // 305
K_MENU          113 //F2 for open the Dialog
HEX_G           0x66FF33 //Green
END

repeat
    wait 40
until SAMP.Available()

//DIALOG
Dialog.Create([email protected], "MENU")
Dialog.SetRECT([email protected], 0, 0, D_WIDTH, D_HEIGHT)
Dialog.AddCheckBox([email protected], 1, "NoReload Guns", 5, 30, 180, 15)
Dialog.AddCheckBox([email protected], 2, "Aimbot", 5, 50, 180, 15)
Dialog.AddCheckBox([email protected], 3, "No Fall", 5, 70, 180, 15)
Dialog.AddCheckBox([email protected], 4, "Infinite Run", 5, 90, 180, 15)

//Buttons
Dialog.AddButton([email protected], 5, "NoSPREAD", 5, 110, 125, 25)
Dialog.AddButton([email protected], 6, "Matrix JUMP", 5, 130, 125, 25)
Dialog.AddButton([email protected], 7, "BackFlip", 5, 150, 125, 25)
Dialog.AddButton([email protected], 8, "MegaJump", 5, 170, 125, 25)
Dialog.SetVisible([email protected], 0)

WHILE TRUE
WAIT 0

IF
0AB0: K_MENU
THEN
    REPEAT
        WAIT 0
    UNTIL 8AB0: K_MENU // ANTI SPAM KEY
 
    IF 0B87: dialog [email protected] is_visible
    THEN
        IF
        8B92:  dialog [email protected] checkbox 1 is_checked
        THEN
            0330: set_player CHAR infinite_run 0
            04D8: set_actor PLAYER drowns_in_water 1
            08C6: set_actor PLAYER stay_on_bike 0
        END
        02AB: set_actor PLAYER immunities BP 0 FP 0 EP 0 CP 0 MP 0
        [email protected] = 0
    ELSE
        00A0: store_actor PLAYER position_to [email protected] [email protected] [email protected]
        0980: extinguish_all_fires_at [email protected] [email protected] [email protected] radius 200.0
        [email protected] = 1
    END
    0AB1:  @ToggleDialog 2 [email protected] [email protected]
    wait 200
END
     
IF
0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]
THEN
    //018C: play_sound 1083 at 0.0 0.0 0.0
    IF AND
    [email protected] == 5 // ID
    [email protected] == 257 // pressed
    THEN
        IF
        [email protected] == FALSE
        THEN
            [email protected] = TRUE
        ELSE
            [email protected] = FALSE
        END
    END
     
    IF
    [email protected] == TRUE
    THEN
        IF 02D8:   actor $PLAYER_ACTOR current_weapon == 24
        THEN 0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0
        END
    END 
 
END // END 0B81: dialog [email protected] pop_event_to [email protected] control_id_to [email protected]

END // WHILE TRUE

:ToggleDialog
0B86: [email protected] [email protected]
0B5D: [email protected]
RET 0

:NO_SPREAD
{
    0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0
}
[email protected] += 36
[email protected] *= 112
[email protected] += 13150960
0A8C: write_memory [email protected] size 4 value [email protected] virtual_protect 0
RET 0
Now start doing something , stop write help help ..., focus ! start doing something...
bro, im sorry :(
you helped me a lot <3

im starter.. idk how to use these codes , example : 0B31 etc..


can u do last favor ? pls

does when NoSpread is turned on, the button stays green and when it is off the button goes white, I could not make a way to turn off the NoSpread


@Parazitas
 
OP
OP
M

MalikeiraOPoder

Well-Known Member
Joined
Mar 16, 2019
Messages
54
Likes
2
Points
8
5
#18
Top