SLIC-Reference : : GetUnitFromCell  

SFN_ERROR Slic_GetUnitFromCell::Call(SlicArgList *args)
{
	m_result.m_int = 0;
	if(args->Count() != 3) {
		return SFN_ERROR_NUM_ARGS;
	}

	MapPoint pos;
	if(!args->GetPos(0, pos))
		return SFN_ERROR_TYPE_ARGS;

	sint32 index;
	if(!args->GetInt(1, index))
		return SFN_ERROR_TYPE_ARGS;

	if(args->m_argValue[2].m_type != SA_TYPE_INT_VAR) {
		return SFN_ERROR_TYPE_ARGS;
	}

	Cell *cell = g_theWorld->GetCell(pos);

	if(index < 0 || index >= cell->GetNumUnits()) {
		return SFN_ERROR_OUT_OF_RANGE;
	}

	SlicSymbolData *sym = args->m_argValue[2].m_symbol;
	sym->SetUnit(cell->AccessUnit(index));
	m_result.m_int = 1;
	return SFN_ERROR_OK;
}