「Line figure」の編集履歴（バックアップ）一覧はこちら

「Line figure」(2010/04/05 (月) 12:55:13) の最新版変更点

追加された行は緑色になります。

削除された行は赤色になります。

このページではライン図形等を載せていく予定。

&bold(){--ラインフォント(表示位置X,表示位置Y,サイズX,サイズY)}
*&ref(EiSu.jpg)
[[英数字ラインフォント_b>http://www2.atwiki.jp/black_pepper?cmd=upload&act=open&pageid=27&file=%E8%8B%B1%E6%95%B0%E5%AD%97%E3%83%A9%E3%82%A4%E3%83%B3%E3%83%95%E3%82%A9%E3%83%B3%E3%83%88_b.rcd]]<1とRを修正。
量が多すぎるのでファイルにまとめました。

&bold(){--数字フォント表示処理(表示する数値0-9,表示位置X,表示位置Y,サイズX,サイズY)}
	function _NUM(no,px,py,sx,sz)
		if no==0 then LET_0(px,py,sx,sz) end
		if no==1 then LET_1(px,py,sx,sz) end
		if no==2 then LET_2(px,py,sx,sz) end
		if no==3 then LET_3(px,py,sx,sz) end
		if no==4 then LET_4(px,py,sx,sz) end
		if no==5 then LET_5(px,py,sx,sz) end
		if no==6 then LET_6(px,py,sx,sz) end
		if no==7 then LET_7(px,py,sx,sz) end
		if no==8 then LET_8(px,py,sx,sz) end
		if no==9 then LET_9(px,py,sx,sz) end
	end

&bold(){--D(電卓)フォント(表示する数値0-9,表示位置X,表示位置Y,サイズX,サイズY)}
		--フォントデータ
		font_0,font_1,font_2,font_3,font_4={1,1,1,0,1,1,1},{0,0,0,0,0,1,1},{0,1,1,1,1,1,0},{0,0,1,1,1,1,1},{1,0,0,1,0,1,1}
		font_5,font_6,font_7,font_8,font_9={1,0,1,1,1,0,1},{1,1,1,1,1,0,1},{1,0,1,0,0,1,1},{1,1,1,1,1,1,1},{1,0,1,1,1,1,1}
		font_F={font_0,font_1,font_2,font_3,font_4,font_5,font_6,font_7,font_8,font_9}
	function D_FONT(num,px,py,sx,sy)
		num=math.floor(_LIMIT(num+1,1,10))
		if font_F[num][1]>0 then dummy=_MOVE2D(px,py)         dummy=_LINE2D(px,-0.1*sy+py) end
		if font_F[num][2]>0 then dummy=_MOVE2D(px,-0.1*sy+py) dummy=_LINE2D(px,-0.2*sy+py) end
		if font_F[num][3]>0 then dummy=_MOVE2D(px,py)         dummy=_LINE2D(0.1*sx+px,py)  end
		if font_F[num][4]>0 then dummy=_MOVE2D(px,-0.1*sy+py) dummy=_LINE2D(0.1*sx+px,-0.1*sy+py) end
		if font_F[num][5]>0 then dummy=_MOVE2D(px,-0.2*sy+py) dummy=_LINE2D(0.1*sx+px,-0.2*sy+py) end
		if font_F[num][6]>0 then dummy=_MOVE2D(0.1*sx+px, py) dummy=_LINE2D(0.1*sx+px,-0.1*sy+py) end
		if font_F[num][7]>0 then dummy=_MOVE2D(0.1*sx+px,-0.1*sy+py) dummy=_LINE2D(0.1*sx+px,-0.2*sy+py) end
	end

&bold(){--開発用汎用図形}
	--マーク・十字
	function MK(px,py)
		_MOVE2D(px,      py+0.05) _LINE2D(px,      py-0.05)
		_MOVE2D(px+0.05,    0.00) _LINE2D(px-0.05,    0.00) end
	--マーク・×印
	function MK2(px,py)
		_MOVE2D(px+0.05, py+0.05) _LINE2D(px-0.05, py-0.05)
		_MOVE2D(px-0.05, py+0.05) _LINE2D(px+0.05, py-0.05) end
	--線
	function SN(ax,ay,bx,by)
		_MOVE2D(ax,ay) _LINE2D(bx,by) end
	--円
	function EN(px,py,si)
		for Loop=0,6.28318530717958648,0.314159265358979324 do
			local Dir_X,Dir_Y = math.cos(Loop),math.sin(Loop)
			local Loopi=Loop+0.314159265358979324
			local Dir_X2,Dir_Y2 = math.cos(Loopi),math.sin(Loopi)
			_MOVE2D(px-Dir_X *si, py-Dir_Y *si)
			_LINE2D(px-Dir_X2*si, py-Dir_Y2*si) end end

このページではライン図形等を載せていく予定。

&bold(){--ラインフォント(表示位置X,表示位置Y,サイズX,サイズY)}
*&ref(EiSu.jpg)
[[英数字ラインフォント_b>http://www2.atwiki.jp/black_pepper?cmd=upload&act=open&pageid=27&file=%E8%8B%B1%E6%95%B0%E5%AD%97%E3%83%A9%E3%82%A4%E3%83%B3%E3%83%95%E3%82%A9%E3%83%B3%E3%83%88_b.rcd]]<1とRを修正。
量が多すぎるのでファイルにまとめました。

&bold(){--数字フォント表示処理(表示する数値0-9,表示位置X,表示位置Y,サイズX,サイズY)}
	function _NUM(no,px,py,sx,sz)
		if no==0 then LET_0(px,py,sx,sz) end
		if no==1 then LET_1(px,py,sx,sz) end
		if no==2 then LET_2(px,py,sx,sz) end
		if no==3 then LET_3(px,py,sx,sz) end
		if no==4 then LET_4(px,py,sx,sz) end
		if no==5 then LET_5(px,py,sx,sz) end
		if no==6 then LET_6(px,py,sx,sz) end
		if no==7 then LET_7(px,py,sx,sz) end
		if no==8 then LET_8(px,py,sx,sz) end
		if no==9 then LET_9(px,py,sx,sz) end
	end

&bold(){--D(電卓)フォント(表示する数値0-9,表示位置X,表示位置Y,サイズX,サイズY)}
		--フォントデータ
		font_0,font_1,font_2,font_3,font_4={1,1,1,0,1,1,1},{0,0,0,0,0,1,1},{0,1,1,1,1,1,0},{0,0,1,1,1,1,1},{1,0,0,1,0,1,1}
		font_5,font_6,font_7,font_8,font_9={1,0,1,1,1,0,1},{1,1,1,1,1,0,1},{1,0,1,0,0,1,1},{1,1,1,1,1,1,1},{1,0,1,1,1,1,1}
		font_F={font_0,font_1,font_2,font_3,font_4,font_5,font_6,font_7,font_8,font_9}
	function D_FONT(num,px,py,sx,sy)
		num=math.floor(_LIMIT(num+1,1,10))
		if font_F[num][1]>0 then dummy=_MOVE2D(px,py)         dummy=_LINE2D(px,-0.1*sy+py) end
		if font_F[num][2]>0 then dummy=_MOVE2D(px,-0.1*sy+py) dummy=_LINE2D(px,-0.2*sy+py) end
		if font_F[num][3]>0 then dummy=_MOVE2D(px,py)         dummy=_LINE2D(0.1*sx+px,py)  end
		if font_F[num][4]>0 then dummy=_MOVE2D(px,-0.1*sy+py) dummy=_LINE2D(0.1*sx+px,-0.1*sy+py) end
		if font_F[num][5]>0 then dummy=_MOVE2D(px,-0.2*sy+py) dummy=_LINE2D(0.1*sx+px,-0.2*sy+py) end
		if font_F[num][6]>0 then dummy=_MOVE2D(0.1*sx+px, py) dummy=_LINE2D(0.1*sx+px,-0.1*sy+py) end
		if font_F[num][7]>0 then dummy=_MOVE2D(0.1*sx+px,-0.1*sy+py) dummy=_LINE2D(0.1*sx+px,-0.2*sy+py) end
	end

&bold(){--開発用汎用図形}
	--マーク・十字
	function MK(px,py)
		_MOVE2D(px,      py+0.05) _LINE2D(px,      py-0.05)
		_MOVE2D(px+0.05, py     ) _LINE2D(px-0.05, py     ) end
	--マーク・×印
	function MK2(px,py)
		_MOVE2D(px+0.05, py+0.05) _LINE2D(px-0.05, py-0.05)
		_MOVE2D(px-0.05, py+0.05) _LINE2D(px+0.05, py-0.05) end
	--線
	function SN(ax,ay,bx,by)
		_MOVE2D(ax,ay) _LINE2D(bx,by) end
	--円
	function EN(px,py,si)
		for Loop=0,6.28318530717958648,0.314159265358979324 do
			local Dir_X,Dir_Y = math.cos(Loop),math.sin(Loop)
			local Loopi=Loop+0.314159265358979324
			local Dir_X2,Dir_Y2 = math.cos(Loopi),math.sin(Loopi)
			_MOVE2D(px-Dir_X *si, py-Dir_Y *si)
			_LINE2D(px-Dir_X2*si, py-Dir_Y2*si) end end