Commands/Shapes/SVG.Kite.ps.ps1
|
function SVG.Kite { <# .SYNOPSIS Generates a Kite in SVG .DESCRIPTION Generates a Kite in SVG. A Kite is generated with a -Radius and an -InnerRadius and an -OuterRadius. .EXAMPLE SVG -ViewBox 2,2 ( SVG.Kite -Fill "#4488ff" ) -OutputPath .\Kite.svg .EXAMPLE SVG -ViewBox 200,200 ( SVG.Kite -Fill "#4488ff" -CenterX 100 -CenterY 100 -Radius 33 -InnerRadius 25 -OuterRadius 66 ) -OutputPath .\Ready-To-Fly-Kite.svg .EXAMPLE SVG -ViewBox 2,2 ( SVG.Kite -Fill "#4488ff" @( SVG.animate -AttributeName d -Values ( @( SVG.Kite -Rotate 0 SVG.Kite -Rotate 90 SVG.Kite -Rotate 180 SVG.Kite -Rotate 270 ).D -join ';' ) -AttributeType XML -Dur 2s -RepeatCount indefinite -CalcMode linear ) ) -OutputPath .\Kite-Morph.svg #> [Alias('SVG.Rhombi','SVG.Rhombuses')] [inherit('SVG.Path', Abstract,Dynamic, ExcludeParameter='D')] [CmdletBinding(PositionalBinding=$false)] param( # The initial rotation of the rhombus. [Parameter(ValueFromPipelineByPropertyName)] [Alias('Rotation')] [double] $Rotate = 0, # The center X coordinate for the kite. [Parameter(ValueFromPipelineByPropertyName)] [Alias('CX')] [double] $CenterX = 1, # The center Y coordinate for the kite. [Parameter(ValueFromPipelineByPropertyName)] [Alias('CY')] [double] $CenterY = 1, # The radius of the kite. # This is the distance to either constant side of the kite. [Parameter(ValueFromPipelineByPropertyName)] [Alias('R')] [double] $Radius = .5, # The inner radius of the kite. # This is the distance from the center of the kite to the top. [Parameter(ValueFromPipelineByPropertyName)] [Alias('IR','InRadius')] [double] $InnerRadius = 1, # The outer radius of the kite. # This is the distance from the center of the kite to the bottom. [Parameter(ValueFromPipelineByPropertyName)] [Alias('OR','OutRadius')] [double] $OuterRadius = .5 ) begin { } process { $pathData = @( # We want to start at the top $CurrentAngle = $Rotate - 90 # Top "M" $centerY + ($InnerRadius * [math]::round([math]::cos($CurrentAngle * [Math]::PI/180),15)) $centerX + ($InnerRadius * [math]::round([math]::sin($CurrentAngle * [Math]::PI/180),15)) # Right $CurrentAngle += 90 "L" $centerY + ($Radius * [math]::round([math]::cos($CurrentAngle * [Math]::PI/180),15)) $centerX + ($Radius * [math]::round([math]::sin($CurrentAngle * [Math]::PI/180),15)) # Bottom "L" $CurrentAngle += 90 $centerY + ($OuterRadius * [math]::round([math]::cos($CurrentAngle * [Math]::PI/180),15)) $centerX + ($OuterRadius * [math]::round([math]::sin($CurrentAngle * [Math]::PI/180),15)) # Left "L" $CurrentAngle += 90 $centerY + ($Radius * [math]::round([math]::cos($CurrentAngle * [Math]::PI/180),15)) $centerX + ($Radius * [math]::round([math]::sin($CurrentAngle * [Math]::PI/180),15)) # Close "Z" ) $myParams = [Ordered]@{} + $PSBoundParameters $myParams["D"] = $pathData -join ' ' $myParams.Remove('Rotate') $myParams.Remove('Radius') $myParams.Remove('InnerRadius') $myParams.Remove('OuterRadius') $myParams.Remove('CenterX') $myParams.Remove('CenterY') $myParams.Data = $myPSSVGData SVG.Path @myParams } } |