#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],"526") ;strcpy(e[0],"thirteen") ;strcpy(p[0],"サーティン") ;strcpy(j[0],"１３");
strcpy(n[1],"527") ;strcpy(e[1],"fourteen") ;strcpy(p[1],"フォーティン") ;strcpy(j[1],"１４");
strcpy(n[2],"528") ;strcpy(e[2],"fifteen") ;strcpy(p[2],"フィフティーン") ;strcpy(j[2],"１５");
strcpy(n[3],"529") ;strcpy(e[3],"sixteen") ;strcpy(p[3],"シックスティーン") ;strcpy(j[3],"１６");
strcpy(n[4],"530") ;strcpy(e[4],"seventeen") ;strcpy(p[4],"セブンティーン") ;strcpy(j[4],"１７");
strcpy(n[5],"531") ;strcpy(e[5],"eighteen") ;strcpy(p[5],"エイティーン") ;strcpy(j[5],"１８");
strcpy(n[6],"532") ;strcpy(e[6],"nineteen") ;strcpy(p[6],"ナインティーン") ;strcpy(j[6],"１９");
strcpy(n[7],"533") ;strcpy(e[7],"twenty") ;strcpy(p[7],"トウェンティ") ;strcpy(j[7],"２０");
strcpy(n[8],"534") ;strcpy(e[8],"thirty") ;strcpy(p[8],"サーティ") ;strcpy(j[8],"３０");
strcpy(n[9],"535") ;strcpy(e[9],"forty") ;strcpy(p[9],"フォーティ") ;strcpy(j[9],"４０");
strcpy(n[10],"536");strcpy(e[10],"fifty");strcpy(p[10],"フィフティ") ;strcpy(j[10],"５０");
strcpy(n[11],"537");strcpy(e[11],"sixty");strcpy(p[11],"シックスティ") ;strcpy(j[11],"６０");
strcpy(n[12],"538");strcpy(e[12],"seventy");strcpy(p[12],"セブンティ") ;strcpy(j[12],"７０");
strcpy(n[13],"539");strcpy(e[13],"eighty");strcpy(p[13],"エイティ") ;strcpy(j[13],"８０");
strcpy(n[14],"540");strcpy(e[14],"ninety");strcpy(p[14],"ナインティ") ;strcpy(j[14],"９０");
strcpy(n[15],"541");strcpy(e[15],"hundred");strcpy(p[15],"ハンドレッド") ;strcpy(j[15],"１００");
strcpy(n[16],"542");strcpy(e[16],"thousand");strcpy(p[16],"サウザンド") ;strcpy(j[16],"１０００");
strcpy(n[17],"543");strcpy(e[17],"first");strcpy(p[17],"ファースト") ;strcpy(j[17],"第１");
strcpy(n[18],"544");strcpy(e[18],"second");strcpy(p[18],"セカンド") ;strcpy(j[18],"第２");
strcpy(n[19],"545");strcpy(e[19],"third");strcpy(p[19],"サード") ;strcpy(j[19],"第３");
strcpy(n[20],"546");strcpy(e[20],"fourth");strcpy(p[20],"フォース") ;strcpy(j[20],"第４");
strcpy(n[21],"547");strcpy(e[21],"fifth");strcpy(p[21],"フィフス") ;strcpy(j[21],"第５");
strcpy(n[22],"548");strcpy(e[22],"sixth");strcpy(p[22],"シックスス") ;strcpy(j[22],"第６");
strcpy(n[23],"549");strcpy(e[23],"seventh");strcpy(p[23],"セブンス") ;strcpy(j[23],"第７");
strcpy(n[24],"550");strcpy(e[24],"eighth");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;};
		};
	}
}