/* ----------------------------------------
Image Processing pc1.c
Color Image Pattern Generation
Quad area paint image white/red/green/blue
Ichinoseki National College Advanced Course
------------------------------------------ */

#include <stdio.h>
#include <stdlib.h>
#include <math.h>  

main(argc,argv)
int argc;
char *argv[]; 
{
	static int  i,j,k,m;
	static int pixel,line;
	FILE *fp1;

	/* Command parameter check  */
	if (argc!=4){
		printf("Usage : command pixel line output_file\n");
		return 1;
	}
	/* Image size parameter load */
	sscanf(argv[1],"%d",&pixel);
	sscanf(argv[2],"%d",&line);

	/* Output image file name read */
	if (( fp1=fopen(argv[3],"w") )==NULL){
		printf("Can't open output_file\n");
		return 1;
	}

	/* ppm header output */
	fprintf(fp1,"P6\n");
	fprintf(fp1,"# INCT\n");
	fprintf(fp1,"%s %s\n",argv[1],argv[2]);
	fprintf(fp1,"255\n");

	/* Color image generate */
	for (j=0; j<line; j++)
	{
	for (i=0; i<pixel; i++)
	{
		if (i <= 1*pixel/8){
		putc(255,fp1);
		putc(0,fp1);
		putc(255,fp1);
		}
		else if (1*pixel/8 < i && i <= 2*pixel/8 ){
		putc(0,fp1);
		putc(0,fp1);
		putc(255,fp1);
		}
		else if (2*pixel/8 < i && i <= 3*pixel/8 ){
		putc(0,fp1);
		putc(128,fp1);
		putc(255,fp1);
		}
		else if (3*pixel/8 < i && i <= 4*pixel/8 ){
		putc(0,fp1);
		putc(255,fp1);
		putc(0,fp1);
		}
		else if (4*pixel/8 < i && i <= 5*pixel/8 ){
		putc(128,fp1);
		putc(255,fp1);
		putc(0,fp1);
		}
		else if (5*pixel/8 < i && i <= 6*pixel/8 ){
		putc(255,fp1);
		putc(255,fp1);
		putc(0,fp1);
		}
		else if (6*pixel/8 < i && i <= 7*pixel/8 ){
		putc(255,fp1);
		putc(128,fp1);
		putc(0,fp1);
		}
		else{
		putc(255,fp1);
		putc(0,fp1);
		putc(0,fp1);
		}
	}
	}
	fclose(fp1);
	return 0;
}