Mein Forum

[Kaeru Gaman]

Um mal etwas Farbe ins Feuer zu gießen...

bei dem blauen smilie sind folgende Farbwerte verwendet worden:
Red, Grn, Blu:
107, 115, 206
115, 115, 214
115, 123, 214
123, 123, 222
123, 132, 222
132, 132, 231
132, 140, 239
140, 140, 239
148, 148, 247
wie man deutlich sieht, ist der rotkanal jedesmal maximal so groß wie der grünkanal.
damit ist es eindeutig nicht Lila, denn dafür müsste der rotanteil den grünanteil überwiegen.

bei Stargates Forum kommt dieses "Pastellblau" ebenfalls vor:
die Balken haben einen Farbverlauf, bei dem der rot und grünanteil jeweils exakt gleich ist.

aber:
diese balken sind in kontrast gesetzt zu dem hintergrund, der in einem Pastellcyan gehalten ist.
bei dem hintergrund ist der rotkanal nur 2/3 so weit ausgesteuert wie der grünkanal.
damit ist beim pastellblau der rotanteil höher, und das läßt es dem auge "lila" erscheinen, obwohl es das nicht ist.

aber:
wirkliches Lila befindet sich im Spektrum zwischen Blau und Purpur.
hier mal das übergangsspektrum: (0,0,255)-(255,0,255)

[ts-soft]

@Kaeru Gaman
Ich glaube Du redest von Lila, ich sprach von Lilla

[STARGÅTE]

Hier ... damit ihr in meinem Forum angucken könnt, dass das alles Blau ist !

Code: Alles auswählen

Global Mem.l 
Mem = AllocateMemory(1, 1024)
Procedure.l DesktopOutput() 
  PokeL(Mem, 1) : ProcedureReturn Mem 
EndProcedure 
M.POINT
Dim F(80, 16)
Repeat
 GetCursorPos_(M.POINT)
 StartDrawing(DesktopOutput())
  P = Point(M\x,M\y)
  F$ = Str(Red(P))+","+Str(Green(P))+","+Str(Blue(P))
  For x = 0 To 80
   For y = 0 To 16
    F(x,y) = Point(M\x+10+x,M\y+10+y)
   Next y
  Next x
  DrawingMode(1)
   Box(M\x+10, M\y+10,80,16)
   FrontColor(255,255,255)
   Locate(M\x+10, M\y+10):DrawText(F$)
 StopDrawing()
 Delay(50)
 StartDrawing(DesktopOutput())
  DrawingMode(1)
  For x = 0 To 80
   For y = 0 To 16
    Plot(M\x+10+x,M\y+10+y,F(x,y))
   Next y
  Next x
 StopDrawing()
ForEver

[Tafkadasom2k5]

Keine Sorge: Wer sich nicht registrieren will, kann es lassen

DER war mal geil