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

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

! N! S9 I; C6 h6 B0 s" K代码如下，可是连接不上

1. /**Custom Code*/
   
2. treenode current = ownerobject(c);
   ) S  t  j3 e1 M! z. t5 p
3. 
   ) w5 m) x3 x+ `/ {- l: u
4. senddelayedmessage(current,0.5,NULL);
   
5. //SERVER:初始化
   
6. if(getlabelnum(current,"startserver"))
   3 K5 j0 n2 i4 x0 w1 ^
7. {
   & `6 A# f! ]; S' C% i$ {1 I3 ?1 r
8.         setlabelnum(current,"startserver",0);
   
9.        
   
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    5 T8 o9 q" o2 s
11.                 return 0;
    9 q0 g+ Q* i  m) ]! g9 t
12.        
      T3 T5 z3 J+ B: K+ |! g
13.         int m=getlabelnum(current,"serverport");
    4 a+ c  i3 Q# I4 |) @% c, u5 T) ~
14.      servercreatemain(m);
    * t" L+ s# X& {: x! \/ ], K& F) b" [
15.      
    
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    
17.      pt("server()成功！");pr();
    
18. }
    
19. 
    
20. 
    
21. if(getlabelnum(current,"startserver"))
    
22. {
    
23. 
    
24.     int client = serveraccept(0);
    
25. }
    
26. 
    
27. //关闭连接
    
28. int client = serveraccept(0);        
    , N4 y% T" ?# g1 z
29. if(getlabelnum(current,"servercloseconnection"))
      C/ {- l5 H4 {; S7 M6 O7 J
30. {
    5 R! ^8 Z2 d6 u$ F4 l1 V; v9 {
31.         setlabelnum(current,"servercloseconnection",0);
    8 [  f: y" D& @! ~4 ]; I! W% @4 W
32.        
    
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    
34.                 return 0;
    
35.                
    : J$ v9 D5 X# \8 r
36.      servercloseconnection(client);
    + K, z. ], }- h4 t
37.    
    
38.      pt("servercloseconnection()成功！");pr();   
    
39. 
    
40. }
    + b) Z- Y. S; \
41. 
    4 U% R# T* ?5 \1 j: z
42. //关闭SERVER
    ! [% s9 u% [, S
43. 
    : y% X( j( p4 i/ q2 R
44. if(getlabelnum(current,"serverclosemain"))
    ' s$ ~. c3 \0 J* v4 J5 H
45. {
    
46.         setlabelnum(current,"serverclosemain",0);
    
47.        
    ( L6 q, N( g6 r# n, i3 t1 u
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    7 _6 S* S  ]/ }* Z
49.                 return 0;
    6 `& h% {# L: t$ F
50.                
    ) U, |/ d" ]1 w' T6 N
51.      serverclosemain();
    ( U; O+ N4 u; Z9 h  h- A
52.      setlabelnum(current,"servernum",0);
    
53.      pt("serverclosemain()成功！");pr();   
    4 p- _' E1 X! Z2 h8 K% F0 ]0 C* S
54. }
    
55. 
    
56. 
    ; p4 T2 R' v: S6 y! e
57. //接受信息
    8 n/ E! K; M# `1 y; |. `# ^. x
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    5 o5 ?5 n/ o7 c1 t8 z2 ^
59. {
    1 O7 V$ k0 m0 k! L1 b* Z# P
60.         int servernum = getlabelnum(current,"servernum");
    , j5 h' d# g) _2 b* r$ y2 L) \
61.        
    
62.         string buffer = "";
    % c" K- w" T# F7 d% C6 c+ z1 t# a
63.        
    
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    
65.        
    
66.         if(stringlen(buffer))
    1 b1 e5 X, Q4 `- n- I
67.                 setlabelstr(current,"serverreceive",buffer);
    
68. 
    
69. }
    
70. //发送信息
    6 ^8 X) W% K) T9 d9 s; q5 s
71. 
    
72. 
    & C  |3 x6 I& e- `9 ?
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    7 N: v; n" Q0 F3 D' I. O
74. {
    
75.         string buffer = getlabelstr(current,"serversend");
    " ]/ L) A# N' g1 O7 r3 X3 Q
76.        
    
77.         if(stringlen(buffer))
    
78.         {
    6 p5 ]# G1 \5 I5 q
79.                 int servernum = getlabelnum(current,"servernum");
    
80.                
    
81.                 serversend(servernum,buffer);
    1 W4 R5 P  m  y
82.                 setlabelstr(current,"send","");
    2 M" K, K+ w4 \* P% N; ]8 s
83.                
    
84.                 pt("serversend()成功！");pr();
    
85.         }
    - t' q4 `# C& R% b) ?
86. }

复制代码

求教

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

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

/ G2 L) j7 R( l9 N再将startserver标签设为1后，output console提示启动成功，可是tcp调试工具却无法连接FLEXSIM,好困扰！
$ `* k( Y% s! y" y& X4 {
我将文件重新修改了一下，如附件。

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

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

6# 慧娴亚伦

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

附件为经测试成功的文件

lllflflf

谢谢分享