flexsim 如何使用server命令建立服务器

如何使用server命令建立服务器

代码如下，可是连接不上

1. /**Custom Code*/
   $ y$ l# ]1 _/ u' @
2. treenode current = ownerobject(c);
   
3. 
   2 S+ ^& V$ x' O+ C& j6 h4 ]
4. senddelayedmessage(current,0.5,NULL);
   % {. _% Z+ o- Z: ~3 R
5. //SERVER:初始化
   ) X1 [+ W3 k/ m" f
6. if(getlabelnum(current,"startserver"))
   & s: y+ C3 U. x" k- n$ i
7. {
   2 |) j% a/ Q% [0 N3 r
8.         setlabelnum(current,"startserver",0);
   ) C. D! f" |% C( D$ u/ w3 A
9.        
   . ]/ L, U+ ?, {2 K5 }' {
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    5 ?" t# _5 R7 h9 {; A$ v
11.                 return 0;
    " ?7 n; p  P* O8 A1 I: H
12.        
    
13.         int m=getlabelnum(current,"serverport");
    
14.      servercreatemain(m);
    
15.      
    
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    0 ?% q" w* A" q, t4 f
17.      pt("server()成功！");pr();
    
18. }
    
19. 
    
20. 
    ! Q0 a: d' f6 ?3 V! \4 Q; ]/ |
21. if(getlabelnum(current,"startserver"))
    
22. {
    0 W" {) s: @% I# ~0 T$ R
23. 
    
24.     int client = serveraccept(0);
    
25. }
    ) K/ s  T* q# ]9 p- {% Y
26. 
    : I: r) M' n; s- w0 ]
27. //关闭连接
    
28. int client = serveraccept(0);        
    
29. if(getlabelnum(current,"servercloseconnection"))
    
30. {
    / P' l6 S- ^1 }( k% P1 z! c
31.         setlabelnum(current,"servercloseconnection",0);
    6 m1 ]& A9 f# \$ ]/ u
32.        
      p, E* F8 s$ t% x, b, y) [
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
34.                 return 0;
    * B6 s4 z# V% M  C
35.                
    $ ?0 G& r7 H2 X
36.      servercloseconnection(client);
    8 o; \$ |5 V# d- P
37.    
    
38.      pt("servercloseconnection()成功！");pr();   
    # ]5 ]5 d' ?& K$ j/ F- I
39. 
    
40. }
    
41. 
    
42. //关闭SERVER
    
43. 
    % s6 ]# e8 k' _7 M$ R- d" y
44. if(getlabelnum(current,"serverclosemain"))
    
45. {
    ; }* F4 [, U, n4 V5 O
46.         setlabelnum(current,"serverclosemain",0);
    
47.        
    
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
49.                 return 0;
    
50.                
    6 a/ z. }* M& q0 e3 U  E& V9 c
51.      serverclosemain();
    
52.      setlabelnum(current,"servernum",0);
    * R% ]: }8 _, Q$ d: ?) R0 }
53.      pt("serverclosemain()成功！");pr();   
    / ~; p& v2 ~$ D" k4 u! W  J' \
54. }
    8 _' ?! ]' ~# p4 @8 p: f6 H, G' [
55. 
    
56. 
    . S) v- q+ J, D; @$ @& x/ {3 N
57. //接受信息
    3 h2 O, m- O$ W4 U3 h
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    
59. {
    1 s' J% f7 h( B: J. W4 ^
60.         int servernum = getlabelnum(current,"servernum");
      ^0 z! w) n- ~) ^, b& J  q) x" m
61.        
    8 x6 Z# q0 N, |5 ~- e: {2 B
62.         string buffer = "";
    
63.        
    
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    
65.        
    $ V6 I( S  }& N/ n& @! C2 D
66.         if(stringlen(buffer))
    " u7 y' w, A* g2 p% y
67.                 setlabelstr(current,"serverreceive",buffer);
    . L# I; @: [5 G+ U* R' {
68. 
    
69. }
    ( q  X8 O/ m0 L3 E& O1 e
70. //发送信息
    
71. 
    8 ~$ L- {+ [* E# G
72. 
    
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    
74. {
    
75.         string buffer = getlabelstr(current,"serversend");
    
76.        
    
77.         if(stringlen(buffer))
    3 S0 K3 d3 W( U/ j7 F+ x- F: u
78.         {
    2 N! s( X7 u6 P+ q# p. L; E
79.                 int servernum = getlabelnum(current,"servernum");
    7 E' o0 Y' H  s' r' t2 P2 O9 k
80.                
    
81.                 serversend(servernum,buffer);
    % y6 N. K5 g5 H" H+ g/ V/ r
82.                 setlabelstr(current,"send","");
    
83.                
    
84.                 pt("serversend()成功！");pr();
    
85.         }
    * o+ R% H! F; f4 U6 n
86. }

复制代码

求教

您的目标是什么呢？这个是FlexSim的模型之间用socket链接的功能。
* H1 W3 f5 K; Z连接不上的话有什么报错么？

3# 慧娴亚伦
+ l0 X" f' E' C" m: K5 k/ @, U8 m陈老师，您好
' d7 R4 W6 ?+ k  A
再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！

# |0 Y# r6 {% N% h- M7 s7 t我将文件重新修改了一下，如附件。

模型目标是能够利用flexsim建立服务器，并能通过tcp工具与外部通信

您能上传或者介绍一下您使用的tcp调试工具么？另外请尝试使用高版本软件，最好使用最新的2016版本。

6# 慧娴亚伦

老师，楼上附件里有调试工具，另外我找到原因了：在启动服务器时要将socket初始化。

附件为经测试成功的文件

lllflflf

谢谢分享