Index

Package: Graphics_Configuration

Description

package Graphics_Configuration is
Jan & Uwe R. Zimmer, Australia, July 2011

Constants & Global variables

Initial_Cams (Graphics_Structures.Camera)

Initial_Cams : constant array (Camera_Mode_T) of Camera :=
     (Scene => (Position      => Zero_Vector_3D,
                Scene_Offset  => (0.0, 0.00, 0.8),
                Object_Offset => Zero_Vector_3D,
                Rotation      => Zero_Rotation),
      Chase => (Position      => Zero_Vector_3D,
                Scene_Offset  => Zero_Vector_3D,
                Object_Offset => (0.0, 0.05, 0.1),
                Rotation      => Zero_Rotation));

Number_Of_Stars (Natural)

Number_Of_Stars   : constant Natural       := 20_000;

References:

graphics_configuration.ads:29:4 (declaration)
graphics_opengl.adb:22:60 (reference)
Stars --

Distance_of_Stars (GLOBE_3D.Real)

Distance_of_Stars : constant GLOBE_3D.Real := 3.0;

References:

graphics_configuration.ads:30:4 (declaration)
graphics_opengl.adb:23:60 (reference)

Initial_Viewer_Size (Graphics_Structures.Size_2D)

Initial_Viewer_Size : constant Size_2D := (x => 1280, y => 720);

References:

graphics_configuration.ads:32:4 (declaration)
graphics_data.ads:25:29 (reference)

Camera_Field_of_View (GLOBE_3D.Real)

Camera_Field_of_View        : constant GLOBE_3D.Real     := 70.0;

References:

graphics_configuration.ads:35:4 (declaration)
graphics_setup.adb:85:19 (reference)
graphics_setup.adb:122:35 (reference)
Camera Properties --

Camera_Close_Clipping_Plane (GLOBE_3D.Real)

Camera_Close_Clipping_Plane : constant GLOBE_3D.Real     := 0.01;

References:

graphics_configuration.ads:36:4 (declaration)
graphics_setup.adb:50:34 (reference)

Camera_Far_Clipping_Plane (GLOBE_3D.Real)

Camera_Far_Clipping_Plane   : constant GLOBE_3D.Real     := 1000.0;

References:

graphics_configuration.ads:37:4 (declaration)
graphics_setup.adb:51:34 (reference)

Camera_Initial_Position (GLOBE_3D.Point_3D)

Camera_Initial_Position     : constant GLOBE_3D.Point_3D := (0.0, 0.0, 0.0);

References:

graphics_configuration.ads:38:4 (declaration)
graphics_setup.adb:120:35 (reference)

Viewer_Title (String)

Viewer_Title : constant String := "Swarm Viewer";

References:

graphics_configuration.ads:40:4 (declaration)
graphics_setup.adb:93:35 (reference)

Initial_Lights (Graphics_Structures.Lights_T)

Initial_Lights : constant Lights_T := (1 => (position => (-1.0, 1.0, 1.0, Lighting_Strength),
                                                ambient  => (0.1, 0.1, 0.1, Lighting_Strength),
                                                diffuse  => (0.9, 0.9, 0.9, Lighting_Strength),
                                                specular => (0.05, 0.05, 0.01, Lighting_Strength)),

                                          2 => (position => (1.0, 1.0, 1.0, Lighting_Strength),
                                                ambient  => (0.0, 0.0, 0.0, Lighting_Strength),
                                                diffuse  => (0.1, 0.1, 0.1, Lighting_Strength),
                                                specular => (1.0, 0.8, 0.8, Lighting_Strength))
                                         );

References:

graphics_configuration.ads:44:4 (declaration)
graphics_setup.adb:114:21 (reference)
graphics_setup.adb:115:35 (reference)

Screen_Font (GLUT_2D.Font_type)

Screen_Font : constant GLUT_2D.Font_type := GLUT_2D.Helvetica_10;