/ComText.dfm |
---|
File deleted |
/Texte/Mitwirkende.txt |
---|
File deleted |
/ComText.pas |
---|
File deleted |
/Ausgabe |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/Bilder |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/CnvMain.dfm |
---|
93,7 → 93,6 |
Width = 161 |
Height = 21 |
Style = csDropDownList |
ItemHeight = 13 |
TabOrder = 4 |
Items.Strings = ( |
'Version 0.2 --> Version 0.3' |
/CnvMain.pas |
---|
4,7 → 4,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, |
StdCtrls, Gauges, ShellAPI, ExtCtrls, ComCtrls; |
StdCtrls, Gauges, ShellAPI, ExtCtrls, ComCtrls, System.UITypes; |
type |
TMainForm = class(TForm) |
38,8 → 38,6 |
{$R *.DFM} |
{$R WindowsXP.res} |
procedure TMainForm.RunClick(Sender: TObject); |
var |
i: integer; |
/ComInfo.dfm |
---|
4,8 → 4,8 |
BorderIcons = [biSystemMenu] |
BorderStyle = bsSingle |
Caption = 'Informationen' |
ClientHeight = 193 |
ClientWidth = 321 |
ClientHeight = 337 |
ClientWidth = 385 |
Color = clBtnFace |
Font.Charset = DEFAULT_CHARSET |
Font.Color = clWindowText |
74,9 → 74,9 |
object CopyrightLbl: TLabel |
Left = 8 |
Top = 80 |
Width = 137 |
Width = 264 |
Height = 13 |
Caption = '(C) 2001 - 2011 ViaThinkSoft' |
Caption = #169' Copyright 2001 - 2015 Daniel Marschall, ViaThinkSoft' |
Transparent = True |
end |
object Copyright2Lbl: TLabel |
101,15 → 101,15 |
Font.Style = [fsUnderline] |
ParentFont = False |
Transparent = True |
OnClick = URL2Click |
OnClick = WebsiteClick |
end |
object URL1: TLabel |
Left = 152 |
Top = 120 |
Width = 155 |
Width = 118 |
Height = 13 |
Cursor = crHandPoint |
Caption = 'daniel-marschall@viathinksoft.de' |
Caption = 'info@daniel-marschall.de' |
Font.Charset = DEFAULT_CHARSET |
Font.Color = clBlue |
Font.Height = -11 |
117,15 → 117,43 |
Font.Style = [fsUnderline] |
ParentFont = False |
Transparent = True |
OnClick = URL1Click |
OnClick = EMailClick |
end |
object OkBtn: TButton |
Left = 208 |
Top = 160 |
Left = 270 |
Top = 303 |
Width = 107 |
Height = 25 |
Cancel = True |
Caption = 'OK' |
Default = True |
TabOrder = 0 |
OnClick = OkBtnClick |
end |
object MemoMitwirkende: TMemo |
Left = 8 |
Top = 168 |
Width = 369 |
Height = 121 |
Lines.Strings = ( |
'SpaceMission wurde von Daniel Marschall aus einer Codevorlage vo' + |
'n ' |
'Hiroyuki Hori heraus erstellt. Das Original ist ein Codebeispiel' + |
' f'#252'r DelphiX ' |
'2000.' |
'' |
'Musik von Savage Peachers Software, Grafikquellen unbekannt.' |
'' |
'Levels von Daniel Marschall, Patrick B'#252'ssecker und Andreas ' |
'K'#252'belsbeck.' |
'' |
'Entwickelt mit Borland Turbo Delphi.' |
'' |
'Verwendete Komponenten: DelphiX 2000.') |
ReadOnly = True |
ScrollBars = ssVertical |
TabOrder = 1 |
end |
end |
/ComInfo.pas |
---|
19,10 → 19,11 |
Copyright2Lbl: TLabel; |
URL2: TLabel; |
URL1: TLabel; |
MemoMitwirkende: TMemo; |
procedure OkBtnClick(Sender: TObject); |
procedure FormCreate(Sender: TObject); |
procedure URL2Click(Sender: TObject); |
procedure URL1Click(Sender: TObject); |
procedure WebsiteClick(Sender: TObject); |
procedure EMailClick(Sender: TObject); |
end; |
var |
46,14 → 47,14 |
image.picture.loadfromfile(FDirectory + 'Bilder\Delphi.bmp'); |
end; |
procedure TInfoForm.URL2Click(Sender: TObject); |
procedure TInfoForm.WebsiteClick(Sender: TObject); |
begin |
shellexecute(application.Handle, 'open', pchar('http://'+url2.caption+'/'), nil, nil, SW_SHOW); |
ShellExecute(application.Handle, 'open', pchar('http://'+url2.caption+'/'), nil, nil, SW_SHOW); |
end; |
procedure TInfoForm.URL1Click(Sender: TObject); |
procedure TInfoForm.EMailClick(Sender: TObject); |
begin |
shellexecute(application.Handle, 'open', pchar('mailto:'+url1.Caption+'?subject=SpaceMission ' + ProgramVersion), nil, nil, SW_SHOW); |
ShellExecute(application.Handle, 'open', pchar('mailto:'+url1.Caption+'?subject=SpaceMission ' + ProgramVersion), nil, nil, SW_SHOW); |
end; |
end. |
/Converter.dpr |
---|
5,7 → 5,8 |
Windows, |
Forms, |
Dialogs, |
CnvMain in 'CnvMain.pas' {MainForm}; |
CnvMain in 'CnvMain.pas' {MainForm}, |
System.UITypes; |
{$Description 'SpaceMission 1.1 Converter'} |
/Converter.dproj |
---|
0,0 → 1,140 |
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> |
<PropertyGroup> |
<ProjectGuid>{99DF80C5-B3F5-4637-8685-0C3B4D0CA5B6}</ProjectGuid> |
<MainSource>Converter.dpr</MainSource> |
<Base>True</Base> |
<Config Condition="'$(Config)'==''">Debug</Config> |
<TargetedPlatforms>1</TargetedPlatforms> |
<AppType>Application</AppType> |
<FrameworkType>VCL</FrameworkType> |
<ProjectVersion>14.6</ProjectVersion> |
<Platform Condition="'$(Platform)'==''">Win32</Platform> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''"> |
<Base_Win32>true</Base_Win32> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''"> |
<Base_Win64>true</Base_Win64> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> |
<Cfg_1>true</Cfg_1> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> |
<Cfg_2>true</Cfg_2> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base)'!=''"> |
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo> |
<DCC_N>true</DCC_N> |
<VerInfo_MinorVer>1</VerInfo_MinorVer> |
<VerInfo_Locale>1031</VerInfo_Locale> |
<DCC_WriteableConstants>true</DCC_WriteableConstants> |
<DCC_ImageBase>00400000</DCC_ImageBase> |
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace> |
<DCC_F>false</DCC_F> |
<VerInfo_Keys>CompanyName=ViaThinkSoft;FileDescription=Umwandlungssoftware...;FileVersion=1.1.0.0;InternalName=SpaceMission Compiler;LegalCopyright=© Copyright 2001 - 2007 ViaThinkSoft;LegalTrademarks=Keine;OriginalFilename=Compiler.exe;ProductName=SpaceMission 1.1;ProductVersion=1.1.0.0;Homepage=www.viathinksoft.de;Projektleiter=Daniel Marschall - www.daniel-marschall.de</VerInfo_Keys> |
<DCC_UsePackage>Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;ibevnt50;Vclbde50;vcldbx50;Qrpt50;TeeUI50;TeeDB50;Tee50;Dss50;TeeQR50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;NMFast50;webmid50;dclocx50;dclaxserver50;DelphiX_for5;pielib;$(DCC_UsePackage)</DCC_UsePackage> |
<DCC_Description>Levelcompiler 1.1</DCC_Description> |
<DCC_E>false</DCC_E> |
<DCC_K>false</DCC_K> |
<DCC_S>false</DCC_S> |
<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base_Win32)'!=''"> |
<VerInfo_Locale>1033</VerInfo_Locale> |
<DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace> |
<Icon_MainIcon>Converter_Icon.ico</Icon_MainIcon> |
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys> |
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File> |
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base_Win64)'!=''"> |
<Icon_MainIcon>Converter_Icon.ico</Icon_MainIcon> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Cfg_1)'!=''"> |
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> |
<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> |
<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> |
<DCC_DebugInformation>false</DCC_DebugInformation> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Cfg_2)'!=''"> |
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> |
<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> |
<DCC_Optimize>false</DCC_Optimize> |
</PropertyGroup> |
<ItemGroup> |
<DelphiCompile Include="$(MainSource)"> |
<MainSource>MainSource</MainSource> |
</DelphiCompile> |
<DCCReference Include="CnvMain.pas"> |
<Form>MainForm</Form> |
</DCCReference> |
<BuildConfiguration Include="Debug"> |
<Key>Cfg_2</Key> |
<CfgParent>Base</CfgParent> |
</BuildConfiguration> |
<BuildConfiguration Include="Base"> |
<Key>Base</Key> |
</BuildConfiguration> |
<BuildConfiguration Include="Release"> |
<Key>Cfg_1</Key> |
<CfgParent>Base</CfgParent> |
</BuildConfiguration> |
</ItemGroup> |
<ProjectExtensions> |
<Borland.Personality>Delphi.Personality.12</Borland.Personality> |
<Borland.ProjectType>VCLApplication</Borland.ProjectType> |
<BorlandProject> |
<Delphi.Personality> |
<Source> |
<Source Name="MainSource">Converter.dpr</Source> |
</Source> |
<VersionInfo> |
<VersionInfo Name="IncludeVerInfo">True</VersionInfo> |
<VersionInfo Name="AutoIncBuild">False</VersionInfo> |
<VersionInfo Name="MajorVer">1</VersionInfo> |
<VersionInfo Name="MinorVer">1</VersionInfo> |
<VersionInfo Name="Release">0</VersionInfo> |
<VersionInfo Name="Build">0</VersionInfo> |
<VersionInfo Name="Debug">False</VersionInfo> |
<VersionInfo Name="PreRelease">False</VersionInfo> |
<VersionInfo Name="Special">False</VersionInfo> |
<VersionInfo Name="Private">False</VersionInfo> |
<VersionInfo Name="DLL">False</VersionInfo> |
<VersionInfo Name="Locale">1031</VersionInfo> |
<VersionInfo Name="CodePage">1252</VersionInfo> |
</VersionInfo> |
<VersionInfoKeys> |
<VersionInfoKeys Name="CompanyName">ViaThinkSoft</VersionInfoKeys> |
<VersionInfoKeys Name="FileDescription">Umwandlungssoftware...</VersionInfoKeys> |
<VersionInfoKeys Name="FileVersion">1.1.0.0</VersionInfoKeys> |
<VersionInfoKeys Name="InternalName">SpaceMission Compiler</VersionInfoKeys> |
<VersionInfoKeys Name="LegalCopyright">© Copyright 2001 - 2007 ViaThinkSoft</VersionInfoKeys> |
<VersionInfoKeys Name="LegalTrademarks">Keine</VersionInfoKeys> |
<VersionInfoKeys Name="OriginalFilename">Compiler.exe</VersionInfoKeys> |
<VersionInfoKeys Name="ProductName">SpaceMission 1.1</VersionInfoKeys> |
<VersionInfoKeys Name="ProductVersion">1.1.0.0</VersionInfoKeys> |
<VersionInfoKeys Name="Homepage">www.viathinksoft.de</VersionInfoKeys> |
<VersionInfoKeys Name="Projektleiter">Daniel Marschall - www.daniel-marschall.de</VersionInfoKeys> |
</VersionInfoKeys> |
</Delphi.Personality> |
<Platforms> |
<Platform value="Win32">True</Platform> |
<Platform value="Win64">False</Platform> |
</Platforms> |
</BorlandProject> |
<ProjectFileVersion>12</ProjectFileVersion> |
</ProjectExtensions> |
<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/> |
<Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/> |
</Project> |
/Converter.res |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
/Converter_Icon.ico |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Added: svn:mime-type |
+application/octet-stream |
\ No newline at end of property |
/DirectX |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/Eingabe |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/Einstellungen/SpaceMission.ini |
---|
3,4 → 3,4 |
Sound=0 |
FullScreen=0 |
ScreenAutoSize=1 |
Speed=4 |
Speed=2 |
/Einstellungen |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/GamCheat.pas |
---|
4,7 → 4,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, |
StdCtrls, ExtCtrls, ShellAPI; |
StdCtrls, ExtCtrls, ShellAPI, System.UITypes; |
type |
TCheatForm = class(TForm) |
/GamMain.dfm |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
/GamMain.pas |
---|
5,7 → 5,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, MMSystem, Dialogs, |
StdCtrls, ExtCtrls, Menus, DIB, DXClass, DXSprite, DXDraws, DXInput, |
DXSounds, INIFiles, ShellAPI, wininet; |
DXSounds, INIFiles, ShellAPI, wininet, Winapi.DirectDraw, System.UITypes; |
type |
TGameScene = ( |
213,7 → 213,6 |
Leer4: TMenuItem; |
Hilfe: TMenuItem; |
OptionSound: TMenuItem; |
Mitarbeiter: TMenuItem; |
Leer3: TMenuItem; |
Spielstand: TMenuItem; |
Leer5: TMenuItem; |
243,7 → 242,6 |
procedure OptionSoundClick(Sender: TObject); |
procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); |
procedure OptionMusicClick(Sender: TObject); |
procedure MitarbeiterClick(Sender: TObject); |
procedure SpielstandClick(Sender: TObject); |
procedure NeustartClick(Sender: TObject); |
procedure OptionBreitbildClick(Sender: TObject); |
333,6 → 331,7 |
MainForm: TMainForm; |
const |
// TODO: ini file |
conleicht = 650 div 60; // 10 |
conmittel = 1000 div 60; // 16 |
conschwer = 1350 div 60; // 22 |
342,7 → 341,7 |
implementation |
uses |
GamSplash, GamSpeicherung, ComInfo, ComText, GamCheat, Global; |
GamSplash, GamSpeicherung, ComInfo, GamCheat, Global; |
resourcestring |
FileError = 'Die Datei kann von SpaceMission nicht geöffnet werden!'; |
349,8 → 348,6 |
{$R *.DFM} |
{$R WindowsXP.res} |
var // TODO: irgendwo hinpacken. irgendwo!!! |
EnemyAdventTable: array[0..9999] of TEnemyAdvent; // TODO: dyn |
Crash2, ec: integer; |
373,6 → 370,8 |
PLAYER_MODE_FLYAWAY = 3; |
PLAYER_MODE_ENTER = 4; |
DEFAULT_ANIMSPEED = 15/1000; |
// TODO: Code komplett überarbeiten. Bessere Ableitungen machen |
constructor TPlayerSprite.Create(AParent: TSprite); |
386,7 → 385,7 |
Z := 2; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
FMode := PLAYER_MODE_ENTER; |
end; |
411,7 → 410,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := False; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := 0; |
end; |
end |
523,7 → 522,7 |
dxdraw.autosize := false; |
dxdraw.Top := 0; |
dxdraw.Left := 0; |
dxdraw.width := 640; |
dxdraw.width := 640; // TODO: besser die dimensionen des fensters |
dxdraw.height := 480; |
dxdraw.surfacewidth := 640; |
dxdraw.surfaceheight := 480; |
545,7 → 544,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
MainForm.PlaySound('Shoot', False); |
end; |
667,7 → 666,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := Random(AnimCount); |
end; |
686,7 → 685,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
MainForm.PlaySound('Shoot', False); |
end; |
722,7 → 721,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
FLife := EnemyAdventTable[mainform.FEnemyAdventPos].lifes; |
end; |
752,7 → 751,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := False; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := 0; |
end else |
begin |
802,7 → 801,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := False; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := 0; |
end else |
begin |
819,7 → 818,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
FLife := EnemyAdventTable[mainform.FEnemyAdventPos].lifes; |
end; |
847,7 → 846,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
PixelCheck := True; |
FLife := EnemyAdventTable[mainform.FEnemyAdventPos].lifes; |
end; |
865,7 → 864,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := False; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := 0; |
end else |
begin |
899,7 → 898,7 |
MainForm.PlayMusic(mtBoss); |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
PixelCheck := True; |
Collisioned := False; |
FLife := EnemyAdventTable[mainform.FEnemyAdventPos].lifes; |
1006,7 → 1005,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
PixelCheck := True; |
FLife := EnemyAdventTable[mainform.FEnemyAdventPos].lifes; |
end; |
1024,7 → 1023,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := False; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := 0; |
end else |
begin |
1096,7 → 1095,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := False; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
AnimPos := 0; |
end else |
begin |
1139,7 → 1138,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
PixelCheck := True; |
FLife := EnemyAdventTable[mainform.FEnemyAdventPos].lifes; |
end; |
1180,7 → 1179,7 |
dxdraw.Display.FixedSize := False; |
dxdraw.Display.Height := 600; |
dxdraw.Display.Width := 800; |
dxdraw.Options := [doAllowReboot, doWaitVBlank, doAllowPalette256, doCenter, doRetainedMode, doHardware, doSelectDriver]; |
dxdraw.Options := [doAllowReboot, doWaitVBlank, doAllowPalette256, doCenter, {doRetainedMode,} doHardware, doSelectDriver]; |
dxdraw.TabOrder := 0; |
dxdraw.Visible := true; |
dxdraw.OnFinalize := DXDrawFinalize; |
2343,25 → 2342,6 |
writeoptions; |
end; |
procedure TMainForm.MitarbeiterClick(Sender: TObject); |
resourcestring |
LNG_NOTFOUND = 'Die Datei "Texte\Mitwirkende.txt" ist nicht mehr vorhanden. Die Aktion wird abgebrochen!'; |
const |
MitwirkendeTxt = 'Texte\Mitwirkende.txt'; |
begin |
if not fileexists(fdirectory+MitwirkendeTxt) then |
begin |
MessageDLG(Format(LNG_NOTFOUND, [MitwirkendeTxt]), mtWarning, [mbOK], 0); |
Exit; |
end; |
TextForm.memo1.lines.loadfromfile(FDirectory+MitwirkendeTxt); |
dxtimer.enabled := false; |
TextForm.ShowModal; |
if not mainform.gamepause.checked then mainform.dxtimer.enabled := true; |
end; |
procedure TEnemyMeteor.DoMove(MoveCount: Integer); |
begin |
X := X - MoveCount*(250/1000); |
2404,7 → 2384,7 |
Height := Image.Height; |
AnimCount := Image.PatternCount; |
AnimLooped := True; |
AnimSpeed := 15/1000; |
AnimSpeed := DEFAULT_ANIMSPEED; |
PixelCheck := True; |
end; |
/GamMain.vlb |
---|
0,0 → 1,0 |
|
/GamSpeicherung.pas |
---|
4,7 → 4,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, |
StdCtrls, ExtCtrls, Spin; |
StdCtrls, ExtCtrls, Spin, System.UITypes; |
type |
TSpeicherungForm = class(TForm) |
/LevEdit.dpr |
---|
2,8 → 2,8 |
{$Description 'SpaceMission Leveleditor 1.1'} |
{%ToDo 'LevEdit.todo'} |
uses |
Windows, |
Forms, |
11,13 → 11,13 |
SysUtils, |
MMSystem, |
LevMain in 'LevMain.pas' {MainForm}, |
ComText in 'ComText.pas' {TextForm}, |
LevSplash in 'LevSplash.pas' {SplashForm}, |
LevSpeicherung in 'LevSpeicherung.pas' {SpeicherungForm}, |
ComInfo in 'ComInfo.pas' {InfoForm}, |
LevSource in 'LevSource.pas' {SourceForm}, |
LevOptions in 'LevOptions.pas' {LevelForm}, |
Global in 'Global.pas'; |
Global in 'Global.pas', |
System.UITypes; |
{$R *.RES} |
55,7 → 55,6 |
exit; |
end; |
Application.CreateForm(TMainForm, MainForm); |
Application.CreateForm(TTextForm, TextForm); |
Application.CreateForm(TSpeicherungForm, SpeicherungForm); |
Application.CreateForm(TInfoForm, InfoForm); |
Application.CreateForm(TSourceForm, SourceForm); |
/LevEdit.dproj |
---|
0,0 → 1,159 |
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> |
<PropertyGroup> |
<ProjectGuid>{599685DA-212E-4FDE-99E7-BC84B6909E31}</ProjectGuid> |
<MainSource>LevEdit.dpr</MainSource> |
<Base>True</Base> |
<Config Condition="'$(Config)'==''">Debug</Config> |
<TargetedPlatforms>1</TargetedPlatforms> |
<AppType>Application</AppType> |
<FrameworkType>VCL</FrameworkType> |
<ProjectVersion>14.6</ProjectVersion> |
<Platform Condition="'$(Platform)'==''">Win32</Platform> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''"> |
<Base_Win32>true</Base_Win32> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''"> |
<Base_Win64>true</Base_Win64> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> |
<Cfg_1>true</Cfg_1> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> |
<Cfg_2>true</Cfg_2> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base)'!=''"> |
<DCC_UnitSearchPath>VCL_DELPHIX_D6;VCL_PJVERSIONINFO;$(DCC_UnitSearchPath)</DCC_UnitSearchPath> |
<VerInfo_Locale>1031</VerInfo_Locale> |
<DCC_N>true</DCC_N> |
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo> |
<DCC_HIDDEN_VIRTUAL>false</DCC_HIDDEN_VIRTUAL> |
<DCC_WriteableConstants>true</DCC_WriteableConstants> |
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace> |
<DCC_ImageBase>00400000</DCC_ImageBase> |
<VerInfo_MinorVer>1</VerInfo_MinorVer> |
<VerInfo_Keys>CompanyName=ViaThinkSoft;FileDescription=Der Leveleditor zu SpaceMission...;FileVersion=1.1.0.0;InternalName=SpaceMisson 1.1 - Leveleditor;LegalCopyright=© Copyright 2001 - 2007 ViaThinkSoft;LegalTrademarks=Keine;OriginalFilename=LevEdit.exe;ProductName=SpaceMission 1.1;ProductVersion=1.1.0.0;Webseite=www.viathinksoft.de;Projektleiter=Daniel Marschall - www.daniel-marschall.de</VerInfo_Keys> |
<DCC_E>false</DCC_E> |
<DCC_Description>SpaceMission 1.1 - Leveleditor</DCC_Description> |
<DCC_UsePackage>Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;ibevnt50;Vclbde50;vcldbx50;Qrpt50;TeeUI50;TeeDB50;Tee50;Dss50;TeeQR50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;NMFast50;webmid50;dclocx50;dclaxserver50;DelphiX_for5;pielib;$(DCC_UsePackage)</DCC_UsePackage> |
<DCC_K>false</DCC_K> |
<DCC_F>false</DCC_F> |
<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo> |
<DCC_S>false</DCC_S> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base_Win32)'!=''"> |
<VerInfo_Locale>1033</VerInfo_Locale> |
<DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace> |
<Icon_MainIcon>LevEdit_Icon.ico</Icon_MainIcon> |
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys> |
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File> |
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base_Win64)'!=''"> |
<Icon_MainIcon>LevEdit_Icon.ico</Icon_MainIcon> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Cfg_1)'!=''"> |
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> |
<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> |
<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> |
<DCC_DebugInformation>false</DCC_DebugInformation> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Cfg_2)'!=''"> |
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> |
<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> |
<DCC_Optimize>false</DCC_Optimize> |
</PropertyGroup> |
<ItemGroup> |
<DelphiCompile Include="$(MainSource)"> |
<MainSource>MainSource</MainSource> |
</DelphiCompile> |
<DCCReference Include="LevMain.pas"> |
<Form>MainForm</Form> |
</DCCReference> |
<DCCReference Include="LevSplash.pas"> |
<Form>SplashForm</Form> |
</DCCReference> |
<DCCReference Include="LevSpeicherung.pas"> |
<Form>SpeicherungForm</Form> |
</DCCReference> |
<DCCReference Include="ComInfo.pas"> |
<Form>InfoForm</Form> |
</DCCReference> |
<DCCReference Include="LevSource.pas"> |
<Form>SourceForm</Form> |
</DCCReference> |
<DCCReference Include="LevOptions.pas"> |
<Form>LevelForm</Form> |
</DCCReference> |
<DCCReference Include="Global.pas"/> |
<None Include="LevEdit.todo"/> |
<BuildConfiguration Include="Debug"> |
<Key>Cfg_2</Key> |
<CfgParent>Base</CfgParent> |
</BuildConfiguration> |
<BuildConfiguration Include="Base"> |
<Key>Base</Key> |
</BuildConfiguration> |
<BuildConfiguration Include="Release"> |
<Key>Cfg_1</Key> |
<CfgParent>Base</CfgParent> |
</BuildConfiguration> |
</ItemGroup> |
<ProjectExtensions> |
<Borland.Personality>Delphi.Personality.12</Borland.Personality> |
<Borland.ProjectType>VCLApplication</Borland.ProjectType> |
<BorlandProject> |
<Delphi.Personality> |
<Source> |
<Source Name="MainSource">LevEdit.dpr</Source> |
</Source> |
<VersionInfo> |
<VersionInfo Name="IncludeVerInfo">True</VersionInfo> |
<VersionInfo Name="AutoIncBuild">False</VersionInfo> |
<VersionInfo Name="MajorVer">1</VersionInfo> |
<VersionInfo Name="MinorVer">1</VersionInfo> |
<VersionInfo Name="Release">0</VersionInfo> |
<VersionInfo Name="Build">0</VersionInfo> |
<VersionInfo Name="Debug">False</VersionInfo> |
<VersionInfo Name="PreRelease">False</VersionInfo> |
<VersionInfo Name="Special">False</VersionInfo> |
<VersionInfo Name="Private">False</VersionInfo> |
<VersionInfo Name="DLL">False</VersionInfo> |
<VersionInfo Name="Locale">1031</VersionInfo> |
<VersionInfo Name="CodePage">1252</VersionInfo> |
</VersionInfo> |
<VersionInfoKeys> |
<VersionInfoKeys Name="CompanyName">ViaThinkSoft</VersionInfoKeys> |
<VersionInfoKeys Name="FileDescription">Der Leveleditor zu SpaceMission...</VersionInfoKeys> |
<VersionInfoKeys Name="FileVersion">1.1.0.0</VersionInfoKeys> |
<VersionInfoKeys Name="InternalName">SpaceMisson 1.1 - Leveleditor</VersionInfoKeys> |
<VersionInfoKeys Name="LegalCopyright">© Copyright 2001 - 2007 ViaThinkSoft</VersionInfoKeys> |
<VersionInfoKeys Name="LegalTrademarks">Keine</VersionInfoKeys> |
<VersionInfoKeys Name="OriginalFilename">LevEdit.exe</VersionInfoKeys> |
<VersionInfoKeys Name="ProductName">SpaceMission 1.1</VersionInfoKeys> |
<VersionInfoKeys Name="ProductVersion">1.1.0.0</VersionInfoKeys> |
<VersionInfoKeys Name="Webseite">www.viathinksoft.de</VersionInfoKeys> |
<VersionInfoKeys Name="Projektleiter">Daniel Marschall - www.daniel-marschall.de</VersionInfoKeys> |
</VersionInfoKeys> |
</Delphi.Personality> |
<Platforms> |
<Platform value="Win32">True</Platform> |
<Platform value="Win64">False</Platform> |
</Platforms> |
</BorlandProject> |
<ProjectFileVersion>12</ProjectFileVersion> |
</ProjectExtensions> |
<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/> |
<Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/> |
</Project> |
/LevEdit.res |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
/LevEdit_Icon.ico |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Added: svn:mime-type |
+application/octet-stream |
\ No newline at end of property |
/LevMain.dfm |
---|
167,9 → 167,9 |
object Enemy1: TRadioButton |
Left = 652 |
Top = 24 |
Width = 73 |
Width = 93 |
Height = 17 |
Caption = 'Attackierer' |
Caption = 'Angreifer Typ 1' |
Checked = True |
TabOrder = 0 |
TabStop = True |
179,9 → 179,9 |
object Enemy2: TRadioButton |
Left = 652 |
Top = 48 |
Width = 82 |
Width = 93 |
Height = 17 |
Caption = 'Attackierer 2' |
Caption = 'Angreifer Typ 2' |
TabOrder = 1 |
OnClick = EnemyClick |
OnMouseMove = DXDrawMouseMove |
189,9 → 189,9 |
object Enemy3: TRadioButton |
Left = 652 |
Top = 72 |
Width = 82 |
Width = 93 |
Height = 17 |
Caption = 'Attackierer 3' |
Caption = 'Angreifer Typ 3' |
TabOrder = 2 |
OnClick = EnemyClick |
OnMouseMove = DXDrawMouseMove |
298,8 → 298,8 |
OnMouseMove = DXDrawMouseMove |
end |
object MainMenu: TMainMenu |
Left = 8 |
Top = 8 |
Left = 32 |
Top = 16 |
object Spiel: TMenuItem |
Caption = '&Datei' |
object Level: TMenuItem |
336,19 → 336,9 |
end |
object Hilfe: TMenuItem |
Caption = '&Hilfe' |
object Mitarbeiter: TMenuItem |
Caption = '&Mitwirkende...' |
ShortCut = 120 |
OnClick = MitarbeiterClick |
end |
object Leer2: TMenuItem |
Caption = '-' |
GroupIndex = 1 |
end |
object Informationen: TMenuItem |
Caption = '&Informationen...' |
GroupIndex = 1 |
ShortCut = 121 |
OnClick = InformationenClick |
end |
end |
/LevMain.pas |
---|
5,7 → 5,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, MMSystem, |
Dialogs, StdCtrls, ExtCtrls, Menus, DIB, DXClass, DXSprite, DXDraws, |
DXSounds, Spin, ComCtrls; |
DXSounds, Spin, ComCtrls, System.UITypes, WinAPI.DirectDraw; |
type |
TMainForm = class(TDXForm) |
13,11 → 13,9 |
Spiel: TMenuItem; |
Beenden: TMenuItem; |
Hilfe: TMenuItem; |
Mitarbeiter: TMenuItem; |
Leer1: TMenuItem; |
Level: TMenuItem; |
Informationen: TMenuItem; |
Leer2: TMenuItem; |
Enemy1: TRadioButton; |
Enemy2: TRadioButton; |
Enemy3: TRadioButton; |
55,7 → 53,6 |
procedure DXTimerTimer(Sender: TObject; LagCount: Integer); |
procedure BeendenClick(Sender: TObject); |
procedure FormDestroy(Sender: TObject); |
procedure MitarbeiterClick(Sender: TObject); |
procedure LevelClick(Sender: TObject); |
procedure FormShow(Sender: TObject); |
procedure InformationenClick(Sender: TObject); |
111,7 → 108,7 |
implementation |
uses |
Global, LevSplash, LevSpeicherung, ComText, ComInfo, LevSource, LevOptions; |
Global, LevSplash, LevSpeicherung, ComInfo, LevSource, LevOptions; |
const |
FileError = 'Die Datei kann von SpaceMission nicht geöffnet werden!'; |
123,8 → 120,6 |
{$R *.DFM} |
{$R WindowsXP.res} |
type |
TBackground = class(TBackgroundSprite) |
protected |
215,7 → 210,7 |
dxdraw.Display.FixedSize := False; |
dxdraw.Display.Height := 600; |
dxdraw.Display.Width := 800; |
dxdraw.Options := [doAllowReboot, doWaitVBlank, doAllowPalette256, doCenter, doRetainedMode, doHardware, doSelectDriver]; |
dxdraw.Options := [doAllowReboot, doWaitVBlank, doAllowPalette256, doCenter, {doRetainedMode,} doHardware, doSelectDriver]; |
dxdraw.OnFinalize := DXDrawFinalize; |
dxdraw.OnInitialize := DXDrawInitialize; |
dxdraw.ParentShowHint := False; |
442,21 → 437,6 |
mainform.Visible := true; |
end; |
procedure TMainForm.MitarbeiterClick(Sender: TObject); |
begin |
if not fileexists(fdirectory+'Texte\Mitwirkende.txt') then |
begin |
MessageDLG('Die Datei "Texte\Mitwirkende.txt" ist nicht mehr vorhanden. Die Aktion wird abgebrochen!', |
mtWarning, [mbOK], 0); |
exit; |
end; |
TextForm.memo1.lines.loadfromfile(FDirectory+'Texte\Mitwirkende.txt'); |
mainform.dxtimer.enabled := false; |
TextForm.showmodal; |
mainform.dxtimer.enabled := true; |
end; |
procedure TMainForm.LevelClick(Sender: TObject); |
begin |
speicherungform.showmodal; |
/LevMain.vlb |
---|
0,0 → 1,0 |
|
/LevSource.dfm |
---|
21,9 → 21,9 |
object ElLabel1: TLabel |
Left = 8 |
Top = 8 |
Width = 82 |
Width = 85 |
Height = 13 |
Caption = 'Tempo'#228'rer Code:' |
Caption = 'Tempor'#228'rer Code:' |
Font.Charset = DEFAULT_CHARSET |
Font.Color = clWindowText |
Font.Height = -11 |
/LevSource.pas |
---|
4,7 → 4,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, |
StdCtrls, ShellAPI; |
StdCtrls, ShellAPI, System.UITypes; |
type |
TSourceForm = class(TForm) |
/LevSpeicherung.pas |
---|
4,7 → 4,7 |
uses |
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, |
StdCtrls, ExtCtrls, Spin, ComCtrls; |
StdCtrls, ExtCtrls, Spin, ComCtrls, System.UITypes; |
type |
TSpeicherungForm = class(TForm) |
/Levels |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/Musik |
---|
Property changes: |
Added: svn:ignore |
+*.local |
+*.dcu |
+*.~* |
+*.identcache |
+*.tvsconfig |
+__history |
+*.exe |
/SpaceMission.dpr |
---|
9,19 → 9,17 |
SysUtils, |
MMSystem, |
GamMain in 'GamMain.pas' {MainForm}, |
ComText in 'ComText.pas' {TextForm}, |
GamSplash in 'GamSplash.pas' {SplashForm}, |
GamSpeicherung in 'GamSpeicherung.pas' {SpeicherungForm}, |
ComInfo in 'ComInfo.pas' {InfoForm}, |
GamCheat in 'GamCheat.pas' {CheatForm}, |
Global in 'Global.pas'; |
Global in 'Global.pas', |
System.UITypes; |
{$R *.RES} |
var |
Fehler: boolean; |
Sem: THandle; |
directory: string; |
begin |
{ Programm schon gestartet? } |
38,33 → 36,14 |
Application.Initialize; |
Application.showmainform := False; |
Application.Title := 'SpaceMission'; |
{ Dateien vorhanden? } |
Fehler := false; |
directory := extractfilepath(paramstr(0)); |
if not fileexists(directory+'Bilder\Delphi.bmp') then Fehler := true; |
if not fileexists(directory+'Bilder\SplSplash.jpg') then Fehler := true; |
if not fileexists(directory+'DirectX\Graphic.dxg') then Fehler := true; |
if not fileexists(directory+'DirectX\Sound.dxw') then Fehler := true; |
if not fileexists(directory+'Musik\Boss.mid') then Fehler := true; |
if not fileexists(directory+'Musik\Game.mid') then Fehler := true; |
if not fileexists(directory+'Musik\Scene.mid') then Fehler := true; |
if not fileexists(directory+'Musik\Title.mid') then Fehler := true; |
//if not fileexists(directory+'Texte\Mitwirkende.txt') then Fehler := true; |
if Fehler then |
if WaveOutGetNumDevs < 1 then |
begin |
MessageDLG('Dateien, die die Programmstabilität gewährleisten, sind ' + |
'nicht mehr vorhanden!'+#13#10+'Bitte installieren Sie SpaceMission erneut...', |
mtWarning, [mbOK], 0); |
exit; |
end; |
{ Keine Soundkarte?! } |
if WaveOutGetNumDevs < 1 then |
MessageDlg('Es wurde keine Soundkarte gefunden!' + #13#10 + |
'Entweder ist keine Soundkarte angeschlossen oder sie ist nicht ' + |
'ordnungsgemäß installiert.' + #13#10 + 'Es können daher keine Musik und ' + |
'keine Geräusche abgespielt werden.', mtError, [mbOK], 0); |
end; |
Application.CreateForm(TMainForm, MainForm); |
Application.CreateForm(TTextForm, TextForm); |
Application.CreateForm(TSpeicherungForm, SpeicherungForm); |
Application.CreateForm(TInfoForm, InfoForm); |
Application.CreateForm(TCheatForm, CheatForm); |
/SpaceMission.dproj |
---|
0,0 → 1,165 |
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> |
<PropertyGroup> |
<ProjectGuid>{3BF3030C-7166-4C6E-8DCC-7CFAE9EEFEBF}</ProjectGuid> |
<MainSource>SpaceMission.dpr</MainSource> |
<Base>True</Base> |
<Config Condition="'$(Config)'==''">Debug</Config> |
<TargetedPlatforms>1</TargetedPlatforms> |
<AppType>Application</AppType> |
<FrameworkType>VCL</FrameworkType> |
<ProjectVersion>14.6</ProjectVersion> |
<Platform Condition="'$(Platform)'==''">Win32</Platform> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''"> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="('$(Platform)'=='Win32' and '$(Base)'=='true') or '$(Base_Win32)'!=''"> |
<Base_Win32>true</Base_Win32> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Base)'=='true') or '$(Base_Win64)'!=''"> |
<Base_Win64>true</Base_Win64> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_1)'!=''"> |
<Cfg_1>true</Cfg_1> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_2)'!=''"> |
<Cfg_2>true</Cfg_2> |
<CfgParent>Base</CfgParent> |
<Base>true</Base> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base)'!=''"> |
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo> |
<DCC_UnitSearchPath>VCL_DELPHIX_D6;$(DCC_UnitSearchPath)</DCC_UnitSearchPath> |
<VerInfo_MinorVer>1</VerInfo_MinorVer> |
<DCC_N>true</DCC_N> |
<VerInfo_Locale>1031</VerInfo_Locale> |
<DCC_HIDDEN_VIRTUAL>false</DCC_HIDDEN_VIRTUAL> |
<DCC_WriteableConstants>true</DCC_WriteableConstants> |
<DCC_Namespace>Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace)</DCC_Namespace> |
<DCC_ImageBase>00400000</DCC_ImageBase> |
<VerInfo_Release>4</VerInfo_Release> |
<VerInfo_Keys>CompanyName=ViaThinkSoft;FileDescription=Ein spannendes Weltraumspiel...;FileVersion=1.1.4.0;InternalName=SpaceMission 1.1;LegalCopyright=© Copyright 2001 - 2011 ViaThinkSoft;LegalTrademarks=Keine;OriginalFilename=SpaceMission.exe;ProductName=SpaceMission 1.1;ProductVersion=1.1.0.0;Homepage=www.viathinksoft.de;Projektleiter=Daniel Marschall - www.daniel-marschall.de;Webseite=www.viathinksoft.de</VerInfo_Keys> |
<DCC_Description>SpaceMission 1.1</DCC_Description> |
<DCC_UsePackage>VCL50;VCLX50;VCLSMP50;VCLDB50;VCLADO50;ibevnt50;VCLBDE50;VCLDBX50;QRPT50;TEEUI50;TEEDB50;TEE50;DSS50;TEEQR50;VCLIB50;VCLMID50;VCLIE50;INETDB50;INET50;NMFAST50;WEBMID50;dclocx50;dclaxserver50;packapi;$(DCC_UsePackage)</DCC_UsePackage> |
<DCC_E>false</DCC_E> |
<DCC_K>false</DCC_K> |
<DCC_F>false</DCC_F> |
<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo> |
<DCC_S>false</DCC_S> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base_Win32)'!=''"> |
<VerInfo_Locale>1033</VerInfo_Locale> |
<DCC_Namespace>System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace> |
<Icon_MainIcon>SpaceMission_Icon.ico</Icon_MainIcon> |
<VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys> |
<Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File> |
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Base_Win64)'!=''"> |
<Icon_MainIcon>SpaceMission_Icon.ico</Icon_MainIcon> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Cfg_1)'!=''"> |
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> |
<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define> |
<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols> |
<DCC_DebugInformation>false</DCC_DebugInformation> |
</PropertyGroup> |
<PropertyGroup Condition="'$(Cfg_2)'!=''"> |
<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames> |
<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define> |
<DCC_Optimize>false</DCC_Optimize> |
</PropertyGroup> |
<ItemGroup> |
<DelphiCompile Include="$(MainSource)"> |
<MainSource>MainSource</MainSource> |
</DelphiCompile> |
<DCCReference Include="GamMain.pas"> |
<Form>MainForm</Form> |
</DCCReference> |
<DCCReference Include="GamSplash.pas"> |
<Form>SplashForm</Form> |
</DCCReference> |
<DCCReference Include="GamSpeicherung.pas"> |
<Form>SpeicherungForm</Form> |
</DCCReference> |
<DCCReference Include="ComInfo.pas"> |
<Form>InfoForm</Form> |
</DCCReference> |
<DCCReference Include="GamCheat.pas"> |
<Form>CheatForm</Form> |
</DCCReference> |
<DCCReference Include="Global.pas"/> |
<BuildConfiguration Include="Debug"> |
<Key>Cfg_2</Key> |
<CfgParent>Base</CfgParent> |
</BuildConfiguration> |
<BuildConfiguration Include="Base"> |
<Key>Base</Key> |
</BuildConfiguration> |
<BuildConfiguration Include="Release"> |
<Key>Cfg_1</Key> |
<CfgParent>Base</CfgParent> |
</BuildConfiguration> |
</ItemGroup> |
<ProjectExtensions> |
<Borland.Personality>Delphi.Personality.12</Borland.Personality> |
<Borland.ProjectType>VCLApplication</Borland.ProjectType> |
<BorlandProject> |
<Delphi.Personality> |
<Source> |
<Source Name="MainSource">SpaceMission.dpr</Source> |
</Source> |
<VersionInfo> |
<VersionInfo Name="IncludeVerInfo">True</VersionInfo> |
<VersionInfo Name="AutoIncBuild">False</VersionInfo> |
<VersionInfo Name="MajorVer">1</VersionInfo> |
<VersionInfo Name="MinorVer">1</VersionInfo> |
<VersionInfo Name="Release">4</VersionInfo> |
<VersionInfo Name="Build">0</VersionInfo> |
<VersionInfo Name="Debug">False</VersionInfo> |
<VersionInfo Name="PreRelease">False</VersionInfo> |
<VersionInfo Name="Special">False</VersionInfo> |
<VersionInfo Name="Private">False</VersionInfo> |
<VersionInfo Name="DLL">False</VersionInfo> |
<VersionInfo Name="Locale">1031</VersionInfo> |
<VersionInfo Name="CodePage">1252</VersionInfo> |
</VersionInfo> |
<VersionInfoKeys> |
<VersionInfoKeys Name="CompanyName">ViaThinkSoft</VersionInfoKeys> |
<VersionInfoKeys Name="FileDescription">Ein spannendes Weltraumspiel...</VersionInfoKeys> |
<VersionInfoKeys Name="FileVersion">1.1.4.0</VersionInfoKeys> |
<VersionInfoKeys Name="InternalName">SpaceMission 1.1</VersionInfoKeys> |
<VersionInfoKeys Name="LegalCopyright">© Copyright 2001 - 2011 ViaThinkSoft</VersionInfoKeys> |
<VersionInfoKeys Name="LegalTrademarks">Keine</VersionInfoKeys> |
<VersionInfoKeys Name="OriginalFilename">SpaceMission.exe</VersionInfoKeys> |
<VersionInfoKeys Name="ProductName">SpaceMission 1.1</VersionInfoKeys> |
<VersionInfoKeys Name="ProductVersion">1.1.0.0</VersionInfoKeys> |
<VersionInfoKeys Name="Homepage">www.viathinksoft.de</VersionInfoKeys> |
<VersionInfoKeys Name="Projektleiter">Daniel Marschall - www.daniel-marschall.de</VersionInfoKeys> |
<VersionInfoKeys Name="Webseite">www.viathinksoft.de</VersionInfoKeys> |
</VersionInfoKeys> |
<Excluded_Packages> |
<Excluded_Packages Name="c:\programme\borland\bds\4.0\Bin\dclib100.bpl">Borland InterBase Express Components</Excluded_Packages> |
<Excluded_Packages Name="c:\programme\borland\bds\4.0\Bin\dclIntraweb_80_100.bpl">Intraweb 8.0 Design Package for Borland Development Studio 2006</Excluded_Packages> |
<Excluded_Packages Name="c:\programme\borland\bds\4.0\Bin\dclIndyCore100.bpl">Indy 10 Core Design Time</Excluded_Packages> |
<Excluded_Packages Name="c:\programme\borland\bds\4.0\Bin\dclsmp100.bpl">Borland Sample Components</Excluded_Packages> |
<Excluded_Packages Name="c:\programme\borland\bds\4.0\Bin\dclIndyProtocols100.bpl">Indy 10 Protocols Design Time</Excluded_Packages> |
<Excluded_Packages Name="c:\programme\borland\bds\4.0\Bin\dcltee100.bpl">TeeChart-Komponenten</Excluded_Packages> |
</Excluded_Packages> |
</Delphi.Personality> |
<Platforms> |
<Platform value="Win32">True</Platform> |
<Platform value="Win64">False</Platform> |
</Platforms> |
</BorlandProject> |
<ProjectFileVersion>12</ProjectFileVersion> |
</ProjectExtensions> |
<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/> |
<Import Project="$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj" Condition="Exists('$(APPDATA)\Embarcadero\$(BDSAPPDATABASEDIR)\$(PRODUCTVERSION)\UserTools.proj')"/> |
</Project> |
/SpaceMission.res |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
/SpaceMission_Icon.ico |
---|
Cannot display: file marked as a binary type. |
svn:mime-type = application/octet-stream |
Property changes: |
Added: svn:mime-type |
+application/octet-stream |
\ No newline at end of property |