this now part works, 256 in an RGB equals black so no show color, 255 is max number. Now all you have to do is work out how big a circle?
gosub olympic
paste image 1,100,100,0
wait 10000
end
olympic:
create bitmap 1,100,53
set current bitmap 1
cls rgb(0,0,255)
for x=1 to 100
for y=1 to 53
dot x,y, rgb(255,255,255)
next y
next x
ink rgb(0,0,255),rgb(0,0,255)
circle 17,17,25
ink rgb(0,0,0),rgb(0,0,0)
circle 51,17,25
ink rgb(255,0,0),rgb(255,0,0)
circle 85,17,25
ink rgb(255,255,0),rgb(255,255,0)
circle 34,34,25
ink rgb(0,255,0),rgb(0,255,0)
circle 68,35,25
get image 1,1,1,100,53,1
set current bitmap 0
delete bitmap 1
return
Dark Physics makes any hot drink go cold.