biosphere2/scripts/gallery.sk

242 lines
10 KiB
Plaintext
Executable File

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 /color-circles:
trigger:
set {_circle::*} to circle with radius 1 and density 5
set {_line::*} to vector line from vector 0, 2, 0 to vector 0, 0, 0 with density 4
loop {_line::*}:
set {_hue} to random number between 0 and 360
set {_locs::*} to player offset by loop-value offset by {_circle::*}
rainbow({_hue}, {_locs::*})
wait 1 tick
set gamemode of player to spectator
wait 2 seconds
set gamemode of player to creative
command /line-circle:
trigger:
set {_circle::*} to circle with radius 5 and density 1
set {_bigcircle::*} to {_circle::*} scaled by 1.5
loop size of {_circle::*} times:
add vector line from {_circle::%loop-number%} to {_bigcircle::%loop-number%} with density 5 to {_lines::*}
show happy villager at location 8 in front of player offset by {_lines::*}
command /line-circle-2:
trigger:
set {_circle::*} to circle with radius 2.5 and density 2
set {_bigcircle::*} to {_circle::*} scaled by 3
set {_size} to size of {_circle::*}
loop {_size} times:
add vector line from {_circle::%loop-number%} to {_bigcircle::%loop-number%} with density 5 to {_lines::%loop-number%::*}
set {run} to true
while {run} is true:
set {_hue} to 50
loop {_size} times:
set {_locs::*} to location 8 in front of player offset by {_lines::%loop-number%::*}
add 10 to {_hue}
rainbow({_hue}, {_locs::*})
if {run} is true:
wait 1 tick
else:
stop trigger
command /line-vortex:
trigger:
set {_circle::*} to circle with radius 3 and density 2
add {_circle::*} to {_circle::*}
set {_bigcircle::*} to {_circle::*} scaled by 2
loop size of {_circle::*} / 2 times:
add vector line from {_circle::%loop-number%} to {_bigcircle::%loop-number + 7%} with density 5 to {_lines::*}
show happy villager at location 8 in front of player offset by {_lines::*}
command /line-vortex-2:
trigger:
set {_circle::*} to circle with radius 3 and density 2
add {_circle::*} to {_circle::*}
set {_bigcircle::*} to {_circle::*} scaled by 2
set {_smallcircle::*} to {_circle::*} scaled by 0.5
loop size of {_circle::*} / 2 times:
add vector line from {_circle::%loop-number%} to {_bigcircle::%loop-number + 7%} with density 5 to {_lines::*}
add vector line from {_circle::%loop-number%} to {_smallcircle::%loop-number + 7%} with density 5 to {_lines::*}
show happy villager at location 8 in front of player offset by {_lines::*}
command /miniblock-halo <integer>:
trigger:
set {_size} to ceil(100/arg 1) * arg 1
set {_circle::*} to polygon with {_size} points and radius 0.6
add {_circle::*} to {_circle::*}
set {_armorstandoffset} to vector 0.3, 1.5, -0.2
set {_loc} to player offset by {_circle::1}
set {_x} to x-coordinate of {_loc}
set {_y} to y-coordinate of {_loc}
set {_z} to z-coordinate of {_loc}
loop arg-1 times:
execute command "/summon armor_stand %{_x}% %{_y}% %{_z}% {Invisible:1b,Small:1b,Invulnerable:1b,NoBasePlate:1b,NoGravity:1b,Marker:1b,ArmorItems:[{},{},{},{}],HandItems:[{id:red_glazed_terracotta,Count:1b},{}],CustomName:biosphere2-%loop-number%}"
set {_numadd} to {_size} / arg 1
set {run} to true
while {run} is true:
loop arg-1 times:
set {_num::%loop-number-1%} to (loop-number-1 - 1) * {_numadd}
loop {_size} times:
loop arg-1 times:
add 1 to {_num::%loop-number-2%}
set {_loc} to player offset by {_armorstandoffset} offset by {_circle::%{_num::%loop-number-2%}%}
set {_x} to x-coordinate of {_loc}
set {_y} to y-coordinate of {_loc}
set {_z} to z-coordinate of {_loc}
execute command "/tp @e[name=biosphere2-%loop-number-2%] %{_x}% %{_y}% %{_z}%"
if {run} is true:
wait 1 tick
else:
stop trigger
command /rainbow-halo:
trigger:
set {_circle::*} to circle with radius 0.75 and density 5
set {_hue} to 0
set {run} to true
while {run} is true:
loop {_circle::*}:
set {_loc} to location 2 above player offset by loop-value in frame of player
rainbow({_hue}, {_loc})
add 5 to {_hue}
if {_hue} > 360:
set {_hue} to {_hue} - 360
if {run} is true:
wait 2 ticks
else:
stop trigger
command /rainbow-yaw-helix:
trigger:
set {_helix::*} to helix with radius 1, height 2, step 0.25 and density 10
set {_hue} to 0
set {run} to true
while {run} is true:
loop {_helix::*}:
set {_loc} to player offset by loop-value
set {_yaw} to yaw of player
rainbow({_yaw}, {_loc}) # Shows a colored particle at {_loc}
if {run} is true:
wait 1 tick
else:
stop trigger
function rainbow_lines(p: player):
set {_yaw} to random number from 0 to 360
set {_startheight} to random number from -0.5 to 1.5
set {_endheight} to {_startheight} + random number from 1 to 2
set {_hue} to random number from 0 to 360
set {_start} to cylindrical vector with radius 0.75, yaw {_yaw} and height {_startheight}
set {_end} to cylindrical vector with radius 0.75, yaw {_yaw} and height {_endheight}
set {_line::*} to vector line from {_start} to {_end} with density 5
loop {_line::*}:
set {_loc} to {_p} offset by loop-value
rainbow({_hue}, {_loc}) # Shows a colored particle at {_loc}
if {run} is true:
wait 1 tick
else:
stop loop
command /rainbow-lines:
trigger:
set {_line::*} to vector line from vector 0, 0, 0 to vector 0, 1, 0 with density 5
set {_size} to size of {_line::*}
set {run} to true
while {run} is true:
chance of 50%:
rainbow_lines(player) # Shows a colored particle line at {_loc}
wait 5 ticks
command /star <integer=5>:
trigger:
set {_poly::*} to polygon with arg-1 points and radius 5
add {_poly::*} to {_poly::*} # This allows me to use loop-number + 2 without exceeding the list size in the loop
loop arg-1 times:
add vector line from {_poly::%loop-number%} to {_poly::%loop-number + 2%} with density 5 to {_star::*}
show happy villager at location 5 in front of player offset by {_star::*}
command /star-2 <integer=5>:
trigger:
set {_poly::*} to polygon with arg-1 points and radius 5
add {_poly::*} to {_poly::*} # This allows me to use loop-number + 2 without exceeding the list size in the loop
loop arg-1 times:
add vector line from {_poly::%loop-number%} to {_poly::%loop-number + 2%} with density 5 to {_star::*}
add vector line from {_poly::%loop-number%} to {_poly::%loop-number + 4%} with density 5 to {_star::*}
show happy villager at location 5 in front of player offset by {_star::*}
command /star-player <integer=7>:
trigger:
set {_poly::*} to polygon with arg-1 points and radius 5
add {_poly::*} to {_poly::*} # This allows me to use loop-number + 2 without exceeding the list size in the loop
loop arg-1 times:
add vector line from {_poly::%loop-number%} to {_poly::%loop-number + 2%} with density 5 to {_star::*}
set {_star::*} to {_star::*} rotated around z-axis by -90
show happy villager at location 7 in front of player's head offset by {_star::*} in frame of player
command /stopeffect:
trigger:
clear {run}
execute command "/kill @e[name=biosphere2]"
loop 30 times:
execute command "/kill @e[name=biosphere2-%loop-number%]"