Measure the slope of a line?

Is there any way, in plain vanilla MicroStation, to measure the slope of a line? Assuming 2D, basic XY coordinates, no exaggeration.

Thank you

MaryB
MSTN 08.11.09.397

Parents Reply
  • Caddcop.. did you modify the one I posted as now it labels where as mary just wanted measure... nice one

    Now can you edit it to make it ask user keyin 1 or 2 for % or 1( rise) in X( run)  ratio ( .. I tried but it wrecked it!)

    but this does look a lot like the original haven tried it but will it still measure 3d slope after your mods...

    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 

Children
  • My post is simply a slightly modified version of the original. It still echo's 2D (and 3D) slopes, but only uses the 2D slope as a label.

    I had one a while ago that did that. I will see if I can locate it.

    What you need in these, is a check against a rotated view as this version will give wrong result as written. There are alternatives to get the slope in any view orientation, but I have always struggled with that type of code.

    What I imagine in a finished macro, is a dialog box that opens after accepting the line and in the dialog box is the slopes with radio buttons so you can select 2D or 3D slope as a label and options for % slope, rise over run, run over rise and different labeling options - above, below, by origin or in a leadered note.


    Charles (Chuck) Rheault
    CADD Manager

    MDOT State Highway Administration

    • MicroStation user since IGDS, InRoads user since TDP.
    • AutoCAD, Land Desktop and Civil 3D, off and on since 1996
  • CAD COP I have that one I think it was by Tim shoemaker of the TMC  but it is compiled version of bas and needs 2  macros but it only works in XM not  8i.. slopeset.ba and Slope.ba

    the Slopeset.ba  works in 8i but not the label slope which is slope.ba,

    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 

  • Several years later, it turns out I would need a tool similar to this to speed up my work. I edited the VBA to calculate DeltaZ over line length. I commented out the old code and the "-" label because I did not need these for sidewalk ADA work. So if someone in the future needs this, see attached.

    Edit: Not sure why the forum prefixed the file name with "0882"
    0882.SLOPELABLER.mvba