From 10ce8a6da6d41c590dde82c491b4534d108c9bfa Mon Sep 17 00:00:00 2001
From: bi0qaw <bi0qaw@gmail.com>
Date: Sun, 26 Nov 2017 01:22:42 +0100
Subject: [PATCH] Update gallery.sk

---
 scripts/gallery.sk | 60 ++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 60 insertions(+)

diff --git a/scripts/gallery.sk b/scripts/gallery.sk
index d40e8ed..3014fb0 100644
--- a/scripts/gallery.sk
+++ b/scripts/gallery.sk
@@ -1,3 +1,63 @@
+function hsvtorgb(col: text, h: number, sat: number, val: number) :: number:
+    set {_h} to mod({_h}, 360)
+    if {_sat} > 1:
+        set {_sat} to 1
+    else if {_sat} < 0:
+        set {_sat} to 0
+    if {_val} > 1:
+        set {_val} to 1
+    else if {_val} < 0:
+        set {_val} to 0
+    set {_c} to {_val} * {_sat}
+    set {_hh} to {_h}/60
+    set {_t} to mod({_hh}, 2) - 1
+    set {_x} to {_c} * (1 - abs({_t}))
+    set {_m} to {_v} - {_c}
+    set {_ret} to {_m}
+    if {_col} is "red" or "r":
+        if {_hh} < 1:
+            add {_c} to {_ret}
+        else if {_hh} < 2:
+            add {_x} to {_ret}
+        else if {_hh} < 4:
+            set {_ret} to {_ret}
+        else if {_hh} < 5:
+            add {_x} to {_ret}
+        else if {_hh} < 6:
+            add {_c} to {_ret}
+    else if {_col} is "green" or "g":
+        if {_hh} < 1:
+            add {_x} to {_ret}
+        else if {_hh} < 2:
+            add {_c} to {_ret}
+        else if {_hh} < 3:
+            add {_c} to {_ret}
+        else if {_hh} < 4:
+            add {_x} to {_ret}
+    else if {_col} is "blue" or "b":
+        if {_hh} < 2:
+            set {_ret} to {_ret}
+        else if {_hh} < 3:
+            add {_x} to {_ret}
+        else if {_hh} < 5:
+            add {_c} to {_ret}
+        else if {_hh} < 6:
+            add {_x} to {_ret}
+    return 0-{_ret}
+
+function rgb(r: number, g: number, b: number, locs: locations):
+    loop {_locs::*}:
+        set {_x} to x-coordinate of loop-value
+        set {_y} to y-coordinate of loop-value
+        set {_z} to z-coordinate of loop-value
+        execute command "/particle reddust %{_x}% %{_y}% %{_z}% %{_r}% %{_g}% %{_b}% 1"
+
+function rainbow(h: number, locs: locations):
+    set {_r} to hsvtorgb("r", {_h}, 1, 1)
+    set {_g} to hsvtorgb("g", {_h}, 1, 1)
+    set {_b} to hsvtorgb("b", {_h}, 1, 1)
+    rgb({_r}, {_g}, {_b}, {_locs::*})
+
 command /rainbow-halo:
     trigger:
         set {_circle::*} to circle with radius 0.75 and density 5