lisp数字格式化

1）、按任意进制（2~36）输出

;比如按3进制输出
(format t "~3r" 34) ;1021

2）、指定宽度输出

;8位宽度
(format t "~3,8r" 34);    1021

3）、指定宽度，并设置填充字符

;8位宽度,#填充
(format t "~3,8,'#r" 34) ;####1021

4）、输出指定宽度及对齐方式

;左对齐
(format t "~8a" 1);"1       "
;右对为齐
(format t "~8:@a" 1);"       1"

5）、按指定次序输出；指定宽度，对齐方式，填充字符。

(format nil "~2@*~8d~@*~8d~1@*~8d" 1 2 3) ;输出为 "       3       1       2"
(format nil "~2@*~8a~@*~8a~1@*~8a" 1 2 3) ;输出为 "3       1       2       "
(format nil "~2@*~8,'$d~@*~8,'#d~1@*~8,'0d" 1 2 3);输出为 "$$$$$$$3#######100000002"

注：

     对齐方式：~a 左对齐，~d右对齐，~r,右对齐。

     指定参数位置：第0个参数: ~@*~a 

                              第1个参数:~1@*~a

                              第2个参数:~2@*~a

                              跳过一个参数:~*~a

                              前一个参数: ~:*~a