$${
IFMATCHES(%@&chatclean%,"\.tpr^")
    ECHO("&eUsage: .tpr &oname")
ENDIF

IFMATCHES(%@&chatclean%,"%@&regex%\.tpr (.+)",&tper,2)
    IFMATCHES(%CHATCLEAN%, "^\[Staff\] (.+)")
        IFMATCHES(%&tper%,"xKe|evin|vinn")
            ECHO("&cCannot teleport that player.")
            Stop
        ENDIF

        Set(#rplayer,0)
        Set(#cplayers,0)
        Set(#onlineplayers,0)

        ForEach(players)
            Inc(#onlineplayers)
        Next

        RANDOM(#rplayer,1,%#onlineplayers%)

        ForEach(players)
            Inc(#cplayers)
            IF(#cplayers = #rplayer)
                Set(&pickedplayer,%PLAYERNAME%)
                Break()
            ENDIF
        Next

        ECHO("/tpo %&tper% %&pickedplayer%")
        ECHO("/staff &c&oTeleported %&tper% to %&pickedplayer%")
        WAIT(1)
        ECHO("/sudo %&tper% c:/l Hi\, %&pickedplayer%! I'm %&tper%! Nice to meet  you. :)")
    ENDIF
ENDIF
}$$