#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],"476") ;strcpy(e[0],"than") ;strcpy(p[0],"ザン") ;strcpy(j[0],"〜より");
strcpy(n[1],"477") ;strcpy(e[1],"across") ;strcpy(p[1],"アクロス") ;strcpy(j[1],"〜を横切って");
strcpy(n[2],"478") ;strcpy(e[2],"among") ;strcpy(p[2],"アマング") ;strcpy(j[2],"〜の中で");
strcpy(n[3],"479") ;strcpy(e[3],"at") ;strcpy(p[3],"アット") ;strcpy(j[3],"〜で、〜に");
strcpy(n[4],"480") ;strcpy(e[4],"between") ;strcpy(p[4],"ビトウィーン") ;strcpy(j[4],"〜の間に");
strcpy(n[5],"481") ;strcpy(e[5],"by") ;strcpy(p[5],"バイ") ;strcpy(j[5],"〜のそばに");
strcpy(n[6],"482") ;strcpy(e[6],"during") ;strcpy(p[6],"デュアリング") ;strcpy(j[6],"〜の間じゅう");
strcpy(n[7],"483") ;strcpy(e[7],"for") ;strcpy(p[7],"フォー") ;strcpy(j[7],"〜のために");
strcpy(n[8],"484") ;strcpy(e[8],"from") ;strcpy(p[8],"フロム") ;strcpy(j[8],"〜から");
strcpy(n[9],"485") ;strcpy(e[9],"in") ;strcpy(p[9],"イン") ;strcpy(j[9],"〜の中に");
strcpy(n[10],"486");strcpy(e[10],"into");strcpy(p[10],"イントゥ") ;strcpy(j[10],"〜の中へ");
strcpy(n[11],"487");strcpy(e[11],"near");strcpy(p[11],"ニア") ;strcpy(j[11],"〜の近くに");
strcpy(n[12],"488");strcpy(e[12],"of");strcpy(p[12],"オブ") ;strcpy(j[12],"〜の、〜について");
strcpy(n[13],"489");strcpy(e[13],"off");strcpy(p[13],"オフ") ;strcpy(j[13],"〜から離れて");
strcpy(n[14],"490");strcpy(e[14],"on");strcpy(p[14],"オン") ;strcpy(j[14],"〜の上に");
strcpy(n[15],"491");strcpy(e[15],"to");strcpy(p[15],"トゥ") ;strcpy(j[15],"〜に、〜へ");
strcpy(n[16],"492");strcpy(e[16],"under");strcpy(p[16],"アンダー") ;strcpy(j[16],"〜の下に");
strcpy(n[17],"493");strcpy(e[17],"until");strcpy(p[17],"アンティル") ;strcpy(j[17],"〜まで");
strcpy(n[18],"494");strcpy(e[18],"with");strcpy(p[18],"ウィズ") ;strcpy(j[18],"〜とともに");
strcpy(n[19],"495");strcpy(e[19],"January");strcpy(p[19],"ジャニュアリィ") ;strcpy(j[19],"１月");
strcpy(n[20],"496");strcpy(e[20],"February");strcpy(p[20],"フェブュラリィ") ;strcpy(j[20],"２月");
strcpy(n[21],"497");strcpy(e[21],"March");strcpy(p[21],"マーチ") ;strcpy(j[21],"３月");
strcpy(n[22],"498");strcpy(e[22],"April");strcpy(p[22],"エイプリィル") ;strcpy(j[22],"４月");
strcpy(n[23],"499");strcpy(e[23],"May");strcpy(p[23],"メイ") ;strcpy(j[23],"５月");
strcpy(n[24],"500");strcpy(e[24],"June");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;};
		};
	}
}