diff options
| author | Thomas White <taw@physics.org> | 2023-04-11 22:17:21 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2023-04-11 22:17:21 +0200 |
| commit | 18e580dbc151691fd677dff7878e292d426c9b42 (patch) | |
| tree | 0e90f16d14ab2c212e2cc7d475a591f6ac89e497 | |
| parent | 5260b83022afbe7b0c4a37f429ee2f27b194ebf4 (diff) | |
Add lots of default attribute names
| -rw-r--r-- | guile/starlet/attributes.scm | 26 |
1 files changed, 16 insertions, 10 deletions
diff --git a/guile/starlet/attributes.scm b/guile/starlet/attributes.scm index e4f5242..6caae96 100644 --- a/guile/starlet/attributes.scm +++ b/guile/starlet/attributes.scm @@ -1,7 +1,7 @@ ;; ;; starlet/attributes.scm ;; -;; Copyright © 2022 Thomas White <taw@bitwiz.org.uk> +;; Copyright © 2022-2023 Thomas White <taw@bitwiz.org.uk> ;; ;; This file is part of Starlet. ;; @@ -66,17 +66,23 @@ (define-attribute strobe "Strobe active (boolean)") (define-attribute strobe-frequency "Strobe rate (Hz)") (define-attribute pan "Moving head pan angle (degrees +/- from home)") -(define-attribute tilt "Moving head tilt angle (degrees +/- from home) ") +(define-attribute tilt "Moving head tilt angle (degrees +/- from home)") (define-attribute prism "Prism active (boolean)") -(define-attribute frost "Frost active (boolean)") +(define-attribute prism-rotation-speed "Prism rotation speed (+/- percentage of fastest, clockwise)") +(define-attribute frost "Frost active (percentage of maximum frost)") (define-attribute hotspot "Hot spot (percentage of maximum peakiness)") -(define-attribute iris "Iris (percentage of maximum tightness)") -(define-attribute zoom "Zoom (percentage of tightest zoom) ") -(define-attribute barndoor-rotation "Barndoor rotation angle") -(define-attribute barndoor1 "Barndoor 1 position") -(define-attribute barndoor2 "Barndoor 2 position") -(define-attribute barndoor3 "Barndoor 3 position") -(define-attribute barndoor4 "Barndoor 4 position") +(define-attribute iris "Iris (percentage of maximum tightness (perhaps completely closed)") +(define-attribute zoom "Zoom (percentage of tightest zoom)") +(define-attribute focus "Focus (percentage of nearest focus)") +(define-attribute barndoor-all-rotation "Rotation of all barndoors together (degrees +/- from home)") +(define-attribute barndoor1 "Barndoor 1 position (percentage of fully in position)") +(define-attribute barndoor2 "Barndoor 2 position (percentage of fully in position)") +(define-attribute barndoor3 "Barndoor 3 position (percentage of fully in position)") +(define-attribute barndoor4 "Barndoor 4 position (percentage of fully in position)") +(define-attribute barndoor1-rotation "Barndoor 1 rotation (degrees +/- from home)") +(define-attribute barndoor2-rotation "Barndoor 2 rotation (degrees +/- from home)") +(define-attribute barndoor3-rotation "Barndoor 3 rotation (degrees +/- from home)") +(define-attribute barndoor4-rotation "Barndoor 4 rotation (degrees +/- from home)") (define-attribute beamtype "Beam type") (define-attribute colwheel "Colour wheel selection (#f or gel name)") (define-attribute gobo "Gobo selection (#f or gobo name)") |