77M2引擎的服务端如何操作Check状态检查
如何操作Check状态检查unit Q2;
inte**ce
uses Classes, SysUtils;
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
implementation
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
begin
//Player.Check状态的范围为1-1024,即Player.Check到Player.Check都是被允许的
//小于1或大于1024返回为False,并且无法写入值
if Player.Check then //判断Check是否为真
begin
Player.SendMessage('Check的值为True');
Player.Check := False; //将Check的值设置为False
end
else
begin
Player.SendMessage('Check的值为False');
Player.Check := True; //将Check的值设置为True
end;
end;
end.
这么强,支持楼主,佩服 支持,赞一个 确实不错,顶先 我也来顶一下.. 楼主呀,,,您太有才了。。。 看起来好像不错的样子 支持支持再支持 报告!别开枪,我就是路过来看看的。。。 支持,楼下的跟上哈~