[plevel 4]
teleto
tel
 
[function teleto]
TARGETF TELETO_TARG
SYSMESSAGE Who do you wish to move?
 
[function teleto_targ]
TARGETFG TELETO_TARG2 <ARGO.UID>
SYSMESSAGE Where to?
 
[function teleto_targ2]
IF (<ARGO.ISPLAYER>)
TARGETFG TELETO_TARG2 <ARGO.UID>
SYSMESSAGE Where to?
ELSE
TRY UID.<ARGN1>.GO <TARGP>
ENDIF

[FUNCTION tel]
TARGETFG targ_tel

[FUNCTION targ_tel]
GO <TARGP>
TARGETFG targ_tel
 
[EOF]
