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

如何使用server命令建立服务器
) X( i5 F: H$ n1 C/ n6 o
代码如下，可是连接不上

1. /**Custom Code*/
   ; o# V- |* K+ z( D( M
2. treenode current = ownerobject(c);
   
3. 
   
4. senddelayedmessage(current,0.5,NULL);
   $ |# a. u$ J  h( p
5. //SERVER:初始化
   2 e0 }8 y$ F# C4 R% X2 e
6. if(getlabelnum(current,"startserver"))
   
7. {
   
8.         setlabelnum(current,"startserver",0);
   0 G, k. K  n8 @# `, C
9.        
   
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    
11.                 return 0;
    ! y; Z1 {! d- }( [  s3 t8 _
12.        
    ' E2 H9 w4 R9 H+ a& Z* a- n
13.         int m=getlabelnum(current,"serverport");
    - }$ Z5 r1 X- n7 C/ Y
14.      servercreatemain(m);
    . J5 }) {9 X2 u+ P* f
15.      
    
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    0 S5 f/ o3 d/ N
17.      pt("server()成功！");pr();
    
18. }
    % r) H0 h! L  g+ S! ?- D9 }* f; _
19. 
    & x: e) l. i! E) G+ B( S& c. C
20. 
    
21. if(getlabelnum(current,"startserver"))
    ' }! m9 z- l4 Z% f
22. {
    
23. 
    
24.     int client = serveraccept(0);
    * v$ F* F: c& z
25. }
    $ ^. C# P$ I. s/ |& z4 e, R- e! A
26. 
    
27. //关闭连接
    , o: }  k! z" ~  z
28. int client = serveraccept(0);        
    : V( |! L9 U* S
29. if(getlabelnum(current,"servercloseconnection"))
    
30. {
    
31.         setlabelnum(current,"servercloseconnection",0);
    
32.        
    + x8 R3 a- P- s
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
34.                 return 0;
    
35.                
    
36.      servercloseconnection(client);
    
37.    
    % Q  s+ F1 R1 @8 O9 E
38.      pt("servercloseconnection()成功！");pr();   
    
39. 
    
40. }
    1 Y( I0 l/ d4 A1 g
41. 
    
42. //关闭SERVER
    9 E3 C& V5 i( O$ u4 ~+ f
43. 
    
44. if(getlabelnum(current,"serverclosemain"))
    1 P$ G  ~& J, P( R6 S5 M3 T  \
45. {
    ) V% P- w" c" W$ e; T6 V
46.         setlabelnum(current,"serverclosemain",0);
    
47.        
    ; S$ z* E1 u, \! g9 `
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    9 ~7 G/ S2 q) k- J* y6 }$ p
49.                 return 0;
    ( r! {- o: t& N5 j" n8 o+ Q3 M7 ^
50.                
    $ y3 s$ _, {8 p4 c! K6 y+ _
51.      serverclosemain();
    
52.      setlabelnum(current,"servernum",0);
    . A" ^5 v" G% f0 f: E( U
53.      pt("serverclosemain()成功！");pr();   
    
54. }
    7 r3 ?6 W8 H+ z
55. 
    
56. 
    
57. //接受信息
    
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    
59. {
    & Z, b2 H& `5 B- d  b  |
60.         int servernum = getlabelnum(current,"servernum");
    3 i% u7 O  u2 V# m4 B
61.        
    , S! x+ V$ C% Q' r% D
62.         string buffer = "";
    
63.        
    * w0 P8 m7 g" D- Z  [, x
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    ; a0 c( |2 d! X  N0 s
65.        
    & o: }; ?( B- O. M
66.         if(stringlen(buffer))
    + f4 {" N7 F7 |" N$ n* g9 a6 k6 `
67.                 setlabelstr(current,"serverreceive",buffer);
    + v% \( t" \: d  ?; X+ h
68. 
    
69. }
    9 b$ G% ]- q& s
70. //发送信息
    
71. 
    7 K/ o4 s8 k7 O! V, i+ w7 Q- b* w
72. 
    
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    + x) s$ r" E9 i7 [' X- _) G! S
74. {
    
75.         string buffer = getlabelstr(current,"serversend");
    
76.        
    5 f  U, ?; e6 S# L8 v+ G+ @% j
77.         if(stringlen(buffer))
    3 `2 [  r2 g8 E; X, A7 o
78.         {
    6 x  E# Z: p  i8 Q4 O8 s# }4 w
79.                 int servernum = getlabelnum(current,"servernum");
    , B! O1 y# N  l, \; T* G! V
80.                
    
81.                 serversend(servernum,buffer);
    
82.                 setlabelstr(current,"send","");
    
83.                
    
84.                 pt("serversend()成功！");pr();
    % X  M6 U& c& z7 a; ]3 E/ _! G
85.         }
    8 D* q$ L/ Y. }$ V9 ~5 j2 n9 x  ~8 H
86. }

复制代码

求教

您的目标是什么呢？这个是FlexSim的模型之间用socket链接的功能。
6 ^  ]7 U" K' @连接不上的话有什么报错么？

3# 慧娴亚伦
! d& ]" D% C0 ^陈老师，您好
* s9 I2 z2 J  h! }5 W- D
再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！
+ a' J( o$ E/ }5 K2 `2 _
我将文件重新修改了一下，如附件。

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

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

6# 慧娴亚伦

% b1 t  `3 G# h( D) k9 [7 m老师，楼上附件里有调试工具，另外我找到原因了：在启动服务器时要将socket初始化。

附件为经测试成功的文件

lllflflf

谢谢分享