#include <acknex.h>
#include <default.c>

BMAP *bmp_nature = "NATURE.JPG";

PANEL *pan_bmp = 
{
	bmap = bmp_nature ;	
	flags = SHOW ;
	
	scale_x = 0.5 ;
	scale_y = 0.5 ;
}

PANEL *my_panel = 
{	
	scale_x = 0.5 ;
	scale_y = 0.5 ;
	
	pos_x = 400;
}

BMAP *my_bmap;

// Color bmap
function color_bmap(COLOR *pixel_color)
{
	var count_x;
	var count_y;
	var pixel;
	
	COLOR temp_color;
	var bmp_width = bmap_width(my_bmap);
	var bmp_height = bmap_height(my_bmap);
	
	BMAP* temp_bmap = bmap_createblack(bmp_width, bmp_height, 32);
	
	bmap_lock(temp_bmap,0);
	bmap_lock(my_bmap,0);
	
	count_y = 0;
	while(count_y<bmp_height)
	{ 
		count_x = 0;
		while(count_x<bmp_width)
		{
			pixel = pixel_for_bmap(my_bmap,count_x,count_y);
			pixel_to_vec(&temp_color,NULL,8888,pixel);
			if(temp_color.blue==pixel_color->blue||temp_color.red==pixel_color->red||temp_color.green==pixel_color->green)
			{
				temp_color.red = 0;
				temp_color.green = 0;
				temp_color.blue = 250;
				pixel = pixel_for_vec(&temp_color,100,8888);
				pixel_to_bmap(temp_bmap,count_x,count_y,pixel);
			}
			count_x += 1;
		}
		count_y += 1;
	}
	bmap_unlock(temp_bmap);
	bmap_unlock(my_bmap);
	my_panel.bmap = temp_bmap;
	set(my_panel,VISIBLE);
}

void main()
{
	wait(1);
	my_bmap = pan_bmp->bmap;
	
	color_bmap(vector(0, 150, 0));
}

#include <acknex.h>
#include <default.c>

BMAP *bmp_nature = "NATURE.JPG";
BMAP *FIREFOX_3_bmap = "FIREFOX_3.JPG";
BMAP *bmp_box = "box.png" ;

PANEL *pan_bmp = 
{
	bmap = bmp_nature ;	
	flags = SHOW ;
	
	//scale_x = 0.2 ;
	//scale_y = 0.2 ;
}

void main()
{
	// Wait for video functions to be ready
	wait (1) ;
	
	BMAP *bmp_to = pan_bmp->bmap ;
	
	pan_bmp->pos_x = ( screen_size.x - bmap_width ( bmp_to ) ) * 0.5 ;	
	pan_bmp->pos_y = ( screen_size.y - bmap_height ( bmp_to ) ) * 0.5 ;
	
	var format = bmap_lock ( bmp_to, 0 ) ;
	if ( format > 565 )
	{
		int width = bmap_width ( bmp_to ) ;
		int height = bmap_height ( bmp_to ) ;
		
		int i = 0 ;
		int j = 0 ;
		
		COLOR vec_color ;
		var pixel ;
		var pixel_transparency;
		
		for ( i = 0; i<width ; i++ )
		{
			for ( j = 0; j < height ; j++ ) 
			{
				pixel = pixel_for_bmap ( bmp_to, i, j ) ;
				pixel_to_vec ( &vec_color, &pixel_transparency, format, pixel ) ;
				
				vec_mul( &vec_color, vector ( 0.0721, 0.7154, 0.2125 ) ) ; 
				//vec_mul( &vec_color, vector ( 0.5, 0.587, 0.299 ) ) ; 
				//vec_mul( &vec_color, vector ( 0.3, 0.59, 0.11 ) ) ; 
				
				int gray = vec_color.red + vec_color.blue + vec_color.green ;
				
				int red = (vec_color.red * .393) + (vec_color.green *.769) + (vec_color.blue * .189) ;

				int green = (vec_color.red * .349) + (vec_color.green *.686) + (vec_color.blue * .168) ;
				
				int blue = (vec_color.red * .272) + (vec_color.green *.534) + (vec_color.blue * .131) ;
				
				pixel = pixel_for_vec ( vector( gray, gray, gray ), pixel_transparency, format ) ;
				pixel_to_bmap ( bmp_to, i, j, pixel ) ;
				
			}
		}
	}
	
	bmap_unlock ( bmp_to ) ;
}

function compare() {

	int p;	
	bmap_lock (bmp1,0);
	bmap_lock (bmp2,0);
	char* b1 = bmp1.finalbits;
	char* b2 = bmp2.finalbits;

	for (p=0;p<bmp1.finalwidth * bmp1.finalheight;p++)
		if (	b1[p*4  ] == find_color.blue &&
			b1[p*4+1] == find_color.green &&
			b1[p*4+2] == find_color.red) {

			b2[p*4  ] = new_color.blue;
			b2[p*4+1] = new_color.green;
			b2[p*4+2] = new_color.red;
			b2[p*4+3] = 255;}

	bmap_unlock(bmp1);
	bmap_unlock(bmp2);}

#include <acknex.h>
#include <default.c>


PANEL* pnlFrom;
PANEL* pnlTo;

void main(){
	
	wait(1);
	
	//create panel to read from
	pnlFrom = pan_create("", 1);
	pnlFrom.bmap = bmap_createblack(200, 100, 32);
	bmap_fill(pnlFrom.bmap, vector(0, 0, 250), 100);
	set(pnlFrom, SHOW);
	
	var alpha, formatFrom, formatTo, pixel;
	COLOR col;
	
	int x, y, x_max = bmap_width(pnlFrom.bmap), y_max = bmap_height(pnlFrom.bmap);
	
	//create random noise to find
	formatFrom = bmap_lock(pnlFrom.bmap, 0);
	for(x = 0; x < x_max; x++){
		
		for(y = 0; y < y_max; y++){
			
			vec_set(col, vector(integer(random(255)), integer(random(255)), integer(random(255)))); 
			pixel = pixel_for_vec(col, 100, formatFrom);
			pixel_to_bmap(pnlFrom.bmap, x, y, pixel);
		}
	}
	bmap_unlock(pnlFrom.bmap);
	
	//create panel to write to
	pnlTo = pan_create("", 1);
	pnlTo.bmap = bmap_createblack(200, 100, 32);
	bmap_fill(pnlTo.bmap, vector(0, 0, 250), 100);
	set(pnlTo, SHOW);
	pnlTo.pos_x = 400;
	
	//read all pixel and write only blue to new panel
	formatTo = bmap_lock(pnlTo.bmap, 0);
	formatFrom = bmap_lock(pnlFrom.bmap, 0);
	for(x = 0; x < x_max; x++){
		
		for(y = 0; y < y_max; y++){
			
			pixel = pixel_for_bmap(pnlFrom.bmap, x, y);
			pixel_to_vec(col, alpha, formatFrom, pixel);
			
			if(col.blue > 127){
				
				
				//only draw blue... comment out next 4 lines if not needed
				col.blue = 255;
				col.green = 0;
				col.red = 0;
				pixel = pixel_for_vec(col, 100, formatTo);
				pixel_to_bmap(pnlTo.bmap, x, y, pixel);
			}
		}
	}
	bmap_unlock(pnlTo.bmap);
	bmap_unlock(pnlFrom.bmap);
	
	wait(1);
	while(!key_enter){ wait(1); }
//	while(key_enter){ wait(1); }
	
	pan_remove(pnlFrom);
	pan_remove(pnlTo);
	main();
}