SLIC-Reference : : HasAdvance  

SFN_ERROR Slic_HasAdvance::Call(SlicArgList *args)
{
	if (args->Count() != 2)
		return SFN_ERROR_NUM_ARGS;
	
	sint32 player;

	if(!args->GetPlayer(0, player))
		return SFN_ERROR_TYPE_ARGS;

	//Added by Martin Ghmann to overload this function to allow also advance
	//indices directly instead of advance strings only.
	sint32 adv;
	if(args->m_argValue[1].m_type == SA_TYPE_STRING){
		for(adv = 0; adv < g_theAdvanceDB->NumRecords(); adv++) {
			if(g_theAdvanceDB->Get(adv)->m_name == args->m_argValue[1].m_int)
				break;
		}
	}
	else if(!args->GetInt(1, adv))
		return SFN_ERROR_TYPE_ARGS;

	if(adv >= g_theAdvanceDB->NumRecords()) {
		return SFN_ERROR_NOT_ADVANCE;
	}

	if(player < 0 || player >= k_MAX_PLAYERS)
		return SFN_ERROR_OUT_OF_RANGE;

	if(!g_player[player]) {
		return SFN_ERROR_DEAD_PLAYER;
	}

	m_result.m_int = g_player[player]->HasAdvance(adv);
	DPRINTF(k_DBG_SLIC, ("Slic_HasAdvance: %d\n", m_result.m_int));
	return SFN_ERROR_OK;
}