hashirama/reanimate
Watch
1
0
Fork
You've already forked reanimate
 0
mirror of https://github.com/reanimate/reanimate.git synced 2026-09-11 16:12:20 +00:00
Code Issues Projects Releases Wiki Activity

Fix valentine preset.

Browse source
This commit is contained in:
David 2019-02-28 14:27:10 +01:00
commit 4a0dff5f9b
2 changed files with 4 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/Reanimate/Examples.hs
View file

@ -641,7 +641,4 @@ valentine =
o <- oscillate $ signal 0 1
n <- oscillate $ signalSCurve 2 0.9 1.1
emit $ scale n $ scale 2 $ withFillColor "white" $ withFillOpacity o txt
drawHeart = emit $ withFillColor "red" $ heartShape
hex n = if n < 0x10 then "0" ++ showHex (round n) ""
else showHex (round n) ""

6
web/src/Presets.jsx
View file

@ -191,8 +191,10 @@ animation =
emit $ scale n $ scale 2 $ withFillColor "white" $ withFillOpacity o txt
drawHeart = emit $ withFillColor "red" $ heartShape
hex n = if n < 0x10 then "0" ++ showHex (round n) ""
else showHex (round n) ""`;
heartShape =
center $ rotateAroundCenter 225 $ mkPathString
"M0.0,40.0 v-40.0 h40.0a20.0 20.0 90.0 0 1 0.0,40.0a20.0 20.0 90.0 0 1 -40.0,0.0 Z"`;
export default [
{ name: "Examples"