?? gameconfig.pas
字號:
unit GameConfig;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, StdCtrls, Spin, Grids;
type
TLevelExpScheme = (s_OldLevelExp, s_StdLevelExp, s_2Mult, s_5Mult, s_8Mult, s_10Mult, s_20Mult, s_30Mult, s_40Mult, s_50Mult, s_60Mult, s_70Mult, s_80Mult, s_90Mult, s_100Mult, s_150Mult, s_200Mult, s_250Mult, s_300Mult);
TfrmGameConfig = class(TForm)
GameConfigControl: TPageControl;
GameSpeedSheet: TTabSheet;
GroupBox1: TGroupBox;
EditHitIntervalTime: TSpinEdit;
Label1: TLabel;
Label2: TLabel;
EditMagicHitIntervalTime: TSpinEdit;
EditRunIntervalTime: TSpinEdit;
Label3: TLabel;
Label4: TLabel;
EditWalkIntervalTime: TSpinEdit;
Label5: TLabel;
EditTurnIntervalTime: TSpinEdit;
GroupBox2: TGroupBox;
Label7: TLabel;
Label8: TLabel;
Label9: TLabel;
Label10: TLabel;
Label11: TLabel;
Label12: TLabel;
EditMaxHitMsgCount: TSpinEdit;
EditMaxSpellMsgCount: TSpinEdit;
EditMaxRunMsgCount: TSpinEdit;
EditMaxWalkMsgCount: TSpinEdit;
EditMaxTurnMsgCount: TSpinEdit;
EditMaxDigUpMsgCount: TSpinEdit;
GroupBox3: TGroupBox;
Label13: TLabel;
EditItemSpeedTime: TSpinEdit;
ButtonGameSpeedSave: TButton;
Label14: TLabel;
ExpSheet: TTabSheet;
GroupBox4: TGroupBox;
Label6: TLabel;
EditDigUpIntervalTime: TSpinEdit;
GeneralSheet: TTabSheet;
GroupBoxInfo: TGroupBox;
Label16: TLabel;
EditSoftVersionDate: TEdit;
GroupBox5: TGroupBox;
Label17: TLabel;
EditConsoleShowUserCountTime: TSpinEdit;
GroupBox6: TGroupBox;
Label18: TLabel;
EditShowLineNoticeTime: TSpinEdit;
ComboBoxLineNoticeColor: TComboBox;
Label19: TLabel;
ButtonGeneralSave: TButton;
Label21: TLabel;
EditLineNoticePreFix: TEdit;
GroupBox7: TGroupBox;
Label22: TLabel;
EditStruckTime: TSpinEdit;
CheckBoxDisableStruck: TCheckBox;
GroupBox8: TGroupBox;
Label23: TLabel;
EditKillMonExpMultiple: TSpinEdit;
CheckBoxHighLevelKillMonFixExp: TCheckBox;
ButtonExpSave: TButton;
CastleSheet: TTabSheet;
GroupBox9: TGroupBox;
Label24: TLabel;
EditRepairDoorPrice: TSpinEdit;
Label25: TLabel;
EditRepairWallPrice: TSpinEdit;
Label26: TLabel;
EditHireArcherPrice: TSpinEdit;
Label27: TLabel;
EditHireGuardPrice: TSpinEdit;
GroupBox10: TGroupBox;
Label31: TLabel;
Label32: TLabel;
EditCastleGoldMax: TSpinEdit;
EditCastleOneDayGold: TSpinEdit;
GroupBox11: TGroupBox;
Label28: TLabel;
Label29: TLabel;
EditCastleHomeX: TSpinEdit;
Label30: TLabel;
EditCastleHomeY: TSpinEdit;
EditCastleHomeMap: TEdit;
GroupBox12: TGroupBox;
Label34: TLabel;
Label35: TLabel;
EditWarRangeX: TSpinEdit;
EditWarRangeY: TSpinEdit;
ButtonCastleSave: TButton;
GroupBox13: TGroupBox;
Label36: TLabel;
EditTaxRate: TSpinEdit;
CheckBoxGetAllNpcTax: TCheckBox;
GroupBox14: TGroupBox;
Label33: TLabel;
EditCastleName: TEdit;
GroupBoxLevelExp: TGroupBox;
ComboBoxLevelExp: TComboBox;
GridLevelExp: TStringGrid;
Label37: TLabel;
GroupBox15: TGroupBox;
Label38: TLabel;
EditOverSpeedKickCount: TSpinEdit;
CheckBoxboKickOverSpeed: TCheckBox;
TabSheet1: TTabSheet;
ButtonOptionSave: TButton;
GroupBox16: TGroupBox;
EditSafeZoneSize: TSpinEdit;
Label39: TLabel;
GroupBox18: TGroupBox;
Label40: TLabel;
EditStartPointSize: TSpinEdit;
GroupBox20: TGroupBox;
EditRedHomeX: TSpinEdit;
Label42: TLabel;
Label43: TLabel;
EditRedHomeY: TSpinEdit;
Label44: TLabel;
EditRedHomeMap: TEdit;
GroupBox21: TGroupBox;
Label45: TLabel;
Label46: TLabel;
Label47: TLabel;
EditRedDieHomeX: TSpinEdit;
EditRedDieHomeY: TSpinEdit;
EditRedDieHomeMap: TEdit;
TabSheet2: TTabSheet;
TabSheet3: TTabSheet;
GroupBox17: TGroupBox;
CheckBoxDisHumRun: TCheckBox;
CheckBoxRunHum: TCheckBox;
CheckBoxRunMon: TCheckBox;
CheckBoxWarDisHumRun: TCheckBox;
CheckBoxRunNpc: TCheckBox;
ButtonOptionSave3: TButton;
GroupBox22: TGroupBox;
Label48: TLabel;
Label49: TLabel;
Label50: TLabel;
EditHomeX: TSpinEdit;
EditHomeY: TSpinEdit;
EditHomeMap: TEdit;
ButtonOptionSave2: TButton;
GroupBox23: TGroupBox;
Label51: TLabel;
Label52: TLabel;
EditDecPkPointTime: TSpinEdit;
EditDecPkPointCount: TSpinEdit;
Label53: TLabel;
GroupBox24: TGroupBox;
Label54: TLabel;
EditPKFlagTime: TSpinEdit;
GroupBox25: TGroupBox;
Label55: TLabel;
EditKillHumanAddPKPoint: TSpinEdit;
TabSheet4: TTabSheet;
GroupBox28: TGroupBox;
CheckBoxTestServer: TCheckBox;
CheckBoxServiceMode: TCheckBox;
CheckBoxVentureMode: TCheckBox;
CheckBoxNonPKMode: TCheckBox;
GroupBox29: TGroupBox;
GroupBox30: TGroupBox;
Label60: TLabel;
EditStartPermission: TSpinEdit;
ButtonOptionSave0: TButton;
EditTestLevel: TSpinEdit;
Label61: TLabel;
EditTestGold: TSpinEdit;
Label62: TLabel;
EditTestUserLimit: TSpinEdit;
Label63: TLabel;
GroupBox31: TGroupBox;
Label64: TLabel;
EditUserFull: TSpinEdit;
GroupBox32: TGroupBox;
CheckBoxKillHumanWinLevel: TCheckBox;
CheckBoxKilledLostLevel: TCheckBox;
CheckBoxKilledLostExp: TCheckBox;
CheckBoxKillHumanWinExp: TCheckBox;
Label58: TLabel;
EditKillHumanWinLevel: TSpinEdit;
Label65: TLabel;
EditKilledLostLevel: TSpinEdit;
Label66: TLabel;
EditKillHumanWinExp: TSpinEdit;
EditKillHumanLostExp: TSpinEdit;
Label56: TLabel;
Label67: TLabel;
EditHumanLevelDiffer: TSpinEdit;
GroupBox33: TGroupBox;
Label68: TLabel;
EditHumanMaxGold: TSpinEdit;
EditHumanTryModeMaxGold: TSpinEdit;
Label69: TLabel;
GroupBox34: TGroupBox;
Label70: TLabel;
EditTryModeLevel: TSpinEdit;
CheckBoxTryModeUseStorage: TCheckBox;
GroupBox35: TGroupBox;
CheckBoxShowMakeItemMsg: TCheckBox;
CbViewHack: TCheckBox;
CkViewAdmfail: TCheckBox;
TabSheet5: TTabSheet;
GroupBox36: TGroupBox;
Label71: TLabel;
EditSayMsgMaxLen: TSpinEdit;
Label72: TLabel;
EditSayRedMsgMaxLen: TSpinEdit;
GroupBox37: TGroupBox;
Label73: TLabel;
EditCanShoutMsgLevel: TSpinEdit;
GroupBox38: TGroupBox;
Label75: TLabel;
CheckBoxShutRedMsgShowGMName: TCheckBox;
EditGMRedMsgCmd: TEdit;
ButtonMsgSave: TButton;
TabSheet6: TTabSheet;
GroupBox39: TGroupBox;
Label74: TLabel;
EditStartCastleWarDays: TSpinEdit;
GroupBox40: TGroupBox;
Label76: TLabel;
EditStartCastlewarTime: TSpinEdit;
Label77: TLabel;
Label78: TLabel;
GroupBox41: TGroupBox;
Label79: TLabel;
EditShowCastleWarEndMsgTime: TSpinEdit;
Label80: TLabel;
GroupBox42: TGroupBox;
Label81: TLabel;
Label82: TLabel;
EditCastleWarTime: TSpinEdit;
GroupBox43: TGroupBox;
Label83: TLabel;
Label84: TLabel;
EditGetCastleTime: TSpinEdit;
GroupBox44: TGroupBox;
Label85: TLabel;
Label86: TLabel;
EditSaveHumanRcdTime: TSpinEdit;
GroupBox45: TGroupBox;
Label87: TLabel;
Label88: TLabel;
EditHumanFreeDelayTime: TSpinEdit;
GroupBox46: TGroupBox;
Label89: TLabel;
Label90: TLabel;
EditMakeGhostTime: TSpinEdit;
Label91: TLabel;
EditClearDropOnFloorItemTime: TSpinEdit;
Label92: TLabel;
GroupBox47: TGroupBox;
Label93: TLabel;
Label94: TLabel;
EditFloorItemCanPickUpTime: TSpinEdit;
ButtonTimeSave: TButton;
TabSheet7: TTabSheet;
GroupBox48: TGroupBox;
Label95: TLabel;
EditBuildGuildPrice: TSpinEdit;
GroupBox49: TGroupBox;
Label96: TLabel;
EditGuildWarPrice: TSpinEdit;
GroupBox50: TGroupBox;
Label97: TLabel;
EditMakeDurgPrice: TSpinEdit;
ButtonPriceSave: TButton;
GroupBox51: TGroupBox;
Label98: TLabel;
EditSendOnlineCountRate: TSpinEdit;
Label99: TLabel;
EditSendOnlineTime: TSpinEdit;
CheckBoxSendOnlineCount: TCheckBox;
Label100: TLabel;
GroupBox52: TGroupBox;
Label101: TLabel;
Label102: TLabel;
Label103: TLabel;
EditMonsterPowerRate: TSpinEdit;
EditEditItemsPowerRate: TSpinEdit;
EditItemsACPowerRate: TSpinEdit;
GroupBox53: TGroupBox;
Label20: TLabel;
Label104: TLabel;
EditTryDealTime: TSpinEdit;
EditDealOKTime: TSpinEdit;
Label105: TLabel;
Label106: TLabel;
GroupBox54: TGroupBox;
Label107: TLabel;
EditCastleMemberPriceRate: TSpinEdit;
TabSheet8: TTabSheet;
ButtonMsgColorSave: TButton;
GroupBox55: TGroupBox;
Label108: TLabel;
Label109: TLabel;
EditHearMsgFColor: TSpinEdit;
EdittHearMsgBColor: TSpinEdit;
LabeltHearMsgFColor: TLabel;
LabelHearMsgBColor: TLabel;
GroupBox56: TGroupBox;
Label110: TLabel;
Label111: TLabel;
LabelWhisperMsgFColor: TLabel;
LabelWhisperMsgBColor: TLabel;
EditWhisperMsgFColor: TSpinEdit;
EditWhisperMsgBColor: TSpinEdit;
GroupBox57: TGroupBox;
Label112: TLabel;
Label113: TLabel;
LabelGMWhisperMsgFColor: TLabel;
LabelGMWhisperMsgBColor: TLabel;
EditGMWhisperMsgFColor: TSpinEdit;
EditGMWhisperMsgBColor: TSpinEdit;
GroupBox58: TGroupBox;
Label116: TLabel;
Label117: TLabel;
LabelRedMsgFColor: TLabel;
LabelRedMsgBColor: TLabel;
EditRedMsgFColor: TSpinEdit;
EditRedMsgBColor: TSpinEdit;
GroupBox59: TGroupBox;
Label120: TLabel;
Label121: TLabel;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -