▶ 実 行
▶ 実行
クリア
カメのアナログ時計
by 山下壮一朗
CX=150 CY=150 「針描画」を1秒毎。 ●針描画とは 今を「:」で区切る。 時=それ[0] 分=それ[1] 秒=それ[2] [0,0,300,300]の描画クリア。 角度=秒÷60×360 [CX, CY]へカメ起点移動。 角度にカメ角度設定。 100だけカメ進む。 ここまで。 CW=300 CH=300 CX=CW÷2 CY=CH÷2 LT=5 カメ作成。 0にカメ速度設定。 「時計描画」を1秒毎。 ●時計描画 盤描画。 今を「:」で区切る。 時=それ[0] 分=それ[1] 秒=それ[2] 時角度=(時%12)÷12×360 分角度=分÷60×360 秒角度=秒÷60×360 # 針を描画 --- (*4) 黒色の12を(CX×0.5)と時角度で針描画。 赤色の8を(CX×0.8)と分角度で針描画。 青色の4をCXと秒角度で針描画。 ここまで。 ●(色のサイズを長さと角度で)針描画 [LT+CX,LT+CY]へカメ起点移動。 色にカメペン色設定。 サイズにカメペンサイズ設定。 角度にカメ角度設定。 長さだけカメ進む。 90だけカメ右回転。 ここまで。 ●盤描画 5に線太設定。 赤色に塗色設定。 黒色に線色設定。 [LT+CX,LT+CY]へCXの円描画。 ここまで。