/********************************************************************************
					-------------------------
				 	 Ultra 64 MARIO Brothers
					-------------------------

					File		: pathtwinkle.s
					Description	: 
					Date		: 1995.7.27
					Author		: H.yajima

 ********************************************************************************/


/*################*/
#ifdef ASSEMBLER
/*################*/
/********************************************************************************/
/*																				*/
/* << OPTION >> twinkle															*/
/*																				*/
/********************************************************************************/

e_mini_twinkle:
	p_initialize(effect)
	p_softspritemodeON
	p_setbit(flag,stf_moveON)
	p_animereset
	p_do(9)
		p_animeinc
	p_next
	p_killobj

e_twinkle_special:
	p_initialize(effect)
	p_setbit(flag,stf_moveON)
	p_while
		p_program(s_twinkle_special)
	p_loop

/********************************************************************************/
/*																				*/
/* << OPTION >> twinkle															*/
/*																				*/
/********************************************************************************/

e_twinkleanime:
	p_initialize(option)
	p_mother_clrbit(effect,stf_twinkle)
/*--
	p_wait(1)
	p_killshape
--*/
e_sparkanime2:
	p_initialize(effect)
	p_softspritemodeON
	p_setbit(flag,stf_moveON)
	p_setf(animepositionY,100/4)

	p_setf_random(work0,-200/4,400/4)
	p_WADDf(worldX,worldX,work0)
	p_setf_random(work0,-200/4,400/4)
	p_WADDf(worldZ,worldZ,work0)
	p_setf_random(work0,-200/4,400/4)
	p_WADDf(worldY,worldY,work0)

	p_animereset
	p_do(12)
		p_animeinc
	p_next	
	p_killshape


/*################*/
#else
/*################*/

/********************************************************************************/
/*																				*/
/********************************************************************************/

extern void s_twinkle_special(void)
{
	 StrategyRecord *stp;

	if ( ( stp = s_makeobj_effect(0,1,execstp,S_mini_twinkle,e_mini_twinkle)) != NULL ){
		 s_random_XYZ_offset(stp,90);
		 s_random_scale(stp,1.0,0);
	}

	 if ( obj_timer > 1 )	s_remove_obj(execstp);

}



/*################*/
#endif
/*################*/
/*===============================================================================
		end end end end end end end end 
===============================================================================*/

