20250422[br]修改自：[url=https://www.geogebra.org/u/fatty_zhu]朱亮[/url] — 2017年8月22日 - 下午1:17 的 https://www.geogebra.org/m/X6ysEvmH

[br]n=floor(sqrt(m+1))[br][br]##点阵[br]list1=扁平列表(序列(如果(余式(k,2)≟0,序列(描点(折线((0,k),(k,k),(k,0)),((i)/(2 k))),i,0,2 k),序列(描点(折线((k,0),(k,k),(0,k)),((i)/(2 k))),i,0,2 k)),k,0,n))[br],[br]k=0，[br]k=1，折线((1,0),(1,1),(0,1))[br]k=2，折线((0,2),(2,2),(2,0))[br]k=3，折线((3,0),(3,3),(0,3))[br]k=4，折线((0,4),(4,4),(4,0))[br]...[br][br]##提取前m个[br]list5=提取(list1,1,m)[br][br]##箭头[br]list3=序列(向量(list1(i),list1(i+1)),i,1,m-1)[br][br]##序号数字文本[br]list4=序列(文本(i,list1(i)+(0.2,0.3)),i,1,m)[br][br][br]回字形也可以用这样的方法