- 1
- 0
CLEO:
// 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
: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 -3741
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@ = RakNet.NewBitStream()
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@)
RakNet.DeleteBitStream(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@ = RakNet.NewBitStream()
BitStream.Write(13@, 203, BS_TYPE_BYTE, 1)
BitStream.Write(13@, 12@, BS_TYPE_ARRAY, 31)
RakNet.LiteSend(13@)
RakNet.DeleteBitStream(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@ = RakNet.NewBitStream()
BitStream.Write(12@, 206, BS_TYPE_BYTE, 1)
BitStream.Write(12@, 17@, BS_TYPE_ARRAY, 40)
RakNet.LiteSend(12@)
RakNet.DeleteBitStream(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@
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@
Кто-то может редактировать это ядро, чтобы оно работало только при нажатии / удержании клавиши CAPSLOCK
??
Последнее редактирование: