CLJS Pacman!
21 |
22 |
23 |
24 | 
25 |
26 |
27 |
28 |
--------------------------------------------------------------------------------
/src-cljs/pacman/constants.cljs:
--------------------------------------------------------------------------------
1 | (ns pacman.constants)
2 |
3 | (def FPS 30)
4 | (def WALL 0)
5 | (def BISCUIT 1)
6 | (def EMPTY 2)
7 | (def BLOCK 3)
8 | (def PILL 4)
9 |
10 | ;; Pac-Man Direction
11 | (def LEFT 2)
12 | (def RIGHT 11)
13 | (def UP 3)
14 | (def DOWN 1)
15 | (def FACINGWALL 4)
16 |
17 | ;; Keys
18 | (def BASE-KEYS
19 | {:BACKSPACE 8,
20 | :TAB 9,
21 | :NUM_PAD_CLEAR 12,
22 | :ENTER 13,
23 | :SHIFT 16,
24 | :CTRL 17,
25 | :ALT 18,
26 | :PAUSE 19,
27 | :CAPS_LOCK 20,
28 | :ESCAPE 27,
29 | :SPACEBAR 32,
30 | :PAGE_UP 33,
31 | :PAGE_DOWN 34,
32 | :END 35,
33 | :HOME 36,
34 | :ARROW_LEFT 37,
35 | :ARROW_UP 38,
36 | :ARROW_RIGHT 39,
37 | :ARROW_DOWN 40,
38 | :PRINT_SCREEN 44,
39 | :INSERT 45,
40 | :DELETE 46,
41 | :SEMICOLON 59,
42 | :WINDOWS_LEFT 91,
43 | :WINDOWS_RIGHT 92,
44 | :SELECT 93,
45 | :NUM_PAD_ASTERISK 106,
46 | :NUM_PAD_PLUS_SIGN 107,
47 | :NUM_PAD_HYPHEN-MINUS 109,
48 | :NUM_PAD_FULL_STOP 110,
49 | :NUM_PAD_SOLIDUS 111,
50 | :NUM_LOCK 144,
51 | :SCROLL_LOCK 145,
52 | :EQUALS_SIGN 187,
53 | :COMMA 188,
54 | :HYPHEN-MINUS 189,
55 | :FULL_STOP 190,
56 | :SOLIDUS 191,
57 | :GRAVE_ACCENT 192,
58 | :LEFT_SQUARE_BRACKET 219,
59 | :REVERSE_SOLIDUS 220,
60 | :RIGHT_SQUARE_BRACKET 221,
61 | :APOSTROPHE 222})
62 |
63 | ;; probably more idiomatic to use merge here not conj - David
64 |
65 | (def KEYS
66 | (-> BASE-KEYS
67 | (conj (map #(hash-map (keyword (- %1 48)) %1) (range 48 58)))
68 | (conj (map #(hash-map (keyword (.fromCharCode js/String %1)) %1) (range 65 91)))
69 | (conj (map #(hash-map (keyword (str "NUM_PAD_" (- %1 96))) %1) (range 96 105)))
70 | (conj (map #(hash-map (keyword (str "F" (- %1 (+ 112 1)))) %1) (range 112 124)))))
71 |
72 | (def game-map
73 | [[0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0],
74 | [0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0],
75 | [0, 4, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 4, 0],
76 | [0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0],
77 | [0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0],
78 | [0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 0],
79 | [0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0],
80 | [0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0],
81 | [2, 2, 2, 0, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 2, 2, 2],
82 | [0, 0, 0, 0, 1, 0, 1, 0, 0, 3, 0, 0, 1, 0, 1, 0, 0, 0, 0],
83 | [2, 2, 2, 2, 1, 1, 1, 0, 3, 3, 3, 0, 1, 1, 1, 2, 2, 2, 2],
84 | [0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0],
85 | [2, 2, 2, 0, 1, 0, 1, 1, 1, 2, 1, 1, 1, 0, 1, 0, 2, 2, 2],
86 | [0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0],
87 | [0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0],
88 | [0, 1, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0],
89 | [0, 4, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 4, 0],
90 | [0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0],
91 | [0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 0],
92 | [0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0],
93 | [0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0],
94 | [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]])
95 |
96 | (def WALLS
97 | [
98 | [{:move [0, 9.5]}, {:line [3, 9.5]},
99 | {:curve [3.5, 9.5, 3.5, 9]}, {:line [3.5, 8]},
100 | {:curve [3.5, 7.5, 3, 7.5]}, {:line [1, 7.5]},
101 | {:curve [0.5, 7.5, 0.5, 7]}, {:line [0.5, 1]},
102 | {:curve [0.5, 0.5, 1, 0.5]}, {:line [9, 0.5]},
103 | {:curve [9.5, 0.5, 9.5, 1]}, {:line [9.5, 3.5]}]
104 | [{:move [9.5, 1]},
105 | {:curve [9.5, 0.5, 10, 0.5]}, {:line [18, 0.5]},
106 | {:curve [18.5, 0.5, 18.5, 1]}, {:line [18.5, 7]},
107 | {:curve [18.5, 7.5, 18, 7.5]}, {:line [16, 7.5]},
108 | {:curve [15.5, 7.5, 15.5, 8]}, {:line [15.5, 9]},
109 | {:curve [15.5, 9.5, 16, 9.5]}, {:line [19, 9.5]},]
110 | [{:move [2.5, 5.5]}, {:line [3.5, 5.5]}]
111 | [{:move [3, 2.5]},
112 | {:curve [3.5, 2.5, 3.5, 3]},
113 | {:curve [3.5, 3.5, 3, 3.5]},
114 | {:curve [2.5, 3.5, 2.5, 3]},
115 | {:curve [2.5, 2.5, 3, 2.5]}],
116 | [{:move [15.5, 5.5]}, {:line [16.5, 5.5]}],
117 |
118 | [{:move [16, 2.5]}, {:curve [16.5, 2.5, 16.5, 3]},
119 | {:curve [16.5, 3.5, 16, 3.5]}, {:curve [15.5, 3.5, 15.5, 3]},
120 | {:curve [15.5, 2.5, 16, 2.5]}],
121 |
122 | [{:move [6, 2.5]}, {:line [7, 2.5]}, {:curve [7.5, 2.5, 7.5, 3]},
123 | {:curve [7.5, 3.5, 7, 3.5]}, {:line [6, 3.5]},
124 | {:curve [5.5, 3.5, 5.5, 3]}, {:curve [5.5, 2.5, 6, 2.5]}],
125 |
126 | [{:move [12, 2.5]}, {:line [13, 2.5]}, {:curve [13.5, 2.5, 13.5, 3]},
127 | {:curve [13.5, 3.5, 13, 3.5]}, {:line [12, 3.5]},
128 | {:curve [11.5, 3.5, 11.5, 3]}, {:curve [11.5, 2.5, 12, 2.5]}],
129 |
130 | [{:move [7.5, 5.5]}, {:line [9, 5.5]}, {:curve [9.5, 5.5, 9.5, 6]},
131 | {:line [9.5, 7.5]}],
132 | [{:move [9.5, 6]}, {:curve [9.5, 5.5, 10.5, 5.5]},
133 | {:line [11.5, 5.5]}],
134 |
135 | [{:move [5.5, 5.5]}, {:line [5.5, 7]}, {:curve [5.5, 7.5, 6, 7.5]},
136 | {:line [7.5, 7.5]}],
137 | [{:move [6, 7.5]}, {:curve [5.5, 7.5, 5.5, 8]}, {:line [5.5, 9.5]}],
138 |
139 | [{:move [13.5, 5.5]}, {:line [13.5, 7]},
140 | {:curve [13.5, 7.5, 13, 7.5]}, {:line [11.5, 7.5]}],
141 | [{:move [13, 7.5]}, {:curve [13.5, 7.5, 13.5, 8]},
142 | {:line [13.5, 9.5]}],
143 |
144 | [{:move [0, 11.5]}, {:line [3, 11.5]}, {:curve [3.5, 11.5, 3.5, 12]},
145 | {:line [3.5, 13]}, {:curve [3.5, 13.5, 3, 13.5]}, {:line [1, 13.5]},
146 | {:curve [0.5, 13.5, 0.5, 14]}, {:line [0.5, 17]},
147 | {:curve [0.5, 17.5, 1, 17.5]}, {:line [1.5, 17.5]}],
148 | [{:move [1, 17.5]}, {:curve [0.5, 17.5, 0.5, 18]}, {:line [0.5, 21]},
149 | {:curve [0.5, 21.5, 1, 21.5]}, {:line [18, 21.5]},
150 | {:curve [18.5, 21.5, 18.5, 21]}, {:line [18.5, 18]},
151 | {:curve [18.5, 17.5, 18, 17.5]}, {:line [17.5, 17.5]}],
152 | [{:move [18, 17.5]}, {:curve [18.5, 17.5, 18.5, 17]},
153 | {:line [18.5, 14]}, {:curve [18.5, 13.5, 18, 13.5]},
154 | {:line [16, 13.5]}, {:curve [15.5, 13.5, 15.5, 13]},
155 | {:line [15.5, 12]}, {:curve [15.5, 11.5, 16, 11.5]},
156 | {:line [19, 11.5]}],
157 |
158 | [{:move [5.5, 11.5]}, {:line [5.5, 13.5]}],
159 | [{:move [13.5, 11.5]}, {:line [13.5, 13.5]}],
160 |
161 | [{:move [2.5, 15.5]}, {:line [3, 15.5]},
162 | {:curve [3.5, 15.5, 3.5, 16]}, {:line [3.5, 17.5]}],
163 | [{:move [16.5, 15.5]}, {:line [16, 15.5]},
164 | {:curve [15.5, 15.5, 15.5, 16]}, {:line [15.5, 17.5]}],
165 |
166 | [{:move [5.5, 15.5]}, {:line [7.5, 15.5]}],
167 | [{:move [11.5, 15.5]}, {:line [13.5, 15.5]}],
168 |
169 | [{:move [2.5, 19.5]}, {:line [5, 19.5]},
170 | {:curve [5.5, 19.5, 5.5, 19]}, {:line [5.5, 17.5]}],
171 | [{:move [5.5, 19]}, {:curve [5.5, 19.5, 6, 19.5]},
172 | {:line [7.5, 19.5]}],
173 |
174 | [{:move [11.5, 19.5]}, {:line [13, 19.5]},
175 | {:curve [13.5, 19.5, 13.5, 19]}, {:line [13.5, 17.5]}],
176 | [{:move [13.5, 19]}, {:curve [13.5, 19.5, 14, 19.5]},
177 | {:line [16.5, 19.5]}],
178 |
179 | [{:move [7.5, 13.5]}, {:line [9, 13.5]},
180 | {:curve [9.5, 13.5, 9.5, 14]}, {:line [9.5, 15.5]}],
181 | [{:move [9.5, 14]}, {:curve [9.5, 13.5, 10, 13.5]},
182 | {:line [11.5, 13.5]}],
183 |
184 | [{:move [7.5, 17.5]}, {:line [9, 17.5]},
185 | {:curve [9.5, 17.5, 9.5, 18]}, {:line [9.5, 19.5]}],
186 | [{:move [9.5, 18]}, {:curve [9.5, 17.5, 10, 17.5]},
187 | {:line [11.5, 17.5]}],
188 |
189 | [{:move [8.5, 9.5]}, {:line [8, 9.5]}, {:curve [7.5, 9.5, 7.5, 10]},
190 | {:line [7.5, 11]}, {:curve [7.5, 11.5, 8, 11.5]},
191 | {:line [11, 11.5]}, {:curve [11.5, 11.5, 11.5, 11]},
192 | {:line [11.5, 10]}, {:curve [11.5, 9.5, 11, 9.5]},
193 | {:line [10.5, 9.5]}]])
194 |
195 |
--------------------------------------------------------------------------------
/src-cljs/pacman/ghost.cljs_fix:
--------------------------------------------------------------------------------
1 | (ns pacman.ghost
2 | (:require [pacman.constants :as const]
3 | [pacman.helpers :as helper]))
4 |
5 | (defn add-bounded
6 | "Collision detection."
7 | [x1 x2]
8 | (let [rem (mod x1 10)
9 | result (+ rem x2)]
10 | (cond (and (not= rem 0 )(> result 10)) (+ x1 (- 10 rem))
11 | (and (> rem 0) (< result 0)) (- x1 rem))
12 | :else (+ x1 x2)))
13 |
14 | (defn is-vulnerable? [ghost]
15 | (= (:eatable ghost) nil))
16 |
17 | (defn is-hidden? [ghost]
18 | (and (= (:eatable ghost) nil)
19 | (not= (:eaten ghost) nil)))
20 |
21 | (defn get-new-coord
22 | [ghost dir current]
23 | (let [speed (if (= (is-vulnerable? ghost) true) (if (is-hidden? ghost) 4 2))
24 | x-speed (or
25 | (and (= dir (:left const/game-const)) (- speed))
26 | (and (= dir (:right const/game-const)) speed)
27 | 0)
28 | y-speed (or
29 | (and (= dir (:down const/game-const)) speed)
30 | (and (= dir (:up const/game-const)) (- speed))
31 | 0)]
32 |
33 | {:x (add-bounded (:x current) x-speed)
34 | :y (add-bounded (:y current) y-speed)}))
35 |
36 | (defn is-dangerous?
37 | [ghost]
38 | (= (:eaten ghost) nil))
39 |
40 | (defn get-random-direction [ghost]
41 | (let [moves (if (or (= (:direction ghost) (:left const/game-const))
42 | (= (:direction ghost) (:rigt const/game-const)))
43 | [(:up const/game-const) (:down const/game-const)]
44 | [(:left const/game-const) (:right const/game-const)])]))
45 |
46 |
47 |
48 | ;; =====================================================
49 | ;; Reset ghost state
50 | ;; =====================================================
51 |
52 | (defn ghost-init-state [ghost]
53 | {:eaten nil,
54 | :eatable nil,
55 | :position {:x 90, :y 80}
56 | :direction (get-random-direction ghost)
57 | :due (get-random-direction ghost)})
58 |
59 | (defn reset-ghost [ghost]
60 | (merge-with merge ghost (ghost-init-state ghost)))
61 |
62 | (defn reset-state! []
63 | (swap! state/game-state update-in [:ghosts] #(map reset-ghost %)))
64 |
65 | ;; =====================================================
66 |
67 | (defn on-whole-square [x]
68 | (== (mod x 10) 0))
69 |
70 | (defn opposite-direction
71 | "Send the ghost scurrying off in the opposite direction."
72 | [dir]
73 | (or (== dir [(:left const/game-const) (:right const/game-const)])
74 | (== dir [(:right const/game-const) (:left const/game-const)])
75 | (or (== dir [(:up const/game-const) (:down const/game-const)]) (:up const/game-const))))
76 |
77 | ;; =====================================================
78 | ;; Make ghost eatable
79 |
80 | (defn set-eatable-data [ghost]
81 | {:direction (opposite-direction (:direction ghost))
82 | :eatable (helper/get-tick)})
83 |
84 | (defn merge-ghost-eatable [ghost]
85 | (merge-with merge ghost (ghost-init-state ghost)))
86 |
87 | (defn make-eatable! []
88 | (swap! state/game-state update-in [:ghosts] #(map merge-ghost-eatable %)))
89 |
90 | ;; =====================================================
91 |
92 | #_(defn make-eatable []
93 | (swap! state/game-state assoc-in [:direction] (opposite-direction (:direction ghost)))
94 | (swap! state/game-state assoc-in [:eatable] helper/get-tick))
95 |
96 | ;; This doesn't work.
97 | (defn eat []
98 | (swap! state/game-state assoc-in [:eatble] nil)
99 | (swap! state/game-state assoc-in [:eaten] helper/get-tick))
100 |
101 | (defn point-to-cord [x]
102 | (.round js/Math (/ x 10)))
103 |
104 | (defn next-square
105 | [x dir]
106 | (let [rem (mod x 10)]
107 | (cond
108 | (== rem 0) x
109 | (or (== dir (:right const/game-const))
110 | (== dir (:down const/game-const)))(+ x (- 10 rem)))
111 | :else (- x rem)))
112 | (defn on-grid-square [pos]
113 | (and (on-whole-square (:y pos)) (on-whole-square (:x pos))))
114 |
115 | (defn seconds-ago [tick]
116 | (/ (- helper/get-tick tick) const/FPS))
117 |
118 | ;; What is color? Need to define it!
119 | (defn get-color [ghost]
120 | (cond
121 | (not= (:eatable ghost) nil
122 | (if (> (seconds-ago (:eatable ghost)) 5)
123 | (if (> (mod helper/get-tick 20) 10) "#FFFFFF" "#0000BB")))
124 | (if (:eaten ghost) "#222")
125 | :else (:color ghost)))
126 |
127 | (defn draw [ghost]
128 | (let [ctx (:ctx @state/game-state)
129 | position (:position ghost)
130 | s (:block-size @gamemap/map-state)
131 | eatable (:eatable ghost)
132 | top (* (/ (:y position) 10) 2)
133 | left (* (/ (:x position) 10) 2)
134 | tl (+ left s)
135 | base (- (+ top s) 3)
136 | inc (/ s 10)
137 | high (if (> (mod helper/get-tick 10) 5) 3 -3)
138 | low (if (> (mod helper/get-tick 10) 5) -3 3)
139 | direction (:direction ghost)
140 | f (/ s 12)
141 | off {}]
142 |
143 | (cond
144 | (and eatable (> (seconds-ago eatable) 8)) (swap! ghost assoc-in [:eatable] nil)
145 | (and eatable (> (seconds-ago eatable) 3)) (swap! ghost assoc-in [:eaten] nil))
146 |
147 | (set! (. ctx -fillStyle) (:specs ghost))
148 | ;(set! (. ctx -fillStyle) (get-color ghost))
149 |
150 | (.beginPath ctx)
151 | (.moveTo ctx left base)
152 |
153 | (.quadraticCurveTo ctx left top (+ left (/ s 2)) top)
154 | (.quadraticCurveTo ctx (+ left s) top (+ left s) base)
155 | (.quadraticCurveTo ctx (- tl (* inc 1)) (+ base high) (- (* inc 2) tl) base)
156 | (.quadraticCurveTo ctx (- tl (* inc 3)) (+ base low) (- (* inc 4) tl) base)
157 | (.quadraticCurveTo ctx (- tl (* inc 5)) (+ base high) (- (* inc 6) tl) base)
158 | (.quadraticCurveTo ctx (- tl (* inc 7)) (+ base low) (- (* inc 8) tl) base)
159 | (.quadraticCurveTo ctx (- tl (* inc 9)) (+ base low) (- (* inc 8) tl) base)
160 |
161 | (.closePath ctx)
162 | (.fill ctx)
163 | (.beginPath ctx)
164 | (set! (. ctx -fillStyle) "#FFF")
165 | (.arc ctx (+ left 6) (+ top 6) (/ s 6) 0 300 false)
166 | (.arc ctx (- (+ left s) 6) (+ top 6) (/ s 6) 0 300 false)
167 | (.closePath ctx)
168 | (.fill ctx)
169 |
170 | (conj off {:right [f 0] :left [(- f) 0] :up [0 (- f)] :down [0 f]})
171 |
172 | (.beginPath ctx)
173 | (set! (. ctx -fillStyle) "#000")
174 | (.arc ctx (+ left 6 (nth ((keyword direction) off) 0)) (+ left 6 (nth ((keyword direction) off) 1)) (/ s 15) 0 300 false)
175 | (.arc ctx (+ (- (+ left s) 6) (nth ((keyword direction) off) 0)) (+ top 6 (nth ((keyword direction) off) 1)) (/ s 15) 0 300 false)
176 | (.closePath ctx)
177 | (.fill ctx)))
178 |
179 | (defn pane [pos dir]
180 | (cond
181 | (and (= (:y pos) 100) (>= (:x pos) 190) (= dir (:right const/game-const))) {:y 100 :x -10}
182 | (and (= (:y pos) 100) (<= (:x pos) -10) (= dir (:left const/game-const))) {:y 100 :x 190}))
183 |
184 | ;; ====================================================
185 | ;; Move ghost - experimental
186 | ;; ====================================================
187 |
188 | (defn get-npos [ghost]
189 | (cond (nil? (:npos ghost)) (get-new-coord ghost (:direction ghost) (:position ghost))
190 | (not= (:due ghost) (:direction ghost)) (get-new-coord ghost (:due ghost) (:position ghost))))
191 |
192 | (defn tmp-pos [ghost]
193 | (if-let [tmp (pane (:position ghost) (:direction ghost))]
194 | tmp))
195 |
196 | (defn change-direction [ghost]
197 | (let [due (:due ghost)
198 | npos (get-new-coord ghost due (:position ghost))]
199 | (if (and (on-grid-square (:position ghost)) (gamemap/is-floor-space? {:y (helper/point-to-coord (next-square (:y (:npos ghost)) due))
200 | :x (helper/point-to-coord (next-square (:x (:npos ghost)) due))}))
201 | (:due ghost)
202 | nil)))
203 |
204 | (defn reset-ghost-direction! [ghost]
205 | {:old-pos (:position ghost)
206 | :npos (get-npos ghost)
207 | :position (if (nil? (tmp-pos ghost)) (:due ghost) (tmp-pos ghost))
208 | :direction (change-direction ghost)
209 | :due (change-direction ghost)})
210 |
211 | (defn ghost-moves [ghost]
212 | (merge-with merge ghost (reset-ghost-direction! ghost)))
213 |
214 | (defn move! []
215 | (swap! state/game-state update-in [:ghosts] #(map ghost-moves %)))
216 |
217 |
--------------------------------------------------------------------------------
/resources/public/js/modernizr.custom.95208.js:
--------------------------------------------------------------------------------
1 | /* Modernizr 2.6.2 (Custom Build) | MIT & BSD
2 | * Build: http://modernizr.com/download/#-fontface-backgroundsize-borderimage-borderradius-boxshadow-flexbox-flexboxlegacy-hsla-multiplebgs-opacity-rgba-textshadow-cssanimations-csscolumns-generatedcontent-cssgradients-cssreflections-csstransforms-csstransforms3d-csstransitions-applicationcache-canvas-canvastext-draganddrop-hashchange-history-audio-video-indexeddb-input-inputtypes-localstorage-postmessage-sessionstorage-websockets-websqldatabase-webworkers-geolocation-inlinesvg-smil-svg-svgclippaths-touch-webgl-shiv-cssclasses-teststyles-testprop-testallprops-hasevent-prefixes-domprefixes-load
3 | */
4 | ;window.Modernizr=function(a,b,c){function C(a){j.cssText=a}function D(a,b){return C(n.join(a+";")+(b||""))}function E(a,b){return typeof a===b}function F(a,b){return!!~(""+a).indexOf(b)}function G(a,b){for(var d in a){var e=a[d];if(!F(e,"-")&&j[e]!==c)return b=="pfx"?e:!0}return!1}function H(a,b,d){for(var e in a){var f=b[a[e]];if(f!==c)return d===!1?a[e]:E(f,"function")?f.bind(d||b):f}return!1}function I(a,b,c){var d=a.charAt(0).toUpperCase()+a.slice(1),e=(a+" "+p.join(d+" ")+d).split(" ");return E(b,"string")||E(b,"undefined")?G(e,b):(e=(a+" "+q.join(d+" ")+d).split(" "),H(e,b,c))}function J(){e.input=function(c){for(var d=0,e=c.length;d| t |
","
"]},jt=dt(o),Dt=jt.appendChild(o.createElement("div"));At.optgroup=At.option,At.tbody=At.tfoot=At.colgroup=At.caption=At.thead,At.th=At.td,b.fn.extend({text:function(e){return b.access(this,function(e){return e===t?b.text(this):this.empty().append((this[0]&&this[0].ownerDocument||o).createTextNode(e))},null,e,arguments.length)},wrapAll:function(e){if(b.isFunction(e))return this.each(function(t){b(this).wrapAll(e.call(this,t))});if(this[0]){var t=b(e,this[0].ownerDocument).eq(0).clone(!0);this[0].parentNode&&t.insertBefore(this[0]),t.map(function(){var e=this;while(e.firstChild&&1===e.firstChild.nodeType)e=e.firstChild;return e}).append(this)}return this},wrapInner:function(e){return b.isFunction(e)?this.each(function(t){b(this).wrapInner(e.call(this,t))}):this.each(function(){var t=b(this),n=t.contents();n.length?n.wrapAll(e):t.append(e)})},wrap:function(e){var t=b.isFunction(e);return this.each(function(n){b(this).wrapAll(t?e.call(this,n):e)})},unwrap:function(){return this.parent().each(function(){b.nodeName(this,"body")||b(this).replaceWith(this.childNodes)}).end()},append:function(){return this.domManip(arguments,!0,function(e){(1===this.nodeType||11===this.nodeType||9===this.nodeType)&&this.appendChild(e)})},prepend:function(){return this.domManip(arguments,!0,function(e){(1===this.nodeType||11===this.nodeType||9===this.nodeType)&&this.insertBefore(e,this.firstChild)})},before:function(){return this.domManip(arguments,!1,function(e){this.parentNode&&this.parentNode.insertBefore(e,this)})},after:function(){return this.domManip(arguments,!1,function(e){this.parentNode&&this.parentNode.insertBefore(e,this.nextSibling)})},remove:function(e,t){var n,r=0;for(;null!=(n=this[r]);r++)(!e||b.filter(e,[n]).length>0)&&(t||1!==n.nodeType||b.cleanData(Ot(n)),n.parentNode&&(t&&b.contains(n.ownerDocument,n)&&Mt(Ot(n,"script")),n.parentNode.removeChild(n)));return this},empty:function(){var e,t=0;for(;null!=(e=this[t]);t++){1===e.nodeType&&b.cleanData(Ot(e,!1));while(e.firstChild)e.removeChild(e.firstChild);e.options&&b.nodeName(e,"select")&&(e.options.length=0)}return this},clone:function(e,t){return e=null==e?!1:e,t=null==t?e:t,this.map(function(){return b.clone(this,e,t)})},html:function(e){return b.access(this,function(e){var n=this[0]||{},r=0,i=this.length;if(e===t)return 1===n.nodeType?n.innerHTML.replace(gt,""):t;if(!("string"!=typeof e||Tt.test(e)||!b.support.htmlSerialize&&mt.test(e)||!b.support.leadingWhitespace&&yt.test(e)||At[(bt.exec(e)||["",""])[1].toLowerCase()])){e=e.replace(vt,"<$1>");try{for(;i>r;r++)n=this[r]||{},1===n.nodeType&&(b.cleanData(Ot(n,!1)),n.innerHTML=e);n=0}catch(o){}}n&&this.empty().append(e)},null,e,arguments.length)},replaceWith:function(e){var t=b.isFunction(e);return t||"string"==typeof e||(e=b(e).not(this).detach()),this.domManip([e],!0,function(e){var t=this.nextSibling,n=this.parentNode;n&&(b(this).remove(),n.insertBefore(e,t))})},detach:function(e){return this.remove(e,!0)},domManip:function(e,n,r){e=f.apply([],e);var i,o,a,s,u,l,c=0,p=this.length,d=this,h=p-1,g=e[0],m=b.isFunction(g);if(m||!(1>=p||"string"!=typeof g||b.support.checkClone)&&Ct.test(g))return this.each(function(i){var o=d.eq(i);m&&(e[0]=g.call(this,i,n?o.html():t)),o.domManip(e,n,r)});if(p&&(l=b.buildFragment(e,this[0].ownerDocument,!1,this),i=l.firstChild,1===l.childNodes.length&&(l=i),i)){for(n=n&&b.nodeName(i,"tr"),s=b.map(Ot(l,"script"),Ht),a=s.length;p>c;c++)o=l,c!==h&&(o=b.clone(o,!0,!0),a&&b.merge(s,Ot(o,"script"))),r.call(n&&b.nodeName(this[c],"table")?Lt(this[c],"tbody"):this[c],o,c);if(a)for(u=s[s.length-1].ownerDocument,b.map(s,qt),c=0;a>c;c++)o=s[c],kt.test(o.type||"")&&!b._data(o,"globalEval")&&b.contains(u,o)&&(o.src?b.ajax({url:o.src,type:"GET",dataType:"script",async:!1,global:!1,"throws":!0}):b.globalEval((o.text||o.textContent||o.innerHTML||"").replace(St,"")));l=i=null}return this}});function Lt(e,t){return e.getElementsByTagName(t)[0]||e.appendChild(e.ownerDocument.createElement(t))}function Ht(e){var t=e.getAttributeNode("type");return e.type=(t&&t.specified)+"/"+e.type,e}function qt(e){var t=Et.exec(e.type);return t?e.type=t[1]:e.removeAttribute("type"),e}function Mt(e,t){var n,r=0;for(;null!=(n=e[r]);r++)b._data(n,"globalEval",!t||b._data(t[r],"globalEval"))}function _t(e,t){if(1===t.nodeType&&b.hasData(e)){var n,r,i,o=b._data(e),a=b._data(t,o),s=o.events;if(s){delete a.handle,a.events={};for(n in s)for(r=0,i=s[n].length;i>r;r++)b.event.add(t,n,s[n][r])}a.data&&(a.data=b.extend({},a.data))}}function Ft(e,t){var n,r,i;if(1===t.nodeType){if(n=t.nodeName.toLowerCase(),!b.support.noCloneEvent&&t[b.expando]){i=b._data(t);for(r in i.events)b.removeEvent(t,r,i.handle);t.removeAttribute(b.expando)}"script"===n&&t.text!==e.text?(Ht(t).text=e.text,qt(t)):"object"===n?(t.parentNode&&(t.outerHTML=e.outerHTML),b.support.html5Clone&&e.innerHTML&&!b.trim(t.innerHTML)&&(t.innerHTML=e.innerHTML)):"input"===n&&Nt.test(e.type)?(t.defaultChecked=t.checked=e.checked,t.value!==e.value&&(t.value=e.value)):"option"===n?t.defaultSelected=t.selected=e.defaultSelected:("input"===n||"textarea"===n)&&(t.defaultValue=e.defaultValue)}}b.each({appendTo:"append",prependTo:"prepend",insertBefore:"before",insertAfter:"after",replaceAll:"replaceWith"},function(e,t){b.fn[e]=function(e){var n,r=0,i=[],o=b(e),a=o.length-1;for(;a>=r;r++)n=r===a?this:this.clone(!0),b(o[r])[t](n),d.apply(i,n.get());return this.pushStack(i)}});function Ot(e,n){var r,o,a=0,s=typeof e.getElementsByTagName!==i?e.getElementsByTagName(n||"*"):typeof e.querySelectorAll!==i?e.querySelectorAll(n||"*"):t;if(!s)for(s=[],r=e.childNodes||e;null!=(o=r[a]);a++)!n||b.nodeName(o,n)?s.push(o):b.merge(s,Ot(o,n));return n===t||n&&b.nodeName(e,n)?b.merge([e],s):s}function Bt(e){Nt.test(e.type)&&(e.defaultChecked=e.checked)}b.extend({clone:function(e,t,n){var r,i,o,a,s,u=b.contains(e.ownerDocument,e);if(b.support.html5Clone||b.isXMLDoc(e)||!mt.test("<"+e.nodeName+">")?o=e.cloneNode(!0):(Dt.innerHTML=e.outerHTML,Dt.removeChild(o=Dt.firstChild)),!(b.support.noCloneEvent&&b.support.noCloneChecked||1!==e.nodeType&&11!==e.nodeType||b.isXMLDoc(e)))for(r=Ot(o),s=Ot(e),a=0;null!=(i=s[a]);++a)r[a]&&Ft(i,r[a]);if(t)if(n)for(s=s||Ot(e),r=r||Ot(o),a=0;null!=(i=s[a]);a++)_t(i,r[a]);else _t(e,o);return r=Ot(o,"script"),r.length>0&&Mt(r,!u&&Ot(e,"script")),r=s=i=null,o},buildFragment:function(e,t,n,r){var i,o,a,s,u,l,c,p=e.length,f=dt(t),d=[],h=0;for(;p>h;h++)if(o=e[h],o||0===o)if("object"===b.type(o))b.merge(d,o.nodeType?[o]:o);else if(wt.test(o)){s=s||f.appendChild(t.createElement("div")),u=(bt.exec(o)||["",""])[1].toLowerCase(),c=At[u]||At._default,s.innerHTML=c[1]+o.replace(vt,"<$1>")+c[2],i=c[0];while(i--)s=s.lastChild;if(!b.support.leadingWhitespace&&yt.test(o)&&d.push(t.createTextNode(yt.exec(o)[0])),!b.support.tbody){o="table"!==u||xt.test(o)?"