//==============================================================================
// RagnarokOnline Original Othello Script Ver1.0   by Blaze
//==============================================================================

//==========================================
// オセロ登録
//------------------------------------------
payon.gat,264,249,3	script	きのこ栽培員#Othello	125,{
	if('player[1] == getcharid(0) || 'player[2] == getcharid(0)) {	//プレイヤーだったら
		if('flag == 1) {
			mes "[きのこ栽培員]";
			mes "一緒に手伝ってくれる人は";
			mes "まだ来ないのかい？";
			mes "あまり長く待たせるようだったら";
			mes "他の人に頼むことにするから";
			mes "悪く思うなよ。";
			close;
		}
		if('flag == 2) {
			mes "[きのこ栽培員]";
			mes "おっ、頑張って自分のきのこを";
			mes "多く植えてくれよ。";
			mes "何か私に用かい？";
			next;
			if('player[$@Othello_Turn] == getcharid(0)) {
				set '@word1$,"パスする";
				set '@word2$,"ギブアップする";
			}
			switch(select("ゲーム状況を見る",'@word1$,'@word2$,"やめる")) {
			case 1:
				for(set '@i,1; '@i<=8; set '@i,'@i+1)
					mes (($@Othello_Cell[1]['@i]==1)? "^FF3100●":(($@Othello_Cell[1]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[2]['@i]==1)? "^FF3100●":(($@Othello_Cell[2]['@i]==2)? "^313131●":"^CECECE□"))+(($@Othello_Cell[3]['@i]==1)? "^FF3100●":(($@Othello_Cell[3]['@i]==2)? "^313131●":"^CECECE□"))+(($@Othello_Cell[4]['@i]==1)? "^FF3100●":(($@Othello_Cell[4]['@i]==2)? "^313131●":"^CECECE□"))+(($@Othello_Cell[5]['@i]==1)? "^FF3100●":(($@Othello_Cell[5]['@i]==2)? "^313131●":"^CECECE□"))+(($@Othello_Cell[6]['@i]==1)? "^FF3100●":(($@Othello_Cell[6]['@i]==2)? "^313131●":"^CECECE□"))+(($@Othello_Cell[7]['@i]==1)? "^FF3100●":(($@Othello_Cell[7]['@i]==2)? "^313131●":"^CECECE□"))+(($@Othello_Cell[8]['@i]==1)? "^FF3100●":(($@Othello_Cell[8]['@i]==2)? "^313131●":"^CECECE□"));
				break;
			case 2:
				mes "[きのこ栽培員]";
				mes "今の自分の番をパスするのか？";
				next;
				if(select("はい","いいえ")==1) {
					areaannounce "payon.gat",230,220,280,260,getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さんがパスしました。",9;
					if($@Othello_Turn == 1)
						set $@Othello_Turn,2;
					else
						set $@Othello_Turn,1;
					initnpctimer "Othello_Game";
				}
				break;
			case 3:
				mes "[きのこ栽培員]";
				mes "本当にギブアップするのか？";
				next;
				if(select("はい","いいえ")==1) {
					set 'flag,3;
					stopnpctimer "Othello_Game";
					areaannounce "payon.gat",230,220,280,260,getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さんがギブアップしました。",9;
					areasoundeffect "payon.gat",230,220,280,260,"taming_fail.wav",0;
					donpcevent "Othello_Fin::OnEnd";
				}
				break;
			}
			close;
		}
		if('flag == 3) {
			mes "[きのこ栽培員]";
			mes "今、きのこの収集中なんだ。";
			mes "もうちょっと待ってくれよ。";
			close;
		}
	}
	mes "[きのこ栽培員]";
	mes "こんにちは。";
	mes "今、オセロきのこの栽培を";
	mes "手伝ってくれる人を探しているんだ。";
	mes "もしよかったら手伝ってくれないか？";
	next;
	switch(select("手伝う","オセロきのこ？","どうやって手伝うの？","また今度")) {
	case 1:
		break;
	case 2:
		mes "[きのこ栽培員]";
		mes "おや？";
		mes "オセロきのこに興味があるのかい？";
		mes "ハハハ、確かに珍しい品種だしな。";
		mes "よし、説明してやろう。";
		next;
		mes "[きのこ栽培員]";
		mes "見ての通り、私はここで";
		mes "オセロきのこを栽培している。";
		mes "元々は普通のきのこだったんだが";
		mes "ある日、おかしなことになってな……";
		next;
		mes "[きのこ栽培員]";
		mes "きのこを栽培しているある日、";
		mes "なんと別々のきのこ同士が";
		mes "近くのきのこを変異させてしまってな。";
		mes "性質や色、味までもが";
		mes "一瞬で変わってしまうんだ。";
		next;
		mes "[きのこ栽培員]";
		mes "胞子により仲間を増やすための";
		mes "きのこ自信の知識だとか、";
		mes "科学的に色々実証されているがな。";
		mes "それでもこのオセロきのこには";
		mes "まだまだ謎の部分が多いんだ。";
		next;
		mes "[きのこ栽培員]";
		mes "どうやら、このオセロきのこは";
		mes "^FF0000他のきのこを挟むことによって";
		mes "そのきのこを変異させる^000000らしい。";
		mes "その性質から、このきのこの名称を";
		mes "遠い国の遊戯の名前から取って、";
		mes "「オセロきのこ」と名付けられた。";
		next;
		mes "[きのこ栽培員]";
		mes "私はこのオセロきのこを";
		mes "栽培しているうちに興味が湧いてな。";
		mes "こうしてオセロきのこを育てながら";
		mes "このきのこについて研究しているんだ。";
		next;
		mes "[きのこ栽培員]";
		mes "最近では2種類のオセロきのこを";
		mes "わざと同じ場所に栽培して、";
		mes "競い合ったりしていたりな。";
		mes "これが結構面白くて、";
		mes "まさに「オセロ」そのものだな。";
		next;
		mes "[きのこ栽培員]";
		mes "今ではこのオセロきのこの";
		mes "栽培を手伝ってくれる人を";
		mes "^FF00002人^000000探しているんだ。";
		mes "君も知り合いと一緒に";
		mes "栽培を手伝ってくれないか？";
		close;
	case 3:
		mes "[きのこ栽培員]";
		mes "お、手伝ってくれる気か？";
		mes "ありがたい、ありがたい。";
		mes "喜んで説明してあげよう。";
		next;
		mes "[きのこ栽培員]";
		mes "難しく栽培といっても、^FF0000きのこの跡^000000に";
		mes "魔法の粉をふりかけるだけだ。";
		mes "誰でも簡単にできることだから";
		mes "安心しな。";
		next;
		mes "[きのこ栽培員]";
		mes "まず、このきのこの栽培には";
		mes "^FF00002人^000000で手伝ってもらう。";
		mes "どうしても1人では難しい仕事だから";
		mes "誰か知り合いでも連れてきてくれ。";
		next;
		mes "[きのこ栽培員]";
		mes "2人には別々の色のオセロきのこを";
		mes "交互に栽培してもらう。";
		mes "あまり時間をかけるといけないから";
		mes "^FF00002分以内^000000に場所を決めてくれよ。";
		next;
		mes "[きのこ栽培員]";
		mes "しかし、このオセロきのこは";
		mes "どこでも植えられるわけじゃない。";
		mes "オセロの要領で別のきのこを";
		mes "挟むようにしなければいけない。";
		next;
		mes "[きのこ栽培員]";
		mes "すると、挟んだ所のきのこが";
		mes "オセロきのこの特質として";
		mes "自分の色に変えてしまう。";
		mes "こうして交互に植えていき、";
		mes "競い合うというわけだな。";
		next;
		mes "[きのこ栽培員]";
		mes "互いに全部植え終わったら、";
		mes "そこできのこを集計するぞ。";
		mes "自分の色のきのこが多くなるように";
		mes "頑張ってくれ。";
		next;
		mes "[きのこ栽培員]";
		mes "たまに自分のきのこが";
		mes "植えられない場合があるんだ。";
		mes "そういう時や途中でやめたい時は";
		mes "私に話しかけてくれ。";
		close;
	case 4:
		mes "[きのこ栽培員]";
		mes "そうか……";
		mes "また一緒に手伝ってくれそうな人を";
		mes "見かけたら、よろしくな。";
		close;
	}
	switch('flag) {
	case 0:
		mes "[きのこ栽培員]";
		mes "おっ、手伝ってくれるのかい？";
		mes "この栽培をするには";
		mes "^FF0000もう1人手伝ってくれる人が必要^000000だ。";
		mes "大丈夫だね？";
		next;
		if(select("はい","いいえ")==2) {
			mes "[きのこ栽培員]";
			mes "そうか……";
			mes "また一緒に手伝ってくれる人を";
			mes "見つけたら声をかけてくれ。";
			close;
		}
		break;	//会話中に登録された時用に一度抜ける
	case 1:
		mes "[きのこ栽培員]";
		mes "おっ、手伝ってくれるのかい？";
		mes "今、"+getcharname('player[1])+"さんが";
		mes "手伝ってくれる予定だ。";
		mes "一緒に手伝ってくれるかい？";
		next;
		if(select("はい","いいえ")==2) {
			mes "[きのこ栽培員]";
			mes "そうか……";
			mes "手伝う気になったら";
			mes "また声をかけてくれ。";
			close;
		}
		break;	//登録処理へ
	case 2:
		mes "[きのこ栽培員]";
		mes "今、手伝っている最中なんだ。";
		mes "^FF3100赤いきのこの"+getcharname('player[1])+"さん^000000と";
		mes "^636363黒いきのこの"+getcharname('player[1])+"さん^000000の";
		mes "栽培状況を見てみますか？";
		next;
		if('player[$@Othello_Turn] == getcharid(0)) {
			set '@word1$,"パスする";
			set '@word2$,"ギブアップする";
		}
		if(select("ゲーム状況を見る","やめる")==1) {
			for(set '@i,1; '@i<=8; set '@i,'@i+1)
				mes (($@Othello_Cell[1]['@i]==1)? "^FF3100●":(($@Othello_Cell[1]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[2]['@i]==1)? "^FF3100●":(($@Othello_Cell[2]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[3]['@i]==1)? "^FF3100●":(($@Othello_Cell[3]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[4]['@i]==1)? "^FF3100●":(($@Othello_Cell[4]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[5]['@i]==1)? "^FF3100●":(($@Othello_Cell[5]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[6]['@i]==1)? "^FF3100●":(($@Othello_Cell[6]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[7]['@i]==1)? "^FF3100●":(($@Othello_Cell[7]['@i]==2)? "^636363●":"^CECECE□"))+(($@Othello_Cell[8]['@i]==1)? "^FF3100●":(($@Othello_Cell[8]['@i]==2)? "^636363●":"^CECECE□"));
			break;
		}
		close;
	case 3:
		mes "[きのこ栽培員]";
		mes "今、準備中なんだ。";
		mes "ちょっと待っててくれないか？";
		close;
	}
	//登録処理、フラグを再確認
	switch('flag) {
	case 0:
		set 'flag,1;
		set 'player[1],getcharid(0);
		announce "オセロきのこに"+getcharname('player[1])+"さんが登録されました。",9;
		set 't,6;
		initnpctimer;
		mes "[きのこ栽培員]";
		mes "ありがとう。";
		mes "これが君の使うきのこの粉だ。";
		mes "^FF0000赤い色のきのこ^000000が君のだから";
		mes "よく覚えておいてくれよ。";
		next;
		mes "[きのこ栽培員]";
		mes "では、もう1人の手伝ってくれる人を";
		mes "待つとしようか。";
		mes "あまり長く待たせるようだったら";
		mes "他の人に頼むことにするから";
		mes "悪く思うなよ。";
		close;
	case 1:
		stopnpctimer;
		set 'flag,2;
		donpcevent "Othello_Game";
		set 'player[2],getcharid(0);
		announce "オセロきのこの挑戦者に"+getcharname('player[2])+"さんが登録されました。",19;
		mes "[きのこ栽培員]";
		mes "ありがとう。";
		mes "これが君の使うきのこの粉だ。";
		mes "^0000FF黒い色のきのこ^000000が君のだから";
		mes "よく覚えておいてくれよ。";
		next;
		mes "[きのこ栽培員]";
		mes "それでは栽培をまかせるよ。";
		mes getcharname('player[1])+"さんに";
		mes "負けないように頑張ってくれ。";
		close;
	}
OnTimer30000:
	set 't,'t-1;
	if('t != 0) {
		initnpctimer;
		announce "現在、オセロきのこで"+getcharname('player[1])+"さんに挑戦される方をお待ちしております。",9;
		sleep 2000;
		announce getcharname('player[1])+"さんに挑戦されたい方はきのこ栽培所までお越しください。",9;
		end;
	}
	stopnpctimer;
	announce "オセロきのこに挑戦者がいなかったので登録を取り消します。",9;
	set 'player[1],0;
	set 'flag,0;
	end;
OnInit:
	setarray 'player[1],0,0;
	set 'flag,0;
	set $@Othello_Turn,0;
	set $@Othello_Rest,60;
	for(set '@i,1; '@i<=8; set '@i,'@i+1) {
		for(set '@j,1; '@j<=8; set '@j,'@j+1) {
			if(('@i == 4 && '@j == 4) || ('@i == 5 && '@j == 5)) {
				set $@Othello_Cell['@i]['@j],1;
				disablenpc "きのこの跡#Othello_"+'@i+"-"+'@j;
				enablenpc "赤いきのこ#Othello_"+'@i+"-"+'@j;
				disablenpc "黒いきのこ#Othello_"+'@i+"-"+'@j;
			}
			else if(('@i == 4 && '@j == 5) || ('@i == 5 && '@j == 4)) {
				set $@Othello_Cell['@i]['@j],2;
				disablenpc "きのこの跡#Othello_"+'@i+"-"+'@j;
				enablenpc "黒いきのこ#Othello_"+'@i+"-"+'@j;
				disablenpc "赤いきのこ#Othello_"+'@i+"-"+'@j;
			}
			else {
				set $@Othello_Cell['@i]['@j],0;
				enablenpc "きのこの跡#Othello_"+'@i+"-"+'@j;
				disablenpc "赤いきのこ#Othello_"+'@i+"-"+'@j;
				disablenpc "黒いきのこ#Othello_"+'@i+"-"+'@j;
			}
		}
	}
	end;
}

//==========================================
// ゲーム処理
//------------------------------------------
payon.gat,0,0,0	script	Othello_Game	-1,{
	sleep 5000;
	announce "オセロきのこで"+getcharname(getvariableofnpc(getelementofarray('player,1),"きのこ栽培員#Othello"))+"さんと"+getcharname(getvariableofnpc(getelementofarray('player,2),"きのこ栽培員#Othello"))+"さんが対戦します。",9;
	sleep 2000;
	areaannounce "payon.gat",230,220,280,260,"それではオセロきのこの栽培、スタートです！",9;
	areasoundeffect "payon.gat",230,220,280,260,"charge.wav",0;
	set $@Othello_Turn,1;
	initnpctimer;
	end;
//ゲーム中のタイマー
OnTimer3000:
	set 'flag,($@Othello_Turn*10)-1;
	areaannounce "payon.gat",230,220,280,260,(($@Othello_Turn == 1)? "赤いきのこ": "黒いきのこ")+"、"+getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さんの番です。",'flag;
	end;
OnTimer30000:
	areaannounce "payon.gat",230,220,280,260,getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さん、"+(($@Othello_Turn == 1)? "赤いきのこ": "黒いきのこ")+"を植える場所を決めてください。",'flag;
	end;
OnTimer60000:
	areaannounce "payon.gat",230,220,280,260,(($@Othello_Turn == 1)? "赤いきのこ": "黒いきのこ")+"、"+getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さんの番です。",'flag;
	end;
OnTimer62000:
	areaannounce "payon.gat",230,220,280,260,"あと1分以内に場所を決めて植えてください。",'flag;
	end;
OnTimer90000:
	areaannounce "payon.gat",230,220,280,260,getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さん、"+(($@Othello_Turn == 1)? "赤いきのこ": "黒いきのこ")+"を植える場所を決めてください。",'flag;
	end;
OnTimer92000:
	areaannounce "payon.gat",230,220,280,260,"30秒以内に植えなければギブアップとなります。",'flag;
	end;
OnTimer120000:
	set getvariableofnpc('flag,"きのこ栽培員#Othello"),3;
	stopnpctimer;
	areaannounce "payon.gat",230,220,280,260,getcharname(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello"))+"さん、時間を超えてしまったので負けとなります。",'flag;
	areasoundeffect "payon.gat",230,220,280,260,"taming_fail.wav",0;
	set $@Othello_Turn,0;
	donpcevent "Othello_Fin::OnEnd";
	end;
}

//==========================================
// 終了処理
//------------------------------------------
payon.gat,0,0,0	script	Othello_Fin	-1,{
	areaannounce "payon.gat",230,220,280,260,"終了です。お疲れ様でした。",9;
	stopnpctimer "Othello_Game";
	sleep 5000;
	areaannounce "payon.gat",230,220,280,260,"オセロの勝負結果です。",9;
	sleep 2000;
	for(set '@i,1; '@i<=2; set '@i,'@i+1) {
		for(set '@j,1; '@j<=8; set '@j,'@j+1) {
			for(set '@k,1; '@k<=8; set '@k,'@k+1) {
				if($@Othello_Cell['@k]['@j] == 1 && '@i == 1) {
					misceffect 173,"赤いきのこ#Othello_"+'@k+"-"+'@j;
					sleep 500;
					misceffect 16,"赤いきのこ#Othello_"+'@k+"-"+'@j;
					disablenpc "赤いきのこ#Othello_"+'@k+"-"+'@j;
					enablenpc "きのこの跡#Othello_"+'@k+"-"+'@j;
					set '@point[1],'@point[1]+1;
				}
				else if($@Othello_Cell['@k]['@j] == 2 && '@i == 2) {
					misceffect 172,"黒いきのこ#Othello_"+'@k+"-"+'@j;
					sleep 500;
					misceffect 16,"黒いきのこ#Othello_"+'@k+"-"+'@j;
					disablenpc "黒いきのこ#Othello_"+'@k+"-"+'@j;
					enablenpc "きのこの跡#Othello_"+'@k+"-"+'@j;
					set '@point[2],'@point[2]+1;
				}
			}
		}
		areaannounce "payon.gat",230,220,280,260,(('@i == 1)? "赤": "黒")+"いきのこ、"+'@point['@i]+"本。",9;
		sleep 3000;
	}
	if('@point[1] == '@point[2])
		areaannounce "payon.gat",230,220,280,260,"赤いきのこ"+'@point[1]+"本と黒いきのこ"+'@point[2]+"本で引き分けでした！",9;
	else {
		if('@point[1] > '@point[2])
			areaannounce "payon.gat",230,220,280,260,"赤いきのこ"+'@point[1]+"本で"+getcharname(getvariableofnpc(getelementofarray('player,1),"きのこ栽培員#Othello"))+"さんの勝利です！",9;
		else
			areaannounce "payon.gat",230,220,280,260,"黒いきのこ"+'@point[2]+"本で"+getcharname(getvariableofnpc(getelementofarray('player,2),"きのこ栽培員#Othello"))+"さんの勝利です！",9;
		areasoundeffect "payon.gat",230,220,280,260,"complete.wav",0;
	}
OnEnd:
	sleep 5000;
	areaannounce "payon.gat",230,220,280,260,"またの挑戦をお待ちしております。",9;
	sleep 5000;
	donpcevent "きのこ栽培員#Othello::OnInit";
	end;
}

//==========================================
// マス
//------------------------------------------
payon.gat,250,245,0		script	きのこの跡#Othello_1-1	844,{
	if(getvariableofnpc(getelementofarray('player,$@Othello_Turn),"きのこ栽培員#Othello") != getcharid(0)) {
		mes "- きのこを植えられそうな跡がある -";
		close;
	}
	for(set '@i,0; '@i<8; set '@i,'@i+1) {
		set '@x,strcut(strnpcinfo(2),10);
		set '@y,strcut(strnpcinfo(2),8);
		switch('@i) {
		case 0: set '@xc,0; set '@yc,-1; break;
		case 1: set '@xc,-1; set '@yc,-1; break;
		case 2: set '@xc,-1; set '@yc,0; break;
		case 3: set '@xc,-1; set '@yc,1; break;
		case 4: set '@xc,0; set '@yc,1; break;
		case 5: set '@xc,1; set '@yc,1; break;
		case 6: set '@xc,1; set '@yc,0; break;
		case 7: set '@xc,1; set '@yc,-1; break;
		}
		for(set '@j,0; '@j<8; set '@j,'@j+1) {
			set '@x,'@x+'@xc;
			set '@y,'@y+'@yc;
			if($@Othello_Cell['@y]['@x] == 0)
				break;
			if($@Othello_Cell['@y]['@x] == $@Othello_Turn) {
				if('@j)
					set '@check,1;
				break;
			}
		}
		if('@check)
			break;
	}
	if('@check == 0) {
		mes "- ここには、きのこを -";
		mes "- 植えることができません。 -";
		close;
	}
	mes "- ここにきのこを植えますか？ -";
	next;
	if(select("きのこを植える","別の場所にする")==2)
		close;
	set '@x,strcut(strnpcinfo(2),10);
	set '@y,strcut(strnpcinfo(2),8);
	disablenpc "きのこの跡#Othello_"+'@y+"-"+'@x;
	if($@Othello_Turn == 1) {
		enablenpc "赤いきのこ#Othello_"+'@y+"-"+'@x;
		misceffect 310,"赤いきのこ#Othello_"+'@y+"-"+'@x;
	}
	else {
		enablenpc "黒いきのこ#Othello_"+'@y+"-"+'@x;
		misceffect 310,"黒いきのこ#Othello_"+'@y+"-"+'@x;
	}
	set $@Othello_Cell['@y]['@x],$@Othello_Turn;
	for(set '@i,0; '@i<8; set '@i,'@i+1) {
		set '@x,strcut(strnpcinfo(2),10);
		set '@y,strcut(strnpcinfo(2),8);
		switch('@i) {
		case 0: set '@xc,0; set '@yc,-1; break;
		case 1: set '@xc,-1; set '@yc,-1; break;
		case 2: set '@xc,-1; set '@yc,0; break;
		case 3: set '@xc,-1; set '@yc,1; break;
		case 4: set '@xc,0; set '@yc,1; break;
		case 5: set '@xc,1; set '@yc,1; break;
		case 6: set '@xc,1; set '@yc,0; break;
		case 7: set '@xc,1; set '@yc,-1; break;
		}
		for(set '@j,0; '@j<8; set '@j,'@j+1) {
			set '@x,'@x+'@xc;
			set '@y,'@y+'@yc;
			if($@Othello_Cell['@y]['@x] == 0)
				break;
			if($@Othello_Cell['@y]['@x] == $@Othello_Turn) {
				if('@j) {
					for(set '@j,'@j-1; '@j>=0; set '@j,'@j-1) {
						set '@x,'@x-'@xc;
						set '@y,'@y-'@yc;
						disablenpc "きのこの跡#Othello_"+'@y+"-"+'@x;
						set $@Othello_Cell['@y]['@x],$@Othello_Turn;
						if($@Othello_Turn == 1) {
							disablenpc "黒いきのこ#Othello_"+'@y+"-"+'@x;
							enablenpc "赤いきのこ#Othello_"+'@y+"-"+'@x;
							misceffect 98,"赤いきのこ#Othello_"+'@y+"-"+'@x;

						}
						else {
							disablenpc "赤いきのこ#Othello_"+'@y+"-"+'@x;
							enablenpc "黒いきのこ#Othello_"+'@y+"-"+'@x;
							misceffect 98,"黒いきのこ#Othello_"+'@y+"-"+'@x;
						}
					}
				}
				break;
			}
		}
	}
	initnpctimer "Othello_Game";
	set $@Othello_Rest,$@Othello_Rest-1;
	if($@Othello_Rest == 0) {
		set getvariableofnpc('flag,"きのこ栽培員#Othello"),3;
		set $@Othello_Turn,0;
		donpcevent "Othello_Fin";
		close;
	}
	if($@Othello_Turn == 1)
		set $@Othello_Turn,2;
	else
		set $@Othello_Turn,1;
	close;
}
payon.gat,250,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-2	844
payon.gat,250,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-3	844
payon.gat,250,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-4	844
payon.gat,250,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-5	844
payon.gat,250,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-6	844
payon.gat,250,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-7	844
payon.gat,250,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_1-8	844
payon.gat,252,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-1	844
payon.gat,252,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-2	844
payon.gat,252,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-3	844
payon.gat,252,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-4	844
payon.gat,252,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-5	844
payon.gat,252,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-6	844
payon.gat,252,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-7	844
payon.gat,252,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_2-8	844
payon.gat,254,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-1	844
payon.gat,254,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-2	844
payon.gat,254,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-3	844
payon.gat,254,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-4	844
payon.gat,254,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-5	844
payon.gat,254,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-6	844
payon.gat,254,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-7	844
payon.gat,254,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_3-8	844
payon.gat,256,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-1	844
payon.gat,256,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-2	844
payon.gat,256,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-3	844
payon.gat,256,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-4	844
payon.gat,256,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-5	844
payon.gat,256,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-6	844
payon.gat,256,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-7	844
payon.gat,256,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_4-8	844
payon.gat,258,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-1	844
payon.gat,258,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-2	844
payon.gat,258,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-3	844
payon.gat,258,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-4	844
payon.gat,258,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-5	844
payon.gat,258,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-6	844
payon.gat,258,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-7	844
payon.gat,258,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_5-8	844
payon.gat,260,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-1	844
payon.gat,260,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-2	844
payon.gat,260,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-3	844
payon.gat,260,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-4	844
payon.gat,260,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-5	844
payon.gat,260,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-6	844
payon.gat,260,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-7	844
payon.gat,260,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_6-8	844
payon.gat,262,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-1	844
payon.gat,262,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-2	844
payon.gat,262,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-3	844
payon.gat,262,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-4	844
payon.gat,262,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-5	844
payon.gat,262,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-6	844
payon.gat,262,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-7	844
payon.gat,262,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_7-8	844
payon.gat,264,245,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-1	844
payon.gat,264,243,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-2	844
payon.gat,264,241,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-3	844
payon.gat,264,239,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-4	844
payon.gat,264,237,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-5	844
payon.gat,264,235,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-6	844
payon.gat,264,233,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-7	844
payon.gat,264,231,0	duplicate(きのこの跡#Othello_1-1)	きのこの跡#Othello_8-8	844

//==========================================
// コマ
//------------------------------------------
payon.gat,250,245,4		script	赤いきのこ#Othello_1-1	1085,{}
payon.gat,250,245,4		script	黒いきのこ#Othello_1-1	1084,{}
payon.gat,250,243,4		script	赤いきのこ#Othello_1-2	1085,{}
payon.gat,250,243,4		script	黒いきのこ#Othello_1-2	1084,{}
payon.gat,250,241,4		script	赤いきのこ#Othello_1-3	1085,{}
payon.gat,250,241,4		script	黒いきのこ#Othello_1-3	1084,{}
payon.gat,250,239,4		script	赤いきのこ#Othello_1-4	1085,{}
payon.gat,250,239,4		script	黒いきのこ#Othello_1-4	1084,{}
payon.gat,250,237,4		script	赤いきのこ#Othello_1-5	1085,{}
payon.gat,250,237,4		script	黒いきのこ#Othello_1-5	1084,{}
payon.gat,250,235,4		script	赤いきのこ#Othello_1-6	1085,{}
payon.gat,250,235,4		script	黒いきのこ#Othello_1-6	1084,{}
payon.gat,250,233,4		script	赤いきのこ#Othello_1-7	1085,{}
payon.gat,250,233,4		script	黒いきのこ#Othello_1-7	1084,{}
payon.gat,250,231,4		script	赤いきのこ#Othello_1-8	1085,{}
payon.gat,250,231,4		script	黒いきのこ#Othello_1-8	1084,{}
payon.gat,252,245,4		script	赤いきのこ#Othello_2-1	1085,{}
payon.gat,252,245,4		script	黒いきのこ#Othello_2-1	1084,{}
payon.gat,252,243,4		script	赤いきのこ#Othello_2-2	1085,{}
payon.gat,252,243,4		script	黒いきのこ#Othello_2-2	1084,{}
payon.gat,252,241,4		script	赤いきのこ#Othello_2-3	1085,{}
payon.gat,252,241,4		script	黒いきのこ#Othello_2-3	1084,{}
payon.gat,252,239,4		script	赤いきのこ#Othello_2-4	1085,{}
payon.gat,252,239,4		script	黒いきのこ#Othello_2-4	1084,{}
payon.gat,252,237,4		script	赤いきのこ#Othello_2-5	1085,{}
payon.gat,252,237,4		script	黒いきのこ#Othello_2-5	1084,{}
payon.gat,252,235,4		script	赤いきのこ#Othello_2-6	1085,{}
payon.gat,252,235,4		script	黒いきのこ#Othello_2-6	1084,{}
payon.gat,252,233,4		script	赤いきのこ#Othello_2-7	1085,{}
payon.gat,252,233,4		script	黒いきのこ#Othello_2-7	1084,{}
payon.gat,252,231,4		script	赤いきのこ#Othello_2-8	1085,{}
payon.gat,252,231,4		script	黒いきのこ#Othello_2-8	1084,{}
payon.gat,254,245,4		script	赤いきのこ#Othello_3-1	1085,{}
payon.gat,254,245,4		script	黒いきのこ#Othello_3-1	1084,{}
payon.gat,254,243,4		script	赤いきのこ#Othello_3-2	1085,{}
payon.gat,254,243,4		script	黒いきのこ#Othello_3-2	1084,{}
payon.gat,254,241,4		script	赤いきのこ#Othello_3-3	1085,{}
payon.gat,254,241,4		script	黒いきのこ#Othello_3-3	1084,{}
payon.gat,254,239,4		script	赤いきのこ#Othello_3-4	1085,{}
payon.gat,254,239,4		script	黒いきのこ#Othello_3-4	1084,{}
payon.gat,254,237,4		script	赤いきのこ#Othello_3-5	1085,{}
payon.gat,254,237,4		script	黒いきのこ#Othello_3-5	1084,{}
payon.gat,254,235,4		script	赤いきのこ#Othello_3-6	1085,{}
payon.gat,254,235,4		script	黒いきのこ#Othello_3-6	1084,{}
payon.gat,254,233,4		script	赤いきのこ#Othello_3-7	1085,{}
payon.gat,254,233,4		script	黒いきのこ#Othello_3-7	1084,{}
payon.gat,254,231,4		script	赤いきのこ#Othello_3-8	1085,{}
payon.gat,254,231,4		script	黒いきのこ#Othello_3-8	1084,{}
payon.gat,256,245,4		script	赤いきのこ#Othello_4-1	1085,{}
payon.gat,256,245,4		script	黒いきのこ#Othello_4-1	1084,{}
payon.gat,256,243,4		script	赤いきのこ#Othello_4-2	1085,{}
payon.gat,256,243,4		script	黒いきのこ#Othello_4-2	1084,{}
payon.gat,256,241,4		script	赤いきのこ#Othello_4-3	1085,{}
payon.gat,256,241,4		script	黒いきのこ#Othello_4-3	1084,{}
payon.gat,256,239,4		script	赤いきのこ#Othello_4-4	1085,{}
payon.gat,256,239,4		script	黒いきのこ#Othello_4-4	1084,{}
payon.gat,256,237,4		script	赤いきのこ#Othello_4-5	1085,{}
payon.gat,256,237,4		script	黒いきのこ#Othello_4-5	1084,{}
payon.gat,256,235,4		script	赤いきのこ#Othello_4-6	1085,{}
payon.gat,256,235,4		script	黒いきのこ#Othello_4-6	1084,{}
payon.gat,256,233,4		script	赤いきのこ#Othello_4-7	1085,{}
payon.gat,256,233,4		script	黒いきのこ#Othello_4-7	1084,{}
payon.gat,256,231,4		script	赤いきのこ#Othello_4-8	1085,{}
payon.gat,256,231,4		script	黒いきのこ#Othello_4-8	1084,{}
payon.gat,258,245,4		script	赤いきのこ#Othello_5-1	1085,{}
payon.gat,258,245,4		script	黒いきのこ#Othello_5-1	1084,{}
payon.gat,258,243,4		script	赤いきのこ#Othello_5-2	1085,{}
payon.gat,258,243,4		script	黒いきのこ#Othello_5-2	1084,{}
payon.gat,258,241,4		script	赤いきのこ#Othello_5-3	1085,{}
payon.gat,258,241,4		script	黒いきのこ#Othello_5-3	1084,{}
payon.gat,258,239,4		script	赤いきのこ#Othello_5-4	1085,{}
payon.gat,258,239,4		script	黒いきのこ#Othello_5-4	1084,{}
payon.gat,258,237,4		script	赤いきのこ#Othello_5-5	1085,{}
payon.gat,258,237,4		script	黒いきのこ#Othello_5-5	1084,{}
payon.gat,258,235,4		script	赤いきのこ#Othello_5-6	1085,{}
payon.gat,258,235,4		script	黒いきのこ#Othello_5-6	1084,{}
payon.gat,258,233,4		script	赤いきのこ#Othello_5-7	1085,{}
payon.gat,258,233,4		script	黒いきのこ#Othello_5-7	1084,{}
payon.gat,258,231,4		script	赤いきのこ#Othello_5-8	1085,{}
payon.gat,258,231,4		script	黒いきのこ#Othello_5-8	1084,{}
payon.gat,260,245,4		script	赤いきのこ#Othello_6-1	1085,{}
payon.gat,260,245,4		script	黒いきのこ#Othello_6-1	1084,{}
payon.gat,260,243,4		script	赤いきのこ#Othello_6-2	1085,{}
payon.gat,260,243,4		script	黒いきのこ#Othello_6-2	1084,{}
payon.gat,260,241,4		script	赤いきのこ#Othello_6-3	1085,{}
payon.gat,260,241,4		script	黒いきのこ#Othello_6-3	1084,{}
payon.gat,260,239,4		script	赤いきのこ#Othello_6-4	1085,{}
payon.gat,260,239,4		script	黒いきのこ#Othello_6-4	1084,{}
payon.gat,260,237,4		script	赤いきのこ#Othello_6-5	1085,{}
payon.gat,260,237,4		script	黒いきのこ#Othello_6-5	1084,{}
payon.gat,260,235,4		script	赤いきのこ#Othello_6-6	1085,{}
payon.gat,260,235,4		script	黒いきのこ#Othello_6-6	1084,{}
payon.gat,260,233,4		script	赤いきのこ#Othello_6-7	1085,{}
payon.gat,260,233,4		script	黒いきのこ#Othello_6-7	1084,{}
payon.gat,260,231,4		script	赤いきのこ#Othello_6-8	1085,{}
payon.gat,260,231,4		script	黒いきのこ#Othello_6-8	1084,{}
payon.gat,262,245,4		script	赤いきのこ#Othello_7-1	1085,{}
payon.gat,262,245,4		script	黒いきのこ#Othello_7-1	1084,{}
payon.gat,262,243,4		script	赤いきのこ#Othello_7-2	1085,{}
payon.gat,262,243,4		script	黒いきのこ#Othello_7-2	1084,{}
payon.gat,262,241,4		script	赤いきのこ#Othello_7-3	1085,{}
payon.gat,262,241,4		script	黒いきのこ#Othello_7-3	1084,{}
payon.gat,262,239,4		script	赤いきのこ#Othello_7-4	1085,{}
payon.gat,262,239,4		script	黒いきのこ#Othello_7-4	1084,{}
payon.gat,262,237,4		script	赤いきのこ#Othello_7-5	1085,{}
payon.gat,262,237,4		script	黒いきのこ#Othello_7-5	1084,{}
payon.gat,262,235,4		script	赤いきのこ#Othello_7-6	1085,{}
payon.gat,262,235,4		script	黒いきのこ#Othello_7-6	1084,{}
payon.gat,262,233,4		script	赤いきのこ#Othello_7-7	1085,{}
payon.gat,262,233,4		script	黒いきのこ#Othello_7-7	1084,{}
payon.gat,262,231,4		script	赤いきのこ#Othello_7-8	1085,{}
payon.gat,262,231,4		script	黒いきのこ#Othello_7-8	1084,{}
payon.gat,264,245,4		script	赤いきのこ#Othello_8-1	1085,{}
payon.gat,264,245,4		script	黒いきのこ#Othello_8-1	1084,{}
payon.gat,264,243,4		script	赤いきのこ#Othello_8-2	1085,{}
payon.gat,264,243,4		script	黒いきのこ#Othello_8-2	1084,{}
payon.gat,264,241,4		script	赤いきのこ#Othello_8-3	1085,{}
payon.gat,264,241,4		script	黒いきのこ#Othello_8-3	1084,{}
payon.gat,264,239,4		script	赤いきのこ#Othello_8-4	1085,{}
payon.gat,264,239,4		script	黒いきのこ#Othello_8-4	1084,{}
payon.gat,264,237,4		script	赤いきのこ#Othello_8-5	1085,{}
payon.gat,264,237,4		script	黒いきのこ#Othello_8-5	1084,{}
payon.gat,264,235,4		script	赤いきのこ#Othello_8-6	1085,{}
payon.gat,264,235,4		script	黒いきのこ#Othello_8-6	1084,{}
payon.gat,264,233,4		script	赤いきのこ#Othello_8-7	1085,{}
payon.gat,264,233,4		script	黒いきのこ#Othello_8-7	1084,{}
payon.gat,264,231,4		script	赤いきのこ#Othello_8-8	1085,{}
payon.gat,264,231,4		script	黒いきのこ#Othello_8-8	1084,{}