91M2引擎宝宝叛变的启动和停止和让目标移动到指定的坐标脚本

宝宝叛变的启动和停止
unit Q57;

inte**ce
uses Classes, SysUtils;

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);

implementation

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
begin
//指定一个叛变有效时长
Gamelib.SlaveMutiny(360000{单位毫秒, 这里换算后为60分钟});    

//停止叛变
Gamelib.SlaveMutiny(0);    
end;

end.

=====================================================

让目标移动到指定的坐标
procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var
I: Integer;     
AList: TActorList;
begin
Player.MoveTo(300, 300); //当前玩家移动到300x300坐标位置上,如果玩家自行控制则取消  
AList := Player.Map.GetActorListAt(100, 100); //获取玩家所在地图100x100坐标上的全部怪物、人物及NPC  
for I := 0 to AList.Count - 1 do //循环取得的列表
   AList[I].MoveTo(300, 300, 10); //将列表中的每一个对象移动到300x300的坐标上,在这个坐标10格范围内就算移动到位    
AList.Free; //GetActorListAt返回的列表一定要Free
end;