1 files changed, 26 insertions, 0 deletions
diff --git a/scheme/gen-scheme.fish b/scheme/gen-scheme.fish
new file mode 100755
index 0000000..d8e8158
--- /dev/null
+++ b/scheme/gen-scheme.fish
@@ -0,0 +1,26 @@
+#!/bin/fish
+
+function nl-echo
+    # Echo with newlines
+    for a in $argv
+        echo $a
+    end
+end
+
+. (dirname (status filename))/../util.fish
+
+set -l colour_names rosewater flamingo pink mauve red maroon peach yellow green teal sky sapphire blue lavender
+set -l layer_names text subtext1 subtext0 overlay2 overlay1 overlay0 surface2 surface1 surface0 base mantle crust
+
+test -f "$argv[1]" && set -l img "$argv[1]" || set -l img $CACHE/wallpaper/current
+set -l colours_raw (okolors (realpath $img) -k 15 -w 0 -l 70,90,75,65,40,35,30,25,20,15,10,8,6)
+set -l colours (string split ' ' $colours_raw[2])[2..]
+set -l layers (nl-echo $colours_raw | cut -f 1 -d ' ')[3..]
+
+for i in (seq 1 (count $colour_names))
+    echo "$colour_names[$i] $colours[$i]"
+end
+
+for i in (seq 1 (count $layer_names))
+    echo "$layer_names[$i] $layers[$i]"
+end