h

task Trail(x,y,dir)
		{
			let fcount = 0;
			let obj_trail = Obj_Create(OBJ_EFFECT);
			Obj_SetAutoDelete (obj_trail,true);
			Obj_SetPosition(obj_trail,x,y);
			Obj_SetSpeed(obj_trail,0);
			Obj_SetAngle(obj_trail,dir);
			ObjEffect_SetRenderState(obj_trail,ALPHA);
			Obj_SetAlpha(obj_trail,10);
			ObjEffect_SetTexture(obj_trail,plshot);
			ObjEffect_SetPrimitiveType(obj_trail,PRIMITIVE_TRIANGLEFAN);
			ObjEffect_CreateVertex(obj_trail,4);

			ObjEffect_SetVertexUV(obj_trail,0,1,177);
			ObjEffect_SetVertexUV(obj_trail,1,15,177);
			ObjEffect_SetVertexUV(obj_trail,2,15,203);
			ObjEffect_SetVertexUV(obj_trail,3,1,203);

			ObjEffect_SetVertexXY(obj_trail,0,-8,-16);
			ObjEffect_SetVertexXY(obj_trail,1,8,-16);
			ObjEffect_SetVertexXY(obj_trail,2,8,16);
			ObjEffect_SetVertexXY(obj_trail,3,-8,16);
			loop(5)
			{

				if (fcount >= 0 && fcount < 3)
				{
					ObjEffect_SetVertexUV(obj_trail,0,1,177);
					ObjEffect_SetVertexUV(obj_trail,1,15,177);
					ObjEffect_SetVertexUV(obj_trail,2,15,203);
					ObjEffect_SetVertexUV(obj_trail,3,1,203);
					fcount ++;
				}

				if (fcount >= 3 && fcount < 6)
				{
					ObjEffect_SetVertexUV(obj_trail,0,1,150);
					ObjEffect_SetVertexUV(obj_trail,1,15,150);
					ObjEffect_SetVertexUV(obj_trail,2,15,176);
					ObjEffect_SetVertexUV(obj_trail,3,1,176);
					fcount ++;
				}

				if (fcount >= 6 && fcount < 9)
				{
					ObjEffect_SetVertexUV(obj_trail,0,1,123);
					ObjEffect_SetVertexUV(obj_trail,1,15,123);
					ObjEffect_SetVertexUV(obj_trail,2,15,149);
					ObjEffect_SetVertexUV(obj_trail,3,1,149);
					fcount ++;
				}

				if (fcount >= 9)
				{
					Obj_Delete(obj_trail);
					return;
				}
				yield;
			}
		}