anchor.diff:      ; Author: David Torralba
       ; Last revision: 2017.06.22
     )
  -  (defun c:44()
  +  (defun c:55()
       (princ "\nMASTER STRING\n")
       (if c:ktf_pmdsdes
         (c:ktf_pmdsdes)
  
positive.code:     ; Author: David Torralba
      ; Last revision: 2017.03.20
    )
    (defun c:4()
      (princ "\n3D JUNCTION\n")
      (if c:ktf_revcurve3d
        (c:ktf_revcurve3d)
  
negative.code:   ; v0.0 - 2017.07.28 - First issue
    ; Author: David Torralba
    ; Last revision: 2017.07.28
  )
  (defun c:3DSpotLevel ( / escapeVariable xy z )
    ; Draw spot level in 3D
    (while (not escapeVariable)
      (if (setq xy (getpoint "\nSelect XY position: "))
        (if (setq z (DT:clic_or_type_level))
          (entmakex
            (list
              (cons 0 "POINT")
              (cons 10 (list (nth 0 xy) (nth 1 xy) z))
            );END list
          );END entmakex
          (setq escapeVariable T)
        );END if
        (setq escapeVariable T)
      );END if
    );END while
  
    ; v0.0 - 2017.08.14 - First issue
    ; Author: David Torralba
    ; Last revision: 2017.08.14
  )
  (defun DT:OffsetPartM ( ent_name / VL_ent_name p p0 p1 ang )
    ; Move Part M blocks 0.302 toward the inner part of the building (= BlockRotation - 90º)
  