72家族网-手游源码论坛

快捷导航

资源杂货铺
免费杂货
热门手游源码
战神引擎幽冥传奇雷霆传奇H5白日门传奇问道手游西游类手游鸿蒙传奇
手游代理
手游代理申请
游戏资源
手游源码免费资源页游端游单机游戏开发技术交流游戏源代码棋牌游戏源码
网站资源
直播源码APP源码网站优化插件模块小程序源码网站模板微擎微赞网站源码网站教程
端游源码
传奇端游服务端传奇素材资源引擎登录器等脚本教程发布
扩展功能板块
传奇漏洞论坛精品软件淘宝客区页游宣传教程资源GM工具VIP专区交易中心开发者常用工具
站务中心
需求中心站长经验分享社区站务

6.9
查看:【1.2K】 回复:【0】 发表于 2019-8-22 16:02
本主题由 族长 于 2020-5-24 11:20 分类

战神引擎手游源码

白日门传奇手游源码

雷霆传奇手游源码

幽冥传奇手游源码

西游回合制手游源码

问道手游源码

手游源码专区

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家族网欢迎您-手游源码开发者论坛上一条 /1 下一条

综合统计   资源量:698869   会员数:107837   今日活跃:669   昨日活跃:806   同时在线:136

9年老站欢迎您,已运行,感谢一路相伴

域名:72jz.com 年龄:9年 世界排名:1,091,577 日均访问[PV]:15000  创建于2011年04月20日,过期时间为2029年04月20日[待续] 皖ICP备11014237号

本站专注为新手提供手游源码、网页游戏源码、游戏一键端资源教程开发技术交流学习论坛

本站资源来自互联网搜集,仅供本地电脑单机学习和交流,请勿用于商业用途,请自觉在24小时内删除。
若有侵权与文章中不妥之处,请联系邮箱:admjz@vip.qq.com(手机随时接收邮件)并出示相关证明以便删除。敬请谅解!

2011-2020 72家族网 版权所有 Powered by Discuz!