CLEO Help Teleport to marker

[DuKeBOMBA]

Hi, I want a change to this teleport mode, instead of the keys for activating X + Y to be in chat /xy
Here's the script, thank you!

Spoiler: Script teleport

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 6.14.2013
{$CLEO .cs}

//-------------MAIN---------------
thread 'TPIN'
5@ = 0

:TPIN_18
wait 0
if
Player.Defined($PLAYER_CHAR)
else_jump @TPIN_18
if
Player.Controllable($PLAYER_CHAR)
else_jump @TPIN_18
if
0AB0: key_pressed 89
else_jump @TPIN_83
5@ = 1
TIMERB = 0

:TPIN_83
if and
5@ == 1
0AB0: key_pressed 88
else_jump @TPIN_119
5@ = 0
jump @TPIN_170

:TPIN_119
if
5@ == 1
else_jump @TPIN_18
if
TIMERB > 5000
else_jump @TPIN_18
5@ = 0
jump @TPIN_18

:TPIN_170
4@ = Actor.Angle($PLAYER_ACTOR)
0AB6: store_target_marker_coords_to 0@ 1@ 2@ // IF and SET
0169: set_fade_color_RGB 0 0 0
fade 0 500
wait 500
Player.CanMove($PLAYER_CHAR) = False
select_interior 0
04FA: reset_sky_colors_with_fade 0
057E: set_radar_grey 0
04E4: refresh_game_renderer_at 0@ 1@
Camera.SetAtPos(0@, 1@, 2@)
if
Player.Defined($PLAYER_CHAR)
else_jump @TPIN_294
0860: link_actor $PLAYER_ACTOR to_interior 0
Actor.PutAt($PLAYER_ACTOR, 0@, 1@, -100.0)
Actor.Angle($PLAYER_ACTOR) = 4@

:TPIN_294
wait 0
if
Player.Defined($PLAYER_CHAR)
else_jump @TPIN_294
wait 1500
fade 1 1000

:TPIN_326
if
fading
else_jump @TPIN_350
wait 0
jump @TPIN_326

:TPIN_350
wait 0
if
Player.Defined($PLAYER_CHAR)
else_jump @TPIN_350
Player.CanMove($PLAYER_CHAR) = True
Camera.SetBehindPlayer
Camera.Restore_WithJumpCut
jump @TPIN_18

 

[Zin]

...