CLEO Help Damage Informer 0.3DL dont work for me

CLEO related
Status
Not open for further replies.
Sort by date Sort by votes
dphome

dphome

Well-known member
Joined
Mar 21, 2020
Messages
457
Solutions
9
Reaction score
166
Location
Poland
I try rewrite for 0.3.DL but i don't what is: 1@ += 0x161 and don't know how search it address for 0.3.DL

Four headers for SA:MP (now is for 0.3.7-R1):
https://www.binaryhexconverter.com/decimal-to-hex-converter
Code: 
:kmf_dmg_1498
call @kmf_dmg_1806 0 1@
1@ += 0x161
0A8D: 2@ = read_memory 1@ size 2 virtual_protect 0
call @kmf_dmg_1635 1 2@ 3@
3@ += 0
0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
4@ += 0x1BC
0A8D: 5@ = read_memory 4@ size 4 virtual_protect 0
4@ += 0x4
0A8D: 6@ = read_memory 4@ size 4 virtual_protect 0
0092: 10@ = float 5@ to_integer
0092: 11@ = float 6@ to_integer
ret 3 2@ 10@ 11@

:kmf_dmg_1635
0AA2: 1@ = load_library "kernel32.dll" // IF and SET
0AA4: 2@ = get_proc_address "GetModuleHandleA" library 1@ // IF and SET
0AA7: call_function 2@ num_params 1 pop 0 "samp.dll" 3@ 
3@ += 0x21A0F8
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x3CD
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x18
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x2E
0@ *= 0x4
005A: 3@ += 0@ // (int)
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
ret 1 3@

:kmf_dmg_1806
0AA2: 1@ = load_library "kernel32.dll" // IF and SET
0AA4: 2@ = get_proc_address "GetModuleHandleA" library 1@ // IF and SET
0AA7: call_function 2@ num_params 1 pop 0 "samp.dll" 3@ 
3@ += 0x21A0F8
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x3CD
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x18
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x22
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
ret 1 3@

:kmf_dmg_1962
0AA2: 0@ = load_library "samp.dll" // IF and SET
0085: 1@ = 0@ // (int)
1@ += 0x21A0E4
0A8D: 3@ = read_memory 1@ size 4 virtual_protect 1
0085: 2@ = 0@ // (int)
2@ += 0x64010
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "KMF - Damage Informer - {00FAFF}0.3.7" 8 
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Original mod - {00FAFF}Kewl & Rasta" 8 
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Updated to 0.3.7/NO SAMPFUNCS - {00FAFF}RENKO & Rasta" 8 
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Modifed - {00FAFF}Dark_Knight" 8 
ret 0
 
Last edited:
Upvote 0 Downvote
R

rinnman

Member
Joined
Jun 4, 2020
Messages
8
Reaction score
0
Location
1233
sa_masterPL said:
I try rewrite for 0.3.DL but i don't what is: 1@ += 0x161 and don't know how search it address for 0.3.DL

Four headers for SA:MP (now is for 0.3.7-R1):
https://www.binaryhexconverter.com/decimal-to-hex-converter
Code: 
:kmf_dmg_1498
call @kmf_dmg_1806 0 1@
1@ += 0x161
0A8D: 2@ = read_memory 1@ size 2 virtual_protect 0
call @kmf_dmg_1635 1 2@ 3@
3@ += 0
0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
4@ += 0x1BC
0A8D: 5@ = read_memory 4@ size 4 virtual_protect 0
4@ += 0x4
0A8D: 6@ = read_memory 4@ size 4 virtual_protect 0
0092: 10@ = float 5@ to_integer
0092: 11@ = float 6@ to_integer
ret 3 2@ 10@ 11@

:kmf_dmg_1635
0AA2: 1@ = load_library "kernel32.dll" // IF and SET
0AA4: 2@ = get_proc_address "GetModuleHandleA" library 1@ // IF and SET
0AA7: call_function 2@ num_params 1 pop 0 "samp.dll" 3@
3@ += 0x21A0F8
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x3CD
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x18
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x2E
0@ *= 0x4
005A: 3@ += 0@ // (int)
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
ret 1 3@

:kmf_dmg_1806
0AA2: 1@ = load_library "kernel32.dll" // IF and SET
0AA4: 2@ = get_proc_address "GetModuleHandleA" library 1@ // IF and SET
0AA7: call_function 2@ num_params 1 pop 0 "samp.dll" 3@
3@ += 0x21A0F8
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x3CD
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x18
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x22
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
ret 1 3@

:kmf_dmg_1962
0AA2: 0@ = load_library "samp.dll" // IF and SET
0085: 1@ = 0@ // (int)
1@ += 0x21A0E4
0A8D: 3@ = read_memory 1@ size 4 virtual_protect 1
0085: 2@ = 0@ // (int)
2@ += 0x64010
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "KMF - Damage Informer - {00FAFF}0.3.7" 8
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Original mod - {00FAFF}Kewl & Rasta" 8
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Updated to 0.3.7/NO SAMPFUNCS - {00FAFF}RENKO & Rasta" 8
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Modifed - {00FAFF}Dark_Knight" 8
ret 0
Click to expand...
Code your send its a 0.3DL ?
 
Upvote 0 Downvote
dphome

dphome

Well-known member
Joined
Mar 21, 2020
Messages
457
Solutions
9
Reaction score
166
Location
Poland
I don't know... Need address for 0.3.DL from 0.3.7 only this:

:kmf_dmg_1498
{I don't know...}
0AB1: @kmf_dmg_1806 0 1@
1@ += 0x161
0A8D: 2@ = read_memory 1@ size 2 virtual_protect 0
0AB1: @kmf_dmg_1635 1 2@ 3@
3@ += 0x0
0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
4@ += 0x1BC
0A8D: 5@ = read_memory 4@ size 4 virtual_protect 0
4@ += 0x4
0A8D: 6@ = read_memory 4@ size 4 virtual_protect 0
0092: 10@ = float 5@ to_integer
0092: 11@ = float 6@ to_integer
0AB2: ret 3 2@ 10@ 11@

Code: 
{$CLEO .cs}

thread 'kmf_dmg'
03F0: enable_text_draw 1
wait 2000
0AB1: @kmf_dmg_1962 0

:kmf_dmg_56
wait 1000
if and
   Player.Defined($PLAYER_CHAR)
02CB:   actor $PLAYER_ACTOR bounding_sphere_visible
jf @kmf_dmg_56
gosub @kmf_dmg_96
goto @kmf_dmg_161

:kmf_dmg_96
3@ = 0
4@ = 0
2@ = 0
5@ = 0
19@ = 0
6@ = 0
12@ = 0
24@ = -1
1@ = 0
return

:kmf_dmg_161
wait 0

:kmf_dmg_165
wait 0
gosub @kmf_dmg_204
gosub @kmf_dmg_327
gosub @kmf_dmg_392
gosub @kmf_dmg_1049
goto @kmf_dmg_165

:kmf_dmg_204
16@ = Actor.Health($PLAYER_ACTOR)
04DD: 29@ = actor $PLAYER_ACTOR armour
005A: 16@ += 29@ // (int)
0085: 4@ = 2@ // (int)
0062: 4@ -= 16@ // (int)
if and
001D:   2@ > 16@ // (int)
  4@ > 1                                  0
jf @kmf_dmg_310
005A: 3@ += 4@ // (int)
5@ += 1
6@ = 1
7@ = 250
8@ = 203.0

:kmf_dmg_310
0085: 2@ = 16@ // (int)
4@ = 0
return

:kmf_dmg_327
if
02E0:   actor $PLAYER_ACTOR firing_weapon
jf @kmf_dmg_357
1@ = 1
33@ = 0

:kmf_dmg_357
if
  33@ > 1000
jf @kmf_dmg_390
1@ = 0
26@ = 1

:kmf_dmg_390
return

:kmf_dmg_392
9@ = Actor.Health($PLAYER_ACTOR)
if
  9@ > 0
jf @kmf_dmg_668
if
0AD2: 22@ = player $PLAYER_CHAR targeted_actor //IF and SET
jf @kmf_dmg_450
0AB1: @kmf_dmg_2288 1 22@

:kmf_dmg_450
if and
  1@ == 1
0AD2: 22@ = player $PLAYER_CHAR targeted_actor //IF and SET
jf @kmf_dmg_661
0AB1: @kmf_dmg_1498 0 23@ 17@ 28@
005A: 17@ += 28@ // (int)
if
803B:   not  23@ == 24@ // (int)
jf @kmf_dmg_545
0085: 18@ = 17@ // (int)
0085: 24@ = 23@ // (int)
26@ = 1

:kmf_dmg_545
0085: 21@ = 18@ // (int)
0062: 21@ -= 17@ // (int)
if
  21@ > 2
jf @kmf_dmg_646
if
  26@ == 1
jf @kmf_dmg_618
20@ = 0
19@ = 0
26@ = 0

:kmf_dmg_618
gosub @kmf_dmg_670
gosub @kmf_dmg_772
gosub @kmf_dmg_867
gosub @kmf_dmg_962

:kmf_dmg_646
0085: 18@ = 17@ // (int)
goto @kmf_dmg_668

:kmf_dmg_661
24@ = -1

:kmf_dmg_668
return

:kmf_dmg_670
if or
02D8:   actor $PLAYER_ACTOR current_weapon == 30
02D8:   actor $PLAYER_ACTOR current_weapon == 31
jf @kmf_dmg_770
if
  21@ == 7
jf @kmf_dmg_720
21@ += 3

:kmf_dmg_720
if
  21@ == 14
jf @kmf_dmg_745
21@ -= 4

:kmf_dmg_745
if
  21@ == 16
jf @kmf_dmg_770
21@ -= 6

:kmf_dmg_770
return

:kmf_dmg_772
if
02D8:   actor $PLAYER_ACTOR current_weapon == 24
jf @kmf_dmg_865
if
  21@ == 49
jf @kmf_dmg_815
21@ -= 3

:kmf_dmg_815
if
  21@ == 42
jf @kmf_dmg_840
21@ += 4

:kmf_dmg_840
if
  21@ == 51
jf @kmf_dmg_865
21@ -= 5

:kmf_dmg_865
return

:kmf_dmg_867
if
02D8:   actor $PLAYER_ACTOR current_weapon == 33
jf @kmf_dmg_960
if
  21@ == 21
jf @kmf_dmg_910
21@ += 4

:kmf_dmg_910
if
  21@ == 28
jf @kmf_dmg_935
21@ -= 3

:kmf_dmg_935
if
  21@ == 30
jf @kmf_dmg_960
21@ -= 5

:kmf_dmg_960
return

:kmf_dmg_962
005A: 20@ += 21@ // (int)
19@ += 1
12@ = 1
13@ = 250
14@ = 203.0
if
03D0:   wav 1 loaded
jf @kmf_dmg_1021
040D: unload_wav 1

:kmf_dmg_1021
03CF: load_wav 17802 as 1

:kmf_dmg_1028
wait 0
03D0:   wav 1 loaded
jf @kmf_dmg_1028
03D1: play_wav 1
return

:kmf_dmg_1049
if
  6@ == 1
jf @kmf_dmg_1272
8@ -= 0.3
7@ -= 2
0AC8: 0@ = allocate_memory_size 96
0AD3: 0@ = format "-%d HP (x%d)" 3@ 5@
0AA8: call_function_method 6946896 struct 12694336 num_params 1 pop 0 'CRED151' 30@
0AA5: call 7439872 num_params 2 pop 2 30@ 0@
03F0: enable_text_draw 1
0342: set_text_draw_centered 1
033F: set_text_draw_letter_size 0.29 0.85
081C: draw_text_outline 1 RGBA 0 0 0 7@
0340: set_text_draw_RGBA 255 0 0 7@
033E: set_draw_text_position 410.0 8@ GXT 'CRED151'  // Kim Gurney
0AC9: free_allocated_memory 0@
if
  7@ == 0
jf @kmf_dmg_1272
3@ = 0
6@ = 0
5@ = 0

:kmf_dmg_1272
if
  12@ == 1
jf @kmf_dmg_1496
14@ -= 0.3
13@ -= 2
0AC8: 0@ = allocate_memory_size 1024
03F0: enable_text_draw 1
0AD3: 0@ = format "+%d HP (x%d)" 20@ 19@
0AA8: call_function_method 6946896 struct 12694336 num_params 1 pop 0 'CRED153' 31@
0AA5: call 7439872 num_params 2 pop 2 31@ 0@
0342: set_text_draw_centered 1
033F: set_text_draw_letter_size 0.29 0.85
081C: draw_text_outline 1 RGBA 0 0 0 13@
0340: set_text_draw_RGBA 0 255 0 13@
033E: set_draw_text_position 232.0 14@ GXT 'CRED153'  // Charlene Maguire
0AC9: free_allocated_memory 0@
if
  13@ == 0
jf @kmf_dmg_1496
12@ = 0
24@ = -1
26@ = 1

:kmf_dmg_1496
return

:kmf_dmg_1498
{I don't know...}
0AB1: @kmf_dmg_1806 0 1@
1@ += 0x161
0A8D: 2@ = read_memory 1@ size 2 virtual_protect 0
0AB1: @kmf_dmg_1635 1 2@ 3@
3@ += 0x0
0A8D: 4@ = read_memory 3@ size 4 virtual_protect 0
4@ += 0x1BC
0A8D: 5@ = read_memory 4@ size 4 virtual_protect 0
4@ += 0x4
0A8D: 6@ = read_memory 4@ size 4 virtual_protect 0
0092: 10@ = float 5@ to_integer
0092: 11@ = float 6@ to_integer
0AB2: ret 3 2@ 10@ 11@

:kmf_dmg_1635
{0.3.DL OK}
0AA2: 1@ = load_library "kernel32.dll" // IF and SET
0AA4: 2@ = get_proc_address "GetModuleHandleA" library 1@ // IF and SET
0AA7: call_function 2@ num_params 1 pop 0 "samp.dll" 3@
3@ += 0x2ACA24
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x3DE
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x8
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x26
0@ *= 0x4
005A: 3@ += 0@ // (int)
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
0AB2: ret 1 3@

:kmf_dmg_1806
{0.3.DL OK}
0AA2: 1@ = load_library "kernel32.dll" // IF and SET
0AA4: 2@ = get_proc_address "GetModuleHandleA" library 1@ // IF and SET
0AA7: call_function 2@ num_params 1 pop 0 "samp.dll" 3@
3@ += 0x2ACA24
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x3DE
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x8
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
3@ += 0x22
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
0AB2: ret 1 3@

:kmf_dmg_1962
{0.3.DL OK}
0AA2: 0@ = load_library "samp.dll" // IF and SET
0085: 1@ = 0@ // (int)
1@ += 0x2ACA10
0A8D: 3@ = read_memory 1@ size 4 virtual_protect 1
0085: 2@ = 0@ // (int)
2@ += 0x67650
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "KMF - Damage Informer - {00FAFF}0.3.7" 8
0AA6: call_method 2@ struct 3@ num_params 5 pop 0 0 -4129023 0 "Updated to 0.3.DL - {00FAFF}ugbase.eu" 8
0AB2: ret 0

:kmf_dmg_2288
0AB1: @kmf_dmg_2731 1 0@ 1@
0470: 2@ = actor $PLAYER_ACTOR current_weapon
if or
  2@ == 22
  2@ == 23
  2@ == 24
  2@ == 26
  2@ == 28
  2@ == 32
jf @kmf_dmg_2420
if
  1@ > 35.0
jf @kmf_dmg_2407
0A8C: write_memory 5497324 size 1 value 235 virtual_protect 1
goto @kmf_dmg_2420

:kmf_dmg_2407
0A8C: write_memory 5497324 size 1 value 116 virtual_protect 1

:kmf_dmg_2420
if or
  2@ == 25
  2@ == 27
jf @kmf_dmg_2500
if
  1@ > 40.0
jf @kmf_dmg_2487
0A8C: write_memory 5497324 size 1 value 235 virtual_protect 1
goto @kmf_dmg_2500

:kmf_dmg_2487
0A8C: write_memory 5497324 size 1 value 116 virtual_protect 1

:kmf_dmg_2500
if
  2@ == 29
jf @kmf_dmg_2573
if
  1@ > 45.0
jf @kmf_dmg_2560
0A8C: write_memory 5497324 size 1 value 235 virtual_protect 1
goto @kmf_dmg_2573

:kmf_dmg_2560
0A8C: write_memory 5497324 size 1 value 116 virtual_protect 1

:kmf_dmg_2573
if or
  2@ == 30
  2@ == 31
jf @kmf_dmg_2653
if
  1@ > 50.0
jf @kmf_dmg_2640
0A8C: write_memory 5497324 size 1 value 235 virtual_protect 1
goto @kmf_dmg_2653

:kmf_dmg_2640
0A8C: write_memory 5497324 size 1 value 116 virtual_protect 1

:kmf_dmg_2653
if
  2@ == 33
jf @kmf_dmg_2726
if
  1@ > 60.0
jf @kmf_dmg_2713
0A8C: write_memory 5497324 size 1 value 235 virtual_protect 1
goto @kmf_dmg_2726

:kmf_dmg_2713
0A8C: write_memory 5497324 size 1 value 116 virtual_protect 1

:kmf_dmg_2726
0AB2: ret 0

:kmf_dmg_2731
Actor.StorePos(0@, 1@, 2@, 3@)
Actor.StorePos($PLAYER_ACTOR, 4@, 5@, 6@)
0509: 7@ = distance_between_XY 1@ 2@ and_XY 4@ 5@
0AB2: ret 1 7@
 
Last edited:
Upvote 0 Downvote
Status
Not open for further replies.
Top