anchor.diff:        (setq strNum (1+ strNum) )
       )
     )
  +  
  +  ;; Report the result
     (if compl
  -    (princ "Good to go!")
  +    (alert "There were no missing panel number.")
  +    (progn
  +      (alert (strcat "Following panel numbers are missing : \n" errmsg) )
  +      (princ (strcat "\n" errmsg) )
  +    )
     )
     (princ)
   )
  
positive.code: 	)
        )
        (eval lim)
      ); if current input is bigger than the limit
      (princ (strcat " must be less than " (itoa (eval lim) ) ) )
    )
    (set var tmp)
  
negative.code: )
  
  (defun ask-int (var msg lim / tmp)
    ;; Ask for an integer value to parse into the variable,
    ;; defaulting to the previous value
    (while
      (>(setq tmp
  