unfilled circle ?

hi !
how to draw an unfilled circle with bmax ?
Thanks !

'-------------------------------------------------------------
Rem
bbdoc: Draw circle using lines at the specified point and radius
about:
EndRem
Function DrawVectorCircle(cx:Double,cy:Double,radius:Double)
Local lx:Double=radius*Cos(0)
Local ly:Double=radius*Sin(0)
For Local d:Double=20 To 360 Step 20
Local nx:Double = radius*Cos(d)
Local ny:Double = radius*Sin(d)
DrawLine(cx+lx,cy+ly,cx+nx,cy+ny)
lx=nx
ly=ny
Next
End Function

These can be used/adapted:
http://www.blitzbasic.com/codearcs/codearcs.php?code=1476
http://www.blitzbasic.com/codearcs/codearcs.php?code=1477
http://www.blitzbasic.com/codearcs/codearcs.php?code=1451

Thanks !