RCのためのLuaの関数を集めるスレ

1：name=NONE：2005/06/03(金) 13:35:07: Luaの関数はスクリプトより汎用性高いから、実はプログラミング初心者にはLuaを薦めたほうがいいんじゃないか？とおもった。
そこで、このスレに使いやすい関数を集めてみませんか？
2：name=NONE：2005/06/06(月) 02:43:27: 試しに作った十字ライン描画関数
意外に使いやすそうなのでのせてみる。
チップの半分が0.3であることに注意。

-- CrossLine() 十字ラインの描画
-- chip : 原点となるチップ番号
-- dis : 原点からのZ軸方向の距離
-- width : 幅
-- height: 高さ
-- col : 色
-- 使用例 : CrossLine(2, 1.5, 0.3, 0.3, 16711680)

function CrossLine(chip, dis, width, height, col)
dummy=_SETCOLOR(col)

dx=-_ZX(chip)*dis
dy=-_ZY(chip)*dis
dz=-_ZZ(chip)*dis

x=_XX(chip)*width
y=_XY(chip)*width
z=_XZ(chip)*width
dummy=_MOVE3D(_X(chip)+dx+x,_Y(chip)+dy+y,_Z(chip)+dz+z)
dummy=_LINE3D(_X(chip)+dx-x,_Y(chip)+dy-y,_Z(chip)+dz-z)
x=_YX(chip)*height
y=_YY(chip)*height
z=_YZ(chip)*height
dummy=_MOVE3D(_X(chip)+dx+x,_Y(chip)+dy+y,_Z(chip)+dz+z)
dummy=_LINE3D(_X(chip)+dx-x,_Y(chip)+dy-y,_Z(chip)+dz-z)
end
3：name=NONE：2005/06/06(月) 03:04:58: いきおいで載せてしまったが、もう少しだけすっきりさせときます。
Z方向の距離は好みで前方をプラスにしてあります。
使いやすいように適当に変えて使ってください。
ライン描画を使用しているので15B11に対応

-- CrossLine() 十字ラインの描画
-- chip : 原点となるチップ番号
-- dis : 原点からのZ軸方向の距離
-- width : 幅
-- height: 高さ
-- col : 色
-- 使用例 : CrossLine(2, 1.5, 0.3, 0.3, 16711680)
function CrossLine(chip, dis, width, height, col)
-- 色
dummy=_SETCOLOR(col)

-- 描画原点
cx=_X(chip)-_ZX(chip)*dis
cy=_Y(chip)-_ZY(chip)*dis
cz=_Z(chip)-_ZZ(chip)*dis

-- 横ライン
x=_XX(chip)*width
y=_XY(chip)*width
z=_XZ(chip)*width
dummy=_MOVE3D(cx+x, cy+y, cz+z)
dummy=_LINE3D(cx-x, cy-y, cz-z)

-- 縦ライン
x=_YX(chip)*height
y=_YY(chip)*height
z=_YZ(chip)*height
dummy=_MOVE3D(cx+x, cy+y, cz+z)
dummy=_LINE3D(cx-x, cy-y, cz-z)
end

※書き込む際の注意事項はこちら

※画像アップローダーはこちら

（画像を表示できるのは「画像リンクのサムネイル表示」がオンの掲示板に限ります）