Method CheckLoop

code/icarus/Sequencer.cpp:1646–1777

*/

void CSequencer::CheckLoop( CBlock **command , CIcarus* icarus)
{
	IGameInterface* game = icarus->GetGame();
	CBlockMember	*bm;
	CBlock			*block = *command;
	float			min, max;
	int				iterations;
	int				loopID;
	int				memberNum = 0;

	if ( block == NULL )
		return;

	//Check for a loop
	if ( block->GetBlockID() == CIcarus::ID_LOOP )
	{
		//Get the loop ID
		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++ );

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

		loopID = (int) (*(float *) block->GetMemberData( memberNum++ ));

		CSequence *loop = GetSequence( loopID );

		//TODO: Emit warning
		assert( loop );
		if ( loop == NULL )
		{
			game->DebugPrint(IGameInterface::WL_ERROR, "Unable to find 'loop' sequence!\n" );
			*command = NULL;
			return;
		}

		assert( loop->GetParent() );
		if ( loop->GetParent() == NULL )
		{
			*command = NULL;
			return;
		}

		//Restore the count if it has been lost
		loop->SetIterations( iterations );

		//Only save the loop command if the calling sequence is retained
		if ( m_curSequence->HasFlag( CSequence::SQ_RETAIN ) )
		{