2. 使用CAD VBA的插件shadeobject，首先CAD里需要安装VBA,然后加载shadeobject文件，加载完成即可使用。过程如下：

1） 打开CAD,输入命令shr

2） 输入纬度：31.2

3） 选择点，这里我们随便选择一个点。

4） 输入高度（这里的高度不是mm，而是需要转化过得到结果为167）167并回车

5） 把得到的阴影旋转45°即可得到所需结果。最终阴影结果如下图


图中线为红色（夏至）7根，绿色（春分秋分）7根，浅蓝色（冬至）7根，同一颜色长短不一的7根射线分别代表那一天从左往右为上午9点、10点、11点、12点、13点、14点、15点时候的阴影长度。