MalikeiraOPoder
Active member
- Joined
- Mar 16, 2019
- Messages
- 100
- Reaction score
- 2
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
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
{$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(20@, "MENU")
Dialog.SetRECT(20@, 0, 0, D_WIDTH, D_HEIGHT)
Dialog.AddCheckBox(20@, 1, "NoReload Guns", 5, 30, 180, 15)
Dialog.AddCheckBox(20@, 2, "Aimbot", 5, 50, 180, 15)
Dialog.AddCheckBox(20@, 3, "No Fall", 5, 70, 180, 15)
Dialog.AddCheckBox(20@, 4, "Infinite Run", 5, 90, 180, 15)
//Buttons
Dialog.AddButton(20@, 5, "NoSPREAD", 5, 110, 125, 25)
Dialog.AddButton(20@, 6, "Matrix JUMP", 5, 130, 125, 25)
Dialog.AddButton(20@, 7, "BackFlip", 5, 150, 125, 25)
Dialog.AddButton(20@, 8, "MegaJump", 5, 170, 125, 25)
Dialog.SetVisible(20@, 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 20@ is_visible
THEN
IF
8B92: dialog 20@ 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
0@ = 0
ELSE
00A0: store_actor PLAYER position_to 1@ 2@ 3@
0980: extinguish_all_fires_at 1@ 2@ 3@ radius 200.0
0@ = 1
END
0AB1: @ToggleDialog 2 20@ 0@
wait 200
END
IF
0B81: dialog 20@ pop_event_to 22@ control_id_to 12@
THEN
//018C: play_sound 1083 at 0.0 0.0 0.0
IF AND
12@ == 2 // ID
22@ == 257 // pressed
THEN
IF
10@ == FALSE
THEN
10@ = TRUE
ELSE
10@ = FALSE
END
END
IF
10@ == TRUE
THEN
IF
0B87: dialog 20@ is_visible
THEN
alloc 0@ 20
format 0@ "{%X}NoSPREAD: ON" HEX_G
Dialog.SetControlText(20@, 2, 0@)
free 0@
// noSpread Code Here when is ON
END
ELSE
IF
0B87: dialog 20@ is_visible
THEN
Dialog.SetControlText(20@, 2, "NoSPREAD")
// noSpread Code here When is OFF
END
END
END // END 0B81: dialog 20@ pop_event_to 22@ control_id_to 12@
END // WHILE TRUE
:ToggleDialog
0B86: 0@ 1@
0B5D: 1@
ret 0
HELP ME
help me with this cheat above NoReload Guns, aimbot , no fall, infinite run, no spread, matrix jump, backflip , megajumpWTF?
help me with this cheat above NoReload Guns, aimbot , no fall, infinite run, no spread, matrix jump, backflip , megajump
Where ?WTF?
You copied my edited code from another thread and put here..
Now you saying help , when you don't do nothing...
Pleaseee !!@Parazitas boi he made this himself and he want help so help him?
xd
Maybe i will help with nospread just it
@Parazitas boi he made this himself and he want help so help him?
@Parazitas
Maybe i will help with nospread just it
:NO_SPREAD
{
0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0
}
0@ += 36
0@ *= 112
0@ += 13150960
0A8C: write_memory 0@ size 4 value 1@ virtual_protect 0
RET 0
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(20@, "MENU") Dialog.SetRECT(20@, 0, 0, D_WIDTH, D_HEIGHT) Dialog.AddCheckBox(20@, 1, "NoReload Guns", 5, 30, 180, 15) Dialog.AddCheckBox(20@, 2, "Aimbot", 5, 50, 180, 15) Dialog.AddCheckBox(20@, 3, "No Fall", 5, 70, 180, 15) Dialog.AddCheckBox(20@, 4, "Infinite Run", 5, 90, 180, 15) //Buttons Dialog.AddButton(20@, 5, "NoSPREAD", 5, 110, 125, 25) Dialog.AddButton(20@, 6, "Matrix JUMP", 5, 130, 125, 25) Dialog.AddButton(20@, 7, "BackFlip", 5, 150, 125, 25) Dialog.AddButton(20@, 8, "MegaJump", 5, 170, 125, 25) Dialog.SetVisible(20@, 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 20@ is_visible THEN IF 8B92: dialog 20@ 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 0@ = 0 ELSE 00A0: store_actor PLAYER position_to 1@ 2@ 3@ 0980: extinguish_all_fires_at 1@ 2@ 3@ radius 200.0 0@ = 1 END 0AB1: @ToggleDialog 2 20@ 0@ wait 200 END IF 0B81: dialog 20@ pop_event_to 22@ control_id_to 12@ THEN //018C: play_sound 1083 at 0.0 0.0 0.0 IF AND 12@ == 2 // ID 22@ == 257 // pressed THEN IF 10@ == FALSE THEN 10@ = TRUE ELSE 10@ = FALSE END END IF 10@ == TRUE THEN IF 0B87: dialog 20@ is_visible THEN alloc 0@ 20 format 0@ "{%X}NoSPREAD: ON" HEX_G Dialog.SetControlText(20@, 2, 0@) free 0@ // noSpread Code Here when is ON END ELSE IF 0B87: dialog 20@ is_visible THEN Dialog.SetControlText(20@, 2, "NoSPREAD") // noSpread Code here When is OFF END END END // END 0B81: dialog 20@ pop_event_to 22@ control_id_to 12@ END // WHILE TRUE :ToggleDialog 0B86: 0@ 1@ 0B5D: 1@ ret 0
{$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(0@, "MENU")
Dialog.SetRECT(0@, 0, 0, D_WIDTH, D_HEIGHT)
Dialog.AddCheckBox(0@, 1, "NoReload Guns", 5, 30, 180, 15)
Dialog.AddCheckBox(0@, 2, "Aimbot", 5, 50, 180, 15)
Dialog.AddCheckBox(0@, 3, "No Fall", 5, 70, 180, 15)
Dialog.AddCheckBox(0@, 4, "Infinite Run", 5, 90, 180, 15)
//Buttons
Dialog.AddButton(0@, 5, "NoSPREAD", 5, 110, 125, 25)
Dialog.AddButton(0@, 6, "Matrix JUMP", 5, 130, 125, 25)
Dialog.AddButton(0@, 7, "BackFlip", 5, 150, 125, 25)
Dialog.AddButton(0@, 8, "MegaJump", 5, 170, 125, 25)
Dialog.SetVisible(0@, 0)
WHILE TRUE
WAIT 0
IF
0AB0: K_MENU
THEN
REPEAT
WAIT 0
UNTIL 8AB0: K_MENU // ANTI SPAM KEY
IF 0B87: dialog 0@ is_visible
THEN
IF
8B92: dialog 0@ 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
4@ = 0
ELSE
00A0: store_actor PLAYER position_to 1@ 2@ 3@
0980: extinguish_all_fires_at 1@ 2@ 3@ radius 200.0
4@ = 1
END
0AB1: @ToggleDialog 2 0@ 4@
wait 200
END
IF
0B81: dialog 0@ pop_event_to 22@ control_id_to 12@
THEN
//018C: play_sound 1083 at 0.0 0.0 0.0
IF AND
12@ == 5 // ID
22@ == 257 // pressed
THEN
IF
10@ == FALSE
THEN
10@ = TRUE
ELSE
10@ = FALSE
END
END
IF
10@ == 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 20@ pop_event_to 22@ control_id_to 12@
END // WHILE TRUE
:ToggleDialog
0B86: 0@ 1@
0B5D: 1@
RET 0
:NO_SPREAD
{
0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0
}
0@ += 36
0@ *= 112
0@ += 13150960
0A8C: write_memory 0@ size 4 value 1@ virtual_protect 0
RET 0
bro, im sorryHere 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(0@, "MENU") Dialog.SetRECT(0@, 0, 0, D_WIDTH, D_HEIGHT) Dialog.AddCheckBox(0@, 1, "NoReload Guns", 5, 30, 180, 15) Dialog.AddCheckBox(0@, 2, "Aimbot", 5, 50, 180, 15) Dialog.AddCheckBox(0@, 3, "No Fall", 5, 70, 180, 15) Dialog.AddCheckBox(0@, 4, "Infinite Run", 5, 90, 180, 15) //Buttons Dialog.AddButton(0@, 5, "NoSPREAD", 5, 110, 125, 25) Dialog.AddButton(0@, 6, "Matrix JUMP", 5, 130, 125, 25) Dialog.AddButton(0@, 7, "BackFlip", 5, 150, 125, 25) Dialog.AddButton(0@, 8, "MegaJump", 5, 170, 125, 25) Dialog.SetVisible(0@, 0) WHILE TRUE WAIT 0 IF 0AB0: K_MENU THEN REPEAT WAIT 0 UNTIL 8AB0: K_MENU // ANTI SPAM KEY IF 0B87: dialog 0@ is_visible THEN IF 8B92: dialog 0@ 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 4@ = 0 ELSE 00A0: store_actor PLAYER position_to 1@ 2@ 3@ 0980: extinguish_all_fires_at 1@ 2@ 3@ radius 200.0 4@ = 1 END 0AB1: @ToggleDialog 2 0@ 4@ wait 200 END IF 0B81: dialog 0@ pop_event_to 22@ control_id_to 12@ THEN //018C: play_sound 1083 at 0.0 0.0 0.0 IF AND 12@ == 5 // ID 22@ == 257 // pressed THEN IF 10@ == FALSE THEN 10@ = TRUE ELSE 10@ = FALSE END END IF 10@ == 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 20@ pop_event_to 22@ control_id_to 12@ END // WHILE TRUE :ToggleDialog 0B86: 0@ 1@ 0B5D: 1@ RET 0 :NO_SPREAD { 0AB1: @NO_SPREAD 2 WEAPON_ID 24 SPREAD_VALUE 2.0 } 0@ += 36 0@ *= 112 0@ += 13150960 0A8C: write_memory 0@ size 4 value 1@ virtual_protect 0 RET 0
Now start doing something , stop write help help ..., focus ! start doing something...
When I want to press the button activate and when I press again, the NoSpread deactivate, understand?u can make on but not off? HMM
here is everything explained toggle on off via writing & reading in ini file
http://ugbase.eu/index.php?threads/samp-0-3-7-multihack-100-functions.19436/