Initial import

code/GameInitialize.pas

@@ -0,0 +1,16 @@
+unit GameInitialize;
+{$mode objfpc}{$H+}
+{$ifndef ANDROID}{$fatal Android-only architecture probe; there is no desktop target}{$endif}
+interface
+implementation
+uses CastleWindow, GameViewMain;
+var Window: TCastleWindow;
+procedure Initialize;
+begin
+  Window.Container.View := TProbeView.Create(Application);
+end;
+initialization
+  Application.OnInitialize := @Initialize;
+  Window := TCastleWindow.Create(Application);
+  Application.MainWindow := Window;
+end.