n=滑动条(0, 20,1)[br]m=滑动条(0, 20,1)[br]k=滑动条(1, 20,1)[br][br]Rr = 滑动条(0, 1,0.01)[br][br]r=0.5-Rr[br]R=0.5+Rr[br][br]#r = 滑动条(0, 3,0.01)[br][br]#R = 滑动条(0, 3,0.01)[br]#赋值(r,0.5-Rr)[br]#赋值(R,0.5+Rr)[br][br]#圆弧()[br][br]Plist1=合并({序列((R;i pi/2/k),i,0,k),序列((r;(k-i) pi/2/k),i,0,k)})[br][br]p1=多边形(Plist1)[br]p2=旋转(p1,pi,(0.5,0.5))[br][br]Base={p1,p2}[br][br][br]#均匀分布随机数[br]M=序列(序列(均匀分布随机数(0,1),i,1,n),j,1,m)[br]#M=序列(序列(区间随机数(0,1),i,1,n),j,1,m)[br][br]Ratio = 滑动条(0, 2,0.01)[br][br]Shape=序列(序列(平移(位似(旋转(Base,元素(M,i,j) pi/2,(0.5,0.5)),Ratio,(0,0)),向量( (i Ratio,j Ratio))),i,1,n),j,1,m)[br][br][br][br]赋值(n,5)[br]赋值(m,5)[br]赋值(k,1)[br]赋值(Rr,0.15)[br]赋值(Ratio,1)[br][br]