>>How i can create a command in which i give circle dia & polygon dia?
in autocad, type vbaide, insert userform, insert a couple textboxes for circle dia. and polygon dia. and a couple command buttons, insert labels, and click on each 'control' that you just inserted and view properties window, name and format as desired.
The command buttons might want to be ok and cancel; for cancel button, cancel property s/be true.
Double click ok button. This is where your program 'guts' can go.
examples that you will need to look at...
{code}
'circle example
Dim circleObj As AcadCircle
Dim centerPoint(0 To 2) As Double
Dim radius As Double
' Define the circle
centerPoint(0) = 0#: centerPoint(1) = 0#: centerPoint(2) = 0#
radius = 5# 'change this to CDBL(TEXTBOXVALUEFORCIRCLEDIA) textbox value for circle dia
' Create the Circle object in model space
Set circleObj = ThisDrawing.ModelSpace.AddCircle(centerPoint, radius)
ZoomAll
{code}
what i might do is either compute the max no of polygons and points (blech), or draw circles and count intersections points, and connect the intersections with polylines, and adjust as necessary (blech).
>>Than it automatically adjust the maximum no. of polygons without touching the circle boundary.
>>Polygons shpuld be adjusted in the way i given in image.
>>Is it possible?
Yes.
