diff options
| author | LLLL Colonq <llll@colonq> | 2025-01-31 22:53:45 -0500 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2025-01-31 22:53:45 -0500 |
| commit | b7e63b11a0f34fb465c11736d91233b3c49028a5 (patch) | |
| tree | fc5ce99516cbed6d41b4293419222a1e277ef0cb /src/wasp-model.el | |
| parent | d293e0a48427a224e4d3c4c4099b604d59ccabcf (diff) | |
big guy
Diffstat (limited to 'src/wasp-model.el')
| -rw-r--r-- | src/wasp-model.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/wasp-model.el b/src/wasp-model.el index 02bd64cb..521b3686 100644 --- a/src/wasp-model.el +++ b/src/wasp-model.el @@ -12,6 +12,14 @@ (require 'wasp-twitch) (require 'wasp-user) +(defun w/model-frame-test () + "Submit a test frame for the new model." + (let ((data + (seq-mapcat #'byte-to-string (apply #'seq-concatenate 'list (seq-into (caddr (u/load-image-png "/home/llll/mrgreenbig.png")) 'list)) 'string) + ;; (seq-mapcat #'byte-to-string (--mapcat (list 0 255 0) (-iota (* 64 64))) 'string) + )) + (w/pub '(avatar frame) (list (base64-encode-string data t))))) + (defun w/color-value-to-html-code (cval) "Convert color value CVAL to an HTML color code." (and |