Back to Evolution Project page

---

                 

---

Application.cc

#include "Application.h"
#include "System.h"
#include "configs.h"

#include "Screen.h"
#include "ScreenMenu.h"
#include "ScreenGame.h"
#include "ScreenLevelEditor.h"
#include "ScreenLoadLevel.h"
  
#include <stdio.h>

#include <ClanLib/core.h>

int TApplication::Run() {
  //*This recource will be shared with all screens.
  CL_ResourceManager *resources; 
  TLevel *gamelevel;

  TScreenMenu* screen_menu;
  TScreenGame* screen_game;
  TScreenLevelEditor* screen_level_editor;
  TScreenLoadLevel* screen_load_level;
  int next_screen=SCREEN_DEFAULT;
  
  //* Init system...
  TSystem::init();
  
  //* Create Resources...
  try {
    resources = CL_ResourceManager::create("evolution.dat", true);
  }
  catch (CL_Error err) {
    resources = CL_ResourceManager::create("evolution.scr", false);
  }           
  
  gamelevel = new TLevel();
  gamelevel->Init(5, 5); //Initialize level with a arbitrary value...
  gamelevel->set_window(4, 0, 26, 26);
  
 do {
   switch(next_screen) {
   case SCREEN_MENU:
     screen_menu = new TScreenMenu(resources, gamelevel);
     next_screen = screen_menu->Show();
     delete screen_menu;
     break;
   case SCREEN_GAME:
     screen_game = new TScreenGame(resources, gamelevel);
     next_screen = screen_game->Show();
     delete screen_game;
     break;
   case SCREEN_EDITOR:
     screen_level_editor = new TScreenLevelEditor(resources, gamelevel);
     next_screen = screen_level_editor->Show();
     delete screen_level_editor;
     break;
   case SCREEN_LOAD:
     screen_load_level = new TScreenLoadLevel(resources, gamelevel);
     next_screen = screen_load_level->Show();
     delete screen_load_level;
     break;
   default:
     break;
   }
   printf("next screen: %d \n", next_screen);
   resources->unload_all_resources();
 } while (next_screen!=SCREEN_QUIT);
 
 printf ("Rodei! ;-) \n\n\n\n\n\n");

 //* De allocate memory
 // delete resources;
 
 //*Finish the program...
 TSystem::finish();
 return 0;
}

---