Click on your left mousebutton to paint on a plain
Click on your right mousebutton to blur it
set display mode 640,480,32 : sync on : sync rate 0 : create bitmap 1,640,480 : set current bitmap 1
for a=0 to 639 : for b=0 to 479 : ink rgb(a/3,a/6,b/2),0 : dot a,b : next b : next a
get image 1,0,0,639,479,1 : set current bitmap 0 : make object plain 1,200,200 : texture object 1,1
make object cube 2,20 : position camera 0,0,200 : point camera 0,0,0 : hide mouse
do
position object 2,100-(mousex()/(640/200)),100-(mousey()/(480/200)),3
if mouseclick()=1 then color_texture() : texture object 1,1
if mouseclick()=2 then set current bitmap 1 : blur bitmap 1,1 : get image 1,0,0,639,479,1 : set current bitmap 0
sync : loop
function color_texture()
set current bitmap 1
ink rgb(255,255,255),0
for a=1 to 7
circle 320-(mousex()-320),mousey(),a
next a
get image 1,0,0,639,479,1
set current bitmap 0
endfunction
Quote: "
Amd 2500+ | 1024mb pc2700 | A7N8X-X | Geforce4 ti 4200 128mb"