#include <allegro.h>
#include <tdgui.h>
#include <jpeg.h>
 
#include "faraon.h"
#include "data.h"
 
int num_girls;
 
void init_girl(int c)
{
  char tbuf[20];
  set_config_file("girls.ini");
  sprintf(tbuf,"girl%d",c+1);
  strcpy(dataname,get_config_string(tbuf,"file",0));
  strcpy(girlname,get_config_string(tbuf,"name",0));
}
 
void main_showscreen(BITMAP *bmp)
{
  int x;
  char i=2;
  for(x=0;x>-1;x+=i){
    if(x>=480){x=479;i=-2;}
    blit(bmp,screen,0,x,0,x,640,1);
    delay(1);
  }
}
 
void main_delscreen()
{
  int x;
  char i=2;
  for(x=0;x>-1;x+=i){
    if(x>=480){x=479;i=-2;}
    hline(screen,0,x,640,0);
    delay(1);
  }
}
 
void mainmenu()
{
  int i,k=-1;
  int x,y;
 
  packfile_password("IdeaZ");
  show_mouse(0);
 
  main_showscreen(load_jpeg("faraon.dat#pozadie",0));
 
  text_mode(-1);
 
  tdbox(screen,100,170,440,280,6);
  tdbox(screen,110,200,420,240,1);
 
  tdbox(screen,100,455,440,20,6);
 
  font=bigfont[0].dat;
  textout_centre(screen,font,"Vyber protihraca",320,175,0);
  textout_centre(screen,font,"Koniec hry",320,455,0);
 
  for(i=0;i<num_girls;i++){
    init_girl(i);
    textout_centre(screen,font,girlname,320,200+i*20,0);
    tdhline(screen,115,218+i*20,525);
  }
  font=smallfont[0].dat;
 
  show_mouse(screen);
  while(k==-1){
    if(mouse_b){
      x=mouse_x;y=mouse_y;
      if(x>=100&&x<=540&&y>=455&&y<=474) k=-2;
      if(x>=110&&x<=530&&y>=200&&y<=440){
        k=(y-200)/20;
        if(k>=num_girls) k=-1;
      }
 
    }
 
    if(key[KEY_ESC]) k=-2;
  }
  show_mouse(0);
 
  main_delscreen();
 
  if(k==-2) koniec("(C) VYFUK software 1999");
  init_girl(k);
  maingame();
}
 
int main(void)
{
  init_total();
  set_config_file("girls.ini");
 
  num_girls=get_config_int(0,"girls",0);
 
  main_showscreen(load_jpeg("faraon.dat#mylogo",0));
  readkey();
  main_showscreen(load_jpeg("faraon.dat#zlogo",0));
  readkey();
 
  while(1) mainmenu();
}