diff options
-rw-r--r-- | guile/starlet/base.scm | 68 |
1 files changed, 37 insertions, 31 deletions
diff --git a/guile/starlet/base.scm b/guile/starlet/base.scm index efb2c64..cbe4d66 100644 --- a/guile/starlet/base.scm +++ b/guile/starlet/base.scm @@ -10,51 +10,57 @@ #:use-module (srfi srfi-1) #:use-module (srfi srfi-9) #:export (<fixture> + patch-fixture! + get-attributes + get-fixture-name + find-attr + fixture? + scanout-fixture + <fixture-attribute> + attr-continuous + attr-boolean + attr-list + get-attr-type + get-attr-range + get-attr-name + fixture-attribute? + intensity? + home-val + <starlet-state> - start-ola-output - patch-fixture! - scanout-freq make-empty-state register-state! - percent->dmxval8 - percent->dmxval16 - scale-to-range - hirestime state-for-each state-map - get-attributes - set-attr! - get-attr-name - value->number - merge-states-htp get-state-hash-table set-state-hash-table! add-state-to-state! - scanout-fixture - attr-continuous - attr-boolean - attr-list + clear-state! + print-state + set-attr! + state-find + merge-states-htp current-state - lighting-state - apply-state at + apply-state + lighting-state blackout - clear-state! - home-val - intensity? - state-find - get-attr-type - get-attr-range - find-attr - fixture? - fixture-attribute? - get-fixture-name - selection-hook - sel + + start-ola-output + scanout-freq + percent->dmxval8 + percent->dmxval16 + hirestime + value->number + programmer-state + sel current-value - print-state)) + selection-hook + + scale-to-range)) + (define-class <fixture-attribute> (<object>) (name |