Convert to Oblique dimension adjusting to angle of exist line
File name : OB.LSP
This program convert common dimension to oblique dimension.
Program adjusts oblique angle to exit line.
Example-1 (Adjuest to exist line)
Command: ob
Select Dimension: {select s1} [Select a dimension to be oblique]
Select objects: 1 found
Select objects: [Type enter to finish selecting]
Select line/2p: {select s2} [ Select reference line]
Example-2 (Adjust to anble of two points)
Command: ob
Select Dimension: {select s1} [Select a dimension to be oblique]
Select objects: 1 found
Select objects: } [Type Enter to finish selecting]
Select line/2p: 2 [Enter '2' to choose 2 point option]
Pick start point: {Pick p1} [Pick first point]
Pick end point: {Pick p2} [Pick second point]
※ If you pick p1 after picking p2, Result is same. |