anchor.diff:    )
     (defun c:4 ( / ent_name pt ang )
       (princ "\nAdd NOT ISSUED YET note:\n")
  +    (setvar "orthomode" 0)
       (if
         (entmake
           (append
  
positive.code:       (princ "\nent_name = nil")
      );END if
      (princ)
    )
    (defun c:44() (princ "\nRemove NOT ISSUED YET note:\n") (princ) )
    (defun c:oo()
  
negative.code:   ; Author: David Torralba
    ; Last revision: 2017.05.12
  )
  (defun c:wt ( / text )
    ; Override selected text content
    (DT:SetText (car (nentsel "\nClick on text: ")) (getstring "\nWrite text (use \"\\P\" as newlines) :" t) )
  
    ; v0.0 - 2017.05.12 - First issue
    ; Author: David Torralba
    ; Last revision: 2017.05.12
  )
  