mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-14 09:32:22 +00:00
Valentine wibble.
Former-commit-id: ef044a82815e1dff8b7a6505c55f098ce7464ad7
This commit is contained in:
parent
17e096f5c5
commit
e3258434cc
1 changed files with 1 additions and 1 deletions
|
|
@ -185,7 +185,7 @@ animation =
|
|||
mapF (scale (n*4)) $ emit $ withFillOpacity o $ withFillColor "white" ai
|
||||
fallingLove rand xPos = mkAnimation 2 $ do
|
||||
n <- signal (-100) 90
|
||||
o <- oscillate $ signal (-1) 1
|
||||
o <- signal 0 5
|
||||
emit $ withStrokeColor "black" $ withFillColor "red" $
|
||||
translate ((xPos*2-1)*(320/2)) n $ scale 0.3 $ rotate (60*(o+rand+xPos)) heartShape
|
||||
message txt = mkAnimation 1 $ do
|
||||
|
|
|
|||
Loading…
Reference in a new issue