task CheatoLaserA1(x, y, speed, angle, acceleration, maxspeed, angularvelocity, graphic, yieldcount, delay){

	let obj = CreateShotA1(x, y, speed, angle, graphic, delay);

	ObjMove_SetAcceleration(obj, acceleration);
	ObjMove_SetMaxSpeed(obj, maxspeed);
	ObjMove_SetAngularVelocity(obj, angularvelocity);

	ObjRender_SetScaleXYZ(obj, 2, 2, 0);

	let endX = ObjMove_GetX(obj);
	let endY = ObjMove_GetY(obj);



	while(!Obj_IsDeleted(obj)){

		let size = 2;

		endX = ObjMove_GetX(obj);
		endY = ObjMove_GetY(obj);

		let angle1 = ObjMove_GetAngle(obj);

		let obj1 = CreateShotA1(endX, endY, 0, angle1, graphic, 0);
		ObjRender_SetScaleXYZ(obj1, size, size, 0);

		while(!Obj_IsDeleted(obj1)){
			ObjRender_SetScaleXYZ(obj1, size, size, 0);
			size-=0.02;

			if(size<=0){
				Obj_Delete(obj1);
				}
			yield;
			}


		loop(yieldcount){
			yield;
			}
		}
	}