|
function M2Server_TMainMenu_MenuItem: TMenuItem; stdcall;
function M2Server_TMainMenu_MenuItem_Count(MenuItem: TMenuItem): Integer; stdcall;
function M2Server_TMainMenu_MenuItem_Get(MenuItem: TMenuItem; Index: Integer): TMenuItem; stdcall;
function M2Server_TMainMenu_MenuItem_GetCaption(MenuItem: TMenuItem): PChar; stdcall;
function M2Server_TMainMenu_MenuItem_Add(MenuItem: TMenuItem; Caption: PChar; OnClick: TNotifyEvent): TMenuItem; stdcall;
function M2Server_TMainMenu_MenuItem_Insert(MenuItem: TMenuItem; Index: Integer; Caption: PChar; OnClick: TNotifyEvent): TMenuItem; stdcall;
//------------------------------------------------------------------------------
function M2Server_TConfig_sEnvirDir: PChar; stdcall; //Envir目录
function M2Server_TConfig_btMaxAbil: PByte; stdcall; //最高属性0=65535 1=21E
function M2Server_TConfig_GlobaDyMval: PInteger; stdcall; //I变量 0~499
function M2Server_TConfig_GlobalVal: PInteger; stdcall; //G变量 0~499
function M2Server_TConfig_GlobalHVal: PInteger; stdcall;
function M2Server_TConfig_GetGlobalAVal(Index: Integer): PChar; stdcall; //A变量 0~499
procedure M2Server_TConfig_SetGlobalAVal(Index: Integer; Value: PChar); stdcall; //A变量 0~499 function M2Server_EncodeBuffer(InData: PChar; InBytes: Integer; OutData: PChar): Integer; stdcall;
function M2Server_DecodeBuffer(InData: PChar; InBytes: Integer; OutData: PChar): Integer; stdcall;
procedure M2Server_EncryBuffer(InData: PChar; InBytes: Integer; OutData: PChar); stdcall; //OutData为加密后的数据 加密后数据长度不变 function M2Server_GetTakeOnPosition(StdMode: Integer): Integer; stdcall;
function M2Server_GetUseItemIdx(sName: PChar): Integer; stdcall;
procedure M2Server_UserItemToClientItem(UserItem: pTUserItem; var ClientItem: TClientItem); stdcall;
function M2Server_GetItemRules(sItemName: PChar; nFlag: Integer): Boolean; stdcall;
function M2Server_FilterTexts(pMsg: PChar; pNewMsg: PChar): Boolean; stdcall;
procedure M2Server_ChangeCaptionText(Msg: PChar; nLen: Integer); stdcall; //------------------------------------------------------------------------------
//TBaseObject
function TBaseObject_sMapName(BaseObject: TBaseObject): PChar; stdcall; //地图名称
function TBaseObject_sCharName(BaseObject: TBaseObject): PChar; stdcall; //名称
function TBaseObject_nCurrX(BaseObject: TBaseObject): PInteger; stdcall; //坐标X
function TBaseObject_nCurrY(BaseObject: TBaseObject): PInteger; stdcall; //坐标Y
function TBaseObject_btDirection(BaseObject: TBaseObject): PByte; stdcall; //方向
function TBaseObject_btGender(BaseObject: TBaseObject): PByte; stdcall; //性别
function TBaseObject_btHair(BaseObject: TBaseObject): PByte; stdcall; //发型
function TBaseObject_btJob(BaseObject: TBaseObject): PByte; stdcall; //职业
function TBaseObject_btPermission(BaseObject: TBaseObject): PByte; stdcall; // 人物权限等级
function TBaseObject_boDeath(BaseObject: TBaseObject): PBoolean; stdcall; //是否死亡
function TBaseObject_boGhost(BaseObject: TBaseObject): PBoolean; stdcall;
function TBaseObject_Ability(BaseObject: TBaseObject): pTAbility; stdcall;
function TBaseObject_WAbility(BaseObject: TBaseObject): pTAbility; stdcall;
function TBaseObject_nCharStatus(BaseObject: TBaseObject): PInteger; stdcall;
function TBaseObject_sHomeMap(BaseObject: TBaseObject): PChar; stdcall; //回城地图
function TBaseObject_nHomeX(BaseObject: TBaseObject): PInteger; stdcall; //回城坐标X
function TBaseObject_nHomeY(BaseObject: TBaseObject): PInteger; stdcall; //回城坐标Y
function TBaseObject_wAppr(BaseObject: TBaseObject): Word; stdcall;
function TBaseObject_btRaceServer(BaseObject: TBaseObject): Byte; stdcall; //角色类型
function TBaseObject_btRaceImg(BaseObject: TBaseObject): Byte; stdcall; //角色外形
function TBaseObject_nViewRange(BaseObject: TBaseObject): PInteger; stdcall; //可视范围大小
function TBaseObject_SlaveList(BaseObject: TBaseObject): TList; stdcall; //宝宝列表
function TBaseObject_Master(BaseObject: TBaseObject): pTBaseObject; stdcall; //主人
function TBaseObject_PEnvir(BaseObject: TBaseObject): pTEnvirnoment; stdcall; //地图
function TBaseObject_TargetCret(BaseObject: TBaseObject): pTBaseObject; stdcall; //正在攻击的目标
function TBaseObject_LastHiter(BaseObject: TBaseObject): pTBaseObject; stdcall;
function TBaseObject_ExpHitter(BaseObject: TBaseObject): pTBaseObject; stdcall;
function TBaseObject_Pointer(BaseObject: TBaseObject): TList; stdcall; function TBaseObject_nHealthRecover(BaseObject: TBaseObject): PShortInt; stdcall; //HP恢复速度
function TBaseObject_nSpellRecover(BaseObject: TBaseObject): PShortInt; stdcall; //MP恢复速度
function TBaseObject_btAntiPoison(BaseObject: TBaseObject): PByte; stdcall; //毒躲避
function TBaseObject_nPoisonRecover(BaseObject: TBaseObject): PShortInt; stdcall; //中毒恢复
function TBaseObject_nAntiMagic(BaseObject: TBaseObject): PShortInt; stdcall; //魔法躲避
function TBaseObject_nLuck(BaseObject: TBaseObject): PInteger; stdcall; // 人物的幸运值Luck
function TBaseObject_nHitSpeed(BaseObject: TBaseObject): PShortInt; stdcall; //攻击速度
function TBaseObject_btAttatckMode(BaseObject: TBaseObject): PByte; stdcall; //攻击模式 procedure TBaseObject_SendMsg(AObject, BaseObject: TBaseObject; wIdent, wParam: Integer; nParam1, nParam2, nParam3: Integer; sMsg: PChar); stdcall;
procedure TBaseObject_SendDelayMsg(AObject, BaseObject: TBaseObject; wIdent, wParam: Integer; lParam1, lParam2, lParam3: Integer; sMsg: PChar; dwDelay: LongWord); stdcall;
procedure TBaseObject_SendRefMsg(BaseObject: TBaseObject; wIdent, wParam: Integer; nParam1, nParam2, nParam3: Integer; sMsg: PChar); stdcall;
procedure TBaseObject_SendUpdateMsg(AObject, BaseObject: TBaseObject; wIdent, wParam: Integer; lParam1, lParam2, lParam3: Integer; sMsg: PChar); stdcall;
procedure TBaseObject_SysMsg(BaseObject: TBaseObject; sMsg: PChar; FColor, BColor: Byte; MsgType: TMsgType); stdcall;
function TBaseObject_IsEnoughBag(BaseObject: TBaseObject): Boolean; stdcall;
function TBaseObject_InSafeZone(BaseObject: TBaseObject): Boolean; stdcall;
function TBaseObject_InSafeZoneA(BaseObject: TBaseObject; Envir: TEnvirnoment; nX, nY: Integer): Boolean; stdcall;
procedure TBaseObject_HealthSpellChanged(BaseObject: TBaseObject); stdcall;
procedure TBaseObject_DamageHealth(BaseObject: TBaseObject; nDamage: Integer); stdcall;
procedure TBaseObject_HasLevelUp(BaseObject: TBaseObject; nLevel: Integer); stdcall;
function TBaseObject_GetPoseCreate(BaseObject: TBaseObject): TBaseObject; stdcall;
function TBaseObject_CharPushed(BaseObject: TBaseObject; nDir, nPushCount: Integer): Integer; stdcall;
function TBaseObject_GetBackDir(BaseObject: TBaseObject; nDir: Integer): Integer; stdcall;
function TBaseObject_GetMapBaseObjects(BaseObject: TBaseObject; tEnvir: TEnvirnoment; nX, nY: Integer; nRage: Integer; rList: TList): Boolean; stdcall; procedure TBaseObject_FeatureChanged(BaseObject: TBaseObject); stdcall;
procedure TBaseObject_TrainSkill(BaseObject: TBaseObject; UserMagic: pTUserMagic; nTranPoint: Integer); stdcall;
function TBaseObject_CheckMagicLevelup(BaseObject: TBaseObject; UserMagic: pTUserMagic): Boolean; stdcall;
function TBaseObject_AddItemToBag(BaseObject: TBaseObject; UserItem: pTUserItem): Boolean; stdcall;
function TBaseObject_IsProtectTarget(AObject, BaseObject: TBaseObject): Boolean; stdcall;
function TBaseObject_IsAttackTarget(AObject, BaseObject: TBaseObject): Boolean; stdcall;
function TBaseObject_IsProperTarget(AObject, BaseObject: TBaseObject): Boolean; stdcall;
function TBaseObject_IsProperFriend(AObject, BaseObject: TBaseObject): Boolean; stdcall;
procedure TBaseObject_SetTargetCreat(AObject, BaseObject: TBaseObject); stdcall; //设置攻击目标
procedure TBaseObject_DelTargetCreat(BaseObject: TBaseObject); stdcall; //删除攻击目标 function TBaseObject_ItemList(BaseObject: TBaseObject): TList; stdcall; //人物背包
function TBaseObject_DelBagItemA(BaseObject: TBaseObject; Index: Integer): Boolean; stdcall; //删除指物品行并且释放内存
function TBaseObject_DelBagItemB(BaseObject: TBaseObject; nItemIndex: Integer; sItemName: PChar): Boolean; stdcall; //删除指定物品序号行并且释放内存
function TBaseObject_DelBagItemC(BaseObject: TBaseObject; UserItem: pTUserItem): Boolean; stdcall; //删除指定物品行并且释放内存 procedure TBaseObject_MakeGhost(BaseObject: TBaseObject); stdcall;
procedure TBaseObject_RecalcLevelAbilitys(BaseObject: TBaseObject); stdcall;
procedure TBaseObject_RecalcAbilitys(BaseObject: TBaseObject); stdcall;
function TBaseObject_RecalcBagWeight(BaseObject: TBaseObject): Integer; stdcall;
function TBaseObject_GetLevelExp(BaseObject: TBaseObject; nLevel: Integer): LongWord; stdcall; function TBaseObject_boDummyObject(BaseObject: TBaseObject): Boolean; stdcall; //是否是假人
function TBaseObject_boISNGMonster(BaseObject: TBaseObject): Boolean; stdcall; //是否是内功怪
function TBaseObject_ActorIcons(BaseObject: TBaseObject): pTActorIconArray; stdcall; //顶戴花翎
procedure TBaseObject_RefShowName(BaseObject: TBaseObject); stdcall; //刷新名称
procedure TBaseObject_RefUseIcons(BaseObject: TBaseObject); stdcall; //刷新顶戴花翎
procedure TBaseObject_RefUseEffects(BaseObject: TBaseObject); stdcall; //刷新效果
procedure TBaseObject_SpaceMove(BaseObject: TBaseObject; sMapName: PChar; nX, nY: Integer; nInt: Integer); stdcall; //飞
procedure TBaseObject_MapRandomMove(BaseObject: TBaseObject; sMapName: PChar; nInt: Integer); stdcall;
procedure TBaseObject_IncHealthSpell(BaseObject: TBaseObject; nHP, nMP: Integer); stdcall;
procedure TBaseObject_StruckDamage(BaseObject: TBaseObject; nDamage: Integer); stdcall;
procedure TBaseObject_ReAlive(BaseObject: TBaseObject); stdcall;
function TBaseObject_CretInNearXY(AObject, TargeTBaseObject: TBaseObject; nX, nY, nRange: Integer): Boolean; stdcall;
procedure TBaseObject_DamageSpell(BaseObject: TBaseObject; nSpellPoint: Integer); stdcall;
function TBaseObject_GetHitStruckDamage(AObject, Target: TBaseObject; nDamage: Integer): Integer; stdcall;
function TBaseObject_GetMagStruckDamage(AObject, BaseObject: TBaseObject; nDamage: Integer): Integer; stdcall;
procedure TBaseObject_WeightChanged(BaseObject: TBaseObject); stdcall; function TBaseObject_CanMove(BaseObject: TBaseObject): Boolean; stdcall;
function TBaseObject_CanRun(BaseObject: TBaseObject; nCurrX, nCurrY, nX, nY: Integer; boFlag: Boolean): Boolean; stdcall;
procedure TBaseObject_TurnTo(BaseObject: TBaseObject; nDir: Integer); stdcall;
function TBaseObject_WalkTo(BaseObject: TBaseObject; btDir: Byte; boFlag: Boolean): Boolean; stdcall;
function TBaseObject_RunTo(BaseObject: TBaseObject; btDir: Byte; boFlag: Boolean; nDestX, nDestY: Integer): Boolean; stdcall; //------------------------------------------------------------------------------
//TSmartObject继承TBaseObject。TPlayObject THeroObject继承 TSmartObject
function TSmartObject_MagicList(SmartObject: TSmartObject): TList; stdcall; //技能表
function TSmartObject_UseItems(SmartObject: TSmartObject): pTHumanUseItems; stdcall; //身上装备 function TSmartObject_boTeleport(SmartObject: TSmartObject): PBoolean; stdcall; //0x34B 传送戒指(Byte)
function TSmartObject_boParalysis(SmartObject: TSmartObject): PBoolean; stdcall; //0x34C 麻痹戒指(Byte)
function TSmartObject_boUnParalysis(SmartObject: TSmartObject): PBoolean; stdcall; //防麻痹
function TSmartObject_boRevival(SmartObject: TSmartObject): PBoolean; stdcall; //0x34D 复活戒指(Byte)
function TSmartObject_boUnRevival(SmartObject: TSmartObject): PBoolean; stdcall; //防复活 function TSmartObject_boFlameRing(SmartObject: TSmartObject): PBoolean; stdcall; //0x354 火焰戒指(Byte)
function TSmartObject_boRecoveryRing(SmartObject: TSmartObject): PBoolean; stdcall; //0x355 治愈戒指(Byte)
function TSmartObject_boAngryRing(SmartObject: TSmartObject): PBoolean; stdcall; //0x356 未知戒指(Byte)
function TSmartObject_boMagicShield(SmartObject: TSmartObject): PBoolean; stdcall; //0x357 护身戒指(Byte)
function TSmartObject_boUnMagicShield(SmartObject: TSmartObject): PBoolean; stdcall; //防护身
function TSmartObject_boMuscleRing(SmartObject: TSmartObject): PBoolean; stdcall; //0x358 活力戒指(Byte)
function TSmartObject_boFastTrain(SmartObject: TSmartObject): PBoolean; stdcall; //0x359 技巧项链(Byte)
function TSmartObject_boProbeNecklace(SmartObject: TSmartObject): PBoolean; stdcall; //0x35A 探测项链(Byte)
function TSmartObject_boGuildMove(SmartObject: TSmartObject): PBoolean; stdcall; //行会传送
function TSmartObject_bopirit(SmartObject: TSmartObject): PBoolean; stdcall; //祈祷
function TSmartObject_boSupermanItem(SmartObject: TSmartObject): PBoolean; stdcall; //不死戒指 function TSmartObject_boExpItem(SmartObject: TSmartObject): PBoolean; stdcall;
function TSmartObject_boPowerItem(SmartObject: TSmartObject): PBoolean; stdcall; function TSmartObject_rExpItem(SmartObject: TSmartObject): PDouble; stdcall;
function TSmartObject_rPowerItem(SmartObject: TSmartObject): PDouble; stdcall; function TSmartObject_boNoDropItem(SmartObject: TSmartObject): PBoolean; stdcall;
function TSmartObject_boNoDropUseItem(SmartObject: TSmartObject): PBoolean; stdcall; function TSmartObject_dwPKDieLostExp(SmartObject: TSmartObject): PLongWord; stdcall; //PK 死亡掉经验，不够经验就掉等级
function TSmartObject_nPKDieLostLevel(SmartObject: TSmartObject): PInteger; stdcall; //PK 死亡掉等级
function TSmartObject_boMysteriousMan(SmartObject: TSmartObject): PBoolean; stdcall; function TSmartObject_nPkPoint(SmartObject: TSmartObject): Integer; stdcall; // 人物的PK值(4字节)
procedure TSmartObject_IncPkPoint(SmartObject: TSmartObject; nPoint: Integer); stdcall; //增加PK值
procedure TSmartObject_DecPKPoint(SmartObject: TSmartObject; nPoint: Integer); stdcall; //减少PK值
function TSmartObject_PKLevel(SmartObject: TSmartObject): Integer; stdcall; //PK等级
procedure TSmartObject_RepairAllItem(SmartObject: TSmartObject); stdcall;
procedure TSmartObject_LoadConfigFile(SmartObject: TSmartObject; FileName: PChar); stdcall; //加载配置文件用于机器人 function TSmartObject_StartPickUpItem(SmartObject: TSmartObject): Boolean; stdcall;
function TSmartObject_AllowUseMagic(SmartObject: TSmartObject; wMagIdx: Word): Boolean; stdcall;
function TSmartObject_RunToNext(SmartObject: TSmartObject; nX, nY: Integer): Boolean; stdcall;
function TSmartObject_WalkToNext(SmartObject: TSmartObject; nX, nY: Integer): Boolean; stdcall;
function TSmartObject_GotoNext(SmartObject: TSmartObject; nX, nY: Integer; boRun: Boolean): Boolean; stdcall;
function TSmartObject_GotoNextA(SmartObject: TSmartObject; nX, nY: Integer; boRun: Boolean): Boolean; stdcall;
function TSmartObject_SelectMagic(SmartObject: TSmartObject): Integer; stdcall; //选择魔法
function TSmartObject_AttackTarget(SmartObject: TSmartObject; wMagicID: Word; dwAttackTime: LongWord): Boolean; stdcall;
//------------------------------------------------------------------------------
function TPlayObject_boSuperMan(PlayObject: TPlayObject): Boolean; stdcall; // 无敌模式
function TPlayObject_boAdminMode(PlayObject: TPlayObject): Boolean; stdcall; //管理模式
function TPlayObject_sUserID(PlayObject: TPlayObject): PChar; stdcall; // 登录帐号名
function TPlayObject_sIPaddr(PlayObject: TPlayObject): PChar; stdcall; // 人物IP地址
function TPlayObject_boNewHuman(PlayObject: TPlayObject): Boolean; stdcall; //是否是新人
function TPlayObject_boHearWhisper(PlayObject: TPlayObject): PBoolean; stdcall; //0x27C 允许私聊
function TPlayObject_boBanShout(PlayObject: TPlayObject): PBoolean; stdcall; //0x27D 允许群聊
function TPlayObject_boBanGuildChat(PlayObject: TPlayObject): PBoolean; stdcall; //0x27E 拒绝行会聊天
function TPlayObject_boBanNationChat(PlayObject: TPlayObject): PBoolean; stdcall; //0x27E 拒绝国家聊天
function TPlayObject_boAllowDeal(PlayObject: TPlayObject): PBoolean; stdcall; //0x27F 是不允许交易
function TPlayObject_boAllowChallenge(PlayObject: TPlayObject): PBoolean; stdcall; //0x27F 是不允许挑战
function TPlayObject_BlockWhisperList(PlayObject: TPlayObject): TStringList; stdcall; //禁止私聊人员列表
function TPlayObject_boAllowGroupReCall(PlayObject: TPlayObject): PBoolean; stdcall; //允许天地合一
function TPlayObject_boAllowGroup(PlayObject: TPlayObject): PBoolean; stdcall; //0xB0 允许组队
function TPlayObject_boAllowGuild(PlayObject: TPlayObject): PBoolean; stdcall; //0xB1 允许加入行会
function TPlayObject_boAllowGuildReCall(PlayObject: TPlayObject): PBoolean; stdcall; //行会合一
function TPlayObject_boCanDearRecall(PlayObject: TPlayObject): PBoolean; stdcall; //是否允许夫妻传送
function TPlayObject_boCanMasterRecall(PlayObject: TPlayObject): PBoolean; stdcall; //是否允许师徒传送
function TPlayObject_StorageItemList(PlayObject: TPlayObject): TList; stdcall; //仓库
function TPlayObject_GroupOwner(PlayObject: TPlayObject): pTPlayObject; stdcall; //0x274
function TPlayObject_GroupMembers(PlayObject: TPlayObject): TStringList; stdcall; //0x278 组成员
function TPlayObject_sDearName(PlayObject: TPlayObject): PChar; stdcall; //配偶名称
function TPlayObject_DearHuman(PlayObject: TPlayObject): pTPlayObject; stdcall;
function TPlayObject_sMasterName(PlayObject: TPlayObject): PChar; stdcall; //师徒名称
function TPlayObject_MasterHuman(PlayObject: TPlayObject): pTPlayObject; stdcall;
function TPlayObject_MasterList(PlayObject: TPlayObject): TList; stdcall;
function TPlayObject_boMaster(PlayObject: TPlayObject): Boolean; stdcall;
function TPlayObject_btReLevel(PlayObject: TPlayObject): PByte; stdcall; //转生等级
function TPlayObject_boShopStall(PlayObject: TPlayObject): Boolean; stdcall; //是否在摆摊
function TPlayObject_boStorageHero(PlayObject: TPlayObject): Boolean; stdcall; //英雄是否寄存
function TPlayObject_boStorageDeputyHero(PlayObject: TPlayObject): Boolean; stdcall; //副将英雄是否寄存
function TPlayObject_MyHero(PlayObject: TPlayObject): pTBaseObject; stdcall;
function TPlayObject_boFixedHero(PlayObject: TPlayObject): Boolean; stdcall; //是否评定主副英雄
function TPlayObject_sHeroName(PlayObject: TPlayObject): PChar; stdcall; //主英雄名
function TPlayObject_sDeputyHeroName(PlayObject: TPlayObject): PChar; stdcall; //副将英雄名字
function TPlayObject_btDeputyHeroJob(PlayObject: TPlayObject): Byte; stdcall; //副将英雄出生职业
function TPlayObject_Pointer(PlayObject: TPlayObject): TList; stdcall; function TPlayObject_nVal(PlayObject: TPlayObject): PInteger; stdcall; //P变量0~9
function TPlayObject_nDyVal(PlayObject: TPlayObject): PInteger; stdcall; //D变量0~9
function TPlayObject_nMVal(PlayObject: TPlayObject): PInteger; stdcall; //M变量0~99
function TPlayObject_nNVal(PlayObject: TPlayObject): PInteger; stdcall; //N变量0~99
function TPlayObject_GetSVal(PlayObject: TPlayObject; Index: Integer): PChar; stdcall; //S变量0~99
procedure TPlayObject_SetSVal(PlayObject: TPlayObject; Index: Integer; Value: PChar); stdcall; //S变量0~99
function TPlayObject_nUVal(PlayObject: TPlayObject): PInteger; stdcall; //U变量0~99
function TPlayObject_GetTVal(PlayObject: TPlayObject; Index: Integer): PChar; stdcall; //T变量0~99 function TPlayObject_MyGuild(PlayObject: TPlayObject): pTGuild; stdcall; //我的行会
function TPlayObject_nGuildRankNo(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_sGuildRankName(PlayObject: TPlayObject): PChar; stdcall;
function TPlayObject_boOffLine(PlayObject: TPlayObject): Boolean; stdcall; //是否是离线挂机人物
function TPlayObject_nGold(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_nGamePoint(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_nGameGold(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_nGameGird(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_nGameDiamond(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_nGameGlory(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_wCreditPoint(PlayObject: TPlayObject): Integer; stdcall;
function TPlayObject_IncGold(PlayObject: TPlayObject; nGold: Integer): Boolean; stdcall;
function TPlayObject_DecGold(PlayObject: TPlayObject; nGold: Integer): Boolean; stdcall;
procedure TPlayObject_IncGamePoint(PlayObject: TPlayObject; nGamePoint: Integer); stdcall;
procedure TPlayObject_DecGamePoint(PlayObject: TPlayObject; nGamePoint: Integer); stdcall;
procedure TPlayObject_IncGameGold(PlayObject: TPlayObject; nGameGold: Integer); stdcall;
procedure TPlayObject_DecGameGold(PlayObject: TPlayObject; nGameGold: Integer); stdcall;
procedure TPlayObject_IncGameGird(PlayObject: TPlayObject; nPoint: Integer); stdcall;
procedure TPlayObject_DecGameGird(PlayObject: TPlayObject; nPoint: Integer); stdcall;
procedure TPlayObject_IncGameDiamond(PlayObject: TPlayObject; nPoint: Integer); stdcall;
procedure TPlayObject_DecGameDiamond(PlayObject: TPlayObject; nPoint: Integer); stdcall;
procedure TPlayObject_IncGameGlory(PlayObject: TPlayObject; nPoint: Integer); stdcall;
procedure TPlayObject_DecGameGlory(PlayObject: TPlayObject; nPoint: Integer); stdcall;
procedure TPlayObject_IncExp(PlayObject: TPlayObject; dwExp: LongWord); stdcall; procedure TPlayObject_MoveToHome(PlayObject: TPlayObject); stdcall; //回城
procedure TPlayObject_SendSocket(PlayObject: TPlayObject; DefMsg: pTDefaultMessage; sMsg: PChar); stdcall; //发送数据
procedure TPlayObject_SendDefMessage(PlayObject: TPlayObject; wIdent: Word; nRecog: Integer; nParam, nTag, nSeries: Word; sMsg: PChar); stdcall; //发送数据
procedure TPlayObject_SendAddItem(PlayObject: TPlayObject; UserItem: pTUserItem); stdcall;
procedure TPlayObject_SendDelItems(PlayObject: TPlayObject; UserItem: pTUserItem); stdcall;
procedure TPlayObject_SendUpdateItem(PlayObject: TPlayObject; UserItem: pTUserItem); stdcall;
procedure TPlayObject_SendAddMagic(PlayObject: TPlayObject; UserMagic: pTUserMagic); stdcall;
procedure TPlayObject_SendDelMagic(PlayObject: TPlayObject; UserMagic: pTUserMagic); stdcall;
procedure TPlayObject_SendEffectImageList(PlayObject: TPlayObject); stdcall; //发送Wil列表
procedure TPlayObject_SendSpecialCmdList(PlayObject: TPlayObject); stdcall; //发送特殊命令
procedure TPlayObject_SendServerConfig(PlayObject: TPlayObject); stdcall; //发送内挂配置
procedure TPlayObject_SendUseItems(PlayObject: TPlayObject); stdcall; //发送身上装备
procedure TPlayObject_SendUseMagic(PlayObject: TPlayObject); stdcall; //发送技能列表
procedure TPlayObject_SendBagItems(PlayObject: TPlayObject); stdcall;
procedure TPlayObject_SendGoldInfo(PlayObject: TPlayObject; boSendName: Boolean); stdcall;
procedure TPlayObject_SendNewGamePointInfo(PlayObject: TPlayObject; boSendName: Boolean); stdcall;
procedure TPlayObject_SendGameGlory(PlayObject: TPlayObject); stdcall; procedure TPlayObject_SendMoveMsg(PlayObject: TPlayObject; sMsg: PChar; btFColor, btBColor: Byte; nX, nY: Word; nMoveCount: Integer); stdcall;
procedure TPlayObject_SendCenterMsg(PlayObject: TPlayObject; sMsg: PChar; btFColor, btBColor: Byte; nTime: Integer); stdcall;
procedure TPlayObject_SendTopBroadCastMsg(PlayObject: TPlayObject; sMsg: PChar; btFColor, btBColor: Byte; nTime: Integer; MsgType: TMsgType); stdcall;
function TPlayObject_nMoveSpeed(PlayObject: TPlayObject): PSmallInt; stdcall; //行走速度 -10 ~ +10
function TPlayObject_nAttackSpeed(PlayObject: TPlayObject): PSmallInt; stdcall; //攻击速度 -10 ~ +10
function TPlayObject_nSpellSpeed(PlayObject: TPlayObject): PSmallInt; stdcall; //魔法速度 -10 ~ +10
function TPlayObject_dwChangeSpeedTimeTicks(PlayObject: TPlayObject; nIndex: Integer): PLongWord; stdcall; //改变速度的有效时间 nIndex在0到2之间
procedure TPlayObject_RefGameSpeed(PlayObject: TPlayObject); stdcall; //刷新游戏速度
procedure TPlayObject_ClientHeroLogOn(PlayObject: TPlayObject; boIsDeputyHero: Boolean; btDeputyHeroJob: Byte); stdcall; //召唤英雄 procedure TPlayObject_PlayEffect(PlayObject: TPlayObject; nFileIndex, nImageOffset, nImageCount, nLoopCount, nSpeedTime: Integer); stdcall; //播放效果
function TPlayObject_CheckTakeOnItems(PlayObject: TPlayObject; nWhere: Integer; var StdItem: TStdItem): Boolean; stdcall;
//------------------------------------------------------------------------------
function TDummyObject_boStart(DummyObject: TPlayObject): PBoolean; stdcall; //是否开始挂机
procedure TDummyObject_Start(DummyObject: TPlayObject); //开始挂机
procedure TDummyObject_Stop(DummyObject: TPlayObject); //停止挂机
//------------------------------------------------------------------------------
function THeroObject_rLoyalPoint(HeroObject: THeroObject): PDouble; stdcall; //忠诚度
function THeroObject_boIsDeputy(HeroObject: THeroObject): Boolean; stdcall; //是否是副将英雄
procedure THeroObject_IncExp(HeroObject: THeroObject; dwExp: LongWord); stdcall;
procedure THeroObject_SendUseitems(HeroObject: THeroObject); stdcall;
procedure THeroObject_SendAddItem(HeroObject: THeroObject; UserItem: pTUserItem); stdcall;
procedure THeroObject_SendDelItems(HeroObject: THeroObject; UserItem: pTUserItem); stdcall;
procedure THeroObject_SendUpdateItem(HeroObject: THeroObject; UserItem: pTUserItem); stdcall;
procedure THeroObject_SendUseMagic(HeroObject: THeroObject); stdcall;
procedure THeroObject_SendAddMagic(HeroObject: THeroObject; UserMagic: pTUserMagic); stdcall;
procedure THeroObject_SendDelMagic(HeroObject: THeroObject; UserMagic: pTUserMagic); stdcall;
procedure THeroObject_LogOut(HeroObject: THeroObject); stdcall;
procedure THeroObject_RestHero(HeroObject: THeroObject); stdcall;
function THeroObject_Pointer(HeroObject: THeroObject): TList; stdcall; //------------------------------------------------------------------------------
function TNormNpc_Create(sCharName, sMapName, sScript: PChar; X, Y: Integer; wAppr: Word; boIsHide: Boolean): TNormNpc; stdcall; //创建NPC，该NPC由引擎自动释放
procedure TNormNpc_LoadNpcScript(NormNpc: TNormNpc); stdcall;
procedure TNormNpc_ClearScript(NormNpc: TNormNpc); stdcall;
function TNormNpc_sFilePath(NormNpc: TNormNpc): PChar; stdcall;
function TNormNpc_sPath(NormNpc: TNormNpc): PChar; stdcall;
function TNormNpc_boIsHide(NormNpc: TNormNpc): PBoolean; stdcall;
function TNormNpc_GetLineVariableText(NPC: TNormNpc; PlayObject: TPlayObject; sMsg: PChar): PChar; stdcall;
procedure TNormNpc_GotoLable(NPC: TNormNpc; AObject: TPlayObject; sLabel: PChar; boExtJmp: Boolean); stdcall;
procedure TNormNpc_SendMsgToUser(NPC: TNormNpc; PlayObject: TPlayObject; sMsg: PChar); stdcall;
procedure TNormNpc_MessageBox(NPC: TNormNpc; PlayObject: TPlayObject; sMsg: PChar); stdcall; function TNormNpc_GetVarValue(NPC: TNormNpc; PlayObject: TPlayObject; sVarName: PChar; var sValue: PChar; var nValue: Integer): Boolean; stdcall;
function TNormNpc_SetVarValue(NPC: TNormNpc; PlayObject: TPlayObject; sVarName: PChar; sValue: PChar; nValue: Integer): Boolean; stdcall;
function TNormNpc_GetDynamicVarValue(NPC: TNormNpc; PlayObject: TPlayObject; sVarName: PChar; var sValue: PChar; var nValue: Integer): Boolean; stdcall;
function TNormNpc_SetDynamicVarValue(NPC: TNormNpc; PlayObject: TPlayObject; sVarName: PChar; sValue: PChar; nValue: Integer): Boolean; stdcall; //------------------------------------------------------------------------------
function TUserEngine_PlayObjectList: TStringList; stdcall; //获取在线玩家列表
function TUserEngine_HeroObjectList: TStringList; stdcall;
function TUserEngine_MerchantList: TList; stdcall;
function TUserEngine_QuestNPCList: TList; stdcall;
function TUserEngine_MagicList: TList; stdcall;
function TUserEngine_StdItemList: TList; stdcall; function TUserEngine_ManageNPC: TNormNpc; stdcall;
function TUserEngine_RobotNPC: TNormNpc; stdcall;
function TUserEngine_FunctionNPC: TMerchant; stdcall;
function TUserEngine_MissionNPC: TMerchant; stdcall; function TUserEngine_FindMagicA(sMagicName: PChar): pTMagic; stdcall;
function TUserEngine_FindMagicB(nMagIdx: Integer): pTMagic; stdcall;
function TUserEngine_FindHeroMagicA(nMagIdx: Integer): pTMagic; stdcall;
function TUserEngine_FindHeroMagicB(sMagicName: PChar): pTMagic; stdcall; function TUserEngine_FindMagicC(sMagicName: PChar; MagicAttr: TMagicAttr): pTMagic; stdcall;
function TUserEngine_FindMagicD(nMagIdx: Integer; MagicAttr: TMagicAttr): pTMagic; stdcall;
function TUserEngine_FindHeroMagicC(nMagIdx: Integer; MagicAttr: TMagicAttr): pTMagic; stdcall;
function TUserEngine_FindHeroMagicD(sMagicName: PChar; MagicAttr: TMagicAttr): pTMagic; stdcall; procedure TUserEngine_SendBroadCastMsg(sMsg: PChar; FColor, BColor: Integer; MsgType: TMsgType); stdcall;
procedure TUserEngine_SendBroadCastMsgExt(sMsg: PChar; MsgType: TMsgType); stdcall;
procedure TUserEngine_SendTopBroadCastMsg(sMsg: PChar; FColor, BColor: Integer; nTime: Integer; MsgType: TMsgType); stdcall;
procedure TUserEngine_SendServerConfig(); stdcall;
procedure TUserEngine_SendMoveMsg(sMsg: PChar; btFColor, btBColor: Byte; nY, nMoveCount: Integer); stdcall;
procedure TUserEngine_SendCenterMsg(sMsg: PChar; btFColor, btBColor: Byte; nTime: Integer); stdcall; function TUserEngine_GetStdItemA(nItemIdx: Integer): pTStdItem; stdcall;
function TUserEngine_GetStdItemB(sItemName: PChar): pTStdItem; stdcall;
function TUserEngine_GetStdItemWeight(nItemIdx: Integer): Integer; stdcall;
function TUserEngine_GetStdItemName(nItemIdx: Integer): PChar; stdcall;
function TUserEngine_GetStdItemIdx(sItemName: PChar): Integer; stdcall; function TUserEngine_GetPlayObjectA(sName: PChar): TPlayObject; stdcall;
function TUserEngine_GetPlayObjectB(PlayObject: TObject): TPlayObject; stdcall;
function TUserEngine_GetPlayObjectEx(sAccount, sName: PChar): TPlayObject; stdcall;
function TUserEngine_GetPlayObjectOfAccount(sAccount: PChar): TPlayObject; stdcall; function TUserEngine_GetOfflinePlayObject(sAccount: PChar): TPlayObject; stdcall;
procedure TUserEngine_KickPlayObjectEx(sAccount, sName: PChar); stdcall; function TUserEngine_GetHeroObject(sName: PChar): THeroObject; stdcall;
function TUserEngine_GetHeroObjectEx(sAccount, sName: PChar): THeroObject; stdcall;
procedure TUserEngine_KickHeroObjectEx(sAccount, sName: PChar); stdcall; function TUserEngine_FindMerchant(Merchant: TObject): TMerchant; stdcall;
function TUserEngine_FindNPC(NPC: TObject): TNormNpc; stdcall;
function TUserEngine_CopyToUserItemFromName(sItemName: PChar; Item: pTUserItem): Boolean; stdcall; procedure TUserEngine_RandomUpgradeItem(Item: pTUserItem); stdcall;
procedure TUserEngine_GetUnknowItemValue(Item: pTUserItem); stdcall;
procedure TUserEngine_RandomItemNewAbil(Item: pTUserItem); stdcall; //元素 function TUserEngine_GetDummyObjectCount(): Integer; stdcall;
function TUserEngine_GetOfflineCount(): Integer; stdcall;
function TUserEngine_GetReallyCount(): Integer; stdcall;
//------------------------------------------------------------------------------
function TEnvirnoment_sMapName(Envir: TEnvirnoment): PChar; stdcall;
function TEnvirnoment_sMapDesc(Envir: TEnvirnoment): PChar; stdcall;
function TEnvirnoment_nWidth(Envir: TEnvirnoment): Integer; stdcall;
function TEnvirnoment_nHeight(Envir: TEnvirnoment): Integer; stdcall;
function TEnvirnoment_CanWalk(Envir: TEnvirnoment; nX, nY: Integer; boFlag: Boolean): Boolean; stdcall;
function TEnvirnoment_CanWalkExA(Envir: TEnvirnoment; nX, nY: Integer; boFlag: Boolean): Boolean; stdcall;
function TEnvirnoment_CanWalkExB(Envir: TEnvirnoment; WalkObject: TBaseObject; nX, nY: Integer; boFlag: Boolean): Boolean; stdcall;
procedure TEnvirnoment_MapEffect(Envir: TEnvirnoment; nX, nY, nFileIndex, nImageOffset, nImageCount, nLoopCount, nSpeedTime: Integer; boBlend: Boolean); stdcall; //地图播放效果
function TEnvirnoment_GetRangeBaseObject(Envir: TEnvirnoment; nX, nY, nRage: Integer; boFlag: Boolean; BaseObjectList: TList): Integer; stdcall;
//------------------------------------------------------------------------------
function TMapManager_Find(sMapName: PChar): TEnvirnoment;
//------------------------------------------------------------------------------
function TGuild_GetMemberCount(Guild: TGuild): Integer; stdcall;
function TGuild_GetMemgerIsFull(Guild: TGuild): Boolean; stdcall;
function TGuild_IsMember(Guild: TGuild; sName: PChar): Boolean; stdcall;
function TGuild_IsAllyGuild(AGuild, Guild: TGuild): Boolean; stdcall;
function TGuild_IsWarGuild(AGuild, Guild: TGuild): Boolean; stdcall;
procedure TGuild_SendGuildMsg(Guild: TGuild; sMsg: PChar); stdcall;
function TGuild_GetRankName(Guild: TGuild; PlayObject: TPlayObject; var nRankNo: Integer): PChar; stdcall;
function TGuild_DelMember(Guild: TGuild; sHumName: PChar): Boolean; stdcall;
function TGuild_IsNotWarGuild(AGuild, Guild: TGuild): Boolean; stdcall;
function TGuild_AddMember(Guild: TGuild; PlayObject: TPlayObject): Boolean; stdcall; function TGuildManager_MemberOfGuild(sName: PChar): TGuild; stdcall;
function TGuildManager_AddGuild(sGuildName, sChief: PChar): Boolean; stdcall;
function TGuildManager_FindGuild(sGuildName: PChar): TGuild; stdcall;
function TGuildManager_DelGuild(sGuildName: PChar): Boolean; stdcall; //------------------------------------------------------------------------------
function TUserCastle_InCastleWarArea(Castle: TUserCastle; Envir: TEnvirnoment; nX, nY: Integer): Boolean; stdcall;
function TUserCastle_IsMember(Castle: TUserCastle; Cert: TBaseObject): Boolean; stdcall;
function TUserCastle_IsMasterGuild(Castle: TUserCastle; Guild: TGUild): Boolean; stdcall;
function TUserCastle_IsAttackGuild(Castle: TUserCastle; Guild: TGUild): Boolean; stdcall;
function TUserCastle_IsAttackAllyGuild(Castle: TUserCastle; Guild: TGUild): Boolean; stdcall;
function TUserCastle_IsDefenseGuild(Castle: TUserCastle; Guild: TGUild): Boolean; stdcall;
function TUserCastle_IsDefenseAllyGuild(Castle: TUserCastle; Guild: TGUild): Boolean; stdcall;
function TUserCastle_CanGetCastle(Castle: TUserCastle; Guild: TGUild): Boolean; stdcall;
procedure TUserCastle_GetCastle(Castle: TUserCastle; Guild: TGUild); stdcall;
function TUserCastle_AddAttackerInfo(Castle: TUserCastle; Guild: TGUild; nDay: Integer): Boolean; stdcall;
function TUserCastle_CheckInPalace(Castle: TUserCastle; nX, nY: Integer; Cert: TBaseObject): Boolean; stdcall;
function TCastleManager_Find(sCASTLENAME: PChar): TUserCastle; stdcall;
function TCastleManager_GetCastle(nIndex: Integer): TUserCastle; stdcall;
function TCastleManager_InCastleWarAreaA(BaseObject: TBaseObject): TUserCastle; stdcall;
function TCastleManager_InCastleWarAreaB(Envir: TEnvirnoment; nX, nY: Integer): TUserCastle; stdcall;
function TCastleManager_IsCastleMember(BaseObject: TBaseObject): TUserCastle; stdcall;
function TCastleManager_IsCastlePalaceEnvir(Envir: TEnvirnoment): TUserCastle; stdcall;
function TCastleManager_IsCastleEnvir(Envir: TEnvirnoment): TUserCastle; stdcall;
function TCastleManager_FindCastle(Guild: TGUild): TUserCastle; stdcall;
//------------------------------------------------------------------------------
//Hook
function GetHookPlayObjectFilterStartOperateMessage: TObjectOperateMessage; stdcall;
procedure SetHookPlayObjectFilterStartOperateMessage(Value: TObjectOperateMessage); stdcall; function GetHookPlayObjectFilterStopOperateMessage: TObjectOperateMessage; stdcall;
procedure SetHookPlayObjectFilterStopOperateMessage(Value: TObjectOperateMessage); stdcall; function GetHookLoadQuestConditionCmd: TLoadScriptCmd; stdcall;
procedure SetHookLoadQuestConditionCmd(Value: TLoadScriptCmd); stdcall;
function GetHookLoadQuestActionCmd: TLoadScriptCmd; stdcall;
procedure SetHookLoadQuestActionCmd(Value: TLoadScriptCmd); stdcall;
function GetHookQuestConditionProcess: TScriptProcess; stdcall;
procedure SetHookQuestConditionProcess(Value: TScriptProcess); stdcall;
function GetHookQuestActionProcess: TScriptProcess; stdcall;
procedure SetHookQuestActionProcess(Value: TScriptProcess); stdcall;
function GetHookBaseObjectOperateMessage: TObjectOperateMessage; stdcall;
procedure SetHookBaseObjectOperateMessage(Value: TObjectOperateMessage); stdcall;
function GetHookObjectUserSelect: TObjectUserSelect; stdcall;
procedure SetHookObjectUserSelect(Value: TObjectUserSelect); stdcall;
function GetHookProcessUserCmd: TProcessUserCmd; stdcall;
procedure SetHookProcessUserCmd(Value: TProcessUserCmd); stdcall;
function GetHookObjectWalkIndex: TObjectActionIndex; stdcall;
procedure SetHookObjectWalkIndex(Value: TObjectActionIndex); stdcall;
function GetHookObjectStruck: TObjectActionXYD; stdcall;
procedure SetHookObjectStruck(Value: TObjectActionXYD); stdcall;
function GetHookObjectMagicStruck: TObjectActionXYDM; stdcall;
procedure SetHookObjectMagicStruck(Value: TObjectActionXYDM); stdcall;
function GetHookBaseObjectRun: TObjectAction; stdcall;
procedure SetHookBaseObjectRun(Value: TObjectAction); stdcall;
function GetHookPlayObjectRun: TObjectAction; stdcall;
procedure SetHookPlayObjectRun(Value: TObjectAction); stdcall; function GetHookDummyObjectRun1: TObjectActionEx; stdcall;
procedure SetHookDummyObjectRun1(Value: TObjectActionEx); stdcall;
function GetHookDummyObjectRun2: TObjectActionEx; stdcall;
procedure SetHookDummyObjectRun2(Value: TObjectActionEx); stdcall; function GetHookUserLogin1: TObjectAction; stdcall;
procedure SetHookUserLogin1(Value: TObjectAction); stdcall;
function GetHookUserLogin2: TObjectAction; stdcall;
procedure SetHookUserLogin2(Value: TObjectAction); stdcall;
function GetHookUserLogin3: TObjectAction; stdcall;
procedure SetHookUserLogin3(Value: TObjectAction); stdcall;
function GetHookUserLogin4: TObjectAction; stdcall;
procedure SetHookUserLogin4(Value: TObjectAction); stdcall;
function GetHookObjectDie: TObjectAction; stdcall;
procedure SetHookObjectDie(Value: TObjectAction); stdcall; function GetHookBaseObjectMakeGhost: TObjectAction; stdcall;
procedure SetHookBaseObjectMakeGhost(Value: TObjectAction); stdcall; function GetHookBaseObjectCreate: TObjectAction; stdcall;
procedure SetHookBaseObjectCreate(Value: TObjectAction); stdcall;
function GetHookBaseObjectFree: TObjectAction; stdcall;
procedure SetHookBaseObjectFree(Value: TObjectAction); stdcall;
function GetHookPlayObjectCreate: TObjectAction; stdcall;
procedure SetHookPlayObjectCreate(Value: TObjectAction); stdcall;
function GetHookPlayObjectFree: TObjectAction; stdcall;
procedure SetHookPlayObjectFree(Value: TObjectAction); stdcall; function GetHookHeroObjectCreate: TObjectAction; stdcall;
procedure SetHookHeroObjectCreate(Value: TObjectAction); stdcall;
function GetHookHeroObjectFree: TObjectAction; stdcall;
procedure SetHookHeroObjectFree(Value: TObjectAction); stdcall;
function GetHookPlayObjectSearchNewObject: TObjectActionXY; stdcall;
procedure SetHookPlayObjectSearchNewObject(Value: TObjectActionXY); stdcall;
function GetHookStartRecalcAbilitys: TObjectAction; stdcall;
procedure SetHookStartRecalcAbilitys(Value: TObjectAction); stdcall;
function GetHookStopRecalcAbilitys: TObjectAction; stdcall;
procedure SetHookStopRecalcAbilitys(Value: TObjectAction); stdcall;
function GetHookGetVariableText: TGetVariableText; stdcall;
procedure SetHookGetVariableText(Value: TGetVariableText); stdcall;
function GetHookStartEngine: TStart; stdcall;
procedure SetHookStartEngine(Value: TStart); stdcall;
function GetHookLoadScriptFile: TLoadScriptFile; stdcall;
procedure SetHookLoadScriptFile(Value: TLoadScriptFile); stdcall;
function GetHookMagicManagerDoSpell: TDoSpell; stdcall;
procedure SetHookMagicManagerDoSpell(Value: TDoSpell); stdcall;
function GetHookObjectAttack: TObjectActionXYDMEx; stdcall;
procedure SetHookObjectAttack(Value: TObjectActionXYDMEx); stdcall;
function GetHookObjectMagicAttack: TObjectActionXYDMEx; stdcall;
procedure SetHookObjectMagicAttack(Value: TObjectActionXYDMEx); stdcall;
| 
发表于 2023-4-8 22:08:59
