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

@M_KOJO_MESSAGE_COM_K65_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;怒り
	IF CFLAG:빡침 > 0
		PRINTFORML 「……그렇습니까」
		PRINTFORMW 모미지는 외면하고 있다.

	;荒天かつ屋外
	;この分岐が活きるタイミングってほぼほぼないんじゃなかろうか
	ELSEIF GROUPMATCH(TIME:5,5,9,13) && OUTROOF(CFLAG:MASTER:현재위치)
		PRINTFORMW 「이, 이런 날씨에 굳이 밖에서 이야기를 하지 않아도 된다고요！」

	;発情
	ELSEIF TCVAR:발정
		IF CFLAG:기정사실 & 合意_うふふ
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「그러니까. 저기…」
					PRINTFORMW 모미지는 무엇인가를 호소하는 듯한 시선을 %CALLNAME:MASTER%에게 보내고 있다…
				CASE 1
					PRINTFORML 「……앗…무, 무슨 이야기였죠？」
					PRINTFORML 모미지는 건성으로 %CALLNAME:MASTER%의 이야기를 듣고 있다.
					PRINTFORMW …때때로 시선이 이쪽 사타구니를 향하는 것은 기분탓일까.
			ENDSELECT
		;ELSEIF CFLAG:65:호감도 >= 1500
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「응, 응……」
					PRINTFORMW 모미지는 침착하지 못한 모습이다…
				CASE 1
					PRINTFORML 「……앗…무, 무슨 이야기였죠？」
					PRINTFORMW 모미지는 건성으로 %CALLNAME:MASTER%의 이야기를 듣고 있다…
			ENDSELECT
		ENDIF
	;添い寝中
	;ELSEIF CFLAG:동침중

	;デート中

	;大成功
	ELSEIF TFLAG:193 == 1
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「그래서 말이죠…」
				PRINTFORMW 모미지는 꼬리를 파닥파닥 흔들며, 즐거운 듯이 말을 이었다.
			CASE 1
				PRINTFORML 「아하하핫」
				PRINTFORMW 「그 농담, 다음에 제가 사용해도 되나요？」
		ENDSELECT

	;会話累積値が閾値を超えての失敗
	ELSEIF TCVAR:302
		PRINTFORML 「…으음, 그렇습니까？」
		PRINTFORMW 같은 이야기를 몇번이나 들어서, 모미지는 지루해 하고 있다…

	;失敗
	ELSEIF TFLAG:193 < 0
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「아, 아하하…」
				PRINTFORMW 모미지는 어색하게 웃고 있다…
			CASE 1
				PRINTFORML 「……아, 으음 그…」
				PRINTFORMW 모미지는 화제를 찾기 위해 허둥지둥거리고 있다.
		ENDSELECT

	;お仕事中 (1/2で普通のトークへ逃がす)
	ELSEIF CFLAG:행동 == 5 && RAND:2 == 0
		;おなかたぷたぷ
		IF EX:질내정액 + EX:애널내정액 >= 100
			;自覚あり
			IF TCVAR:350
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML （뱃속이…아직도, 뜨거워…）
						PRINTFORMW ……모미지는 마음이 딴 곳에 가버린 듯이 서 있다.
					CASE 1
						PRINTFORML （평소보다, 다른 사람의 시선이 신경쓰여……）
						PRINTFORML 가득 쏟아진 정액의 악취를 신경쓰고 있는지,
						PRINTFORMW 모미지는 %CALLNAME:MASTER%와 대화하고 있는 동안에도 주위를 힐끗힐끗 확인하고 있었다…
					CASE 2
						PRINTFORML 「…너무해요. 오늘은, 제가 일이 있는 날이었는데…」
						PRINTFORML 모미지는 원망하는 듯한 시선을 %CALLNAME:MASTER%에게 보내고 있다.
						PRINTFORMW ……%CALLNAME:MASTER%(이)가 가만히 쳐다보자, 모미지는 새빨개져서 고개를 숙였다.
				ENDSELECT
			;自覚なし
			ELSE
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「………」
						PRINTFORMW 모미지는 주위를 경계하고 있는 것 같다…
					CASE 1
						PRINTFORML 「……평소와 달리 살기등등하다…？제가, 말인가요？」
						PRINTFORMW 「…죄송합니다, 조금…응읏…신경 쓰이는 일이, 있어서…」
				ENDSELECT
			ENDIF
		ELSE
			SELECTCASE RAND:5
				CASE 0
				PRINTFORMW 「오늘도 이상무！, 군요」
				CASE 1
					PRINTFORML 「초계하는 일은 꽤 한가한 시간이 많네요」
					PRINTFORMW 「이렇게 대화할 상대가 있다는건 감사하죠」
				CASE 2
					PRINTFORML 「초계중에 천리안으로 한눈팔기요…？」
					PRINTFORMW 「아, 안해요！안한다고요！」
				CASE 3
					PRINTFORMW 「사실, 악의적으로 산에 오는 사람은 거의 없답니다？」
				CASE 4
					PRINTFORMW 「%CALLNAME:MASTER%씨는 등산을 좋아하시나요?」
			ENDSELECT
		ENDIF
	;RANDで並列にする普通のトーク
	;5.お酒が入っていい気分トーク
	ELSEIF BASE:술기운 >= 400 && RAND:5 == 0
		IF CFLAG:기정사실 & 合意_うふふ && EXP:정액경험 >= 20 && RAND:2
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「그러고 보니, 예전에 술자리에서 %CALLNAME:MASTER%씨의 이야기가 화제가 되었던 적이 있었습니다만…」
					PRINTFORMW 「…아」
					PRINTFORML 「………」
					PRINTFORML 「그러니까…제 동료인 백랑텐구가 뭔가 폐를 끼쳤다거나…하진 않죠, 그렇죠！아하하…」
					PRINTFORML 모미지는 어쩐지 검연쩍은 듯이 웃고 있다.
					PRINTFORMW …어떤 일로 화제가 되었던 것일까.
				CASE 1
					PRINTFORML 「후우, 조금, 취해버렸습니다아…」
					PRINTFORML 「%CALLNAME:MASTER%씨가 상대라고, 저도 모르게 마음이 해이해져 버렸네요…」
					IF TALENT:연인 && RAND:2
						PRINTFORMW 그녀는 그녀 나름대로 고생하고 있는 것이겠지…%마스터는%, 모미지의 머리를 부드럽게 어루만져 주었다.
						CALL HPH_PRINT,@"「읏, 응응…HPH…후후. 기분, 좋네요…」","L"
						PRINTFORMW 「좀 더, 어리광을 부려도…괜찮겠죠…？」
					ELSE
						PRINTFORMW 모미지는 볼을 물들이면서 %CALLNAME:MASTER%에게 미소를 던졌다.
					ENDIF
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「후후, 꽤 기분이 좋아졌네요…」
					PRINTFORMW 기운으로 발그스름한 모미지가 기분 좋다는 듯이 웃고 있다.
				CASE 1
					;晴れた夜
					IF GROUPMATCH(TIME:5,0,1) && TIME:2 >= 5 && TIME:2 <= 7
						PRINTFORMW 「달맞이 한 잔, 이라는 것도 풍류로 좋네요」
					ELSEIF GROUPMATCH(TIME:5,8,10,11)
						PRINTFORMW 「우우-응, 역시 설경을 즐기며 술을 마시는 것은 좋네요…」
					ELSE
						PRINTFORMW 「%CALLNAME:MASTER%씨와 이야기를 하면서 한 잔 기울인다는 것도, 좋네요…」
					ENDIF
			ENDSELECT
		ENDIF
	;4.お天気トーク
	ELSEIF RAND:4 == 0
		SELECTCASE TIME:5
			;晴れ,快晴
			CASE 0,1
				SELECTCASE RAND:2
					CASE 0
						IF TIME:2 >= 5 && TIME:2 <= 7
							PRINTFORMW 「별이 가득한 하늘을 올려다보는 것도 상당히 좋아해요」
						ELSE
							PRINTFORMW 「날씨가 좋으니 기분도 좋아지네요」
						ENDIF
					CASE 1
						PRINTFORML 「후와아…」
						PRINTFORML 모미지는 입가를 누르고, 귀엽게 하품을 했다.
						PRINTFORMW 「아, 죄송합니다, 날씨가 좋아서 그만…」
				ENDSELECT
			;薄曇り
			CASE 2
				IF TIME:2 >= 5 && TIME:2 <= 7
					PRINTFORMW 「엷게 흐린 하늘에 떠있는 달, 이라는 것도 좋네요」
					SIF CFLAG:2 >= 1000
						PRINTFORMW 「…모처럼이니까, 달맞이주는 어떤가요？」
				ELSE
					PRINTFORMW 「왠지 미묘한 날씨네요…」
				ENDIF
			;曇り
			CASE 3
				SELECTCASE RAND:2
					CASE 0
						IF TIME:2 >= 5 && TIME:2 <= 7
							PRINTFORMW 「이렇게 구름이 끼어 있으면, 밤하늘도 보이지 않네요」
						ELSE
							PRINTFORMW 「잔뜩 흐려졌네요―」
						ENDIF
					CASE 1
						PRINTFORML 「내리지 않았으면 좋겠습니다만…」
						PRINTFORMW 모미지는 흐린 하늘을 올려다보고 있다.
				ENDSELECT
			;雨、大雨、霧雨
			CASE 4,5,6
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「제법 많이 오네요…」
					CASE 1
						PRINTFORMW 「비가 오면, 외출하기도 귀찮네요…」
					CASE 2
						IF DAY:5 == 5
							PRINTFORMW 「정말, 하늘에 구멍이라도 뚫린 것 같은 비네요…」
						ELSE
							PRINTFORMW 「너무 습하면 꼬리가 눅눅해집니다」
						ENDIF
				ENDSELECT
			;霧
			CASE 7
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「꽤 짙은 안개가 끼어 있네요」
						PRINTFORMW 「발밑을 조심하도록 하세요, %CALLNAME:MASTER%씨」
					CASE 1
						PRINTFORML 「저요？이 정도의 안개면 전혀 문제 없습니다」
						PRINTFORML 「백랑텐구의 천리안은 폼이 아니라고요！」
						PRINTFORM 화는
						SIF TALENT:가슴사이즈 > 0
							PRINTFORM 자그마한 체구에 걸맞지 않게 푸짐하게 여문
						SIF TALENT:가슴사이즈 < 0
							PRINTFORM 자그마한 체구에 어울리는 빈약한
						SIF TALENT:가슴사이즈 == 0
							PRINTFORM 자그마한 체격에 비해 발육이 좋은
						PRINTFORMW 가슴을 폈다.
				ENDSELECT
			;雪、細雪、霧雪
			CASE 8,10,11
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「눈이 내리고 있으면, 이상하게도 가슴이 두근거려요」
						PRINTFORMW 「…어째서일까요」
					CASE 1
						PRINTFORML 「내리는 상태를 보니, 나중에 눈을 치워야겠네요」
						PRINTFORMW 모미지는 왠지 즐거운 듯 하다….
				ENDSELECT
			;吹雪
			CASE 9
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「눈이 내리고 있으면, 이상하게도 가슴이 두근거려요」
						PRINTFORMW 「…어째서일까요」
					CASE 1
						PRINTFORML 「눈보라가 치네요…」
						PRINTFORMW 「조난자가 나오거나 하지 않으면 좋겠는데 말이죠」
				ENDSELECT
			;みぞれ
			CASE 12
				PRINTFORML 「진눈깨비인가요」
				PRINTFORMW 「아무도 모르게 눈이 되어 주지 않으시겠나요…」
			;あられ
			CASE 13
				PRINTFORML 「우와아, 싸라기눈이 내리고 있네요…」
				PRINTFORMW 「지금은 외출하지 않는 것이 좋을 것 같네요…」
		ENDSELECT
	;3.季節トーク
	ELSEIF RAND:3 == 0
		SELECTCASE DAY:2
			;春
			CASE 1
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「봄이 되면, 산의 다양한 곳에서 차례차례 꽃이 피어납니다」
						PRINTFORML 「같은 꽃이라도, 자라는 곳에 따라 피는 타이밍이 다르기도 하고…」
						PRINTFORMW 「초계중의 자그마한 즐거움이에요」
					CASE 1
						PRINTFORMW 「덥지도 않고 춥지도 않은 시기는 좋지요」
				ENDSELECT
			;夏
			CASE 2
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「산기슭의 캇파들이 있는 곳에서, 이따금 오이를 대접 받습니다」
						PRINTFORMW 「저습지에서 서늘하게 한 오이는 그야말로 일품이랍니다」
					CASE 1
						PRINTFORML 「덥네요오―…」
						PRINTFORMW 모미지의 꼬리는 힘없이 늘어져 있다.
				ENDSELECT
			;秋
			CASE 3
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「산이 물들기 시작하니, 드디어 가을이라는 느낌이네요」
						PRINTFORMW 「초계중에 한눈팔…지 않아요！안 했다고요！」
					CASE 1
						PRINTFORML 「가을은 좋네요. 보내기 좋고, 무엇보다 음식이 맛있어서」
						PRINTFORMW 「후후, 오늘 안주는 뭘로 하면 좋을까요…」
				ENDSELECT
			;冬
			CASE 4
				SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「초계하는 일로 익숙해져 있다고는 해도, 역시 추운 것은 춥네요…」
					CASE 1
						PRINTFORMW 「건조해지면, 꼬리에 정전기가 일어나서…」
				ENDSELECT
		ENDSELECT
	;2.親密トーク
	ELSEIF RAND:2 == 0 && CFLAG:2 >=1000
		SELECTCASE RAND:5
			CASE 0
				IF BASE:MASTER:TSP >= 1000
					PRINTFORML 「그러고보니, 당신은 가끔 순간이동？을 하고 있죠…」
					PRINTFORML 「무슨 특별한 술이라도 쓰고 있으신가요？」
					PRINTFORMW …쓸데없는 추궁을 당하면 귀찮기 때문에, 적당히 얼버무렸다.
				ELSE
					PRINTFORMW 「솔직히 말하면, 초계 일은 굉장히 한가하네요…」
			ENDIF
			CASE 1
				PRINTFORML 「솔직히 말하면, 초계 일은 굉장히 한가해요…」
				PRINTFORMW 「앞으로도 말동무가 되어 주세요？」
			CASE 2
				PRINTFORML 「아야……씨 말인가요？우응, 저, 그…」
				PRINTFORMW 모미지는 말끝을 흐리고 있다.
			CASE 3
				PRINTFORML 「니토리 말인가요？네, 사이좋게 지내고 있답니다」
				PRINTFORMW 「가끔, 터무니 없는 발명품의 테스트에 어울려지는 것은 곤란합니다만…」
			CASE 4
				PRINTFORML 「하타테…씨 말인가요？으음, 저, 뭐라고 해야 하나…」
				PRINTFORMW 모미지는 말끝을 흐리고 있다.
		ENDSELECT
	;1.通常トーク
	ELSE
		SELECTCASE RAND:6
			CASE 0
				PRINTFORML 「앗！잠깐 실례하겠습니다」
				PRINTFORML 모미지는 품에서 수첩을 꺼내더니, 서둘러 뭔가를 쓰기 시작했다…
				PRINTFORMW 「아뇨, 장기의 새로운 규칙이 떠올라서 말이죠」
			CASE 1
				PRINTFORML 「캇파들과 자주 장기를 두거든요」
				PRINTFORMW 「가능한 한 오래 즐길 수 있도록, 독자적인 룰을 만들고 있습니다」
			CASE 2
				PRINTFORML 「초계하는 일은 천리안과 코를 살릴 수 있기 때문에,
				PRINTFORMW 　저 같은 백랑텐구에게는 딱 좋죠」
			CASE 3
				PRINTFORMW 「저도 텐구이기 때문에, 어지간한 요괴 상대에게 뒤처지지는 않다고요！」
			CASE 4
				PRINTFORMW 「요즘은 큰 소동도 없고, 평화롭네요」
			CASE 5
				PRINTFORMW 「예전에 산에서 큰 소란이 있었는데 말이죠…」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,お茶を淹れる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K65_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:빡침 > 0
		PRINTFORML 「…감사합니다」
		PRINTFORMW 모미지는 말없이 당신이 달인 차를 홀짝거리고 있다.
	;仕事中
	ELSEIF CFLAG:행동 == 5
		SELECTCASE RAND:2
			CASE 0
			PRINTFORMW 「감사합니다. 이 일은, 상당히 갈증이 나네요…」
			CASE 1
			PRINTFORML 「아, 감사합니다」
			PRINTFORMW 「모처럼이니까, 이 근처에서 잠깐 쉬도록 할까요」
		ENDSELECT
	ELSE
		;大成功
		IF TFLAG:193 == 1
			SELECTCASE RAND:2
				CASE 0
				PRINTFORML 「좋은 냄새네요…」
				PRINTFORML 「이렇게 맡고만 있어도 행복한 기분이 듭니다」
				PRINTFORMW 모미지는 멍하니 눈을 감은 체, 그윽한 차향을 즐기고 있다.
				CASE 1
				PRINTFORML 「차인가요？감사합니다」
				PRINTFORML 「……굉장히 맛있습니다」
				PRINTFORMW 「달이는 방법에 뭔가 요령이 있으신가요？」
			ENDSELECT
		;失敗
		ELSEIF TFLAG:193 == -1
		PRINTFORML 「차인가요？감사합니다」
		PRINTFORML 「……긋！？…콜록콜록…」
		PRINTFORMW 모미지는 차에 입을 대는 순간, 목이 메어버린 것 같다…
		;成功
		ELSE
			SELECTCASE RAND:2
				CASE 0
				PRINTFORMW 「차인가요？감사합니다」
				CASE 1
				PRINTFORML 「아, 죄송합니다, 잘 먹겠습니다…」
				PRINTFORMW 모미지는 공손하게 찻잔을 받아, 차를 홀짝거리기 시작했다.
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;302,スキンシップ
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K65_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:빡침 > 0
		PRINTFORMW 당신이 손을 떧자, 모미지는 재빨리 물러났다.
	ELSEIF TCVAR:발정
		IF CFLAG:기정사실 & 合意_うふふ && ABL:욕망 > 3
			SELECTCASE RAND:4
				CASE 0
					PRINTFORML 연분홍색으로 물든 모미지의 뺨을 어루만지자, 갑자기 모미지는 %CALLNAME:MASTER%의 손가락을 입에 물었다.
					CALL HPH_PRINT,@"「읏…하붓, 아무, 츗, 츄우…HPH」","L"
					PRINTFORMW 모미지는 뜨거운 한숨을 내쉬면서, 물기를 띤 눈빛을 보내왔다…
				CASE 1
					CALL HPH_PRINT,@"「응우…HPH %CALLNAME:MASTER%씨…HPH」","W"
				CASE 2
					CALL HPH_PRINT,@"「에헤헤, %CALLNAME:MASTER%씨…HPH」","W"
					PRINTFORMW 모미지는 %CALLNAME:MASTER%에게 기댄 채, 몸을 비비고 있다…
				CASE 3
					PRINTFORML 모미지의 허를 찔러 꼬리를 만져 보았다.
					CALL HPH_PRINT,@"「후아아앗…HPH」","L"
					PRINTFORML 「정말…어째서 소리를 내게 하는 건가요…」
					PRINTFORMW 비난하는 말과 달리, 모미지는 애정에 대한 기대에 꼬리를 흔들고 있다.
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「저저저저, 저기잇！지금은 너무 가까이 다가오지 말아 주세요！！」
					PRINTFORMW 모미지는 새빨갛게 달아올라 있다…
				CASE 1
					PRINTFORML 모미지의 허를 찔러 꼬리를 만져 보았다.
					CALL HPH_PRINT,@"「후아아앗…HPH」","L"
					PRINTFORML
					PRINTFORMW 그 후 메챠쿠챠 야단맞았다.
			ENDSELECT
		ENDIF
	ELSE
		;大成功
		IF TFLAG:193 == 1
			PRINTFORML 「어깨를 주물러 주겠다고요？그럼, 호의를 받아들이고…」
			PRINTFORML ………
			PRINTFORMW 「어쩐지 어깨가 가벼워진 느낌이 듭니다. 감사합니다」
		;失敗
		ELSEIF TFLAG:193 == -1
			SELECTCASE RAND:2
				CASE 0
				PRINTFORML 「어깨를 주물러 주겠다고요？응, 그럼, 호의를 받아들이고…」
				PRINTFORML ………
				PRINTFORMW 「햐아！？읏, 아, 간지럽, 다고요！그만둬주세요！」
				CASE 1
				PRINTFORML 모미지의 허를 찔러 꼬리를 만져 보았다.
				PRINTFORML 「히야아아아앗！？」
				PRINTFORML
				PRINTFORMW 그 후 메챠쿠챠 야단맞았다.
			ENDSELECT
		;成功
		ELSE
			;IF TALENT:연인
			;まだ
			IF TALENT:연모
				SELECTCASE RAND:4
					CASE 0
						PRINTFORML %마스터는% 모미지의 손을 만져 보았다.
						PRINTFORML 「아…」
						PRINTFORMW 「%CALLNAME:MASTER%씨의 손, 따뜻하네요…」
					CASE 1
						PRINTFORML 「음, 그렇게 만지면 좀 간지럽는데요…」
						PRINTFORML 「……정말. 반격해 버릴 거라고요？에잇」
						PRINTFORMW %CALLNAME:MASTER%와 모미지는 잠시 동안 장난을 치고 놀았다…
					CASE 2
						PRINTFORML 「귀를 만지고 싶으신가요？」
						PRINTFORMW 「상냥하게 만져주세요…」
					CASE 3
						PRINTFORML 「어떻게든 만지고 싶으신가요？꼬리…」
						PRINTFORMW 「……민감한 부분이니까, 주의 깊게 다루어 주세요」
				ENDSELECT
			ELSEIF TALENT:사모
				SELECTCASE RAND:4
					CASE 0
						PRINTFORML %마스터는% 모미지의 손을 만져 보았다.
						PRINTFORML 「아…」
						PRINTFORMW 「%CALLNAME:MASTER%씨의 손, 따뜻하네요…」
					CASE 1
						PRINTFORML 「음, 그렇게 만지면 좀 간지럽는데요…」
						PRINTFORML 「너무 장난치면, 반격해 버릴 거라고요？」
						PRINTFORMW 모미지는 입술을 삐죽거리면서도 즐거운 듯이 웃고 있다.
					CASE 2
						PRINTFORML 「귀를 만지고 싶으신가요？」
						PRINTFORMW 「상냥하게 만져주세요」
					CASE 3
						PRINTFORML 「어떻게든 만지고 싶으신가요？꼬리…」
						PRINTFORMW 「……여, 역시 안됩니다」
				ENDSELECT
			;親密>=4のとき口上追加
			ELSEIF ABL:친밀 >= 4 && RAND:2 == 0
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「어떻게든 만지고 싶으신가요？꼬리…」
						PRINTFORMW 「……여, 역시 안됩니다」
					CASE 1
						PRINTFORML 「귀를 만지고 싶으신가요？」
						PRINTFORMW 「괜찮은데…너무 세게 만지지는 말아주세요？」
				ENDSELECT
				RETURN 1
			ELSE
				SELECTCASE RAND:3
					CASE 0
					PRINTFORML %마스터는% 모미지의 손을 만져 보았다.
					PRINTFORMW 「손 말인가요？특별히 달라진 점은 없다고 생각하는데요」
					CASE 1
					PRINTFORMW 「응응, 그렇게 만지면 좀 간지러워요」
					CASE 2
					PRINTFORML 모미지의 꼬리에 닿으려고 손을 뻗어 보았으나, 모미지는 몸을 슬쩍 피했다.
					PRINTFORMW 「앗……꼬리는, 그…」
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,謝る
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;カーソルが目的のコマンドからズレて怒らせちゃうことありますよね
;スキンシップのつもりが尻撫でになっちゃったり
;==================================================
@M_KOJO_MESSAGE_COM_K65_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;菓子折成功
	IF TFLAG:193 == 2
		PRINTFORML 「뭐, 지난 일을 이러쿵저러쿵해봤자 소용없으니까요」
		PRINTFORMW 「이번 일은, 이것으로 서로 잊어 버리도록 하죠」
	;菓子折失敗
	ELSEIF TFLAG:193 == -2
		PRINTFORMW 「물건을 받았다던가 받지 않았다던가, 그런 것이 아니라고요…」
	;失敗
	ELSEIF TFLAG:193 == -1
		PRINTFORMW 「…정말로 반성하고 있으신건가요？」
	;成功
	ELSE
		PRINTFORML 「반성하는 마음 잘 알겠습니다」
		PRINTFORMW 「앞으로는 조심해 주세요？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;304,仕事を手伝う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:도울수없다(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;椛の哨戒もTCVAR:도울수없다 = 2である
;==================================================
@M_KOJO_MESSAGE_COM_K65_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	;不可
	IF FLAG:70
	;おなかたぷたぷ
	ELSEIF EX:질내정액 + EX:애널내정액 >= 100
		;自覚あり
		IF TCVAR:350
			SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「…하아~」
						PRINTFORML 「일에 집중하지 못하고 있습니다…」
						PRINTFORML 「도대체, 뭐 때문일까요…？」
						PRINTFORMW 모미지는 %CALLNAME:MASTER%(을)를 곁눈질로 보면서 중얼거렸다.
					CASE 1
						PRINTFORMW 모미지는 볼을 상기시키고, 안절부절못하는 듯이 눈을 굴리고 있다…
					CASE 2
						PRINTFORML 「…우, 죄송합니다, 잠깐 화장실에…」
						PRINTFORMW 모미지는 휘청휘청 걸어갔다.
						PRINTFORMW …넘쳐 나온 백탁액이, 치맛자락에서 힐끗힐끗 보이고 있었다.
				ENDSELECT
		;自覚なし
		ELSE
			PRINTFORML (적？아니면, 괴이…？)
			PRINTFORMW 모미지는 초조한 모습으로 주위를 둘러보고 있다.
		ENDIF
	;通常
	;大成功
	ELSEIF TFLAG:193 == 1
		SELECTCASE RAND:2
			CASE 0
			PRINTFORML 「확실히, 이 나무는 조만간 쓰러질 것 같네요…」
			PRINTFORMW 「위에 보고해 두도록 하겠습니다. 지적 감사합니다」
			CASE 1
			PRINTFORML 나무들 사이로 사람 모습이 보였기에, 모미지에게 확인해 보라고 했다.
			PRINTFORML 「……정말이네요, 저쪽에는 텐구의 거처가…」
			PRINTFORML 「감사합니다」
			PRINTFORMW 「잠시 이야기를 하고 올 테니, 당신은 여기서 기다려 주세요」
		ENDSELECT

	;失敗
	ELSEIF TFLAG:193 == -1
		SELECTCASE RAND:2
			CASE 0
			PRINTFORML 나무뿌리에 발이 걸려 넘어지고 말았다…
			PRINTFORMW 「앗, 괜찮으신가요！？」
			CASE 1
			PRINTFORML 나무들 사이로 사람 모습이 보였기에, 모미지에게 확인해 보라고 했다.
			PRINTFORMW 「……아마, 고목이나 다른 무언가를 잘못 본 것이 아닐까요」
		ENDSELECT
	;成功
	ELSE
		SELECTCASE RAND:4
			CASE 0
			PRINTFORMW 「오늘도 평화롭네요―」
			CASE 1
			PRINTFORMW 「위험할 것 같은 장소가 있다면 가르쳐 주세요」
			CASE 2
			PRINTFORML 「가끔, 마을 사람들이 산림 속을 헤치고 들어와요」
			PRINTFORMW 「산나물을 뜯기 위해서라거나 그냥 담력시험이라거나, 이유는 여러가지 입니다만…」
			CASE 3
			PRINTFORML 「산림의 보전, 침입자의 발견, 조난자의 구호…그리고, 텐구의 시위」
			PRINTFORMW 「이 초계의 일에도, 상당히 여러가지 목적이 있답니다」
		ENDSELECT
	ENDIF

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_K65_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF ABL:친밀 > 5 && RAND:2 == 0
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「얏…그런 식으로 머리를 쓰다듬으면, 간지러워요…아하, 아하하하！」
				PRINTFORMW 모미지는 스멀스멀 다리를 움직이며 칭얼거리고 있지만, 서로 장난치는 것을 즐기고 있는 것 같다…
			CASE 1
				IF TALENT:연인
					PRINTFORML 「에헤헤, 이러고 있으면 정말 연인 같아서 좋네요」
					PRINTFORML 「%CALLNAME:MASTER%씨, 기분 좋으면 이대로 잠들어도 괜찮다고요？」
					PRINTFORMW 「그런다면, %CALLNAME:MASTER%씨의 사랑스러운 자는 모습을 볼 수 있죠, 후훗…」
				ELSEIF TALENT:연모
					PRINTFORML 「……이건 건, 왠지 연인 사이 같네요」
					PRINTFORMW 「아, 아뇨, 깊은 의미는 없습니다만…」
				ELSE
					PRINTFORML 「…이러고 있으면, 왠지 \@ TALENT:MASTER:성별 == 2 ? 남동생 # 여동생 \@이 생긴 것 같은 기분이 드네요」
					PRINTFORMW 「착한 아이구나―…라니, 후후…」
				ENDIF
		ENDSELECT
	ELSEIF CFLAG:호감도 > 999 || ABL:친밀 > 2
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「%CALLNAME:MASTER%씨는 이렇게 하면 재미있으신가요？」
				PRINTFORMW 「저는…뭐, 우―응…비밀이랍니다♪」
			CASE 1
				PRINTFORMW （이렇게 쓰다듬는 동안, %CALLNAME:MASTER%씨는 정말 기쁜 얼굴을 하고 있네…）
		ENDSELECT
	ELSE
		PRINTFORMW 「이런 것은, 조금 부끄럽네요…」
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,お腹を撫でる
;TFLAG:193(1=ABL:친밀6以上かつ妊娠時 0=成功 -1=ABL:친밀5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K65_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,頬をつまむ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:연모(受け入れつつ笑顔でやり返す
	;ABL:친밀(6以上=おずおずとやり返す
	;ABL:순종(5以上=されるがまま
;==================================================
@M_KOJO_MESSAGE_COM_K65_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:수면
	;通常
	ELSE
	ENDIF

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

@M_KOJO_MESSAGE_COM_K65_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_K65_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70

	;睡眠中
	ELSEIF CFLAG:수면

	;初めて
	ELSEIF FIRSTTIME(SELECTCOM)
		PRINTFORML 「왓…가, 갑자기 무슨…」
		PRINTFORML 갑자기 머리를 쓰다듬자, 모미지는 당황한 기색으로 몸을 뺐다.
		PRINTFORMW 「저기, 딱히 싫어하는 것은 아니지만, 그런 짓을 할거면 먼저 말해 주세요…」
	;通常
	ELSE
		;失敗
		IF TFLAG:193 == -1
			IF TCVAR:발정
				PRINTFORML 「지, 지금은 안된다고요！」
				PRINTFORML %마스터는% 모미지에게 냅다 말쳐져 버렸다.
				PRINTFORMW 「아, 그, 죄송해요…」
			ELSEIF TALENT:연인
				PRINTFORMW 「아, 머리를 헝클어 놓지 말아 주세요」
			ELSEIF ABL:친밀 > 5
				SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「머리가 헝클어진다고요…」
					CASE 1
						PRINTFORMW 「아, 부끄러우니까…」
				ENDSELECT
			ELSE
				PRINTFORMW 「적당히 만지작거리세요」
			ENDIF
		ELSE
			IF TALENT:연인 && TCVAR:발정
				SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「그런, 애태우지 말아주세요…」
					CASE 1
						PRINTFORML 「%CALLNAME:MASTER%씨는 심술쟁이…」
						PRINTFORMW 모미지는 욕정에 불타는 눈으로 %CALLNAME:MASTER%(을)를 응시하고 있다.
				ENDSELECT
			ELSEIF ABL:친밀 > 5
				IF TCVAR:발정
					IF CFLAG:기정사실 & 合意_うふふ && ABL:욕망 > 3
						SELECTCASE RAND:2
							CASE 0
								CALL HPH_PRINT,@"「응…HPH」","L"
								PRINTFORMW 머리를 쓰다듬으면, 모미지는 뺨을 물들이고 %CALLNAME:MASTER%에게 기대어 왔다.
							CASE 1
								PRINTFORML 「저기, %CALLNAME:MASTER%씨…머리만으로는, 부족해요…」
								PRINTFORMW 모미지는 %CALLNAME:MASTER%의 손을 잡고, 천천히 얽혀 온다…
						ENDSELECT
					ELSE
						SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「저기, 그러니까아…」
								PRINTFORMW 「아뇨, 아무것도 아닙니다…」
							CASE 1
								PRINTFORML 「아, 우우…」
								PRINTFORMW 모미지는 새빨개져서 고개를 숙이고 있다.
						ENDSELECT
					ENDIF
				ELSE
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「쓰다듬는 거, 능숙하시네요…」
							PRINTFORMW 모미지는 기분 좋은 듯이 눈을 가늘게 뜨고 있다.
						CASE 1
							PRINTFORML 「응응, 귀는 조금 간지러워요…」
							PRINTFORMW 「아뇨, 괜찮습니다. 그냥 계속해 주세요…」
						CASE 2
							PRINTFORML 「후후, 기분 좋네요」
							PRINTFORML 모미지는 작은 동물과 같이 %CALLNAME:MASTER%의 손에 머리를 비비고 있다.
							PRINTFORMW …본인에게 자각은 없는 것 같지만.
					ENDSELECT
				ENDIF
			ELSE
				IF TCVAR:발정
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「그, 그만둬 주세요…」
						CASE 1
							PRINTFORML 「아, 우우…」
							PRINTFORMW 모미지는 새빨개져서 고개를 숙이고 있다.
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「역시 조금 부끄럽네요…」
						CASE 1
							PRINTFORML 「우우…이래 봬도 전, 텐구라고요」
							PRINTFORMW 모미지는 입술을 삐죽거리고 있다.
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	ENDIF

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

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

	PRINTFORML 차를 내밀자, 모미지는 킁킁 코를 울리며 냄새를 확인했다.
	PRINTFORMW 「응…어쩐지, 평소의 차와는 냄새가 다르네요…」
	PRINTFORML
	PRINTFORM 「약을 달인 차인가요.
		IF TFLAG:193 == 1
			PRINTFORML 그렇지만, 저처럼 코가 민감하지 않으면 할 수 없을 정도의 미묘한 차이입니다」
			PRINTFORMW 「연구를 많이 하신건가요？이렇게까지 위화감 없이 완성할 수 있다니…」
		ELSE
			PRINTFORMW 달일 때, 약초나 무언가를 섞은 거죠？」
		ENDIF
	PRINTFORML
	;失敗
	IF TFLAG:193 == -1
		PRINTFORML 「…저기, 모처럼 달여 주셨는데 죄송합니다만」
		PRINTFORML 「저, 이것이 조금 거북해서 말이죠…」
		PRINTFORMW 「죄송합니다, 다음에 또 기회가 된다면 부탁드릴게요」
		RETURN 1
	ELSE
		PRINTFORML 「그럼, 잘 먹겠습니다…」
		PRINTFORMW 모미지는 느긋하게 차를 마시기 시작했다.
	ENDIF
	IF TCVAR:65:미약 == 210
		PRINTFORML
		PRINTFORML 「…읏！？」
		PRINTFORML 차를 다 마시고 나서 잠시 후, 갑자기 모미지는 몸을 파르르 떨었다.
		 SIF CFLAG:생리주기 != 7
			PRINTFORMW （오늘은 그날이 아닐 텐데…）
		PRINTFORML
		PRINTFORMW 미약의 효과에 의해, 모미지는 [발정]해 버린 것 같다.
		TCVAR:발정 = 1
	ELSE
		PRINTFORML
		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_K65_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_332_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K65_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_K65_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70

	;初回
	ELSEIF TCVAR:껴안고첫회
		SELECTCASE TCVAR:껴안고첫회

			;1=普通に合意
			;%CALLNAME:TARGET%は覚悟を決めたような目で%CALLNAME:MASTER%を見つめている…
			;%CALLNAME:TARGET%は不安と期待が入り混じったような表情を浮かべている…
			CASE 1
			IF TALENT:연모
				PRINTFORML
			ELSEIF TALENT:사모
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF

			;2=先にキスぐらいしろよ
			;%CALLNAME:TARGET%は受け入れてくれたがどこか不満そうだ
			;…そういえばキスもまだだった
			CASE 2
			IF TALENT:사모 || TALENT:연모
				PRINTFORML 「꺄！？」
				PRINTFORMW 밑에 깔린 모미지는 숨을 삼키며, %CALLNAME:MASTER%의 얼굴을 빤히 쳐다보았다.
				PRINTFORML 「앗……」
				PRINTFORMW 만, 곧 수줍은 빛을 뺨에 띄우고 눈을 내리깔았다.
				PRINTFORML 「저기…이런 것은, 안돼요…」
				PRINTFORMW 「우린 아직, 키스도 한 적 없는데…」
			ELSE
				PRINTFORMW 밑에 깔린 모미지는 뭔가 말하고 싶은 모양이다.
				PRINTFORML 「그……그……」
			ENDIF

			;3=媚薬or発情には勝てなかったよお…
			;%CALLNAME:TARGET%は体の疼きを抑えきれず、%CALLNAME:MASTER%に体を許してしまった…
			CASE 3
				PRINTFORML 밀어 넘어뜨려진 모미지는, 꼼짝도 하지 않고 %CALLNAME:MASTER%(을)를 바라보고 있다.
				PRINTFORML 흥분에 숨을 헐떡이며 %마스터는% 허용도 거절도 하지 않는 반응을 견디지 못하고,
				PRINTFORMW 크게 울려 퍼지는 고동에 맡겨 모미지의 자그마한 몸을 꽉 껴안았다…
				PRINTFORML
				PRINTFORML （이런 건 안 되는데…그런데 힘이 들어가지 않아…）
				PRINTFORML 발정에 의해 잔뜩 날카로워진 백랑의 후각이, 청각이, 촉각이.
				PRINTFORML 부글부글 끓어올랐다\@ TALENT:MASTER:성별 == 2 ? 수컷 # 임컷 \@의 욕망의 불길에 무방비로 노출되어 속절없이,
				PRINTFORMW %CALLNAME:MASTER%의 흥분에 호응하듯이, 정욕에 불붙은 모미지의 몸을 더욱 쑤시게 했다.
				PRINTFORML
				PRINTFORML 「…좋, 아요」
				PRINTFORMW 온몸을 지배하는 달콤한 저림을 참지 못한 모미지는, 결국 승낙의 말을 중얼거리고 말았다…
				PRINTFORML
				IF TALENT:처녀
					PRINTFORML 「그렇지만, 그…실전은, 용서해 주세요…」
					PRINTFORM 「그 외의 일이라면,
				ELSE
					PRINTFORML 「그렇지만, 피임은 확실하게 해주세요…」
						SIF CFLAG:생리주기 == 7
							PRINTFORML 「오늘은 정말 하면 안되는 날이에요…」
					PRINTFORM 「그것만 해준다면,
				ENDIF
				PRINTFORMW 뭐든 할테니까…」
				IF TALENT:사모
					PRINTFORML
					PRINTFORMW （…뭐, %CALLNAME:MASTER%씨라면 괜찮으려나……）
				ELSEIF CFLAG:65:신뢰도 > 99
					PRINTFORML
					PRINTFORMW （%CALLNAME:MASTER%씨는, 믿을 수 있는 사람이기도 하고…）
				ENDIF

			;4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
			;止まった時の中で開発された%CALLNAME:TARGET%の体は、本人の意志と拘わりなく%CALLNAME:MASTER%を求めてしまう…
			;%CALLNAME:TARGET%はわけもわからぬまま、%CALLNAME:MASTER%を受け入れてしまった…
			CASE 4
				PRINTFORML 「…읏！놓아주세요！！」
				PRINTFORMW 모미지가 %CALLNAME:MASTER%의 팔을 잡아 뿌리치려고 하는 순간.
				PRINTFORMW 「어라……？」
				PRINTFORMW 어딘가 그리운 듯한, 그러면서도 설레는 듯한 향기에 모미지의 마음이 흔들린다.
				PRINTFORML 「아닙…니다…그만둬주세요……」
				PRINTFORMW 의식 중에 개발된 신체는, 이제 %CALLNAME:MASTER%(을)를 거절할 힘조차 낼 수 없는 것 같다…
			;6=まんざらでもない
			;%CALLNAME:TARGET%に拒まれてしまった…
			;しかし%CALLNAME:TARGET%はまんざらでもなさそうだ
			CASE 6

			;7=駄目
			;%CALLNAME:TARGET%に拒まれてしまった…
			CASE 7

			;8=論外
			;%CALLNAME:TARGET%は%CALLNAME:MASTER%をにべもなく撥ね付けた

		ENDSELECT
	;通常
	ELSE
		SELECTCASE TFLAG:194
			;0=成功
			CASE 0
				;押し倒し返し
				;押し倒す成功時にうふふ=1が代入されるようなので下記の場合分けでは上手くいかないよーで
				IF CFLAG:우후후 == 2
					IF TCVAR:발정
						PRINTFORML 「…에헤헤, 그럴 마음이 드셨나요？」
						CALL HPH_PRINT,@"「좋아요…기분 좋은 일, 잔뜩 하도록 해요…HPH」","W"
					ELSE
						PRINTFORMW
					ENDIF
				;椛の住まい
				ELSEIF CFLAG:현재위치 == OMANEKIBEYA() || CFLAG:현재위치 == CFLAG:65:311
					IF TCVAR:발정
						IF ABL:욕망 > 9
							CALL HPH_PRINT,@"「앗…HPH」","L"
							PRINTFORMW 끌어안은 모미지가 탄식을 흘렸다.
							PRINTFORML 「저기,%CALLNAME:MASTER%씨…」
							PRINTFORMW 「저, 방에 들어가고 나서「언제 %CALLNAME:MASTER%씨가 덮쳐주려나」라고 기대하고 있었습니다…」
							PRINTFORML 「제가 이런 야한 여자가 되어버린 것도, 전부 당신 탓이니까요…」
							CALL HPH_PRINT,@"「책임져, 주실거죠？%CALLNAME:MASTER%씨HPH」","W"
						ELSE
							CALL HPH_PRINT,@"「좋아요…빨리, 와주세요…%CALLNAME:MASTER%씨…HPH」","L"
							PRINTFORMW 모미지는 두 팔을 벌리고, 재촉하듯 %CALLNAME:MASTER%(을)를 껴안았다…
						ENDIF
					ELSE
						PRINTFORML 「저기, %CALLNAME:MASTER%씨…이불 깔 테니까, 잠깐만…」
						PRINTFORMW 「앙…정말, 정말, 그렇게 매달리면 안 된다니까요…」
					ENDIF
				ELSE
					IF TCVAR:발정
						IF CFLAG:65:욕구불만도 >= 550 && RAND:2
							CALL HPH_PRINT,@"「읏…HPH」","L"
							PRINTFORML 「%CALLNAME:MASTER%씨, 참을 수 없게 되신건가요…？」
							CALL HPH_PRINT,@"「…응, 저도……%CALLNAME:MASTER%씨와 하고 싶다, 라고 생각하고 있었어요…HPH」","L"
							PRINTFORML 모미지는 %CALLNAME:MASTER%의 \@ EQUIP:MASTER:하반신속옷1 || EQUIP:MASTER:하반신속옷2 ? 입은 옷 위에서 # 노출된 \@생식기 위로 올라탔다.
							CALL HPH_PRINT,@"「…아하HPH 기분 좋으시죠…？」","W"
							CALL HPH_PRINT,@"「야한 짓을, 잔뜩 하도록 합시다…HPH」","W"
						ELSE
							CALL HPH_PRINT,@"「아하, %CALLNAME:MASTER%씨…HPH 읏, 후우…」","L"
							PRINTFORMW 모미지는 %CALLNAME:MASTER%에게 기댄 채, 발정한 자신의 냄새를 옮기듯 온몸을 비비고 있다.
						ENDIF
					ELSE
						IF TALENT:연모
							PRINTFORML 「%CALLNAME:MASTER%씨…」
							PRINTFORML 어깨에 손을 얹으면, 모미지는 %CALLNAME:MASTER%의 가슴팍에 머리를 바싹 끌어당겨 왔다.
							PRINTFORMW 은백색의 머리카락이 흔들리고, 은은하게 달콤한 향기가 %CALLNAME:MASTER%의 코를 간지럽혔다.
						ELSE
						ENDIF
					ENDIF
				ENDIF
			;1=人目がある
			;ここでは人目がある……
			CASE 1
				IF TCVAR:발정
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「혹시, %CALLNAME:MASTER%씨는 노출하는 것을 좋아하시나요…？」
						CASE 1
							PRINTFORML 「우우…그렇다면, 인기척이 없는 곳에 데려다 주세요…」
							IF TALENT:연모
								PRINTFORMW 「저의 가장 야한 모습은, %CALLNAME:MASTER%씨만 봐줬으면 좋겠어요…」
							ELSE
								PRINTFORMW 「발정해서 상스러운 얼굴을 하고 있는 것을 누군가에게 보여진다면, 부끄러워서 죽어버린다고요…」
							ENDIF
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「이, 이런 곳에서 해버리면 전부 보여버린다고요오…」
						CASE 1
							PRINTFORMW 「적어도 인기척이 없는 곳에 데려다 주세요…」
					ENDSELECT
				ENDIF
			;2=野外は嫌でござりまする
			;%CALLNAME:TARGET%に拒絶された
			;流石に野外では抵抗があるようだ
			CASE 2
			;未実装

			;3=多人数プレイは勘弁
			;PRINTFORML %CALLNAME:TARGET%達を抱き寄せたかったが、乱交までは許してくれなさそうだ…
			CASE 3
			;未実装

			;4=合意があってもムードが足りぬ
			;%CALLNAME:TARGET%を抱き寄せようとしたが、そんな気分じゃないと拒まれてしまった
			CASE 4
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;351,連れ出す
;==================================================
@M_KOJO_MESSAGE_COM_K65_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K65_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:동행 == 60
		IF TCVAR:발정 && CFLAG:기정사실
			PRINTFORML 「아, 네…」
			PRINTFORMW 모미지는 기대에 찬 눈으로 이쪽을 바라보고 있다…
		ELSEIF PALAM:TARGET:욕정 >= 50000 || TCVAR:발정
			SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「앗…HPH」","W"
				CASE 1
					CALL HPH_PRINT,@"「…HPH」","W"
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORMW 「어디로 가는 건가요？」
				CASE 1
					PRINTFORMW 「제 힘이 필요하신가요？」
			ENDSELECT
		ENDIF
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白する
;FLAG:생활능력무(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K65_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_352_1
RETURN RESULT

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

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

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

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

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

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

@M_KOJO_MESSAGE_COM_K65_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_K65_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;IF TALENT:연모
	;ELSEIF TALENT 思慕
	;ELSE
		SELECTCASE TCVAR:20
			;27=谷間を見せる
			CASE 27
				IF TCVAR:발정
					CALL HPH_PRINT,@"「호라호라HPH 보고만 있을건가요…？」","L"
					CALL HPH_PRINT,@"「저는, 그…에헤헤HPH」","W"
				ELSE
					PRINTFORMW 「……저기…이렇게 하면, %CALLNAME:MASTER%씨도 두근두근 거리시나요…」
				ENDIF
			;30 = キス
			CASE 30
				IF TCVAR:발정
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「츗…HPH 하앗, 무……아후…키스, 기분 좋아……HPH」","W"
						CASE 1
							CALL HPH_PRINT,@"「응…HPH 츗, 츄…HPH 응무, 츄…HPH 츄우…HPH」","L"
							PRINTFORMW 몸을 맡긴 %CALLNAME:MASTER%(을)를 억누르고, 모미지는 %CALLNAME:MASTER%의 얼굴에 키스의 비를 뿌리고 있다…
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「응…무,……후,후아…%CALLNAME:MASTER%씨……츄,핥짝…」
						CASE 1
							PRINTFORMW 「응뭇…츄릅……하아…%CALLNAME:MASTER%씨와 키스하는 거, \@ TALENT:연모 && RAND:2 == 0 ? 정말 좋아 # 기분 좋다 \@…응,츗……」
					ENDSELECT
				ENDIF
			;35=スカートの中を見せる
			CASE 35
				IF TCVAR:발정
					CALL HPH_PRINT,@"「호라호라HPH 보고만 있을건가요…？」","L"
					CALL HPH_PRINT,@"「저는, 그…에헤헤HPH」","W"
				ELSE
					PRINTFORMW 「……저기…이렇게 하면, %CALLNAME:MASTER%씨도 두근두근 거리시나요…」
				ENDIF
			;51=フェラチオ
			CASE 51
				IF TCVAR:발정
					CALL HPH_PRINT,@"「츄부, 루븟, 츄우우우HPH」","L"
					PRINTFORMW 모미지는 추잡한 소리를 내며 %CALLNAME:MASTER%의 페니스에 달라붙어 있다…
				ELSE
					PRINTFORML 「……핥짝, 츄부, 츄우웃」
					PRINTFORMW 「%CALLNAME:MASTER%씨, 기분 좋으신가요…？」
				ENDIF
			;53=パイズリ
			CASE 53
				IF TCVAR:발정
					IF TALENT:가슴사이즈 > 0
						SELECTCASE RAND:3
							CASE 0
								CALL HPH_PRINT,@"「아하…HPH %CALLNAME:MASTER%씨는, 저를 기쁘게 만드는 것이 능숙하시네요…HPH」","L"
								CALL HPH_PRINT,@"「じゃあ、お返しにもっと気持ちよくしてあげちゃいます…HPH」","L"
								PRINTFORMW 모미지는 미소를 지으며, %CALLNAME:MASTER%의 페니스를 쓸어 올리는 속도를 높여 갔다…
							CASE 1
								CALL HPH_PRINT,@"「에헤헤…가슴으로 자지를 듬뿍 범해 드릴테니까, 그대로 움직이지 말아주세요…HPH」","W"
							CASE 2
								PRINTFORML 「아…%CALLNAME:MASTER%씨의 즙으로, 가슴이 질척질척 되어버렸습니다…」
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨의 냄새가 배어버리면 어떻게 할까요…HPH」","W"
						ENDSELECT
					ELSEIF TALENT:가슴사이즈 < 0
						SELECTCASE RAND:3
							CASE 0
								CALL HPH_PRINT,@"「아하…그런 짓을 당하면, 굉장히 기뻐요…HPH」","L"
								PRINTFORML 「혹시, %CALLNAME:MASTER%씨는, 작은 여성을 좋아하시나요…？」
							CASE 1
								CALL HPH_PRINT,@"「후우, 읏…HPH 이렇게 문지르고 있으면, 가슴이 뜨거운 자지랑 닿아서엇…」","L"
								CALL HPH_PRINT,@"「저도, 기분이 좋아져요…하앗HPH 응읏…HPH」","W"
								PRINTFORMW 모미지는 어려보이는 모습에 음란한 빛을 띄며, %CALLNAME:MASTER%의 눈을 치켜 뜨고 바라보았다…
							CASE 2
								PRINTFORML 「아…%CALLNAME:MASTER%씨의 즙으로, 가슴이 질척질척 되어버렸습니다…」
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨의 냄새가 배어버리면 어떻게 할까요…HPH」","W"
						ENDSELECT
					ELSE
						SELECTCASE RAND:2
							CASE 0
								CALL HPH_PRINT,@"「후우, 읏…HPH 이렇게 문지르고 있으면, 가슴이 뜨거운 자지랑 닿아서엇…」","L"
								CALL HPH_PRINT,@"「저도, 기분이 좋아져요…はっぁHPHんんっ…HPH」","W"
								PRINTFORMW 모미지는 어려보이는 모습에 음란한 빛을 띄며, %CALLNAME:MASTER%의 눈을 치켜 뜨고 바라보았다…
							CASE 1
								PRINTFORML 「아…%CALLNAME:MASTER%씨의 즙으로, 가슴이 질척질척 되어버렸습니다…」
								PRINTFORMW 「%CALLNAME:MASTER%씨의 냄새가 배어버리면 어떻게 할까요…%UNICODE(0x2665)%」
						ENDSELECT
					ENDIF
				ELSE
					;手抜き、なんだ。すまないね。
					IF TALENT:가슴사이즈 > 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 「핫, 응, 응읏… %CALLNAME:MASTER%씨, 기분 좋으신가요…？」
							CASE 1
								CALL HPH_PRINT,@"「하아, 읏…HPH %CALLNAME:MASTER%씨의 자지가 움찔거려서…」","L"
								PRINTFORMW 「응읏…가슴이, 이상해져요…」
						ENDSELECT
					ELSEIF TALENT:가슴사이즈 < 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 「핫, 응, 응읏… %CALLNAME:MASTER%씨, 기분 좋으신가요…？」
							CASE 1
								CALL HPH_PRINT,@"「하아, 읏…HPH %CALLNAME:MASTER%씨의 자지가 움찔거려서…」","L"
								PRINTFORMW 「응읏…가슴이, 이상해져요…」
						ENDSELECT
					ELSE
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 「핫, 응, 응읏… %CALLNAME:MASTER%씨, 기분 좋으신가요…？」
							CASE 1
								CALL HPH_PRINT,@"「하아, 읏…HPH %CALLNAME:MASTER%씨의 자지가 움찔거려서…」","L"
								PRINTFORMW 「응읏…가슴이, 이상해져요…」
						ENDSELECT
					ENDIF
				ENDIF
			;60=ディープキス
			CASE 60
				IF TCVAR:발정
					SELECTCASE RAND:2
						CASE 0
							CALL HPH_PRINT,@"「츄릅HPH 츄HPH 츄우HPH 응뭇HPH」","L"
							PRINTFORML 모미지는 거친 숨을 내쉬면서 %CALLNAME:MASTER%의 입안에 작은 혀를 밀어 넣어
							PRINTFORMW 서로의 혀끝을 얽히게 하며 구강을 유린하고 있다…
						CASE 1
							CALL HPH_PRINT,@"「응…HPH 후…HPH 응무, 레룻…HPH 츄우…HPH 츄릇…HPH」","L"
							PRINTFORMW 몸을 맡긴 %CALLNAME:MASTER%(을)를 억누르고, 모미지는 %CALLNAME:MASTER%의 입안 구석구석을 빨고 있다…
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「응읏…츄,쥬릅…붓,츄부…」
							PRINTFORMW 「하앗~…%CALLNAME:MASTER%씨……좀 더…응,…후……츄루읏…」
						CASE 1
							PRINTFORML 「응…후…응무,핥짝…쥬릅,쥬붓,츄루르릇…」
							PRINTFORML 「저기…좀 더 %CALLNAME:MASTER%씨의 타액을, 주세요…츄,레룻…」
							PRINTFORMW 몸을 맡긴 %CALLNAME:MASTER%(을)를 억누르고, 모미지는 %CALLNAME:MASTER%의 입안 구석구석을 빨고 있다…
					ENDSELECT
				ENDIF
			;73=ぱふぱふ
			;CASE 73
			;まだ

			;77=乳を吸わせる
			;CASE 77
			;まだ

			;85=Ｖ挿入する
			;87=Ａ挿入する
			;88=腰振りＶ
			;89=腰振りＡ
			CASE 85, 87 TO 89
				IF TCVAR:발정
					;射精直前に挿入
					IF NOWEX:MASTER:사정
						CALL HPH_PRINT,@"「앗……HPH 자지가 움찔움찔거려…가버릴 것 같나요…？」","L"
						CALL HPH_PRINT,@"「아하HPH 좋아요… 제 안에서, 보내드릴게요…HPH」","L"
						PRINTFORMW 모미지는 폭발 직전의 노장을 \@ TEQUIP:V섹스 ? 질내 # 질외 \@에 밀어넣더니, 다그치듯 허리를 흔들기 시작했다…
					;MASTERが何度も射精
					ELSEIF TCVAR:350 > 3 && RAND:2 == 0
						CALL HPH_PRINT,@"「하아゛앗…HPH 아직 이렇게 딱딱하게 할 수 있다니…HPH」","L"
						PRINTFORMW 「%CALLNAME:MASTER%씨, 정말로 최고에요…」
					ELSE
						SELECTCASE RAND:3
							CASE 0
								CALL HPH_PRINT,@"「후읏…HPH 응읏HPH 앗HPH」","L"
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨의 자지, 좋…아요옷HPH 쿠읏HPH」","W"
							CASE 1
								CALL HPH_PRINT,@"「하앗, 응읏…후아아앗…HPH」","L"
								CALL HPH_PRINT,@"「아, 우우…허릿, 멈추지…않앗HPH」","L"
								PRINTFORMW 발정한 모미지는 머리카락을 흩날리면서, %CALLNAME:MASTER%의 육봉을 요구하고 있다…
							CASE 2
								PRINTFORML 「…제게 맡기는 건가요？」
								CALL HPH_PRINT,@"「에헤, 알겠습니다…그러엄, 제가 좋아하는대로 %CALLNAME:MASTER%씨를 범해드릴게요…HPH」","W"
							ENDSELECT
					ENDIF
				ELSE
					;MASTERが何度も射精
					IF TCVAR:350 > 3 && RAND:2 == 0
						PRINTFORML 「%CALLNAME:MASTER%씨…제 안에서, 더욱더 기분 좋아져 주세요…」
					ELSE
						SELECTCASE RAND:2
							CASE 0
								CALL HPH_PRINT,@"「후읏…읏, 앗HPH」","L"
								PRINTFORML 「%CALLNAME:MASTER%씨, 제 안…응읏…기분 좋으신가요…？」
								PRINTFORMW 모미지는 %CALLNAME:MASTER%의 눈동자를 응시하면서 허리를 움직이고 있다…
							CASE 1
								PRINTFORML 「괜찮아요, 그대로, 제게 맡겨주세요…」
								PRINTFORMW 「잔뜩 움직여, %CALLNAME:MASTER%씨를 기분 좋게 해드릴테니까…」
						ENDSELECT
					ENDIF
				ENDIF
			;86=だいしゅきホールド
			CASE 86
				IF TCVAR:발정
					CALL HPH_PRINT,@"「와줫…HPH 이대로, 가장 깊숙한 곳에 정액을 주세요옷…HPH」","W"
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%씨잇…이대로, 안에…！」
				ENDIF
			CASEELSE
				IF TCVAR:발정
					IF BASE:MASTER:기력 <= 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「어라, 지쳐 움직일 수 없게 되어 버리신 건가요…？」
								CALL HPH_PRINT,@"「에헤헤…그럼 저, 움직일 수 없는 %CALLNAME:MASTER%씨를 덮쳐버리는 것이군요…HPH」","W"
							CASE 1
								PRINTFORML 「아, 지쳐 버렸습니다…」
								CALL HPH_PRINT,@"「괜찮아요, %CALLNAME:MASTER%씨는 제가 잔뜩 범해드릴테니까요…HPH」","W"
						ENDSELECT
					ELSE
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%씨잇, 좀더엇…HPH」","W"
					ENDIF
				ELSE
					IF BASE:MASTER:기력 <= 0
						SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「어라, 지쳐 움직일 수 없게 되어 버리신 건가요…？」
								PRINTFORMW 「후후, 괜찮습니다. 제게 맡겨주세요…」
							CASE 1
								PRINTFORML 「피곤하시다면, 움직이지 않아도 괜찮아요…」
								PRINTFORMW 「제가 %CALLNAME:MASTER%씨를 기분 좋게 해드릴 테니까…」
						ENDSELECT
					ELSE
						SELECTCASE RAND:2
							CASE 0
								PRINTFORMW 「 %CALLNAME:MASTER%씨, 기분 좋으신가요…？」
							CASE 1
								PRINTFORMW 「그…%CALLNAME:MASTER%씨도, 움직여주지 않겠나요…？」
						ENDSELECT
					ENDIF
				ENDIF
		ENDSELECT
	;恋慕、思慕などで口上を変化させたい場合は↓のコメントアウトを外してください。
	;ENDIF
ENDIF
RETURN 1
;==================================================
;363,読み聞かせ（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:동침중(1=布団orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_MESSAGE_COM_K65_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_363_1
RETURN RESULT

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

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

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

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

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

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

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

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

@M_KOJO_MESSAGE_COM_K65_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:TARGET:수면
	ELSE
		IF BASE:TARGET:체력 < 1000 || BASE:TARGET:기력 < 300
			PRINTFORML 「저도 조금 지쳐버렸습니다…」
			PRINTFORMW 「옆에, 괜찮나요？」
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「쉬시게요？그럼, 저는 칼 손질이라도…」
				CASE 1
					PRINTFORMW 「휴식은 중요하니까요. 확실하게 쉬도록 하죠」
				CASE 2
					PRINTFORMW 「모처럼이니까, 쉬는 김에 장기라도 한 판 두지 않겠나요？」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;405,出掛ける(同行時デート
;条件が厄介なので、COMF405 出掛ける.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K65_405
;出掛けるにTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K65_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_411_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;412,勉強
;ABL:교양(ABL:MASTER:교양より大=MASTERが教えてもらう ABL:MASTER:교양より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K65_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:발정
		IF CFLAG:기정사실 & 合意_うふふ && ABL:욕망 > 3
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「…………」
					PRINTFORML 모미지는 %CALLNAME:MASTER%의 주변을 안절부절 돌아다니며,
					PRINTFORML 이따금 생각났다는 듯이 이리로 다가온다.
					CALL HPH_PRINT,@"「……HPH」","L"
					PRINTFORMW 솔직히 말해서, 집중이 되질 않는다.
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%씨, 저도…읽어도 괜찮을까요？」
					PRINTFORML 모미지는 %CALLNAME:MASTER%의 뒤에서 달라붙어, 책에 눈을 돌리고 있다.
					CALL HPH_PRINT,@"「아뇨, 괜찮습니다…저는 신경 쓰지 말아주세요, 이대로…HPH」","W"
					PRINTFORML 맞닿은 등에서 그녀의 체온이 전해지며, 끈적한 한숨이 %CALLNAME:MASTER%의 뺨을 어루만졌다.
					PRINTFORML 「………HPH」
					PRINTFORMW …집중할 수 있을 리가 없다.
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「저기, 그러니까…」
					PRINTFORMW 「아뇨, 아무것도 아니에요…」
				CASE 1
					PRINTFORML 「저기, 죄송합니다…활자는 서투르기에…」
					PRINTFORMW 모미지는 묘하게 %CALLNAME:MASTER%와 거리를 두고 있다.
			ENDSELECT
		ENDIF
	ELSE
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「어려워 보이는 책을 일고 계시네요…」
				PRINTFORMW 모미지는 당신이 공부하는 모습에 매우 감탄하고 있는 것 같다.
			CASE 1
				PRINTFORML 「에, 저도 그 책을…？」
				PRINTFORMW 「아뇨, 죄송합니다…활자는 서투르기에…」
				IF ABL:65:교양 > 2
					PRINTFORML 「…라고, 예전의 저라면 그렇게 이야기 했겠지만……」
					PRINTFORML 「%CALLNAME:MASTER%씨 덕분에, 공부의 즐거움을 알게 된 것 같습니다」
					PRINTFORMW 「후후. 감사해 마지않네요」
				ELSEIF ABL:MASTER:교양 > 2
					PRINTFORML %마스터는%, 모미지가 지루하지 않도록 한 권 골라 주었다.
					PRINTFORML 「아…그렇게 그림이 실린 책이라면, 제게도 재미있을지도 모르겠네요」
					PRINTFORMW 「상대방에 맞춰서 교과서를 준비할 수 있다니, %CALLNAME:MASTER%씨는 대단하시네요！」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=デザート 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K65_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_417_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K65_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_K65_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_431_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;440,待つ
;==================================================
@M_KOJO_MESSAGE_COM_K65_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_440_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1

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

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

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1

;==================================================
;602,デートキス
;==================================================
@M_KOJO_MESSAGE_COM_K65_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_602_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

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

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

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

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1

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

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

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

@M_KOJO_MESSAGE_COM_K65_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_K65_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_615_1
RETURN RESULT

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

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

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

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

@M_KOJO_MESSAGE_COM_K65_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_K65_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K65_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_K65_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_660_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;699,外に出る
;==================================================
@M_KOJO_MESSAGE_COM_K65_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K65_699_1
RETURN RESULT

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

ENDIF
RETURN 1

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

ENDIF
RETURN 1
;==================================================
;61,抱きまくら
;(TARGET睡眠時間or衰弱)添い寝中、前ターン抱きつく後就寝コマンド
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K65_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K65_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K65_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:수면
		PRINTFORML 「응…」
		PRINTFORMW 모미지는 행복한 듯이 미소를 지으며, 조용하게 숨소리를 내고 있다…
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「이렇게 꼭 껴안은 채로 자는 거, 멋지네요…」
			CASE 1
				PRINTFORMW 「후후, 꾸욱 안아 주세요…」
			CASE 2
				PRINTFORML 「후후, 따뜻하네요…」
				PRINTFORMW 「안녕히 주무세요, %CALLNAME:MASTER%씨…」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;62,デコちゅー
;前ターン頭撫で後キスする
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:욕망(5以上=物足りない
;ABL:친밀(5以上=照れる
;==================================================
@M_KOJO_MESSAGE_SCOM_K65_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K65_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K65_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,もっとキスする
;前ターンキスする後キスする
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_MESSAGE_SCOM_K65_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K65_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K65_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		PRINTFORML 「츗, 츄릇, 츄븟, 츄우, 츄믓, 응읏…츄, 츄우…
		PRINTFORMW 　～～～～읏！！푸핫…어, 언제까지 할 생각이신가요, 정말…」
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,手を引く
;デート出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_SCOM_K65_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K65_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K65_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_日常系コマンド.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_派生コマンド.ERB

license: mit


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_絶頂.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_自慰系(あなた)コマンド.ERB


path: ERB/대사_메시지관련/개인대사/065 모미지/M_KOJO_K65_道具系コマンド.ERB