Name: Anonymous 2009-11-03 1:50
Hi. I'm sortof new to LISP, so I'm not that good at it, but i wrote a program that converts decimal numbers into Roman numerals. It's not that exciting of a programming, but I like making unique little programs that I can use at the oddest times. LISP is an awesome language, but I think it's harder to read (i made a game in C before this so i'm a C programmer). I decided to use the C style to make the code look more organized. I think it makes it easier to read. It's not GNU style, but I was wondering if the GNU has a format guideline for LISP. I was thinking of submitting something like this, because it makes LISP code easier to read.
(
defun roman1
(
)
"Roman numeral conversion with an unordered P.S."
(
let
(
(
x nil
)
)
(
loop
(
cond
(
(
null x
)
(
format t "Enter number:"
)
(
setf x
(
read
)
)
)
(
(
and
(
not
(
null x
)
)
(
> x 39
)
)
(
format t "too big~%"
)
(
setf x nil
)
)
(
(
and
(
not
(
null x
)
)
(
< x 40
)
(
> x 9
)
)
(
prin1 'x
)
(
setf x
(
- x 10
)
)
)
(
(
and
(
not
(
null x
)
)
(
= x 9
)
)
(
prin1 'ix
)
(
setf x 0
)
)
(
(
and
(
not
(
null x
)
)
(
< x 9
)
(
> x 4
)
)
(
prin1 'v
)
(
setf x
(
- x 5
)
)
)
(
(
and
(
not
(
null x
)
)
(
= x 4
)
)
(
prin1 'iv
)
(
setf x 0
)
)
(
(
and
(
not
(
null x
)
)
(
< x 4
)
(
> x 0
)
)
(
prin1 'i
)
(
setf x
(
1- x
)
)
)
(
(
zerop x
)
(
setf x nil
)
(
terpri
)
)
)
)
)
)