setpc :c pd (stampoval :r :r "true)
結束
致yd :j
PD xq 9 20 rt:J pu FD 50 rt 90 PD xq 8 10等待15 xq 15 10 lt 90 bk 50 lt:J xq 15 20
pu rt 2.5 fd 200*0.0872 rt 2.5
yd :j+15
到ryx日月星
繪制pd xq 12 50 pu fd 200 rt 90 yd 0
cs ryx