int GetFX(int mx,int x, int nw) {
	float xp = (float)x * (float)mx / (float)nw;		
	return (int)xp;
}

int GetFZ(int my, int y, int nh) {
	float yp = (float)y * (float)my / (float)nh;
	return (int)yp;
}


void init_app() {
	initScreenAndCtrl();
	fill_rect(0,0,480,272,0x0);
	changeBuffer();
}

void loop(void (*renderx)(),void (*joy_down)(int button)) {
	int i = 0;
	while(1) {
		fill_rect(0,0,480,272, 0x0);
		renderx();
		swap_buffer();
		// proccess joybutton down
		
		if(i % 12 == 0) {
		sceCtrlReadBufferPositive(&gpaddata,1);
		WriteDwordDummy(0,22,gpaddata.Buttons);

			 if(gpaddata.Buttons & PSP_CTRL_CROSS)
			 {
				 joy_down(0);
			 }
			 if(gpaddata.Buttons & PSP_CTRL_CIRCLE) {
				 joy_down(1);
			 }
			 if(gpaddata.Buttons & PSP_CTRL_LEFT) {
				 joy_down(7);
			 }
			 if(gpaddata.Buttons & PSP_CTRL_RIGHT) {
				 joy_down(9);
			 }


		}

		i++;
	}
}

void swap_buffer() {

	changeBuffer();

}
// no bounds checking
void set_pixel(int x, int y, unsigned long color) {
	unsigned long *vptrc = 0, *vptrl = 0;
		vptrc = (unsigned long*)GetVramAddr(x,y);
		vptrl = (unsigned long*)vptrc;
		*vptrl =(unsigned long) color;
}
void clean_app() { 
// left empty since you cant exit the application 

}

int draw_text(unsigned int *fnt_ptr,int font_w, int font_h,  int x, int y, unsigned long color, char *src) {
	int prev_x = x;
	int offset_x = prev_x, offset_y = y;
	int width = 0, height = 0;
	int i,z,p;

	for(p = 0; p < src[p] != 0;  p++) {
		unsigned int *ptr = fnt_ptr;
		if(src[p] == '\n') {
			offset_x = prev_x;
			offset_y += height;
			continue;
		}
		
		ptr += (src[p] * (font_w*font_h));
			
		for(i = 0; i < font_w; i++) {
			for(z = 0; z < font_h; z++) {
			
				if((*ptr)) {
					if(offset_y+z > 0 && offset_x+i > 0 && offset_y+z < 272 && offset_x+i < 480)
					set_pixel(offset_x+i, offset_y+z, color);
					width=i;
					if(height < z)
						height=z;
				}
				ptr++;
			}
		}
		offset_x += width;
		if(offset_x+width >= 480) {
			offset_x = prev_x;
			offset_y += height;
		}
		if(offset_y+height > 272)
				return 1;
					
	}

	return 0;
}

int draw_int(unsigned int *fnt_ptr, int font_w, int font_h, int x, int y, unsigned long color, unsigned long val) {

	unsigned long divisor = 10000000L;
	unsigned char nibble;
	unsigned char data_buf[15];
	int index = 0;

	val = val % 100000000L;

	while (divisor > 0)
	{
		nibble = val / divisor;
		data_buf[index++] = nibble+'0';
		val = val - (nibble * divisor);
		x++;
		divisor /= 10;
	}

	data_buf [index] = 0;
	draw_text(fnt_ptr, font_w, font_h, x,y,color, data_buf);
	return 0;
}


void fill_rect(int x, int y, int w, int h, unsigned long color) {
	RECT rc;
	rc.left = x;
	rc.right = x+w;
	rc.top = y;
	rc.bottom = y+h;
	FillRect(&rc, color);
}

void draw_bitmap(struct bits *raw_bits,  int x, int y, int w, int h, int orig_w, int orig_h, unsigned long ckey) {
	int i,z;

	for(i = 0; i < w; i++)
		for(z = h; z > 0; z--) {
			int pos_x = GetFX(orig_w,i,w);
			int pos_y = GetFZ(orig_h,z,h);
			unsigned long color = map_rgb(raw_bits[pos_x+(pos_y*orig_w)].r, raw_bits[pos_x+(pos_y*orig_w)].g, raw_bits[pos_x+(pos_y*orig_w)].b);
			if(color != ckey)
			set_pixel(i+x,z+y,color);
		}

}

unsigned long map_rgb(unsigned char r, unsigned char g, unsigned char b) {
	return ((unsigned long)(((unsigned char)(r)|((unsigned int)((unsigned char)(g))<<8))|(((unsigned long)(unsigned char)(b))<<16)));
}