--track0:ｻｲｽﾞ,0,1000,42,1
--track1:線幅,0,1000,2,1
--track2:字間,-9999,9999,200,1
--track3:行間,-9999,9999,200,1
--dialog:枠図形選択/fig,fig="四角形";透明度,local alp=0.50;回転Z,local ang=0.00;Color/col,col=0xffffff;
------------------------------------set
local t0=math.floor(obj.track0)
local t1=math.floor(obj.track1)
local t2=obj.track2/100
local t3=obj.track3/100
local sw=obj.screen_w
local sh=obj.screen_h
local oi=obj.index+1
------------------------------------script
if(obj.num>=1)then
	if(moji==null)then
		moji={}
	end

	if(#moji > obj.num)then
		for i=obj.num+1,#moji do
			moji[i]=null
		end
	end
end
moji[oi]={obj.ox,obj.oy,obj.oz,obj.zoom,obj.alpha,obj.rx,obj.ry,obj.rz,obj.cx,obj.cy,obj.cz,obj.aspect}
------------------------------------
local dx=moji[oi][1]
local dy=moji[oi][2]
local dz=moji[oi][3]
local zm=moji[oi][4]
local al=moji[oi][5]-alp
local rx=moji[oi][6]
local ry=moji[oi][7]
local rz=moji[oi][8]+ang
if(zm<0)then zm=0 end
if(zm>8)then zm=8 end
if(al<0)then al=0 end
if(al>1)then al=1 end

local dst="tmp" --*** tmp or obj or cache:xxxx
local src="obj" --*** frm or obj or tmp or cache:xxxx or image:xxxx
obj.copybuffer(dst,src)
------------------------------------
local fgs1=t0
local fgs2=t1
obj.load("figure",fig,col,fgs1,fgs2)
obj.effect()
obj.draw(dx*t2,dy*t3,dz,zm,al,rx,ry,rz)

obj.copybuffer(src,dst)
al=moji[oi][5]
rz=moji[oi][8]
if(zm<0)then zm=0 end
if(zm>8)then zm=8 end
if(al<0)then al=0 end
if(al>1)then al=1 end
obj.effect()
obj.draw(dx*t2,dy*t3,dz,zm,al,rx,ry,rz)
------------------------------------

--[[http://madeinpc.blog50.fc2.com/]]--