#include <string.h>
#include <sys/bios.h>

char n[25][4], e[25][15], p[25][20], j[25][20];
int a=1, b=0, c=0;

void main()
{
int dispdata();
int key;

strcpy(n[0],"501") ;strcpy(e[0],"July") ;strcpy(p[0],"ジュライ") ;strcpy(j[0],"７月");
strcpy(n[1],"502") ;strcpy(e[1],"August") ;strcpy(p[1],"オーガスト") ;strcpy(j[1],"８月");
strcpy(n[2],"503") ;strcpy(e[2],"September") ;strcpy(p[2],"セプテンバー") ;strcpy(j[2],"９月");
strcpy(n[3],"504") ;strcpy(e[3],"Octorber") ;strcpy(p[3],"オクトーバー") ;strcpy(j[3],"１０月");
strcpy(n[4],"505") ;strcpy(e[4],"November") ;strcpy(p[4],"ノーベンバー") ;strcpy(j[4],"１１月");
strcpy(n[5],"506") ;strcpy(e[5],"December") ;strcpy(p[5],"ディセンバー") ;strcpy(j[5],"１２月");
strcpy(n[6],"507") ;strcpy(e[6],"Sunday") ;strcpy(p[6],"サンデイ") ;strcpy(j[6],"日曜日");
strcpy(n[7],"508") ;strcpy(e[7],"Monday") ;strcpy(p[7],"マンデイ") ;strcpy(j[7],"月曜日");
strcpy(n[8],"509") ;strcpy(e[8],"Tuesday") ;strcpy(p[8],"チューズデイ") ;strcpy(j[8],"火曜日");
strcpy(n[9],"510") ;strcpy(e[9],"Wednesday") ;strcpy(p[9],"ウェンズデイ") ;strcpy(j[9],"水曜日");
strcpy(n[10],"511");strcpy(e[10],"Thursday");strcpy(p[10],"サーズディ") ;strcpy(j[10],"木曜日");
strcpy(n[11],"512");strcpy(e[11],"Friday");strcpy(p[11],"フライデイ") ;strcpy(j[11],"金曜日");
strcpy(n[12],"513");strcpy(e[12],"Saturday");strcpy(p[12],"サタデイ") ;strcpy(j[12],"土曜日");
strcpy(n[13],"514");strcpy(e[13],"one");strcpy(p[13],"ワン") ;strcpy(j[13],"１");
strcpy(n[14],"515");strcpy(e[14],"two");strcpy(p[14],"ツー") ;strcpy(j[14],"２");
strcpy(n[15],"516");strcpy(e[15],"three");strcpy(p[15],"スリー") ;strcpy(j[15],"３");
strcpy(n[16],"517");strcpy(e[16],"four");strcpy(p[16],"フォー") ;strcpy(j[16],"４");
strcpy(n[17],"518");strcpy(e[17],"five");strcpy(p[17],"ファイブ") ;strcpy(j[17],"５");
strcpy(n[18],"519");strcpy(e[18],"six");strcpy(p[18],"シックス") ;strcpy(j[18],"６");
strcpy(n[19],"520");strcpy(e[19],"seven");strcpy(p[19],"セブン") ;strcpy(j[19],"７");
strcpy(n[20],"521");strcpy(e[20],"eight");strcpy(p[20],"エイト") ;strcpy(j[20],"８");
strcpy(n[21],"522");strcpy(e[21],"nine");strcpy(p[21],"ナイン") ;strcpy(j[21],"９");
strcpy(n[22],"523");strcpy(e[22],"ten");strcpy(p[22],"テン") ;strcpy(j[22],"１０");
strcpy(n[23],"524");strcpy(e[23],"eleven");strcpy(p[23],"イレブン") ;strcpy(j[23],"１１");
strcpy(n[24],"525");strcpy(e[24],"twelve");strcpy(p[24],"トゥエルブ") ;strcpy(j[24],"１２");

text_screen_init(); 
text_put_string(9, 5, "S T A R T");

while ((key = key_wait()) != KEY_START) {
switch (key) {
case KEY_X1:dispdata(-1);break;
case KEY_X2:dispdata(1);break;
case KEY_X3:dispdata(1);break;
case KEY_X4:dispdata(-1);break;
case KEY_Y2:c=1;b=0;dispdata(0);break;
case KEY_Y4:c=0;b=0;dispdata(0);break;
case KEY_A:dispdata(1);break;
case KEY_B:dispdata(-1);break;
}
}
}

dispdata(i)
int i;
{
if (c==0) {
	if (b==0) { 
		text_screen_init(); 
		text_put_string(5, 3, n[a-1]);
		text_put_string(5, 7, e[a-1]);
		text_put_string(17, 7, p[a-1]);
		b=1;}
	else { 
		text_put_string(5, 11, j[a-1]);
		if ((1<=(a+i)) && ((a+i)<=25)) {a=a+i;b=0;}
		else {b=0;};
		};
	}
else {
	if (b==0) { 
		text_screen_init(); 
		text_put_string(5, 3, n[a-1]);
		text_put_string(5, 7, j[a-1]);
		b=1;}
	else { 
		text_put_string(5, 11, e[a-1]);
		text_put_string(17, 11, p[a-1]);
		if ((1<=(a+i)) && ((a+i)<=25)) {a=a+i;b=0;}
		else {b=0;};
		};
	}
}