77M2引擎的传奇SF版本如何删除玩家的物品脚本分享

趣游论坛 · 2019-4-9 11:23:41

如何删除玩家的物品

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
  I: Integer;
  AItem: TUserItem;
begin
  //方法1:通过NPC拿走玩家的物品
  Npc.Take(Player, '乌木剑', 1);  //拿走一把乌木剑
  for I := 0 to Player.MaxBagSize - 1 do //循环背包
  begin
AItem := Player.BagItem[I]; //取出一个背包物品
if AItem <> nil then //如果物品存在
   Npc.TakeItem(Player, AItem); //收走物品
  end;

  //方法2:通过玩家自身DeleteItem函数处理
  for I := 0 to Player.MaxBagSize - 1 do //循环背包
  begin
AItem := Player.BagItem[I]; //取出一个背包物品
if AItem <> nil then //如果物品存在
   Player.DeleteItem(AItem, 1); //收走物品,指定数量数量为1,如果是可叠加物品则是数量减1,反之则是收走物品
  end;
  //玩家自身并没支持Take函数,因为Take实际上也是循环背包,开发中可以自己扩展函数处理
end;

a1987415 · 2024-12-3 06:16:40

2024-12-26 22:02:42

woaiqian · 2025-2-17 06:14:28

a234580443 · 2025-2-19 09:43:27

chenbei · 2025-2-25 16:36:04

bjq1314 · 2025-3-6 23:31:22

2025-3-11 12:58:20

w84615066 · 2025-3-19 19:48:20

`设为首页收藏本站`

[传奇一键替换包]

[其它端游引擎] 77M2引擎的传奇SF版本如何删除玩家的物品脚本分享

[其它端游引擎] 77M2引擎的传奇SF版本如何删除玩家的物品脚本分享

浏览过的版块

灌水之王

活跃会员

突出贡献

优秀版主

荣誉管理

论坛元老

灌水之王

活跃会员

突出贡献

优秀版主

荣誉管理

论坛元老

1.70盛世复古金币特戒极品+6三职业传奇版本

1.80经典火龙复古三职业传奇版本带假人服务

战龙超变神器无限刀单职业传奇版本免费服务

梦剑火龙2合1第三季传奇版本免费单机服务端

幽月沉默微变单职业传奇版本带假人功能开区

联系我们

设为首页收藏本站 [传奇一键替换包]

[其它端游引擎] 77M2引擎的传奇SF版本如何删除玩家的物品脚本分享

[其它端游引擎] 77M2引擎的传奇SF版本如何删除玩家的物品脚本分享

浏览过的版块

灌水之王

活跃会员

突出贡献

优秀版主

荣誉管理

论坛元老

灌水之王

活跃会员

突出贡献

优秀版主

荣誉管理

论坛元老

1.70盛世复古金币特戒极品+6三职业传奇版本

1.80经典火龙复古三职业传奇版本带假人服务

战龙超变神器无限刀单职业传奇版本免费服务

梦剑火龙2合1第三季传奇版本免费单机服务端

幽月沉默微变单职业传奇版本带假人功能开区

联系我们

`设为首页收藏本站`

[传奇一键替换包]