palette.cpp

A 2D game engine for C++ and an example : Aero Blasters

    #include <home\include.h>
    #include <home\cgraph.h>
    #include <home\cbitmap.h>
    #include <home\cmouse.h>
    #include <home\cfonts.h>
    void main (void)
    {
     cgraphics video;
     char      s[20];

    BITMAP MenuMap;

    clrscr();
    puts(" Palette Testing System.");
    puts(" FastSoft 1999-2000. ");
    puts(" FastIcs karachi.");
    puts(" ");
    puts(" Please Enter A Bitmap Filename To Continue Or...");
    puts(" Please Press Enter To Check System Palettes.");
    gets(s);
    if ((int)s[0] < 40  )
    {
    sound(3000);
    delay(333);
    nosound();
    set_video_mode(vga256);
    video.create_double_buffer();
    goto SYSTEM;
    }
    char filename[40];
    sprintf(filename,"%s.bmp",s);
    bitmap_load(filename,&MenuMap);


    puts(" File Opened Successfully.");
    puts(" Please Press Any Key To Continue ...");
    getch();
    set_video_mode(vga256);
    video.create_double_buffer();
    bitmap_show_buffer_db(&MenuMap,
    (SCREEN_WIDTH-MenuMap.width) >>1,
    (SCREEN_HEIGHT-MenuMap.height) >>1);
    farfree(MenuMap.data);

    FadeAway();
    show_double_buffer();
    FadeIn(&MenuMap);
    getch();

	SYSTEM:
	set_double_buffer(0);

       write(0,0,15, "The mouse point scans the palette.",0);
       write(0,10,15,"a mouse button on the palette,",0);
       write(0,20,15,"sets point color",0);
       write(0,30,15,"Scanning Palette Data.",0);

       write(20,130,14," Loading Palette Data ",0);


       int index=0;
       int StartingPoint=(SCREEN_WIDTH-256)>>1;

       int x,y,b;

       video.HLine(StartingPoint-10,75,151,276,100);

       for (index=0;index<256;index++)

	 {
      plot_line_db(StartingPoint+index,85,StartingPoint+index,160,index);
      video.HLine(230,35,index,30,30);

	 waitretrace();
	 nosound();
	 video.show_double_buffer();
	 sound(4500);
	 }


	nosound();

       int pixel;
       int Tcolor=14;
       char buffer[40];

	 while(!kbhit())
	 {

	 ScanMouse(&x,&y,&b);
	 x>>=1;
	 pixel=getpixel(x,y);

	 if (b) { Tcolor=pixel; }
	 plot_pixel_db(x,y,Tcolor);

	 sprintf(buffer," Color #    :> %d               ",pixel);
	 write(0,30,Tcolor,buffer,0);
	 PrintRomString(0,40,Tcolor,"Multi-color Status.",0);
	 video.HLine(230,35,pixel,30,30);
	 video.show_double_buffer();
	 plot_pixel_db(x,y,pixel);
	 waitretrace();

	 }

      video.delete_double_buffer();
      set_video_mode(text);
      puts(" Programmed By Kami in Collaboration With Khurram, ");
      puts(" FastIcs karachi.");
      puts(" Send Your Programming Requests To :> [e-mail] ");
      puts("                             Or To :> [e-mail] ");
      puts("  ");
      puts(" Hit Any Key To Continue.");
      getch();
      getch();
      }