[Prompt #205]
01/ 01
(require 'svg) (背景色 . "#FFFFFF") (装饰条 . ((顶部 . 0) (底部 . 790) (高度 . 10) (颜色 . "#333333") (透明度 . 0.1))))) (文字样式 . '( (字体 . "Arial") (标题设置 '((主标题 . "鄙视链") (主标题样式 . ((字体 . "Arial")(大小 . 36) (颜色 . "#333333")(位置y . 80))) (副标题样式 . ((字体 . "Arial") (大小 . 24)(颜色 . "#333333") (位置y . 120))))) (层级文本 . ((大小 . 18) (类别色 . "#333333") (吐槽色 . "#666666"))))) (布局结构 . '( (中轴线 . ((开始y . 160) (结束y . 650) (颜色 . "#CCCCCC") (虚线 . "5,5"))) (层级间距 . 70) (左侧边界 . 280) (分隔线长 . 30))) (底部样式 . '( (位置y . ((类别 . 680) (吐槽 . 710))) (对齐 . "middle"))))) (画布 (getf 配置 '画布设置)) (样式 (getf 配置 '文字样式))) (SVG-Card 领域名称 层级数据 配置))) )) (mapcar (lambda (层级) (list :类别 (getf 层级 :名称) :吐槽 (format "\"%s\"" (getf 层级 :评价)))) 数据))) ,(底部层级) ,(装饰元素))) []