

let am = 0;
let m = 0;
sub Clock{//
	alternative(am)//Ip
	case( 4){m= 0;}//am4,m1
	case( 8){m= 1;}
	if(am==12){am=0;}//am120
	am++;//1b60
}

task ImgEffect(img,ImgX,ImgY,layer,Angle,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_SetAngle(obj,0,0,Angle);
	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;
}

task ShotTask(Obj,ObjX,ObjY,ObjAngle,ObjBullet,ObjDelay){
	Obj_SetX(Obj,ObjX);
	Obj_SetY(Obj,ObjY);
	Obj_SetAngle(Obj,ObjAngle);
	ObjShot_SetGraphic(Obj,ObjBullet);
	ObjShot_SetDelay(Obj,ObjDelay);
	yield;
}