「Line figure」の編集履歴(バックアップ)一覧はこちら
Line figure - (2009/11/11 (水) 19:04:07) の1つ前との変更点
追加された行は緑色になります。
削除された行は赤色になります。
このページではライン図形等を載せていく予定。
まだまだ発展途上です。
&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(){--ラインフォント(表示位置X,表示位置Y,サイズX,サイズY)}
[[英数字ラインフォント>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.rcd]]
量が多すぎるのでファイルにまとめました。
&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