// 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
wait 0
SAMP.Available
else_jump NAN.0
if
$707 == 0
else_jump NAN.0
0A93: end_custom_thread
if
0AAB: file_exists "cleo\save_settings\settings.ini"
else_jump NAN.0
jump NAN.0
chatmsg "{919191}[Error] Файл settings.ini не найден!" 9539985
0A93: end_custom_thread
0B34: samp register_client_command "nhelp" to_label @NONAME_1386
0B34: samp register_client_command "nkey" to_label @NONAME_1651
0B34: samp register_client_command "npos" to_label @NONAME_1854
0B34: samp register_client_command "ntime" to_label @NONAME_2161
0B34: samp register_client_command "nsbiv" to_label @NONAME_2382
0B34: samp register_client_command "nalomka" to_label @NONAME_2622
log "USEDRUGS >> ACTIVE [by Alllss]"
wait 0
if
056D: actor $PLAYER_ACTOR defined
else_jump NAN.0
alloc 1@ 64
alloc 2@ 64
alloc 3@ 64
alloc 4@ 64
alloc 5@ 64
alloc 6@ 64
0AF0: 1@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "SelectKey" key "Key"
0AF2: 2@ = get_float_from_ini_file "cleo\save_settings\settings.ini" section "Position" key "X"
0AF2: 3@ = get_float_from_ini_file "cleo\save_settings\settings.ini" section "Position" key "Y"
0AF0: 4@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "SelectTime" key "Time"
0AF0: 5@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "Sbiv" key "Active"
0AF0: 6@ = get_int_from_ini_file "cleo\save_settings\settings.ini" section "AutoUsedrugs" key "Active"
0@ = Render.CreateFont("Arial", 11, 5)
wait 0
0B60: convert_game_screen_coords 2@ 3@ to_window_screen_coords 7@ 8@
alloc 9@ 64
alloc 10@ 260
format 9@ "USE"
Render.DrawText(0@, 9@, 7@, 8@, -16724992)
SAMP.GetChatString(99, 10@, 11@, 11@, 11@)
free 9@
free 10@
12@ = Actor.Health($PLAYER_ACTOR)
if and
6@ == 1
0C29: 13@ = stristr string1 10@ string2 "Принять наркотик - /usedrugs"
else_jump NAN.0
say "/usedrugs 1"
if
5@ == 1
else_jump NAN.0
wait 250
0687: clear_actor $PLAYER_ACTOR task
jump NAN.0
14@ = 1
15@ = 1
jump NAN.0
if
key_down 1@
else_jump NAN.0
if
not SAMP.ChatInputOpened
else_jump NAN.0
if and
12@ >= 151
not 12@ > 160
else_jump NAN.0
say "/usedrugs 1"
if
5@ == 1
else_jump NAN.0
wait 250
0687: clear_actor $PLAYER_ACTOR task
jump NAN.0
14@ = 1
15@ = 1
jump NAN.0
14@ = 1
14@ == 1
else_jump NAN.0
14@ = 0
0C74: 16@ = create_timer_interval 1000 on_label @NONAME_1377
12@ = Actor.Health($PLAYER_ACTOR)
17@ = 160
0062: 17@ -= 12@ // (int)
17@ /= 10
if
17@ >= 16
else_jump NAN.0
17@ = 15
if
not 15@ == 1
else_jump NAN.0
say "/usedrugs %d" 17@
if
5@ == 1
else_jump NAN.0
if
not Actor.Driving($PLAYER_ACTOR)
else_jump NAN.0
wait 250
0687: clear_actor $PLAYER_ACTOR task
jump NAN.0
15@ = 0
wait 0
alloc 18@ 64
0C7C: 19@ = get_timer 16@ time_left
19@ /= 100
format 18@ "%d.%d" 4@ 19@ // осталось сек
Render.DrawText(0@, 18@, 7@, 8@, -1)
free 18@
not 4@ > -1
else_jump NAN.0
0C78: set_timer 16@ active 0
018C: play_sound 1057 at 0.0 0.0 0.0
free 1@
free 2@
free 3@
free 4@
free 5@
free 6@
jump NAN.0
:NONAME_1377
4@ -= 1
SAMP.CmdRet
:NONAME_1386
0AC6: 20@ = label @NONAME_1437 offset
SAMP.ShowDialog(3222, "{FF8C00}Информация", 20@, "Выход", "", DIALOG_STYLE_MSGBOX)
SAMP.CmdRet
:NONAME_1437
hex
2F 6E 6B 65 79 20 2D 20 D3 F1 F2 E0 ED EE E2 E8
F2 FC 20 EA EB E0 E2 E8 F8 F3 20 E0 EA F2 E8 E2
E0 F6 E8 E8 0A 2F 6E 74 69 6D 65 20 2D 20 D3 F1
F2 E0 ED EE E2 E8 F2 FC 20 E8 ED F2 E5 F0 E2 E0
EB 20 F2 E0 E9 EC E5 F0 E0 2E 0A 2F 6E 70 6F 73
20 2D 20 D3 F1 F2 E0 ED EE E2 E8 F2 FC 20 EF EE
E7 E8 F6 E8 FE 20 F2 E5 EA F1 F2 E0 20 ED E0 20
FD EA F0 E0 ED E5 2E 0A 2F 6E 73 62 69 76 20 2D
20 D1 E1 E8 E2 E0 F2 FC 20 E0 ED E8 EC E0 F6 E8
FE 3F 20 5B 31 2D C4 E0 7C 30 2D CD E5 F2 5D 0A
2F 6E 61 6C 6F 6D 6B 61 20 2D 20 D3 EF EE F2 F0
E5 E1 EB FF F2 FC 20 ED E0 F0 EA EE 20 EF F0 E8
20 EB EE EC EA E5 3F 20 5B 31 2D C4 E0 7C 30 2D
CD E5 F2 5D A0 00
end
:NONAME_1651
SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 1@
else_jump NAN.0
chatmsg "{FF8C00}Клавиша активации была изменена на [ID:%d]" 16747520 1@
0AF1: write_int 1@ to_ini_file "cleo\save_settings\settings.ini" section "SelectKey" key "Key"
jump NAN.0
chatmsg "{FF8C00}Используйте /nkey - [keyID]" 16747520
SAMP.CmdRet
:NONAME_1854
SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d %d" 2@ 3@
else_jump NAN.0
0093: 2@ = integer 2@ to_float
0093: 3@ = integer 3@ to_float
chatmsg "{FF8C00}Кординаты текста на экране были изменены на [PosX - %f | PosY - %f]" 16747520 2@ 3@
0AF3: write_float 2@ to_ini_file "cleo\save_settings\settings.ini" section "Position" key "X"
0AF3: write_float 3@ to_ini_file "cleo\save_settings\settings.ini" section "Position" key "Y"
jump NAN.0
chatmsg "{FF8C00}Используйте /npos - [PosX] [PosY]" 16747520
SAMP.CmdRet
:NONAME_2161
SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 4@
else_jump NAN.0
4@ -= 1
0085: 23@ = 4@ // (int)
23@ += 1
chatmsg "{FF8C00}Время таймера было изменено на %dсек." 16747520 23@
0AF1: write_int 4@ to_ini_file "cleo\save_settings\settings.ini" section "SelectTime" key "Time"
jump NAN.0
chatmsg "{FF8C00}Используйте /ntime - [sec]" 16747520
SAMP.CmdRet
:NONAME_2382
SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 5@
else_jump NAN.0
chatmsg "{FF8C00}Значение сбива анимации изменено на %d [1-Включено|0-Отключено]" 16747520 5@
0AF1: write_int 5@ to_ini_file "cleo\save_settings\settings.ini" section "Sbiv" key "Active"
jump NAN.0
chatmsg "{FF8C00}Используйте /nsbiv - [1-Включено|0-Отключено]" 16747520
SAMP.CmdRet
:NONAME_2622
SAMP.IsCommandTyped(21@)
if
0AD4: 22@ = scan_string 21@ format "%d" 6@
else_jump NAN.0
chatmsg "{FF8C00}Значение автоупотребления нарко при ломке изменено на %d [1-Включено|0-Отключено]" 16747520 6@
0AF1: write_int 6@ to_ini_file "cleo\save_settings\settings.ini" section "AutoUsedrugs" key "Active"
jump NAN.0
chatmsg "{FF8C00}Используйте /nalomka - [1-Включено|0-Отключено]" 16747520
SAMP.CmdRet
