File:Retro-flower-ornaments.svg
Retro-looking abstract floral ornaments (each one a single color). Stylistically influenced by various decorations from the late 60's / early 70's era, but these particular patterns were created by me from scratch using abstract geometry.
Date
Source
Author
AnonMoos
For other retro flower designs, see File:Retro-flower-icon-5petals.svg .
For other abstract symmetrical floral ornaments, see File:Five petal flower icon.svg and File:Mathematical-polar-equation-flowers.svg .Self-made image, converted from the following PostScript vector source code:
%! gsave 100 366 translate .5 dup scale/q 72 def/plr{dup 3 2 roll q mul 90 add dup dup/x exch def 3 1 roll cos mul 3 1 roll sin mul}def 0 1 4{100 plr 59.44463 0 360 arc closepath fill}for 0 0 75 0 360 arc closepath fill 1 setgray 0 0 35 0 360 arc closepath fill grestore gsave 100 221 translate .7 dup scale 0 1 14{24 mul 12 add dup 12 add 0 0 100 5 3 roll arc 0 0 lineto closepath fill}for 0 0 8 0 360 arc closepath fill grestore gsave 270 371 translate 1.75 dup scale -18 rotate 10{7 29 moveto 7 37 5 45 0 45 curveto -5 45 -7 37 -7 29 curveto -7 17 -2 5 0 5 curveto 2 5 7 17 7 29 curveto closepath fill 36 rotate}repeat 0 0 12 0 360 arc closepath fill 1 setgray 0 0 6 0 360 arc closepath fill grestore gsave 435 222 translate .4 dup scale/q 60 def 0.75 1 5.75{120 plr 61 0 360 arc closepath fill }for 0 0 100 0 360 arc closepath fill 1 setgray 0 0 40 0 360 arc closepath fill grestore gsave 438 371 translate .37 dup scale/bevx 30 def/bevy 15 def/r{x 135 add sin mul add}def/s{x 225 add sin mul add}def/t{ x 225 add cos mul add}def/u{x 135 add cos mul add}def 0.5 1 5.5{dup/y exch def 152 plr 50 x 135 sub x 135 add arc y 152 plr 50 r bevx s exch 50 u bevx t exch 50 x 30 add cos mul bevy x -60 add cos mul add 50 x 30 add sin mul bevy x -60 add sin mul add 50 x 30 add cos mul 50 x 30 add sin mul curveto 50 x 30 add cos mul bevy x 120 add cos mul add 50 x 30 add sin mul bevy x 120 add sin mul add y 1 add 152 plr 50 s bevx r exch 50 t bevx u exch y 1 add 152 plr 50 s exch 50 t exch curveto}for closepath fill grestore gsave 270 216 translate .42 dup scale/bevx 24 def/bevy 14 def/q 72 def 0 1 4{dup/y exch def 120 plr 50 x 135 sub x 135 add arc y 120 plr 50 r bevx s exch 50 u bevx t exch 50 x 36 add cos mul bevy x -54 add cos mul add 50 x 36 add sin mul bevy x -54 add sin mul add 50 x 36 add cos mul 50 x 36 add sin mul curveto 50 x 36 add cos mul bevy x 126 add cos mul add 50 x 36 add sin mul bevy x 126 add sin mul add y 1 add 120 plr 50 s bevx r exch 50 t bevx u exch y 1 add 120 plr 50 s exch 50 t exch curveto}for closepath fill grestore/A{10 26 moveto 10 34 7 42 0 42 curveto -7 42 -10 34 -10 26 curveto -10 12 -4 2 0 2 curveto 4 2 10 12 10 26 curveto closepath fill}def gsave 100 75 translate 1.7 dup scale 15 rotate 6{gsave .95 1 scale A grestore 60 rotate}repeat 1 setgray 0 0 5.4 0 360 arc closepath fill grestore gsave 270 69 translate 1.75 dup scale 5{A 72 rotate}repeat 1 setgray 0 0 4 0 360 arc closepath fill grestore gsave 440 70 translate 1.75 dup scale 5{gsave 1.22 1 scale A grestore 72 rotate}repeat 1 setgray 0 0 6.2 0 360 arc closepath fill grestore showpage %EOF
Licensing
I, the copyright holder of this work, release this work into the public domain. This applies worldwide. In some countries this may not be legally possible; if so: I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law. |