如何查看传奇服务端传奇私服服务端在哪儿查看装备版本号
作者:admin发布时间:2021-12-27分类:sf发布网浏览:62评论:2
《传奇》研究系列文章1:服务端控制中心(服务器网关启动器)
提示所有的研究心得直接写在源码注释中对照源码看注释即可学习了解传奇的流程架构。《传奇》全部源码获取可加入开发局QQ群
《传奇》服务端控制中心服务器网关启动器源码文件夹如下
主窗体源码和注释
;{1、();向客户端发送(实际上是发送给客户端登的登陆器由登陆器启动客户端那么登陆器必须先连接本程序)包含LoginGate游戏登录网关服务器的地址.以便于客户端连接加载StartServer_LGIP.txt文件读取LoginGate的地址}interface{$WARNUNIT_PLATFORMOFF}usesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,ComCtrls,StdCtrls,INIFiles,ExtCtrls,Spin,JSocket,WinInet,ComObj,shellapi,IdBaseComponent,IdComponent,IdTCPConnection,IdTCPClient,IdHTTP,DateUtils;typeTfrmMainclass(TForm)PageControl1:TPageControl;TabSheet1:TTabSheet;TabSheet2:TTabSheet;TabSheet3:TTabSheet;PageControl2:TPageControl;PageControl3:TPageControl;TabSheet4:TTabSheet;TabSheet5:TTabSheet;TabSheet6:TTabSheet;GroupBox1:TGroupBox;Label1:TLabel;EditGameDir:TEdit;Button1:TButton;Label2:TLabel;EditHeroDB:TEdit;ButtonNext1:TButton;ButtonNext2:TButton;GroupBox2:TGroupBox;ButtonPrv2:TButton;GroupBox4:TGroupBox;Label7:TLabel;Label6:TLabel;Label5:TLabel;EditM2ServerRegKey:TEdit;EditRunGateRegKey:TEdit;EditDBServerRegKey:TEdit;EditGameName:TEdit;Label3:TLabel;Label4:TLabel;EditGameExtIPaddr:TEdit;GroupBox5:TGroupBox;EditM2ServerProgram:TEdit;EditDBServerProgram:TEdit;EditLoginSrvProgram:TEdit;EditLogServerProgram:TEdit;EditLoginGateProgram:TEdit;EditSelGateProgram:TEdit;EditRunGateProgram:TEdit;ButtonStartGame:TButton;CheckBoxM2Server:TCheckBox;CheckBoxDBServer:TCheckBox;CheckBoxLoginServer:TCheckBox;CheckBoxLogServer:TCheckBox;CheckBoxLoginGate:TCheckBox;CheckBoxSelGate:TCheckBox;CheckBoxRunGate:TCheckBox;CheckBoxRunGate1:TCheckBox;EditRunGate1Program:TEdit;CheckBoxRunGate2:TCheckBox;EditRunGate2Program:TEdit;TimerStartGame:TTimer;TimerStopGame:TTimer;TimerCheckRun:TTimer;MemoLog:TMemo;GroupBox6:TGroupBox;Label8:TLabel;EditSkin:TSpinEdit;ButtonFormSave:TButton;ButtonReLoadConfig:TButton;GroupBox7:TGroupBox;Label9:TLabel;EditLoginGate_MainFormX:TSpinEdit;Label10:TLabel;EditLoginGate_MainFormY:TSpinEdit;GroupBox3:TGroupBox;GroupBox8:TGroupBox;Label11:TLabel;Label12:TLabel;EditSelGate_MainFormX:TSpinEdit;EditSelGate_MainFormY:TSpinEdit;TabSheet7:TTabSheet;GroupBox9:TGroupBox;GroupBox10:TGroupBox;Label13:TLabel;Label14:TLabel;EditLoginServer_MainFormX:TSpinEdit;EditLoginServer_MainFormY:TSpinEdit;TabSheet8:TTabSheet;GroupBox11:TGroupBox;GroupBox12:TGroupBox;Label15:TLabel;Label16:TLabel;EditDBServer_MainFormX:TSpinEdit;EditDBServer_MainFormY:TSpinEdit;TabSheet9:TTabSheet;GroupBox13:TGroupBox;GroupBox14:TGroupBox;Label17:TLabel;Label18:TLabel;EditLogServer_MainFormX:TSpinEdit;EditLogServer_MainFormY:TSpinEdit;TabSheet10:TTabSheet;GroupBox15:TGroupBox;GroupBox16:TGroupBox;Label19:TLabel;Label20:TLabel;EditM2Server_MainFormX:TSpinEdit;EditM2Server_MainFormY:TSpinEdit;TabSheet11:TTabSheet;ButtonSave:TButton;ButtonGenGameConfig:TButton;ButtonPrv3:TButton;ButtonNext3:TButton;TabSheet12:TTabSheet;ButtonPrv4:TButton;ButtonNext4:TButton;ButtonPrv5:TButton;ButtonNext5:TButton;ButtonPrv6:TButton;ButtonNext6:TButton;ButtonPrv7:TButton;ButtonNext7:TButton;ButtonPrv8:TButton;ButtonNext8:TButton;ButtonPrv9:TButton;GroupBox17:TGroupBox;GroupBox18:TGroupBox;Label21:TLabel;Label22:TLabel;EditRunGate_MainFormX:TSpinEdit;EditRunGate_MainFormY:TSpinEdit;GroupBox19:TGroupBox;Label23:TLabel;EditRunGate_Connt:TSpinEdit;TabSheet13:TTabSheet;ButtonLoginServerConfig:TButton;ButtonAdv:TButton;CheckBoxDynamicIPMode:TCheckBox;GroupBox20:TGroupBox;CheckBoxDisableAutoGame:TCheckBox;TabSheet14:TTabSheet;GroupBox21:TGroupBox;Label24:TLabel;Label25:TLabel;Label26:TLabel;LabelConnect:TLabel;Label27:TLabel;MemoGameList:TMemo;EditNoticeUrl:TEdit;Memo1:TMemo;Button2:TButton;EditClientForm:TSpinEdit;ServerSocket:TServerSocket;Timer:TTimer;GroupBox22:TGroupBox;LabelRunGate_GatePort1:TLabel;EditRunGate_GatePort1:TEdit;LabelLabelRunGate_GatePort2:TLabel;EditRunGate_GatePort2:TEdit;LabelRunGate_GatePort3:TLabel;EditRunGate_GatePort3:TEdit;LabelRunGate_GatePort4:TLabel;EditRunGate_GatePort4:TEdit;LabelRunGate_GatePort5:TLabel;EditRunGate_GatePort5:TEdit;LabelRunGate_GatePort6:TLabel;EditRunGate_GatePort6:TEdit;LabelRunGate_GatePort7:TLabel;EditRunGate_GatePort7:TEdit;EditRunGate_GatePort8:TEdit;LabelRunGate_GatePort78:TLabel;ButtonRunGateDefault:TButton;ButtonSelGateDefault:TButton;ButtonGeneralDefalult:TButton;ButtonLoginGateDefault:TButton;ButtonLoginSrvDefault:TButton;ButtonDBServerDefault:TButton;ButtonLogServerDefault:TButton;ButtonM2ServerDefault:TButton;GroupBox23:TGroupBox;Label28:TLabel;EditLoginGate_GatePort:TEdit;GroupBox24:TGroupBox;Label29:TLabel;EditSelGate_GatePort:TEdit;TabSheet15:TTabSheet;GroupBox25:TGroupBox;EditSearchLoginAccount:TEdit;Label30:TLabel;ButtonSearchLoginAccount:TButton;GroupBox26:TGroupBox;Label31:TLabel;EditLoginAccount:TEdit;Label32:TLabel;EditLoginAccountPasswd:TEdit;Label33:TLabel;EditLoginAccountUserName:TEdit;Label34:TLabel;EditLoginAccountSSNo:TEdit;Label35:TLabel;EditLoginAccountBirthDay:TEdit;Label36:TLabel;EditLoginAccountQuiz:TEdit;Label37:TLabel;EditLoginAccountAnswer:TEdit;Label38:TLabel;Label39:TLabel;EditLoginAccountQuiz2:TEdit;EditLoginAccountAnswer2:TEdit;Label40:TLabel;EditLoginAccountMobilePhone:TEdit;EditLoginAccountMemo1:TEdit;Label41:TLabel;Label42:TLabel;Label43:TLabel;EditLoginAccountEMail:TEdit;EditLoginAccountMemo2:TEdit;CkFullEditMode:TCheckBox;ButtonLoginAccountOK:TButton;Label44:TLabel;EditLoginAccountPhone:TEdit;GroupBox27:TGroupBox;CheckBoxboLoginGate_GetStart:TCheckBox;GroupBox28:TGroupBox;CheckBoxboSelGate_GetStart:TCheckBox;TabSheetDebug:TTabSheet;GroupBox29:TGroupBox;GroupBox30:TGroupBox;Label45:TLabel;EditM2CheckCodeAddr:TEdit;TimerCheckDebug:TTimer;Label46:TLabel;EditM2CheckCode:TEdit;ButtonM2Suspend:TButton;GroupBox31:TGroupBox;Label47:TLabel;Label48:TLabel;EditDBCheckCodeAddr:TEdit;EditDBCheckCode:TEdit;Button3:TButton;GroupBox32:TGroupBox;Label61:TLabel;Label62:TLabel;EditM2Server_TestLevel:TSpinEdit;EditM2Server_TestGold:TSpinEdit;Label49:TLabel;EditSelGate_GatePort1:TEdit;GroupBox33:TGroupBox;Label50:TLabel;Label51:TLabel;EditLoginServerGatePort:TEdit;EditLoginServerServerPort:TEdit;GroupBox34:TGroupBox;CheckBoxboLoginServer_GetStart:TCheckBox;GroupBox35:TGroupBox;CheckBoxDBServerGetStart:TCheckBox;GroupBox36:TGroupBox;Label52:TLabel;Label53:TLabel;EditDBServerGatePort:TEdit;EditDBServerServerPort:TEdit;GroupBox37:TGroupBox;CheckBoxLogServerGetStart:TCheckBox;GroupBox38:TGroupBox;Label54:TLabel;EditLogServerPort:TEdit;GroupBox39:TGroupBox;Label55:TLabel;EditM2ServerGatePort:TEdit;GroupBox40:TGroupBox;CheckBoxM2ServerGetStart:TCheckBox;Label56:TLabel;EditM2ServerMsgSrvPort:TEdit;Label57:TLabel;EditDBCheckStr:TEdit;Label58:TLabel;EditM2CheckStr:TEdit;GroupBox41:TGroupBox;Label59:TLabel;Label60:TLabel;Label63:TLabel;Label64:TLabel;Label65:TLabel;LabeledEdit1:TLabeledEdit;TabSheet16:TTabSheet;Label66:TLabel;Label67:TLabel;LicenseIDBox:TEdit;RegCodeBox:TEdit;DoRegistrationBtn:TButton;Label68:TLabel;OrganizationBox:TEdit;EmailBox:TEdit;Label69:TLabel;IdHTTP1:TIdHTTP;CheckBox1:TCheckBox;procedureButtonNext1Click(Sender:TObject);procedureButtonPrv2Click(Sender:TObject);procedureButtonNext2Click(Sender:TObject);procedureButtonPrv3Click(Sender:TObject);procedureButtonSaveClick(Sender:TObject);procedureFormCreate(Sender:TObject);procedureButtonGenGameConfigClick(Sender:TObject);procedureButtonStartGameClick(Sender:TObject);procedureTimerStartGameTimer(Sender:TObject);procedureCheckBoxDBServerClick(Sender:TObject);procedureCheckBoxLoginServerClick(Sender:TObject);procedureCheckBoxM2ServerClick(Sender:TObject);procedureCheckBoxLogServerClick(Sender:TObject);procedureCheckBoxLoginGateClick(Sender:TObject);procedureCheckBoxSelGateClick(Sender:TObject);procedureCheckBoxRunGateClick(Sender:TObject);procedureCheckBoxRunGate1Click(Sender:TObject);procedureCheckBoxRunGate2Click(Sender:TObject);procedureTimerStopGameTimer(Sender:TObject);procedureTimerCheckRunTimer(Sender:TObject);procedureEditSkinChange(Sender:TObject);procedureButtonFormSaveClick(Sender:TObject);procedureButtonReLoadConfigClick(Sender:TObject);procedureEditLoginGate_MainFormXChange(Sender:TObject);procedureEditLoginGate_MainFormYChange(Sender:TObject);procedureEditSelGate_MainFormXChange(Sender:TObject);procedureEditSelGate_MainFormYChange(Sender:TObject);procedureEditLoginServer_MainFormXChange(Sender:TObject);procedureEditLoginServer_MainFormYChange(Sender:TObject);procedureEditDBServer_MainFormXChange(Sender:TObject);procedureEditDBServer_MainFormYChange(Sender:TObject);procedureEditLogServer_MainFormXChange(Sender:TObject);procedureEditLogServer_MainFormYChange(Sender:TObject);procedureEditM2Server_MainFormXChange(Sender:TObject);procedureEditM2Server_MainFormYChange(Sender:TObject);procedureMemoLogChange(Sender:TObject);procedureFormCloseQuery(Sender:TObject;varCanClose:Boolean);procedureButtonNext3Click(Sender:TObject);procedureButtonNext4Click(Sender:TObject);procedureButtonNext5Click(Sender:TObject);procedureButtonNext6Click(Sender:TObject);procedureButtonNext7Click(Sender:TObject);procedureButtonPrv4Click(Sender:TObject);procedureButtonPrv5Click(Sender:TObject);procedureButtonPrv6Click(Sender:TObject);procedureButtonPrv7Click(Sender:TObject);procedureButtonPrv8Click(Sender:TObject);procedureButtonNext8Click(Sender:TObject);procedureButtonPrv9Click(Sender:TObject);procedureEditRunGate_ConntChange(Sender:TObject);procedureButtonLoginServerConfigClick(Sender:TObject);procedureButtonAdvClick(Sender:TObject);procedureCheckBoxDynamicIPModeClick(Sender:TObject);procedureCheckBoxDisableAutoGameClick(Sender:TObject);procedureServerSocketClientConnect(Sender:TObject;Socket:TCustomWinSocket);procedureServerSocketClientDisconnect(Sender:TObject;Socket:TCustomWinSocket);procedureServerSocketClientError(Sender:TObject;Socket:TCustomWinSocket;ErrorEvent:TErrorEvent;varErrorCode:Integer);procedureServerSocketClientRead(Sender:TObject;Socket:TCustomWinSocket);procedureTimerTimer(Sender:TObject);procedureButton2Click(Sender:TObject);procedureEditNoticeUrlChange(Sender:TObject);procedureEditClient
已有2位网友发表了看法: