@verb #1971:"Z X C A S D Q W E 1 2 3 4 5 6 7 8 9" none none none rdo #9342
@program #1971:"Z X C A S D Q W E 1 2 3 4 5 6 7 8 9" none none none
"Converts keyboard input to grid numbers."
if ((turn = this.player_list[1 + this.move % 2]) == 0)
  this.player_list[1 + this.move % 2] = player
elseif (player != turn)
  return $msg:mtell("bad_turn", turn ? "the computer" | turn:title(1))
endif
this:move(index("123456789 ZXCASDQWE", verb) % 10)
.