#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],"251") ;strcpy(e[0],"worng") ;strcpy(p[0],"ロング") ;strcpy(j[0],"悪い、まちがった");
strcpy(n[1],"252") ;strcpy(e[1],"young") ;strcpy(p[1],"ヤング") ;strcpy(j[1],"若い");
strcpy(n[2],"253") ;strcpy(e[2],"about") ;strcpy(p[2],"アバウト") ;strcpy(j[2],"約、おおよそ");
strcpy(n[3],"254") ;strcpy(e[3],"after") ;strcpy(p[3],"アフター") ;strcpy(j[3],"あとに");
strcpy(n[4],"255") ;strcpy(e[4],"again") ;strcpy(p[4],"アゲイン") ;strcpy(j[4],"再び、また");
strcpy(n[5],"256") ;strcpy(e[5],"ago") ;strcpy(p[5],"アゴー") ;strcpy(j[5],"前に");
strcpy(n[6],"257") ;strcpy(e[6],"all") ;strcpy(p[6],"オール") ;strcpy(j[6],"すべて");
strcpy(n[7],"258") ;strcpy(e[7],"already") ;strcpy(p[7],"オーレディ") ;strcpy(j[7],"すでに");
strcpy(n[8],"259") ;strcpy(e[8],"also") ;strcpy(p[8],"オルソー") ;strcpy(j[8],"〜もまた");
strcpy(n[9],"260") ;strcpy(e[9],"always") ;strcpy(p[9],"オルウェイズ") ;strcpy(j[9],"いつも、常に");
strcpy(n[10],"261");strcpy(e[10],"any");strcpy(p[10],"エニィ") ;strcpy(j[10],"少しも");
strcpy(n[11],"262");strcpy(e[11],"as");strcpy(p[11],"アズ") ;strcpy(j[11],"〜と同じく");
strcpy(n[12],"263");strcpy(e[12],"away");strcpy(p[12],"アウェイ") ;strcpy(j[12],"はなれて");
strcpy(n[13],"264");strcpy(e[13],"back");strcpy(p[13],"バック") ;strcpy(j[13],"後ろに");
strcpy(n[14],"265");strcpy(e[14],"before");strcpy(p[14],"ビフォー") ;strcpy(j[14],"前に");
strcpy(n[15],"266");strcpy(e[15],"between");strcpy(p[15],"ビトウィーン") ;strcpy(j[15],"間に");
strcpy(n[16],"267");strcpy(e[16],"but");strcpy(p[16],"バット") ;strcpy(j[16],"しかし、ほんの");
strcpy(n[17],"268");strcpy(e[17],"by");strcpy(p[17],"バイ") ;strcpy(j[17],"そばに、近くに");
strcpy(n[18],"269");strcpy(e[18],"either");strcpy(p[18],"イーザー") ;strcpy(j[18],"〜も〜でない");
strcpy(n[19],"270");strcpy(e[19],"ever");strcpy(p[19],"エバー") ;strcpy(j[19],"かって、いつか");
strcpy(n[20],"271");strcpy(e[20],"first");strcpy(p[20],"ファースト") ;strcpy(j[20],"はじめに");
strcpy(n[21],"272");strcpy(e[21],"here");strcpy(p[21],"ヒア") ;strcpy(j[21],"ここに");
strcpy(n[22],"273");strcpy(e[22],"more");strcpy(p[22],"モア") ;strcpy(j[22],"もっと、さらに");
strcpy(n[23],"274");strcpy(e[23],"most");strcpy(p[23],"モウスト") ;strcpy(j[23],"最も");
strcpy(n[24],"275");strcpy(e[24],"never");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;};
		};
	}
}