{$CLEO}

thread "bublik"

if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end

0B34: samp register_client_command "bot" to_label @cmd

while true
wait 0

if 10@ == 1 // ???? ?? ???????????? ??????
then
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1900.5414 -1678.1832 23.0215
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 4000
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1891.9205 -1669.0083 17.5854
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 500
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1885.4629 -1662.0186 17.5854
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 500
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1876.9113 -1652.1161 17.5854
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 500
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1860.0248 -1633.5232 17.5854
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 500
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1861.5690 -1621.7697 17.5854
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 500
0AB1: @cheat_actor_teleport 4 $PLAYER_ACTOR -1868.7366 -1613.4674 22.7028
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
wait 6000
end

end

:cmd
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
0B12: 10@ = 10@ XOR 1
if 10@ == 0
then
Actor.LockInCurrentPosition($PLAYER_ACTOR) = false
end
Samp.CmdRet()

:cheat_actor_teleport
0A96: 4@ = actor 0@ struct
4@ += 20
0A8D: 4@ = read_memory 4@ size 4 virtual_protect 0
4@ += 48 // X
0A8C: write_memory 4@ size 4 value 1@ virtual_protect 0 // X
4@ += 4 // Y
0A8C: write_memory 4@ size 4 value 2@ virtual_protect 0 // Y
4@ += 4 // Z
0A8C: write_memory 4@ size 4 value 3@ virtual_protect 0 // Z
ret 0