/********************************************************************************
					-------------------------
				 	 Ultra 64 MARIO Brothers
					-------------------------

					File		: pathcoinspark.s
					Description	: 
					Date		: 1995.
					Author		: H.yajima

 ********************************************************************************/


/*################*/
#ifdef ASSEMBLER
/*################*/

e_coinspark_object:
	p_initialize(option)
	p_setbit(flag,stf_moveON )
	p_softspritemodeON
	p_setf(animepositionY,25)
	p_animereset
	p_do(8)
		p_animeinc
	p_next
	p_do(2)
		p_program(s_coinspark)
	p_next
	p_killshape

e_coinspark:
	p_initialize(option)
	p_setbit(flag,stf_moveON )
	p_shapeDISABLE
	p_do(3)
		p_program(s_coinspark_make)
	p_next
	p_killshape

/*################*/
#else
/*################*/

extern void s_coinspark(void)
{
	s_set_scale(0.6);
}

extern void s_coinspark_make(void)
{
	StrategyRecord *stp;
	int	i;
	float	wk = 30;

	stp = s_makeobj_nowpos(execstp,S_spark,e_coinspark_object);
	stp->s[stw_worldX].f += Randomf()*wk-(wk/2);
	stp->s[stw_worldZ].f += Randomf()*wk-(wk/2);

}

/*################*/
#endif
/*################*/
/*===============================================================================
		end end end end end end end end 
===============================================================================*/