Kata - Forms of GeoGebra
入力バーに順に入力していくことで、GeoGebraの基礎スキルを身につけるとともに、GeoGebraに対する親近感を育む。その趣旨で、空手のように「型」を作ってみよう、という企画。
基本方針は以下の通り。
・無に始まり、無に終わる。
・入力バーに入力できるコマンドだけで勝負する。
・手数は七手以内とする。
・簡潔なコマンドで、多彩な描画を心がける。
随時作っていきます。
【六道】
一.Execute[Sequence["P_{"+t+"}=("+t+",0)",t,-6,6]]
二.Execute[Sequence["SetValue[P_{"+t+"},(x(P_{"+t+"}),x(P_{"+t+"})^2/10)]",t,-6,6]]
三.Execute[Sequence["SetValue[P_{"+t+"},(x(P_{"+t+"}),sin(x(P_{"+t+"}/ π )))]",t,-6,6]]
四.Execute[Sequence["SetValue[P_{"+t+"},(x(P_{"+t+"}),sgn(x(P_{"+t+"})))]",t,-6,6]]
五.Execute[Sequence["P_{"+t+"}=("+t+",0)",t,-6,6]]
六.Execute[Sequence["Delete[P_{"+t+"}]",t,-6,6]]
【夕焼け】
一.Base=Polygon[Corner[1],Corner[2],Corner[3],Corner[4]]
二.SetLineThickness[Base, 0]
三.SetColor[Base,135/255,206/255,235/255]
四.Execute[Sequence["Sky_{"+t+"}=Translate[Base,(0,-0.2*"+t+")]",t,1,40]]
五.Execute[Sequence["SetColor[Sky_{"+t+"},255/255,153/255,102/255]",t,1,40]]
六.Execute[Sequence["Delete[Sky_{"+t+"}]",t,1,40]]
七.Delete[Base]