Vv引擎官方论坛

搜索
查看: 566|回复: 2

[Pascal] 自动拾取(自动入包)脚本

[复制链接]

该用户从未签到

8

主题

9

帖子

2126

积分

金牌会员

Rank: 6Rank: 6

积分
2126
QQ
发表于 2021-11-21 23:22:57 | 显示全部楼层 |阅读模式
很多人问到自动拾取。
就按我的版本贴出一段代码。
  • 在QFunctionNpc中找到MonDropItem
    在单元贴入以下代码
    if  (Owner.MemberLevel > 1) and (Item.StdMode = 15) then  \\如果检测会员等级>1 并且StdMode是15头盔 执行
       begin
         if item.Name.Contains('黑铁头盔')  then \\如果装备名是字黑铁头盔然后执行
         begin
         Item := Npc.GiveItem(Owner, '黑铁头盔', False); \\ 给一个黑铁头盔
           Accept        :=        False;  \\(重要 禁止爆出)
         end;
       end;

    以上就是本人拙见,各自灵活运用,大神勿喷
回复

使用道具 举报

  • TA的每日心情
    无聊
    2024-4-17 20:03
  • 签到天数: 98 天

    [LV.6]常住居民II

    0

    主题

    113

    帖子

    1789

    积分

    金牌会员

    Rank: 6Rank: 6

    积分
    1789
    发表于 2021-11-27 11:44:24 | 显示全部楼层
    感谢大佬指导···
    回复

    使用道具 举报

    该用户从未签到

    0

    主题

    5

    帖子

    17

    积分

    新手上路

    Rank: 1

    积分
    17
    发表于 2022-9-1 09:49:37 | 显示全部楼层
    666666666666666666666
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    快速回复 返回顶部 返回列表