src/test/AlgoWars.test_camara+espacio+form.dpr

   1 program AlgoWars;\r
   2 \r
   3 uses\r
   4   Forms,\r
   5   Vectores in 'Vectores.pas',\r
   6   Coordenadas in 'Coordenadas.pas',\r
   7   Espacio in 'Espacio.pas',\r
   8   Objeto in 'Objeto.pas',\r
   9   Tipos in 'Tipos.pas',\r
  10   Camara in 'Camara.pas',\r
  11   FormMain in 'forms\FormMain.pas' {MainForm},\r
  12   FormConfig in 'forms\FormConfig.pas' {ConfigForm},\r
  13   ObjetoVolador in 'ov\ObjetoVolador.pas',\r
  14   Meteorito in 'ov\Meteorito.pas',\r
  15   Armas in 'ov\Armas.pas',\r
  16   Nave in 'ov\naves\Nave.pas',\r
  17   NaveEnemiga in 'ov\naves\NaveEnemiga.pas',\r
  18   NavePropia in 'ov\naves\NavePropia.pas',\r
  19   NavesEnemigas in 'ov\naves\NavesEnemigas.pas',\r
  20   RegExpr in 'RegExpr.pas',\r
  21   vista in 'vista.pas';\r
  22 \r
  23 {$R *.RES}\r
  24 \r
  25 begin\r
  26   randomize; // Cambia la semilla del generador de numeros aleatorios\r
  27 \r
  28   Application.Initialize;\r
  29   Application.Title := 'AlgoWars - Episodio IV';\r
  30   Application.CreateForm(TMainForm, MainForm);\r
  31   Application.CreateForm(TConfigForm, ConfigForm);\r
  32   Application.Run;\r
  33 end.\r