77M2引擎的版本如何删除玩家的物品脚本

admin · 发表于 2019-4-9 19:49:04

马上注册，以游结友！

您需要登录才可以下载或查看，没有帐号？立即注册

x

如何删除玩家的物品

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;

taotaozcp168 · 发表于 2024-6-1 15:17:33

楼主太厉害了！楼主，I*老*虎*U！

欧阳 · 发表于 2020-4-8 07:56:17

这个帖一般般，还可以哦！

星灼 · 发表于 2020-4-8 07:56:17

感谢楼主分享，2020发大财！！！

珈蓝黑子 · 发表于 2020-3-30 08:45:00

确实是难得好帖啊，顶先！

榀婲刄 · 发表于 2020-3-24 08:07:34

纯粹路过，没任何兴趣，仅仅是看在老用户份上回复一下

背叛 · 发表于 2020-3-14 08:51:10

66666668

蔚蓝烟哥 · 发表于 2020-3-5 07:59:53

这个帖一般般，还可以哦！

龙狼 · 发表于 2020-2-25 07:50:30

每一个支持传奇论坛新贴，消灭0回复

赤魂雨夜 · 发表于 2020-2-22 07:33:58

每一个支持传奇论坛新贴，消灭0回复

北方故事 · 发表于 2020-2-14 07:31:22

这贴内容不错

		自动登录	找回密码
密码			立即注册

系统通知：官方1群:339288648	01-25 10:01
系统通知：全站压缩包解压密码：www.wanmirbbs.com	01-25 10:01
系统通知：链接失效/违规帖子/广告帖子/恶意骂人/请点击我去“站务中心”举报！	01-25 10:01

论坛喇叭+ 发布

77M2引擎的版本如何删除玩家的物品脚本

马上注册，以游结友！

法律声明：

必备工具

地图查看分析转换三合一

南宫地图编辑器v5.0

Tiles转换工具，支持支持255

脚本教程

新手指南

关于本站