(沙巴克)

This_Player.IsCastle: Boolean;     是否沙巴克行会

This_Player.IsGuildLord          是否沙掌门

RepDoorGold: Integer             修理沙大门所需金币

RepWallGold: Integer             修理城墙所需金币

HireGuardGold: Integer           增加守卫所需金币

HireArcherGold: Integer          增加弓箭手所需金币

This_Npc.GetCelebName            沙巴克雕像名

ReqCastleWar: Boolean;      申请攻沙

TakeCastleStone(nTakeType:Word): Integer;     服务器可夺取的城堡数量

GetCastleStoneOwners(nTeamID:Word;var Status:Word): string;   获取城堡主人

GetCastleOrdDesc: String;        获取城堡命令说明

GetCastleGift(Npc:TCreature;iOrd:Integer): Integer;      获得城堡奖励数量

This_Npc.GetCastleTotalGold;: Integer;      沙巴克当前金币

GetCastleTodayIncome: Integer;     沙巴克当天收入

GetCastleDoorState: string;      当前沙大门状态

OpenCastleDoor(bOpen : Boolean);      打开沙大门

This_Npc.Click_RepairDoor(This_Player);       修理沙大门

This_Npc.Click_RepairWall(This_Player, 1);    修理左城墙1-3

This_Npc.Click_HireArcher(This_Player, 1);    增加弓箭手1-12

This_Npc.Click_TakeOutGold(This_Player, 1);   从沙巴克取走1金币

This_Npc.Click_SaveGold(This_Player,1);       存入沙巴克1金币

ReqCastleOwnerNpc(Hum : TPlayer): Integer;  申请制造沙巴克雕像

GetCastleGuildName: string;     沙巴克行会名字

GetCastleLoadName: string;      沙巴克老大名字

CheckCastleWarDate: string;     查询是否正在攻城(返回值'没有','正在','其他的'其他为下次攻城日期)

GetListOfWar:string;            查看攻城战役时间表

GetNormalCastleFlagOwner(const flagName: string): string;    获得普通城堡

GetNormalCastleScoreRslt(page: Integer): string;

GetNormalCastleMatchTakeInfo: string;

GetNormalCastleTakeInfo(page: Integer): string;

(沙巴克)