Draw an antialiased circle?

[STARGÅTE]

Code: Select all

OpenWindow(0, 0, 0, 600, 600, "Smooth Circle")
CreateImage(0, 1000, 1000, 32, #PB_Image_Transparent)            ;  would like to make this transparent
StartDrawing(ImageOutput(0))
DrawingMode(#PB_2DDrawing_AlphaBlend)
Circle(500, 500, 300, $FF0000FF)
StopDrawing() 
ResizeImage(0, 500, 500)
ImageGadget(0, 0, 0, 500, 500, ImageID(0))

While WaitWindowEvent() ! #PB_Event_CloseWindow : Wend

[firace]

@STARGÅTE: Thx!! I had actually tried something like that, but forgot about the RGBA color...