1 // (c) Copyright 2006,2007 notaz, All rights reserved.
\r
2 // Free for non-commercial use.
\r
4 // For commercial use, separate licencing terms must be obtained.
\r
13 #include "readpng.h"
\r
14 #include "lprintf.h"
\r
20 char menuErrorMsg[64] = { 0, };
\r
22 // PicoPad[] format: MXYZ SACB RLDU
\r
23 me_bind_action me_ctrl_actions[15] =
\r
26 { "DOWN ", 0x0002 },
\r
27 { "LEFT ", 0x0004 },
\r
28 { "RIGHT ", 0x0008 },
\r
32 { "A turbo", 0x4000 },
\r
33 { "B turbo", 0x1000 },
\r
34 { "C turbo", 0x2000 },
\r
35 { "START ", 0x0080 },
\r
36 { "MODE ", 0x0800 },
\r
45 static unsigned char menu_font_data[10240];
\r
46 static int menu_text_color = 0xffff; // default to white
\r
47 static int menu_sel_color = -1; // disabled
\r
49 // draws text to current bbp16 screen
\r
50 static void text_out16_(int x, int y, const char *text, int color)
\r
52 int i, l, u, tr, tg, tb, len;
\r
53 unsigned short *dest = (unsigned short *)SCREEN_BUFFER + x + y*SCREEN_WIDTH;
\r
54 tr = (color & 0xf800) >> 8;
\r
55 tg = (color & 0x07e0) >> 3;
\r
56 tb = (color & 0x001f) << 3;
\r
58 if (text == (void *)1)
\r
67 for (i = 0; i < len; i++)
\r
69 unsigned char *src = menu_font_data + (unsigned int)text[i]*4*10;
\r
70 unsigned short *dst = dest;
\r
71 for (l = 0; l < 10; l++, dst += SCREEN_WIDTH-8)
\r
73 for (u = 8/2; u > 0; u--, src++)
\r
77 r = (*dst & 0xf800) >> 8;
\r
78 g = (*dst & 0x07e0) >> 3;
\r
79 b = (*dst & 0x001f) << 3;
\r
80 r = (c^0xf)*r/15 + c*tr/15;
\r
81 g = (c^0xf)*g/15 + c*tg/15;
\r
82 b = (c^0xf)*b/15 + c*tb/15;
\r
83 *dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);
\r
85 r = (*dst & 0xf800) >> 8;
\r
86 g = (*dst & 0x07e0) >> 3;
\r
87 b = (*dst & 0x001f) << 3;
\r
88 r = (c^0xf)*r/15 + c*tr/15;
\r
89 g = (c^0xf)*g/15 + c*tg/15;
\r
90 b = (c^0xf)*b/15 + c*tb/15;
\r
91 *dst++ = ((r<<8)&0xf800) | ((g<<3)&0x07e0) | (b>>3);
\r
98 void text_out16(int x, int y, const char *texto, ...)
\r
103 va_start(args,texto);
\r
104 vsprintf(buffer,texto,args);
\r
107 text_out16_(x,y,buffer,menu_text_color);
\r
111 void smalltext_out16(int x, int y, const char *texto, int color)
\r
114 unsigned char *src;
\r
115 unsigned short *dst;
\r
117 for (i = 0;; i++, x += 6)
\r
119 unsigned char c = (unsigned char) texto[i];
\r
124 src = fontdata6x8[c];
\r
125 dst = (unsigned short *)SCREEN_BUFFER + x + y*SCREEN_WIDTH;
\r
132 if( *src & w ) *dst = color;
\r
138 dst += SCREEN_WIDTH-6;
\r
143 void smalltext_out16_lim(int x, int y, const char *texto, int color, int max)
\r
145 char buffer[SCREEN_WIDTH/6+1];
\r
147 strncpy(buffer, texto, SCREEN_WIDTH/6);
\r
148 if (max > SCREEN_WIDTH/6) max = SCREEN_WIDTH/6;
\r
149 if (max < 0) max = 0;
\r
152 smalltext_out16(x, y, buffer, color);
\r
155 void menu_draw_selection(int x, int y, int w)
\r
158 unsigned short *dst, *dest;
\r
160 text_out16_(x, y, (void *)1, (menu_sel_color < 0) ? menu_text_color : menu_sel_color);
\r
162 if (menu_sel_color < 0) return; // no selection hilight
\r
165 dest = (unsigned short *)SCREEN_BUFFER + x + y*SCREEN_WIDTH + 14;
\r
166 for (h = 11; h > 0; h--)
\r
169 for (i = w; i > 0; i--)
\r
170 *dst++ = menu_sel_color;
\r
171 dest += SCREEN_WIDTH;
\r
175 static int parse_hex_color(char *buff)
\r
178 int t = (int) strtoul(buff, &endp, 16);
\r
181 return ((t<<8)&0xf800) | ((t>>5)&0x07e0) | ((t>>19)&0x1f);
\r
183 return ((t>>8)&0xf800) | ((t>>5)&0x07e0) | ((t>>3)&0x1f);
\r
188 void menu_init(void)
\r
191 unsigned char *fd = menu_font_data;
\r
195 // generate default font from fontdata8x8
\r
196 memset(menu_font_data, 0, sizeof(menu_font_data));
\r
197 for (c = 0; c < 256; c++)
\r
199 for (l = 0; l < 8; l++)
\r
201 unsigned char fd8x8 = fontdata8x8[c*8+l];
\r
202 if (fd8x8&0x80) *fd |= 0xf0;
\r
203 if (fd8x8&0x40) *fd |= 0x0f; fd++;
\r
204 if (fd8x8&0x20) *fd |= 0xf0;
\r
205 if (fd8x8&0x10) *fd |= 0x0f; fd++;
\r
206 if (fd8x8&0x08) *fd |= 0xf0;
\r
207 if (fd8x8&0x04) *fd |= 0x0f; fd++;
\r
208 if (fd8x8&0x02) *fd |= 0xf0;
\r
209 if (fd8x8&0x01) *fd |= 0x0f; fd++;
\r
211 fd += 8*2/2; // 2 empty lines
\r
214 // load custom font and selector (stored as 1st symbol in font table)
\r
215 readpng(menu_font_data, "skin/font.png", READPNG_FONT);
\r
216 memcpy(menu_font_data, menu_font_data + ((int)'>')*4*10, 4*10); // default selector symbol is '>'
\r
217 readpng(menu_font_data, "skin/selector.png", READPNG_SELECTOR);
\r
219 // load custom colors
\r
220 f = fopen("skin/skin.txt", "r");
\r
223 lprintf("found skin.txt\n");
\r
226 fgets(buff, sizeof(buff), f);
\r
227 if (buff[0] == '#' || buff[0] == '/') continue; // comment
\r
228 if (buff[0] == '\r' || buff[0] == '\n') continue; // empty line
\r
229 if (strncmp(buff, "text_color=", 11) == 0)
\r
231 int tmp = parse_hex_color(buff+11);
\r
232 if (tmp >= 0) menu_text_color = tmp;
\r
233 else lprintf("skin.txt: parse error for text_color\n");
\r
235 else if (strncmp(buff, "selection_color=", 16) == 0)
\r
237 int tmp = parse_hex_color(buff+16);
\r
238 if (tmp >= 0) menu_sel_color = tmp;
\r
239 else lprintf("skin.txt: parse error for selection_color\n");
\r
242 lprintf("skin.txt: parse error: %s\n", buff);
\r
249 int me_id2offset(const menu_entry *entries, int count, menu_id id)
\r
252 for (i = 0; i < count; i++)
\r
254 if (entries[i].id == id) return i;
\r
257 lprintf("%s: id %i not found\n", __FUNCTION__, id);
\r
261 void me_enable(menu_entry *entries, int count, menu_id id, int enable)
\r
263 int i = me_id2offset(entries, count, id);
\r
264 entries[i].enabled = enable;
\r
267 int me_count_enabled(const menu_entry *entries, int count)
\r
271 for (i = 0; i < count; i++)
\r
273 if (entries[i].enabled) ret++;
\r
279 menu_id me_index2id(const menu_entry *entries, int count, int index)
\r
283 for (i = 0; i < count; i++)
\r
285 if (entries[i].enabled)
\r
287 if (index == 0) break;
\r
291 if (i >= count) i = count - 1;
\r
292 return entries[i].id;
\r
295 void me_draw(const menu_entry *entries, int count, int x, int y, me_draw_custom_f *cust_draw, void *param)
\r
299 for (i = 0; i < count; i++)
\r
301 if (!entries[i].enabled) continue;
\r
302 if (entries[i].name == NULL)
\r
304 if (cust_draw != NULL)
\r
305 cust_draw(&entries[i], x, y1, param);
\r
309 text_out16(x, y1, entries[i].name);
\r
310 if (entries[i].beh == MB_ONOFF)
\r
311 text_out16(x + 27*8, y1, (*(int *)entries[i].var & entries[i].mask) ? "ON" : "OFF");
\r
312 else if (entries[i].beh == MB_RANGE)
\r
313 text_out16(x + 27*8, y1, "%i", *(int *)entries[i].var);
\r
318 int me_process(menu_entry *entries, int count, menu_id id, int is_next)
\r
320 int i = me_id2offset(entries, count, id);
\r
321 menu_entry *entry = &entries[i];
\r
322 switch (entry->beh)
\r
325 *(int *)entry->var ^= entry->mask;
\r
328 *(int *)entry->var += is_next ? 1 : -1;
\r
329 if (*(int *)entry->var < (int)entry->min) *(int *)entry->var = (int)entry->min;
\r
330 if (*(int *)entry->var > (int)entry->max) *(int *)entry->var = (int)entry->max;
\r
337 // ------------ debug menu ------------
\r
339 #include <sys/stat.h>
\r
340 #include <sys/types.h>
\r
342 #include <pico/pico.h>
\r
343 #include <pico/debug.h>
\r
345 void SekStepM68k(void);
\r
347 static void mplayer_loop(void)
\r
354 if (in_menu_wait_any(0) & PBTN_NORTH) break;
\r
361 static void draw_text_debug(const char *str, int skip, int from)
\r
369 while (*p && *p != '\n') p++;
\r
370 if (*p == 0 || p[1] == 0) return;
\r
375 for (line = from; line < SCREEN_HEIGHT/10; line++)
\r
377 while (*p && *p != '\n') p++;
\r
379 if (len > 55) len = 55;
\r
380 smalltext_out16_lim(1, line*10, str, 0xffff, len);
\r
381 if (*p == 0) break;
\r
386 static void draw_frame_debug(void)
\r
388 char layer_str[48] = "layers: ";
\r
389 if (PicoDrawMask & PDRAW_LAYERB_ON) memcpy(layer_str + 8, "B", 1);
\r
390 if (PicoDrawMask & PDRAW_LAYERA_ON) memcpy(layer_str + 10, "A", 1);
\r
391 if (PicoDrawMask & PDRAW_SPRITES_LOW_ON) memcpy(layer_str + 12, "spr_lo", 6);
\r
392 if (PicoDrawMask & PDRAW_SPRITES_HI_ON) memcpy(layer_str + 19, "spr_hi", 6);
\r
395 emu_forcedFrame(0);
\r
396 smalltext_out16(4, SCREEN_HEIGHT-8, layer_str, 0xffff);
\r
399 void debug_menu_loop(void)
\r
402 int spr_offs = 0, dumped = 0;
\r
409 case 0: menu_draw_begin();
\r
410 tmp = PDebugMain();
\r
411 emu_platformDebugCat(tmp);
\r
412 draw_text_debug(tmp, 0, 0);
\r
414 smalltext_out16(SCREEN_WIDTH-6*10, SCREEN_HEIGHT-8, "dumped", 0xffff);
\r
418 case 1: draw_frame_debug(); break;
\r
419 case 2: clear_screen();
\r
420 emu_forcedFrame(0);
\r
422 PDebugShowSpriteStats((unsigned short *)SCREEN_BUFFER + (SCREEN_HEIGHT/2 - 240/2)*SCREEN_WIDTH +
\r
423 SCREEN_WIDTH/2 - 320/2, SCREEN_WIDTH); break;
\r
424 case 3: clear_screen();
\r
425 PDebugShowPalette(SCREEN_BUFFER, SCREEN_WIDTH);
\r
426 PDebugShowSprite((unsigned short *)SCREEN_BUFFER + SCREEN_WIDTH*120+SCREEN_WIDTH/2+16,
\r
427 SCREEN_WIDTH, spr_offs);
\r
428 draw_text_debug(PDebugSpriteList(), spr_offs, 6);
\r
433 inp = in_menu_wait(PBTN_EAST|PBTN_MBACK|PBTN_WEST|PBTN_NORTH|PBTN_L|PBTN_R|PBTN_UP|PBTN_DOWN|PBTN_LEFT|PBTN_RIGHT);
\r
434 if (inp & PBTN_MBACK) return;
\r
435 if (inp & PBTN_L) { mode--; if (mode < 0) mode = 3; }
\r
436 if (inp & PBTN_R) { mode++; if (mode > 3) mode = 0; }
\r
440 if (inp & PBTN_EAST) SekStepM68k();
\r
441 if (inp & PBTN_NORTH) {
\r
442 while (inp & PBTN_NORTH) inp = in_menu_wait_any(-1);
\r
445 if ((inp & (PBTN_WEST|PBTN_LEFT)) == (PBTN_WEST|PBTN_LEFT)) {
\r
446 mkdir("dumps", 0777);
\r
448 while (inp & PBTN_WEST) inp = in_menu_wait_any(-1);
\r
453 if (inp & PBTN_LEFT) PicoDrawMask ^= PDRAW_LAYERB_ON;
\r
454 if (inp & PBTN_RIGHT) PicoDrawMask ^= PDRAW_LAYERA_ON;
\r
455 if (inp & PBTN_DOWN) PicoDrawMask ^= PDRAW_SPRITES_LOW_ON;
\r
456 if (inp & PBTN_UP) PicoDrawMask ^= PDRAW_SPRITES_HI_ON;
\r
457 if (inp & PBTN_EAST) {
\r
458 PsndOut = NULL; // just in case
\r
462 while (inp & PBTN_EAST) inp = in_menu_wait_any(-1);
\r
466 if (inp & PBTN_DOWN) spr_offs++;
\r
467 if (inp & PBTN_UP) spr_offs--;
\r
468 if (spr_offs < 0) spr_offs = 0;
\r
476 // ------------ util ------------
\r
478 const char *me_region_name(unsigned int code, int auto_order)
\r
480 static const char *names[] = { "Auto", " Japan NTSC", " Japan PAL", " USA", " Europe" };
\r
481 static const char *names_short[] = { "", " JP", " JP", " US", " EU" };
\r
485 while((code >>= 1)) i++;
\r
486 if (i > 4) return "unknown";
\r
489 static char name[24];
\r
490 strcpy(name, "Auto:");
\r
491 for (u = 0; u < 3; u++) {
\r
492 i = 0; code = ((auto_order >> u*4) & 0xf) << 1;
\r
493 while((code >>= 1)) i++;
\r
494 strcat(name, names_short[i]);
\r