Hi,
ich hab da mal ne Frage: Ich wollte ein sanftes Einblenden von Schwarz zum eigentlichen Screen machen aber ich weis nicht wie man eine Transparenz für Schwarz macht.
Ich hab zwar ein bisschen gesucht aber nichts gefunden . Irgenwelche Tipps?
KeyKon
Schwarze Transparenz
- KeyKon
- Beiträge: 1412
- Registriert: 10.09.2004 20:51
- Computerausstattung: Laptop: i5 2,8 Ghz, 16GB DDR3 RAM, GeForce 555GT 2GB VRAM
PC: i7 4,3 Ghz, 32GB DDR3 RAM, GeForce 680 GTX 4GB VRAM
Win10 x64 Home/Prof
PB 5.30 (64bit) - Wohnort: Ansbach
- Kontaktdaten:
Hier ein beispiel:
So funktioniert es nicht=
und so schon=
Frage: Hab ichs falsch gemacht, Ist mein PC nicht geeignet oder liegts an PB?
KeyKon
So funktioniert es nicht=
Code: Alles auswählen
InitSprite()
InitKeyboard()
RGB=100
OpenScreen(1024,768,16,"Test")
ChangeGamma(0,0,0,1)
Repeat
ExamineKeyboard()
ClearScreen(0,0,0)
StartDrawing(ScreenOutput())
FrontColor(255,255,0)
Box(0,0,123,123)
DrawingMode(1)
FrontColor(255,0,0)
Locate(5,5)
DrawText("RGB: "+Str(RGB))
StopDrawing()
ChangeGamma(RGB,RGB,RGB,0)
If Timer = 100
RGB=255
EndIf
Timer+1
FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape)
End
Code: Alles auswählen
InitSprite()
InitKeyboard()
OpenScreen(1024,768,16,"Test")
ChangeGamma(0,0,0,1)
Repeat
ExamineKeyboard()
ClearScreen(0,0,0)
StartDrawing(ScreenOutput())
FrontColor(255,255,0)
Box(0,0,123,123)
DrawingMode(1)
FrontColor(255,0,0)
Locate(5,5)
DrawText("RGB: "+Str(RGB))
StopDrawing()
ChangeGamma(RGB,RGB,RGB,0)
If RGB <> 255
RGB+1
EndIf
FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape)
End
Frage: Hab ichs falsch gemacht, Ist mein PC nicht geeignet oder liegts an PB?
KeyKon
-
- Beiträge: 6267
- Registriert: 29.08.2004 08:37
- Computerausstattung: Hoffentlich bald keine mehr
- Kontaktdaten:
Warum setzt du den RGB Wert gleich von 100 auf 255? Da hat man ja garkeinen Flüssigen Übergang. Versuchs so:
Code: Alles auswählen
InitSprite()
InitKeyboard()
RGB=100
OpenScreen(1024,768,16,"Test")
ChangeGamma(0,0,0,1)
Repeat
ExamineKeyboard()
ClearScreen(0,0,0)
StartDrawing(ScreenOutput())
FrontColor(255,255,0)
Box(0,0,123,123)
DrawingMode(1)
FrontColor(255,0,0)
Locate(5,5)
DrawText("RGB: "+Str(RGB))
StopDrawing()
ChangeGamma(RGB,RGB,RGB,0)
If Timer >= 5 And RGB < 255
RGB+1
EndIf
Timer+1
FlipBuffers()
Until KeyboardPushed(#PB_Key_Escape)
End
Angenommen es gäbe einen Algorithmus mit imaginärer Laufzeit O(i * n), dann gilt O((i * n)^2) = O(-1 * n^2) d.h. wenn man diesen Algorithmus verschachtelt ist er fertig, bevor er angefangen hat.