Farbmischung

Mit den Schiebereglern können Sie jede RGB-Farbe einstellen.

©B.Spier,2014

Additive Farbmischung

Spiel starten

Auswertung

Ende

Mische die Farbe im mittleren Rechteck so,
dass der Kreis nicht mehr zu sehen ist!

A = (2, -2)
B = (2, -10)
C = (12, -10)
D = (12, -2)
Vieleck1, a, b_1, c, d = Polygon(A, B, C, D)
red = 235 (slider from 0 to 255, step 1)
green = 148 (slider from 0 to 255, step 1)
blue = 141 (slider from 0 to 255, step 1)
additiv = true
E = (12, 0)
F = (2, 0)
Vieleck2, a_1, d_1, e, f = Polygon(A, D, E, F)
G = (-2, -2)
H = (-2, -10)
Vieleck3, b, a_2, g, h = Polygon(B, A, G, H)
I = (14, -2)
J = (2, -12)
K = (14, -12)
Vieleck4, i, d_2, c_1, b_2, j, k = Polygon(I, D, C, B, J, K)
L = (20, 0)
M = (20, -12)
Vieleck5, l, e_1, d_3, i_1, k_1, m = Polygon(L, E, D, I, K, M)
N = (14, -16)
O = (-2, -16)
Vieleck6, n, k_2, j_1, b_3, h_1, o = Polygon(N, K, J, B, H, O)
P = (-6, -10)
Q = (12, 2)
R = (-6, 2)
Vieleck7, p, h_2, g_1, a_3, f_1, e_2, q, r = Polygon(P, H, G, A, F, E, Q, R)
Z255 = 0
Text1: "HTML-Farbcode: " + (LaTeX[If[additiv, (If[red  <  16, "0", ""] * ToBase[red, 16]), (If[red > 239, "0", ""] * ToBase[255 - red, 16])]]) + "" + (LaTeX[If[additiv, (If[green  <  16, "0", ""] * ToBase[green, 16]), (If[green > 239, "0", ""] * ToBase[255 - green, 16])]]) + "" + (LaTeX[If[additiv, (If[blue  <  16, "0", ""] * ToBase[blue, 16]), (If[blue > 239, "0", ""] * ToBase[255 - blue, 16])]]) + ""
Text4: "" + (If[additiv, "rot", "cyan"]) + ""
Text5: "" + (If[additiv, "grün", "magenta"]) + ""
Text6: "" + (If[additiv, "blau", "gelb"]) + ""
zufr = Random(0, 255)
gr: (g * r)
zufg = Random(0, 255)
zufb = Random(0, 255)
Bewertg: "Abweichung " + Text4 + ": " + (If[additiv, red - zufr, zufr - 255 + red]) + "
Abweichung " + Text5 + ": " + (If[additiv, green - zufg, zufg - 255 + green]) + "
Abweichung " + Text6 + ": " + (If[additiv, blue - zufb, zufb - 255 + blue]) + ""
Text3: "Schieberegler für " + (If[additiv, "Helligkeit", "Deckkraft"]) + ""
Text2: "Farbmischung: " + (If[additiv, "additiv (RGB)", "subtraktiv (CYM)"]) + ""
S = (7.236617339874406, -5.532668447164898)
kreis = Circle(S, 2)