Just experimenting with the 'while' function and looking for feedback as to the quality of my coding.
(defun c:test (/)
(setq count 0)
(setq 5dig (getint "\nEnter a 5 digit number: ")) ;_Enter a 5 digit number.
(while
(/= count 5)
(setq 5dig (getint "\nTry again, please enter a 5 digit number: "))
(setq strcount (itoa 5dig)) ;_Set a variable "strcount" to string from the interger from the variable "5dig"
(setq count (strlen strcount) ;_Count the length of characters in the variable "strcount"
)
)
(princ "\nYour are the Winner!")
(princ)
)
Thanks