Polar stretch parameter and Polar stretch action Problem

[wael6URAQ]

I have a problem using the polar stretch parameter and polar stretch action in my dynamic blocks
This is the original shape of my block:

I added two main parameters to modify the length and the width of the block as shown in the next two green clouds:

Another secondary polar parameter is chained to the main two parameters  to move the line marked R4 and rotate it automaticly to result the follwing:

This is the hoped result so that the mark and the line lenght and the angle are parrallel as shown

also the point for stretching its dim line should be at the middle of the mark as shown.

unfortunatly the result is as the following:

I attached the block

Please help to fix this problem.

[wael6URAQ]

By the way sir
I m trying to create a lisp to automatic change the attribute values by giving them the first value only then each to be incremented by 1

example

"1-Mark" ----->R1000

"2-Mark"----->"1-Mark"+1=R1001

"3-Mark"----->"2-Mark"+1=R1002

"4-Mark"----->"3-Mark"+1=R1003.....

[j.palmeL29YX]

---

@wael6URAQ wrote:

I m trying to create a lisp ...

---

Good luck and success. 

If you have questions, you can find >>here<< a LISP-Forum. 

[wael6URAQ]

thank you so much

I found the lisp here but i don't know how to add hyper link

https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/automatically-number-several-attribu...