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_K37_300
;コマンド共通メッセージ(TRAIN_MESSAGE)
;削除すると「～話をした。」とかが消えます
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K37_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;ここに口上書いて下さい
	;大成功
	IF TFLAG:193 == 1
		IF TALENT:연모 || TALENT:애욕
			IF RAND:2
				PRINTFORML 「즐거운 이야기 들어 버렸다라면 우츠호도 하지 않으면！」
				PRINTFORML 기분인 모습이지만 (들)물은 것이 있는 일의 반복을 말해 만족하다
				CFLAG:TARGET:욕구불만도  += 1000
			ELSE
				PRINTFORML 「...!굉장하다 그것！응응！」
				PRINTFORML %CALLNAME:MASTER%의 잔 지식에 감탄하고 있는, 이해할 수 있던 타카시몸도 감탄하고 있는 것 같다
				PRINTFORML 우츠호는%CALLNAME:MASTER%에 대해서의 호감도가 올랐다  ＋200
				CFLAG:TARGET:호감도 += 200
			ENDIF
		ELSEIF TALENT:사모 || TALENT:섹프
			IF RAND:2
				PRINTFORML 「점점%마스터를% 알아 왔어！」
				PRINTFORML %CALLNAME:MASTER%도 우츠호의 일을 알 수 있어 온 것 같다
			ELSE
				PRINTFORML 「득도함님으로부터도 (들)물은 일 없는 이야기！」
				PRINTFORML 우츠호는 눈을 빛낼 수 있었다
			ENDIF
		ELSE
			PRINTFORML 「그 이야기 안다！」
			PRINTFORMW 우츠호 응응승낙해, 이해할 수 있던 일에 만족하다
		ENDIF
	;失敗
	ELSEIF TFLAG:193 == -1
		IF TALENT:연모 || TALENT:애욕
			PRINTFORML 「아！그 거 바보취급 하고 있다고 일!?」
			PRINTFORMW 우츠호는 잘못한 해석을 하고 있는 것 같다
		ELSEIF TALENT:사모 || TALENT:섹프
			PRINTFORML 「그 거 무슨 일？」
			PRINTFORMW  우츠호는 그다지 이해하고 있지 않는 것 같다
		ELSE
			PRINTFORML 「…？응...？？」
			PRINTFORMW  우츠호는 이야기를 이해하지 못하고, 고개를 갸웃하고 있다…
		ENDIF
	;ほろ酔い
	ELSEIF BASE:술기운 >= 1
		IF RAND:2 == 0
			PRINTFORMW 「응후후～♪기분～♪」
			PRINTFORMW 우츠호는 술에 취해 있다
			CFLAG:TARGET:욕구불만도  += 1000

		ELSE
			PRINTFORMW 「♪～%CALLNAME:MASTER%도 마셔－！」
			PRINTFORMW 우츠호 기분인 모습으로%CALLNAME:MASTER%에 자신의 잔을 건네주었다
			PRINTFORMW 일반적으로 말하는 간접 키스라고 하는 것인가…
			CFLAG:TARGET:욕구불만도 += 20
		ENDIF
	;通常
	ELSEIF TALENT:연모
		IF TALENT:연인
			PRINTFORM 우츠호는%CALLNAME:MASTER%의 말에
			IF CHK_DATENOW(CFLAG:TARGET:데이트중)
			IF RAND:2 == 0
			PRINTFORMW
			PRINTFORML 「그렇게 말해 주면(자) 기쁘다～♪」
			PRINTFORMW 「～♪」
			PRINTFORMW
			PRINTFORMW
		ELSE
			PRINTFORMW
			PRINTFORMW 「응～♪좋아～♪～♪」
			PRINTFORMW
			PRINTFORMW
			ENDIF
			ELSEIF CFLAG:TARGET:동침중
				PRINTFORML 온화한 미소를 띄워 아까워하는 기색도 없게 신체를 접대어 온다
				PRINTFORML 「응―...함께...잔다...?」
				PRINTFORML
			ELSEIF BATHROOM()
				PRINTFORML 다 느슨해진 얼굴로, 불 비친 신체를 맡겨 온다
			ELSE
				PRINTFORML 신뢰해 버린 표정을 띄우고 있다
			ENDIF
		ELSE
			PRINTFORM 우츠호는%CALLNAME:MASTER%우와
			IF CHK_DATENOW(CFLAG:TARGET:데이트중)
				PRINTFORML 대답하면서, 제대로 묶은 손가락을 걸고 있다
				PRINTFORML 「이음개이음와～♪」
				PRINTFORML
			ELSEIF CFLAG:TARGET:동침중
				PRINTFORML 미소지어, 이불안에 기어들어 붐비어 온다
			ELSEIF BATHROOM()
				PRINTFORML 상기 한 어깨를 맡겨 회화하고 있다
			ELSE
				PRINTFORML 기쁜듯이 상냥한 웃는 얼굴을 보였다
				PRINTFORML 「즐겁다♪」
				PRINTFORML
			ENDIF
		ENDIF

	SELECTCASE RAND:5
	CASE 0
			;季節分岐
			SELECTCASE DAY:2
			;春
			CASE 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「밖은 봄？라고―」
					PRINTFORML 「득도함님이 화분이 무서운 계절이라고 했다！」
				CASEELSE
					PRINTFORML 「밖은 여기와 달리 시원한 것 같다」
					PRINTFORML 「가끔 산책에 있고 개-일까―」
					PRINTFORMW 우츠호는 시원한 밖을 상상하고 있다
				ENDSELECT
			;夏
			CASE 2
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「밖은 여름？던가」
					PRINTFORML  「여기 지저 깊은 속의 환경이 된다 라는 린이 말했다！」
					PRINTFORMW 우츠호는 밖과 지옥이 연결되는 상상을 하고 있다
				CASE 1
					PRINTFORML 「이 시기는 죽은 사람이 많은 보고 싶다」
					PRINTFORMW 「이래 린이 달리는 스피드가 빠른 걸！」
				CASEELSE
					PRINTFORML 「득도함님은 지저에 있어서 좋았다고라고 했다！」
					PRINTFORML 「만약 밖에 나오면 짊어지는이나에 사초가 되거나」
					PRINTFORMW 「이다입니다 있고 상장이 된대」
				ENDSELECT
			;秋
			CASE 3
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「밖은 가을？(이)야？」
					PRINTFORML  「무엇인가를 진행시키는데 좋은 계절인것 같다？응이래―！」
					PRINTFORMW 「우츠호는 한 잔 먹고 싶은데！」
				CASE 1
					PRINTFORML 「밖에 나오지 않아도 가을은 알아！」
					PRINTFORML 「이래 린의 차체를 지탱하는 부분에 깨끗한 잎이 많이 장식해지고 있었던 것！」
					PRINTFORMW  확실히 선명한 차체를 지탱하는 부분이 달리고 있었던라고 생각해 낸다%CALLNAME:MASTER%(이었)였다

				CASEELSE
					PRINTFORML 「모두가 가득 음식을 가져와 준다！」
					PRINTFORML 「우츠호가 아니고 득도함님이이지만」
					PRINTFORML 「 그렇지만 득도함님 별로 먹지 않기 때문에 우츠호에 준다」
					PRINTFORMW  과연 당연해 그 신체에
				ENDSELECT
			;冬
			CASE 4
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「밖은 겨울？(이)야―」
					PRINTFORML 「추우면 와에 너무 없었으니까 자주(잘) 몰라
					PRINTFORMW 우츠호는 이어 맞댐의 기억으로 겨울의 상상을 하고 있다
				CASEELSE
					PRINTFORML 「어쩐지 모두 기분이 좋지 않은 보고 싶다」
					PRINTFORML 「평상시 얘기하는 사람들도 어쩐지 평상시와 달라」
					PRINTFORML 「 어째서이겠지―？」
					PRINTFORMW 어째서일 것이다
				ENDSELECT
			ENDSELECT
		CASEELSE
			SELECTCASE RAND:12
			CASE 0
				PRINTFORML 「신이 힘을 준 것은 좋지만」
				PRINTFORMW 「제어가 어려운！」
			CASE 1
				PRINTFORML 「핵융합에는 이 제어봉이 있어？」
				PRINTFORMW 신기한 얼굴로 제어봉을 윙윙 털고 있다
			CASE 2
				PRINTFORML 「가끔 핵융합이 능숙하게 가지 않아서...」
				PRINTFORML 「모두 혼란해 버려서...」
				PRINTFORMW 우츠호는이든지 빌려준 일을 생각해 내고 있다
			CASE 3
				PRINTFORML 「깨닫아 같다는 것은 무섭게 박식이야！」
				PRINTFORMW 「%CALLNAME:MASTER%도 굉장히 박식！」
			CASE 4
				PRINTFORML 「린은 언제나 무엇인가를 옮기고 있지？」
				PRINTFORMW 「그건이겠지...?」
			CASE 5
				PRINTFORML 「밖에 나올 때가 있는데...」
				PRINTFORML 「언제나 깨닫아 모양이 굉장히 주의해 감쌌다―...」
				PRINTFORML 「신용 없는 것인지...」
				PRINTFORMW 우츠호는 그렇게 말해 고개 숙이고 있다…
			CASEELSE
				PRINTFORML 「그렇게 말하면%CALLNAME:MASTER%라고 어디에서 왔어？」
				PRINTFORML 「...네, 전회도 (들)물어도？응」
				PRINTFORMW 우츠호는 전회의 기억을 더듬고 있다
			ENDSELECT
		ENDSELECT
	ELSEIF TALENT:사모
		PRINTFORM 우츠호는%CALLNAME:MASTER%우와
			IF CHK_DATENOW(CFLAG:TARGET:데이트중)
				PRINTFORML 즐거운 듯이 시선을 향하여 있다
			ELSEIF CFLAG:TARGET:동침중
				PRINTFORML 어딘가 다시 조마조마 향했다
			ELSEIF BATHROOM()
				PRINTFORML 조금 몸을 의지해 이야기하고 있다
			ELSE
				PRINTFORML 얇게 미소짓고 있다
			ENDIF
		SELECTCASE RAND:3
			CASE 0
				SELECTCASE RAND:6
					CASE 0
						PRINTFORML 「응 봐！」
						PRINTFORML 그러한과 왼손을 우에에 두어
						PRINTFORMW 「소태양-！」
						PRINTFORMW ...멈추어 줄 때까지 죽을 만큼 더웠다
					CASE 1
						PRINTFORML 「이 제어봉은 제외할 수 있어！」
						PRINTFORML 그러한과 가체가체라고 제외해
						PRINTFORMW 「 그렇지만 핵융합의 실패율이 튄다―...」
					CASE 2
						PRINTFORML 「근데, 봐―！」
						PRINTFORML 그러한과 돌아 망토를 펄럭이게 했다
						PRINTFORMW 「자랑의 망토야―♪」
						PRINTFORMW 우츠호는 미소지어 그렇게 말했다
					CASE 3
						PRINTFORML 「우츠호의 오른쪽 다리는 분해를 나타내고 있어는！」
						PRINTFORMW 「 그렇지만 어쩐지 울퉁불퉁 하고 있어...」
					CASEELSE
						PRINTFORML 「이것 봐―」
						PRINTFORML 그러한과 가슴을 접근해 왔다
						PRINTFORML  「이것이 제３눈이야！」
						PRINTFORMW 「자주(잘) 모르지만 굉장해！」
				ENDSELECT
			CASEELSE
				PRINTDATAW
					DATAFORM 「그것 득도함님으로부터 (들)물은 적 있다！」
					DATAFORM 우츠호는 응응이야기를 재촉하고 있다
				ENDDATA
		ENDSELECT
	ELSE
		PRINTFORML %CALLNAME:MASTER%의 이야기에 우츠호는 때때로 맞장구를 치고 있다
		PRINTDATAW
			DATAFORM 「에―！자주(잘) 모르는데」
			DATAFORM 「%CALLNAME:MASTER%의 이야기 어렵다…(이)지만 재미있어！」
			DATAFORM 응응수긍하면서,
			DATAFORM %CALLNAME:MASTER%의 말에 흥미를 나타내,
		ENDDATA
		PRINTDATAW
			DATAFORM 「그래서 그리고 어떻게 되었어！？」
			DATAFORM 「그래서 그래서―？」
		ENDDATA
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,お茶を淹れる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:연인
		IF TFLAG:193 == 1
			PRINTFORML 「～♪응후후～♪」
			PRINTFORMW %CALLNAME:MASTER%의 차를 마셔 행복한 것 같다

		ELSEIF TFLAG:193 == -1
			PRINTFORML 「♪～……응？응―…」
			PRINTFORMW 우츠호는%CALLNAME:MASTER%의 얼굴과 차를 교대로 보고 있다
		ELSE
			IF RAND:2
				PRINTFORML 「원―！언제도 차아가와―！」
				PRINTFORML 그렇게 말하면(자) 꿀꺽꿀꺽마시기 시작했다
				PRINTFORML 「―…맛의 차이는 모르지만 어쨌든 맛있다！」
				PRINTFORMW 웃는 얼굴로 그렇게 말해, 또 마시기 시작했다
			ELSE
				PRINTFORML 「응...식～언제나 고마워！」
				PRINTFORMW 릴렉스 한 우츠호는%CALLNAME:MASTER%에 인사를 했다

			ENDIF
		ENDIF
	ELSEIF TALENT:연모
		IF TFLAG:193 == 1
			PRINTFORML 「은-차가와서 두고 해―」
			PRINTFORML 「맛은 모르지만 온도만으로도 맛있게 느껴！」
			PRINTFORMW 즉 이것은 차가운 물은 것인가…
		ELSEIF TFLAG:193 == -1
			PRINTFORML 「차？마시는 마신다！」
			PRINTFORML 「응！……？」
			PRINTFORMW 진지한 얼굴로 차를 응시하고 있다
		ELSE
			IF RAND:2
				PRINTFORML 「득도함님은 물 밖에 마시지 않는다고！」
				PRINTFORML 「차라든지 여러 가지 것 마시면 좋은데―」
				PRINTFORMW 차를 마시면서%CALLNAME:MASTER%에 주로 대해 이야기했다
			ELSE
				PRINTFORML 「이것을 마시고 있다고(면) 어쩐지 침착해 와～」
				PRINTFORML 「염주…후~～～…」
				PRINTFORMW 우츠호는 조용하게 차를 마셔, 매우 릴렉스 하고 있는 것 같다
			ENDIF
		ENDIF
	ELSEIF TALENT:사모
		IF TFLAG:193 == 1
			PRINTFORML 「와~ 차다！응구, 응구, 는―...」
			PRINTFORML 「잘 먹었어요！」
			PRINTFORMW 아무래도 능숙하게 차를 엄같다
		ELSEIF TFLAG:193 == -1
			PRINTFORML 「목이 말라 버렸다...」
			PRINTFORML 「……응―？」
			PRINTFORMW %CALLNAME:MASTER%의 엄차에, 우츠호는 의혹이 관심을 가지고 있다...
		ELSE
			IF RAND:2
				PRINTFORML 「%CALLNAME:MASTER%의 차는 언제나 어디에서 가져와？」
				PRINTFORML 「매우 매우...」
				PRINTFORMW 우츠호는 의문으로 생각하면서 차를 호쾌하게 마시고 있다
			ELSE
				PRINTFORML 「두고 해―！차 고마워！
				PRINTFORMW 우츠호는 만면의 미소로 인사를 했다
			ENDIF
		ENDIF
	ELSE
		IF TFLAG:193 == 1
			PRINTFORML 「응-차가워지고 있어 두고 해―」
			PRINTFORMW 우츠호는 맛있을 것 같게 다 마시고 있다
		ELSEIF TFLAG:193 == -1
			PRINTFORML 「...?이것은 차？」
			PRINTFORMW 입을 붙였지만 맛없을 것 같은 얼굴로 완을 두어 버렸다
		ELSE
			PRINTFORML 「목이 마르고 있었어―...」
			PRINTFORML
			PRINTFORML 「잘 먹었습니다！」
			PRINTFORMW 목이 촉촉해 만족한 것 같다
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;302,スキンシップ
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF BATHROOM()
		IF TALENT:연인
			PRINTDATA
				DATALIST
					DATAFORM 「무릎 위에의-키라고♪」
					DATAFORM %CALLNAME:MASTER%하지만 무엇인가 말하기 전에 승인가는 왔다！
					DATAFORM 「침착하지 말아라～♪
					DATAFORM 투성이 자른 얼굴로%CALLNAME:MASTER%에 모두를 맡기고 있다
					DATAFORM 시험삼아 가슴이나 가랑이의 사이를 쓰다듬고 있고도 조금 소리를 높이는 것만으로 특별히 싫어하지 않았다
					DATAFORM 「……이대로 우쭐해버릴 것 같다…」
					DATAFORM %마스터는% 쭉 우츠호의 신체를 계속 손대고 있으면(자) 그렇게 말해
					DATAFORM 조금 오르는군이라고 하면(자) 그 자리를 떠났다
					DATAFORM
					DATAFORM 5 분후
					DATAFORM 「무릎 위에의-키라고♪♪―♪」
					DATAFORM …이대로는 이쪽 만일 수 있는 우쭐해 버린다…
					DATAFORM 그러나 안아 도착해져 동작을 할 수 없다…

				ENDLIST
				DATALIST
					DATAFORM 「 이제(벌써) 알몸에서도 안심 할 수 있을 정도로 사이가 좋아졌군요！」
					DATAFORM 이쪽으로서는 정욕이 끓어 버리지만 확실히 안심한다
					DATAFORM 「 그렇지만 욕실에 잠길 뿐(만큼)이니까～♪」
					DATAFORM %마스터는% 말해진 대로 욕실을 즐겼다
					DATAFORM 「―……」
					DATAFORM 우츠호는 어쩐지 분한 것 같은 얼굴을 하고 있다
					DATAFORM 속세 속세 속세 사！
					DATAFORM 우츠호는%CALLNAME:MASTER%(을)를 킥와 예와
					DATAFORM 「응！」
					DATAFORM 우츠호는 양팔을%CALLNAME:MASTER%의 눈앞에서 넓혀 왔다
					DATAFORM 의도를 짐작해 강하게 꼭 껴안아 주었다
					DATAFORM 「！～～…...♪」
					DATAFORM 우츠호는 만족한 것 같다･･･
				ENDLIST
				DATALIST
					DATAFORM 「응～기분 있고～♪」
					DATAFORM %마스터는% 손에 익숙해진 것처럼 날개를 씻고 있다
					DATAFORM %CALLNAME:MASTER%하지만 진지하게 손질을 하고 있으면(자)
					DATAFORM 「이군요-손, 대주-」
					DATAFORM 우츠호는 뒤를 향해,%CALLNAME:MASTER%의 손을 잡아 이끌었다
					DATAFORM 「여기도 씻기를 원하는데～」
					DATAFORM 그렇게 말해 가져 간 장소는 가슴이었다
					DATAFORM 「왜～？……♪」
					DATAFORM 이전보다 적극성이 더하고 있는 것 같다
				ENDLIST
			ENDDATA
		ELSEIF TALENT:연모
			PRINTDATA
				DATALIST
					DATAFORM 「등 씻어 주어―？」
					DATAFORM %마스터는% 그렇게 말한 것의
					DATAFORM 씻는 개소가 너무 많다！
					DATAFORM 「날개 전부까지 손이 닿지 않기 때문에 살아나～♪
					DATAFORM 서로 빼앗지 못하고 날개를 씻자…
				ENDLIST
				DATALIST
					DATAFORM 「아…」
					DATAFORM %마스터는% 날개를 밀쳐 등의 술술 한 보조개를 위를 덧썼다
					DATAFORM 「낯간지러워～…♪」
				ENDLIST

				DATALIST
					DATAFORM 「어？무엇 가져？」
					DATAFORM %마스터는% 쪄 타올을 가지고 있다
					DATAFORM 이것으로 눈의 혈행이 다소 좋아진다고 하면(자)
					DATAFORM 「그렇구나―」
					DATAFORM 그래요？그러니까 잠시 눈을 녹이고 있으니라고 말하면(자)
					DATAFORM 「그 사이 움직일 수 없는거야？」
					DATAFORM 응, 이라고 말하는 하자마자%CALLNAME:MASTER%의 신체를 손대기 시작했다
					DATAFORM 구, 낯간지럽다！
				ENDLIST
			ENDDATA
		ELSE
			PRINTDATA
				DATALIST
					DATAFORM 「등세탁고사야―♪」
					DATAFORM 처음은 우츠호 바싹바싹 씻어 주는 것 같다
					DATAFORM 응마음 좋다…
					DATAFORM 자 이제
					DATAFORM 「어？이제 된거야？」
					DATAFORM %마스터는% 만족했다고 해
					DATAFORM %마스터는% 작업량이 많은 우츠호의 날개를 씻기 시작했다
					DATAFORM 「언제나 대단하다？」
					DATAFORM 그렇다면 이제(벌써)
				ENDLIST
				DATALIST
					DATAFORM 목욕탕은40번이 좋야！
					DATAFORM 「…그렇지만 우츠호 그런 것 몰라？」
					DATAFORM …그렇게 말하면 고열 중(안)에서도 아무렇지도 않아, 봉으로부터 고열의 탄막 내고
					DATAFORM 열을 느끼는 감각 망가져 있을까…
					DATAFORM …마음 탓인지 뜨거워졌어！？
					DATAFORM 「어때？뜨거워지고 있다」
					DATAFORM 급거 멈추도록(듯이) 말했다
				ENDLIST
				DATALIST
					DATAFORM 「등 씻어 주는군！」
					DATAFORM 「어깨도 로 줄까！？」
					DATAFORM 「맛사지 해 주어…！？
					DATAFORM 「우츠호의 신체 어때！？」
					DATAFORM %마스터는% 우츠호의 과잉인 스킨십에 도착해 가므로 힘껏이다…
				ENDLIST
			ENDDATA
		ENDIF
	ELSE
		IF TALENT:연인
				;メモ書き・マッサージ胸揉み派生、柔軟腰すり、からの下腹部気功あて、整体密着
			PRINTDATA
				DATALIST
					DATAFORM 우츠호는 순진하게%CALLNAME:MASTER%에 구붙어 있다
				ENDLIST
				DATALIST
					DATAFORM 「응！손을 빌려 줘！」
					DATAFORM 우츠호는 그렇게 말하면(자)%CALLNAME:MASTER%의 손을 이끌어,
					DATAFORM 「좋아하는 곳 손대고 있고-♪」
					DATAFORM %마스터는% 가슴 의외로 말한 전회의 기억을 생각해 내,
					DATAFORM 「아……응후후―♪」
					DATAFORM 그 풍만한 가슴을 가볍게 누르거나 들어 올리거나 했다
				ENDLIST
				DATALIST
					DATAFORM 「～♪
					DATAFORM 우츠호는%CALLNAME:MASTER%에 등을 돌려 물건이다 리카 샀다！
					DATAFORM
					DATAFORM 「응」
					DATAFORM
					DATAFORM 「꼭 껴안았으면 좋은데♪」
					DATAFORM ……！
					DATAFORM %마스터는% 팔을 크로스 시키도록(듯이) 우츠호의 몸을 꼭 껴안았다！―
				ENDLIST
				DATALIST
					DATAFORM 「응실마리야 있고 실마리！」
					DATAFORM 우츠호는%CALLNAME:MASTER%의 어깨를 비비고 있다
					DATAFORM 어깨를 비빌 뿐(만큼)인데 쓸데없이 움직임이 격렬하다
					DATAFORM 「응 기분 좋다～？♪」
					DATAFORM 우츠호는 요염한 미소를 띄우고 있다…
					DATAFORM 아무래도 고의로 가슴을 꽉 누르고 있는 것 같다…
				ENDLIST
			ENDDATA
		ELSEIF TALENT:연모
			PRINTDATA
				DATALIST
					DATAFORM 「%CALLNAME:MASTER%의 가슴 대단하다！」
					DATAFORM 우츠호는%CALLNAME:MASTER%의 가슴을 손대거나 누르거나 하고 있다
					DATAFORM 「우츠호의 것도 가슴 이외라면 손대고 있고-♪」
					DATAFORM 그렇다면머리를 이것이라도일까하고 더듬었다！
					DATAFORM 우츠호는 불어 버렸다！
				ENDLIST
				DATALIST
					DATAFORM 「아～기분～」
					DATAFORM %마스터는% 우츠호의 어깨를 비비고 있다
					DATAFORM 「응～♪……응…」
					DATAFORM 우츠호는 무엇인가 불만이 있는지 고민얼굴로%CALLNAME:MASTER%의 얼굴을 응시해
					DATAFORM 「……아무것도 하지 않는거야？」
				ENDLIST
				DATALIST
					DATAFORM 「영차―！」
					DATAFORM 우츠호는%CALLNAME:MASTER%(을)를 옆구리에 손을 넣어 들어 올렸다！
					DATAFORM 역시 요괴인답게 괴력인 같다…
					DATAFORM 「이대로 우츠호의 방까지 따라는 올려～♪」
					DATAFORM %마스터는% 유석에 부끄럽기 때문에 내려 주었다
				ENDLIST
				DATALIST
					DATAFORM 「―！」
					DATAFORM 우츠호는%CALLNAME:MASTER%(을)를 강하게 꼭 껴안고 있다
					DATAFORM 「이렇게 하고 있으면 침착한다―♪응―♪」
					DATAFORM 침착하는 것은 알지만 상당히 아프다…
				ENDLIST
			ENDDATA
		ELSEIF TALENT:사모
			IF TFLAG:193 == -1
				PRINTFORML 「거기는 안돼―」
				PRINTFORML %마스터는% 우츠호의 가슴에 손을 가지고 가려고 하면(자) 위로부터 제어봉이！
				PRINTFORML 고슨！(와)과 소리가 울어, 점점의식이…
				PRINTFORMW 「어？너무 조금 했다？어이！콘콘！」
			ELSE
				PRINTDATA
					DATALIST
						DATAFORM 「상당히 열중하고 있어―, 아프다！」
						DATAFORM %마스터는% 우츠호의 다리를 맛사지 하고 있다
						DATAFORM 「다리를 비비어진 것 없기 때문에 어쩐지 깜짝！응！！」
						DATAFORM 우츠호는 정기적으로 오는 강한 아픔에 허덕이면서 기분이야 유혹하는으로 하고 있다

					ENDLIST
					DATALIST
						DATAFORM 「네에에～좋지요―」
						DATAFORM %마스터는% 우츠호의 머리카락을 어루만지거나 손가락을 통하거나 하고 있다
						DATAFORM 「린이나 깨닫아님이 손질 받고 있어～♪」
						DATAFORM 확실히 비워 머리카락에 윤기가 맞아 졸졸이다
					ENDLIST
					DATALIST
						DATAFORM 「어？짊어져 보고 싶다는 것은？…응...」
						DATAFORM 우츠호는 짊어져지는 혐오감보다 자신의 체중이 신경이 쓰이고 있는 것 같다
						DATAFORM 「～…후회하지 않도록？」
						DATAFORM 그렇게 말하면(자)%CALLNAME:MASTER%의 어깨에 한 손을 실어 뛰어 올라탔다
						DATAFORM ！장신을 타고난 신체, 거기에 더하고 거대한 날개에 망토...!
						DATAFORM 「원―！대단히 대단하다！」
						DATAFORM 기뻐하고 있다면 좋았다…사이에 때를 멈추지 않았으면 붕괴되고 있었던...
					ENDLIST
				ENDDATA
			ENDIF
		ELSE
			IF TFLAG:193 == -1
				PRINTFORML 「아！」
				PRINTFORML 우츠호는%CALLNAME:MASTER%의 손을 먼지떨이 떨어뜨렸다
				PRINTFORML 「거기는 손대면 안된다는 것은 득도함님이 말했다！」
			ELSE
				PRINTDATA
					DATALIST
						DATAFORM 「이 제어봉을 손대고 싶다？...좋은데...?」
						DATAFORM 우츠호는 의문으로 생각하면서도%CALLNAME:MASTER%에 제어봉을 손대게 하고 있다
					ENDLIST
					DATALIST
						DATAFORM 「왼팔을 손대고 싶다？응-좋아！네！」
						DATAFORM 우츠호는%CALLNAME:MASTER%에 팔을 맡기고 있다
					ENDLIST
					DATALIST
						DATAFORM 「어！？족！？안돼！...아, 이 제３다리인가」
						DATAFORM 납득하면(자) 코끼리와 같은 다리를 드슨과%CALLNAME:MASTER%의 전에 냈다
					ENDLIST
				ENDDATA
			ENDIF
		ENDIF
	ENDIF
	PRINTW
ENDIF
RETURN 1
;==================================================
;303,謝る
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 == 2
		IF TALENT:연모
			PRINTFORML 「네에에―」
			PRINTFORML 「이런 건 받으면(자) 허락해버린다―♪」
			PRINTFORMW
		ELSE
			PRINTFORML 「네！좋은거야？」
			PRINTFORML 「응후후～♪빌리고！빌리고！」
			PRINTFORML 「우물우물…！」
			PRINTFORMW
		ENDIF
	ELSEIF TFLAG:193 == 1
		IF TALENT:연모
			PRINTFORML 「 이제(벌써)！그런 것 좋은거야！」
			PRINTFORML 「유！………유～♪」
			PRINTFORMW
		ELSE
			PRINTFORML 「그런 일 이제 되었어！」
			PRINTFORML 「락 하지도！그런데！！」
			PRINTFORMW
		ENDIF
	ELSEIF TFLAG:193 == 0
		IF TALENT:연모
			PRINTFORML 「응―」
			PRINTFORML 「좋아！」
			PRINTFORMW
		ELSEIF TALENT:사모
			PRINTFORML 「―……」
			PRINTFORML 「 이제(벌써)！허락해버린다！」
			PRINTFORMW
		ELSE
			PRINTFORML 「…？무슨 이야기？」
			PRINTFORML 「아！생각해 냈다！―！」
			PRINTFORML 「 그렇지만 감정 잊어 버렸다！허락해버린다！」
			PRINTFORMW
		ENDIF
	ELSEIF TFLAG:193 == -1
		IF TALENT:연모
			PRINTFORML 「째！째！！」
			PRINTFORMW
		ELSEIF TALENT:사모
			PRINTFORML 「- 아직 허락하지 않아―！」
			PRINTFORMW
		ELSE
			PRINTFORML 「……」
			PRINTFORML 「아니 안 됨！허락하지 않는다」
			PRINTFORMW
		ENDIF
	ELSEIF TFLAG:193 == -2
			PRINTFORML 「째！째！…멸！」
			PRINTFORMW 제어봉으로부터 열을 느낀다…
			PRINTFORMW
		ENDIF
	ENDIF
RETURN 1
;==================================================
;304,仕事を手伝う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:도울수없다(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_MESSAGE_COM_K37_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && FIRSTTIME(SELECTCOM)
	PRINTFORMW 「어와...」
	PRINTFORML 「일……」
	PRINTFORMW 우츠호는%CALLNAME:MASTER%(을)를 봐 어떻게 한 것일까하고 망설이고 있다
	PRINTFORML 「앉거나 차를 내 주면 좋겠다！」
	PRINTFORMW %마스터는% 말대로에, 우츠호의 신변에서 앉거나 했다
	RETURN 1
ENDIF
;==================================================
;305,膝枕してもらう
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:체형 > TALENT:체형 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:친밀(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_MESSAGE_COM_K37_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:연인
		SELECTCASE RAND:2
			CASE 0 to 2
				PRINTFORML 「무릎 베개？좋아―♪」
				PRINTFORML 「좋아-해...♪」
				PRINTFORML 우츠호의 무릎에 머리를 가라앉히면(자)
				PRINTFORML 그 부드러운 육체에 몸을 싸 난처할 수 있어 간다...
				PRINTFORMW 「응후후～♪」

		ENDSELECT
	ELSEIF TALENT:연모
		SELECTCASE RAND:3
			CASE 0 to 3
				PRINTFORML 우츠호는 무릎을 가리켜 펑펑두드리고 있다
				PRINTFORML 「와～」
				PRINTFORML 말해져 두꺼비 뭐,무릎에 머리를 맡겼다
				PRINTFORML 「 아직 조금 부끄러운데」
				PRINTFORML 「득도함님이 받았을 때 기분 좋았으니까 한다！어루만지고 어루만지고...」
				PRINTFORMW 아...기분이 좋다...

			CASEELSE
				PRINTFORML 「응」
				PRINTFORML 우츠호는%CALLNAME:MASTER%의 머리를 어루만지면서
				PRINTFORML 「기분이 좋다？」
				PRINTFORML 그 말에 맞장구를 치면(자) 웃는 얼굴로
				PRINTFORMW 「！자 좀 더 한다！」
				PRINTFORMW 그러한과 격렬하게 어루만지기 시작한, 기분 좋지 않다...
		ENDSELECT
	ELSEIF TALENT:사모
		SELECTCASE RAND:5
			CASE 0 to 2
				PRINTFORML 우츠호는 무릎 베개를 해 주지만...
				PRINTFORML 「…어루만지고 어루만지고」
				PRINTFORMW 꽤 진지하게 되어 있다…무엇인가 다르다！
			CASE 3 to 5
				PRINTFORML 「이봐요 와！」
				PRINTFORML 우츠호는 무릎을 펑펑두드려, 그렇게%CALLNAME:MASTER%에 말했다
				PRINTFORML %마스터는% 사양하지 않고 , 우츠호의 무릎 위에 머리를 맡겼다
				PRINTFORML 이전부터 긴장이 풀렸는지, 허벅지의 부드러움을 확인 할 수 있었다

		ENDSELECT
	ELSE
		SELECTCASE RAND:7
			CASE 0 to 2
				PRINTFORML 「무릎 베개？득도함님이 해 주는 녀석？」
				PRINTFORML %마스터는% 그렇다고 대답하면(자)
				PRINTFORML 「자부탁 하는군―」
				PRINTFORML 이렇게 말해 뒹굴려고 하는 우츠호를 세워 우츠호가 하는 (분)편이라고 말하면(자)
				PRINTFORML 「네...?-그런 것 부끄럽게...」
				PRINTFORMW 그렇게 말하면서 무릎을 빌려 주었다
			CASE 3 to 5
				PRINTFORML 「, -？」
				PRINTFORML 우츠호의 무릎은 가치가치에 굳어지고 있어 그다지 마음은 좋지 않다
				PRINTFORML 「부끄러워...」
			CASEELSE
				PRINTFORML 「―...어루만지고 어루만지고」
				PRINTFORML 우츠호는 노력해 득도함님의 모방을 하고 있다
				PRINTFORML 기분이 좋아라고 하면(자) 빨간 얼굴이 되어 우츠호를 올려봐 버렸다…
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,お腹を撫でる
;TFLAG:193(1=ABL:친밀6以上かつ妊娠時 0=成功 -1=ABL:친밀5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K37_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
		IF CFLAG:318 == 1
			PRINTFORMW 「…？？」
			PRINTFORMW 「기분 나빠…여기는 즐겁지 않다…」
		ELSEIF TALENT:연인
			IF RAND:3 == 0
				PRINTFORMW 「어？배 나와？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「따로 손대어도 좋은데…즐겁다？」
			ELSE
				PRINTFORMW 「응-낯간지럽다！」
			ENDIF
		ELSEIF TALENT:연모
			IF RAND:3 == 0
				PRINTFORMW 「네-손대어―？좋지만―…」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「…배 어때？나오고 있다？」
			ELSE
				PRINTFORMW 「-익숙해지지 않는다！원는 한다！」
			ENDIF
		ELSEIF TALENT:사모
			IF RAND:3 == 0
				PRINTFORMW 「배？」
				PRINTFORMW 「네-와…아무튼 좋아！자―」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「거기 손대어！？네―？―？응―？」
			ELSE
				PRINTFORMW 「은-원는 한다…」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「거기는 별로 손대는 것이 아니야？린 말했다！」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「응―…―…」
			ELSE
				PRINTFORMW 「그런 일 하는 정도라면 하그 하자―」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,頬をつまむ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:연모(受け入れつつ笑顔でやり返す
	;ABL:친밀(6以上=おずおずとやり返す
	;ABL:순종(5以上=されるがまま
;==================================================
@M_KOJO_MESSAGE_COM_K37_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:수면
		PRINTDATA
			DATALIST
				DATAFORM
			ENDLIST
			DATALIST
				DATAFORM 「」
			ENDLIST
			DATALIST
				DATAFORM 「」
			ENDLIST
		ENDDATA
	;通常
	ELSE
		IF TALENT:연모
			PRINTDATA
				DATALIST
					DATAFORM
				ENDLIST
				DATALIST
					DATAFORM
				ENDLIST
				DATALIST
					DATAFORM
				ENDLIST
			ENDDATA
		ELSEIF ABL:친밀 > 5
			PRINTDATA
				DATALIST
					DATAFORM 「」
				ENDLIST
				DATALIST
					DATAFORM 「」

				ENDLIST
			ENDDATA
		ELSEIF ABL:순종 >= 5
			PRINTDATA
				DATALIST
					DATAFORM 「」
				ENDLIST
				DATALIST
					DATAFORM 「」

				ENDLIST
			ENDDATA
		ELSE
			PRINTDATA
				DATALIST
					DATAFORM 「」

				ENDLIST
				DATALIST
					DATAFORM 「」

				ENDLIST
			ENDDATA
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;308,頬をつつく
;添い寝中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;睡眠中
	IF CFLAG:수면
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;309,頭を撫でる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:친밀(6以上=通常成功時分岐
;==================================================
@M_KOJO_MESSAGE_COM_K37_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:수면
	;通常
	ELSE
		SELECTCASE TFLAG:193
		CASE 1
			IF TALENT:연인
				PRINTFORML 「응～응후후♪」
				PRINTFORMW 「기분 있고♪」
			ELSEIF ABL:친밀 > 20
				PRINTFORML 「은-...♪」
				PRINTFORMW  의지하도록(듯이) 자꾸자꾸 불어 간다...
				CFLAG:TARGET:신뢰도 += 100
			ELSE
				PRINTFORML 「어쩐지 침착한다...」
				PRINTFORMW 그렇게 말하면(자) 눈감아 릴렉스 하고 있다
			ENDIF
		CASE 0
			IF TALENT:연모
				PRINTFORML 「응- 좀 더 쓰다듬고 있고―」
				PRINTFORMW 그렇게 말해 눈을 치켜 뜨고 봄 나오고 산등성이다 했으므로 계속 잠시 어루만져 올렸다
			ELSEIF ABL:친밀 > 12
				PRINTFORML 우츠호는 무방비에 머리를 이쪽에 맡기고 있다
				PRINTFORMW 「후~～...침착한다～...♪」
			ELSE
				PRINTFORML 「응？머리를 어루만져」
				PRINTFORML %마스터는% 그렇다고 대답하면(자)
				PRINTFORML 「자 상냥하게 어루만져？」
				PRINTFORMW 그러한과 뒤두를 이쪽으로 향해%CALLNAME:MASTER%의 무릎에 승인가는 왔다
			ENDIF
		CASE -1
			IF ABL:친밀 > 5
				PRINTFORML 「아프다！―！」
				PRINTFORMW 머리카락에 손가락이 걸려 버렸다…
			ELSE
				PRINTFORML 「거기는 머리가 아니야!」
				PRINTFORMW %CALLNAME:MASTER%의 자연스럽게 가슴으로 이동하는 동작을 간파해진 것 같다…
			ENDIF
		ENDSELECT
	ENDIF

ENDIF
RETURN 1
;==================================================
;331,お茶を淹れる（薬入り）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 < 0
	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_K37_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_332_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;333,愚痴を聞く
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3
		;大成功
		CASE 2
		;成功
		CASE 1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,杯を交わす
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:임신자각상태(1=食事)
;TALENT:술내성(-2=食事)
;==================================================
@M_KOJO_MESSAGE_COM_K37_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_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_K37_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_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_K37_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 > 0
	;寝ちゃった
	ELSE
	;それ以外
	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_K37_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_350_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;351,連れ出す
;==================================================
@M_KOJO_MESSAGE_COM_K37_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K37_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_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_K37_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_352_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;353,イタズラする
;FLAG:생활능력무(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K37_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_353_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;355,時止め（地の文の改変程度に留めるべき
;==================================================
@M_KOJO_MESSAGE_COM_K37_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_355_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_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_K37_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;カウンターキス
	IF TCVAR:20 == 30
		IF RAND:2 == 0
			PRINTFORML 「기분 있고？좀 더 해버린다！」
			PRINTFORMW 「응―♪」
		ELSE
			PRINTFORML 「후~…♪」
			PRINTFORMW 「혀 넣어버린다？아직？」
		ENDIF
	;カウンターディープキス
	ELSEIF TCVAR:20 == 60
		IF RAND:3 == 0
			PRINTFORML 「…응……응―…♪」
			PRINTFORMW 「하……응후후♪」
		ELSEIF RAND:2 == 0
			PRINTFORML 「―♪！」
			PRINTFORMW 「응……―…♪」
		ELSE
			PRINTFORML 「하！기분-군요！」
			PRINTFORMW 「 좀 더 해―♪응…♪」
		ENDIF
	;カウンター騎乗位
	ELSEIF TCVAR:20 == 85
		IF RAND:3 == 0
			PRINTFORMW 「후~！기분―♪」
			PRINTFORMW 「%CALLNAME:MASTER%모모와 즐겨！」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「버릇이 되는군♪이 넣는 순간♪」
			PRINTFORMW 「이봐요 이봐요 허리 움직여버린다―？」
		ELSE
			PRINTFORML 「아무것도 하지 않는다고 (일)것은」
			PRINTFORMW 「 이제(벌써) 마음대로 해 버려서도 좋지요♪」
		ENDIF
	;これホールドね
	ELSEIF TCVAR:20 == 86
		IF RAND:6 == 0
			PRINTFORMW 「응이구나♪」
			PRINTFORMW 「낼 때까지 기분 좋아져♪」
		ELSEIF RAND:5 == 0
			PRINTFORMW 「기분 있고？」
			PRINTFORMW 「나온다？」
			PRINTFORMW 「자제 할 수 없다？」
			PRINTFORMW 「자…내면♪」
		ELSEIF RAND:4 == 0
			PRINTFORML 「몹시 실룩실룩 하고 있다…」
			PRINTFORMW 「 이제(벌써) 나와버리는 구나…♪」
			PRINTFORMW 「이봐요 내 버려―♪」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「어？저항하지 않는거야？」
			PRINTFORMW 「-응♪많이 내♪―♪」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「…이제(벌써) 나와버린다…」
			PRINTFORMW 「응―♪꼭 껴안아버린다♪빠르게 빠르게―♪」
		ELSE
			PRINTFORML 「 이제(벌써) 무슨 말해도」
			PRINTFORMW 「들리고 없다…♪」
			PRINTFORMW 「낼 때까지…♪」
		ENDIF
	;腰
	ELSEIF TCVAR:20 == 88
		IF RAND:3 == 0
			PRINTFORMW 「별로 움직이지 않는다？」
			PRINTFORMW 「우츠호가 좀 더 움직여♪」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「응♪네에에～」
			PRINTFORMW 「-？이 움직임！기분-겠지！」
		ELSE
			PRINTFORML 「움직이지 않는다면…」
			PRINTFORMW 「좋아하게 움직여버리는 것이군요―♪」
			PRINTFORMW 「응♪후~！후~…♪」
		ENDIF
		;MASTERの気力が0
		IF BASE:MASTER:기력 <= 0
			PRINTFORML 「후~…후~…」
			PRINTFORMW 「 좀 더 할 수 있지요？」
			PRINTFORMW 「대답 할 수 있다면 할 수 있는군！」
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;402,就寝
;==================================================
@M_KOJO_MESSAGE_COM_K37_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K37_402_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:수면(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K37_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_403_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;405,出掛ける(同行時デート
;条件が厄介なので、COMF405 出掛ける.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K37_405
;出掛けるにTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K37_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGETとデート
	IF CFLAG:동행
	;TARGET以外とデート
	ELSEIF CFLAG:MASTER:동행
	;お出かけお見送り
	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_K37_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K37_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
;	PRINTDATAL
;		DATAFORM 「鍛錬は継続が肝要。続けていれば大抵の事は成せるものですよ」
;		DATAFORM 「気力を保つコツは、普段から己の内側に気を配る事から始まります」
;		DATAFORM 「」
;	ENDDATA
;	PRINTFORMW
ENDIF
RETURN 1
;==================================================
;412,勉強
;ABL:교양(ABL:MASTER:교양より大=MASTERが教えてもらう ABL:MASTER:교양より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K37_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_412_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=デザート 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K37_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
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_K37_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_414_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;415,食事をふるまう
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=濃い味 bit1=薄味 bit3=激辛 bit4=激甘 bit5=わさび bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K37_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_415_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;416,演奏する
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:사용악기(1=キーボード 2=ピアノ 3=ギター 4=トランペット 5=ヴァイオリン)
;==================================================
@M_KOJO_MESSAGE_COM_K37_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K37_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_K37_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_417_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

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

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

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

ENDIF
RETURN 1
;==================================================
;432,お風呂でくつろぐ
;表示タイミングは入浴後なので、お風呂上がりでの
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;==================================================
@M_KOJO_MESSAGE_COM_K37_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_432_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;440,待つ
;==================================================
@M_KOJO_MESSAGE_COM_K37_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_440_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;441,授業を受ける(慧音専用
;==================================================
@M_KOJO_MESSAGE_COM_K37_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_441_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

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

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

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1

;==================================================
;602,デートキス
;==================================================
@M_KOJO_MESSAGE_COM_K37_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_602_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

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

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

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

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1

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

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

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

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

ENDIF
RETURN 1
;==================================================
;615,お弁当を食べる
;実行可能場所　お地蔵通り,枝垂れ柳の下,霧の湖,玄武の沢,大蝦蟇の池,絶景の丘,山の湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:요리기능(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_MESSAGE_COM_K37_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_615_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_MESSAGE_COM_K37_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_617_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_MESSAGE_COM_K37_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_618_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;620,鈴奈庵
;TFLAG:193(1=貸し出しOK 0=貸し出し不可
;ITEM:10X (X=1戦術指南書 X=2調理指南書 X=3字引 X=4御伽草子
;==================================================
@M_KOJO_MESSAGE_COM_K37_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_620_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;660,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=薄い高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K37_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_660_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;698,部屋に入る
;TARGETの部屋に入る場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K37_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_698_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;699,外に出る
;==================================================
@M_KOJO_MESSAGE_COM_K37_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K37_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,耳かき
;前ターン膝枕後スキンシップコマンド
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_MESSAGE_SCOM_K37_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K37_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K37_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;61,抱きまくら
;(TARGET睡眠時間or衰弱)添い寝中、前ターン抱きつく後就寝コマンド
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K37_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K37_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K37_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;62,デコちゅー
;前ターン頭撫で後キスする
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:욕망(5以上=物足りない
;ABL:친밀(5以上=照れる
;==================================================
@M_KOJO_MESSAGE_SCOM_K37_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K37_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K37_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,もっとキスする
;前ターンキスする後キスする
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_MESSAGE_SCOM_K37_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K37_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K37_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,手を引く
;デート出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_SCOM_K37_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K37_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K37_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1