ExternalNPC

91M2说明书 > 引擎脚本功能 > 系统固定NPC >

{
 此单元只有一个入口函数，即：
 procedure Main(Npc: TNormNpc; const Command: String; Args: TArgs);


 Command:外部传入的标识
 Args:外部传入的参数
一个完整的控制请求为:IP或域名:端口/Command.html?PassWord=xxxx&Command=标识符&Params=参数(参数以";"分开,如果参数本身包含";"则以"\;"表示)
如：http://127.0.0.1:16888/Command.html?PassWord=12345&Command=MyCommand&Params=1;2;3;4
 在实际应用中，可通过外部应用（比如网站服务器、GM自己定义的远程控制EXE）和M2通信，当通过身份验证后，可触发此单元的Main函数调用，比如玩家在网站注册时填写了推荐人，PHP通过和M2通信给推荐人发放奖励
}
Unit ExternalNpc; 
 
Interface
 Uses Classes, SysUtils; 
 
Procedure Main(Npc: TNormNpc; Const Command: String; Args: TArgs); 
 
Implementation
 
Procedure Getwebgift(Args: TArgs); 
Var
 AName: String; 
 APlayer: TPlayObject; 
Begin
 AName := Args.Str[0]; 
 If AName<>'' Then
 Begin 
 APlayer := GameLib.Findplayer(AName); 
 If APlayer <> Nil Then
 Begin
 //dosomething! 
 
 End; 
 End; 
End; 
 
Procedure Main(Npc: TNormNpc; Const Command: String; Args: TArgs); 
Begin
 If Command = '发放网页奖励' Then
 Begin
 Getwebgift(Args); 
 End; 
End; 
 
End.

91M2 引擎说明书

引擎官网：www.91M2.com 交流群：5555999 此引擎仅供测试，切勿用于商业用途。如有侵权请立即联系我们，我们将在第一时间删除。