MissionsNpc
unit MissionsNpc;
interface
uses Classes, SysUtils;
//任务提交时触发,可在此执行任务奖励处理
procedure OnMissionFinish(Npc: TNormNpc; Player: TPlayObject; AMission: TMissionItem);
implementation
procedure OnMissionFinish(Npc: TNormNpc; Player: TPlayObject; AMission: TMissionItem);
begin
case AMission.MissionID of
'R0001', 'R0002':
begin
Player.Messagebox('任务"'+ AMission.Subject +'"完成');
end;
end;
end;
end.
MissionsNpc只有唯一一个事件函数 OnMissionFinish,当任务提交时触发此事件
注意:所有任务面板上的命令默认入口都在 MissionsNpc,除非显示指明了命令的目标单元
引擎官网:www.91M2.com 交流群:5555999 此引擎仅供测试,切勿用于商业用途。如有侵权请立即联系我们,我们将在第一时间删除。