//
// かきまぜ kakimaze.imw3
//
// デスクトップ画像をかき混ぜる
// クリックで終了する
//

CREATE
{
	// 枠なし、透明のスクリーンサイズのウィンドウに設定
	SetWinStyle(4) ;
	SetWinColor(-1) ;
	SetWinSize(SCR_W,SCR_H) ;
	SetWinPos(0,0,0) ;

	SetTimer(50) ;
	SubScreen(1,32,32) ;

	tp = 0 ; px = 0 ; py = 0 ;
}

// クリック、キー操作で終了
LBUTTONDOWN { end ; }
RBUTTONDOWN { end ; }
KEYDOWN{ end ; }


R_SHIFT{
	loop(4){
		CopyBMP(0,SCR_W-8,py,8,32,  1,0,0,8,32,0) ;
		CopyBMP(0,0,py,SCR_W-8,32,  0,8,py,SCR_W-8,32,0) ;
		CopyBMP(1,0,0,8,32,  0,0,py,8,32,0) ;
	}
}
D_SHIFT{
	loop(4){
		CopyBMP(0,px,SCR_H-8,32,8,  1,0,0,32,8,0) ;
		CopyBMP(0,px,0,32,SCR_H-8,  0,px,8,32,SCR_H-8,0) ;
		CopyBMP(1,0,0,32,8,  0,px,0,32,8,0) ;
	}
}
L_SHIFT{
	loop(4){
		CopyBMP(0,0,py,8,32,  1,0,0,8,32,0) ;
		CopyBMP(0,8,py,SCR_W-8,32,  0,0,py,SCR_W-8,32,0) ;
		CopyBMP(1,0,0,8,32,  0,SCR_W-8,py,8,32,0) ;
	}
}
U_SHIFT{
	loop(4){
		CopyBMP(0,px,0,32,8,  1,0,0,32,8,0) ;
		CopyBMP(0,px,8,32,SCR_H-8,  0,px,0,32,SCR_H-8,0) ;
		CopyBMP(1,0,0,32,8,  0,px,SCR_H-8,32,8,0) ;
	}
}
TIMER
{
	tp = tp + 1 ;
	if(tp >= 4){ tp = 0 ; }
	if(py > SCR_H){ py = 0 ; }
	if(px > SCR_W){ px = 0 ; }

	if(tp == 0){ call("R_SHIFT") ; py = py + 32 ; }
	if(tp == 1){ call("L_SHIFT") ; py = py + 32 ; }
	if(tp == 2){ call("D_SHIFT") ; px = px + 32 ; }
	if(tp == 3){ call("U_SHIFT") ; px = px + 32 ; }
}