Removed sounds for now, added sword icons...
Before Width: | Height: | Size: 362 B After Width: | Height: | Size: 243 B |
Before Width: | Height: | Size: 357 B After Width: | Height: | Size: 230 B |
Before Width: | Height: | Size: 371 B After Width: | Height: | Size: 242 B |
Before Width: | Height: | Size: 353 B After Width: | Height: | Size: 205 B |
Before Width: | Height: | Size: 352 B After Width: | Height: | Size: 209 B |
Before Width: | Height: | Size: 354 B After Width: | Height: | Size: 222 B |
Before Width: | Height: | Size: 352 B After Width: | Height: | Size: 205 B |
Before Width: | Height: | Size: 335 B After Width: | Height: | Size: 204 B |
@ -428,8 +428,8 @@ package body core is
|
||||
echo (comment, "-- -- Window height : 900");
|
||||
ray.open_window (1800, 900, c_string ("Xorana"));
|
||||
--
|
||||
echo (comment, "-- Initializing Raylib audio device data...");
|
||||
ray.open_audio_device;
|
||||
--~echo (comment, "-- Initializing Raylib audio device data...");
|
||||
--~ray.open_audio_device;
|
||||
--
|
||||
game_icon := ray.load_image (c_string (folder & "/ui/game_icon.png"));
|
||||
--
|
||||
@ -457,8 +457,8 @@ package body core is
|
||||
for index in 0 .. sound_count - 1 loop ray.unload_sound (sound_array (index)); end loop;
|
||||
for index in 0 .. font_count - 1 loop ray.unload_font (font_array (index)); end loop;
|
||||
--
|
||||
echo (comment, "-- Deinitializing Raylib audio device data...");
|
||||
ray.close_audio_device;
|
||||
--~echo (comment, "-- Deinitializing Raylib audio device data...");
|
||||
--~ray.close_audio_device;
|
||||
--
|
||||
ray.unload_image (game_icon);
|
||||
--
|
||||
|
@ -203,7 +203,7 @@ begin
|
||||
|
||||
ui.configure;
|
||||
|
||||
play (import_song (c_string (core.folder & "/song/main_menu.ogg")).index);
|
||||
--~play (import_song (c_string (core.folder & "/song/main_menu.ogg")).index);
|
||||
|
||||
attribute.configure;
|
||||
skill.configure;
|
||||
|
@ -15,7 +15,7 @@ package body world is
|
||||
landmark_limit : constant integer := 90;
|
||||
location_limit : constant integer := 30;
|
||||
construction_limit : constant natural := 60;
|
||||
equipment_limit : constant natural := 60;
|
||||
equipment_limit : constant natural := 600;
|
||||
unit_limit : constant natural := 60;
|
||||
|
||||
earth : core.sprite;
|
||||
|