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

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

$ A7 ~; }4 ]* B# `, l; G! n" E代码如下，可是连接不上

1. /**Custom Code*/
   
2. treenode current = ownerobject(c);
   
3. 
   
4. senddelayedmessage(current,0.5,NULL);
   
5. //SERVER:初始化
   0 K' p, f0 P% T# h! V8 V) _
6. if(getlabelnum(current,"startserver"))
   : M; I) V% D6 N' s6 U
7. {
   9 H# u4 ^6 W: U& M' v3 m+ l6 j& h
8.         setlabelnum(current,"startserver",0);
   ( |* s+ f0 q% |  ^- m8 U
9.        
   5 I6 K, Q; M: I/ E
10.         if(getlabelnum(current,"socknum"))              //防止重复起server
    7 N1 D8 m& q1 t' l9 r2 m% j6 N
11.                 return 0;
    
12.        
    
13.         int m=getlabelnum(current,"serverport");
    
14.      servercreatemain(m);
    * M; A; h2 o9 Y! E& Q
15.      
    & _/ P2 Y, y5 z2 v( S6 i' E9 W
16.      setlabelnum(current,"servernum",1);            //初始化成功后将值存入servernum
    
17.      pt("server()成功！");pr();
    ! D+ n) o: C$ Z2 B" r& p8 ?
18. }
    
19. 
    3 W% N" L$ k1 m9 C: J* p9 L
20. 
    
21. if(getlabelnum(current,"startserver"))
    + ^7 f% s: k) B7 c
22. {
    
23. 
    
24.     int client = serveraccept(0);
    % G, _+ Y1 \$ @6 h
25. }
    : {5 B3 N9 Y5 V% r' x
26. 
    
27. //关闭连接
    
28. int client = serveraccept(0);        
    , Y3 u$ l; R9 K
29. if(getlabelnum(current,"servercloseconnection"))
    
30. {
    
31.         setlabelnum(current,"servercloseconnection",0);
    
32.        
    
33.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    ! L" A5 y) P- d2 X. O' j
34.                 return 0;
    6 G8 _: x: c* T9 Q  D3 c
35.                
    ' z* x! H# I1 Z" P& e6 X
36.      servercloseconnection(client);
    0 t- C4 K( M  x* Y! k! i
37.    
    ( ^( [3 d" Y$ d/ A
38.      pt("servercloseconnection()成功！");pr();   
    
39. 
    & d9 {( K4 g8 K5 X
40. }
    
41. 
    
42. //关闭SERVER
    
43. 
    . d" Y& o6 ~7 z
44. if(getlabelnum(current,"serverclosemain"))
    
45. {
    
46.         setlabelnum(current,"serverclosemain",0);
    
47.        
    & N0 r$ I' A+ _
48.         if(!getlabelnum(current,"servernum"))             //未启用server,则退出
    ; U3 g/ ?3 ^" ~
49.                 return 0;
    
50.                
    
51.      serverclosemain();
    / y% Q- Y8 v6 Y" ^
52.      setlabelnum(current,"servernum",0);
    
53.      pt("serverclosemain()成功！");pr();   
    ( J/ ^1 S- X+ Y" k" K# T1 r/ ^
54. }
    : q7 o# L: \7 i$ h
55. 
    0 r4 k. Z1 V: R
56. 
    
57. //接受信息
    3 c: M. |. M9 L) n0 z6 y' C% K( O
58. if(getlabelnum(current,"servernum"))                  //如果起了server服务(servernum标签非零)
    ( o* Q% k+ \4 H
59. {
    % ]1 z, n; y/ Y6 u
60.         int servernum = getlabelnum(current,"servernum");
    
61.        
    ; N2 e9 W/ v: c& `" h! N/ _/ W
62.         string buffer = "";
    
63.        
    
64.         buffer = clientreceive(servernum, NULL, 1024, 1);
    $ h5 k  P- t1 ~4 b+ t
65.        
    " K, L/ R4 b6 ~2 }/ z4 w' b3 Z, v
66.         if(stringlen(buffer))
    
67.                 setlabelstr(current,"serverreceive",buffer);
    
68. 
    
69. }
    4 \0 ~) a* D: X$ Z# J6 @9 j2 n
70. //发送信息
    
71. 
    
72. 
    - m3 V7 W" V( n* G
73. if(getlabelnum(current,"servernum"))                     //如果起了SERVER服务(servernum标签非零)
    2 [$ Z% p. E+ \5 G: H
74. {
    ; ^! [; w2 `* t5 \, F% z& H
75.         string buffer = getlabelstr(current,"serversend");
    
76.        
    
77.         if(stringlen(buffer))
    
78.         {
    
79.                 int servernum = getlabelnum(current,"servernum");
    
80.                
    5 d1 P2 ?- D- r& q, V2 q& Y
81.                 serversend(servernum,buffer);
    0 F6 R0 O& i; a+ [1 d
82.                 setlabelstr(current,"send","");
    
83.                
    
84.                 pt("serversend()成功！");pr();
      X# j5 h! G+ n/ W. a6 u
85.         }
    8 S7 E! b& R# f  \0 ?
86. }

复制代码

谢谢分享

lllflflf

附件为经测试成功的文件

6# 慧娴亚伦

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

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

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

3# 慧娴亚伦
/ k- t! {2 ?% [% ^7 \2 B0 S陈老师，您好

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

  Q# ~* R+ v/ X2 y. k. v我将文件重新修改了一下，如附件。

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

求教