boxメソッドの修正版を作ってみました
前に作ったboxメソッドの色の指定がどうしても上手くいかないので、lineを４本描く方法で、とりあえずの修正版を作ってみた。[使い方]
描画！ (始点x座標)(始点y座標)(対角x座標)(対角y座標)(表示色)(線の太さ) box
640×480の画面に、ランダムな四角形を30個描画してみる。
//boxメソッド(修正版) テスト
描画：box=[|x1 y1 x2 y2 color size|
タートル! 作る (size)線の太さ 消える ペンなし (x1)(y1)位置 ペンあり (x2)(y1)位置 図形にする (color)塗る.
タートル! 作る (size)線の太さ 消える ペンなし (x2)(y1)位置 ペンあり (x2)(y2)位置 図形にする (color)塗る.
タートル! 作る (size)線の太さ 消える ペンなし (x2)(y2)位置 ペンあり (x1)(y2)位置 図形にする (color)塗る.
タートル! 作る (size)線の太さ 消える ペンなし (x1)(y2)位置 ペンあり (x1)(y1)位置 図形にする (color)塗る.
].
nmax=30. xmax=640. ymax=480.
[
color=色! (0)(random(255))(0) 作る.
描画！ (random(xmax)-xmax/2)(random(ymax)-ymax/2)(random(xmax)-xmax/2)(random(ymax)-ymax/2)(color)(1) box
]! (nmax) 繰り返す.
//--------- ここまで ----------
0 Comments:
コメントを投稿
<< Home