fight animation started

desktop/resources/inside-castle/hands.pxa/CelData.plist

@@ -0,0 +1,34 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<array>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+	<dict>
+		<key>duration</key>
+		<real>1</real>
+	</dict>
+</array>
+</plist>

desktop/src-common/advent/screens/rooms/inside_cafeteria.clj

@@ -56,6 +56,7 @@
                                                              
                                                              (actions/transition-music entities :town-2 :fight)
                                                              (actions/add-entity entities :fight (get-in @entities [:room :fight]))
+                                                             (actions/add-entity entities :hands-fight (get-in @entities [:room :hands-fight]))
                                                              (actions/do-dialogue entities
                                                                                   :warriors "[Todo animation here]"
                                                                                   :warriors "You lost, young master. Go hitherto, unto thy gym."))))}
@@ -129,7 +130,7 @@
         ladder-guard-stand (animation 0.1 [(aget ladder-guard-sheet 0 0)])
         ladder-guard-talk (animation 0.2 (for [i [0 0 0 0 1 0 0 1]]
                                            (aget ladder-guard-sheet 0 i)))
-        ]
+        hands-fight-win (utils/make-anim "inside-cafeteria/hands-fight.png" [104 104] 0.075 [0 1 0 4 0 1 0 4 0 1 0 4 0 1 0 4 0 1 0 4 0 1 0 1 0 1 0 1])]
     (rooms/make :music :town-1
                 :interactions
                 {:right-dir {:box [300 0 320 120]
@@ -163,6 +164,12 @@
                                                                       (actions/talk entities :ladder-guard "Do not toucheth, young sire.")))}
                 :collision "inside-cafeteria/collision.png"
                 :fight (make-fight-entity) 
+                :hands-fight (assoc (animation->texture screen hands-fight-win)
+                               :x 122
+                               :y 38
+                               :baseline 1001
+                               :anim hands-fight-win
+                               :anim-start 0)
                 :scale-fn (utils/scaler-fn-with-baseline 110 0.10 1.50)
                 :apply-state (fn [entities]
                                (as-> entities entities