ReimuA Modifications

	task Needle(xpos,ypos,speed,angle,graphic,damage){
		let obj_needle = Obj_Create(OBJ_SHOT);
		let shotx = xpos;
		let shoty = ypos;
		Obj_SetPosition(obj_needle,xpos,ypos);
		Obj_SetSpeed(obj_needle,speed);
		Obj_SetAngle(obj_needle,angle);
		Obj_SetAlpha(obj_needle,80);
		ObjShot_SetGraphic(obj_needle,graphic);
		ObjShot_SetDamage(obj_needle,damage);
		ObjShot_SetPenetration(obj_needle,1);
		while(!Obj_BeDeleted(obj_needle)){
			shoty -= speed;
			yield;
		}
		ShotEffect(shotx,shoty-10,graphic+10,270,angle);
	}
	task ShotEffect(x,y,graphic,angle,direction){
		let alpha = 150;
		let xpos = x;
		let ypos = y;
		let shoteffect = Obj_Create(OBJ_SHOT);
		angle += rand(-15,15);
		Obj_SetPosition(shoteffect,x,y);
		Obj_SetAngle(shoteffect,angle);
		Obj_SetAlpha(shoteffect,alpha);
		Obj_SetCollisionToPlayer(shoteffect,false);
		Obj_SetCollisionToObject(shoteffect,false);
		ObjShot_SetBombResist(shoteffect,true);
		ObjShot_SetGraphic(shoteffect,graphic);
		ObjShot_SetDamage(shoteffect,0);
		ObjShot_SetPenetration(shoteffect,1);
		ObjShot_ToItem(shoteffect,false);
		loop(10){
			Obj_SetAlpha(shoteffect,alpha);
			Obj_SetY(shoteffect,ypos);
			alpha -= 5;
			xpos += 2*cos(direction);
			ypos += 2*sin(direction);
			yield;
		}
		Obj_Delete(shoteffect);
	}