From 86df9ae6d9cc7baa7174faac1f24f3e346accd13 Mon Sep 17 00:00:00 2001
From: Thomas White <taw@physics.org>
Date: Sat, 30 May 2020 09:08:52 +0200
Subject: Fixture definition and scanout

---
 guile/nanolight/fixture-library/generic.scm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'guile/nanolight/fixture-library/generic.scm')

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))))))
-- 
cgit v1.2.3