72家族网-游戏资源论坛


全站
18小时前
全站
2天前
全站
3天前
全站
3天前
全站
10天前
全站
14天前
全站
17天前
全站
23天前
全站
25天前
全站
26天前
全站
27天前
全站
27天前
全站
28天前
全站
29天前
全站
2019-10-19
全站
2019-10-18
全站
2019-10-17
全站
2019-10-17
全站
2019-10-16
全站
2019-10-16
全站
2019-10-13
全站
2019-10-10
全站
2019-10-09
全站
2019-10-08
全站
2019-10-07
全站
2019-10-07
全站
2019-10-03
全站
2019-09-25
全站
2019-09-24
全站
2019-09-23
查看:【462】 回复:【0】 发表于 2019-8-22 16:02
族长

  离线 

小编

发表于 2019-8-22 16:02 | 显示全部楼层 |[复制链接]|阅读模式

GowLom2战神引擎开发手册 脚本变量大全

GowLom2战神引擎开发手册 脚本变量大全

  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;

复制代码


免责声明:

本站所有资源、教程来自互联网转载,仅供学习交流,不得商业运营资源,不确保资源完整性,不提供任何技术服务。【点击此处加入72家族网QQ群

本站资源仅供本地编辑研究学习参考,禁止未经资源商正版授权参与任何商业行为,违法行为!如需商业请购买各资源商正版授权

本站仅收集资源,提供用户自学研究使用,本站不存在私自接受协助用户架设游戏或资源,非法运营资源行为。免责声明

1、本站提供的所有资源仅供参考学习使用,版权归原著所有,禁止下载本站资源参与商业和非法行为,请在24小时之内自行删除!
2、本站所有内容均由互联网收集整理、网友上传,并且以计算机技术研究交流为目的,仅供大家参考、学习,不存在任何商业目的与商业用途。
3、若您需要商业运营或用于其他商业活动,请您购买正版授权并合法使用。 我们不承担任何技术及版权问题,且不对任何资源负法律责任。
4、论坛的所有内容都不保证其准确性,完整性,有效性。阅读本站内容因误导等因素而造成的损失本站不承担连带责任。
5、用户使用本网站必须遵守适用的法律法规,对于用户违法使用本站非法运营而引起的一切责任,由用户自行承担
6、本站所有资源来自互联网转载,版权归原著所有,用户访问和使用本站的条件是必须接受本站“免责声明”,如果不遵守,请勿访问或使用本网站
7、本站使用者因为违反本声明的规定而触犯中华人民共和国法律的,一切后果自己负责,本站不承担任何责任。
8、凡以任何方式登陆本网站或直接、间接使用本网站资料者,视为自愿接受本网站声明的约束。
9、本站以《2013 中华人民共和国计算机软件保护条例》第二章 “软件著作权” 第十七条为原则:为了学习和研究软件内含的设计思想和原理,通过安装、显示、传输或者存储软件等方式使用软件的,可以不经软件著作权人许可,不向其支付报酬。若有学员需要商用本站资源,请务必联系版权方购买正版授权!
10、本网站如无意中侵犯了某个企业或个人的知识产权,请来信【站长信箱】告之,本站将立即删除。

【点击此处查看部分资源的解压密码】

【资源失效,购买后无法正常下载解决办法】


回复

使用道具 打印 举报

回复楼主 感谢您加入72家族网!每发一个帖子可以增加一定的家族币哦~请点击右下角“查看本版积分规则”

游客
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

72家族网欢迎您上一条 /1 下一条

本站创立于2011年,已运行,感谢一路相伴

本站资源来自互联网收集,不提供任何技术支持,不确保资源完整性,如有意见请勿注册