Topic: Ortho Not Working with GRREAD, but Polar Tracking is

[cmwade77]

I am rewritting my leader routine for a variety of reasons and I am having trouble getting Ortho to function, but I have polar tracking working.

I have attached the drawing that contains all of the necessary leader styles and blocks as well as my routine so far.

I am sure that I am missing something obvious, if someone can take a look and let me know, I would greatly appreciate it.

I wouldn't be surprised if there are more efficient ways to do a lot of this as well.

EDIT: Updated version on ULEADER - 02/25/2022

[ribarm]

Not sure, but, try this :

Insert at line 645 this part :

Code: [Select]

(645) ...
         (if (getvar "ORTHO")
           (setq IncrementAngles nil)
         )
         ...

That should be all...

For somewhat different approach to ORTHO functionality look here :
http://www.theswamp.org/index.php?topic=12813.msg526700#msg526700

Regards, M.R.

[cmwade77]

It was even slightly more complicate than that, line 588 had to be changed to (if (or (bitcodef (getvar "autosnap") (= (getvar "ORTHOMODE") 1)) it was (if (or (bitcodef (getvar "autosnap") (getvar "ORTHO"))

I also had to adjust line 668 accordingly and line 671 was expanded to:
(if (not (= (getvar "ORTHOMODE") 1)
            (grdraw pt1 (polar Pt1 (angle Pt1 FinalPoint) 10000) 3 1)
          )

I also had to move your suggestion and modify it a bit.

I was also able to remove some additional information from my original code. I have attached what I presently have.