#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],"276") ;strcpy(e[0],"now") ;strcpy(p[0],"ナウ") ;strcpy(j[0],"今、さて");
strcpy(n[1],"277") ;strcpy(e[1],"often") ;strcpy(p[1],"オッフン") ;strcpy(j[1],"たびたび");
strcpy(n[2],"278") ;strcpy(e[2],"once") ;strcpy(p[2],"ワンス") ;strcpy(j[2],"一度、かつて");
strcpy(n[3],"279") ;strcpy(e[3],"out") ;strcpy(p[3],"アウト") ;strcpy(j[3],"外へ、外に");
strcpy(n[4],"280") ;strcpy(e[4],"over") ;strcpy(p[4],"オーバー") ;strcpy(j[4],"向こうに、終わって");
strcpy(n[5],"281") ;strcpy(e[5],"please") ;strcpy(p[5],"プリーズ") ;strcpy(j[5],"どうぞ");
strcpy(n[6],"282") ;strcpy(e[6],"quickly") ;strcpy(p[6],"クイックリィ") ;strcpy(j[6],"はやく、急いで");
strcpy(n[7],"283") ;strcpy(e[7],"really") ;strcpy(p[7],"リアリィ") ;strcpy(j[7],"ほんとうに");
strcpy(n[8],"284") ;strcpy(e[8],"since") ;strcpy(p[8],"シンス") ;strcpy(j[8],"その後、だから");
strcpy(n[9],"285") ;strcpy(e[9],"slowly") ;strcpy(p[9],"スロウリィ") ;strcpy(j[9],"ゆっくりと");
strcpy(n[10],"286");strcpy(e[10],"so");strcpy(p[10],"ソオ") ;strcpy(j[10],"そう、そうなに");
strcpy(n[11],"287");strcpy(e[11],"sometimes");strcpy(p[11],"サムタイムス") ;strcpy(j[11],"ときどき");
strcpy(n[12],"288");strcpy(e[12],"soon");strcpy(p[12],"スーン") ;strcpy(j[12],"まもなく、すぐに");
strcpy(n[13],"289");strcpy(e[13],"still");strcpy(p[13],"シティル") ;strcpy(j[13],"まだ、それでもなお");
strcpy(n[14],"290");strcpy(e[14],"then");strcpy(p[14],"ゼン") ;strcpy(j[14],"それから、それでは");
strcpy(n[15],"291");strcpy(e[15],"there");strcpy(p[15],"ゼア") ;strcpy(j[15],"そこに、そこで");
strcpy(n[16],"292");strcpy(e[16],"throught");strcpy(p[16],"スルー") ;strcpy(j[16],"通して");
strcpy(n[17],"293");strcpy(e[17],"together");strcpy(p[17],"トゥギャザー") ;strcpy(j[17],"一緒に");
strcpy(n[18],"294");strcpy(e[18],"too");strcpy(p[18],"トゥー") ;strcpy(j[18],"〜もまた");
strcpy(n[19],"295");strcpy(e[19],"up");strcpy(p[19],"アップ") ;strcpy(j[19],"上へ、上に");
strcpy(n[20],"296");strcpy(e[20],"usually");strcpy(p[20],"ユージュアリィ") ;strcpy(j[20],"ふつうは");
strcpy(n[21],"297");strcpy(e[21],"very");strcpy(p[21],"ベリー") ;strcpy(j[21],"非常に");
strcpy(n[22],"298");strcpy(e[22],"well");strcpy(p[22],"ウェル") ;strcpy(j[22],"よく、上手に");
strcpy(n[23],"299");strcpy(e[23],"without");strcpy(p[23],"ウィズアウト") ;strcpy(j[23],"外に、〜なしで");
strcpy(n[24],"300");strcpy(e[24],"yet");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;};
		};
	}
}