卯讳 发表于 2025-7-26 11:27:13

91M2引擎如何穿戴或取下一件装备,77M2引擎将武器取下来的方法

如何穿戴或取下一件装备
unit Q2;

inte**ce
uses Classes, SysUtils;

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

implementation

procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
var      
AUserItem: TUserItem;
begin
if Player.Weponnil then //如果装备了武器
    Player.TakeOffItem(wWeapon); //将武器取下来,wWeapon表示装备的位置
AUserItem := Npc.GiveItem(Player, '乌木剑'); //给玩家制造一把乌木剑
if AUserItemnil then
    Player.TakeOnItem(AUserItem, wWeapon); //然后将乌木剑装备到武器位置上
end;

end.

注意:代码中调用TakeOffItem和TakeOnItem执行装备取下和穿上的时候,将不会触发QFunctionNpc中的OnTakeOffItem和OnTakeOnItem事件

华夏道盾 发表于 2025-7-26 12:06:01

楼猪V5啊

原味暗黑 发表于 2025-7-26 12:06:01

鼎力支持!!

新山海经 发表于 2025-7-26 12:06:01

高手云集 果断围观

金阳火龙 发表于 2025-7-26 12:06:01

佩服佩服!

剑刃魅影 发表于 2025-7-26 12:06:01

路过

天书世界 发表于 2025-7-26 12:06:01

呵呵,低调,低调!

新山海经 发表于 2025-7-26 12:06:01

看起来不错,支持75kf论坛哟

青龙合击 发表于 2025-7-26 12:06:02

高手云集 果断围观

命之途 发表于 2025-7-26 12:10:51

路过
页: [1] 2 3 4
查看完整版本: 91M2引擎如何穿戴或取下一件装备,77M2引擎将武器取下来的方法