[转载]教你如何用autocad一下子画国旗
很多人可能不知道国旗是如何画得，尤其是那五颗五角星位置与大小，下面就介绍一下
（一）旗面为红色，长方形，其长与高为三与二之比，旗面左上方缀黄色五角星五颗。一星较大，其外接圆直径为旗高十分之三，居左；四星较小，其外接圆直径为旗高十分之一，环拱于大星之右。旗杆套为白色。
　　（二）五星之位置与画法如下：
　　甲、为便于确定五星之位置，先将旗面对分为四个相等的长方形，将左上方之长方形上下划为十等分，左右划为十五等分。
　　乙、大五角星的中心点，在该长方形上五下五、左五右十之处。其画法为：以此点为圆心，以三等分为半径作一圆。在此圆周上，定出五个等距离的点，其一点须位于圆之正上方。然后将此五点中各相隔的两点相联，使各成一直线。此五直线所构成之外轮廓线，即为所需之大五角星。五角星之一个角尖正向上方。
　　丙、四颗小五角星的中心点，第一点在该长方形上二下八、左十右五之处，第二点在上四下六、左十二右三之处，第三点在上七下三、左十二右三之处，第四点在上九下一、左十右五之处。其画法为：以以上四点为圆心，各以一等分为半径，分别作四个圆。在每个圆上各定出五个等距离的点，其中均须各有一点位于大五角星中心点与以上四个圆心的各联结线上。然后用构成大五角星的同样方法，构成小五角星。此四颗小五角星均各有一个角尖正对大五角星的中心点。
　　（三）国旗之通用尺度定为如下五种，各界酌情选用：
　　甲、长２８８公分，高１９２公分。
　　乙、长２４０公分，高１６０公分。
　　丙、长１９２公分，高１２８公分。
　　丁、长１４４公分，高９６公分。
　　戊、长９６公分，高６４公分。
为此，本人专门编程以使画国旗变得简单程序如下
(defun c:china( / ss cc l w p1 p2 p3 p4 pw1 pw1d a1 b1 a
&(setq ss (getvar "osmode"))
&(setq cc (getvar "CECOLOR"))
&(setvar "osmode" 512)
&(setq l (getdist "n请输入国旗长度:"))
&(setq w (* (/ l 3) 2))
&(setq p1 (getpoint "n请输入坐下端点坐标值:"))
&(setq p2 (polar p1 0 l) p3 (polar p1 (/ pi 2) w)
p4&& (polar p3 0 l))
&(command "color" 1)
&(command "pline" p1 p2 p4 p3 "c")
&(setq f (entlast))
&(command "hatch" "solid" f "")
&(setq a1 (car p3) b1 (cadr p3))
&(setq a (/ l 30) b (/ w 20))
&(setq pw1 (list ( a1 (* 5 a)) (- b1 (* 5
&(setq pw1d (* 3 b))
&(hzwjx2 pw1 pw1d)
&(setq pw1 (list ( a1 (* 10 a)) (- b1 (* 2
&(setq pw1d (* 1 b))
&(hzwjx2 pw1 pw1d)
&(setq pw1 (list ( a1 (* 12 a)) (- b1 (* 4
&(setq pw1d (* 1 b))
&(hzwjx2 pw1 pw1d)
&(setq pw1 (list ( a1 (* 12 a)) (- b1 (* 6
&(setq pw1d (* 1 b))
&(hzwjx2 pw1 pw1d)
&(setq pw1 (list ( a1 (* 10 a)) (- b1 (* 8
&(setq pw1d (* 1 b))
&(hzwjx2 pw1 pw1d)
&(setvar "osmode" ss)
&(setvar "CECOLOR" cc)
(defun hzwjx2(pc r / pc1 ss cc p0 p1 p2 p3 p4
t0 tt r0 r1 r2 r3 r4)
&(setq ss (getvar "osmode"))
&(setq cc (getvar "CECOLOR"))
&(setvar "osmode" 512)
&(setq t0 (/ pi 2))
&(setq tt (/ (* 2 pi) 5))
&(setq pc1 (polar pc t0 (* 1000 r)))
&(setq p0 (polar pc1 t0 r)
p1 (polar pc1 ( t0& tt) r)
p2 (polar pc1 ( t0 (* 2 tt)) r)
p3 (polar pc1 ( t0 (* 3 tt)) r)
p4 (polar pc1 ( t0 (* 4 tt)) r))
&(setq r0 (inters p0 p2 p1 p4)
r1 (inters p0 p2 p1 p3)
r2 (inters p1 p3 p2 p4)
r3 (inters p0 p3 p2 p4)
r4 (inters p0 p3 p1 p4))
& (command "pline" p0 r0 p1 r1 p2 r2 p3 r3 p4 r4
& (setq e (entlast))
& (command "move" e "" pc1 pc)
& (command "color" 2)
&(command "hatch" "solid" e "")
& (setvar "osmode" ss)
&(setvar "CECOLOR" cc)
)&将上述程序保存至文本文档中，并改扩展名为lsp，为方便记忆，文件名可取如china.lsp
将其保存至cad默认收缩路径下，如C:Program FilesAutoCAD
2004Support
下面就可画了，
一：打开auto cad，在菜单栏“工具”下选择“加载应用程序”，将上述程序加载进去，
其会显示加载成功，随后在cad命令栏上输入china，按回车。接下来按其提示操作
（注意输入需在英文输入法）即可
这样，国旗就画好了
其他国家国旗画法也类似，但教之与中国的简单不少，如日本的
(defun c:Japan( / ss cc l w p1 p2 p3
&(setq ss (getvar "osmode"))
&(setq cc (getvar "CECOLOR"))
&(setvar "osmode" 512)
&(setvar "CEcolor" "WHITE")
&(setq l (getdist "n请输入国旗长度:"))
&(setq w (* (/ l 3) 2))
&(setq p1 (getpoint "n请输入坐下端点坐标值:"))
&(setq p2 (polar p1 0 l) p3 (polar p1 (/ pi 2) w)
p4&&& (polar p3
&(command "pline" p1 p2 p4 p3 "c")
&(setq f (entlast))
&(command "hatch" "solid" f "")
&(setq p5& (inters p1 p4 p2
&(command "color" 1)
&(setq r (/ l 6))
&(command "circle" p5 r)
&(setq e (entlast))
&(command "hatch" "solid" e "")
&(setvar "osmode" ss)
&(setvar "CECOLOR" cc)
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。游戏里面拜占庭的国旗不是鹰旗，而是格子图，怎么回事？_欧陆风云吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0可签7级以上的吧50个
本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：29,356贴子：
游戏里面拜占庭的国旗不是鹰旗，而是格子图，怎么回事？
难道代表自己要和划清界限嘛。如果拜占庭自己从来没有否认过自己是东甚至是，那为什么要把以前的黄鹰紫底国旗换成这种格子旗，不得不说丑死了，还是鹰旗霸气威武，不知拜占庭咋想的
又到年底了，是不是又内...
痛骂肇事者酒后驾车逃逸...
前两天，咱们贴吧一篇贴...
【部门纳新】 文工团：...
瞧这霾态天儿! 别再霾态...
【贴吧燃并暖天团·帅哥...
《奔跑吧兄弟》在澳洲录...
本排行榜包括全世界的明...
男神女神镇楼~
一楼度娘 非转帖，容我...
都讨论男一，是时候该讨...
没有永远的朋友，也没有...
罗马没有国旗
哪来的国旗
那个旗子实际上是Palaiologos，就是拜占庭最后统治家族的徽记怎么说都比SPQR贴切啊⋯⋯
罗马帝国有国旗吗？不是说世界第一个有国旗的国家是丹麦吗？罗马顶多就有个象征标志============================如果天总不亮，那就摸黑生活；如果发出声音是危险，那就保持沉默；如果自觉无力发光，那就蜷伏角落。但不要习惯了黑暗就为黑暗辩护；不要为自己的苟且而得意；不要嘲讽那些比自己更勇敢热情的人们。你可以卑微如尘土，不可扭曲如蛆虫。做人当做报晓的雄鸡，莫做待宰的羔羊！　　　　　　 ----中华民国立法院长王金平
火影三大流派哪家强？
连汉化都是说那叫盾徽
连盾徽和国旗都分不清再说它一直就是东罗马好吧。。。拜占庭只是某德国历史学家为了区分罗马帝国和神罗而采用的一个名称而已。。。
喵咪咪，这是巴列奥略王朝的旗帜，传统4B十字徽章+热那亚十字徽章，4B是Βασιλεύς Βασιλέων Βασιλεύων Βασιλεύσιν，万王之王，意思是福音传四方。这个可比鹰旗有气势的多。。。
内&&容:使用签名档&&
保存至快速回贴推荐到广播
601256 人聚集在这个小组
第三方登录：脸上贴国旗或画国旗是怎么来的?}