code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:반발각인(3以上=会話不能)(4以上はバグ
;TCVAR:만취(1=通常成功or大失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_300
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_300
;コマンド共通メッセージ(TRAIN_MESSAGE)
;削除すると「～話をした。」とかが消えます。また、削除した場合は自動で口上色が付きません。
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K16_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;ここに口上書いて下さい
	SELECTCASE TFLAG:193
	CASE 0,1
		IF CFLAG:318 == 1
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「예의를 다하세요……이야기는 그리고겠지？」
				PRINTFORML  분노를 억제하고 있는지 날카로운 손톱을 쨍쨍 시키고 있다
				PRINTFORMW 「그렇지 않으면 식료가 되는 것이 소망일까？」
			CASE 1
				PRINTFORML 「전혀 재미있지 않아요……」
				PRINTFORML  평정을 가장하고 있는 것의 장소는 피릭과 긴장감이 달린다
				PRINTFORMW 「목에서도 뛰면 재미있는 분수의 오브제라도 되는 것일까……」
			ENDSELECT
		ELSE
			SELECTCASE RAND:9
			CASE 0
				PRINTFORML 「후~……지루하구나……」
				PRINTFORMW 「응……일은 끝맺어 놀지 않는다？」
				IF TALENT:연인
					PRINTFORML  레미리아는 짬을 주체 못해 당신에게 응석부리도록(듯이) 소매치기 모인다
					PRINTFORML 「당신의 애인이 지루해 죽어도 괜찮은 것일까？」
					PRINTFORMW 「 나를 만족시키는 것이%CALLNAME:MASTER%의 일이야……그러니까 좋지요？」
				ELSEIF TALENT:연모
					PRINTFORML  레미리아는 당신의 기분을 끌도록(듯이) 구애한다
					PRINTFORML 「일의 일은 나부터 소야에 말해요……」
					PRINTFORMW 「그러니까, 군요？조금 정도 좋지요？」
				ELSEIF TALENT:사모
					PRINTFORML  레미리아는 돌봐 주길 바란 듯이  당신의 일 모습을 보고 있다
					PRINTFORML 「주인의 짬을 보내는 것도 집사의 일이야」
					PRINTFORMW 「그러니까 무엇인가 재미있는 일을 해 주세요……웃어 준다」
				ELSE
					PRINTFORMW 「은 권하면(자) 소야에 잔소리를 들을 것 같구나」
					PRINTFORML  레미리아는 차고 없을 것 같게 당신의 일 모습을 보고 있다
					PRINTFORML 「조금 집사！도서관으로부터 만화에서도 가져오며」
					PRINTFORMW 「그것이나 마을의 책방에라도 가 사 와 정대……돈은 소야에 받으면 좋아요」
				ENDIF
			CASE 1
				PRINTFORML 「파체의 곳에 재미있을 것 같은 책에서도 찾으러 갈까」
				PRINTFORML  아무래도 짬을 주체 못하고 있는 것 같다
				IF TALENT:연인
					PRINTFORML 「당신도 함께 가지 않는다？」
					SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「추천의 책에서도 가르쳐 주지 않을까？」
					CASE 1
						PRINTFORML 「함께 읽지 않는다？아니 그러면 집중할 수 없네요……」
						PRINTFORMW  쑥스러운 듯하게 얼굴을 일등 해 버린다
					CASE 2
						PRINTFORMW 「그 아이가 좋아할 것 같은 책이라든지 있는 것일까？」
						PRINTFORML 「, 읽어 들려주고라도 하면 지금보다…………」
						PRINTFORML  그렇게 말하면(자) 레미리아는 쓸쓸한 듯한 표정을 약간 보였다
					CASE 3
						PRINTFORML 「홍차를 엄라고 정대……안녕하세요%CALLNAME:MASTER%의를 마시고 싶어요」
						PRINTFORML 「준비해 둬？」
						PRINTFORMW  그렇게 말하면 레미리아는 가볍게 wink를 한다
					CASE 4
						PRINTFORML 「아그 전에 소야에 홍차를 엄전달해 두며」
						PRINTFORML 「당신의 몫은……어떻게든 해들？엄라고 주는 것일까？」
						PRINTFORMW  그렇게 말하면(자) 레미리아는 조금 심술궂을 것 같다 미소짓는다
					ENDSELECT
				ELSEIF TALENT:연모
					SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「당신이 어떤 것이 좋아하는가 흥미가 있어요……따라 오세요……」
					CASE 1
						PRINTFORML 「소야에 홍차를 엄전달해 두며」
						PRINTFORMW 「당신의 몫은……없음이야！소중한 이야기가 있기 때문에 들어 와 안되어요！」
					CASE 2
						PRINTFORMW 「그렇다！당신에게도 다음에 재미있는 만화를 빌려 준다」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「무엇인가 재미있는 책의 추천은 없을까？진언 시켜 준다」
					CASE 1
						PRINTFORMW 「소야에 홍차를 엄전달해 두며」
						SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「 나와 파체의 두 명분이군요……과자도 옮겨 오도록(듯이)」
						CASE 1
							PRINTFORML 「집사라면 말해지지 않고와도 먼저 가 테이블의 준비를 해 주세요」
							PRINTFORMW 「그런 일이라면 소야에게 야단맞아요？」
						ENDSELECT
					ENDSELECT
				ENDIF
			CASE 2
				PRINTFORML 「지하실에는 그다지 가지 않는 것이 좋아요」
				IF TALENT:연인
					SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「 그렇지만%CALLNAME:MASTER%(이)라면 그 아이를 구할 수 있는 것일까……」
					CASE 1
						PRINTFORML 「그 아이에게 따라져도 방심해 안되어요……」
						PRINTFORMW 「%CALLNAME:MASTER%도 프랑도 잃고 싶지 않은거야……」
					CASE 2
						PRINTFORMW 「%CALLNAME:MASTER%에는 미로의 앞의 괴물도 한사람의 소녀로 보일까……」
					ENDSELECT
				ELSEIF TALENT:연모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「안되어요……가……그 미로에는……」
					CASE 1
						PRINTFORMW 「당신이라면 그 아이의 마음을……꿈꾸고 일이군요……」
					ENDSELECT
				ELSEIF TALENT:사모
					PRINTFORMW 「그런데도 가고 싶다는 죽음을 두려워하지 않음이라면, 그 아이의 완구라도 되어 본다？」
				ELSE
					PRINTFORMW 「좋으니까 안되어요……접근해……」
				ENDIF
			CASE 3
				PRINTFORML 「당신으로부터 봐 우리 자랑의 메이드는 어떻게든 해들？」
				IF TALENT:연인
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「시중드는 주인을 훔쳐져 외로울까들 」
					CASE 1
						PRINTFORML 「그 아이도 솔직하지 않네요……」
					ENDSELECT
					PRINTFORML 「귀여워해 주면 좋아요」
					PRINTFORMW  그렇게 말하면(자) 레미리아는 킥킥 와 웃는다
				ELSEIF TALENT:연모
					PRINTFORML 「아, 당신은 저런의(분)편이 기호일까？」
					SELECTCASE RAND:4
					CASE 0
						PRINTFORMW 「앞으로 수백년 정도 있으면……」
					CASE 1
						PRINTFORML 「그렇지 않으면 문지기가 기호일까？」
						PRINTFORMW 「아레에는 조금 무리이구나……」
					CASE 2
						PRINTFORML 「그렇지 않으면 파체가 기호일까？」
						PRINTFORMW 「저기까지의 신체는……비겁하구나……」
					CASE 3
						PRINTFORML 「그렇지 않으면 제 쪽이 기호일까？」
						PRINTFORMW 「뭐, 아무튼 인색함은 아니네요, 정진해 주세요」
					ENDSELECT
				ELSEIF TALENT:사모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「그 아이도 사람이야……신경써 주면 좋아요」
						PRINTFORML 「기뻐하겠지요 죽어라……그렇지만 당신의 앞에서는 튼켄 하는 것일까」
					CASE 1
						PRINTFORML 「당신이 노력해 그 아이와 한 쌍이라도 되어 준다면」
						PRINTFORML 「장래적으로도 쭉 시중드는 종자가 있어 주어 살아나요」
					ENDSELECT
					PRINTFORMW  그렇게 말하면(자) 레미리아는 못된 장난 같고 킥킥 웃는다
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「소야 정도에까지 익숙해 지고라고는 말하지 않아요」
						PRINTFORMW 「정진해 주세요……한 사람 분을 목표로 한다면」
					CASE 1
						PRINTFORML 「힘들게 말해져도 싫게」
						PRINTFORMW 「 나에게로의 충절심이기 때문에……」
					ENDSELECT
				ENDIF
			CASE 4
				PRINTFORML 「인간은 사실 재미있네요」
				IF TALENT:연인
					SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「흡혈귀를 타와 모래응이라고 전대미문……후훅」
					CASE 1
						PRINTFORMW 「%CALLNAME:MASTER%(이)나 소야, 거기에 영몽도……질리지 않아요 사실」
					CASE 2
						PRINTFORMW 「당신의 취미 기호는 이 세계가 아니면 범죄적이어요？」
					ENDSELECT
				ELSEIF TALENT:연모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「당신의 일도 좀더 좀더 봐 아파요……」
					CASE 1
						PRINTFORMW 「흥미가 다하지 않아요……전혀 질리게 해 주지 않는 것인걸」
					ENDSELECT
				ELSEIF TALENT:사모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「당신도 나를 즐겁게 하세요……(이)가 아니면 당신으로 놀아 버려요」
					CASE 1
						PRINTFORML 「스스로의 운명에 항의 것도 인간만의 소행이군요」
						PRINTFORMW 「당신은 자신의 운명에 만족할까？」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「집사！당신도 소야에 배워 무엇인가 곡예에서도 기억하면(자)？」
						PRINTFORMW 「 나를 즐겁게 해 정대」
					CASE 1
						PRINTFORML 「방관자가 될 뿐(만큼)은 지루해」
						PRINTFORML 「인간과 함께 노는 것도 매우 즐거워」
						PRINTFORMW 「당신도 놀아 본다？」
					ENDSELECT
				ENDIF
			CASE 5
				PRINTFORML 「어딘가 놀러 가고 싶네요……」
				IF TALENT:연인
					PRINTFORML 「어딘가 함께 데이트에 가지 않는다？」
					SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「영몽의 곳에서 연회에서도 하지 않을까」
					CASE 1
						PRINTFORMW 「밤이라도 경치의 좋은 곳(점)이라든지 가르쳐 주지 않을까？」
					CASE 2
						PRINTFORMW 「입다물고 나와 가 버릴까……두 명만의 비밀이야？」
					ENDSELECT
				ELSEIF TALENT:연모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「영몽의 곳에 놀이라도 갈까」
						PRINTFORMW 「당신도 함께 온다？」
					CASE 1
						PRINTFORML 「소야에 식사등의 연락해 두며」
						PRINTFORMW 「당신의 몫도……그런데」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「영몽의 곳에 놀이라도 갈까」
						IF TALENT:사모
							PRINTFORMW 「당신도 일이 없으면 붙어 와도 괜찮아요」
						ENDIF
					CASE 1
						PRINTFORMW 「소야에 식사등의 연락해 두며」
					ENDSELECT
				ENDIF
			CASE 6
				PRINTFORML 「꽤 재미있는 이야기군요」
				IF TALENT:연인
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「계속해 정대……좀 더 당신의 이야기를 듣고 싶어요」
					CASE 1
						PRINTFORMW 「그 거 사실인가 해들……시험해 보고 싶네요」
					ENDSELECT
				ELSEIF TALENT:연모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「계속해……끝까지 이야기하세요」
					CASE 1
						PRINTFORMW 「다음은 어떤 이야기인가 해들 흥미가 있어요……이야기하세요」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「계속하세요……끝까지」
					CASE 1
						PRINTFORMW 「평가에 적합해요……다음도 기대군요」
					ENDSELECT
				ENDIF
			CASE 7
				PRINTFORML 「흡혈귀라고 말해도 다종 다양한 것이 있어」
				SELECTCASE RAND:12
				CASE 0
					PRINTFORML 「그야말로 이야기에 있는 것 같은 왕도적인 낡은 배도 있어요……」
					PRINTFORMW 「그 중에서도 밖의 세계의 흘러에 적응하는 것은 초일류군요」
					;一般的
				CASE 1
					PRINTFORML 「난폭한 배도 있어요……대체로는 약있고 것이지만」
					PRINTFORMW 「안에는 귀찮은 사람도 있어요……그렇게 말하는 것은 동족에 의해 지워져 버려……」
					PRINTFORML 「그러나……」
					;ある者への思い
				CASE 2
					PRINTFORML 「 나 같은 것보다 정말로 위험놈도 있다……」
					PRINTFORML 「마치 (들)물으면 코로 웃어 버리는 픽션과 같은 치트의 덩어리같은이라든지……」
					PRINTFORMW 「자형도 의미가 없는 괴물이야……」
					;旦那
				CASE 3
					PRINTFORML 「무엇인가 계기가 있으면 재가 되어 소생해 재가 되는 재미있는 배도 있어요」
					PRINTFORMW 「놀이인 만큼은 뛰어나고 있었지만 조금 최고조에 달하면(자) 죽어 버려 퇴색해 버렸지만」
					;すぐ死ぬ
				CASE 4
					PRINTFORML 「사람의 유전자를 고쳐 쓰고 강력한 흡혈귀가 되는 사람도 있어요」
					PRINTFORMW 「마치 옥수수군요」
					;血界
				CASE 5
					PRINTFORML 「흡혈귀와 사람의 혼합물의 놈은의도 있어요」
					PRINTFORML 「대체로는 부모는 호환두이별자는 흡혈귀의 (분)편을 원망해 복수한다고 하구나」
					PRINTFORMW 「그 중에서 날개도 없는데 위에 떨어지는 변태적인 움직임을 하는 놈도 있는 것 같아요……」
					;IGAAAAAAAAAAAAA
				CASE 6
					PRINTFORML 「동족을 죽여 돌다니 놈도 있어요……」
					PRINTFORML 「피도 빨아들이지 않기 때문에 흡혈귀와 부를 수 있는지조차 이상한 것 같은 놈이지만」
					PRINTFORMW 「실력은 딱지 부착이군요……」
					;ファニーヴァンプ
				CASE 7
					PRINTFORML 「현상이 된 사람조차 있어요」
					PRINTFORML 「그것이 발생하면 모든 사람의 외경심은 구현화해 위협으로 되어요」
					PRINTFORMW 「환상시골에서 일어나도 외경심 알지 못하고무리에게는 너무 의미 없음 그렇구나……아무튼 저녀석의 외경심으로 여기도 끝나겠지요지만」
					;劇作家
				CASE 8
					PRINTFORML 「일국 통째로 사람을 가축으로 한 사람들은의도 있다고 하구나」
					PRINTFORML 「그 만큼 해도 사람은 운명을 바꾸고 항우노야」
					PRINTFORMW 「결말을 먼 곳에서 봐 싶은 것」
					;アニメがアレ過ぎ
				CASE 9
					PRINTFORML 「사람 원으로 배워 불사를 인솔하는 사람은의도 있는 그래요」
					PRINTFORML 「도대체 어떤 일을 배우면 그렇게 될까」
					PRINTFORMW 「한 번 만나 많은 불사의 사람들을 보고 싶어요」
					;前作と初期の頃好きだけに悲しい
				CASE 10
					PRINTFORML 「사람으로부터 흡혈귀가 된 사람 같은 것 있다고 하구나」
					PRINTFORML 「어떤 일족의 운명과 함께 져 갔다고 해요 」
					PRINTFORMW 「소문은 소야와 같은 힘을 가지고 있었다고 하는데 룰 쓸데없는 싸움으로 진다고 있을까」
					;世界
				CASE 11
					PRINTFORML 「철혈로 해 열혈로 해 냉혈의 흡혈귀도 있어요」
					PRINTFORML 「죽을 곳을 요구해 동족조차도 사냥하고 있던 것 같아요」
					PRINTFORMW 「그런데도 흡혈귀 헌터 복수에 사냥해졌다고 해요 」
					;ここまでの物語しかつたわってない
				ENDSELECT
			CASE 8
				PRINTFORML 「카지노에는 벌써 갔는지 해들？」
				SELECTCASE RAND:2
				CASE 0
					IF TALENT:연인
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「마음껏 즐기면 좋아요……나의 애인이기 때문에VIP대우야」
							PRINTFORML 「이지만, 승부만은 진심으로 시켜요……(이)가 아니면 재미없지요？」
						CASE 1
							PRINTFORML 「그럴 기분이 들면%CALLNAME:MASTER%(이)가 좋아하게 해 좋아요」
							PRINTFORML 「전업무 맡겨 손님으로서도라고 이루어 받을까……라고, 어때？」
						ENDSELECT
					ELSEIF TALENT:연모
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「아무튼 결국은 놀이이지만……」
							PRINTFORML 「놀이이기 때문에 더욱 진심으로 할 수 있는 것도 있을까」
						CASE 1
							PRINTFORML 「철저히 놀면 좋아요……」
							PRINTFORML 「그래서 그 후는 분명하게 일해？」
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「건네준 급료쏟아 넣는 것 없게 해？」
						CASE 1
							PRINTFORML 「당신에게도 이상한 것이 들어 오지 않게 파수를 부탁할까」
							PRINTFORML 「미령은……너무 문지기 하고 있다고(면)은 말할 수 없기도 하고……」
						CASE 2
							PRINTFORML 「꽤 재미있는 곳이야？」
							PRINTFORML 「아무튼 나의 능력의 전에서는 모두아 익살에 동일하지만……」
							PRINTFORML 「누군가가 일희일우 하는 모습을 보는 것이 모이지 않고 즐거워……그것이 파산하는 곳이라면 상 좋아요」
						ENDSELECT
					ENDIF
				CASE 1
					PRINTFORML 「이상한 캬쿠는 들어갈 수  없게 해 정대군요……」
					SELECTCASE RAND:14
					CASE 0
						PRINTFORML 「특히 사람의 마음을 읽다니 놈은 안되구나」
						PRINTFORML 「 나 이외는 승부가 되지 않고……슬롯만 배워 생포하고」
					CASE 1
						PRINTFORML 「흑백의 마법사는 안되구나」
						PRINTFORML 「파체의 책……특히 만화는 모두 반환시키지 않으면 절대 안 됨！알았다！？」
					CASE 2
						PRINTFORML 「영몽은……」
						PRINTFORML 「한때는 감아올려도 그 후 빈털터리가 되는 것이 누구라도 용이하게 상상할 수 있어요……」
					CASE 3
						PRINTFORML 「요정은 이라고의 밖이야」
						PRINTFORML 「메이드 요정에 룰을 철저히 가르치는 것만으로 소야가 피곤한 것……」
					CASE 4
						PRINTFORML 「틈새 요괴나 그 식이 오면(자) 나를 부르세요」
						PRINTFORML 「 나 이외 이야기가 되지 않는 레벨이니까……식의 식은 별로 좋아요」
					CASE 5
						PRINTFORML 「호라이인은 특히」
						PRINTFORML 「전부알아 취하는 만큼 지면(자) 죽어 도망갔던 적이 있어요……출금이야 출금」
					CASE 6
						PRINTFORML 「귀신이 왔을 때는 지켜 두세요……」
						PRINTFORML 「발작으로 시설을 깨뜨려졌더니 쌓인  것이 아니어요……」
					CASE 7
						PRINTFORML 「해바라기밭의 여자가 한사람시 이외는 통한데, 특히 녀석 같은 것을 따르고 있는 때」
						PRINTFORML 「녀석의 푸념 진실로 받아들여 트집 붙여 음울해」
					CASE 8
						PRINTFORML 「염라가 오면(자) 정중하게도라고 이루어 주세요」
						PRINTFORML 「오프의 날 정도 밤놀이시켜 주는 것도 세련되다는 것은 것이야」
					CASE 9
						PRINTFORML 「붉은 털의 가슴의 큰 여자가 오면(자) 소야를 부르세요」
						PRINTFORML 「소야도 아니면 저녀석의 이카사마는 간파할 수 없을까요들……」
						PRINTFORML 「당신이 간파했을 때의 처우는……마음대로 하면 좋아요」
					CASE 10
						PRINTFORML 「입도녀나 배유령을 보기 시작하면(자) 곧바로 절에 말하세요」
						PRINTFORML 「저 애들의 탑으로부터 부탁되어……」
					CASE 11
						PRINTFORML 「도사모두는 결코 들어갈 수 있지 마」
						PRINTFORML 「마음의 소리를 들어 카리스마를 감아올릴 뿐(만큼) 감아올리는 부엉이같은 여자나」
						PRINTFORML 「폐를 끼치는 행위 섬쿠리노 흰 인간, 가벼운 발작으로 시설을 전기로 망가뜨리는 녹색의 유령같은 놈이야」
						PRINTFORML 「이 관의 인원 총출동으로 내쫓아요！절대로！」
					CASE 12
						PRINTFORML 「지명 수배의 심술장이의 일이라든지」
						PRINTFORML 「카지노의 요정모두의 선동은 되면(자) 감것이 아니어요……」
						PRINTFORML 「소야가……」
					CASE 13
						PRINTFORML 「가난신이나 역귀가 한사람때에는 되돌려 보내세요」
						PRINTFORML 「누군가에게 빙붙어있는 때라면 아직 하지도 개인으로 올 수 있던 어떤 불행이 있을까 예측도 할 수 없어요」
					ENDSELECT
				ENDSELECT
			ENDSELECT
		ENDIF
	CASEELSE
		SELECTCASE RAND:3
		CASE 0
			PRINTFORML 「차지 않는 이야기군요」
			PRINTFORMW 「그 이상 계속한다면 혀를 인개 뽑아요」
		CASE 1
			PRINTFORML 「한가하구나……」
			PRINTFORMW 「지루해 죽어 버릴 것 같구나」
		CASE 2
			PRINTFORML 「후~……너무 시시해 살의조차 끓어 버려요……」
			PRINTFORMW 「……아무것도 아니어요……」
		ENDSELECT
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;301,お茶を淹れる
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_301
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 0,1
		SELECTCASE RAND:5
		CASE 0,1,2,3
			IF TALENT:연모
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「어머나……홍차를 넣어 주었어？」
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「후후……좋은 향기군요」
						PRINTFORML 「맛도 좋아요……좋은 기능이야」
						IF TALENT:연인
							PRINTFORMW 「고마워요%CALLNAME:MASTER%」
						ENDIF
					CASE 1
						PRINTFORML 「이렇게 맛있으면 소야가 질투해 버려요」
						PRINTFORML 「목바탕으로는 조심하는 것이 좋네요 이것은」
						PRINTFORMW  레미리아는 못된 장난 같게 미소짓는다
					ENDSELECT
				CASE 1
					PRINTFORML 「어머나……녹차를 넣어 주었어」
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「이 향기도 좋아해요……」
						PRINTFORMW 「응……익숙해지면 꽤 맛있네요」
					CASE 1
						PRINTFORMW 「영몽이 내는 것도 이 정도 진하면 좋은 것이지만」
					ENDSELECT
				ENDSELECT
			ELSE
				PRINTFORML 「어머나……말해지기 전에 엄의 것」
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「응……합격점이군요……」
					PRINTFORMW 「 그렇지만, 좀 더 향기를 두드러지게 하면(자) 좋아져요」
				CASE 1
					PRINTFORML 「향기는 합격점이군요」
					PRINTFORMW 「 그렇지만 맛도 좋지 않으면 차는 아니어요……」
				ENDSELECT
				PRINTFORMW 「성장에 기대해요……」
			ENDIF
		CASE 4
			PRINTFORML 「어머나……홍차를 엄의 것……」
			PRINTFORML  레미리아는 컵을 가져 한 번 향기를 즐겨 고한다
			SELECTCASE RAND:6
			CASE 0
				PRINTFORMW 「다질링의 스트레이트군요……」
				SELECTCASE RAND:6
				CASE 0,1
					PRINTFORML 「좋은 향기……차잎도 좋은 것을 사용하고 있어요」
					PRINTFORML 「맛도 좋아요……소재에 지지 않는 팔도 갖춘 원이군요」
					PRINTFORMW 「이것이라면 어디에 내도 자랑할 수 있는 집사로서 기뻐요」
				CASE 2
					PRINTFORML 「그 중에서도 강력함을 느끼는 향기……미……퍼스트 플래시군요」
					PRINTFORML 「환상시골에서는 결코 손에 들어 오지 않아것이예요……꽤 고생했겠지요」
					PRINTFORMW 「그 스키마 요괴에 어떻게 매입하게 했는지 해들……」
				CASE 3
					PRINTFORML 「입에 넣은 순간 느끼는 상질의 마스캇·플래이버……매우 좋아요！」
					PRINTFORMW 「이 정도까지의는 분별없게 없네요……다음에 포상을 올리지 않으면 안 되네요」
				CASE 4
					PRINTFORML 「상쾌한 맛안에도 더해지는 떫은 맛……오탐날의 시기의 물건이군요」
					PRINTFORML 「스트레이트에서도 좋은 것이지만 다음은 밀크로 해 보세요」
					PRINTFORMW 「한층 더 좋은 것으로 완성될 것」
				CASE 5
					PRINTFORML 「SFTGFOP1……최고급의 물건이군요……」
					PRINTFORML 「물건 뿐만이 아니라 기술도 없으면 여기까지 꺼낼 수 없어요」
					PRINTFORMW 「맛도 불평 없음의 합격이야」
				ENDSELECT
			CASE 1
				PRINTFORMW 「이 독특한 멘톨의 향기는……유모군요」
				SELECTCASE RAND:4
				CASE 0
					PRINTFORML 「골든 링도 제대로 되어있어요」
					PRINTFORML 「맛도 최고급이군요……좋은 팔을 하고 있어요」
					PRINTFORMW 「정직소야 이외에도 이것정도까지의 기량이 있는 사람이 있다고 생각하지 않았어요」
				CASE 1
					PRINTFORML 「밀크로 해도 한층 더 향미를 늘리는 좋은 선택이예요」
					PRINTFORML 「응……매우 맛있어요」
					PRINTFORMW 「좋은 기능에 면 글자라고 무엇인가 포상에서도 올릴까……」
				CASE 2
					PRINTFORML 「이 향기에 약하다니 말하는 멋없는 사람도 있지만」
					PRINTFORMW 「이 잎의 좋은 점을 모르는 것은 사실 불쌍하게조차 생각되어요」
				CASE 3
					PRINTFORML 「향기도 맛도 매우 좋아요……」
					PRINTFORML 「다음에 파체에도 밀크의 것을 엄여(어) 주어 정대」
					PRINTFORMW 「이것이라면 매우 기뻐한다고 생각해요」
				ENDSELECT
			CASE 2
				PRINTFORMW 「아삼의 밀크군요……」
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「향기로운 향기이며 맛도 진하기 때문에 자주(잘) 밀크에 맞아요」
					PRINTFORML 「차잎의 등급은FTGFOP레벨의 물건이군요」
					PRINTFORMW 「좋은 것은 좋은 사람에게 엄라고 받을 수 있으면 모두를 웅변에 말해요」
				CASE 1
					PRINTFORML 「아삼은 밀크라고 생각할지도 모르지만」
					PRINTFORML 「퍼스트 플래시의 물건이라면 스트레이트인 것도 좋은 것이야」
					PRINTFORMW 「차잎의 수확되었던 시기도 생각 시행 착오 해 보면 좋아요」
				CASE 2
					PRINTFORML 「단맛이 강하고 좋은 코쿠예요……」
					PRINTFORML 「나중에 한잔 더 받을 수 없을까？」
					PRINTFORMW 「프랑에도 먹여 주고 싶어요……그 아이가 좋아할 것 같은 맛인걸……」
				ENDSELECT
			CASE 3
				PRINTFORMW 「누와라에리야의 스트레이트군요」
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「섬세한 향미이며 이것을 무너뜨리지 않고 엄의 것도 기량이 필요해요」
					PRINTFORML 「이것은 퍼스트 플래시의 하이그로운티군요……」
					PRINTFORMW 「매우 희소인 물건이군요……당신은 어딘가에서 매입하고 있는 거나」
				CASE 1
					PRINTFORML 「향기로운 향기이며 맛에는 강력함과 코쿠가 있어요」
					PRINTFORML 「이것은 미디암그로운티군요……」
					PRINTFORMW 「높이에 의해도 차이가 있어……재미있어요홍차는」
				CASE 2
					PRINTFORML 「약한 향미……로그로운티군요」
					PRINTFORML 「이번에 신사에 놀러 갔을 때도 엄라고 정대」
					PRINTFORMW 「영몽도 이것이라면 즐길 수 있겠지요 죽을 수 있다」
				ENDSELECT
			CASE 4
				PRINTFORMW 「키맨의 스트레이트군요」
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「난초의 향기가 매우 좋다」
					PRINTFORML 「동양적인 독특함도 나는 싫지 않아요」
					PRINTFORMW 「고전적으로 전통도 느끼는 가득하구나」
				CASE 1
					PRINTFORML 「희소성이 높고 거기에 알맞은 역사를 느끼게 한다」
					PRINTFORMW 「향미의 스모키후레이바는 그 밖에 없는 것이군요」
				CASE 2
					PRINTFORML 「품위있어 마일드를 느끼게 하는 좋은 것이예요」
					PRINTFORML 「고향의 맛으로서 미령에도 다음에 가져 가 주면 좋아요」
					PRINTFORML 「 그렇지만……고향의 맛은 우롱차이랍니다라든가 말할 것 같구나……」
					PRINTFORMW 「아깝기 때문에 역시 조금 전의 이야기는 없음이야」
				ENDSELECT
			CASE 5
				PRINTFORML 「어머나……확실히 녹차군요……」
				SELECTCASE RAND:2
				CASE 0
					PRINTFORMW 「영몽의 곳은 너무 얇아 맛이 전혀 달라요……」
				CASE 1
					PRINTFORMW 「이렇게 진하고 좋은 향기였구나……」
				ENDSELECT
			ENDSELECT
		ENDSELECT
	CASEELSE
		SELECTCASE RAND:5
		CASE 0
			PRINTFORML 「뭐이것……상상 되어 없어요」
			PRINTFORMW 「다시 처음부터 만드세요……다음은 없어요？」
		CASE 1
			PRINTFORML 「후~……소야에 대신하세요……」
			PRINTFORMW 「이래서야 그 아이의 부담도 증가할 뿐……」
		CASE 2
			PRINTFORML 「기초가 되지 않아요！」
			PRINTFORMW 「가르친 소야의 평가도 떨어뜨리는 행위야……다음은 없다고 아세요」
		CASE 3
			PRINTFORML 「기본이 되어 있지 않아요……」
			PRINTFORMW 「기본이 생기고 나서 자신의 색을 내세요……아직 빨라요……」
		CASE 4
			PRINTFORMW 「이런 것을 내 자살 욕구라도 있을까？」
		ENDSELECT
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;302,スキンシップ
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_302
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 0,1
		SELECTCASE RAND:31
		CASE 0 TO 9
			PRINTFORML 「어머나……날개에 흥미가 있어？」
			IF TALENT:연인
				PRINTFORML 「상냥하게 해 정대군요……%CALLNAME:MASTER%만……이런 일 허락해」
			ELSEIF TALENT:연모
				PRINTFORMW 「특별해요……누구에게도 접하게 한 것은 없기 때문에……」
			ELSE
				PRINTFORML 「흥미를 가지는 것만으로 그만두는 것이 좋아요……」
				PRINTFORMW 「호기심은 고양이를 죽인다……사람의 생은 한 번 송곳이야？」
			ENDIF
		CASE 10 TO 19
			PRINTFORML 「뭘까……？」
			PRINTFORML  레미리아의 손에 살그머니 손으로 닿는다
			IF TALENT:연인
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「왜……무엇인가 있으면 뭐든지 말하세요……」
					PRINTFORMW 「혼자서의 걱정거리 보다 복수가 빠른 일도 있어요」
				CASE 1
					PRINTFORML 「손대고 싶었던 것 뿐이라면 보통으로 해 주어도 좋은데」
					PRINTFORMW 「놀라요……그런 식으로 되었다」
				ENDSELECT
			ELSEIF TALENT:연모
				PRINTFORML 「, 왜？무엇인가 용무일까？」
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「무엇인가 있으면 말하세요……」
					PRINTFORMW 「다소나마 (들)물어 주어요」
				CASE 1
					PRINTFORML 「, 접하고 싶은 것뿐？후~……」
					PRINTFORMW 「상대의 마음도 알지 못하고 자주(잘) 해요……정말……」
				ENDSELECT
			ELSEIF TALENT:사모
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「더러워지고 있었던 까？」
					PRINTFORMW 「생각이 잘 미쳐요, 좋은 기능이야」
				CASE 1
					PRINTFORMW 「 나의 손에 닿다니 상당히로 짊어지는군？」
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「더러워지고 있었던 까？」
					PRINTFORMW 「……고마워」
				CASE 1
					PRINTFORMW 「무엇인가？진언이 있다면 말하세요」
				ENDSELECT
			ENDIF
		CASE 20 TO 29
			PRINTFORML  근처에 있는 레미리아의 황인 듯하는 유리 세공과 같은 파랑 보라색의 머리카락에 닿는다
			IF TALENT:연인
				PRINTFORML 「에？왜？」
				PRINTFORMW  기분을 끌었는지 치뜬 눈 값어치 응시할 수 있다
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「좋아요 마음껏 마음대로 해도？」
					PRINTFORML  어루만지도록(듯이) 머리카락을 빗고 나무 감촉이나 색염을 즐긴다
					PRINTFORMW 「후후……꽤 좋은 마음이군요……」
				CASE 1
					PRINTFORML 「최근에는 머리카락의 손질도 확실히 소야로 해 주고 있어」
					PRINTFORMW 「깨끗하겠지요？」
				ENDSELECT
			ELSEIF TALENT:연모
				PRINTFORML 「, 뭘까？」
				PRINTFORML  놀란 모습을 보이는 것도 저항하는 헛 스윙도 없기 때문에 머리카락에 닿는다
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「손대고 싶구나？좋아요」
					PRINTFORML  머리카락에 살그머니 닿고 중요한 것을 취급하도록(듯이) 즐긴다
					PRINTFORMW 「에, 이상한 느낌이군요……이제(벌써) 안되어요！마지막！」
				CASE 1
					PRINTFORML 「머리카락의 손질이 불충분할까……」
					PRINTFORMW 「의견을 들려주어 정대……개선해요……」
				ENDSELECT
			ELSE
				PRINTFORML 「뭘까？」
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「손대고 싶은거야……？허가 해 주어요」
					PRINTFORMW 「평상시의 노동의 대가로 해서 이것정도에 없는 대가야 영광으로 생각하면 좋아요」
				CASE 1
					PRINTFORML 「손대고 싶은거야……？좋아요」
					PRINTFORMW 「이지만 멋없는 손대는 방법은ＮＧ」
				CASE 2
					PRINTFORML 「손대고 싶은거야……？안되어요」
					PRINTFORMW 「일을 한 손에서는 머리카락이 아파 버려요……깨끗이 씻어 오고 나서로 해 정대」
				ENDSELECT
			ENDIF
		CASE 30
			PRINTFORML 「어깨 안마？생각이 잘 미쳐요」
			IF TALENT:무지
				PRINTFORML  어깨 회전에 자극을 주고 조금 강하게 해에 풀어 간다
				PRINTFORML 「응응！상당히 격렬하네요……」
				PRINTFORMW  조금 해 이번은 상냥하게 비비어 간다
				PRINTFORML 「기분 좋아요……꽤의 팔이군요」
				PRINTFORML  이윽고 다른 부위도 접하도록(듯이) 천천히 안마 해 나간다
				PRINTFORML  이것은 찬스라고 생각한 당신은 본격적으로 맛사지를 하지 않겠습니까？(와)과 묻는다
				PRINTFORML 「그것도 좋네요……부탁할 수 있는 것일까？」
				PRINTFORML  그렇게 해서 시간을 들이고 각처를 옷 위로부터 가볍게 풀어 돈다
				PRINTFORMW 「도, 이제 되어요！후~……후~……좋았어요이것으로 마지막이야！」
				IF TALENT:연모 && (CFLAG:현재위치 == 304 || CFLAG:현재위치 == 326)
					PRINTFORML  그러나 맛사지가 제대로 끝나지 않기 때문에 좀 더 하지 않으면 위험한등의 이유를 붙여 속행하도록(듯이) 신청한다
					PRINTFORML 「―……어쩔 수 없네요……좀 더 만？」
					PRINTFORMW  침대에 엎드려에 재우고 본격적으로 맛사지로 옮긴다
					PRINTFORML  당분간은 옷 위로부터 어깨로부터 날개의 주변이나 허리로 풀어 간다
					PRINTFORMW  특별제의 미약들이 로션을 조금씩 스며들게 해 간다
					PRINTFORML
					PRINTFORMW 「왠지 덥고……벗는 편이 좋을까？」
					PRINTFORML  당신은 이것 다행이라고 앞으로의 시술을 위해서(때문에)도 벗는 것을 권한다
					PRINTFORMW 「응실마리……이것으로 좋네요？」
					PRINTFORML  모두 벗어 주도록(듯이) 요구한다
					PRINTFORML 「원, 알았어요……그 대신해 끝까지 빈틈없이 부탁해요？」
					PRINTFORMW  성에 대해서의 무지함과 당신에게로의 신뢰에 의해 자꾸자꾸무방비인 모습으로 되어 간다
					PRINTFORMW
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW  당신은 다음은 위로 향해 되어 받도록(듯이) 말한다
						PRINTFORML  그녀는 당신이 말하는 대로 그녀가 신체의 방향을 바꾼다
						PRINTFORML  조금 붉고 불 비쳐 흥분본 표정이나 조금 작은 가슴에 사랑스럽게 주장하는 작은 2개의 돌기가 주장하고 있다
						PRINTFORML  갑자기 흉부로 하행이나 두완부나 복부와 바깥 해자를 천천히 묻어 간다
						PRINTFORMW 「후~…………릴렉스 할 수 있어요……」
						PRINTFORML  그리고 작은 가슴과 손을 뻗어 비비어 풀어 간다
						PRINTFORMW  상냥하게 비비어, 돌기의 주위를 천천히 초조하게 해 단번에 탄다
						PRINTFORMW 「후~……응응%UNICODE(0x2764)%!?후~……조금……너무 해요……%UNICODE(0x2764)%」
						PRINTFORML  약하게 저항하려고 하는 손을 지불의 오늘 아침 등에 자극을 계속 더한다
						PRINTFORMW 「조금%UNICODE(0x2764)%그만두고！응응%UNICODE(0x2764)%」
						PRINTFORML  충분히 미약을 스며들게 한 초조하게 한 가슴에 강하게 줄 때 크게 반응한다
						PRINTFORMW 「안돼%UNICODE(0x2764)%(이)나……또 온다%UNICODE(0x2764)%」
						PRINTFORML
						PRINTFORMW
						PRINTFORMW
						PRINTFORML  그렇게 해서 미약의 효력이 끊어질 때까지 몇번이고 절정 계속 시키는 것 에서 만났다
						PRINTFORMW 「……대단했어요…………%UNICODE(0x2764)%」
						PRINTFORMW  레미리아는 한 번에 몇번이나 이인가 되고 가슴이【민감】이 된 것 같다
						EXP:16:B경험 += 25
						EXP:16:B절정경험 += 15
						IF !TALENT:TARGET:B감도
							TALENT:TARGET:B감도 = 1
						ENDIF
					CASE 1
						PRINTFORMW  몸의 자세는 엎드리고인 채 다음은 다리로 시술해 간다
						PRINTFORML  초는 발부리, 사랑스러운 다리의 손가락의 사이나 발바닥을 푼다
						PRINTFORMW 「응응……좋다……매우 기분이 좋아요……」
						PRINTFORMW  위에 위로 맛사지를 해 가고 이윽고 허벅지로부터 가랑이로 도달한다
						PRINTFORML  갑자기 본명에 접하는 것은 없다, 천천히 초조하게 해 다리의 밑으로 자극해 나간다
						PRINTFORMW  신체가 반응해 왔다고 보면 엉덩이로 손을 뻗는다
						PRINTFORML 「응%UNICODE(0x2764)%응%UNICODE(0x2764)%!?」
						PRINTFORML  원래 민감한가 엉덩이를 비비어 넣는 것만으로 예상 이상의 반응을 보인다
						PRINTFORMW 「조금……좀 더 상냥하고……」
						PRINTFORML  등이라고 말해지지만 (듣)묻는 귀등 가지는 것도 없고, 호흡과 함께 맞추는것 같이 촉촉하게 개폐하는 엉덩이의 구멍에 조금 미약을 흘려 넣는다
						PRINTFORMW 「응응히！？, , 무엇을 하고 있어！거기는……더럽다……원……%UNICODE(0x2764)%」
						PRINTFORML  직장 흡수는 역시 효과가 있는 것이 빠르지만 보통의 인간이라면 위험할 것이다
						PRINTFORML  야무지지 못하게 표정이 무너져 온 레미리아에 중지와 약손가락을 질먹이 다툰다
						PRINTFORMW 「…………들 응등의……%UNICODE(0x2764)%」
						PRINTFORML  충분히 타액을 붙이게 한 후, 엉덩이를 만지작거려 연 어널로 젖은 중지를 한 개 삽입해 자극한다
						PRINTFORML 「응%UNICODE(0x2764)%%UNICODE(0x2764)%무엇을 해！그만두고%UNICODE(0x2764)%」
						PRINTFORMW  조금 힘을 쓰는 것만으로 허덕여, 긁을 때에 신체를 진동시킨다
						PRINTFORML  구멍을 풀면서 몇번이나 이나 키, 마지막에는 약손가락까지 삽입해 휘젓는다
						PRINTFORML 「수호%UNICODE(0x2764)%이런 건%UNICODE(0x2764)%모르다%UNICODE(0x2764)%%UNICODE(0x2764)%」
						PRINTFORML
						PRINTFORMW
						PRINTFORMW
						PRINTFORML  그렇게 해서 체력이 계속되는 한까지 이나 키 계속하는 것에서 만났다
						PRINTFORML 「개, 이런 기분이 좋은 일……몰랐어요……………%UNICODE(0x2764)%%UNICODE(0x2764)%」
						EXP:MASTER:펠라티오경험 += 1
						EXP:16:A경험 += 50
						EXP:16:A절정경험 += 30
					ENDSELECT
				ENDIF
			ELSE
				PRINTFORML 「응……꽤 능숙하네요」
				PRINTFORML  어깨를 열심히 비비어 푼다
				PRINTFORML 「매우 기분이야 샀어요……또 기회가 있으면 부탁하고 싶네요……어깨만이 아니고……그런데？」
			ENDIF
		ENDSELECT
	CASEELSE
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 「주에의 예의가 되어도 좋은 없네요……」
			PRINTFORMW 「처음부터 가르쳐 주는 것이 좋을까？」
		CASE 1
			PRINTFORMW 「접해도 좋다니 누가 말했는지 해들？」
		ENDSELECT
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;303,謝る
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_303
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 2
		PRINTFORML 「어머나……사죄의 뜻도의와 가리키는 것은 좋은 일이군요」
		PRINTFORMW 「그렇구나……홍차를 엄없음 있고……그래서 이번 일은 없었던 것으로 해요」
	CASE 0,1
		PRINTFORML 「거기까지 사과해지다니……그렇게 그릇이 작은 것 처럼 보일까……」
		PRINTFORMW 「좋아요……이번 일은 이제(벌써) 불문으로 해요……그렇지만」
		PRINTFORMW 「다음은 없어요？」
	CASE -1
		PRINTFORML 「그래서 사죄하고 있을 생각인가 해들……」
		PRINTFORMW 「좀 더 반성하고 있으세요」
	CASE -2
		PRINTFORML 「후~……정말로 차지 않는 것이군요……」
		PRINTFORMW 「그렇구나……아직 손가락에서도 바칠 수 있던 (분)편이 충의 마음이 보여요？」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;304,仕事を手伝う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:도울수없다(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_SUCCESS_COM_K16_304
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 「날은 떨어져 사람의 시간부터 우리들의 시간으로 변천한다」
			PRINTFORML 「어둠이라고 하는 경계는 빛과 섞여 삼켜요」
			PRINTFORML 「사냥감을 잡는 것처럼 어둠안에 질질 끌어 들여」
			PRINTFORML 「이런 시간에도 우아하게 홍차를 즐겨 높은 곳이 바라본다는 것 유쾌하구나」
			PRINTFORMW 「오늘의 어둠으로부터 늦게 도망친 인간은 어떠한 운명을 더듬을까」
			PRINTFORML  유열의 표정을 띄워 당신에게 묻는다
			PRINTFORML 「당신은 어떻게 된다고 생각한다？늦게 도망친 사람의 운명을」
			PRINTFORMW 「요괴에 먹을 수 있어 버린다？그렇지 않으면 누군가가 도움에？혹은 또 숨겨진 힘에 눈을 뜨거나？」
			PRINTFORML 「말해 보세요？맞으면 무엇인가 포상을 준다」
			PRINTFORMW 「그러나 사람에서는 시 네 없네요……질문을 허락해요 거기로부터 정답을 이끄세요」
			PRINTFORML  당신은 몇번이나 레미리아에 질문해 적당하게 가능성을 시사하면서 1개(살) 대답을 이끌어내 대답한다
			PRINTFORMW 「그런데……어떻게 되는 것일까？」
			SELECTCASE TFLAG:193
			CASE 0,1
				PRINTFORMW
				PRINTFORML 「어머나……정답과 같구나……우들 구해진 것 같구나」
				PRINTFORMW 「포상은 급료에 첨가하도록(듯이) 소야에 말해요……이제(벌써) 가세요」
			CASE -1
				PRINTFORMW
				PRINTFORML 「어머나……유감……저항 허무하게 할 방법도 없었다 같구나」
				PRINTFORMW 「뭐, 일하러 돌아와도 좋아요……즐길 수 있었어요」
			ENDSELECT
		CASE 1
			PRINTFORML 「홍차를 받을 수 있는 것일까？」
			PRINTFORMW 「느긋하게 우아하게 편히 쉬는데 딱 맞는 홍차를？」
			PRINTFORML  명령되는 대로 홍차를 따라 티캅을 소사-에 이상 발코니의 테이블로 가지고 간다
			SELECTCASE TFLAG:193
			CASE 0,1
				PRINTFORMW 「좋은 기능이야……포상을 받을 수 있도록(듯이) 소야에 말해요」
			CASE -1
				PRINTFORML 「후~……안되구나……」
				PRINTFORMW 「일하러 돌아와도 좋아요……정진해 주세요」
			ENDSELECT
		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_SUCCESS_COM_K16_305
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FIRSTTIME(TRAINNAME:SELECTCOM)
		PRINTFORML 「무릎 베개……？」
		PRINTFORML 「아는 는 는！이 나에 대해서 그런 요구하는 것은 당신 정도가 아닐까」
		PRINTFORMW  눈에 눈물을 머금은만큼 크게 웃는다
		PRINTFORML 「아-웃었어요……좋아요 그 담력에 면 글자라고, 군요」
		PRINTFORMW 「이지만 다른 사람에게는 비밀이야……두 명만의」
	ELSE
		SELECTCASE TFLAG:193
		CASE 0,1
			IF TALENT:연인
				PRINTFORML 「후후……응석부리고 싶구나……」
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「종자로서의 위로가 좋을까？그렇지 않으면 애인으로서？」
				CASE 1
					PRINTFORML 「자 버려도 좋아……천천히 쉬세요」
				ENDSELECT
				PRINTFORMW  상냥하게 미소지으면(자) 상냥하게 당신의 머리를 어루만진다
			ELSEIF TALENT:연모
				PRINTFORML 「또 무릎 베개？좋아요 그 정도라면」
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「이 정도의 위로 정도 용이한 것……」
					PRINTFORML  자랑스러운 얼굴로 당신의 머리를 어루만진다
				CASE 1
					PRINTFORML 「사랑스러운 것……그 아이도 이 정도 응석부려 준다면 좋은 것이지만……」
					PRINTFORML  조금 외로운 것 같은 얼굴을 해 당신의 머리를 어루만진다
				ENDSELECT
			ELSE
				PRINTFORML 「또 무릎 베개？」
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「어쩔 수 없네요……비밀이야？」
				CASE 1
					PRINTFORML 「그렇구나……포상으로서 제대로 행복한 때를 씹어 잡으면 좋아요」
				ENDSELECT
			ENDIF
		CASE -1
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「그렇게 목을 튀길 수 있는 싶은 것일까？」
			CASE 1
				PRINTFORMW 「 나의 목의 상처를 보세요」
				PRINTFORMW 「아마 나머지 혼자가 착취하면 이 육체도 완전히 우리 물건이 되어 상처도 완전하게 치 흔들어요」
				PRINTFORMW 「당신의 생혈을 내에게 준다？」
				PRINTFORML
				PRINTFORMW  미안합니다
			ENDSELECT
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,お腹を撫でる
;TFLAG:193(1=ABL:친밀6以上かつ妊娠時 0=成功 -1=ABL:친밀5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K16_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
		PRINTFORML  교살할 수 있는도 아직 되어 있지 않는 오징어배를 어루만진다
		PRINTFORMW  때로는 신체안의 장을 감지하는것 같이 손가락으로 누르거나 등을 해 즐겼다
	;通常
	ELSE
		SELECTCASE TFLAG:193
		CASE 1
			IF TALENT:무지
				PRINTFORML 「최근은 신체가 무거워…………살쪘는지 해들……」
				PRINTFORMW 「그렇게 문제없는데……무엇인가 모를까？」
			ELSE
				IF TALENT:연인
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「%CALLNAME:MASTER%……이 아이도 행복하게 해%UNICODE(0x2764)%」
					CASE 1
						PRINTFORMW 「사랑은 바보 같은 라고 생각하고 있었던 하지만……나쁘지 않은 것%UNICODE(0x2764)%」
					ENDSELECT
				ELSE
					PRINTFORMW 「흡혈귀를 잉다투는이라니……사실 무서운 것 알지 못하고……%UNICODE(0x2764)%」
				ENDIF
			ENDIF
		CASEELSE
			IF TALENT:무지
				IF TALENT:연모
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「뭐？피에서도 붙고 있었던 까？」
					CASE 1
						PRINTFORMW 「응？뭐？이상해……」
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORMW 「뭐？갑자기……」
					CASE 1
						PRINTFORML 「옷이 신경이 쓰여？좋은 것이지요？오더 메이드는 놈이야」
						PRINTFORML 「만든 사람이 메이드인 만큼……후후」
						PRINTFORMW  능숙하게 말한 생각일까 드야얼굴을 하고 있다
					ENDSELECT
				ENDIF
			ELSE
				IF TALENT:연인
					PRINTFORML 「뭐？그렇게 쓰다듬고 있고도 안되어요……？」
					PRINTFORML 「안 됨……？」
					PRINTFORMW  조금 물기를 띤 눈동자로 당신을 치뜬 눈 사용에 본다
				ELSEIF TALENT:연모
					PRINTFORMW 「뭐？그렇게 손대어도 또 하고 싶게 안 돼요……안 돼요……」
				ELSE
					PRINTFORML 「멈추세요……불쾌해요……」
				ENDIF
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,頬をつまむ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:연모(受け入れつつ笑顔でやり返す
	;ABL:친밀(6以上=おずおずとやり返す
	;ABL:순종(5以上=されるがまま
;==================================================
@M_KOJO_SUCCESS_COM_K16_307
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗(注、抱きつきモード中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:수면
		PRINTFORML 「……」
		PRINTFORML  자고 있는 그녀의 뺨을 이끌면(자) 사랑스러운 소리가 샌다
	;通常
	ELSE
		PRINTFORML  당신은 외형 상응하는 사랑스러운 뺨에 문득 빨려 들여가도록(듯이) 손을 뻗는다
		SELECTCASE TFLAG:193
		CASE 0,1
			IF TALENT:연모
				PRINTFORML 「에……도―！(이)나 히인가에 해 주어요！」
				PRINTFORML  서로 뺨을 서로 이끌어 당분간 놀았다
			ELSEIF ABL:친밀 >= 6
				PRINTFORML 「로 해……(이)나 리카에 해 주어요！」
				PRINTFORML  흠칫흠칫 다시해진다
			ELSEIF ABL:순종 >= 5
				PRINTFORML 「이나 있어라……―……」
				PRINTFORML  되는 대로 되어 있다
			ELSE
				PRINTFORML 「에……우박이 없네요……」
			ENDIF
		CASE -1
			PRINTFORML 「히에 싶은거야？(이)나 거치세요」
		ENDSELECT
	ENDIF

ENDIF
RETURN 1
;==================================================
;308,頬をつつく
;添い寝中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_308
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗(注、抱きつきモード中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_309
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗(注、抱きつきモード中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_309_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;331,お茶を淹れる（薬入り）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_331
;成否判定
;TFLAG:192(-2=強制失敗(注、非コマンド終了）、-1＝強制失敗、0=COM依存、1=強制成功or大成功(注、睡眠薬アイスティーは眠気を感じていると飲まない)
TFLAG:192 =1

@M_KOJO_MESSAGE_COM_K16_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「어머나……바뀐 향기군요……」
	PRINTFORMW  레미리아는 약이 들어간 향기에 아같게 티캅을 흔든다
	PRINTFORMW 「아무튼소야같이 이상한 것은 넣지 않지요……」
	PRINTFORML
	PRINTFORMW 　　　그―――z＿＿＿＿！！
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_K16_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW 「보통 술이군요……아무튼 이따금은 좋은 살려들 」
		SELECTCASE TFLAG:194
		CASE 9 TO 0
			PRINTFORML 「그렇구나……내가 입맛에 맞지 않아요……」
			PRINTFORMW 「소야라도 주면(자)？그 아이의 숨돌리기로도 되겠지요 해……」
		CASEELSE
			PRINTFORML 「어머나！의외로 맛있다！」
			PRINTFORML 「마음에 들었어요！이번 파티에서 내는 것을 허가해요」
		ENDSELECT
ENDIF
RETURN 1
;==================================================
;333,愚痴を聞く
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_333
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6,5
			IF TALENT:연인
				PRINTFORML 「최근인가 기다려 주지 않지 않다……%CALLNAME:MASTER%(은)는 나만 보세요……」
				PRINTFORML 「좋다？안되어요？다른 아이에게 눈도 주어……그런데？」
			ELSE
				PRINTFORML 「최근 제법 평화롭고 한가해……무엇인가 재미있는 금년 없음 있고……」
			ENDIF
		CASE 4
				PRINTFORML 「―……―……」
		CASE 3,2
			IF TALENT:연모
				PRINTFORML 「지루해요……%CALLNAME:MASTER%하지만 무정하다 것……」
				PRINTFORML 「이다인가들！오늘 하루는 즐기게 해 정대군요」
			ELSE
				PRINTFORML 「후~……한가하고 어쩔 수 없어요……집사！의논 상대가 되세요」
				PRINTFORML 「이것은 명령이야？」
			ENDIF
		CASE 1
			IF TALENT:연인
				PRINTFORML 「%CALLNAME:MASTER%하지만 무엇인가 즐겁게 해 주지 않는다고 입도 (들)물어 주지 않아요」
				PRINTFORML 「후훅……약간의 심술쟁이야%UNICODE(0x2764)%」
			ELSE
				PRINTFORML 「후~～아……시시하네요……무엇인가 일으킬까……」
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,杯を交わす
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:임신자각상태(1=食事)
;TALENT:술내성(-2=食事)
;==================================================
@M_KOJO_SUCCESS_COM_K16_334
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_335
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_336
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_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=合意があってもムードが足りぬ　100=合意はあるが口上内特殊判定によって失敗）
;TCVAR:껴안고첫회　1=普通に合意ゲット　2=先にキスぐらいしろよ　3=媚薬or発情には勝てなかったよお…　4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
;5=強引に迫られると断れぬ(素質臆病持ち専用) 6=まんざらでもない　7=駄目　8=論外 98=口上内特殊判定による失敗 99=口上内特殊判定による成功
;口上内特殊判定は該当するCFLAGが0だと無効
;==================================================
@M_KOJO_MESSAGE_COM_K16_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_350_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_352
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_352_1
RETURN RESULT

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

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

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

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

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

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

@M_KOJO_MESSAGE_COM_K16_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_K16_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_360_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

;==================================================
;363,読み聞かせ（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:동침중(1=布団orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_SUCCESS_COM_K16_363
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_363_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K16_364_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「어머나？무엇인가 그 콩은……」
	PRINTFORMW  방심해 버리고 있는 레미리아에 「귀신은 밖, 복은 안」과 콩을 부딪친다
	PRINTFORMW 「말했다！」
	IF TALENT:연인
		PRINTFORML 「도……그만두어요……유석에 친한 사이에서도 불쾌하구나……」
		PRINTFORML  당신은 이제 하지 않는다고 맹세 키스를 한다
		EXP:키스경험 += 1
	ELSE
		PRINTFORMW 　　　풋트―z＿＿！
		PRINTFORML 「아무래도 죽고 싶은 것 같네요……소망 대로 망쳐 부수어 생선을 조려 굳힌 식품로 해 주어요！」
	ENDIF
ENDIF
RETURN 1
;==================================================
;365,守矢神社へ移動(早苗、神奈子、諏訪子用
;==================================================
@M_KOJO_MESSAGE_COM_K16_365
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_365_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;402,就寝
;TFLAG:193(0=通常 1=子供と一緒に川の字で寝る)
;==================================================
@M_KOJO_MESSAGE_COM_K16_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K16_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:무지
		IF TALENT:연인
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「～이제(벌써) 아침인 것……」
				PRINTFORML 「휴업(휴가)%CALLNAME:MASTER%……」
			CASE 1
				PRINTFORML 「함께 잡시다？」
				PRINTFORML 「연인은 이렇게 하는 것이므로 실마리？」
			ENDSELECT
		ELSE
			PRINTFORML 「 나는 이제(벌써) 자요……당신도 함께 잔다？」
		ENDIF
	ELSE
		IF TALENT:연인
			PRINTFORML 「함께 잡시다？」
			PRINTFORMW 「휴업(휴가)의 키스……해%UNICODE(0x2764)%」
			PRINTFORMW  ……%UNICODE(0x2764)%
			EXP:16:M경험 += 1
			EXP:16:키스경험 += 1
			EXP:16:애정경험 += 2
			EXP:MASTER:M경험 += 1
			EXP:MASTER:키스경험 += 1
			PRINTFORML 「안되어요……」
			PRINTFORML 「다음은 또 내일%UNICODE(0x2764)%」
		ELSE
			PRINTFORMW 「이상한 기분을 일으키지 않는다면 좋아요……？」
			PRINTFORML 「……정말로 아무것도 하지 않는다……의%UNICODE(0x2764)%？」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:수면(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K16_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_403_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:연인
		PRINTFORML 「어머나？휴게？」
		PRINTFORMW 「그것이라면 오늘은 이제 일은 끝내 함께 놀지 않는다？」
		PRINTFORMW 「그것이 좋아요！그렇게 합시다！」
	ELSEIF TALENT:연모
		PRINTFORML 「한가한 것 같게 해」
		PRINTFORMW 「놉시다？지루해……」
	ELSEIF TALENT:사모
		PRINTFORML 「수고했습니다……뭐야？」
		PRINTFORML 「쉬지 않고 일해라고 말하지 않아요……」
	ELSE
		PRINTFORML 「휴게일까？」
		PRINTFORML 「소야에 이러쿵저러쿵 말해지기 전에 돌아와……？」
	ENDIF
ENDIF
RETURN 1
;==================================================
;405,出掛ける(同行時デート
;条件が厄介なので、COMF405 出掛ける.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K16_405
;出掛けるにTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K16_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGETとデート
	IF CFLAG:동행
		IF TALENT:연인
			PRINTFORML 「나갑시다？」
			PRINTFORMW 「모처럼의 데이트니까 빈틈없이 에스코트 해요%UNICODE(0x2764)%」
		ELSE
			PRINTFORML 「행선지는 당신에게 맡겨요」
			PRINTFORMW 「그 대신 빈틈없이 에스코트 해 주세요？물론 그 몸을 헌신해？」
		ENDIF
	;TARGET以外とデート
	ELSEIF CFLAG:MASTER:동행
		PRINTFORML 「갔다오세요……밤길에는 조심해……후후후……」
	;お出かけお見送り
	ELSE
		IF TALENT:연인
			PRINTFORML 「가들 사의……조심해……혼자서 정말로 괜찮아？」
			PRINTFORMW 「누군가보조자 조림 같은가？문지기라면 한가하겠지요 해 두드려 일으켜 데려 가도 괜찮아？」
			PRINTFORMW 「태연……？후~……분명하게 오전한 육심으로 돌아와……좋네요？」
			PRINTFORMW  친한 사람에게는 어떻게도 잔걱정이 많은 성질 지난다……
		ELSEIF TALENT:연모
			PRINTFORML 「혼자서 가？있고, 함께 따라 가 주어도 괜찮은 것이지만？」
			PRINTFORMW 「별로 좋다……？훈！배워 있고 원어디에든지와도 가세요……」
			PRINTFORMW 「, 분명하게 돌아와？좋네요？」
		ELSE
			PRINTFORML 「조심해 가……당신이 없게 되면 또 한가해 져 버려요……」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:현재위치)(野外掃除（冬は雪かき
;==================================================
@M_KOJO_MESSAGE_COM_K16_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		SELECTCASE TFLAG:193
		CASE 0
			PRINTFORML 「생각했던 것보다 근면하게 일하고 있도록(듯이)」
			PRINTFORMW 「관심 관심……그 상태로 힘쓰면 좋아요……」
		CASE 1
			IF TALENT:연인
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「조금 정도 도와요……어떻게 하면 좋은가 가르쳐 주지 않을까？」
					PRINTFORMW 「하나하나 자상하게……그런데？」
				CASE 1
					PRINTFORML 「가사 바보같구나……사실……」
					PRINTFORMW 「돕지 않지 않으면 청소에 애인을 훔쳐져 버려요……바보……」
				ENDSELECT
			ELSEIF TALENT:연모
				PRINTFORML 「완전히……당신도 소야와 함께로 가사 정말 좋아하구나……」
				PRINTFORMW 「무엇인가 도울 수 있을 것은 없다？」
				PRINTFORML 「……한가할 뿐(만큼)……」
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「이봐요 거기！아직 더러워져 있어요！」
					PRINTFORMW 「완전히……눈에 띄는 쓰레기는 보고 있어 불쾌하구나……좀 더 깨끗이 해 받지 않으면 곤란해요……」
				CASE 1
					PRINTFORML 「은그릇이나 동기는 부드러운 옷감으로 마른 걸레질 해 주세요！」
					PRINTFORML 「후~……소야도 기본중의 기본은 알고 있다고 생각하지 않았던 것 같구나……」
					PRINTFORMW  당신은 레미리아에 다양하게 지시받으면서 청소를 계속했다
				ENDSELECT
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K16_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW 「무엇？나에게 상대해 주었으면 한거야？그렇다면 조금은 손대중 해 주지만 죽어도 몰라요？」
	PRINTFORML
	SELECTCASE RAND:3
	CASE 0
		PRINTFORML 「스펠 카드 룰 쓸데없는 시대도 재미있었어요……약해진 요괴의 대부분을 따르게 하고 패도를 관철하고 있었어요」
		PRINTFORML 「저녀석마저 없으면 이 세계의 정점으로서 군림할 수 있었는데……」
		PRINTFORMW 「아무튼 저녀석 이외의 상대에게는 핸디캡으로서 적당한 룰이군요」
	CASE 1
		PRINTFORML  박쥐를 코끼리탄막을 피하면서 어떻게든 반격의 탄막을 밝힌다
		PRINTFORML 「그런 장난감 대나무 총으로 강하게 될 수 있고라고 생각하고 있을까？진정한 탄막이라고 하는 것은 이런 물건이야！！」
		PRINTFORML  레미리아는 크게 모습이나 모습손에 에너지를 모음창을 한 개형 만든다
		PRINTFORMW 「필살 「하트 브레이크」！」
		IF TALENT:연인
			PRINTFORMW 「은 이것……%CALLNAME:MASTER%(으)로 하는 것은……, 어쩐지 부끄럽네요……」
		ENDIF
		PRINTFORML  전동작이 긴 덕분일까 라든지 당신은 다 주고 받는다
		PRINTFORMW 「어머나……빠듯이라는 느낌……진심의 것을 공격하면(자) 이래서야 죽여 버려요……」
	CASE 2
		PRINTFORML  당신은 지면을 기는 것 같은 궤도를 잡는 박쥐장의 탄막을 뛰어넘어 레미리아로 대든다
		PRINTFORMW  그것이 함정과도 알지 못하고
		PRINTFORML 「완전히 가지고 전연 되어 있지 않은 뛰어넘음이군요！」
		PRINTFORMW 「야부 「demon 킹 클레이 달러」！！」
		PRINTFORML  그렇게 말해 그녀는 탄막의 에너지를 감겨 회전하면서 돌진해 온다
		PRINTFORML  그녀의 머리 부분이 복부에 꽂힌다
		PRINTFORML  돌진과 함께 회전을 더하고 있기 때문인가 장물이 비틀림 기절도 하지 못하고 격통이 체내로 달린다
		PRINTFORML  당신은 충격으로 수미터 불어 날아, 등을 쳐, 폐안의 공기는 모두 다 나와 버리고 있는 것 같은 감각에 습격당한다
		IF TALENT:연모
			PRINTFORML 「아！(이)다, 괜찮아！？」
		ENDIF
		PRINTFORMW 「너무 해 버렸는지 해들……？가감(상태)가 서투르고 안되구나……」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;412,勉強
;ABL:교양(ABL:MASTER:교양より大=MASTERが教えてもらう ABL:MASTER:교양より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K16_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_412_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_414
;成否判定
;TFLAG:192(-2=コマンド終了(非TARGET時強制失敗)、-1＝強制失敗、0=COM依存(非TARGET時強制成功)、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_415
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_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_SUCCESS_COM_K16_416
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 1
		SELECTCASE TFLAG:사용악기
		CASE 1
				PRINTFORML 「현인 피아노와는 또 다른 좋은 점이 있군요……」
				PRINTFORMW 「자주(잘) 무승부 비쳐요」
		CASE 2
				PRINTFORML 「어머나, 꽤 능숙하구나」
				PRINTFORMW 「이번 간식의 시간에 관의 객실에서 연주해 보지 않는다？」
		CASE 3
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「꽤 펑키군요」
				PRINTFORMW 「가끔 씩은 이런 것도 좋은 것」
			CASE 1
				PRINTFORML 「때에는 서글픔을……꽤 좋아요」
				PRINTFORMW 「이번은 상자물로 연주해 보세요 좀 더 좋아져요」
			ENDSELECT
		CASE 4
			PRINTFORML 「좋은 트란타는 고음을 능숙하게 조종해 달고 안타까운 좋은 음색을 내요」
			PRINTFORMW 「악단의 놈과는 다른 좋은 점이 나오고 있는 원……기호야 꽤」
		CASE 5
			PRINTFORML 「어머나……경탄 했어요……」
			PRINTFORMW 「여기까지의 팔이란……말도 나오지 않을 수록……」
		ENDSELECT
	CASE 0
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 「꽤의 팔이군요……모처럼 재주를 피로해 주었고」
			PRINTFORML 「향후를 기대해 팁으로도 올릴까？」
		CASE 1
			PRINTFORML 「나쁘지는 않아요……」
			PRINTFORML 「 내가 귀에 들려올 수 있는 것을 허가해요……구사일생한 원이군요」
		ENDSELECT
	CASE -1
		PRINTFORML 「그 잡음을 금방 멈추세요……」
		PRINTFORML 「생명이 아깝고 용수철？」
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;417,昼寝をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔にキスされた 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処orペニス揉み
;CFLAG:동침중(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K16_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_417_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K16_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_K16_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_431_1
RETURN RESULT

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

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

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

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

@M_KOJO_MESSAGE_COM_K16_436_1
;==================================================
;440,待つ
;==================================================
@M_KOJO_MESSAGE_COM_K16_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_440_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1

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

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

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1

;==================================================
;602,デートキス
;==================================================
@M_KOJO_MESSAGE_COM_K16_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_602_1
RETURN RESULT

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

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,手を繋ぐ
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗でもふりほどかれたりはしません
;==================================================
@M_KOJO_SUCCESS_COM_K16_603
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_603_1
RETURN RESULT

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1
;==================================================
;605,寄り道する
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_SUCCESS_COM_K16_605
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_605
;寄り道するにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K16_605_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;610,食事に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K16_610
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_610_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;613,お金稼ぎする（オミットされました
;==================================================
@M_KOJO_SUCCESS_COM_K16_613
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_613_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K16_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_K16_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_615_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_SUCCESS_COM_K16_617
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K16_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_617_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K16_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_K16_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_620_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;621,釣りをする
;TFLAG:193(0=釣れない 1～4=魚 11～15=うまい魚 610=木材 131=守矢の守札 21=ローター 609=氷の鱗 606=龍の爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K16_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K16_621_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_K16_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_660_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;699,外に出る
;==================================================
@M_KOJO_MESSAGE_COM_K16_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K16_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生コマンド
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,耳かき
;前ターン膝枕後スキンシップコマンド
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_SUCCESS_SCOM_K16_60
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K16_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K16_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K16_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

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

ENDIF
RETURN 1
;==================================================
;62,デコちゅー
;前ターン頭撫で後キスする
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:욕망(5以上=物足りない
;ABL:친밀(5以上=照れる
;==================================================
@M_KOJO_SUCCESS_SCOM_K16_62
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K16_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K16_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K16_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,もっとキスする
;前ターンキスする後キスする
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_SUCCESS_SCOM_K16_63
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K16_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K16_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K16_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,手を引く
;デート出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_SCOM_K16_80
;成否判定
;TFLAG:192(-2=コマンド終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K16_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K16_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K16_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1