登录
×
  • 首页
  • 传奇论坛
  • 传奇版本库
  • 传奇服务端
  • 传奇三端手游
  • 传奇素材网
  • 传奇客户端
  • 下载排行
  • 获取邀请码
  • 网络广告 风险自担
    107841

    [其它端游引擎] 77M2引擎如何收取城堡金币的脚本命令和示例

     火... [复制链接]

    [其它端游引擎] 77M2引擎如何收取城堡金币的脚本命令和示例

     火... [复制链接]
    趣游论坛

    1万

    主题

    10

    回帖

    11万

    积分

    管理员

    积分
    112181

    灌水之王活跃会员突出贡献优秀版主荣誉管理论坛元老

    趣游论坛 2019-4-9 11:24:21 / 显示全部楼层 /阅读模式
    107841
    20190408104453.png

    如何收取城堡金币

    unit Q2;

    inte**ce
      uses Classes, SysUtils;

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

    implementation

    procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);
    begin   
      Player.TakeCastGold(10000); //将城堡的金币-10000

      //直接针对城堡对象的操作方法
      if Player.Castle <> nil then
      begin
        Player.Castle.TotalGold := Player.Castle.TotalGold - 10000;
      end;
    end;

    end.

    回复

    使用道具 举报

    penggangsy

    0

    主题

    30

    回帖

    129

    积分

    注册用户

    积分
    129
    penggangsy 昨天 11:02 / 显示全部楼层
    回复 支持 反对

    使用道具 举报

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

    本版积分规则

    扫一扫加群沟通交流

    首页 论坛 !mobpost! 最新 我的