#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],"001") ;strcpy(e[0],"sky") ;strcpy(p[0],"スカイ") ;strcpy(j[0],"空");
strcpy(n[1],"002") ;strcpy(e[1],"star") ;strcpy(p[1],"スター") ;strcpy(j[1],"星");
strcpy(n[2],"003") ;strcpy(e[2],"sun") ;strcpy(p[2],"サン") ;strcpy(j[2],"太陽");
strcpy(n[3],"004") ;strcpy(e[3],"moon") ;strcpy(p[3],"ムーン") ;strcpy(j[3],"月");
strcpy(n[4],"005") ;strcpy(e[4],"season") ;strcpy(p[4],"シーズン") ;strcpy(j[4],"季節");
strcpy(n[5],"006") ;strcpy(e[5],"spring") ;strcpy(p[5],"スプリング") ;strcpy(j[5],"春");
strcpy(n[6],"007") ;strcpy(e[6],"summer") ;strcpy(p[6],"サマー") ;strcpy(j[6],"夏");
strcpy(n[7],"008") ;strcpy(e[7],"fall") ;strcpy(p[7],"フォール") ;strcpy(j[7],"秋");
strcpy(n[8],"009") ;strcpy(e[8],"winter") ;strcpy(p[8],"ウィンター") ;strcpy(j[8],"冬");
strcpy(n[9],"010") ;strcpy(e[9],"sea") ;strcpy(p[9],"シー") ;strcpy(j[9],"海");
strcpy(n[10],"011");strcpy(e[10],"ground");strcpy(p[10],"グラウンド") ;strcpy(j[10],"地面");
strcpy(n[11],"012");strcpy(e[11],"river");strcpy(p[11],"リバー") ;strcpy(j[11],"川");
strcpy(n[12],"013");strcpy(e[12],"lake");strcpy(p[12],"レイク") ;strcpy(j[12],"湖");
strcpy(n[13],"014");strcpy(e[13],"mountain");strcpy(p[13],"マウンテン") ;strcpy(j[13],"山");
strcpy(n[14],"015");strcpy(e[14],"hill");strcpy(p[14],"ヒル") ;strcpy(j[14],"丘");
strcpy(n[15],"016");strcpy(e[15],"wind");strcpy(p[15],"ウィンド") ;strcpy(j[15],"風");
strcpy(n[16],"017");strcpy(e[16],"rain");strcpy(p[16],"レイン") ;strcpy(j[16],"雨");
strcpy(n[17],"018");strcpy(e[17],"snow");strcpy(p[17],"スノウ") ;strcpy(j[17],"雪");
strcpy(n[18],"019");strcpy(e[18],"cloud");strcpy(p[18],"クラウド") ;strcpy(j[18],"雲");
strcpy(n[19],"020");strcpy(e[19],"dark");strcpy(p[19],"ダーク") ;strcpy(j[19],"くらやみ");
strcpy(n[20],"021");strcpy(e[20],"cool");strcpy(p[20],"クール") ;strcpy(j[20],"冷気");
strcpy(n[21],"022");strcpy(e[21],"day");strcpy(p[21],"デイ") ;strcpy(j[21],"日、昼間");
strcpy(n[22],"023");strcpy(e[22],"night");strcpy(p[22],"ナイト") ;strcpy(j[22],"夜、晩");
strcpy(n[23],"024");strcpy(e[23],"morning");strcpy(p[23],"モーニング") ;strcpy(j[23],"朝、午前");
strcpy(n[24],"025");strcpy(e[24],"noon");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(15, 11, p[a-1]);
		if ((1<=(a+i)) && ((a+i)<=25)) {a=a+i;b=0;}
		else {b=0;};
		};
	}
}