wait 0
if 30@ == 1
then
0B80: dialog 3@ = create "Diamond-RP TP menu By arturik402"
0AB1: call_scm_func @set_dialog_pos 3 3@ 500 350
0B82: dialog 3@ add_button id 0 text "Адм.През." pos_XY 5 5 size 95 25
0B82: dialog 3@ add_button id 1 text "Мэрия LS" pos_XY 5 30 size 95 25
0B82: dialog 3@ add_button id 2 text "Мэрия LV" pos_XY 5 55 size 95 25
0B82: dialog 3@ add_button id 3 text "Мэрия SF" pos_XY 5 80 size 95 25
0B82: dialog 3@ add_button id 4 text "LSPD" pos_XY 5 105 size 95 25
0B82: dialog 3@ add_button id 5 text "LVPD" pos_XY 5 130 size 95 25
0B82: dialog 3@ add_button id 6 text "SFPD" pos_XY 5 155 size 95 25
0B82: dialog 3@ add_button id 7 text "Болька LS" pos_XY 5 180 size 95 25
0B82: dialog 3@ add_button id 8 text "Болька LV" pos_XY 5 205 size 95 25
0B82: dialog 3@ add_button id 9 text "Болька SF" pos_XY 5 230 size 95 25
0B82: dialog 3@ add_button id 10 text "СВ" pos_XY 5 255 size 95 25
0B82: dialog 3@ add_button id 11 text "ВВС" pos_XY 5 280 size 95 25
0B82: dialog 3@ add_button id 12 text "ВМФ" pos_XY 5 305 size 95 25
0B82: dialog 3@ add_button id 13 text "LSFM" pos_XY 100 5 size 95 25
0B82: dialog 3@ add_button id 14 text "LVFM" pos_XY 100 30 size 95 25
0B82: dialog 3@ add_button id 15 text "SFFM" pos_XY 100 55 size 95 25
0B82: dialog 3@ add_button id 16 text "Автошкола" pos_XY 100 80 size 95 25
0B82: dialog 3@ add_button id 17 text "Казино" pos_XY 100 105 size 95 25
0B82: dialog 3@ add_button id 18 text "Военком." pos_XY 100 130 size 95 25
0B82: dialog 3@ add_button id 19 text "Банк LS" pos_XY 100 155 size 95 25
0B82: dialog 3@ add_button id 20 text "Банк LV" pos_XY 100 180 size 95 25
0B82: dialog 3@ add_button id 21 text "Банк SF" pos_XY 100 205 size 95 25
0B82: dialog 3@ add_button id 22 text "Grove" pos_XY 100 230 size 95 25
0B82: dialog 3@ add_button id 23 text "Ballas" pos_XY 100 255 size 95 25
0B82: dialog 3@ add_button id 24 text "Vagos" pos_XY 100 280 size 95 25
0B82: dialog 3@ add_button id 25 text "Rifa" pos_XY 100 305 size 95 25
0B82: dialog 3@ add_button id 26 text "Колумбы" pos_XY 195 5 size 95 25
0B82: dialog 3@ add_button id 27 text "Мексы" pos_XY 195 30 size 95 25
0B82: dialog 3@ add_button id 28 text "Яки" pos_XY 195 55 size 95 25
0B82: dialog 3@ add_button id 29 text "Завод" pos_XY 195 80 size 95 25
0B82: dialog 3@ add_button id 30 text "ФБР" pos_XY 195 105 size 95 25
0B82: dialog 3@ add_button id 31 text "Мин." pos_XY 195 130 size 95 25
0B82: dialog 3@ add_button id 32 text "Риэлторка" pos_XY 195 155 size 95 25
0B82: dialog 3@ add_button id 33 text "24/7Тиеро" pos_XY 195 180 size 95 25
0B82: dialog 3@ add_button id 34 text "Бар_грув" pos_XY 195 205 size 95 25
0B82: dialog 3@ add_button id 35 text "24/7Опасный" pos_XY 195 230 size 95 25
0B82: dialog 3@ add_button id 36 text "Парашут ЛС" pos_XY 195 255 size 95 25
0B82: dialog 3@ add_button id 37 text "24/7Баллос" pos_XY 195 280 size 95 25
0B82: dialog 3@ add_button id 38 text "Бар гора лс" pos_XY 195 305 size 95 25
0B82: dialog 3@ add_button id 40 text "Auto Элит" pos_XY 290 5 size 95 25
0B82: dialog 3@ add_button id 41 text "Auto Сред" pos_XY 290 30 size 95 25
0B82: dialog 3@ add_button id 42 text "Auto эконом" pos_XY 290 55 size 95 25
0B82: dialog 3@ add_button id 43 text "Отель El Querbrados" pos_XY 290 80 size 95 25
0B82: dialog 3@ add_button id 44 text "Pain.SF" pos_XY 290 105 size 95 25
0B82: dialog 3@ add_button id 45 text "Pain.LS" pos_XY 290 130 size 95 25
0B82: dialog 3@ add_button id 46 text "Лодка" pos_XY 290 155 size 95 25
0B82: dialog 3@ add_button id 39 text "Exit" pos_XY 290 180 size 95 25
0B8D: samp set_cursor_mode 2
while 0B87: dialog 3@ is_visible
wait 0

if 0AB0: key_pressed 1
then
0B5E: get_cursor_pos 28@ 27@
0B85: samp dialog 3@ get_position_to 26@ 25@ size_to 0@ 0@
if and
001D: 28@ > 26@
001D: 27@ > 25@
then
26@ += 340
25@ += 20
if and
001D: 26@ > 28@
001D: 25@ > 27@
then
26@ -= 340
25@ -= 20
0062: 28@ -= 26@
0062: 27@ -= 25@
while 0AB0: key_pressed 1
wait 0
0B5E: get_cursor_pos 26@ 25@
0062: 26@ -= 28@
0062: 25@ -= 27@
0B84: samp dialog 3@ set_pos_XY 26@ 25@ size 300 350
end
end
end
end
if 0AB0: 50
then
0B8D: samp set_cursor_mode 2
while 0ab0: 50
wait 0
end
end
if 0AB0: 49
then
0B8D: samp set_cursor_mode 0
while 0ab0: 49
wait 0
end
end
if 0B81: dialog 3@ pop_event_to 4@ {id события} control_id_to 2@
then
if 2@ == 39
then
0B86: dialog 3@ set_visible false
0B8D: samp set_cursor_mode 0
30@ = 0
else
0AB1: call_scm_func @coords 1 2@ 4@ 5@ 6@
0AB1: call_scm_func @TP 3 4@ 5@ 6@
0B86: dialog 3@ set_visible true
0B8D: samp set_cursor_mode 2
30@ = 0
end
end
end
end
until false

:menu
if 30@ == 0
then
30@ = 1
end
0B43: samp cmd_ret

:set_dialog_pos // [0@ = dialog id] [1@ = size x] [2@ = size y]
0B5A: get_screen_resolution 3@ 4@
0063: 4@ -= 2@
0B84: dialog 0@ set_pos_XY 1 4@ size 1@ 2@
0AB2: ret 0

:TP {x} {y} {z}
0B2E: 11@ = read_samp_memory offset 0x13FA0 size 2
0B2D: write_samp_memory offset 0x13FA0 value 0xC390 size 2
wait 250
samp.Spawn()
wait 100
samp.Spawn()
Actor.PutAt($Player_Actor, 0@, 1@, -5.00)
wait 1000
Actor.PutAt($Player_Actor, 0@, 1@, 2@)
0B2D: write_samp_memory offset 0x13FA0 value 11@ size 2
0AB2: ret 0

:coords
if 0@ == 0 // Адм.През.
then
1@ = 1122.71
2@ = -2036.92
3@ = 69.89
end

if 0@ == 1 // Мэрия-ЛС
then
1@ = 1481.07
2@ = -1771.68
3@ = 18.18
end

if 0@ == 2 // Мэрия-ЛВ
then
1@ = 2388.96
2@ = 2465.96
3@ = 10.82
end

if 0@ == 3 // Мэрия-СФ
then
1@ = -2765.99
2@ = 375.55
3@ = 6.33
end

if 0@ == 4 // LSPD
then
1@ = 1555.41
2@ = -1675.66
3@ = 16.19
end

if 0@ == 5 // LVPD
then
1@ = 2340.24
2@ = 2458.75
3@ = 14.96
end

if 0@ == 6 // SFPD
then
1@ = -1605.21
2@ = 710.58
3@ = 13.86
end

if 0@ == 7 // Болька ЛС
then
1@ = 2034.13
2@ = -1402.27
3@ = 17.29
end

if 0@ == 8 // Болька ЛВ
then
1@ = 1607.39
2@ = 1815.24
3@ = 10.82
end

if 0@ == 9 // Болька СФ
then
1@ = -2655.00
2@ = 640.16
3@ = 14.45
end

if 0@ == 10 // СВ
then
1@ = 324.76
2@ = 1954.02
3@ = 21.77
end

if 0@ == 11 // ВВС
then
1@ = 252.64
2@ = 2621.33
3@ = 20.69
end

if 0@ == 12 // ВМФ
then
1@ = -1610.90
2@ = 335.08
3@ = 7.18
end

if 0@ == 13 // LSFM
then
1@ = 1654.05
2@ = -1654.76
3@ = 22.51
end

if 0@ == 14 // LVFM
then
1@ = 2127.62
2@ = 2379.56
3@ = 10.82
end

if 0@ == 15 // SFFM
then
1@ = -2056.84
2@ = 454.48
3@ = 35.17
end

if 0@ == 16 // Автошкола
then
1@ = -2026.40
2@ = -101.92
3@ = 35.16
end

if 0@ == 17 // Казино
then
1@ = 2019.43
2@ = 1007.50
3@ = 10.82
end

if 0@ == 18 // Военкомат
then
1@ = 1165.55
2@ = 1344.51
3@ = 10.29
end

if 0@ == 19 // Банк ЛС
then
1@ = 1548.79
2@ = -1271.20
3@ = 17.40
end

if 0@ == 20 // Банк ЛВ
then
1@ = 2364.89
2@ = 2377.46
3@ = 10.82
end

if 0@ == 21 // Банк СФ
then
1@ = -2650.03
2@ = 375.94
3@ = 6.15
end

if 0@ == 22 // G
then
1@ = 2486.38
2@ = -1644.53
3@ = 14.07
end

if 0@ == 23 // B
then
1@ = 2000.08
2@ = -1114.05
3@ = 27.12
end

if 0@ == 24 // V
then
1@ = 2756.21
2@ = -1182.74
3@ = 69.40
end

if 0@ == 25 // R
then
1@ = 2736.65
2@ = -1952.65
3@ = 13.54
end

if 0@ == 26 // Колумбы
then
1@ = 937.91
2@ = 1733.08
3@ = 8.85
end

if 0@ == 27 // Мексы
then
1@ = 1456.89
2@ = 2773.10
3@ = 10.82
end

if 0@ == 28 // Яки
then
1@ = 2634.06
2@ = 1824.03
3@ = 11.01
end

if 0@ == 29 // Завод
then
1@ = -1006.64
2@ = -696.06
3@ = 32.00
end

if 0@ == 30 // ФБР
then
1@ = -1740.01
2@ = 789.80
3@ = 24.89
end

if 0@ == 31 // Министерство
then
1@ = 1014.53
2@ = 1049.78
3@ = 11.0
end

if 0@ == 32 // Риэлторка
then
1@ = 776.50
2@ = -1036.20
3@ = 23.41
end

if 0@ == 33 // 24/7 тиеро
then
1@ = -2492.25
2@ = 2363.16
3@ = 11.12
end

if 0@ == 34 // Бар_грув
then
1@ = 2467.02
2@ = -1744.06
3@ = 13.55
end

if 0@ == 35 // 24/7 опасный
then
1@ = 1928.58
2@ = -1776.24
3@ = 13.55
end

if 0@ == 36 // парашуты лс
then
1@ = 1957.20
2@ = -2183.65
3@ = 13.55
end

if 0@ == 37 // баллос 24/7
then
1@ = 1837
2@ = -1417.40
3@ = 13.56
end

if 0@ == 38 // бар гора лс
then
1@ = 2151.33
2@ = -1013.92
3@ = 62.75
end

if 0@ == 40 // Auto.Элит
then
1@ = 1658.51
2@ = 2199.86
3@ = 10.82
end

if 0@ == 41 // Auto.Сред
then
1@ = -1953.39
2@ = 300.64
3@ = 35.47
end

if 0@ == 42 // Auto.Эконом
then
1@ = 555.16
2@ = -1293.40
3@ = 17.25
end

if 0@ == 43 // отель El qubardos
then
1@ = -1514.81
2@ = 2519.51
3@ = 56.07
end

if 0@ == 44 // Пеинт СФ
then
1@ = -2089.10
2@ = 84.46
3@ = 35.31
end

if 0@ == 45 // Пеинт ЛС
then
1@ = 1777.92
2@ = -1661.78
3@ = 14.44
end

if 0@ == 46 // Лодочная
then
1@ = 810.89
2@ = -1616.32
3@ = 12.73
end
0AB2: ret 3 1@ 2@ 3@