Ive been trying to do this for ages an it was driving me nuts... too many steps with accudraw to go wrong, found a few clues in old posts and filled in the blanks
keyin ROTATE VIEW ELEMENT; %d;%d;ACTIVE ANGLE PT2
( THE ABOVE COULD BE SET TO AN F KY IF YOU USE IT ALOT)
You'll be prompted t select an element ( text or line or shape) to set the view rotation
Then you'll need to Tentatative twice on the reference line element ( the one you want to rotate to) one end first and then the other end last
now you active angle is the angle of the reference line
next we click on the rotate icon and it has the new angle set, so now click on the text or element you want rotated
now key in vi=top to return the view ot original state and our text or line as adopted the angle of the reference element line...
I tried to make another keyin
rotate icon;%d;vi=top
but it works like this select the text to rotate, data point in the view and reset button mouse. then it rotates the text to right angle and sets view back to normal but doesnt
work if you use your mouse buttons in any other order it fails to do what you want cant work out why but works.. other wise the rotate bit can view top can just be done by hand or icons etc
Autocad has all this much easier R for rotate and option is reference so r and two clicks and done...
I wish we had a simple tool or macro with two clicks...
Brian V said:for folks using ProjectWise, are you able to auto load ActiveAngleAssistant.mvba?
Depending on your ProjectWise admin, you find that the PW configuration has redefined some configuration variables. Consequently, MicroStation can't see the macros in your local folder. Your explicit full path by-passes the PW overrides.
Regards, Jon Summers LA Solutions
Thank you! I noticed after using "accudraw rotate element", I need to set to "accudraw rotate top" in order to draw normal line again. Also for folks using ProjectWise, are you able to auto load ActiveAngleAssistant.mvba? I tried entering this line to my untitled.ucf but seems like it's not working, have to manually load it up, better than nothing. MS_VBAAUTOLOADPROJECTS > "C:/ProgramData/Bentley/MicroStation V8i (SELECTseries)/WorkSpace/System/vba/ActiveAngleAssistant.mvba"
if you watch the video he used rotate 3 point tool then uses accudraw keyin RE which is rotate to element and selected the element a line to rotate the text relative to that line.. pretty neat solution but it takes a couple of practice go's to get the sequence down pat .. I found my basic was easier to load and run from a F key and just pick the two objects in order and its done... but you gotta know how to do it from scratch as Basic wont run any more after V8i or v10ss...
Lorys
Started msnt work 1990 - Retired Nov 2022 ( oh boy am I old )
But was long time user V8iss10 (8.11.09.919) dabbler CE update 16 (10.16.00.80)
MicroStation user since 1990 Melbourne Australia.click link to PM me
Hi Gerd, would you mind to share the key-in used for this awesome tool you have there? What is the "RE - orientation dp of the tag" means?
I found an public domain old MS-Basic tool that would do the job of rotate text parallel to an element even in a rotated view but it only worked on text element, after some analysis of how it worked I was able to comment out the part that made it work only on Text, now it works on TAG text and most other elements , I have not tried it on every element but it definitely works now on tag text even in rotated view... pity its still in basic, vba would be better for future proofing if any one would like a copy and or would be interested in reworking it to vba I'd be glad to post it here or to your email
I works nicely from F key load macro , then asks to select text then select the reference object to rotate parallel to and accept then reset to exit... boom perfect! works better than angle assistant as that doesnt work on TAG text and is protected so cant edit it to make it work...