program YATC;
{YATC
Autor : Tobias Mark aka Colenzo (tobiasmark@gmx.de)

Spiel mit fallenden Blöck, YATC eigenename keine Abkürzung ;)

verwendete Kompenten & Packages:
GlScene
RemObjects Pascal Script
Jcl
Jvcl

Version
0.1 17.7 - erste version
0.2 8.9 - zufriedenstellende Grundfunktionen, es fehlen noch ausreichende Blöcke
0.3 12.9 - Highscore Fenster
Beta - 1.0 18.9 - Ausreichen Blöcke für alle 3 Modi, zufriedenstellender Umfang für den ersten Schritt, Tests nötig
Beta - 1.1 4.12.05? - Formular für Spieleinstellungen, Vorschau Funktion
Beta - 1.2 19.03.06 - Speicherung von Optionen
                    - Varialbe Tastaturbelegung eingebaut
                    - 2 Spieler Modus eingebaut

Bekannte Problem:
- Blöcke die Nah am Rand oder anderen Blöcken sind lassen sicht oftmals nicht drehen, das ist kein Bug ansich sondern ein Problem des Designs der Drehfunktion die immer versucht um ein einzigen "Hauptpunkt" des Blockes zu drehen so das die Drehung als nicht möglich erkannt wird obwohl sie eigentlich Möglich wäre wenn man einen anderen Drehpunkt benutzen würde

Todo :
- Beta Test der vorhanden funktionen
- mehr multiplayer modi


Erweiterungs Idee :
- Spezial Blöcke, die explodieren oder, nicht zerstörbar sind etc
- Netwerkfähigkeit (gegeneinader & miteinander)
}

{%File 'yatc.ico'}

uses
  Forms,
  yatc_main in 'yatc_main.pas' {Form1},
  yatc_Block in 'yatc_Block.pas',
  yatc_global in 'yatc_global.pas',
  yatc_Blocks in 'yatc_Blocks.pas',
  yatc_script in 'yatc_script.pas',
  yatc_help in 'yatc_help.pas' {help_form},
  yatc_score in 'yatc_score.pas' {score_form},
  yatc_Debug in 'yatc_Debug.pas' {debugForm},
  yatc_field in 'yatc_field.pas',
  yatc_gameoptions in 'yatc_gameoptions.pas' {optionForm},
  yatc_control in 'yatc_control.pas' {controlForm},
  yatc_player in 'yatc_player.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.Title := 'YATC';
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(ToptionForm, optionForm);
  Application.CreateForm(Thelp_form, help_form);
  Application.CreateForm(Tscore_form, score_form);
  Application.CreateForm(TdebugForm, debugForm);
  Application.CreateForm(TcontrolForm, controlForm);
  Application.Run;
end.
