diff --git a/source/main.adb b/source/main.adb index 5fbc97b..984b8c0 100644 --- a/source/main.adb +++ b/source/main.adb @@ -44,6 +44,9 @@ procedure main is swap_text_box_panel'access ); + game_title : sprite; + ashland_preview : sprite; + ------------------------------------------------------------------------------------------ procedure check_move_camera_up is @@ -105,7 +108,10 @@ procedure main is procedure introduction is begin - core.write ("[-- Please press Spacebar to continue]", 0, center_y (24), (102, 102, 102, 255)); + draw (ashland_preview, center_x (ashland_preview.width * 2), center_y (ashland_preview.height * 2), factor => 2); + draw (game_title, center_x (game_title.width * 2), center_y (game_title.height * 2), factor => 2); + -- + write ("[-- Please press Spacebar to continue]", 0, center_y (24), (102, 102, 102, 255)); end introduction; ------------------------------------------------------------------------------------------ @@ -197,6 +203,9 @@ begin camera := (1, 1); + game_title := import_sprite ("./sprite/game_title.png", 1, 1); + ashland_preview := import_sprite ("./sprite/ashland_preview.png", 1, 1); + ------------------------------------------------------------------------------------------ introduction_loop: loop diff --git a/sprite/ashland_preview.png b/sprite/ashland_preview.png new file mode 100644 index 0000000..1ae78cc Binary files /dev/null and b/sprite/ashland_preview.png differ diff --git a/sprite/game_title.png b/sprite/game_title.png new file mode 100644 index 0000000..8730380 Binary files /dev/null and b/sprite/game_title.png differ