Method ParseLoop

code/icarus/Sequencer.cpp:585–637

*/

int CSequencer::ParseLoop( CBlock *block, bstream_t *bstream , CIcarus* icarus)
{
	IGameInterface* game = icarus->GetGame();
	CSequence		*sequence;
	CBlockMember	*bm;
	float			min, max;
	int				rIter;
	int				memberNum = 0;

	//Set the parent
	sequence = AddSequence( m_curSequence, m_curSequence, ( CSequence::SQ_LOOP | CSequence::SQ_RETAIN ), icarus );

	assert( sequence );
	if ( sequence == NULL )
	{
		game->DebugPrint(IGameInterface::WL_ERROR, "ParseLoop : failed to allocate container sequence" );
		block->Free(icarus);
		delete block;
		block = NULL;
		return SEQ_FAILED;
	}

	m_curSequence->AddChild( sequence );

	//Set the number of iterations of this sequence

	bm = block->GetMember( memberNum++ );

	if ( bm->GetID() == CIcarus::ID_RANDOM )
	{
		//Parse out the random number
		min = *(float *) block->GetMemberData( memberNum++ );
		max = *(float *) block->GetMemberData( memberNum++ );

		rIter = (int) game->Random( min, max );
		sequence->SetIterations( rIter );
	}
	else
	{
		sequence->SetIterations ( (int) (*(float *) bm->GetData()) );
	}

	//Add a unique loop identifier to the block for reference later
	block->Write( CIcarus::TK_FLOAT, (float) sequence->GetID(), icarus );

	//Push this onto the stack to mark the loop entrance
	PushCommand( block, CSequence::PUSH_FRONT );

	//Recursively obtain the loop
	Route( sequence, bstream , icarus);

	return SEQ_OK;
}

/*
========================