@anon
There may be a solution for DBC:
1. Create your image on a pure black background. Blur or anti alias or both your image to smooth the edges. If you are using photoshop or something like that, do the picture part as a layer on a transparent background and the black part as a background. Save this as a png or bmp. It doesn't really matter as long as the background is black.
2. Create a black image that is the same shape as your colored layer (the bingo chip in this case) make this black image on a WHITE background. Blur the black layer exactly the same way as the colored layer.
3. Load in your images as two separate image numbers.
4. Create two planes that are the same size.
5. Texture plane 1 with image 1.
Ghost it using GHOST OBJECT ON number
6. Texture plane 2 with image 2.
DARK Ghost it using GHOST OBJECT ON number,1
That should show up as your smoothed image. You can either use these 3d planes paired or you could convert this to 2d. What you could do from here is show this 3d on a black backdrop. Capture an image of this. And now you can use a smoothed edged image for other 2d or 3d.
It's a bit of work, but it should do the trick.
Here's an example:
set display mode 800,600,32
sync on
sync rate 0
autocam off
rem round bingo marker
ink rgb(128,0,64),0
for r=0 to 125
circle 128,128,r
circle 128,127,r
next r
for n=1 to 5
blur bitmap 0,2
next n
sync
rem get the colored image
get image 1,0,0,256,256
sync
ink 0,0
cls rgb(255,255,255)
for r=0 to 125
circle 128,128,r
circle 128,127,r
next r
for n=1 to 5
blur bitmap 0,2
next n
sync
rem get the background image for inverse ghosting
get image 2,0,0,256,256
sync
rem make the colored disk
make object plain 1,25,25
texture object 1,1
ghost object on 1
rem make the background
make object plain 2,25,25
texture object 2,2
ghost object on 2,1
set object emissive 2,rgb(255,255,255)
ink rgb(255,255,255),0
position camera 0,0,-50
do
`cls rgb(255,255,255)
`paste image 1,200,200,1
text 0,0,"red = "+str$(rgbr(color))
text 0,20,"green = "+str$(rgbg(color))
text 0,40,"blue = "+str$(rgbb(color))
text 0,80,"Move camera with Up Down arrow keys"
gosub _move_camera
color=point(mousex(),mousey())
loop
_move_camera:
move camera upkey()-downkey()
return
Enjoy your day.
