 ;; -----------------------------------------
 
 (defn- make-ai
-  [game-state player]
+  [board player]
   {:player player
    :other-players (remove #{player} cst/players)
-   :cell-weights (scores/get-weights-by-cell (:board game-state))
+   :cell-weights (scores/get-weights-by-cell board)
    })
 
 (defn- score-move

    other-players))

(defn- move-best-outcome
  [ai turn [coord converted :as move]]
  (let [new-turn (turn/play-move turn coord)                ;; TODO - replace by game
        move-diff (get (score-move ai move) (:player ai))
        next-diff (worst-possible-score-from ai new-turn)]
    (+ move-diff next-diff)))

(defn- max-by

    [triboard.logic.constants :as cst]
    [triboard.logic.game :as game]
    [triboard.logic.move :as move]
    ))


