diff --git a/src/converter/rekordbox/position_mark.cljc b/src/converter/rekordbox/position_mark.cljc index af4057e..ea88514 100644 --- a/src/converter/rekordbox/position_mark.cljc +++ b/src/converter/rekordbox/position_mark.cljc @@ -47,8 +47,8 @@ {:tag (s/spec #{:POSITION_MARK}) :attrs {:Name string? :Type ::position-mark-type - :Start (s/double-in :min 0 :max 7200 :NaN? false :infinite? false) - (std/opt :End) (s/double-in :min 0 :max 7200 :NaN? false :infinite? false) + :Start (s/double-in :min 0 :max 86400 :NaN? false :infinite? false) + (std/opt :End) (s/double-in :min 0 :max 86400 :NaN? false :infinite? false) :Num (s/spec #{"-1" "0" "1" "2" "3" "4" "5" "6" "7"}) (std/opt :Red) (s/int-in 0 256) (std/opt :Green) (s/int-in 0 256) diff --git a/src/converter/rekordbox/tempo.cljc b/src/converter/rekordbox/tempo.cljc index 73579dd..84f05eb 100644 --- a/src/converter/rekordbox/tempo.cljc +++ b/src/converter/rekordbox/tempo.cljc @@ -14,7 +14,7 @@ (std/spec {:name ::tempo :spec {:tag (s/spec #{:TEMPO}) - :attrs {:Inizio (s/double-in :min 0 :max 7200 :NaN? false :infinite? false) + :attrs {:Inizio (s/double-in :min 0 :max 86400 :NaN? false :infinite? false) :Bpm (s/double-in :min 0 :NaN? false :infinite? false) :Metro string? :Battito string?}}})) diff --git a/src/converter/traktor/cue.cljc b/src/converter/traktor/cue.cljc index e9da448..a32e3f9 100644 --- a/src/converter/traktor/cue.cljc +++ b/src/converter/traktor/cue.cljc @@ -32,7 +32,7 @@ (defn start-plus-len-not-greater-than-max [{{:keys [:START :LEN]} :attrs :as cue}] - (if (< 7200000 (+ START LEN)) + (if (< 86400000 (+ START LEN)) (assoc-in cue [:attrs :LEN] 0) cue)) @@ -41,8 +41,8 @@ :spec {:tag (s/spec #{:CUE_V2}) :attrs {:NAME string? :TYPE ::type-num - :START (s/double-in :min 0 :max 7200000 :NaN? false :infinite? false) ; millis - :LEN (s/double-in :min 0 :max 7200000 :NaN? false :infinite? false) ; millis + :START (s/double-in :min 0 :max 86400000 :NaN? false :infinite? false) ; millis + :LEN (s/double-in :min 0 :max 86400000 :NaN? false :infinite? false) ; millis :HOTCUE ::hotcue}}})) (def cue-spec diff --git a/src/converter/universal/marker.cljc b/src/converter/universal/marker.cljc index a26ec7f..bafb4ba 100644 --- a/src/converter/universal/marker.cljc +++ b/src/converter/universal/marker.cljc @@ -16,7 +16,7 @@ (defn end-for-loop-markers [marker] (if (= ::type-loop (::type marker)) - (update marker ::end (fn [end start] (if (< 7200 (+ start end)) 7200 (+ start end))) (::start marker)) + (update marker ::end (fn [end start] (if (< 86400 (+ start end)) 86400 (+ start end))) (::start marker)) marker)) (defn end-for-other-markers @@ -27,8 +27,8 @@ (def marker {::name string? ::type ::type-kw - ::start (s/double-in :min 0 :max 7200 :NaN? false :infinite? false) ; seconds - ::end (s/double-in :min 0 :max 7200 :NaN? false :infinite? false) ; seconds + ::start (s/double-in :min 0 :max 86400 :NaN? false :infinite? false) ; seconds + ::end (s/double-in :min 0 :max 86400 :NaN? false :infinite? false) ; seconds ::num (s/spec #{"-1" "0" "1" "2" "3" "4" "5" "6" "7"})}) (def marker-spec diff --git a/src/converter/universal/tempo.cljc b/src/converter/universal/tempo.cljc index aa0e306..172ce6f 100644 --- a/src/converter/universal/tempo.cljc +++ b/src/converter/universal/tempo.cljc @@ -7,7 +7,7 @@ (def tempo-spec (std/spec {:name ::tempo - :spec {::inizio (s/double-in :min 0 :max 7200 :NaN? false :infinite? false) ; seconds + :spec {::inizio (s/double-in :min 0 :max 86400 :NaN? false :infinite? false) ; seconds ::bpm (s/double-in :min 0 :NaN? false :infinite? false) ::metro string? ::battito string?}})) \ No newline at end of file