| 1 | {$INCLUDE switches}
|
|---|
| 2 |
|
|---|
| 3 | library cevo;
|
|---|
| 4 |
|
|---|
| 5 | uses
|
|---|
| 6 | Forms,
|
|---|
| 7 | StringTables in 'StringTables.pas',
|
|---|
| 8 | Directories in 'Directories.pas',
|
|---|
| 9 | Protocol in 'Protocol.pas',
|
|---|
| 10 | CmdList in 'CmdList.pas',
|
|---|
| 11 | Database in 'Database.pas',
|
|---|
| 12 | GameServer in 'GameServer.pas',
|
|---|
| 13 | CityProcessing in 'CityProcessing.pas',
|
|---|
| 14 | UnitProcessing in 'UnitProcessing.pas',
|
|---|
| 15 | Direct in 'Direct.pas' {DirectDlg},
|
|---|
| 16 | ScreenTools in 'ScreenTools.pas',
|
|---|
| 17 | Start in 'Start.pas' {StartDlg},
|
|---|
| 18 | Messg in 'Messg.pas' {MessgDlg},
|
|---|
| 19 | Inp in 'Inp.pas' {InputDlg},
|
|---|
| 20 | Back in 'Back.pas' {Background},
|
|---|
| 21 | Log in 'Log.pas' {LogDlg},
|
|---|
| 22 | PVSB in 'LocalPlayer\PVSB.pas',
|
|---|
| 23 | LocalPlayer in 'LocalPlayer\LocalPlayer.pas',
|
|---|
| 24 | ClientTools in 'LocalPlayer\ClientTools.pas',
|
|---|
| 25 | Diplomacy in 'LocalPlayer\Diplomacy.pas',
|
|---|
| 26 | Tribes in 'LocalPlayer\Tribes.pas',
|
|---|
| 27 | IsoEngine in 'LocalPlayer\IsoEngine.pas',
|
|---|
| 28 | Term in 'LocalPlayer\Term.pas' {MainScreen},
|
|---|
| 29 | MessgEx in 'LocalPlayer\MessgEx.pas' {MessgExDlg},
|
|---|
| 30 | BaseWin in 'LocalPlayer\BaseWin.pas',
|
|---|
| 31 | Help in 'LocalPlayer\Help.pas' {HelpDlg},
|
|---|
| 32 | Select in 'LocalPlayer\Select.pas' {ListDlg},
|
|---|
| 33 | CityScreen in 'LocalPlayer\CityScreen.pas' {CityDlg},
|
|---|
| 34 | UnitStat in 'LocalPlayer\UnitStat.pas' {UnitStatDlg},
|
|---|
| 35 | Draft in 'LocalPlayer\Draft.pas' {DraftDlg},
|
|---|
| 36 | NatStat in 'LocalPlayer\NatStat.pas' {NatStatDlg},
|
|---|
| 37 | Diagram in 'LocalPlayer\Diagram.pas' {DiaDlg},
|
|---|
| 38 | Wonders in 'LocalPlayer\Wonders.pas' {WonderDlg},
|
|---|
| 39 | Nego in 'LocalPlayer\Nego.pas' {NegoDlg},
|
|---|
| 40 | CityType in 'LocalPlayer\CityType.pas' {CityTypeDlg},
|
|---|
| 41 | Enhance in 'LocalPlayer\Enhance.pas' {EnhanceDlg},
|
|---|
| 42 | NoTerm in 'NoTerm.pas' {NoTermDlg},
|
|---|
| 43 | Sound in 'Sound.pas' {SoundPlayer},
|
|---|
| 44 | Battle in 'LocalPlayer\Battle.pas' {BattleDlg},
|
|---|
| 45 | Rates in 'LocalPlayer\Rates.pas' {RatesDlg},
|
|---|
| 46 | TechTree in 'LocalPlayer\TechTree.pas' {TechTreeDlg};
|
|---|
| 47 |
|
|---|
| 48 | {$R *.RES}
|
|---|
| 49 |
|
|---|
| 50 | procedure Run(clientPtr: pointer); stdcall;
|
|---|
| 51 | begin
|
|---|
| 52 | DotNetClient:=TClientCall(clientPtr);
|
|---|
| 53 | Application.Initialize;
|
|---|
| 54 | Application.Title := '';
|
|---|
| 55 | Application.CreateForm(TDirectDlg, DirectDlg);
|
|---|
| 56 | Application.CreateForm(TStartDlg, StartDlg);
|
|---|
| 57 | Application.CreateForm(TMessgDlg, MessgDlg);
|
|---|
| 58 | Application.CreateForm(TInputDlg, InputDlg);
|
|---|
| 59 | Application.CreateForm(TBackground, Background);
|
|---|
| 60 | Application.CreateForm(TLogDlg, LogDlg);
|
|---|
| 61 | Application.Run;
|
|---|
| 62 | end;
|
|---|
| 63 |
|
|---|
| 64 | exports
|
|---|
| 65 | Run name 'Run';
|
|---|
| 66 |
|
|---|
| 67 | end.
|
|---|
| 68 |
|
|---|
