Функция
окружность пунктиром с регулируемым шагом .
DarkInside , если у тебя не получилось , то посмотри этот
Код под спойлером :
Function StepCircle(Point_X# ,Point_Y# ,Radius# = 1,Offset = 4 , rr% = 255 ,gg% = 255 ,bb% = 255)
Local angle = 0 , trigger
If Offset < 1 Offset = 1
While angle < 360
If trigger
For thisAngle# = angle To angle +Offset Step 0.1
x# = Radius * Cos (thisAngle) + Point_X#
y# = Radius * Sin (thisAngle) + Point_Y#
WritePixel x,y, (rr*$10000+gg*$100+bb)
Next
EndIf
angle = angle + Offset
trigger = Not trigger
Wend
End Function