// 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
:Noname_2
not SAMP.Available
jf @Noname_23
wait 2000
goto @Noname_2
:Noname_23
0B34: samp register_client_command "hud" to_label @Noname_2003
10@ = 1
21@ = Render.CreateFont("Sergio", 10, 2)
22@ = Render.CreateFont("Sergio", 14, 1)
alloc 2@ 128
alloc 3@ 128
alloc 4@ 128
alloc 11@ 128
alloc 12@ 128
alloc 13@ 128
alloc 19@ 128
alloc 23@ 128
alloc 24@ 128
alloc 25@ 128
:Noname_156
wait 0
if
0AAB: file_exists "cleo\config.ini"
jf @Noname_263
0AF0: 5@ = get_int_from_ini_file "cleo\config.ini" section "hud" key "PosX"
0AF0: 6@ = get_int_from_ini_file "cleo\config.ini" section "hud" key "PosY"
goto @Noname_329
:Noname_263
0AF1: write_int 747 to_ini_file "cleo\config.ini" section "hud" key "PosX"
0AF1: write_int 179 to_ini_file "cleo\config.ini" section "hud" key "PosY"
:Noname_329
if
10@ == 1
jf @Noname_1712
$4 = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
$5 = SAMP.GetPlayerNickname($4)
$6 = Actor.Health($PLAYER_ACTOR)
04DD: $7 = actor $PLAYER_ACTOR armour
$8 = Player.Money($PLAYER_CHAR)
Render.DrawBorderedBox(5@, 6@, 200, 121, -13350562, 2, -13350562)
5@ += 201
Render.DrawBorderedBox(5@, 6@, 100, 60, -13350562, 0, -13350562)
6@ += 61
Render.DrawBorderedBox(5@, 6@, 100, 60, -13350562, 0, -13350562)
format 2@ "$%d" $8
5@ += 6
6@ -= 33
Render.DrawText(21@, 2@, 5@, 6@, -1)
if
not $8 > 999
jf @Noname_559
format 2@ "$%d" $8
goto @Noname_657
:Noname_559
if
not $8 > 999999
jf @Noname_610
$8 /= 1000
format 2@ "$%dk" $8
goto @Noname_657
:Noname_610
if
$8 >= 999999
jf @Noname_657
$8 /= 1000000
format 2@ "$%dkk" $8
:Noname_657
5@ += 13
6@ -= 23
Render.DrawText(22@, 2@, 5@, 6@, -1)
format 3@ "Health: %d" $6
format 4@ "Armour: %d" $7
if
not $6 > 100
jf @Noname_764
$6 *= 1.7
goto @Noname_772
:Noname_764
$6 = 170
:Noname_772
5@ -= 205
6@ += 15
Render.DrawBorderedBox(5@, 6@, 170, 3, -14404020, 0, -13350562)
Render.DrawBorderedBox(5@, 6@, $6, 3, -6364687, 0, -13350562)
6@ -= 18
Render.DrawText(21@, 3@, 5@, 6@, -9526601)
if
not $7 > 100
jf @Noname_898
$7 *= 1.7
goto @Noname_906
:Noname_898
$7 = 170
:Noname_906
6@ += 58
Render.DrawBorderedBox(5@, 6@, 170, 3, -14404020, 0, -13350562)
Render.DrawBorderedBox(5@, 6@, $7, 3, -6364687, 0, -13350562)
6@ -= 21
Render.DrawText(21@, 4@, 5@, 6@, -9526601)
if
Actor.Driving($PLAYER_ACTOR)
jf @Noname_1190
$9 = Actor.CurrentCar($PLAYER_ACTOR)
$10 = Car.Health($9)
format 11@ "Health vehicle: %d" $10
$10 /= 10
if
not $10 > 100
jf @Noname_1092
$10 *= 1.7
goto @Noname_1100
:Noname_1092
$10 = 170
:Noname_1100
6@ += 60
Render.DrawBorderedBox(5@, 6@, 170, 3, -14404020, 0, -13350562)
Render.DrawBorderedBox(5@, 6@, $10, 3, -6364687, 0, -13350562)
6@ -= 20
Render.DrawText(21@, 11@, 5@, 6@, -9526601)
goto @Noname_1565
:Noname_1190
if
0965: actor $PLAYER_ACTOR swimming
jf @Noname_1386
0652: $12 = integer_stat 4080
0092: $12 = float $12 to_integer
$12 /= 39.99
format 24@ "Oxygen: %d" $12
if
not $12 > 100
jf @Noname_1288
$12 *= 1.7
goto @Noname_1296
:Noname_1288
$12 = 170
:Noname_1296
6@ += 60
Render.DrawBorderedBox(5@, 6@, 170, 3, -14404020, 0, -13350562)
Render.DrawBorderedBox(5@, 6@, $12, 3, -6364687, 0, -13350562)
6@ -= 20
Render.DrawText(21@, 24@, 5@, 6@, -9526601)
goto @Noname_1565
:Noname_1386
if
call @Noname_3184 0 $13
jf @Noname_1565
0092: $13 = float $13 to_integer
format 12@ "Sprint: %d" $13
if
not $13 > 100
jf @Noname_1474
$13 *= 1.7
goto @Noname_1482
:Noname_1474
$13 = 170
:Noname_1482
6@ += 60
Render.DrawBorderedBox(5@, 6@, 170, 3, -14404020, 0, -13350562)
Render.DrawBorderedBox(5@, 6@, $13, 3, -6364687, 0, -13350562)
6@ -= 20
Render.DrawText(21@, 12@, 5@, 6@, -9526601)
:Noname_1565
0470: $23 = actor $PLAYER_ACTOR current_weapon
041A: $28 = actor $PLAYER_ACTOR weapon $23 ammo
call @Noname_2204 1 $23 1@
call @Noname_3100 0 18@
0063: $28 -= 18@ // (float)
format 13@ "%s" 1@
format 23@ "Ammo:%d/%d" 18@ $28
5@ += 205
6@ -= 10
Render.DrawText(22@, 13@, 5@, 6@, -1)
6@ += 23
Render.DrawText(21@, 23@, 5@, 6@, -1)
:Noname_1712
if
7@ == 1
jf @Noname_1880
SAMP.SetCursorMode(1)
0B5E: get_cursor_pos 9@ 8@
0AF1: write_int 9@ to_ini_file "cleo\config.ini" section "hud" key "PosX"
0AF1: write_int 8@ to_ini_file "cleo\config.ini" section "hud" key "PosY"
if
key_down 1
jf @Noname_1880
7@ = 0
chatmsg "- hud: {42AE9C}Перемещение выключено" -12891237
SAMP.SetCursorMode(0)
:Noname_1880
if and
0ADC: test_cheat "hud"
not SAMP.ChatInputOpened
jf @Noname_1946
chatmsg "[- hud]{808080}reload" 16763904
run "- hud.cs"
0A93: end_custom_thread
:Noname_1946
goto @Noname_156
free 2@
free 3@
free 4@
free 11@
free 12@
free 13@
free 19@
free 23@
free 24@
free 25@
:Noname_2003
SAMP.IsCommandTyped(1@)
if
0C14: strcmp string1 1@ string2 "on"
jf @Noname_2067
chatmsg "- hud: {42AE9C}Включен" -12891237
10@ = 1
:Noname_2067
if
0C14: strcmp string1 1@ string2 "off"
jf @Noname_2128
chatmsg "- hud: {42AE9C}Выключен" -12891237
10@ = 0
:Noname_2128
if
0C14: strcmp string1 1@ string2 "move"
jf @Noname_2202
chatmsg "- hud: {42AE9C}Перемещение включено" -12891237
7@ = 1
:Noname_2202
SAMP.CmdRet
:Noname_2204
0AC6: 1@ = label @Noname_2237 offset
0@ *= 19
005A: 1@ += 0@ // (int)
ret 1 1@
:Noname_2237
hex
44 75 6B 65 00 00 00 00 00 00 00 00 00 00 00 00
00 00 00 42 72 61 73 73 20 4B 6E 75 63 6B 6C 65
end
:Noname_3100
0A96: 0@ = actor $PLAYER_ACTOR struct
0A8E: 1@ = 0@ + 1816 // int
0A8D: 1@ = read_memory 1@ size 1 virtual_protect 0
1@ *= 28
0A8E: 2@ = 0@ + 1440 // int
005A: 2@ += 1@ // (int)
2@ += 8
0A8D: 2@ = read_memory 2@ size 4 virtual_protect 0
ret 1 2@
:Noname_3184
0A8D: $13 = read_memory 12045748 size 4 virtual_protect 0
$13 /= 31.47
$13 += 4.0
$13 *= 0.9615384
0A8D: $30 = read_memory 12045792 size 4 virtual_protect 0
$30 /= 39.97
if
$30 > 99.0
jf @Noname_3282
return_true
goto @Noname_3284
:Noname_3282
return_false
:Noname_3284
ret 1 $13
