code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:반발각인(3以上=会話不能)(4以上はバグ
;TCVAR:만취(1=通常成功or大失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_300
;コマンド共通メッセージ(TRAIN_MESSAGE)
;削除すると「～話をした。」とかが消えます
;CALL TRAIN_MESSAGE
DRAWLINE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K70_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_300_1
#DIM GUEST, 2
#DIMS GUESTS
#DIM POINT
#DIM デート会話, 120
;日が変わってたらデート会話リセット
SIF !TCVAR:70:352
	VARSET デート会話
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	RESETCOLOR
	;ゲストキャラ判定
	CALL M_KOJO_K70_GUEST(0)
	GUEST = RESULT
	GUEST:1 = RESULT:1
	GUESTS = %RESULTS%
	;ここに口上書いて下さい
	IF ALCOHOL_FACE(70) == "酔いどれ" || ALCOHOL_FACE(70) == "ぐでぐで"
		PRINTFORML %CALLNAME:PLAYER%하%CALLNAME:TARGET%에 이야기하기 시작해 보았지만,%CALLNAME:TARGET%(은)는 음률이 돌지 않고 무슨 말을 하고 있을지도 들어 잡히지 않는다
	;会話不能の地の文は恋慕でない場合は省略できず、恋慕の時は表示されないので、ここではどちらの場合も同じように表示されるようにする
	ELSEIF TCVAR:70:회화불능
		IF TALENT:70:연모
			PRINTFORML %CALLNAME:TARGET%에 말을 건네려고 했지만 말이 발견되지 않는다
			PRINTFORMW 근처에 거북한 공기가 흘렀다…
		ENDIF
	ELSEIF GUESTS != ""
		CLEARLINE 2
		PRINTFORML 세 명으로 회화
		DRAWLINE
		;文章上だけであってソース等は変わりません
		PRINTFORML %CALLNAME:PLAYER%하%CALLNAME:TARGET%(와)과%GUESTS%(을)를 섞어 세 명으로 이야기를 했다
	ELSE
		;デート会話
		IF TALENT:70:연모 && FLAG:데이트상대 == 70 && DATENAME_SPOT() != "道中" && !デート会話:(CFLAG:70:현재위치 / 10)
			CLEARLINE 2
			PRINTFORML %DATENAME_SPOT()%그리고 데이트
			DRAWLINE
		ENDIF
		PRINTFORM %CALLNAME:PLAYER%하%CALLNAME:TARGET%(와)과
		IF TALENT:70:연모
			PRINTDATA
				DATAFORM 서로 이웃이 되어
				DATAFORM 조금 수줍으면서
				DATAFORM 미소를 주고 받으면서
				DATAFORM 부드러운 분위기로
				DATAFORM 조금 뜨거워지면서
				DATAFORM 서로 장난하면서
			ENDDATA
		ELSE
			PRINTDATA
				DATAFORM 시시하다
				DATAFORM 제 정신이 없다
				DATAFORM 세상
				DATAFORM 평화로운
				DATAFORM 자주 있다
				DATAFORM 약간의
				DATAFORM 이상한
			ENDDATA
		ENDIF
		IF TFLAG:SELECTCOM분기 > 0
			PRINTFORML 이야기를 해 분위기를 살렸다
		ELSEIF TFLAG:SELECTCOM분기 < 0
			PRINTFORML 이야기를 하고 있었지만 이야기가 중단되어 버렸다……
		ELSE
			PRINTFORML 이야기를 했다
		ENDIF
	ENDIF
	PRINTW
	CALL M_KOJO_COLOR_K70
	;酔ってる
	IF ALCOHOL_FACE(70) == "酔いどれ" || ALCOHOL_FACE(70) == "ぐでぐで"
		IF !RAND:2
			PRINTFORML 「들～！ ～, 히는～～！」
			PRINTFORMW 「왕 만나자 아～！ 왕 끝내 버무리지 않아～～！」
		ELSE
			PRINTFORML 「아～～！！ 짚히의 왕파랑응아～！」
			PRINTFORMW 「있어 아 어머나 짚히아～～！！」
		ENDIF
		PRINTFORML
		PRINTFORMW 거의 회화가 되지 않았다……
	;会話不能
	ELSEIF TCVAR:70:회화불능
		IF TALENT:70:연모 || TALENT:70:사모
			PRINTFORML 「그 이야기는 조금 전 했어요～」
			PRINTFORMW 「 이제(벌써),%CALLNAME:MASTER%씨는 책을 읽지 않기 때문에 화제가 다해 버립니다！」
			PRINTFORMW 「딱 좋은 책이 있습니다, 「입을 치료하는 책」！ 아, 이것은 다를까？」
		ELSE
			PRINTFORMW 「아하하…… 그 이야기는 조금 전도 했군요……」
		ENDIF
	;ゲストキャラと同室だと各キャラ1日1回ずつゲスト会話が発生（お茶とは別）
	;4=小鈴が恋慕(同行中だと最優先),3=ゲストと同行中in鈴奈庵,2=ゲストとデート中orゲストが恋慕で同行中,1=それ以外
	ELSEIF GUESTS != ""
		SELECTCASE GUESTS
		CASE "霊夢"
			IF GUEST == 4
				IF INRANGE(CFLAG:70:현재위치, 0, 100)
					PRINTFORML 「영몽씨, 여기의 신사는 무슨 이익이 있기 때문에 했던가？」
					PRINTFORMW 「, 그―, 연애 성취라든지는 있습니다？」
				ELSE
					PRINTFORML 「영몽씨같이 강해지려면  어떻게 하면 좋겠지요」
					PRINTFORMW 「우선은 간편 모드로 안고 떨어지고 하지 않게…？ 네？」
				ENDIF
			ELSEIF GUEST == 3
				IF !RAND:2
					PRINTFORML 「용건은 끝났습니까？」
					PRINTFORMW 「영몽씨에게는 신세를 지고 있으니까, 쉬어 가 주십시오」
				ELSE
					PRINTFORMW 「그렇다！ 정확히 이 책으로, 두 명의 궁합 점을 할 수 있어요！」
					PRINTFORML 「은, 영몽씨는 자신으로 완성되었어요……」
					PRINTFORMW 「그런데도 해 봅시다！ ！」
				ENDIF
			ELSEIF GUEST == 2
				PRINTFORML 「영몽씨들최근 사이 좋지요―」
				PRINTFORMW 「이봐요, 지금이래 손 연결하고 있습니다 해」
				PRINTFORML 「저것 어？ 눈치채지 않았습니까―？」
				PRINTFORMW 「후후, 얼굴 붉어지고 있어요 」
			ELSE
				PRINTFORML 「그렇다, 정확히 영몽씨도 있고, 이야기해 두고 싶은 것이 있어서」
				PRINTFORMW 「최근마을로 소문이 되어 있습니다만――」
			ENDIF
		CASE "魔理沙"
			IF GUEST == 4
				IF INRANGE(CFLAG:70:현재위치, 500, 600) && FLAG:더부살이캐릭터 != 70
					IF MAIN_MAP == 5
						PRINTFORMW 「%CALLNAME:MASTER%씨도 마리사씨도 이런 숲안에 살고 있습니다」
					ELSE
						PRINTFORMW 「마리사씨는 이런 숲안에 살고 있습니다」
					ENDIF
					PRINTFORML 「좋겠다, 나도 여기서 살아 보고 싶다……」
					PRINTFORMW 「아무튼 빈빈의 요기에 조크조크 합니다～！」
				ELSE
					PRINTFORML 「마리사씨의 추 좋겠다～」
					PRINTFORML 「그것이 있으면 나도 하늘을 날 수 있는데」
					PRINTFORMW （%CALLNAME:MASTER%씨와 함께 하늘의 여행, 뭐라고 하는 로맨틱――）
					PRINTL
					PRINTFORMW 「어！？ 마법사가 아니라고 날 수 없습니까！？ 학군 해……」
				ENDIF
			ELSEIF GUEST == 3
				IF !RAND:2
					PRINTFORML 「용건은 끝났습니까？」
					PRINTFORMW 「마리사씨에게는 신세를 지고 있으니까, 쉬어 가 주십시오」
				ELSE
					PRINTFORML 「그렇다！ 마술지폐라고 하는 밖의 세계의 지폐 놀이가 손에 들어 왔습니다」
					PRINTFORMW 「마법의 일은 자주(잘) 알지 않았기 때문에, 마리사씨와 세 명으로 해 보지 않습니다？」
				ENDIF
			ELSEIF GUEST == 2
				PRINTFORML 「마리사씨들최근 사이 좋지요―」
				PRINTFORMW 「이봐요, 지금이래 손 연결하고 있습니다 해」
				PRINTFORML 「저것 어？ 눈치채지 않았습니까―？」
				PRINTFORMW 「후후, 얼굴 붉어지고 있어요 」
			ELSEIF GUEST == 1
				PRINTFORML 「그렇다, 정확히 마리사씨도 있고, 이야기해 두고 싶은 것이 있어서」
				PRINTFORMW 「최근마을로 소문이 되어 있습니다만――」
			ENDIF
		CASE "紫"
			IF GUEST == 4
				PRINTFORML 「보라색씨는 누구이지요……분명하게 아우라가 다른군요……」
				PRINTFORMW 「그런데도 그다지 숨기는 헛 스윙도 없는 것 같고, 신출귀몰로 어느새인가 소있고……」
				PRINTFORMW 「 그렇지만 반드시 나쁜 요괴가 아니면 나는 그렇게 생각하고 있습니다」
			ELSEIF GUEST == 3
				PRINTFORML 「어와 주거지, 오늘은 두 명 해 무슨 용건입니까……？」
				PRINTFORMW 「 나 또 무엇인가 안되는 일 해 버렸습니다……？」
			ELSEIF GUEST == 2
				PRINTFORML 「%CALLNAME:MASTER%씨는 보라색씨의 일 어느 정도 알고 있습니까？」
				PRINTFORMW 「어쩐지 친밀과 같은의로, 나보다 자세한 것인지-와……」
			ELSEIF GUEST == 1
				PRINTFORML 「%CALLNAME:MASTER%씨는 실종은 알고 있습니다？」
				PRINTFORMW 「의외로 친밀한 곳에서 일어나거나 하기 때문에 조심해 주세요, 아하하」
			ENDIF
		CASE "文"
			IF GUEST == 4
				IF INRANGE(CFLAG:70:현재위치, 700, 900)
					PRINTFORML 「요괴의 산은 확실히 무서운 곳일지도 모르지만」
					PRINTFORMW 「문장씨같은 텐구가 있어 주면(자) 어쩐지 안심하네요」
				ELSE
					PRINTFORMW 「아시는 바일지도 모릅니다만, 문장씨는 그 「문장들. 신문」을 쓰고 있는 텐구의 문장씨이랍니다」
					PRINTFORML 「텐구인데 자주(잘) 마을에 와 정중하게 취재하고 있습니다」
					PRINTFORMW 「바뀐 (분)편이군요―」
				ENDIF
			ELSEIF GUEST == 3
				;カリスマは景気の指針
				IF CHARISMA_NOW() >= 100
					PRINTFORML 「문장씨의 신문, 매출 호조예요―」
					PRINTFORMW 「향후의 전망 하기에 따라  증쇄받을까」
				ELSE
					PRINTFORML 「문장씨의 신문, 여기의 곳매출이 나빠서……」
					PRINTFORMW 「무엇인가 새로운 흐름을 거두어 들이는 것이 좋을 것 같네요」
				ENDIF
				SIF !FLAG:신문구독
					PRINTFORMW 「아！ %CALLNAME:MASTER%씨도 일부 어떻습니까？」
			ELSEIF GUEST == 2
				PRINTFORML 「오늘은 혹시 둘이서 데이트입니까―？」
				PRINTFORMW 「후후, 좋았으면 내가 사진을 찍어 주어요♪」
			ELSEIF GUEST == 1
				PRINTFORML 「저것, 혹시 문장씨의 취재입니까―？」
				IF TALENT:70:사모
					PRINTFORML 「문장씨！ %CALLNAME:MASTER%씨의 일이라면 나에게 (들)물어 주세요！」
					PRINTFORMW 「\@ CFLAG:70:1005 >= 8 ? ウチのお得意さんですし、 # \@사%CALLNAME:MASTER%씨자세하니까！」
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%씨의 일입니까」
					PRINTFORMW 「확실히%CALLNAME:MASTER%씨는 수수께끼에 쌓인 곳 있지요―」
				ENDIF
			ENDIF
		CASE "マミゾウ"
			IF GUEST == 4
				PRINTFORML 「곳에서%CALLNAME:MASTER%씨는 변하고 너구리의 일 어떻게 생각합니까？」
				PRINTFORMW 「쉽게 친숙 해진이라고, 실은 좋은 요괴라고――」
				SIF ABL:69:친밀 >= 5
					PRINTFORMW 「아니, 최근사이 화목한 것 같아……아！ 말해라！ 아무것도 아닙니다！」
			ELSEIF GUEST == 3
				IF TALENT:69:연모
					PRINTFORMW 「그렇다 치더라도 두 명은 변함 없이 사이 화목하네요」
					PRINTFORMW （그렇지만 정말로 사이 좋은 점 그렇게 의심하는 것은 촌스러웠던일까）
				ELSE
					PRINTFORMW 「오늘은 둘이서 어떻게 하셨습니까？」
					PRINTFORMW （두 사람 모두 즐거운 듯 하고, 마미조우씨의 일이니까 거기까지 걱정하지 않아도 괜찮을까）
				ENDIF
			ELSEIF GUEST == 2
				PRINTFORML 「두 사람 모두, 오늘도 사이 좋을 것 같네요―」
				PRINTFORMW 「마치 데이트 하고 있는 것 같습니다」
			ELSEIF GUEST == 1
				PRINTFORML 「%CALLNAME:MASTER%씨도 호리에는 조심하는 것이 좋아요」
				PRINTFORMW 「인간으로 변해 친밀한 곳에서 악행을 기도해 있거나 하니까요」
			ENDIF
		CASE "阿求"
			;8=独占,7=悲恋,6=揶揄,5=信頼,4=敵対,3=恋慕,2=応援,1=平穏
			SELECTCASE M_KOJO_K70_BALANCE(70, 80)
			CASE 8, 5
				IF FLAG:데이트상대 == 80
					PRINTFORML 「후후, 별로 방해 하자라고 생각하지 않아요」
					PRINTFORMW 「그 대신 이번은 나와도 데이트 해 주세요♪」
				ELSE
					SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「%CALLNAME:MASTER%씨에게 있어 먼 바다의 정보를 가르쳐 줍시다」
						PRINTFORMW 「아구는"요요단"그렇다고 하는 아는 사람아는 전설의 밴드의 대팬이랍니다～」
					CASE 2
						PRINTFORMW 「아구는 정말 평상시는 딱딱한데, 자신의 취미의 이야기가 되면(자) 바로 그때 부서져 버립니다―」
						PRINTFORML 「온 오프가 확실하고 있다고(면) 말하는지, 신축성이 있다고 할까」
						PRINTFORMW 「그러한 곳은 이상한 딸(아가씨)라고 생각하거나―」
					CASEELSE
						PRINTFORML 「%CALLNAME:MASTER%씨로부터 본 아구는 어떤 딸(아가씨)입니까？」
						PRINTFORMW 「 나에게는 언제나 어려운 일뿐 말해 바보취급 해 옵니다―！」
					ENDSELECT
				ENDIF
			CASE 7
				SELECTCASE RAND:2
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%씨, 언제나 아구와 똑같네요―」
					PRINTFORMW 「가끔 씩은 나와도 놀았으면 좋은데―, 뭐라고 하는」
				CASEELSE
					PRINTFORML 「아구는 정말 언제나 나에게%CALLNAME:MASTER%씨와의 정사 이야기를 자랑이야기를 해 옵니다―」
					PRINTFORMW 「 나, 아구를 싫게 되고 싶지 않습니다……그러니까……」
				ENDSELECT
			CASE 6
				SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%씨에게 있어 먼 바다의 정보를 가르쳐 줍시다」
					PRINTFORMW 「아구는 요요단이라고 하는 아는 사람아는 전설의 밴드의 대팬이랍니다！」
					PRINTFORMW 「기회가 있으면 들으면, 반드시 아구도 기쁨야～」
				CASE 2
					PRINTFORML 「%CALLNAME:MASTER%씨는 아구목응인 곳이를 좋아합니까―？」
					PRINTFORMW 「무엇인가 나의 모르는 것 같은 일면이라든지 없습니다？？」
				CASEELSE
					PRINTFORML 「아구는 정말 언제나 나에게%CALLNAME:MASTER%씨와의 정사 이야기를 자랑이야기를 해 옵니다―」
					PRINTFORMW 「딱딱한 놈이지만, 소중히 해 주세요」
				ENDSELECT
			CASE 4
				IF FLAG:데이트상대 == 80
					PRINTFORML 「곳에서%CALLNAME:MASTER%씨, 최근아구와 사이 좋지요」
					PRINTFORMW 「무슨 있었습니까―？ 설마 이상한 금년이라고 없지요―？」
				ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
					PRINTFORML 「곳에서 아구, 너용무가 끝난 것이라면 이제 돌아가면(자)―？」
					PRINTFORMW 「손님도 오고 있고, 눌러 앉아져도 곤란해요」
				ELSE
					PRINTFORML 「저,%CALLNAME:MASTER%씨, 타처에 가지 않습니까？」
					PRINTFORMW 「있고, 아니요 타의는 없어요！ 다만 조금, 여기에 있으면(자) 어쩐지 초조해서……」
				ENDIF
			CASE 3, 1
				PRINTFORML 「아구는 나의 친구예요」
				PRINTFORMW 「나이가 가까웠던 탓일까, 옛부터의 교제입니다」
			CASE 2
				SELECTCASE RAND:2
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%씨는 아구어떻게 생각합니까？」
					PRINTFORMW 「이 딸(아가씨), 허세의욕으로 강직한 사람이지만, 뿌리의 부분은 정말 여자 아이이랍니다～」
				CASEELSE
					PRINTFORML 「아구는 정말 언제나 나에게%CALLNAME:MASTER%씨와의 정사 이야기를 자랑이야기를 해 옵니다―」
					PRINTFORMW 「딱딱한 놈이지만, 소중히 해 주세요」
				ENDSELECT
			ENDSELECT
		ENDSELECT
		;一日一回
		TCVAR:70:(M_KOJO_K70_GUEST_TCVAR(GUEST:1, 0)) = 1
		;デート同行会話と被る場合があるのでこちらを優先させ発生させないようにする
		SETBIT TCVAR:70:360, 0
	;不機嫌
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF TALENT:70:연모
			PRINTFORMW 「응, 미안해요, 지금 조금 걱정거리가……」
		ELSE
			PRINTFORMW 「후~…그렇습니까―……」
		ENDIF
	;デート会話
	ELSEIF TALENT:70:연모 && FLAG:데이트상대 == 70 && DATENAME_SPOT() != "道中" && !デート会話:(CFLAG:70:현재위치 / 10)
		POINT = CFLAG:70:현재위치 / 10
		;こんなにこだわるつもりはなかったのに、某美人妻がたくさん喋るのに釣られてつい
		;新たに地点ができたら修正します（多分）
		SELECTCASE CFLAG:70:데이트중
		CASE 0
			IF POINT == 5
				PRINTFORML 「저것, 여기는 요정의 서가입니까？」
				PRINTFORMW 「평상시는 단순한 나무에 시 의 것에…불가사의……」
			ELSEIF POINT == 6
				PRINTFORML 「원―, 신사의 곁에 이런 유적이 있었다이라니」
				PRINTFORMW 「어쩐지 이상한 조형이군요……정말 유적인가」
			ELSE
				PRINTFORML 「역시 여기는 침착하네요―」
				PRINTFORMW 「요괴들이 놀이에 와 버리는 것도, 어쩐지 알 생각이 듭니다」
			ENDIF
		CASE 1
			IF POINT == 15
				PRINTFORML 「히～, 어째서 묘지는……」
				PRINTFORMW 「빠르게 타처에 갑시다～！」
			ELSEIF POINT == 16
				PRINTFORML 「알고 있어요 , 이 도장은 선계의 일부이예요」
				PRINTFORMW 「선인인가～,%CALLNAME:MASTER%씨는 되어 보고 싶습니까―？」
			ELSE
				PRINTFORML 「여기는 요괴도 많이 살고 있는 거에요……」
				PRINTFORMW 「응, 요괴인데 선행을 쌓거나 무엇을 해 괜찮습니까―？」
			ENDIF
		CASE 2
			IF POINT == 21 || POINT == 22
				PRINTFORML 「%CALLNAME:MASTER%씨%CALLNAME:MASTER%씨！ 오늘은 저기에 갑시다！」
				PRINTFORMW 「네에에, 이번에 데이트 했을 때 가자고 결정했습니다♪」
			ELSEIF POINT == 23
				PRINTFORML 「%CALLNAME:MASTER%씨, 이런 시간부터 술입니까―？」
				PRINTFORMW 「너무 감추면(자) 돌아갈 수 없고있어요～」
			ELSEIF POINT == 24
				PRINTFORML 「 나도 옛날은 여기에 다녔었어요」
				PRINTFORMW 「아, 여름인가 해―！ 이 낙서 아직 있었다」
			ELSEIF POINT == 25
				IF DAY * 1440 + TIME - EX:MASTER:전회입욕시각 < 360
					PRINTFORML 「～！ 산뜻했습니다！」
					PRINTFORMW 「호카호카입니다♪」
				ELSE
					PRINTFORML 「여기의 목욕탕은 나도 이따금 와요」
					PRINTFORMW 「역시 넓은 욕실은 기분이 좋지요～！」
				ENDIF
			ELSEIF POINT == 26
				;入った時点で合意取得するのね…,うふふ前か後かは絶頂したかで判断するので事前に絶頂させてるとちょっと齟齬
				IF EX:70:C절정 + EX:70:V절정 + EX:70:A절정 + EX:70:B절정 + EX:70:M절정
					IF TALENT:70:처녀
						PRINTFORMW 「……\/\/\/」
					ELSE
						PRINTFORMW 「……%UNICODE(0x2764)%」
					ENDIF
				ELSE
					IF TALENT:70:처녀
						PRINTFORMW 「그…… (이)나, 상냥하고 부탁드릴게요……\/\/\/」
					ELSE
						PRINTFORMW 「글자―……%UNICODE(0x2764)%」
					ENDIF
				ENDIF
			ELSE
				PRINTFORML 「여기는 주로 이스미구예요」
				PRINTFORMW 「아구의 집에서도 놀러 갑니다？」
				;と言いつつ行こうとすると拒否されちゃいます。女の子って難しいね
			ENDIF
		CASE 3
			IF POINT == 31
				IF DAY:2 == 2
					PRINTFORML 「, 어쩐지 헤엄치고 싶어지네요」
					PRINTFORMW 「 그렇지만 여기의 호수는 위험하기 때문에 들어가면 안됩니다는」
				ELSE
					PRINTFORML 「여기의 호수는 누시라든지 있습니까？」
					PRINTFORMW 「대메기라든가 인어라든가 흰 큰뱀이라든가, 여러 가지 목격담은 (듣)묻습니다만」
				ENDIF
			ELSEIF POINT == 32
				PRINTFORML 「 어째서 이런 곳에 카마쿠라가……」
				IF DAY:2 == 2
					PRINTFORMW 「시원하네요……」
				ELSE
					PRINTFORMW 「우우……춥습니다……」
				ENDIF
			ELSEIF POINT == 33
				PRINTFORML 「히네―, 폐허는 절대는 있지 않습니까―！」
				PRINTFORMW 「히！ 이봐요！ 지금은……」
			ELSEIF POINT == 34
				PRINTFORML 「에―, 이것이 흡혈귀의 관인가」
				PRINTFORMW 「은, 들어가면 안되어요……！」
			ELSEIF POINT == 37
				PRINTFORML 「원―！ 대단해！ 이것이 인가의 홍마관도서관！」
				PRINTFORMW 「좋겠다 좋겠다, 하루종일 여기에 있고 싶다……」
			ELSE
				PRINTFORML 「있고, 좋습니까, 흡혈귀의 관같은 것에(이) 들어가 버려서……」
				PRINTFORMW 「그렇다 치더라도 넓다…… 어쩐지 밖으로부터 보았을 때보다 이상하게 넓은 것 같은……」
			ENDIF
		CASE 4
			IF POINT == 45
				PRINTFORML 「%CALLNAME:MASTER%씨, 진찰하러 왔습니까？」
				PRINTFORMW 「상태가 좋지 않게는 안보이지만」
			ELSEIF POINT == 46 || POINT == 47
				PRINTFORML 「여기는 한가로운 분위기이지만, 분명히 위험한 장소였던 것 같은……」
				PRINTFORMW 「그렇게 생각하면(자) 이 경치도 어쩐지 기분 나쁘게 느낍니다……」
			ELSEIF POINT == 48
				PRINTFORML 「대단히, 안쪽은 이렇게 호화롭네요―」
				PRINTFORMW 「이라고 할까 마음대로 들어가 버려서 좋을까요……」
			ELSEIF POINT == 49
				PRINTFORML 「에 , 이런 곳에 저택이 있었다라고 몰랐습니다」
				PRINTFORMW 「이런 큰 양관, 좀 더 유명하게 되어도 이상하지 않은데」
			ELSE
				PRINTFORML 「어？ 여기는 조금 전도 온 것 같은……%CALLNAME:MASTER%씨, 괜찮네요…？」
				PRINTFORMW 「헤매어 나올 수 있지 않게 되어버린다는 없지요…？」
			ENDIF
		CASE 5
			IF POINT == 51
				PRINTFORML 「여기에 오면(자) 어쩐지 조크조크 해 버립니다―」
				PRINTFORMW 「%CALLNAME:MASTER%씨도 느끼지 않습니까―？ 이 요기～～」
				;（＠_＠）
			ELSEIF POINT == 52
				PRINTFORML 「그렇다 치더라도 바뀐 것뿐」
				PRINTFORMW 「일까 이것？」
			ELSEIF POINT == 53
				PRINTFORML 「원, 나무인 나무……」
				PRINTFORMW 「우우……너무 길게 머무르면(자) 빨려 들여갈 것 같다……」
			ELSEIF POINT == 54
				PRINTFORML 「그렇게 말하면 마리사씨의 집에 놀러 간 적 없었다」
				PRINTFORMW 「안은 어떻게 되어있는 지요？」
			ELSEIF POINT == 55
				PRINTFORML 「입니까 여기？ 인형관？」
				PRINTFORMW 「네, 마법사가 삽니까？ 그 거 즉 마녀의 관……」
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%씨, 되돌립시다～！」
				PRINTFORMW 「여기의 요기 분명하게 위험합니다！ 안의 요마책이 사랑스러울 정도 입니다！」
			ENDIF
		CASE 6
			IF POINT == 61
				PRINTFORML 「행선지는 아레이지만, 이 길은 온화해 포장마차도 나오고 있는 거에요」
				PRINTFORMW 「아무튼, 모두 뒤숭숭한 무리입니다만……」
			ELSEIF POINT == 62
				PRINTFORML 「삼도의 강이라니 기분 나쁩니다……」
				PRINTFORMW 「어쩐지 죽으러 가는 것 같아……」
			ELSEIF POINT == 63
				PRINTFORML 「이런 곳에 암이 있다니 어떤 사람이 살고 있는 지요……」
				PRINTFORMW 「아니, 사람이 아니지요 반드시……」
			ELSE
				PRINTFORML 「아하하…삼도의 코우도있었어요……우리 죽어 버렸다 입니까……」
				PRINTFORMW 「네？ 보통으로 돌아갈 수 있습니까？ 라고 하는 것은 황천이 옷깃은 것이군요」
			ENDIF
		CASE 7
			IF POINT == 72
				IF DAY:2 == 2
					PRINTFORML 「시원한 것 같아 어쩐지 헤엄치고 싶어지네요」
					PRINTFORMW 「 그렇지만 갓빠가 있으니까요, 여기는……」
				ELSE
					PRINTFORML 「갓빠는 많이 있는데, 전혀 보이지 않지요」
					PRINTFORMW 「그렇지 않으면 안보이는 것뿐으로, 저 편은 여기를 보고 있는 것일까……？」
				ENDIF
			ELSEIF POINT == 75
				PRINTFORML 「에―, 이것이 선인의 저택입니까―」
				PRINTFORMW 「동물원에 살고 있다고 들었기 때문에, 조금 맥 빠짐 해 버렸습니다」
			ELSEIF POINT == 76
				PRINTFORML 「우우……덥다……」
				PRINTFORMW 「그러나 이상한 조형이군요……이것이 밖의 세계의 기술입니까」
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%씨와 등산이라니 멋집니다♪」
				PRINTFORMW 「언제나  로프웨이입니다 날려버리니까, 좀처럼 들어갈 수  없어요―！」
			ENDIF
		CASE 8
			IF POINT == 81
				SETCOLOR 0x513743
				PRINTFORML 「대단하다！ 장엄한 폭포군요―！」
				PRINTFORMW 「아하하, 소리가 굉장히라고 목소리가 알아 듣기 힘듭니다～！」
				RESETCOLOR
			ELSEIF POINT == 82
				PRINTFORML 「원～！ 깨끗한 경치～！」
				PRINTFORMW 「역시 사진이나 그림으로 보는 것과는 전혀 다르네요……！」
			ELSEIF POINT == 83
				IF DAY:2 == 2
					PRINTFORML 「여기의 호수는 헤엄쳐도 아무렇지도 않은 것입니까？」
					PRINTFORMW 「 그렇지만 신이 있습니다……벌 당일까……」
				ELSE
					PRINTFORML 「산도 크면 호수도 크네요」
					PRINTFORMW 「지형마다외로부터 왔다이라니 믿을 수 없습니다」
				ENDIF
			ELSEIF POINT == 89
				PRINTFORML 「어？ 있고 개에 이런 상공에……」
				PRINTFORMW 「분명히 구름 올라 공기가 희박해져 숨을 할 수 없었던 것 같은……」
			ELSE
				PRINTFORML 「최근 로프웨이가 생겼으므로 여기의 신사도 마을에 친숙해 져 왔어요」
				PRINTFORMW 「 그렇지만 나는 역시 박려신사의 것이 좋아하는가―」
			ENDIF
		CASE 9
			IF POINT == 91 || POINT == 92
				IF TCVAR:70:354
					PRINTFORML 「동굴의 안쪽은 깜깜하네요…………」
				ELSE
					PRINTFORML 「이런 동굴의 안쪽까지 와 괜찮습니까……？」
				ENDIF
				PRINTFORMW 「히！ 여기저기로부터 시선을 느낀다……」
			ELSEIF POINT == 93
				PRINTFORML 「에～, 지저에 이런 번화가가 퍼져 아픈 응이라고……」
				PRINTFORMW 「어쩐지 그리운 느낌이 듭니다 이런 경치 모르는데……」
			ELSEIF POINT == 94
				IF DAY * 1440 + TIME - EX:MASTER:전회입욕시각 < 360
					PRINTFORML 「―… 우쭐해 버렸습니다……」
					PRINTFORMW 「 나에게는 너무 조금 뜨겁습니다……」
				ELSE
					PRINTFORML 「이것이 소문의 지옥솥온천입니까」
					PRINTFORMW 「뜨거워서 죽거나 하지 않아요…？」
				ENDIF
			ELSEIF POINT == 95
				IF EX:70:C절정 + EX:70:V절정 + EX:70:A절정 + EX:70:B절정 + EX:70:M절정
					IF TALENT:70:처녀
						PRINTFORMW 「……\/\/\/\」
					ELSE
						PRINTFORMW 「……%UNICODE(0x2764)%」
					ENDIF
				ELSE
					IF TALENT:70:처녀
						PRINTFORMW 「그…… (이)나, 상냥하고 부탁드릴게요……\/\/\/」
					ELSE
						PRINTFORMW 「글자―……%UNICODE(0x2764)%」
					ENDIF
				ENDIF
			ELSEIF POINT == 96
				PRINTFORML 「입니까 이 저택？ 원, 무엇인가 있다……」
				PRINTFORMW 「이라고 할까 마음대로 들어가 있지 않습니다인가～？」
			ELSE
				PRINTFORML 「아…뜨겁다……　이것이 지옥의 지옥의 맹렬한 불입니까……」
				PRINTFORMW 「이런 곳에는 저속해지고 싶지 않네요……」
			ENDIF
		CASE 10
			IF POINT == 101
				PRINTFORML 「―,  무엇입니까 여기」
				PRINTFORMW 「어느 쪽이 위나 아래일지도 알지 않습니다～～」
			ELSEIF POINT == 107
				PRINTFORML 「원―, 토끼가 가득 있네요」
				PRINTFORMW 「지상의 요괴토끼란 무엇이 다른 것일까요」
			ELSEIF POINT == 108
				PRINTFORML 「봐 주세요, 복숭아가 열리고 있어요 」
				PRINTFORMW 「해안에 도전은, 달은 이상하네요―」
			ELSEIF POINT == 109
				PRINTFORML 「원대단해！！ %CALLNAME:MASTER%씨！ 이봐요！ 어！」
				PRINTFORMW 「지구예요！ 치큐우！ 지구는 정말로 푸르렀다～～！」
			ELSE
				PRINTFORML 「여기가 달속에 있다는 궁전……？」
				PRINTFORMW 「어―？ 책에서 읽었을 때는 좀 더 철의 덩어리같은 느낌이었던 것이지만요」
			ENDIF
		ENDSELECT
		;地点を移動すると同じ台詞が出ちゃうけどもうめんどくさいのでこれでいいです
		デート会話:POINT = 1
		;デート会話済み
		TCVAR:70:352 = 1
	;レア
	ELSEIF !RAND:200
		PRINTFORMW 「구슈운！ ……저것, 감기 걸렸는지？」
	;鈴奈庵
	ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
		;失敗
		IF TFLAG:SELECTCOM분기 == -1
			GOTO FAIL
		ELSEIF FLAG:데이트상대 && !CFLAG:70:동행 && !GETBIT(TCVAR:70:360, 0)
			IF TALENT:70:연모
				PRINTFORML 「%CALLNAME:MASTER%씨, 상당히 즐거운 듯 하지 않습니까」
				PRINTFORMW 「말씀입니다만, 데이트라면 타처에서 해 주었으면 합니다―…」
			ELSE
				PRINTFORML 「오늘은 둘이서 어떻게 하셨습니까？」
				PRINTFORMW 「혹시 안으로 데이트라든지……？」
				PRINTFORMW 「아무튼, 가게로서는 기쁘지만, 타처가 좋다고 생각해요……」
			ENDIF
			;一日一回
			SETBIT TCVAR:70:360, 0
		ELSEIF TALENT:70:연모
			GOTO LOVE
		ELSEIF TALENT:70:사모 && CFLAG:70:1005 >= 10
			GOTO LIKE
		ELSE
			CALL M_KOJO_K70_TALKSET(2)
		ENDIF
	;それ以外
	ELSE
		;自己紹介
		IF CFLAG:70:1004 == 0
			PRINTFORMDL %CALLNAME:MASTER%(은)는 가볍게 자기 소개를 했다
			PRINTW
			PRINTFORMW 「에―, 보이지 않는 사람이다라고는 생각하고 있었는데, 그랬습니까」
			PRINTFORMW 「환상시골에 그런 사람이 살고 있는이라니 몰랐습니다」
			CFLAG:70:1004 = 1
		;失敗
		ELSEIF TFLAG:SELECTCOM분기 == -1
			$FAIL
			IF TALENT:70:연모
				PRINTFORML 「응……？」
				PRINTFORMW 「어쩐지 모야로 하네요……」
			ELSE
				PRINTFORMW 「후~…그렇습니까……」
			ENDIF
		;恋慕
		ELSEIF TALENT:70:연모
			$LOVE
			SELECTCASE RAND:16
			CASE 1
				;気候と季節の会話
				CALL M_KOJO_K70_TALKSET(1)
			CASE 2
				;妖魔本の話
				CALL M_KOJO_K70_TALKSET(3)
			CASE 3
				;住んでる所の話
				CALL M_KOJO_K70_TALKSET(4)
			CASE 4
				PRINTFORMW 「%CALLNAME:MASTER%씨！ 또 추천하는 책을 찾아냈어요！」
				CALL M_KOJO_K70_TALKSET(6)
			CASE 5
				;阿求の話
				CALL M_KOJO_K70_TALKSET(7)
			CASE 6
				PRINTFORML 「%CALLNAME:MASTER%씨는 요괴가 두렵지 않습니까？」
				PRINTFORMW 「그 거 역시 실력이 있다는 것이군요……좋겠다」
			CASE 7
				PRINTFORML 「아하하,%CALLNAME:MASTER%씨에게도 그런 유소기가 있었습니다, 귀엽다」
				PRINTFORMW 「 나 말입니까？ 네―, 부끄럽지만… 예를 들면――」
			CASE 8
				PRINTFORMW 「때때로"넘는않고"정말 말을 듣습니다만, 입니까 어……」
			CASE 9
				PRINTFORML 「최근 카리스마라고 하는 새로운 통화가 생겼습니다만, 정직 취급해가 곤란하고 있습니다……」
				PRINTFORMW 「날마다 가치가 변동하다니 귀찮아요―！！」
			CASE 10
				PRINTFORML 「네에에, 최근 소중한 요마책을 입수해서」
				IF !RAND:2
					PRINTFORMW 「%CALLNAME:MASTER%씨에게는 잡아 걸러서 보여 주네요♪」
				ELSE
					PRINTFORMW 「조금 위험해 대용품이므로 모두에게는 비밀이에요♪」
				ENDIF
			CASE 11
				PRINTFORML 「이런 일 하고 있다고(면) 확실히 위험할지도 모르지만」
				PRINTFORMW 「막상은 때는%CALLNAME:MASTER%씨, 도와 주세요」
			CASE 12
				PRINTFORML 「%CALLNAME:MASTER%씨에게 독서의 마음가짐을 지도 합시다」
				PRINTFORMW 「독서3도라고 해, 그것 즉――」
			CASE 13
				PRINTFORML 「, 최근 어떻게도 바빠서, 천천히 책을 읽을 시간이 없어요」
				PRINTFORMW 「아-아, 시간을 멈추어 연들한창독서와 가고 싶다―」
			;残りは適当な雑談
			CASEELSE
				CALL M_KOJO_K70_TALKSET(5)
			ENDSELECT
		;思慕
		ELSEIF TALENT:70:사모
			$LIKE
			SELECTCASE RAND:14
			CASE 1
				;気候と季節の会話
				CALL M_KOJO_K70_TALKSET(1)
			CASE 2
				;店内案内か妖魔本の話
				IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
					CALL M_KOJO_K70_TALKSET(2)
				ELSE
					CALL M_KOJO_K70_TALKSET(3)
				ENDIF
			CASE 3
				;住んでる所の話
				CALL M_KOJO_K70_TALKSET(4)
			CASE 4
				PRINTFORMW 「그렇게 말하면%CALLNAME:MASTER%씨에게 추천하는 책을 찾아냈어요」
				CALL M_KOJO_K70_TALKSET(6)
			CASE 5
				;阿求の話
				CALL M_KOJO_K70_TALKSET(7)
			CASE 6
				PRINTFORML 「%CALLNAME:MASTER%씨의 이야기는 모두 재미있지요」
				PRINTFORMW 「라고 하는지, 인간 떨어지고 한 관점이라고 합니까」
			CASE 7
				PRINTFORML 「 실은 나, 판독눈은 특별한 능력이 있습니다―」
				PRINTFORMW 「어떤 문자라도"문자"(이)라면 읽을 수 있어 버립니다！」
			CASE 8
				PRINTFORML 「어！ 정말입니까！？」
				PRINTFORMW 「 좀 더 자세하게 부탁합니다！」
			CASE 9
				PRINTFORML 「 나는 환상고우 하지메의 요마본컬렉터이랍니다！」
				PRINTFORMW 「%CALLNAME:MASTER%씨도 손에 넣으면(자) 가르쳐 주세요！」
			CASE 10
				PRINTFORML 「요괴 상대의 장사입니까？」
				PRINTFORMW 「괜찮아요, 나의 가방에는 영몽씨랑 마리사씨가 뒤따라 주고 있으니까！」
			CASE 11
				PRINTFORML 「최근에는 요괴에 잊혀져 가끔 요정도 옵니다―」
				PRINTFORMW 「저 애들은 곧 책을 어지르기 때문에 귀찮습니다！」
			;残りは適当な雑談
			CASEELSE
				CALL M_KOJO_K70_TALKSET(5)
			ENDSELECT
		;通常
		ELSE
			CALL M_KOJO_K70_TALKSET(5)
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;会話セット
;==================================================
@M_KOJO_K70_TALKSET(ARG)
SELECTCASE ARG
;気候と季節の会話
CASE 1
	IF TALENT:70:연모
		LOCALS = ♪
	ELSE
		LOCALS = ！
	ENDIF
	;大雨,台風
	IF GROUPMATCH(天候, 5) || FLAG:이상기상 == 9
		PRINTFORML 「\@ OUTROOF(CFLAG:70:현재위치) ? 今日 # 外 \@(은)는 굉장한 비군요―…」
		PRINTFORMW 「이런 날은 독서에 한정하네요！ 동경의 청경우독입니다%LOCALS%」
	;雨,霧雨,霧
	ELSEIF GROUPMATCH(天候, 4, 6, 7)
		PRINTFORML 「오늘은 비 올 듯한 날씨군요―」
		PRINTFORMW 「이런 날은 독서에 한정하네요！ 동경의 청경우독입니다%LOCALS%」
	;吹雪,猛吹雪
	ELSEIF GROUPMATCH(天候, 9) || FLAG:이상기상 == 10
		PRINTFORML 「\@ OUTROOF(CFLAG:70:현재위치) ? 今日 # 外 \@(은)는 굉장한 눈보라군요―…」
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			PRINTFORMW 「이런 날은 거달에 깃들여 독서삼매와 갑시다%LOCALS%」
			PRINTFORMW 「……아무튼, 안은 거달 없는데요」
		ELSE
			PRINTFORMW 「이런 날은 거달에 깃들여 독서삼매와 가고 싶은 곳이군요」
		ENDIF
	;雪,細雪,霧雪,みぞれ,あられ
	ELSEIF GROUPMATCH(天候, 8, 10, 11, 12, 13)
		PRINTFORML 「오늘은 눈도 내려 한층 차가워지네요―…」
		PRINTFORML 「이런 날은 독서에 한정하네요！」
		PRINTFORMW 「동경의 청경우독…(이)가 아닌, 청경"설"독입니다%LOCALS%」
	;春
	ELSEIF DAY:2 == 1
		PRINTFORML 「따뜻한 날씨로 마음 좋네요～」
		IF OUTROOF(CFLAG:70:현재위치)
			PRINTFORMW 「이런 날은 나무 그늘에서 한가로이 요미카키와 갑시다%LOCALS%」
		ELSE
			PRINTFORMW 「이런 날은 나무 그늘에서 한가로이 독서와 가고 싶은 곳이군요」
		ENDIF
	;夏
	ELSEIF DAY:2 == 2
		PRINTFORML 「매일 덥네요～……」
		PRINTFORMW 「이 계절은 비가 내리기 쉬우니까, 집에서 바구니시를 위해 책이 있으면 좋아요～%LOCALS%」
		SIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			PRINTFORMW 「이라고 하는 것으로 1권 어떻습니까？」
	;秋
	ELSEIF DAY:2 == 3
		PRINTFORML 「완전히 가을도 깊어져 왔어요～」
		PRINTFORMW 「그렇게, 가을이라고 말하면(자) 물론 독서의 가을입니다！」
		;ゲーム内でそんなものはない,あなたが借りれる本は割引対象外なのだ
		SIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			PRINTFORMW 「지금은 할인 세일을 해 있기 때문에,%CALLNAME:MASTER%씨도 1권 어떻습니까？」
	;冬
	ELSEIF DAY:2 == 4
		PRINTFORML 「우우…오늘도 차가워지네요～……」
		PRINTFORMW 「이런 날은 모포에 파오 기다려 하루종일 책을 읽어 아프다……」
	ENDIF
;店内案内の会話
CASE 2
	SELECTCASE RAND:6
	CASE 1
		PRINTFORML 「그쪽의 선반은 추리소설이나 동화가 있습니다」
		PRINTFORMW 「추천은 물론, 아가사 크리스Ｑ에 의한 연속 추리 시리즈예요！」
	CASE 2
		PRINTFORML 「그곳의 선반은 역사서나 에세이등이 있습니다」
		PRINTFORMW 「서당에서 사용되고 있는 교과서도 있네요」
	CASE 3
		PRINTFORML 「주위의 선반은 모두 외래책, 즉 밖의 세계의 책이에요」
		PRINTFORMW 「어느 것도 환상시골에는 없는 드문 책이 당점의 자랑입니다！」
	CASE 4
		PRINTFORML 「뒤의 선반은 레시피책이군요」
		PRINTFORMW 「요리 레시피로부터 약의 조제 레시피, 아이템의 합성 레시피도」
	CASE 5
		PRINTFORML 「옆의 선반은 근대문학입니다」
		PRINTFORMW 「후쿠자와유키치, 이시카와 다쿠보쿠, 아쿠타가와 류노스케 등 등……」
	CASEELSE
		PRINTFORML 「, 그곳의 선반은 외래책 중(안)에서도 특히 얇은 책으로……」
		PRINTFORMW 「내용은 얇습니다만…가격은 조금높아지고 있습니다……」
	ENDSELECT
;妖魔本の話
CASE 3
	IF MAIN_MAP == 2
		IF TALENT:70:연모
			PRINTFORML 「%CALLNAME:MASTER%씨는 요괴의 (분)편과도 사이 좋지요」
			PRINTFORMW 「그러한 사람들로부터 요마책을 받거나 한 것은 없습니까～？」
		ELSE
			PRINTFORML 「붙지 않는 일을 묻겠습니다만,%CALLNAME:MASTER%씨는 요괴의 알게 되어 많지요」
			PRINTFORMW 「아니요 의심하고 있다고(면) 빌려주자 말하는 것이 아니고――」
			PRINTFORMW 「단지 그렇게 말하는 일이라면 요마책의 1권이나 2권 가지지 않을까―, -응이라고, 아하하」
		ENDIF
	ELSE
		PRINTFORML 「%CALLNAME:MASTER%씨는 평상시, 요괴\@ MAIN_MAP == 0 ? がよく来る神社に住んでる # たちに囲まれて暮らしてる \@(이)가 아닙니까」
		PRINTFORMW 「이라고 하는 것은 반드시 요괴의 (분)편과도 사이 좋지요」
		PRINTFORMW 「그러한 사람들로부터 요마책을 받거나 한 것은 없습니까～？」
	ENDIF
;住んでる所の話
CASE 4
	IF MAIN_MAP == 2
		PRINTFORML 「마을에서의 생활은 익숙해졌습니다？」
		PRINTFORMW 「모두 매일 괴이하게 위협해지고면서의 살고 있다――」
		PRINTFORMW 「 나는 그런 이 마을을 좋아합니다！」
	ELSEIF MAIN_MAP == 0
		IF INRANGE(CFLAG:MASTER:초기위치, 26, 35)
			PRINTFORML 「요정의 집에서 사는 것은 어떤 느낌입니까？」
			PRINTFORMW 「매일 소란스러운 것 같은 것은 상상 다하네요……」
		ELSEIF INRANGE(CFLAG:MASTER:초기위치, 36, 45)
			PRINTFORML 「유적에서 사는 것은 어떤 느낌입니까？」
			PRINTFORMW 「안은 보통 연구소？ 답다고 하는 것은 (들)물었던 적이 있습니다만……」
		ELSE
			PRINTFORML 「신사의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「매일 요괴가 덮쳐 와 일전 섞거나 한다？」
		ENDIF
	ELSEIF MAIN_MAP == 1
		IF INRANGE(CFLAG:MASTER:초기위치, 123, 133)
			PRINTFORML 「도장에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「매일 어려운 단련의 날들이군요……큰 일  그렇게」
		ELSE
			PRINTFORML 「절에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「요괴에 섞여 수행인가, 나도 조금 체험해 보고 싶을지도」
		ENDIF
	ELSEIF MAIN_MAP == 3
		IF INRANGE(CFLAG:MASTER:초기위치, 334, 348)
			PRINTFORML 「호수에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「어쩐지 상상 붙지 않습니다만, 서바이벌？？」
		ELSE
			PRINTFORML 「홍마관에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「청소가 큰 일？ 오히려 해 보람이 있다？ 네？？」
		ENDIF
	ELSEIF MAIN_MAP == 4
		IF INRANGE(CFLAG:MASTER:초기위치, 401, 430)
			PRINTFORML 「영원정에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「너무 빈둥거려 때가 지？ 하―, 그러니까 영원정이군요―」
			;？
			SIF !RAND:10
				PRINTFORMW 「네？ 오히려 스스로 멈추고 있다？」
		ELSE
			PRINTFORML 「타케바야시에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「어쩐지 상상 붙지 않습니다만…서바이벌？？」
		ENDIF
	ELSEIF MAIN_MAP == 5
		PRINTFORML 「숲에서의 생활은 어떤 느낌입니까？」
		PRINTFORMW 「저기는 생태계로부터 해 굉장하지요……그렇지만 즐거울 것 같다」
	ELSEIF MAIN_MAP == 6
		;まだない
		PRINTFORML 「명계에서의 생활은 어떤 느낌입니까？」
		PRINTFORMW 「극락 기분！？ 조금！ %CALLNAME:MASTER%씨 괜찮습니까！？」
	ELSEIF MAIN_MAP == 7 || MAIN_MAP == 8
		PRINTFORML 「산에서의 생활은 어떤 느낌입니까？」
		PRINTFORMW 「자연과 요괴에 둘러싸여 심신 모두 단련할 수 있는 그렇게……」
	ELSEIF MAIN_MAP == 9
		IF INRANGE(CFLAG:MASTER:초기위치, 901, 930)
			PRINTFORML 「지령전에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「애완동물의 청소가 큰 일？ 오히려 해 보람이 있다？？」
		ELSE
			PRINTFORML 「지저에서의 생활은 어떤 느낌입니까？」
			PRINTFORMW 「어둡고 눅눅한 하고 있어 기분 나쁜 것 같지만……」
		ENDIF
	ELSEIF MAIN_MAP == 10
		;まだない
		PRINTFORML 「달에서의 생활은 어떤 느낌입니까？」
		PRINTFORML 「-, 전혀 상상할 수 없지 않아요……」
		PRINTFORMW 「책에서는 중력이 약하고 뭐든지 후와후와 뜬다 라고 읽었던 적이 있습니다만」
	ENDIF
;汎用雑談
CASE 5
	IF TALENT:70:연모
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「에！ 그런 일이 있었습니까！」
		CASE 2
			PRINTFORMW 「%CALLNAME:MASTER%씨, 그 소문 아시는 바입니다？」
		CASE 3
			PRINTFORMW 「후~～,"사실은 소설보다 진기함이든지"(이)군요……」
		CASE 4
			PRINTFORMW 「%CALLNAME:MASTER%씨, 최근책 읽고 있습니다？ 독서는 권두 유익해요」
		CASE 5
			PRINTFORMW 「그렇게 말하면 그 소란은 이변이었을까」
		CASE 6
			PRINTFORMW 「입니까 그것―！ 좀 더 자세하게 부탁합니다！」
		CASE 7
			PRINTFORMW 「후후,%CALLNAME:MASTER%씨와 이야기하는 것 즐겁습니다♪」
		CASEELSE
			PRINTFORMW 「과연―！ 그런 것이었군요―」
		ENDSELECT
	ELSE
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「어머나, 그것은 눈치채지 못했습니다」
		CASE 2
			PRINTFORMW 「에―, 그런 일이 있었습니까―」
		CASE 3
			PRINTFORMW 「안은 외래책이라고 해, 밖의 세계의 책도 취급하고 있는 거에요」
		CASE 4
			PRINTFORMW 「%CALLNAME:MASTER%씨는 책은 좋아합니까？」
		CASE 5
			PRINTFORMW 「곳에서 그 소문 (들)물었습니다？」
		CASE 6
			PRINTFORMW 「아, 그렇다면 나도 알고 있어요 」
		CASE 7
			PRINTFORMW 「그렇게 말하면 그 소동은 어떻게 되었겠지요」
		CASEELSE
			PRINTFORMW 「응, 요괴의 조업일지도 모르겠네요」
		ENDSELECT
	ENDIF
;おすすめの本
CASE 6
	LOCAL = 0
	WHILE !LOCAL
		SELECTCASE RAND:10
		CASE 1
			SIF ABL:MASTER:청소기능 >= 4
				LOCAL = 1
		CASE 2
			SIF ABL:MASTER:전투능력 >= 4
				LOCAL = 2
		CASE 3
			SIF ABL:MASTER:교양 >= 4
				LOCAL = 3
		CASE 4
			SIF ABL:MASTER:요리기능 >= 4
				LOCAL = 4
		CASE 5
			SIF ABL:MASTER:음악기능 >= 4
				LOCAL = 5
		CASE 6
			SIF TALENT:MASTER:낚시Lv >= 4
				LOCAL = 6
		CASE 7
			SIF !TALENT:MASTER:비동정 && !TALENT:MASTER:연인 && !TALENT:70:연모
				LOCAL = 7
		CASE 8
			SIF TALENT:MASTER:청소중독
				LOCAL = 8
		CASE 9
			FOR LOCAL:1, 1, CHARANUM
				SIF !CFLAG:(LOCAL:1):무자각임신 && (TALENT:(LOCAL:1):육아중 || TALENT:(LOCAL:1):임신)
					LOCAL = 9
			NEXT
		CASEELSE
			LOCAL = 100
		ENDSELECT
	WEND
	PRINTFORM 「\@ TALENT:70:연모 ? ジャン！  # \@
	SELECTCASE LOCAL
	CASE 1
		PRINTFORMW 「세계의 청소기 백선」！」
		PRINTFORMW 「밖의 세계의 여러 가지 청소기가 많이 실리고 있어요～！」
	CASE 2
		PRINTFORMW 「동방 수련록 ～노우 미스 노우 폭탄에의 길～」！」
		PRINTFORML 「탄막 짓거리의 오의서같습니다」
		PRINTFORMW 「어？ 이런 건 누가 썼겠지요？」
	CASE 3
		PRINTFORMW 「데·레·메타리카 개정 일본어 번역판」！」
		PRINTFORMW 「 나에게는 형편없었습니다하지만,%CALLNAME:MASTER%씨라면 반드시 이해할 수 있을까하고！」
	CASE 4
		PRINTFORMW 「고독의 환상시골 음식」！」
		PRINTFORMW 「밖의 세계로부터 온 남자가 한사람 환상시골의 요리점을 둘러싼 만화입니다！」
	CASE 5
		PRINTFORMW 「동방해선율」！」
		PRINTFORMW 「박려신사 제주씨의 음악을 해명해 어레인지의 요령이 써 있다고 합니다！」
	CASE 6
		PRINTFORMW 「환상 수족관」！」
		PRINTFORML 「환상 세계의 수생생물이 많이 실리고 있습니다」
		PRINTFORMW 「환상시골이라면 반드시 어디엔가 서응 나오겠지요！」
	CASE 7
		PRINTFORMW 「그녀를 만드는 방법」！」
		PRINTFORMW 「아……불필요한 주선이었습니까……？」
	CASE 8
		PRINTFORMW 「이상 청소자의 멘탈 케어」！」
		PRINTFORMW 「청소 중독에 걸려도 이것으로 안심！」
	CASE 9
		PRINTFORMW 「이크멘의 마음가짐」！」
		PRINTFORML 「이크멘과는 육아에 힘쓰는 남성입니다！」
		IF !CFLAG:70:무자각임신 && (TALENT:70:육아중 || TALENT:70:임신)
			PRINTFORMW 「후후후,%CALLNAME:MASTER%씨에게는 훌륭한 아버지가 되어 주셨으면 하니까, 군요%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「큰 일이겠지요하지만, 이것을 읽어 노력해 주세요！」
		ENDIF
	CASEELSE
		PRINTFORMW 「올바른 시간의 사용법」！」
		PRINTFORMW 「빈둥거리는 것도 좋습니다만, 시간은 유한하기 때문에！」
	ENDSELECT
;阿求の話
CASE 7
	IF TALENT:70:연모
		;恋慕前提なので6,2,1は無し
		SELECTCASE M_KOJO_K70_BALANCE(70, 80)
		CASE 8, 5, 3
			PRINTFORML 「%CALLNAME:MASTER%씨로부터 본 아구는 어떤 딸(아가씨)입니까？」
			PRINTFORMW 「 나에게는 언제나 어려운 일뿐 말해 바보취급 해 옵니다―！」
		CASE 7
			PRINTFORML 「아구는 정말 언제나 나에게%CALLNAME:MASTER%씨와의 정사 이야기를 자랑이야기를 해 옵니다―」
			PRINTFORMW 「 나, 아구를 싫게 되고 싶지 않습니다……그러니까……」
		CASE 4
			PRINTFORML 「곳에서%CALLNAME:MASTER%씨, 최근아구와 사이 좋지요」
			PRINTFORMW 「무슨 있었습니까―？ 설마 이상한 금년이라고 없지요―？」
		ENDSELECT
	ELSE
		IF ABL:80:친밀 < 3
			PRINTFORML 「히에다가의 아구는 딸(아가씨) 아시는 바입니다？」
		ELSE
			PRINTFORML 「아구와는 친구이랍니다」
		ENDIF
		PRINTFORMW 「저녀석과는 나이가 가까웠던 탓일까, 옛부터의 교제입니다」
	ENDIF
ENDSELECT
;==================================================
;301,お茶を淹れる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_301
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_301_1
#DIM GUEST, 2
#DIMS GUESTS
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	RESETCOLOR
	;ゲストキャラ判定
	CALL M_KOJO_K70_GUEST(1)
	GUEST = RESULT
	GUEST:1 = RESULT:1
	GUESTS = %RESULTS%
	IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORML %CALLNAME:PLAYER%(은)는 차를 엄라고%CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? 達 # \@에 내몄다…
	ELSEIF GUESTS != ""
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 다회
		DRAWLINE
		;当然その場にいる全員とするわけですが、あえて省略しています
		;文章上では相手主導ですけどソースは変わりませんし特別なお茶も自分のものを使います
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) && ABL:70:친밀 >= 5
			PRINTFORML %CALLNAME:PLAYER%하지만 차를 엄같은 것으로 자리에서 일어나면(자)
			PRINTFORML 그것을 헤아린 코스즈가 이미 차의 준비를 해 주어 있어
			PRINTFORML %CALLNAME:TARGET%(와)과%GUESTS%의 세 명으로 잠깐의 다회를 했다…
		ELSE
			PRINTFORML %CALLNAME:PLAYER%(은)는 차를 엄라고%CALLNAME:TARGET%(와)과%GUESTS%의 세 명으로 잠깐의 다회를 했다…
		ENDIF
	ELSE
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) && ABL:70:친밀 >= 5
			PRINTFORML %CALLNAME:PLAYER%하지만 차를 엄같은 것으로 자리에서 일어나면(자)
			PRINTFORML 그것을 헤아린 코스즈가 이미 차의 준비를 해 주고 있었다…
		ELSE
			PRINTFORML %CALLNAME:PLAYER%(은)는 차를 엄라고%CALLNAME:TARGET%\@ GET_TARGETNUM() > 1 ? 達 # \@에 내몄다…
		ENDIF
	ENDIF
	PRINTW
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMW 「아, 감사합니다」
	ELSEIF GUESTS != ""
		CALL M_KOJO_COLOR_K70
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) && ABL:70:친밀 >= 5
			PRINTFORML 「차를 준비했습니다―, 쉽시다\@ TALENT:70:연모 ? ♪ # \@」
		ELSE
			PRINTFORML 「감사합니다―」
		ENDIF
		PRINTL
		;4=小鈴が恋慕(同行中だと最優先),3=ゲストと同行中in鈴奈庵,2=ゲストとデート中orゲストが恋慕で同行中,1=それ以外
		SELECTCASE GUESTS
		CASE "霊夢"
			IF GUEST == 4
				IF INRANGE(CFLAG:70:현재위치, 0, 100)
					PRINTFORML 「(들)물었어요, 영몽씨 또 활약하셨다고 해」
					PRINTFORMW 「대단하지요―, 나도 적어도 무엇인가 서포트 정도 젓가락이라고 같습니다～」
				ELSE
					PRINTFORML 「영몽씨, 최근 신사의 상태는 어떻습니까？」
					PRINTFORMW 「그렇다！ %CALLNAME:MASTER%씨！ 이번 함께 참배하러 갑시다！」
					PRINTFORML 「 나 정확히 부탁하고 싶은 것이 있습니다―」
					PRINTFORMW 「네에, 내용은 비밀입니다！」
				ENDIF
			ELSEIF GUEST == 3
				PRINTFORML 「좋았으면 음악도 보낼 수 있어요―」
				PRINTFORMW 「영몽씨는 -와♪「니시키련화접」으로 좋습니까」
			ELSEIF GUEST == 2
				PRINTFORML 「곳에서 평상시는 둘이서 어떤 금년 비칩니까―？」
				PRINTFORMW 「%CALLNAME:MASTER%씨도 요괴 퇴치하기도 합니까？」
			ELSE
				PRINTFORML 「요즘 이렇다 할 만한 사건은 일어나지 않네요―」
				PRINTFORMW 「억지로 말하면%CALLNAME:MASTER%씨와 알게 된 일 정도？」
			ENDIF
		CASE "魔理沙"
			IF GUEST == 4
				PRINTFORML 「(들)물었어요, 마리사씨 또 활약하셨다고 해」
				PRINTFORMW 「대단하지요―, 나도 적어도 무엇인가 서포트 정도 젓가락이라고 같습니다～」
			ELSEIF GUEST == 3
				PRINTFORML 「좋았으면 음악도 보낼 수 있어요―」
				PRINTFORMW 「마리사씨는 -와♪「별의 그릇」으로 좋습니까」
			ELSEIF GUEST == 2
				PRINTFORML 「곳에서 평상시는 둘이서 어떤 금년 비칩니까―？」
				PRINTFORMW 「%CALLNAME:MASTER%씨가 마법 가르쳐 주거나 합니까？」
			ELSEIF GUEST == 1
				PRINTFORML 「요즘 이렇다 할 만한 사건은 일어나지 않네요―」
				PRINTFORMW 「억지로 말하면%CALLNAME:MASTER%씨와 알게 된 일 정도？」
			ENDIF
		CASE "紫"
			IF GUEST == 4
				;紫に関わる記憶がどの程度残ってるかは謎です,ここではある程度残ってると解釈しています
				PRINTFORMW 「보라색씨, 그 때는 감사합니다」
				PRINTFORML 「 나나름대로 「진실」을 찾아낼 수 있었다고 생각합니다」
				PRINTFORMW 「그 덕분에 지금의 내가 있어진다고 하는지, 그, 어쨌든 지금도 감사하고 있습니다」
			ELSEIF GUEST == 3
				PRINTFORML 「보라색씨는 외래책에 자세하지요」
				PRINTFORML 「뭐든지 안에 놓여져 있는 외래책은 모두"모두 낡아서 알고 있다"다워요」
				PRINTFORMW 「가끔 새로운 외래책을 기증해 주시고, 혹시 보라색씨는――」
				PRINTFORMW 「밖의 세계 매니아입니까！？」
			ELSEIF GUEST == 2
				PRINTFORMW 「곳에서, 두 명은 도대체 어떤 관계입니까……」
				PRINTFORML 「있고, 집！ 따로 잔소리하는 생각은 없습니다！ 다만 조금 신경이 쓰여……」
				PRINTFORMW （어쩐지 사이 좋은 점……　보라색씨도 그런 식으로 자연스러운 웃어 하는구나）
			ELSEIF GUEST == 1
				PRINTFORMW 「보라색씨와%CALLNAME:MASTER%씨는 아는 사람이었군요」
				PRINTFORML 「의외로 말합니까…뜻밖의 사람끼리이므로, 반대로 의외이지 않을지도……」
				PRINTFORMW （%CALLNAME:MASTER%씨는 보라색씨가 요괴라도 알고 있는 것일까……）
			ENDIF
		CASE "文"
			IF GUEST == 4
				PRINTFORML 「문장씨는 텐구 중(안)에서는 그, 이단인 (분)편이기도 합니다？」
				PRINTFORMW 「이봐요, 우리 인간과 적극적으로 교류 해 주지 않습니까」
				PRINTFORMW 「입장은 적끼리일지도 모르지만, 나는 문장씨좋아해요～」
			ELSEIF GUEST == 3
				PRINTFORML 「신문에 새로운 코너를 마련해 봐 어떻습니까」
				PRINTFORMW 「그렇다,%CALLNAME:MASTER%산야는 보지 않습니다？」
				IF TALENT:70:연모
					PRINTFORMW 「%CALLNAME:MASTER%씨라면 반드시 재미있는 기사 쓸 수 있어요―！」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%씨는 이상한 일로 자세하니까！」
				ENDIF
			ELSEIF GUEST == 2
				PRINTFORML 「곳에서 평상시는 둘이서 어떤 금년 비칩니까―？」
				PRINTFORMW 「%CALLNAME:MASTER%씨도 신문 쓰거나 혹은 취재의 조력이라든지 합니까？」
			ELSEIF GUEST == 1
				PRINTFORML 「%CALLNAME:MASTER%씨는 문장씨의 신문 읽고 있습니다？」
				PRINTFORMW 「모처럼이기 때문에, 무엇인가 의견이나 감상을 (듣)묻고 싶네요」
			ENDIF
		CASE "マミゾウ"
			IF GUEST == 4
				PRINTFORMW 「마미조우씨, 그 때는 신세를 졌습니다」
				PRINTFORML 「입니다만 「그림 두루마기」를 포함해 그 건은"대여"(이)니까요！」
				PRINTFORMW 「언제의 날이나 나 자신의 손으로 돌려줍니다……！」
			ELSEIF GUEST == 3
				PRINTFORML 「마미조우씨도 있고, 좋았으면 최근 손에 넣은 나의 콜렉션에서도 봅니다？」
				PRINTFORMW 「이봐요, 이것은 번역하면(자) 마을의 사람들에게도 받아요 반드시！」
				PRINTFORMW 「네？ 안됩니다, 그렇게 말해 형편이 좋게 개찬할 생각이군요……」
			ELSEIF GUEST == 2
				PRINTFORMW 「곳에서 평상시는 둘이서 어떤 금년 비칩니까―？」
				IF TALENT:69:연모
					PRINTFORMW 「후~…, 큰 일 사이 화목한 것 같아, 부러운 한으로 스……」
				ELSE
					PRINTFORML 「네,%CALLNAME:MASTER%씨가 뒤쫓고입니까？」
					PRINTFORMW 「 그렇지만 마미조우씨도 그렇지만도 않지요」
				ENDIF
			ELSEIF GUEST == 1
				PRINTFORMW 「마미조우씨와%CALLNAME:MASTER%씨는 아는 사람이었군요」
				PRINTFORML 「마미조우씨의 아는 사람은 개성적인 (분)편이 많기 때문에,%CALLNAME:MASTER%씨도 그런 것입니까」
				PRINTFORMW （%CALLNAME:MASTER%씨는 마미조우씨가 변하고 너구리는 알고 있는 것일까？）
			ENDIF
		CASE "阿求"
			;8=独占,7=悲恋,6=揶揄,5=信頼,4=敵対,3=恋慕,2=応援,1=平穏
			SELECTCASE M_KOJO_K70_BALANCE(70, 80)
			CASE 8, 5
				IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치)
					PRINTFORMW 「후후, 이렇게 해 차 하고 있다고(면) 행복하다라고 생각합니다♪」
					PRINTFORML 「아,%CALLNAME:MASTER%씨는 술의 것이 좋았습니까？」
					PRINTFORMW 「그렇네요 , 자이번은 세 명으로 얕보러 갈까요♪」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%씨는 좋아하는 차는 있습니다？」
					PRINTFORML 「아구는 차에 시끄러워서, 특히 홍차는 종류가야의 품질이야가 말해 옵니다～」
					PRINTFORMW 「아！ 이봐요 또 긴 온축이 시작되었다」
				ENDIF
			CASE 7
				PRINTFORMW 「%CALLNAME:MASTER%씨들은 어디로 나아갔습니까？」
				PRINTL
				PRINTFORMDL ！
				PRINTFORMDL 돌연의 질문에 입에 넣은 차를 불기 시작할 것 같게 되었다…
				PRINTW
				PRINTFORMW 「네―, (이)래 연인에게 (듣)묻는 것은 보통이 아닙니까―」
			CASE 6
				PRINTFORML 「응 아구, 그래서%CALLNAME:MASTER%씨와는 어떻게야？」
				PRINTFORMW 「어떻게는 그렇다면 아연인에게 (듣)묻는 것으로 하면(자), 응……」
				PRINTFORMW 「아하하,%CALLNAME:MASTER%씨도 얼굴 붉어지고 있어요～♪」
			CASE 4
				PRINTFORMW 「%CALLNAME:MASTER%씨는 나와 아구 선택한다고 하면(자) 어느 쪽으로 합니까？」
				PRINTL
				PRINTFORMDL ！
				PRINTFORMDL 돌연의 질문으로 그 자리의 세 명에게 긴장이 달렸다…
				PRINTW
				PRINTFORML 「아―, 별로 애인으로 한다든가라는  것이 아니어요」
				PRINTFORMW 「다만 좋아하는 타입의 문제입니다」
			CASE 3, 1
				PRINTFORMW 「응 아구, 지난번%CALLNAME:MASTER%씨가 말했지만 그건――」
				PRINTL
				PRINTFORMDL ……
				PRINTFORMDW …………
				PRINTL
				PRINTFORMW 「 , 미안해요, 무심코 평소의 상태로 긴 이야기가 되어 버려……」
			CASE 2
				PRINTFORMW 「%CALLNAME:MASTER%씨는 엉뚱한 곳이 재미있지요」
				PRINTFORMW 「아구는%CALLNAME:MASTER%씨의 어디가 좋아라든지는 있다？」
			ENDSELECT
		ENDSELECT
		;一日一回
		TCVAR:70:(M_KOJO_K70_GUEST_TCVAR(GUEST:1, 1)) = 1
		;ゲスト参加時は大成功/失敗は省略
	ELSE
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) && ABL:70:친밀 >= 5
			PRINTFORML 「차를 준비했습니다―, 쉽시다\@ TALENT:70:연모 ? ♪ # \@」
			PRINTFORMW 「음악도 걸칩니다？ 그렇네요,%CALLNAME:MASTER%씨를 좋아할 것 같은 것은――」
			;大成功
			IF TFLAG:SELECTCOM분기 == 1
				PRINTFORMW 「어머나, 입맛에 맞았습니다？ 좋았다♪」
			;失敗,悪いのはあなたです
			ELSEIF TFLAG:SELECTCOM분기 == -1
				PRINTFORMW 「어머나, 입맛에 맞지 않았습니까… 미안합니다……」
			ENDIF
		ELSE
			PRINTFORML 「감사합니다―\@ TALENT:70:연모 ? ♪ # \@」
			;大成功
			IF TFLAG:SELECTCOM분기 == 1
				PRINTFORMW 「원！ 몹시 맛있습니다～♪」
			;失敗
			ELSEIF TFLAG:SELECTCOM분기 == -1
				PRINTFORMW 「응……조금 씁쓸할지도……」
			ELSEIF TALENT:70:연모
				SELECTCASE RAND:9
				CASE 1
					PRINTFORMW 「%CALLNAME:MASTER%씨의 엄라고 주는 차, 언제나 맛있습니다♪」
				CASE 2
					PRINTFORMW 「……옆에 책이기도 하면 꼭 좋은데요, 지금은%CALLNAME:MASTER%씨가 있기 때문에,♪」
				CASE 3
					PRINTFORML 「아, 나 정확히 차과자 가지고 있어요 」
					PRINTFORMW 「네, 그러세요♪」
				CASEELSE
					IF DAY:2 == 2
						PRINTFORMW 「……수분 보급은 소중하기 때문에」
					ELSE
						PRINTFORMW 「……신체가 따뜻해지네요～」
					ENDIF
				ENDSELECT
			ELSE
				PRINTFORMW 「…염주않다……」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;302,スキンシップ
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_302
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	;不機嫌
	IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%(와)과의 스킨십을 꾀하려고 했다
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「아…！ ,  무엇입니까……」
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 8
		ENDIF
	;背中を流す
	ELSEIF BATHCHECK(CFLAG:MASTER:현재위치) && IN_HOME(CFLAG:MASTER:현재위치)
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 등을 흘려 주었다
		PRINTW
		PRINTFORML 「씻어 줍니까？ 자 호의를 받아들여♪」
		PRINTFORMW 「아는%UNICODE(0x2764)% 낯간지럽습니다♪」
	ELSE
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%(와)과의 스킨십을 꾀했다
		PRINTW
		IF TALENT:70:연모
			;大成功
			IF TFLAG:SELECTCOM분기 == 1
				PRINTFORML 「아…\/\/\/ 그런…상스러워요……\/\/\/」
				PRINTFORMW 「으로, 그렇지만, 싫지 않습니다……좀 더 만……%UNICODE(0x2764)%」
			;失敗
			ELSEIF TFLAG:SELECTCOM분기 == -1
				PRINTFORMW 「…그러한 천한 것은 좋지 않다고 생각해요」
			ELSE
				SELECTCASE RAND:12
				CASE 1
					PRINTFORML 「꺄♪」
					PRINTFORMW 「도～, 낯간지럽습니다～！」
				CASE 2
					PRINTFORML 「어떻게 했습니까, 가만히 응시해……」
					PRINTFORMW 「……\/\/\/ (은)는, 부끄럽습니다……\/\/\/」
				CASE 3
					PRINTFORML 「아……\/\/\/」
					PRINTFORMW 「그것 기분이 좋습니다……\/\/\/」
				CASE 4
					PRINTFORML 「%CALLNAME:MASTER%씨, 손 연결해도 괜찮습니까？」
					PRINTFORMW 「후후, 따뜻합니다♪」
				CASE 5
					PRINTFORML 「원원, 어떻게 했습니다…？」
					PRINTFORMW 「후후, 응석꾸러기씨군요♪」
				CASE 6
					PRINTFORML 「아……\/\/\/」
					PRINTFORMW 「그런, 부끄러워요……\/\/\/」
				CASE 7
					PRINTFORML 「아！ 와……감사합니다」
					PRINTFORMW 「살아났습니다, 소중한 상품을 떨어뜨리는 곳(중)이었습니다……」
				CASE 8
					PRINTFORML 「？ 손금에서도 봅니까？」
					PRINTFORMW 「 나, 감정선이 긴 것이 자랑입니다！」
				CASE 9
					PRINTFORML 「%CALLNAME:MASTER%씨도 안경 써 보겠습니다―？」
					PRINTFORMW 「네, 그러세요」
				CASE 10
					PRINTFORML 「원！ 좀, 누르지 말아 주세요～！」
					PRINTFORMW 「 이제(벌써), 소중한 상품을 떨어뜨리는 곳(중)이었어요」
				CASE 11
					PRINTFORML 「가끔 씩은 머리 모양 바꾸어 볼까」
					PRINTFORMW 「%CALLNAME:MASTER%씨는 어떤 머리 모양을 좋아합니까―？」
				CASEELSE
					PRINTFORML 「이 령입니까？ 네에, 나의 마음에 드는 것입니다」
					PRINTFORMW 「거기에 이 령은 안의 심볼이기도 합니다～」
				ENDSELECT
			ENDIF
		ELSEIF ABL:70:친밀 >= 4
			IF FIRSTTIME("スキンシップ")
				PRINTFORMW 「꺄！ ,  무엇입니까？」
			;大成功
			ELSEIF TFLAG:SELECTCOM분기 == 1
				PRINTFORMW 「아는♪ 도～, 낯간지럽습니다～！」
			;失敗
			ELSEIF TFLAG:SELECTCOM분기 == -1
				PRINTFORMW 「어와…그러한 것은 조금……」
				BASE:70:분노 += MAXBASE:70:분노 / 8
			ELSE
				SELECTCASE RAND:4
				CASE 1
					PRINTFORML 「？ 손금에서도 봅니까？」
					PRINTFORMW 「아니요 점에는 싫은 추억이 있어서…아하하」
				CASE 2
					PRINTFORML 「%CALLNAME:MASTER%씨도 안경 써 보겠습니다―？」
					PRINTFORMW 「네, 그러세요」
				CASE 3
					PRINTFORML 「원！ 좀, 누르지 말아 주세요～！」
					PRINTFORMW 「 이제(벌써), 소중한 상품을 떨어뜨리는 곳(중)이었어요」
				CASEELSE
					PRINTFORML 「이 령입니까？ 네에, 나의 마음에 드는 것입니다」
					PRINTFORMW 「거기에 이 령은 안의 심볼이기도 합니다～」
				ENDSELECT
			ENDIF
		ELSE
			IF FIRSTTIME("スキンシップ")
				PRINTFORMW 「꺄！ ,  무엇입니까……」
			;大成功
			ELSEIF TFLAG:SELECTCOM분기 == 1
				PRINTFORMW 「도―, 낯간지러워요～！」
			;失敗
			ELSEIF TFLAG:SELECTCOM분기 == -1
				PRINTFORMW 「그…멈추어주실 수 있겠습니까……」
				BASE:70:분노 += MAXBASE:70:분노 / 5
			ELSE
				SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「어와 무엇이지요……」
				CASE 2
					PRINTFORMW 「꺄！ (이)나, 그만두어 주세요…！」
				CASEELSE
					PRINTFORMW 「은, 네？」
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,謝る
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K70_303
;フキゲンが最大(3)だと謝っても許してくれない、謝りキャンセルが発動
SIF TCVAR:70:350 >= 3
	TFLAG:192 = -2

@M_KOJO_MESSAGE_COM_K70_303
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TFLAG:SELECTCOM분기 == -2 || TFLAG:SELECTCOM분기 == 2
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%에 무례를 사과해 과자 때를 건네주었다
	ELSE
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%에 무례를 사과했다
	ENDIF
	PRINTW
	;フキゲンが最大(3)だと謝っても許してくれない、謝りキャンセルが発動
	IF TFLAG:192 == -2
		PRINTFORMW 「…………」
		PRINTL
		PRINTFORMDW 날을 고치는 것이 좋을지도 모른다……
		CFLAG:70:빡침 = 1
		TALENT:70:기분 = -1
		BASE:70:분노 = MAXBASE:70:분노
		RETURN 1
	ELSEIF TFLAG:SELECTCOM분기 == 1
		PRINTFORML 「후후,%CALLNAME:MASTER%씨도 그런 태도 합니다」
		PRINTFORMW 「별로 이제 되었어요, 굉장한 일이 아니며」
	ELSEIF TFLAG:SELECTCOM분기 == 2
		PRINTFORML 「……　아무래도 성의는 있는 것 같네요」
		PRINTFORMW 「좋을 것입니다, 이번 뿐이에요……」
		PRINTFORMDW %CALLNAME:TARGET%(은)는 반발 각인LV1(을)를 잃었다
	ELSEIF TFLAG:SELECTCOM분기 == 0
		PRINTFORML 「후~……　알았어요」
		PRINTFORMW 「어쩔 수 없네요…… 　이번 뿐이에요」
	ELSEIF TFLAG:SELECTCOM분기 == -2
		PRINTFORML 「-응, 물건으로 낚시하자는 (뜻)이유입니까」
		PRINTFORMW 「%CALLNAME:MASTER%씨라고 그러한 사람이었군요, 잘못 보았습니다」
		;今日はもう謝れない
		TCVAR:70:350 = 3
		TALENT:70:기분 = -1
	ELSE
		PRINTFORML 「그래서 사과한 생각입니까―？」
		PRINTFORMW 「자신이 무엇을 했는지도 라고 생각해 반성해 주세요」
	ENDIF
	;通常は成功しても機嫌は戻らないがフキゲンを消すので一緒に戻ってもらう
	IF GROUPMATCH(TFLAG:SELECTCOM분기, 1, 2, 0)
		TALENT:70:기분 = 0
		TCVAR:70:350 = 0
		TCVAR:70:353 = 0
	ENDIF
ENDIF
RETURN 1
;==================================================
;304,仕事を手伝う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:도울수없다(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_MESSAGE_COM_K70_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTL
	IF CFLAG:70:직종 == 41
		;■店番
		;　　時間：毎週水・木、朝9時～夕17時まで
		;　　場所：鈴奈庵（商家町）
		;　仕事量：4800(8時間分)
		;　　職種：41（会話）
		;　手伝い：手伝っても早く終わらない
		;報酬倍率：x2
		;その日最初の手伝いは序文が入る,ただし住んでると省略
		SIF !GETBIT(TCVAR:70:360, 1) || CFLAG:MASTER:초기위치 == CFLAG:70:초기위치
			PRINTFORML 「어머나, 도와 주십니까？ \@ TALENT:70:연모 ? 助かります～♪ # ありがとうございます \@」
		SELECTCASE RAND:9
		CASE 1
			PRINTFORMW 「에서는 이쪽의 책을 원의 선반에 되돌려 줄 수 있습니까」
		CASE 2
			PRINTFORMW 「에서는 대출 상황의 체크를 부탁드릴게요」
		CASE 3
			PRINTFORMW 「에서는 조금 청소를 도와 주세요」
			SIF ABL:MASTER:청소기능 >= 4
				PRINTFORMW （하, 눈초리가 바뀌었다……！）
			EXP:MASTER:청소경험 ++
		CASE 4
			PRINTFORMW 「그렇네요―, 극장,상점등에서 손님을 불러들에서도 해 보겠습니다？」
		CASE 5
			IF TALENT:70:연모
				PRINTFORML 「요마책의 정리 해 줄 수 있습니까？」
				PRINTFORMW 「괜찮아요～, 이 거치지 않아 것은 날뛰거나 하지 않기 때문에♪」
			ELSE
				PRINTFORML 「\@ !GETBIT(TCVAR:70:360, 1) ? といっても #  \@지금은 특히 할일 없지요」
				PRINTFORMW 「기다리거나 책에서도 읽고 있읍시다」
			ENDIF
		;残りはのんびり
		CASEELSE
			PRINTFORML 「\@ !GETBIT(TCVAR:70:360, 1) ? といっても #  \@지금은 특히 할일 없지요」
			PRINTFORMW 「기다리거나 책에서도 읽고 있읍시다」
		ENDSELECT
	ELSEIF CFLAG:70:직종 == 40
		;■蔵書の整理
		;　　時間：毎週月・火・金、夕18時～夜20時まで
		;　　場所：鈴奈庵（商家町）
		;　仕事量：1200(2時間分)
		;　　職種：40（掃除）
		;　手伝い：可
		;報酬倍率：x3
		;その日最初の手伝いは序文が入る,ただし住んでると省略
		SIF !GETBIT(TCVAR:70:360, 1) || CFLAG:MASTER:초기위치 == CFLAG:70:초기위치
			PRINTFORML 「어머나, 도와 주십니까？ \@ TALENT:70:연모 ? 助かります～♪ # ありがとうございます \@」
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「좀에게 먹어져가 있으면 가르쳐 주세요」
		CASE 2
			PRINTFORMW 「아, 이 본여름인가 해―！」
		CASE 3
			PRINTFORMW 「저것, 이 책 읽었던가일까……」
		CASE 4
			IF TALENT:70:연모
				PRINTFORMW 「상냥하게 취급해 주세요」
			ELSE
				PRINTFORMW 「난폭하게 취급하지 말아 주세요―！」
			ENDIF
		CASEELSE
			PRINTFORMW 「영차, 영차」
		ENDSELECT
	ENDIF
	;一日一回
	SETBIT TCVAR:70:360, 1
ENDIF
RETURN 1
;==================================================
;305,膝枕してもらう
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:체형 > TALENT:체형 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:친밀(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_MESSAGE_COM_K70_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF ABL:70:친밀 >= 6
			PRINTFORMW 「네？ 무릎 베개입니까？ 아무튼 좋지만……」
		ELSE
			PRINTFORMW 「후~……아무쪼록 마음대로……」
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ENDIF
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「네, 그러세요！」
		CASE 2
			PRINTFORMW 「어떤 기분입니까？」
		CASE 3
			PRINTFORMW 「그……키, 좁기 때문에 떨어지지 않게 조심해 주세요……」
		CASE 4
			PRINTFORMW 「～…저려 왔습니다」
		CASE 5
			PRINTFORMW 「아무쪼록 천천히♪」
		CASE 6
			PRINTFORMW 「, 엎드리고는 안됩니다！」
		CASE 7
			PRINTFORML 「후후,%CALLNAME:MASTER%씨, 귀엽다……」
			SIF M_KOJO_K70_SADISTIC(70) && CFLAG:70:1006 && CFLAG:70:욕구불만도 >= 500
				PRINTFORML 「……%UNICODE(0x2764)%」
			WAIT
		CASEELSE
			PRINTFORML 「에서는, 책을 읽어 드립시다」
			PRINTFORMW 「이라니♪」
		ENDSELECT
	ELSEIF ABL:70:친밀 >= 6
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「네, 그러세요！」
		CASE 2
			PRINTFORMW 「어떤 기분입니까？」
		CASE 3
			PRINTFORMW 「그……키, 좁기 때문에 떨어지지 않게 조심해 주세요……」
		CASEELSE
			PRINTFORMW 「～…저려 왔습니다」
		ENDSELECT
	ELSE
		PRINTFORMW 「네？ 무릎 베개입니까？ 아무튼 좋지만……」
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,お腹を撫でる
;TFLAG:193(1=ABL:친밀6以上かつ妊娠時 0=成功 -1=ABL:친밀5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K70_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF ABL:70:친밀 >= 6
			PRINTFORMW 「꺄！ (이)나, 멈추어 주세요……」
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ELSE
			PRINTFORMW 「그…멈추어주실 수 있겠습니까……」
			BASE:70:분노 += MAXBASE:70:분노 / 5
		ENDIF
	ELSEIF TALENT:70:임신
		IF CFLAG:70:무자각임신
			PRINTFORML 「…………」
			PRINTFORMDW %CALLNAME:TARGET%(은)는 불안인 표정을 띄우고 있다
			CALL M_KOJO_K70_YAMETEKUDASAI(70, 1)
		ELSEIF CFLAG:70:1006
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「네에에%UNICODE(0x2764)% 상냥하게 어루만져 주세요%UNICODE(0x2764)%」
			CASE 2
				PRINTFORMW 「네에에%UNICODE(0x2764)% 지금의가 아버지예요―」
			CASEELSE
				PRINTFORMW 「네에에%UNICODE(0x2764)% %CALLNAME:MASTER%씨같은 상냥한 아이가 되었으면 좋은데♪」
			ENDSELECT
		ENDIF
	ELSEIF ABL:70:친밀 >= 6
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「꺄！ ,  무엇입니까…」
		CASEELSE
			PRINTFORML 「？」
			PRINTFORMW 「,  무엇이지요……？」
		ENDSELECT
	ELSE
		PRINTFORMW 「그…멈추어주실 수 있겠습니까……」
		BASE:70:분노 += MAXBASE:70:분노 / 8
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,頬をつまむ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:연모(受け入れつつ笑顔でやり返す
	;ABL:친밀(6以上=おずおずとやり返す
	;ABL:순종(5以上=されるがまま
;==================================================
@M_KOJO_MESSAGE_COM_K70_307
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 뺨에 손을 뻗었다…
		PRINTFORMDW 시간을 제지당했다%CALLNAME:TARGET%(은)는 무저항인 채 뺨을 집어지고 있다…
	ELSEIF CFLAG:70:수면
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 자고 있다%CALLNAME:TARGET%의 뺨을 손가락으로 집었다…
		PRINTFORMW
		PRINTFORMW 「…, 짚히의 정사인 집～……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3 || ABL:70:순종 <= 4 || ABL:70:친밀 <= 5
		PRINTFORMDW %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 뺨에 손을 뻗으려고 했지만 곧 바로 떨쳐져 버렸다
		PRINTFORML
		IF ABL:70:친밀 >= 6 || ABL:70:순종 >= 5
			PRINTFORMW 「,  무엇입니까―！」
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 5
		ENDIF
	ELSE
		;DATAFORMは色デフォルト化できない
		RESETCOLOR
		PRINTFORM %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 뺨에 손을 뻗어
		PRINTDATA
			DATAFORM 로 했다…
			DATAFORM 로 했다…
			DATAFORM 로 했다…
			DATAFORM 로 했다…
			DATAFORM 벌컥벌컥 했다…
		ENDDATA
		PRINTL
		PRINTW
		CALL M_KOJO_COLOR_K70
		IF TALENT:70:연모
			SELECTCASE RAND:5
			CASE 1
				PRINTFORMW 「도～！ 언덕네히네～～！」
			CASE 2
				PRINTFORMW 「인가～도～！」
			CASE 3
				PRINTFORMW 「개지금～！ 」
			CASE 4
				PRINTFORMW 「이나 라고 관사의～！」
			CASEELSE
				PRINTFORMW 「있고, 있고 싶은～！」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「인가～？」
			CASE 2
				PRINTFORMW 「이나 라고 관사의～！」
			CASEELSE
				PRINTFORMW 「있고, 있고 싶은～！」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,頬をつつく
;添い寝中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_308
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF CFLAG:70:수면
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 자고 있다%CALLNAME:TARGET%의 뺨을 손가락으로 쿡쿡 찔렀다
		PRINTW
		PRINTFORMW 「응…………응……」
		PRINTL
		PRINTFORMDW %CALLNAME:TARGET%(은)는 쿡쿡 찔러질 때마다 폴리 폴리와 뺨을 보람이라고 있다
	ELSE
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 곁잠 한다%CALLNAME:TARGET%의 뺨을 손가락으로 쿡쿡 찔렀다
		PRINTW
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「후후…………」
		CASE 2
			PRINTFORMW 「기분-입니다……」
		CASEELSE
			PRINTFORMW 「입니까～……？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;309,頭を撫でる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:친밀(6以上=通常成功時分岐
;==================================================
@M_KOJO_MESSAGE_COM_K70_309
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 머리에 손을 뻗었다
		PRINTFORMDW 시간을 제지당했다%CALLNAME:TARGET%(은)는 무저항인 채 머리를 어루만질 수 있고 있다…
	ELSEIF CFLAG:70:수면
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 자고 있다%CALLNAME:TARGET%의 머리를 상냥하게 어루만졌다
		PRINTW
		PRINTFORMW 「……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 기분이 안좋은%CALLNAME:TARGET%(을)를 진정시키려고 머리를 어루만졌다
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「～……」
			PRINTL
			PRINTFORMDW %CALLNAME:TARGET%(은)는 초조하면서도 어딘가 만족한 것 같다
		ELSEIF ABL:70:친밀 >= 6
			PRINTFORMW 「이나, 멈추어 주세요！」
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 8
		ENDIF
	;＞抱き付く
	ELSEIF PREVCOM == 311 && TALENT:70:연모
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 좋아 좋아
		DRAWLINE
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 꽉 꼭 껴안으면서 감싸도록(듯이)%CALLNAME:TARGET%의 머리를 상냥하게 어루만졌다
		PRINTFORMDL 머리 치장의 령이 호응 하는것 같이 조용하게 영향을 주고 있다…
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORML 「%CALLNAME:MASTER%씨……\/\/\/」
		PRINTFORMW （좋아… 따뜻하다…… %CALLNAME:MASTER%씨…좋아…%UNICODE(0x2764)% 좋은 냄새……%UNICODE(0x2764)%）
	;＞膝枕する
	ELSEIF PREVCOM == 336 && TALENT:70:연모
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 어루만지고 어루만지고
		DRAWLINE
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 무릎 위에서 기분이야 유혹하는으로 하고 있다%CALLNAME:TARGET%의 머리를 상냥하게 어루만졌다
		PRINTFORMDL 머리 치장의 령이 호응 하는것 같이 사랑스러운 음색을 올리고 있다…
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORML 「은 원……\/\/\/」
		PRINTFORMW （기분 좋다…… %CALLNAME:MASTER%씨…행복합니다～……%UNICODE(0x2764)% 좀 더 쓰다듬고 있고……）
	ELSE
		PRINTFORMDL %CALLNAME:PLAYER%하\@ CFLAG:TARGET:동침중 ? 添い寝する # 優しく \@%CALLNAME:TARGET%의 머리를 어루만졌다
		SIF TALENT:70:연모
			PRINTFORMDL 머리 치장의 령이 속시원하게 울고 있다…
		PRINTW
		IF TALENT:70:연모
			SELECTCASE RAND:5
			CASE 1
				PRINTFORMW 「네에에\/\/\/」
			CASE 2
				PRINTFORMW 「 좀 더 쓰다듬고 있고도 좋아요～」
			CASE 3
				PRINTFORMW 「은 원～\/\/\/」
			CASE 4
				PRINTFORMW 「%CALLNAME:MASTER%씨의 손따뜻하다……」
			CASEELSE
				PRINTFORMW 「응윤리-응♪」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「네―？」
			CASE 2
				PRINTFORMW 「어와 무엇이지요？」
			CASE 3
				PRINTFORMW 「머리카락이 붕괴있어요～」
			CASEELSE
				PRINTFORMW 「아하하, 령이 신경이 쓰입니다」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;310,尻を撫でる
;==================================================
@M_KOJO_MESSAGE_COM_K70_310
IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K70_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;クラウンピース同様、一部地の文と齟齬が生じます～
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지 || CFLAG:70:수면
	;押し倒され中
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		PRINTFORMW 「후후후……%UNICODE(0x2764)%」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		;ここだけ地の文カット
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의%HIP(TARGET)%에 손을 뻗으려고 했지만, 그 손을 두드려 떨어뜨려졌다
		PRINTW
		PRINTFORMW 「멈추어 주세요！」
		IF TALENT:70:연모
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ELSEIF ABL:70:친밀 >= 6
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ELSE
			;やめましょう
			BASE:70:분노 += MAXBASE:70:분노 / 2
		ENDIF
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「이다 , 안됩니다～！」
		CASE 2
			PRINTFORMW 「%CALLNAME:MASTER%씨……\/\/\/」
		CASE 3
			PRINTFORMW 「응―！ 그만두어 주세요～！」
		CASE 4
			PRINTFORMW 「～…,  무엇입니까～？」
		CASEELSE
			IF GETBIT(CFLAG:70:기정사실, 1)
				PRINTFORMW 「 이제(벌써)～, , 모입니까～？\/\/\/」
			ELSE
				PRINTFORMW 「 이제(벌써)～, 안되어요～！」
			ENDIF
		ENDSELECT
	ELSEIF TALENT:70:사모 || ABL:70:친밀 >= 6
		SELECTCASE RAND:8
		CASE 1
			PRINTFORMW 「뭐 합니까, 이제(벌써)！」
		CASE 2
			PRINTFORMW 「멈추어 주세요～！」
		CASE 3
			PRINTFORMW 「히, 사람 불러요～！」
		CASE 4
			PRINTFORMW 「화내요～！」
		CASEELSE
			PRINTFORMW 「―……」
		ENDSELECT
	ELSE
		;ご法度です,追加反感ボーナスです
 		IF FIRSTTIME("尻")
 			PRINTFORMW 「캐！！ , 치한입니다！！」
 		ELSEIF !RAND:2
 			PRINTFORMW 「, 치한입니다！！」
 		ELSE
			PRINTFORMW 「이다, 누군가--！！」
		ENDIF
		BASE:70:분노 += MAXBASE:70:분노 / 5
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,抱き付く
;==================================================
@M_KOJO_MESSAGE_COM_K70_311
IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K70_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	;押し倒され中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		SELECTCASE TCVAR:70:카운터행동
		;前から抱きつく
		CASE 32
			PRINTFORML 「응……%CALLNAME:MASTER%씨, 상냥하고 좋아합니다……」
			PRINTFORMW 「조금 더 이대로……」
		;ディープキス
		CASE 60
			PRINTFORML 「%UNICODE(0x2764)% ……%UNICODE(0x2764)%」
			PRINTFORMW 「……%UNICODE(0x2764)% …%UNICODE(0x2764)%」
		;ぱふぱふ
		CASE 73
			PRINTFORML 「%UNICODE(0x2764)% 좋아요♪」
			PRINTFORMW 「충분히 만끽해 주세요%UNICODE(0x2764)%」
		;乳合わせ
		CASE 74
			PRINTFORMW 「팥고물%UNICODE(0x2764)% 고례 있고입니다%UNICODE(0x2764)%」
		;乳を吸わせる
		CASE 77
			PRINTFORMW 「아%UNICODE(0x2764)% , 맛있습니까%UNICODE(0x2764)% 나의 젖가슴…%UNICODE(0x2764)%」
		;Ｖ挿入,Ａ挿入
		CASE 85, 87,
			PRINTFORMW 「아%UNICODE(0x2764)% 하%UNICODE(0x2764)% 는%UNICODE(0x2764)% 는 해 주세요%UNICODE(0x2764)%」
		;だいしゅきホールド
		CASE 86
			PRINTFORML 「아는%UNICODE(0x2764)% 응%UNICODE(0x2764)% 구%UNICODE(0x2764)% 온다%UNICODE(0x2764)%」
			PRINTFORMW 「%CALLNAME:MASTER%씨의 키-쉿%UNICODE(0x2764)% 고향～%UNICODE(0x2764)%」
		;Ｖ腰振り,Ａ腰振り
		CASE 88, 89
			PRINTFORML 「아%UNICODE(0x2764)% 하%UNICODE(0x2764)% 기분입니다%UNICODE(0x2764)% 개%UNICODE(0x2764)% 싸이고 있는 것이%UNICODE(0x2764)%」
			PRINTFORMW 「점진으로%CALLNAME:MASTER%씨를 느낄 수 있어%UNICODE(0x2764)% 수기입니다%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)%」
		;それ以外
		CASEELSE
			PRINTFORMW 「응……따뜻합니다……」
		ENDSELECT
	ELSEIF CFLAG:70:수면
		PRINTFORMW 「……응……」
	ELSEIF CFLAG:70:동침중
		IF DAY:2 == 2
			PRINTFORMW 「응……조금 덥습니다～……」
		ELSE
			PRINTFORMW 「응……%CALLNAME:MASTER%씨 있었는지있고……%UNICODE(0x2764)%」
			PRINTFORMW 「잘 때까지 이대로 있어 주지 않겠습니까……」
		ENDIF
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		;ここだけ地の文カット
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%에 안아 붙으려고 했지만 떨쳐져 버렸다
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「미안해요…지금은 기분이 아닙니다……」
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ENDIF
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMDL
			PRINTFORMW （행복……%UNICODE(0x2764)%）
		CASE 2
			PRINTFORMW 「아는, 어쩐지 아버지같습니다」
		CASE 3
			PRINTFORML 「응……」
			PRINTFORMW （%CALLNAME:MASTER%씨…좋아……%UNICODE(0x2764)%）
		CASE 4
			PRINTFORML 「네에%UNICODE(0x2764)%」
			PRINTFORMW 「좀 더 이대로 있게 해 주세요……」
		CASEELSE
			IF DAY:2 == 2
				PRINTFORMW 「응, 덥습니다～……」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%씨, 따뜻하다……%UNICODE(0x2764)%」
			ENDIF
		ENDSELECT
	ELSEIF TALENT:70:사모
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「 이제(벌써), 어쩔 수 없네요」
		CASE 2
			PRINTFORMW 「응……」
		CASE 3
			PRINTFORMW 「은, 부끄러워요……」
		CASE 4
			PRINTFORMW 「어머나, 어떻게 했습니다―？」
		CASEELSE
			IF DAY:2 == 2
				PRINTFORMW 「응, 덥습니다～……」
			ELSE
				PRINTFORMW 「후후, 따뜻합니다」
			ENDIF
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「꺄！ 이제(벌써),  무엇입니까」
		CASE 2
			PRINTFORMW 「조금！ (이)나, 그만두고……」
		CASEELSE
			PRINTFORMW 「그―……」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;312,キスする
;==================================================
@M_KOJO_SUCCESS_COM_K70_312
;ちなみにFIRSTTIMEを使うなら必ず「FIRSTTIME("ファーストキス", 1)」の形にして引数をつけること
SIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
	TFLAG:192 = -2

@M_KOJO_MESSAGE_COM_K70_312
IF CFLAG:70:우후후 == 2 || FLAG:시간정지
	CALL TRAIN_MESSAGE
ELSE
	DRAWLINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K70_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_312_1
#DIM キス分岐
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	ELSEIF CFLAG:70:우후후 == 2 && FIRSTTIME("ファーストキス")
		;地の文表示
		PRINTFORMW 「아……！！」
		PRINTFORMW 「…%UNICODE(0x2764)% 이런 때에 첫 키스이라니……」
		PRINTFORMW 「차례가 거꾸로 되어 버렸습니다……%UNICODE(0x2764)%」
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、背徳的にも鈴奈庵で情欲を抑えきれなくなったところを%CALLNAME:MASTER%に慰められながらファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で情欲を抑えきれなくなったところを%CALLNAME:MASTER%に慰められながらファーストキスを奪われた
		ELSEIF FLAG:데이트상대 == 70
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_SPOT()%で情欲を抑えきれなくなったところを%CALLNAME:MASTER%に慰められながらファーストキスを奪われた
		ELSE
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:70:현재위치)%で情欲を抑えきれなくなったところを%CALLNAME:MASTER%に慰められながらファーストキスを奪われた
		ENDIF
;		▼書いたけど愛撫コマンドの方に合わせる
;		PRINTFORMW 「あぁ……っ！！」
;		PRINTFORMW 「よ、ようやくキスしてくれましたね……%UNICODE(0x2764)%」
;		PRINTFORMW 「う、嬉しいです～……%UNICODE(0x2764)%」
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		;地の文表示
		SELECTCASE TCVAR:70:카운터행동
		;前から抱きつく
		CASE 32
			PRINTFORML 「%UNICODE(0x2764)% %UNICODE(0x2764)% %UNICODE(0x2764)%」
			PRINTFORMW 「%CALLNAME:MASTER%씨와 이렇게 가까워서…함께 될 수 있어……행복입니다…%UNICODE(0x2764)%」
		;手淫
		CASE 50
			PRINTFORML 「응후후…%UNICODE(0x2764)% 기분 좋습니까？」
			PRINTFORMW 「구가 외로운 것 같네요……%UNICODE(0x2764)% -%UNICODE(0x2764)% 네에%UNICODE(0x2764)%」
			SIF NOWEX:MASTER:사정
				PRINTFORMW 「어머나, 이 나무 그렇습니까？ 좋아요%UNICODE(0x2764)% 이봐요%UNICODE(0x2764)% 이봐요%UNICODE(0x2764)% 이있읍시다%UNICODE(0x2764)%」
		;ディープキス
		CASE 60
			PRINTFORML 「응―………%UNICODE(0x2764)%」
			PRINTFORMW 「…,……%UNICODE(0x2764)% ……%UNICODE(0x2764)%」
		;Ｖ挿入,Ａ挿入,Ｖ腰振り,Ａ腰振り
		CASE 85, 87, 88, 89
			IF NOWEX:MASTER:사정
				PRINTFORML 「후~%UNICODE(0x2764)% 아%UNICODE(0x2764)% 응%UNICODE(0x2764)% %UNICODE(0x2764)% %UNICODE(0x2764)%」
				PRINTFORMW 「이다 히라고%UNICODE(0x2764)% 이 여승%UNICODE(0x2764)% (이)다 히라고 관은 있고%UNICODE(0x2764)% 응%UNICODE(0x2764)% -%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「후~%UNICODE(0x2764)% 아%UNICODE(0x2764)% 응%UNICODE(0x2764)% %UNICODE(0x2764)% %UNICODE(0x2764)% 응%UNICODE(0x2764)% -%UNICODE(0x2764)%」
			ENDIF
		;だいしゅきホールド
		CASE 86
			PRINTFORML 「후~%UNICODE(0x2764)% 아%UNICODE(0x2764)% 응%UNICODE(0x2764)% %UNICODE(0x2764)% %UNICODE(0x2764)%」
			PRINTFORMW 「%CALLNAME:MASTER%씨의 것에-히%UNICODE(0x2764)% 고향～%UNICODE(0x2764)%」
		;それ以外
		CASEELSE
			PRINTFORMW 「응%UNICODE(0x2764)% %UNICODE(0x2764)% %UNICODE(0x2764)% …%UNICODE(0x2764)% %UNICODE(0x2764)% …%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF CFLAG:70:수면
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 자고 있다%CALLNAME:TARGET%의 입을, 자신의 구에서 차지했다…
		PRINTW
		PRINTFORMW 「……구……」
	ELSEIF CFLAG:70:동침중
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 곁잠 한다%CALLNAME:TARGET%의 입을, 자신의 구에서 차지했다…
		PRINTW
		IF FIRSTTIME("ファーストキス")
			PRINTFORMW 「！！！」
			PRINTFORMW 「나무………\/\/\/」
			IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 && TALENT:70:연인 && CFLAG:70:초기위치 == CFLAG:MASTER:초기위치
				CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、共に暮す%CALLNAME:MASTER%と寄り添って寝ているとき、ふいにファーストキスを奪われた
			ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 && CFLAG:70:초기위치 == CFLAG:MASTER:초기위치
				CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、同居している%CALLNAME:MASTER%と寄り添って寝ているとき、ふいにファーストキスを奪われた
			ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2
				CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で%CALLNAME:MASTER%と寄り添って寝ているとき、ふいにファーストキスを奪われた
			ELSEIF FLAG:데이트상대 == 70
				;現在デート中に添い寝はできないけど念の為
				CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_SPOT()%で%CALLNAME:MASTER%と寄り添って寝ているとき、ふいにファーストキスを奪われた
			ELSE
				CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:70:현재위치)%で%CALLNAME:MASTER%と寄り添って寝ているとき、ふいにファーストキスを奪われた
			ENDIF
		ELSE
			PRINTFORML 「휴업(휴가)의 키스입니다…… %UNICODE(0x2764)%」
			PRINTFORMW 「에헤%UNICODE(0x2764)%」
		ENDIF
	;拒絶
	ELSEIF TFLAG:SELECTCOM분기 == 99 || TFLAG:192 == -2
		PRINTFORMDL %CALLNAME:PLAYER%하지만 키스를 하려고 하면(자)%CALLNAME:TARGET%(은)는 몸을 당겼다…
		PRINTW
		PRINTFORMW 「멈추어 주세요！」
		BASE:70:분노 += MAXBASE:70:분노 / 4
		CALL M_KOJO_K70_YAMETEKUDASAI(70, 1)
	;口上によるCOM成否判定のおかげで強制キャンセルをかけることができました,多謝
;	ELSEIF (TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3) && FIRSTTIME("ファーストキス")
;		;本当はしてほしくないけど、地の文は変えられても経験は誤魔化せないからなぁ
;		;もしかしたらマイナス経験で打ち消せるかもしれないがやめておこう
;		;↑とりあえず怒り反感は付けておこう
;		PRINTFORMDL %CALLNAME:PLAYER%は%CALLNAME:TARGET%の口を、自分の口で塞いだ…
;		PRINTW
;		IF TALENT:70:연모
;			PRINTFORMW 「ふぇぇっ！？ そ、そんな突然……！」
;			BASE:70:분노 += MAXBASE:70:분노 / 8
;		ELSE
;			PRINTFORMW 「んんっっ！？ な、なにするんですか！！」
;			BASE:70:분노 += MAXBASE:70:분노 / 4
;		ENDIF
;	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
;		PRINTFORMDL %CALLNAME:PLAYER%は%CALLNAME:TARGET%の口を、自分の口で塞いだ…
;		PRINTW
;		IF TALENT:70:연모
;			PRINTFORMW 「んむっ………！」
;			BASE:70:분노 += MAXBASE:70:분노 / 10
;		ELSE
;			PRINTFORMW 「ん…………」
;			BASE:70:분노 += MAXBASE:70:분노 / 5
;		ENDIF
;		PRINTL
;		PRINTFORMDW %CALLNAME:TARGET%の表情は浮かばれない……
	;ファーストキス
	ELSEIF FIRSTTIME("ファーストキス")
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 입술을, 살그머니 자신의 입술과 거듭했다…
		PRINTW
		LOCALS =
		IF TALENT:70:연모
			PRINTFORMW 「응…！！」
			PRINTFORMW 「키…키스……나의…처음……\/\/\/」
			PRINTFORMW 「, 기쁩니다……%CALLNAME:MASTER%씨와라면 나……%UNICODE(0x2764)%」
			IF TALENT:70:연인
				LOCALS = 愛する
			ELSE
				LOCALS = 恋い焦がれる
			ENDIF
		ELSE
			PRINTFORMW 「…！！！」
			PRINTFORMW 「은……아……네……？」
			PRINTFORMW （키…키스 해 버렸다……%CALLNAME:MASTER%씨와……）
			SIF TALENT:70:사모
				LOCALS = 気になっていた
		ENDIF
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1 && GET_TARGETNUM() == 1 && BASE:70:무드 >= 1000
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、誰も居なくなった静かな鈴奈庵で%LOCALS%%CALLNAME:MASTER%と二人きりになり、仄かに温かいムードの中で優しくファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1 && GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、誰も居なくなった静かな鈴奈庵で%LOCALS%%CALLNAME:MASTER%と二人きりになり、和やかなムードの中でふいにファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1 && FINDELEMENT(TARGET, 80) >= 0
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、鈴奈庵で阿求が見ている中、%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 && GET_TARGETNUM() == 1 && BASE:70:무드 >= 1000
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で%LOCALS%%CALLNAME:MASTER%と二人だけの世界の中、優しくファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 && GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で%LOCALS%%CALLNAME:MASTER%と二人きりになり、和やかなムードの中でふいにファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 && FINDELEMENT(TARGET, 80) >= 0
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で阿求が見ている中、%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ELSEIF FLAG:데이트상대 == 70 && GET_TARGETNUM() == 1 && BASE:70:무드 >= 1000
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%でデート中、%DATENAME_PLACE()%で%LOCALS%%CALLNAME:MASTER%と二人きりになり、仄かに温かいムードの中で優しくファーストキスを奪われた
		ELSEIF FLAG:데이트상대 == 70 && GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%でデート中、%DATENAME_PLACE()%で%LOCALS%%CALLNAME:MASTER%と二人きりになり、和やかなムードの中でふいにファーストキスを奪われた
		ELSEIF FLAG:데이트상대 == 70 && FINDELEMENT(TARGET, 80) >= 0
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%でデート中に%DATENAME_PLACE()%で阿求が見ている中、%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ELSEIF FLAG:데이트상대 == 70
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%でデート中、%DATENAME_PLACE()%で%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ELSEIF GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:70:현재위치)%で%LOCALS%%CALLNAME:MASTER%と二人きりになり、ふいにファーストキスを奪われた
		ELSEIF FINDELEMENT(TARGET, 80) >= 0
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:70:현재위치)%で阿求が見ている中、%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ELSE
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:70:현재위치)%で%LOCALS%%CALLNAME:MASTER%にファーストキスを奪われた
		ENDIF
	;＞抱き付く
	ELSEIF PREVCOM == 311 && TALENT:70:연모
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 포옹 키스
		DRAWLINE
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%(을)를 꼭 껴안으면서 뜨거운 키스를 주고 받았다…
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORML 「…응……%UNICODE(0x2764)% %UNICODE(0x2764)% …%UNICODE(0x2764)%」
		PRINTFORMW 「%CALLNAME:MASTER%씨……좀 더…%UNICODE(0x2764)%」
	;＞膝枕してもらう
	ELSEIF PREVCOM == 305 && TALENT:70:연모
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 무릎 베개 키스
		DRAWLINE
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 머리를 조금 올려%CALLNAME:TARGET%의 얼굴을 접근하게 해 살그머니 입맞춤했다…
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORMW 「응……%UNICODE(0x2764)% %UNICODE(0x2764)% 네에♪」
	;＞膝枕する
	ELSEIF PREVCOM == 336 && TALENT:70:연모
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 무릎 베개 키스
		DRAWLINE
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 무릎 위의%CALLNAME:TARGET%의 얼굴을 잡아 상냥하게 입맞춤했다……
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORML 「꺄……%UNICODE(0x2764)%」
		PRINTFORMW 「네에에……%UNICODE(0x2764)%」
	ELSE
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 입을, 자신의 구에서 차지했다…
		キス分岐 = RAND:6
		IF キス分岐 >= 4 && EXP:70:키스경험 >= 20 && TALENT:70:연모
			PRINTFORMDL %CALLNAME:TARGET%하%CALLNAME:PLAYER%의 입술을 비틀어 열어 혀를 걸어 왔다…
		ELSE
			PRINTFORMDL %CALLNAME:TARGET%(은)는 아직 익숙해지지 않고 긴장하고 있는 것 같다…
		ENDIF
		PRINTW
		SELECTCASE キス分岐
		CASE 1
			PRINTFORMW 「응……%UNICODE(0x2764)%」
		CASE 2
			PRINTFORML 「%UNICODE(0x2764)%」
			PRINTFORMW 「네, 네에에……%UNICODE(0x2764)%」
		CASE 3
			PRINTFORMW 「………%UNICODE(0x2764)%」
		CASE 4
			IF EXP:70:키스경험 >= 20 && TALENT:70:연모
				PRINTFORML 「…%UNICODE(0x2764)% …%UNICODE(0x2764)%」
				PRINTFORMW 「%CALLNAME:MASTER%씨, 달다…%UNICODE(0x2764)%」
			ELSE
				PRINTFORML 「키…키스입니까？ (은)는, 네……」
				PRINTFORMW 「응……！」
			ENDIF
		CASE 5
			IF EXP:70:키스경험 >= 20 && TALENT:70:연모
				PRINTFORML 「……%UNICODE(0x2764)% ………%UNICODE(0x2764)%」
				PRINTFORMW 「… ……%UNICODE(0x2764)% 좀 더…%UNICODE(0x2764)%」
			ELSE
				PRINTFORML 「키, 키스 합니다……！」
				PRINTFORMW 「응……！」
			ENDIF
		CASEELSE
			IF EXP:70:키스경험 >= 20 && TALENT:70:연모
				PRINTFORML 「응―…%UNICODE(0x2764)% …%UNICODE(0x2764)%」
				PRINTFORML 「…,……%UNICODE(0x2764)% ……%UNICODE(0x2764)%」
				PRINTFORMW （아…머리가 녹는다……%UNICODE(0x2764)%）
				SIF EXP:70:키스경험 * 2 < RAND:100
					RETURN 1
				PRINTFORML 「응…！」
				PRINTFORMW 「…%UNICODE(0x2764)% …%UNICODE(0x2764)% 아…%UNICODE(0x2764)%」
				PRINTFORML 「……」
				PRINTFORMW 「네에%UNICODE(0x2764)% 기분 좋았습니다～…%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「꺄………응……！」
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;313,胸愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K70_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	;押し倒され中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		SELECTCASE TCVAR:70:카운터행동
		;胸を揉ませる
		CASE 33
			PRINTFORMW 「후~\/\/\/ 좋습니다……기분 좋습니다%UNICODE(0x2764)% 좀 더 해 주세요%UNICODE(0x2764)%」
		;パイズリ
		CASE 53
			IF NOWEX:MASTER:사정
				PRINTFORMW 「아！ 이 나무 그렇네요%UNICODE(0x2764)% 자%UNICODE(0x2764)% 가득하고라고 주세요%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「응%UNICODE(0x2764)% (이)다 , 안됩니다！ 내가 봉사합니까들～%UNICODE(0x2764)%」
			ENDIF
		;ぱふぱふ
		CASE 73
			PRINTFORMW 「%CALLNAME:MASTER%씨는 정말 젖가슴을 좋아하네요%UNICODE(0x2764)% 열심히 함%UNICODE(0x2764)%」
		;乳合わせ
		CASE 74
			PRINTFORMW 「아%UNICODE(0x2764)% 아%UNICODE(0x2764)% %CALLNAME:MASTER%씨의 것이%UNICODE(0x2764)% 맞아%UNICODE(0x2764)%」
		;乳を吸わせる
		CASE 77
			PRINTFORMW 「후~～%UNICODE(0x2764)% 종류는 주세요～%UNICODE(0x2764)% 좀 더 짜 관～%UNICODE(0x2764)%」
		;Ｖ挿入,Ａ挿入,Ｖ腰振り,Ａ腰振り
		CASE 85, 87, 88, 89
			IF NOWEX:MASTER:사정
				PRINTFORML 「하%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)% 군요도%UNICODE(0x2764)% 함께%UNICODE(0x2764)% 기분입니다%UNICODE(0x2764)%」
				PRINTFORMW 「와%UNICODE(0x2764)% %UNICODE(0x2764)% 그대로 와 주세요%UNICODE(0x2764)% 이는 주세요～%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「하%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)% 군요도%UNICODE(0x2764)% 함께%UNICODE(0x2764)% 기분입니다%UNICODE(0x2764)%」
			ENDIF
		;だいしゅきホールド
		CASE 86
			PRINTFORML 「아는%UNICODE(0x2764)% 응%UNICODE(0x2764)% 구%UNICODE(0x2764)% 온다%UNICODE(0x2764)%」
			PRINTFORMW 「%CALLNAME:MASTER%씨의 키-쉿%UNICODE(0x2764)% 고향～%UNICODE(0x2764)%」
		;それ以外
		CASEELSE
			PRINTFORMW 「팥고물%UNICODE(0x2764)% %CALLNAME:MASTER%씨, 젖가슴을 좋아합니까～？ 아%UNICODE(0x2764)% 응%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF CFLAG:70:수면
		PRINTFORMW 「응…！ 낯간지러워요……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF TALENT:70:연모
			PRINTFORMW 「미안해요…지금은 기분이 아닙니다……」
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ENDIF
	ELSEIF TALENT:70:연모 && CFLAG:70:욕구불만도 >= 750 && ABL:70:B감각 >= 3
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「아……\/\/\/」
		CASE 2
			PRINTFORMW 「응……후~……\/\/\/」
		CASE 3
			PRINTFORMW 「…%UNICODE(0x2764)% 와, 기분입니다…\/\/\/」
		CASEELSE
			PRINTFORMW 「%CALLNAME:MASTER%씨……%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「아……\/\/\/」
		CASE 2
			PRINTFORMW 「이다……안됩니다…\/\/\/」
		CASE 3
			PRINTFORMW 「있고, 지금은 그런……\/\/\/」
		CASEELSE
			PRINTFORMW 「, 거기는……\/\/\/」
		ENDSELECT
	ELSE
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「아…！」
		CASE 2
			PRINTFORMW 「, 뭐 합니까…！」
		CASE 3
			PRINTFORMW 「이나, 그만두어 주세요…！」
		CASEELSE
			PRINTFORMW 「,  무엇입니까…！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;314,アナル愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K70_314
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_314_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	;押し倒され中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		SELECTCASE TCVAR:70:카운터행동
		;それ以外
		CASEELSE
			PRINTFORMW 「아%UNICODE(0x2764)% (이)나%UNICODE(0x2764)% 거기는%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF CFLAG:70:수면
		PRINTFORMW 「응응……！」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMW 「멈추어 주세요！」
		IF TALENT:70:연모
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ELSE
			BASE:70:분노 += MAXBASE:70:분노 / 4
		ENDIF
	ELSEIF TALENT:70:연모 && CFLAG:70:욕구불만도 >= 750 && ABL:70:A감각 >= 3
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「아……\/\/\/」
		CASE 2
			PRINTFORMW 「응응～\/\/\/」
		CASE 3
			PRINTFORMW 「그…거기는……\/\/\/」
		CASEELSE
			PRINTFORMW 「에, 거치지 않아 싶다……！」
		ENDSELECT
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「꺄아…！」
		CASE 2
			PRINTFORMW 「응응……！」
		CASE 3
			PRINTFORMW 「이나, 그만두어 주세요…！」
		CASEELSE
			PRINTFORMW 「,  무엇입니까…！」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「꺄아！」
		CASE 2
			PRINTFORMW 「, 뭐 한다！」
		CASEELSE
			PRINTFORMW 「이나, 그만두어 주세요！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;315,クリ愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K70_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	;押し倒され中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		SELECTCASE TCVAR:70:카운터행동
		;スカートの中を見せる
		CASE 35
			PRINTFORMW 「은%UNICODE(0x2764)% 하, 네%UNICODE(0x2764)% 거기가 이이입니다…%UNICODE(0x2764)% 응%UNICODE(0x2764)%」
		;クンニ強制
		CASE 70
			PRINTFORMW 「아%UNICODE(0x2764)% , 그런%UNICODE(0x2764)% 히, 넓히지 말아 주세요%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)%」
		;Ｖ挿入,Ａ挿入,Ｖ腰振り,Ａ腰振り
		CASE 85, 87, 88, 89
			PRINTFORMW 「아-%UNICODE(0x2764)% 함께 되면(자)%UNICODE(0x2764)% 머리 이상하고 있습니다%UNICODE(0x2764)% 아%UNICODE(0x2764)% %UNICODE(0x2764)%」
		;だいしゅきホールド
		CASE 86
			PRINTFORML 「아는%UNICODE(0x2764)% 응%UNICODE(0x2764)% 구%UNICODE(0x2764)% 온다%UNICODE(0x2764)%」
			PRINTFORMW 「%CALLNAME:MASTER%씨의 키-쉿%UNICODE(0x2764)% 고향～%UNICODE(0x2764)%」
		;それ以外
		CASEELSE
			PRINTFORMW 「%UNICODE(0x2764)% 이이입니다…%UNICODE(0x2764)% 거기가 이이입니다…%UNICODE(0x2764)% 응%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF CFLAG:70:수면
		PRINTFORMW 「응응…！ 후와～……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF TALENT:70:연모
			PRINTFORMW 「미안해요…지금은 기분이 아닙니다……」
			BASE:70:분노 += MAXBASE:70:분노 / 10
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ENDIF
	ELSEIF TALENT:70:연모 && CFLAG:70:욕구불만도 >= 750 && ABL:70:C감각 >= 3
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「팥고물……\/\/\/」
		CASE 2
			PRINTFORMW 「응……후~……\/\/\/」
		CASE 3
			PRINTFORMW 「…%UNICODE(0x2764)% 와, 기분입니다…\/\/\/」
		CASEELSE
			PRINTFORMW 「%CALLNAME:MASTER%씨의……%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「응……\/\/\/」
		CASE 2
			PRINTFORMW 「이다……안됩니다…\/\/\/」
		CASE 3
			PRINTFORMW 「있고, 지금은 그런……\/\/\/」
		CASEELSE
			PRINTFORMW 「, 거기는……\/\/\/」
		ENDSELECT
	ELSE
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「어…！」
		CASE 2
			PRINTFORMW 「, 뭐 합니까…！」
		CASE 3
			PRINTFORMW 「이나, 그만두어 주세요…！」
		CASEELSE
			PRINTFORMW 「,  무엇입니까…！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;==================================================
@M_KOJO_MESSAGE_COM_K70_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_316_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
		;地の文表示
	ELSEIF TALENT:70:처녀 == 1
		IF TALENT:70:연모
			PRINTFORMW 「아…！ , 거기는 안됩니다……\/\/\/」
		ELSE
			PRINTFORMW 「이나, 그만두어 주세요……！」
		ENDIF
	;押し倒され中, 地の文を参考に、全パターンあるわけではない模様
	ELSEIF CFLAG:70:우후후 == 2
		SIF !CFLAG:70:1006
			RETURN 1
		SELECTCASE TCVAR:70:카운터행동
		;スカートの中を見せる
		CASE 35
			PRINTFORMW 「아-%UNICODE(0x2764)% 와, 기분%UNICODE(0x2764)% 기분 좋아서%UNICODE(0x2764)% 아%UNICODE(0x2764)%」
		;クンニ強制
		CASE 70
			PRINTFORMW 「아%UNICODE(0x2764)% 있고%UNICODE(0x2764)% 넣습니다%UNICODE(0x2764)% (이)나%UNICODE(0x2764)%」
		;それ以外
		CASEELSE
			PRINTFORMW 「팥고물%UNICODE(0x2764)% 있고%UNICODE(0x2764)% 갑자기 하%UNICODE(0x2764)% 응%UNICODE(0x2764)%」
		ENDSELECT
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF TALENT:70:연모
			PRINTFORMW 「미안해요…지금은 기분이 아닙니다……」
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 4
		ENDIF
	ELSEIF TALENT:70:연모 && CFLAG:70:욕구불만도 >= 750 && ABL:70:V감각 >= 3
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「……\/\/\/」
		CASE 2
			PRINTFORMW 「응응！ 후~는……\/\/\/」
		CASE 3
			PRINTFORMW 「아…%UNICODE(0x2764)% 좋다…\/\/\/」
		CASEELSE
			IF GETBIT(CFLAG:70:기정사실, 1)
				PRINTFORML 「응 이제(벌써)\/\/\/ %CALLNAME:MASTER%씨도 참……」
				PRINTFORMW 「빠르게 시짊어지는, 이군요……%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「응…！ %CALLNAME:MASTER%응……\/\/\/」
			ENDIF
		ENDSELECT
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「꺄……\/\/\/」
		CASE 2
			PRINTFORMW 「응응……\/\/\/」
		CASE 3
			PRINTFORMW 「있고, 안됩니다……\/\/\/」
		CASEELSE
			PRINTFORMW 「이다, 안됩니다……\/\/\/」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「꺄아！」
		CASE 2
			PRINTFORMW 「, 뭐 한다！」
		CASEELSE
			PRINTFORMW 「이나, 그만두어 주세요！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;317,Ｖ腰を振る
;==================================================
@M_KOJO_MESSAGE_COM_K70_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_317_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = CFLAG:70:1006
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF NOWEX:MASTER:사정
		CALL M_KOJO_K70_NAKADASHI
	ELSEIF ABL:70:V감각 < 2
		PRINTFORMW 「아, 응, 있고 , 있던！ 도 , 도 사주, 구！ 아%UNICODE(0x2764)% 아%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)%」
	ELSEIF ABL:70:V감각 < 5
		PRINTFORML 「아%UNICODE(0x2764)% %UNICODE(0x2764)% 응%UNICODE(0x2764)% 아%UNICODE(0x2764)% 」
		PRINTFORMW 「벗길 수 있는 쉿%UNICODE(0x2764)% 입니다%UNICODE(0x2764)% 응%UNICODE(0x2764)% 아%UNICODE(0x2764)% 」
	ELSE
		PRINTFORML 「아%UNICODE(0x2764)% 아%UNICODE(0x2764)% 응%UNICODE(0x2764)% 응%UNICODE(0x2764)% 이제(벌써)%UNICODE(0x2764)%」
		PRINTFORMW 「벗길 수 있는 쉿%UNICODE(0x2764)% 지나%UNICODE(0x2764)% 응%UNICODE(0x2764)% 아%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)%」
		PRINTFORMW 「 좀 더%UNICODE(0x2764)% 입니다%UNICODE(0x2764)% 좋다%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)% %UNICODE(0x2764)%」
	ENDIF
ENDIF
RETURN 1
;==================================================
;318,Ａ腰を振る
;==================================================
;@M_KOJO_MESSAGE_COM_K70_318
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K70_318_1
;RETURN RESULT

;@M_KOJO_MESSAGE_COM_K70_318_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;-------------------------------------------------
;IF LOCAL

;ENDIF
;RETURN 1
;==================================================
;330,スカートめくり
;==================================================
@M_KOJO_MESSAGE_COM_K70_330
IF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
	DRAWLINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K70_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		;ここだけ地の文カット
		PRINTFORMDL %CALLNAME:MASTER%하%CALLNAME:TARGET%의%SHOW_BOTTOM(TARGET,1)%에 손을 대었다…
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「그만두어 주세요！！」
			PRINTL
			PRINTFORMDW 검문당해 버렸다……
			BASE:70:분노 += MAXBASE:70:분노 / 6
		ELSE
			PRINTFORMW 「멈추어 주세요！」
			PRINTL
			PRINTFORMDW 마음껏 빈타 되었다……
			BASE:70:분노 += MAXBASE:70:분노 / 3
		ENDIF
	ELSEIF TALENT:70:연모
		PRINTFORML 「꺄！」
		PRINTFORMW 「도―！ 아이가 아니니까……」
	ELSEIF TALENT:70:사모
		PRINTFORML 「꺄！」
		PRINTFORMW 「, 어른의 사람 불러요！！」
	ELSE
		PRINTFORML 「캐！！」
		PRINTFORMW 「이다, 누군가---！！」
	ENDIF
ENDIF
RETURN 1
;==================================================
;331,お茶を淹れる（薬入り）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORML 「감사합니다―\@ TALENT:70:연모 ? ♪ # \@」
	;大成功
	IF TFLAG:SELECTCOM분기 == 1
		PRINTFORML 「원！ 입니까 이 차？」
		PRINTFORMW 「몹시 맛있습니다～♪」
	;失敗
	ELSEIF TFLAG:SELECTCOM분기 == -1
		PRINTFORML 「응……？ 어쩐지 냄새난다……」
		PRINTFORMW （%CALLNAME:MASTER%씨에게는 나쁘지만 사양해 두자……）
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMW 「아, 감사합니다」
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:9
		CASE 1
			PRINTFORMW 「%CALLNAME:MASTER%씨의 엄라고 주는 차, 언제나 맛있습니다♪」
		CASE 2
			PRINTFORMW 「……옆에 책이기도 하면 꼭 좋은데요, 지금은%CALLNAME:MASTER%씨가 있기 때문에,♪」
		CASE 3
			PRINTFORML 「아, 나 정확히 차과자 가지고 있어요 」
			PRINTFORMW 「네, 그러세요♪」
		CASEELSE
			IF DAY:2 == 2
				PRINTFORMW 「……수분 보급은 소중하기 때문에」
			ELSE
				PRINTFORMW 「……신체가 따뜻해지네요～」
			ENDIF
		ENDSELECT
	ELSE
		PRINTFORMW 「…염주않다……」
	ENDIF
ENDIF
RETURN 1
;==================================================
;332,お酒をふるまう
;TFLAG:193(0=下戸飲み成功 -1=下戸飲み失敗 -2=下戸飲み大失敗 -5=下戸飲みあきらめ)
;TFLAG:194(51=どぶろく 52=清酒 53=鬼殺し)
;ALCOHOL_TASTE(TFLAG:194)(15以上=気に入る 9以下=口に合わない)
;==================================================
@M_KOJO_MESSAGE_COM_K70_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	;同梱CSVを前提としています
	;[酒に弱い]ので どぶろく=10, 清酒=8, 鬼殺し=5
	IF ALCOHOL_FACE(70) == "ぐでぐで"
		PRINTFORMW 「～～～…………」
	ELSEIF ALCOHOL_FACE(70) == "酔いどれ"
		PRINTFORMW 「～～응, 응응 응응……」
	ELSEIF ALCOHOL_FACE(70) == "ほろ酔い"
		;仕事中
		IF CFLAG:70:행동 == 5
			PRINTFORML 「네-！ 아직 감춥니까～？」
			PRINTFORMW 「도, 이제(벌써), 어쩔 수 없군요～～」
		ELSE
			PRINTFORML 「후후, 감사합니다♪」
			PRINTFORMW 「！ 값인！」
		ENDIF
	ELSE
		;仕事中
		IF CFLAG:70:행동 == 5
			PRINTFORML 「어, 술입니까？ 업무중입니다만……」
			PRINTFORMW 「으로, 그럼 조금……」
		ELSE
			PRINTFORML 「어머나！ 술입니까？」
			PRINTFORMW 「감사합니다～！」
		ENDIF
	ENDIF
	;鬼殺し
	IF ALCOHOL_TASTE(TFLAG:194) <= 5
		IF ALCOHOL_FACE(70) == "ぐでぐで"
			;コピペですまぬ
			PRINTFORMW 「～～！！＠＃！＄％！？＊＊＊＊！！」
		ELSEIF ALCOHOL_FACE(70) == "酔いどれ" || ALCOHOL_FACE(70) == "ほろ酔い"
			PRINTFORML 「응응응～～～～！！」
			PRINTFORMW 「도～～～만날 수 있는～～！！～～～！！！」
		ELSE
			PRINTFORML 「―！ 개, 이것무서운 살인입니까？」
			PRINTFORMW 「 나에게는 조금 귤나무 지납니다……」
		ENDIF
	;どぶろく
	ELSEIF ALCOHOL_TASTE(TFLAG:194) >= 10
		IF ALCOHOL_FACE(70) == "ぐでぐで"
			PRINTFORMW 「왕의 마비응～～！ 째응아사의～～……」
		ELSEIF ALCOHOL_FACE(70) == "酔いどれ" || ALCOHOL_FACE(70) == "ほろ酔い"
			PRINTFORMW 「응응～～！ 찌르는 형이야 네 와～」
		ELSE
			PRINTFORMW 「응～♪ 나는 이 정도 마일드인 것이 꼭 좋아서 좋아하네요～♪」
		ENDIF
	;清酒
	ELSE
		IF ALCOHOL_FACE(70) == "ぐでぐで"
			PRINTFORMW 「～♪ 지금～♪ 간히 아니오 배～～～♪♪」
		ELSEIF ALCOHOL_FACE(70) == "酔いどれ" || ALCOHOL_FACE(70) == "ほろ酔い"
			PRINTFORMW 「두고 히～～, 가 있고 얼굴 자의 발응～♪」
		ELSE
			PRINTFORML 「응～！ 맛있네요 이것……！」
			PRINTFORMW 「 그렇지만 조금 나에게는 나무 무심코일지도 해 응……」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;333,愚痴を聞く
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K70_333
;フキゲンが最大(3)だと謝っても許してくれない、謝りキャンセルが発動
SIF TCVAR:70:350 >= 3
	TFLAG:192 = -2

@M_KOJO_MESSAGE_COM_K70_333
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;気づいたら分岐増えてた……愚痴を聞くだけでなんでこんなことに……
	;諸悪の根源たるフキゲン分岐を取っ払った
	CALL M_KOJO_COLOR_K70
	;フキゲンが最大(3)だと謝っても許してくれない、謝りキャンセルが発動
	IF TFLAG:192 == -2
		PRINTFORMDL 감정을 해쳤다%CALLNAME:TARGET%의 기분을 조금이라도 취하려고 했다
		PRINTW
		PRINTFORMW 「…………」
		PRINTL
		PRINTFORMDW 날을 고치는 것이 좋을지도 모른다……
		;口上によるCOM成否判定のおかげで必要なくなりました,多謝
;		;謝ると違って成功時にソースが入ってしまうため強引ですがリセットさせていただきます
;		SOURCE:70:환락 = 0
;		SOURCE:70:사랑 = 0
;		CUP:70:복종 = 0
;		CUP:70:욕정 = 0
;		CUP:70:굴복 = 0
;		CUP:70:호의 = 0
;		CUP:70:우월 = 0
		;↓この反感は表示用
		SOURCE:70:반감 = 100
		CFLAG:70:빡침 = 1
		TALENT:70:기분 = -1
		BASE:70:분노 = MAXBASE:70:분노
	;▼謝ると被るので廃止しました,フキゲンフラグは3以外意味ないです,嫉妬フキゲンも廃止
;	;フキゲンフラグがある時はあなたのせい,現状初オナバレ後と押し倒し失敗時のみ
;	ELSEIF (TCVAR:70:350 || TCVAR:70:353) && TFLAG:SELECTCOM분기 <= 3
;		;嫉妬フキゲン
;		IF TCVAR:70:353
;			PRINTFORMDL %CALLNAME:TARGET%の機嫌が悪いのでどうしたのかと訪ねた
;			PRINTW
;			IF TALENT:70:연모
;				SELECTCASE TFLAG:SELECTCOM분기
;				;失敗
;				CASE 1
;					PRINTFORMW 「%CALLNAME:MASTER%さんのばか……」
;					PRINTL
;					PRINTFORMDW 反対に怒らせてしまった…
;				;成功
;				CASE 2
;					PRINTFORML 「いえ、いいんです、私が狭量なのが悪いんです」
;					PRINTFORMW 「%CALLNAME:MASTER%さんのせいにしようとして……ごめんなさい」
;					PRINTL
;					PRINTFORMW どうやら気持ちが落ち着いたようだ
;					TCVAR:70:350 = 0
;					TCVAR:70:353 = 0
;				;大成功
;				CASE 3
;					PRINTFORML 「私って馬鹿な女ですよね……」
;					PRINTFORMW 「%CALLNAME:MASTER%さんがそう言ってくれるだけで私――」
;					PRINTL
;					PRINTFORMW 安心した様子で笑ってくれた
;					TCVAR:70:350 = 0
;					TCVAR:70:353 = 0
;				ENDSELECT
;			ELSE
;				SELECTCASE TFLAG:SELECTCOM분기
;				;失敗
;				CASE 1
;					PRINTFORMW 「%CALLNAME:MASTER%さん、そういうの良くないと思いますよ」
;					PRINTL
;					PRINTFORMDW 反対に怒らせてしまった…
;				;成功
;				CASE 2
;					PRINTFORMW 「うーん、まぁ仕方ない事ですか、ね……」
;					PRINTL
;					PRINTFORMW どうやら気持ちが落ち着いたようだ
;					TCVAR:70:350 = 0
;					TCVAR:70:353 = 0
;				;大成功
;				CASE 3
;					PRINTFORMW 「あはは、別に疑うことはなかったですね～」
;					PRINTL
;					PRINTFORMW 安心した様子で笑ってくれた
;					TCVAR:70:350 = 0
;					TCVAR:70:353 = 0
;				ENDSELECT
;			ENDIF
;		;普通フキゲン
;		ELSE
;			PRINTFORMDL 気を悪くした%CALLNAME:TARGET%のご機嫌を少しでも取ろうとした
;			PRINTW
;		ENDIF
	ELSE
		PRINTFORMDL %CALLNAME:TARGET%의 푸념을 (들)물어 주었다
		PRINTW
		SELECTCASE TFLAG:SELECTCOM분기
		;失敗
		CASE 1
			PRINTFORML 「――왜냐하면 말합니다―！？」
			PRINTFORMW 「어, 어째서%CALLNAME:MASTER%씨는 상대가 편을 듣습니까！？」
			PRINTFORMW 「이것은 그러한 문제가 아니고군요！ 결국――」
			PRINTL
			PRINTFORMDW 반대로 화나게 해 버렸다…
		;成功
		CASE 2
			PRINTFORML 「――왜냐하면 말합니다―！？」
			PRINTFORMW 「심하지요―！ 거기에 더해――」
			PRINTFORMW 「……미안합니다, 푸념은 (들)물어 주어 버려서」
			PRINTL
			PRINTFORMDW 말하고 싶은 것을 해 침착한 것 같다
		;大成功
		CASE 3
			;ひきかえけんを貰えそうなやつ
			PRINTFORML 「――왜냐하면 말합니다―！？」
			PRINTFORMW 「심하지요―！ 거기에 더해――」
			PRINTFORMW 「――게다가…………(뜻)이유이고……」
			PRINTFORMW 「…………그런데 저 편은………………」
			PRINTFORMW 「……그것으로군요…………또………」
			PRINTFORMW 「그러니까 나는…………(이)라고 생각하면(자)………」
			PRINTFORMW 「………………그렇다고 하는 것이에요！」
			PRINTFORMW 「아, 미안해요！ %CALLNAME:MASTER%씨에 해당되어 버려……」
			PRINTFORML 「일부러 (들)물어 주셔서 감사합니다……」
			PRINTFORMW 「덕분에 깨끗이 했습니다♪」
			PRINTL
			PRINTFORMDW ……대충 토해내 침착한 것 같다
		;失敗（酔）
		CASE 4
			PRINTFORMW 「이다～인가～들～～나는～～～～～！！」
			PRINTL
			PRINTFORMDW %CALLNAME:TARGET%(은)는 더욱 더 불합리한 관련되는 방법을 해 왔다…
		;成功（酔）
		CASE 5
			PRINTFORML 「는～～～간사하다고 생각합니다～～！」
			PRINTFORMW 「이래～～심하지 않습니까～！ 거기에～～！！」
			PRINTL
			PRINTFORMDL 이야기가 끝없이 루프하기 시작했다……
			PRINTFORMDW 더 이상은 성실하게 (들)물어도 쓸데없는 같다
		;大成功（酔）
		CASE 6
			PRINTFORML 「도～～～！！！ 있어, 히가, 아하하는, 아는 는！」
			PRINTFORMW 「%CALLNAME:MASTER%응, 언덕히～～♪」
			PRINTL
			PRINTFORMDL %CALLNAME:MASTER%하지만 적당하게 맞장구를 치고 있으면(자), 무엇인가 단지에 빠졌는가%CALLNAME:TARGET%(은)는 갑자기 웃기 시작했다
			PRINTFORMDW 자주(잘) 모르지만 즐거운 듯 해서 좋다로 하자
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;334,杯を交わす
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:임신자각상태(1=食事)
;TALENT:술내성(-2=食事)
;==================================================
@M_KOJO_MESSAGE_COM_K70_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;335,介抱する
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕する
;ABL:친밀(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:무릎베개)(44以下=失敗
;==================================================
@M_KOJO_MESSAGE_COM_K70_336
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:연모 && TALENT:70:기분 != -1 && !CFLAG:70:빡침 && MARK:70:반발각인 < 3
		PRINTFORMDL %CALLNAME:PLAYER%(은)는 정좌해 무릎을 펑펑두드리면(자),%CALLNAME:TARGET%(은)는 기쁜듯이 응석부려 왔다
	ELSE
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%에 무릎 베개 해 주었다
	ENDIF
	IF TFLAG:SELECTCOM분기 > 0
		WAIT
		PRINTFORMDL 기분 좋았던 것일까,%CALLNAME:TARGET%(은)는 그대로 선잠 해 버렸다
		PRINTFORMDL %CALLNAME:MASTER%하%CALLNAME:TARGET%하지만 일어날 때까지 잠자는 얼굴을 바라보며 보냈다
	ENDIF
	PRINTW
	;寝ちゃう
	IF TFLAG:SELECTCOM분기 > 0
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「………………」
		CASE 2
			PRINTFORML 「하…%CALLNAME:MASTER%씨……」
			PRINTFORMW 「 나는 정말 자 버려서…미안합니다……」
		CASEELSE
			PRINTFORMW 「응……응에～……」
			PRINTL
			PRINTFORMDW %CALLNAME:TARGET%(은)는 무릎 위를 만끽하고 있다
		ENDSELECT
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMW 「응응……」
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:5
		CASE 1
			PRINTFORMW 「네에에…♪ 기분 좋습니다♪」
		CASE 2
			PRINTFORML 「어, 좋습니까～」
			PRINTFORMW 「에서는 호의를 받아들여……♪」
		CASE 3
			PRINTFORMW 「여기서 독서 싶은데♪」
		CASE 4
			PRINTFORMW 「딱 좋은 높이입니다―♪」
		CASEELSE
			PRINTFORMW 「이대로 책을 읽어 주거나……♪」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「네에에…」
		CASE 2
			PRINTFORML 「어, 좋습니까」
			PRINTFORMW 「에서는 호의를 받아들여……」
		CASEELSE
			PRINTFORMW 「평온해지네요―」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,押し倒す（時姦時イタズラする
;TFLAG:194 (0=成功 1=人目がある　2=野外は嫌でござりまする　3=多人数プレイは勘弁　4=合意があってもムードが足りぬ）
;TCVAR:껴안고첫회　1=普通に合意ゲット　2=先にキスぐらいしろよ　3=媚薬or発情には勝てなかったよお…　4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
;5=強引に迫られると断れぬ(素質臆病持ち専用) 6=まんざらでもない　7=駄目　8=論外
;==================================================
@M_KOJO_MESSAGE_COM_K70_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_350_1
#DIM フキゲン
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	フキゲン = 0
	;押し倒され値	ENDURE(70) >= RAND:300 + 300で真,しかしRANDの値は変化するのでここでは400を超えたら押し倒されることにする
	IF FLAG:시간정지 == 1
	;野外失敗
	ELSEIF TFLAG:194 == 2
		IF ENDURE(70) > 400
			PRINTFORML 「어\/\/\/ 조금……\/\/\/」
			PRINTFORMW 「개, 여기서 합니까～…\/\/\/」
		ELSE
			PRINTFORML 「원！ 조금！？」
			PRINTFORMW 「개, 이런 곳에서 뭐 할 생각입니까！」
			フキゲン = 2 - TALENT:70:연모
		ENDIF
	;人目失敗
	ELSEIF TFLAG:194 == 1
		IF ENDURE(70) > 400
			PRINTFORML 「어\/\/\/ 조금……\/\/\/」
			PRINTFORMW 「사람이 보고 있어요～…\/\/\/」
		ELSE
			PRINTFORML 「원！ 조금！？」
			PRINTFORMW 「사람이 보고 있는이 아닙니까！」
			フキゲン = 2 - TALENT:70:연모
		ENDIF
	;乱交失敗
	ELSEIF TFLAG:194 == 3
		PRINTFORMW 「어, 와……그건 좀……」
	;ムード失敗
	ELSEIF TFLAG:194 == 4
		PRINTFORML 「꺄！」
		PRINTFORMW 「 이제(벌써)！ 갑자기는 없어요！！」
		フキゲン = 2 - TALENT:70:연모
	;泥酔失敗
	ELSEIF TFLAG:194 == 5
		PRINTFORMW 「응～～, 째라고 구다 좋다～！」
		PRINTL
		PRINTFORMDW 맹숭맹숭한 얼굴의 목격자가 있는데 취 범하는 것 가지 않는다
	;泥酔
	ELSEIF TCVAR:70:만취 == 1
		PRINTFORMW 「개이고～？ %CALLNAME:MASTER%응, 응 나오고 인가～？」
	;乱交
	ELSEIF GET_TARGETNUM() > 1
		;阿求
		IF CFLAG:70:현재위치 == CFLAG:80:현재위치
			SELECTCASE M_KOJO_K70_BALANCE(70, 80)
			CASE 8, 6, 5, 2, 1
				PRINTFORML 「아, 아구도 함께？ 물론 좋아요」
				PRINTFORMW 「아구, 좋았어…♪」
			CASE 7
				PRINTFORML 「아, 아구와 똑같습니까…？」
				PRINTFORMW 「네,%CALLNAME:MASTER%씨가 안아 주신다면 나, 아구의 다음으로 괜찮습니다……」
			CASE 4, 3
				PRINTFORML 「아, 아구와 똑같습니까…？ 예, 좋아요」
				PRINTFORMW 「아구는 보다 제 쪽이,%CALLNAME:MASTER%씨를 기분 좋게 시켜 줄 수 있을테니까……！」
			ENDSELECT
		;以下のゲストは番号が若い順
		ELSEIF CFLAG:70:현재위치 == CFLAG:1:현재위치
			PRINTFORML 「어와, , 영몽씨와 똑같습니까…？ 예, 좋아요」
			PRINTFORMW 「 나, 영몽씨에게는 지지 않기 때문에！」
		ELSEIF CFLAG:70:현재위치 == CFLAG:11:현재위치
			PRINTFORML 「어와 뭐,마리사씨와 똑같습니까…？ 예, 좋아요」
			PRINTFORMW 「 나, 마리사씨에게는 지지 않기 때문에！」
		ELSEIF CFLAG:70:현재위치 == CFLAG:26:현재위치
			PRINTFORML 「네-！ , 보라색씨와 똑같습니까…？」
			PRINTFORMW 「 나는 좋지만……정말 좋습니까～」
		ELSEIF CFLAG:70:현재위치 == CFLAG:29:현재위치
			PRINTFORML 「어와 , 문장씨와 똑같습니까…？ 예, 좋아요」
			PRINTFORMW 「 나, 문장씨에게는 지지 않기 때문에！」
		ELSEIF CFLAG:70:현재위치 == CFLAG:69:현재위치
			PRINTFORML 「어와 뭐, 마미조우씨와 똑같습니까…？ 예, 좋아요」
			PRINTFORMW 「 나, 마미조우씨에게는 지지 않기 때문에！」
		ELSE
			PRINTFORML 「네, 네―……%TOFULL(TOSTR(GET_TARGETNUM()))%사람으로 합니까～？」
			PRINTFORMW 「원, 알았습니다……　, 아무쪼록 부탁 합니다……」
		ENDIF
	;お泊り
	ELSEIF (CFLAG:70:현재위치 == 連れ込み宿 || M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 ) && CFLAG:TARGET:우후후 != 2
		PRINTFORMW 「아……\/\/\/」
	;それ以外
	ELSEIF !TCVAR:351
		PRINTFORMW 「아\/\/\/」
	ENDIF

	;先に押し倒された
	IF TCVAR:351
		PRINTFORML
		PRINTFORMW 「아는♪ 그럴 기분이 들어 주었습니다♪」
		IF M_KOJO_K70_SADISTIC(70)
			PRINTFORMW 「 그렇지만, 좀 더 학째라고 주고 싶었다～%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「역시%CALLNAME:MASTER%씨로 해 주는 (분)편을 좋아합니다%UNICODE(0x2764)%」
		ENDIF
	ELSEIF !FLAG:70 && !TFLAG:194
		PRINTFORML
		SELECTCASE TCVAR:70:껴안고첫회
		;普通の初回
		CASE 1
			IF TALENT:70:연모
				PRINTFORML 「어와…%CALLNAME:MASTER%씨……？」
				PRINTFORMW 「그……이것은……즉……」
				PRINTFORMW 「은, 네…%UNICODE(0x2764)% 와 주세요…%CALLNAME:MASTER%씨……%UNICODE(0x2764)%」
			ELSE
				PRINTFORML 「어와…%CALLNAME:MASTER%씨……？」
				PRINTFORMW （개, 이것은……설마……）
				PRINTFORMW 「은, 네……(이)나, 쉽게 부탁 합니다……」
			ENDIF
		;キスがまだ
		CASE 2
			IF TALENT:70:연모
				PRINTFORML 「어와…%CALLNAME:MASTER%씨……？」
				PRINTFORMW 「그……이것은……즉……」
				PRINTFORMW （그런……우리, 키스도 아직인데…차례가……）
				PRINTFORMW 「은, 네……(이)나, 쉽게 부탁 합니다……」
			ELSE
				PRINTFORML 「어와…%CALLNAME:MASTER%씨……？」
				PRINTFORMW （개, 이것은……책 나무？）
				PRINTFORMW 「아, 조원……」
			ENDIF
		;媚薬or発情
		CASE 3
			PRINTFORML 「응……%CALLNAME:MASTER%씨, 어쩐지 나, 머리가 뿌옇게 해……」
			PRINTFORMW 「후~는……네, 마음대로 해 주세요……」
		;時姦
		CASE 4
			PRINTFORML 「캐！ (이)나, 그만두어 주세요！！」
			PRINTL
			PRINTFORMDL 입에서는 그렇게 말하면서도%CALLNAME:TARGET%하%CALLNAME:MASTER%에 안아 따라 왔다
			PRINTW
			PRINTFORMW 「어！？ 어째서……어째서……？」
;		CASE 5
;			PRINTFORML 押しの弱い%CALLNAME:TARGET%は、%CALLNAME:MASTER%を拒むことができなかった…
		;もうちょっと
		CASE 6
			PRINTFORML 「어와…%CALLNAME:MASTER%씨……？」
			PRINTFORMW 「미안해요……마음의 준비가……\/\/\/」
		;ダメ
		CASE 7
			PRINTFORMW 「캐！ (이)나, 그만두어 주세요！！」
			フキゲン = 3 - TALENT:70:연모
		;早すぎ
		CASE 8
			PRINTFORML 「캐！！」
			PRINTFORMW 「이다, 누군가 도와 관이야---있고！！」
			フキゲン = 4 - TALENT:70:연모
		;初回じゃない
		CASEELSE
			;不機嫌だとだめ
			IF TALENT:70:기분 == -1 || TCVAR:70:350 >= 3
				PRINTFORMW 「응……！ 지금은 그런 기분이 아닙니다……！」
				フキゲン = 1
				TFLAG:밀어넘어뜨릴수없다 ++
				CFLAG:MASTER:우후후 = 0
				CFLAG:우후후 = 0
			ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
				IF INRANGE(TIME, 360, 1260)
					SELECTCASE RAND:2
					CASE 1
						PRINTFORML 「%CALLNAME:MASTER%씨, 안됩니다……\/\/\/ 손님 오면 어떻게 합니까……\/\/\/」
						PRINTFORMW 「발각되지 않게는……그런……, 예요……\/\/\/」
					CASEELSE
						PRINTFORML 「어, 네-！ 개, 여기서 합니까……\/\/\/」
						PRINTFORMW 「이다 , 안됩니다……\/\/\/ 손님이 와 버리는……\/\/\/」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 1
						PRINTFORML 「어, 네-！ 개, 여기서 합니까……\/\/\/」
						PRINTFORMW 「있고, 지금이라면 손님 오지 않는다고 생각합니다만……\/\/\/」
					CASEELSE
						PRINTFORML 「어, 네-！ 개, 여기서 합니까……\/\/\/」
						PRINTFORMW 「이나, 나다……\/\/\/ 가게가 더러운있습니다……\/\/\/」
					ENDSELECT
				ENDIF
			;いる？
			ELSEIF OUTROOF(CFLAG:MASTER:현재위치)
				SELECTCASE RAND:2
				CASE 1
					PRINTFORML 「……\/\/\/ 개, 여기서 합니까……\/\/\/」
					PRINTFORMW 「이다, 누군가에게 견있어요……\/\/\/」
				CASEELSE
					PRINTFORML 「어, 네-！ 개, 여기서 합니까……\/\/\/」
					PRINTFORMW 「히, 타인이 오면 어떻게 합니까……\/\/\/」
				ENDSELECT
			ELSE
				SELECTCASE RAND:6
				CASE 1
					PRINTFORML 「 이제(벌써),%CALLNAME:MASTER%응, 씨%UNICODE(0x2764)%」
					PRINTFORMW 「후후%UNICODE(0x2764)% 좋아요, 마음대로 해 주세요…%UNICODE(0x2764)%」
				CASE 2
					PRINTFORMW 「꺄♪ 이제(벌써), 어쩔 수 없네요%UNICODE(0x2764)%」
				CASE 3
					PRINTFORMW 「아, 그……오늘은 가득 응석부리게 해 주세요……」
				CASE 4
					IF TALENT:70:연모
						PRINTFORMW 「……%UNICODE(0x2764)% %CALLNAME:MASTER%씨……좋아합니다……%UNICODE(0x2764)%」
					ELSE
						PRINTFORMW 「……%UNICODE(0x2764)% (이)나, 쉽게 부탁 합니다……%UNICODE(0x2764)%」
					ENDIF
				CASE 5
					IF TALENT:70:연모
						PRINTFORMW 「%CALLNAME:MASTER%씨…좋아……%UNICODE(0x2764)%」
					ELSE
						PRINTFORMW 「%CALLNAME:MASTER%씨……\/\/\/」
					ENDIF
				CASEELSE
					IF TALENT:70:임신
						PRINTFORMW 「주거지, 오늘은 조금, 쉬어 주세요……%UNICODE(0x2764)%」
					ELSE
						PRINTFORMW 「주거지, 오늘은 조금, 격렬하게 해 주세요……%UNICODE(0x2764)%」
					ENDIF
				ENDSELECT
				;妊娠中
				IF TALENT:70:임신 && CFLAG:70:임신자각상태 == 1
					PRINTFORML
					PRINTFORMW 「아…！ 배의 아이가 있기 때문에, 격렬한 것은 안됩니다？」
				;危険日
				ELSEIF CFLAG:70:생리주기 == 7 && !TALENT:70:임신 && CFLAG:70:생해금 == 2
					PRINTFORML
					PRINTFORMW （오늘은 혹시……찬스♪）
				ENDIF
			ENDIF
		ENDSELECT
	ENDIF

;	;機嫌が悪くなる
;	IF フキゲン
;		TCVAR:70:350 += フキゲン
;		TALENT:70:기분 = -1
;		BASE:70:분노 += MAXBASE:70:분노 / MAX(5 - フキゲン, 1)
;		CALL M_KOJO_K70_YAMETEKUDASAI(70, フキゲン)
;	ENDIF
ENDIF
RETURN 1
;==================================================
;351,連れ出す
;==================================================
@M_KOJO_MESSAGE_COM_K70_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K70_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:동행 == 60
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白する
;FLAG:생활능력무(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	;した
	IF TFLAG:SELECTCOM분기
		;初めて
		IF FIRSTTIME("告白")
			IF TALENT:70:연모
				PRINTFORMW 「우우……기쁩니다～～！」
				PRINTL
				PRINTFORMDL
				PRINTFORMDL 코스즈는 환희에 흐느껴 울면서%CALLNAME:MASTER%(을)를 꼭 껴안았다
				PRINTW
				PRINTFORMW 「 나도%CALLNAME:MASTER%씨의 일을 좋아했습니다……！」
				PRINTFORMW 「 그렇지만, 말하는 것이 무서워서……관계가 무너져 버리지 않을까 생각해……」
				PRINTFORMW 「그러니까 몹시 기쁩니다……지금, 매우 행복합니다……%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「어……네--！？」
				PRINTFORMW 「, 정말입니까……？」
				PRINTFORMW 「그런…라고 돌연 말해져도……그렇지만……」
				PRINTFORMW 「 그렇지만……, 있고, 좋아요……%CALLNAME:MASTER%씨와라면……」
				PRINTFORMW 「불안은 있습니다만, 반드시%CALLNAME:MASTER%씨라면 나를 소중히 해 주겠지요 해……」
				PRINTFORMW 「 나도%CALLNAME:MASTER%씨, 좋아하게 될 수 있다고 생각합니다…그러니까……」
			ENDIF
		;一度フった,都合のいい奴じゃ！
		ELSE
			;告白口上と同じ,こちらは恋慕のみしかない、はず
			PRINTFORMW 「, 정말입니까……？ 있고, 좋습니까……？」
			PRINTFORMW 「, 기쁘다……좋았다……」
			PRINTFORMW 「 나, 미움받았지 않을까……훨씬 무서워서……」
			PRINTFORMW 「 그렇지만, 희망을 버리지 않고 있어 좋았습니다……%CALLNAME:MASTER%씨가 받아들여 줘……정말로 좋았다……」
		ENDIF
		IF TALENT:70:연모
			PRINTL
			PRINTFORMDL 사랑이 성취한 두 명은 조용하게 다가붙어, 단 공기에 싸여 어느 쪽일까하고도 없게 입맞춤을 주고 받았다……
			PRINTW
			EXP:70:키스경험 += 1
			EXP:70:M경험 += 1
			EXP:MASTER:M경험 += 1
			EXP:MASTER:키스경험 += 1
			IF FIRSTTIME("ファーストキス")
				CALL SET_FIRSTKISS(70)
				;［告白する］の条件が二人きり
				IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
					CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、誰も居なくなった静かな鈴奈庵で恋い焦がれていた%CALLNAME:MASTER%の告白を受け、幸せなムードの中で契りのファーストキスを捧げた
				ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2
					CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、自分の部屋で恋い焦がれていた%CALLNAME:MASTER%の告白を受け、幸せなムードの中で契りのファーストキスを捧げた
				ELSEIF FLAG:데이트상대 == 70
					CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%DATENAME_PLACE()%でデート中、%DATENAME_PLACE()%で恋い焦がれていた%CALLNAME:MASTER%の告白を受け、幸せなムードの中で契りのファーストキスを捧げた
				ELSE
					CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%、%NAME_FROM_PLACE(CFLAG:70:현재위치)%で恋い焦がれていた%CALLNAME:MASTER%の告白を受け、幸せなムードの中で契りのファーストキスを捧げた
				ENDIF
			ENDIF
			CALL M_KOJO_COLOR_K70
			PRINTFORMW 「후후……%UNICODE(0x2764)% 지금부터 앞, 무엇이 있을까 알지 않지만――」
			PRINTFORMW 「쭉 함께 있어요♪ %CALLNAME:MASTER%씨%UNICODE(0x2764)%」
		ENDIF
	;言葉に詰まる
	ELSE
		PRINTFORML 「？」
		PRINTFORMW 「%CALLNAME:MASTER%씨, 어떻게 했습니다？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;353,イタズラする
;FLAG:생활능력무(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_353_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_353_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;354,添い寝する（相手は起きて布団に招く感じ）
;CFLAG:쇠약(1以上=起きない
;CFLAG:초대(0以外=起きない
;==================================================
@M_KOJO_MESSAGE_COM_K70_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF CFLAG:MASTER:초기위치 == CFLAG:70:초기위치
		SELECTCASE RAND:4
		CASE 1
			PRINTFORML 「……%CALLNAME:MASTER%씨……」
			PRINTFORML 「아무쪼록……\/\/\/ 이불 따뜻하게 해 두었습니다……\/\/\/」
			SIF DAY:2 == 2
				PRINTFORML 「아, 두꺼우면 미안해요……」
			WAIT
		CASE 2
			PRINTFORML 「……%CALLNAME:MASTER%씨……」
			PRINTFORMW 「외로왔습니다～……」
		CASE 3
			IF DAY:2 == 4
				PRINTFORML 「빨리 와 주세요～！」
				PRINTFORMW 「춥습니다～～！」
			ELSE
				PRINTFORML 「아……\/\/\/」
				PRINTFORMW 「그렇게 들러붙으면(자) 두꺼워요\/\/\/」
			ENDIF
		CASEELSE
			IF DAY:2 == 2
				PRINTFORML 「응,%CALLNAME:MASTER%씨……」
				PRINTFORMW 「조금……두껍습니다……\/\/\/」
			ELSE
				PRINTFORML 「응,%CALLNAME:MASTER%씨……」
				PRINTFORMW 「후후♪ 함께라면 따뜻하네요……%UNICODE(0x2764)%」
			ENDIF
		ENDSELECT
	;恋慕前提だっけ？
	ELSEIF TALENT:70:연모
		SELECTCASE RAND:4
		CASE 1
			PRINTFORML 「응,%CALLNAME:MASTER%씨……」
			PRINTFORMW 「후후……여기 사랑야……\/\/\/」
		CASE 2
			PRINTFORML 「응,%CALLNAME:MASTER%씨……」
			PRINTFORMW 「함께 자 줍니까…기쁘다……」
		CASE 3
			IF DAY:2 == 4
				PRINTFORML 「은 원……\/\/\/」
				PRINTFORMW 「%CALLNAME:MASTER%삼계라고 주면(자) 포카포카입니다～\/\/\/」
			ELSE
				PRINTFORML 「아……\/\/\/」
				PRINTFORMW 「그렇게 들러붙으면(자) 두꺼워요\/\/\/」
			ENDIF
		CASEELSE
			IF DAY:2 == 2
				PRINTFORML 「응,%CALLNAME:MASTER%씨……」
				PRINTFORMW 「조금……두껍습니다……\/\/\/」
			ELSE
				PRINTFORML 「응,%CALLNAME:MASTER%씨……」
				PRINTFORMW 「……따뜻하다……%UNICODE(0x2764)%」
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;355,時止め（地の文の改変程度に留めるべき
;==================================================
@M_KOJO_MESSAGE_COM_K70_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_355_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_355_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;360,身を任せる
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=スカートの中を見せる 53=パイズリ 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅきホールド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K70_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = CFLAG:70:1006
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	SELECTCASE TCVAR:70:카운터행동
	;キス
	CASE 30
		PRINTFORMW 「응～%UNICODE(0x2764)% %UNICODE(0x2764)% ～%UNICODE(0x2764)%」
	;後ろから抱きつく
	CASE 31
		PRINTFORMW 「후후……%CALLNAME:MASTER%씨의 등, 아버지같습니다…%UNICODE(0x2764)%」
	;前から抱きつく
	CASE 32
		PRINTFORMW 「……%CALLNAME:MASTER%씨의 온기……%CALLNAME:MASTER%씨의 냄새……%UNICODE(0x2764)%」
	;胸を揉ませる
	CASE 33
		PRINTFORMW 「, 군요의 크기는……！」
	;股間をまさぐる
	CASE 34
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「꺄！ , 깜짝 시키지 말아 주세요……」
		CASE 2
			PRINTFORMW 「후후……%UNICODE(0x2764)% 어떻습니까～？ 기분입니까～？」
		CASEELSE
			PRINTFORMW 「원…！ 도 조어 있어 귀엽다…%UNICODE(0x2764)%」
		ENDSELECT
	;スカートの中を見せる
	CASE 35
		IF TEQUIP:70:50 == MASTER
			PRINTFORMW 「하나가 된다 라고, 이런 것이군요……%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「 , 미안해요, 이상한 금년이라고……\/\/\/」
		ENDIF
	;挿入おねだり
	CASE 41 TO 44
		;おあずけ？
		PRINTFORMW 「팥고물……%CALLNAME:MASTER%응……！ 심술꾸러기군요……！」
	;手淫
	CASE 50
		PRINTFORMW 「응후후…%UNICODE(0x2764)% 기분 좋습니까？ %CALLNAME:MASTER%씨, 귀엽습니다%UNICODE(0x2764)%」
		SIF NOWEX:MASTER:사정
			PRINTFORMW 「어머나, 이 나무 그렇습니까？ 좋아요%UNICODE(0x2764)% 해 주세요%UNICODE(0x2764)% %UNICODE(0x2764)% %UNICODE(0x2764)%」
	;口淫
	CASE 51
		IF NOWEX:MASTER:사정
			;内容は同じだけどフラグが立つので
			IF FIRSTTIME("精液の味")
				PRINTFORMW 「응, 응, 응～～～%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「응, 응, 응～～～%UNICODE(0x2764)%」
			ENDIF
		ELSE
			PRINTFORMW 「…%UNICODE(0x2764)% …%UNICODE(0x2764)% 응……%UNICODE(0x2764)%」
		ENDIF
	;素股
	CASE 52
		PRINTFORML 「아%UNICODE(0x2764)% 하%UNICODE(0x2764)% 응%UNICODE(0x2764)% 하%UNICODE(0x2764)%」
		IF NOWEX:MASTER:사정
			PRINTFORMW 「후~는……%UNICODE(0x2764)% , 진흙 진흙이군요%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「이것%UNICODE(0x2764)% 기분 있고%UNICODE(0x2764)% 좋습니다%UNICODE(0x2764)% %CALLNAME:MASTER%씨%UNICODE(0x2764)% 아%UNICODE(0x2764)%」
		ENDIF
	;パイズリ
	CASE 53
		IF NOWEX:MASTER:사정
			PRINTFORMW 「아%UNICODE(0x2764)% 응%UNICODE(0x2764)% 응～～%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「, 어떻습니까, 와, 기분 잘 할 수 있습니까？」
		ENDIF
	;足コキ
	CASE 54
		PRINTFORMW 「어머나…%CALLNAME:MASTER%씨, 이런 것을 좋아하네요……%UNICODE(0x2764)% 변태씨군요……%UNICODE(0x2764)%」
	;アナル愛撫
	CASE 55
		PRINTFORML 「더럽지 않아요…%UNICODE(0x2764)% %CALLNAME:MASTER%씨의 신체이기 때문에……%UNICODE(0x2764)%」
		PRINTFORMW 「그것보다 기분 좋아졌으면 좋습니다……%UNICODE(0x2764)%」
	;アナル舐め
	CASE 56
		PRINTFORMW 「싫지 않아요%UNICODE(0x2764)% 날름날름……%UNICODE(0x2764)% ……%UNICODE(0x2764)%」
	;乳首舐め
	CASE 59
		PRINTFORMW 「……%UNICODE(0x2764)% 남자도……젖꼭지 끊습니다%UNICODE(0x2764)%」
	;ディープキス
	CASE 60
		PRINTFORMW 「……좀 더%UNICODE(0x2764)% %UNICODE(0x2764)% ……%UNICODE(0x2764)%」
	;クンニ強制
	CASE 70
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「응%UNICODE(0x2764)% 아%UNICODE(0x2764)% 아%UNICODE(0x2764)%」
			PRINTFORMW 「좋습니다%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)% 아%UNICODE(0x2764)%」
		CASE 2
			PRINTFORML 「아%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)% 격렬하고%UNICODE(0x2764)%」
			PRINTFORMW 「팥고물%UNICODE(0x2764)% 들이마셔%UNICODE(0x2764)% 만져%UNICODE(0x2764)%」
		CASEELSE
			PRINTFORML 「%CALLNAME:MASTER%씨%UNICODE(0x2764)% 맛있습니까%UNICODE(0x2764)%」
			PRINTFORMW 「 좀 더 핥아%UNICODE(0x2764)% 들이마셔%UNICODE(0x2764)% 좋아요%UNICODE(0x2764)%」
		ENDSELECT
	;アナル舐め強制
	CASE 72
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「응%UNICODE(0x2764)% 아%UNICODE(0x2764)% 아%UNICODE(0x2764)%」
			PRINTFORMW 「엉덩이 기분 좋습니다%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)% 좀 더 만져%UNICODE(0x2764)%」
		CASE 2
			PRINTFORML 「아%UNICODE(0x2764)% 엉덩이%UNICODE(0x2764)% 좋다%UNICODE(0x2764)%」
			PRINTFORMW 「팥고물%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)% 만져%UNICODE(0x2764)%」
		CASEELSE
			PRINTFORML 「%CALLNAME:MASTER%씨%UNICODE(0x2764)% 미안해요%UNICODE(0x2764)%」
			PRINTFORMW 「엉덩이 를 좋아하는%UNICODE(0x2764)% 거치지 않아 싶어 응으로%UNICODE(0x2764)% 미안 없음%UNICODE(0x2764)%」
		ENDSELECT
	;ぱふぱふ
	CASE 73
		PRINTFORMW 「쿠스%UNICODE(0x2764)% %CALLNAME:MASTER%씨, 귀엽다%UNICODE(0x2764)%」
	;乳合わせ
	CASE 74
		PRINTFORMW 「아%UNICODE(0x2764)% %CALLNAME:MASTER%씨…따뜻하다……%UNICODE(0x2764)%」
	;タワシ洗い
	CASE 75
		PRINTFORMW 「미안해요 나뿐……%UNICODE(0x2764)% 그렇지만 기분 좋아서…%UNICODE(0x2764)%」
	;強制アソコ愛撫
	CASE 76
		PRINTFORMW 「후~%UNICODE(0x2764)% 좀 더…%UNICODE(0x2764)%」
	;乳を吸わせる
	CASE 77
		PRINTFORMW 「은 원%UNICODE(0x2764)% 팥고물%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)% 좀 더%UNICODE(0x2764)%」
	;Ｖ挿入,Ａ挿入
	CASE 85, 87
		PRINTFORMW 「아%UNICODE(0x2764)% 삽입은 왔습니다～%UNICODE(0x2764)%」
	;だいしゅきホールド
	CASE 86
		;一緒にイく
		IF NOWEX:70:1
			PRINTFORML 「후~아%UNICODE(0x2764)% 이 오는%UNICODE(0x2764)% 아%UNICODE(0x2764)% 나도 함께%UNICODE(0x2764)%」
			PRINTFORMW 「%CALLNAME:MASTER%씨와 함께%UNICODE(0x2764)% 응%UNICODE(0x2764)% 아%UNICODE(0x2764)% 아%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「후~%UNICODE(0x2764)% 구%UNICODE(0x2764)% 온다%UNICODE(0x2764)% %CALLNAME:MASTER%씨가 있었는지 키-오는%UNICODE(0x2764)%」
		ENDIF
	;Ｖ腰振り,Ａ腰振り
	CASE 88, 89
		PRINTFORMW 「아%UNICODE(0x2764)% 응응～%UNICODE(0x2764)% 후~%UNICODE(0x2764)% 풍부하지 않지 있고입니다～%UNICODE(0x2764)% %CALLNAME:MASTER%응%UNICODE(0x2764)%」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;363,読み聞かせ（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:동침중(1=布団orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_MESSAGE_COM_K70_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_363_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_363_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;364,豆まき(萃香、勇儀、スカーレット姉妹用
;TFLAG:193(豆まきに参加してる人数
;==================================================
@M_KOJO_MESSAGE_COM_K70_364
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_364_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_364_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;365,守矢神社へ移動(早苗、神奈子、諏訪子用
;==================================================
@M_KOJO_MESSAGE_COM_K70_365
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_365_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_365_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;402,就寝
;==================================================
@M_KOJO_MESSAGE_COM_K70_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K70_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORMW 「……안녕히 주무십시오……」
	;満足フラグ
	IF TCVAR:70:355
		;苦肉の策
		IF TIME < 480
			CFLAG:70:1001 = DAY - 1
		ELSE
			CFLAG:70:1001 = DAY
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:수면(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K70_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_403_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF CFLAG:70:수면
		PRINTFORMW 「……」
	;仕事中
	ELSEIF CFLAG:70:행동 == 5
		PRINTFORML 「어머나, 피로입니까？」
		PRINTFORMW 「쉬어 가 주십시오」
	ELSE
		PRINTFORML 「어머나, 피로입니까？」
		PRINTFORMW 「에서는 조금 쉴까요」
	ENDIF
ENDIF
RETURN 1
;==================================================
;405,出掛ける(同行時デート
;条件が厄介なので、COMF405 出掛ける.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K70_405
;出掛けるにTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K70_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_405_1
#DIM フキゲン
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTL
	CALL M_KOJO_COLOR_K70
	;小鈴とデート
	IF CFLAG:70:동행
		IF TALENT:70:연모
			PRINTFORMW 「데이트입니까？ 했다♪」
			SELECTCASE DATENAME_PLACE()
			CASE "博麗神社"
				IF DAY:2 == 1
					PRINTFORMW 「이 시기는 벚꽃이 깨끗하겠지요～！」
				ELSEIF !RAND:2
					PRINTFORMW （무엇을 부탁할까）
				ELSE
					PRINTFORMW 「오늘은 영몽씨 있습니까―？」
				ENDIF
			CASE "命蓮寺"
				IF !RAND:2
					PRINTFORMW 「가끔 씩은 설법으로도 (들)물어 보겠습니다？」
				ELSE
					PRINTFORMW 「수련의 모습을 견학하러 갈까요」
				ENDIF
			CASE "人間の里"
				SELECTCASE RAND:4
				CASE 1
					PRINTFORMW 「네에에… %CALLNAME:MASTER%씨와 데이트인가♪」
				CASE 2
					PRINTFORMW 「아는 사람으로 보여지면(자) 조금 부끄러울지도……\/\/\/」
				CASE 3
					PRINTFORMW 「사사 행위 오고 싶은 곳 있습니다～♪」
				CASEELSE
					PRINTFORMW 「역시 안전한 곳이 좋지요～♪」
				ENDSELECT
			CASE "霧の湖～紅魔館"
				IF DAY:2 == 2
					PRINTFORML 「수영복 가져 갑니까？」
					PRINTFORMW 「아하하, 농담이에요～♪」
				ELSEIF !RAND:2
					PRINTFORMW 「%CALLNAME:MASTER%씨는 낚시라든지 합니까～？」
				ELSE
					PRINTFORMW 「조용한 곳이 좋네요♪」
				ENDIF
			CASE "迷いの竹林"
				IF !RAND:2
					PRINTFORMW 「타케바야시의 끝에도 연 장소가 있는 것 같아요」
				ELSE
					PRINTFORMW 「헤매지 않게 조심하겠습니다！」
				ENDIF
			CASE "魔法の森"
				IF DAY:2 == 4
					PRINTFORMW 「이 시기는 얼음의 비늘이 잡히기 때문에 했던가―」
				ELSEIF !RAND:2
					PRINTFORMW 「버섯 사냥이라도 합니까～？」
				ELSE
					PRINTFORMW 「마법의 숲이라면 향림당을 보고 싶네요」
				ENDIF
			CASE "三途の川～冥界"
				IF !RAND:2
					PRINTFORML 「어！ 그 거 어떤……？」
					PRINTFORMW 「문자 그대로의 의미는, 예！？」
				ELSE
					PRINTFORMW 「…………%CALLNAME:MASTER%씨와라면 나……%UNICODE(0x2764)%」
				ENDIF
			CASE "妖怪の山 (山麓)"
				IF DAY:2 == 3
					PRINTFORMW 「이 시기는 단풍이 깨끗하겠지요～！」
				ELSEIF !RAND:2
					PRINTFORMW 「천천히 걸어 갑시다」
				ELSE
					PRINTFORMW 「최근에는 산록까지라면 마을의 사람도 가고 있는 것 같아요」
				ENDIF
			CASE "妖怪の山 (山頂)"
				IF DAY:2 == 3
					PRINTFORMW 「이 시기는 단풍이 깨끗하겠지요～！」
				ELSEIF !RAND:2
					PRINTFORMW 「모처럼이니까 문장씨를 만나 둘까요」
				ELSE
					PRINTFORMW 「가끔 씩은 운동하지 않으면 안됩니까……」
				ENDIF
			CASE "地底"
				IF !RAND:2
					PRINTFORMW 「조금 무섭지만,%CALLNAME:MASTER%씨가 있으면 안심입니다♪」
				ELSE
					PRINTFORMW 「동굴입니까……어쩐지 두근두근하네요♪」
				ENDIF
			CASE "夢の世界～月"
				IF !RAND:2
					PRINTFORMW 「에？ 달은 하늘의 달입니까？」
				ELSE
					PRINTFORMW 「네-와 어떻게 해 나가겠지요…？」
				ENDIF
			ENDSELECT
		ELSE
			PRINTFORMW 「네에에… %CALLNAME:MASTER%씨와 데이트인가～」
		ENDIF
	;阿求とデート
	;これを見るには小鈴をターゲットにしつつ阿求とデートに行くという非常にマニアックかつ冷酷な行為をしなければならない
	;自力で発見したらすごいというかありがたい
	ELSEIF CFLAG:80:동행
		フキゲン = 0
		;8=独占,7=悲恋,6=揶揄,5=信頼,4=敵対,3=恋慕,2=応援,1=平穏
		SELECTCASE M_KOJO_K70_BALANCE(70, 80)
		CASE 8, 5
			PRINTFORML 「어머나, 오늘은 아구와 데이트입니까～？」
			PRINTFORMW 「-응,%CALLNAME:MASTER%응, 필시 바지런한 기질이 있겠지요」
			PRINTFORMW 「뭐, 나도 그 정도로 하나 하나 눈꼬리 세우거나 하지 않기 때문에―」
			PRINTFORMW 「거기에 아구는 중요한 친구니까요, 다소의 헛일은 신경쓰지 않아요♪」
		CASE 7
			フキゲン = 2
			PRINTFORMW 「아, 오늘도 아구와 데이트입니까…」
			PRINTFORMW 「아하하, 즐겨 와 주세요―」
		CASE 6
			PRINTFORMW 「어머나, 오늘도%CALLNAME:MASTER%씨와 데이트？」
			PRINTFORML 「괜찮아♪ 무엇인가 있으면(자) 안에 오고 있었던 것으로 해 주어요♪」
			PRINTFORMW 「힘껏 즐겨 와！」
		CASE 4, 3
			フキゲン = M_KOJO_K70_BALANCE(70, 80) - 2
			PRINTFORMW 「어, 아구와 외출입니까…？」
			PRINTFORMW 「아하하, 즐겨 와 주세요―」
		CASE 2
			PRINTFORMW 「어머나,%CALLNAME:MASTER%씨와 외출？」
			PRINTFORML 「-응♪ 무엇인가 있으면(자) 안에 오고 있었던 것으로 해 주어요♪」
			PRINTFORMW 「즐겨들 사의！」
		CASE 1
			PRINTFORMW 「어머나,%CALLNAME:MASTER%씨와 외출？」
			PRINTFORMW 「%CALLNAME:MASTER%씨, 진한 개, 신체 약하기 때문에 조심해 주세요」
		ENDSELECT
;		;機嫌が悪くなる
;		IF フキゲン
;			;嫉妬フキゲン
;			TCVAR:70:353 = 1
;			TCVAR:70:350 += フキゲン
;			TALENT:70:기분 = -1
;			BASE:70:분노 += MAXBASE:70:분노 / MAX(7 - フキゲン, 1)
;		ENDIF
	ELSE
		;なし
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:현재위치)(野外掃除（冬は雪かき
;==================================================
@M_KOJO_MESSAGE_COM_K70_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지 || CFLAG:70:수면
	ELSEIF CFLAG:70:우후후
		PRINTFORMW 「네？ ……, 있고, 지금은 일입니까 그것……」
	ELSE
		;鈴奈庵
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			PRINTFORML 「네, 청소해 주십니까―？」
		;自分の部屋
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2
			PRINTFORML 「네, 그렇게 나의 방 더러웠습니까……」
		ELSEIF OUTROOF(CFLAG:MASTER:현재위치) && DAY:2 == 4
			PRINTFORML 「눈치우기입니까？」
		ELSE
			PRINTFORML 「청소입니까？」
		ENDIF
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			PRINTFORMW 「감사합니다―！」
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2
			PRINTFORMW 「고맙겠습니다하지만, 조금 복잡합니다……」
		;地位がほぼ最低値なのでまず手伝ってくれる,でも地位システムなくなるかもしれないんで
		ELSEIF TFLAG:193
			PRINTFORMW 「 나도 도웁시다」
		ELSE
			PRINTFORMW 「기능의 것이군요―」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K70_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:연모
		PRINTFORML 「%CALLNAME:MASTER%씨！ 연습 부탁하는！」
	ELSE
		PRINTFORML 「 나라도 노력하는！」
	ENDIF
	;オリジナルスペカです……,ゲーム参戦はよ～
	SELECTCASE RAND:3
	CASE 1
		;ちなみに三月精の作中でパチュリーの図書館にヴォイニッチ手稿出てきます
		PRINTFORMW 「이나！ 판독눈 「보이닛치데코다」！」
	CASE 2
		PRINTFORMW 「！ 요마책 「개찬분복다부」！」
	CASEELSE
		PRINTFORMW 「히개！ 「기가스 사본 프레스」！」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;412,勉強
;ABL:교양(ABL:MASTER:교양より大=MASTERが教えてもらう ABL:MASTER:교양より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K70_412
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF CFLAG:70:수면
	;宿題
	ELSEIF ITEM:숙제
		PRINTFORMDL %CALLNAME:MASTER%하%CALLNAME:TARGET%(와)과 함께 숙제를 했다
		PRINTW
		PRINTFORML 「아하하,%CALLNAME:MASTER%씨숙제같은 것을 합니까―？」
		PRINTFORMW 「 나로 좋다면 도와요―」
		;地の文で処理しているのを飛ばすためこちらで処理しておく
		ITEM:숙제 --
	;教える
	ELSEIF ABL:MASTER:교양 > ABL:70:교양
		PRINTFORMDL %CALLNAME:MASTER%하%CALLNAME:TARGET%에 가끔 가르치면서 함께 공부했다
		PRINTW
		IF ABL:MASTER:교양 > 2 && TALENT:70:연모
			PRINTFORML 「%CALLNAME:MASTER%씨 대단해……！」
			PRINTFORMW 「박식하네요～！ 멋지다입니다～！」
		ELSE
			PRINTFORML 「응, 과연―」
			PRINTFORMW 「아니,%CALLNAME:MASTER%씨의 이야기는 도움이 되네요」
		ENDIF
	;教わる
	ELSE
		PRINTFORMDL %CALLNAME:MASTER%하%CALLNAME:TARGET%(이)가 가르쳐 주면서 함께 공부했다
		PRINTW
		IF ABL:MASTER:교양 < ABL:70:교양 - 2
			PRINTFORML 「일본 문학이라고 하는 것은 원래――」
			PRINTFORMW 「, 수고 하셨습니다！」
		ELSEIF TALENT:70:연모
			PRINTFORML 「이것은이군요―, 오감 문자라고 해서――」
			PRINTFORMW 「후후♪ %CALLNAME:MASTER%씨에게 가르치는 것 어쩐지 즐겁습니다♪」
		ELSE
			PRINTFORML 「이것은이군요―, 신대문자라고 해서――」
			PRINTFORMW 「후후,%CALLNAME:MASTER%씨에게 가르치는 것은 기분이 좋네요～♪」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=デザート 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K70_413
;TFLAG:194が100以上の場合のみ
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_413_1
#DIM 料理知識
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && DISHASSI == 70
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:연모
		IF ABL:70:요리기능 >= 3
			PRINTFORML 「덕분에 나도 요리의 팔이 능숙해졌어요―！」
		ELSE
			PRINTFORML 「요리입니까……」
			PRINTFORML 「요리의 책은 읽은 적 있습니다만, 실제로 하는 것은 별로 자신있지 않아서……」
			PRINTFORML 「이, 노력하는！」
		ENDIF
	ELSE
		PRINTFORML 「요리를 합니까―？」
		PRINTFORML 「 나도 도웁시다」
	ENDIF
	SELECTCASE DISHNAME
	CASE "雑炊", "野菜炒め", "味噌汁", "おひたし", "うどん", "素麺", "蕎麦", "団子", "フルーツ盛り合わせ", "サンドイッチ", "スシ", "煮魚", "刺身"
		料理知識 = 1
	CASE "シチュー", "生姜焼き", "天麩羅", "ゼリー", "クッキー", "パイ", "羊羹", "大福", "カステラ", "肉まん", "たこ焼き"
		料理知識 = 2
	CASE "蒲焼き", "生け作り", "照り焼き", "竜田揚げ"
		料理知識 = 2
	CASE "カエルのから揚げ", "カエルカレー", "カエルのソテー", "カエルの塩焼き"
		料理知識 = 4
	;個別用(数字に意味はない)
	CASE "卵かけご飯", "おにぎり", "やまもりごはん", "漬物に大盛り飯", "焼き魚"
		料理知識 = 11
	CASE "ケーキ", "おせち料理", "恵方巻", "年越し蕎麦"
		料理知識 = 21
	CASE "ドーピングコンソメスープ", "モッツァレラチーズとトマトのサラダ", "義大莉而鳥苗鳥肉", "ギンギー料理"
		料理知識 = 101
	;ヲムレツ,ハンバーグ,グラタン,カレーライス,しゃぶしゃぶ,ラーメン,ステーキ,油淋鶏,プリン,パウンドケーキ
	;ハンバーガー,スコーン,シウマイ,フィッシュ＆チップス,タコス,マリネ,ムニエル,フィッシュカレー,スターゲイジーパイ
	CASEELSE
		;禁断の料理
		IF DISHTYPE == 4
			料理知識 = 5
		ELSE
			料理知識 = 3
		ENDIF
	ENDSELECT
	;個別優先
	IF DISHNAME == "卵かけご飯"
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「%DISHNAME%라고……그 정도 만들 수 있는에 정해져있는이 아닙니까！」
			PRINTFORML 「알을 깨끗이 나눌 뿐입니다, 이봐요」
			IF ABL:70:요리기능 >= 2
				$GOOD_EGG
				PRINTL
				PRINTFORMDW 　파칵
				PRINTL
				CALL M_KOJO_K70_DEKIMASITA(1)
			ELSE
				$BAD_EGG
				PRINTL
				PRINTFORMDW 　파캐
				PRINTL
				PRINTFORML 「아…………？」
			ENDIF
		ELSEIF ABL:70:요리기능 >= 2
			PRINTFORML 「%DISHNAME%입니까, 아랫배가 비었을 때에는 딱 좋지요」
			GOTO GOOD_EGG
		ELSE
			PRINTFORML 「또%DISHNAME%입니까……」
			PRINTFORML 「지난번은 우연히 실패했을 뿐입니다！」
			PRINTFORML 「알을 나눌 정도로 나에게래……！」
			IF !RAND:2
				GOTO BAD_EGG
			ELSE
				GOTO GOOD_EGG
			ENDIF
		ENDIF
	ELSEIF DISHNAME == "おにぎり"
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「%DISHNAME%정말 요리가운데 들어가지 않아요～」
		ELSE
			PRINTFORML 「%DISHNAME%입니까～, 나는 역시 연어를 좋아하네요～」
			PRINTFORML 「%CALLNAME:MASTER%씨는 무엇 넣습니다～？」
		ENDIF
		PRINTL
		IF ABL:70:요리기능 >= 2
			PRINTFORMDW 코스즈는 익숙해진 손놀림으로 경쾌하게%DISHNAME%(을)를 만들었다.
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(1)
		ELSE
			PRINTFORMDW 코스즈는 여유의 표정이었지만, 거기에는 찌그러진 형태의%DISHNAME%하지만 줄지어 있었다…….
			PRINTL
			PRINTFORML 「네-와 이것은……」
			PRINTFORML 「, 예술성이라고 하는 것을 표현해 보았습니다……」
		ENDIF
	ELSEIF DISHNAME == "やまもりごはん"
		PRINTFORML 「%DISHNAME%라는 요리인가……」
		$YAMAMORI
		PRINTL
		PRINTFORMDW 코스즈는 밥공기로부터 넘쳐 흐름 떨어지지 않게, 신중하게 밥을휘었다.
		PRINTL
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「네！？ 아직 번창합니까！？」
		CASE 2
			PRINTFORML 「대단히 먹군요……」
		CASEELSE
			PRINTFORML 「이 정도로 좋습니까？」
		ENDSELECT
	ELSEIF DISHNAME == "漬物に大盛り飯"
		PRINTFORML 「그 거 요리인가……」
		GOTO YAMAMORI
	ELSEIF DISHNAME == "焼き魚"
		IF ABL:70:요리기능 >= 3
			PRINTFORML 「%DISHNAME%(이)라고 해도, 굽는 방법이나 맛의 붙이는 방법으로 바뀝니다！」
			PRINTL
			PRINTFORMDW 코스즈는 진지한 눈초리로 물고기를 굽고 있다.
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(1)
		ELSE
			PRINTFORML 「%DISHNAME%라고 구울 뿐입니다군요？」
			PRINTL
			PRINTFORMDW 코스즈는 태평하게 물고기를 굽고 있다.
			PRINTL
			IF !RAND:(3 + ABL:70:요리기능)
				PRINTFORML 「아 아-！ 개, 타 버렸습니다……」
			ELSE
				CALL M_KOJO_K70_DEKIMASITA(1)
			ENDIF
		ENDIF
	ELSEIF DISHNAME == "ケーキ"
		IF DAY:2 == 4 && (DAY:3 == 24 || DAY:3 == 25)
			PRINTFORML 「그렇네요！ 크리스마스 케이크를 만듭시다！」
			PRINTL
			IF ABL:70:요리기능 >= 3
				PRINTFORMDW 코스즈는 우키우키 기분으로 기합이 들어갔다%DISHNAME%(을)를 만들었다.
			ELSE
				PRINTFORMDW 코스즈는 우키우키 기분으로 소로 했다%DISHNAME%(을)를 만들었다.
			ENDIF
		ELSE
			PRINTFORML 「%DISHNAME%(을)를 만듭니까？ 무엇인가 축하마다에서도？」
			IF ABL:70:요리기능 >= 3
				PRINTFORML 「아무튼 과자를 만드는 것은 즐거우니까～」
				PRINTL
				PRINTFORMDW 코스즈는 경쾌하게 콧노래를 노래하면서 기합이 들어갔다%DISHNAME%(을)를 만들었다.
			ELSE
				PRINTFORML 「원, 나에게 그런 매우것 만들 수 있을까……」
				PRINTL
				PRINTFORMDW 코스즈는 레시피와 노려보면서 열심히 소로 했다%DISHNAME%(을)를 만들었다.
			ENDIF
		ENDIF
		PRINTL
		CALL M_KOJO_K70_DEKIMASITA(ABL:70:요리기능 >= 3)
	ELSEIF DISHNAME == "おせち料理"
		IF ABL:70:요리기능 >= 3
			PRINTFORML 「%DISHNAME%입니까～！ 좋네요！」
			PRINTFORML 「 나 이 여승인～있고 다테권을 좋아합니다～」
			PRINTL
			PRINTFORMDW 코스즈는 테키파키와%DISHNAME%의 속재료를 만들어 진열에 힘썼다.
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(1)
		ELSE
			PRINTFORML 「%DISHNAME%(을)를 만듭니까―！？」
			PRINTFORML 「원, 나에게 그런 매우것 만들 수 있을까……」
			PRINTL
			PRINTFORMDW 코스즈는 레시피와 노려보면서 더듬거린 모습으로%DISHNAME%(을)를 만들었다.
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(0)
		ENDIF
	ELSEIF DISHNAME == "恵方巻"
		PRINTFORML 「%DISHNAME%입니까, 그렇게 말하면 오늘은 절분이었지요」
		IF ABL:70:요리기능 >= 3
			GOTO RAKURAKU
		ELSE
			GOTO GANBARU
		ENDIF
	ELSEIF DISHNAME == "年越し蕎麦"
		PRINTFORML 「%DISHNAME%입니까～！ 좋네요！」
		IF ABL:70:요리기능 >= 3
			GOTO RAKURAKU
		ELSE
			GOTO GANBARU
		ENDIF
	ELSEIF DISHNAME == "ドーピングコンソメスープ"
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「%DISHNAME%？ 입니까 그것은？？」
			PRINTFORML 「외계의 만화에 실려 있던 요리로 재료는 양파·마늘·콩소메·근육……어？？」
			$DCS
			PRINTL
			PRINTFORMDW 코스즈는 말해지는 대로 속재료를 던져 붐비었다.
			PRINTL
			PRINTFORML 「응……외형은 보통이지만, 이것 먹어 괜찮은 것입니까……」
		ELSEIF ABL:70:요리기능 >= 3
			PRINTFORML 「 나의 요리는 지고로 해 궁극이다！！」
			PRINTL
			PRINTFORMDW 고시카
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(1)
		ELSE
			PRINTFORML 「%DISHNAME%……또 저것을 만듭니까……」
			GOTO DCS
		ENDIF
	ELSEIF DISHNAME == "モッツァレラチーズとトマトのサラダ"
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「목, 못트？ 그, 어떻게든 치즈로 사라다를 만들면 좋네요」
			IF ABL:70:요리기능 >= 3
				GOTO RAKURAKU
			ELSE
				GOTO GANBARU
			ENDIF
		ELSEIF ABL:70:요리기능 >= 3
			PRINTFORML 「%DISHNAME%데스군요！ %CALLNAME:MASTER%씨, 우선 비누로 손을 세탁쇼！」
			PRINTFORML 「조리장은 청결하지 않으면 안 되는 응데스！！」
			PRINTL
			PRINTFORMDL 코스즈는 진지한 시선으로 요리를 만들고 있다.
			PRINTFORMDW 마음 탓인지 요기가 감돌고 있는 것 같은……
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(1)
		ELSE
			PRINTFORML 「못트, 못트…………」
			PRINTFORML 「사라다를 만듭니다……」
			GOTO GANBARU
		ENDIF
	ELSEIF DISHNAME == "義大莉而鳥苗鳥肉"
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「있고-다―…예？ 입니까 그 있고--어떻게든은……」
			PRINTFORML 「캐！ 벌레예요 그것！ 싫습니다～！ 그런 것 포고 없다……」
			$JAN
			PRINTL
			PRINTFORMDW 코스즈는 마지못해 요리했다.
			PRINTL
			PRINTFORML 「…………나는 먹지 않아요？」
		ELSE
			PRINTFORML 「―……, 또 그 있고-다등입니까……」
			GOTO JAN
		ENDIF
	ELSEIF DISHNAME == "ギンギー料理"
		PRINTFORML 「%DISHNAME%？ 드물네요」
		GOTO RAKURAKU
	ELSEIF 料理知識 == 1
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「%DISHNAME%정도라면 만들 수 있습니다！\@ ABL:70:요리기능 < 3 ? 　……たぶん # \@」
		ELSEIF ABL:70:요리기능 >= 3
			PRINTFORML 「%DISHNAME%(이)군요！ 조금의 조금 와♪」
		ELSEIF ABL:70:요리기능 >= 1
			PRINTFORML 「%DISHNAME%(이)군요！ 간단♪ 간단♪」
		ELSE
			PRINTFORML 「%DISHNAME%(이)군요！ 맡겨 주세요！」
		ENDIF
		$RAKURAKU
		PRINTL
		PRINTFORMDW 코스즈는 경쾌하게 콧노래를 노래하면서 테키파키와 요리했다.
		PRINTL
		CALL M_KOJO_K70_DEKIMASITA(1)
	ELSEIF 料理知識 == 2
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「%DISHNAME%의 레시피는-와……」
			PRINTFORML 「에 , 이렇게 만든다」
			PRINTFORML 「네-와 우선은……」
			$GANBARU
			PRINTL
			PRINTFORMDW 코스즈는 레시피와 노려보면서 열심히 요리했다.
			PRINTL
			CALL M_KOJO_K70_DEKIMASITA(0)
		ELSEIF ABL:70:요리기능 >= 3
			PRINTFORML 「나 키라고 주세요！」
			PRINTFORML 「 나,%DISHNAME%만드는 것 자신있을지도 모릅니다♪」
			GOTO RAKURAKU
		ELSE
			PRINTFORML 「%DISHNAME%(은)는 기억했어요～！ 맡겨 주세요！」
			GOTO GANBARU
		ENDIF
	ELSEIF 料理知識 == 3
		IF FIRSTTIME(DISHNAME)
			PRINTFORML 「%DISHNAME%라는 무엇일까……？」
			PRINTFORML 「이 책에…………있었다！」
			PRINTFORML 「, 과연」
			PRINTFORML 「으로, 어떻게 만들까……」
			GOTO GANBARU
		ELSEIF ABL:70:요리기능 >= 3
			PRINTFORML 「%DISHNAME%정말 평상시 먹지 않기 때문에,%CALLNAME:MASTER%씨와 함께의 때 밖에 만들 기회 없지요～」
			GOTO RAKURAKU
		ELSE
			PRINTFORML 「%DISHNAME%(은)는 기억했어요～！ 맡겨 주세요！」
			GOTO GANBARU
		ENDIF
	ELSEIF 料理知識 == 4
		PRINTFORML 「개구리 요리입니까……」
		PRINTFORML 「아니요 먹을 수 있는 것은 알고 있어요 」
		PRINTFORML 「 그렇지만 역시……외형이 그……」
		PRINTL
		PRINTFORMDW 코스즈는 마지못해 요리했다.
		PRINTL
		PRINTFORML 「응, 매우 맛있을 것 같게는 보이지 않습니다……」
	ELSEIF 料理知識 == 5
		PRINTFORML 「%DISHNAME%입니까―, 네-와 만드는 방법은……어？」
		PRINTFORML 「저, 어와 이것은, 요리……？」
		PRINTL
		PRINTFORMDW 코스즈는 무심해 요리했다.
		PRINTL
		PRINTFORML 「네……입니까 이것…………」
	ENDIF
	WAIT
ENDIF
RETURN 1
;==================================================
;414,食事を取る
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:194(1=ノーパンしゃぶしゃぶ 2=禁断のメニュー 31=ドーピングコンソメスープ 30=モッツァレラチーズとトマトのサラダ 34=ギンギー料理
;TCVAR:MASTER:308(bit0=濃い味 bit1=薄味 bit3=激辛 bit4=激甘 bit5=わさび bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K70_414
IF DISHNAME != "ギンギー料理"
	CALL TRAIN_MESSAGE
ELSE
	DRAWLINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K70_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_414_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:70:수면
	CALL M_KOJO_COLOR_K70
	;一緒に作った
	IF DISHASSI == 70
		IF DISHNAME == "おせち料理"
			PRINTFORML 「에서는, 받습니다……」
			PRINTW
			PRINTFORMW 「이나 처세의 재능을 먹고 있다고(면) 설날이라는 느낌이 하네요～」
		ELSEIF DISHNAME == "年越し蕎麦"
			IF TALENT:70:연모
				PRINTFORMW 「또 내년도 이렇게 하며 보내고 싶다」
			ELSEIF TALENT:70:사모
				PRINTFORMW 「금년도 일년 신세를 졌습니다～」
			ELSE
				PRINTFORMW 「금년도 여러 가지 일이 있었어요」
			ENDIF
			PRINTFORMW 「에서는, 받습니다……」
		ELSEIF DISHNAME == "恵方巻"
			PRINTFORMW 「네-와 금년의 길방은……%M_KOJO_K70_EHOU()%(이)군요」
			PRINTFORMW 「에서는, 받습니다」
			PRINTFORMW 「……」
			PRINTFORMW 「…………」
			PRINTFORMW 「………………………………」
			PRINTFORML 「………………………………………………………………
			PRINTFORMW 　………………………………………………………………」
		ELSEIF DISHNAME == "ドーピングコンソメスープ"
			ALIGNMENT CENTER
			PRINTFORMW 「도핑 콩소메 스프다……」
			PRINTFORMW 「, 내가 도망치는 것을 제지당할까……？」
			ALIGNMENT LEFT
			PRINTL
			PRINTFORMW 「하, 나는 도대체 무엇을……！？」
		ELSEIF DISHNAME == "モッツァレラチーズとトマトのサラダ"
			PRINTFORMW 「%CALLNAME:MASTER%씨, 갑자기 뛰어넘어 어떻게 했습니다？」
			PRINTFORML 「 그렇지만 분명히 이것 맛있네요～」
			PRINTFORMW 「거기에 어쩐지 어깨결림자포자기해 온 것 같습니다！」
		ELSEIF DISHNAME == "義大莉而鳥苗鳥肉"
			PRINTFORML 「～……기분 나쁘다……」
			PRINTFORML 「정말로 먹습니까……？」
			PRINTW
			PRINTFORMW 「……, 째, 눈을 감고는 먹으면……」
		ELSEIF DISHNAME == "ギンギー料理"
			PRINTFORMDW 이것 무슨 요리？
			PRINTFORMW 「긴기 요리예요」
			PRINTFORMDW 재료는？
			PRINTFORMW 「긴기예요」
		;デザート
		ELSEIF DISHTYPE == 3
			PRINTFORML 「에서는, 받읍시다♪」
			SIF TALENT:70:연모
				PRINTFORML 「%CALLNAME:MASTER%씨, 아～응%UNICODE(0x2764)%」
			PRINTW
			IF STRFIND(DISHTASTE, "もちもち") >= 0
				PRINTFORMW 「응～～♪ 떡도 통치하고 있어 두고 히～♪」
			ELSEIF STRFIND(DISHTASTE, "ぷるぷる") >= 0
				PRINTFORMW 「후후♪ 하고 있어 귀엽네요♪」
			ELSEIF DISHNAME == "ケーキ"
				IF TALENT:70:연모 && ABL:70:욕망 >= 3
					PRINTFORMW 「아,%CALLNAME:MASTER%씨의 볼에 크림이 붙어 있어요！」
					PRINTFORMDL 　페록
					PRINTFORMW 「후후, 여승～있고♪」
				ELSEIF TALENT:70:사모 || TALENT:70:연모
					PRINTFORMW 「아,%CALLNAME:MASTER%씨의 손가락에 크림이 붙어 있어요！」
					PRINTFORMDL 　페록
					PRINTFORMW 「아！ 개, 이것은 양손이 차고 있었으므로, 무심코……\/\/\/」
				ENDIF
			ELSE
				PRINTFORMW 「응～～♪ 여승～있고♪」
			ENDIF
		;禁断
		ELSEIF DISHTYPE == 4
			PRINTFORML 「있고……, 받아…………」
			PRINTW
			IF TCVAR:70:요리총평가치 >= 70
				PRINTFORMW 「응……！？ , 맛있다……？」
			ELSE
				PRINTFORMW 「일까 이 맛……？？」
			ENDIF
		ELSE
			PRINTFORML 「에서는, 받습니다」
			PRINTW
			IF STRFIND(DISHTASTE, "なめらか") >= 0 && TCVAR:70:요리총평가치 >= 70 && !RAND:2
				PRINTFORMW 「응～～！ 매끈매끈한 맛이 좋네요～！」
			ELSEIF STRFIND(DISHTASTE, "さっぱり") >= 0 && TCVAR:70:요리총평가치 >= 70 && !RAND:2
				PRINTFORMW 「응～～！ 산뜻하고 있어 맛있습니다～！」
			ELSEIF STRFIND(DISHTASTE, "スパイス") >= 0 && STRFIND(DISHTASTE, "ネギ") < 0
				PRINTFORMW 「응, 원, 나에게는 조금 괴로울지도……」
			ELSEIF TCVAR:70:요리총평가치 >= 85
				PRINTFORMW 「응～～！ 이것 사립 대학을 좋아할지도～！」
			ELSEIF TCVAR:70:요리총평가치 >= 75
				PRINTFORMW 「응～～！ 이것 몹시 맛있습니다～！」
			ELSEIF TCVAR:70:요리총평가치 >= 65 || !GETBIT(FLAG:요리옵션, 3)
				PRINTFORMW 「응～！ 맛있네요～！」
			ELSEIF TCVAR:70:요리총평가치 >= 55
				PRINTFORMW 「응, 아무튼 아무튼입니까～」
			ELSE
				PRINTFORMW 「응～……, 좀 더 맛있게 할 수 있었을지도 모르겠네요……」
			ENDIF
		ENDIF
	;一緒に作ってない
	ELSE
		IF DISHNAME == "おせち料理"
			PRINTFORML 「원！ 처세의 재능 요리 좋네요～！」
			PRINTFORML 「 나에게도 받을 수 있습니까？ 감사합니다～！」
			PRINTFORML 「에서는, 받네요」
			PRINTW
			PRINTFORMW 「이나 처세의 재능을 먹고 있다고(면) 설날이라는 느낌이 하네요～」
		ELSEIF DISHNAME == "年越し蕎麦"
			PRINTFORML 「！ 섣달그믐 곁입니까～！」
			PRINTFORML 「 나에게도 받을 수 있습니까？ 감사합니다～！」
			PRINTFORML 「에서는, 받네요」
			PRINTW
			IF TALENT:70:연모 && TALENT:70:사모
				PRINTFORMW 「금년도 일년 신세를 졌습니다～」
			ELSE
				PRINTFORMW 「금년도 여러 가지 일이 있었어요」
			ENDIF
		ELSEIF DISHNAME == "恵方巻"
			PRINTFORML 「그렇게 말하면 오늘은 절분이었지요」
			PRINTFORMW 「네-와 금년의 길방은……%M_KOJO_K70_EHOU()%(이)군요」
			PRINTFORML 「에서는, 받습니다」
			PRINTW
			PRINTFORMW 「……」
			PRINTFORMW 「…………」
			PRINTFORMW 「………………………………」
		ELSEIF DISHNAME == "ドーピングコンソメスープ"
			PRINTFORMW 「어머나, 식사하실 수 있습니까？ 감사합니다～」
			IF FIRSTTIME("ドーピングコンソメスープ", 1)
				PRINTFORMW 「%CALLNAME:MASTER%씨는 먹지 않습니까？」
				PRINTFORMW 「네？ 주사기？ 어,%CALLNAME:MASTER%씨, 뭐 하고 있는입니까……？」
			ELSE
				PRINTFORMW 「하, 이것은 도핑 콩소메 스프……！」
				PRINTFORMW 「설마 범인은……」
			ENDIF
		ELSEIF DISHNAME == "モッツァレラチーズとトマトのサラダ"
			PRINTFORML 「어머나, 식사하실 수 있습니까？ 감사합니다～」
			PRINTFORML 「에서는, 받네요」
			PRINTW
			PRINTFORML 「이것 몹시 맛있네요～！」
			PRINTFORMW 「어쩐지 어깨결림자포자기해 온 것 같습니다！」
		ELSEIF DISHNAME == "義大莉而鳥苗鳥肉"
			PRINTFORML 「어머나, 식사하실 수 있습니까？ 고마워요 돗자리……」
			PRINTFORML 「～,  무엇입니까 이것……어쩐지 벌레같은 것이……」
			PRINTFORMW 「정말로 먹습니까……？」
		ELSEIF DISHNAME == "ギンギー料理"
			PRINTFORMW 「이것 무슨 요리입니까？」
			PRINTFORMDW 긴기 요리
			PRINTFORMW 「재료는 무엇입니까？」
			PRINTFORMDW 긴기
			PRINTFORMW 「…………」
		;軽食
		ELSEIF DISHTYPE == 1
			PRINTFORML 「어머나, 나에게도 받을 수 있습니까？」
			PRINTFORMW 「감사합니다～」
		;デザート
		ELSEIF DISHTYPE == 3
			PRINTFORML 「원！ 받을 수 있습니까！？」
			PRINTFORML 「감사합니다～♪」
			PRINTW
			IF STRFIND(DISHTASTE, "もちもち") >= 0
				PRINTFORMW 「응～～♪ 떡도 통치하고 있어 두고 히～♪」
			ELSEIF STRFIND(DISHTASTE, "ぷるぷる") >= 0
				PRINTFORMW 「후후♪ 하고 있어 귀엽네요♪」
			ELSE
				PRINTFORMW 「응～～♪ 여승～있고♪」
			ENDIF
		;禁断
		ELSEIF DISHTYPE == 4
			PRINTFORML 「어머나, 식사하실 수 있습니까？ 고마워요 돗자리……」
			PRINTFORMW 「어와 이것은……요리……？ 먹을 수 있습니까……？」
			PRINTFORML 「있고……, 받아…………」
			PRINTW
			IF TCVAR:70:요리총평가치 >= 70
				PRINTFORMW 「응……！？ , 맛있다……？」
			ELSE
				PRINTFORMW 「일까 이 맛……？？」
			ENDIF
		ELSE
			PRINTFORML 「어머나, 식사하실 수 있습니까？ 감사합니다～」
			PRINTFORML 「에서는, 받네요」
			PRINTW
			IF STRFIND(DISHTASTE, "なめらか") >= 0 && TCVAR:70:요리총평가치 >= 70 && !RAND:2
				PRINTFORMW 「응～～！ 매끈매끈한 맛이 좋네요～！」
			ELSEIF STRFIND(DISHTASTE, "さっぱり") >= 0 && TCVAR:70:요리총평가치 >= 70 && !RAND:2
				PRINTFORMW 「응～～！ 산뜻하고 있어 맛있습니다～！」
			ELSEIF STRFIND(DISHTASTE, "スパイス") >= 0 && STRFIND(DISHTASTE, "ネギ") < 0
				PRINTFORMW 「응, 원, 나에게는 조금 괴로울지도……」
			ELSEIF TCVAR:70:요리총평가치 >= 85
				PRINTFORMW 「응～～！ 이것 사립 대학을 좋아할지도～！」
			ELSEIF TCVAR:70:요리총평가치 >= 75
				PRINTFORMW 「응～～！ 이것 몹시 맛있습니다～！」
			ELSEIF TCVAR:70:요리총평가치 >= 65 || !GETBIT(FLAG:요리옵션, 3)
				PRINTFORMW 「응～！ 맛있네요～！」
			ELSE
				PRINTFORMW 「응, 아무튼 아무튼입니까～」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;415,食事をふるまう
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=濃い味 bit1=薄味 bit3=激辛 bit4=激甘 bit5=わさび bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K70_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && !CFLAG:70:수면
	;414,食事を取るを呼ぶ
	CALL M_KOJO_MESSAGE_COM_K70_414_1
ENDIF
RETURN 1
;==================================================
;416,演奏する
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:사용악기(1=キーボード 2=ピアノ 3=ギター 4=トランペット 5=ヴァイオリン)
;==================================================
@M_KOJO_MESSAGE_COM_K70_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;417,昼寝をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔にキスされた 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処orペニス揉み
;CFLAG:동침중(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K70_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_417_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;421,願掛けする
;条件が複雑なので、COMF421 願掛け.ERBおよび、EVENT_MESSAGE_COM400.ERBの願掛けするの項を参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K70_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORMW 「무엇을 부탁했습니까―？」
ENDIF
RETURN 1

;==================================================
;422～430は、特殊コマンドなのでテンプレでは対応しません
;==================================================

;==================================================
;431,お風呂でくつろぐ
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;TFLAG:194(1=連続入浴不可(表示しない可能性あり？
;==================================================
@M_KOJO_MESSAGE_COM_K70_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF BATHCHECK(CFLAG:MASTER:현재위치)
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「～～살고 돌아가는～～♪」
		CASE 2
			PRINTFORMW 「응응～～어느 만～～♪」
		CASEELSE
			PRINTFORMW 「후~～～매우들 식사 어둡고～～♪」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;432,お風呂でくつろぐ
;表示タイミングは入浴後なので、お風呂上がりでの
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;==================================================
@M_KOJO_MESSAGE_COM_K70_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_432_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_432_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;440,待つ
;==================================================
@M_KOJO_MESSAGE_COM_K70_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_440_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_440_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTDATAL
		DATAFORM 「뭐 합니까―？」
		DATAFORM 「%CALLNAME:MASTER%씨―？」
		DATAFORM 「♪～」
		DATAFORM 「후와……」
	ENDDATA
	WAIT
ENDIF
RETURN 1
;==================================================
;441,授業を受ける(慧音専用
;==================================================
@M_KOJO_MESSAGE_COM_K70_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_441_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_441_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;442,伐採する（未実装
;==================================================
@M_KOJO_MESSAGE_COM_K70_442
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_442_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_442_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;442以降のコマンドは、実行しても口上はおそらく表示されないのでテンプレでもスルー
;==================================================

;※※※※※※※※※※※※※※※※※※※※※※※※※
;デート系コマンド
;デート系口上は文字通り外出先で発生
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,デート会話
;==================================================
@M_KOJO_MESSAGE_COM_K70_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_600_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_600_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;601,デートスキンシップ
;==================================================
@M_KOJO_MESSAGE_COM_K70_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_601_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_601_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;602,デートキス
;==================================================
@M_KOJO_MESSAGE_COM_K70_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_602_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_602_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,手を繋ぐ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗でもふりほどかれたりはしません
;==================================================
@M_KOJO_MESSAGE_COM_K70_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:연모
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「떼어 놓지 말아 주세요♪」
		CASE 2
			PRINTFORMDL
			PRINTFORMW 「……%UNICODE(0x2764)%」
		CASEELSE
			IF TALENT:70:연인
				PRINTFORMW 「개, 애인이지요……%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「개, 애인같네요……\/\/\/」
			ENDIF
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「개, 이러합니까…？」
		CASE 2
			PRINTFORMDL
			PRINTFORMW 「……\/\/\/」
		CASEELSE
			PRINTFORMW 「은, 네！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;604,散策する
;デート中の場合、CFLAG:현재위치に移動先の場所が既に入ってる
;==================================================
@M_KOJO_MESSAGE_COM_K70_604
;散策するにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K70_604_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_604_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;605,寄り道する
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_MESSAGE_COM_K70_605
;寄り道するにはTRAIN_MESSAGEが無い
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_605_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_605_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:연모
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「한가로이 갑시다♪」
		CASE 2
			PRINTFORMW 「아, 봐 주세요 어！」
		CASEELSE
			;（*-v-）
			PRINTFORMW 「평화롭네요～」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
		CASE 1
			PRINTFORML 「？」
			PRINTFORMW 「돌아가는 길입니까？」
		CASE 2
			PRINTFORMW 「어？ 어떻게 했습니다？」
		CASEELSE
			PRINTFORMW 「그쪽은 우회예요―？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;610,食事に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K70_610
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORMD %CALLNAME:MASTER%하%CALLNAME:TARGET%(와)과 함께
	SELECTCASE CFLAG:MASTER:현재위치
	CASE 商家町
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMD 식사곳에서
		CASE 2
			PRINTFORMD 소바가게에서
		CASEELSE
			PRINTFORMD 요리점에서
		ENDSELECT
	CASE 竹林入り口
		PRINTFORMDL 미스티아의 포장마차에서 8번째뱀장어를 먹었다
		GOTO JUMP
	CASE 中有の道
		PRINTFORMD 도 협의 포장마차에서
	CASE 旧地獄街道
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMD 지저 찻집에서
		CASE 2
			PRINTFORMD 요괴 끽다로
		CASEELSE
			PRINTFORMD 지옥 요리점에서
		ENDSELECT
	ENDSELECT
	SELECTCASE TIME
	CASE 240 TO 599
		PRINTFORMDL 아침 식사를 취했다
	CASE 600 TO 839
		PRINTFORMDL 점심식사를 배달시켰다
	CASE 840 TO 1019
		PRINTFORMDL 조금 늦은 점심식사를 배달시켰다
	CASE 1020 TO 1199
		PRINTFORMDL 저녁식사를 배달시켰다
	CASE 1200 TO 1440
		PRINTFORMDL 저녁밥을 배달시켰다
	CASEELSE
		PRINTFORMDL 야식을 취했다
	ENDSELECT
	$JUMP
	PRINTW
	PRINTFORML 「네―, 맛있는 음식을 대접해 주어도 좋습니까！」
	PRINTFORMW 「에서는 호의를 받아들여♪」
	PRINTL
	IF TFLAG:SELECTCOM분기 == 1
		PRINTFORMDW %CALLNAME:TARGET%(은)는 만족하여 기뻐함의 모습이다
	ELSEIF TFLAG:SELECTCOM분기 == -1
		PRINTFORMDW ……%CALLNAME:TARGET%(은)는 별로 먹지 않았던 것 같다…
	ENDIF
ENDIF
RETURN 1

;==================================================
;613,お金稼ぎする（オミットされました
;==================================================
@M_KOJO_MESSAGE_COM_K70_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_613_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_613_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;614,食材の買い出し
;TFLAG:193(1=購入＆デート経験アップ 0=購入 -1=非購入)
;==================================================
@M_KOJO_MESSAGE_COM_K70_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_614_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && FLAG:데이트상대 == 70
	CALL M_KOJO_COLOR_K70
	PRINTDATAL
		DATAFORM 「어머나, 무엇을 샀습니다？」
		DATAFORM 「짐 가질까요？」
	ENDDATA
	WAIT
ENDIF
RETURN 1
;==================================================
;615,お弁当を食べる
;実行可能場所　お地蔵通り,枝垂れ柳の下,霧の湖,玄武の沢,大蝦蟇の池,絶景の丘,山の湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:요리기능(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_MESSAGE_COM_K70_615
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_615_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	;小鈴は料理下手でも上手くてもどっちでも映えると思った
	IF TALENT:70:연모
		IF ABL:70:요리기능 >= 3
			PRINTFORML 「%CALLNAME:MASTER%씨를 위해 도시락을 만들어 왔습니다～！」
			PRINTFORML 「열심히 만들었으므로 먹어 주세요\/\/\/」
			;（＞人＜*）
		ELSE
			PRINTFORML 「아, 그！ 치졸하면서 도시락을 만들어 왔습니다！」
			PRINTFORML 「, 괜찮았으면 먹어 줄 수 있으면(자) 기쁩니다……\/\/\/」
		ENDIF
	ELSE
		PRINTFORML 「도시락 만들었기 때문에 좋으면 먹지 않습니까―？」
	ENDIF
	PRINTL
	PRINTFORMDL %CALLNAME:MASTER%하%CALLNAME:TARGET%하지만 만들어 와 준 도시락을 받기로 했다
	PRINTW
	IF TFLAG:SELECTCOM분기 == -1
		PRINTFORMDW ……분명하게 불필요한 맛이 혼입해 있다……
	ELSEIF TFLAG:SELECTCOM분기 == 1
		PRINTFORMDW 매우 맛있다！ \@ ABL:70:요리기능 >= 5 ? まるで料理人のようだ…… # \@
	ELSEIF ABL:70:요리기능 >= 5
		PRINTFORMDW 매우 맛있다！ 반드시 좋은 부인이 될 것이다……
	ELSEIF ABL:70:요리기능 == 4
		PRINTFORMDW 맛있다！ 애정이 전해져 온다……
	ELSEIF ABL:70:요리기능 == 3
		PRINTFORMDW 꽤 맛있었던 매일 먹어도 질리지 않을 것이다
	ELSEIF ABL:70:요리기능 == 2
		PRINTFORMDW 꽤 맛있었다
	ELSEIF ABL:70:요리기능 == 1
		PRINTFORMDW 노력하고는 있지만, 정직 미묘하다
	ELSE
		PRINTFORMDW ……이것은 조금……
	ENDIF
	PRINTL
	IF TFLAG:SELECTCOM분기 == -1
		IF ABL:70:요리기능 >= 3
			PRINTFORMW 「네에에…오늘은 조금 originarity를 더해 보았습니다～」
		ELSE
			PRINTFORMW 「조미료를 넣어 보았습니다만 어떻습니까～？」
		ENDIF
	ELSEIF TALENT:70:연모
		IF TFLAG:SELECTCOM분기 == 1
			PRINTFORMW 「%CALLNAME:MASTER%삼차네 좋다면, 나, 매일이래……」
		ELSE
			PRINTFORMW 「또 먹고 싶었으면 데이트 신청해 주세요%UNICODE(0x2764)%」
		ENDIF
	ELSE
		PRINTFORMW 「어와 맛은 어땠습니까……？」
	ENDIF
	PRINTL
	SIF TFLAG:SELECTCOM분기 == 1
		PRINTFORMDW %CALLNAME:MASTER%하%CALLNAME:TARGET%(와)과 담소하면서 즐거운 사람시를 보냈다
ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_MESSAGE_COM_K70_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORMW 「 나코코의 오다응 를 좋아합니다～♪」
ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_MESSAGE_COM_K70_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_618_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && FLAG:데이트상대 == 70
	CALL M_KOJO_COLOR_K70
	PRINTFORMW 「소재를 처음부터 만듭니다～」
ENDIF
RETURN 1
;==================================================
;620,鈴奈庵
;TFLAG:193(1=貸し出しOK 0=貸し出し不可
;ITEM:10X (X=1戦術指南書 X=2調理指南書 X=3字引 X=4御伽草子
;==================================================
@M_KOJO_MESSAGE_COM_K70_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_620_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	;◆◆◆◆保留◆◆◆◆
ENDIF
RETURN 1
;==================================================
;621,釣りをする
;TFLAG:193(0=釣れない 1～4=魚 11～15=うまい魚 610=木材 131=守矢の守札 21=ローター 609=氷の鱗 606=龍の爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K70_621
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_621_1
#DIM CHARA
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	SELECTCASE TFLAG:193
	CASE 0
		IF !RAND:2
			PRINTFORMW 「이렇게 기다리고 있는 것이 묘미 (참다운 즐거움)이예요―」
		ELSE
			PRINTFORMW 「응, 아무것도 잡히지 않네요―……」
		ENDIF
		RETURN 1
	CASE 610
		IF TFLAG:194 > 1000
			PRINTFORMW 「아！」
			PRINTL
			PRINTFORMDL %CALLNAME:TARGET%하지만 목편을 낚시했다…
			PRINTW
			PRINTFORMW 「뭐야, 유감……」
		ELSE
			PRINTFORMDL 목편이 잡혔다……
			PRINTW
			PRINTFORMW 「킥킥… 유감이었지요」
		ENDIF
		RETURN 1
	CASE 131
		IF TFLAG:194 > 1000
			PRINTFORML 「아！」
		ELSE
			PRINTFORMDL 종잇조각이 잡혔다
		ENDIF
		PRINTDW
		PRINTDL ┌─────────────┐
		PRINTDL ｜　　　　　　　　　　　　　｜
		PRINTDL ｜　　모리야인 수찰　　　　　　｜
		PRINTDL ｜　　　　　　　　　　　　　｜
		PRINTDL ｜　　5매 가지런히 하면(자)　　　　　｜
		PRINTDL ｜　　　복권을 1회 파합니다　｜
		PRINTDL ｜　　　　　　　　　　　　　｜
		PRINTDL ｜　이익은 보증하기 어렵습니다　｜
		PRINTDL ｜　　　　　　　　　　　　　｜
		PRINTDL ｜　　　　　　　　모리야 신사　｜
		PRINTDL └─────────────┘
		PRINTW
		PRINTFORMW 「네-와…이것은……」
		RETURN 1
	CASE 1
		LOCALS = ウグイ
	CASE 2
		LOCALS = アマゴ
	CASE 3
		LOCALS = ヤマメ
	CASE 4
		LOCALS = イワナ
	CASE 11
		LOCALS = サケ
	CASE 12
		LOCALS = ワカサギ
	CASE 13
		LOCALS = ニジマス
	CASE 14
		LOCALS = ヤツメウナギ
	CASE 15
		LOCALS = カムルチー
	CASE 21
		LOCALS = ローター
	CASEELSE
		LOCALS = %ITEMNAME:(TFLAG:193)%
	ENDSELECT

	IF TFLAG:194 > 1000
		PRINTFORMW 「아！」
		PRINTL
		PRINTFORMDL %CALLNAME:TARGET%하지만%LOCALS%(을)를 낚시했다！
		PRINTW
		SELECTCASE TFLAG:193
		CASE 15
			PRINTFORMW 「, 무겁다～！ %CALLNAME:MASTER%씨 도와 주세요～！」
		CASE 21
			PRINTFORML 「어, 개, 이것은……\/\/\/」
			PRINTFORMW 「달라요！ 개, 잡혀 버렸습니다！」
		;カエル
		CASE 700
			PRINTFORMW 「～！ 기분 나쁘다……」
		;お宝
		CASE 609, 606
			PRINTFORMW 「원～！ 기려～！  무엇이지요 이것？」
		CASEELSE
			PRINTFORMW 「했다！ 어떻습니까 이것―！？」
		ENDSELECT
	ELSE
		PRINTFORMDL %LOCALS%하지만 잡혔다！
		PRINTW
		SELECTCASE TFLAG:193
		CASE 21
			PRINTFORMW 「어, 개, 이것은……\/\/\/」
		;カエル
		CASE 700
			PRINTFORMW 「～！ 기분 나쁘다……」
		;お宝
		CASE 609, 606
			PRINTFORMW 「원～！ 기려～！  무엇이지요 이것？」
		CASEELSE
			PRINTFORMW 「～！ 했어요～！」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;660,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=薄い高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K70_660
;CALL TRAIN_MESSAGE
DRAWLINE
CALL M_KOJO_MESSAGE_COM_K70_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;地の文をカットしているため[無知]解除イベントが起きません,ご了承ください
;なお、地の文の前半部分（あなたは本棚にあった～）は省略不可
IF LOCAL
	CALL M_KOJO_COLOR_K70
	SELECTCASE TFLAG:SELECTCOM분기
	CASE 1
		;忍殺
		PRINTFORMDL "아이에에에！"
		PRINTFORMDL "남아미다브트！"
		PRINTFORMDL "그워！"
		PRINTW
		PRINTFORML 「아, 그것은 밖의 세계의 닌자 소설이에요」
		PRINTFORMW 「무슨 문장이 헨테코입니다만, 그것이 점점 버릇이 되어 와 재미있어요～」
	CASE 2
		;文芸書失敗
		PRINTFORMDL 무슨 말을 하고 있는지 와카라나이……
		PRINTW
		PRINTFORML 「어머나？ 상당히 어려운 책을 읽으네요」
		PRINTFORMW 「그것은 전십이권도 있으므로, 독파하는 것은 큰 일이어요―」
	CASE 3
		;文芸書成功
		PRINTFORMDL 기대하고 있지 않았지만 상상 이상으로 재미있었다
		PRINTW
		PRINTFORML 「이런, 꽤 좋은 책을 선택했어요―」
		PRINTFORMW 「낡은 말로 쓰여져 , 이상하게 내용이 알아 재미있지요～」
	CASE 4
		;実用書失敗
		PRINTFORMDL 모두 시시한 지식(뿐)만이었다
		PRINTW
		PRINTFORML 「이런, 책으로 공부입니까」
		PRINTFORMW 「권두 유익이라고 말합니다만, 근대의 책에 한해서는 그렇다고도 말할 수 없다고 생각합니다」
	CASE 5
		;実用書成功
		PRINTFORMDL 도움이 되는 지식을 얻을 수가 있었다
		PRINTW
		PRINTFORML 「이런, 책으로 공부와는 기특하네요～」
		PRINTFORMW 「권두 유익이라고 말하기 때문에, 반드시 무엇인가 얻을 수 있을 것이에요♪」
	CASE 6
		;薄くて高い本（えっち）
		PRINTFORMDL ！！！
		PRINTFORMDL ……%CALLNAME:MASTER%(은)는 선인들의 예지에 깊은 경의를 안았다
		PRINTW
		PRINTFORML 「%CALLNAME:MASTER%씨 무엇을 읽어……」
		PRINTFORMW 「하！ , 그 책은……\/\/\/」
	CASE 7
		;保健体育の本（えっち）
		PRINTFORMDL 과연, 여성의 신체는 이러한은 있는 것인가……
		PRINTW
		PRINTFORML 「%CALLNAME:MASTER%씨 무엇을 읽어……」
		PRINTFORMW 「뭐를 말해 해 해 교과서 읽습니까……」
	CASE 8
		;カーマ・スートラ（えっち）
		PRINTFORMDL 문면을 눈으로 위를 덧쓰면(자) 동안 되는 욕망이 솟구쳐 왔다……
		PRINTW
		PRINTFORML 「아, 그것은 카마·스트라라고 해, 세계에서 제일 낡은 경전이랍니다」
		PRINTFORMW 「내용은 그……본 대로입니다……\/\/\/」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;698,部屋に入る
;TARGETの部屋に入る場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K70_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_698_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_698_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORML 「아무쪼록, 올라 주세요」
	SIF FIRSTTIME("お招き") || !RAND:3
		PRINTFORML 「저, 쌓아 두는 책에는 접하지 말아 주세요……붕괴있을테니까……」
	PRINTW
	PRINTFORMD %CALLNAME:TARGET%의 방
	SELECTCASE RAND:3
	CASE 1
		PRINTFORMDW (은)는 침착한 다락방과 같았다
	CASE 2
		PRINTFORMDW 에는 그 정도로 책이 쌓이고 있었다
	CASEELSE
		PRINTFORMDW (은)는 은은하게 여자 아이가 향기가 났다
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;699,外に出る
;==================================================
@M_KOJO_MESSAGE_COM_K70_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K70_699_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K70_699_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,耳かき
;前ターン膝枕後スキンシップコマンド
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_MESSAGE_SCOM_K70_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K70_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K70_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF TALENT:70:연모
		PRINTFORML 「아팠으면 말해 주세요―」
	ELSE
		PRINTFORML 「와, 긴장하네요……」
	ENDIF
	IF TFLAG:193 == 1
		PRINTFORMW 「♪～～」
	ELSEIF TFLAG:193 == -1
		PRINTFORMW 「아！ 미안해요……！」
	ELSE
		PRINTFORMW 「기분은 어떻습니까～？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;61,抱きまくら
;(TARGET睡眠時間or衰弱)添い寝中、前ターン抱きつく後就寝コマンド
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K70_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K70_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K70_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	PRINTFORMDW
	PRINTFORML 「감사합니다……\/\/\/」
	PRINTFORMW 「안녕히 주무십시오……」
	;満足フラグ
	IF TCVAR:70:355
		;苦肉の策
		IF TIME < 480
			CFLAG:70:1001 = DAY - 1
		ELSE
			CFLAG:70:1001 = DAY
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;62,デコちゅー
;前ターン頭撫で後キスする
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:욕망(5以上=物足りない
;ABL:친밀(5以上=照れる
;==================================================
@M_KOJO_MESSAGE_SCOM_K70_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K70_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K70_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	ELSEIF CFLAG:70:수면
		PRINTFORMW 「구―……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		IF TALENT:70:연모
			PRINTFORMW 「아…！」
		ELSE
			PRINTFORMW 「…！」
		ENDIF
	;キスまだ
	ELSEIF FIRSTTIME("ファーストキス", 1)
		IF TALENT:70:연모
			PRINTFORMW 「꺄\/\/\/ , 이마입니까～」
		ELSE
			PRINTFORMW 「꺄\/\/\/ , 놀랐습니다……」
		ENDIF
	ELSE
		IF TALENT:70:연모
			PRINTFORMW 「꺄\/\/\/ 네에에…%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「꺄\/\/\/」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;63,もっとキスする
;前ターンキスする後キスする
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_MESSAGE_SCOM_K70_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K70_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K70_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	IF FLAG:시간정지
	;口上によるCOM成否判定のおかげで強制キャンセルをかけることができました,多謝
;	ELSEIF (TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3) && FIRSTTIME("ファーストキス")
;		;本当はしてほしくないけど、地の文は変えられても経験は誤魔化せないからなぁ
;		;もしかしたらマイナス経験で打ち消せるかもしれないがやめておこう
;		;↑by過去の自分,とりあえず怒りは付けておこう
;		PRINTFORMDL %CALLNAME:PLAYER%は%CALLNAME:TARGET%の口を、自分の口で塞いだ…
;		PRINTW
;		IF TALENT:70:연모
;			PRINTFORMW 「ふぇぇっ！？ そ、そんな突然……！」
;			BASE:70:분노 += MAXBASE:70:분노 / 8
;		ELSE
;			PRINTFORMW 「んんっっ！？ な、なにするんですか！！」
;			BASE:70:분노 += MAXBASE:70:분노 / 4
;		ENDIF
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMDL %CALLNAME:PLAYER%하%CALLNAME:TARGET%의 입을, 자신의 구에서 차지했다…
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「………！」
		ELSE
			PRINTFORMW 「응…………」
		ENDIF
		PRINTFORMDW %CALLNAME:TARGET%의 표정은 체면이 서지 않는다……
	ELSE
		SELECTCASE RAND:6
		CASE 1
			PRINTFORMW 「응―……%UNICODE(0x2764)%」
		CASE 2
			PRINTFORML 「%UNICODE(0x2764)%」
			PRINTFORMW 「……%UNICODE(0x2764)%」
		CASE 3
			PRINTFORMW 「………%UNICODE(0x2764)% …%UNICODE(0x2764)%」
		CASE 4
			IF EXP:70:키스경험 >= 20 && TALENT:70:연모
				PRINTFORML 「…………%UNICODE(0x2764)%」
				PRINTFORMW 「머리-로서 오는……」
			ELSE
				PRINTFORMW 「……응……！」
			ENDIF
		CASE 5
			IF EXP:70:키스경험 >= 20 && TALENT:70:연모
				PRINTFORML 「……%UNICODE(0x2764)%」
				PRINTFORMW 「… ……%UNICODE(0x2764)% …%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「응응……！」
			ENDIF
		CASEELSE
			IF EXP:70:키스경험 >= 20 && TALENT:70:연모
				PRINTFORML 「응―………%UNICODE(0x2764)%」
				PRINTFORMW 「……라고 녹을 것 같습니다……%UNICODE(0x2764)%」
				SIF EXP:70:키스경험 * 2 < RAND:100
					RETURN 1
				PRINTFORML 「%CALLNAME:MASTER%씨…좀 더……」
				PRINTFORMW 「%UNICODE(0x2764)% ………」
				PRINTFORML 「……」
				PRINTFORMW 「네에%UNICODE(0x2764)% %CALLNAME:MASTER%씨의 키스, 기분이 좋습니다…%UNICODE(0x2764)%」
			ELSE
				PRINTFORMW 「응―……응……！」
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,手を引く
;デート出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_SCOM_K70_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K70_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K70_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_COLOR_K70
	SELECTCASE RAND:3
	CASE 1
		PRINTFORMW 「, 어떻게 했습니다―？」
	CASE 2
		PRINTFORMW 「꺄！ 뭐, 기다려 주세요！」
	CASEELSE
		PRINTFORMW 「원원, 기다려 주세요！」
	ENDSELECT
ENDIF
RETURN 1

repo_name: purugi/eraTWKR

path: ERB/대사_메시지관련/개인대사/070 코스즈/M_KOJO_K70_02_日常系コマンド.ERB

license: mit