怎么用PC LOGO做出跳棋盘图形

to jiao :n :b
if :n=0 then stop
repeat :n [repeat 3 [fd :b (stampoval :b/4 :b/4 "true) rt 120] fd :b]
bk :n*:b rt 60 fd :b lt 60
jiao :n-1 :b
end

to tqqp :n :b :x
rt 90 lt 60 repeat 6 [make "x :x+1 setpc :x jiao :n :b rt 60]
setpc 0
rt 60 repeat 6 [jiao :n :b lt 60 fd :n*:b rt 120]
end

执行：TQQP 4 10 6
:N--------每个角的层数参数
:B--------每个圆的间隔(每个圆的大小)参数
:X--------第一个角的起始颜色参数