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 デート会話, 150
;日が変わってたらデート会話リセット
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:TARGET%에게 말을 걸어보았지만,%타겟은% 혀가 돌아가지 않는듯 무슨 말을 하는지도 알아들을 수가 없다
	;회화불능の地の文は연모でない場合は省略できず,연모の時は表示されないので,ここではどちらの場合も同じように表示されるようにする
	ELSEIF TCVAR:70:회화불능
		IF TALENT:70:연모
			PRINTFORML %CALLNAME:TARGET%에게 말을 걸어보려 했지만 말이 나오지 않는다
			PRINTFORMW 주변에는 어색한 분위기가 흐르고 있다…
		ENDIF
	ELSEIF GUESTS != ""
		CLEARLINE 2
		PRINTFORML 셋이서 회화
		DRAWLINE
		;文章上だけで앗てソース等は変わりません
		PRINTFORML %조교자는% %타겟과% %조사처리(GUESTS, "와")% 섞여 셋이서 대화를 했다
	ELSE
		;デート会話
		IF TALENT:70:연모 && FLAG:데이트상대 == 70 && DATENAME_SPOT() != "도중" && !デート会話:(CFLAG:70:현재위치 / 10)
			CLEARLINE 2
			PRINTFORML %DATENAME_SPOT()%외출데이트
			DRAWLINE
		ENDIF
		PRINTFORM %조교자는% %타겟과%
		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 「후후, 얼굴 빨개지셨다구요」
			ELSE
				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)%」
						PRINTFORMW 「이쪽을 빤히 쳐다보고 있다」
					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)%」
						PRINTFORMW 「이쪽을 빤히 쳐다보고 있다」
					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 %마스터는% 가볍게 자기소개를 했다
			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 「독서 삼도라고 해서,그것은 즉――」
				PRINTFORMW 「역 : 마음·눈·입을 충분히 이용하여 독서하는 것을 말한다」
			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 「그런 이유로 한 권 어떠신가요？」
	;秋
	ELSEIF DAY:2 == 3
		PRINTFORML 「가을도 완연해졌네요～」
		PRINTFORMW 「그래요, 역시 가을하면 독서의 계절이지요！」
		;ゲーム内でそんなものはない,あなたが借りれる本は割引対象外なのだ
		SIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1
			PRINTFORMW 「지금은 할인 세일을 하고 있으니,%CALLNAME:MASTER%씨도 한권 어떠신가요？」
	;冬
	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 「다만 그런 거라면 요마서 한 두 권 정도는 가지고 있지 않을까나ー,랄ー까,아하하」
		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:TARGET% \@ GET_TARGETNUM() > 1 ? 들 # \@에게 건넸다…
	ELSEIF GUESTS != ""
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 다도회
		DRAWLINE
		;当然その場にいる全員とするわけですが,あえて省略しています
		;文章上では相手主導ですけどソースは変わりませんし特別なお茶も自分のものを使います
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) && ABL:70:친밀 >= 5
			PRINTFORML %조교자가% 차를 준비할까 하고 자리에서 일어나자
			PRINTFORML 그것을 알아차린 코스즈가 이미 차를 준비해주고 있었고
			PRINTFORML %타겟과% %GUESTS%의 셋이서 조금의 다과회를 즐겼다…
		ELSE
			PRINTFORML %조교자는% 차를 준비해 %타겟과% %GUESTS%의 셋이서 잠시간의 다도회를 가졌다…
		ENDIF
	ELSE
		IF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) && ABL:70:친밀 >= 5
			PRINTFORML %조교자가% 차를 준비할까 하고 자리에서 일어나자
			PRINTFORML 그것을 알아차린 코스즈가 이미 차를 준비해주고 있었다…
		ELSE
			PRINTFORML %조교자는% 차를 준비해 %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%씨는 마미조 씨가 너구리 요괴라는 걸 알고 계신 걸까？）
				PRINTFORMW （역 : 여우와 너구리는 둔갑술이 뛰어나다고 하다, 너구리 열차 사고 괴담도 그 예시）
			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 %조교자는% %타겟과%의 스킨십을 시도했다
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「앗…！ 무,뭔가요……」
		ELSE
			PRINTFORMW 「멈춰주세요！」
			BASE:70:분노 += MAXBASE:70:분노 / 8
		ENDIF
	;背中を流す
	ELSEIF BATHCHECK(CFLAG:MASTER:현재위치) && IN_HOME(CFLAG:MASTER:현재위치)
		PRINTFORMDL %조교자는% %CALLNAME:TARGET%의 등을 씻겨주었다
		PRINTW
		PRINTFORML 「씻겨 주실 건가요？ 그러면 호의를 받아들여서♪」
		PRINTFORMW 「아핫%UNICODE(0x2764)% 간지러워요♪」
	ELSE
		PRINTFORMDL %조교자는% %타겟과%의 스킨십을 시도했다
		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:TARGET%에게 무례를 사과하면서 과자상자를 건넸다
	ELSE
		PRINTFORMDL %조교자는% %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 %타겟은% 반발각인 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 %타겟은% 불안한 것 같은 표정을 짓고 있다
			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:TARGET%의 뺨에 손을 뻗었다…
		PRINTFORMDW 시간이 멈춰진 %타겟은% 저항하지 않고 뺨을 꼬집히고 있다…
	ELSEIF CFLAG:70:수면
		PRINTFORMDL %조교자는% 잠들어 있는 %CALLNAME:TARGET%의 뺨을 손가락으로 잡았다…
		PRINTFORMW
		PRINTFORMW 「우으…,제 탓이 아니라구요～……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3 || ABL:70:순종 <= 4 || ABL:70:친밀 <= 5
		PRINTFORMDW %조교자는% %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: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:TARGET%의 뺨을 손가락으로 쿡쿡 찌르고 있다
		PRINTW
		PRINTFORMW 「으…………응……」
		PRINTL
		PRINTFORMDW %타겟은% 찔릴 때마다 볼을 긁적거리고 있다
	ELSE
		PRINTFORMDL %조교자는% 곁에 누운채로 %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:TARGET%의 머리에 손을 뻗었다
		PRINTFORMDW 시간이 멈춰진 %타겟은% 무저항한 채로 머리를 쓰다듬어지고 있다…
	ELSEIF CFLAG:70:수면
		PRINTFORMDL %조교자는% 잠들어 있는 %CALLNAME:TARGET%의 머리를 부드럽게 쓰다듬었다
		PRINTW
		PRINTFORMW 「후우……」
	ELSEIF TALENT:70:기분 == -1 || CFLAG:70:빡침 || MARK:70:반발각인 >= 3
		PRINTFORMDL %조교자는% 얹짢은듯 보이는 %타겟을% 달래기 위해 머리를 쓰다듬었다
		PRINTW
		IF TALENT:70:연모
			PRINTFORMW 「므으～……」
			PRINTL
			PRINTFORMDW %타겟은% 초조해하면서도 어딘가 만족하고 있는듯 하다
		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: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:TARGET%의 머리를 부드럽게 쓰다듬었다
		PRINTFORMDL 머리 장식인 방울은 그에 호응하듯 작고 귀여운 소리를 울리고 있다…
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORML 「하와아……\/\/\/」
		PRINTFORMW （기분 좋아아…… %CALLNAME:MASTER%씨…행복합니다～……%UNICODE(0x2764)% 좀 더 쓰다듬어주세요……）
	ELSE
		PRINTFORMDL %조교자는% \@ 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: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 %조교자는% %타겟을% 껴안으려고 했지만 거부당하고 말았다
		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: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 %조교자가% 키스를 하려고 하자 %타겟은% 물러났다…
		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: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: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: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% %마스터와% 단둘이 남아서, 은은하고 따뜻한 분위기 속에서 상냥하게 첫 키스를 경험했다
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 1 && GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%,아무도 없어서 조용한 스즈나안에서 %LOCALS% %마스터와% 단둘이 남아서, 화기애애한 분위기 속에서 갑작스럽게 첫 키스를 빼앗겼다
		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% %마스터와% 둘만의 세계에 있던 와중에, 상냥하게 첫 키스를 경험했다
		ELSEIF M_KOJO_K70_SUZUNAAN(CFLAG:70:현재위치) == 2 && GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%,자신의 방에서%LOCALS% %마스터와% 단둘이 화기애애한 분위기 속에서, 갑작스럽게 첫 키스를 빼앗겼다
		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% %마스터와% 단둘이서 있던 중,은은하고 따뜻한 분위기 속에서 상냥하게 첫키스를 받았다
		ELSEIF FLAG:데이트상대 == 70 && GET_TARGETNUM() == 1
			CSTR:70:첫키스상실이력 = %PRINT_DATE_F(DAY)%,%DATENAME_PLACE()%와의 데이트 중에,%DATENAME_PLACE()%에서 %LOCALS% %마스터와% 단둘이서 있던 중, 화기애애한 분위기 속에서 상냥하게 첫 키스를 빼앗겼다
		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% %마스터와% 단둘이서 있던 중,갑작스럽게 첫 키스를 빼앗겼다
		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 %조교자는% %타겟을% 끌어안으며 뜨거운 키스를 주고 받았다…
		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:TARGET%의 얼굴을 가까이 대고는 살며시 입을 맞추었다…
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORMW 「응……%UNICODE(0x2764)% 츄읏%UNICODE(0x2764)% 에헤♪」
	;＞膝枕する
	ELSEIF PREVCOM == 336 && TALENT:70:연모
		RESETCOLOR
		CLEARLINE 2
		PRINTFORMDL 무릎베개 키스
		DRAWLINE
		PRINTFORMDL %조교자는% 무릎 위의 %CALLNAME:TARGET%의 얼굴을 붙잡고는 부드럽게 입을 맞추었다……
		PRINTW
		CALL M_KOJO_COLOR_K70
		PRINTFORML 「꺄앗……츄읏%UNICODE(0x2764)%」
		PRINTFORMW 「에헤헤……%UNICODE(0x2764)%」
	ELSE
		PRINTFORMDL %조교자는% %CALLNAME:TARGET%의 입을, 자신의 입으로 막았다…
		キス分岐 = RAND:6
		IF キス分岐 >= 4 && EXP:70:키스경험 >= 20 && TALENT:70:연모
			PRINTFORMDL %타겟은%%CALLNAME:PLAYER%의 입술을 비집고는 혀를 얽어들어왔다…
		ELSE
			PRINTFORMDL %타겟은% 아직 그런 것에 익숙하지 않아서인지 긴장하고 있는 것 같다…
		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: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 %타겟은% 점차 계속해서 불합리한 것에 얽혀들었음을 느끼고 있다…
		;成功（酔）
		CASE 5
			PRINTFORML 「소장하고 있으니까～～～치사하다고 생각해요～～！」
			PRINTFORMW 「왜냐하면～～너무한거 아닌가요～！ 그리고 있죠～～！！」
			PRINTL
			PRINTFORMDL 이야기가 끝없이 반복되기 시작했다……
			PRINTFORMDW 이 이상으로는 진지하게 들어주어도 의미가 없을 것 같다
		;大成功（酔）
		CASE 6
			PRINTFORML 「라고 해도～～～！！！ 있죠,제가,아하하하,아하하하！」
			PRINTFORMW 「%CALLNAME:MASTER%씨이,오케이에요오～～♪」
			PRINTL
			PRINTFORMDL %CALLNAME:MASTER%가 적당히 맞장구를 치고 있자니,뭔가 스위치라도 들어간 건지 %타겟은% 갑자기 웃음을 터뜨렸다
			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 %조교자가% 정좌해 무릎을 탁탁 두드리자, %타겟은% 기쁜 듯 응석을 부려왔다
	ELSE
		PRINTFORMDL %조교자는% %CALLNAME:TARGET%에게 무릎베개를 해주었다
	ENDIF
	IF TFLAG:SELECTCOM분기 > 0
		WAIT
		PRINTFORMDL 기분이 좋았던 건지, %타겟은% 그대로 얕은 잠에 빠져버렸다
		PRINTFORMDL %마스터는% %타겟이% 일어날 때까지 잠든 얼굴을 바라보며 있었다
	ENDIF
	PRINTW
	;寝ちゃう
	IF TFLAG:SELECTCOM분기 > 0
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMW 「후우……새액……새액……」
		CASE 2
			PRINTFORML 「핫…%CALLNAME:MASTER%씨……」
			PRINTFORMW 「저, 잠들어버려서 죄송해요……」
		CASEELSE
			PRINTFORMW 「으아……응,헤에～……」
			PRINTL
			PRINTFORMDW %타겟은% 무릎 위를 만끽하고 있다
		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: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 코스즈는 기쁨에 흐느끼면서 %마스터를% 끌어안았다
				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 %마스터는% %타겟과% 함께 숙제를 했다
		PRINTW
		PRINTFORML 「아하하,%CALLNAME:MASTER%씨 숙제 같은걸 하고 계신 건가요ー？」
		PRINTFORMW 「저라도 괜찮다면 도와드릴게요ー」
		;地の文で処理しているのを飛ばすためこちらで処理しておく
		ITEM:숙제 --
	;教える
	ELSEIF ABL:MASTER:교양 > ABL:70:교양
		PRINTFORMDL %마스터는% %타겟을% 틈틈히 가르치면서 함께 공부를 하였다
		PRINTW
		IF ABL:MASTER:교양 > 2 && TALENT:70:연모
			PRINTFORML 「%CALLNAME:MASTER%씨 대단해……！」
			PRINTFORMW 「박식하네요～！ 멋있어요～！」
		ELSE
			PRINTFORML 「흐응흐응,과연ー」
			PRINTFORMW 「야아,%CALLNAME:MASTER%씨의 이야기는 도움이 되네요」
		ENDIF
	;教わる
	ELSE
		PRINTFORMDL %마스터는% %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 && DISH_ASSI == 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 STRCOUNT(DISH_TASTE, "로터")
			料理知識 = 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 DISH_ASSI == 70
		IF DISHNAME == "오세치요리"
			PRINTFORML 「그러면, 잘 먹겠습니다……」
			PRINTW
			PRINTFORMW 「역시 오세치 요리를 먹으면 설날이라는 느낌이 드네요～」
		ELSEIF DISHNAME == "토시코시 소바"
			IF TALENT:70:연모
				PRINTFORMW 「또 내년에도 이렇게 보내고 싶네요」
			ELSEIF TALENT:70:사모
				PRINTFORMW 「올 한해도 신세 많이 졌습니다～」
			ELSE
				PRINTFORMW 「올해에도 많은 일이 있었네요」
			ENDIF
			PRINTFORMW 「그럼, 잘 먹겠습니다……」
		ELSEIF DISHNAME == "에호마키"
			PRINTFORMW 「에-엣또,올해의 길한 방향은……%EHOU_DIRECTION()%네요」
			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 STRCOUNT(DISH_TASTE, "로터")
			PRINTFORML 「ㅈ……,잘 먹겠습……니다……」
			PRINTW
			IF TCVAR:70:요리평가치 >= 700
				PRINTFORMW 「응……！？ 마,맛있어……？」
			ELSE
				PRINTFORMW 「뭔가요 이 맛……？？」
			ENDIF
		;デザート
		ELSEIF DISH_TYPE == "디저트"
			PRINTFORML 「그러면, 먹도록 하지요♪」
			SIF TALENT:70:연모
				PRINTFORML 「%CALLNAME:MASTER%씨,아～앙%UNICODE(0x2764)%」
			PRINTW
			IF STRFIND(DISH_TASTE, "쫄깃한") >= 0
				PRINTFORMW 「응～～♪ 쫄깃쫄깃하고 맛있어요～♪」
			ELSEIF STRFIND(DISH_TASTE, "말랑말랑") >= 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
		ELSE
			PRINTFORML 「그럼, 잘 먹겠습니다」
			PRINTW
			IF STRCOUNT(DISH_TASTE, "담백") && TCVAR:70:요리평가치 >= 700 && !RAND:2
				PRINTFORMW 「응～～！ 부드러운 맛이 좋네요～！」
			ELSEIF STRCOUNT(DISH_TASTE, "가벼운") && TCVAR:70:요리평가치 >= 700 && !RAND:2
				PRINTFORMW 「응～～！ 깔끔해서 맛있어요～！」
			ELSEIF STRCOUNT(DISH_TASTE, "매운")
				PRINTFORMW 「읏,저,저에게는 조금 매울지도요……」
			ELSEIF TCVAR:70:요리평가치 >= 850
				PRINTFORMW 「응～～！ 저 이거 정말 좋아해요～！」
			ELSEIF TCVAR:70:요리평가치 >= 750
				PRINTFORMW 「응～～！ 이거 너무 맛있어요～！」
			ELSEIF TCVAR:70:요리평가치 >= 650
				PRINTFORMW 「응～！ 맛있네요～！」
			ELSEIF TCVAR:70:요리평가치 >= 550
				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 「에-엣또,올해의 길한 방향은……%EHOU_DIRECTION()%네요」
			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 STRCOUNT(DISH_TASTE, "로터")
			PRINTFORML 「어라, 식사를 받을 수 있는 걸까요？ 감사합니……」
			PRINTFORMW 「엣또,이거……요리……？ 먹을 수 있는건가요……？」
			PRINTFORML 「ㅈ……,잘먹겠습……니다……」
			PRINTW
			IF TCVAR:70:요리평가치 >= 700
				PRINTFORMW 「응……！？ 마,맛있어……？」
			ELSE
				PRINTFORMW 「뭘까요 이 맛……？？」
			ENDIF
		;軽食
		ELSEIF DISH_TYPE == "경식"
			PRINTFORML 「어라, 저도 받을 수 있나요？」
			PRINTFORMW 「고맙습니다～」
		;デザート
		ELSEIF DISH_TYPE == "디저트"
			PRINTFORML 「와앗！ 주실 수 있으신가요！？」
			PRINTFORML 「고맙습니다～♪」
			PRINTW
			IF STRFIND(DISH_TASTE, "쫄깃한") >= 0
				PRINTFORMW 「응～～♪ 쫄깃쫄깃하고 맛있어～♪」
			ELSEIF STRFIND(DISH_TASTE, "말랑말랑") >= 0
				PRINTFORMW 「후후♪ 탱탱하고 귀엽네요♪」
			ELSE
				PRINTFORMW 「응～～♪ 달콤～해♪」
			ENDIF
		ELSE
			PRINTFORML 「어라, 식사를 받을 수 있는 걸까요？ 고맙습니다～」
			PRINTFORML 「그럼, 잘 먹겠습니다ね」
			PRINTW
			IF STRCOUNT(DISH_TASTE, "담백") && TCVAR:70:요리평가치 >= 700 && !RAND:2
				PRINTFORMW 「응～～！ 부드러운 맛이 좋네요～！」
			ELSEIF STRCOUNT(DISH_TASTE, "가벼운") && TCVAR:70:요리평가치 >= 700 && !RAND:2
				PRINTFORMW 「응～～！ 깔끔해서 맛있어요～！」
			ELSEIF STRCOUNT(DISH_TASTE, "매운")
				PRINTFORMW 「읏,저,저에게는 조금 매울지도요……」
			ELSEIF TCVAR:70:요리평가치 >= 850
				PRINTFORMW 「응～～！ 저 이거 정말 좋아해요～！」
			ELSEIF TCVAR:70:요리평가치 >= 750
				PRINTFORMW 「응～～！ 이거 너무 맛있어요～！」
			ELSEIF TCVAR:70:요리평가치 >= 650
				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%가%타겟과% 함께
	SELECTCASE CFLAG:MASTER:현재위치
	CASE 商家町
		SELECTCASE RAND:3
		CASE 1
			PRINTFORMD 식당에서
		CASE 2
			PRINTFORMD 소바 가게에서
		CASEELSE
			PRINTFORMD 음식점에서
		ENDSELECT
	CASE 竹林入り口
		PRINTFORMDL 미스티아의 포장마차에서 여덞 마리째의 뱀장어를 먹었다
		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 %타겟은% 매우 만족스러운 표정이다
	ELSEIF TFLAG:SELECTCOM분기 == -1
		PRINTFORMDW ……%타겟은% 많이 먹지 않은 것 같다…
	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 %마스터는% %타겟이% 싸온 도시락을 받기로 했다
	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 「에헤헤…오늘은 조금 오리지널리티를 추가해봤어요～」
		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 %마스터는% %타겟과% 담소하며 즐거운 시간을 보냈다
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
;-------------------------------------------------
;地の文をカットしてるのでMESSAGE処理を内蔵する
IF LOCAL
	CALL M_KOJO_COLOR_K70
	SELECTCASE TFLAG:193
	;釣れない
	CASE 0
		PRINTFORMDW 아무것도 낚이지 않았다……
		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
		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 TO 20, 22 TO 60
		LOCALS = %FISH_NAME(TFLAG:193)%
	CASE 21
		LOCALS = 로터
	CASEELSE
		LOCALS = %ITEMNAME:(TFLAG:193)%
	ENDSELECT
	;小鈴が釣った
	IF TFLAG:194 > 1000
		PRINTFORMW 「앗！」
		PRINTL
		PRINTFORMDL %타겟이% %조사처리(LOCALS,"를")% 낚았다！
		RESETCOLOR
		;説明を流す
		SELECTCASE TFLAG:193
		CASE 1 TO 20, 22 TO 60
			DRAWLINE
			PRINTFORML %LOCALS%
			CALL FISHING_EXPLANATION(TFLAG:193)
		CASE IS > 61
			DRAWLINE
			PRINTFORML %LOCALS%
			PRINTFORML 　　%ITEM_EXPLANATION(TFLAG:193)%
		ENDSELECT
		PRINTW
		CALL M_KOJO_COLOR_K70
		SELECTCASE LOCALS
		CASE "로터"
			PRINTFORML 「엣,이,이거언……\/\/\/」
			PRINTFORMW 「아니잖아요！ ㄴ,낚여버렸어요！」
		CASE "개구리"
			PRINTFORMW 「게엑～！ 기분 나빠요……」
		CASE "얼음의비늘", "용의손톱"
			PRINTFORMW 「와앗～！ 예쁘다～！ 이거 뭘까요？」
		CASE "용연향"
			PRINTFORMW 「어라？ 이 돌은 분명히 레어 아이템이었던 것 같은……」
		CASE "가아", "가물치", "철갑상어", "일본연어", "피라루쿠", "타키타로우"
			PRINTFORMW 「무,무거워요～！ %CALLNAME:MASTER%씨 도와주세요～！」
		CASE "피라니아"
			PRINTFORMW 「꺄아ー！！ 어떻게 이런게ー！」
		CASE "실러캔스"
			PRINTFORMW 「이것은 환상의 고대어！ 랄까, 환상향에서는"환상"이 보통이었지요……」
		CASE "뱀장어", "칠성장어", "메기"
			PRINTFORMW 「꺄앗！ 미끌거려서 기분 나빠요……」
		CASEELSE
			PRINTFORMW 「해냈다！ 어떤가요 이거ー！？」
		ENDSELECT
	;MASTERが釣った
	ELSE
		RESETCOLOR
		PRINTFORMDL %조사처리(LOCALS,"가")% 잡혔다！
		;ローター以降を弾いてサイズと漁獲数の処理
		IF INRANGE(TFLAG:193, 1, 60) && TFLAG:193 != 21
			;サイズの出力
			LOCAL:1 = FISHING_SIZE(TFLAG:193)
			PRINTFORML 　사이즈：{LOCAL:1}cm
			;ここまでの最高サイズと比較して大きければ記録
			IF LOCAL:1 > FISHSIZE_RECORD:(TFLAG:193)
				SETCOLOR C_YELLOW
				SIF FISH_EXP:(TFLAG:193)
					PRINTFORML 　지금까지 낚은 %LOCALS% 중에 가장 큰 크기다！
				RESETCOLOR
				FISHSIZE_RECORD:(TFLAG:193) = LOCAL:1
			ENDIF
			;漁獲数の加算
			FISH_EXP:(TFLAG:193) ++
		ENDIF
		;説明を流す
		SELECTCASE TFLAG:193
		CASE 1 TO 20, 22 TO 60
			DRAWLINE
			PRINTFORML %LOCALS%
			CALL FISHING_EXPLANATION(TFLAG:193)
		CASE IS > 61
			DRAWLINE
			PRINTFORML %LOCALS%
			PRINTFORML 　　%ITEM_EXPLANATION(TFLAG:193)%
		ENDSELECT
		PRINTW
		CALL M_KOJO_COLOR_K70
		SELECTCASE LOCALS
		CASE "로터"
			PRINTFORMW 「엣,이,이건……\/\/\/」
		CASE "개구리"
			PRINTFORMW 「게엑～！ 기분 나빠요……」
		CASE "얼음의비늘", "용의손톱"
			PRINTFORMW 「와앗～！ 예쁘다～！ 이거 뭘까요？」
		CASE "용연향"
			PRINTFORMW 「어라？ 이 돌은 분명히 레어 아이템이었던 것 같은……」
		CASE "피라니아"
			PRINTFORMW 「꺄아ー！！ 그거 피라냐에요ー！」
		CASE "실러캔스"
			PRINTFORMW 「그건 환상의 고대어！ 랄까, 환상향에서는"환상"이 보통이었지요……」
		CASE "뱀장어", "칠성장어", "메기"
			PRINTFORMW 「으……미끌미끌해서 기분이 나빠요……」
		CASEELSE
			IF LOCAL:1 >= 80
				PRINTFORMW 「히야～！ 크네요～！」
			ELSEIF INRANGE(TFLAG:193, 11, 20) || INRANGE(TFLAG:193, 24, 60)
				PRINTFORMW 「와앗～！ 희귀한 물고기네요～！」
			ELSEIF TALENT:70:연모 || TALENT:70:사모
				PRINTFORMW 「오오～！ 과연이네요～！」
			ELSE
				PRINTFORMW 「오오～！ 해냈어요～！」
			ENDIF
		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 「그건 총 12권으로 이루어진 것이기 때문에, 전부 독파하기란 어려워요ー」
	CASE 3
		;文芸書成功
		PRINTFORMDL 기대하지 않았는데 생각보다 재미있었어요
		PRINTW
		PRINTFORML 「어머나,꽤나 좋은 책을 고르셨네요ー」
		PRINTFORMW 「오래된 언어로 쓰여있는데, 신기하게도 내용을 알 수 있어서 재미있네요～」
	CASE 4
		;実用書失敗
		PRINTFORMDL 어느 쪽이건 시시한 수준의 지식뿐이었다
		PRINTW
		PRINTFORML 「어머나, 책으로 공부하시는 건가요」
		PRINTFORMW 「"책을 펴서 읽으면 반드시 이로움이 있다"이라는 말이 있기는 하지만, 근대의 책에 한해서는 꼭 그렇다고는 말할 수 없네요」
	CASE 5
		;実用書成功
		PRINTFORMDL 도움이 되는 지식을 얻을 수 있었다
		PRINTW
		PRINTFORML 「어라, 책으로 공부를 하고 있다니 감탄해버려요～」
		PRINTFORMW 「"책을 펴서 읽으면 반드시 이로움이 있다"라고 말해지는만큼, 반드시 무엇인가 얻을 수 있을 거에요♪」
	CASE 6
		;薄くて高い本（えっち）
		PRINTFORMDL ！！！
		PRINTFORMDL ……%마스터는% 선인들의 예지에 깊은 경의를 표했다
		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: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: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: DNS/eraTWKR

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

license: mit