summaryrefslogtreecommitdiff
path: root/src/wasp-model.el
diff options
context:
space:
mode:
Diffstat (limited to 'src/wasp-model.el')
-rw-r--r--src/wasp-model.el13
1 files changed, 13 insertions, 0 deletions
diff --git a/src/wasp-model.el b/src/wasp-model.el
index 521b3686..321f7dae 100644
--- a/src/wasp-model.el
+++ b/src/wasp-model.el
@@ -47,6 +47,9 @@
(w/pub '(avatar reset))
;; (w/model-region-color "eyes" (color-values "gold"))
;; (w/model-region-word "eyes" "GOLDEN")
+ ;; (w/model-region-video "hair" "https://www.twitch.tv/kamijoan")
+ ;; (w/model-region-video "hair" "https://www.twitch.tv/kiwidancing")
+ (w/model-region-video "hair" "https://www.youtube.com/watch?v=FtutLA63Cp8")
)
(defun w/model-toggle (toggle)
@@ -54,6 +57,16 @@
(w/model-record-change)
(w/pub '(avatar toggle) (list toggle)))
+(defun w/model-toggle-set (toggle)
+ "Set TOGGLE on model."
+ (w/model-record-change)
+ (w/pub '(avatar toggle set) (list toggle)))
+
+(defun w/model-toggle-unset (toggle)
+ "Unset TOGGLE on model."
+ (w/model-record-change)
+ (w/pub '(avatar toggle unset) (list toggle)))
+
(defun w/model-background-text (msg)
"Change the background text of the model to MSG."
(let* ((cleanmsg (s-trim (w/clean-string msg)))