diff options
| author | Thomas White <taw@physics.org> | 2020-05-30 09:08:52 +0200 |
|---|---|---|
| committer | Thomas White <taw@physics.org> | 2020-05-30 09:08:52 +0200 |
| commit | 86df9ae6d9cc7baa7174faac1f24f3e346accd13 (patch) | |
| tree | d2de5dbde6d52ec28165201a830e8bebf3f76c2c /guile/nanolight/fixture-library/generic.scm | |
| parent | ed9dadd2536edd84604801af816a622205a48e72 (diff) | |
Fixture definition and scanout
Diffstat (limited to 'guile/nanolight/fixture-library/generic.scm')
| -rw-r--r-- | guile/nanolight/fixture-library/generic.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guile/nanolight/fixture-library/generic.scm b/guile/nanolight/fixture-library/generic.scm index b593004..2117e75 100644 --- a/guile/nanolight/fixture-library/generic.scm +++ b/guile/nanolight/fixture-library/generic.scm @@ -6,4 +6,8 @@ (define (generic-dimmer) (list - (make <fixture-attribute> #:name 'intensity #:offset 0))) + (make <fixture-attribute> #:name 'intensity + #:range '(0 100) #:type 'continuous #:home-value 0 + #:translator (lambda (universe start-addr value set-dmx) + (set-dmx universe start-addr 1 + (percent->dmxval value)))))) |