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

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

代码如下，可是连接不上

1. /**Custom Code*/
   " ?# q' T" i' g) v
2. treenode current = ownerobject(c);
   
3. 
   ( k$ V+ k- Q. \" W3 u1 O
4. senddelayedmessage(current,0.5,NULL);
   
5. //SERVER:初始化
   
6. if(getlabelnum(current,"startserver"))
   
7. {
   ' n' [" M4 }+ v# y% F6 f
8.         setlabelnum(current,"startserver",0);
   : ^/ D% g: S' N1 Y- @0 p: p9 M- x
9.        
   
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    
11.                 return 0;
    
12.        
    
13.         int m=getlabelnum(current,"serverport");
    $ A8 C0 `( k4 W1 H& Z
14.      servercreatemain(m);
    2 Q8 S% S& j2 X  S; K) {' u7 P, F
15.      
    
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    
17.      pt("server()成功！");pr();
    ) s1 A8 J6 P- `2 z
18. }
    
19. 
    
20. 
    
21. if(getlabelnum(current,"startserver"))
    $ U" V7 n; d( Y5 M/ j9 `
22. {
    ; Z/ S1 t5 \3 g/ a
23. 
    
24.     int client = serveraccept(0);
    6 M# N& V7 Z2 }2 O
25. }
    
26. 
    
27. //关闭连接
    
28. int client = serveraccept(0);        
    
29. if(getlabelnum(current,"servercloseconnection"))
    ) ?. P1 l: J( Z8 @6 G3 W! ~
30. {
    
31.         setlabelnum(current,"servercloseconnection",0);
    
32.        
    . V7 Q3 G: S. A; |" k$ _: r  p
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    ) T4 y+ ~3 W2 }" j/ S/ W
34.                 return 0;
    
35.                
    0 F$ W6 F( S# q$ s, I: B& l" r; F, m
36.      servercloseconnection(client);
    3 k8 z/ o9 \9 _- B0 Y
37.    
    
38.      pt("servercloseconnection()成功！");pr();   
    1 e# s* J  n  ?4 }' W" `( d! N+ l
39. 
    ( H; ~2 z$ y6 g1 f3 C9 K7 g
40. }
    ! K* F. c8 \- k( ?
41. 
    * {, Z9 Y6 p/ w+ R5 w) T5 C6 i: L' w
42. //关闭SERVER
    
43. 
    & t$ t% B( ~, A) G, w
44. if(getlabelnum(current,"serverclosemain"))
    
45. {
    
46.         setlabelnum(current,"serverclosemain",0);
    
47.        
    , I  f$ |' A, q0 n  o
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    % m) L8 k) g, n" w2 z6 h
49.                 return 0;
    9 x, K7 Z) _2 R( e+ ]
50.                
    
51.      serverclosemain();
    
52.      setlabelnum(current,"servernum",0);
    
53.      pt("serverclosemain()成功！");pr();   
    ) N9 O" h9 K6 E/ U( R
54. }
    
55. 
    & ~: c' |4 O' f# {8 q2 k, x. w& ~
56. 
    
57. //接受信息
    
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    
59. {
    " [1 Z* u: x3 @3 q- U' y, O& S
60.         int servernum = getlabelnum(current,"servernum");
    8 n- U9 r. A. p2 v& F1 G2 i
61.        
    1 V0 A1 C# i" c: W! I6 g2 T
62.         string buffer = "";
    / X1 V* j7 }" [
63.        
    # Q! {0 e5 {9 A! A" f
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    
65.        
    
66.         if(stringlen(buffer))
    
67.                 setlabelstr(current,"serverreceive",buffer);
    
68. 
    
69. }
    5 K* T) s+ z" o0 z% X) n0 e9 C
70. //发送信息
    3 L, f' M% Q" ]  K% \
71. 
      F% {; E2 K4 q6 y* p$ Y" [
72. 
    ) d. `: B3 C$ b; L
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    " @5 G3 k/ T- V  z
74. {
    
75.         string buffer = getlabelstr(current,"serversend");
    
76.        
    
77.         if(stringlen(buffer))
    
78.         {
    - P* ?$ _' z. _% T' ^+ x
79.                 int servernum = getlabelnum(current,"servernum");
    ) n: j5 M7 J- h& C9 \; V
80.                
    2 N- T# ~% O2 ]: Z2 {& j$ P8 o
81.                 serversend(servernum,buffer);
    
82.                 setlabelstr(current,"send","");
    
83.                
    ! S) v3 s- N% l
84.                 pt("serversend()成功！");pr();
    
85.         }
    $ o. O; t& F' Y3 y& I' [
86. }

复制代码

求教

您的目标是什么呢？这个是FlexSim的模型之间用socket链接的功能。
. k- R" {8 z& V& h( @连接不上的话有什么报错么？

3# 慧娴亚伦
1 L3 u6 G' D9 x# i* U- X8 E陈老师，您好

再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！
6 @/ ?& G" }' s) w4 E
) J7 p7 O; d9 [9 E5 i, P  N& l0 |我将文件重新修改了一下，如附件。

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

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

6# 慧娴亚伦
1 q, C( J5 W9 B, j8 Q# d' {
老师，楼上附件里有调试工具，另外我找到原因了：在启动服务器时要将socket初始化。

附件为经测试成功的文件

lllflflf

谢谢分享