source: abuse/tags/0.7.0/src/oldhelp.cpp @ 672 Tweet

#include "help.hpp"
#include "game.hpp"

int help_page=0;


#define HELP_PAGES 3

char *get_page(int x)
{
  char tmp[800],line[120];  
  FILE *fp=fopen("help.txt","r");
  if (!fp)  
    return strcpy((char *)jmalloc(40,"Help missing error string"),"help.txt missing");    
  else
  {
    tmp[0]=0;
    while (x)
    {
      fgets(line,120,fp);
      if (line[0]=='.' && line[1]=='n')      
        x--;      
      if (line[0]=='.' && line[1]=='e')
      { 
        fclose(fp);     
        return strcpy((char *)jmalloc(30,"help : page missing string"),"missing page");          
      }
      
    }
    do
    {
      fgets(line,120,fp);
      if (line[0]=='.')      
      { 
        fclose(fp);     
        return strcpy((char *)jmalloc(strlen(tmp)+1,"help page"),tmp);
      }      
      else strcat(tmp,line);
    } while (1);
  } 
}


void make_help_page(int page, image *s)
{
  int x=0,y=0,fw=eh->font()->width(),fh=eh->font()->height(),ya;
  char *h,*ho,imname[30],*inp;
  h=ho=get_page(page);
  
  s->clear(28);      // light gray
  
  bFILE *fp=open_file("art/joy.spe","rb");
  if (fp->open_failure())
  {
    eh->font()->put_string(s,10,10,"Help file missing!");
    return ;
    
  }  
  spec_directory sd(fp);
  image *im;
    

  while (*h)
  {
    ya=fh;    
    while (*h && *h!='\n')
    {      
      if (*h=='@')
      {
        h++;
        if (*h=='@')
        {         
          eh->font()->put_char(s,x,y,*h);
          x+=fw;          
          h++;    
        }       
        else
        {
          inp=imname;
          int center=0;
          if (*h=='#')
          {
            center=1;
            h++;            
          }
          if (*h=='+')
          {
            h++;            
            while (*h!='+')
            {
              *inp=*h;
              h++;
              inp++;        
            } 
            h++;            
            *inp=0;
            x=atoi(imname);
            inp=imname;     
          }
          
          
          while (*h!='@')
          {
            *inp=*h;
            h++;
            inp++;          
          }
          *inp=0;
          h++;
          
          if (!sd.find(imname))
          {         
            eh->font()->put_string(s,0,yres-10,"Missing image!");
            delete fp;
            jfree(ho);      
            return ;        
          }
          im=new image(sd.find(imname),fp);

          if (center)
          {         
            im->put_image(s,x,y-im->height()/2,1);
            if (im->height()/2>=ya)
              ya=im->height()/2+1;
          }       
          else
          {         
            im->put_image(s,x,y,1);
            if (im->height()>=ya)
              ya=im->height()+1;
          }       
          x+=im->width()+1;               
          delete im;      
        }
      } else if (*h=='`')
      {
        inp=imname;             
        h+=2;   
        while (*h!='`')
        {
          *inp=*h;
          h++;
          inp++;            
        } 
        h++;        
        *inp=0;
        x=atoi(imname);
      }
      else
      {
        eh->font()->put_char(s,x,y,*h);
        x+=fw;    
        h++;    
      }                 
    }    
    y+=ya;
    x=0;    
    if (*h) h++;    
  }    
  jfree(ho);
  delete fp;
}


void show_help(int direction)
{
  int i;   
  image *h=new image(screen->width(),screen->height(),NULL,2),*old_screen;

  if (direction>0)
    make_help_page(help_page,h);
  else
  {
    old_screen=screen;
    screen=h;
    the_game->draw();
    screen=old_screen;    
  }
  
 
  int steps=8;  
  int scroll_step=screen->height()/steps;
  int helpy=-screen->height()+scroll_step; 
  
  for (i=0;i<steps;i++,helpy+=scroll_step)
  {
    screen->scroll(0,0,xres,yres,0,scroll_step);
    h->put_part(screen,0,helpy,0,0,xres,-helpy+scroll_step);
    eh->flush_screen();    
  }
  delete h;       
}






void help_handle_event(event &ev)
{
  if (ev.window!=NULL) return ;
  
  if (the_game->state!=HELP_STATE)
  {
    if (ev.type==EV_KEY && (ev.key=='h' || ev.key=='?'))
    {
      the_game->state=HELP_STATE;
      help_page=0;
      show_help(1);      
    }
  } else if (ev.type==EV_KEY)
  {
    if (ev.key==JK_ESC || help_page==HELP_PAGES-1)
    {         
      show_help(-1);
      the_game->state=RUN_STATE;    
    }
    else
    {
      help_page++;
      show_help(1);            
    }    
  }    
}