📄 mshare.pas
字号:
g_boAutoLogin :Boolean = False;
g_boAutoServer :Boolean = False;
g_sAutoID :String = 'username';
g_sAutoPass :String = 'password';
g_sAutoServerName :String = '龙之传奇';
g_ImgMixSurface :TDirectDrawSurface;
g_MiniMapSurface :TDirectDrawSurface;
g_MapSurface :TDirectDrawSurface;
g_boFirstTime :Boolean;
g_sMapTitle :String;
g_nMapMusic :Integer;
g_ServerList :TStringList;
g_MagicList :TList;
g_GroupMembers :TStringList;
g_SaveItemList :TList;
g_MenuItemList :TList;
g_DropedItemList :TList;
g_ChangeFaceReadyList :TList;
g_FreeActorList :TList;
g_SoundList :TStringList;
g_nAttatckMode :Integer;
g_nBonusPoint :Integer;
g_nSaveBonusPoint :Integer;
g_BonusTick :TNakedAbility;
g_BonusAbil :TNakedAbility;
g_NakedAbil :TNakedAbility;
g_BonusAbilChg :TNakedAbility;
g_sGuildName :String;
g_sGuildRankName :String;
g_dwLastAttackTick :LongWord;
g_dwLastMoveTick :LongWord;
g_dwLatestStruckTick :LongWord;
g_dwLatestSpellTick :LongWord;
g_dwLatestFireHitTick :LongWord;
g_dwLatestRushRushTick :LongWord;
g_dwLatestHitTick :LongWord;
g_dwLatestMagicTick :LongWord;
g_dwMagicDelayTime :LongWord;
g_dwMagicPKDelayTime :LongWord;
g_nMouseCurrX :Integer;
g_nMouseCurrY :Integer;
g_nMouseX :Integer;
g_nMouseY :Integer;
g_nTargetX :Integer;
g_nTargetY :Integer;
g_TargetCret :TActor;
g_FocusCret :TActor;
g_MagicTarget :TActor;
g_boAttackSlow :Boolean;
g_boMoveSlow :Boolean;
g_boFrozen :Boolean; //true if frostrcrunch turned self purple
g_nMoveSlowLevel :Integer;
g_boMapMoving :Boolean;
g_boMapMovingWait :Boolean;
g_boCheckBadMapMode :Boolean;
g_boCheckSpeedHackDisplay :Boolean;
g_boShowGreenHint :Boolean;
g_boShowWhiteHint :Boolean;
g_boViewMiniMap :Boolean;
g_nViewMinMapLv :Integer;
g_nMiniMapIndex :Integer;
g_boViewMap :Boolean;
g_nViewMapLv :Integer;
g_nMapIndex :Integer;
//NPC
g_nCurMerchant :Integer;
g_nMDlgX :Integer;
g_nMDlgY :Integer;
g_dwChangeGroupModeTick :LongWord;
g_dwDealActionTick :LongWord;
g_dwQueryMsgTick :LongWord;
g_nDupSelection :Integer;
g_dwRefineActionTick :LongWord;
g_boAllowGroup :Boolean;
//人物信息相关
g_nMySpeedPoint :Integer; //敏捷
g_nMyHitPoint :Integer; //准确
g_nMyAntiPoison :Integer; //魔法躲避
g_nMyPoisonRecover :Integer; //中毒恢复
g_nMyHealthRecover :Integer; //体力恢复
g_nMySpellRecover :Integer; //魔法恢复
g_nMyAntiMagic :Integer; //魔法躲避
g_nMyHungryState :Integer; //饥饿状态
g_wAvailIDDay :Word;
g_wAvailIDHour :Word;
g_wAvailIPDay :Word;
g_wAvailIPHour :Word;
g_MySelf :THumActor;
g_MyDrawActor :THumActor; //未用
g_UseItems :array[0..12] of TClientItem;
g_ItemArr :array[0..MAXBAGITEMCL-1] of TClientItem;
g_StoreItem :array[0..MAXSTORAGEITEMCL-1] of TClientItem;
g_BankItem :array[0..2] of TClientItem;
g_RefineItems :array[0..15] of TClientItem;
g_boRefineEnd :Boolean;
g_boBagLoaded :Boolean;
g_boStoreLoaded :Boolean;
g_boServerChanging :Boolean;
g_AuctionItems :array[0..9] of TAuctionItem;
g_AuctionCurrPage :Integer;
g_AuctionAmountofPages :Integer;
g_AuctionCurrSection :Integer;
//商城相关
g_ItemShopItems :array[0..7] of TItemShopItem;
g_ItemShopCurrPage :Integer;
g_ItemShopTotalPage :integer;
g_ItemShopAmountofPages :Integer;
g_ItemShopCurrSection :Integer;
//gt
g_GTItems :array[0..9] of TClientGT;
g_DecoItems :array[0..12] of TDecoItem;
g_BBSMsgList :array[0..9] of TBBSMSG;
g_GTCurrPage :integer;
g_GTTotalPage :integer;
g_GTAmountOnPage :integer;
g_DecoList :TList;
g_BBSMSG :String;
g_BBSPoster :String;
g_MasterPost :integer;
//end of gt
//键盘相关
g_ToolMenuHook :HHOOK;
g_nLastHookKey :Integer;
g_dwLastHookKeyTime :LongWord;
g_nCaptureSerial :Integer; //抓图文件名序号
g_nSendCount :Integer; //发送操作计数
g_nReceiveCount :Integer; //接改操作状态计数
g_nTestSendCount :Integer;
g_nTestReceiveCount :Integer;
g_nSpellCount :Integer; //使用魔法计数
g_nSpellFailCount :Integer; //使用魔法失败计数
g_nFireCount :Integer; //
g_nDebugCount :Integer;
g_nDebugCount1 :Integer;
g_nDebugCount2 :Integer;
//买卖相关
g_SellDlgItem :TClientItem;
g_SellDlgItemSellWait :TClientItem;
g_DealDlgItem :TClientItem;
g_boQueryPrice :Boolean;
g_boQuickSell :Boolean;
g_dwQueryPriceTime :LongWord;
g_sSellPriceStr :String;
g_RefineDlgItem :TClientItem;
//Gemming system
g_GemItem1 :TClientItem;
g_GemItem2 :TClientItem;
g_GemItem3 :TClientItem;
g_GemItem4 :TClientItem;
g_GemItem5 :TClientItem;
g_GemItem6 :TClientItem;
g_GemItem1s :TClientItem;
g_GemItem2s :TClientItem;
g_GemItem3s :TClientItem;
g_GemItem4s :TClientItem;
g_GemItem5s :TClientItem;
g_GemItem6s :TClientItem;
g_LoverName :String[ActorNameLen];
g_StartDate :TDateTime;
g_TotalDays :Integer;
//交易相关
g_DealItems :array[0..9] of TClientItem;
g_DealRemoteItems :array[0..19] of TClientItem;
g_nDealGold :Integer;
g_nDealRemoteGold :Integer;
g_boDealEnd :Boolean;
g_sDealWho :String; //交易对方名字
g_MouseItem :TClientItem;
g_MouseStateItem :TClientItem;
g_MouseUserStateItem :TClientItem;
// g_MouseShopItem :TClientItem;
g_boBagToStore :Boolean;
g_boStoreToBag :Boolean;
g_boItemMoving :Boolean; //正在移动物品
g_MovingItem :TMovingItem;
g_WaitingUseItem :TMovingItem;
g_FocusItem :pTDropItem;
g_ItemEffects :TList;
g_boViewFog :Boolean; //是否显示黑暗
g_boForceNotViewFog :Boolean = TRUE; //免蜡烛
g_nDayBright :Integer;
g_nAreaStateValue :Integer; //显示当前所在地图状态(攻城区域、)
g_boNoDarkness :Boolean;
g_nRunReadyCount :Integer; //助跑就绪次数，在跑前必须走几步助跑
g_EatingItem :TClientItem;
g_dwEatTime :LongWord; //timeout...
g_dwDizzyDelayStart :LongWord;
g_dwDizzyDelayTime :LongWord;
g_boDoFadeOut :Boolean;
g_boDoFadeIn :Boolean;
g_nFadeIndex :Integer;
g_boDoFastFadeOut :Boolean;
g_LoverNameClient :String;
g_LoverNameState :String;
g_boAutoDig :Boolean; //自动锄矿
g_boSelectMyself :Boolean; //鼠标是否指到自己
//游戏速度检测相关变量
g_dwFirstServerTime :LongWord;
g_dwFirstClientTime :LongWord;
//ServerTimeGap: int64;
g_nTimeFakeDetectCount :Integer;
g_dwSHGetTime :LongWord;
g_dwSHTimerTime :LongWord;
g_nSHFakeCount :Integer; //检查机器速度异常次数，如果超过4次则提示速度不稳定
g_dwLatestClientTime2 :LongWord;
g_dwFirstClientTimerTime :LongWord; //timer
g_dwLatestClientTimerTime :LongWord;
g_dwFirstClientGetTime :LongWord; //gettickcount
g_dwLatestClientGetTime :LongWord;
g_nTimeFakeDetectSum :Integer;
g_nTimeFakeDetectTimer :Integer;
g_dwLastestClientGetTime :LongWord;
//外挂功能变量开始
g_dwDropItemFlashTime :LongWord = 5 * 1000; //地面物品闪时间间隔
g_nHitTime :Integer = 1400; //攻击间隔时间间隔
g_nItemSpeed :Integer = 60;
g_dwSpellTime :LongWord = 500; //魔法攻间隔时间
g_DeathColorEffect :TColorEffect = ceGrayScale;
g_boClientCanSet :Boolean = True;
g_boCanRunHuman :Boolean = False;
g_boCanRunMon :Boolean = False;
g_boCanRunNpc :Boolean = False;
g_boCanRunAllInWarZone :Boolean = False;
g_boCanStartRun :Boolean = False; //是否允许免助跑
g_boParalyCanRun :Boolean = False;//麻痹是否可以跑
g_boParalyCanWalk :Boolean = False;//麻痹是否可以走
g_boParalyCanHit :Boolean = False;//麻痹是否可以攻击
g_boParalyCanSpell :Boolean = False;//麻痹是否可以魔法
g_boShowRedHPLable :Boolean = True; //显示血条
g_boShowHPNumber :Boolean = True; //显示血量数字
g_boShowJobLevel :Boolean = True; //显示职业等级
g_boDuraAlert :Boolean = True; //物品持久警告
g_boMagicLock :Boolean = False; //魔法锁定
g_boAutoPuckUpItem :Boolean = False;
g_boShowHumanInfo :Boolean = True;
g_boShowMonsterInfo :Boolean = False;
g_boShowNpcInfo :Boolean = False;
//外挂功能变量结束
g_dwAutoPickupTick :LongWord;
g_dwAutoPickupTime :LongWord = 50; //自动捡物品间隔
g_AutoPickupList :TList;
g_MagicLockActor :TActor;
g_boNextTimePowerHit :Boolean;
g_boCanLongHit :Boolean;
g_boCanWideHit :Boolean;
g_boCanCrsHit :Boolean;
g_boCanTwnHit :Boolean;
g_boCanStnHit :Boolean;
g_boCanAkcHit :Boolean;
g_boNextTimeFireHit :Boolean;
g_ShowItemList :TGList;
g_boShowAllItem :Boolean = False;//显示地面所有物品名称
g_boDrawTileMap :Boolean = True;
g_boDrawDropItem :Boolean = True;
g_boVerticalBelt :Boolean = False;
// Mail
g_boHasMail :Boolean = False;
g_boIsMinTimerTime :Boolean = False; // Haxed MinTimer
g_nTestX:Integer = 71;
g_nTestY:Integer = 212;
DlgConf :TConfig = (
DScrollTop :(Image:911;Left:586;Top:78;Width:0;Height:0);
DScrollUp :(Image:912;Left:586;Top:89;Width:0;Height:0);
DScrollDown :(Image:913;Left:586;Top:184;Width:0;Height:0);
DScrollBottom :(Image:914;Left:586;Top:192;Width:0;Height:0);
DBotItemShop :(Image:827;Left:628;Top:98;Width:0;Height:0);
DItemShopJobAll :(Image:801;Left:149;Top:47;Width:0;Height:0);
DItemShopJobWarrior :(Image:803;Left:183;Top:47;Width:0;Height:0);
DItemShopJobWizard :(Image:805;Left:217;Top:47;Width:0;Height:0);
DItemShopJobMonk :(Image:807;Left:251;Top:47;Width:0;Height:0);
DItemShopJobCommon :(Image:809;Left:285;Top:47;Width:0;Height:0);
DGrpPgUp :(Image:373;Left:265;Top:94;Width:0;Height:0);
DGrpPgDn :(Image:372;Left:265;Top:153;Width:0;Height:0);
DItemShopFind :(Image:781;Left:617;Top:45;Width:0;Height:0);
DItemShopCaNew :(Image:790;Left:26;Top:78;Width:0;Height:0);
DItemShopCaAll :(Image:790;Left:26;Top:99;Width:0;Height:0);
DItemShopCaWeapon :(Image:790;Left:26;Top:120;Width:0;Height:0);
DItemShopCaArmor :(Image:790;Left:26;Top:141;Width:0;Height:0);
DItemShopCaAcc :(Image:790;Left:26;Top:162;Width:0;Height:0);
DItemShopCasSubitem :(Image:790;Left:26;Top:183;Width:0;Height:0);
DItemShopCaOther :(Image:790;Left:26;Top:225;Width:0;Height:0);
DItemShopCaPackage :(Image:790;Left:26;Top:204;Width:0;Height:0);
DItemShopCaSub1 :(Image:817;Left:26;Top:246;Width:0;Height:0);
DItemShopCaSub2 :(Image:817;Left:26;Top:263;Width:0;Height:0);
DItemShopCaSub3 :(Image:817;Left:26;Top:280;Width:0;Height:0);
DItemShopCaSub4 :(Image:817;Left:26;Top:297;Width:0;Height:0);
DItemShopCaSub5 :(Image:817;Left:26;Top:314;Width:0;Height:0);
DItemShopCaSub6 :(Image:817;Left:26;Top:331;Width:0;Height:0);
DItemShopCaSub7 :(Image:817;Left:26;Top:348;Width:0;Height:0);
DItemShopGetGift :(Image:768;Left:202;Top:430;Width:0;Height:0);
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -