//
// ３Ｄデータファイルをロードして表示する
//

TIMER
{
	Set3DCenter(WIN_X/2,WIN_Y/2,1000) ; // ウインドウ中央を基準位置に設定

	// ここではＹ軸のみ回転させています
	// 適当に設定を変えてください
	Set3DLocalRotateX(0,0) ;
	Set3DLocalRotateY(0,10) ;
	Set3DLocalRotateZ(0,0) ;

	SelectScreen(0) ; // 裏画面に描画
	Box(0,0,WIN_X,WIN_Y,7,7) ;
	Draw3DPack(0) ;

	CopyBMP(0,0,0,WIN_X,WIN_Y,1,0,0,WIN_X,WIN_Y,0) ; // 裏画面を表画面にコピー
}
INIT
{
	// ファイル名を書き換えてください
	OpenFileRead("test.dat") ;
	Load3DPack(0) ;
	CloseFile ;

	Set3DWorldPosZ(0,2000) ;
}
CREATE
{
	SetTimer(100) ; // 0.1 秒にタイマーを設定

	SubScreen(SCR_X,SCR_Y) ; // 裏画面を準備

	Create3DPack(0,4000) ; // ３Ｄパックを準備
}