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

如何使用server命令建立服务器
! Q  e0 x" h, h4 [+ b
代码如下，可是连接不上

1. /**Custom Code*/
   
2. treenode current = ownerobject(c);
   5 D/ [6 M; \) T5 m$ r
3. 
   6 B& H- G8 p6 l) Z9 t* p3 Z' \
4. senddelayedmessage(current,0.5,NULL);
   
5. //SERVER:初始化
   ( D3 `% o6 x5 P/ P, K! q, z
6. if(getlabelnum(current,"startserver"))
   9 j6 q9 \! a- a; q- E6 U
7. {
   
8.         setlabelnum(current,"startserver",0);
   
9.        
   " H/ t/ e; V' u/ H7 J/ o
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    ) g& r! e6 i0 ^$ l1 f9 h
11.                 return 0;
    " M( v1 `  F& V" F9 \" U
12.        
    8 m/ q% L0 \, b! G! W! }
13.         int m=getlabelnum(current,"serverport");
    
14.      servercreatemain(m);
    ( i; M  v: _) T
15.      
    5 P% y0 @: F$ ^6 I& C
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    0 M8 Y$ O" A4 h* P  ]& u; L0 b$ b( x
17.      pt("server()成功！");pr();
    
18. }
    
19. 
    
20. 
    
21. if(getlabelnum(current,"startserver"))
    3 J- Q. [* f# V5 s+ o9 \) g
22. {
    * k/ z& |9 T* [2 y
23. 
    $ N, ]( u+ G6 B" E( e8 M5 @
24.     int client = serveraccept(0);
    5 L# L- Y1 B9 ~, `3 v" z' T
25. }
    
26. 
    0 E% W6 r# V$ p! {' Y+ y+ N
27. //关闭连接
    ' h+ _- s+ u) y, t
28. int client = serveraccept(0);        
    ( t$ g& \% D* t- R# G4 ?( L
29. if(getlabelnum(current,"servercloseconnection"))
    + D- s1 o1 i* ?( C8 E2 W5 j
30. {
    : b& V$ L9 N# D. P
31.         setlabelnum(current,"servercloseconnection",0);
    & H+ Z* Q$ K- P( E7 ]. x) C+ V
32.        
    6 f- \; N5 _0 i. w; D8 H0 f1 p
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
34.                 return 0;
    
35.                
    
36.      servercloseconnection(client);
    
37.    
    
38.      pt("servercloseconnection()成功！");pr();   
    
39. 
    
40. }
    / u# V: ]( J5 Q3 [+ I
41. 
    
42. //关闭SERVER
    
43. 
    # ^7 |; ?( b" s. K
44. if(getlabelnum(current,"serverclosemain"))
    # _$ y2 T+ D! h0 M5 e
45. {
    0 U  p1 P) m' A/ n4 ^
46.         setlabelnum(current,"serverclosemain",0);
    0 ]6 d; [" C9 R6 W  p
47.        
    
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
49.                 return 0;
    # e) H0 l0 ?; f' L, D7 |, z
50.                
    
51.      serverclosemain();
    
52.      setlabelnum(current,"servernum",0);
    ( T/ b7 e/ a8 {! e1 |1 r+ K% p& V
53.      pt("serverclosemain()成功！");pr();   
    # k" h# q, _/ H9 f; Y
54. }
    ( H6 d; e; q) @
55. 
    6 v: J1 ^) R1 z, z0 K2 `
56. 
    
57. //接受信息
    ! F: }4 k6 c( d" J& j8 U* r
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    
59. {
    
60.         int servernum = getlabelnum(current,"servernum");
    
61.        
    
62.         string buffer = "";
    
63.        
    & t4 m- `4 j# \/ o
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    
65.        
    " v, k% C- H- H4 E
66.         if(stringlen(buffer))
    ! N8 M4 N  ]2 M. |" W
67.                 setlabelstr(current,"serverreceive",buffer);
    . |; P8 _% v  }: C
68. 
    
69. }
    1 R* C6 H, g1 }; ?# }- ^6 T
70. //发送信息
    $ u6 J4 S# R- i3 O# w4 M4 E  h
71. 
    
72. 
    * |* M! w0 {: I( u3 K3 K" L
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    
74. {
    
75.         string buffer = getlabelstr(current,"serversend");
    ' `9 a0 P9 i% N
76.        
    ! x1 K5 o0 [0 o: y: S
77.         if(stringlen(buffer))
    % s! x- j; M' O" [6 f
78.         {
    
79.                 int servernum = getlabelnum(current,"servernum");
    9 F2 Z! v: s- Z( o+ S/ F, g- y2 |
80.                
    
81.                 serversend(servernum,buffer);
    6 L* S2 [7 L/ k6 h
82.                 setlabelstr(current,"send","");
    
83.                
    0 K9 E% f. @% c7 N1 g. O1 R7 I
84.                 pt("serversend()成功！");pr();
    
85.         }
    & \. N8 v! |- J/ h2 q" c- K
86. }

复制代码

求教

您的目标是什么呢？这个是FlexSim的模型之间用socket链接的功能。
8 r, a4 t& i& y5 u% I连接不上的话有什么报错么？

3# 慧娴亚伦
陈老师，您好

3 M2 x) F8 w0 }) y+ t再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！

* Y. M% Y% [; c3 j( i2 Z  }, m% j6 z我将文件重新修改了一下，如附件。

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

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

6# 慧娴亚伦
- D0 r2 a" Z2 b; u
老师，楼上附件里有调试工具，另外我找到原因了：在启动服务器时要将socket初始化。

附件为经测试成功的文件

lllflflf

谢谢分享