// 文字表示サンプルプログラム

PAINT
{
	SetFont("ＭＳ 明朝",0) ;

	x = 10 ; y = 10 ;
	Print(x,y,0,8,16,0,"文字表示サンプル") ;

	// 白ぬき文字
	x = 30 ; y = 50 ; w = 16 ; h = 32 ;
	loop(3){
		loop(3){
			Print(x,y,0,w,h,0,"白ぬき文字") ;
			x = x + 1 ;
		}
		y = y + 1 ; x = 30 ;
	}
	x = 30 ; y = 50 ;
	Print(x+1,y+1,0,w,h,7,"白ぬき文字") ;

	// 影つき
	x = 30 ; y = 100 ;
	Print(x+6,y+4,0,w,h,15,"影つき１") ;
	Print(x,y,0,w,h,0,"影つき１") ;

	x = 30 ; y = 150 ;
	SetFont("ＭＳ 明朝",3) ;
	Print(x,y,0,w,h,15,"影つき２") ;
	SetFont("ＭＳ 明朝",2) ;
	Print(x,y,0,w,h,0,"影つき２") ;

	// 立体文字
	x = 30 ; y = 200 ;
	loop(5){
		Print(x,y,0,w,h,14,"立体文字１") ;
		x = x + 1 ; y = y + 1 ;
	}
	x = 30 ; y = 200 ;
	Print(x,y,0,w,h,15,"立体文字１") ;

	x = 30 ; y = 250 ;
	Box(x,y,x+w*10,y+h,15,15) ;

	Print(x,y,0,w,h,7,"立体文字２") ;
	Print(x+2,y+2,0,w,h,14,"立体文字２") ;
	Print(x+1,y+1,0,w,h,15,"立体文字２") ;
}
TIMER
{
	Box(200,50,400,250,1,7) ;
	r = (r + 10) % 360 ;	
	Print(300+20,150-20,r,16,32,1,"回転") ;
	Print(300-50,150+50,-r*2,8,16,2,"文字列") ;
}
CREATE
{
	SetTimer(100) ; // 0.1 秒タイマー
	r = 0 ;
}