 ;;      (println "Changed seconds")
       (set-tick))))
 
-
 (defn stop-sound [] (when-let [ audio-obj @playing] (.pause audio-obj)))
-
 
 (def setting (r/atom { :difficulty :beginner}))
 


;; game status
(def game-state 
  (r/atom
   {
  ;  :board []
  ;  :neighbor []
  ;  :states [] ;; :hide, :open, :flag, :question

     :first true
     :start 0
    }))


(defn play-sound [result]

    (and end? (= state :flag) (zero? mine)) "wrong_flag"
    (= state :open)                         (str "open_" surround " open")
    (= state :flag)                         "cell_flag"
    end?                                    (str "cell_" (name state)) ;;disable actions
    :else                                   (str "cell_action cell_" (name state)) ))
(defn text-of [end? mine state surround]
  (cond 
