Circling Object Bullet

	 task circlebullet(angle,radius,speed,graphic,delay){
	 let ID = Obj_Create(OBJ_SHOT);

	 Obj_SetPosition(ID,GetX+cos(angle)*radius,GetY+sin(angle)*radius);
	 ObjShot_SetGraphic(ID,graphic);
	 ObjShot_SetDelay(ID,delay);


	 while(!Obj_BeDeleted(ID)){

	 angle+=speed;

	 Obj_SetPosition(ID,GetX+cos(angle)*radius,GetY+sin(angle)*radius);

	 if(speed<0){
	 Obj_SetAngle(ID,angle-90);
	 }

	 if(speed>=0){
	 Obj_SetAngle(ID,angle+90);
	 }


	 yield;

	 }
	 }