ACLS VAR X0=200,Y0=120,L0=120 DEF C4 G,X,Y,L GCIRCLE X,Y,L IF G>3 THEN RETURN C4 G+1,X+L/2,Y,L/2 C4 G+1,X-L/2,Y,L/2 C4 G+1,X,Y-2*L/3,L/3 C4 G+1,X,Y+2*L/3,L/3 END C4 0,X0,Y0,L0

共有する

フォークする