// 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

:style_63
wait 2000
chatmsg "{8A2BE2}[QM]{FFFFFF} Что-бы активировать подземный режим нажмите — {8A2BE2}Num 7 {FFFFFF}(by bannnator)" 16766720
chatmsg "{8A2BE2}[QM]{FFFFFF} Что-бы активировать наземный режим нажмите — {8A2BE2}Num 9 {FFFFFF}(by bannnator)" 16766720
12@ = SAMP.Base()

if  
0@ = SAMP.Base()
jf @XYZ_71  
0A93: end_custom_thread  

:XYZ_71
wait 200  
    SAMP.Available
jf @XYZ_71  
0B34: samp register_client_command "tp" to_label @XYZ_129  
0B34: samp register_client_command "sp" to_label @XYZ_364  
0B34: samp register_client_command "lp" to_label @XYZ_604  

:XYZ_118
wait 0  
goto @XYZ_118  

:XYZ_129
    SAMP.IsCommandTyped(3@)
if  
0AD4: 29@ = scan_string 3@ format "%f%f%f" 7@ 8@ 9@   
jf @XYZ_252  
Actor.PutAt($PLAYER_ACTOR, 7@, 8@, 9@)
chatmsg "Вы были телепортированы в: %.2f %.2f %.2f" 56576 7@ 8@ 9@  
goto @XYZ_362  

:XYZ_252
chatmsg "Синтаксис команды: /tp [X Y Z]" 14483456  
chatmsg "Например: /tp 1154.07 -1770.2 16.6 - Телепорт на спаун 1 лвл" 14483456  

:XYZ_362
SAMP.CmdRet

:XYZ_364
    SAMP.IsCommandTyped(3@)
if  
0AD4: 29@ = scan_string 3@ format "%s" 3@v   
jf @XYZ_533  
Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
0AF3: write_float 7@ to_ini_file "cleo\xyz.ini" section 3@v key "X"  
0AF3: write_float 8@ to_ini_file "cleo\xyz.ini" section 3@v key "Y"  
0AF3: write_float 9@ to_ini_file "cleo\xyz.ini" section 3@v key "Z"  
chatmsg "Место \"%s\" успешно сохранено" 56576 3@v  
goto @XYZ_602  

:XYZ_533
chatmsg "Синтаксис команды: /sp [имя]" 14483456  
chatmsg "Например: /sp Ферма 1" 14483456  

:XYZ_602
SAMP.CmdRet

:XYZ_604
    SAMP.IsCommandTyped(3@)
if  
0AD4: 29@ = scan_string 3@ format "%s" 3@v   
jf @XYZ_837  
if and
0AF2: 7@ = get_float_from_ini_file "cleo\xyz.ini" section 3@v key "X"  
0AF2: 8@ = get_float_from_ini_file "cleo\xyz.ini" section 3@v key "Y"  
0AF2: 9@ = get_float_from_ini_file "cleo\xyz.ini" section 3@v key "Z"  
jf @XYZ_784  
Actor.PutAt($PLAYER_ACTOR, 7@, 8@, 9@)
chatmsg "Телепортировано в место \"%s\"" 56576 3@v  
goto @XYZ_830  

:XYZ_784
chatmsg "Сохраненное место \"%s\" не найдено" 14483456 3@v  

:XYZ_830
goto @XYZ_906  

:XYZ_837
chatmsg "Синтаксис команды: /lp [имя]" 14483456  
chatmsg "Например: /lp Ферма 1" 14483456  

:XYZ_906
SAMP.CmdRet