/*introduccion de rutinas para salvar y recuperar immagenes con formato BMP
  agosto de 96*/
/*Fernando Galindo Soria*/

#include <graphics.h>
#include <stdio.h>
#include <conio.h>
#include <dos.h>
#include <process.h>
#include <string.h>

#include "bmp.fgs"

void inicia(void);
void termina(void);
void suena(int ,int);
char nombre[80];
void main()
{
  clrscr();
  inicia();
  gotoxy(2,2);printf("dame nombre  fin  para terminar ");
  gets(nombre);
  if(strcmp(nombre,"fin")!=0)
  {
     system("sarbol1");
     salvaimagen("sarbol1.bmp",0,0,getmaxx(),getmaxx());
     system("sarbol3r");
     salvaimagen("sarbol3r.bmp",0,0,getmaxx(),getmaxx());
	  system("sarbol");
     salvaimagen("sarbol.bmp",0,0,getmaxx(),getmaxx());
	  system("sarbolx");
     salvaimagen("sarbolx.bmp",0,0,getmaxx(),getmaxx());
	  system("scaracox");
     salvaimagen("scaracox.bmp",0,0,getmaxx(),getmaxx());
	  system("scaracol");
     salvaimagen("scaracol.bmp",0,0,getmaxx(),getmaxx());
	  system("scaraco1");
     salvaimagen("scaraco1.bmp",0,0,getmaxx(),getmaxx());
	  system("sstrella");
     salvaimagen("sstrella.bmp",0,0,getmaxx(),getmaxx());
	  system("sstrellx");
     salvaimagen("sstrellx.bmp",0,0,getmaxx(),getmaxx());
	  system("sperro1");
     salvaimagen("sperro1.bmp",0,0,getmaxx(),getmaxx());
	  system("spaisaje");
     salvaimagen("spaisaje.bmp",0,0,getmaxx(),getmaxx());
  }
  termina();
}

 void inicia()
 {
   int gd=DETECT,gm,i,ilis;
   initgraph(&gd,&gm,"");
   printf("sistema que ejecuta un programa y salva la imagen que queda en la pantalla\n");
 }

 void suena(int frec,int tiempo)
 {
  sound(frec);delay(tiempo);nosound();
 }

 void termina()
 {
  suena(800,500);
  closegraph();
 }