随手翻：任务执行器分配任务给行进距离最短的任务执行器

任务分配器的pass to选项，返回的是一个端口值。将任务分配给与该中间端口连接的任务执行器。
以下为flexsim17.1自带，寻找行进距离最短的任务分配器：

1. treenode tasksequence = param(1);
   
2. Object current = ownerobject(c);
   . o% H- o3 P  a
3. /**找到距离最近的任务执行器*/
   
4. /**如果任务执行器在网络路径上，则计算网络路径的距离，否则计算实体中心点间距。*/
   
5. double curmin = GLOBAL_UNREACHABLE;
   1 B, s* K. \7 D1 d3 P
6. int minindex = 0;
   * E: _9 m- f' A6 t) }
7. treenode destination = NULL;
   & N7 y( G+ b. V) l$ i* U/ M9 r0 ~
8. for (int taskrank = 1; taskrank <= gettotalnroftasks(tasksequence) && destination == NULL; taskrank++)
   ' Z. p, [  Z4 y  Z  E. g
9. {  // 找到第一个行进任务，并获取行进目的地。&& destination == NULL确保一旦找到行进目的地就退出for循环。
   ( V7 H* s; G/ v" P+ h. i
10.         if (gettasktype(tasksequence,taskrank) == TASKTYPE_TRAVEL)
    2 m4 T+ J3 i) R2 k/ |9 p
11.                 destination = gettaskinvolved(tasksequence,taskrank,1);
    
12. }
    
13. 
    
14. if (destination==NULL) // 如果没有行进任务，把任务传递给第一个可用任务执行器。
    ( Y4 t. @% p& Y, L
15.         return 0;
    
16. 
    5 m" H3 R( D& _/ S1 y+ U
17. //如果有行进目的地，则遍历所有任务执行器，寻找距离最近的那个。
    
18. for (int index = 1; index <= current.outObjects.length; index++)
    7 @& d2 c" x8 X% r6 J/ s+ ~
19. {
    
20.         treenode curobj = current.outObjects[index];
    
21.         if (curobj && isclasstype(curobj, CLASSTYPE_TASKEXECUTER))
    2 @3 t  D% F! e: h0 Q  W
22.         //中间端口有连接实体，并且该实体为任务执行器
    
23.         {
    ! s- Z+ U  U$ p8 N" y( G
24.                 double curdist = distancetotravel(curobj, destination);
    0 S1 u/ ^  ]) I
25.                 //计算任务执行器和目的地之间的距离
      Y# e# O2 ^- e+ H5 C+ G
26.                 if (curdist != GLOBAL_UNREACHABLE && (curmin == GLOBAL_UNREACHABLE || curmin > curdist))
    : I* r5 @' h) i- F& p- d4 n
27.                 {//如果计算出来的距离小于curmin,则更新curmin，把当前距离作为最小距离。
    ; b# x: R7 F2 v% L
28.                         curmin = curdist;
    
29.                         minindex = index;
    ( Y/ A/ v7 a) V' r" H. F4 e- n
30.                 }
    
31.         }
    % A3 v5 d6 H6 c$ D
32. }
    ' t5 `9 t3 e, X6 U7 o
33. 
    " K( W7 w! H+ B5 c
34. return minindex;
    * d/ G6 |; s# n0 Q* p/ j
35. //返回minindex，距离最近的那个任务执行器在任务分配器上的中间端口号。

复制代码

" a$ F$ v0 Y0 k1 J
随手翻，不保证正确性、可读性。

谢谢大神的分享