Minus value to set zero

[Dayananda]

(- botLength 6000)

If this value is a minus value , I need to set it zero. Please help

[dexus]

You mean like this?

(if (minusp botLength) 0 (- botLength 6000))

 

[Saxlle]

(if (= (minusp botLength) T) ;; verifies that a number is negative
	
    (setq botLength 0) ;; if it is, it will set to 0
    
    (setq botLength (- botLength 6000)) ;; if it isn't, it will be substracted with "6000"
    
    )

 

[Steven P]

If (- botLength 6000) is minus....

 

(if (= (minusp (- botlength 6000)) T) ;; verifies that a number is negative
  (setq botLength 0)                  ;; if it is, it will set to 0
  (setq botLength (- botLength 6000)) ;; if it isn't, it will be substracted with "6000"
) ;;End If

 

[Saxlle]

12 minutes ago, Steven P said:

If (- botLength 6000) is minus....

 

(if (= (minusp (- botlength 6000)) T) ;; verifies that a number is negative
  (setq botLength 0)                  ;; if it is, it will set to 0
  (setq botLength (- botLength 6000)) ;; if it isn't, it will be substracted with "6000"
) ;;End If

 

 

Just another example, nice, also it would work.

[marko_ribar]

(if (minusp (- botLength 6000))
  (setq botLength 6000)
)

 

[CyberAngel]

Why get fancy?

 

(max 0 (- botLength 6000))

 

[Saxlle]

Very nice @CyberAngel, like it!