⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 m2share.~pas

📁 翎风世界..传奇服务端..DELPHI源代码 包括DBServer,LogDataServer,LoginGate,LoginSrv,M2Server等..内容齐全.
💻 ~PAS
📖 第 1 页 / 共 5 页
字号:
	$00, $00, $DC, $00, $00, $00, $DE, $00, $00, $00, $FB, $00, $52, $73, $9C, $00,
	$4A, $6B, $94, $00, $29, $4A, $73, $00, $18, $31, $52, $00, $18, $4A, $8C, $00,
	$11, $44, $88, $00, $00, $21, $4A, $00, $10, $18, $21, $00, $5A, $94, $D6, $00,
	$21, $6B, $C6, $00, $00, $6B, $EF, $00, $00, $77, $FF, $00, $84, $94, $A5, $00,
	$21, $31, $42, $00, $08, $10, $18, $00, $08, $18, $29, $00, $00, $10, $21, $00,
	$18, $29, $39, $00, $39, $63, $8C, $00, $10, $29, $42, $00, $18, $42, $6B, $00,
	$18, $4A, $7B, $00, $00, $4A, $94, $00, $7B, $84, $8C, $00, $5A, $63, $6B, $00,
	$39, $42, $4A, $00, $18, $21, $29, $00, $29, $39, $46, $00, $94, $A5, $B5, $00,
	$5A, $6B, $7B, $00, $94, $B1, $CE, $00, $73, $8C, $A5, $00, $5A, $73, $8C, $00,
	$73, $94, $B5, $00, $73, $A5, $D6, $00, $4A, $A5, $EF, $00, $8C, $C6, $EF, $00,
	$42, $63, $7B, $00, $39, $56, $6B, $00, $5A, $94, $BD, $00, $00, $39, $63, $00,
	$AD, $C6, $D6, $00, $29, $42, $52, $00, $18, $63, $94, $00, $AD, $D6, $EF, $00,
	$63, $8C, $A5, $00, $4A, $5A, $63, $00, $7B, $A5, $BD, $00, $18, $42, $5A, $00,
	$31, $8C, $BD, $00, $29, $31, $35, $00, $63, $84, $94, $00, $4A, $6B, $7B, $00,
	$5A, $8C, $A5, $00, $29, $4A, $5A, $00, $39, $7B, $9C, $00, $10, $31, $42, $00,
	$21, $AD, $EF, $00, $00, $10, $18, $00, $00, $21, $29, $00, $00, $6B, $9C, $00,
	$5A, $84, $94, $00, $18, $42, $52, $00, $29, $5A, $6B, $00, $21, $63, $7B, $00,
	$21, $7B, $9C, $00, $00, $A5, $DE, $00, $39, $52, $5A, $00, $10, $29, $31, $00,
	$7B, $BD, $CE, $00, $39, $5A, $63, $00, $4A, $84, $94, $00, $29, $A5, $C6, $00,
	$18, $9C, $10, $00, $4A, $8C, $42, $00, $42, $8C, $31, $00, $29, $94, $10, $00,
	$10, $18, $08, $00, $18, $18, $08, $00, $10, $29, $08, $00, $29, $42, $18, $00,
	$AD, $B5, $A5, $00, $73, $73, $6B, $00, $29, $29, $18, $00, $4A, $42, $18, $00,
	$4A, $42, $31, $00, $DE, $C6, $63, $00, $FF, $DD, $44, $00, $EF, $D6, $8C, $00,
	$39, $6B, $73, $00, $39, $DE, $F7, $00, $8C, $EF, $F7, $00, $00, $E7, $F7, $00,
	$5A, $6B, $6B, $00, $A5, $8C, $5A, $00, $EF, $B5, $39, $00, $CE, $9C, $4A, $00,
	$B5, $84, $31, $00, $6B, $52, $31, $00, $D6, $DE, $DE, $00, $B5, $BD, $BD, $00,
	$84, $8C, $8C, $00, $DE, $F7, $F7, $00, $18, $08, $00, $00, $39, $18, $08, $00,
	$29, $10, $08, $00, $00, $18, $08, $00, $00, $29, $08, $00, $A5, $52, $00, $00,
	$DE, $7B, $00, $00, $4A, $29, $10, $00, $6B, $39, $10, $00, $8C, $52, $10, $00,
	$A5, $5A, $21, $00, $5A, $31, $10, $00, $84, $42, $10, $00, $84, $52, $31, $00,
	$31, $21, $18, $00, $7B, $5A, $4A, $00, $A5, $6B, $52, $00, $63, $39, $29, $00,
	$DE, $4A, $10, $00, $21, $29, $29, $00, $39, $4A, $4A, $00, $18, $29, $29, $00,
	$29, $4A, $4A, $00, $42, $7B, $7B, $00, $4A, $9C, $9C, $00, $29, $5A, $5A, $00,
	$14, $42, $42, $00, $00, $39, $39, $00, $00, $59, $59, $00, $2C, $35, $CA, $00,
	$21, $73, $6B, $00, $00, $31, $29, $00, $10, $39, $31, $00, $18, $39, $31, $00,
	$00, $4A, $42, $00, $18, $63, $52, $00, $29, $73, $5A, $00, $18, $4A, $31, $00,
	$00, $21, $18, $00, $00, $31, $18, $00, $10, $39, $18, $00, $4A, $84, $63, $00,
	$4A, $BD, $6B, $00, $4A, $B5, $63, $00, $4A, $BD, $63, $00, $4A, $9C, $5A, $00,
	$39, $8C, $4A, $00, $4A, $C6, $63, $00, $4A, $D6, $63, $00, $4A, $84, $52, $00,
	$29, $73, $31, $00, $5A, $C6, $63, $00, $4A, $BD, $52, $00, $00, $FF, $10, $00,
	$18, $29, $18, $00, $4A, $88, $4A, $00, $4A, $E7, $4A, $00, $00, $5A, $00, $00,
	$00, $88, $00, $00, $00, $94, $00, $00, $00, $DE, $00, $00, $00, $EE, $00, $00,
	$00, $FB, $00, $00, $94, $5A, $4A, $00, $B5, $73, $63, $00, $D6, $8C, $7B, $00,
	$D6, $7B, $6B, $00, $FF, $88, $77, $00, $CE, $C6, $C6, $00, $9C, $94, $94, $00,
	$C6, $94, $9C, $00, $39, $31, $31, $00, $84, $18, $29, $00, $84, $00, $18, $00,
	$52, $42, $4A, $00, $7B, $42, $52, $00, $73, $5A, $63, $00, $F7, $B5, $CE, $00,
	$9C, $7B, $8C, $00, $CC, $22, $77, $00, $FF, $AA, $DD, $00, $2A, $B4, $F0, $00,
	$9F, $00, $DF, $00, $B3, $17, $E3, $00, $F0, $FB, $FF, $00, $A4, $A0, $A0, $00,
	$80, $80, $80, $00, $00, $00, $FF, $00, $00, $FF, $00, $00, $00, $FF, $FF, $00,
	$FF, $00, $00, $00, $FF, $00, $FF, $00, $FF, $FF, $00, $00, $FF, $FF, $FF, $00
        );



  g_GMRedMsgCmd            :Char = '!';
  g_nGMREDMSGCMD           :Integer = 6;

  g_dwSendOnlineTick         :LongWord;


  g_HighLevelHuman     :TObject = nil;
  g_HighPKPointHuman   :TObject = nil;
  g_HighDCHuman        :TObject = nil;
  g_HighMCHuman        :TOBject = nil;
  g_HighSCHuman        :TObject = nil;
  g_HighOnlineHuman    :TObject = nil;


  g_dwSpiritMutinyTick      :LongWord;


{$IF USECODE = USEREMOTECODE}
    g_Encode6BitBuf:TEncode6BitBuf = (
	$55, $8B, $EC, $83, $C4, $E0, $89, $4D, $F4, $89, $55, $F8, $89, $45, $FC, $33,
	$C0, $89, $45, $EC, $C6, $45, $E5, $00, $33, $C0, $89, $45, $E8, $8B, $45, $F4,
	$48, $85, $C0, $0F, $8C, $C3, $00, $00, $00, $40, $89, $45, $E0, $C7, $45, $F0,
	$00, $00, $00, $00, $8B, $45, $E8, $3B, $45, $08, $0F, $8D, $AC, $00, $00, $00,
	$8B, $45, $FC, $8B, $55, $F0, $8A, $04, $10, $88, $45, $E6, $8B, $4D, $EC, $83,
	$C1, $02, $33, $C0, $8A, $45, $E6, $D3, $E8, $0A, $45, $E5, $24, $3F, $88, $45,
	$E7, $8B, $45, $EC, $83, $C0, $02, $B9, $08, $00, $00, $00, $2B, $C8, $33, $C0,
	$8A, $45, $E6, $D3, $E0, $C1, $E8, $02, $24, $3F, $88, $45, $E5, $83, $45, $EC,
	$02, $83, $7D, $EC, $06, $7D, $13, $8A, $45, $E7, $04, $3C, $8B, $55, $F8, $8B,
	$4D, $E8, $88, $04, $0A, $FF, $45, $E8, $EB, $46, $8B, $45, $08, $48, $3B, $45,
	$E8, $7E, $23, $8A, $45, $E7, $04, $3C, $8B, $55, $F8, $8B, $4D, $E8, $88, $04,
	$0A, $8A, $45, $E5, $04, $3C, $8B, $55, $F8, $8B, $4D, $E8, $88, $44, $0A, $01,
	$83, $45, $E8, $02, $EB, $11, $8A, $45, $E7, $04, $3C, $8B, $55, $F8, $8B, $4D,
	$E8, $88, $04, $0A, $FF, $45, $E8, $33, $C0, $89, $45, $EC, $C6, $45, $E5, $00,
	$FF, $45, $F0, $FF, $4D, $E0, $0F, $85, $48, $FF, $FF, $FF, $83, $7D, $EC, $00,
	$7E, $11, $8A, $45, $E5, $04, $3C, $8B, $55, $F8, $8B, $4D, $E8, $88, $04, $0A,
	$FF, $45, $E8, $8B, $45, $F8, $8B, $55, $E8, $C6, $04, $10, $00, $8B, $E5, $5D,
	$C2, $04, $00, $90);

  g_Decode6BitBuf: TDecode6BitBuf = (
	$55, $8B, $EC, $83, $C4, $DC, $89, $4D, $F4, $89, $55, $F8, $89, $45, $FC, $C7, 
	$45, $EC, $02, $00, $00, $00, $33, $C0, $89, $45, $E8, $33, $C0, $89, $45, $E4, 
	$C6, $45, $E2, $00, $8B, $45, $F4, $48, $85, $C0, $0F, $8C, $B5, $00, $00, $00, 
	$40, $89, $45, $DC, $C7, $45, $F0, $00, $00, $00, $00, $8B, $45, $FC, $8B, $55, 
	$F0, $0F, $B6, $04, $10, $83, $E8, $3C, $78, $10, $8B, $45, $FC, $8B, $55, $F0, 
	$8A, $04, $10, $2C, $3C, $88, $45, $E3, $EB, $0A, $33, $C0, $89, $45, $E4, $E9, 
	$81, $00, $00, $00, $8B, $45, $E4, $3B, $45, $08, $7D, $79, $8B, $45, $E8, $83, 
	$C0, $06, $83, $F8, $08, $7C, $43, $B9, $06, $00, $00, $00, $2B, $4D, $EC, $8A, 
	$45, $E3, $24, $3F, $25, $FF, $00, $00, $00, $D3, $E8, $0A, $45, $E2, $88, $45, 
	$E1, $8B, $45, $F8, $8B, $55, $E4, $8A, $4D, $E1, $88, $0C, $10, $FF, $45, $E4, 
	$33, $C0, $89, $45, $E8, $83, $7D, $EC, $06, $7D, $06, $83, $45, $EC, $02, $EB, 
	$09, $C7, $45, $EC, $02, $00, $00, $00, $EB, $1F, $8B, $4D, $EC, $8A, $45, $E3, 
	$D2, $E0, $8B, $55, $EC, $22, $82, $02, $15, $5E, $00, $88, $45, $E2, $B8, $08, 
	$00, $00, $00, $2B, $45, $EC, $01, $45, $E8, $FF, $45, $F0, $FF, $4D, $DC, $0F, 
	$85, $56, $FF, $FF, $FF, $8B, $45, $F8, $8B, $55, $E4, $C6, $04, $10, $00, $8B, 
	$E5, $5D, $C2, $04, $00);
{$IFEND}
  g_Config                  :TM2Config = (
    nConfigSize             :SizeOf(TM2Config);
    sServerName             :'ktest';
    sServerIPaddr           :'127.0.0.1';
    sWebSite                :'http://www.gameofmir.com';
    sBbsSite                :'http://bbs.gameofmir.com';
    sClientDownload         :'http://www.gameofmir.com';
    sQQ                     :'88888888';
    sPhone                  :'123456789';
    sBankAccount0           :'银行信息';
    sBankAccount1           :'银行信息';
    sBankAccount2           :'银行信息';
    sBankAccount3           :'银行信息';
    sBankAccount4           :'银行信息';
    sBankAccount5           :'银行信息';
    sBankAccount6           :'银行信息';
    sBankAccount7           :'银行信息';
    sBankAccount8           :'银行信息';
    sBankAccount9           :'银行信息';
    nServerNumber           :0;
    boVentureServer         :False;
    boTestServer            :True;
    boServiceMode           :False;
    boNonPKServer           :False;
    nTestLevel              :1;
    nTestGold               :0;
    nTestUserLimit          :1000;
    nSendBlock              :1024;
    nCheckBlock             :4069;
    nAvailableBlock         :8000;
    nGateLoad               :0;
    nUserFull               :1000;
    nZenFastStep            :300;
    sGateAddr               :'127.0.0.1';
    nGatePort               :5000;
    sDBAddr                 :'127.0.0.1';
    nDBPort                 :6000;
    sIDSAddr                :'127.0.0.1';
    nIDSPort                :5600;
    sMsgSrvAddr             :'127.0.0.1';
    nMsgSrvPort             :4900;
    sLogServerAddr          :'127.0.0.1';
    nLogServerPort          :10000;
    boDiscountForNightTime  :False;
    nHalfFeeStart           :2;
    nHalfFeeEnd             :10;
    boViewHackMessage       :False;
    boViewAdmissionFailure  :False;
    sBaseDir                :'.\Share\';
    sGuildDir               :'.\GuildBase\Guilds\';
    sGuildFile              :'.\GuildBase\GuildList.txt';
    sVentureDir             :'.\ShareV\';
    sConLogDir              :'.\ConLog\';
    sCastleDir              :'.\Envir\Castle\';
    sCastleFile             :'.\Envir\Castle\List.txt';
    sEnvirDir               :'.\Envir\';
    sMapDir                 :'.\Map\';
    sNoticeDir              :'.\Notice\';
    sLogDir                 :'.\Log\';
    sPlugDir                :'.\Plug-in\';
    sClientFile1            :'mir.1';
    sClientFile2            :'mir.2';
    sClientFile3            :'mir.3';

    sClothsMan              :'BaseDress(M)';
    sClothsWoman            :'BaseDress(F)';
    sWoodenSword            :'WoodenSword';
    sCandle                 :'Candle';
    sBasicDrug              :'(HP)DrugSmall';
    sGoldStone              :'GoldOre';
    sSilverStone            :'SilverOre';
    sSteelStone             :'IronOre';
    sCopperStone            :'CopperOre';
    sBlackStone             :'BlackIronOre';
    sGemStone1              :'RubyOre';
    sGemStone2              :'AmethystOre';
    sGemStone3              :'NephriteOre';
    sGemStone4              :'PlatinumOre';
    sZuma                   :('ZumaGuardian','ZumaStatue','ZumaArcher','WedgeMoth');
    sBee                    :'BugBat';
    sSpider                 :'BombSpider';
    sWomaHorn               :'WoomaHorn';
    sZumaPiece              :'ZumaRelic';
    sGameGoldName           :'GameGold';
    sGamePointName          :'GamePoint';
    sPayMentPointName       :'PaymentPoint';
    DBSocket                :INVALID_SOCKET;
    nHealthFillTime         :300;
    nSpellFillTime          :800;
    nMonUpLvNeedKillBase    :100;
    nMonUpLvRate            :16;
    MonUpLvNeedKillCount    :(0,0,50,100,200,300,600,1200);
    SlaveColor              :($FF,$FE,$93,$9A,$E5,$A8,$B4,$FC,249);
//    dwNeedExps              :TLevelNeedExp;
    WideAttack              :(7,1,2);
    CrsAttack               :(7,1,2,3,4,5,6);
    SpitMap                 :(
                    ((0, 0, 1, 0, 0),     //DR_UP
                     (0, 0, 1, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0)),
                    ((0, 0, 0, 0, 1),     //DR_UPRIGHT
                     (0, 0, 0, 1, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0)),
                    ((0, 0, 0, 0, 0),     //DR_RIGHT
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 1, 1),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0)),
                    ((0, 0, 0, 0, 0),     //DR_DOWNRIGHT
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 1, 0),
                     (0, 0, 0, 0, 1)),
                    ((0, 0, 0, 0, 0),     //DR_DOWN
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 1, 0, 0),
                     (0, 0, 1, 0, 0)),
                    ((0, 0, 0, 0, 0),     //DR_DOWNLEFT
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 1, 0, 0, 0),
                     (1, 0, 0, 0, 0)),
                    ((0, 0, 0, 0, 0),     //DR_LEFT
                     (0, 0, 0, 0, 0),
                     (1, 1, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0)),
                    ((1, 0, 0, 0, 0),     //DR_UPLEFT
                     (0, 1, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0),
                     (0, 0, 0, 0, 0))
                    );

    sHomeMap                :'0';
    nHomeX                  :289;
    nHomeY                  :618;
    sRedHomeMap             :'3';
    nRedHomeX               :845;
    nRedHomeY               :674;
    sRedDieHomeMap          :'3';
    nRedDieHomeX            :839;
    nRedDieHomeY            :668;
    boJobHomePoint          :False;
    sWarriorHomeMap         :'0';
    nWarriorHomeX           :289;
    nWarriorHomeY           :618;
    sWizardHomeMap          :'0';
    nWizardHomeX            :650;
    nWizardHomeY            :631;
    sTaoistHomeMap          :'0';
    nTaoistHomeX            :334;
    nTaoistHomeY            :266;
    dwDecPkPointTime        :2 * 60 * 1000;
    nDecPkPointCount        :1;
    dwPKFlagTime            :60 * 1000;
    nKillHumanAddPKPoint    :100;
    nKillHumanDecLuckPoint  :500;
    dwDecLightItemDrugTime  :500;
    nSafeZoneSize           :10;
    nStartPointSize         :2;
    dwHumanGetMsgTime       :200;
    nGroupMembersMax        :10;
    sFireBallSkill          :'Fireball';
    sHealSkill              :'Healing';
    ReNewNameColor          :($FF,$FE,$93,$9A,$E5,$A8,$B4,$FC,$B4,$FC);
    dwReNewNameColorTime    :2000;
    boReNewChangeColor      :True;
    boReNewLevelClearExp    :True;
    BonusAbilofWarr         :(DC:17;MC:20;SC:20;AC:20;MAC:20;HP:1;MP:3;Hit:20;Speed:35;X2:0);
    BonusAbilofWizard       :(DC:17;MC:25;SC:30;AC:20;MAC:15;HP:2;MP:1;Hit:25;Speed:35;X2:0);
    BonusAbilofTaos         :(DC:20;MC:30;SC:17;AC:20;MAC:15;HP:2;MP:1;Hit:30;Speed:30;X2:0);
    NakedAbilofWarr         :(DC:512;MC:2560;SC:20;AC:768;MAC:1280;HP:0;MP:0;Hit:0;Speed:0;X2:0);
    NakedAbilofWizard       :(DC:512;MC:512;SC:2560;AC:1280;MAC:768;HP:0;MP:0;Hit:5;Speed:0;X2:0);
    NakedAbilofTaos         :(DC:20;MC:30;SC:17;AC:20;MAC:15;HP:2;MP:1;Hit:30;Speed:30;X2:0);
    nUpgradeWeaponMaxPoint  :20;
    nUpgradeWeaponPrice     :10000;
    dwUPgradeWeaponGetBackTime     :60 * 60 * 1000;
    nClearExpireUpgradeWeaponDays  :8;
    nUpgradeWeaponDCRate           :100;
    nUpgradeWeaponDCTwoPointRate   :30;
    nUpgradeWeaponDCThreePointRate :200;
    nUpgradeWeaponSCRate           :100;
    nUpgradeWeaponSCTwoPointRate   :30;
    nUpgradeWeaponSCThreePointRate :200;
    nUpgradeWeaponMCRate           :100;
    nUpgradeWeaponMCTwoPointRate   :30;
    nUpgradeWeaponMCThreePointRate :200;
    dwProcessMonstersTime          :10;
    dwRegenMonstersTime            :200;
    nMonGenRate                    :10;
    nProcessMonRandRate            :5;
    nProcessMonLimitCount          :5;
    nSoftVersionDate               :20020522;
    boCanOldClientLogon            :True;
    dwConsoleShowUserCountTime     :10 * 60 * 1000;
    dwShowLineNoticeTime           :5 * 60 * 1000;
    nLineNoticeColor               :2;
    nStartCastleWarDays            :4;
    nStartCastlewarTime            :20;
    dwShowCastleWarEndMsgTime      :10 * 60 * 1000;
    dwCastleWarTime                :3 * 60 * 60 * 1000;
    dwGetCastleTime                :10 * 60 * 1000;
    dwGuildWarTime                 :3 * 60 * 60 * 1000;
    nBuildGuildPrice               :1000000;
    nGuildWarPrice                 :30000;
    nMakeDurgPrice                 :100;
    nHumanMaxGold                  :10000000;
    nHumanTryModeMaxGold           :100000;
    nTryModeLevel                  :7;
    boTryModeUseStorage            :False;
    nCanShoutMsgLevel              :7;
    boShowMakeItemMsg              :False;
    boShutRedMsgShowGMName         :False;
    nSayMsgMaxLen                  :80;
    dwSayMsgTime                   :3 * 1000;
    nSayMsgCount                   :2;
    dwDisableSayMsgTime            :60 * 1000;
    nSayRedMsgMaxLen               :255;
    boShowGuildName                :True;
    boShowRankLevelName            :False;
    boMonSayMsg                    :False;
    nStartPermission               :0;
    boKillHumanWinLevel            :False;
    boKilledLostLevel              :False;
    boKillHumanWinExp              :False;
    boKilledLostExp                :False;
    nKillHumanWinLevel             :1;
    nKilledLostLevel               :1;
    nKillHumanWinExp               :10000

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -