#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],"301") ;strcpy(e[0],"answer") ;strcpy(p[0],"アンサー") ;strcpy(j[0],"答える");
strcpy(n[1],"302") ;strcpy(e[1],"arrive") ;strcpy(p[1],"アライブ") ;strcpy(j[1],"到着する");
strcpy(n[2],"303") ;strcpy(e[2],"ask") ;strcpy(p[2],"アスク") ;strcpy(j[2],"たずねる、求める");
strcpy(n[3],"304") ;strcpy(e[3],"call") ;strcpy(p[3],"コール") ;strcpy(j[3],"よぶ、訪ねる");
strcpy(n[4],"305") ;strcpy(e[4],"carry") ;strcpy(p[4],"キャリー") ;strcpy(j[4],"運ぶ、伝える");
strcpy(n[5],"306") ;strcpy(e[5],"clean") ;strcpy(p[5],"クリーン") ;strcpy(j[5],"きれいにする");
strcpy(n[6],"307") ;strcpy(e[6],"close") ;strcpy(p[6],"クローズ") ;strcpy(j[6],"閉じる");
strcpy(n[7],"308") ;strcpy(e[7],"cook") ;strcpy(p[7],"クック") ;strcpy(j[7],"料理する");
strcpy(n[8],"309") ;strcpy(e[8],"cool") ;strcpy(p[8],"クール") ;strcpy(j[8],"ひやす、ひえる");
strcpy(n[9],"310") ;strcpy(e[9],"cry") ;strcpy(p[9],"クライ") ;strcpy(j[9],"泣く");
strcpy(n[10],"311");strcpy(e[10],"enjoy");strcpy(p[10],"エンジョイ") ;strcpy(j[10],"楽しむ");
strcpy(n[11],"312");strcpy(e[11],"excuse");strcpy(p[11],"エクスキューズ") ;strcpy(j[11],"許す、言い訳する");
strcpy(n[12],"313");strcpy(e[12],"face");strcpy(p[12],"フェィス") ;strcpy(j[12],"〜に面する");
strcpy(n[13],"314");strcpy(e[13],"finish");strcpy(p[13],"フィニシュ") ;strcpy(j[13],"終える、終わる");
strcpy(n[14],"315");strcpy(e[14],"fish");strcpy(p[14],"フィッシュ") ;strcpy(j[14],"魚つりをする");
strcpy(n[15],"316");strcpy(e[15],"head");strcpy(p[15],"ハンド") ;strcpy(j[15],"手渡す");
strcpy(n[16],"317");strcpy(e[16],"help");strcpy(p[16],"ヘルプ") ;strcpy(j[16],"助ける、手伝う");
strcpy(n[17],"318");strcpy(e[17],"hope");strcpy(p[17],"ホープ") ;strcpy(j[17],"望む、期待する");
strcpy(n[18],"319");strcpy(e[18],"introduce");strcpy(p[18],"イントロデュース") ;strcpy(j[18],"紹介する");
strcpy(n[19],"320");strcpy(e[19],"invite");strcpy(p[19],"インバイト") ;strcpy(j[19],"招待する");
strcpy(n[20],"321");strcpy(e[20],"like");strcpy(p[20],"ライク") ;strcpy(j[20],"好む、〜したい");
strcpy(n[21],"322");strcpy(e[21],"listen");strcpy(p[21],"リッスン") ;strcpy(j[21],"聞く");
strcpy(n[22],"323");strcpy(e[22],"live");strcpy(p[22],"リブ") ;strcpy(j[22],"住む、生きる");
strcpy(n[23],"324");strcpy(e[23],"look");strcpy(p[23],"ルック") ;strcpy(j[23],"見る");
strcpy(n[24],"325");strcpy(e[24],"love");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;};
		};
	}
}