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

如何使用server命令建立服务器
/ Y- y5 N2 ^7 R. J: ^' W
* j' L. u8 l* J5 e& S5 V2 y% M代码如下，可是连接不上

1. /**Custom Code*/
   " @; y) @, i% Y5 |+ N
2. treenode current = ownerobject(c);
   * t/ V+ b- W, ^6 v9 W9 @# E7 _/ I# X
3. 
   
4. senddelayedmessage(current,0.5,NULL);
   7 _3 p2 _7 N0 a) j
5. //SERVER:初始化
   
6. if(getlabelnum(current,"startserver"))
   4 p6 z3 k% T0 S% ~+ p+ b) T$ o+ C/ N: n
7. {
   6 o' w( R: A1 Z1 \2 _( h, R9 O, \
8.         setlabelnum(current,"startserver",0);
   
9.        
   
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    
11.                 return 0;
    $ n9 D' B2 r- j' z+ E
12.        
    2 s, I1 u# P0 ]
13.         int m=getlabelnum(current,"serverport");
    
14.      servercreatemain(m);
    * B* E4 e* \, r) _
15.      
    , r" @" |3 N1 @! t3 H: T! C+ R/ x; B
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    
17.      pt("server()成功！");pr();
    ( _) |% l3 q' F- `1 C4 ]' X
18. }
    0 b" @6 t& E# |' ]
19. 
    
20. 
    8 v0 _: R8 J3 z8 H
21. if(getlabelnum(current,"startserver"))
    
22. {
    # A' h+ O9 j( g# R
23. 
    
24.     int client = serveraccept(0);
    
25. }
    5 m0 w0 D7 Y# F" D* P1 N9 \! i
26. 
    * P5 e- A* k4 T0 B
27. //关闭连接
    
28. int client = serveraccept(0);        
    
29. if(getlabelnum(current,"servercloseconnection"))
    , T* w- {1 e: r  T
30. {
    & U; v2 B- |0 }% N
31.         setlabelnum(current,"servercloseconnection",0);
    
32.        
    
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
34.                 return 0;
    ( w3 v1 m/ X* g" P
35.                
    * X+ v! b4 E  a4 ?5 }$ v" Q
36.      servercloseconnection(client);
    
37.    
    
38.      pt("servercloseconnection()成功！");pr();   
    ( \2 p. n& L8 r( k$ G7 B' q
39. 
    
40. }
    
41. 
    # N3 v+ I' Y- D9 Q
42. //关闭SERVER
    0 p0 u; ?( V+ l& @0 n7 P1 `( m' L! R! x
43. 
    8 |! p/ ?$ Y4 X- s
44. if(getlabelnum(current,"serverclosemain"))
    
45. {
    7 F* [7 P& P9 Q2 |8 }8 ~; F
46.         setlabelnum(current,"serverclosemain",0);
    6 y% c7 b4 O3 W* y$ ?
47.        
    
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    ) i" A. H* F+ s
49.                 return 0;
    
50.                
    
51.      serverclosemain();
    
52.      setlabelnum(current,"servernum",0);
    & o7 F' `5 e+ S
53.      pt("serverclosemain()成功！");pr();   
    3 x+ H( C: B1 u% ~! e9 d7 N; Q) K
54. }
      ^" {- U# d# n1 s& p: v* s
55. 
    8 L% i9 p! H5 X0 V
56. 
    / @5 ~* `! e' x
57. //接受信息
    
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    . \, p, M6 p5 i' ~/ I! E! _/ z
59. {
    
60.         int servernum = getlabelnum(current,"servernum");
    & k( Q$ ^# }/ k. G; ~" ?
61.        
    ) n! X$ E! M& @' v/ f
62.         string buffer = "";
    
63.        
    * O8 w- n2 k/ C  n# g! J0 B  w
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    0 n# @. v5 n+ d
65.        
    
66.         if(stringlen(buffer))
    
67.                 setlabelstr(current,"serverreceive",buffer);
    
68. 
    ( R+ A4 \& A4 ?
69. }
    
70. //发送信息
    6 r- e/ N3 J4 Q/ ?2 j
71. 
    
72. 
    
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    
74. {
    
75.         string buffer = getlabelstr(current,"serversend");
    
76.        
    / T) c# a( l1 e- x* U3 [
77.         if(stringlen(buffer))
      l6 q# G( I. N0 e
78.         {
    # M+ w, _& \8 Q1 |- D( A
79.                 int servernum = getlabelnum(current,"servernum");
    0 w! J8 l0 z+ u: c8 ^+ R9 w
80.                
    + _. @2 v/ ^! M2 d' ~8 K
81.                 serversend(servernum,buffer);
    
82.                 setlabelstr(current,"send","");
    4 T7 k$ x& U' Z, V$ N$ \/ o
83.                
    * V: q: g* x1 x$ j8 C2 _9 k
84.                 pt("serversend()成功！");pr();
    
85.         }
    $ L! b$ I, V6 H
86. }

复制代码

求教

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

3# 慧娴亚伦
7 f: |+ L0 {8 J" C9 w1 y陈老师，您好

再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！

( U8 r. P! k/ K/ a0 D我将文件重新修改了一下，如附件。

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

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

6# 慧娴亚伦

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

附件为经测试成功的文件

lllflflf

谢谢分享