{$CLEO .cs}
{$INCLUDE SF}
0000: NOP

:style_63
wait 2000
chatmsg "Cleo exit v1.1 by {0000FF}Mario" 16766720
12@ = SAMP.Base()

repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "akpz" to_label @kpztp
0B34: samp register_client_command "ahos" to_label @hostp
0B34: samp register_client_command "dkpz" to_label @dkpztp

repeat
wait 0
if
0@ == 1
then
0B28: samp disconnect_with_reason 0
wait 15000
0B27: samp set_gamestate 1
repeat
wait 0
until 0B61: samp is_local_player_spawned
wait 1950
Actor.PutAt($PLAYER_ACTOR, 1@, 2@, 3@)
0@ = 0
end
until false

:kpztp
if 0@ == 0
then
1@ = 2241.10
2@ = -1164.99
3@ = 1029.80
jump @tp431
end

:hostp
if 0@ == 0
then
1@ = 1703.67
2@ = -1667.71
3@ = 20.23
jump @tp431
end

:dkpztp
if 0@ = 0
then
Actor.PutAt($PLAYER_ACTOR, 246.40, 107.31, 1003.22)
0@ = 0
end

:tp431
wait 0
if 0@ == 0
then
0@ = 1
end
SAMP.CmdRet()

:key
if 0AA2: 2@ = load_library "User32.dll"
then
if 0AA4: 2@ = get_proc_address "keybd_event" library 2@
then
0AA5: call 2@ num_params 4 pop 0 0 0 0 0@
wait 1@
0AA5: call 2@ num_params 4 pop 0 0 0x02 0 0@
end
end
0AB2: ret 0