Draw line from rectangle centre point to circle center point

[noadea]

I am using Autocad2004. I am trying to write the routine that can draw the line from rectangle centre point to circle centre point according to the data in excel file. I've a bunch of rectangles and circles with the text number themselves. The details of excel data are:
column A : the text number of rectangle
column B : the text number of circle
column C : x-coordinate for rectangle centre point
column D : y-coordinate for rectangle centre point

As example:
column A , column B, column C, column D
1, 2, 0.123, 0.223
2, 3, 0.123, 0.321
3, 5, 0.123, 0.400

How to draw line from rectangle to circle accordingly by row that is rectangle no 1 to cirle no 2, rectangle no 2 to circle no 3, rectangle no 3 to circle no 5 etc...

Additional information: The layer names of rectangle, rectangle number, circle and circle number are different.

[peter]

Yes you can,

I am still a little unclear on what you want but that sort of routine is relatively straight forward to code.

Can you share a simple example in a dwg file showing before and after?

Are they squares and circles with text

or

Blocks of a square and circle with attributes. The attributes make it easier.

Peter

[noadea]

Attached files are the example of my drawing before(A_01.dwg) and after(A_02.dwg).
The cotxt.zip file actually the excel data that i've saved as .csv file.
column A : the text number of rectangle
column B : the text number of circle
column C : x-coordinate for rectangle centre point
column D : y-coordinate for rectangle centre point
The line should be connected from rectangle to circle or vise versa according to data by row. Means rectangle A1 to circle B1, rectangle A2 to circle B2... or vice versa.
Thanks in advance.

[peter]

As long as there are only one of these diagrams in a drawing.

Also the point information in the csv is not necesary.

Just the link between the numbers is sufficient.

Bon apetite

Also you should not use the # symbol in layer names. The lisp selection set ssget expression thinks that the # represents a wildcard number, so I had to use the ? wildcard letter to get the layer names. Also there are some square regions (not inserts) in this drawing. I ignored them.

It is automatic.

Peter

[noadea]

Thanks for your routine.
I've tried it out but nothing come out.
I've no idea which part got an error.
Please help me find the solution. Thanks.

[fixo]

Dear Rohaya
Try this instead

~'J'~

[noadea]

Thanks Oleg
Great... It works pretty good.

[fixo]

Glad to help, Rohaya


~'J'~

[noadea]

As long as there are only one of these diagrams in a drawing.

Also the point information in the csv is not necesary.

Just the link between the numbers is sufficient.

Bon apetite

Also you should not use the # symbol in layer names. The lisp selection set ssget expression thinks that the # represents a wildcard number, so I had to use the ? wildcard letter to get the layer names. Also there are some square regions (not inserts) in this drawing. I ignored them.

It is automatic.

Peter

Peter, how if my csv data has three type of value (integer, string, char) in certain row?
Example:
As example:
column A , column B, column C, column D
1, 1, 0.123, 0.223
2, G, 0.123, 0.321
3, G, 0.123, 0.400
4, 3, 0.123, 0.450
5, 4, 0.123, 0.505
6, G, 0.123, 0.600
7, 6, 0.123, 0.650
8, -, 0.123, 0.700
9, -, 0.123, 0.770

After read csv file:
if value in column B equal to "-" I wanna remove from list.
if value in column B equal to "G" I wanna get the previous integer and next integer.
(if after read next line still get "G", skip then get the next integer value).
Refer to data example: B2 and B3 equal to "G", means get the integer in column B1 and B4. Same with B6 equal to "G", means get the integer in column B5 and B7.
How to write the lisp that can manage the list to do all my needs? Thanks.

[Robert.Hall]

I was reading this post and I am wondering what you do with routine.
What is your line of work?