--first color
a1=0
a2=50
a3=0
--second color
b1=55
b2=255
b3=25
x1=0
y1=0
x2=240
y2=320
clear(255,255,255)
h=x2-x1-1
for i=0,h do
r=a1-(a1-b1)/h*i
g=a2-(a2-b2)/h*i
b=a3-(a3-b3)/h*i
fillrect(i,y1,i+1,y2,r,g,b)
end
| Attachments: |
|
gradient.PNG [ 6.84 KiB | Viewed 30030 times ] |