tick chop.
This commit is contained in:
@@ -468,7 +468,7 @@
|
||||
:wizard (rooms/make-entity :wizard (common/make-wizard screen {:x 190 :y 78 :baseline 162 :scale-x 1.2 :scale-y 1.2
|
||||
:script (actions/get-script entities (talk-to-gandarf-outside entities))}))
|
||||
:note (rooms/make-entity :note (assoc (texture "outsidehouse/note.png")
|
||||
:x 286 :y 80 :baseline 160
|
||||
:x 277 :y 74 :baseline 160
|
||||
:script (actions/get-script entities
|
||||
(actions/walk-to entities :ego [280 80] :face :right)
|
||||
(actions/play-animation entities :ego :squat)
|
||||
|
||||
@@ -131,7 +131,11 @@
|
||||
))}
|
||||
:stump {:box [205 68 251 89]
|
||||
:script (actions/get-script entities
|
||||
(actions/do-dialogue entities :ego "It's a stump."))
|
||||
(actions/walk-to entities :ego [170 71] :face :right)
|
||||
(actions/walk-straight-to entities :ego [188 71] :face :right)
|
||||
(actions/play-animation entities :ego :reach)
|
||||
(actions/play-animation entities :ego :axe-wood)
|
||||
(actions/walk-straight-to entities :ego [170 71]))
|
||||
:scripts {:alarm-clock (actions/get-script entities
|
||||
(actions/walk-to entities :ego [189 65] :face :right)
|
||||
(actions/play-animation entities :ego :reach)
|
||||
|
||||
@@ -207,6 +207,8 @@
|
||||
throw (utils/make-anim "ego/throw.png" [18 36] 0.04 (flatten [[(repeat 5 0) (repeat 10 1)] (repeat 3 [2 2 2 3 3 3 4 4 4 5 5 5]) (repeat 5 [2 2 3 3 4 4 5 5]) (repeat 10 [2 3 4 5]) [2 3 3] (repeat 15 6)]))
|
||||
swing-shovel (utils/make-anim "ego/swing-shovel.png" [70 70] 0.1 (range 9))
|
||||
love (utils/make-anim "ego/love.png" [50 70] 0.1 (flatten [0 0 1 1 2 2 3 3 4 4 5 5 6 6 (repeat 10 7) (repeat 5 8) (repeat 5 7) (repeat 5 8) (repeat 5 7) (repeat 10 [23 24 25 24]) (repeat 30 9) 10 11 12 13 14 15 16 17 18 19 20 21 21 21 22 22 22 21 21 21 21 21 21 21 21 22 22 22 22 22 21 21 21 21 22 22 22 22 22 22 21 21 21 21 21 6 6 5 5 4 4 3 3 2 2 1 1 0]))
|
||||
axe (utils/make-anim "ego/axe.png" [60 70] 0.15 (range 5))
|
||||
axe-wood (utils/make-anim "ego/axe-wood.png" [60 70] 0.15 (range 11))
|
||||
|
||||
ego {:right {:walk walk-right
|
||||
:stand stand-anim
|
||||
@@ -248,6 +250,8 @@
|
||||
:swing-shovel swing-shovel
|
||||
:love love
|
||||
:idea idea
|
||||
:axe axe
|
||||
:axe-wood axe-wood
|
||||
}
|
||||
:left {:walk (utils/flip walk-right)
|
||||
:stand (utils/flip stand-anim)
|
||||
@@ -279,7 +283,9 @@
|
||||
:throw (utils/flip throw)
|
||||
:swing-shovel (utils/flip swing-shovel)
|
||||
:love (utils/flip love)
|
||||
:idea (utils/flip idea)}
|
||||
:idea (utils/flip idea)
|
||||
:axe (utils/flip axe)
|
||||
:axe-wood (utils/flip axe-wood)}
|
||||
:baseline (- 240 (last start-pos))
|
||||
:facing :right
|
||||
:origin-x 9
|
||||
@@ -367,6 +373,8 @@
|
||||
:anim-merges {(get-in ego [:right :shock]) {:origin-x 15}
|
||||
(get-in ego [:left :swing-shovel]) {:origin-x 26}
|
||||
(get-in ego [:right :swing-shovel]) {:origin-x 26}
|
||||
(get-in ego [:right :axe]) {:origin-x 17}
|
||||
(get-in ego [:right :axe-wood]) {:origin-x 17}
|
||||
(get-in ego [:left :love]) {:origin-x 36}
|
||||
:default {:origin-x 9}})]
|
||||
(actions/start-animation screen
|
||||
|
||||
Reference in New Issue
Block a user