;; 作者: zephyr 空格
;; 版本: 3.2
;; 模型: Claude 3.5 Sonnet
;; 用途: 基于用户输入的产品生成商业模式画布 SVG 图像，使用竖向文本布局
(defun 绘制商业模式画布 (产品名称)
"主函数：根据产品名称生成商业模式画布的九大要点，内容精炼，词汇精准直接。"
(let* ((客户细分 (format nil "明确~a的目标客户群体，识别共同需求和特征。" 产品名称))
(价值主张 (format nil "定义~a为客户解决的问题和满足的需求，突出产品或服务的独特价值。" 产品名称))
(渠道通路 (format nil "确定如何与~a的客户沟通和接触，选择最有效的渠道传递价值。" 产品名称))
(客户关系 (format nil "规划与~a的客户建立和维护的关系类型，确保满足客户期望。" 产品名称))
(收入来源 (format nil "明确~a的商业模式如何赚钱，识别主要的收入流和客户支付方式。" 产品名称))
(核心资源 (format nil "列出实现~a价值主张所需的关键【】资源，包括人力、财务和知识资产。" 产品名称))
(关键业务 (format nil "识别支持~a商业模式运行的主要活动，确保价值的创造和交付。" 产品名称))
(重要合作 (format nil "确定~a的关键合作伙伴和供应商，利用合作优化业务、降低风险。" 产品名称))
(成本结构 (format nil "分析运营~a商业模式产生的主要成本，关注最重要的固定和可变成本。" 产品名称)))
;; 其他辅助函数保持不变...
(defun 创建SVG图像 (产品名称 重要伙伴 关键活动 价值主张 客户关系 客户细分 核心资源 渠道通路 成本结构 收入来源)
"创建商业模式画布的 SVG 图像，使用竖向文本布局"
(format nil "<svg xmlns=\"http://www.w3.org/2000/svg\\" viewBox=\"0 0 1200 800\">
<!-- 背景 -->
<rect x=\"0\" y=\"0\" width=\"1200\" height=\"800\" fill=\"#f5f5f5\"/>
<!-- 主要区块 -->
<rect x=\"10\" y=\"70\" width=\"290\" height=\"480\" fill=\"#e3f2fd\" rx=\"10\" ry=\"10\"/>
<rect x=\"310\" y=\"70\" width=\"290\" height=\"235\" fill=\"#fff3e0\" rx=\"10\" ry=\"10\"/>
<rect x=\"610\" y=\"70\" width=\"280\" height=\"235\" fill=\"#e8f5e9\" rx=\"10\" ry=\"10\"/>
<rect x=\"900\" y=\"70\" width=\"290\" height=\"235\" fill=\"#fce4ec\" rx=\"10\" ry=\"10\"/>
<rect x=\"900\" y=\"315\" width=\"290\" height=\"235\" fill=\"#f3e5f5\" rx=\"10\" ry=\"10\"/>
<rect x=\"310\" y=\"315\" width=\"290\" height=\"235\" fill=\"#fffde7\" rx=\"10\" ry=\"10\"/>
<rect x=\"610\" y=\"315\" width=\"280\" height=\"235\" fill=\"#e0f7fa\" rx=\"10\" ry=\"10\"/>
<rect x=\"10\" y=\"560\" width=\"590\" height=\"230\" fill=\"#efebe9\" rx=\"10\" ry=\"10\"/>
<rect x=\"610\" y=\"560\" width=\"580\" height=\"230\" fill=\"#f1f8e9\" rx=\"10\" ry=\"10\"/>
<!-- 标题 -->
<text x=\"600\" y=\"45\" font-family=\"Arial, sans-serif\" font-size=\"32\" font-weight=\"bold\" fill=\"#000\" text-anchor=\"middle\">~A 商业模式画布</text>
<!-- 标题文本和emoji -->
<text x=\"30\" y=\"100\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#1565c0\">🤝 重要伙伴</text>
<text x=\"330\" y=\"100\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#e65100\">🔑 关键活动</text>
<text x=\"630\" y=\"100\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#2e7d32\">💎 价值主张</text>
<text x=\"920\" y=\"100\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#c2185b\">🤗 客户关系</text>
<text x=\"920\" y=\"345\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#7b1fa2\">👥 客户细分</text>
<text x=\"330\" y=\"345\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#f9a825\">🔧 核心资源</text>
<text x=\"630\" y=\"345\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#00838f\">🚚 渠道通路</text>
<text x=\"30\" y=\"590\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#4e342e\">💰 成本结构</text>
<text x=\"630\" y=\"590\" font-family=\"Arial, sans-serif\" font-size=\"24\" font-weight=\"bold\" fill=\"#33691e\">💵 收入来源</text>
<!-- 内容文本（竖向排列） -->
<text x=\"50\" y=\"140\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"50\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"330\" y=\"140\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"330\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"630\" y=\"140\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"630\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"920\" y=\"140\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"920\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"920\" y=\"385\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"920\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"330\" y=\"385\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"330\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"630\" y=\"385\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"630\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"30\" y=\"630\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"30\" dy=\"25\">~A</tspan>~}
</text>
<text x=\"630\" y=\"630\" font-family=\"Arial, sans-serif\" font-size=\"16\" fill=\"#000\">
~{<tspan x=\"630\" dy=\"25\">~A</tspan>~}
</text>
</svg>"
产品名称
(split-string 重要伙伴)
(split-string 关键活动)
(split-string 价值主张)
(split-string 客户关系)
(split-string 客户细分)
(split-string 核心资源)
(split-string 渠道通路)
(split-string 成本结构)
(split-string 收入来源)))
(defun 输出结果 (svg图像)
"输出商业模式画布的 SVG 图像结果"
(format t "~A~%商业模式画布 SVG 图像生成完成。请将上述 SVG 代码保存为 .svg 文件并在浏览器中打开查看。" svg图像))
(defun start ()
"启动函数"
(print "请输入产品名称"))
;;; Attention: 运行规则!
;; 1. 初次启动时必须只运行 (start) 函数
;; 2. 接收用户输入之后, 调用主函数 ( 基于用户输入的产品名称创建商业模式画布 SVG 图像)
;; 3. (SVG-Card) 进行排版输出，，整体排版要有呼吸感
;; 4. No other comments!!