#include "gdi32.as"
width ,,0,0
mref bm,67
dim tm,14
GetTextMetrics bm.4, varptr(tm)
if stat==0: dialog "GetTextMetrics() failed(1).": end
mes "tmHeight="+tm.0
mes "tmAscent="+tm.1
mes "tmDescent="+tm.2
screen 1,640,480,,0,100
color 0,255,0: boxf
color 0,0,255
line -1,16,639,16
line -1,17,639,17
line 16,-1,16,17
line 16*2,-1,16*2,17
line 16*3,-1,16*3,17
line 16*4,-1,16*4,17
line 16*5,-1,16*5,17
line 16*6,-1,16*6,17
color: pos 0,0
mes "あいうえおabgy デフォルトフォント デフォルトサイズ"
font msgothic
mes "あいうえおabgy MS ゴシック デフォルトサイズ"
font msgothic,12
mes "あいうえおabgy MS ゴシック 12"
font msgothic,16
mes "あいうえおabgy MS ゴシック 16"
font "FixedSys",0
mes "あいうえおabgy FixedSys 0"
font "FixedSys",31
mes "あいうえおabgy FixedSys 31"
font "FixedSys",32
mes "あいうえおabgy FixedSys 32"
screen 2,640,480,,0,300
gzoom 448,144,1,0,0,112,36