如何收取城堡金币unit Q2;inte**ce uses Classes, SysUtils;procedure Main(Npc: TNormNpc; Player: TPlayObject; 80传奇私服Args: TArgs);implementationprocedure Main(Npc: TNormNpc; Player: TPlayObject; Args: 传奇论坛TArgs);begin Player.TakeCastGold(10000); 我本沉默私服//将城堡的金币-10000 //直接针对城堡对象的操作方法 if Player.Castle nil then begin Player.Castle.TotalGol訾立d := Player.Castle.TotalGold - 10000; end;end;新开网通传奇私服end.
标签:知·北游