CLEO Car-HP Indicator.cs

Статус
В этой теме нельзя размещать новые ответы.

TheMonstercat

Известный
Автор темы
75
11
Hey here i have a Car-HP Indicator for you guys.

samp0664fjde29ito.png


Activation: CARDL (As Cheat Code)

Update:
Added a .ini to change the draw distance.

http://www.file-upload.net/download-8608564/Car-HP-Indicator.rar.html

Source:
Код:
{$CLEO}
0662: NOP "########################"
0662: NOP "___Made by Monstercat___"
0662: NOP "_____www.ugbase.eu______"
0662: NOP "########################"
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED445' 0@ //// Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 0@ "Health: ~1~%"
 
1@ = 0
 
while true
    wait 0
    if 0ADC:  test_cheat "CARDL"
    then
        if 1@ == 0
        then
            0ACD: show_text_highpriority "Car-HP On." time 1337
            018C: play_sound 1083 at 0.0 0.0 0.0
            1@ = 1
        else
            0ACD: show_text_highpriority "Car-HP Off." time 1337
            018C: play_sound 1084 at 0.0 0.0 0.0
            1@ = 0
            0A92: create_custom_thread "Car-HP Indicator.cs"
            end_thread
        end
    end
 
    if 1@ == 1
    then
        00A0: store_actor $PLAYER_ACTOR position_to 22@ 23@ 24@
        0AF2: 0@ = get_float_from_ini_file "cleo\Car-HP Indicator.ini" section "SETTINGS" key "Distance"
        if 0AE2: 31@ = random_vehicle_near_point 22@ 23@ 24@ in_radius 0@ find_next false pass_wrecked 0 // Thx MISTER_GONWIK <3
        then
            gosub @draw_text
            while 0AE2: 31@ = random_vehicle_near_point 22@ 23@ 24@ in_radius 0@ find_next true pass_wrecked 0
                gosub @draw_text
            end
        end
    end
end
 
:draw_text
// Car - 31@
if 80DB:  not actor $PLAYER_ACTOR in_car 31@
then
    00AA: store_car 31@ position_to 2@ 3@ 4@
 
    0AB1: call_scm_func @getScreenXYFrom3DCoords 3 3D_coords_X 2@ Y 3@ Z 4@ store_screen_X_to 6@ Y_to 7@
    if and
        00C2: sphere_onscreen 2@ 3@ 4@ radius 0.0
        6@ >= 0.0
        6@ <= 640.0
        7@ >= 0.0
        7@ <= 448.0
    then
        0227: 5@ = car 31@ health
        5@ /= 10
 
        03F0: enable_text_draw 1
        0342: set_text_draw_centered 1
        03E0: draw_text_behind_textures 0
        033F: set_text_draw_letter_size width 0.17 height 0.77
        081C: draw_text_outline 1 RGBA 0 0 0 255
        0340: set_text_draw_RGBA 0 255 0 255
        045A: draw_text_1number 6@ 7@ GXT 'CRED445' number 5@  //
    end
end
return
 
:getScreenXYFrom3DCoords
0AC7: 14@ = var 0@ offset
0AC7: 15@ = var 3@ offset
0AC7: 16@ = var 6@ offset
0AC7: 17@ = var 9@ offset
0AA5: call 0x70CE30 num_params 6 pop 6 {18@ 18@} 0 0 17@ 16@ 15@ 14@
0007: 12@ = 640.0
0007: 13@ = 448.0
0A8D: 14@ = read_memory 0xC17044 size 4 virtual_protect 0
0A8D: 15@ = read_memory 0xC17048 size 4 virtual_protect 0
0093: 14@ = integer 14@ to_float
0093: 15@ = integer 15@ to_float
0073: 12@ /= 14@
0073: 13@ /= 15@
006B: 3@ *= 12@
006B: 4@ *= 13@
0AB2: ret 2 3@ 4@
 

Lexion

Известный
44
7
Будет лучше,если изменишь проценты на кол-во хп.
А так хорошее клео.
 
Статус
В этой теме нельзя размещать новые ответы.