AnyLogic智能交通灯相位控制：延迟实现与密度排序循环问题求助

需求与问题 #

我正在AnyLogic中模拟基于交叉口车辆密度优先的智能交通灯系统，核心逻辑：

1. 检测各车道车辆密度，按密度排序车道
2. 判断密度是否存在显著差异：
   • 存在差异：按密度优先级循环切换交通灯相位
   • 无差异：执行南北→东西的常规循环

目前遇到两类问题：

• 在自定义函数trafficLightControl中无法有效引入延迟，导致所有交通灯相位同步切换
• 用State Chart控制时序时，常规循环易实现，但不知道如何对排序后的车道进行循环相位控制

现有实现代码 #

int NorthRoadDensity = 10;
int SouthRoadDensity = 10;
int WestRoadDensity = 10;
int EastRoadDensity = 10;

int[] densities = {NorthRoadDensity, SouthRoadDensity, WestRoadDensity, EastRoadDensity};
int[] laneOrder = {0, 1, 2, 3};
int densityThreshold = 5;

void trafficLightControl()
{
  // 车道排序：按密度降序
  for (int i = 0; i < densities.length - 1; i++) 
  {
    for (int j = 0; j < densities.length - i - 1; j++) 
      {
        if (densities[j] < densities[j + 1]) 
        {
          // 交换密度值
          int tempDensity = densities[j];
          densities[j] = densities[j + 1];
          densities[j + 1] = tempDensity;
  
          // 交换对应车道序号
          int tempLane = laneOrder[j];
          laneOrder[j] = laneOrder[j + 1];
          laneOrder[j + 1] = tempLane;
          
          }
      }
  }
  
  boolean significantDifference = (densities[0] - densities[3]) >= densityThreshold;
  
  // 密度差异显著时，按优先级切换相位
  if (significantDifference == true)
  {
    for (int i = 0; i < laneOrder.length; i++) 
    {
      switch (laneOrder[i]) 
      {
        case 0: // 北车道
              stopLineNorth.setSignal(SIGNAL_GREEN);
              stopLineSouth.setSignal(SIGNAL_RED);
              stopLineWest.setSignal(SIGNAL_RED);
              stopLineEast.setSignal(SIGNAL_RED);
                    
          break;
            
        case 1: // 南车道
              stopLineNorth.setSignal(SIGNAL_RED);
              stopLineSouth.setSignal(SIGNAL_GREEN);
              stopLineWest.setSignal(SIGNAL_RED);
              stopLineEast.setSignal(SIGNAL_RED);
                    
          break;
            
        case 2: // 西车道
              stopLineNorth.setSignal(SIGNAL_RED);
              stopLineSouth.setSignal(SIGNAL_RED);
              stopLineWest.setSignal(SIGNAL_GREEN);
              stopLineEast.setSignal(SIGNAL_RED);
                   
          break;
            
        case 3: // 东车道
              stopLineNorth.setSignal(SIGNAL_RED);
              stopLineSouth.setSignal(SIGNAL_RED);
              stopLineWest.setSignal(SIGNAL_RED);
              stopLineEast.setSignal(SIGNAL_GREEN);
                    
          break;
      }
      // 等待时间 = densities[0] * 3;
    }
  }
  
  // 无差异时执行常规循环
  else
  {
    // 北绿灯
    stopLineNorth.setSignal(SIGNAL_GREEN);
    stopLineSouth.setSignal(SIGNAL_RED);
    stopLineWest.setSignal(SIGNAL_RED);
    stopLineEast.setSignal(SIGNAL_RED);
    
    // 等待时间 = 60
    
    // 南绿灯
    stopLineNorth.setSignal(SIGNAL_RED);
    stopLineSouth.setSignal(SIGNAL_GREEN);
    stopLineWest.setSignal(SIGNAL_RED);
    stopLineEast.setSignal(SIGNAL_RED);
    
    // 等待时间 = 60
    
    // 西绿灯
    stopLineNorth.setSignal(SIGNAL_RED);
    stopLineSouth.setSignal(SIGNAL_RED);
    stopLineWest.setSignal(SIGNAL_GREEN);
    stopLineEast.setSignal(SIGNAL_RED);
    // 等待时间 = 60
    
    // 东绿灯
    stopLineNorth.setSignal(SIGNAL_RED);
    stopLineSouth.setSignal(SIGNAL_RED);
    stopLineWest.setSignal(SIGNAL_RED);
    stopLineEast.setSignal(SIGNAL_GREEN);
    // 等待时间 = 60
    
  }
}

问题解决方案 #

1. 自定义函数中引入延迟的问题 #

AnyLogic普通自定义函数为瞬时执行，无法直接添加延迟。要实现相位切换的时间间隔，必须改用事件或进程控制时序：

• 循环事件方案：
  创建一个Event，设置初始触发时间，在事件动作中执行单步相位切换。每次切换后，根据当前车道密度计算等待时间，通过event.setTime( time() + waitTime )设置下一次触发时间。循环执行直到所有优先级车道完成一轮切换，再重新计算密度排序。
• 流程图方案：
  用Delay模块实现相位等待时间，配合Loop模块遍历排序后的车道列表，依次执行绿灯设置→延迟→红灯切换的流程。

2. State Chart中实现排序车道的循环相位控制 #

通过动态状态转换实现排序车道的循环：

1. 创建主状态，包含PriorityCycle（密度差异显著时）和NormalCycle（常规循环）两个子状态。
2. PriorityCycle配置：
   • 初始动作：执行密度排序并存储laneOrder数组。
   • 添加Sequence子状态，或使用一个通用状态配合参数控制当前激活车道。
   • 每个相位状态动作：设置对应车道绿灯、其余红灯；添加Time Trigger，延迟时间到后触发转换到下一个车道相位。
   • 所有车道完成一轮切换后，回到PriorityCycle初始动作，重新计算密度并判断是否继续优先级循环。
3. 状态转换：
   • 主状态根据significantDifference变量在两个子状态间切换。
   • NormalCycle按固定顺序执行相位切换，用Time Trigger控制每个相位持续时间。

内容的提问来源于stack exchange，提问作者Rodel Gesulgon