Index

Package: Events.Game

Description

package Events.Game is

Classes

Game_Paused_Event

type Game_Paused_Event is new Event with private;

Ancestors:

Primitive operations:

Construct
Events.Construct (Inherited)
Events.To_String (Inherited)
Objects.Adjust (Inherited)
Objects.Construct (Inherited)
Objects.Delete (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)

References:

events-game.ads:9:10 (declaration)
events-game.adb:7:40 (reference)
events-game.adb:15:48 (reference)
events-game.adb:127:42 (reference)
events-game.ads:10:44 (reference)
events-game.ads:14:48 (reference)
events-game.ads:86:10 (full declaration)
events-game.ads:91:40 (reference)

Game_Var_Changed_Event

type Game_Var_Changed_Event is new Event with private;

Ancestors:

Primitive operations:

Adjust (overriding Objects.Adjust)
Construct
Delete (overriding Objects.Delete)
Events.Construct (Inherited)
Events.To_String (Inherited)
Objects.Construct (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)

References:

events-game.ads:18:10 (declaration)
events-game.adb:23:37 (reference)
events-game.adb:33:40 (reference)
events-game.adb:46:41 (reference)
events-game.adb:55:37 (reference)
events-game.adb:63:46 (reference)
events-game.adb:137:47 (reference)
events-game.ads:19:49 (reference)
events-game.ads:23:46 (reference)
events-game.ads:25:41 (reference)
events-game.ads:95:10 (full declaration)
events-game.ads:101:37 (reference)
events-game.ads:103:40 (reference)
events-game.ads:109:37 (reference)

Loading_Event

type Loading_Event is new Event with private;

Ancestors:

Primitive operations:

Construct
Events.Construct (Inherited)
Events.To_String (Inherited)
Objects.Adjust (Inherited)
Objects.Construct (Inherited)
Objects.Delete (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)

References:

events-game.ads:31:10 (declaration)
events-game.adb:71:40 (reference)
events-game.adb:79:49 (reference)
events-game.adb:146:38 (reference)
events-game.ads:32:40 (reference)
events-game.ads:36:49 (reference)
events-game.ads:113:10 (full declaration)
events-game.ads:118:40 (reference)

New_Game_Event

type New_Game_Event is new Event with private;

Ancestors:

Primitive operations:

Events.Construct (Inherited)
Events.To_String (Inherited)
Objects.Adjust (Inherited)
Objects.Construct (Inherited)
Objects.Delete (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)

References:

events-game.ads:40:10 (declaration)
events-game.adb:155:39 (reference)
events-game.ads:41:41 (reference)
events-game.ads:122:10 (full declaration)

Pause_Game_Event

type Pause_Game_Event is new Event with private;

Ancestors:

Primitive operations:

Construct
Events.Construct (Inherited)
Events.To_String (Inherited)
Objects.Adjust (Inherited)
Objects.Construct (Inherited)
Objects.Delete (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)

References:

events-game.ads:47:10 (declaration)
events-game.adb:87:40 (reference)
events-game.adb:95:48 (reference)
events-game.adb:164:41 (reference)
events-game.ads:48:43 (reference)
events-game.ads:52:48 (reference)
events-game.ads:126:10 (full declaration)
events-game.ads:131:40 (reference)

Scroll_View_Event

type Scroll_View_Event is new Event with private;

Ancestors:

Primitive operations:

Construct
Events.Construct (Inherited)
Events.To_String (Inherited)
Objects.Adjust (Inherited)
Objects.Construct (Inherited)
Objects.Delete (Inherited)
Objects.Object_Read (Inherited)
Objects.Object_Write (Inherited)

References:

events-game.ads:56:10 (declaration)
events-game.adb:103:40 (reference)
events-game.adb:112:44 (reference)
events-game.adb:119:44 (reference)
events-game.adb:173:42 (reference)
events-game.ads:57:44 (reference)
events-game.ads:62:44 (reference)
events-game.ads:65:44 (reference)
events-game.ads:135:10 (full declaration)
events-game.ads:140:40 (reference)

Types

A_Game_Paused_Event

type A_Game_Paused_Event is access all Game_Paused_Event'Class;

References:

events-game.ads:10:10 (declaration)
events-game.adb:127:15 (reference)
game_views.adb:175:31 (reference)
game_views.adb:176:32 (reference)

A_Game_Var_Changed_Event

type A_Game_Var_Changed_Event is access all Game_Var_Changed_Event'Class;

References:

events-game.ads:19:10 (declaration)
events-game.adb:137:15 (reference)
game_views-keen.adb:154:39 (reference)
game_views-keen.adb:237:30 (reference)
game_views-keen.ads:45:39 (reference)

A_Loading_Event

type A_Loading_Event is access all Loading_Event'Class;

References:

events-game.ads:32:10 (declaration)
events-game.adb:146:15 (reference)
game_views.adb:181:47 (reference)

A_New_Game_Event

type A_New_Game_Event is access all New_Game_Event'Class;

References:

events-game.ads:41:10 (declaration)
events-game.adb:155:15 (reference)

A_Pause_Game_Event

type A_Pause_Game_Event is access all Pause_Game_Event'Class;

References:

events-game.ads:48:10 (declaration)
events-game.adb:164:15 (reference)
games.adb:136:35 (reference)
games.adb:152:23 (reference)

A_Scroll_View_Event

type A_Scroll_View_Event is access all Scroll_View_Event'Class;

References:

events-game.ads:57:10 (declaration)
events-game.adb:173:15 (reference)
game_views-keen.adb:196:39 (reference)
game_views-keen.adb:243:30 (reference)
game_views-keen.ads:48:39 (reference)

Constants & Global variables

GAME_PAUSED_ID (Events.Event_Id)

GAME_PAUSED_ID : constant Event_Id := To_Event_Id( "Game_Paused" );

References:

events-game.ads:12:5 (declaration)
game_views.adb:174:20 (reference)

GAME_VAR_CHANGED_ID (Events.Event_Id)

GAME_VAR_CHANGED_ID : constant Event_Id := To_Event_Id( "Game_Var_Changed" );

References:

events-game.ads:21:5 (declaration)
game_views-keen.adb:236:29 (reference)

LOADING_ID (Events.Event_Id)

LOADING_ID : constant Event_Id := To_Event_Id( "Loading" );

References:

events-game.ads:34:5 (declaration)
game_views.adb:180:20 (reference)

NEW_GAME_ID (Events.Event_Id)

NEW_GAME_ID : constant Event_Id := To_Event_Id( "New_Game" );

References:

events-game.ads:43:5 (declaration)
games.adb:148:28 (reference)

PAUSE_GAME_ID (Events.Event_Id)

PAUSE_GAME_ID : constant Event_Id := To_Event_Id( "Pause_Game" );

References:

events-game.ads:50:5 (declaration)
games.adb:151:28 (reference)

SCROLL_VIEW_ID (Events.Event_Id)

SCROLL_VIEW_ID : constant Event_Id := To_Event_Id( "Scroll_View" );

References:

events-game.ads:59:5 (declaration)
game_views-keen.adb:242:32 (reference)

Subprograms & Entries

Is_Paused

function Is_Paused
( this: not null access Game_Paused_Event'Class )
return Boolean;

References:

events-game.ads:14:14 (declaration)
events-game.adb:15:14 (body)
events-game.adb:18:9 (label)
game_views.adb:175:56 (reference)
game_views.adb:176:57 (reference)

Called by:

Game_Views.Handle_Event defined at game_views.ads:123:15
Game_Views.Handle_Event defined at game_views.ads:123:15

Get_Var

function Get_Var
( this: not null access Game_Var_Changed_Event'Class )
return String;

References:

events-game.ads:23:14 (declaration)
events-game.adb:63:14 (body)
events-game.adb:66:9 (label)
game_views-keen.adb:155:48 (reference)

Called by:

Game_Views.Keen.Handle defined at game_views-keen.ads:44:15

Calls:

To_String defined at a-strunb.ads:65:13

Copy_Value

procedure Copy_Value
( this: access Game_Var_Changed_Event;
val: in out A_Value );

References:

events-game.ads:25:15 (declaration)
events-game.adb:46:15 (body)
events-game.adb:50:9 (label)
game_views-keen.adb:158:13 (dispatching call)

Called by:

Game_Views.Keen.Handle defined at game_views-keen.ads:44:15

Calls:

Values.Copy defined at values.ads:32:14

Is_Loading

function Is_Loading
( this: not null access Loading_Event'Class )
return Boolean;

References:

events-game.ads:36:14 (declaration)
events-game.adb:79:14 (body)
events-game.adb:82:9 (label)
game_views.adb:181:68 (reference)

Called by:

Game_Views.Handle_Event defined at game_views.ads:123:15

Is_Paused

function Is_Paused
( this: not null access Pause_Game_Event'Class )
return Boolean;

References:

events-game.ads:52:14 (declaration)
events-game.adb:95:14 (body)
events-game.adb:98:9 (label)
games.adb:138:20 (reference)

Called by:

Games.Handle_Event.Do_Pause defined at games.adb:136:19

Get_X

function Get_X
( this: not null access Scroll_View_Event'Class )
return Float;

References:

events-game.ads:62:14 (declaration)
events-game.adb:112:14 (body)
events-game.adb:115:9 (label)
game_views-keen.adb:198:57 (reference)

Called by:

Game_Views.Keen.Handle defined at game_views-keen.ads:47:15
Amount to scroll view in the X axis in world coordinates.

Get_Y

function Get_Y
( this: not null access Scroll_View_Event'Class )
return Float;

References:

events-game.ads:65:14 (declaration)
events-game.adb:119:14 (body)
events-game.adb:122:9 (label)
game_views-keen.adb:198:68 (reference)

Called by:

Game_Views.Keen.Handle defined at game_views-keen.ads:47:15
Amount to scroll view in the Y axis in world coordinates.

Queue_Game_Paused

procedure Queue_Game_Paused
( paused: Boolean );

References:

events-game.ads:69:15 (declaration)
events-game.adb:126:15 (body)
events-game.adb:131:9 (label)
games.adb:178:9 (reference)

Called by:

Games.Pause defined at games.ads:99:15

Queue_Game_Var_Changed

procedure Queue_Game_Var_Changed
( var: String;
val: in out A_Value );

References:

events-game.ads:71:15 (declaration)
events-game.adb:135:15 (body)
events-game.adb:141:9 (label)
games.adb:95:9 (reference)
games.adb:192:9 (reference)
games.adb:203:9 (reference)

Called by:

Games.Game_Var_Add defined at games.ads:85:15
Games.Set_Game_Var defined at games.ads:108:15
Games.Set_Game_Var defined at games.ads:103:15

Queue_Loading

procedure Queue_Loading
( loading: Boolean );

References:

events-game.ads:76:15 (declaration)
events-game.adb:145:15 (body)
events-game.adb:150:9 (label)
resources.adb:72:17 (reference)
resources.adb:83:21 (reference)

Called by:

Resources.Decrement defined at resources.adb:59:19
Resources.Increment defined at resources.adb:58:19

Queue_New_Game

procedure Queue_New_Game;

References:

events-game.ads:78:15 (declaration)
events-game.adb:154:15 (body)
events-game.adb:159:9 (label)
game_views-keen.adb:332:9 (reference)

Called by:

Game_Views.Keen.Action_New_Game defined at game_views-keen.ads:76:15

Calls:

Events.Construct defined at events.ads:81:15
Events.Manager.Queue_Event defined at events-manager.ads:7:15

Queue_Pause_Game

procedure Queue_Pause_Game
( paused: Boolean );

References:

events-game.ads:80:15 (declaration)
events-game.adb:163:15 (body)
events-game.adb:168:9 (label)
widgets-containers-panels-dialogs.adb:119:13 (reference)
widgets-containers-panels-dialogs.adb:129:9 (reference)
game_views-keen.adb:383:17 (reference)

Queue_Scroll_View

procedure Queue_Scroll_View
( x, y: Float );

References:

events-game.ads:82:15 (declaration)
events-game.adb:172:15 (body)
events-game.adb:177:9 (label)
entities-players-keen.adb:935:21 (reference)

Called by:

Entities.Players.Keen.Tick defined at entities-players-keen.ads:111:15