[传奇技术]战神引擎脚本变量大全

源码资源网

[传奇技术]战神引擎脚本变量大全

1. 一、私有类型：变量名 类型  说明
   
2. FGMLevel: Word;
   
3. FYBNum: Integer;
   
4. FUsedYBNum: Integer;
   
5. FNickLinFu: integer;
   
6. FHaveTimeNum: integer;
   
7. FHaveValidHero: Boolean;
   
8. FTrendDataValid: Boolean;
   
9. FJiaYouPoint: Cardinal;
   
10. FBoReferUser: Boolean;
    
11. FBoSpreader: Boolean;
    
12. FLevel: Word;
    
13. FName: String;
    
14. FFreeBagNum: Integer;
    
15. FJob: Byte;
    
16. FGender: Byte;
    
17. FIsDead: Boolean;
    
18. FMy_X: integer;
    
19. FMy_Y: integer;
    
20. FIsDeleted: Boolean;
    
21. FNormalHide: Boolean;
    
22. FIntParam: integer;
    
23. FStrParam: String;
    
24. FGoldNum: Integer;
    
25. FMyShengwan: Integer;
    
26. FMyUsedLfNum: Integer;
    
27. FMyDiamondnum: Integer;
    
28. FMyPKpoint: integer;
    
29. FLuckNum: Integer;
    
30. FHitRate: Byte;
    
31. FQuickRate: Byte;
    
32. FAC: Word;
    
33. FMaxAC: Word;
    
34. FDC: Word;
    
35. FMaxDC: Word;
    
36. FMC: Word;
    
37. FMaxMC: Word;
    
38. FSC: Word;
    
39. FMaxSC: Word;
    
40. FHP: Integer;
    
41. FMaxHP: Integer;
    
42. FMP: integer;
    
43. FMaxMP: Integer;
    
44. FMyLFnum: Integer;
    
45. FMyExp: Cardinal;
    
46. FDominateLevel: Word;
    
47. FGuildName: string;
    
48. FGuildLord: string;
    
49. FIsGroupOwner: Boolean;
    
50. FIsTeamMember: Boolean;
    
51. FIsAStudent: Boolean;
    
52. FGuildOrder: Integer;
    
53. FLingXiValue: Integer;
    
54. FHeroGender: Integer;
    
55. FHeroLevel: Integer;
    
56. FHeroJob: Integer;
    
57. FHeroTypeExt: Integer;
    
58. FPlatLv: Byte;
    
59. FGuildPoint: Integer;
    
60. FCallOutParam: string;
    
61. FGetTrustByWine: Byte;
    
62. FMyExpQuestValue: Cardinal;
    
63. FMemberCount: Integer;
    
64. FGloryPoint: Integer;
    
65. FIsNetCafeUser: Boolean;
    
66. FCombineHeroTrainType: byte;
    
67. FMyAttackMode: byte;
    
68. FAccumulatedTime: Double;
    
69. FAccumulateFlag: Boolean;
    
70. FPeiouName: string;
    
71. FCurGlory: Integer;
    
72. FLevelOrder: Word;
    
73. FTryExchangeItemName: string;
    
74. FTryExchangeItemMode: Cardinal;
    
75. FEnterMapTick: longword;
    
76. FActiveValue: Word;
    
77. FTenYearImpress: Cardinal;
    
78. 二、发布型：变量名 类型  说明
    
79. property GMLevel: Word read FGMLevel;
    
80. property YBNum: Integer read FYBNum;
    
81. property UsedYBNum: Integer read FUsedYBNum;
    
82. property NickLinFu: integer read FNickLinFu;
    
83. property HaveTimeNum: integer read FHaveTimeNum;
    
84. property HaveValidHero: Boolean read FHaveValidHero;
    
85. property TrendDataValid: Boolean read FTrendDataValid;
    
86. property JiaYouPoint: Cardinal read FJiaYouPoint;
    
87. property BoReferUser: Boolean read FBoReferUser;
    
88. property BoSpreader: Boolean read FBoSpreader;
    
89. property Level: Word read FLevel;
    
90. property Name: String read FName;
    
91. property FreeBagNum: Integer read FFreeBagNum;
    
92. property Job: Byte read FJob;
    
93. property Gender: Byte read FGender;
    
94. property IsDead: Boolean read FIsDead;
    
95. property My_X: integer read FMy_X;
    
96. property My_Y: integer read FMy_Y;
    
97. property IsDeleted: Boolean read FIsDeleted;
    
98. property NormalHide: Boolean read FNormalHide;
    
99. property IntParam: integer read FIntParam write FIntParam;
    
100. property StrParam: String read FStrParam write FStrParam;
     
101. property GoldNum: Integer read FGoldNum;
     
102. property MyShengwan: Integer read FMyShengwan write FMyShengwan;
     
103. property MyUsedLfNum: Integer read FMyUsedLfNum;
     
104. property MyDiamondnum: Integer read FMyDiamondnum;
     
105. property MyPKpoint: integer read FMyPKpoint;
     
106. property LuckNum: Integer read FLuckNum;
     
107. property HitRate: Byte read FHitRate;
     
108. property QuickRate: Byte read FQuickRate;
     
109. property AC: Word read FAC;
     
110. property MaxAC: Word read FMaxAC;
     
111. property DC: Word read FDC;
     
112. property MaxDC: Word read FMaxDC;
     
113. property MC: Word read FMC;
     
114. property MaxMC: Word read FMaxMC;
     
115. property SC: Word read FSC;
     
116. property MaxSC: Word read FMaxSC;
     
117. property HP: Integer read FHP;
     
118. property MaxHP: Integer read FMaxHP;
     
119. property MP: integer read FMP;
     
120. property MaxMP: Integer read FMaxMP;
     
121. property MyLFnum: Integer read FMyLFnum;
     
122. property MyExp: Cardinal read FMyExp;
     
123. property DominateLevel: Word read FDominateLevel write FDominateLevel;
     
124. property GuildName: string read FGuildName;
     
125. property GuildLord: string read FGuildLord;
     
126. property IsGroupOwner: Boolean read FIsGroupOwner;
     
127. property IsTeamMember: Boolean read FIsTeamMember;
     
128. property IsAStudent: Boolean read FIsAStudent;
     
129. property GuildOrder: Integer read FGuildOrder;
     
130. property LingXiValue: Integer read FLingXiValue write FLingXiValue;
     
131. property HeroGender: Integer read FHeroGender;
     
132. property HeroLevel: Integer read FHeroLevel;
     
133. property HeroJob: Integer read FHeroJob;
     
134. property HeroTypeExt: Integer read FHeroTypeExt;
     
135. property PlatLv: Byte read FPlatLv write FPlatLv;
     
136. property GuildPoint: Integer read FGuildPoint;
     
137. property CallOutParam: string read FCallOutParam write FCallOutParam;
     
138. property GetTrustByWine: Byte read FGetTrustByWine;
     
139. property MyExpQuestValue: Cardinal read FMyExpQuestValue;
     
140. property MemberCount: Integer read FMemberCount;
     
141. property GloryPoint: Integer read FGloryPoint;
     
142. property IsNetCafeUser: Boolean read FIsNetCafeUser;
     
143. property CombineHeroTrainType: byte read FCombineHeroTrainType;
     
144. property MyAttackMode: byte read FMyAttackMode;
     
145. property AccumulatedTime: Double read FAccumulatedTime;
     
146. property AccumulateFlag: Boolean read FAccumulateFlag write FAccumulateFlag;
     
147. property PeiouName: string read FPeiouName;
     
148. property CurGlory: Integer read FCurGlory;
     
149. property LevelOrder: Word read FLevelOrder;
     
150. property TryExchangeItemName: string read FTryExchangeItemName write FTryExchangeItemName;
     
151. property TryExchangeItemMode: Cardinal read FTryExchangeItemMode write FTryExchangeItemMode;
     
152. property EnterMapTick: longword read FEnterMapTick;
     
153. property ActiveValue: Word read FActiveValue;
     
154. property TenYearImpress: Cardinal read FTenYearImpress;
     
155. 三、公共型：变量名 类型  说明
     
156. function GetBagItemCount(const ItemName: string): Integer;
     
157. function GetBagItemCountEx(const ItemName: string; iParam: Integer): Integer;
     
158. function Give(const ItemName: string; ItemCount: Integer): Boolean;
     
159. function BindGive(const ItemName: string; ItemCount: Integer): Boolean;
     
160. function LoopGive(const ItemName: string; ItemCount: Integer; const loopCnt: Integer): Boolean;
     
161. function Take(const ItemName: string; ItemCount: Integer): Boolean;
     
162. function TakeExpand(const ItemName: string; ItemCount: Integer; iParam: Integer): Boolean;
     
163. function TakeEx(const ItemName: string; ItemCount: Word;sReason:string;bIncludeEqp:Boolean): Boolean;
     
164. procedure Flyto(const MapName: string; x: Word; y: Word);
     
165. function FlyToDynRoom(sRoomName: string; x: Integer; y:Integer): integer;
     
166. function FlyToDynEnvirWithIdx(sRoomName: string; idx, x, y:Integer): Boolean;
     
167. function MapName: string;
     
168. function DynRoomName: string;
     
169. function DynRoomIdx: Integer;
     
170. function IsCastle: Boolean;
     
171. procedure PlayerNotice(const Msg: string; const vColor: word);
     
172. procedure QuestInfo(const Msg: string);
     
173. function GetV(const nTaskNo, nFieldNo: integer): Integer;
     
174. function SetV(const nTaskNo, nFieldNo, nValue: integer): Boolean;
     
175. function GetS(const nActNo, nFieldNo: integer): Integer;
     
176. function SetS(const nActNo, nFieldNo, nValue: integer): Boolean;
     
177. procedure PlayerDialog(const Msg: string);
     
178. function DelAllThisItem(const ItemName: string): integer;
     
179. procedure IncPkpoint(const AddNum: integer);
     
180. function CheckBagItemEx(const ItemName: string; var ChkNum, ChkDura, ChkAllDura: integer): Cardinal;
     
181. procedure CallOut(PsNpc: TObject; SpTime: integer; TimeOutProc : string);
     
182. procedure CallOutEx(PsNpc: TObject; SpTime: integer; TimeOutProc : string);
     
183. function IsGuildLord: Boolean;
     
184. function IsFirstGuildLord: Boolean;
     
185. procedure DecPkPoint(const X: integer);
     
186. function ChgHair(const Kind: Byte): Boolean;
     
187. function ChgSkillLv(const SkillName: string; ToLv: Byte; skillexp: integer): Boolean;
     
188. procedure DoDamageWeapon(const nDamage: integer);
     
189. function AddGold(Value: integer): Boolean;
     
190. function DecGold(const Num: integer): Boolean;
     
191. procedure RandomFlyTo(const MapName : string);
     
192. function ReqCastleWar: Boolean;
     
193. function BuildGuild(const GuildStr: string): integer;
     
194. procedure AgreeMarry(Npc: Tobject);
     
195. procedure DisAgreeMarry;
     
196. procedure NpcDivMarry(Npc: TObject);
     
197. function AgreeBaishi(Npc: Tobject): Boolean;
     
198. procedure DisAgreeBaishi(Npc: TObject);
     
199. procedure NpcLeaveTec(Npc: TObject);
     
200. function TakeBodyEquipByName(const ItemStr: string; TakeNum: integer): Boolean;
     
201. function TakeBodyEquipByPos(const nPos: integer): string;
     
202. procedure AddLF(const nType, nNum : Integer);
     
203. procedure AddLimLF(const nType, nNum : Integer);
     
204. procedure DecLF(const nType, nNum : Integer; recordFlag : Boolean);
     
205. function GetMyPositionInGuild: Integer;
     
206. function GetHeroBagItemCount(const ItemName: string): Integer;
     
207. function TakeFromHeroBag(const ItemName: string; ItemCount: Byte): Boolean;
     
208. function GetItemNameOnBody(const nPos : Integer): string;
     
209. procedure GroupFly(const sTargetMap : string);
     
210. function GroupFlyEx(const sTargetMap : string): word;
     
211. procedure ShiMenFly(const sTargetMap : string; mode: Integer);
     
212. procedure CoupleFly(const sTargetMap : string);
     
213. function ConfiscateBodyItem(const nPos : Integer): Boolean;
     
214. function UpGradeHeroSkill(const skill_idx: Integer; skill_exp : Integer): Boolean;
     
215. function TakeDiamond(TakeNum: integer; Npc: TObject): Boolean;
     
216. procedure ChangeMapWithOths(const SeachMap: string);
     
217. function CreateHero(heroName: string; hType, heroJob: Integer): Integer;
     
218. procedure MakeDiamondWithYB(const Num : Integer);
     
219. procedure Donatediam(const InPutStr: string);
     
220. procedure RequestGuildWar(const TargGuildStr: string);
     
221. procedure GiveBindItem(const ItemName: string; ItemNum : Integer);
     
222. function GiveTimeOutItem(const itemName: string; endTime: TDateTime; iNum: Integer; bBind: Boolean): Boolean;
     
223. procedure ReqOpenStorage(const InPutStr: string);
     
224. procedure GroupFlyToDynRoom(roomName: string; roomIdx: Integer);
     
225. procedure GroupFlyToDynRoomInRange(roomName: string; roomIdx, x, y, iRange: Integer);
     
226. procedure GroupCallOut(npc: TObject; procName, param: string; deltTime: Integer);
     
227. function GroupSetV(const nTaskNo, nFieldNo, nValue: integer): Boolean;
     
228. procedure FlyToObserverMap;
     
229. function GetLeiTaiState: Integer;
     
230. function DoSendPlayerToLeitai: Integer;
     
231. function GetWarResult: Integer;
     
232. function GetMyLeiTaiFlag: Integer;
     
233. procedure PsConsumeYb(const NeedYb : integer);
     
234. procedure ReqBuildDiamond(const InPutStr: string);
     
235. procedure IncNickLinFu(value: integer);
     
236. procedure DecNickLinFu(value: integer);
     
237. function GetHeroSkillStr: string;
     
238. function MyHeroState(HeroType : Integer): Integer;
     
239. procedure AddTaskToUIList(const id, ShowUIFlag: Integer);
     
240. procedure UpdateTaskDetail(const id, ShowUIFlag: Integer);
     
241. procedure UpdateTaskProgress(const id, ShowUIFlag: Integer);
     
242. procedure DeleteTaskFromUIList(const id, ShowUIFlag: Integer);
     
243. procedure DoRelive(const delayTime, hp : Integer);
     
244. procedure LeftTime(const MsgStr : string; iLine, iSec : Integer);
     
245. procedure AutoGotoMap(const mapName: string; x, y: Integer);
     
246. function AddSkillExp(const name: string; const exp: Integer): Boolean;
     
247. function AddHeroSkillExp(const name: string; const exp: Integer): Boolean;
     
248. function UpgradeHeroSkillLv(const name: string): Boolean;
     
249. function NewBieGiftConsume: Boolean;
     
250. function GetLimitLinfu: Integer;
     
251. function ShowLingfu3: Integer;
     
252. function DecGloryPoint(vsId, nPrize, nNum: Integer; bAddPoint: Boolean; const desc: string): Boolean;
     
253. function AddGloryPoint(nNum: Integer): Boolean;
     
254. procedure AddLogRec(const Cmd: word; const ItemName: string; const ItemId: Cardinal; const ItemNum: integer; const Desc: string);
     
255. function PsYBConsum(npc: TCreature; const callbackProc: string; vsId, nPrice, nNum: Integer): Boolean;
     
256. function PsYBConsumEx(exeTag: Byte; const callbackProc, DescName: string; vsId, nPrice, nNum: Integer): Boolean;
     
257. procedure AddDbLinfuTime(secTime: Cardinal);
     
258. function BoInDbLinfu: Boolean;
     
259. function ChkIfCanAddUSExp: Integer;
     
260. function AddUSExp(const lfNum, powerVal, skillExp: Integer): Integer;
     
261. function MakeSlave(const SlaveName: string; const MagicLv, nCount: Integer; RoyaltySec: Cardinal; const BoFromHero: Boolean; hpAfterSlave: Integer): TCreature;
     
262. function CheckSkill(skillId: Integer): Integer;
     
263. function CheckHeroSkill(skillId: Integer): Integer;
     
264. procedure GiveConfigPrize(const PrizeIdx: integer; const InfoStr: string; TempTransferFlag : Boolean);
     
265. function GiveHeroExp(exp: Cardinal; bAddBall: Boolean): Boolean;
     
266. function GiveHeroSuperExp(exp: Cardinal; bAddBall: Boolean): Boolean;
     
267. function GiveHeroSuperExpLoop(exp: Cardinal; bAddBall: Boolean; const loopCnt: Integer): Boolean;
     
268. function GiveHeroForceExp(exp: Cardinal; bAddBall: Boolean): Boolean;
     
269. function GiveItemWithDura(const itemName:string; ItemNum:Integer; ItemDura:Word): Boolean;
     
270. procedure GetAwardItem(const ActOrder: string);
     
271. function TakeFullDuraItem(const ItemName: string; ItemCount: Integer): Boolean;
     
272. function SignIn: Boolean;
     
273. function GetSignInActPrize: Integer;
     
274. function GetSignInActPrizer(var lucker1, lucker2: string): string;
     
275. procedure SignInDayAct;
     
276. function GetSignInDayActPrizer(prizeLv: Integer): string;
     
277. function GetSignInDayActTag: Integer;
     
278. function GetWeaponLucky(boAddBase: Boolean; bHero: Boolean): Integer;
     
279. function SetWeaponLucky(val: Integer; bHero: Boolean): Boolean;
     
280. function GetNecklaceLucky: Integer;
     
281. function UpWeaponNoBroken(upType: Byte; bSureSuc: Boolean; bHero: Boolean): Integer;
     
282. procedure FinishCombineHeroTrain;
     
283. procedure ClearMulExpTime;
     
284. function SetAllGroupMemTag(const nNode, nVal: Integer): Boolean;
     
285. function AddAllGroupMemTag(const nNode, nVal: Integer): Boolean;
     
286. function SetSelfGroupMemTag(const nNode, nVal: Integer): Boolean;
     
287. function GetSelfGroupMemTag(const nNode: Integer): Integer;
     
288. procedure AddGuildPoint(const nVal: Integer);
     
289. procedure ReqPieceUpNewYearPicture(const iMod, iNum, iNeedValue: Integer);
     
290. function GroupChkTagV(const nNum, nField, nVal, nTag: Integer): Boolean;
     
291. function GroupChkTagS(const nNum, nField, nVal, nTag: Integer): Boolean;
     
292. function QueryGloryPointByGoodsNum(const goodsType, goodsNum: Integer): Integer;
     
293. function QueryGoodsNumByYBNum(const goodsType, ybNum: Integer): Integer;
     
294. function SellGoodsToGetGloryPoint(const goodsType, goodsNum: Integer): Integer;
     
295. function ConsumeYBToBuyGoods(const goodsType, consumeYbNum: Integer): Integer;
     
296. function GetGoodsCurrentStorage(const goodsType: Integer): Integer;
     
297. function AddStoreItem(itemStr: string): Boolean;
     
298. function AddAccountStorageCnt(num: Integer): Boolean;
     
299. function GetAccountStorageCnt: Integer;
     
300. procedure GroupFlyInRange(mapName: string; x, y, iRange: Integer);
     
301. function SendItemsToOther(const playerName, takeItemName, giveItemName: string; const takeItemNum, giveItemNum, needBagNum: Integer): Integer;
     
302. procedure DropItemDownExt(itemName:string;itemNum:Integer);
     
303. function QueryTeamMemberLevelInfo(const limitLv: word): Integer;
     
304. procedure GroupExecuteProc(npcObj: TObject; procName: string);
     
305. function TakeCastleStone(nTakeType:Word): Integer;
     
306. function GetCastleStoneOwners(nTeamID:Word;var Status:Word): string;
     
307. function GetEquipmentBreakLevel(const nPos:integer;bHero:Boolean): Integer;
     
308. function ChgEquipmentBreakLevel(const nPos:integer;Value:Integer;bHero:Boolean;bAdd:Boolean): Integer;
     
309. procedure ReqStartTransferArea(const iTransferMode: Word; iZoneId, iGroupId: Word);
     
310. procedure ReqAddRemoteTAScore(const wScoreType, wScore: Word);
     
311. function QueryTAScore(const wScoreType: Word): Integer;
     
312. function DecTAScore(const wScoreType, wDecScore: Word): Boolean;
     
313. procedure AddPlayerAbil(abilType, abilVal, lastSec: Word);
     
314. procedure AddHeroAbil(abilType, abilVal, lastSec: Word);
     
315. procedure SetHeroLevel(level: Word);
     
316. function AutoReLive(sMapName:string;x,y:Integer;bMaxHP:Boolean;bMaxMP:Boolean): Boolean;
     
317. function GetAroundMonNum(const sMonName: string;x,y,Rang:Integer): Integer;
     
318. function FindPlayer(sHumanName:string): Boolean;
     
319. function FindPlayerByName(sHumanName:string): TPlayer;
     
320. function SetVEx(const nTaskNo, nFieldNo,nValue:Integer;sHumanName:string): Boolean;
     
321. function GetVEx(const nTaskNo, nFieldNo: Integer;sHumanName: string): Integer;
     
322. function GiveItemsToOther(const npc:TCreature;const TargName,ItemName:string;const ItemNum,nPrice:Integer;bUseGp:Boolean): Integer;
     
323. function GetPlayerGender(const sHumanName: string): Integer;
     
324. function GetSpouse: TPlayer;
     
325. function GetSkillLevelExt(const SkillName:string;bHero:Boolean): Integer;
     
326. function UpdateEverydayActOrder(const iActNo, iFieldNo: Integer;const sName: string; const iScore: Integer): Integer;
     
327. function QueryAllVoteTopTen: string;
     
328. procedure ShowCurrentBless(const lv: Integer; const info1, info2, info3: string);
     
329. function ChgTenYearImpress(value:Integer): Boolean;
     
330. function GetCastleOrdDesc: String;
     
331. function GetCastleGift(Npc:TCreature;iOrd:Integer): Integer;
     
332. procedure CreateCampAnimal(const monName: string; const campIdx, MonX, MonY, MonNum, Range, targX, targY: Integer);
     
333. procedure DominaterCall;
     
334. function VIPCall(const s:string;isCall:Boolean): Boolean;
     
335. procedure CreateGuildHero(const heroName, mapName: string; initX, initY, targX, targY, Num: Integer);
     
336. procedure SetGuildHeroTargXY(const targX, targY: Integer);
     
337. function CreateProtectHero(const heroName: string): Boolean;
     
338. function GetMyGuildHeroNum: Integer;
     
339. procedure AddMyGuildResource(const num: Integer);
     
340. function DecMyGuildResource(const num, castleType: Integer): Boolean;
     
341. function CurMyGuildResource: Integer;
     
342. function MyGuildDreamCastCost: Integer;
     
343. procedure SetGuildParam(const pType, pNum: Integer);
     
344. function GetGuildParam(Const pType: Integer): Integer;
     
345. procedure InputDialog(MsgStr: string; DlgType, InputType: Integer);
     
346. procedure SetPlayerLevel(level: Word);
     
347. function PreSentItem(const TargName,ItemName:string;ItemNum:Integer;sex:Byte;bReUsed:Boolean;bBind:Boolean): Integer;
     
348. function GiveHumLevelBuffer(bufType, initLv, coldTimeSec: Integer; bHero: Boolean): Integer;
     
349. function OpenEquipmentMascotToMax(const ALevel: Integer): Boolean;
     
350. function IsInlayRabbitMascot(AItemName: String): Boolean;
     
351. function GetEquipmentMascotLevel: Integer;
     
352. function GetEquipmentMascotLevelHero: Integer;
     
353. function UnShutupSelf: Integer;
     
354. function OpenEquipmentMascotToMaxHero(const ALevel: Integer): Boolean;
     
355. function IsInlayRabbitMascotHero(AItemName: String): Boolean;
     
356. procedure setMyGuildTag(idx, val: Integer);
     
357. function getMyGuildTag(idx: integer): Integer;
     
358. procedure ClientSellerCancelYBDeal;
     
359. procedure QueryTaskDispatch;
     
360. procedure DoScriptHpMpRecover(const nHp, nMp, nHeroHp, nHeroMp: Integer);
     
361. procedure SetVipTag;
     
362. procedure TryOpenZillion(iType: Integer);
     
363. procedure CreateMon(const MapName: string; X, Y, Ranger: Integer; MonName: string; MonNum: Integer);
     
364. function GetObPoint: integer;
     
365. procedure DeleteObPoint;
     
366. procedure AddGuanMoPoint(gmPoint: Integer);
     
367. function IsGroupMember(const chrName: String): Boolean;
     
368. function RepairBodyEquip(EquipPos: Byte): Boolean;
     
369. function AddPointToMarkStoneCharm(const point: Cardinal; const isMaster: Boolean): Boolean;
     
370. function GetTrendV(const fieldName:string): Integer;
     
371. procedure DecJiaYouPoint(point: Integer);
     
372. function OpenStorage(storageType: Integer): Integer;
     
373. procedure PlayerEnterXinfaMap(enterType: Byte; mapLevel: Integer);
     
374. function DeleteSkill(const SkillName: string): Boolean;
     
375. function LearnMagic(const magName: string): Boolean;
     
376. procedure LearnLNJN(const iType:Integer);
     
377. procedure UpLevelLNJN(const iType: Integer);
     
378. procedure DelBagItemOfAll;
     
379. procedure HeroLearnLNJN(const iType:Integer);
     
380. procedure HeroUpLevelLNJN(const iType: Integer);
     
381. function ExchangeEquip_SameIden(SourceEquip, DestEquip: string; boBind : Boolean): Boolean;
     
382. procedure OpenMilRank;
     
383. procedure StartPaodian(DuraSec:integer);
     
384. procedure BeginTransLog(Logtype:integer);
     
385. procedure EndTransLog;
     
386. function GetLianTiLv: Integer;
     
387. function GetQiangTiLv: Integer;
     
388. function GetTiPoLv: Integer;
     
389. function GetQiangTiPhase: Integer;
     
390. function GetTiPoPhase: Integer;
     
391. function GetLianTiLv_hero: Integer;
     
392. function GetQiangTiLv_hero: Integer;
     
393. function GetTiPoLv_hero: Integer;
     
394. function GetQiangTiPhase_hero: Integer;
     
395. function GetTiPoPhase_hero: Integer;
     
396. function LearnSkillByScript(skillName: string; boHero: Boolean; initLevel: Integer): Boolean;
     
397. function UpgradeSkillByScript(skillName: string; boHero: Boolean): Boolean;
     
398. function GetSkillLevelByScript(skillName: string; boHero: Boolean): Integer;
     
399. procedure FlyToWeSpot;
     
400. function AddPlayerDailyCount(TaskID, Count: Integer): Boolean;
     
401. function SubmitLegendBook: Boolean;
     
402. function GetWWSQPassNum: Integer;
     
403. function JoinMirMatch: Boolean;
     
404. function GetMirMatchPrize: Boolean;
     
405. function GetPneumaTotalLevel: Word;
     
406. function ExpandStorageSpace(AddedCount: Integer): Integer;
     
407. function GetStorageSpaceCount: Integer;
     
408. procedure HelperDialog(const msg: string);
     
409. procedure NewFullMailEx(const ATitle,AContext: string; AMailType: Integer; AMonyCount: Integer;AMonyType: Integer;  const AItemInfo: string; ACreateDateTime: string);
     
410. function CreateSelfCorps(const CorpsName: String): Integer;
     
411. function CreateSelfGild(const GildName: String): Integer;
     
412. function GetCorpsName: string;
     
413. function GetGildName: string;
     
414. function GetVitalityValue(ValueIdx : Integer): Integer;
     
415. function GetVExpToBeConverted: Cardinal;
     
416. procedure SetVExpToBeConverted(Value : Cardinal);
     
417. function IncVExpToBeConverted(Value : Cardinal): Boolean;
     
418. function DecVExpToBeConverted(Value : Cardinal): Boolean;
     
419. function IncActivePoint(const Value : Integer): Integer;
     
420. function DecActivePoint(const Value : Integer): Integer;
     
421. function GetActivePoint: Integer;
     
422. function GetTmpActivePoint: Integer;
     
423. function CanEnterActiveMap(const MapStr : string): Boolean;
     
424. procedure NotifyClientCommitItem(AResult: Integer; const AMsg: string);
     
425. function ActiveAuthen(AuthenLv : Integer; AuthenOrder : Integer): Integer;
     
426. function ActiveDelAuthen(AuthenLv : Integer; AuthenOrder : Integer): Integer;
     
427. function CheckAuthen(AuthenLv : Integer; AuthenOrder : Integer): Boolean;
     
428. function HelpOtherAuthen: Integer;
     
429. function AuthByHelped(AuthenLv : Integer; AuthenOrder : Integer): Integer;
     
430. function TakeByClientID(const AClientItemID: Integer): Boolean;
     
431. function SysGiveGift(const ItemStr: string;Num: integer;BoBind: Boolean): Boolean;
     
432. function GetCreateTime: Double;
     
433. procedure SystemMsg(const AType: Char; const AMsg: string);
     
434. function learnLivingSkill(Id : Integer): Integer;
     
435. procedure SendLivingSkillStatus;
     
436. function AddToBuyGoodsLogByScript(const GoodsName: string; const GoodsIdx, GoodsWantNum, TotalPrice: Integer): Integer;
     
437. function HumanPush(const Content: string; const OpenActType: Integer): Integer;
     
438. function GetMyTaskState(const TaskID: Integer): Integer;
     
439. function GetMyTaskDetail(const TaskID, ShowUIFlag: Integer): string;
     
440. procedure TaskDialog(const TaskID: Integer; const Msg: string);
     
441. procedure QueryAwardCode(const CodeStr: string);
     
442. procedure SetAwardCodeActiveParam(const CodeStr: string; const ActiveParam: Integer);
     
443. procedure ScriptRequestAddYBNum(const AddNum: Integer);
     
444. procedure ScriptRequestSubYBNum(const SubNum: Integer);
     
445. 四、特殊变量
     
446. FRepDoorGold: Integer;
     
447. FRepWallGold: Integer;
     
448. FHireGuardGold: Integer;
     
449. FHireArcherGold: Integer;
     
450. FInputStr: string;
     
451. FInputOK: Boolean;
     
452. FInputButton: Word;
     
453. FMy_X: Integer;
     
454. FMy_Y: Integer;
     
455. property RepDoorGold: Integer read FRepDoorGold write FRepDoorGold;
     
456. property RepWallGold: Integer read FRepWallGold write FRepWallGold;
     
457. property HireGuardGold: Integer read FHireGuardGold write FHireGuardGold;
     
458. property HireArcherGold: Integer read FHireArcherGold write FHireArcherGold;
     
459. property InputStr: string read FInputStr;
     
460. property InputOK: Boolean read FInputOK;
     
461. property InputButton: Word read FInputButton;
     
462. property My_X: Integer read FMy_X;
     
463. property My_Y: Integer read FMy_Y;
     
464. procedure NPCSay(const MsgStr: string);
     
465. procedure CreateMon(const MapName : string; X, Y, Ranger : Integer; MonName : string; MonNum : Integer);
     
466. procedure CreateFamePlayerMon(const MapName: string; X, Y: Integer; MonName: string; iRank, MonNum: Integer);
     
467. procedure ClearMon(const MapName : string);
     
468. procedure ClearMonEx(const MapName: string;bAll:Boolean);
     
469. function CheckCurrMapMon: Integer;
     
470. function CheckMapMonByName(const sMapName, sMonName: string): Integer;
     
471. function CheckCurrMapHum: Integer;
     
472. procedure FillGoods(const GoodName : string; Num, Interval : Integer);
     
473. procedure AddStdMode(nMode: Word);
     
474. procedure Click_Buy(Clicker: TPlayer);
     
475. procedure Click_Sell(Clicker: TPlayer);
     
476. procedure Click_Repair(Clicker: TPlayer);
     
477. procedure Click_Open_Mosaic_Hole(Clicker: TPlayer);
     
478. procedure Click_Open_Duihuan_Contri(Clicker: TPlayer);
     
479. procedure Click_Open_MyOffiRankUI(Clicker: TPlayer);
     
480. procedure Click_Open_AttachAbilUI(Clicker: TPlayer);
     
481. procedure Click_Open_MirTianTiOrder(Clicker: TPlayer);
     
482. procedure Click_RepairEx(Clicker: TPlayer;RepairMode:Word);
     
483. procedure Click_SRepair(Clicker: TPlayer);
     
484. procedure Click_Storage(Clicker: TPlayer);
     
485. procedure Click_GetBack(Clicker: TPlayer);
     
486. procedure Click_Acc_Storage(Clicker: TPlayer);
     
487. procedure Click_Acc_GetBack(Clicker: TPlayer);
     
488. procedure Click_EQP_Operate(Clicker:TPlayer;OpCode:word);
     
489. procedure Click_GoldChgBar(Clicker: TPlayer);
     
490. procedure Click_BartoBrick(Clicker: TPlayer);
     
491. procedure Click_BricktoBar(Clicker: TPlayer);
     
492. procedure Click_BartoGold(Clicker: TPlayer);
     
493. procedure Click_Makedrug(Clicker: TPlayer);
     
494. procedure NpcNotice(MsgStr: string);
     
495. procedure NpcSideNotice(const MsgStr: string);
     
496. procedure NpcMapNotice(const MsgStr: string; const iColor: Integer);
     
497. function GetCastleTotalGold: Integer;
     
498. function GetCastleTodayIncome: Integer;
     
499. function GetCastleDoorState: string;
     
500. procedure Click_TakeOutGold(Hum: TPlayer; const GoldNumStr: string);
     
501. procedure Click_SaveGold(Hum: TPlayer; const GoldNumStr: string);
     
502. procedure Click_RepairDoor(Hum: TPlayer);
     
503. procedure Click_RepairWall(Hum: TPlayer; const nPos: Integer);
     
504. procedure Click_HireGuard(Hum: TPlayer; nPos: Integer);
     
505. procedure Click_HireArcher(Hum: TPlayer; nPos: Integer);
     
506. procedure OpenCastleDoor(bOpen : Boolean);
     
507. procedure InputDialog(Hum: TPlayer; MsgStr : string; DlgType, InputType : Integer);
     
508. function ReqBecomeCeleb(Hum: TPlayer): Integer;
     
509. function GetCelebName: String;
     
510. function GetCelebLv: Integer;
     
511. procedure ChgCelebColor(ColIdx : Integer);
     
512. procedure ReqBecomeCeleb(Hum: TPlayer);
     
513. function ReqCastleOwnerNpc(Hum : TPlayer): Integer;
     
514. function StorageAllBagItems(Sender: TPlayer): string;
     
515. function ClickUpWeaponNow(Hum: TPlayer): Integer;
     
516. function ClickUpWeaponNoBreak(Hum: TPlayer): Integer;
     
517. function ClickGetBackUpWeapon(Clicker: TPlayer): Integer;
     
518. procedure AddNpcProp(npcProp : Integer);
     
519. function ChkStrInFile(const sFileName, sSearchStr : string): Boolean;
     
520. function AddStrToFile(const sFileName, sAddStr : string): Boolean;
     
521. function DelStrFromFile(const sFileName, sDelStr : string): Boolean;
     
522. function GetAroundMonNum(const sMonName : string): Integer;
     
523. procedure SetMonTargetXY(const x, y : Integer);
     
524. procedure NpcRecallPlayers(const sSrcMap : string; num : Integer);
     
525. procedure PlayDice(Player : TPlayer; iDiceNum : Integer; sFunc : string);
     
526. procedure ClickUpgradeJewels(Player: TPlayer; const nPos :  Integer);
     
527. procedure ClientAskYBDuanZao(Player: TPlayer);
     
528. procedure ClientQuestGetDiam(Player: TPlayer; Num: integer);
     
529. procedure RefreshCredit(Player: TPlayer);
     
530. procedure ClientReqGetBackLostItem(Player: TPlayer; const LostType: integer);
     
531. procedure ReqItemByGoldID(Player: TPlayer);
     
532. procedure ReqItemByGoldAct(Player: TPlayer);
     
533. procedure ReqItemByPlatina(Player: TPlayer);
     
534. procedure ClientQueryLastDealMsg(Player: TPlayer);
     
535. procedure ClientQueryYbDealItem(Player: TPlayer; flag : Boolean);
     
536. procedure ClientAskOpenYB(Player: TPlayer);
     
537. procedure ReqGetFirstUsedGift(Player: TPlayer);
     
538. procedure ClientYBbuyLF(Player: TPlayer; const Num: integer);
     
539. procedure BuyWineFromNpc(Player: TPlayer);
     
540. function UseGuildPoint(Player: TPlayer): Integer;
     
541. function GetSomeGuildPoint(Player: TPlayer): Integer;
     
542. function ChangeGPSwitch(Player: TPlayer): Integer;
     
543. procedure GiveWine(Player: TPlayer; const sName: string; iDrinkVal, iQuality: integer);
     
544. function MapName: string;
     
545. procedure RequestBaishi(Hum: TPlayer; const InPutStr: string);
     
546. procedure SendKaiChuList(Hum: TPlayer);
     
547. procedure NpcKickOutStu(Hum: TPlayer; const stuNo: Integer);
     
548. procedure RequestMarry(Hum: TPlayer; const InPutStr: string);
     
549. procedure ClickComposeDress(Player: TPlayer; const ProcStr: string);
     
550. function GetCastleGuildName: string;
     
551. function GetCastleLoadName: string;
     
552. procedure GiveConfigPrize(Player: TPlayer; const PrizeIdx: integer; const InfoStr: string);
     
553. procedure UpgradeSelfMagicShield(Player: TPlayer);
     
554. procedure UpgradeHeroMagicShield(Player: TPlayer);
     
555. function CheckMarry(Player: TPlayer): Integer;
     
556. procedure ReqPopGift(Player: TPlayer);
     
557. procedure EngageArcher(Hum: TPlayer; Idx: integer);
     
558. function IsExistArcher(Hum: TPlayer; Idx: integer): Boolean;
     
559. function GetMoveChance(Hum: TPlayer; Idx: integer): Boolean;
     
560. function GetEngageChance(Hum: TPlayer): Boolean;
     
561. procedure SetRebate(nRebate : Word);
     
562. procedure EnterRouteWayByLF(Hum: TPlayer; BoClientClick: Boolean);
     
563. procedure EnterRouteWayByLFEx(Hum: TPlayer; BoClientClick: Boolean;bFree:Boolean);
     
564. procedure EnterGuan(Hum: TPlayer);
     
565. procedure EnterNewGuan(Hum: TPlayer);
     
566. procedure ChkMonAndItem(Hum: TPlayer);
     
567. procedure WantWarMon(Hum: TPlayer);
     
568. procedure GetSkyPrize(Hum: TPlayer);
     
569. procedure EnterMyStery(Hum: TPlayer);
     
570. procedure ClientGetPrize(Hum: TPlayer);
     
571. procedure EnterNext(Hum: TPlayer; BoMyStery: Boolean);
     
572. procedure EnterNext2(Hum: TPlayer);
     
573. procedure OpenActionBox(Hum: TPlayer);
     
574. procedure ShowBook(Player: TPlayer; i, j: Integer; s: string);
     
575. procedure CreateDynRoomMon(const sRoomName: string; idx, X, Y, Ranger: Integer; MonName: string; MonNum: Integer);
     
576. function GetAIdleDynRoomIndex(roomName: string): Integer;
     
577. function GetAIdleDynRoomIndexEx(roomName: string;owner:TPlayer): Integer;
     
578. procedure UpHelmet(Hum: TPlayer);
     
579. procedure FoundryList(Clicker: TPlayer);
     
580. procedure MakeItemUseDiam(Hum: TPlayer);
     
581. procedure DiaPeif(Hum: TPlayer; const nCmd: integer);
     
582. function NewYearOrderPresent: string;
     
583. function NewYearOrderAccept: string;
     
584. function CurrentNewYearOrderPresent: string;
     
585. function CurrentNewYearOrderAccept: string;
     
586. function GetCurrentNewYearOrder(Hum: TPlayer): string;
     
587. function GetLastNewYearOrder(Hum: TPlayer): string;
     
588. function NewYearGetMyGift(Hum: TPlayer): Integer;
     
589. function SubmitBallQuest(Player: TPlayer): Integer;
     
590. function CheckCastleWarDate: string;
     
591. function GetListOfWar: string;
     
592. function GetGuildWarGold: Integer;
     
593. procedure RndGetMedal(Hum: TPlayer; const ProcStr: string);
     
594. procedure SpeGetMedalByRy(Hum: TPlayer; const ProcStr: string);
     
595. procedure SpeGetMedalBySW(Hum: TPlayer; const ProcStr: string);
     
596. procedure UpMedalAbil(Hum: TPlayer);
     
597. procedure ReqUseTimeBuyLF(Hum: TPlayer; const Num: integer);
     
598. procedure UpFeeUserAct(Hum: TPlayer);
     
599. procedure OpenNeedKeyBox(Hum: TPlayer);
     
600. procedure OpenNeedKeyBox2(Hum: TPlayer);
     
601. procedure OpenLuckBox(Hum: TPlayer);
     
602. procedure OpenLuckBox2(Hum: TPlayer);
     
603. procedure UseNick(Hum: TPlayer; Usetype: integer);
     
604. procedure NPCDropItem(ItemName: string; nRanger, ItemNum: integer);
     
605. procedure NPCDropItemToAllMapRnd(ItemName: string; ItemNum: integer);
     
606. procedure BuyLfBag(Sender: TPlayer);
     
607. function UpdateEverydayActOrder(const iActNo, iFieldNo: Integer; const sName: string; const iScore: Integer): Integer;
     
608. function GetCurrentEAPeriod(const iActNo, iFieldNo: Integer): Integer;
     
609. function GetCurrentEAIdxByName(const iActNo, iFieldNo: Integer; const sName: string): Integer;
     
610. function GetCurrentEANameByIdx(const iActNo, iFieldNo, idx: Integer): string;
     
611. function GetCurrentEAScoreByIdx(const iActNo, iFieldNo, idx: Integer): Integer;
     
612. function GetLastEAIdxByName(const iActNo, iFieldNo: Integer; const sName: string): Integer;
     
613. function GetLastEANameByIdx(const iActNo, iFieldNo, idx: Integer): string;
     
614. function GetLastEAScoreByIdx(const iActNo, iFieldNo, idx: Integer): Integer;
     
615. function GetEAOrderInfo(const iActNo,iFieldNo,Page,TotalPage,PrePage:Word;isCurrent:Boolean;sProcName:string): string;
     
616. function EAOrderIsStart(const iActNo,iFieldNo:Integer): Boolean;
     
617. procedure GiveConfigPrizeTemp(Player: TPlayer; const PrizeIdx: integer; const InfoStr: string);
     
618. procedure SetWineTreat(wtType: Byte; boDesk: Boolean);
     
619. function GetTreatWine(Hum: TPlayer): Integer;
     
620. procedure ResetHeroExpFealty(player: TPlayer);
     
621. function HeroRename(player: TPlayer; const oldName, newName: string): Integer;
     
622. function AddPlayerBodyLuck(player: TPlayer; const addPoint: Integer): Integer;
     
623. procedure TryEnterSuperSky(player: TPlayer);
     
624. function GetRandItem(idx: Integer): string;
     
625. function GetRandItemEx(curTimeTag: Cardinal; idx: Integer): string;
     
626. procedure MoveAllHumInMap(const desMap: string; x, y: Word);
     
627. procedure MoveAllHumInMapByLevel(const desMap: string; const x, y: Word; const humLv, humForceLv, humSuperForceLv: Integer; const opType: Integer);
     
628. procedure RegDelayProc(const procName: string; delaySec: Integer);
     
629. procedure CreateMapEvent(const eventType, lineNo, columnNo, lastSecond, startDamage, intervalSecond, incDamage: Integer);
     
630. procedure RemoveMapEvent(const eventType, lineNo, columnNo: Integer);
     
631. procedure Click_Vote(Clicker:TPlayer;VoteMode:Word);
     
632. procedure ComposeItem(Player:TCreature;iMode:Integer;NeedItemNum:Integer);
     
633. procedure OpenDialogsWindows(Player:TCreature;WindowsID,SubID:Integer);
     
634. procedure LoadPlayerStatuary(job, gender: Byte);
     
635. procedure AppearanceTransform(objCret: TCreature);
     
636. procedure UpdateFameNpc(const iRank: Integer);
     
637. function GetFamePlayerNameByRank(const iRank: Integer): string;
     
638. procedure DoHitAction;
     
639. procedure DoHideAction;
     
640. procedure DoShowAction;
     
641. procedure DoFlyAction(const desMapName: string; var desX, desY: Integer);
     
642. procedure DoHideNpcEx(const sMapName, sNpcName: string);
     
643. procedure DoShowNpcEx(const sMapName, sNpcName: string);
     
644. procedure SendRollMsgInCurrentMap(const sMsgStr: string; const iType: Integer);
     
645. function GetNormalCastleFlagOwner(const flagName: string): string;
     
646. function GetNormalCastleScoreRslt(page: Integer): string;
     
647. function GetNormalCastleMatchTakeInfo: string;
     
648. function GetNormalCastleTakeInfo(page: Integer): string;
     
649. procedure PlayRepairSwordEffect(const playTime: Integer);
     
650. function GetRecycleItemFeeName(stuffIdx: Integer): string;
     
651. function GetFreeRetrieveList(Listid:Integer): string;
     
652. procedure ClickOpenFreeRetrieve(Clicker: TPlayer);
     
653. procedure SetPaoDianPrizeAndperiod(Prize:string;PeriodSec:Integer);
     
654. procedure SetMapParam(param:string);
     
655. procedure YBDealDialogShowMode(APlayer: TPlayer; BoFirst: Boolean);
     
656. function MaxStrengthenEquipLv(APlayer: TPlayer): Integer;
     
657. function GivePositiveVValue(const Value : Integer; Order : Integer; APlayer : TPlayer): Integer;
     
658. function ConvertVExp(APlayer : TPlayer; VValue : Integer; VTypeIdx : Integer): Cardinal;
     
659. procedure AddPlayerHonorValue(const Value: Integer);
     
660. procedure SubPlayerHonorValue(const Value: Integer);
     
661. function GetPlayerHonorValue: Integer;
     
662. procedure NotifyClientUPdBagItem(APlayer : TPlayer; Item : TBaseItem);
     
663. procedure NewFullMailEx(const ARecvName, ATitle,AContext: string; AMailType: Integer;);
     
664. procedure NotifyClientOpenUpdateClothes(APlayer: TPlayer);
     
665. procedure Click_CommitItem(Clicker: TPlayer; Series: Word; HintInfo: string);
     
666. function GetComingVersion(idx:Integer): string;
     
667. function GetValidStr(Str: string; var Dest: string; const divier: Char): string;
     
668. procedure DebugOut(const s: string);
     
669. procedure ServerSay(const MsgStr : string; nColor : integer);
     
670. function CheckOtherMapMon(const MapName: string): Integer;
     
671. function CheckOtherMapHum(const MapName: string): Integer;
     
672. function GetNow: Double;
     
673. function GetYear: Word;
     
674. function GetMonth: Word;
     
675. function GetDay: Word;
     
676. function GetHour: Word;
     
677. function GetMin: Word;
     
678. function MirStrToDateTime(const str: string): Double;
     
679. function MirDateTimeToStr(const FormatStr: string; date: Double): string;
     
680. function GetDayOfWeek: Word;
     
681. function minusDataTime(dt1, dt2: Double): Integer;
     
682. function SecondsBetween(dt1, dt2: Double): Integer;
     
683. procedure PsDecodeDate(const dt: Double; var Year, Month, Day: Word);
     
684. procedure PsDecodeTime(const dt: Double; var Hour, Min, Sec, MSec: Word);
     
685. function AddDateTimeWithSec(const dtNow: Double; ASec: Integer): Double;
     
686. function ConvertDateTimeToDB(dt : Double): Integer;
     
687. function ConvertDBToDateTime(dt : Integer): Double;
     
688. function GetDateNum(datetime : Double): Integer;
     
689. function GetMapCanWalkXY(MapName : string;var x:Integer; var y : Integer;BoOver: Boolean; BoForce: Boolean): Boolean;
     
690. function GetG(const paramNo, index : Integer): Integer;
     
691. function SetG(const paramNo, index, value : Integer): Boolean;
     
692. function PsPower(const base, exponent: Double): Double;
     
693. procedure RollMsg(const MsgStr: string);
     
694. procedure RollMsgEx(const MsgStr: string; const iType: Word);
     
695. function SendYBShopConfig(const NeedLoadGoodsNames: string): Boolean;
     
696. procedure SetYBShopRefreshTime(const str: string);
     
697. function GetDynRoomHumNum(const roomName: string; roomIdx: Integer): Integer;
     
698. function GetDynRoomCnt(const roomName: string): Integer;
     
699. function PsHaveFreeDynRoom(const roomName: string): Boolean;
     
700. procedure MakeCattleCrazy;
     
701. function GetAdvPlayerNum: Integer;
     
702. function PsIsDynRoomValid(roomName: string; roomIdx: Integer): Boolean;
     
703. procedure KickAllHumToMap(srcMap, desMap: string; x,y: Word);
     
704. function GetCurrentEANameByIdx(const iActNo, iFieldNo, idx: Integer): string;
     
705. function UpdateEverydayActOrder(const iActNo, iFieldNo: Integer;const sName: string; const iScore: Integer): Integer;
     
706. function GetEAOrderInfo(const iActNo,iFieldNo,Page,TotalPage,PrePage:Word;isCurrent:Boolean;sProcName:string): string;
     
707. function GetScoreByName(const iActNo,iFieldNo:Integer;const sHumanName:string;isCurrent: Boolean): Integer;
     
708. function EAOrderIsStart(const iActNo,iFieldNo:Integer): Boolean;
     
709. procedure PlayerCry(const chrName: string; iType: Word; strMsg: string);
     
710. procedure PlayerGive(const chrName: string; const ItemName: string; ItemCount: Integer);
     
711. function ReadIniSectionStr(const sFileName, sSection, sIdent: string): string;
     
712. function WriteIniSectionStr(const sFileName, sSection, sIdent, sValue: string): Boolean;
     
713. function PsCeil(const X: Extended): Integer;
     
714. procedure InitTaskDispatchInfo(cmpCost, acceptCnt, dispatchCnt, bronzeCost, silverCost, goldCost: Integer);
     
715. function GetOpenGameTime: Double;
     
716. function G_Version: string;
     
717. function BroadcastPush(const Content: string; const OpenActType: Word): Integer;

复制代码