@verb #4161:"move" this none this rxdo #4000
@program #4161:"move" this none this
caller_perms() == $san || one == two
$sanp:player(args[1], tostr(this, ":do_move(", args[2], ");"))
.