| Lustige Farbverläufe von ??? |
| Spielt einfach mal ein wenig mit den Startwerten und Inkrement/Dekremnet Werten rum. Kommen hübsche Bilder bei heraus [code:1:b0ac83e0e5] Graphics 800,600,32,2 SetBuffer BackBuffer() Global RStart = 0 Global GStart = 0 Global BStart = 255 Global R = 0 Global G = 0 Global B = 0 For Y=0 To 255*3 Step 1 R = RStart G = GStart B = BStart For X=0 To 255 ; Von rechts nach links Color R,G,B Plot X,Y R = R + X G = G + X B = B + X Next RStart = RStart + 1 GStart = GStart + 1 BStart = BStart + 1 If RStart > 255 RStart = 0 If BStart > 255 BStart = 0 If GStart > 255 GStart = 0 Next Flip WaitKey End [/code:1:b0ac83e0e5] |