//ImageObj


let x =[0,n,n*2,n*3,n*4,n*5,n*6,n*7,n*8,n*9,n*10,n*11];//w

let am = 0;
let m = 0;
sub Clock{//
	alternative(am)//Ip
	case( 4){m= 0;}//am4,m1
	case( 8){m= 1;}
	case(12){m= 2;}
	if(am==16){am=0;}//am160
	am++;//?b?60
}

task PlayerImg(a,b,c,d){//@I
	ImgEffect(Img[0],GetPlayerX,GetPlayerY,4,a,b,c,d,2);//`Itask(?,@IXW,@IYW,w,k)
	yield;
}

task ObjImg(Xobj,Yobj,a,b,c,d){//I
	ImgEffect(Img[1],Xobj,Yobj,4,a,b,c,d,2);
	yield;
}

task ImgEffect(img,ImgX,ImgY,layer,a,b,c,d,Motion){//(?,IXW,IYW,w,a,b,c,d,k)
	let obj=Obj_Create(OBJ_EFFECT);//ݒuobj(OBJ_EFFECTך)
	Obj_SetPosition(obj,ImgX,ImgY);//IW(,X,Y)
	ObjEffect_SetTexture(obj,img);//I?(,?)
	ObjEffect_SetLayer(obj,layer);//Iw(,w[08])
	ObjEffect_SetPrimitiveType(obj,PRIMITIVE_TRIANGLESTRIP);//?
	ObjEffect_CreateVertex(obj,4);//_쐬
		loop(Motion){//k(2~15)
			let GraphicXY=[a,b,c,d];
			let Vx=(GraphicXY[2]-GraphicXY[0])/2;
			let Vy=(GraphicXY[3]-GraphicXY[1])/2;
				ObjEffect_SetVertexUV(obj,0,GraphicXY[0],GraphicXY[1]);
				ObjEffect_SetVertexUV(obj,1,GraphicXY[2],GraphicXY[1]);
				ObjEffect_SetVertexUV(obj,2,GraphicXY[0],GraphicXY[3]);
				ObjEffect_SetVertexUV(obj,3,GraphicXY[2],GraphicXY[3]);
				ObjEffect_SetVertexXY(obj,0,-Vx,-Vy);
				ObjEffect_SetVertexXY(obj,1,Vx,-Vy);
				ObjEffect_SetVertexXY(obj,2,-Vx,Vy);
				ObjEffect_SetVertexXY(obj,3,Vx,Vy);
			yield;
		}
	Obj_Delete(obj);//
	yield;
}