{$CLEO .cs}

const
DIALOG_STYLE_MSGBOX = 0
DIALOG_STYLE_INPUT = 1
DIALOG_STYLE_LIST = 2
DIALOG_STYLE_PASSWORD = 3
end

if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available

wait 2000

0AC8: 4@ = allocate_memory_size 128

cmd "advtp" to_label @advance // thanks hnnssy
while true
wait 0
if
0B3C: samp dialog_respond 0@ button 1@ list_item 2@ input_text 3@v
then
wait 0
if
0@ == 216
then
if
1@ == 1
then
if
2@ == 0 // По метке.
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB6: store_target_marker_coords_to 10@ 20@ 30@
0AB1: call @tp_with_anim 3 X_coord 10@ Y_coord 20@ Z_coord 30@
end
if
2@ == 1 // Шахта
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord -1864.9104 Y_coord -1560.9286 Z_coord 21.7500
wait 400
end
if
2@ == 2 // Грузчик
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2123.2559 Y_coord -2275.2021 Z_coord 20.6719
wait 400
end
if
2@ == 3 // Завод
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord -86.1330 Y_coord -299.3628 Z_coord 2.7646
wait 400
end
if
2@ == 4 // Мэрия LS
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 1488.9995 Y_coord -1770.7162 Z_coord 18.7958
wait 400

end
if
2@ == 5 // Мэрия SF
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord -2765.7017 Y_coord 375.6068 Z_coord 6.3359
wait 400
end
if
2@ == 6 // Мэрия LV
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2388.0391 Y_coord 2465.6841 Z_coord 10.8203
wait 400
end
if
2@ == 7 // LSPD
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 1552.8795 Y_coord -1671.1567 Z_coord 13.5577
wait 400
end
if
2@ == 8 // SFPD
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord -1571.9093 Y_coord 645.6055 Z_coord 7.1977
wait 400
end
if
2@ == 9 // LVPD
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2323.9341 Y_coord 2443.0471 Z_coord 10.8203
end
if
2@ == 10 // Сухопутные войска (Зона 51)
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 335.3295 Y_coord 1944.4946 Z_coord 21.9143
end
if
2@ == 11 // Военно Воздушные Силы
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 423.6864 Y_coord 2536.4333 Z_coord 16.1484
end
if
2@ == 12 // Военно Морской Флот
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord -2245.1633 Y_coord 2381.9551 Z_coord 5.0749
end
if
2@ == 13 // Русская Мафия
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 937.8488 Y_coord 1733.2407 Z_coord 8.8516
end
if
2@ == 14 // La Cosa Nostra
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 1456.3584 Y_coord 2773.3716 Z_coord 10.8203
end
if
2@ == 15 // Yakuza
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2597.6775 Y_coord 1900.4041 Z_coord 11.0312
end
if
2@ == 16 // Grove
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2512.8691 Y_coord -1698.5269 Z_coord 13.4196
end
if
2@ == 17 // Ballas
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 1933.4402 Y_coord -1103.9084 Z_coord 26.4531
end
if
2@ == 18 // vagos
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2767.0251 Y_coord -1184.6896 Z_coord 69.4044
end
if
2@ == 19 // rifa
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2753.2439 Y_coord -1937.2736 Z_coord 13.5394
end
if
2@ == 20 // aztecas
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 2185.7261 Y_coord -1814.2324 Z_coord 13.5469
end
if
2@ == 21 // kazino
then
Samp.Spawn()
wait 200
Samp.Spawn()
wait 200
Samp.Spawn()
wait 1488
0AB1: call @tp_with_anim 3 X_coord 1022.4254 Y_coord -1121.6012 Z_coord 23.8719
end

end
end
end
end

:advance
wait 0
0AC6: 4@ = label @advtp offset
0B3B: samp show_dialog id 216 caption "Меню телепортации Advance Rp [acheats.ru]" text 4@ button_1 "Телепорт" button_2 "Выйти" style DIALOG_STYLE_LIST
Samp.CmdRet()

:advtp
hex
"{FF0000}Метка" A
"{EAEAEA}Шахта" A
"{EAEAEA}Грузчик" A
"{EAEAEA}Завод" A
"{EAEAEA}Мэрия" 20 "LS" A
"{EAEAEA}Мэрия" 20 "SF" A
"{EAEAEA}Мэрия" 20 "LV" A
"{EAEAEA}LSPD" A
"{EAEAEA}SFPD" A
"{EAEAEA}LVPD" A
"{EAEAEA}Сухопутные" 20 "войска" 20 "(Зона" 20 "51)" A
"{EAEAEA}Военно" 20 "Воздушные" 20 "Силы" A
"{EAEAEA}Военно" 20 "Морской" 20 "Флот" A
"{EAEAEA}Русская" 20 "Мафия" A
"{EAEAEA}La" 20 "Cosa" 20 "Nostra" A
"{EAEAEA}Yakuza" A
"{EAEAEA}Grove" 20 "Street" A
"{EAEAEA}The" 20 "Ballas" A
"{EAEAEA}Los" 20 "Santos" 20 "Vagos" A
"{EAEAEA}The" 20 "Rifa" A
"{EAEAEA}Varios" 20 "Los" 20 "Aztecas" A
"{EAEAEA}Казино" 00
end

:tp_with_anim
0A96: 3@ = actor $PLAYER_ACTOR struct
000A: 3@ += 20
0A8D: 3@ = read_memory 3@ size 4 virtual_protect 0
000A: 3@ += 48
0A8C: write_memory 3@ size 4 value 0@ virtual_protect 0 //0@ - координаты по X
000A: 3@ += 4
0A8C: write_memory 3@ size 4 value 1@ virtual_protect 0 //1@ - координаты по Y
000A: 3@ += 4
0A8C: write_memory 3@ size 4 value 2@ virtual_protect 0 //2@ - координаты по Z
0AB2: ret 0