CLEO Thread Fribi wait 2000 cmd tpa tpa cmd tpcar tpcar While True wai

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
{$CLEO}
Thread "Fribi"
wait 2000
cmd "tpa" @tpa
cmd "tpcar" @tpcar
While True
wait 0
if 3@ == 1
then
Actor.PutAt($Player_Actor, 0, 0, -10000)
wait 3500
Actor.PutAt($Player_Actor, 0@, 1@, 2@)
wait 500
Actor.PutAt($Player_Actor, 0@, 1@, 2@)
wait 1000
02EB: restore_camera_with_jumpcut
0af8: "{A8DDDF}[TP] {A6EA12}Âû òåëåïîðòèðîâàíû." -1
3@ = 0
end
end
:tpa
if 0AB6: store_target_marker_coords_to 0@ 1@ 2@ // IF and SET
then
if
not Actor.Driving($Player_Actor)
then
3@ = 1
else
0af8: "{A8DDDF}[TP] {EA4040}Âû íàõîäèòåñü â àâòîìîáèëå." -1
end
end
SAMP.CmdRet()
:tpcar
if 0AB6: store_target_marker_coords_to 0@ 1@ 2@ // IF and SET
then
if
Actor.Driving($Player_Actor)
then
3@ = 1
else
0af8: "{A8DDDF}[TP] {EA4040}Âû íå íàõîäèòåñü â àâòîìîáèëå." -1
end
end
SAMP.CmdRet()