Beehive.

pattern_beehive.gd

@@ -0,0 +1,284 @@
+tool
+extends TextureRect
+
+var image : Image
+var tex : ImageTexture
+
+export(Vector2) var bmin : Vector2 = Vector2(0.1, 0.1)
+export(Vector2) var bmax : Vector2 = Vector2(1, 1)
+
+export(bool) var refresh setget reff,reffg
+
+func _ready():
+	if !Engine.editor_hint:
+		gen()
+
+
+func gen() -> void:
+	if !image:
+		image = Image.new()
+		image.create(300, 300, false, Image.FORMAT_RGBA8)
+		
+	if !tex:
+		tex = ImageTexture.new()
+		
+#	var bmin : Vector2 = Vector2(0.1, 0.1)
+#	var bmax : Vector2 = Vector2(1, 1)
+
+	image.lock()
+	
+	var w : float = image.get_width()
+	var h : float = image.get_width()
+	
+	var pseed : float = randf() + randi()
+	
+	for x in range(image.get_width()):
+		for y in range(image.get_height()):
+			var v : Vector2 = Vector2(x / w, y / h)
+
+#			var f : float = pattern(v, 4, 4, CombinerType.MULTIPLY, CombinerAxisType.SINE, CombinerAxisType.SINE)
+
+			var col : Color = beehive_1_col(v)
+#			var col : Color = beehive_2_col(v)
+#			var col : Color = beehive_3_col(v)
+
+			image.set_pixel(x, y, col)
+
+			
+	image.unlock()
+	
+	tex.create_from_image(image)
+	texture = tex
+
+var seed_o80035 = 15184;
+var p_o80035_sx = 4.000000000;
+var p_o80035_sy = 4.000000000;
+
+func beehive_1_col(uv : Vector2) -> Color:
+	var o80035_0_uv : Vector2 = ((uv)) * Vector2(p_o80035_sx, p_o80035_sy * 1.73205080757);
+	var center : Color = beehive_center(o80035_0_uv);
+	
+	var f : float = 1.0 - 2.0 * beehive_dist(Vector2(center.r, center.g));
+	
+	return Color(f, f, f, 1)
+	
+func beehive_2_col(uv : Vector2) -> Color:
+	var o80035_0_uv : Vector2 = ((uv)) * Vector2(p_o80035_sx, p_o80035_sy * 1.73205080757);
+	var center : Color = beehive_center(o80035_0_uv);
+	
+	var f : float = 1.0 - 2.0 * beehive_dist(Vector2(center.r, center.g));
+	
+	var v : Vector3 = rand3(fractv2(Vector2(center.b, center.a) / Vector2(p_o80035_sx, p_o80035_sy)) + Vector2(float(seed_o80035),float(seed_o80035)));
+	
+	return Color(v.x, v.y, v.z, 1)
+
+func beehive_3_col(uv : Vector2) -> Color:
+	var o80035_0_uv : Vector2 = ((uv)) * Vector2(p_o80035_sx, p_o80035_sy * 1.73205080757);
+	var center : Color = beehive_center(o80035_0_uv);
+	
+	#var f : float = 1.0 - 2.0 * beehive_dist(Vector2(center.r, center.g));
+	
+	var v1 : Vector2 = Vector2(0.5, 0.5) + Vector2(center.r, center.g)
+	var ff : float = rand(fractv2(Vector2(center.b, center.a) / Vector2(p_o80035_sx, p_o80035_sy)) + Vector2(float(seed_o80035), float(seed_o80035)))
+	
+	var c : Color = Color(v1.x, v1.y, ff, ff);
+	
+	return c
+
+
+func beehive_dist(p : Vector2) -> float:
+	var s : Vector2 = Vector2(1.0, 1.73205080757);
+	
+	p = absv2(p);
+	
+	return max(p.dot(s*.5), p.x);
+
+func beehive_center(p : Vector2) -> Color:
+	var s : Vector2 = Vector2(1.0, 1.73205080757);
+	
+	var hC : Color = Color(p.x, p.y, p.x - 0.5, p.y - 1) / Color(s.x, s.y, s.x, s.y);
+	
+	hC = floorc(Color(p.x, p.y, p.x - 0.5, p.y - 1) / Color(s.x, s.y, s.x, s.y)) + Color(0.5, 0.5, 0.5, 0.5);
+	
+	var v1 : Vector2 = Vector2(p.x - hC.r * s.x, p.y - hC.g * s.y)
+	var v2 : Vector2 = Vector2(p.x - (hC.b + 0.5) * s.x, p.y - (hC.a + 0.5) * s.y)
+	
+	var h : Color = Color(v1.x, v1.y, v2.x, v2.y);
+	
+	if Vector2(h.r, h.g).dot(Vector2(h.r, h.g)) < Vector2(h.b, h.a).dot(Vector2(h.b, h.a)):
+		return Color(h.r, h.g, hC.r, hC.g) 
+	else:
+		return Color(h.b, h.a, hC.b + 9.73, hC.a + 9.73)
+	
+	#return dot(h.xy, h.xy) < dot(h.zw, h.zw) ? Color(h.xy, hC.xy) : Color(h.zw, hC.zw + 9.73);
+
+
+func clampv3(v : Vector3, mi : Vector3, ma : Vector3) -> Vector3:
+	v.x = clamp(v.x, mi.x, ma.x)
+	v.y = clamp(v.y, mi.y, ma.y)
+	v.y = clamp(v.z, mi.z, ma.z)
+	
+	return v
+
+func floorc(a : Color) -> Color:
+	var v : Color = Color()
+	
+	v.r = floor(a.r)
+	v.g = floor(a.g)
+	v.b = floor(a.b)
+	v.a = floor(a.a)
+	
+	return v
+
+
+func floorv2(a : Vector2) -> Vector2:
+	var v : Vector2 = Vector2()
+	
+	v.x = floor(a.x)
+	v.y = floor(a.y)
+	
+	return v
+
+func maxv2(a : Vector2, b : Vector2) -> Vector2:
+	var v : Vector2 = Vector2()
+	
+	v.x = max(a.x, b.x)
+	v.y = max(a.y, b.y)
+	
+	return v
+
+func maxv3(a : Vector3, b : Vector3) -> Vector3:
+	var v : Vector3 = Vector3()
+	
+	v.x = max(a.x, b.x)
+	v.y = max(a.y, b.y)
+	v.z = max(a.z, b.z)
+	
+	return v
+
+func absv2(v : Vector2) -> Vector2:
+	v.x = abs(v.x)
+	v.y = abs(v.y)
+	
+	return v
+	
+func absv3(v : Vector3) -> Vector3:
+	v.x = abs(v.x)
+	v.y = abs(v.y)
+	v.y = abs(v.y)
+	
+	return v
+
+func cosv2(v : Vector2) -> Vector2:
+	v.x = cos(v.x)
+	v.y = cos(v.y)
+	
+	return v
+
+func cosv3(v : Vector3) -> Vector3:
+	v.x = cos(v.x)
+	v.y = cos(v.y)
+	v.y = cos(v.y)
+	
+	return v
+
+func modv3(a : Vector3, b : Vector3) -> Vector3:
+	var v : Vector3 = Vector3()
+	
+	v.x = modf(a.x, b.x)
+	v.y = modf(a.y, b.y)
+	v.z = modf(a.z, b.z)
+	
+	return v
+	
+	
+func modv2(a : Vector2, b : Vector2) -> Vector2:
+	var v : Vector2 = Vector2()
+	
+	v.x = modf(a.x, b.x)
+	v.y = modf(a.y, b.y)
+
+	return v
+
+func modf(x : float, y : float) -> float:
+	return x - y * floor(x / y)
+
+func fractv2(v : Vector2) -> Vector2:
+	v.x = v.x - floor(v.x)
+	v.y = v.y - floor(v.y)
+	
+	return v
+	
+func fractv3(v : Vector3) -> Vector3:
+	v.x = v.x - floor(v.x)
+	v.y = v.y - floor(v.y)
+	v.z = v.z - floor(v.z)
+	
+	return v
+	
+func fract(f : float) -> float:
+	return f - floor(f)
+
+func rand(x : Vector2) -> float:
+	return fract(cos(x.dot(Vector2(13.9898, 8.141))) * 43758.5453);
+
+func rand2(x : Vector2) -> Vector2:
+	return fractv2(cosv2(Vector2(x.dot(Vector2(13.9898, 8.141)),
+						  x.dot(Vector2(3.4562, 17.398)))) * 43758.5453);
+
+func rand3(x : Vector2) -> Vector3:
+	return fractv3(cosv3(Vector3(x.dot(Vector2(13.9898, 8.141)),
+						  x.dot(Vector2(3.4562, 17.398)),
+						  x.dot(Vector2(13.254, 5.867)))) * 43758.5453);
+
+func step(edge : float, x : float) -> float:
+	if x < edge:
+		return 0.0
+	else:
+		return 1.0
+
+
+#common -----
+
+#float rand(vec2 x) {
+#    return fract(cos(dot(x, vec2(13.9898, 8.141))) * 43758.5453);
+#}
+#
+#vec2 rand2(vec2 x) {
+#    return fract(cos(vec2(dot(x, vec2(13.9898, 8.141)),
+#						  dot(x, vec2(3.4562, 17.398)))) * 43758.5453);
+#}
+#
+#vec3 rand3(vec2 x) {
+#    return fract(cos(vec3(dot(x, vec2(13.9898, 8.141)),
+#                          dot(x, vec2(3.4562, 17.398)),
+#                          dot(x, vec2(13.254, 5.867)))) * 43758.5453);
+#}
+#
+#vec3 rgb2hsv(vec3 c) {
+#	vec4 K = vec4(0.0, -1.0 / 3.0, 2.0 / 3.0, -1.0);
+#	vec4 p = c.g < c.b ? vec4(c.bg, K.wz) : vec4(c.gb, K.xy);
+#	vec4 q = c.r < p.x ? vec4(p.xyw, c.r) : vec4(c.r, p.yzx);
+#
+#	float d = q.x - min(q.w, q.y);
+#	float e = 1.0e-10;
+#	return vec3(abs(q.z + (q.w - q.y) / (6.0 * d + e)), d / (q.x + e), q.x);
+#}
+#
+#vec3 hsv2rgb(vec3 c) {
+#	vec4 K = vec4(1.0, 2.0 / 3.0, 1.0 / 3.0, 3.0);
+#	vec3 p = abs(fract(c.xxx + K.xyz) * 6.0 - K.www);
+#	return c.z * mix(K.xxx, clamp(p - K.xxx, 0.0, 1.0), c.y);
+#}
+
+
+#end common
+
+
+func reffg():
+	return false
+
+func reff(bb):
+	if bb:
+		gen()
+