Split sides of the box

i have idea for isp i hope i can found it :

Split sides of the box to equal distances so that the remaining distance is divided evenly between the beginning and end of each rib on the end also have to enter values ​​in the partition of Distance Distance longitudinal and cross each separately.

Yep take the length divide by the partion length this gives a number say 5.75 take the FIX - 5.75 divide by 2 this is your answer for ends, use polar from either end point to work the rest out.

Good task as a start learning lisp. Help is here as you go

;A start
(setq pt1 (getpoint))
(set1 pt2 (getpoint))
(setq dist (distance pt1 pt2))
(setq part (get real)) ; partion length
(setq rem (/ dist part))
(setq rem (- rem (fix rem)))
;your turn now