CLEO Help Silent Help Please

CLEO related
Status
Not open for further replies.

Ruflll7

Active member
Joined
May 18, 2019
Messages
134
Reaction score
4
PHP:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
nop

:Label000002
wait 0
   SAMP.Available
else_jump @Label000002
$4 = -1
$5 = 0
$6 = 0
$7 = 0
$8 = 0
$9 = 0
call @Label00127F 0 29@ 27@ 26@ 25@ 24@ 23@ 22@ 21@ 20@ 19@ 18@ 17@ 16@
call @Label0000F5 1 17@ 30@
0B34: samp register_client_command "aimka" to_label @Label00011A
0B34: samp register_client_command "aimcfg" to_label @Label0001C2
0BE2: raknet setup_outcoming_packet_hook @Label000E9D
print "~g~Silent Aim ~r~v4.5 ~w~by 0pc0d3R ~y~Specially for ~r~BlastHack.Net" 3000

:Label0000EA
wait 0
jump @Label0000EA

:Label0000F5
wait 0
if
  0@ == 1
else_jump @Label000112
30@ = 1

:Label000112
ret 1 30@

:Label00011A
if
   SAMP.IsLocalPlayerSpawned
else_jump @Label0001C0
if
  16@ == 1
else_jump @Label0001B6
if
  30@ == 0
else_jump @Label000183
print "~y~Silent AIM ~w~by 0pc0d3R - ~g~Activated" 3000
jump @Label0001B6

:Label000183
print "~y~Silent AIM ~w~by 0pc0d3R - ~r~Deactivated" 3000

:Label0001B6
0B12: 30@ = 30@ XOR 1

:Label0001C0
SAMP.CmdRet

:Label0001C2
if
   SAMP.IsLocalPlayerSpawned
else_jump @Label000A39
alloc 2@ 20
   SAMP.IsCommandTyped(2@)
0AD4: 3@ = scan_string 2@ format "%d %d" 4@ 5@
if and
  3@ == 2
   not 4@ > 13
  4@ >= 1
else_jump @Label0009D7
if
  4@ == 1
else_jump @Label0002BE
chatmsg "{99CC00}Параметр TargetHookDistance был успешно обновлен!" 16777215
0085: 28@ = 5@ // (int)
0093: 29@ = integer 28@ to_float
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "TargetHookDistance"

:Label0002BE
if
  4@ == 2
else_jump @Label00034B
chatmsg "{99CC00}Параметр Detour был успешно обновлен!" 16777215
0085: 27@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Detour"

:Label00034B
if
  4@ == 3
else_jump @Label0003E6
chatmsg "{99CC00}Параметр WeaponsUpdate был успешно обновлен!" 16777215
0085: 26@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "WeaponsUpdate"

:Label0003E6
if
  4@ == 4
else_jump @Label000481
chatmsg "{99CC00}Параметр GiveDamageRPC был успешно обновлен!" 16777215
0085: 25@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "GiveDamageRPC"

:Label000481
if
  4@ == 5
else_jump @Label000516
chatmsg "{99CC00}Параметр RandomShot был успешно обновлен!" 16777215
0085: 24@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "RandomShot"

:Label000516
if
  4@ == 6
else_jump @Label0005AF
chatmsg "{99CC00}Параметр FriendlyFire был успешно обновлен!" 16777215
0085: 23@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "FriendlyFire"

:Label0005AF
if
  4@ == 7
else_jump @Label000640
chatmsg "{99CC00}Параметр WallShot был успешно обновлен!" 16777215
0085: 22@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "WallShot"

:Label000640
if
  4@ == 8
else_jump @Label0006D7
chatmsg "{99CC00}Параметр ValidVector был успешно обновлен!" 16777215
0085: 21@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ValidVector"

:Label0006D7
if
  4@ == 9
else_jump @Label00076A
chatmsg "{99CC00}Параметр DrawBlood был успешно обновлен!" 16777215
0085: 20@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "DrawBlood"

:Label00076A
if
  4@ == 10
else_jump @Label00080B
chatmsg "{99CC00}Параметр ShotDistance был успешно обновлен!" 16777215
0085: 28@ = 5@ // (int)
0093: 19@ = integer 28@ to_float
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ShotDistance"

:Label00080B
if
  4@ == 11
else_jump @Label0008A4
chatmsg "{99CC00}Параметр BloodDensity был успешно обновлен!" 16777215
0085: 18@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "BloodDensity"

:Label0008A4
if
  4@ == 12
else_jump @Label000939
chatmsg "{99CC00}Параметр AutoActivation был успешно обновлен!" 16777215
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "AutoActivation"

:Label000939
if
  4@ == 13
else_jump @Label0009D0
chatmsg "{99CC00}Параметр ShowMessage был успешно обновлен!" 16777215
0085: 16@ = 5@ // (int)
0AF1: write_int 5@ to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ShowMessage"

:Label0009D0
jump @Label000A34

:Label0009D7
chatmsg "{99CC00}Введите: {00FFFF}/aimcfg {FFCC00}[номер параметра(1-13)] {FF0000}[значение]" 16777215

:Label000A34
free 2@

:Label000A39
SAMP.CmdRet

:Label000A3B
wait 0
0A96: 2@ = actor $PLAYER_ACTOR struct
2@ += 1836
0A8D: 2@ = read_memory 2@ size 1 virtual_protect 0
0470: 0@ = actor $PLAYER_ACTOR current_weapon
0085: 1@ = 0@ // (int)
if
  2@ == 2
else_jump @Label000A84
1@ += 25

:Label000A84
if
  2@ == 3
else_jump @Label000A9D
1@ += 36

:Label000A9D
1@ *= 112
1@ += 13150904
1@ += 34
0A8D: 1@ = read_memory 1@ size 2 virtual_protect 0
0093: 1@ = integer 1@ to_float
if and
  0@ >= 22
   not 0@ == 25
   not 0@ == 26
   not 0@ == 27
   not 0@ > 34
else_jump @Label000B01
1@ /= 3.043478

:Label000B01
ret 1 1@

:Label000B09
wait 0
0209: 11@ = random_int_in_ranges 3 9
4@ = BitStream.New()
BitStream.Write(4@, 0, BS_TYPE_BOOL, 1)
BitStream.Write(4@, 0@, BS_TYPE_SHORT, 2)
BitStream.Write(4@, 1@, BS_TYPE_FLOAT, 4)
BitStream.Write(4@, 2@, BS_TYPE_INT, 4)
BitStream.Write(4@, 11@, BS_TYPE_INT, 4)
RakNet.LiteRPC(115, 4@)
BitStream.Delete(4@)
ret 0

:Label000B67
wait 0
call @Label000A3B 0 13@
call @Label000B09 3 0@ 13@ 1@
ret 0

:Label000B90
wait 0
0BBE: samp store_player 14@ aim_data 12@
alloc 12@ 31
14@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
Actor.StorePos($4, 7@, 8@, 9@)
0C0D: struct 12@ offset 1 size 4 = 0.0
0C0D: struct 12@ offset 5 size 4 = 0.0
0C0D: struct 12@ offset 9 size 4 = -1.0
0C0D: struct 12@ offset 13 size 4 = 7@
0C0D: struct 12@ offset 17 size 4 = 8@
0C0D: struct 12@ offset 21 size 4 = 9@
13@ = BitStream.New()
BitStream.Write(13@, 203, BS_TYPE_BYTE, 1)
BitStream.Write(13@, 12@, BS_TYPE_ARRAY, 31)
RakNet.LiteSend(13@)
BitStream.Delete(13@)
free 12@
ret 0

:Label000C38
wait 0
Actor.StorePos($4, 9@, 10@, 11@)
Actor.StorePos($PLAYER_ACTOR, 4@, 5@, 6@)
0509: 15@ = distance_between_XY 4@ 5@ and_XY 9@ 10@
if
8035:   not  15@ >= 1@ // (float)
else_jump @Label000E2B
0470: 3@ = actor $PLAYER_ACTOR current_weapon
8@ = SAMP.GetSAMPPlayerIDByActorHandle($4)
alloc 17@ 40
0C0D: struct 17@ offset 0 size 1 = 1
0C0D: struct 17@ offset 1 size 2 = 8@
0C0D: struct 17@ offset 3 size 4 = 4@
0C0D: struct 17@ offset 7 size 4 = 5@
0C0D: struct 17@ offset 11 size 4 = 6@
0098: 22@ = random_float_in_ranges_0.0_to_1.0
0209: 21@ = random_int_in_ranges 0 1
if
  21@ == 1
else_jump @Label000CFD
005B: 9@ += 22@ // (float)
jump @Label000D05

:Label000CFD
005B: 9@ += 22@ // (float)

:Label000D05
0098: 22@ = random_float_in_ranges_0.0_to_1.0
0209: 21@ = random_int_in_ranges 0 1
if
  21@ == 1
else_jump @Label000D34
005B: 10@ += 22@ // (float)
jump @Label000D3C

:Label000D34
005B: 10@ += 22@ // (float)

:Label000D3C
0098: 22@ = random_float_in_ranges_0.0_to_1.0
0209: 21@ = random_int_in_ranges 0 1
if
  21@ == 1
else_jump @Label000D6B
005B: 11@ += 22@ // (float)
jump @Label000D73

:Label000D6B
005B: 11@ += 22@ // (float)

:Label000D73
0C0D: struct 17@ offset 15 size 4 = 9@
0C0D: struct 17@ offset 19 size 4 = 10@
0C0D: struct 17@ offset 23 size 4 = 11@
0098: 22@ = random_float_in_ranges_0.0_to_1.0
0098: 23@ = random_float_in_ranges_0.0_to_1.0
0098: 24@ = random_float_in_ranges_0.0_to_1.0
0C0D: struct 17@ offset 27 size 4 = 22@
0C0D: struct 17@ offset 31 size 4 = 23@
0C0D: struct 17@ offset 35 size 4 = 24@
0C0D: struct 17@ offset 39 size 1 = 3@
12@ = BitStream.New()
BitStream.Write(12@, 206, BS_TYPE_BYTE, 1)
BitStream.Write(12@, 17@, BS_TYPE_ARRAY, 40)
RakNet.LiteSend(12@)
BitStream.Delete(12@)
free 17@
if
  0@ == 1
else_jump @Label000E2B
09B8: create_blood_gush_at 9@ 10@ 11@ with_offset 0 0 3 density 2@ on_actor $4

:Label000E2B
ret 2 8@ 3@

:Label000E36
wait 0
18@ = 1
if
  0@ == 1
else_jump @Label000E95
0665: get_actor $4 model_to 17@
if or
07D6:   $5 == 17@ // @ == $ (int)
07D6:   $6 == 17@ // @ == $ (int)
07D6:   $7 == 17@ // @ == $ (int)
07D6:   $8 == 17@ // @ == $ (int)
07D6:   $9 == 17@ // @ == $ (int)
else_jump @Label000E95
18@ = 0

:Label000E95
ret 1 18@

:Label000E9D
wait 0
0BE5: raknet 2@ = get_hook_param 0
0BE5: raknet 3@ = get_hook_param 1
if
  3@ == 204
else_jump @Label000F0E
if and
  30@ == 1
  26@ == 1
else_jump @Label000F0E
alloc 4@ 7
BitStream.ReadArray(2@, 4@, 7)
0C0D: struct 4@ offset 1 size 2 = $4
BitStream.ResetWritePointer(2@)
BitStream.Write(2@, 4@, BS_TYPE_ARRAY, 7)
free 4@

:Label000F0E
if
  3@ == 206
else_jump @Label001054
if
  30@ == 1
else_jump @Label001054
call @Label001058 2 29@ 22@ 7@
if
   not 7@ == -1
else_jump @Label000F60
008A: $4 = 7@ // (int)

:Label000F60
if and
   not $4 == -1
056D:   actor $4 defined
else_jump @Label001054
call @Label000E36 1 23@ 17@
if
  17@ == 1
else_jump @Label001054
if
  21@ == 1
else_jump @Label000FB5
call @Label000B90 0

:Label000FB5
if
  24@ == 0
else_jump @Label000FE7
call @Label000C38 3 20@ 19@ 18@ 0@ 1@
jump @Label00101C

:Label000FE7
0209: 31@ = random_int_in_ranges 0 10
if
002D:   31@ >= 24@ // (int)
else_jump @Label00101C
call @Label000C38 3 20@ 19@ 18@ 0@ 1@

:Label00101C
if
  27@ == 1
else_jump @Label001050
if
  25@ == 1
else_jump @Label001050
call @Label000B67 2 0@ 1@

:Label001050
0BE0: raknet hook_ret 0

:Label001054
0BE0: raknet hook_ret 1

:Label001058
wait 0
28@ = 0.0

:Label001066
0A8D: 29@ = read_memory 12010640 size 4 virtual_protect 0
29@ += 4
0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
30@ = 0

:Label00108E
0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
29@ += 1
if and
  31@ >= 0
  128 > 31@
else_jump @Label001246
005A: 31@ += 30@ // (int)
if
056D:   actor 31@ defined
else_jump @Label001246
if
803C:   not  $PLAYER_ACTOR == 31@ // (int)
else_jump @Label001246
04C4: store_coords_to 27@ 26@ 25@ from_actor 31@ with_offset 0.0 0.0 0.0
068D: get_camera_position_to 24@ 23@ 22@
if and
  1@ == 0
06BD:   no_obstacles_between 27@ 26@ 25@ and 24@ 23@ 22@ solid 1 car 1 actor 0 object 1 particle 0
else_jump @Label0011B9
if and
   not Actor.Dead(31@)
02CB:   actor 31@ bounding_sphere_visible
else_jump @Label0011B9
04C4: store_coords_to 10@ 11@ 12@ from_actor 31@ with_offset 0.0 0.0 0.0
call @Label001C59 3 10@ 11@ 12@ 13@ 14@
0509: 15@ = distance_between_XY 339.1 179.1 and_XY 13@ 14@
if
0035:   28@ >= 15@ // (float)
else_jump @Label0011B9
ret 1 31@

:Label0011B9
if
  1@ == 1
else_jump @Label001246
if and
   not Actor.Dead(31@)
02CB:   actor 31@ bounding_sphere_visible
else_jump @Label001246
04C4: store_coords_to 10@ 11@ 12@ from_actor 31@ with_offset 0.0 0.0 0.0
call @Label001C59 3 10@ 11@ 12@ 13@ 14@
0509: 15@ = distance_between_XY 339.1 179.1 and_XY 13@ 14@
if
0035:   28@ >= 15@ // (float)
else_jump @Label001246
ret 1 31@

:Label001246
30@ += 256
  30@ > 35584
else_jump @Label00108E
28@ += 8.0
001D:   28@ > 0@ // (int)
else_jump @Label001066
ret 1 -1

:Label00127F
wait 0
if
0AAB:   file_exists "CLEO\AimConfig_v4.5[by_0pc0d3R].ini"
else_jump @Label001755
0AF0: 28@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "TargetHookDistance"
0093: 29@ = integer 28@ to_float
0AF0: 27@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Detour"
0AF0: 26@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "WeaponsUpdate"
0AF0: 25@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "GiveDamageRPC"
0AF0: 24@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "RandomShot"
0AF0: 23@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "FriendlyFire"
0AF0: $5 = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[1]"
0AF0: $6 = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[2]"
0AF0: $7 = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[3]"
0AF0: $8 = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[4]"
0AF0: $9 = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[5]"
0AF0: 22@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "WallShot"
0AF0: 21@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ValidVector"
0AF0: 20@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "DrawBlood"
0AF0: 28@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ShotDistance"
0093: 19@ = integer 28@ to_float
0AF0: 18@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "BloodDensity"
0AF0: 17@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "AutoActivation"
0AF0: 16@ = get_int_from_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ShowMessage"
jump @Label001C2D

:Label001755
0AF1: write_int 40 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "TargetHookDistance"
0AF1: write_int 1 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Detour"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "WeaponsUpdate"
0AF1: write_int 1 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "GiveDamageRPC"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "RandomShot"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "FriendlyFire"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[1]"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[2]"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[3]"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[4]"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "Model[5]"
0AF1: write_int 1 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "WallShot"
0AF1: write_int 1 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ValidVector"
0AF1: write_int 1 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "DrawBlood"
0AF1: write_int 80 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ShotDistance"
0AF1: write_int 120 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "BloodDensity"
0AF1: write_int 0 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "AutoActivation"
0AF1: write_int 1 to_ini_file "CLEO\AimConfig_v4.5[by_0pc0d3R].ini" section "Settings" key "ShowMessage"
29@ = 40.0
27@ = 1
26@ = 0
25@ = 1
24@ = 0
23@ = 0
22@ = 1
21@ = 1
20@ = 1
19@ = 80.0
18@ = 120
17@ = 0
16@ = 1

:Label001C2D
ret 13 29@ 27@ 26@ 25@ 24@ 23@ 22@ 21@ 20@ 19@ 18@ 17@ 16@

:Label001C59
wait 0
0AC7: 14@ = var 0@ offset
0AC7: 15@ = var 3@ offset
0AC7: 16@ = var 6@ offset
0AC7: 17@ = var 9@ offset
0AA5: call 7392816 num_params 6 pop 6 0 0 17@ 16@ 15@ 14@
12@ = 640.0
13@ = 448.0
0A8D: 14@ = read_memory 12677188 size 4 virtual_protect 0
0A8D: 15@ = read_memory 12677192 size 4 virtual_protect 0
0093: 14@ = integer 14@ to_float
0093: 15@ = integer 15@ to_float
0073: 12@ /= 14@ // (float)
0073: 13@ /= 15@ // (float)
006B: 3@ *= 12@ // (float)
006B: 4@ *= 13@ // (float)
ret 2 3@ 4@

Can someone fix this core for me Is crashing and Put the ActivationMode and Gamekey functions Please?
 

0x32789

Expert
Joined
May 26, 2014
Messages
849
Reaction score
51
Location
LongForgotten <-> 0x32789
what samp version are you using? do you know this needs sampfuncs and will only work for 0.3.7, use R1 not R2 or any other. other than that, the only one that could help you is 0pcod3r himself?
 
Status
Not open for further replies.
Top