anchor.diff:      (setq strNum (1- strNum) )
     )
     
  -  (if (> strNum *strLim)
  +  (if (or (> strNum *strLim) (<= strNum 0))
       ; Terminate if the label is outside of the limit
       ; Otherwise, increment the label
       (progn
  -      (alert "You have reached the end of the last string.")
  +      (alert "The label is outside of the limit.
  +      \nPlease check the panel and string numbers again.")
         (setq term 1)
       )
       (progn
  
positive.code: 	;; If the definition was loaded
          (progn
  	  ;; Generate initial value for variables
    	  (set_tile "pnlCur" (cond (*pnlCur (itoa *pnlCur)) (T "1")))
  	  (set_tile "strCur" (cond (*strCur (itoa *strCur)) (T "1")))
  	  (set_tile "pnlLim" (cond (*pnlLim (itoa *pnlLim)) (T "1")))
  	  (set_tile "strLim" (cond (*strLim (itoa *strLim)) (T "1")))
  	
            ;; If an action event occurs, do this function
            (action_tile "cancel" "(done_dialog 1)")
  
negative.code:     (>(setq tmp
  	(cond
  	  ( (getint (strcat "\n" msg " <" (if (eval var) (itoa (eval var) ) "1")
  			    ">: ") ) )
  	  ( (eval (cond ( (eval var) ) (1) ) ) )
  	)
        )
  