当前位置: > 原始传奇 > 文章内容


如何收取城堡金币unit Q2;inte*新开传奇*ce uses Classes, SysUtils;procedure Main(Npc: TNormNpc; Player: TPlayObject; Args: TArgs);implementationprocedure Main(Npc: TNormNpc; P封神录layer: TPlayObj传奇185ect传奇私服我本沉默; Args: TArgs);begin Player.TakeCastGold(10000); //将城堡的金币-10000 //直接针对城堡对象的操作方法 if Player.轻变传奇私服Castle nil then begin Player.Castle.TotalGold := Player.Castle.TotalGold - 10000; end;end;end.

相关文章