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_K139_300
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

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

@M_KOJO_MESSAGE_COM_K139_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL K139_AMANURE
	IF FIRSTTIME(300)
		;神子、典のみ。６とか新興宗教の教祖になれるんじゃ？
		IF ABL:MASTER:話術技能 >= 5
			PRINTFORML 「嘛、%CALLNAME:MASTER%阁下真是个会说话的人呢」
			PRINTFORML （几乎都要胜过我了…不知不觉就被吸引过去了）
			PRINTW
			;賢者と呼ばれる人とか阿求クラス
			IF ABL:MASTER:教養 >= 5
				PRINTFORML （他的知识已经达到了可以称为贤者的程度…）
				PRINTFORML （这样的人却没有什么野心、天天到处闲逛…是我的眼睛出问题了吗）
			;典と同程度かそれ以上。ほかに慧音、映姫、文など。位の高い人はこの辺に多い
			ELSEIF ABL:MASTER:教養 >= 3
				PRINTFORML （是受过非常高的教育吗。从他说的话中可以感受到）
				PRINTFORML （拉近关系好像也没什么坏处）
			;この辺が一番多い
			ELSEIF ABL:MASTER:教養 >= 1
				PRINTFORML （话术很吸引人…内容很轻浮）
				PRINTFORML （没有教养的人可能会被简单地驳倒）
				PRINTFORML （…不、也许像我这样的人更容易上当）
			;妖精、話術技能０のキャラ、幼いキャラ。恋ちゃんはお姉ちゃんと違って教養がない
			ELSE
				PRINTFORML （…哎呀、吓了我一跳）
				PRINTFORML （能把毫无内容的对话讲得如此有趣的人、难道不是很珍贵吗）
				PRINTFORML （让他有亲切感的话、说不定哪天就会有利用的价值呢）
			ENDIF
			PRINTW
		;文、映姫様など職業柄よく話す人。教養の高い人は大体この辺。あと正邪も。
		ELSEIF ABL:MASTER:話術技能 >= 3
			PRINTFORML 「与%CALLNAME:MASTER%阁下的谈话非常有意义」
			;賢者と呼ばれる人とか阿求クラス
			IF ABL:MASTER:教養 >= 5
				PRINTFORML （实际上还知道很多我所不知道的知识…这可不容小觑）
			;典と同程度かそれ以上。ほかに慧音、映姫、文など。位の高い人はこの辺に多い
			ELSEIF ABL:MASTER:教養 >= 3
				PRINTFORML （虽然口才没我那么好、但知识并不比我差）
			;この辺が一番多い
			ELSEIF ABL:MASTER:教養 >= 1
				PRINTFORML （嗯、一般人都是这样的吧）
			;妖精、話術技能０のキャラ、幼いキャラ。恋ちゃんはお姉ちゃんと違って教養がない
			ELSE
				PRINTFORML （明明说得很好、内容却空洞无物。只是想到什么就说什么吗）
			ENDIF
			PRINTW
		;一般的なレベル。霊夢とか魔理沙はこの辺
		ELSEIF ABL:MASTER:話術技能 >= 1
			;賢者と呼ばれる人とか阿求クラス
			IF ABL:MASTER:教養 >= 5
				PRINTFORML （虽然不太擅长说话、但是在各种各样的事情上造诣很深）
				PRINTFORML （大概这就是学者气质吧。而且是躲在研究室里的那种）
			;典と同程度かそれ以上。ほかに慧音、映姫、文など。位の高い人はこの辺に多い
			ELSEIF ABL:MASTER:教養 >= 3
				PRINTFORML （虽然有一定的学问、但似乎不太擅长表现出来）
			;この辺が一番多い
			ELSEIF ABL:MASTER:教養 >= 1
				PRINTFORML
			;妖精、話術技能０のキャラ、幼いキャラ。恋ちゃんはお姉ちゃんと違って教養がない
			ELSE
				PRINTFORML （不擅长说话、话题也没有内容…希望你能再提高一点教养）
			ENDIF
		;芳香とか琪斯美、ピースなど妖精の大半、露米亜、蕾米莉亜など意外に多い。ピース、蕾米莉亜は稍微意外
		ELSE
			PRINTFORML 「那个ー…不用勉强自己说话也可以哦？」
			PRINTFORML 典露出为难的笑容
			PRINTW
			;賢者と呼ばれる人とか阿求クラス
			IF ABL:MASTER:教養 >= 5
				PRINTFORML （虽然话术是那样、但知识却没有半途而废。甚至令人感到敬畏）
				PRINTFORML （虽说金无足赤、人无完人…总之、很难听清他在说什么…）
			;典と同程度かそれ以上。ほかに慧音、映姫、文など。位の高い人はこの辺に多い
			ELSEIF ABL:MASTER:教養 >= 3
				PRINTFORML （虽然有一定的学问…这嘴笨的问题难道就没有办法解决吗）
			;この辺が一番多い
			ELSEIF ABL:MASTER:教養 >= 1
				PRINTFORML （本人可能也在努力吧…感觉就像在解读古代文献一样）
				PRINTFORML （嘛、也没那么崇高）
			;妖精、話術技能０のキャラ、幼いキャラ。恋ちゃんはお姉ちゃんと違って教養がない
			ELSE
				PRINTFORML （…还是和石头与树木说话更有意义）
				PRINTFORML （怎么说呢…我并不觉得我在和人类说话、反而感到不安…）
			ENDIF
		ENDIF
	;２回目以降
	ELSE
		;会話できる状態で你が勃起状態
		IF TCVAR:302 == 0 && BASE:MASTER:勃起 >= 1000
			;自己限界まで飲むことはなさそうなので、どうせなら普段と違う感じに
			IF ALCOHOL_FACE(139) == "酔酒" || ALCOHOL_FACE(139) == "不省人事"
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「我说～～～～、为什么你在大庭广众之下、鸡鸡勃起了呢～～？」
					PRINTFORML 「是个会一直积攒很久、的家伙吗～～～～？」
					PRINTW
				CASE 1
					PRINTFORML 「这里～～～～、有个、在大庭广众之下勃起的人～～～～～！」
					PRINTFORML 慌忙堵住典的嘴
					PRINTFORML 「呣ー！　呣唔ー！」
					PRINTW
				CASE 2
					PRINTFORML 「祖呣了吗？　对我产森性欲了吗？」
					PRINTFORML 「真是那你没办花呢、不苦以太过火哦～～～～、咿呀哈哈哈哈★」
					PRINTFORML 比起性欲不如说開始有些生气了
					PRINTW
				CASE 3
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						PRINTFORML 「哦豁～～♪　搞什么啊这个♪」
						PRINTFORML 「是马吗！？　%CALLNAME:MASTER%阁下、难道是匹马吗？」
						PRINTFORML 「来咴咴咴ー的叫一叫试试、来嘛、试着说一下嘛、咴咴～～这样★　啊哈哈哈哈哈★」
						PRINTFORML 就让这家伙说个够吧…
					CASE 1,2;粗チン
						PRINTFORML 「好小！　嘸、嘸嘸、好小！　噗、啊哈哈哈哈哈哈★」
						PRINTFORML 「哎呀呀、这根小问荆草被人发现啦～～★　啊哈哈哈哈哈哈哈哈★」
						PRINTFORML 開始想在另一种意义上让她明白了…
					CASEELSE
						PRINTFORML 「很棒啊！　确实、很棒呢～～！」
						PRINTFORML 「嗯、果然男人啊、如果不到、这种程度的话呢、嗯、嗯、很棒哟、真的！」
						PRINTFORML 说话都零零碎碎的了…
					ENDSELECT
					PRINTW
				ENDSELECT
			ELSE
				;勃起ちんぽ反応累積回数
				SELECTCASE TCVAR:353
				CASE 0
					IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						PRINTFORML （哎呀、这孩子勃起了）
						PRINTFORML （虽然还这么小、但果然终归是个男孩子啊）
						PRINTW
					ENDIF
						PRINTFORML 典戳了戳你的肩膀
						PRINTFORML 「%CALLNAME:MASTER%阁下、你勃起了哦」
						PRINTW
						PRINTFORML 「什么…你打算让我这个女孩子说出来吗？　那么…」
						PRINTFORML 典露出困惑的笑容、把嘴唇凑到耳边
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「小鸡鸡勃起了哦、小・鸡・鸡HPH」","L"
						SIF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						CALL HPH_PRINT,@"「给姐姐看这种东西、你打算怎么办呀…HPH」","L"
						RESETCOLOR
						PRINTL
						TCVAR:353 += 1
				CASE 1
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「你看、勃起得这么夸张的话、除了我以外别人也会发现的…HPH」","L"
					RESETCOLOR
					PRINTL
					TCVAR:353 += 1
				CASE 2
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「给人看那种粗大的东西果然是在犯罪吧、犯罪…HPH」","L"
						RESETCOLOR
					CASE 1,2;粗チン
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「你以为你这么小就不会被发现了吗？　很遗憾、两腿间的帐篷很立派呢…HPH」","L"
						RESETCOLOR
					CASEELSE
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「勃起得那么厉害、怎么可能不被人发现呢…HPH」","L"
						RESETCOLOR
					ENDSELECT
					PRINTL
					TCVAR:353 += 1
				CASE 3
					IF GET_TARGETNUM() >= 2
						;近くにいるのが龍
						IF K139_FIND_AROUND() == 140
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「你看、饭纲丸大人好像也注意到了%CALLNAME:MASTER%阁下的勃起哦…HPH」","L"
							RESETCOLOR
							PRINTL
						;近くにいるのが文
						ELSEIF K139_FIND_AROUND() == 29
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「你看、那个闷骚的鸦天狗好像也很在意勃起的小鸡鸡呢…HPH」","L"
							RESETCOLOR
							PRINTL
						;近くにいるのが極
						ELSEIF K139_FIND_AROUND() == 42
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「你看、那个闭门不出的天狗也无法移開停留在勃起的小鸡鸡上的视线呢HPH」","L"
							RESETCOLOR
							PRINTL
						;近くにいるのが椛
						ELSEIF K139_FIND_AROUND() == 65
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「装出一本正经的样子、千里眼却用来看勃起的小鸡鸡什么的…HPH」","L"
							RESETCOLOR
							PRINTL
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「你看、那边的人也在偷偷看着哦…HPH」","L"
							RESETCOLOR
							PRINTL
						ENDIF
					ELSE
						;ユニーク是ないが路人がいる
						IF K139_BE_SEEN()
							SETCOLOR 0xFF69B4
							PRINTFORML 「如果周围有人的话、想哭也哭不出来吧…♪」
							RESETCOLOR
							PRINTL
						;二人きり
						ELSE
							SETCOLOR 0xFF69B4
							PRINTFORML 「正好现在周围除了我没有别人、趁现在撸一发如何啊…♪」
							RESETCOLOR
							PRINTL
						ENDIF
					ENDIF
					TCVAR:353 += 1
				CASE 4
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「怎么了、一直盯着\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@看。你不说出来的话、我可是不会明白的哦HPH」","L"
					RESETCOLOR
					PRINTL
					TCVAR:353 += 1
				CASE 5
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@可不会帮忙哦HPH　想看着我撸的话请随意HPH」","L"
					RESETCOLOR
					PRINTL
					TCVAR:353 += 1
				CASEELSE
					IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						SELECTCASE RAND:3
						CASE 0
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「真遗憾啊…HPH」","L"
							CALL HPH_PRINT,@"「老实说、姐姐、明明很想帮你撸你的小鸡鸡呢…HPH」","L"
							RESETCOLOR
						CASE 1
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「来吧、说一句『姐姐、我想咻咻咻地射出来』吧…HPH」","L"
							RESETCOLOR
						CASE 2
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"（呼呼…还是那么大…HPH　眼睛都挪不開呢…HPH）","L"
							RESETCOLOR
						ENDSELECT
						PRINTL
					ELSE
						SELECTCASE RAND:3
						CASE 0
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「对着典没法撸出来吗…HPH」","L"
							RESETCOLOR
						CASE 1
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「你准备憋到什么时候呢…HPH」","L"
							RESETCOLOR
						CASE 2
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"（呼呼…还是那么大…HPH　眼睛都挪不開呢…HPH）","L"
							RESETCOLOR
						ENDSELECT
						PRINTL
					ENDIF
				ENDSELECT
			ENDIF
		ENDIF

		SIF !RAND:2
			CALL K139_NURESUKE

		;酔ってる
		IF ALCOHOL_FACE(139) == "酔酒" || ALCOHOL_FACE(139) == "不省人事"
			IF !RAND:2
				PRINTFORML 「%CALLNAME:MASTER%阁下～～要来喝点吗～～？」
				PRINTFORML 「感觉还没喝够～～接下来去%CALLNAME:MASTER%阁下的家里喝吧～～」
				PRINTW
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%阁下～～有在听吗～～？」
				PRINTFORML 典的烦人程度增加了2成…
				PRINTW
			ENDIF
		;会話不能
		ELSEIF TCVAR:302
			IF ABL:MASTER:話術技能 >= 3
				PRINTFORML 「那件事我已经听说了」
				PRINTFORML 典露出为难的笑容
				PRINTW
			ELSE
				PRINTFORML 「是的…」
				PRINTFORML 同样的话听了很多遍、典看起来很无聊
				PRINTW
			ENDIF
		;会話失敗
		ELSEIF TFLAG:193 < 0
			IF TALENT:MASTER:幼稚 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「呃…是这样、吗？」
				PRINTFORM （说话没有脉络、也抓不住重点…哎呀哎呀、真伤脑筋…）
				PRINTW
			ELSEIF TALENT:年齢 >= 2
				PRINTFORML 你说什么？
				PRINTFORML 「所以我说ーー」
				PRINTL
				PRINTFORML 你说什么！？
				PRINTFORML 「所ーー以ーー我ーー说ーー啊ーー！！」
				PRINTFORML （跟耳背的人打交道可真累啊ー…）
				PRINTW
			ELSE
				PRINTFORML 「啊…对不起、我被别的事情分散了注意力」
				PRINTW
			ENDIF
		ELSE
			RESETCOLOR
			SELECTCASE RAND:43
			CASE 0
				PRINTFORML 「想和女孩子亲近吗？　这样的话…」
				PRINTFORML 「%CALLNAME:MASTER%阁下、有注意过气氛吗？」
				PRINTW
				PRINTFORML 「不管对方多么有好感、如果没有气氛就不会有那种感觉」
				PRINTFORML 「反复交谈、轻触身体。首先试着一点一点反复做这些事情如何？」
				PRINTW
				PRINTFORML 「对关系亲密的人、试着稍微大胆地接触怎么样？　例如、你可以试着拥抱她」
				PRINTFORML 「在没有气氛的情况下突然要求接吻的人一定会引起反感、这一点请注意」
				PRINTW
			CASE 1
				PRINTFORML 「想得到女孩子的信赖吗？　这样的话…」
				PRINTFORML 「要不要试着帮对方做一些工作？」
				PRINTW
				PRINTFORML 「根据典的调查、能帮助别人工作的人会更受欢迎」
				PRINTFORML 「除此之外、对方遇到困难的时候积极地帮助她、积极地和小孩子一起玩…」
				PRINTFORML 「如果老是做些莫名其妙的事、是得不到女性信任的。这一点请注意」
				PRINTW
			CASE 2
				PRINTFORML 「%CALLNAME:MASTER%阁下、能占用你一些时间吗？」
				PRINTFORML 「请侧耳倾听…实际上…」
				SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「呼ーー…HPH」","L"
				CASE 1
					CALL HPH_PRINT,@"「哈呣HPH」","L"
				ENDSELECT
				PRINTW
				PRINTFORML 「嘸嘸嘸、吓到了、吓到你了呢♪　%CALLNAME:MASTER%阁下、真是坦率啊♪」
				PRINTFORML 「我说了些什么？　没什么哦」
				PRINTW
			CASE 3
				PRINTFORML 帮帮我、典啦A梦！
				PRINTFORML 「请不要给我起那种无能的绰号。会被作崇的」
				PRINTW
				PRINTFORML 「…那么、请问您怎么了？」
				CALL ASK_M("演奏的时候被扔了石头", 1,"我想学会弹乐器、想要受女孩子欢迎", 1,"只是想叫叫你", 1)
				SELECTCASE RESULT
				CASE 0
					PRINTFORML 「啊ー、不管是谁听到噪音都会生气的」
					PRINTFORML 「这样的人、相对来说武斗派居多吧？　好像是这样」
					PRINTW
					PRINTFORML 「这样的话…就只能用这些人连呼噜声都发不出来的技术来演奏了吧…」
					PRINTFORML 「所以、让典来当倾听者吧？」
					PRINTFORML 「啊、当然、如果我也觉得不好听的话、那我也会扔石头的♪」
					PRINTW
				CASE 1
					PRINTFORML 「想演奏得更好？　这样的话…」
					PRINTFORML 「拜专业人士为师才是最好的方法吧？」
					PRINTW
					PRINTFORML 「例如、普莉兹姆利巴三姐妹和女子二乐坊那两位、都是些很擅长演奏的人吧？」
					PRINTFORML 「试着去窃取她们的技艺。比起盲目地练习、也许会有进步」
					PRINTW
				CASE 2
					IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
						PRINTFORML 典无言地扔了石头
						PRINTFORML ＊好痛＊
						PRINTW
					ELSE
						PRINTFORML 「那个…我也不是很有空啊？」
						PRINTW
					ENDIF
				ENDSELECT
			CASE 4
				PRINTFORML 「想要和被讨厌的女孩子搞好关系是吗？　这样的话…」
				PRINTFORML 「带上点心盒诚心诚意地道歉如何」
				PRINTW
				PRINTFORML 「如果平时关系很亲密、或者平时就很会说话的话、也许会得到原谅吧」
				PRINTFORML 「运气好的话、说不定仇恨就逝者如斯夫了」
				PRINTW
			CASE 5
				PRINTFORML 「和女孩子喝酒总是输？　这样的话…」
				PRINTFORML 「%CALLNAME:MASTER%阁下、您喝酒之前有好好保护胃粘膜吗？」
				PRINTW
				PRINTFORML 「如果觉得自己很弱小的话、就必须采取相应措施」
				PRINTFORM 「例如、喝酒之前喝一些姜黄饮料。这样的话似乎就不容易宿醉了」
				PRINTW
			CASE 6
				PRINTFORML 「钓不到鱼？　这样的话…」
				PRINTFORML 「你是不是总是在同一时间段出去钓鱼？」
				PRINTW
				PRINTFORML 「根据季节的不同、有些鱼容易捕到、有些鱼很难捕到」
				PRINTFORML 「另外、不少鱼在天黑的时候会比在天亮的时候更容易钓到」
				PRINTFORML 「如果觉得钓不到鱼的话、试着改变一下时间带如何」
				PRINTW
			CASE 7
				PRINTFORML 「这是个秘密哦…听说阎魔大人的弱点是屁股♪」
				PRINTW
			CASE 8
				PRINTFORML 「这是个秘密哦…竹林里的狼小姐、会给招待她吃饭的人送来食材」
				PRINTFORML 「说不定还会有『请吃我吧%UNICODE(0x2665) *1%』之类的展開呢♪」
				PRINTW
			CASE 9
				PRINTFORML 「想做幸运色狼？　你为什么问我那种事…」
				PRINTFORML 「…算了。这样的话…%CALLNAME:MASTER%阁下每天是不是累了才睡觉的？」
				PRINTW
				PRINTFORML 「如果精疲力竭地睡着的话、当然到早上也不会起来了」
				PRINTFORML 「精力充沛的人、遭遇这种事的概率也高吧」
				PRINTW
			CASE 10
				PRINTFORML 「想要炮友？　你突然说些什么呢…」
				PRINTFORML 「嘛、没关系。这样的话…果然还是不要和对方太过亲近比较好吧？」
				PRINTW
				PRINTFORML 「因为已经准许有肌肤之亲、所以必须有某种程度的亲密是大前提…太过于信赖也不好吧」
				PRINTFORML 「这样一来、对方就会更渴望心灵的连接、而不是身体的连接」
				PRINTFORML 「如果想和对方发生肉体关系、就不能要求对方精神上的满足」
				PRINTFORML 「比如、让对方为你做膝枕、或者温柔地抚摸你的头之类的就不在讨论范围内了吧」
				PRINTW
			CASE 11
				PRINTFORML 「也许你已经知道了…对于幼稚的家伙、比如妖精…是无法和她们生孩子的」
				PRINTFORML 「说起来、因为连[初潮]都还没有来、所以身体也不可能成为母亲。那该怎么办才好呢？」
				PRINTFORML 「所以、还是多多反复进行性行为、让纯洁的少女早日觉醒比较好吧」
				PRINTW
			CASE 12
				PRINTFORML 「想要提高厨艺吗？　既然有闲谈的工夫的话、那就多多练习吧…」
				PRINTFORML 「嘛、这样的说法未免太没面子了。这样的话…」
				PRINTW
				PRINTFORML 「既然如此、何不和别人一起做饭呢？　也许会比一个人做有更好的效果」
				PRINTFORML 「如果做了好吃的东西、请给我尝尝哦」
				PRINTW
			CASE 13
				PRINTFORML 「%CALLNAME:MASTER%阁下没有掀開过女性的裙子吧？」
				PRINTFORML 「掀得太多的话、会被某个捏造记者写成有趣可笑的报道哦」
				PRINTW
				SIF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					PRINTFORML 「嘛、如果是%CALLNAME:MASTER%阁下的话、姐姐总是非常欢迎你的…%UNICODE(0x2665) *1%」
			CASE 14
				PRINTFORML 「听说地狱的温泉有很好的服务哦？」
				IF !FLAG:周回数
					PRINTFORML 「欸、『没见过也没听说过』吗？」
					PRINTFORML 「我确实听说过这类传闻…嗯ー、那么、在下一次的人生试着挑战一下如何呢」
					PRINTFORML 「如果只抓住现在的人生不放、该得到的东西也是得不到的啊」
					PRINTW
				ELSE
					PRINTFORML 「一天限定一次、非一个人不能去等、好像有诸多限制…」
					IF FLAG:甲斐性無
						PRINTFORML 「以及、像%CALLNAME:MASTER%阁下这样的、没毅力的ｓ…且慢、对女性太温柔的人可能也不行吧」
						PRINTW
					ELSE
						PRINTFORML 「如果你去过的话、请一定要告诉我关于你的感想」
						PRINTFORML 「如果妖怪之山也能做同样的事情的话、厨房说不定会变得很情趣」
						PRINTW
					ENDIF
				ENDIF
			CASE 15
				PRINTFORML 「采集不顺利？　典也不是很擅长这个的人啊…」
				IF TALENT:MASTER:採集Lv >= 5
					PRINTFORML 「没有什么能教导%CALLNAME:MASTER%阁下的呢」
					PRINTFORML 「请不要取笑典」
					PRINTFORML 典用摆成狐狸形状的手捏着你的脸
					PRINTW
				ELSE
					PRINTFORML 「不仅是采集能力、对采集物的相关知识…必须要有对应教养才行」
					PRINTW
					PRINTFORML 「另外、也有擅长这方面的人。有收集癖的人、对药很了解的人、正在谋生的人…」
					PRINTFORML 「而且、孩子们的观察力也不容小觑。正因为是孩子的视角、才更容易发现大人找不到的东西」
					PRINTW
					PRINTFORML 「即使是单纯的求神保佑也不可小觑哟。直到采集到想要的东西之前、试试吃些吉利的好东西来求好运吧？」
					PRINTFORML 「根据采集物的不同、也请注意根据季节的不同、有容易采集的、也有难以采集的东西」
					PRINTW
					PRINTFORML 「我能给你的建议就是这些」
					PRINTFORML 「怎么样？　有参考价值吗？」
					PRINTW
					CALL ASK_YN("很有参考价值","不太明白")
					IF !RESULT
						PRINTFORML 「这样啊。能帮上忙比什么都好」
						PRINTFORML 典一副若无其事的样子、尾巴却在不停地摇晃
						PRINTW
						CFLAG:139:好感度 += 1
					ELSE
						PRINTFORML 「欸欸欸…」
						PRINTFORML 典一脸疲惫的表情
						PRINTW
						CFLAG:139:好感度 -= 1
					ENDIF
				ENDIF
			CASE 16
				PRINTFORML 「饭纲丸大人？　她是我唯一的主人」
				PRINTDATA
					DATAFORM 「只要是有利于饭纲丸大人的事、我什么都愿意做。即使暂时受到损失、从长远来看也有好处」
					DATAFORM 「饭纲丸大人看起来是那样、其实对部下是很体贴的」
					DATAFORM 「就算有我可以放弃不干的事情、我也不会放弃的。不过、我有不让事情发展成那个地步的自信和自负」
				ENDDATA
				PRINTW
			CASE 17
				PRINTFORML 「害怕欧派神的天谴？　您总是在说些莫名其妙的话」
				PRINTFORML 「原来如此…作为实现愿望的代价、如果回答错误的话就会卧床不起…」
				PRINTW
				PRINTFORML 「老实说、我没有遇到过这种情况、所以很难说…」
				PRINTFORML 「试着注意那个人的语气怎么样？　也许正在发生微妙的变化、只是我们还没有意识到」
				PRINTW
			CASE 18
				PRINTFORML 「想要很多营养饮料？　你带那么多东西打算干什么？」
				PRINTFORML 「永远亭等地好像有很多剩余库存、我感觉就算不特意去买应该也会分发给你」
				PRINTW
			CASE 19
				PRINTFORML 典啦A梦！
				CALL ASK_M("我有想攻略的孩子！", 1,"想和女孩子做爱！", 1,"我想拥有一根魔法肉棒！", 1)
				SELECTCASE RESULT
				CASE 0
					PRINTFORML 「想和女孩子搞好关系…你也可以问问我」
					IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
						;ブチギレ三銃士を連れてきたよ！
						PRINTFORML 「那样的话增加和女性的身体接触不就好了吗？」
						PRINTFORML 「还有、有时也需要突然推倒对方的强硬态度」
						PRINTFORML 「顺带一提不避孕就性交不才是完美之举么」
						SIF TALENT:MASTER:恋人
							PRINTFORML 「明明都已经有恋人了、还真是性欲旺盛呢…虽然和我无关」
						PRINTW
					ELSE
						PRINTFORML 「[自尊心强]的人、[难以逾越的底线]的人、是很难屈服的吧」
						PRINTFORML 「好不容易有了一定的关系、[贞操观念强的人]可能也不会让你越过最后的底线」
						PRINTFORML 「再加上[讨厌男人]的话…那么…要么花时间去解開对方的心灵、要么就强迫用身体去倾诉」
						PRINTW
						PRINTFORML 「因为我不会说不好的话、所以请把[性格直率]的人、[好奇心强]的人、[不在乎贞操]的人作为对手来试试看吧？」
						PRINTFORML 「这么说来、眼前似乎就有一个女性是这样的…♪」
						PRINTW
					ENDIF
				CASE 1
					IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							PRINTFORML 「姐姐现在心情不好。所以我不会为你做什么荒唐的事」
							PRINTW
						ELSE
							SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「那里不是有[自慰]451吗？」
								PRINTFORML 「赶快回自己房间去如何」
							CASE 1
								PRINTFORML 「去地底的风俗店看看不就行了吗？」
							CASE 2
								PRINTFORML 「让在弹幕胜负中被打败的路人子屈服于你不就好了吗」
							ENDSELECT
							PRINTW
						ENDIF
					ELSE
						PRINTFORML 「[自尊心强]的人、[难以逾越的底线]的人、是很难屈服的吧」
						PRINTFORML 「好不容易有了一定的关系、[贞操观念强的人]可能也不会让你越过最后的底线」
						PRINTFORML 「再加上[讨厌男人]的话…那么…要么花时间去解開对方的心灵、要么就强迫用身体去倾诉」
						PRINTW
						PRINTFORML 「因为我不会说不好的话、所以请把[性格直率]的人、[好奇心强]的人、[不在乎贞操]的人作为对手来试试看吧？」
						IF TALENT:139:心情 == 1
							PRINTFORML 「这么说来、眼前似乎就有一个女性是这样的…♪」
							PRINTW
						ENDIF
					ENDIF
				CASE 2
					IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「这孩子…真是的…」
								PRINTFORML 典一脸惊呆的表情
							CASE 1
								PRINTFORML 「%CALLNAME:MASTER%阁下…」
								PRINTFORML 「光说这种话、是无法成为一个优秀的大人的」
							CASE 2
								PRINTFORML 「………………」
								PRINTFORM 典一脸蔑视地看着你
								IF TALENT:MASTER:受虐狂
									IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
										PRINTFORML 鸡鸡好像開始发胀了
									ELSE
										PRINTFORML 子宫隐隐作痛
									ENDIF
								ELSE
									IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
										PRINTFORML 鸡鸡紧紧一缩
									ELSE
										PRINTFORML 差点就要尿出来了
									ENDIF
								ENDIF
							ENDSELECT
							PRINTW
						ELSE
							SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「………………」
								PRINTFORML 典用看污水的眼神瞪着你、突然好像清醒过来了
							CASE 1
								PRINTFORML 「请你去死吧」
							CASE 2
								PRINTFORML 「咦、不知从哪里传来了猪的叫声…真是奇怪啊」
							ENDSELECT
							PRINTW
						ENDIF
					ELSE
						;指や振動棒でもカウントされちゃうけど。expの101番以降（正常位Ｖ絶頂など）は未実装みたいなので
						IF ABL:MASTER:腰 >= 6 && EXP:Ｖ性交経験 > 0 && EXP:Ｖ絶頂経験 >= 10
							PRINTFORML 「您不是已经有了吗…%UNICODE(0x2665) *1%」
							PRINTFORML 典用贪婪的眼神盯着%CALLNAME:MASTER%的股间…
							PRINTW
						ELSE
							PRINTFORML 「请不要问典这种事…」
							PRINTFORML 「只有这样、才能不断积累经验」
							PRINTW
						ENDIF
					ENDIF
				ENDSELECT
			CASE 20
				PRINTFORML 「好了好了、今天有什么事吗？」
				PRINTFORML 「想知道什么礼物会受女孩子喜欢…」
				PRINTW
				PRINTFORML 「%CALLNAME:MASTER%阁下、有好好调查过对方吗？」
				PRINTFORML 「喜好是千差万别的。每个人都是不同的」
				PRINTW
				PRINTFORML 「虽然喜欢可爱的东西、但不能带在身上、简单的布料比较好、之类的…」
				PRINTFORML 「认识对方之后、应该就能掌握对方的喜好了、想让对方高兴的话、一定要仔细确认哦」
				PRINTW
				PRINTFORML 「啊、顺便说一下、我喜欢[可爱]和[白色]的礼物」
				PRINTFORML 「如果是[药瓶]的话那就更高兴了♪」
				PRINTW
				IF TALENT:140:思慕 || TALENT:140:恋慕
					PRINTFORML 「啊、还有、饭纲丸大人好像很喜欢以[星星]为主题的礼物和镜头」
					PRINTFORML 「即使搞错了、也不能送以[鬼]为主题的东西哦」
					PRINTW
				ENDIF
			CASE 21
				PRINTFORML 「怎么了？　一脸严肃的表情」
				CALL ASK_YN("喜欢的孩子无法怀孕","婴儿从哪里来？")
				IF !RESULT
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						PRINTFORML 「%CALLNAME:MASTER%阁下难道是不孕不育吗？」
						PRINTFORML 「请不要露出可怕的表情。毁了那张漂亮的脸蛋」
						PRINTW
						PRINTFORML 「那我先不開玩笑了…怀孕并不是进行几次性行为就能怀上的」
						PRINTFORML 「如果已经到了生孩子的阶段、那你应该已经掌握了周期」
						PRINTW
						PRINTFORML 「除[安全日]以外。至少得是[排卵日]、最重要的是[危険日]」
						PRINTFORML 「以及、不要浪费精液、在危险日之前一定要禁欲」
						PRINTW
						PRINTFORML 「也可以吃一些补精的食物。肉食系的女生可能知道[强精]的料理吧」
						PRINTFORML 「传说九尾狐殿下有操纵男性精力的能力」
						PRINTFORML 「即便如此还是得不到赐予的时候、试着[向神祈祷]如何？　您家里有神龛吗？」
						PRINTW
						PRINTFORML 「当然、还没有迎来[初潮]的幼子是不会孕育的。这一点请注意」
						PRINTFORML 「以及…如果对方有[妊娠願望]的话、一定能很容易就怀上孩子」
						PRINTW
						PRINTFORML 「大概就是这样」
						IF TALENT:妊娠願望
							PRINTFORML 「对了、典也有[妊娠願望]哦…%UNICODE(0x2665) *1%」
							PRINTFORML 典抚摸着自己的下腹部、靠了过来…
							PRINTW
						ELSE
							;危険日
							IF ESTRUS_CYCLE(TARGET) == 150
								PRINTFORML 「顺便一提、今天是典的危险日哦…%UNICODE(0x2665) *1%」
							;排卵日
							ELSEIF ESTRUS_CYCLE(TARGET) == 100
								PRINTFORML 「顺便一提、今天是典的排卵日哦…%UNICODE(0x2665) *1%」
							ELSE
								PRINTFORML 「我吗？　不幸的是、今天既不是排卵日也不是危险日」
							ENDIF
							PRINTW
						ENDIF
					ELSE
						PRINTFORML 「你不是女人吗」
						PRINTFORML 「下辈子再见吧」
						PRINTFORML 「啊、对了。还有一种说法是、只要向神祈祷的话祂就会让你生出宝宝…嗯、大概是谣言吧」
						PRINTW
					ENDIF
				ELSE
					IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
						IF TALENT:恋慕 || TALENT:恋人
							PRINTFORML 「我不知道。请您自己调查吧」
							PRINTW
						ELSE
							IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
								PRINTFORML 「你自己去查一下。姐姐是不会告诉你的」
								PRINTW
							ELSE
								PRINTFORML 「明明是与%CALLNAME:MASTER%阁下无缘的事、您问这种事情是打算干什么？」
								PRINTW
							ENDIF
						ENDIF
					ELSE
						IF TALENT:妊娠願望
							IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
								CALL HPH_PRINT,@"「来和姐姐一起学习吧…HPH」","L"
								PRINTFORML 典扯着自己衣服的绳子来诱惑你
								PRINTW
							ELSE
								PRINTFORML 「如果你不知道的话、那就去实践一下吧…%UNICODE(0x2665) *1%」
								PRINTFORML 典扯着自己衣服的绳子来诱惑你
								PRINTW
							ENDIF
						ELSE
							PRINTFORML 「其实就是、男女赤裸着互相纠缠在一起、把多余的地方对着缺少的地方滑溜溜地插入抽出」
							PRINTFORML 「然后往卵里注入精子、就能诞生第二代」
							PRINTFORML 最后的表现很像鲑鱼…
							PRINTW
						ENDIF
					ENDIF
				ENDIF
			CASE 22
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「传说中有一种神奇的工具、可以瞬间到达月球」
					PRINTFORML 「如果有那样的东西的话会非常方便、但是谁有呢」
					PRINTFORML 「如果可能的话、大抵会是[月之住民]吧、不过、如果不是敞開心扉的对象的话、大概是不会给你看的吧」
					PRINTW
				CASE 1
					PRINTFORML 「有一种说法是、如果能得到诹访子殿下的宠爱的话、这个人所拥有的田地就会变得丰饶」
					PRINTFORML 「相反、如果惹怒了她、田地就会变成不毛之地。桑原咒桑原咒」
					PRINTW
				CASE 2
					PRINTFORML 「在这个世界上、有没有枕头能让人睡个好觉呢」
					PRINTFORML 「我想献给忙得不可開交的饭纲丸大人、但并没有找到…」
					PRINTFORML 「%CALLNAME:MASTER%阁下听说过吗？」
					PRINTW
				ENDSELECT
			CASE 23
				PRINTFORML 帮帮我、典啦A梦！
				PRINTFORML 「请不要给我起那种无能的绰号。会被作崇的」
				PRINTW
				PRINTFORML 「…那么、请问您怎么了？」
				CALL ASK_M("我摸女孩子的屁股被狠狠地教训了一顿", 1,"抱了一下女孩子被狠狠地骂了一顿", 1,"亲了一下女孩子、对方却大发雷霆了", 1)
				SELECTCASE RESULT
				CASE 0
				CASE 1
				CASE 2
				ENDSELECT
				PRINTFORML 「那一定会生气的吧」
				PRINTFORML 「觉得对方不会生气的%CALLNAME:MASTER%阁下的脑袋里装的想必都是浆糊吧？」
				PRINTW
				PRINTFORML 「这种行为如果关系不太好的话就不会被对方原谅吧？」
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					PRINTFORML 「嘛、既然是%CALLNAME:MASTER%阁下的话姐姐就原谅你了♪」
					PRINTFORML 说完、典抱住了%CALLNAME:MASTER%
				ELSE
					PRINTFORML 「唉…如果是我的话、多少可以原谅你。除了接吻」
					PRINTFORML 「啊、不过如果是在我心情不好的时候被人这么做、那我也一定会生气的」
				ENDIF
				PRINTW
			CASE 24
				PRINTFORML 「你怎么了。一副在红魔赌场里把所有钱都输光了的样子」
				PRINTFORML 「啊啊、你原本一直就是这副样子呢。是我失礼了…」
				PRINTW
			CASE 25
				PRINTFORML 「前几天我去了红魔馆的赌场、结果输了个精光…」
				PRINTFORML 「以我的能力、可以用在[骰子]与[猜谜]上、却无法用在[卡牌]上」
				IF ABL:MASTER:料理技能 + ABL:MASTER:清掃技能 >= 10
					PRINTFORML 「如果是%CALLNAME:MASTER%阁下的话、应该能通过卡牌项目大赚一笔」
				ELSEIF ABL:MASTER:教養 >= 5
					PRINTFORML 「如果是%CALLNAME:MASTER%阁下的话、去试试猜谜如何？」
				;邪悪な狐の囁き
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%阁下一定要去挑战一下老虎机啊。中奖的话就能大赚一笔了！」
					PRINTFORML 要是没中奖呢？
					PRINTFORML 「哈哈？」
				ENDIF
				PRINTW
			CASE 26
				IF TALENT:MASTER:劣情察知
					IF CFLAG:139:积攒度 > 800
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							CALL HPH_PRINT,@"「既然你都已经知道了…HPH」","L"
							CALL HPH_PRINT,@"「快点让姐姐舒服起来吧…HPH」","L"
							PRINTFORML 典把身体靠了过来
							PRINTW
						ELSE
							PRINTFORML 「哎呀…我已经忍耐了很久了、被看穿了呢…」
							PRINTFORML 「到底是怎么被看穿的…♪」
							PRINTW
						ENDIF
					ELSEIF CFLAG:139:积攒度 > 500
						PRINTFORML 「『积攒了很多啊！』、是什么意思啊…」
						PRINTFORML 典虽然故作平静、但眼神似乎有些动摇
						PRINTW
					ELSE
						PRINTFORML 「『似乎还很平静呢』、是什么意思啊？」
						PRINTFORML 典歪了歪头
						PRINTW
					ENDIF
				;你が動物耳持ちで発情中
				ELSEIF TALENT:MASTER:120 == 1 || TCVAR:MASTER:発情
					PRINTFORML 难以处理性欲
					IF CFLAG:139:积攒度 > 800
						PRINTFORML 「哎呀、真巧啊。其实、典也是这样呢…♪」
						PRINTW
					ELSEIF CFLAG:139:积攒度 > 500
						PRINTFORML 「那可真难办啊…」
						PRINTFORML 「如果无论如何都要做的话…就让典来助您一臂之力吧？」
						PRINTW
					ELSE
						PRINTFORML 「您在家里待着不就行了吗？」
						PRINTFORML 真冷淡啊
						PRINTW
					ENDIF
				ELSE
					PRINTFORML 典在性欲过剩的时候会怎么做呢
					PRINTFORML 「真是个差劲的问题啊」
					CALL PRINT_FACE, [[典]], "通常", "裸", "", ""
					PRINTFORML 「顺便问一下、你希望得到怎样的回答？」
					PRINTW
				ENDIF
			CASE 27
				PRINTFORML 「%CALLNAME:MASTER%阁下、绝对不要强行推倒女性哦」
				PRINTFORML 「任何事情都是有阶段的。至少要达到可以互相触摸肌肤的关系、否则会被骂的」
				PRINTFORML 「要注意的是、有些人必须经过特定的阶段才会允许触碰她的身体」
				PRINTFORML 「当然、气氛也很重要。不过、如果对方是个[对任何人都可以张開双腿]的人、那就另当别论了…」
				PRINTW
			CASE 28
				PRINTFORML 我好想要钱啊…
				PRINTFORML 「真是个对欲望很坦率的人呢。比装作无欲的人更有好感」
				PRINTFORML 「这样的话…去打扫一下卫生如何」
				PRINTFORML 「还能得到家主的信任、真是一石二鸟啊」
				PRINTW
				PRINTFORML 「有没有更轻松的方法？　这样的话…」
				PRINTFORML 「去批发一下酒如何？　可以卖个好价钱」
				PRINTFORML 「问题是如何酿造…似乎有传闻说有一种方法可以在短时间内酿造出酒来？」
				PRINTW
				PRINTFORML 「想要更轻松地赚钱？　真是个彻头彻尾的废物啊」
				PRINTFORML 「那么、去采集如何？　你可以得到各种各样的材料」
				PRINTFORML 「如果是天然的药材的话、可以卖给永远亭的医生、也可以调合好后拿去地摊上卖」
				PRINTFORML 「[滑石]很容易获得、但也能卖到相应的价钱」
				SIF CFLAG:信賴度 >= 200
					PRINTFORML 「个人推荐…前往高价收购[辰砂]和[凤凰之尾]的迷途竹林♪」
				PRINTW
				PRINTFORML 「总之想要和女孩子一边打情骂俏一边赚钱？」
				PRINTFORML 「这样的话、为何不去消除[炮友]和[爱人]的性欲呢？」
				PRINTFORML 「当然、你需要有取悦女性的技巧」
				PRINTW
			CASE 29
				PRINTFORML 「想自由出入喜欢的女孩子的房间吗？　请不要突然说出犯罪宣言」
				PRINTFORML 「幸好我不是天狗警察」
				PRINTW
				PRINTFORML 「一般来说…如果对方认为%CALLNAME:MASTER%阁下是个值得信赖的人、那就没问题了吧？」
				PRINTFORML 「喜欢你喜欢得不得了的话、也许就会给你备用钥匙了」
				PRINTW
				IF TALENT:恋慕
					;やったねたえちゃん！　自宅ができたよ！
					;PRINTFORML 「典も%CALLNAME:MASTER%どのに鍵をお渡ししたいのですが…生憎自宅そのものが存在しませんので」
					;PRINTFORML 「私たちの愛の巣の実装が待ち遠しいですね♪」
					PRINTFORML 「嗯、如果是%CALLNAME:MASTER%阁下的话、那你应该明白吧…%UNICODE(0x2665) *1%」
					PRINTW
				ENDIF
			CASE 30
				PRINTFORML 「%CALLNAME:MASTER%阁下。你的衣着整洁吗？」
				PRINTFORML 「有洁癖的女孩子可能会讨厌接吻哦？」
				PRINTFORML 「不过、如果有[献身的]属性的女孩子的话是不会介意任何污秽的呢」
				PRINTFORML 「顺带一提、我就是这样的哟♪」
				PRINTW
			CASE 31
				PRINTFORML 咕哒子酱咕哒子酱！
				PRINTFORML 「我的名字是菅牧典。请不要用那种奇怪的绰号来称呼我。那么、有什么事吗？」
				CALL ASK_YN("想做一些让女孩子睡不着觉的事情","想让女孩子睡着、看她的睡颜")
				IF !RESULT
					PRINTFORML 「请不要动不动就发表犯罪宣言。我都不知道该作何反应了」
				ELSE
					PRINTFORML 「虽然感觉你像是在假装柏拉图式爱情、但确实是相当有那种味道的发言呢、刚才那句话」
				ENDIF
				PRINTFORML 「嘛…如果要直接决定胜负的话、一般会让她喝下睡眠药吧…但一般不会有女孩子肯乖乖喝下睡眠药的」
				PRINTFORML 「比如、把它和茶混在一起让对方喝下去。但效果比起直接喝下去来说会下降很多」
				PRINTW
				PRINTFORML 「另外、[鼻子灵敏的人]和[有洁癖的人]、[擅长调配药物的人]肯定会发现的」
				PRINTFORML 「反过来说、[对臭味不敏感的人]和[不擅长调配药物的人]一定会毫不犹豫地喝下去吧」
				PRINTFORML 「顺便一提、我对调配药物也有一家之言、要是想让我喝的话也可能会被我识破的哦♪」
				PRINTW
				PRINTFORML 「之后只要注意不做什么[痛苦的事情]和[不愉快的事情]、对方应该就暂时不会醒来吧？」
				PRINTW
			CASE 32
				PRINTFORML 「做好的料理很快就会[变质]。大概2个小时左右」
				PRINTFORML 「如果有[保温盒]的话、可能可以延长变质的时间」
				PRINTFORML 「另外、用[大火力]烹饪的东西和冷得能[结冰]的东西似乎也很耐变质」
				PRINTW
				PRINTFORML 「请注意不要让中意的孩子吃到[变质]的料理」
				SIF STRCOUNT(DISH_TASTE, "劣化/")
					PRINTFORML 「所以你为什么要把那个料理给我？」
				PRINTW
			CASE 33
				PRINTFORML 「下雨下雪的时候请注意不要带着约会的对象到处跑哦」
				PRINTFORML 「也许你已经注意到了、天气不好的日子外出会削弱体力」
				PRINTW
				PRINTFORML 「如果有[折叠伞]的话、似乎可以承担一部分负担…但它会坏掉」
				PRINTFORML 「不过、伞也是可以修理的。你应该见过平时随身携带雨伞的人吧？」
				PRINTW
			CASE 34
				PRINTFORML 噔、噔、噔噔、噔、噔噔、噔噔噔噔噔、噔、噔噔、噔
				PRINTFORML 「你是在哼饭纲丸大人的主题曲吗？　刚刚那句」
				PRINTW
			CASE 35
				PRINTFORML 「%CALLNAME:MASTER%阁下、你有收集过乐谱吗？」
				PRINTFORML 「如果能感动听众的话、就有可能得到她最珍贵的乐谱哦」
				PRINTW
			CASE 36
				SELECTCASE TALENT:MASTER:音感
				;音痴
				CASE -1
					PRINTFORML 「那是在模仿鸡被勒死时的声音吗？　刚刚那句」
					PRINTFORML 「啊、原来是在唱歌啊…真是失礼了」
					PRINTW
					PRINTFORML 「通过多次练习、音感早晚都会掌握的」
					PRINTFORML 「不过、这似乎需要无止境的修炼…」
					PRINTW
				;音感
				CASE 1
					PRINTFORML 「这首歌唱得很棒。你能再多唱几首吗？」
					PRINTW
				;絶対音感
				CASE 2
					PRINTFORML 「～♪　～♪　～♪」
					PRINTFORML 在你的带动下、典也哼起歌来
					EXP:139:歌唱経験 += 1
				CASEELSE
					PRINTFORML 「您唱得真好啊」
					PRINTFORML 「您知道吗？　通过多次练习、音感早晚都会掌握的」
					PRINTFORML 「不过、这似乎需要无止境的修炼…」
					PRINTW
				ENDSELECT
			CASE 37
				PRINTFORML 你还记得至今为止被摸屁股的次数吗？
				PRINTFORML 「大概是{CFLAG:139:1009}次左右吧」
				PRINTW
			CASE 38
				PRINTFORML 「当心爱的人累得躺在床上的时候、请陪她一起睡吧」
				PRINTFORML 「比起坐等对方起床、这样做精神恢复的速度似乎更快」
				PRINTFORML 「爱的力量真是太伟大了」
				PRINTW
			CASE 39
				PRINTFORML 「没有[甲斐性]的父亲连抚养费都付不起…」
				PRINTFORML 「具体来说、是一个合格父亲的二分之一」
				PRINTFORML 「%CALLNAME:MASTER%阁下请注意千万不要这样」
				SIF FLAG:甲斐性無
				PRINTFORML 「…虽然这么想、但眼前似乎就有一个没志气的人」
				PRINTW
			CASE 40
				PRINTFORML 「甜品是别腹的！　不管怎么说都是别腹的！」
				PRINTW
			CASE 41
				PRINTFORML 呀～典酱～～嗯
				IF CFLAG:好感度 >= 1500 && EXP:139:接吻経験 > 0
					PRINTFORM 趁典不备、吻了她的脸颊
					PRINTFORML 「真是的、做什么啊。突然一下子」
					PRINTW
				ELSE
					IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						PRINTFORML 被典躲開的同时、脸上被亲了一下子
						PRINTFORML 「还是太嫩了呢♪　多谢款待♪」
					ELSE
						PRINTFORML 被典嗖的一下躲了过去
						PRINTFORML 「别闹了♪」
					ENDIF
					PRINTW
				ENDIF
				PRINTW
				IF TALENT:MASTER:接吻魔
					PRINTFORML 「真的、%CALLNAME:MASTER%阁下真是个接吻魔啊」
					PRINTFORML 「空闲的时候不接吻就静不下心来对吧？」
					PRINTW
					IF TALENT:139:接吻魔
						PRINTFORML 「不过、典也不能对别人说三道四呢…%UNICODE(0x2665) *1%」
						PRINTFORML 典用手指戳了戳自己的嘴唇
						PRINTW
					ENDIF
				ELSE
					IF TALENT:139:接吻魔
						PRINTFORML 「欸%UNICODE(0x2665) *1%　这是回礼哦%UNICODE(0x2665) *1%」
						PRINTFORML 被典亲了一下嘴唇
						PRINTW
					ENDIF
				ENDIF
			CASE 42
				PRINTFORML 「这是我家吗？」
				PRINTFORML 「管狐就是住在主人手中的细长筒状物里」
				PRINTFORML 「饭纲丸大人是\@ (TALENT:140:性別 == 1 ||TALENT:140:性別 == 3) ? 女性 # 男性 \@吧？」
				PRINTFORML 「剩下的你都明白了吧？」
				PRINTW
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,泡茶
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_301
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
		SELECTCASE TFLAG:193
		CASE 1
			PRINTFORML 「…即使在这种时候、也为我泡了一杯美味的茶吗」
			PRINTW
		CASE 0
			PRINTFORML 「…茶还不错」
		CASE -1
			PRINTFORML 「怎么才能泡出这么难喝的茶呢」
			PRINTW
		ENDSELECT
	ELSE
		SELECTCASE TFLAG:193
		CASE 1
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「泡得很不错呢。了不起了不起」
				PRINTFORML 典温柔地摸了摸你的头
				PRINTW
			ELSE
				PRINTFORML 「非常好喝的茶。非常感谢」
				PRINTW
			ENDIF
		CASE 0
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「味道很好、温度也很合适」
				PRINTFORML 「很厉害哦、%CALLNAME:MASTER%阁下」
				PRINTW
			ELSE
				PRINTFORML 「味道很不错啊。请你来泡茶果然是件好事呢」
				PRINTW
			ENDIF
		CASE -1
			PRINTFORML 「不管怎么说味道还是太淡了…」
			PRINTFORML 「是用的沏过很多次茶的茶叶沏出来的吗？」
			PRINTW
		ENDSELECT
	ENDIF
	;尿意ゲージ上昇
	TCVAR:374 += 200
ENDIF
RETURN 1
;==================================================
;302,身体接觸
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_302
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
		IF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				;今日の身体接觸回数
				SELECTCASE TCVAR:350
				CASE IS > 20
					PRINTFORML 「真是的…反正就算我说你也不会听…」
					PRINTFORML 典带着一副难为情的表情、接受着%CALLNAME:MASTER%的身体接触
					PRINTW
				CASE IS > 10
					PRINTFORML 「所以、都说了不行…真是的」
					PRINTW
				CASE IS > 5
					PRINTFORML 「不适可而止的话、姐姐就要生气了哟」
					PRINTW
				CASE IS > 1
					PRINTFORML 「不可以哟。因为姐姐、会生气的呢」
					PRINTFORML 典撅了撅嘴
					PRINTW
				;1回目
				CASEELSE
					PRINTFORML 「姐姐现在很生气。所以不准你碰」
					PRINTFORML 典一下子把脸扭到了一边去
					PRINTW
				ENDSELECT
			ELSE
				;今日の身体接觸回数
				SELECTCASE TCVAR:350
				CASE IS > 20
					PRINTFORML 「真是的…反正就算我说你也不会听…」
					PRINTFORML 典带着一副难为情的表情、接受着%CALLNAME:MASTER%的身体接触
					PRINTW
				CASE IS > 10
					PRINTFORML 「所以、都说了不行…」
					PRINTFORML 典虽然表现出了抵抗的样子、但是态度很弱
					PRINTW
				CASE IS > 5
					PRINTFORML 「就算是我最喜欢的%CALLNAME:MASTER%阁下、现在这样做我也会讨厌的」
					PRINTFORML 典有些不快地瞪着你
					PRINTW
				CASE IS > 1
					PRINTFORML 「我说过请不要碰我吧」
					PRINTFORML 典啪的一下拍開了你的手
					PRINTW
				;1回目
				CASEELSE
					PRINTFORML 「现在我心情不太好」
					PRINTFORML 典一下子把脸扭到了一边去
					PRINTW
				ENDSELECT
			ENDIF
		ELSE
			;今日の身体接觸回数
			SELECTCASE TCVAR:350
			CASE IS > 30
				PRINTFORML 「哈啊…那就随你的便吧」
				PRINTW
			CASE IS > 10
				PRINTFORML 「那什么…你是不是、完全不听别人说话呢？」
				PRINTW
			CASE IS > 5
				PRINTFORML 「请不要得寸进尺。我也是会生气的哦」
				PRINTFORML 典的瞳孔变得很细
				PRINTW
			CASE IS > 1
				PRINTFORML 「我说过请不要碰我吧」
				PRINTFORML 典看起来心情很差、但只是轻轻地拂開了你的手
				PRINTW
			;1回目
			CASEELSE
				PRINTFORML 「现在可以先不要碰我吗」
				PRINTFORML 典虽然嘴角噙着笑、眼神里却笑意全无
				PRINTW
			ENDSELECT
		ENDIF
		TCVAR:350 += 1
	;心情良い
	ELSE
		IF TCVAR:発情
			;人目あり
			IF K139_BE_SEEN()
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「唔哼哼HPH　%CALLNAME:MASTER%阁下、让大家看看我们关系要好的一面吧…HPH」","L"
					PRINTFORM 典从背后紧紧抱住%CALLNAME:MASTER%的同时、
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 把手伸进衣服里来回挑逗乳头…
					CASE 1
						PRINTFORML 悉悉索索地抚弄着股间…
					CASE 2
						PRINTFORML 隔着衣物挖弄菊穴…
					ENDSELECT
				ELSE
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、很在意路人的目光吗…？HPH」","L"
					CALL HPH_PRINT,@"「没关系的哦、其他人是看不见的…HPH」","L"
					RESETCOLOR
					PRINTW
					PRINTFORM 典转到了一个能隔绝他人视线的位置、
					SELECTCASE RAND:6
					CASE 0
						PRINTFORML 隔着衣服来回挑逗乳头…
					CASE 1
						PRINTFORML 隔着衣服挑逗股间…
					CASE 2
						PRINTFORML 隔着衣物挖弄菊穴…
					CASE 3
						PRINTFORML 让你抚摸她的屁股…
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「唔哼哼…HPH　可以揉得再用力一些哟…HPH」","L"
						PRINTW
					CASE 4
						PRINTFORML 让你玩弄她的秘裂…
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「哦HPH　呼HPH　再往、里面点…HPH」","L"
						RESETCOLOR
						PRINTW
					CASE 5
						PRINTFORML 让你捋她的尾巴根…
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「咕呜唔HPH　那里、很舒服呜…HPH」","L"
						RESETCOLOR
						PRINTW
					ENDSELECT
				ENDIF
			;人目無
			ELSE
				SELECTCASE RAND:3
				CASE 0
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「哈啊HPH　叻噜、啾噜噜HPH」","L"
					RESETCOLOR
					PRINTFORML 不断被典舔着耳朵的洞、脑袋变得有些晕乎乎的…
					PRINTW
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「唔哼哼HPH　%CALLNAME:MASTER%阁下、真可爱…HPH」","L"
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						IF BASE:MASTER:勃起 >= 1000
							CALL HPH_PRINT,@"「只是被玩弄了下耳朵、小　鸡　鸡鸡HPH　就勃起的这ー么大…HPH」","L"
						ELSE
							CALL HPH_PRINT,@"「只是被玩弄了下耳朵、就喘成这样…HPH」","L"
						ENDIF
					ELSE
						CALL HPH_PRINT,@"「只是被玩弄了下耳朵、小穴就湿哒哒的了…HPH」","L"
					ENDIF
					PRINTW
					CALL HPH_PRINT,@"「嗯呼HPH　啾噜HPH」","L"
					CALL HPH_PRINT,@"「呼呜～～…唔、呼呜～～～～っ…HPH」","L"
					CALL HPH_PRINT,@"「耳朵被舔之后、只要一被吹气就会抖个不停HPH」","L"
					PRINTW
					CALL HPH_PRINT,@"「而且、只要在耳旁说悄悄话…呵呵、身体、也会一抖一抖的…HPH」","L"
					CALL HPH_PRINT,@"「不错哟、就算感觉很舒服…HPH　还是这样、\@  (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 摆出一副不開心的表情 # 把视线移到一边 \@呢…HPH」","L"
					PRINTW
				CASE 1
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						BASE:MASTER:勃起 = 1000
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「嘸嘸嘸、怎么了吗…？　呼吸这么粗乱…HPH」","L"
						RESETCOLOR
						PRINTFORML 坐在%CALLNAME:MASTER%腿上的典、微笑着回过头来
						PRINTFORML 那是沾满情欲的、邪魅的笑容
						PRINTW
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「你说想让我下来…\@  (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@、很重吗？」","L"
						CALL HPH_PRINT,@"「不是那样的？　那、就没有问题了呢…毕竟、\@  (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@只是坐在这里其他什么都没做HPH」","L"
						RESETCOLOR
						PRINTW
						PRINTFORML 典、以一种用自己柔软的屁股紧压在%CALLNAME:MASTER%的股间的姿势坐着
						PRINTFORML 受到的刺激、导致%CALLNAME:MASTER%的肉棒不管愿不愿意都做出了反应
						PRINTW
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「真是奇怪呢、总感觉、屁股从刚才就一直被什么硬硬的东西顶着…HPH」","L"
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、是衣服口袋里装了什么东西吗？HPH」","L"
						RESETCOLOR
						PRINTFORML 典好像故意一样、扭动着身体把自己的屁股对着你的股间使劲挤来挤去…
						PRINTFORML 没法舒舒服服的射精、只能等待这种半是折磨半是享受的时光快点过去…
						BASE:MASTER:射精 += 200
						SIF BASE:MASTER:射精 >= 9000
						BASE:MASTER:射精 = 8000
					ELSE
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「嘸嘸嘸、怎么了吗…？　呼吸这么粗乱…HPH」","L"
						RESETCOLOR
						PRINTFORML 紧抱着%CALLNAME:MASTER%的典、微笑着歪了歪脑袋
						PRINTFORML 那是沾满情欲的、邪魅的笑容
						PRINTW
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「你说想让我停下…被抱着、就那么不愿意吗？」","L"
						CALL HPH_PRINT,@"「不是那样的？　那、就没有问题了呢…」","L"
						CALL HPH_PRINT,@"「毕竟、\@  (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@只是抱着你其他什么都没做HPH」","L"
						RESETCOLOR
						PRINTW
						PRINTFORML 典一边紧抱着%CALLNAME:MASTER%、一边用大腿在你的股间使劲挤来挤去
						PRINTFORML
						PRINTW
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「真是奇怪呢、总感觉、大腿变得热乎乎的…HPH」","L"
						CALL HPH_PRINT,@"「应该是%CALLNAME:MASTER%阁下的体温有些高吧…HPH」","L"
						RESETCOLOR
						PRINTFORML 典继续紧抱着你、用大腿在你的股间使劲挤来挤去…
						PRINTFORML 明明知道你已经湿了、但典还是故意装作毫不知情
						PRINTFORML 被给予着平缓的快感、度过这半是折磨半是享受的时光…
						PALAM:快Ｃ += 200
						PALAM:潤滑 += 200
						SIF PALAM:快Ｃ >= 9000
						PALAM:快Ｃ = 8000
					ENDIF
				CASE 2
					IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、一颤一颤的真可爱HPH」","L"
						RESETCOLOR
						PRINTFORML 典从背后紧抱着你、用指头不停撩拨搔弄%CALLNAME:MASTER%的乳头…
						IF BASE:MASTER:勃起 >= 1000
							IF TCVAR:MASTER:要去了 == 1
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「已经到极限了吗？　想射出来吗？HPH」","L"
								CALL HPH_PRINT,@"「想像女孩子一样乳头被弄到高潮、噼呦噼呦的射出精子吗？HPH」","L"
								CALL HPH_PRINT,@"「告诉姐姐吧…HPH　%CALLNAME:MASTER%阁下、想怎么办呢？HPH」","L"
								RESETCOLOR
								CALL ASK_YN("想用乳头让自己搞高潮","不想高潮")
								IF !RESULT
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「好HPH　很好地说了出来呢HPH」","L"
									CALL HPH_PRINT,@"「那就让好好坦率地说出来的%CALLNAME:MASTER%阁下、用乳头高潮吧HPH」","L"
									RESETCOLOR
									PRINTFORML 典眯着眼睛開始用绝妙的力度搔弄着你的乳头
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「高潮吧HPH　给我用乳头高潮吧HPH」","L"
									CALL HPH_PRINT,@"「一边被姐姐看着一边噼呦噼呦地射精吧HPH」","L"
									RESETCOLOR
									PRINTL
									PRINTFORML 哔咕…
									PRINTFORML 　　哔咕……
									PRINTL
									BASE:MASTER:射精 = 0
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嘸嘸、射出来不少呢HPH」","L"
									CALL HPH_PRINT,@"「怎么办？　内裤、黏乎乎的很恶心呢…HPHHPH」","L"
									CALL HPH_PRINT,@"「就把衣服、脱了吧…HPH」","L"
									RESETCOLOR
									PRINTW
									CALL AddEXP("Ｂ絶頂経験", MASTER, 1)
									CALL AddEXP("射精経験", MASTER, 1)
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「哎、还真是固执呢…HPH」","L"
									CALL HPH_PRINT,@"「不管是上面的嘴还是下面的嘴都在滴着口水、完全没有说服力哟HPH」","L"
									CALL HPH_PRINT,@"「姐姐要让没法坦率起来的%CALLNAME:MASTER%阁下、好好高潮一下ーHPH」","L"
									PRINTW
									RESETCOLOR
									PRINTFORML 典眯着眼睛開始用绝妙的力度搔弄着你的乳头
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「高潮吧HPH　给我用乳头高潮吧HPH」","L"
									CALL HPH_PRINT,@"「一边被姐姐看着一边噼呦噼呦地射精吧HPH」","L"
									RESETCOLOR
									PRINTL
									PRINTFORML 哔咕…
									PRINTFORML 　　哔咕……
									PRINTL
									BASE:MASTER:射精 = 0
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊ー 、射出来了HPH」","L"
									CALL HPH_PRINT,@"「怎么办？　内裤、黏乎乎的很恶心呢…HPHHPH」","L"
									CALL HPH_PRINT,@"「就把衣服、脱了吧…HPH」","L"
									RESETCOLOR
									PRINTW
									CALL AddEXP("Ｂ絶頂経験", MASTER, 1)
									CALL AddEXP("射精経験", MASTER, 1)
								ENDIF
							ELSE
								IF BASE:MASTER:射精 >= 8000
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嘸嘸、小鸡鸡已经涨到极限了…HPH」","L"
									CALL HPH_PRINT,@"「啊ー啊、先走汁都染出一大片污渍了…HPH」","L"
									CALL HPH_PRINT,@"「不过、还不能射哦HPH　忍耐、忍耐…HPH」","L"
									RESETCOLOR
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「看来还能继续忍一阵呢HPH」","L"
									CALL HPH_PRINT,@"「射出来的话、会有惩罚哟HPH」","L"
									RESETCOLOR
								ENDIF
							ENDIF
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「讨厌？　讨厌的话、把我的手拨開不就好了吗？HPH」","L"
							CALL HPH_PRINT,@"「反正、你又不是身体没法动弹不是么…HPH」","L"
							CALL HPH_PRINT,@"「没有这么做也就是说、你想要、继续对吧…HPH」","L"
							RESETCOLOR
							CALL ASK_YN("…想要、继续…","…才没有、那种事…")
							IF !RESULT
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「这么坦率很可爱哦HPH」","L"
								CALL HPH_PRINT,@"「作为你诚实地说出来的奖励、就继续揉弄揉弄哦…HPH」","L"
							ELSE
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「哼ー唔、居然ー、说出这种话啊…HPH」","L"
								CALL HPH_PRINT,@"「那么、到ー此结束HPH」","L"
								PRINTW
								CALL ASK_YN("啊…","终于解放了…")
								IF !RESULT
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「刚才、摆出了一副很遗憾的表情呢…？HPH」","L"
									CALL HPH_PRINT,@"「对姐姐、隐瞒实情可不行哟…HPH　来吧、坦率一点…HPH」","L"
									RESETCOLOR
									PRINTW
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「姐姐我、不知不觉、就会很想欺负%CALLNAME:MASTER%阁下…抱歉呢HPH」","L"
									CALL HPH_PRINT,@"「请不要生我的气…那要不、你也对姐姐、做同样的事情、试试看？HPH」","L"
									RESETCOLOR
									PRINTFORML 典的眼睛和嘴唇同时描绘出了一道弧线…
									PRINTW
								ENDIF
							ENDIF
							RESETCOLOR
							SIF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
							BASE:MASTER:勃起 += 300
						ENDIF
					ELSE
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、一颤一颤的真可爱HPH」","L"
						RESETCOLOR
						PRINTFORML 典从背后紧抱着你、用指头不停撩拨搔弄%CALLNAME:MASTER%的乳头…
						IF BASE:MASTER:勃起 >= 1000
							IF TCVAR:MASTER:要去了 == 1
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「已经到极限了吗？　想射出来吗？HPH」","L"
								CALL HPH_PRINT,@"「想像女孩子一样乳头被弄到高潮、噼呦噼呦的射出精子吗？HPH」","L"
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、想怎么办呢？　就这样、委身于快乐如何HPH」","L"
								RESETCOLOR
								CALL ASK_YN("想用乳头让自己搞高潮","不想高潮")
								IF !RESULT
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「好HPH　很好地说了出来呢HPH」","L"
									CALL HPH_PRINT,@"「那就让好好坦率地说出来的%CALLNAME:MASTER%阁下、用乳头高潮吧HPH」","L"
									RESETCOLOR
									PRINTFORML 典眯着眼睛開始用绝妙的力度搔弄着你的乳头
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「高潮吧HPH　给我用乳头高潮吧HPH」","L"
									CALL HPH_PRINT,@"「给我一边毫无抵抗地被玩弄着乳头一边没出息的射精吧HPH」","L"
									RESETCOLOR
									PRINTL
									PRINTFORML 哔咕…
									PRINTFORML 　　哔咕……
									PRINTL
									BASE:MASTER:射精 = 0
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嘸嘸、射出来不少呢HPH」","L"
									CALL HPH_PRINT,@"「明明都是大人了、简直就像小便失禁了一样…嘸嘸、真丢人HPH」","L"
									CALL HPH_PRINT,@"「好啦、衣服、还不脱掉吗…？HPH」","L"
									RESETCOLOR
									PRINTW
									CALL AddEXP("Ｂ絶頂経験", MASTER, 1)
									CALL AddEXP("射精経験", MASTER, 1)
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「哎、还真是固执呢…HPH」","L"
									CALL HPH_PRINT,@"「不管是上面的嘴还是下面的嘴都在滴着口水、完全没有说服力哟HPH」","L"
									CALL HPH_PRINT,@"「典要让没法坦率起来的%CALLNAME:MASTER%阁下、好好高潮一下ーHPH」","L"
									PRINTW
									RESETCOLOR
									PRINTFORML 典眯着眼睛開始用绝妙的力度搔弄着你的乳头
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「高潮吧HPH　给我用乳头高潮吧HPH」","L"
									CALL HPH_PRINT,@"「就这样连肉棒都没被碰到就没出息的高潮吧HPH」","L"
									RESETCOLOR
									PRINTL
									PRINTFORML 哔咕…
									PRINTFORML 　　哔咕……
									PRINTL
									BASE:MASTER:射精 = 0
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊ー 、射出来了HPH」","L"
									CALL HPH_PRINT,@"「叫出了不错的声音呢…HPH　非常的、惹人怜爱哦…HPH」","L"
									CALL HPH_PRINT,@"「怎么样？　想要、继续做吗…HPH」","L"
									RESETCOLOR
									PRINTW
									CALL AddEXP("Ｂ絶頂経験", MASTER, 1)
									CALL AddEXP("射精経験", MASTER, 1)
								ENDIF
							ELSE
								IF BASE:MASTER:射精 >= 8000
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嘸嘸、小鸡鸡已经涨到极限了…HPH」","L"
									CALL HPH_PRINT,@"「啊ー啊、先走汁都染出一大片污渍了…HPH」","L"
									CALL HPH_PRINT,@"「不过、还不能射哦HPH　忍耐、忍耐…HPH」","L"
									RESETCOLOR
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「看来还能继续忍一阵呢HPH」","L"
									CALL HPH_PRINT,@"「射出来的话、会有惩罚哟HPH」","L"
									RESETCOLOR
								ENDIF
							ENDIF
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「讨厌？　讨厌的话、把我的手拨開不就好了吗？HPH」","L"
							CALL HPH_PRINT,@"「反正、你又不是身体没法动弹不是么…HPH」","L"
							CALL HPH_PRINT,@"「没有这么做也就是说、你想要、继续对吧…HPH」","L"
							RESETCOLOR
							CALL ASK_YN("…想要、继续…","…才没有、那种事…")
							IF !RESULT
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「这么坦率很可爱哦HPH」","L"
								CALL HPH_PRINT,@"「作为你诚实地说出来的奖励、就继续揉弄揉弄哦…HPH」","L"
							ELSE
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「哼ー唔、居然ー、说出这种话啊…HPH」","L"
								CALL HPH_PRINT,@"「那么、到ー此结束HPH」","L"
								PRINTW
								CALL ASK_YN("啊…","终于解放了…")
								IF !RESULT
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「刚才、摆出了一副很遗憾的表情呢…？HPH」","L"
									CALL HPH_PRINT,@"「就算想蒙混过去、也没有用哦HPH　来嘛、坦率一点…HPH」","L"
									RESETCOLOR
									PRINTW
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「请不要生气嘛。都是用那么可爱的表情喘着气的%CALLNAME:MASTER%阁下不好…HPH」","L"
									CALL HPH_PRINT,@"「那、要不要、和典互相触碰呢…？HPH」","L"
									RESETCOLOR
									PRINTFORML 典的眼睛和嘴唇同时描绘出了一道弧线…
									PRINTW
								ENDIF
							ENDIF
							RESETCOLOR
							SIF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
							BASE:MASTER:勃起 += 300
						ENDIF
					ENDIF
				ENDSELECT
			ENDIF
		ELSEIF TALENT:恋慕 || TALENT:恋人
			IF CHK_DATENOW(CFLAG:139:约会中)
				IF K139_BE_SEEN()
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「嘸嘸、%CALLNAME:MASTER%阁下是想让周围人见识一下我们之间的亲密感情呢♪」
						PRINTW
					CASE 1
						PRINTFORML 「真是的、明明有人看着呢♪　不过、我想继续这样下去♪」
						PRINTW
					CASE 2
						PRINTFORML 「啊啊、这就是所谓的『笨蛋情侣』吧。意想不到的是作为被别人看的一方并没有觉得不适♪」
						PRINTW
					ENDSELECT
				;约会中二人きり
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「谁都不会来打扰呢…♪　来吧♪」
					CASE 1
						PRINTFORML 「脸挨那么近的话…我会不好意思%UNICODE(0x2665) *1%」
					CASE 2
						PRINTFORML
					ENDSELECT
				ENDIF
			ELSE
				IF K139_BE_SEEN()
					;龍がいる
					IF K139_FIND_AROUND() == 140
						IF TALENT:140:恋人
							PRINTFORML 「啊啦啊啦、明明还在饭纲丸大人的眼前…」
						ELSEIF TALENT:140:恋慕
							PRINTFORML 「%CALLNAME:MASTER%阁下、饭纲丸大人还在看着呢…」
							PRINTFORML （吾主看来也很为难呢…）
						ELSE
							PRINTFORML 「在主人面前打情骂俏的话、之后会怎么被说呢…♪」
						ENDIF
					ELSE
						PRINTFORML 「嘛、在众目睽睽之下打情骂俏什么的还真是大胆呢♪」
					ENDIF
				ENDIF
			ENDIF
		;恋慕、恋人無
		ELSE
			;密室。性騷擾指令の代用に。回数をこなすとより過激な身体接觸になる
			IF GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館)
				IF PALAM:欲情 >= PALAMLV:4
					SELECTCASE TCVAR:354
					CASE IS > 10
						SELECTCASE RAND:4
						CASE 0
							CALL HPH_PRINT,@"「啊啊、绝对会留下痕迹的…HPH」","L"
							CALL HPH_PRINT,@"「千万不能让饭纲丸大人发现啊…HPH」","L"
						CASE 1
							PRINTFORML 虽然在不停地悄悄抚摸耻丘附近、典还是一直若无其事
							CALL HPH_PRINT,@"「…………HPH」","L"
							PRINTFORML 就像是要回礼一样、典也開始悄悄触碰%CALLNAME:MASTER%的股间
						CASE 2
							CALL HPH_PRINT,@"「把手指、伸进耳朵里可不行…HPH」","L"
						CASE 3
							CALL HPH_PRINT,@"「不可以、舔耳朵啊…HPH」","L"
						ENDSELECT
					CASE IS > 3
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「嘸嘸…真是色情啊…%UNICODE(0x2665) *1%」
						CASE 1
							PRINTFORML 腹股沟一被抚摸、典就好像酥痒难耐一样扭动着身体
							PRINTFORML 「再往内侧摸一点…也可以哟%UNICODE(0x2665) *1%」
						CASE 2
							CALL HPH_PRINT,@"「做得再过火一些的话…我会受不了的HPH」","L"
						ENDSELECT
					CASEELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「啊、%CALLNAME:MASTER%阁下、请不要胡闹…%UNICODE(0x2665) *1%」
						CASE 1
							PRINTFORML 刚把手从大腿内侧滑向大腿根部、典就发出了甜美的声音
							PRINTFORML 「唔…%UNICODE(0x2665) *1%」
						CASE 2
							PRINTFORML 「哈啊…%UNICODE(0x2665) *1%　耳朵、不可以…%UNICODE(0x2665) *1%」
						ENDSELECT
					ENDSELECT
					PRINTW
				;欲情低め
				ELSE
					SELECTCASE TCVAR:354
					CASE IS > 10
						SELECTCASE RAND:3
						CASE 0
							CALL HPH_PRINT,@"「吸得那么用力的话、会留下痕迹的…HPH」","L"
						CASE 1
							PRINTFORML 虽然在不停地悄悄抚摸耻丘附近、典还是一直若无其事
							CALL HPH_PRINT,@"「…………HPH」","L"
						CASE 2
							CALL HPH_PRINT,@"「把手指、伸进耳朵里可不行…HPH」","L"
						ENDSELECT
					CASE IS > 3
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「把手伸到那么里面的话…%UNICODE(0x2665) *1%」
						CASE 1
							PRINTFORML 腹股沟一被抚摸、典就好像酥痒难耐一样扭动着身体
							PRINTFORML 「哼哼、痒痒的…%UNICODE(0x2665) *1%」
						CASE 2
							PRINTFORML 「所以、都说了不行啦…%UNICODE(0x2665) *1%」
						ENDSELECT
					CASEELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「真是的、你还真是喜欢、把手从衣服缝隙里伸进去呢…♪」
						CASE 1
							PRINTFORML 「摸我大腿的手法、是不是有点下流啊…♪」
						CASE 2
							PRINTFORML 「耳朵、不要舔嘛…♪」
						ENDSELECT
					ENDSELECT
					PRINTW
				ENDIF
			TCVAR:354 += 1
			;密室（情人旅館、情人用宿屋）でない
			ELSE
				IF K139_BE_SEEN()
					;龍がいる
					IF K139_FIND_AROUND() == 140
						IF TALENT:140:恋人
							PRINTFORML 「啊啦啊啦、明明还在饭纲丸大人的眼前…」
						ELSEIF TALENT:140:恋慕
							PRINTFORML 「%CALLNAME:MASTER%阁下、饭纲丸大人还在看着呢…」
							PRINTFORML （吾主看来也很为难呢…）
						ELSE
							PRINTFORML 「在主人面前打情骂俏的话、之后会怎么被说呢…♪」
						ENDIF
					ELSE
						PRINTFORML 「嘛、在众目睽睽之下打情骂俏什么的还真是大胆呢♪」
					ENDIF
				ENDIF

				SELECTCASE RAND:10
				CASE 0
					PRINTFORML 「唔%UNICODE(0x2665) *1%　耳朵很敏感的啊…♪」
				CASE 1
					PRINTFORML 「就那么喜欢尾巴吗？　嘛、只要你不拽就随你哦」
				CASE 2
					PRINTFORML 「来嘛来嘛♪」
					PRINTFORML 被毛茸茸的尾巴扇来扇去…
				CASE 3
					PRINTFORML 「咿呀唔」
					PRINTFORML 用手指在典的背上摸了一下后、她一下子发出了可爱的悲鸣
				CASE 4
					PRINTFORML 「那个、我又不是狗…」
					PRINTFORML 你摸了摸典的下巴附近、她便露出了一副困惑的表情
					SIF TALENT:62:恋慕
						PRINTFORML 「把犬走小姐送给你怎么样？」
				CASE 5
					PRINTFORML 「能帮我梳一梳头发吗？」
					IF ABL:MASTER:指 < 1
						PRINTFORML 「啊痛痛痛…再稍微、细致些…」
					ELSEIF ABL:MASTER:指 < 3
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「挺熟练呢。是之前有经常给哪位小姐梳头发吗？」
						CASE 1
							PRINTFORML 「啊痛痛痛…」
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「请不要擅自给我编三股辫啦」
						CASE 1
							PRINTFORML 「哇哇、不知不觉间就编成这样…」
						CASE 2
							PRINTFORML 「呜咿！？　请不要把头发弄到耳朵里面去！」
						ENDSELECT
					ENDIF
				CASE 6
					PRINTFORML 「怎么了？　我可是一直有在好好保养尾巴哟」
					PRINTFORML 「嘛、虽说九尾狐小姐的尾巴背负着许许多多的含义…」
					CALL ASK_YN("喜欢典的尾巴","九尾狐的尾巴数量比较多呢")
					IF !RESULT
						PRINTFORML 「哦呀哦呀？　难道说、被我迷住了～？」
						PRINTFORML 看着她有些得意忘形了所以对着她来了个脑瓜嘣
						PRINTFORML 「咕唔」
					ELSE
						PRINTFORML 「虽然作为妖怪的位格可能输给她了、但论起实际作为的话我也干得很不错呢」
						PRINTFORML 典得意地挺起\@ TALENT:TARGET:胸圍 >= 0 ? 丰满的 # 贫瘠的 \@胸部、得意地哼哼了两声
					ENDIF
				CASE 7
					PRINTFORML 「尾巴孔是为了用来把尾巴露出来的、不是为了让%CALLNAME:MASTER%阁下性骚扰的孔…」
					CALL ASK_YN("非要把手伸进去","把手缩回来")
					IF !RESULT
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							IF PALAM:欲情 >= PALAMLV:4
								IF CFLAG:没穿内裤 == 1
									CALL HPH_PRINT,@"「呀嗯、我说%CALLNAME:MASTER%阁下啊、真大胆HPH」","L"
									PRINTFORML 软乎乎的、活生生的触感。典、没有穿内衣
								ELSE
									CALL HPH_PRINT,@"「啊唔HPH　%CALLNAME:MASTER%阁下触摸的手法、好下流…HPH」","L"
								ENDIF
								PRINTW
							ELSE
								PRINTFORML 「我说、只能摸一下下哦…%UNICODE(0x2665) *1%」
							ENDIF
						ELSE
							IF PALAM:欲情 >= PALAMLV:4
								PRINTFORML 「…不可以碰我屁股啊」
							ELSE
								PRINTFORML 「不ー行。这种事情、还是等到我们关系更进一步…如何%UNICODE(0x2665) *1%」
							ENDIF
						ENDIF
					ELSE
						IF PALAM:欲情 >= PALAMLV:4
							PRINTFORML 「停下了吗？　明明就算你伸进来、我也不会追究的…♪」
						ELSE
							PRINTFORML 「我喜欢能听懂人话的好孩子哦♪」
						ENDIF
					ENDIF
				CASE 8
					PRINTFORML 「等下等下、闻女性的脑袋的味道什么的…」
					CALL ASK_YN("味道很好闻","一股狐狸的臭味")
					IF !RESULT
						PRINTFORML 「真是的、这句话、是夸奖吗…？」
					ELSE
						PRINTFORML 「这话、绝对不是什么夸奖吧…」
					ENDIF
				CASE 9
					PRINTFORML 「要帮我揉肩吗？　多谢你啦」
					IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
						CALL HPH_PRINT,@"「哈嗯HPH」","L"
						CALL HPH_PRINT,@"「很抱歉发出了奇怪的声音、%CALLNAME:MASTER%的手、太舒服了…呜呜唔HPH」","L"
						PRINTFORML 因为典发出了娇艳的声音、让你有点不知所措…
						PRINTW
					ELSE
						PRINTFORML 「哈啊～%UNICODE(0x2665) *1%　那里、就是那里%UNICODE(0x2665) *1%」
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「%CALLNAME:MASTER%阁下、很熟练嘛…♪」
						CASE 1
							PRINTFORML 「啊ー、请不要趁机把手伸进衣服里哦♪」
							PRINTFORML 正准备把手从背后镂空的部分伸进去时、被典啪唧一下拍開了
							PRINTW
						ENDSELECT
					ENDIF
				ENDSELECT
				PRINTW
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,道歉
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_303
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	SELECTCASE TFLAG:193
	;許してくれた
	CASE 0,1,2
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「啊……姐姐好像也有点生气过头了。真是抱歉呢」
			PRINTFORML 「我们和好吧。好的…来握手吧、握手」
			PRINTFORML 典露出些许尴尬的笑容、温柔地握住了%CALLNAME:MASTER%的手
			PRINTW
		ELSE
			PRINTFORML 「嗯……我也有点固执过头了」
			PRINTFORML 「差不多也该原谅你了。拖得太久也没有意义呢」
			PRINTFORML 总算是就此收场了、心里松了一口气
			PRINTW
		ENDIF
	;許してくれなかった
	CASEELSE
		PRINTFORML 「不行。我还不能原谅你」
		PRINTFORML 「你再稍微反省一会儿如何？」
		PRINTFORML 似乎还没法得到原谅的样子
		PRINTW
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;304,幫忙干活
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:沒法幫忙(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_SUCCESS_COM_K139_304
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	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_K139_305
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FIRSTTIME(305)
		PRINTFORML 「想要我为您做膝枕吗？」
		PRINTFORML 「哎呀哎呀、您一直憧憬着这样的事情吗♪」
		PRINTW
		PRINTFORML 「这样的话、既然您都这么拜托我了、那我也不能拒绝呢…♪」
		PRINTFORML 「喏、这是典的膝枕…♪　请随便享用吧♪」
		PRINTFORML 典啪嗒啪嗒地拍着自己的大腿、用眼神示意你躺下
		PRINTW
	ELSEIF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「你在这种时候都说了些什么啊…」
			PRINTFORML 典一脸无奈地伸出自己的大腿
			PRINTFORML 「就算是这样、现在我也仍然很生气啊…」
			PRINTW
		ELSE
			PRINTFORML 「膝枕吗…」
			PRINTFORML 典一脸厌恶地伸出自己的大腿
			PRINTFORML 「请随便享用」
			PRINTW
		ENDIF
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:12
			CASE 0
				PRINTFORML 典開玩笑地把自己的尾巴放在%CALLNAME:MASTER%的头上把玩着…
			CASE 1
				PRINTFORML 「睡得舒服吗？」
			CASE 2
				PRINTFORML 「看样子您累了呢。让典来治愈你吧」
			CASE 3
				PRINTFORML 「不要往大腿上蹭。好痒啊」
			CASE 4
				PRINTFORML 「好啦好啦、%CALLNAME:MASTER%阁下真是个爱撒娇的孩子呢%UNICODE(0x2665) *1%」
			CASE 5
				PRINTFORML 「怎么了？　一直盯着典的脸」
			CASE 6
				PRINTFORML 「嘸嘸…一脸幸福的表情呢」
			CASE 7
				PRINTFORML 「下次轮到典了哦。典也是最喜欢%CALLNAME:MASTER%阁下的膝枕了…%UNICODE(0x2665) *1%」
			CASE 8
				PRINTFORML 「你问我不重吗？」
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					PRINTFORML 「竟然为姐姐担心、%CALLNAME:MASTER%阁下还真是温柔啊」
				ELSE
					PRINTFORML 「没关系。相反、这个重量意外的舒服呢」
				ENDIF
			CASE 9
				IF DAY:2 == 1
					PRINTFORML 「呼…真困啊」
				ELSEIF DAY:2 == 2
					PRINTFORML 「不热吗？　%CALLNAME:MASTER%阁下」
					PRINTFORML 典温柔地用团扇为你扇着风
				ELSEIF DAY:2 == 3
					PRINTFORML 「已经是秋天了呢」
					PRINTFORML 典温柔地抚摸着%CALLNAME:MASTER%的头说道
				ELSEIF DAY:2 == 4
					PRINTFORML 「就算再怎么喜欢也不能就这样睡着啊」
					PRINTFORML 「会感冒的哦。要是想睡觉的话就在被子里睡吧」
				ENDIF
			CASE 10
				IF TALENT:MASTER:性別 == 1 || TALENT:MASTER:性別 == 3
					PRINTFORML 「呀、这里有分叉的头发呢…」
					PRINTFORML 「你有好好打理过头发吗？　头发是女人的生命哦」
				ELSE
					PRINTFORML 「呀、这部分…」
					PRINTFORML 「不…没什么…」
				ENDIF
			CASE 11
				PRINTFORML 「在这种地方这么悠闲真的好么？　呼呼、就此打住也可以哦？」
				PRINTFORML 「现在、正是想做这种事的心情…♪」
			ENDSELECT
			PRINTW
		ELSE
			IF ABL:親密 >= 6
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					SELECTCASE RAND:5
					CASE 0
						PRINTFORML 「………………」
						PRINTFORML 虽然摸了很多不该摸的地方、但典还是微笑着抚摸你的头…
						PRINTW
					CASE 1
						PRINTFORML 「嘛、现在应该还是想向父母和长辈撒娇的年纪吧」
						PRINTFORML 「要不要试试对着姐姐喊妈妈呢？」
						PRINTW
					CASE 2
						PRINTFORML 「身体不用这么僵硬呀。啊、如果是下半身硬起来的话那没关系哦♪」
						PRINTFORML 典一边温柔地抚摸着你的头一边发表着性骚扰言论…
						PRINTW
					CASE 3
						PRINTFORML 「欸欸～、一直在闻着姐姐大腿味道的变态桑是谁呀～？」
						PRINTW
					CASE 4
						PRINTFORML 「不～行、在衣服缝隙里偷偷恶作剧的坏手手、是这一只吗～？」
						PRINTFORML 正想偷偷恶作剧的时候被典一把抓住了手…
					ENDSELECT

					IF BASE:MASTER:勃起 >= 1000
						PRINTFORML 「%CALLNAME:MASTER%阁下。这是怎么回事～？」
						PRINTFORML 典用手指抚摸着把衣服撑起来的阴茎
						PRINTW
						PRINTFORML 「姐姐只是为你做膝枕而已、竟然会变成这样呢…」
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、真是个变态…HPH」","L"
						PRINTW
					ENDIF
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「不ー行。这里是严禁触碰的哦ー♪」
						PRINTW
					CASE 1
						PRINTFORML 「舒服吗？　那真是太好了♪」
						PRINTW
					CASE 2
						PRINTFORML 「怎么啦、一脸没出息的表情」
						PRINTFORML 典微笑着、温柔地抚摸着你的头…
						PRINTW
					ENDSELECT
				ENDIF
			ELSEIF ABL:親密 >= 3
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「每摸一次就要收您一百日元哦」
					PRINTFORML 「好那么一ー、二ー、三ー次、四ー、五ー…♪」
					PRINTW
				CASE 1
					PRINTFORML 「来吧来吧、摸啊摸、摸啊摸♪」
					PRINTW
				CASE 2
					PRINTFORML 「其实…今天、典的衣服下面什么也没有穿哦…%UNICODE(0x2665) *1%」
					IF CFLAG:没穿内裤 == 1
						PRINTFORML 「……要确认一下吗%UNICODE(0x2665) *1%」
					ELSE
						PRINTFORML 「哎呀ー、我是開玩笑的♪」
						PRINTW
					ENDIF
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「您累了吧。请在典的腿上休息一会儿吧♪」
					PRINTW
				CASE 1
					PRINTFORML 「感觉如何？　枕在典的大腿上的感觉♪」
					PRINTW
				CASE 2
					PRINTFORML 「啊ー啦、这是不行的哦♪　我知道你想摸奇怪的地方♪」
					PRINTW
				ENDSELECT
			ENDIF

			IF TALENT:140:恋人
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「不能让饭纲丸大人看到这里的情况呢…♪」
					PRINTFORML 「还是说、希望被她看到之类的♪　呼呼、開玩笑的啦」
					PRINTW
				CASE 1
					PRINTFORML 「我和饭纲丸大人的膝枕、谁的更舒服？」
					PRINTFORML 「我会保密的、请告诉我吧～」
					PRINTW
				CASE 2
					PRINTFORML 「和我做这种事情、绝对要对饭纲丸大人保密哦…♪」
					PRINTW
				ENDSELECT
			ELSEIF TALENT:140:恋慕
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「我的大腿和饭纲丸大人的大腿、谁的更舒服？」
					CALL ASK_M("典的", 1,"饭纲丸的", 1,"不如说在此之前根本没享受过膝枕…", 1)
					SELECTCASE RESULT
					CASE 0
						PRINTFORML 「哎呀哎呀♪　那真是太光荣了♪」
						PRINTFORML （饭纲丸大人…再不积极一点儿可不行啊）
					CASE 1
						PRINTFORML 「哎呀哎呀♪　有些嫉妒呢♪」
						PRINTFORML （嘛ー、饭纲丸大人还是挺有希望的）
					CASE 2
						PRINTFORML 「啊、这样啊…」
						PRINTFORML （饭纲丸大人也太过分了吧…）
					ENDSELECT
					PRINTW
				CASE 1
					PRINTFORML 「明明还在享受我的大腿…嘴上却说饭纲丸大人的大腿让人感觉更舒服吗♪」
					PRINTFORML 「下次遇到她、我就拜托她试试看如何？」
					PRINTW
				CASE 2
					PRINTFORML 「其实是想让饭纲丸大人来做吧？」
					PRINTFORML 「问我为什么？　这是…秘密哦♪」
					PRINTFORML （还是说出来会更有趣吧ー。该怎么办好呢ー）
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;TFLAG:193(1=ABL:親密6以上かつ妊娠時 0=成功 -1=ABL:親密5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K139_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	;時間停止中
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	;通常
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			;妊娠時
			IF TFLAG:193 == 1
				;出産間近
				IF CFLAG:妊娠経過日数 >= 25
					IF CFLAG:無自覚妊娠
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「…我想把这个孩子生下来」
							PRINTFORML 「虽然不知道这孩子的父亲是谁、但这孩子毕竟有我的一半血统…」
							PRINTW
						CASE 1
							PRINTFORML 「我…我想生的是%CALLNAME:MASTER%阁下的孩子…」
							PRINTFORML 典低着头、看不清她的表情
							PRINTFORML 眼泪、一滴、两滴地落在脚边
							PRINTW
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「这孩子到底像谁呢」
							CALL ASK_YN("要是能像典就好了","可能和自己很像？")
							IF !RESULT
								PRINTFORML 「是吗？　典倒希望这孩子能像%CALLNAME:MASTER%阁下呢♪」
								PRINTFORML 不不、绝对是像典。「不不、绝对是像%CALLNAME:MASTER%阁下…」就这样把答案互相推搡了一会儿
								PRINTW
							ELSE
								PRINTFORML 「嘸嘸、如果是这样的话那就太好了」
								PRINTW
							ENDIF
							PRINTW
						CASE 1
							PRINTFORML 「终于也快到了这个时候了呢」
							PRINTFORML 为了消除典的不安開始抚摸起她的肚子、典的表情渐渐缓和下来
							PRINTW
						CASE 2
							PRINTFORML 「嘸嘸…马上就要和这孩子见面了呢♪」
							PRINTW
						ENDSELECT
					ENDIF
				;誰の目から見ても明らか（カッコ内は無自覚:妊娠受け入れ）
				ELSEIF CFLAG:妊娠経過日数 >= 20
					IF CFLAG:無自覚妊娠
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「是的…我的身体里怀有一个孩子…」
							PRINTFORML （被来路不明的人奸污怀孕等等…希望你能相信这个借口…）
							PRINTW
						CASE 1
							PRINTFORML 「欸、估计快要生下来了」
							PRINTFORML 典的表情很沉重
							PRINTW
						CASE 2
							PRINTFORML 「不知道…我该、怎么办…」
							PRINTFORML （至少、如果肚子里的孩子是%CALLNAME:MASTER%阁下的话就好了…）
							PRINTW
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「嘸嘸、好像动了一下？」
							PRINTFORML 「最近经常踢我。也许会生下一个健康的孩子呢」
							PRINTW
						CASE 1
							PRINTFORML 「完全变得引人注目了呢」
							;龍が恋人
							IF TALENT:140:恋人
								PRINTFORML 「饭纲丸大人用复杂的表情看着我、真的让我很为难啊…」
							;文
							ELSEIF TALENT:29:恋人
								PRINTFORML 「被射命丸小姐盯上的话可不好办啊…」
							;極
							ELSEIF TALENT:42:恋人
								PRINTFORML 「姫海棠小姐这么羡慕我、真的让我很为难啊…」
							ELSEIF TALENT:65:恋人
								PRINTFORML 「犬走小姐用复杂的表情看着我、真的让我很为难啊…」
							ENDIF
							PRINTFORML 「尽管如此、典还是想生下%CALLNAME:MASTER%阁下的孩子」
							PRINTW
						CASE 2
							PRINTFORML 「变大了很多吧？」
							PRINTFORML 「也有痛苦的时候…不过因为有%CALLNAME:MASTER%阁下、所以典就没问题了」
							PRINTW
						ENDSELECT
					ENDIF
				;お腹の膨らみが目立ってきた（変化を受け入れられない）
				ELSEIF CFLAG:妊娠経過日数 >= 15
					IF CFLAG:無自覚妊娠
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「那个、我不太喜欢被人摸那里…」
							PRINTFORML （不太想让%CALLNAME:MASTER%阁下知道啊…）
							PRINTW
						CASE 1
							PRINTFORML 「对不起、请不要这样…」
							PRINTFORML 典露出困惑的表情
							PRINTW
						CASE 2
							PRINTFORML 「肚子挺出来了吗？　啊哈哈、可能是最近吃太多了吗…」
							PRINTFORML （果然、我真的…）
							PRINTW
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「是的、那里住着%CALLNAME:MASTER%阁下和典的孩子」
							PRINTFORML 「被父亲抚摸着、在肚子里也会高兴的吧」
							PRINTW
						CASE 1
							PRINTFORML 「呵呵、父亲大人在等着呢」
							PRINTFORML 典微笑着看着肚子
							PRINTW
						CASE 2
							PRINTFORML 「身体状况怎么样？　是的、目前为止一切都很顺利」
							PRINTFORML 「现在已经稳定下来了、不做点运动对肚子里的孩子也不好」
							PRINTW
						ENDSELECT
					ENDIF
				;妊娠発覚したがまだ目立っていない（気付いていない）
				ELSE
					IF CFLAG:無自覚妊娠
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「最近老是觉得肚子不舒服…」
							PRINTFORML 「是吃了掉在路边的食物吗？　太过分了、我不会做那种事的」
							PRINTW
						CASE 1
							PRINTFORML 「啊啊、那里…被抚摸的话就会觉得很平静」
							PRINTFORML 「最近好像状态不太好…」
							PRINTW
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「没想到我会成为母亲呢、我到现在都还是半信半疑的状态」
							PRINTFORML 「不过、我真的很想生下%CALLNAME:MASTER%阁下的孩子」
							PRINTW
						CASE 1
							PRINTFORML 「呵呵、肚子还没变大呢」
							PRINTW
						CASE 2
							PRINTFORML 「这孩子现在正在茁壮成长哦」
							PRINTFORML 典把自己的手轻轻重叠在%CALLNAME:MASTER%的手上
							PRINTW
						ENDSELECT
					ENDIF
				ENDIF
			;恋慕・恋人／妊娠してない
			ELSE
				IF TALENT:妊娠願望
					IF ESTRUS_CYCLE(TARGET) == 150
						IF EX:膣内精液 > 0
							PRINTFORML 「现在、我的卵子和%CALLNAME:MASTER%阁下的精子相遇了哦…%UNICODE(0x2665) *1%」
						ELSE
							PRINTFORML 「今天能射在这里面吗…%UNICODE(0x2665) *1%」
						ENDIF
					ELSEIF ESTRUS_CYCLE(TARGET) == 100
						IF EX:膣内精液 > 0
							PRINTFORML 「今天是排卵日真是太好了…%UNICODE(0x2665) *1%」
						ELSE
							PRINTFORML 「%CALLNAME:MASTER%阁下、今天感觉应该会中奖呢、你觉得呢…%UNICODE(0x2665) *1%」
						ENDIF
					ELSE
						IF EX:膣内精液 > 0
							PRINTFORML 「就算是安全期、好像还是有怀上孩子的可能的…%UNICODE(0x2665) *1%」
						ELSE
							PRINTFORML 「从现在開始…要不要来造孩子？%UNICODE(0x2665) *1%」
						ENDIF
					ENDIF
				ELSE
					IF EX:膣内精液 > 0
						IF !TALENT:妊娠願望
							PRINTFORML 「%CALLNAME:MASTER%阁下的种子充分地灌入进去了呢…%UNICODE(0x2665) *1%」
							PRINTFORML 「现在、精子们正在那里展開争夺卵子的战争吧…%UNICODE(0x2665) *1%」
							;危険日
							IF ESTRUS_CYCLE(TARGET) == 150
								CALL HPH_PRINT,@"「如果就这样着床就好了…HPH」","L"
							;排卵日
							ELSEIF ESTRUS_CYCLE(TARGET) == 100
								CALL HPH_PRINT,@"「今天是排卵期…HPH　说不定真的受精了…HPH」","L"
							;安全日
							ELSEIF ESTRUS_CYCLE(TARGET) == 15
								CALL HPH_PRINT,@"「我是在開玩笑的HPH　今天是安全日哦♪」","L"
							;それ以外
							ELSE
								CALL HPH_PRINT,@"「因为今天不是危险日、所以概率可能很低…HPH」","L"
							ENDIF
							PRINTW
							PRINTFORML 「……%CALLNAME:MASTER%阁下」
							PRINTFORML 「从今天開始、和\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@一起来造孩子吧…%UNICODE(0x2665) *1%」
							PRINTFORML 「被%CALLNAME:MASTER%阁下播种…怀上%CALLNAME:MASTER%阁下的孩子…%UNICODE(0x2665) *1%」
							PRINTW
							PRINTFORML 典似乎很想怀上%CALLNAME:MASTER%的孩子…
							PRINTFORML 典得到了[妊娠願望]
							PRINTW
							TALENT:139:妊娠願望 = 1
						ENDIF
					ELSE
						IF TCVAR:発情
							SETCOLOR 0xFF69B4
							IF TCVAR:368 >= 10
								CALL HPH_PRINT,@"「真是HPH　%CALLNAME:MASTER%阁下真是坏心眼呢HPHHPH」","L"
								CALL HPH_PRINT,@"「不停地按着、\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@的肚子HPH」","L"
							ELSE
								CALL HPH_PRINT,@"「不行啊HPH　这样按来按去的话…HPHHPH」","L"
								CALL HPH_PRINT,@"「要排卵了HPH　子宫開始渴望怀孕了HPH」","L"
							ENDIF
						ELSE
							SELECTCASE TCVAR:368
							CASE IS >= 10
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「嗯哦HPH　哦HPH　咕HPH」","L"
								CALL HPH_PRINT,@"（肚子、咕啾咕啾的HPH　不行HPH　子宮降下来了HPH）","L"
								RESETCOLOR
								PRINTFORML 典開始[発情]了…
								TCVAR:発情 = 1
							CASE IS >= 5
								SELECTCASE RAND:2
								CASE 0
									CALL HPH_PRINT,@"（这个…肚子深处一缩一缩的…HPH）","L"
									PRINTFORML 典带着一脸恍惚的表情接受着你的按摩…
								CASE 1
									CALL HPH_PRINT,@"「真是的、所以都说不可以了…HPH」","L"
									CALL HPH_PRINT,@"「開始想要了…HPH」","L"
								ENDSELECT
							CASEELSE
								SELECTCASE RAND:3
								CASE 0
									PRINTFORML 慢慢地刺激典的肚脐到耻骨的部分
									PRINTFORML 「那里…被按来按去的要不行了…%UNICODE(0x2665) *1%」
								CASE 1
									PRINTFORML 温柔地抚摩着子宫附近的地方
									PRINTFORML 「那种抚摸肚子的手法可真是下流呢…%UNICODE(0x2665) *1%」
								CASE 2
									PRINTFORML 「%CALLNAME:MASTER%阁下的手、真是温暖啊…%UNICODE(0x2665) *1%」
								ENDSELECT
							ENDSELECT
						ENDIF
						PRINTW
					ENDIF
				ENDIF
			ENDIF
		;恋慕、恋人無
		;你に恋さえしてなきゃ子どもも何かに利用できるやろ！の精神
		ELSE
			;親密6以上かつ妊娠時
			IF TFLAG:193 == 1
				;出産間近
				IF CFLAG:妊娠経過日数 >= 25
					IF CFLAG:無自覚妊娠
						PRINTFORML 「那么、接下来会生出什么样的孩子呢…」
						PRINTFORML 「如果是狐狸的样子还好、要是生出蛇、半幽灵、或者人偶、那该怎么办呢」
						PRINTFORML 「应该不会从肚子里破腹而出吧」
						PRINTFORML 典虽然装出坚强的样子耍着嘴皮子、但还是对肚子里孕育着什么而感到不安
						PRINTW
					ELSE
						PRINTFORML 「我们马上就要见面了ー♪　如果生出一只狸猫来的话、我会很吃惊的」
						PRINTFORML 「当爸爸的心境如何？　还是说到了这个时候还不能承认这孩子呢？」
						PRINTFORML 「嘛、反正我无所谓…喜欢八卦的鸦天狗们一定会把它当作有趣的新闻头条的」
						PRINTW
					ENDIF
				;誰の目から見ても明らか（カッコ内は無自覚:妊娠受け入れ）
				ELSEIF CFLAG:妊娠経過日数 >= 20
					IF CFLAG:無自覚妊娠
						PRINTFORML 「哎呀、我的肚子里到底有什么呢」
						PRINTFORML 「你知道吗？　婴儿还能成为药材呢」
						PRINTFORML 典用一种既不认真也不像是開玩笑的口吻说道
						PRINTW
					ELSE
						PRINTFORML 「呼呼、我还以为你会抛弃我呢、没想到你还很担心啊」
						PRINTFORML 「老实说、我很惊讶」
						PRINTFORML 「以及…我很高兴」
						PRINTFORML 典小声地对%CALLNAME:MASTER%说了感谢的话
						PRINTW
					ENDIF
				;お腹の膨らみが目立ってきた（変化を受け入れられない）
				ELSEIF CFLAG:妊娠経過日数 >= 15
					IF CFLAG:無自覚妊娠
						PRINTFORML 「最近总觉得身体很累、身材好像也变胖了…」
						PRINTFORML 「可喜可贺？　啊哈哈、怎么可能♪　明明没有对象」
						PRINTFORML （并不是没有想到原因…大概是…那个时候）
						PRINTW
					ELSE
						PRINTFORML 「肚子鼓起来了吧？」
						PRINTFORML 「这是两个人爱的结晶哟ー♪　很期待呢」
						PRINTFORML 高兴暂且不提、她的语气里似乎并不认为这是爱情的结晶
						PRINTW
					ENDIF
				;妊娠発覚したがまだ目立っていない（気付いていない）
				ELSE
					IF CFLAG:無自覚妊娠
						PRINTFORML 「哎呀、最近肚子不太舒服…」
						PRINTFORML 「不、并不是在说什么下流的话…」
						PRINTW
					ELSE
						PRINTFORML 「哎呀、我猜对了呢」
						PRINTFORML 「如果不采取避孕措施、就会变成这样」
						PRINTFORML 「你想让我怎么做？　是要生下来吗？　还是…」
						PRINTW
					ENDIF
				ENDIF
			;親密5以下
			ELSEIF TFLAG:193 == -1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「没有得到同意就来抚摸我…%CALLNAME:MASTER%阁下还真是没有顾虑啊」
					IF TALENT:MASTER:恋人
						PRINTFORML 「所以说有恋人什么的就更离谱了」
						IF TALENT:140:恋人
							PRINTFORML 「啊、饭纲丸大人是你的恋人吗…」
							PRINTFORML （饭纲丸大人也会找这样的人做恋人、品味真是不错啊）
						ENDIF
					ENDIF
				CASE 1
					PRINTFORML 「性快感按摩吗？暂时不需要」
				CASE 2
					PRINTFORML 「抚摸女性的肚子、还真是大胆啊」
				ENDSELECT
				PRINTW
			;妊娠してない
			ELSE
				IF EX:膣内精液 >= 500
					;安全日
					IF ESTRUS_CYCLE(TARGET) == 15
						PRINTFORML 「知道是安全期之后、射的量都不一样了呢…%UNICODE(0x2665) *1%」
						PRINTFORML 「现在、%CALLNAME:MASTER%阁下的精子正在我的肚子里慢慢游着呢%UNICODE(0x2665) *1%」
						PRINTFORML （这么多的量、即使是安全日也有可能怀上吧）
						PRINTW
					;危険日
					ELSEIF ESTRUS_CYCLE(TARGET) == 150
						PRINTFORML 「啊ー、在危险日里就这样在膣内射出来了呢…真ー是的%UNICODE(0x2665) *1%」
						CALL HPH_PRINT,@"「在里面中出这么多、肯定会受精HPH着床HPH的HPH」","L"
						PRINTW
					;排卵日
					ELSEIF ESTRUS_CYCLE(TARGET) == 100
						PRINTFORML 「嘸嘸…现在在我的肚子里、%CALLNAME:MASTER%阁下的子种们应该正聚集在卵子里吧…%UNICODE(0x2665) *1%」
						PRINTFORML 「肯定会受精的吧…说不定还会着床呢%UNICODE(0x2665) *1%」
						PRINTW
					ENDIF
				ELSEIF EX:膣内精液 > 0
					PRINTFORML 「嘸嘸…%CALLNAME:MASTER%阁下的子种、现在正在我的肚子里漫游呢」
					PRINTFORML 「如果怀上了怎么办？」
					PRINTL
					CALL ASK_YN("我会负起责任的","交给你了")
					IF !RESULT
						PRINTFORML 「……嘿ー」
						PRINTFORML 「失礼了。因为我有点意外」
						SIF TALENT:思慕
							PRINTFORML （意外地诚实呢）
					ELSE
						PRINTFORML 「嗯ー、真是个彻头彻尾的人渣啊♪」
					ENDIF
					PRINTW
				;膣内精液無
				ELSE
					IF TCVAR:発情
						IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
							IF EXP:Ｖ性交経験 > 0
								IF EXP:膣射経験 > 0
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「还想把精液注入姐姐的这里吗…HPH」","L"
									RESETCOLOR
									PRINTFORML 典牵着%CALLNAME:MASTER%的手、让他抚摸子宫周边的地方…
									PRINTW
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下…HPH」","L"
									CALL HPH_PRINT,@"「下次想把精液射在这个地方吗…HPH」","L"
									RESETCOLOR
									PRINTFORML 典牵着%CALLNAME:MASTER%的手、让他抚摸子宫周边的地方…
									PRINTW
								ENDIF
							ELSE
								IF BASE:MASTER:勃起 >= 1000
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的小鸡鸡…一定能插入到这个地方吧…HPH」","L"
									RESETCOLOR
									PRINTFORML 典牵着%CALLNAME:MASTER%的手、让他抚摸着腹部…
									PRINTW
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「这样摸的话姐姐会忍不住的哦…HPH」","L"
									RESETCOLOR
									PRINTFORML 典也不甘示弱地抚摸着%CALLNAME:MASTER%的下腹部…
									BASE:MASTER:勃起 += 100
									PRINTW
								ENDIF
							ENDIF
						ELSE
							IF EXP:Ｖ性交経験 > 0
								IF EXP:膣射経験 > 0
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嘸嘸…子宫会记住%CALLNAME:MASTER%阁下的精液的味道呢…HPH」","L"
									CALL HPH_PRINT,@"「现在也仍然疼得想要、想要精液呢…HPH」","L"
									RESETCOLOR
									PRINTFORML 典牵着%CALLNAME:MASTER%的手、让他抚摸子宫周边的地方…
									PRINTW
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下…HPH」","L"
									CALL HPH_PRINT,@"「不行哦…HPH　现在想要往典的这里注入更多种子什么的…HPH」","L"
									CALL HPH_PRINT,@"「要是现在注入的话、典肯定会怀上%CALLNAME:MASTER%阁下的孩子的…HPH」","L"
									RESETCOLOR
									PRINTFORML 典妄想着被%CALLNAME:MASTER%在膣内射精的模样、陶醉着…
									PRINTW
								ENDIF
							ELSE
								IF BASE:MASTER:勃起 >= 1000
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嘸嘸…大概是这一带吧…HPH」","L"
									CALL HPH_PRINT,@"「什么…这是%CALLNAME:MASTER%阁下的小鸡鸡能到达的位置哦…HPH」","L"
									RESETCOLOR
									PRINTFORML 典牵着%CALLNAME:MASTER%的手、让他抚摸着腹部…
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「不想来…试试吗HPH」","L"
									RESETCOLOR
									PRINTW
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「不行、%CALLNAME:MASTER%阁下…HPH」","L"
									CALL HPH_PRINT,@"「这样抚摸的话、典的肚子就開始疼起来了呢…HPH」","L"
									SELECTCASE RAND:2
									CASE 0
										CALL HPH_PRINT,@"「而且…那里不是肚子、而是子宫哦…HPH」","L"
									CASE 1
										CALL HPH_PRINT,@"「再往下一点…摸摸吧？HPH」","L"
									ENDSELECT
									RESETCOLOR
									PRINTW
								ENDIF
							ENDIF
						ENDIF
					;発情していない
					ELSE
						IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
							SELECTCASE TCVAR:368
							CASE IS >= 10
								IF TALENT:子宮口性感
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「哈啊～～～～…HPH　啊嗯～～～～HPH」","L"
									CALL HPH_PRINT,@"（不行…已经完全打開開关了…HPH）","L"
									RESETCOLOR
									PRINTFORML 典的子宫好像受到了刺激、開始[发情]了…
									TCVAR:発情 = 1
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嗯HPH　唔HPH　不行…快停下来…HPH」","L"
									CALL HPH_PRINT,@"（装出一副从容的样子果然是错误的…）","L"
									CALL HPH_PRINT,@"（子宫附近、在痉挛…HPH）","L"
									RESETCOLOR
									CFLAG:TARGET:积攒度 +=  50
								ENDIF
							CASE IS >= 5
								SELECTCASE RAND:3
								CASE 0
									CALL HPH_PRINT,@"「真是的…HPH　一个劲地抚摸姐姐的肚子～HPH」","L"
								CASE 1
									CALL HPH_PRINT,@"（被%CALLNAME:MASTER%阁下抚摸到的地方、麻酥酥的…HPH）","L"
								CASE 2
									CALL HPH_PRINT,@"「不用停下来…也可以哦…HPH」","L"
									PRINTFORML 典的吐息中開始夹杂着热气…
								ENDSELECT
							CASEELSE
								SELECTCASE RAND:3
								CASE 0
									PRINTFORML 「突然摸姐姐的肚子、怎么了吗？」
									PRINTFORML 「难道、你想要和姐姐一起生个孩子吗…%UNICODE(0x2665) *1%」
									PRINTFORML 「呼呼、開玩笑的♪」
								CASE 1
									PRINTFORML 「我不觉得随便摸女性的肚子是个值得称赞的行为」
									PRINTFORML 「如果是别的女性的话可能会被骂吧？」
								CASE 2
									PRINTFORML 「这样抚摸的话…姐姐会怀孕的哦♪」
									PRINTFORML 「開玩笑的啦？　不用那么夸张地把手缩回去的…」
								ENDSELECT
								PRINTW
							ENDSELECT
						ELSE
							SELECTCASE TCVAR:368
							CASE IS >= 10
								IF TALENT:子宮口性感
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「哈啊～～～～…HPH　啊嗯～～～～HPH」","L"
									CALL HPH_PRINT,@"（不行…已经完全打開開关了…HPH）","L"
									RESETCOLOR
									PRINTFORML 典的子宫好像受到了刺激、開始[发情]了…
									TCVAR:発情 = 1
								ELSE
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「嗯HPH　唔HPH　不行…快停下来…HPH」","L"
									CALL HPH_PRINT,@"（装出一副从容的样子果然是错误的…）","L"
									CALL HPH_PRINT,@"（子宫附近、在痉挛…HPH）","L"
									RESETCOLOR
									CFLAG:TARGET:积攒度 +=  50
								ENDIF
							CASE IS >= 5
								SELECTCASE RAND:3
								CASE 0
									CALL HPH_PRINT,@"「不用停下来…也可以哦HPH」","L"
									CALL HPH_PRINT,@"「没什么…什么感觉也没有…HPH」","L"
								CASE 1
									PRINTFORML （没什么…并没有什么感觉…并没有、什么…）
									CALL HPH_PRINT,@"（只是肚子里有点不舒服而已…HPH）","L"
								CASE 2
									PRINTFORML 「……」
									CALL HPH_PRINT,@"「那个…%CALLNAME:MASTER%阁下…HPH」","L"
									PRINTFORML 「不…什么都…没有…」
								ENDSELECT
							CASEELSE
								SELECTCASE RAND:3
								CASE 0
									PRINTFORML 「这样摸典的肚子、很開心吗？」
									PRINTFORML 「……」
									PRINTW
									PRINTFORML 「呀啊%UNICODE(0x2665) *1%　好有感觉%UNICODE(0x2665) *1%」
									PRINTFORML 「装的？　欸嘿嘿…」
								CASE 1
									PRINTFORML 「我不觉得随便摸女性的肚子是个值得称赞的行为」
									PRINTFORML 「如果是别的女性的话可能会被骂吧？」
								CASE 2
									PRINTFORML 「呀啊、要怀孕了♪」
									PRINTFORML 「開玩笑的哟。请不要缩得那么远」
								ENDSELECT
								PRINTW
							ENDSELECT
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		ENDIF
		TCVAR:352 += 1
		TCVAR:368 += 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:恋慕(受け入れつつ笑顔でやり返す
	;ABL:親密(6以上=おずおずとやり返す
	;ABL:従順(5以上=されるがまま
;==================================================
@M_KOJO_SUCCESS_COM_K139_307
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	;時間停止中
	IF FLAG:70
		PRINTFORML 嗯、拉得很长
		PRINTW
	;睡眠中
	ELSEIF CFLAG:睡眠
		PRINTFORML 每次拉她的脸颊、典都会发出「呜～～嗯…」的难以入睡的声音
		PRINTW
	;通常
	;はじめて
	ELSEIF FIRSTTIME(307)
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「唔嗯ー、请不要再拉我的脸颊了♪」
			PRINTFORML 「诶♪　这是回礼哦♪」
			PRINTW
		ELSE
			PRINTFORML 「突然捏别人的、而且还是女性的脸颊、是非常不合道理的…」
			PRINTW
		ENDIF
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「唔嗯ー、请不要再拉我的脸颊了♪」
			PRINTFORML 「诶♪　这是回礼哦♪」
			PRINTW
		ELSE
			;心情不快
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「……」
					PRINTFORML 典用仿佛在看地上的呕吐物的眼神看着你
					PRINTW
				CASE 1
					PRINTFORML 「那样的事去和恋人做如何？」
					IF TALENT:MASTER:恋人
						PRINTFORML 「还是说、%CALLNAME:MASTER%阁下的恋人、
						PRINTFORML 　很讨厌被%CALLNAME:MASTER%阁下触碰吗？」
						PRINTW
					ELSE
						PRINTFORML 「啊、说起来、%CALLNAME:MASTER%阁下还没有恋人对吧」
						PRINTFORML 「对不起、我真是太失礼了」
						PRINTW
					ENDIF
				ENDSELECT
			;心情愉快
			ELSEIF TALENT:139:心情 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「真是个、像小孩子一样的人呢」
					PRINTFORML 典露出为难的笑容
					PRINTW
				CASE 1
					PRINTFORML 「不要随便拉女性的脸颊啊」
					;受虐属性持ち
					SELECTCASE RAND:10
					CASE 0
						PRINTFORM 「咲夜
					CASE 1
						PRINTFORM 「天子
					CASE 2
						PRINTFORM 「鈴仙
					CASE 3
						PRINTFORM 「妹紅
					CASE 4
						PRINTFORM 「影狼
					CASE 5
						PRINTFORM 「小町
					CASE 6
						PRINTFORM 「雛
					CASE 7
						PRINTFORM 「布戸
					CASE 8
						PRINTFORM 「雷鼓
					CASE 9
						PRINTFORM 「舞
					ENDSELECT
						PRINTFORML 小姐也许会意外地高兴吧…」
						PRINTFORML 「啊、天子小姐一定会很高兴的吧」
						PRINTW
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「好痛啊不要捏了呜呜～～！」
					PRINTFORML 典变得眼泪汪汪的…
					PRINTW
				CASE 1
					PRINTFORML 「请停下来。脸都要被拉长了」
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;陪睡中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_308
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	;時間停止中
	IF FLAG:70
		PRINTFORML 狠狠地戳了戳典的脸颊
		PRINTW
	;睡眠中
	ELSEIF CFLAG:睡眠
		PRINTFORML 「呜…」
		PRINTW
	;はじめて
	ELSEIF FIRSTTIME(308)
		PRINTFORML 「那个、你在做什么」
		PRINTFORML 典露出为难的笑容
		PRINTW
	;通常
	ELSE
		;心情不快
		IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「真的是个很孩子气的人啊…」
				PRINTW
			CASE 1
				PRINTFORML 「典困了…请不要再这么做了…」
				PRINTW
			ENDSELECT
		;心情愉快
		ELSEIF TALENT:139:心情 == 1
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「诶♪　这是回礼哦」
				PRINTW
			CASE 1
				PRINTFORML 「这样一来、典就睡不着了呢…♪」
				PRINTW
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「真是个、无论过了多久都仍然像个小孩子的人呢…♪」
				PRINTW
			CASE 1
				PRINTFORML 「好啦好啦、您有什么事吗？」
				PRINTW
			ENDSELECT
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;309,摸頭
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:親密(6以上=通常成功時分岐
;==================================================
@M_KOJO_SUCCESS_COM_K139_309
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	;時間停止中
	IF FLAG:70
		PRINTFORML 抚摸了一下平时惹人讨厌的毛茸茸的耳朵
	;睡眠中
	ELSEIF CFLAG:睡眠
		PRINTFORML 摸了摸典的头、她的耳朵动了一下
	;はじめて
	ELSEIF FIRSTTIME(309)
		PRINTFORML 「你在干什么呀？」
		PRINTFORML 难得看见典慌乱的一面
		PRINTW
		PRINTFORML 「那是因为…突然被你摸了摸头啊」
		PRINTFORML 「至少要取得许可后再做吧」
		PRINTW
	;通常
	ELSEIF CFLAG:陪睡中
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 「睡觉的时候有人摸着我的头是一件幸福的事情…」
			PRINTFORML 「今天一定能做个好梦吧…♪」
			PRINTW
		CASE 1
			PRINTFORML 「被%CALLNAME:MASTER%阁下一摸头就開始困了呢…♪」
			PRINTW
		ENDSELECT
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			;心情不快
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「现在…请停下来」
					PRINTW
				CASE 1
					PRINTFORML 「摸那种地方、典的心情会…呜呜」
					PRINTW
				ENDSELECT
			;心情愉快
			ELSEIF TALENT:139:心情 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「请再多摸摸吧…♪」
					PRINTFORML 典把头靠过来然后蹭来蹭去
					PRINTW
				CASE 1
					PRINTFORML 「很温暖呢…♪」
					PRINTW
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「能再多摸一会儿吗…？」
					PRINTFORML 刚想停止抚摸、典却抬眸眼望着你
					PRINTW
				CASE 1
					PRINTFORML 「哎呀呀、头发都要被弄乱了呢」
					PRINTFORML 典嘴上这么说、脸上却露出了開心的笑容
					PRINTW
				ENDSELECT
			ENDIF
		ELSE
			;心情不快
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「你能停下来吗。我现在很不開心呢」
					PRINTW
				CASE 1
					PRINTFORML 「请停下来吧。做着讨厌的事情的\@ TALENT:MASTER:性別 == 2 ? 男人 # 女人 \@是不受欢迎的哦？」
					PRINTW
				ENDSELECT
			;心情愉快
			ELSEIF TALENT:139:心情 == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「嘸嘸嘸、%CALLNAME:MASTER%阁下是特别的哦」
					PRINTFORML 「可以摸我的头的人只有饭纲丸大人和您♪」
					PRINTW
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%阁下的手很温暖呢」
					PRINTW
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「距离感是不是又稍微近了一些呢～？」
					PRINTFORML 典的脸上浮现出淡淡的微笑、目不转睛地看着你
					PRINTW
				CASE 1
					PRINTFORML 「不要摸我的耳朵哦？」
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_331
;成否判定
;TFLAG:192(-2=強制失敗(注、非指令終了）、-1＝強制失敗、0=COM依存、1=強制成功or大成功(注、睡眠薬冰淇淋ティーは眠気を感じていると飲まない)
IF TALENT:恋慕 || TALENT:恋人
	TFLAG:192 =1
ELSEIF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
	TFLAG:192 =1
ELSE
	TFLAG:192 =0
ENDIF
@M_KOJO_MESSAGE_COM_K139_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;恋愛感情を抱いているなら、わざと相手にのってやる
	IF TALENT:恋慕 || TALENT:恋人
		IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
			PRINTFORML 「哇ー%UNICODE(0x2665) *1%　姐姐很高兴呢%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORML 「给我沏了茶吗？　我很高兴哦%UNICODE(0x2665) *1%」
		ENDIF
			PRINTFORML 「我正好口渴了呢♪　那我就不客气了♪」
			PRINTW
			PRINTFORML 在%CALLNAME:MASTER%咽着口水注视着的目光下、典毫不犹豫地、
			PRINTFORML 慢慢地喝下了混入了药物的茶…
			PRINTW
			IF TCVAR:TARGET:媚薬 == 210
				PRINTFORML 「这茶的味道真奇怪啊…」
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「感觉身体有点发烫呢…HPH」","L"
				CALL HPH_PRINT,@"「促进代谢的茶？　哦ー、原来是这样啊…HPH」","L"
				PRINTW
				CALL HPH_PRINT,@"「所以肚子里才会热乎乎的…HPH」","L"
				PRINTFORML 典磨蹭着大腿、一副忸忸怩怩的模样…
				PRINTW
			ELSEIF TCVAR:TARGET:利尿剤 == 210
				PRINTFORML 「…………」
				PRINTFORML 典的身体突然颤抖起来
				PRINTW
				PRINTFORML （真是的…我还以为会是什么药呢…）
				PRINTFORML （原来是这种效果的药啊…♪）
				PRINTW
				PRINTFORML 「啊…没关系的…♪」
				PRINTFORML 「对了…\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐、 # 典 \@想先去个别的地方…」
				PRINTFORML 「想再聊一会儿吗？　这、这样啊…♪」
				PRINTW
				PRINTFORML 典磨蹭着大腿、一副忸忸怩怩的模样…
				PRINTFORML （再这样下去、可能就要在%CALLNAME:MASTER%阁下的面前…真是、太糟糕了…♪）
				PRINTW
			ELSEIF TCVAR:TARGET:催情薬 == 210
				PRINTFORML 「…………」
				PRINTFORML 「怎么了？　一直看着\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@的脸」
				PRINTW
				PRINTFORML （呼呼、因为效果不明显所以慌张起来了吗）
				PRINTFORML （怎么可能会有效呢、真是个笨蛋啊）
				PRINTFORML （因为、\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@已经爱上了%CALLNAME:MASTER%阁下了哦…%UNICODE(0x2665) *1%）
				PRINTW
			ELSEIF TCVAR:TARGET:睡眠薬茶使用 == 1
				PRINTFORML 「…………啊咕」
				PRINTFORML 「不好意思。我有点困了呢…」
				PRINTW
				PRINTFORML （难道是想在我睡着的时候搞恶作剧吗）
				PRINTFORML （现在倒也不用这么拐弯抹角了、我随时欢迎你哦…%UNICODE(0x2665) *1%）
				PRINTW
				PRINTFORML （嘛、对一个毫无防备的人释放欲望会更让人兴奋吧…%UNICODE(0x2665) *1%）
				PRINTFORMW （为了不吵醒我、他压低声音、一边喘着粗气一边肆意玩弄我的身体…）
				PRINTFORMW （然后我会无意识地张開我的大腿…）
				PRINTFORMW （%CALLNAME:MASTER%阁下的小鸡鸡、在对我说着『早上好』呢…%UNICODE(0x2665) *1%）
				PRINTW
			ENDIF
	ELSE
		;兒童のやることならあえてのってやる
		IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
			PRINTFORML 「哇ー%UNICODE(0x2665) *1%　姐姐很高兴呢%UNICODE(0x2665) *1%」
			PRINTFORML 「我正好口渴了呢♪　那我就不客气了♪」
			PRINTW
			PRINTFORML 在%CALLNAME:MASTER%咽着口水注视着的目光下、典毫不犹豫地、
			PRINTFORML 慢慢地喝下了混入了药物的茶…
			PRINTW
			IF TCVAR:TARGET:媚薬 == 210
				PRINTFORML 「这茶的味道真奇怪啊…」
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「感觉身体有点发烫呢…HPH」","L"
				CALL HPH_PRINT,@"「促进代谢的茶？　哦ー、原来是这样啊…HPH」","L"
				PRINTW
				CALL HPH_PRINT,@"「所以肚子里才会热乎乎的…HPH」","L"
				PRINTFORML 典磨蹭着大腿、一副忸忸怩怩的模样…
				PRINTW
			ELSEIF TCVAR:TARGET:利尿剤 == 210
				PRINTFORML 「…………」
				PRINTFORML 典的身体突然颤抖起来
				PRINTW
				PRINTFORML （真是的…我还以为会是什么药呢…）
				PRINTFORML （原来是这种效果的药啊…♪）
				PRINTW
				PRINTFORML 「啊…没关系的…♪」
				PRINTFORML 「对了…\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐、 # 典 \@想先去个别的地方…」
				PRINTFORML 「想再聊一会儿吗？　这、这样啊…♪」
				PRINTW
				PRINTFORML 典磨蹭着大腿、一副忸忸怩怩的模样…
				PRINTFORML （这下糟了…要是不早点离開这里的话…真是的、真是个小孩子啊）
				PRINTW
			ELSEIF TCVAR:TARGET:催情薬 == 210
				PRINTFORML 「…………」
				PRINTFORML 「怎么了？　一直看着\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@的脸」
				PRINTW
				PRINTFORML （看着%CALLNAME:MASTER%阁下的脸、就会開始心跳加速…）
				PRINTFORML （是对我用了催情药吗）
				PRINTFORML （真是个可爱的孩子呢…%UNICODE(0x2665) *1%　甚至想依靠药物的力量来把姐姐占为己有吗…%UNICODE(0x2665) *1%）
				PRINTW
			ELSEIF TCVAR:TARGET:睡眠薬茶使用 == 1
				PRINTFORML 「…………啊咕」
				PRINTFORML 「不好意思。我有点困了呢…」
				PRINTW
				PRINTFORML （难道是想在我睡着的时候搞恶作剧吗）
				PRINTFORML （我也清楚。如果向女孩子提出H的要求却被拒绝的话、整个人会很受伤…%UNICODE(0x2665) *1%）
				PRINTW
				PRINTFORMW （如果对方没有注意到的话无论做什么都可以…这是一种肤浅而幼稚的想法）
				PRINTFORMW （不过真是太好了呢、姐姐会接受你的欲望的…%UNICODE(0x2665) *1%）
				PRINTFORMW （请把你青涩的兽欲尽情地发泄在姐姐身上吧…%UNICODE(0x2665) *1%）
				PRINTW
			ENDIF
		ELSE
			IF TFLAG:193 >= 0
				IF TCVAR:TARGET:媚薬 == 210
					PRINTFORML （不过、作为一个研究者…我更感兴趣的是这种对妖怪也有效的媚药）
					PRINTFORML （如果能批量生产那种东西的话、说不定还能让饭纲丸大人也受惠呢…♪）
					PRINTW
				ELSEIF TCVAR:TARGET:利尿剤 == 210
					PRINTFORML （不过、作为一个研究者…我更感兴趣的是这种对妖怪也有效的利尿剂）
					PRINTFORML （不过妖怪本来就不需要排泄啊）
					PRINTW
				ELSEIF TCVAR:TARGET:催情薬 == 210
				ELSEIF TCVAR:TARGET:睡眠薬茶使用 == 1
				PRINTFORML 「…………啊咕」
				PRINTFORML 「不好意思。我有点困了呢…」
				PRINTW
				PRINTFORML （难道是想在我睡着的时候搞恶作剧吗）
				PRINTFORML （这种卑劣的想法…我很喜欢♪）
				PRINTW
				PRINTFORML （不过、作为一个研究者…我更感兴趣的是这种对妖怪也有效的睡眠药）
				PRINTFORML （如果能批量生产那种东西的话、说不定还能让饭纲丸大人也受惠呢…♪）
				PRINTW
				ENDIF
			ELSE
				PRINTFORML 「对不起、我现在还不饿…」
				PRINTFORML 「顺便一提、典喜欢[香味稍微淡一点的东西]♪」
				PRINTW
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;332,勸酒
;TFLAG:193(0=不會喝酒成功 -1=不會喝酒失敗 -2=不會喝酒大失敗 -5=不會喝酒あきらめ)
;TFLAG:194(51=濁酒 52=清酒 53=鬼殺酒)
;ALCOHOL_TASTE(TFLAG:194)(15以上=気に入る 9以下=口に合わない)
;==================================================
@M_KOJO_SUCCESS_COM_K139_332
;成否判定
;TFLAG:192(-1＝強制失敗、0=COM依存
IF !TALENT:恋慕 && !TALENT:恋人 && ALCOHOL_FACE(139) != "　清醒　" && K139_FIND_AROUND() != 140
	TFLAG:192 = -1
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_MESSAGE_COM_K139_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	TCVAR:374 += 500
ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_333
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	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_SUCCESS_COM_K139_334
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_335
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_336
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止
	IF FLAG:70
	ELSE
		SELECTCASE TFLAG:194
		;成功
		CASE 0
			IF TCVAR:初次拥抱
				SELECTCASE TCVAR:初次拥抱
				;普通に合意
				CASE 1
					IF TCVAR:発情
						IF TALENT:恋慕 || TALENT:恋人
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、可不能逃跑哦HPH」","L"
							CALL HPH_PRINT,@"「直到典满足为止、会一直好好地疼爱你的HPH」","L"
							RESETCOLOR
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下HPH　来做吧HPH」","L"
							CALL HPH_PRINT,@"「问我要做什么、那不是很明显吗HPH」","W"
							CALL HPH_PRINT,@"「小穴哟HPH　小・穴HPH」","L"
							RESETCOLOR
						ENDIF
					ELSE
						IF TALENT:恋慕 || TALENT:恋人
							IF TALENT:140:恋人
								;龍が先に恋慕
								IF CFLAG:1000 == 1
									PRINTFORML 「来…请、抱住我…」
									PRINTFORML （饭纲丸大人、十分抱歉。我明白这是插足行为…）
									PRINTFORML （但我真的深爱着这位…）
								;典が先に恋慕
								ELSEIF CFLAG:1001 == 1
									PRINTFORML 「我会竭尽全力、好好侍奉你的…%UNICODE(0x2665) *1%」
									PRINTFORML 「请务必、要爱着典啊…」
									PRINTFORML （我明白你和饭纲丸大人是情侣关系。但…我才是更先喜欢上你的人…我绝不放弃）
								ENDIF
							;龍、典の他に恋人がいる
							ELSEIF K139_FIND_LOVER() == 1
								PRINTFORML 「这样真的好吗？%CALLNAME:MASTER%阁下」
								PRINTFORML 「我呢、只要你爱我的话这种事我一向是无所谓的哟…%UNICODE(0x2665) *1%」
								PRINTFORML （如果有恋人的话、我就带给你在恋人之上的满足程度）
								IF TALENT:29:恋人 || TALENT:42:恋人 || TALENT:65:恋人
									PRINTFORML （我才不会把我的%CALLNAME:MASTER%阁下、交给那些天狗小姑娘们哦）
								ELSE
									PRINTFORML （我才不会把我的%CALLNAME:MASTER%阁下、交给那些人哦）
								ENDIF
							;恋人無
							ELSEIF K139_FIND_LOVER() == 0
								PRINTFORML 「好啊、我很乐意♪」
								PRINTFORML 「你要、来疼爱典吗…%UNICODE(0x2665) *1%」
								PRINTFORML （能得到%CALLNAME:MASTER%阁下的宠爱的、只有我一个人就够了…）
							;典が恋慕かつ恋人
							ELSE
								IF TALENT:妊娠
									IF CFLAG:身に覚え_母 == 1 && !CFLAG:無自覚妊娠
										PRINTFORML 「虽然我已经变成一副怀有身孕之姿、但还是请爱着我哦…%UNICODE(0x2665) *1%」
										;安定期
										IF CFLAG:妊娠経過日数 >= 10 && CFLAG:妊娠経過日数 <= 25
											PRINTFORML 「不过、我很在意肚子里的孩子、可以的话希望你温柔些…%UNICODE(0x2665) *1%」
											PRINTFORML 「可不能、猛撞小宝宝的房间哟…%UNICODE(0x2665) *1%」
										;本番不可
										ELSEIF CFLAG:妊娠経過日数 < 10 || CFLAG:妊娠経過日数 > 25
											PRINTFORML 「不过、因为这是没法强迫的事情所以…那个、不可以插入、抱歉」
											PRINTW
											PRINTFORML 「作为代替、用嘴和手的话不管多少次我都会为你侍奉的…%UNICODE(0x2665) *1%」
											PRINTFORML 典用手做了个撸动阴茎的动作给你看
										ENDIF
									ELSE
									ENDIF
								ELSE
									IF MARK:反発刻印 > 0
										PRINTFORML 「真是的！　%CALLNAME:MASTER%总是这样成天想着做色色的事情…！」
										PRINTFORML 「那种事情、典才…唔%UNICODE(0x2665) *1%　…不是的、刚才那是哈啊啊啊唔%UNICODE(0x2665) *1%」
										PRINTFORML 「我才不会被这样、糊弄过去…不让我好好舒服舒服的话、可不会原谅你呢…」
									ELSE
										PRINTFORML 「抱住我了呢、好高兴…%UNICODE(0x2665) *1%」
										PRINTFORML 「最喜欢你了、%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%　打心底里…%UNICODE(0x2665) *1%」
										PRINTW
										PRINTFORML 「选择相信我了呢…我这个总是欺骗他人的母狐狸…」
										PRINTFORML 「我、喜欢上%CALLNAME:MASTER%阁下真是太好了…%UNICODE(0x2665) *1%」
										PRINTW
										PRINTFORML 「请来吧。沸腾的欲望、我的身体会全部接下来的…」
										PRINTFORML 「恋人之间的性爱、開始吧…%UNICODE(0x2665) *1%」
										PRINTW
									ENDIF
								ENDIF
								PRINTW
							ENDIF
						;思慕以下
						ELSE
							IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
								;童貞
								IF TALENT:MASTER:非童貞 == 0
									PRINTFORML 「啊啦啊啦…这是、打算干什么呢？」
									PRINTFORML 「是哪里的坏蛋大人教唆的吗…还是说、偷看了谁做这种事情吗？」
									PRINTFORML 「从刚才開始是想干什么…能详细告诉我吗？」
									CALL ASK_YN("色色的事情","那个…")
									IF !RESULT
										PRINTFORML 「呵呵…真是可爱的说法呢%UNICODE(0x2665) *1%」
										PRINTFORMW 典坏笑着、悄悄地对%CALLNAME:MASTER%耳语道
										PRINTL
										CALL HPH_PRINT,@"「说错了吧？　是性交哟、性交HPH」","L"
										PRINTW
										PRINTFORML 典灼热的气息打在耳朵上。仅仅如此、就让股间酥酥麻麻的
										PRINTL
										CALL HPH_PRINT,@"「用这个地方盖住的东西、让姐姐舒服一下吧HPH　做法、你知道吗…HPH」","L"
										CALL HPH_PRINT,@"「不知道的话、就来教会你吧…HPH　来、请来吧…HPH」","L"
										PRINTW
									ELSE
										PRINTFORML 「哦呀哦呀、都不知道是什么就准备把姐姐推倒吗？」
										PRINTFORML 「真是个坏孩子呢…还是说、是雄性所持有的本能呢」
										PRINTFORMW 典坏笑着、悄悄地对%CALLNAME:MASTER%耳语道
										PRINTL
										CALL HPH_PRINT,@"「你要做的这个事、是性交哟、性交HPH」","L"
										PRINTW
										PRINTFORML 典灼热的气息打在耳朵上。仅仅如此、就让股间酥酥麻麻的
										PRINTL
										CALL HPH_PRINT,@"「来、和姐姐一起、学习做坏坏的事吧…HPH」","L"
										PRINTFORML 回过神来、本该将对方推倒的自己却反倒被典给缠住了…
										PRINTW
									ENDIF
								ELSE
									PRINTFORML 「啊啦啊啦…这是、打算干什么呢？」
									PRINTFORML 用舌头在一副强作镇静的样子坏笑着的典的脖子上舔来舔去
									PRINTW
									CALL HPH_PRINT,@"「唔…HPH　明明是个小孩子、却已经相当习惯了呢」","L"
									CALL HPH_PRINT,@"「嗯HPH　咕呜…HPH　先、停下…」","L"
									PRINTW
									PRINTFORML 平日里淡定自若的飘逸气场已经消散、只剩下被小孩子的前戏弄得不知所措的母狐狸的身姿
									PRINTW
								ENDIF
							ELSE
								PRINTFORML 「呼呼、请尽情、享用典的身体吧♪」
							ENDIF
						ENDIF
					ENDIF
				;接吻していない
				CASE 2
					IF TALENT:恋慕 || TALENT:恋人
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							PRINTFORML 「%CALLNAME:MASTER%阁下、没有忘记什么要对姐姐做的事情吧？」
							CALL ASK_YN("（……接吻？）","（……？）")
							IF !RESULT
								PRINTFORML 「……很棒、说出来啦%UNICODE(0x2665) *1%」
								EXP:接吻経験 += 1
								SIF TALENT:無接吻経験 == 1
									TALENT:無接吻経験 = 0
								EXP:MASTER:接吻経験 += 1
								SIF TALENT:MASTER:無接吻経験 == 1
									TALENT:MASTER:無接吻経験 = 0
							ELSE
								PRINTFORML 「真是的ー、倒是机灵一点啊。接吻哟、接・吻」
								PRINTFORML 典用手指戳了戳自己的嘴唇
								CALL ASK_YN("来一个道歉吻","为什么？")
								IF !RESULT
									PRINTFORML 「嗯…%UNICODE(0x2665) *1%　有待提高呢…♪」
									PRINTFORML 「想要表扬的话、就请让姐姐、感到舒服吧…%UNICODE(0x2665) *1%」
									EXP:接吻経験 += 1
									SIF TALENT:無接吻経験 == 1
										TALENT:無接吻経験 = 0
									EXP:MASTER:接吻経験 += 1
									SIF TALENT:MASTER:無接吻経験 == 1
										TALENT:MASTER:無接吻経験 = 0
								ELSE
									PRINTFORML 「啊ー！　这孩子真是ー！　啊ー！」
									PRINTFORML 典鼓着脸颊
									PRINTFORML 「作为惩罚、直到姐姐觉得舒服之前都不会让你解放的哦…%UNICODE(0x2665) *1%」
								ENDIF
							ENDIF
						ELSE
							PRINTFORML 「%CALLNAME:MASTER%阁下、是不是忘了什么事？」
							PRINTFORML 典用有些甜腻的声音对%CALLNAME:MASTER%撒起娇来
							CALL ASK_YN("接吻","…………")
							IF !RESULT
								PRINTFORML 「…………%UNICODE(0x2665) *1%」
								PRINTFORML 「终于、吻了我呢……%UNICODE(0x2665) *1%」
								PRINTFORML 「让我焦急等待的部分、要用多多的爱来偿还哦…%UNICODE(0x2665) *1%」
								EXP:接吻経験 += 1
								SIF TALENT:無接吻経験 == 1
									TALENT:無接吻経験 = 0
								EXP:MASTER:接吻経験 += 1
								SIF TALENT:MASTER:無接吻経験 == 1
									TALENT:MASTER:無接吻経験 = 0
							ELSE
								PRINTFORML 「%CALLNAME:MASTER%阁下的这种地方、我很讨厌」
								CALL ASK_YN("生气的表情也很可爱","趁机突然吻上去")
								IF !RESULT
									PRINTFORML 「！　真是的、就算说这种话典也不会上当的哦」
									PRINTFORML 虽然这么说了、但她的尾巴还是心情很好的左右摇晃着
								ELSE
									PRINTFORML 「！　…………%UNICODE(0x2665) *1%」
									PRINTFORML 「……真是的、突然袭击可是犯规哦……%UNICODE(0x2665) *1%」
									EXP:接吻経験 += 1
									SIF TALENT:無接吻経験 == 1
										TALENT:無接吻経験 = 0
									EXP:MASTER:接吻経験 += 1
									SIF TALENT:MASTER:無接吻経験 == 1
										TALENT:MASTER:無接吻経験 = 0
								ENDIF
							ENDIF
							PRINTW
						ENDIF
					ELSE
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							PRINTFORML 「%CALLNAME:MASTER%阁下ー。你对欢爱对象是不是忘记了什么重要的事情啊？」
							PRINTFORML 典用双手抱着%CALLNAME:MASTER%的脸、一直盯着你看
							CALL ASK_YN("接吻","？？？")
							IF !RESULT
								PRINTFORML 「很好、说得完全正确呢…♪」
								PRINTFORML 「不过、下次開始%CALLNAME:MASTER%阁下可要好好主动做哦」
								EXP:接吻経験 += 1
								SIF TALENT:無接吻経験 == 1
									TALENT:無接吻経験 = 0
								EXP:MASTER:接吻経験 += 1
								SIF TALENT:MASTER:無接吻経験 == 1
									TALENT:MASTER:無接吻経験 = 0
							ELSE
								PRINTFORML 「你这样子、可没法让中意的女性倾心于你哦？」
								PRINTFORML 一边这么说着典靠近了%CALLNAME:MASTER%的脑袋、夺取了你的双唇
								EXP:接吻経験 += 1
								SIF TALENT:無接吻経験 == 1
									TALENT:無接吻経験 = 0
								EXP:MASTER:接吻経験 += 1
								SIF TALENT:MASTER:無接吻経験 == 1
									TALENT:MASTER:無接吻経験 = 0
								IF EXP:MASTER:接吻経験 == 1
									PRINTFORML 「哦呀…难道说、%CALLNAME:MASTER%阁下也是第一次吗？」
									PRINTFORML 「呼呼…还是暴露了。姐姐、刚才也是第一次哦…%UNICODE(0x2665) *1%」
									PRINTFORML 「好好加油的话、姐姐会把更多重要事情的『第一次』、送给你呢…%UNICODE(0x2665) *1%」
								ENDIF
							ENDIF
						ELSE
							PRINTFORML 「…%CALLNAME:MASTER%阁下是、比起过程更看重结果的人吗？」
						ENDIF
					ENDIF
				;媚薬or発情
				CASE 3
					IF TCVAR:発情
						IF TALENT:恋慕 || TALENT:恋人
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下HPH　%CALLNAME:MASTER%阁下HPH」","L"
							RESETCOLOR
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「来、直到变得黏乎乎为止不停做下去吧…HPH」","L"
							RESETCOLOR
						ENDIF
					ELSE
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「现在、身体疼得受不了啊…HPH」","L"
						CALL HPH_PRINT,@"「可以抱抱典吗…HPH」","L"
						RESETCOLOR
					ENDIF
				;刻印
				CASE 4
				;まんざらでもない
				CASE 6
					IF TALENT:恋慕 || TALENT:恋人
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							PRINTFORML 「嘛、想要来爱姐姐么…我很高兴哦%UNICODE(0x2665) *1%」
							PRINTFORML 「不过、对%CALLNAME:MASTER%阁下来说还太早了。请再稍微、忍耐一下吧」
							PRINTFORML 典像在哄孩子由于抚摸着%CALLNAME:MASTER%的脑袋
						ELSE
							PRINTFORML 「想和典亲密接触么…%UNICODE(0x2665) *1%　我很高兴哦」
							PRINTFORML 「不过、想要典的话、得按顺序一步一步来才可以哟」
							PRINTW
						ENDIF
					ELSE
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							PRINTFORML 「怎么了？　发觉到姐姐的魅力了吗？」
							PRINTFORML 「不过、还不行%UNICODE(0x2665) *1%　这种事情、等你再成长一些再才行哟…%UNICODE(0x2665) *1%」
							PRINTFORML 典在%CALLNAME:MASTER%的脸上轻轻吻了一下
						ELSE
							PRINTFORML 「哦呀哦呀…居然渴望我这副贫瘠的身体…%UNICODE(0x2665) *1%」
							PRINTFORML 「令人欣喜的邀请…不过现在暂时还不能接受」
							PRINTFORML 典轻轻地按下你的手
						ENDIF
					ENDIF
				;駄目
				CASE 7
					PRINTFORML 「虽然很感谢你的邀请…但现在、不是很有那种心情」
					PRINTFORML 「非常抱歉呢」
				;論外
				CASE 8
					PRINTFORML 「%CALLNAME:MASTER%阁下得再多学一些、劝说女孩子的方法才行呢」
				ENDSELECT
			;2回目以降
			ELSE
				TCVAR:357 += 1
				IF TCVAR:発情
					IF TALENT:恋慕 || TALENT:恋人
						IF TALENT:妊娠
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「呵呵HPH　被孕妇的样子弄兴奋什么的、%CALLNAME:MASTER%阁下也真是…HPH」","L"
							CALL HPH_PRINT,@"「不过、好想要、那根让\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@变成妈妈的肉棒啊HPH」","L"
							PRINTW
							CALL HPH_PRINT,@"「而且…肚子里的宝宝、也想和爸爸打招呼哟…HPH」","L"
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、也想问声好对吧HPH」","L"
							CALL HPH_PRINT,@"「用爸爸肉棒、给孩子喝一些充满营养的牛奶吧…HPH」","L"
							PRINTW
						ELSEIF TALENT:妊娠願望
							IF TALENT:恋慕 && TALENT:恋人
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下HPH　%CALLNAME:MASTER%阁下HPH」","L"
								CALL HPH_PRINT,@"「造型孩HPH　来认真的造小孩吧HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 本该被推倒的典反而兴奋起来激烈地渴求着%CALLNAME:MASTER%
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「嗯HPH　噗啊HPH　好好地、喝下去了吗…HPH」","L"
								RESETCOLOR
								PRINTFORML 典把偷偷藏在怀里的蜜汁液体嘴对嘴地给你喂了下去
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「不用担心HPH　没有危险的HPHHPH」","L"
								CALL HPH_PRINT,@"「只不过、某个部位会变得很精神而已HPH」","L"
								RESETCOLOR
								PRINTFORML 跟随着典的视线、看见了自己股间那已经达到原本不可能程度的勃起
								PRINTFORML 并且、感觉全身的力气都在高涨…特别是睾丸附近…
								PRINTW
								PRINTFORML %CALLNAME:MASTER%的体力、気力、精力上升了…
								PRINTFORML %CALLNAME:MASTER%的精力回复了…
								PRINTFORML 精子被急速地制造出来、获得[濃厚精液]…
								PRINTW
								CALL BUFF_BASE(MASTER, BASE_気力,1000)
								CALL BUFF_BASE(MASTER, BASE_体力,1000)
								BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
								BASE:MASTER:精力 = MAXBASE:MASTER:精力
								CALL BUFF_BASE(MASTER, BASE_精力,1000, 1)
								TALENT:MASTER:濃厚精液 = 1
								TCVAR:MASTER:発情 = 1
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「来让\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@、怀孕吧HPH」","L"
								CALL HPH_PRINT,@"「让我妊娠HPH　产下、%CALLNAME:MASTER%的宝宝HPH」","W"
								CALL HPH_PRINT,@"「除了穴内射精以外什么都不需要思考的全力性爱…HPH　绝对、会很舒服的啊HPHHPH」","L"
								CALL HPH_PRINT,@"「直到让典怀孕为止HPH都不准停下哟…HPH」","L"
								RESETCOLOR
								PRINTW
							ELSE
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、%CALLNAME:MASTER%阁下HPH」","L"
								RESETCOLOR
								PRINTFORML 本该被推倒的典反而兴奋起来激烈地渴求着%CALLNAME:MASTER%
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「快来HPH　快来侵犯典吧HPH」","L"
								CALL HPH_PRINT,@"「请把%CALLNAME:MASTER%阁下新鲜的种子、赐给典的子宫吧HPH」","L"
								RESETCOLOR
							ENDIF
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、可不能逃跑哦HPH」","L"
							CALL HPH_PRINT,@"「直到典满足为止、会一直好好地疼爱你的HPH」","L"
							RESETCOLOR
						ENDIF
					ELSE
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下HPH　来做吧HPH」","L"
						CALL HPH_PRINT,@"「问我要做什么、那不是很明显吗HPH」","W"
						CALL HPH_PRINT,@"「小穴哟HPH　小・穴HPH」","L"
						RESETCOLOR
					ENDIF
				ELSE
					IF TALENT:恋慕 || TALENT:恋人
						IF TALENT:140:恋人
							;典が妊娠
							IF TALENT:妊娠
								;你に孕まされた
								IF CFLAG:身に覚え_母 == 1 && !CFLAG:無自覚妊娠
									PRINTFORML 「明明都有饭纲丸大人作为恋人了…却还爱慕着典、让典怀孕…」
									PRINTFORML 「%CALLNAME:MASTER%阁下、真过分」
									PRINTFORML 「不过、典还是爱着这样的%CALLNAME:MASTER%阁下…也请你爱我吧」
									;安定期
									IF CFLAG:妊娠経過日数 >= 10 && CFLAG:妊娠経過日数 <= 25
										PRINTFORML 「不过、我很在意肚子里的孩子、可以的话希望你温柔些…%UNICODE(0x2665) *1%」
										PRINTFORML 「可不能、猛撞小宝宝的房间哟…%UNICODE(0x2665) *1%」
									;本番不可
									ELSEIF CFLAG:妊娠経過日数 < 10 || CFLAG:妊娠経過日数 > 25
										PRINTFORML 「不过、因为这是没法强迫的事情所以…那个、不可以插入、抱歉」
										PRINTW
										PRINTFORML 「作为代替、用嘴和手的话不管多少次我都会为你侍奉的…%UNICODE(0x2665) *1%」
										PRINTFORML 典用手做了个撸动阴茎的动作给你看
									ENDIF
								;身に覚え無し
								ELSE
									PRINTFORML 「啊啊…甚至抛弃了恋人、跑来和被鬼怪之类的东西缠身的我相见」
									PRINTFORML 「您深爱着我呢…好高兴」
									PRINTW
									;安定期
									IF CFLAG:妊娠経過日数 >= 10 && CFLAG:妊娠経過日数 <= 25
										PRINTFORML 「肚子里的孩子吗…生下来的话说不定能有什么用处呢」」
										PRINTFORML 「%CALLNAME:MASTER%阁下可以完全不用在意、做的时候激烈一些也没关系哟」
										PRINTW
										IF !RAND:4
											CALL ASK_YN("要好好保重身体啊","如果你希望的话")
											IF !RESULT
												PRINTFORML 「居然让您挂虑到如此程度…典、很有福气呢」
												PRINTFORML 「请、尽管缠绵吧…直到不高兴的事情、全都忘记…」
											ELSE
												PRINTFORML 「没错、那正是典所希望的…%UNICODE(0x2665) *1%」
												PRINTFORML 「抱住我、然后打上你的印记吧…直到不高兴的事情、全都忘记…」
											ENDIF
										ELSE
											PRINTFORML 「……%CALLNAME:MASTER%阁下真的很温柔呢。虽然我明白这是没法做到的事情」
											PRINTFORML 「……但即使是带有一副如此丑陋的身体的我、可以请您爱着我吗…可以为我打上您的印记吗…」
											PRINTFORML 「%CALLNAME:MASTER%阁下、我爱你…」
										ENDIF
										PRINTW
									;本番不可
									ELSEIF CFLAG:妊娠経過日数 < 10 || CFLAG:妊娠経過日数 > 25
										PRINTFORML 「不过、因为这是没法强迫的事情所以…那个、不可以插入、抱歉」
										PRINTW
										PRINTFORML 「作为代替、用嘴和手的话不管多少次我都会为你侍奉的…%UNICODE(0x2665) *1%」
										PRINTFORML 典用手做了个撸动阴茎的动作给你看
									ENDIF
								ENDIF
							;典は妊娠してない
							ELSE
								;恋人の龍が妊娠
								IF TALENT:140:妊娠
									;龍を普通に孕ませ
									IF CFLAG:140:身に覚え_母 == 1 && !CFLAG:140:無自覚妊娠
										;安定期
										IF CFLAG:140:妊娠経過日数 >= 10 && CFLAG:140:妊娠経過日数 <= 25
											PRINTFORML 「明明作为恋人的饭纲丸大人怀有身孕…却来和典缠绵真的好吗？」
											PRINTFORML 「我听说孕妇会有各种各样不安定的情緒…如果出轨被知道了的话会发生什么呢…」
											PRINTW
											PRINTFORML 「和孕妇做的话不能太激烈所以得不到满足吗？」
											PRINTFORML 「啊、可怜的%CALLNAME:MASTER%阁下。如果不嫌弃典的身体、请随意想撞多猛就撞多猛吧」
											PRINTFORML （真是、渣到极点的人…然而、即使这样我却仍旧…）
										;本番不可
										ELSEIF CFLAG:140:妊娠経過日数 < 10 || CFLAG:140:妊娠経過日数 > 25
											PRINTFORML 「我知道哟。饭纲丸大人不让你和她做对吧？」
											PRINTFORML 「她现在正是危险的时期、所以也并不是无理的要求」
											PRINTW
											CALL HPH_PRINT,@"「作为代替、这里正好有个〝洞〟可以使用哟…HPH」","L"
											CALL HPH_PRINT,@"「没法轰入深爱的恋人的兽欲、就请全部轰入给典吧…HPH」","L"
											PRINTFORML 典用手做了个撸动阴茎的动作给你看
										ENDIF
									;龍が時姦孕ませ
									ELSE
										;安定期
										IF CFLAG:140:妊娠経過日数 >= 10 && CFLAG:140:妊娠経過日数 <= 25
											PRINTFORML 「明明饭纲丸大人正是需要小心呵护的时期…却来和典缠绵真的好吗？」
											PRINTFORML 「本来就因为不知怀上了谁的孩子而导致情緒很不安定…」
											PRINTW
											PRINTFORML 「是不想和被自己之外的人所染指过的女子相拥缠绵吗？」
											PRINTFORML 「啊…请不要、太粗暴。对我随意、做什么都可以…」
											PRINTFORML （真是、渣到极点的人…然而、即使这样我却仍旧…）
										;本番不可
										ELSEIF CFLAG:140:妊娠経過日数 < 10 || CFLAG:140:妊娠経過日数 > 25
											PRINTFORML 「晾着饭纲丸大人不管、跑来找我缠绵什么的…」
											PRINTFORML 「啊啊、多么、多么差劲的人不是吗」
											PRINTW
											PRINTFORML 「痛…你是生气了吗？」
											PRINTFORML 「是因为被深爱的恋人背叛了？　还是被我的话语激怒了？　又或者──」
											PRINTFORML 「──因为这本就是你自己设计出来的事情？」
										ENDIF
									ENDIF
								;典も龍も妊娠（発覚）してない
								ELSE
									;龍が先に恋慕
									IF CFLAG:1000 == 1
										PRINTFORML 「来…请、抱住我…」
										PRINTFORML （饭纲丸大人、抱歉）
										PRINTFORML （今日、典也被您所爱的人给抱住了…）
									;典が先に恋慕
									ELSEIF CFLAG:1001 == 1
										PRINTFORML 「我会竭尽全力、好好侍奉你的…%UNICODE(0x2665) *1%」
										PRINTFORML 「请务必、要爱着典啊…」
										PRINTFORML （我明白你和饭纲丸大人是情侣关系。但…我才是更先喜欢上你的人…我绝不放弃）
									ENDIF
								ENDIF
							ENDIF

						;龍、典の他に恋人がいる
						ELSEIF K139_FIND_LOVER() == 1
							PRINTFORML 「相も変わらず恋人様を放っておいて私に夢中になってくださるなんて…%UNICODE(0x2665) *1%」
							PRINTFORML 「嬉しいです%UNICODE(0x2665) *1%　今だけは、典が%CALLNAME:MASTER%どのの恋人ですよ%UNICODE(0x2665) *1%」
							PRINTFORML （恋人がいようがいまいが、私は%CALLNAME:MASTER%どのを愛してみせましょう）
							IF TALENT:29:恋人 || TALENT:42:恋人 || TALENT:65:恋人
								PRINTFORML （我才不会把我的%CALLNAME:MASTER%阁下、交给那些天狗小姑娘们哦）
							ELSE
								PRINTFORML （我才不会把我的%CALLNAME:MASTER%阁下、交给那些人哦）
							ENDIF
						;恋人無
						ELSEIF K139_FIND_LOVER() == 0
							PRINTFORML 「好啊、我很乐意♪」
							PRINTFORML 「你要、来疼爱典吗…%UNICODE(0x2665) *1%」
							PRINTFORML （能得到%CALLNAME:MASTER%阁下的宠爱的、只有我一个人就够了…）
						;典が恋人
						ELSE
							IF TALENT:妊娠
								IF CFLAG:身に覚え_母 == 1 && !CFLAG:139:無自覚妊娠
									PRINTFORML 「虽然我已经变成一副怀有身孕之姿、但还是请爱着我哦…%UNICODE(0x2665) *1%」
									;安定期
									IF CFLAG:妊娠経過日数 >= 10 && CFLAG:妊娠経過日数 <= 25
										IF TCVAR:357 > 1
											IF EX:膣内精液 >= 500
												CALL HPH_PRINT,@"「嘛、之前明明都注入进来这么多了、还是没满足吗…HPH」","L"
												CALL HPH_PRINT,@"「肚子里的孩子都要被%CALLNAME:MASTER%阁下的精液淹着了…HPH」","L"
											ELSEIF EX:膣内精液 > 0
												CALL HPH_PRINT,@"「嘛、之前明明都在小穴里射进来这么多了…还是没射够吗HPH」","L"
												CALL HPH_PRINT,@"「肚子里的孩子会被吓一跳的…HPH」","L"
											ELSE
												CALL HPH_PRINT,@"「您之前似乎很关心我呢…现在的话可以随便中出哟HPH」","L"
												CALL HPH_PRINT,@"「可不能太粗暴哟…把我当作『非常舒服的洞』、让自己爽一爽吧HPH」","L"
											ENDIF
										ELSE
											PRINTFORML 「不过、我很在意肚子里的孩子、可以的话希望你温柔些…%UNICODE(0x2665) *1%」
											PRINTFORML 「可不能、猛撞小宝宝的房间哟…%UNICODE(0x2665) *1%」
										ENDIF
									;本番不可
									ELSEIF CFLAG:妊娠経過日数 < 10 || CFLAG:妊娠経過日数 > 25
										;本日２回目以降
										IF TCVAR:357 > 1
											IF ABL:指 >= 3 || ABL:舌 >= 3
												CALL HPH_PRINT,@"「嘛、明明才刚拔出来没一会儿…HPH」","L"
												CALL HPH_PRINT,@"「真是一个没有自制力的小鸡鸡呢…HPH」","L"
												IF  ABL:指 >= 3
													CALL HPH_PRINT,@"「就用典的手、多多地射出来吧HPH」","L"
													PRINTFORML 典妖娆的蠕动着手指…
												ELSEIF ABL:舌 >= 3
													CALL HPH_PRINT,@"「请随意品尝、典的嘴巴小穴HPH」","L"
													PRINTFORML 典伸出舌头、让它像活物一样滑溜溜地蠕动起来…
												ENDIF
												PRINTW
											ELSE
												CALL HPH_PRINT,@"「来…HPH　用嘴、帮你射出来吧…HPH」","L"
												PRINTFORML 典张開嘴巴、急不可耐地等待你的插入…
												PRINTW
											ENDIF

											IF TALENT:精愛味覚
												SELECTCASE RAND:2
												CASE 0
													CALL HPH_PRINT,@"「据说、精液含有丰富的蛋白质…HPH」","L"
												CASE 1
													CALL HPH_PRINT,@"「孕妇需要大量的营养、所以得要让我多喝一些啊…HPH」","L"
												ENDSELECT
												PRINTFORML 典用舌头舔了舔嘴唇、又把手指伸到%CALLNAME:MASTER%的股间游走
											ELSE
											ENDIF
										ELSE
											PRINTFORML 「不过、因为这是没法强迫的事情所以…那个、不可以插入、抱歉」
											PRINTW
											PRINTFORML 「作为代替、用嘴和手的话不管多少次我都会为你侍奉的…%UNICODE(0x2665) *1%」
											PRINTFORML 典用手做了个撸动阴茎的动作给你看
										ENDIF
									ENDIF
								ELSE
									SELECTCASE RAND:2
									CASE 0
										PRINTFORML 「呜呜、%CALLNAME:MASTER%阁下…对不起、对不起…」
										PRINTFORML 你对着低声抽泣着的典一边说着没关系、一边不停温柔地抚摸着她的头
										PRINTFORML 就这样把犯人其实就在眼前的事实给藏在心里
									CASE 1
										PRINTFORML 「呜呜…%CALLNAME:MASTER%阁下…」
										PRINTFORML 「你还会继续爱着、已经被玷污过的我吗…呜呜呜…」
										PRINTFORML %CALLNAME:MASTER%一边抱紧以为自己是被不知道什么人给弄怀孕的典、一边温柔地抚摸着她的头
									ENDSELECT
									PRINTW
								ENDIF
							;妊娠していない
							ELSE
								IF MARK:反発刻印 > 0
									PRINTFORML 「真是的！　%CALLNAME:MASTER%总是这样成天想着做色色的事情…！」
									PRINTFORML 「那种事情、典才…唔%UNICODE(0x2665) *1%　…不是的、刚才那是哈啊啊啊唔%UNICODE(0x2665) *1%」
									PRINTFORML 「我才不会被这样、糊弄过去…不让我好好舒服舒服的话、可不会原谅你呢…」
								ELSE
									;起床から２時間以内（8時～10時）
									IF TIME:0 >= 480 && TIME:0 <= 600
										IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
											PRINTFORML 「这个时间、你在想什么啊…」
											PRINTFORML 「不啊、我又没有说不做」
											PRINTFORML 「但是如果不能好好让我舒服的话、我可是会生气的哦」
										ELSE
											PRINTFORML 「一大早就精虫上脑呢%UNICODE(0x2665) *1%」
											PRINTFORML 「可以啊%UNICODE(0x2665) *1%　毕竟、典是%CALLNAME:MASTER%阁下的恋人嘛%UNICODE(0x2665) *1%」
											PRINTFORML 「不如、索性做个、一整天吧…？%UNICODE(0x2665) *1%」
										ENDIF
									ELSE
										IF HAS_PENIS(MASTER)
											IF TALENT:TARGET:育児中
												;育児中って积攒度が抑制されている気もするが…
												IF CFLAG:139:积攒度 > 250
													PRINTFORML 「一直在忍耐的人、可不只有%CALLNAME:MASTER%阁下呢%UNICODE(0x2665) *1%」
													PRINTFORML 「典啊、想和%CALLNAME:MASTER%阁下做爱、想得不得了啊…%UNICODE(0x2665) *1%」
													PRINTFORML 「请好好、疼爱我一番吧…%UNICODE(0x2665) *1%」
												ELSE
													PRINTFORML 「让你久等啦…%UNICODE(0x2665) *1%　小鸡鸡、很难受吧…%UNICODE(0x2665) *1%」
													PRINTFORML 「如果发出太大的声音的话会被%SHOW_CHILDNAME(139)%察觉到的…可不能太激烈哟%UNICODE(0x2665) *1%」
												ENDIF
												PRINTW
											ELSEIF TALENT:妊娠願望
												IF TALENT:MASTER:濃厚精液
													SETCOLOR 0xFF69B4
													CALL HPH_PRINT,@"「我说%CALLNAME:MASTER%阁下、这不是让典怀孕的气势满满吗…HPH」","L"
													CALL HPH_PRINT,@"「扑雄性气味如此扑鼻、子宮都要降下来了…HPHHPH」","L"
													TEQUIP:139:子宮 = 1
													IF BASE:MASTER:精力 != MAXBASE:MASTER:精力
														CALL HPH_PRINT,@"「首先把这个喝了…能让你变精神的药HPH」","L"
														CALL HPH_PRINT,@"「不用担心、没有什么副作用的…只是会稍微让鸡鸡变精神起来罢了HPH」","L"
														BASE:MASTER:精力 = MAXBASE:MASTER:精力
														BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
														CALL BUFF_BASE(MASTER, BASE_気力,1000)
														CALL BUFF_BASE(MASTER, BASE_体力,1000)
													ENDIF

													;さすがに強力すぎるか
													;IF TCVAR:360 == 0
													;	PRINTW
													;	SETCOLOR 0xFF69B4
													;	PRINTFORML 典の瞳が妖しい…%CALLNAME:MASTER%の濃厚な精の匂いに誘発され、発情してしまったようだ…
													;	PRINTW
													;	TCVAR:360 = 1
													;ENDIF
													CALL HPH_PRINT,@"「怀上%CALLNAME:MASTER%阁下孩子的准备已经万全了…HPH」","L"
													CALL HPH_PRINT,@"「请让我被你的精子受精吧…HPH　让典、变成一位母亲…HPHHPH」","L"
													PRINTW
													RESETCOLOR
												ELSE
													;今日のガチ子作り初回
													IF TCVAR:発情 && TCVAR:360 == 0
														SETCOLOR 0xFF69B4
														PRINTFORML 「啊啊ー、%CALLNAME:MASTER%阁下、精液的气味很淡哟」
														PRINTFORML 「危险日却不把蛋蛋装得鼓鼓囊囊的话、可不行吧」
														PRINTFORML 「真拿你没办法呢…那么、请把这个喝下去吧♪」
														RESETCOLOR
														PRINTW
														PRINTFORML 典强行把一种装在小瓶里的蓝色液体对着%CALLNAME:MASTER%灌了下去
														SETCOLOR 0xFF69B4
														PRINTFORML 「怎么样？　身体里有力量在涌上来对吧？」
														PRINTFORML 「这是典特制的营养剂。喝了这个、%CALLNAME:MASTER%阁下的蛋蛋就会飞速地制造精液」
														RESETCOLOR
														PRINTL
														PRINTFORML 蛋蛋好热…有什么要觉醒了…
														TALENT:MASTER:濃厚精液 = 1
														CALL BUFF_BASE(MASTER, BASE_気力,1000)
														CALL BUFF_BASE(MASTER, BASE_体力,1000)
														BASE:MASTER:精力 = MAXBASE:MASTER:精力
														BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
														CALL BUFF_BASE(MASTER, BASE_精力,1000, 1)
														PRINTL
														SETCOLOR 0xFF69B4
														CALL HPH_PRINT,@"「啊啊、雄性的臭味变得好强烈…HPH」","L"
														CALL HPH_PRINT,@"「子宮都降下来了…HPH　身体、做好受孕的准备了…HPH」","L"
														TEQUIP:139:子宮 = 1
														CALL HPH_PRINT,@"「快点、来吧来…子宮疼得受不了…HPH」","L"
														CALL HPH_PRINT,@"「把作为女性的快乐、教给典吧…HPH」","L"
														PRINTW
														RESETCOLOR
														TCVAR:360 = 1
													ELSE
														SETCOLOR 0xFF69B4
														PRINTFORML 「%CALLNAME:MASTER%阁下、精液的气味很淡…」
														PRINTFORML 「典啊、想要让味道浓烈的浓厚精液、注入到子宫里来…」
														PRINTW
														PRINTFORML 「所以请多做几次、多多地将精液注入进来吧…%UNICODE(0x2665) *1%」
														PRINTFORML 「来、和典甜甜蜜蜜的造小孩运动、就開始吧…%UNICODE(0x2665) *1%」
														PRINTW
														RESETCOLOR
													ENDIF
												ENDIF
											ELSE
												SELECTCASE RAND:3
												CASE 0
													PRINTFORML 「来%UNICODE(0x2665) *1%　来做一场、浓情蜜意的性交吧%UNICODE(0x2665) *1%」
												CASE 1
													PRINTFORML 「来%UNICODE(0x2665) *1%　恋人小穴、请好好享受吧…%UNICODE(0x2665) *1%」
												CASE 2
													PRINTFORML 「抱住我了呢、好高兴…%UNICODE(0x2665) *1%」
												ENDSELECT
											ENDIF
										ELSE
											SELECTCASE RAND:2
											CASE 0
												PRINTFORML 「来%UNICODE(0x2665) *1%　来做一场、浓情蜜意的性交吧%UNICODE(0x2665) *1%」
											CASE 1
												PRINTFORML 「抱住我了呢、好高兴…%UNICODE(0x2665) *1%」
											ENDSELECT
										ENDIF
									ENDIF
								ENDIF
							ENDIF
							PRINTW
						ENDIF
					;思慕以下
					ELSE
						IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
							;童貞
							IF TALENT:MASTER:非童貞 == 0
								PRINTFORML 「啊啦啊啦…这是、打算干什么呢？」
								PRINTFORML 「是哪里的坏蛋大人教唆的吗…还是说、偷看了谁做这种事情吗？」
								PRINTFORML 「从刚才開始是想干什么…能详细告诉我吗？」
								CALL ASK_YN("色色的事情","那个…")
								IF !RESULT
									PRINTFORML 「呵呵…真是可爱的说法呢%UNICODE(0x2665) *1%」
									PRINTFORMW 典坏笑着、悄悄地对%CALLNAME:MASTER%耳语道
									PRINTL
									CALL HPH_PRINT,@"「说错了吧？　是性交哟、性交HPH」","L"
									PRINTW
									PRINTFORML 典灼热的气息打在耳朵上。仅仅如此、就让股间酥酥麻麻的
									PRINTL
									CALL HPH_PRINT,@"「用这个地方盖住的东西、让姐姐舒服一下吧HPH　做法、你知道吗…HPH」","L"
									CALL HPH_PRINT,@"「不知道的话、就来教会你吧…HPH　来、请来吧…HPH」","L"
									PRINTW
								ELSE
									PRINTFORML 「哦呀哦呀、都不知道是什么就准备把姐姐推倒吗？」
									PRINTFORML 「真是个坏孩子呢…还是说、是雄性所持有的本能呢」
									PRINTFORMW 典坏笑着、悄悄地对%CALLNAME:MASTER%耳语道
									PRINTL
									CALL HPH_PRINT,@"「你要做的这个事、是性交哟、性交HPH」","L"
									PRINTW
									PRINTFORML 典灼热的气息打在耳朵上。仅仅如此、就让股间酥酥麻麻的
									PRINTL
									CALL HPH_PRINT,@"「来、和姐姐一起、学习做坏坏的事吧…HPH」","L"
									PRINTFORML 回过神来、本该将对方推倒的自己却反倒被典给缠住了…
									PRINTW
								ENDIF
							ELSE
								PRINTFORML 「啊啦啊啦…这是、打算干什么呢？」
								PRINTFORML 用舌头在一副强作镇静的样子坏笑着的典的脖子上舔来舔去
								PRINTW
								CALL HPH_PRINT,@"「唔…HPH　明明是个小孩子、却已经相当习惯了呢」","L"
								CALL HPH_PRINT,@"「嗯HPH　咕呜…HPH　先、停下…」","L"
								PRINTW
								PRINTFORML 平日里淡定自若的飘逸气场已经消散、只剩下被小孩子的前戏弄得不知所措的母狐狸的身姿
								PRINTW
							ENDIF
						ELSE
							PRINTFORML 「呼呼、请尽情、享用典的身体吧♪」
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		;人目がある
		CASE 1
			IF TALENT:恋慕 || TALENT:恋人
				IF K139_FIND_AROUND() == 140
					;龍が恋人
					IF TALENT:140:恋人
						PRINTFORML 「%CALLNAME:MASTER%阁下、现在还是请忍耐一下吧」
						PRINTFORML 「两个人独处的话、不管多少次都可以尽情做…」
						PRINTFORML 「不要让饭纲丸大人伤心…」
					ELSE
						;典が恋人
						IF TALENT:恋人
							IF CFLAG:139:1000
								PRINTFORML 「%CALLNAME:MASTER%阁下、请忍一下…」
								PRINTFORML 「确实、我们俩是恋人…但上司就在附近…」
								PRINTFORML
							ELSE
								;龍が先に恋慕
								IF CFLAG:139:1000
									PRINTFORML 「%CALLNAME:MASTER%阁下、在这里还是有点…」
									PRINTFORML 「姑且、上司还在看着呢…」
									PRINTFORML （虽说%CALLNAME:MASTER%阁下是属于我的、但让饭纲丸大人看见还是太残酷了吧…）
								ELSE
									PRINTFORML 「%CALLNAME:MASTER%阁下、在这里还是有点…」
									PRINTFORML 「姑且、上司还在看着呢…」
									PRINTFORML 「找一个、只有你我二人的地方慢慢享受吧…%UNICODE(0x2665) *1%」
								ENDIF
							ENDIF
						ELSE
							;龍が先に恋慕
							IF CFLAG:139:1000
								PRINTFORML 「%CALLNAME:MASTER%阁下、在这里还是有点…」
								PRINTFORML 「姑且、上司还在看着呢…」
								PRINTFORML （让饭纲丸大人看见还是太残酷了吧…）
							ELSE
								PRINTFORML 「%CALLNAME:MASTER%阁下、在这里还是有点…」
								PRINTFORML 「姑且、上司还在看着呢…」
								PRINTFORML 「找一个、只有你我二人的地方慢慢享受吧…%UNICODE(0x2665) *1%」
							ENDIF
						ENDIF
					ENDIF
				;龍が近くにいない
				ELSE
					;你の恋人が近くにいる
					IF K139_FIND_LOVER() == 2
						IF K139_FIND_AROUND() == 29
							PRINTFORML 「好啦、文小姐在瞪着你哟」
						ELSEIF K139_FIND_AROUND() == 42
							PRINTFORML 「好啦、极小姐要生气了哟」
						ELSEIF K139_FIND_AROUND() == 65
							PRINTFORML 「好啦、椛小姐的表情很悲伤哟」
						ELSE
							PRINTFORML 「好啦、恋人小姐好像有什么话要说哟」
						ENDIF
						PRINTFORML 「如果是想向大家昭示和我的关系、那就另当别论了…%UNICODE(0x2665) *1%」
						PRINTW
					;你の恋人が遠くにいる
					ELSEIF K139_FIND_LOVER() == 1
						IF K139_FIND_AROUND() == 29
							PRINTFORML 「文小姐那边就这样真的好吗？」
						ELSEIF K139_FIND_AROUND() == 42
							PRINTFORML 「极小姐那边就这样真的好吗？」
						ELSEIF K139_FIND_AROUND() == 65
							PRINTFORML 「椛小姐那边就这样真的好吗？」
						ELSE
							PRINTFORML 「恋人小姐那边就这样真的好吗？」
						ENDIF
						PRINTFORML 「而且、这里还有其他人看着…找一个、两人独处的…%UNICODE(0x2665) *1%」
						PRINTW
					ELSE
						IF TALENT:恋人
							PRINTFORML 「呵呵、虽说让周围的人都看见我们的亲密、真的很让人兴奋…」
							PRINTFORML 「但要不还是、找个二人独处的地方、好好激情一番…%UNICODE(0x2665) *1%」
						ELSE
							PRINTFORML 「呵呵、虽说让大家直到典才是属于%CALLNAME:MASTER%阁下的这件事也不错…」
							PRINTFORML 「但要不还是、找个二人独处的地方、我想只让%CALLNAME:MASTER%阁下看见我淫乱的姿态…%UNICODE(0x2665) *1%」
						ENDIF
					ENDIF
				ENDIF
			;典に恋慕、恋人無
			ELSE
				IF K139_FIND_AROUND() == 140
					IF TALENT:140:恋人
						PRINTFORML 「唔ー嗯、说想在恋人的面前做什么的、%CALLNAME:MASTER%阁下还真是了不得呢」
						PRINTFORML 「就算是我如果做出了那种事情的话也会被饭纲丸大人给杀掉的」
						PRINTFORML 「所以说、这种事还是饶过我吧…」
					ELSEIF TALENT:140:恋慕
						PRINTFORML 「哎呀这个、虽说并不是没有一边暴露在众目睽睽之下一边性交的兴趣…」
						PRINTFORML 「但在这里的话我还是有些忌惮的、去其他地方吧？　走吧走吧♪」
						PRINTFORML （如果饭纲丸大人的眼前開干的话、二人可能就要一起完蛋了呢）
					ELSE
						PRINTFORML 「不是、就算是在上司面前、公開性交这种事还是…」
						PRINTFORML 「要做的话、好好的找个只有我们俩的地方做好吗？」
					ENDIF
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%阁下是那种人吗？　如果不被别人盯着看就兴奋不起来的人吗？」
					PRINTFORML 「但是反过来我会很紧张的所以…能不能两个人独处呢？」
				ENDIF
			ENDIF
		;野外
		CASE 2
			PRINTFORML 「%CALLNAME:MASTER%阁下是那种人吗？　无法用普通的玩法得到满足的人吗？」
			PRINTFORML 「虽然典也不是完全没有兴趣…但是不是有些太早了」
		;多人数プレイ
		CASE 3
			PRINTFORML 「怎么说呢…虽然我觉得这样应该也会有乐趣」
			PRINTFORML 「但在此之前、还是希望能珍视只有我们两人的时光」
		;情緒不足
		CASE 4
			PRINTFORML 「%CALLNAME:MASTER%阁下、是不太重视场合和气氛的人呢」
			PRINTFORML 「我好歹也是女性…请好好注意一下场合和气氛」
			PRINTFORML 鼻尖被典点了一下
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;351,帯出去
;==================================================
@M_KOJO_MESSAGE_COM_K139_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K139_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	;TARGET連れ出し
	IF CFLAG:同行 == 60
		IF TALENT:恋慕 || TALENT:恋人
			;目の前に恋人
			IF K139_FIND_LOVER() == 2
				IF K139_FIND_AROUND() == 140
					PRINTFORML 「和我吗？　不和饭纲丸大人吗？」
					PRINTFORML 「饭纲丸大人…我先告辞了」
					PRINTW
					PRINTFORML 「%CALLNAME:MASTER%阁下…就算你不带上任何人就离開那个地方」
					PRINTFORML 「…我也一定会很高兴哟。感到高兴是理所当然的不是吗」
					PRINTFORML 「正因为如此、我才感到难过…」
				ELSEIF K139_FIND_AROUND() == 29
					PRINTFORML 「不顾身为恋人的射命丸小姐…真的没问题吗？」
				ELSEIF K139_FIND_AROUND() == 42
					PRINTFORML 「姫海棠小姐…因为被您的恋人叫去了…所以就失礼了」
				ELSEIF K139_FIND_AROUND() == 65
					PRINTFORML 「犬走小姐…失礼了」
				ELSE
					PRINTFORML 「不是恋人小姐…而是我？」
					PRINTFORML 「这是我的荣幸。我很高兴能陪同您」
				ENDIF
			ELSE
				IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「没有典的话%CALLNAME:MASTER%阁下真是什么都做不了呢」
						PRINTFORML 「没办法、那我就跟你走吧」
						PRINTW
					CASE 1
						PRINTFORML 「我也并不是…你想象中的那么闲」
						PRINTFORML 虽然看起来很不高兴、但典好像还是跟在后面
						PRINTW
					ENDSELECT
				ELSEIF TCVAR:発情
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、你要带我去哪里呢…HPH」","L"
					CALL HPH_PRINT,@"（和%CALLNAME:MASTER%阁下两个人独处HPH　和%CALLNAME:MASTER%阁下两个人独处HPH）","L"
					RESETCOLOR
					PRINTW
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「好的♪　无论去哪里都行♪」
						PRINTW
					CASE 1
						PRINTFORML 「需要典的力量吗？　就交给我吧♪」
						PRINTW
					ENDSELECT
				ENDIF
			ENDIF
		;恋慕、恋人無
		ELSE
			;目の前に恋人
			IF K139_FIND_LOVER() == 2
				IF K139_FIND_AROUND() == 140
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「饭纲丸大人、我失礼了」
						PRINTFORML （啊、饭纲丸大人一直盯着我们看、好可怕好可怕）
					CASE 1
						PRINTFORML 「比起我、你更应该带着饭纲丸大人出去吧」
						PRINTFORML （找个花心的人做恋人可真不得了啊）
					ENDSELECT
				ELSEIF K139_FIND_AROUND() == 29
					PRINTFORML 「射命丸小姐、非常抱歉。你的恋人正在叫我出去呢…」
				ELSEIF K139_FIND_AROUND() == 42
					PRINTFORML 「姫海棠小姐、非常抱歉。你的男朋友正在叫我出去呢…」
				ELSEIF K139_FIND_AROUND() == 65
					PRINTFORML 「犬走小姐、非常抱歉。你的重要之人正在叫我出去呢…」
				ELSE
					PRINTFORML 「哎呀哎呀、你是想抛下恋人小姐来和我独处吗？」
					PRINTFORML 「%CALLNAME:MASTER%阁下还真是厉害呢♪」
				ENDIF
			ELSE
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					;被逆推値は300～600で変動。600以上なら100％？他のキャラの値（小鈴、映姫など）を参考に
					IF ENDURE(139) > 400
						IF TCVAR:発情
							SELECTCASE RAND:3
							CASE 0
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「好呀HPH　咱们去一个没什么人的地方吧HPH」","L"
								PRINTFORML 典十分黏稠的视线一直盯着%CALLNAME:MASTER%的股间…
								RESETCOLOR
							CASE 1
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「姐姐也正好想换个地方呢…HPH」","L"
								PRINTFORML 典紧贴不离地抱住了%CALLNAME:MASTER%…
								RESETCOLOR
							CASE 2
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、和姐姐两个人在一起、想做些什么呢…HPH」","L"
								CALL HPH_PRINT,@"「姐姐我、想教%CALLNAME:MASTER%阁下一个很好玩的游戏哦…HPH」","L"
								RESETCOLOR
							ENDSELECT
						ELSE
							SELECTCASE RAND:3
							CASE 0
								CALL HPH_PRINT,@"「当然可以啦♪　不过、之后能听听姐姐的请求吗…HPH」","L"
							CASE 1
								CALL HPH_PRINT,@"「是啊。万一遇到危险的野兽就不好了…HPH」","L"
								CALL HPH_PRINT,@"「姐姐会跟你去的HPH」","L"
							CASE 2
								CALL HPH_PRINT,@"「嘸嘸HPH　快点、快点出发吧HPH」","L"
							ENDSELECT
						ENDIF
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「姐姐也没那么闲啊」
							PRINTFORML 虽然这么说、典似乎还是很高兴的样子
						CASE 1
							PRINTFORML 「好啦好啦、也不用这样拉姐姐的手呀、姐姐会跟着你的」
						CASE 2
							PRINTFORML 「找姐姐有什么事吗？」
						ENDSELECT
					ENDIF
				ELSE
					IF ENDURE(139) > 400
						IF TCVAR:発情
							SELECTCASE RAND:3
							CASE 0
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「好呀HPH　咱们去一个没什么人的地方吧HPH」","L"
								PRINTFORML 典十分黏稠的视线一直盯着%CALLNAME:MASTER%的股间…
								RESETCOLOR
							CASE 1
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「当然可以啦♪　无论去哪都行哦HPH」","L"
								PRINTFORML 典紧贴不离地抱住了%CALLNAME:MASTER%…
								RESETCOLOR
							CASE 2
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、要到那边去吗…HPH」","L"
								RESETCOLOR
							ENDSELECT
						ELSE
							SELECTCASE RAND:3
							CASE 0
								CALL HPH_PRINT,@"「当然可以啦♪　不过、之后能听听姐姐的请求吗…HPH」","L"
							CASE 1
								CALL HPH_PRINT,@"「是啊。万一遇到危险的野兽就不好了…HPH」","L"
								CALL HPH_PRINT,@"「姐姐会跟你去的HPH」","L"
							CASE 2
								CALL HPH_PRINT,@"「嘸嘸HPH　快点、快点出发吧HPH」","L"
							ENDSELECT
						ENDIF
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「好了好了、我会跟你去的♪」
						CASE 1
							PRINTFORML 「哎呀哎呀、你想把典带到哪里去呢♪」
						CASE 2
							PRINTFORML 「难道、这就是传说中的『打包带走』吗？」
						ENDSELECT
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;FLAG:甲斐性無(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_352
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
;飯綱丸に恋慕がついてしまった場合は強制的に１回失敗する
IF (CFLAG:139:1000 || CFLAG:139:1001) && CFLAG:1011 == 0
	TFLAG:192 = -1
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_MESSAGE_COM_K139_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL K139_AMANURE
	;成功
	;恋慕告白は典から告白の流用
	IF TFLAG:193 == 1
		;龍が先に恋慕
		IF CFLAG:139:1000
			PRINTFORML 「真的是……太好了吗？」
			PRINTFORML 「不是选择饭纲丸大人、而是选择了我…」
			PRINTW
			PRINTFORML 「如果得到饭纲丸大人的宠爱、%CALLNAME:MASTER%阁下在妖怪之山的地位就安泰了哦？」
			PRINTFORML 「这可比与我这油嘴滑舌的管狐在一起幸福得多哦？」
			PRINTW
			PRINTFORML 啊啊、我真是不争气
			PRINTFORML 从没想过自己会对恋爱如此胆怯
			PRINTW
			PRINTFORML 「饭纲丸大人是个很优秀的人。别看她那样、其实很会做料理。和我完全不同──」
			PRINTFORML 你在说什么啊。明明只要说句「好開心」就行了啊
			PRINTFORML 现在说的都是些贬低自己、抬高饭纲丸大人的话
			PRINTW
			PRINTFORML 「而且、饭纲丸大人她──」
			PRINTFORML 不要再说了。再说下去%CALLNAME:MASTER%阁下就要离開你了啊
			PRINTW
			PRINTFORML 「比起我、果然还是饭纲丸大人更好吧──」
			PRINTFORML 讨厌。讨厌啊。明明是喜欢你。明明最喜欢你了
			PRINTW
			CALL ASK_YN("亲吻典","紧紧抱住典")
			IF !RESULT
				PRINTFORML 「唔─────」
				PRINTFORML 然而、欲编织自虐之语的嘴唇却被堵住了
				PRINTW
				PRINTFORML 眼前、是%CALLNAME:MASTER%的脸
				PRINTFORML 虽然只是几秒钟的事、时间却彷佛像是永恒一般
				PRINTW
				PRINTFORML 「──哇啊」
				PRINTFORML 不用看也知道。现在的我一定是一副荒唐可笑的表情
				PRINTW
				PRINTFORML %CALLNAME:MASTER%对我说
				PRINTFORML 『是我选择了典』。『因为是典所以没关系』
				PRINTW
				PRINTFORML 「真的吗……」
				PRINTFORML 这、这样是不行的
				PRINTW
				PRINTFORML 「真的、嗯咕、愿意、选我吗……」
				PRINTFORML 视线扭曲。喉咙深处泛起疼痛感。啊啊、我真是难看
				PRINTW
				PRINTFORML 「好開心。好開心啊。呜哇啊啊啊啊啊啊唔」
				PRINTFORML 如果知道眼前这位是人称『耳边低语的邪恶白狐』的话一定会很惊讶的吧
				PRINTW
				PRINTFORML 「最喜欢你了。最喜欢%CALLNAME:MASTER%阁下了呜呜呜」
				PRINTFORML 在我停止哭泣之前、%CALLNAME:MASTER%一直抚摸着我的头
				PRINTW
				EXP:接吻経験 ++
				EXP:MASTER:接吻経験 ++
				EXP:愛情経験 += 10
			ELSE
				PRINTFORML 「唔─────」
				PRINTFORML 简直让人喘不过气来、%CALLNAME:MASTER%紧紧地抱住了我
				PRINTW
				PRINTFORML 然后、在耳边低语说「我喜欢你」
				CALL HPH_PRINT,@"「wwﾍ√ﾚvv～wwﾍ√ﾚvvwwﾍ√ﾚvvHPHHPHっHPHHPH」","L"
				PRINTW
				PRINTFORML 后背因兴奋而颤抖不已、全身被官能的欢愉所侵犯
				PRINTFORML 他只说了一句话、就让『耳边低语的邪恶白狐』迷失了自我
				PRINTW
				PRINTFORML 『你是我的女人』
				CALL HPH_PRINT,@"「啊、是的…HPH」","W"
				PRINTFORML 『不要想多余的事情、只要在意自己就可以了』
				CALL HPH_PRINT,@"「不行啊、一直在耳边窃窃私语…HPH」","L"
				PRINTW
				PRINTFORML 甜言蜜语像毒品一样流入大脑
				PRINTFORML 这可不妙。要变成笨蛋了。
				PRINTW
				PRINTFORML 『比起饭纲丸、更喜欢典』
				CALL HPH_PRINT,@"「喜欢…HPH　%CALLNAME:MASTER%阁下、最喜欢你了…HPH」","L"
				PRINTW
				PRINTW
				PRINTW
				PRINTFORML 啊啊、多么失态啊……
				PRINTFORML 在恢复冷静的思考中、袭来的是难以忍受的羞耻
				PRINTW
				PRINTFORML 「那、那个…啊、嗯！」
				PRINTFORML 不行啊。根本不敢正视他的脸。我直接飞扑进了%CALLNAME:MASTER%的怀抱里
				PRINTW
				PRINTFORML 「这样的我……今后请多多关照」
				PRINTFORML 「典……典现在、真的很幸福呢……♪」
				PRINTW
				IF !TCVAR:発情
					PRINTL
					PRINTL
					PRINTL
					PRINTFORML ………………
					PRINTFORML 典一直黏着你不肯放開……
					PRINTW
					PRINTFORML 「那、那ー个…%CALLNAME:MASTER%阁下…其实…」
					PRINTFORML 「刚才、被你低声倾诉了爱意还成为了恋人所以…」
					CALL PRINT_FACE, [[典]], "発情", "服", "", ""
					CALL HPH_PRINT,@"「典、好像进入发情期了呢…HPH」","L"
					PRINTFORML 典的眼瞳中浮现出♥、身体也蹭了上来…
					PRINTW
					CALL HPH_PRINT,@"「找一个、四下无人的地方然后过去吧…HPH」","L"
					CALL HPH_PRINT,@"「想、和恋人做爱…HPH」","L"
					PRINTW
				ENDIF
			ENDIF
		;典が先に恋慕
		ELSEIF CFLAG:139:1001
			PRINTFORML 「真的……真的吗？」
			PRINTFORML 「不是选择饭纲丸大人、而是选择了我…」
			PRINTW
			PRINTFORML 还是典比较好、%CALLNAME:MASTER%阁下一边这样说着一边点了点头
			PRINTW
			PRINTFORML 「哇、哇啊啊啊啊啊啊啊啊……」
			PRINTFORML 也许是因为终于放下心来、我突然因腰力不支摔倒了
			PRINTW
			PRINTFORML 就要快在摔到地上的时候、%CALLNAME:MASTER%阁下伸出了援手
			PRINTFORML %CALLNAME:MASTER%阁下总是这样
			PRINTFORML 在这种不经意的地方、会令人心动
			PRINTW
			PRINTFORML 「我真是太没出息了……平时总是用智慧对付强者的我……」
			PRINTFORML 「因为你的一句告白就摔倒了……」
			PRINTW
			PRINTFORML 没想到自己竟然恋爱脑到这种地步、有些震惊得目瞪口呆
			PRINTFORML 但是、我自己也感到惊讶的是、自己并没有那么讨厌这样的自己
			PRINTW
			PRINTFORML 如果是之前并不了解恋爱的自己、一定会嗤之以鼻地说「恋爱这种东西」之类的话吧
			PRINTFORML 以前的自己真是太天真了。恋爱是一场战争、一场没有仁义的战争
			PRINTW
			PRINTFORML 「鼓起勇气向你表白真是太好了」
			PRINTFORML 「虽然有些对不住饭纲丸大人……」
			PRINTW
			PRINTFORML 一想到敬爱的主君就心痛、但唯独这一点不能让步
			PRINTFORML 虽然对交往被发现可能会发生的事感到害怕、但到时候再考虑吧
			PRINTW
			PRINTFORML 「『和你的话语相反、你的脸上完全是一副妒火中烧不成体统的表情』吗？　这怎么可……」
			PRINTFORML 「『一副之前从没见过的表情？』欸欸欸、请不要再看啦……\/\/\/」
			PRINTW
			PRINTFORML 我似乎比我想象的还要兴奋
			PRINTFORML 这种表情要是被饭纲丸大人看到、一定会被砍头的。桑原咒桑原咒
			PRINTW
			PRINTFORML 「那都是因为%CALLNAME:MASTER%阁下。我是因为如此想念你才会变成这样的」
			PRINTFORML 「所以请好好负起责任哦。作为恋人」
			PRINTW
			PRINTFORML %CALLNAME:MASTER%阁下的表情稍稍有些扭曲。看这样子即使没有讨厌自己……
			PRINTFORML ……不过、鉴于自己至今为止的行动、也可以说是无可奈何…
			PRINTFORML 话虽如此、还是希望对方能坦率地接受恋爱中的女人所说的话
			PRINTW
			PRINTFORML 「那么……首先请紧紧地拥抱住我♪」
			PRINTFORML 「今后还请多多关照典……♪」
			PRINTW
		;典に恋慕無
		ELSE
			;飯綱丸が恋慕
			IF TALENT:140:恋慕
				;２回以上フラれた
				IF CFLAG:1011 > 1
					PRINTFORML 「真是的！　明明已经拒绝过好几次了！」
					PRINTFORML 「因为你执拗地求爱！　所以连我也有这种想法了！」
					PRINTFORML 大概是得到了同意…但典却生气了。为什么呢
					PRINTW
					PRINTFORML 「真是的、竟然选择了我这只恶狐、%CALLNAME:MASTER%阁下也真是个怪人啊」
					PRINTFORML 「嘛、不过正因为你是个怪人、所以我才会喜欢你的…」
					PRINTFORML 「如果是真心求爱的话、那我也不是什么冷血妖怪。嗯、那个…我很高兴」
					PRINTFORML 典把脸扭向一边、脸颊比平时更红了
					PRINTW
					PRINTFORML 「所以、对于%CALLNAME:MASTER%阁下的求爱、我就接受了」
					PRINTFORML 「请永远爱我。否则你就完蛋了♪」
					PRINTFORML 典的脸上浮现出一丝笑意、不知道到底有多少是真的
					PRINTW
					PRINTFORML 「啊、还有、不光是我、饭纲丸大人也要好好照顾啊」
					PRINTFORML 「因为这样我们的关系才能长久♪」
					PRINTFORML （我也很好奇饭纲丸大人会有什么反应）
					PRINTW
				;1回フラれた
				ELSEIF CFLAG:1011 == 1
					PRINTFORML 「所以选择饭纲丸大人不就好了吗…」
					PRINTFORML 「如果能得到饭纲丸大人的宠爱、在妖怪之山里一定程度就能为所欲为了吧？」
					PRINTFORML 「当然、我也是。但你却选择了我这只恶狐…」
					PRINTW
					PRINTFORML 「…嘛、也许正是因为你对这种事情不谄媚、所以才吸引了我吧」
					PRINTFORML 「我明白了。对于%CALLNAME:MASTER%阁下的求爱、我就接受了」
					PRINTW
					PRINTFORML 「啊、还有、不光是我、饭纲丸大人也要好好照顾啊」
					PRINTFORML 「因为这样我们的关系才能长久♪」
					PRINTFORML （我也很好奇饭纲丸大人会有什么反应）
					PRINTW
				;一発ＯＫ
				ELSE
					PRINTFORML 「选择了我吗？」
					PRINTFORML 典一脸惊慌的表情
					PRINTW
					PRINTFORML 「欸ー…至今为止我的努力到底…啊、那是我个人的一些事情」
					PRINTFORML 「但是、我真的可以吗？　我猜有个女人也一直在思念着%CALLNAME:MASTER%阁下哦…」
					PRINTFORML 「比如、有一定地位、意外地擅长料理、尽心尽力类型的妖怪女性之类的…」
					PRINTW
					PRINTFORML 「经过一段时间的交往、应该知道我是什么样的人了吧」
					PRINTFORML 「即便如此、还是会抛弃为你付出的女性而选择我…多少有些难以理解」
					PRINTW
					PRINTFORML 「…不过话说回来、%CALLNAME:MASTER%阁下的告白让我有点激动也是真心话」
					PRINTFORML 「老实说、我也很喜欢你」
					PRINTFORML 「不管是单纯在一起很開心的意思、还是可以在我的计划里被利用的意思」
					PRINTFORML ……说得很坦率
					PRINTW
					PRINTFORML 「这是我的诚意。你知道我的性格吧」
					PRINTFORML 「你的能力足以对付我的主人、就这样放弃不管的话不是太可惜了吗」
					PRINTFORML 「%CALLNAME:MASTER%阁下很高兴交到了女朋友。我很高兴有了一颗可以利用的男朋友棋子。你看、真是win-win啊」
					PRINTFORML 典的手指捏出狐狸的形状、做了一个类似狐狸张嘴的手势
					PRINTW
					PRINTFORML 「嗯、还请您多多关照」
					PRINTFORML 「既然是恋人了…那么…」
					IF EXP:接吻経験 == 0
						PRINTFORML 「这是最常见的亲吻方式吗…？」
						PRINTW
						PRINTFORML 典悄悄地靠过来、以足以感受到她的吐息的距离凝视着你
						PRINTFORML 「那么、你不打算做些什么吗…？」
						PRINTFORML 也许是心理作用、典的眼睛似乎湿润了…
						PRINTW
						CALL ASK_YN("吻她的嘴唇","吻她的额头")
						IF !RESULT
							PRINTFORML 啾…
							PRINTFORML 「……嘸嘸、虽然是我自己煽风点火、但还是很激动呢…♪」
							PRINTFORML 「因为没有仔细品味到、所以可以请你再做一次吗…？」
						ELSE
							PRINTFORML 啾…
							PRINTFORML 「……欸、欸欸欸～～～～～～～～？　为什么、是这里啊～～～～？」
							PRINTFORML 典明显露出不满的表情
							PRINTW
							PRINTFORML 「一般来说、到了这种程度、就会搂着腰、抬起下巴来亲吻嘴唇吧！？」
							PRINTFORML 「真是的～～～～、我的男朋友真的很差劲呢……」
							PRINTFORML 典看过来的视线好痛…
							PRINTW
							PRINTFORML 「算了。今天我就饶了你」
							PRINTFORML 「但是、总有一天一定要好好地吻我哦」
							PRINTW
						ENDIF
					ELSEIF EXP:接吻経験 > 0
						PRINTFORML 「接吻…已经做过了呢」
						IF TALENT:処女 == 0
							PRINTFORML 「嗯、我也已经把更重要的东西都献上了…%UNICODE(0x2665) *1%」
						ENDIF
						PRINTW
					ENDIF
					PRINTFORML 「啊、还有、不光是我、饭纲丸大人也要好好照顾啊」
					PRINTFORML 「因为这样我们的关系才能长久♪」
					PRINTFORML （我也很好奇饭纲丸大人会有什么反应）
					PRINTW
				ENDIF
			;龍に陥落無
			ELSE
				;２回以上フラれた
				IF CFLAG:1011 > 1
					PRINTFORML 「%CALLNAME:MASTER%阁下、意外的有毅力呢、应该说是不死心吗…」
					PRINTFORML 「典投降了。交往的事、我就答应了」
					PRINTW
					PRINTFORML 「但我不认为会有什么改变…」
					PRINTFORML 「说实话、我也是第一次有这样的经验、不怎么熟悉、所以正在考虑该怎么办」
					PRINTW
					PRINTFORML 你告诉典、她已经改变了吧
					PRINTFORML 「接受了自己的告白、啊…这样、原来如此、确实呢」
					PRINTFORML 「以前的我是拒绝的。从这个意义上来说、可以说是变了」
					PRINTW
					PRINTFORML 建议今后两个人也像这样注意细微的变化
					PRINTFORML 「原来如此…这或许也不坏。且慢、这也是以前的我根本想不到的事」
					PRINTW
					PRINTFORML 「看来、我已经被%CALLNAME:MASTER%阁下给影响到了呢」
					PRINTFORML 「嘸嘸、能迷惑人的管狐、真是太可怕了。难道不是比妖怪更危险的存在吗？」
					PRINTFORML 典把手放在嘴边、咯咯地笑着
					PRINTW
					PRINTFORML 「嘛、也许正因为是这样的人、才适合我吧」
					PRINTFORML 「今后请多多关照、%CALLNAME:MASTER%阁下」
					PRINTFORML 「那么、什么时候办喜事呢？　欸、太快了？　真是不会读空气啊、唉ー」
					PRINTFORML 「不过、到时候再请你告诉我吧♪　我会耐心等待那一天的到来的♪」
					PRINTW
				;１回振られた
				ELSEIF CFLAG:1011 == 1
					PRINTFORML 「之前已经拒绝过一次了…意外的有骨气」
					PRINTFORML 「可以啊。那么就交往吧」
					PRINTW
					PRINTFORML 「不过、了解了我的性格之后、你就会发现我是个好事之徒」
					PRINTFORML 「你应该知道管狐是什么样的存在吧」
					PRINTW
					PRINTFORML 「…不过、这也是我接受的理由」
					PRINTFORML 「知道了我是什么样的人之后、对求爱者产生了兴趣。就是这样的情况」
					PRINTW
					PRINTFORML 「另外、我也不是什么有着冷静透彻的感情的人什么的」
					PRINTFORML 「被有一定好感的人告白的话、我不否认我会很高兴」
					PRINTW
					PRINTFORML 那么、为什么会被拒绝一次呢…
					PRINTFORML 「因为我没想到会有人向我表白…如果拒绝一次就会明白吗」
					PRINTFORML 「如果你再向我告白一次、那我就会认真起来。如果你不再告白的话、那我也就不会接受了」
					PRINTW
					PRINTFORML 「……并不是什么心中的小算盘」
					PRINTFORML 「因为我也是有感情的。也是被这个给束缚住了吧」
					PRINTFORML 「…这是什么表情。我会用石头打你的」
					PRINTW
					PRINTFORML 「总之、真是一对可喜可贺的恋人啊」
					PRINTFORML 「啊、别看我这样、其实我是很努力的类型哦♪　如果有希望的话、我会努力的♪」
					PRINTFORML 「今后还请多多关照、%CALLNAME:MASTER%阁下%UNICODE(0x2665) *1%」
					PRINTFORML 典抱住了你的胳膊
					PRINTW
				;一発ＯＫ
				ELSE
					PRINTFORML 「嗯、没问题」
					PRINTFORML 典的回答很干脆
					PRINTW
					PRINTFORML 「总之就是那个吧？　高兴的时候一起聊天、约会的时候一起吃饭」
					PRINTFORML 「能够做爱的关系」
					PRINTFORML 「虽然感觉和现在没有太大的差别…%CALLNAME:MASTER%阁下是想用恋人的契约来束缚我吧」
					PRINTW
					PRINTFORML 「非常抱歉。我说得有点过分了」
					PRINTFORML 「不过、我一直以来都与这种事无缘…」
					PRINTFORML 「你看、我可是个邪恶的管狐。一直在骗人、一直在撒谎的我、还谈什么恋爱啊」
					PRINTW
					PRINTFORML 「但是、请允许我找一个借口」
					PRINTFORML 「我并不认为谁都能成为我的恋人」
					PRINTFORML 「不过因为是%CALLNAME:MASTER%阁下、嘛…就觉得也不错」
					PRINTW
					PRINTFORML 「总而言之、我对您还是比较中意的」
					PRINTFORML 典的语速比以往任何时候都快。也许是害羞吧
					PRINTW
					PRINTFORML 「说实在的、能不能扮演%CALLNAME:MASTER%阁下的理想恋人、我自己心里也没底…」
					PRINTFORML 告诉她没有必要扮演、只要真实的典就可以了
					PRINTW
					PRINTFORML 「哎呀哎呀、你这么说我会后悔的♪」
					PRINTFORML 典露出微笑、从下面窥视着你的脸
					PRINTW
					PRINTFORML 「请务必小心。管狐是贪得无厌的妖怪」
					PRINTFORML 「在你不注意的时候、可能会夺走你的很多东西」
					PRINTFORML 说着、典亲吻了%CALLNAME:MASTER%的嘴唇
					PRINTW
					PRINTFORML 「就像这样♪　多谢款待♪」
					PRINTFORML 典眯着眼睛、手指抚摸着自己的嘴唇
					PRINTW
					PRINTFORML 「那么、今后就请多多关照了、%CALLNAME:MASTER%阁下」
					PRINTFORML 「啊、『亲爱的』或者『夫君』会比较好吗？」
					PRINTFORML 「还是说主人？　很遗憾、可以这样称呼的只有饭纲丸大人ー、真是太遗憾了！」
					PRINTFORML 「但是、如果是%CALLNAME:MASTER%阁下的话、偶尔叫一次也可以哦？　『主人』♪」
					PRINTFORML 「怎ー么了吗？　感觉被击中心房了吗？　请好歹说点什么嘛ー。喂、我说喂ー」
					PRINTW
				ENDIF
			ENDIF
		ENDIF
		;你から告白フラグ
		CFLAG:1013 = 1
	;失敗
	ELSE
		IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
			IF CFLAG:1011 > 1
				PRINTFORML 「你能不能注意到你给我添了很多麻烦？」
				PRINTW
			ELSEIF CFLAG:1011 == 1
				PRINTFORML 「又来了吗。真是烦人啊」
				PRINTW
			ELSE
				PRINTFORML 「这种时候你在说什么啊」
				PRINTW
			ENDIF
		ELSE
			;龍が先に恋慕
			IF CFLAG:139:1000
				IF CFLAG:1011 > 2
					PRINTFORML 「拜托了。真是的、不要再这样了…」
					PRINTFORML 典只能软弱地喃喃自语道…
					PRINTW
				ELSEIF CFLAG:1011 == 2
					PRINTFORML 「不是说了吗！　去找饭纲丸大人啊！」
					PRINTFORML 「您为何如此执着于典」
					PRINTFORML 「我自己！　拼命地想要忘记你！　然而、你却总是…！」
					PRINTFORML 典咬住嘴唇、眼神游移不定地动摇着…
					PRINTW
				ELSEIF CFLAG:1011 == 1
					PRINTFORML 「…我应该已经拒绝过你了」
					PRINTFORML 「请不要这样扰乱典的心…」
					PRINTFORML 「快去饭纲丸大人那里。不要再做这样的事情了…」
					PRINTW
				ELSE
					PRINTFORML 「…！　我很高兴」
					PRINTFORML 「但是、我不能接受」
					PRINTFORML 「难道不是有比我更重要的人吗？」
					PRINTW
				ENDIF
			;典が先に恋慕
			ELSEIF CFLAG:139:1001
				IF CFLAG:1011 > 2
					PRINTFORML 「我、我、我该怎么办…」
					PRINTFORML 典只能软弱地喃喃自语道…
					PRINTW
				ELSEIF CFLAG:1011 == 2
					PRINTFORML 「不是说了吗！　请不要这样！」
					PRINTFORML 「你喜欢我。我也喜欢你。这样不就足够了吗」
					PRINTFORML 「但是、%CALLNAME:MASTER%阁下的恋人、应该有更合适的人选才对。就在那里！」
					PRINTFORML 「请不要、再理会我了」
					PRINTW
				ELSEIF CFLAG:1011 == 1
					PRINTFORML 「请住手吧」
					PRINTFORML 「我承认。我也喜欢你」
					PRINTFORML 「但是、我不想引起主人的不快。请不要再这样了」
					PRINTW
				ELSE
					PRINTFORML 「…！　为何、为何」
					PRINTFORML 「为什么不早点告诉我呢」
					PRINTFORML 「如果能在那个人思念你之前向我表白的话、我就不会犹豫了…！」
					PRINTFORML 典慌慌张张的、用手捂着脸…
					PRINTW
				ENDIF

			;典に恋慕無
			ELSE
				IF TALENT:思慕
					IF CFLAG:1011 > 1
						IF TALENT:140:恋慕
							PRINTFORML 「我的事就算了、你能不能稍微注意一下饭纲丸大人的心意呢？」
						ELSE
							PRINTFORML 「%CALLNAME:MASTER%阁下、真是一点都不悔改啊」
							PRINTFORML 典露出为难的笑容
						ENDIF
						CFLAG:139:好感度 += 3
					ELSEIF CFLAG:1011 == 1
						IF TALENT:140:恋慕
							PRINTFORML 「如果你有再次向我表白的气概、就请和饭纲丸大人面对面交流吧」
							PRINTW
						ELSE
							PRINTFORML 「失礼了、上次是爱的告白吧」
							PRINTFORML 「没想到你是真心地向我求爱。真的很好奇呢…咳、我很荣幸」
							PRINTW
							PRINTFORML 「不过、请你再仔细想想」
							PRINTFORML 「就算喜欢上了欺骗人类的狐妖、等待你的也只有破灭哦？」
							PRINTFORML 「即使如此、%CALLNAME:MASTER%阁下还能发誓会一直爱我吗？」
							PRINTW
						ENDIF
					ELSE
						IF TALENT:140:恋慕
							PRINTFORML 「虽然我很高兴…但是这句话、还是请您转告给饭纲丸大人吧」
							PRINTW
						ELSE
							PRINTFORML 「我的工作单位就只有饭纲丸大人…」
							PRINTFORML 我并没有要求你在我手下工作…
							PRINTW
						ENDIF
					ENDIF
				ELSE
					IF CFLAG:1011 > 1
						IF TALENT:140:恋慕
							PRINTFORML 「我的事就算了、你能不能稍微注意一下饭纲丸大人的心意呢？」
						ELSE
							PRINTFORML 「%CALLNAME:MASTER%阁下、真是一点都不悔改啊」
							PRINTFORML 典苦笑着说道
						ENDIF
						CFLAG:139:好感度 += 3
					ELSEIF CFLAG:1011 == 1
						IF TALENT:140:恋慕
							PRINTFORML 「如果你有再次向我表白的气概、就请和饭纲丸大人面对面交流吧」
							PRINTW
						ELSE
							PRINTFORML 「咦、我还以为你是在開玩笑呢」
							PRINTFORML 「没想到你是真心地向我求爱」
							PRINTW
							PRINTFORML 「但是、你还不够认真呢」
						ENDIF
					ELSE
						IF TALENT:140:恋慕
							PRINTFORML 「虽然我很高兴…但是这句话、还是请您转告给饭纲丸大人吧」
							PRINTW
						ELSE
							PRINTFORML 「啊啦啊啦、您又在開什么玩笑呀」
							PRINTFORML 典似乎不以为然的样子…
							PRINTW
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	;今日典に告白フラグ
	TCVAR:367 += 1
	;告白累計フラグ
	CFLAG:1011 += 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;353,猥褻
;FLAG:甲斐性無(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K139_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_353_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;354,陪睡（相手は起きて被窝に招く感じ）
;CFLAG:衰弱(1以上=起きない
;CFLAG:招待(0以外=起きない
;==================================================
@M_KOJO_MESSAGE_COM_K139_354
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		IF CFLAG:衰弱 == 0
			PRINTFORML 「对…对不起。我有点不想起床…」
			PRINTFORML 典看起来很虚弱。要不要稍微关心一下她呢…
		ELSEIF CFLAG:招待 == 0
			IF DAY:2 == 4
				PRINTFORML 「今天好冷啊。请到我身边来…♪」
				PRINTFORML 典把被子掀起来、为%CALLNAME:MASTER%腾出了空间
			ELSE
				PRINTFORML 「嘸嘸、能睡在我旁边吗…%UNICODE(0x2665) *1%」
			ENDIF
		ELSE
			PRINTFORML 「嗯嗯ー…」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;355,時止め（地の文の改変程度に留めるべき
;==================================================
@M_KOJO_MESSAGE_COM_K139_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_355_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;356,邀请去阴暗处
;ABL:露出癖 + TALENT:羞恥心で判定
;==================================================
@M_KOJO_SUCCESS_COM_K139_356
;成否判定
;TFLAG:192(-1＝強制失敗、0=COM依存、1=強制成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_356
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_356_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_356_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
CALL K139_AMANURE
	IF TALENT:恋慕 || TALENT:恋人
		IF TCVAR:発情
			SETCOLOR 0xFF69B4
			CALL HPH_PRINT,@"「………………HPHHPH」","L"
			RESETCOLOR
			PRINTFORML 典没有任何抵抗、似乎在期待着接下来会发生什么…
		ELSE
			PRINTFORML 「那个、%CALLNAME:MASTER%阁下？　要带我到哪里去…」
			IF BASE:MASTER:勃起 >= 1000
				PRINTFORML 「！　原来如此…是想让典来慰劳你对吧…%UNICODE(0x2665) *1%」
				PRINTFORML 「我知道了…那么、请带我去一个没有人的地方吧…%UNICODE(0x2665) *1%」
				PRINTW
			ELSE
				PRINTFORML 「突然想抱我什么的…真是性急啊…%UNICODE(0x2665) *1%」
				PRINTFORMW 典自己松開了衣带
				PRINTFORML 「请吧…%UNICODE(0x2665) *1%　典的话、只要是%CALLNAME:MASTER%阁下、做什么都可以哦%UNICODE(0x2665) *1%」
			ENDIF
		ENDIF
	ELSE
		IF TCVAR:発情
			SETCOLOR 0xFF69B4
			CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、您打算带典到哪里去呀HPH」","L"
			RESETCOLOR
			PRINTFORML 典一边装傻、一边对之后的情况充满期待…
			PRINTW
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%阁下、你要去哪里？」
			IF BASE:MASTER:勃起 >= 1000
				PRINTFORML 「！　原来如此…原来是这样啊…%UNICODE(0x2665) *1%」
				PRINTFORML 「我知道了…那么、请带我去一个没有人的地方吧…%UNICODE(0x2665) *1%」
				PRINTW
			ELSE
				PRINTFORML 「把我带到这种荒无人烟的地方来…到底是想做什么呢…♪」
				PRINTFORML 「难道、是想要强暴典吗…呀啊%UNICODE(0x2665) *1%」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;360,任憑擺佈
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき礼堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K139_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TCVAR:20
	;接吻
	CASE 30
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			IF TALENT:接吻魔
				CALL HPH_PRINT,@"就HPH　呣啾HPH　呣啾HPH　啾呜HPH","L"
				CALL HPH_PRINT,@"「姐姐我呢、非常喜欢、和%CALLNAME:MASTER%阁下接吻哟…HPH」","L"
				CALL HPH_PRINT,@"「所以、呢HPH　再多、吻一吻吧…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"咕啾HPH　啾HPH　啾HPH　啾噜HPH","L"
				CALL HPH_PRINT,@"「啊唔HPH　还没结束哟、继续、来接吻吧HPH　舌头、伸出来…HPH」","L"
			ENDIF
		ELSE
			IF TALENT:接吻魔
				CALL HPH_PRINT,@"咕啾HPH　啾HPH　啾HPH　啾噜HPH","L"
				CALL HPH_PRINT,@"「哈啊…HPH　我说啊、%CALLNAME:MASTER%阁下、我还想继续、接吻…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"啾HPH　啾噜HPH　「唔…HPH　呼…HPH」啾HPH　啾咕HPH","L"
				CALL HPH_PRINT,@"「呼呼、舌头、像要融化了一样…HPH」","L"
			ENDIF
		ENDIF
	;前から抱きつく
	CASE 32
		IF TALENT:TARGET:体型 > TALENT:PLAYER:体型
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「嘸嘸、真是个爱撒娇的人啊HPH」","L"
				CALL HPH_PRINT,@"「好呀、请多多向姐姐撒娇吧HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「真是个爱撒娇的人…HPH」","L"
				CALL HPH_PRINT,@"「请把脸埋在典的欧派前休息吧…HPH」","L"
			ENDIF
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「我还以为还是个孩子呢…胸膛却意外的宽阔…HPH」","L"
				CALL HPH_PRINT,@"「姐姐很想就一直这样下去呢…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、就这样暂时安静一会儿吧…HPH」","L"
			ENDIF
		ENDIF
	;胸を揉ませる
	CASE 33
		IF TALENT:TARGET:胸圍 > 0
			IF TALENT:母乳体質
				IF TALENT:TARGET:育児中
					CALL HPH_PRINT,@"「啊嗯HPH　母乳、从欧派里出来了啊…HPH」","L"
					CALL HPH_PRINT,@"「明明是给%CHILDNAME:139:(TALENT:TARGET:育児中)%喝的…HPH」","L"
					CALL HPH_PRINT,@"「还是说、%CALLNAME:MASTER%阁下也想喝呢HPH」","L"
				;青色糖果がないので実質２周目以降専用か
				;と思ったら
				;IF TALENT:ARG:母乳体質 == 1 && EXP:ARG:噴乳経験 > 500 && EXP:ARG:出産経験 > 1
				;で永続的な母乳体質になることを知った
				ELSE
					CALL HPH_PRINT,@"「嘸嘸、明明还没有孩子却有母乳了…HPH」","L"
					CALL HPH_PRINT,@"「想要吸吗？　%CALLNAME:MASTER%阁下、还真是爱撒娇啊HPH」","L"
				ENDIF
			ELSE
				CALL HPH_PRINT,@"「怎么样、典的欧派。很大吧、你就是喜欢大的吧HPH」","L"
				CALL HPH_PRINT,@"「看你那个样子、似乎完全沉迷其中了呢…嘸嘸…HPH」","L"
			ENDIF
		ELSEIF TALENT:TARGET:胸圍 == -1
			CALL HPH_PRINT,@"「虽然很小、但其实很柔软哦…HPH」","L"
			CALL HPH_PRINT,@"「请再多揉几次…HPH」","L"
		ELSEIF TALENT:TARGET:胸圍 == -2
			CALL HPH_PRINT,@"「啊啊、那手法真是下流呢…HPH」","L"
			CALL HPH_PRINT,@"「哎呀、不要这样拨弄乳头啊HPH　啊啊HPH」","L"
		ELSE
			CALL HPH_PRINT,@"「怎么样？　柔软吗？　典的欧派HPH」","L"
			CALL HPH_PRINT,@"「呼嗯、像这样用手玩弄乳头的话、会有感觉的…HPH」","L"
		ENDIF
	;裙子の中を見せる
	CASE 35
		IF TEQUIP:TARGET:50 == MASTER
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「看、看见了吗？　%CALLNAME:MASTER%阁下、与姐姐紧密相连着的地方…HPH」","L"
				CALL HPH_PRINT,@"「小鸡鸡、在姐姐的这里面进进出出的呢HPH」","L"
				CALL HPH_PRINT,@"「嘸嘸、感觉到小鸡鸡在膣穴里变得更硬了呢…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的肉棒、一直插到这个地方了呢…HPH」","L"
				PRINTFORML 典轻轻地抚摸着自己的小腹…
			ENDIF
		;没穿内裤
		ELSEIF !EQUIP:下半身内衣２
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「请看…HPH　姐姐、现在什么也没穿哦…HPH」","L"
				IF PALAM:潤滑 >= PALAMLV:3
					CALL HPH_PRINT,@"「你看…色情的汁液垂下来、拉出了一条丝呢HPH」","L"
					CALL HPH_PRINT,@"「太想要%CALLNAME:MASTER%阁下的那根东西了、连口水都垂下来了哟…HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「看见了吗…HPH　这就是姐姐的小穴哦…HPH」","L"
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						CALL HPH_PRINT,@"「这里、想要被%CALLNAME:MASTER%阁下的小鸡鸡插进来呢…HPH」","L"
					ELSE
						CALL HPH_PRINT,@"「这里、想要被%CALLNAME:MASTER%阁下的手指插进来呢…HPH」","L"
					ENDIF
				ENDIF
			ELSE
				CALL HPH_PRINT,@"「现在、什么也没穿哟…HPH」","L"
				IF PALAM:潤滑 >= PALAMLV:3
					CALL HPH_PRINT,@"「你看…已经湿成这样了呢HPH」","L"
					CALL HPH_PRINT,@"「太想要%CALLNAME:MASTER%阁下的那根东西了、连口水都垂下来了哟…HPH」","L"
				ELSE
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						CALL HPH_PRINT,@"「可以把%CALLNAME:MASTER%阁下坚硬凶猛的那个东西插进这里面来吗…HPH」","L"
					ELSE
						CALL HPH_PRINT,@"「这里、想要被%CALLNAME:MASTER%阁下的手指插进来呢…HPH」","L"
					ENDIF
				ENDIF
			ENDIF
			PRINTFORML %CALLNAME:PLAYER%的目光被透过裙子的布料所能偷看到的、充满背德感的性器给牢牢钉住了……
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「看到姐姐的胖次、让你心里扑通扑通了吗？HPH」","L"
				CALL HPH_PRINT,@"「你可以更近距离地看哦…HPH」","L"
				IF PALAM:潤滑 >= PALAMLV:3
					CALL HPH_PRINT,@"「胖次已经湿了？　爱液漏出来了？　嘸嘸、确实呢…HPH」","L"
					CALL HPH_PRINT,@"「因为姐姐很想被%CALLNAME:MASTER%阁下抚摸、所以就漏了很多出来呢…HPH」","L"
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						CALL HPH_PRINT,@"「可以用%CALLNAME:MASTER%阁下的小鸡鸡、把这里给堵住吗…？HPH」","L"
					ELSE
						CALL HPH_PRINT,@"「可以用%CALLNAME:MASTER%阁下的手指来搅弄一下吗…？HPH」","L"
					ENDIF
				ELSE
					;丁字褲
					IF EQUIP:下半身内衣２ == 22
						PRINTFORML 典穿的胖次面积太小、阴蒂露出来了…
						CALL HPH_PRINT,@"「这个好像有些太大胆了…HPH」","L"
						CALL HPH_PRINT,@"「布料太小了…豆豆好像露出来了呢…HPH」","L"
					;透明胖次
					ELSEIF EQUIP:下半身内衣２ == 23
						PRINTFORML 胖次是透明材料制成的、可以隐约看到典的私密处…
						CALL HPH_PRINT,@"「你不喜欢这样的吗…？HPH」","L"
						CALL HPH_PRINT,@"「比起全部暴露出来、更色情吧？HPH」","L"
					;開放式胖次
					ELSEIF EQUIP:下半身内衣２ == 24
						PRINTFORML 本该被内衣遮住的部分却没有布料、秘处就这样露在外面…
						CALL HPH_PRINT,@"「虽然穿了胖次、但却又全部暴露出来了…HPH」","L"
						CALL HPH_PRINT,@"「只要穿了这个、我就会很兴奋…HPH」","L"
					ENDIF
				ENDIF
			ELSE
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、可以再凑近一点看哦…HPH」","L"
				IF PALAM:潤滑 >= PALAMLV:3
					CALL HPH_PRINT,@"「嘸呼呼…已经、完全湿润了对吧？HPH」","L"
					CALL HPH_PRINT,@"「典的这里、因为期待着所以已经完全濡湿了哦…HPH」","L"
					IF TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3
						CALL HPH_PRINT,@"「可以用%CALLNAME:MASTER%阁下的逸物、把这里给堵住吗…？HPH」","L"
					ELSE
						CALL HPH_PRINT,@"「可以用%CALLNAME:MASTER%阁下的手指来搅弄一下吗…？HPH」","L"
					ENDIF
				ELSE
					;丁字褲
					IF EQUIP:下半身内衣２ == 22
						PRINTFORML 典穿的胖次面积太小、阴蒂露出来了…
						CALL HPH_PRINT,@"「这个好像有些太大胆了…HPH」","L"
						CALL HPH_PRINT,@"「布料太小了…豆豆好像露出来了呢…HPH」","L"
					;透明胖次
					ELSEIF EQUIP:下半身内衣２ == 23
						PRINTFORML 胖次是透明材料制成的、可以隐约看到典的私密处…
						CALL HPH_PRINT,@"「你不喜欢这样的吗…？HPH」","L"
						CALL HPH_PRINT,@"「比起全部暴露出来、更色情吧？HPH」","L"
					;開放式胖次
					ELSEIF EQUIP:下半身内衣２ == 24
						PRINTFORML 本该被内衣遮住的部分却没有布料、秘处就这样露在外面…
						CALL HPH_PRINT,@"「虽然穿了胖次、但却又全部暴露出来了…HPH」","L"
						CALL HPH_PRINT,@"「只要穿了这个、我就会很兴奋…HPH」","L"
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	;おねだり
	CASE 40 TO 49
		;実行不可
;		PRINTFORML
	;手淫
	CASE 50
		PRINTFORML %CALLNAME:PLAYER%和%CALLNAME:TARGET%一边彼此凝视一边委身于快乐……
	;口交、舐陰
	CASE 51
		PRINTFORML %CALLNAME:PLAYER%一边看着热情的侍奉着自己的%CALLNAME:TARGET%的样子一边委身于快乐……
	;素股
	CASE 52
		PRINTFORML %CALLNAME:PLAYER%委身于%CALLNAME:TARGET%、两人一起沉溺于快乐之中……
	;乳交
	CASE 53
		PRINTFORML %CALLNAME:PLAYER%抚摸着正在给自己乳交的%CALLNAME:TARGET%的脑袋
		IF TALENT:TARGET:恋慕 || TALENT:TARGET:思慕
			PRINTFORML %CALLNAME:TARGET%一脸高兴地眯起眼睛、開始更加激烈的用胸部侍奉起来……
		ELSEIF TALENT:TARGET:愛欲 || TALENT:TARGET:炮友
			PRINTFORML %CALLNAME:TARGET%苦笑了一下、開始更加激烈的用胸部责弄起来……
		ELSE
			PRINTFORML %CALLNAME:TARGET%一边有些害羞地笑着一边捋动阴茎……
		ENDIF
	;足交
	CASE 54
		PRINTFORML %CALLNAME:PLAYER%屈服于%CALLNAME:TARGET%、发出了不成样子的喘息声……
	;肛門愛撫
	CASE 55
		PRINTFORML %CALLNAME:PLAYER%红着脸享受着菊穴所感受到的快感……
	;舐肛
	CASE 56
	;指挿入
	CASE 57
		IF TALENT:PLAYER:処女 && TALENT:PLAYER:処女 != -1
			PRINTFORML %CALLNAME:PLAYER%虽然僵着脸但还是委身于%CALLNAME:TARGET%……
		ELSE
			PRINTFORML %CALLNAME:PLAYER%和%CALLNAME:TARGET%一边彼此凝视一边委身于快乐……
		ENDIF
	;胸愛撫
	CASE 58
	;吸乳头
	CASE 59
	;ディープ接吻
	CASE 60
		PRINTFORML %CALLNAME:PLAYER%像是在回应着%CALLNAME:TARGET%一样、用舌头交缠了上去\@ TALENT:TARGET:恋慕 ? 、确认彼此的爱意…… # …… \@
	;強制舐陰
	CASE 70
		PRINTFORML %CALLNAME:PLAYER%遵从着%CALLNAME:TARGET%、只用舌头进行着侍奉……
	;肛門奉仕
	CASE 72
		PRINTFORML %CALLNAME:PLAYER%遵从着%CALLNAME:TARGET%、只用舌头进行着侍奉……
	;口交強制
	CASE 71
		PRINTFORML %CALLNAME:PLAYER%遵从着%CALLNAME:TARGET%、吮吸%TINKO(TARGET)%来进行侍奉……
	;ぱふぱふ
	CASE 73
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		IF TALENT:TARGET:胸圍 > 0
			CALL HPH_PRINT,@"「怎么样？　姐姐的胸枕HPH」","L"
			CALL HPH_PRINT,@"「嘸嘸、完全沉醉其中了呢…HPH」","L"
		ELSEIF TALENT:TARGET:胸圍 == -1
			CALL HPH_PRINT,@"「虽然很小、但却很柔软对吧？HPH」","L"
			CALL HPH_PRINT,@"「没关系、再用脸多蹭蹭也可以哦…嘸嘸HPH」","L"
		ELSEIF TALENT:TARGET:胸圍 == -2
			PRINTFORML 「胸很小？　那还真是对不住呢」
			PRINTFORML 「不过味道很好闻？　呼呼、是的吧、是的吧♪」
		ELSE
			CALL HPH_PRINT,@"「姐姐的胸部意外的大吗？HPH」","L"
			CALL HPH_PRINT,@"「没关系、就像对妈妈那样撒娇也没问题哦HPH」","L"
		ENDIF
	ELSE
		IF TALENT:TARGET:胸圍 > 0
			CALL HPH_PRINT,@"「典的乳枕、被包裹着的感觉怎么样？HPH」","L"
			CALL HPH_PRINT,@"「嘸嘸、看你那表情似乎用不着问了…HPH」","L"
		ELSEIF TALENT:TARGET:胸圍 == -1
			CALL HPH_PRINT,@"「欧派这么寒酸还真是抱歉…HPH」","L"
			CALL ASK_YN("软绵绵的很舒服","非常好闻")
			IF !RESULT
				CALL HPH_PRINT,@"「那真是太好了♪　如果可以的话请尽情享受典的欧派吧…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「哎呀、%CALLNAME:MASTER%阁下真是…HPH」","L"
			ENDIF
		ELSEIF TALENT:TARGET:胸圍 == -2
			CALL HPH_PRINT,@"「典的身体这么寒酸真的是非常抱歉、请您就这样把脸埋在欧派里休息吧…HPH」","L"
		ELSE
			CALL HPH_PRINT,@"「隔着衣服看不出来吧？　典啊、其实意外的有料哟HPH」","L"
			CALL HPH_PRINT,@"「请再多往我的身体上靠一点…HPH」","L"
		ENDIF
	ENDIF
		SELECTCASE RAND:3
		CASE 0
			PRINTFORML %CALLNAME:PLAYER%被%CALLNAME:TARGET%的乳房包裹住的短暂幸福时光过去了……
		CASE 1
			PRINTFORML %CALLNAME:PLAYER%被%CALLNAME:TARGET%的乳沟夹着、享受着甜甜的香气……
		CASEELSE
			PRINTFORML %CALLNAME:PLAYER%被%CALLNAME:TARGET%用乳房磨蹭着脸颊疼爱着……
		ENDSELECT
	;磨鏡
	CASE 74
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			CALL HPH_PRINT,@"「来HPH　能看见吗？HPH　%CALLNAME:MASTER%阁下的那里、和典的那里正在摩擦HPH」","L"
			CALL HPH_PRINT,@"「小豆豆也在、相互摩擦HPH　哈啊、哈啊啊唔HPH」","L"
		ELSE
			CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、好棒HPH　摩擦着、发出了下流的声音HPH」","L"
			CALL HPH_PRINT,@"「继续HPH　慢慢摆腰HPH　让小穴接吻吧HPH」","L"
		ENDIF
		PRINTW
	;強制アソコ愛撫
	CASE 76
		IF TALENT:TARGET:処女
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「请轻轻移动手指…HPH」","L"
				CALL HPH_PRINT,@"「女孩子的小穴是很敏感的哦…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「对、就是这种感觉…啊、咿咿HPH」","L"
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、很擅长嘛…HPH」","L"
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「就是这样、意外地擅长呢…HPH」","L"
				CALL HPH_PRINT,@"「请多用手指拨弄拨弄HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「呼呜呜呜呜HPH　被这样弄来弄去的HPH」","L"
				CALL HPH_PRINT,@"「典要、典要啊啊HPH」","L"
			ENDIF
			PRINTW
		ENDIF
	;乳を吸わせる
	CASE 77
		IF TALENT:母乳体質
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「来、是%CALLNAME:MASTER%阁下最喜欢的胸部哟HPH」","L"
				CALL HPH_PRINT,@"「好喝吗？HPH　多喝一些就能长大哟…HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「唔HPH　最近、母乳都止不住哟…HPH」","L"
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下来帮我吸一吸吧…HPH」","L"
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「呵呵、看着你这样喝奶、就感觉完全还是个小孩子呢HPH」","L"
				CALL HPH_PRINT,@"「吮吸姐姐的胸部的那种表情、真可爱啊HPH」","L"
			ELSE
				CALL HPH_PRINT,@"「来、是%CALLNAME:MASTER%阁下最喜欢的胸部吸ー吸ー哟HPH」","L"
				CALL HPH_PRINT,@"「啊唔、就算你那样吸、也不会出奶的…HPH」","L"
			ENDIF
			PRINTW
		ENDIF
	;85=Ｖ挿入する
	CASE 85
		PRINTFORML %CALLNAME:TARGET%拼命地晃着腰来侍奉%CALLNAME:PLAYER%……
	;だいしゅき礼堂ド
	CASE 86
		PRINTFORML %CALLNAME:PLAYER%被%CALLNAME:TARGET%紧紧地拥抱着、享受着膣肉的触感
		PRINTFORML 周围回响着水声、肉体碰撞的声音和%CALLNAME:TARGET%的喘息声……
	;87=Ａ挿入する
	CASE 87
		IF TALENT:尻穴狂
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「抱歉啊HPH　要用屁股吃掉、%CALLNAME:MASTER%阁下的小鸡鸡HPH」","L"
				CALL HPH_PRINT,@"「不要怕哦…HPH　你看、进来了HPH　嗞卟嗞卟～～的HPH」","L"
				CALL HPH_PRINT,@"「哦、嚯哦哦HPH　小孩子肉棒HPH　进到屁股小穴里了HPH」","L"
				RESETCOLOR
			ELSE
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「那么就把%CALLNAME:MASTER%阁下的、鸡鸡、用小穴…骗～～你的HPH」","L"
				CALL HPH_PRINT,@"「遗憾HPH　最后进到的是典的屁股小穴啦HPH」","L"
				CALL HPH_PRINT,@"「哦、哦哦HPH　屁股HPH　只是被插进来就高潮了HPH」","L"
				RESETCOLOR
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				IF ABL:Ａ感覚 >= 2
					CALL HPH_PRINT,@"「来、请看…HPH　毫不费力、就进来了哟…HPH」","L"
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、做了不少恶作剧吧…HPH」","L"
					CALL HPH_PRINT,@"「对于坏孩子的小鸡鸡、姐姐要用屁股好好惩戒一番呢…HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「咕、呜呜…果然、还是有些紧呢…HPH」","L"
					CALL HPH_PRINT,@"「看、%CALLNAME:MASTER%阁下的小鸡鸡、被姐姐的屁股给吞下去了…HPH」","L"
					CALL HPH_PRINT,@"「进来…了…HPH　哈啊ー、哈啊ー…%CALLNAME:MASTER%阁下的小鸡鸡、硬邦邦的、热热的…HPH」","L"
				ENDIF
				PRINTW
			ELSE
				IF ABL:Ａ感覚 >= 2
					CALL HPH_PRINT,@"「啊哈哈…硬邦邦的HPH　进到屁股里了呢…嗯HPH」","L"
					CALL HPH_PRINT,@"「进来…了…HPH　明明之前连放一根手指都勉强呢…HPH」","L"
					CALL HPH_PRINT,@"「都是%CALLNAME:MASTER%阁下的错哟？HPH　负起责任、让我的屁股高潮吧HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「咕、呜呜…果然、还是有些紧呢…HPH」","L"
					CALL HPH_PRINT,@"「真是的、%CALLNAME:MASTER%阁下的鸡巴、有些太硬太大了…HPH」","L"
					CALL HPH_PRINT,@"「进来…了…HPH　哈啊ー、哈啊ー…这种屁股被强行扩张的感觉、简直要上瘾了…HPH」","L"
				ENDIF
				PRINTW
			ENDIF
		ENDIF
	;88=腰振りＶ
	CASE 88
		PRINTFORML %CALLNAME:TARGET%拼命地晃着腰来侍奉%CALLNAME:PLAYER%……
	;89=腰振りＡ
	CASE 89
		IF TALENT:尻穴狂
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「抱歉啊HPH　姐姐、屁股很有感觉HPH」","L"
				CALL HPH_PRINT,@"「用%CALLNAME:MASTER%阁下的小孩子鸡巴HPH　菊穴高潮了HPH　哦HPH　哦哦HPHHPH」","L"
				RESETCOLOR
			ELSE
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「典是个HPH　典是个、菊穴异常敏感的HPH　淫乱的女人HPH」","L"
				CALL HPH_PRINT,@"「哦哦HPHHPH　哦HPH　去了HPH　只是被插进来HPH　就菊穴高潮了啊啊HPHHPH」","L"
				RESETCOLOR
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				CALL HPH_PRINT,@"「怎么了吗HPH　姐姐的屁股小穴HPH」","L"
				IF ABL:Ａ感覚 >= 5
					CALL HPH_PRINT,@"「就像小穴一样软乎乎、黏答答的对吧HPH」","L"
					CALL HPH_PRINT,@"「对女孩子来说HPH　像这样能让你很舒服的洞可有不少呢HPH　啊HPH　咿咿HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「还是很紧对吧？　呼呼、那么、不让它放松可不行…呢！HPH」","L"
					CALL HPH_PRINT,@"「哦、哦哦HPH　龟头部分HPH　在刮蹭着肠壁HPH」","L"
				ENDIF
			ELSE
				CALL HPH_PRINT,@"「感觉如何呢、典的菊穴HPH」","L"
				IF EXP:Ｖ性交経験 > 0
					CALL HPH_PRINT,@"「和小穴比起来HPH　哪边更舒服呢HPH　啊嗯PH」","L"
				ELSE
					CALL HPH_PRINT,@"「只有%CALLNAME:MASTER%阁下可以HPH　对典的HPH　菊穴HPH　随意使用啊HPH」","L"
				ENDIF
			ENDIF
			PRINTW
		ENDIF
	CASEELSE
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			CALL HPH_PRINT,@"「交给姐姐吧…HPH」","L"
			CALL HPH_PRINT,@"「从现在開始、一起来做一些舒服的事情吧…HPH」","L"
		ELSE
			CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、什么都不用管哦…HPH」","L"
			CALL HPH_PRINT,@"「只要接受典所做的事情就可以了…HPH」","L"
		ENDIF
		PRINTW
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;361,抵抗
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき礼堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K139_361
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_361_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_363
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_363_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;364,撒豆子(萃香、勇儀、斯喀雷特姉妹用
;TFLAG:193(撒豆子に参加してる人数
;==================================================
@M_KOJO_MESSAGE_COM_K139_364
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_364_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;368,陪同行動
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_MESSAGE_COM_K139_368
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_368_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_368_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE Activity_Type:TARGET
		CASE 0
			;▼考え事［在思考什麼］
			;TFLAG:193,-1=はぐらかされる
			;PRINTFORMW
		CASE 1
			;▼玩遊戲［一起玩］
			;※[幼稚]持ちのみ
			;TFLAG:193,1=大いに盛り上がる,-1=あまり盛り上がらない
			;PRINTFORMW
		CASE 2
			;▼吃飯［一起吃飯］
			;TFLAG:193,-1=MASTERはお腹が空いてなかった
			;PRINTFORMW
		CASE 3
			;▼つまみ食い［一起吃小零食］
			;※[妖精]持ちと露米亜、恋、幽幽子、紫苑のみ
			;TFLAG:193,-1=MASTERはお腹が空いてなかった
			;PRINTFORMW
		CASE 4
			;▼掃除［幫忙掃除］
			;※[掃除係]持ちまたは汚臭耐性-1以下のみ
			;PRINTFORMW
		CASE 5
			;▼運動［一起做運動］
			;※[音楽知識]持ちは除く（演奏になる）
			PRINTFORML 「保持健康是很重要的」
			PRINTFORML 「妖怪需要保持健康吗？　请不要在意这些细节♪」
			PRINTW
		CASE 6
			;▼読書［詢問閱讀感想］
			;TFLAG:193,-1=集中していて返事してくれない
			;PRINTFORMW
		CASE 7
			;▼料理［幫忙做飯］→［求分點飯菜］
			;TFLAG:193,2=幫忙做飯,0=作った料理を食べる,-1==MASTERはお腹が空いてなかった（食べる時）
			;PRINTFORMW
		CASE 8
			;▼演奏［協同合奏］or［进行伴奏］
			;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
			;TALENT:音楽知識,1=演奏してる,2=歌ってる,3=踊ってる
			;TFLAG:193,1=ノリノリ,0=成功,-1=失敗,-2=楽器がなくて見てるだけ
			;PRINTFORMW
		CASE 9
			;▼採集［幫忙採集］
			IF TALENT:採集Lv < 1
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「硬把它拔出来可不行啊。欸ー、真的把它拔出来了」
				CASE 1
					PRINTFORML 「很感谢您能帮我…不过还真是弄得伤痕累累的啊」
				CASE 2
					PRINTFORML 「呀啊啊、不能那么粗暴地处理那个东西啊」
				ENDSELECT
				PRINTW
			ELSEIF TALENT:採集Lv > 1
				PRINTFORML 「有%CALLNAME:MASTER%阁下帮忙的话采集会很顺利、真是帮了大忙了」
				PRINTW
			ELSE
				PRINTFORML 「能帮我一下吗？　真是帮了大忙了」
				PRINTW
			ENDIF
			PRINTFORML
		CASE 10
			;▼釣魚［一起釣魚］
			;TFLAG:193,-1=釣魚竿がなくて見てるだけ
			;PRINTFORMW
		CASE 11
			;▼実験［帮忙做实验］
			;PRINTFORMW
		CASE 12
			;▼のんびり［一起放鬆］
			;PRINTFORMW
		CASE 13
			;▼晩酌［晩酌に交手］
			;※酒耐性0以上のみ
			;PRINTFORMW
		CASE 14
			;▼買い物［幫忙买東西］
			;PRINTFORMW
		CASE 15
			;▼説教［様子をうかがう］
			;※神霊・蓬莱人は除く
			;TFLAG:193,-1
			;PRINTFORMW
		CASE 16
			;▼落とし穴［いたずらに交手］or［様子をうかがう］
			;※三月精・琪露諾・克勞恩皮絲のみ
			;それ以外は落ちる側
			;PRINTFORMW
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;402,就寝
;TFLAG:193(0=通常 1=兒童と一緒に川の字で寝る)
;==================================================
@M_KOJO_MESSAGE_COM_K139_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K139_402_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:睡眠(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K139_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_403_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会
;条件が厄介なので、COMF405 外出.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K139_405
;外出にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K139_405_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGETと约会
	IF CFLAG:同行
		;初めての约会
		IF FIRSTTIME(SELECTCOM)
			;恋人取得の条件に约会は含まれてないので多分大丈夫？
			IF TALENT:恋人
				PRINTFORML 「啊啊ー、终ーー于肯邀请典去约会了呢」
				PRINTW
				;他のキャラと约会済。CFLAG:1006は周回分も含めた過去の約會経験
				IF EXP:MASTER:約會経験 > CFLAG:1006
					PRINTFORML 典半眯着眼睛盯着%CALLNAME:MASTER%看……
					PRINTW
					PRINTFORML 「诶诶、诶诶。即使你和其他人约会、典也」
					PRINTFORML 「绝对一ーーーーーーーーーーーーーーーーーーーー点都不会在意」
					PRINTFORML 「啊ー啊、我也好想一起去吃美味的食物、彼此交换礼物、去一些很棒的地方呢ーー」
					PRINTW
					CALL ASK_YN("请原谅我！　我什么都会做的！","也没必要生气到那种程度……")
					IF !RESULT
						PRINTFORML 「你刚才是说什么都会做的吧？」
						PRINTFORML 典露出了得逞的笑容、偏着头瞄着你的脸
						PRINTW
						PRINTFORML 告诉了她仅限于你能做到的事情、果然会被要求做什么事情吧……
						PRINTFORML 「没关系哦♪　我会好ー好ー、把握分寸的♪」
						PRINTW
						PRINTFORML 虽然说实话有些不安、但典的心情好转了所以也就放心了下来
						PRINTFORML 「好、那么就出发吧♪」
						PRINTW
						TALENT:139:心情 = 1
					ELSE
						PRINTFORML 「那种程度、是吗……」
						PRINTFORML 「在%CALLNAME:MASTER%阁下看来、就只是那种程度是吗」
						PRINTFORML 「我知道了。那么出发吧」
						PRINTW
						PRINTFORML 典的心情似乎完全被破坏了
						PRINTFORML 典快步的在前面走着……
						TALENT:139:心情 = -1
					ENDIF
				;典との约会が初めて
				ELSE
					PRINTFORML 典生气的鼓着脸颊
					PRINTW
					PRINTFORML 「作为妖怪的我是很在乎顺序这种东西的……内心、一直都很焦躁不安」
					PRINTFORML 「居然让恋人感到不安什么的、%CALLNAME:MASTER%阁下还真是过分呢」
					PRINTW
					PRINTFORML 也许是说了一些牢骚之后舒畅了不少吧、典眉開眼笑地抱住了你的手臂
					PRINTW
					PRINTFORML 「不过、从今往后要多多邀请我哦？」
					PRINTFORML 「值得纪念的第1次……今天要好好享受哦♪」
					PRINTW
				ENDIF
			ELSEIF TALENT:恋慕
				PRINTFORML 「是约会的邀请吗？」
				IF TALENT:MASTER:恋人
					PRINTFORML 「%CALLNAME:MASTER%阁下明明都已经有恋人了……还真是个恶劣的人呢♪」
					PRINTW
					;龍が恋人
					IF TALENT:140:恋人
						PRINTFORML 「把我的主人放到一边真的好吗？　如果被她知道你喜欢身为她部下的我的话……」
						PRINTFORML 「不过、我能收到%CALLNAME:MASTER%阁下的邀请、真的非常開心」
					;文が恋人
					ELSEIF TALENT:29:恋人
						PRINTFORML 「说不定会被射命丸小姐报道成『最渣的出轨混蛋』之类的哦？」
						PRINTFORML 「不过如果真的到那一步的话、典会来安慰你的……%UNICODE(0x2665) *1%」
					;極が恋人
					ELSEIF TALENT:42:恋人
						PRINTFORML 「会被姫海棠小姐用念写给发现也说不定哟？」
						PRINTFORML 「难道说、那正是你所希望的吗？」
					;椛が恋人
					ELSEIF TALENT:65:恋人
						PRINTFORML 「私下幽会的样子、说不定会被用千里眼给看见呢……%UNICODE(0x2665) *1%」
						PRINTFORML 「我反正还是单身、就算被看见也无所谓就是……%UNICODE(0x2665) *1%」
					;それ以外に恋人
					ELSE
						PRINTFORML 「我就算被发现也不会怎么样。但%CALLNAME:MASTER%阁下没关系吗？」
						PRINTFORML 「并不是在责难你。不如说、比起恋人却还是选择了我、真的让我非常開心……%UNICODE(0x2665) *1%」
					ENDIF
					PRINTFORML 「那么、我们就出发吧♪」
					PRINTFORML 典站在%CALLNAME:MASTER%身旁、紧紧地抱着你的手臂
					PRINTFORML 「怎么了？　典现在是%CALLNAME:MASTER%阁下的『恋人』不是吗？」
					PRINTFORML 「那么、也得做出相称的动作……对吧♪」
					PRINTW
				;恋人是ない
				ELSE
					;典以外に恋慕持ちがいる
					IF CMATCH(TALENT:恋慕, 1) > 1
						;天狗勢全員が恋慕持ち
						IF TALENT:140:恋慕 && TALENT:29:恋慕 && TALENT:42:恋慕 && TALENT:65:恋慕
							PRINTFORML 「包括主人在内、明明在被那么多天狗所求爱……这还真是」
							PRINTFORML 「『妖怪之山ー后宫结局』是您的目标吗？」
							PRINTFORML 「不、刚才只是典的自言自语而已」
							PRINTW
							PRINTFORML （我和主人都喜欢上一个麻烦的人、真是讨厌啊……）
							PRINTW
						;龍が恋慕
						ELSEIF TALENT:140:恋慕
							PRINTFORML 「没有邀请饭纲丸大人真的好吗？　我觉得她一定会很高兴的」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTFORML （如果能掌握%CALLNAME:MASTER%阁下的喜好的话、也许主人的恋爱也会变得容易有成果……）
							PRINTW
						;文が恋慕
						ELSEIF TALENT:29:恋慕
							PRINTFORML 「没有邀请射命丸小姐真的好吗？　我觉得她一定会很高兴的」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;極が恋慕
						ELSEIF TALENT:42:恋慕
							PRINTFORML 「没有邀请姫海棠小姐真的好吗？　我觉得可以改善家里蹲的情况哦」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;椛が恋慕
						ELSEIF TALENT:65:恋慕
							PRINTFORML 「没有邀请犬走小姐真的好吗？　因为她很认真、所以才不愿意主动行动啊」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;それ以外に恋慕
						ELSE
							PRINTFORML 「不是有对%CALLNAME:MASTER%阁下寄予了感情的人吗、让我做那个对象真的没问题吗？」
							PRINTFORML 「且慢、刚才是我失言了。请您忘了吧」
							PRINTW
						ENDIF
						PRINTFORML 「不过、选择典作为您的对象、我感到很高兴呢♪」
						PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
						PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
						PRINTW
					;恋慕持ちがいない
					ELSE
						PRINTFORML 「哦呀哦呀、要和我做那么……♪　不过既然你这么说了、我倒也没有觉得不好♪」
						PRINTFORML 「可以哦。我也对约会很感兴趣呢」
						PRINTW
						PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
						PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
						PRINTW
					ENDIF
				ENDIF
			;你に恋人がいる、特定のキャラ（主に天狗勢）から想いを寄せられていると反応が変化
			;陥落素質がないと悪女ムーブ
			ELSE
				PRINTFORML 「是约会的邀请吗？」
				IF TALENT:MASTER:恋人
					PRINTFORML 「%CALLNAME:MASTER%阁下明明都已经有恋人了……还真是个恶劣的人呢♪」
					PRINTW
					;龍が恋人
					IF TALENT:140:恋人
						PRINTFORML 「把我的主人放到一边真的好吗？　如果被她知道你喜欢身为她部下的我的话……」
						PRINTFORML 「不过、我能收到%CALLNAME:MASTER%阁下的邀请、真的非常開心」
					;文が恋人
					ELSEIF TALENT:29:恋人
						PRINTFORML 「说不定会被射命丸小姐报道成『最渣的出轨混蛋』之类的哦？」
						PRINTFORML 「不过如果真的到那一步的话、典会来安慰你的……%UNICODE(0x2665) *1%」
					;極が恋人
					ELSEIF TALENT:42:恋人
						PRINTFORML 「会被姫海棠小姐用念写给发现也说不定哟？」
						PRINTFORML 「难道说、那正是你所希望的吗？」
					;椛が恋人
					ELSEIF TALENT:65:恋人
						PRINTFORML 「私下幽会的样子、说不定会被用千里眼给看见呢……%UNICODE(0x2665) *1%」
						PRINTFORML 「我反正还是单身、就算被看见也无所谓就是……%UNICODE(0x2665) *1%」
					;それ以外に恋人
					ELSE
						PRINTFORML 「我就算被发现也不会怎么样。但%CALLNAME:MASTER%阁下没关系吗？」
						PRINTFORML 「并不是在责难你。不如说、比起恋人却还是选择了我、真的让我非常開心……%UNICODE(0x2665) *1%」
					ENDIF
					PRINTFORML 「那么、我们就出发吧♪」
					PRINTFORML 典站在%CALLNAME:MASTER%身旁、紧紧地抱着你的手臂
					PRINTFORML 「怎么了？　典现在是%CALLNAME:MASTER%阁下的『恋人』不是吗？」
					PRINTFORML 「那么、也得做出相称的动作……对吧♪」
					PRINTW
				;恋人是ない
				ELSE
					;典以外に恋慕持ちがいる
					IF CMATCH(TALENT:恋慕, 1) > 0
						;天狗勢全員が恋慕持ち
						IF TALENT:140:恋慕 && TALENT:29:恋慕 && TALENT:42:恋慕 && TALENT:65:恋慕
							PRINTFORML 「包括主人在内、明明在被那么多天狗所求爱……这还真是」
							PRINTFORML 「没ー事、刚才只是典在自言自语」
							PRINTFORML （主人都感到为难的事情。%CALLNAME:MASTER%阁下也真是、罪孽深重的人阿）
							PRINTW
						;龍が恋慕
						ELSEIF TALENT:140:恋慕
							PRINTFORML 「没有邀请饭纲丸大人真的好吗？　我觉得她一定会很高兴的」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTFORML （如果能掌握%CALLNAME:MASTER%阁下的喜好的话、也许主人的恋爱也会变得容易有成果……）
							PRINTW
						;文が恋慕
						ELSEIF TALENT:29:恋慕
							PRINTFORML 「没有邀请射命丸小姐真的好吗？　我觉得她一定会很高兴的」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;極が恋慕
						ELSEIF TALENT:42:恋慕
							PRINTFORML 「没有邀请姫海棠小姐真的好吗？　我觉得可以改善家里蹲的情况哦」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;椛が恋慕
						ELSEIF TALENT:65:恋慕
							PRINTFORML 「没有邀请犬走小姐真的好吗？　因为她很认真、所以才不愿意主动行动啊」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;それ以外に恋慕
						ELSE
							PRINTFORML 「不是有对%CALLNAME:MASTER%阁下寄予了感情的人吗、让我做那个对象真的没问题吗？」
							PRINTFORML 「且慢、刚才是我失言了。请您忘了吧」
							PRINTW
						ENDIF
						PRINTFORML 「啊ー、难道说、典被选为练习对象了吗？」
						PRINTFORML 「我是在開玩笑。承蒙邀请、我感到很荣幸♪」
						PRINTW
						PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
						PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
						PRINTW
					;恋慕持ちがいない
					ELSE
						PRINTFORML 「哦呀哦呀、要和我做那么……♪　不过既然你这么说了、我倒也没有觉得不好♪」
						PRINTFORML 「可以哦。我也对约会很感兴趣呢」
						PRINTW
						PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
						PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
						PRINTW
					ENDIF
				ENDIF
			ENDIF
			;约会回数フラグ
			CFLAG:1005 += 1
		;２回目以降の约会
		ELSE
			IF TALENT:恋人
				;発情中
				IF TCVAR:発情
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下。今天的约会我有一个必须要去的地方……HPH」","L"
					CALL HPH_PRINT,@"「是要我亲口说出来吗？　你明明知道是什么……HPH」","L"
					PRINTW
					PRINTFORML 典把嘴凑到%CALLNAME:MASTER%的耳朵旁、轻声说道
					CALL HPH_PRINT,@"「是情人旅馆哦、情HPH　人HPH　旅HPH　馆HPH」","L"
					PRINTFORML 典的吐息打在耳朵上……
					PRINTW
					IF TALENT:妊娠願望
						PRINTFORML 「你知道吗？」
						CALL HPH_PRINT,@"「听说在非日常的空间里生育更能提高身体的活力哦……HPH」","L"
						PRINTW
						CALL HPH_PRINT,@"「……HPH」","L"
						CALL HPH_PRINT,@"「你难道、不想让典怀孕吗……HPH」","L"
						PRINTW
					ELSE
						CALL HPH_PRINT,@"「而且、忍耐一会儿会更舒服哦……HPH」","L"
						PRINTW
					ENDIF
					PRINTFORML 「当然、除此之外我也很期待♪」
					CALL HPH_PRINT,@"「今天来好好地亲热一下吧HPH」","L"
					PRINTW
				;発情していない
				ELSE
					;心情が良い
					IF TALENT:139:心情 == 1
						PRINTFORML 典兴高采烈地抱着你的手臂
						PRINTFORML 「觉得我心情很好吗？　这是当然啦♪」
						PRINTW
						PRINTFORML 「与%CALLNAME:MASTER%阁下的约会、对忙碌的典来说是一剂清凉剂」
						PRINTFORML 「当然、再忙也要把约会放在第一位%UNICODE(0x2665) *1%」
						PRINTW
					;心情が悪い
					ELSEIF TALENT:139:心情 == -1
						PRINTFORML 「要去约会吗？　倒也没关系……」
						PRINTFORML 「典也有不舒服的时候。请不要管我」
						PRINTW
						CALL ASK_YN("摸头","放着不管")
						IF !RESULT
							PRINTFORMW 「等一下、别管我啊……」
							PRINTFORMW 「………………」
							PRINTFORML 「真、真是没办法呢……\/\/\/」
							PRINTW
							PRINTFORML 「不知为何、我的心情平静下来了」
							PRINTFORML 「非常感谢。嘸嘸、%CALLNAME:MASTER%阁下的手真温暖呢」
							PRINTFORML 「那么、我们走吧。刚刚用那样冷淡的态度对待你、真是非常抱歉」
							PRINTW
							;心情が回復
							TALENT:139:心情 = 0
						ELSE
							PRINTFORML 「那么、我们就出发吧」
							PRINTW
							PRINTFORML （啊啊、对%CALLNAME:MASTER%阁下采取那种冷淡的态度……）
							PRINTFORML （完全是在迁怒于他啊……典、真的不配当恋人啊）
							PRINTW
						ENDIF
					ELSE
						PRINTFORML 「与%CALLNAME:MASTER%阁下的约会吗……啊啊、典真是个幸福的人啊♪」
						PRINTFORML 「你觉得我在说谎吗？　典可是很诚实的哦♪」
						PRINTFORML 「那么、今天我们去哪里呢♪」
						PRINTW
					ENDIF
				ENDIF
			ELSEIF TALENT:恋慕
				IF TCVAR:発情
					IF TALENT:MASTER:恋人
						PRINTFORML 「%CALLNAME:MASTER%阁下明明都已经有恋人了……还真是个恶劣的人呢♪」
						PRINTW
						;龍が恋人
						IF TALENT:140:恋人
							IF TALENT:140:妊娠
								PRINTFORML 「放着怀有身孕的饭纲丸大人不顾却跑来向典示爱什么的……」
								PRINTFORML 「就算主人再怎么刚强、也会受不了吧？」
								PRINTFORML 「真的可以吗？　今天我可控制不住自己的心情哦……」
							ELSEIF TALENT:140:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「就算饭纲丸大人再怎么刚强、也一定很辛苦吧」
								PRINTFORML 「真的可以吗？　今天我可控制不住自己的心情哦……」
							ELSE
								PRINTFORML 「有饭纲丸大人这样的恋人却跑来向典示爱什么的……」
								PRINTFORML 「真的可以吗？　今天我可控制不住自己的心情哦……」
							ENDIF
						;文が恋人
						ELSEIF TALENT:29:恋人
							IF TALENT:29:妊娠
								PRINTFORML 「放着怀有身孕的射命丸小姐不顾却跑来向典示爱什么的……」
								PRINTFORML 「她其实对你是很死心塌地的哦」
								PRINTFORML 「没问题吗？　今天我可不打算随便就放%CALLNAME:MASTER%阁下走哦？」
							ELSEIF TALENT:29:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「那位在报道上很马虎、但在恋爱上很认真。该怎么说好呢……」
								PRINTFORML 「没问题吗？　今天我可不打算随便就放%CALLNAME:MASTER%阁下走哦？」
							ELSE
								PRINTFORML 「没问题吗？　今天的我、身体可是疼得受不了哦……」
								PRINTFORML 「不会随便放%CALLNAME:MASTER%阁下走的哟？」
							ENDIF
						;極が恋人
						ELSEIF TALENT:42:恋人
							IF TALENT:42:妊娠
								PRINTFORML 「放着怀有身孕的姫海棠小姐不顾却跑来向典示爱什么的……」
								PRINTFORML 「没问题吗？　今天我可不打算随便就放%CALLNAME:MASTER%阁下走哦？」
							ELSEIF TALENT:42:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「虽然看起来很轻浮、但其实她对你的感情很深的哦」
								PRINTFORML 「没问题吗？　今天我可不打算随便就放%CALLNAME:MASTER%阁下走哦？」
							ELSE
								PRINTFORML 「没问题吗？　今天的我、身体可是疼得受不了哦……」
								PRINTFORML 「不会随便放%CALLNAME:MASTER%阁下走的哟？」
							ENDIF
						;椛が恋人
						ELSEIF TALENT:65:恋人
							IF TALENT:65:妊娠
								PRINTFORML 「放着怀有身孕的犬走小姐不顾却跑来向典示爱什么的……」
								PRINTFORML 「她可是个很较真的人。不知道会被她怎么想……」
								PRINTFORML 「没问题吗？　今天我可不打算随便就放%CALLNAME:MASTER%阁下走哦？」
							ELSEIF TALENT:65:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「她能否接受自己全心全意奉仕着的人却跑去和别的女人约会呢？」
								PRINTFORML 「没问题吗？　今天我可不打算随便就放%CALLNAME:MASTER%阁下走哦？」
							ELSE
								PRINTFORML 「没问题吗？　今天的我、身体可是疼得受不了哦……」
								PRINTFORML 「不会随便放%CALLNAME:MASTER%阁下走的哟？」
							ENDIF
						;それ以外に恋人
						ELSE
							PRINTFORML 「我就算被发现也不会怎么样。但%CALLNAME:MASTER%阁下没关系吗？」
							PRINTFORML 「今天的我、身体可是疼得受不了哦……」
							PRINTFORML 「可能会从恋人小姐手中夺走%CALLNAME:MASTER%阁下哟？」
						ENDIF
						CALL HPH_PRINT,@"「那么、我们走吧……HPH」","L"
						PRINTFORML 典站在%CALLNAME:MASTER%身旁、紧紧地抱着你的手臂
						PRINTW
						PRINTFORML 「怎么了？　典现在是%CALLNAME:MASTER%阁下的『恋人』不是吗？」
						PRINTFORML 「那么、也得做出相称的动作……对吧♪」
						PRINTW
					;恋人是ない
					ELSE
						;典以外に恋慕持ちがいる
						IF CMATCH(TALENT:恋慕, 1) > 1
							;天狗勢全員が恋慕持ち
							IF TALENT:140:恋慕 && TALENT:29:恋慕 && TALENT:42:恋慕 && TALENT:65:恋慕
								PRINTFORML 「包括主人在内、明明在被那么多天狗所求爱……这还真是」
								PRINTFORML 「『妖怪之山ー后宫结局』是您的目标吗？」
								PRINTFORML 「不、刚才只是典的自言自语而已」
								PRINTW
								PRINTFORML （我和主人都喜欢上一个麻烦的人、真是讨厌啊……）
								PRINTW
							;龍が恋慕
							ELSEIF TALENT:140:恋慕
								PRINTFORML 「没有邀请饭纲丸大人真的好吗？　我觉得她一定会很高兴的」
								PRINTFORML 「哎呀、刚才只是典在自言自语」
								PRINTFORML （如果能掌握%CALLNAME:MASTER%阁下的喜好的话、也许主人的恋爱也会变得容易有成果……）
								PRINTW
							;文が恋慕
							ELSEIF TALENT:29:恋慕
								PRINTFORML 「没有邀请射命丸小姐真的好吗？　我觉得她一定会很高兴的」
								PRINTFORML 「哎呀、刚才只是典在自言自语」
								PRINTW
							;極が恋慕
							ELSEIF TALENT:42:恋慕
								PRINTFORML 「没有邀请姫海棠小姐真的好吗？　我觉得可以改善家里蹲的情况哦」
								PRINTFORML 「哎呀、刚才只是典在自言自语」
								PRINTW
							;椛が恋慕
							ELSEIF TALENT:65:恋慕
								PRINTFORML 「没有邀请犬走小姐真的好吗？　因为她很认真、所以才不愿意主动行动啊」
								PRINTFORML 「哎呀、刚才只是典在自言自语」
								PRINTW
							;それ以外に恋慕
							ELSE
								PRINTFORML 「不是有对%CALLNAME:MASTER%阁下寄予了感情的人吗、让我做那个对象真的没问题吗？」
								PRINTFORML 「且慢、刚才是我失言了。请您忘了吧」
								PRINTW
							ENDIF
							PRINTFORML 「不过、选择典作为您的对象、我感到很高兴呢♪」
							PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
							PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
							PRINTW
						;恋慕持ちがいない
						ELSE
							PRINTFORML 「哦呀哦呀、要和我做那么……♪　不过既然你这么说了、我倒也没有觉得不好♪」
							PRINTFORML 「可以哦。我也对约会很感兴趣呢」
							PRINTW
							PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
							PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
							PRINTW
						ENDIF
					ENDIF
				;発情していない
				ELSE
					IF TALENT:MASTER:恋人
						PRINTFORML 「%CALLNAME:MASTER%阁下明明都已经有恋人了……还真是个恶劣的人呢♪」
						PRINTW
						;龍が恋人
						IF TALENT:140:恋人
							IF TALENT:140:妊娠
								PRINTFORML 「放着怀有身孕的饭纲丸大人不顾却跑来向典示爱什么的……」
								PRINTFORML 「对我来说、也有点不太感兴趣啊……」
							ELSEIF TALENT:140:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「真的、真的是个糟糕的人呢……」
							ELSE
								PRINTFORML 「有饭纲丸大人这样的恋人却跑来向典示爱什么的……」
								PRINTFORML 「这样真的好么？　我也、一直对您……」
							ENDIF
						;文が恋人
						ELSEIF TALENT:29:恋人
							IF TALENT:29:妊娠
								PRINTFORML 「放着怀有身孕的射命丸小姐不顾却跑来向典示爱什么的……」
								PRINTFORML 「真的没问题吗？　偷偷去和别的女人约会什么的」
							ELSEIF TALENT:29:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「我爱的人、可真是个无赖啊……」
								PRINTFORML 「不过、我也是这样的存在呢……♪」
							ELSE
								PRINTFORML 「这样真的好么？　对方不是射命丸小姐什么的」
								PRINTFORML 「典可能会从射命丸小姐手中夺走%CALLNAME:MASTER%阁下的哦？」
							ENDIF
						;極が恋人
						ELSEIF TALENT:42:恋人
							IF TALENT:42:妊娠
								PRINTFORML 「放着怀有身孕的姫海棠小姐不顾却跑来向典示爱什么的……」
								PRINTFORML 「%CALLNAME:MASTER%阁下这可是在搞不正当的男女关系哟……♪」
							ELSEIF TALENT:42:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「啊啊、真是个过分的人」
								PRINTFORML 「不过、无法拒绝您的邀请的我、也是个过分的女人呢……♪」
							ELSE
								PRINTFORML 「这样真的好么？　对方不是姫海棠小姐什么的」
								PRINTFORML 「典可能会从姫海棠小姐手中夺走%CALLNAME:MASTER%阁下的哦？」
							ENDIF
						;椛が恋人
						ELSEIF TALENT:65:恋人
							IF TALENT:65:妊娠
								PRINTFORML 「放着怀有身孕的犬走小姐不顾却跑来向典示爱什么的……」
								PRINTFORML 「她要是知道了、一定会为之叹息吧」
							ELSEIF TALENT:65:育児中
								PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
								PRINTFORML 「我只是被邀请了而已。选择了我的终究还是%CALLNAME:MASTER%阁下自己♪」
							ELSE
								PRINTFORML 「这样真的好么？　放着恋人不顾、却对典投入了这么多精力……」
								PRINTFORML 「我真的会、认真起来的哦……？」
							ENDIF
						;それ以外に恋人
						ELSE
							PRINTFORML 「明明有恋人、却还要来勾引典……真的是个很过分的人」
							PRINTFORML 「典不会拒绝的。如果%CALLNAME:MASTER%阁下期望如此的话」
						ENDIF
						CALL HPH_PRINT,@"「那么、我们走吧……HPH」","L"
						PRINTFORML 典站在%CALLNAME:MASTER%身旁、紧紧地抱着你的手臂
						PRINTW
						PRINTFORML 「怎么了？　典现在是%CALLNAME:MASTER%阁下的『恋人』不是吗？」
						PRINTFORML 「那么、也得做出相称的动作……对吧♪」
						PRINTW
					;恋人是ない
					ELSE
						;典以外に恋慕持ちがいる
						IF CMATCH(TALENT:恋慕, 1) > 1
							;天狗勢全員が恋慕持ち
							IF TALENT:140:恋慕 && TALENT:29:恋慕 && TALENT:42:恋慕 && TALENT:65:恋慕
								PRINTFORML 「啊啦、要邀请我去约会吗、我可以期待吗？」
								PRINTFORML 「典也想成为%CALLNAME:MASTER%阁下的恋人的候选人呢♪」
								PRINTW
							;龍が恋慕
							ELSEIF TALENT:140:恋慕
								IF EXP:139:約會経験 < EXP:140:約會経験
									PRINTFORML 「啊啦、今天让我来没问题吗？」
									PRINTFORML 「本来还以为%CALLNAME:MASTER%阁下、对饭纲丸大人……」
									PRINTW
									PRINTFORML 「哎呀、刚才只是典在自言自语」
									PRINTFORML （主人是情敌什么的、真的是很复杂啊……）
									PRINTW
								ELSE
									PRINTFORML 「你要邀请我去约会吗？　我很高兴呢♪」
									PRINTFORML 「一点也不夸张。我就是这么高兴♪」
									PRINTFORML （太好了、好像还没有选择主人……真是复杂啊）
									PRINTW
								ENDIF
							;文が恋慕
							ELSEIF TALENT:29:恋慕
								PRINTFORML 「啊啦、今天不是射命丸小姐而是选择了我吗？」
								PRINTFORML 「没有没有、很高兴您能邀请我」
								PRINTFORML （我似乎还有可能性呢……♪）
								PRINTW
							;極が恋慕
							ELSEIF TALENT:42:恋慕
								PRINTFORML 「啊啦啊啦、难道是被姫海棠小姐甩了吗？」
								PRINTFORML 「不是吗、只是想邀请我而已吗……」
								PRINTFORML 「哦哦、是这样啊、是这样啊♪　原来如此、原来如此♪」
								PRINTW
							;椛が恋慕
							ELSEIF TALENT:65:恋慕
								PRINTFORML 「没有邀请犬走小姐真的好吗？」
								PRINTFORML 「最近、你们看起来关系很好呢……邀请我真的好么」
								PRINTFORML 「既然都这样邀请我了、我怎么可能会拒绝呢♪　我很高兴接受您的邀请哦♪」
								PRINTW
							;それ以外に恋慕
							ELSE
								PRINTFORML 「啊咧、你要选我做约会对象吗？」
								PRINTFORML 「好開心♪　我很高兴接受您的邀请哦♪」
								PRINTW
							ENDIF
							PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
							PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
							PRINTW
						;恋慕持ちがいない
						ELSE
							PRINTFORML 「难道除了典之外、没有其他女人可以陪你吗？」
							PRINTFORML 「没办法啊♪　正好、典现在有空」
							PRINTFORML 「如果是%CALLNAME:MASTER%阁下的请求的话、那当然是不会拒绝的♪」
							PRINTW
							PRINTFORML 典一边说着“没办法”“没办法”、一边呼呼地摇着尾巴
							PRINTW
							PRINTFORML 典站在%CALLNAME:MASTER%身旁、紧紧地抱着你的手臂
							PRINTFORML 「咱们走吧♪」
							PRINTW
						ENDIF
					ENDIF
				ENDIF
			;恋慕、恋人素質無
			ELSE
				IF TALENT:MASTER:恋人
					PRINTFORML 「%CALLNAME:MASTER%阁下明明都已经有恋人了……还真是个恶劣的人呢♪」
					PRINTW
					;龍が恋人
					IF TALENT:140:恋人
						IF TALENT:140:妊娠
							PRINTFORML 「放着怀有身孕的饭纲丸大人不顾却跑来向典示爱什么的……」
							PRINTFORML 「难道主人现在无法满足%CALLNAME:MASTER%阁下吗？」
							CALL HPH_PRINT,@"「那么、让典来安慰你吧HPH」","L"
							PRINTW
						ELSEIF TALENT:140:育児中
							PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
							PRINTFORML 「话虽如此、但因为忙于养育孩子、也积累了不少不满吧」
							PRINTFORML 「典很乐意倾听%CALLNAME:MASTER%阁下的牢骚哦」
							PRINTW
						ELSE
							PRINTFORML 「你和饭纲丸大人关系不好吗？」
							PRINTFORML 「如果可以的话、让典来安慰你吧」
							PRINTW
						ENDIF
					;文が恋人
					ELSEIF TALENT:29:恋人
						IF TALENT:29:妊娠
							PRINTFORML 「放着怀有身孕的射命丸小姐不顾却跑来向典示爱什么的……」
							PRINTFORML 「难道是对晚上的活动不满意吗？」
							PRINTFORML 「如果可以的话、就让典来和你谈谈吧」
						ELSEIF TALENT:29:育児中
							PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
							PRINTFORML 「话虽如此、育儿累了、寻求治愈也是没办法的事吧」
							PRINTFORML 「如果可以的话、请让我听听你的牢骚」
						ELSE
							PRINTFORML 「这样真的好么？　对方不是射命丸小姐什么的」
							PRINTFORML 「如果进展不顺利的话、可以和典谈谈哦」
						ENDIF
					;極が恋人
					ELSEIF TALENT:42:恋人
						IF TALENT:42:妊娠
							PRINTFORML 「放着怀有身孕的姫海棠小姐不顾却跑来向典示爱什么的……」
							PRINTFORML 「是不是有什么痛苦的事情？」
							PRINTFORML 「典可以陪你哦。是的、哪怕是一整晚……♪」
						ELSEIF TALENT:42:育児中
							PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
							PRINTFORML 「话虽如此、育儿也需要消遣消遣啊」
							PRINTFORML 「如果你愿意的话、就让典来陪你一整天吧」
						ELSE
							PRINTFORML 「这样真的好么？　对方不是姫海棠小姐什么的」
							PRINTFORML 「即使是心爱的对象、偶尔也会想要摆脱束缚吧」
							PRINTFORML 「如果可以的话、让典来陪你散散心吧」
						ENDIF
					;椛が恋人
					ELSEIF TALENT:65:恋人
						IF TALENT:65:妊娠
							PRINTFORML 「放着怀有身孕的犬走小姐不顾却跑来向典示爱什么的……」
							PRINTFORML 「难道说、她不能陪你吗？」
							PRINTFORML 「可怜的%CALLNAME:MASTER%阁下。如果你觉得典合适的话、就让我来陪你说说话吧」
						ELSEIF TALENT:65:育児中
							PRINTFORML 「把心爱的孩子和女人抛在脑后却跑来向典示爱什么的……」
							PRINTFORML 「因为忙于育儿、所以也想要自由的时间对吧。来和我一起散散心吧？」
						ELSE
							PRINTFORML 「这样真的好么？　对方不是犬走小姐什么的」
							PRINTFORML 「偶尔也想和别的女人交往。是不是那样的感觉呢？」
						ENDIF
					;それ以外に恋人
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「嘸嘸、忘不了与典的约会吗？」
							PRINTFORML 「我很荣幸♪」
						CASE 1
							PRINTFORML 「今天选择典作为约会的对象吗、我很荣幸♪」
							PRINTFORML 「我暗暗着期待您一定会再次邀请我……%UNICODE(0x2665) *1%」
						CASE 2
							PRINTFORML 「啊啦啊啦、%CALLNAME:MASTER%阁下明明都已经有恋人了……」
							PRINTFORML 「典很高兴哦？　因为你选择了我而不是最重要的人……♪」
						ENDSELECT
					ENDIF
					CALL HPH_PRINT,@"「那么、我们走吧……HPH」","L"
					PRINTFORML 典站在%CALLNAME:MASTER%身旁、紧紧地抱着你的手臂
					PRINTW
					PRINTFORML 「怎么了？　典现在是%CALLNAME:MASTER%阁下的『恋人』不是吗？」
					PRINTFORML 「那么、也得做出相称的动作……对吧♪」
					PRINTW
				;恋人是ない
				ELSE
					;典以外に恋慕持ちがいる
					IF CMATCH(TALENT:恋慕, 1) > 0
						;天狗勢全員が恋慕持ち
						IF TALENT:140:恋慕 && TALENT:29:恋慕 && TALENT:42:恋慕 && TALENT:65:恋慕
							PRINTFORML 「啊咧、你居然不顾那些魅力四射的天狗而选择了我……」
							PRINTFORML 「典很期待接下来的约会呢……%UNICODE(0x2665) *1%」
							PRINTW
						;龍が恋慕
						ELSEIF TALENT:140:恋慕
							PRINTFORML 「啊啦啊啦、饭纲丸大人被放着不顾、可真是罪过啊……♪」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;文が恋慕
						ELSEIF TALENT:29:恋慕
							PRINTFORML 「之后也许会被射命丸小姐盯上呢……♪」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;極が恋慕
						ELSEIF TALENT:42:恋慕
							PRINTFORML 「姬海棠小姐那边不要紧吗？」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;椛が恋慕
						ELSEIF TALENT:65:恋慕
							PRINTFORML 「犬走小姐也太可怜了。因为她思念的人正沉溺于我呢」
							PRINTFORML 「哎呀、刚才只是典在自言自语」
							PRINTW
						;それ以外に恋慕
						ELSE
							PRINTFORML 「不是有对%CALLNAME:MASTER%阁下寄予了感情的人吗、让我做那个对象真的没问题吗？」
							PRINTFORML 「且慢、刚才是我失言了。请您忘了吧」
							PRINTW
						ENDIF
						PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
						PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
						PRINTW
					;恋慕持ちがいない
					ELSE
						IF TALENT:思慕
							SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「嗯嗯、啊。当然没问题、请允许我和您一起」
								PRINTFORML 「我看起来很高兴吗？　嘸嘸、既然%CALLNAME:MASTER%阁下这么说的话、那就是这样吧♪」
							CASE 1
								PRINTFORML 「虽然知道你很自负、但我觉得你今天应该会邀请我的♪」
								PRINTFORML 「来、我们走吧♪」
							ENDSELECT
						ELSE
							PRINTFORML 「你要邀请我去约会吗？　我很高兴呢♪」
							PRINTFORML 典紧紧依偎在%CALLNAME:MASTER%的身旁
							PRINTFORML 「嘸嘸、很期待呢♪　那么、快点開始吧」
							PRINTW
						ENDIF
					ENDIF
				ENDIF
			ENDIF
			CFLAG:1005 += 1
		ENDIF
	;TARGET以外と约会
	ELSEIF CFLAG:MASTER:同行
		IF TALENT:恋人
			;心情不快、またはブチギレ状態
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				;龍が恋慕
				IF TALENT:140:恋慕
					;你が龍に好意？
					IF CFLAG:1004  == 1
						PRINTFORML 「嘛ー、%CALLNAME:MASTER%阁下、还挺为主人着想的嘛」
						PRINTFORML 「哎呀、刚才只是典在自言自语」
						PRINTFORML 「饭纲丸大人也不要介意。真是太好了呢。能和心爱的人一起出门♪」
						PRINTW
						PRINTFORML 典笑眯眯地目送你远去、但你却感到一股无法抑制的毛骨悚然的感觉……
						PRINTW
					ELSE
						PRINTFORML 「饭纲丸大人、请等一下、您的表情是不是有些不成体统？」
						PRINTFORML 「%CALLNAME:MASTER%阁下就更过分了。一脸色眯眯的的表情」
						PRINTFORML 「不必告诉我是谁邀请的。我不感兴趣」
						PRINTFORML 「那么、两位请走好」
						PRINTFORML 在目送你们离開之前、典连看都没看你们一眼……
					ENDIF
				;文が恋慕
				ELSEIF TALENT:29:恋慕
					PRINTFORML 「啊啦啊啦、都有我这样的恋人了、还能光明正大地和射命丸小姐见面吗？」
					PRINTFORML 「射命丸小姐、请多多关照我的『丈夫』♪」
					PRINTFORML 典面带微笑、目送二人离去……
					PRINTW
				;極が恋慕
				ELSEIF TALENT:42:恋慕
					PRINTFORML 「姬海棠小姐、平时总是闭门不出、但是和%CALLNAME:MASTER%阁下的幽会行动却很迅速呢♪」
					PRINTFORML 「嘛嘛、脚步那么轻快的话爬到其他人床上的动作肯定也很轻快吧♪」
					PRINTFORML 典说的话、很明显也刺向了%CALLNAME:MASTER%……
					PRINTW
				;椛が恋慕
				ELSEIF TALENT:65:恋慕
					PRINTFORML 「犬走小姐、我还以为你是个很认真的人呢、没想到却是个与我的恋人偷偷幽会的人……♪」
					PRINTFORML 「干脆把犬走改名为色走如何？　很适合你哦？」
					PRINTFORML 典说着比平时更恶毒的话、目送两人离去……
					PRINTW
				;それ以外のキャラと逢引き
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「嗯、如果你对对方有好感的话、我怎么样都无所谓……」
						PRINTFORML 「是啊、毕竟典是%CALLNAME:MASTER%阁下的恋人、但%CALLNAME:MASTER%阁下却不属于任何人」
						PRINTFORML 「路上小心。请慢慢享受吧♪」
						PRINTW
					CASE 1
						PRINTFORML 「表情很可怕吗？　真讨厌、说女孩子的表情可怕什么的」
						PRINTFORML 「是不是因为做了什么亏心事、所以才会这么说？」
						PRINTFORML 「典和往常一样哦。嗯嗯。一路顺风♪」
						PRINTW
					CASE 2
						PRINTFORML 「抛開我、和其他人……」
						PRINTFORML 「回来之后、有必要好好收拾你一顿呢……」
						PRINTFORML 典用危险的眼神目送着%CALLNAME:MASTER%等人离開……
						PRINTW
					ENDSELECT
				ENDIF
			ELSE
				IF TALENT:139:妊娠
					PRINTFORML 「对除了怀有身孕的我来说、%CALLNAME:MASTER%阁下还真是一副人模狗样呢」
					PRINTFORML 「没关系的。典是个通情达理的女人。一路顺风」
					PRINTFORML 典这么说着、目送你离開的眼神里却没有一丝笑意……
					PRINTW
				ELSEIF TALENT:139:育児中
					PRINTFORML 「抛下%CHILDNAME:139:(TALENT:TARGET:育児中)%和我不顾、%CALLNAME:MASTER%阁下就这样出去了吗」
					PRINTFORML 「%CHILDNAME:139:(TALENT:TARGET:育児中)%、那就是所谓的反面教材」
					PRINTFORML 「母亲被父亲抛弃了。请安慰我吧。呜呜呜……」
					PRINTFORML 不早点回来的话、就会对孩子灌输一些凭空捏造的东西……
					PRINTW
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「我不打算束缚%CALLNAME:MASTER%阁下……」
						PRINTFORML 「但我也知道、在恋人的面前正大光明的搞幽会是一种什么样的行为……」
						PRINTW
					CASE 1
{
						IF GROUPMATCH(FLAG:约会的对象, [[魅魔]], [[藍]], [[紫]], [[神奈子]], [[衣玖]], [[阿空]], [[小傘]], [[華扇]],
						[[明羅]], [[白蓮]], [[美鈴]], [[小悪魔]], [[影狼]], [[勇儀]], [[幽幽子]], [[幽香]], [[永琳]], [[蕾蒂]], [[小町]],
						[[穣子]], [[梅莉]], [[山女]], [[一輪]], [[屠自古]], [[弁弁]], [[雷鼓]], [[豊姫]], [[神綺]], [[夢子]], [[舞]],
						[[純狐]], [[艾麗]], [[合歡乃]], [[潤美]], [[美宵]])
 }
 							PRINTFORML 「只靠胸部来衡量女人的魅力、真是太肤浅了……」
 							PRINTFORML 「矜持才是女人的魅力所在」
 						ENDIF

 						;ねこみみ
 						;阿吽は犬なのか猫なのか
 						IF GROUPMATCH(FLAG:约会的对象, [[橙]], [[阿燐]], [[三花]])
 							PRINTFORML 「猫耳到底有什么好的……狐耳才是至高无上的吧」
 						ENDIF

 						;いぬみみ
 						IF GROUPMATCH(FLAG:约会的对象,  [[椛]], [[響子]], [[猯藏]])
 							PRINTFORML 「选择了狗耳、看来%CALLNAME:MASTER%阁下的品位不错啊……」
 							PRINTFORML 「嘛、我还是特别原谅你吧」
 						ENDIF

 						;きつねみみ
 						IF GROUPMATCH(FLAG:约会的对象, [[藍]])
 							PRINTFORML 「唔呣……在笼络他人的方法上、对方占压倒性优势……」
 							PRINTFORML 「之后再偷偷跟踪比较好……」
 						ENDIF

						;ねずみみ
 						IF GROUPMATCH(FLAG:约会的对象, [[納茲琳]])
 							PRINTFORML 「你喜欢圆圆的耳朵吗？　现在是尖尖的耳朵的时代了」
 						ENDIF

 						;うさみみ
 						IF GROUPMATCH(FLAG:约会的对象, [[鈴仙]], [[帝]], [[鈴仙二號]], [[清蘭]], [[鈴瑚]])
 							PRINTFORML 「万年发情期的兔子真没品啊」
 							PRINTFORML 「而且那对兔耳、也不是所有人的都是真的……」
 						ENDIF
					CASE 2
						PRINTFORML 「还是那么喜欢玩弄女人啊」
						PRINTFORML 「如果你厌倦了就回来吧」
						PRINTFORML 典以惊讶的表情目送着%CALLNAME:MASTER%离開……
						PRINTW
					ENDSELECT
				ENDIF
			ENDIF
		ELSEIF TALENT:恋慕
				;龍が恋慕
				IF TALENT:140:恋慕
					;你が龍に好意？
					IF CFLAG:1004  == 1
						;典より先に龍が恋慕
						IF CFLAG:1000 == 1
							SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「那种事……我哪有可乘之机……」
								PRINTFORML 「啊……我为什么也会喜欢上那样的人呢……」
								PRINTW
							CASE 1
								PRINTFORML 「饭纲丸大人、你的表情现在很有女人味哦」
								PRINTFORML 「啊、嘴一不留神就……我失礼了」
								PRINTW
								PRINTFORML 「……虽说很般配、但送走看起来很開心的两个人还是很痛苦呢」
								PRINTW
							ENDSELECT
						;典の後に龍が恋慕
						ELSEIF CFLAG:1001 == 1
							IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
								PRINTFORML 「为什么你和饭纲丸大人幽会要经过我的许可呢？」
								PRINTFORML 「我们又不是恋人」
								PRINTFORML 「……你快去不就好了吗」
								PRINTW
								PRINTFORML 「……呜。明明是我先来的……」
								PRINTW
							ELSE
								PRINTFORML 「两位请走好」
								PRINTFORML 「……我没有挽留你们的权力」
								PRINTW
							ENDIF
						ENDIF
					ELSE
						IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
							PRINTFORML 「饭纲丸大人、请等一下、您的表情是不是有些不成体统？」
							PRINTFORML 「%CALLNAME:MASTER%阁下就更过分了。一脸色眯眯的的表情」
							PRINTFORML 「不必告诉我是谁邀请的。我不感兴趣」
							PRINTFORML 「那么、两位请走好」
							PRINTFORML 在目送你们离開之前、典连看都没看你们一眼……
							PRINTW
						ELSE
							PRINTFORML 「两位请走好」
							PRINTFORML 「……真好啊、饭纲丸大人……」
							PRINTW
						ENDIF
					ENDIF
				;文が恋慕
				ELSEIF TALENT:29:恋慕
					PRINTFORML 「啊啦啊啦、都有我这样的恋人了、还能光明正大地和射命丸小姐见面吗？」
					PRINTFORML 「射命丸小姐、请多多关照我的『丈夫』♪」
					PRINTFORML 典面带微笑、目送二人离去……
					PRINTW
				;極が恋慕
				ELSEIF TALENT:42:恋慕
					PRINTFORML 「姬海棠小姐、平时总是闭门不出、但是和%CALLNAME:MASTER%阁下的幽会行动却很迅速呢♪」
					PRINTFORML 「嘛嘛、脚步那么轻快的话爬到其他人床上的动作肯定也很轻快吧♪」
					PRINTFORML 典说的话、很明显也刺向了%CALLNAME:MASTER%……
					PRINTW
				;椛が恋慕
				ELSEIF TALENT:65:恋慕
					PRINTFORML 「犬走小姐、我还以为你是个很认真的人呢、没想到却是个与我的恋人偷偷幽会的人……♪」
					PRINTFORML 「干脆把犬走改名为色走如何？　很适合你哦？」
					PRINTFORML 典说着比平时更恶毒的话、目送两人离去……
					PRINTW
				;それ以外のキャラと逢引き
				ELSE
				ENDIF
		ELSEIF TALENT:思慕
		ELSE
		ENDIF
	;お出かけお見送り
	ELSE
		IF TALENT:恋人
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「……我会做好饭等你回来。请不要太晚」
					PRINTFORML 虽然她的语气听起来很公事公办、但典还是为你送行了
				CASE 1
					PRINTFORML 「………………」
					PRINTFORML 典把头扭到一边去了
				ENDSELECT
				PRINTW
			ELSE
				IF TCVAR:発情
					SELECTCASE RAND:2
					CASE 0
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、今天不出去也行哦……HPH」","L"
						CALL HPH_PRINT,@"「你不早点回来的话、我就要一个人做了……HPH」","L"
						PRINTW
					CASE 1
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、请早点回来……HPH」","L"
						PRINTFORML 典以热切的表情对%CALLNAME:MASTER%耳语道
						CALL HPH_PRINT,@"「是的……今天是典的『那个日子』哦HPH」","L"
						PRINTW
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「……我会做好饭等你回来。请不要太晚」
						PRINTFORML 虽然她的语气听起来很公事公办、但典还是为你送行了
						PRINTW
					CASE 1
						PRINTFORML 「请慢走。路上小心」
						PRINTFORML 临出门时、典轻轻吻了你的脸颊
						PRINTW
					CASE 2
						PRINTFORML 「路上小心、%CALLNAME:MASTER%阁下」
						PRINTFORML 「啊！　如果你要去人类之里的话……想让你买点稻荷寿司回来…啊」
						PRINTW
					ENDSELECT
				ENDIF
			ENDIF
		ELSEIF TALENT:恋慕
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「……因为我们不是恋人。所以不和我打声招呼也没关系」
				CASE 1
					PRINTFORML 「………………」
					PRINTFORML 典把头扭到一边去了
				ENDSELECT
				PRINTW
			ELSE
				IF TCVAR:発情
				ELSE
				ENDIF
			ENDIF
		ELSE
			IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
				IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
					PRINTFORML （那孩子去哪儿和我无关）
					PRINTFORML （……不过、我会监视一下、看看有没有危险）
				ELSE
					SELECTCASE RAND:2
					CASE 0
						PRINTFORML （啊、看到了我不想看到的人）
					CASE 1
						PRINTFORML 「…………」
						PRINTFORML （那家伙要去哪里？）
					ENDSELECT
				ENDIF
			ELSE
				IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「去的时候要小心哦？　有没有忘记要带的东西？　记得要在天黑之前回来哦」
						PRINTFORML 「『不要说那种像妈妈的话』？　你刚刚是叫姐姐妈妈了吗？」
					CASE 1
						PRINTFORML 「就这样丢下姐姐、真的好寂寞啊～」
					CASE 2
						PRINTFORML 「姐姐也一起去不行吗♪　欸、不行？　啊啊唔、不行啊」
					ENDSELECT
					PRINTW
				ELSE
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「期待您为我带的礼物哦～♪」
					CASE 1
						PRINTFORML 「请慢走～♪」
						PRINTFORML （啊啦、要去哪里呢…）
					CASE 2
						PRINTFORML 「啊啦啊啦、您要去哪里？」
					ENDSELECT
				ENDIF
			ENDIF
			PRINTW
		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_K139_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止
	IF FLAG:70
		RETURN 1
	;睡眠中
	ELSEIF CFLAG:睡眠 == 1
		RETURN 1
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			;野外掃除
			IF OUTROOF(CFLAG:TARGET:現在位置)
				;季節で変化
				SELECTCASE DAY:2
					;春
					CASE 1
						IF CFLAG:MASTER:現在位置 == 白玉楼庭 || CFLAG:MASTER:現在位置 == 白玉楼
							PRINTFORML 「真是漂亮啊。连典都不自觉地看入迷了呢」
							IF TFLAG:194 >= 2
								PRINTFORML 「如果没有这一大堆樱花花瓣的话……」
								PRINTFORML 典有些不耐烦地挥动着扫帚
								PRINTW
							ELSE
								PRINTFORML 「终于快要扫完了」
								SELECTCASE RAND:2
								CASE 0
									PRINTFORML 「嗯？　您怎么了？　哇啊啊\/\/\/」
									PRINTFORML 「啊……原来是樱花的花瓣吗……非常感谢」
									PRINTW
								CASE 1
									PRINTFORML 「啊、%CALLNAME:MASTER%阁下、请不要动」
									PRINTFORML 典的嘴唇靠近你的脸──
									PRINTFORML 「好的、拿下来了♪　那个、怎么了吗？」
									PRINTW
								ENDSELECT
							ENDIF
						;妖怪之山（山頂）、天狗のテリトリー周辺
						ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 801, 802, 803, 805, 806)
							;龍が恋人
							IF TALENT:140:恋人
								PRINTFORML 「你这种让山顶变美的姿态、我想你的恋人饭纲丸大人一定也会很佩服的」
								PRINTFORML 「典也会帮忙的、好好打扫吧」
								PRINTW
								PRINTFORML （只要有借口……我就可以待在%CALLNAME:MASTER%阁下的身旁）
								PRINTFORML （珍惜这个时间吧）
								PRINTW
							;龍が恋慕
							ELSEIF TALENT:140:恋慕
								PRINTFORML 「如果你拼命努力的话、饭纲丸大人以后说不定会表扬你呢？」
								;龍に好意？
								IF CFLAG:139:1004 == 1
									CALL ASK_YN("那样的话我会很高兴","希望典也表扬一下我")
									IF !RESULT
										PRINTFORML 「嘸嘸、那就鼓足干劲加油吧。典也会帮忙的」
										PRINTFORML （你们俩果然是……）
										PRINTW
									ELSE
										PRINTFORML 「我？　我不认为会让你很高兴……」
										PRINTFORML 「那么……%CALLNAME:MASTER%、了不起、真是了不起%UNICODE(0x2665) *1%」
										PRINTFORML 「……果然、不适合自己的事就不要做啊\/\/\/」
										PRINTW
									ENDIF
								;好意を典に仄めかしていない
								ELSE
									CALL ASK_YN("为什么？","希望典也表扬一下我")
									IF !RESULT
										PRINTFORML 「呼呼、为什么呢♪」
										PRINTW
									ELSE
										PRINTFORML 「啊、要我来吗？」
										PRINTFORML 「嗯ー……%CALLNAME:MASTER%、了不起、真是了不起%UNICODE(0x2665) *1%」
										PRINTFORML 「如果你能高兴起来的话、典也会感到很幸福呢♪」
										PRINTW
									ENDIF
								ENDIF
							ELSE
								PRINTFORML 「真是用心啊♪　饭纲丸大人对你的印象也许会变好」
								PRINTW
							ENDIF
						ELSE
							SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「雪一融化、地面就会变脏、这可不好办啊」
								PRINTFORML 「如果垃圾和泥土混在一起、那就太糟糕了……」
								PRINTW
							CASE 1
								PRINTFORML 「天气明显变暖了呢」
								PRINTFORML 「和扫雪相比、这不是什么重体力劳动、所以很轻松」
								PRINTW
							ENDSELECT
						ENDIF
					;夏
					CASE 2
						;水場周辺。微妙におかしいチョイスもまじっているかも
						IF GROUPMATCH(CFLAG:MASTER:現在位置, 347, 703, 708, 735, 806, 814)
							PRINTFORML 「天气这么热、你还真努力啊」
							PRINTFORML 「要不要适当地洗个澡？　说不定还能看见典有失体统的身姿哦♪」
							PRINTW
						ELSE
							PRINTFORML 「啊……好热……」
							PRINTFORML 衣服汗湿了典的身体、露出瘦削的轮廓
							PRINTW
						ENDIF
					;秋は落ち葉掃き(という想定)
					CASE 3
						;妖怪之山周辺
						IF GROUPMATCH(CFLAG:MASTER:現在位置, 801, 802, 803, 805, 806)
							PRINTFORML 「山上的落叶果然很厉害啊」
							;龍が恋人
							IF TALENT:140:恋人
								PRINTFORML 「你这么努力打扫、是因为可能会被饭纲丸大人看见吗？」
								PRINTFORML 「開个玩笑♪　那么、我们分头行动、尽快完成吧」
								PRINTW
							;龍が恋慕
							ELSEIF TALENT:140:恋慕
								PRINTFORML 「努力的话、饭纲丸大人说不定会请我们吃大麦饭呢♪」
								;龍に好意？
								IF CFLAG:139:1004 == 1
									PRINTFORML 「啊ー、好像很期待的样子呢」
									PRINTFORML 「和我的稲荷寿司相比哪个让你更開心？　呼呼、我是在開玩笑的♪」
									PRINTFORML （大概、%CALLNAME:MASTER%阁下会说更喜欢饭纲丸大人的麦饭吧……）
									PRINTW
								ELSE
									PRINTFORML 「是的、我也很喜欢饭纲丸大人做的麦饭♪」
									PRINTFORML （饭纲丸大人和我虽然是情敌、但敬爱之心不会改变」
									PRINTW
								ENDIF
								PRINTW
							ELSE
								;山頂は神奈子
								PRINTFORML 「两个人努力打扫、待会儿饭纲丸大人会表扬你的吧♪」
								PRINTFORML 「说起来、表扬你的是八坂大人？　还有工资拿？　是这样吗？」
								PRINTW
							ENDIF
						ELSE
							SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「啊、我在那里发现了木通」
								PRINTFORML 「扫除完之后就拿那个当点心吧♪」
								PRINTW
							CASE 1
								PRINTFORML 「%CALLNAME:MASTER%阁下。收集落叶来烤白薯如何？」
								PRINTFORML 「如果你决定了、就分头收集树叶吧♪」
								PRINTW
							CASE 2
								PRINTFORML 「秋意已浓啊」
								PRINTFORML 「太晚了气温会很冷。快点结束吧」
								PRINTW
							ENDSELECT
						ENDIF
					;冬は扫雪
					CASE 4
						;積雪量（上から大）
						SELECTCASE TFLAG:194
						CASE 3
							SELECTCASE RAND:2
							CASE 0
								PRINTFORML 「好像是这样……从铲子里发出了波动炮…之类的」（指轻小说：铁锹无双「铁锹波动炮!」）
								PRINTFORML ( `・ω・´)♂〓〓〓〓★(゜Д ゜ ;;;).:∴ドゴォォ
								PRINTFORML 「……能不能收拾一下……」
								PRINTW
								PRINTFORML 「……对不起、因为太过痛苦而逃避了现实」
								PRINTFORML 「什么时候才能结束啊～打扫什么的～～」
								PRINTW
							CASE 1
								PRINTFORML 「%CALLNAME:MASTER%阁下、你的手很冷啊」
								PRINTFORML 典用自己的手握住%CALLNAME:MASTER%的手、呼了一口气
								PRINTFORML 「虽然看不到尽头、但一起努力吧♪」
								PRINTW
							ENDSELECT
						CASE 2
							PRINTFORML 「这也是对自己有益的事情吗」
							PRINTFORML 「欸、你拿到实际工资了吗？　那样的话就应该早点跟我说啊」
							PRINTFORML 典開始努力地用铁锹铲雪
							PRINTW
						CASE 1
							PRINTFORML 「哦、这一带已经收拾得差不多了」
							PRINTFORML 「您辛苦了。再过一会儿就一起去喝茶吧♪」
							PRINTW
						CASE 0
							PRINTFORML 「我们终于看到了尽头♪」
							CALL ASK_YN("两个人一起干活速度就是快","多亏了典")
							IF !RESULT
								PRINTFORML 「呵呵、对我们来说、暴雪也不过是小孩子的沙山而已♪」
								PRINTFORML 「%CALLNAME:MASTER%阁下的扫除技术非常出色呢」
								PRINTW
							ELSE
								PRINTFORML 「是这样吗？　能帮上您的忙是我的荣幸♪」
								PRINTFORML 「感谢你帮忙？　不不、完全没有的事。我几乎什么也没干……」
								PRINTFORML 「怎么办……这样的话……」
								SELECTCASE RAND:4
								CASE 0
									PRINTFORML 「作为奖励、以后想和你一起去洗澡……之类的%UNICODE(0x2665) *1%」
									PRINTW
								CASE 1
									PRINTFORML 「作为奖励、想一起去吃好吃的东西……之类的%UNICODE(0x2665) *1%」
									PRINTW
								CASE 2
									PRINTFORML 「作为奖励、想和你约会哦……之类的%UNICODE(0x2665) *1%」
									PRINTW
								CASE 3
									PRINTFORML 「作为奖励、想和你一起躺在被窝里温暖一下……之类的%UNICODE(0x2665) *1%」
									PRINTW
								ENDSELECT
							ENDIF
						ENDSELECT
				ENDSELECT
			;屋内
			ELSE
				;現在位置が主人公的房間
				IF CFLAG:MASTER:現在位置 == CFLAG:MASTER:初期位置
						;自慰をしているとオナティッシュ発覚
						;……は無理なので、ゴミ屋敷だと汚れた内衣を見つけて嗅いじゃう典ちゃん
						SELECTCASE TFLAG:194
							;汚れ高
							CASE 3
								PRINTFORML 「哇啊、太过分了……」
								PRINTFORML 「真是的、%CALLNAME:MASTER%阁下没有典就不行了吗」
								PRINTFORML 典一边抱怨、一边干净利落地打扫着
								PRINTW
								SELECTCASE RAND:2
								CASE 0
									PRINTFORML 「啊～真是的、连脱下来的衣服都乱放着～」
									PRINTFORML 「啊咧？　这个是……」
									PRINTW
									PRINTFORML （这、这是……%CALLNAME:MASTER%阁下使用过的内裤）
									PRINTFORML （………………）
									PRINTW
									PRINTFORML 典确认了%CALLNAME:MASTER%没有看向这边之后、
									PRINTFORML 把内衣凑近鼻尖、開始闻着臭味
									PRINTW
									CALL HPH_PRINT,@"（哈啊啊……HPH　%CALLNAME:MASTER%阁下的臭味……HPHHPH）","L"
									CALL HPH_PRINT,@"（我在做什么啊……HPH　这种变态行为……HPH）","L"
									PRINTW
									CALL HPH_PRINT,@"（啊啊……HPH　这可糟了HPH）","L"
									CALL HPH_PRINT,@"（大脑都要变成笨蛋了HPH　臭得让人上瘾HPHHPH）","L"
									PRINTFORML 沉迷于%CALLNAME:MASTER%的臭味的典、完全停止了打扫的工作……
									PRINTW
									SELECTCASE RAND:2
									CASE 0
									CASE 1
										PRINTFORML 典的样子有点奇怪……
										CALL ASK_YN("打声招呼","放任不管")
										IF !RESULT
											PRINTFORML 「哇啊！？　哇啊啊！！？　什什什什、什么啊！？」
											PRINTFORML 虽说是突发状况、但典还是把%CALLNAME:MASTER%的内衣藏在了怀里……
											;内衣を持ち返回
											CFLAG:139:1007 = 1
										ELSE
											PRINTFORML 典发出「啊欸……%UNICODE(0x2665) *1%」的声音去了遥远的世界……
											PRINTFORML 因为害怕、所以决定不去管她
											CFLAG:139:积攒度 += 50
										ENDIF
									ENDSELECT
								CASE 1
									PRINTFORML 「呜呜～～、一点也不收拾～～真是个垃圾屋啊～～」
									PRINTFORML 「搬家！　搬家！　你应该尽快搬家！」
									PRINTFORML 典一边拍打着被子一边发牢骚……
								ENDSELECT
								;現状、「自慰する」に自慰経験が付かないので塩漬け
								;IF TCVAR:MASTER:自慰経験 > 0
									;PRINTFORML （味道也很难闻……嗯、这个垃圾桶……）
									;PRINTFORML （这是……难道是、%CALLNAME:MASTER%阁下的……）
									;PRINTFORML 「…………」
									PRINTW
									;IF TALENT:MASTER:濃厚精液
										;CALL HPH_PRINT,@"（あぁっHPH　やばっHPH　すっごい雄の臭い……HPH）","L"
										;IF TALENT:妊娠
											;IF CFLAG:139:妊娠経過日数 >= 25 || CFLAG:139:妊娠経過日数 < 10
												;PRINTFORML （やっぱり……溜まっちゃうんですよね）
												;PRINTFORML （%CALLNAME:MASTER%どののことだから、気を遣ってくださっているのでしょう）
												;PRINTFORML （言ってくだされば、せめて手や口でヌいて差し上げますのに……）
											;別の娘を孕ませるためとかだったら典ちゃんにどんな顔をされるだろう
											;ELSE
												;PRINTFORML （もう……安定期に入ったのだからシてくださってもいいのに）
												;PRINTFORML （そういうお優しいところも好きですけど、妊娠中でも愛してほしいな……）
											;ENDIF
										;ELSE
											;PRINTFORML （溜まったなら典でヌいてくださればいいのに……）
											;PRINTFORML （ひょっとして、私のことを確実に孕まそうと？）
											;CALL HPH_PRINT,@"（あ……HPH　変なこと考えてたら、おなかがキュンキュンしちゃう……HPH）","L"
										;ENDIF
									;ELSE
										;CALL HPH_PRINT,@"（%CALLNAME:MASTER%どののセーエキの臭い……HPH）","L"
										;PRINTFORML （最近臭いが单薄的と思ったら、定期的に発散されていたのですね……）
										;PRINTFORML （言ってくだされば、せめて手や口でヌいて差し上げますのに……）
									;ENDIF
									;PRINTFORML 作業の手を止めてぼうっとしている典の肩を叩くと、典は飛び上がらんばかりの驚きを見せた
									;PRINTFORML 「哇啊！？　哇啊啊！！？　什什什什、什么啊！？」
									;PRINTFORML とっさのことと是え、典は自慰後のティッシュを懐に隠してしまった……
									PRINTW
								;ELSE
								;	PRINTFORML 「呜呜～～、一点也不收拾～～真是个垃圾屋啊～～」
								;	PRINTFORML 「搬家！　搬家！　你应该尽快搬家！」
								;	PRINTFORML 典一边拍打着被子一边发牢骚……
								;ENDIF
							;汚れ中
							CASE 2
								PRINTFORML 「哇、这还真是……」
								PRINTFORML 「我们分头行动吧。那么、你还在磨蹭什么」
								PRINTW
							;汚れ小
							CASE 1
								PRINTFORML 「收拾得很干净呢。这样的话马上就结束了」
								PRINTW
							;汚れ最小
							CASE 0
								PRINTFORML 「哪里都没有可以打扫的地方呀」
								PRINTW
						ENDSELECT
				;現在位置がお浴室場
				ELSEIF BATHCHECK(CFLAG:MASTER:現在位置)
					IF TFLAG:194 >= 2
						PRINTFORML 「嗯ー、这是非常顽固的污渍……」
						PRINTFORML 典正在和浴室里顽固的污垢作斗争
						PRINTW
						PRINTFORML 因为是把屁股撅到这边的姿势、都能看见%SLIT(TARGET)%了
						PRINTW
					ELSE
						PRINTFORML 「好像没有想象中那么脏。这样的话应该可以早点结束了」
						PRINTFORML 典擦地板的时候、
						;巨乳、爆乳
						IF TALENT:139:胸圍 > 0
							PRINTFORML 与体型不相称的丰满的双丘在噗尼噗尼地晃动……
							PRINTW
						;普乳
						ELSEIF TALENT:139:胸圍 == 0
							PRINTFORML 比想象中丰满的胸脯不停地摇晃着
							PRINTW
						;貧乳、デフォルト
						ELSEIF TALENT:139:胸圍 == -1
							PRINTFORML 小巧玲珑的胸部微微晃动着
							PRINTW
						;絶壁
						ELSE
							PRINTFORML 胸呢……没有摇晃……没有摇晃
							PRINTW
						ENDIF
					ENDIF
				;主人公的房間、浴室場以外の屋内
				ELSE
					;廁所
					IF GROUPMATCH(CFLAG:MASTER:現在位置, 14, 40, 236, 316, 322, 406, 418, 824, 906, 917)
						PRINTFORML 「有什么理由要打扫别人的厕所吗……」
						PRINTFORML 「嗯ー、让我来做吧。如果是%CALLNAME:MASTER%阁下的话、典想要帮上你的忙」
						PRINTW
					;天狗三人娘的家（椛、文、極）
					ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 807, 808, 809)
						;文宅
						IF CFLAG:MASTER:現在位置 == 808
							IF FIRSTTIME(SELECTCOM)
								PRINTFORML 「喂、这里是文小姐的家……」
								PRINTFORML 「%CALLNAME:MASTER%阁下这种轻车熟路的感觉是怎么回事」
								PRINTFORML （难道是从那只狡猾的鸦天狗那里得到了备用钥匙……）
								PRINTW
							ELSE
								IF TFLAG:194 >= 2
									PRINTFORML 「这堆垃圾是怎么回事……」
									PRINTFORML 「啊、这里也有废纸……都是些应该扔掉的东西」
									PRINTW
								ELSE
									PRINTFORML 「因为文小姐这么精力充沛地到处活动、所以我以为房间会乱糟糟的」
									PRINTFORML 「果然还是不能让喜欢的人看到肮脏的房间吧。真是可怜啊」
								ENDIF
							ENDIF
						;極宅
						ELSEIF CFLAG:MASTER:現在位置 == 809
							IF FIRSTTIME(SELECTCOM)
								PRINTFORML 「喂、这里是姬海棠小姐的家……」
								PRINTFORML 「%CALLNAME:MASTER%阁下这种轻车熟路的感觉是怎么回事」
								PRINTFORML （嘛、那个人好像会把备用钥匙给喜欢的人）
								PRINTW
							ELSE
								IF TFLAG:194 >= 2
									PRINTFORML 「那位真是……意外的懒散啊」
									PRINTFORML 「因为平时就闭门不出、所以垃圾越积越多」
									PRINTFORML 「传言说、有人刚開始连上厕所都觉得麻烦……好像还没到那种程度」
									PRINTW
								ELSE
									PRINTFORML 「姬海棠打扫得意外干净呢」
									PRINTFORML 「嗯、看起来不怎么忙、应该也有时间打扫吧」
								ENDIF
							ENDIF
						;椛宅
						ELSEIF CFLAG:MASTER:現在位置 == 807
							IF FIRSTTIME(SELECTCOM)
								PRINTFORML 「喂、这里是椛小姐的家……」
								PRINTFORML 「%CALLNAME:MASTER%阁下这种轻车熟路的感觉是怎么回事」
								PRINTFORML （她好像会把这种事情划清界限、却意外地热情高涨呢）
								PRINTW
							ELSE
								IF TFLAG:194 >= 2
									PRINTFORML 「那位真是……意外的懒散啊」
									PRINTFORML 「我经常看见她打扫卫生、是很忙吗？」
									PRINTFORML 「还是忙着找谁呢～？」
									PRINTFORML 被典紧紧地盯着……
									PRINTW
								ELSE
									PRINTFORML 「椛小姐打扫得很干净呢。不愧是打扫能手」
									PRINTFORML 「平时收拾得很勤快、在职场也不乱啊」
								ENDIF
							ENDIF
						ENDIF
					;天狗娘以外の屋内
					ELSE
						IF BEDROOM(CFLAG:MASTER:現在位置)
							IF TFLAG:194 >= 2
								PRINTFORML 「这个房间的主人很久没打扫了」
								PRINTFORML 「打扫的时候、顺便找找有意思的东西吧」
								PRINTW
							ELSE
								PRINTFORML 「这个房间很整洁」
								PRINTW
							ENDIF
						ELSE
							IF TFLAG:194 >= 2
								PRINTFORML 「啊、这么脏……真是够呛啊」
								PRINTFORML 典拧抹布的动作很有魅力……
								PRINTW
							ELSE
								PRINTFORML 「这个房间很整洁」
								PRINTFORML 典一边轻轻拍打着房间角落的某处一边如此夸赞道
								PRINTW
							ENDIF
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		;恋人、恋慕以外
		ELSE
			;野外掃除
			IF OUTROOF(CFLAG:TARGET:現在位置)
				;典は見てるだけ
				IF TFLAG:193 == 0
					;季節で変化
					SELECTCASE DAY:2
						;春
						CASE 1
							IF CFLAG:MASTER:現在位置 == 白玉楼庭 || CFLAG:MASTER:現在位置 == 白玉楼
								PRINTFORML 「真是漂亮啊。连典都不自觉地看入迷了呢」
								IF TFLAG:194 >= 2
									PRINTFORML 「啊～呣、呣咕呣咕……呣、你问我在干什么？」
									PRINTFORML 「嗯咕、咕嘟……如你所见、我正在吃团子哟」
									PRINTFORML 扫除呢？
									PRINTW
								ELSE
									PRINTFORML 「终于快要扫完了」
									SELECTCASE RAND:2
									CASE 0
										IF TALENT:23:恋人
											PRINTFORML 「为了恋人而努力打扫的样子、很值得赞扬啊」
											PRINTW
										ELSEIF TALENT:23:恋慕
											PRINTFORML 「白玉楼的庭师一定会感谢你的吧」
											PRINTFORML 「打扫完后让她出来看看怎么样？　我想她一定会很高兴的♪」
											PRINTW
										ELSE
											PRINTFORML 「你又不是这里的庭师、真是辛苦你了」
											PRINTW
										ENDIF
									CASE 1
										PRINTFORML 「啊、%CALLNAME:MASTER%阁下、请不要动」
										PRINTFORML 典的嘴唇靠近你的脸──
										PRINTFORML 「好的、拿下来了♪　那个、怎么了吗？」
										PRINTW
									ENDSELECT
								ENDIF
							ELSE
								PRINTFORML 「已经是春天了啊」
								PRINTFORML 「这种时候用不着去打扫吧……」
								PRINTW
							ENDIF
						;夏
						CASE 2
							;水場周辺。微妙におかしいチョイスもまじっているかも
							IF GROUPMATCH(CFLAG:MASTER:現在位置, 347, 703, 708, 735, 806, 814)
								PRINTFORML 「天气这么热、你还真努力啊」
								PRINTFORML 「不要打扫了、去洗个澡如何？　说不定还能看见典有失体统的身姿哦♪」
								PRINTW
							ELSE
								PRINTFORML 「啊……好热啊……」
								PRINTFORML 典在树荫下吃着冰棒、用手掌扇着脸
								PRINTW
							ENDIF
						;秋は落ち葉掃き(という想定)
						CASE 3
							;妖怪之山周辺
							IF GROUPMATCH(CFLAG:MASTER:現在位置, 801, 802, 803, 805, 806)
								PRINTFORML 「山上的落叶果然很厉害啊」
								;龍が恋人
								IF TALENT:140:恋人
									PRINTFORML 「在恋人的身边、打扫起来也不费力啊♪」
									PRINTFORML 「因为我不帮忙所以你很忙吗？　扫除不属于我的专业……」
									PRINTW
								;龍が恋慕
								ELSEIF TALENT:140:恋慕
									PRINTFORML 「努力的话、饭纲丸大人说不定会请我们吃大麦饭呢♪」
									PRINTFORML 「她对自己的亲属很温柔呢、说不定还会『来、啊ー嗯%UNICODE(0x2665) *1%』之类的」
									PRINTW
								ELSE
									;山頂は神奈子
									PRINTFORML 「哦ー、落叶的量这么多啊♪」
									PRINTFORML 典看着高高堆积的落叶、似乎很兴奋
									PRINTW
									PRINTFORML 如果来帮忙的话会不会更兴奋呢？　如此提议道、
									PRINTFORML 结果被回答「如果我来帮忙的话可能会弄得乱糟糟的哦？」……
									PRINTW
								ENDIF
							ELSE
								SELECTCASE RAND:3
								CASE 0
									PRINTFORML 「啊、我在那里发现了木通」
									PRINTFORML 「扫除完之后就拿那个当点心吧♪」
									PRINTW
								CASE 1
									PRINTFORML 「%CALLNAME:MASTER%阁下。收集落叶来烤白薯如何？」
									PRINTFORML 「如果你决定了、就分头收集树叶吧♪」
									PRINTW
								CASE 2
									PRINTFORML 「秋意已浓啊」
									PRINTFORML 「太晚了气温会很冷。快点结束吧」
									PRINTW
								ENDSELECT
							ENDIF
						;冬は扫雪
						CASE 4
							;積雪量
							SELECTCASE TFLAG:194
							CASE 3
								PRINTFORML 「哇啊啊～、这么多的雪还真是辛苦啊」
								PRINTFORML 如果知道的话、请帮帮忙
								PRINTFORML 「非常抱歉。我不擅长拿比碗和筷子更重的东西……」
								PRINTW
							CASE 2
								PRINTFORML 「虽说稍微好点了、但雪的量还真是够大的」
								PRINTFORML 典一边堆着雪人、一边看着%CALLNAME:MASTER%扫雪
								PRINTW
							CASE 1
								PRINTFORML 「春天是曙光。夏天是夜晚。秋天是黄昏。冬天是扫雪。辛苦了♪」
								PRINTW
							CASE 0
								PRINTFORML 「这一带的雪好像没问题」
								PRINTW
							ENDSELECT
					ENDSELECT
				;典も掃除してくれる
				ELSE
					;季節で変化
					SELECTCASE DAY:2
						;春
						CASE 1
							IF CFLAG:MASTER:現在位置 == 白玉楼庭 || CFLAG:MASTER:現在位置 == 白玉楼
								PRINTFORML 「真是漂亮啊。连典都不自觉地看入迷了呢」
								IF TFLAG:194 >= 2
									PRINTFORML 「如果没有这一大堆樱花花瓣的话……」
									PRINTFORML 典有些不耐烦地挥动着扫帚
									PRINTW
								ELSE
									PRINTFORML 「打扫完之后在这里赏花怎么样？　只有我们两个人哦♪」
									;討厭女人、不信任人類
									IF GROUPMATCH(TALENT:MASTER:性別嗜好, 2, 3)
										PRINTFORML 「用不着那么露骨地露出讨厌的表情啊」
										PRINTW
									ELSE
										CALL ASK_YN("那听起来很有趣","感觉人太少没什么意思……")
										IF !RESULT
											PRINTFORML 「是吧♪　既然决定了、就赶紧结束吧♪」
											PRINTFORML 典高兴地加快了挥扫帚的速度
											TALENT:139:心情 = 1
											PRINTW
										ELSE
											PRINTFORML 「%CALLNAME:MASTER%阁下难道是那种？　珍惜自己时间的类型？」
											PRINTFORML 「不要说那种话、来陪着典一起嘛」
											PRINTW
										ENDIF
									ENDIF
									PRINTW
								ENDIF
							;妖怪之山（山頂）、天狗のテリトリー周辺
							ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 801, 802, 803, 805, 806)
								;龍が恋人
								IF TALENT:140:恋人
									PRINTFORML 「一会儿我让饭纲丸大人来摸摸你的头如何？」
									PRINTFORML 「嘸嘸、開玩笑的ー♪」
									PRINTW
								;龍が恋慕
								ELSEIF TALENT:140:恋慕
									PRINTFORML 「如果你拼命努力的话、饭纲丸大人以后说不定会表扬你呢？」
									PRINTFORML 「为什么？　为什么呢♪」
									PRINTW
								ELSE
									PRINTFORML 「好用心啊♪　也许我的主人对你的印象也会变好哦」
									PRINTW
								ENDIF
							ELSE
								PRINTFORML 「%CALLNAME:MASTER%阁下也很好说话呢。明明不是自己家、却也要努力打扫」
								PRINTFORML 「嗯、和这样的%CALLNAME:MASTER%阁下交往的自己也算是个好事者」
								PRINTW
							ENDIF
						;夏
						CASE 2
							;水場周辺。微妙におかしいチョイスもまじっているかも
							IF GROUPMATCH(CFLAG:MASTER:現在位置, 347, 703, 708, 735, 806, 814)
								PRINTFORML 「天气这么热、你还真努力啊」
								PRINTFORML 「要不要适当地洗个澡？　说不定还能看见典有失体统的身姿哦♪」
								PRINTW
							ELSE
								SELECTCASE RAND:2
								CASE 0
									PRINTFORML 「为什么偏偏在这么热的日子里……」
									PRINTFORML 「我已经汗流浃背了～～、衣服黏糊糊的很恶心啊～～」
									PRINTW
									IF EQUIP:139:連衣裙
										PRINTFORML 被汗水浸湿的%CLOTHNAME(13, EQUIP:TARGET:連衣裙)%贴在典的肢体上、使身体的线条显露出来
										PRINTFORML 典似乎注意到了你的视线、露出了微笑
									ELSEIF EQUIP:139:裤子 || EQUIP:139:緊身内衣 || EQUIP:139:連体内衣
										PRINTFORML 典的裙子啪嗒啪嗒地飘着
										IF CFLAG:没穿内裤 == 1
											PRINTFORML 连大腿根部都能看见、说明典……
										ELSE
											PRINTFORML 十分在意隐约可见的%PANTSNAME(EQUIP:TARGET:下半身内衣２, TARGET)%……
										ENDIF
										PRINTFORML 典注意到%CALLNAME:MASTER%的视线、微微一笑、把裙摆拉到大腿根附近……
									ENDIF
								CASE 1
									PRINTFORML 「啊……好热啊……」
									PRINTFORML 原本应该在帮忙打扫的典、在树荫下吃着冰棒、用手掌扇着脸
									PRINTW
								ENDSELECT
							ENDIF
						;秋は落ち葉掃き(という想定)
						CASE 3
							;妖怪之山周辺
							IF GROUPMATCH(CFLAG:MASTER:現在位置, 801, 802, 803, 805, 806)
								PRINTFORML 「山上的落叶果然很厉害啊」
								;龍が恋人
								IF TALENT:140:恋人
									PRINTFORML 「一会儿我让饭纲丸大人来摸摸你的头如何？」
									PRINTFORML 「嘸嘸、開玩笑的ー♪」
									PRINTW
								;龍が恋慕
								ELSEIF TALENT:140:恋慕
									PRINTFORML 「努力的话、饭纲丸大人说不定会请我们吃大麦饭呢♪」
									PRINTW
								ELSE
									PRINTFORML 「好用心啊♪　也许我的主人对你的印象也会变好哦」
									PRINTW
								ENDIF
							ELSE
								PRINTFORML 「%CALLNAME:MASTER%阁下！　把落叶收集起来拿来烤白薯怎么样！」
								PRINTFORML 「%CALLNAME:MASTER%阁下是负责收集树叶并点火的！　而典是毒见系！」
								PRINTW
							ENDIF
						;冬は扫雪
						CASE 4
							;積雪量
							SELECTCASE TFLAG:194
							CASE 3
								PRINTFORML 「哇啊啊～、这么多的雪还真是辛苦啊」
								PRINTFORML 向典抱怨说、如果知道的话、就请帮帮忙吧
								PRINTFORML 「非常抱歉。我不擅长拿比碗和筷子更重的东西……」
								PRINTW
							CASE 2
								PRINTFORML 「虽说稍微好点了、但雪的量还真是够大的」
								PRINTFORML 典一边堆着雪人、一边看着%CALLNAME:MASTER%扫雪
								PRINTW
							CASE 1
								PRINTFORML 「春天是曙光。夏天是夜晚。秋天是黄昏。冬天是扫雪。辛苦了♪」
								PRINTW
							CASE 0
								PRINTFORML 「这一带的雪好像没问题」
								PRINTW
							ENDSELECT
					ENDSELECT
				ENDIF
			;屋内
			ELSE
				;現在位置が主人公的房間
				IF CFLAG:MASTER:現在位置 == CFLAG:MASTER:初期位置
					;典は見てるだけ
					IF TFLAG:193 == 0
						;汚部屋
						IF TFLAG:194 >= 2
							IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ
								PRINTFORML 「我……我想回去、不行吗？」
								PRINTFORML 「啊……快点收拾完吧」
							ELSE
								PRINTFORML 「%CALLNAME:MASTER%阁下、房间平时能稍微整理一下吗……」
								PRINTFORML 「我也来帮忙？　欸～、我可不想啊、真是的」
								PRINTW
							ENDIF
						ELSE
							PRINTFORML 「嘛～、这不是打扫得很干净吗」
							PRINTFORML 「我跟在后面有意义吗？」
							PRINTFORML 「啊、还是说～、你其实是想把典带进房间吧？　是这样没错吧？」
							PRINTW
						ENDIF
					;典も掃除してくれる
					ELSE
						;汚部屋
						IF TFLAG:194 >= 2
							PRINTFORML 「%CALLNAME:MASTER%阁下、房间平时能稍微整理一下吗……」
							PRINTFORML 「之后要收帮忙费哦」
							CALL ASK_M("给你一个吻", 1,"那我给你零花钱", 1,"下次请你吃饭", 1)
							SELECTCASE RESULT
							CASE 0
								IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ
									PRINTFORML 「什么？　别废话了、快点開始打扫吧」
									PRINTFORML 真冷淡啊
									PRINTW
								ELSEIF TALENT:139:心情 == 1
									PRINTFORML 「欸～～、怎么办呢～～」
									PRINTFORML 「顺便一提、你要亲吻哪里呢？」
									PRINTFORML 「是这里吗？　还是、这・里？」
									PRINTW
								ELSE
									PRINTFORML 「这是个很有魅力的提案、但请允许我拒绝♪」
									PRINTW
								ENDIF
							CASE 1
								PRINTFORML 「一下子就有干劲了♪　来吧、快点结束吧」
								PRINTFORML 真是个势利眼
								PRINTW
							CASE 2
								PRINTFORML 「可以吗？　管狐会吃很多的哦～？」
								PRINTFORML 「还有典十分喜欢吃美食呢。请让我吃到很多好吃的东西吧♪」
								PRINTW
							ENDSELECT
							PRINTW
						ELSE
							PRINTFORML 「很意外、虽说有点失礼、但%CALLNAME:MASTER%阁下是个很勤快的人呢」
							PRINTFORML 「我帮你的意义不大」
							PRINTW
							PRINTFORML 「啊、难道说、打扫只是借口、目的是让我进房间吗？」
							PRINTFORML 「啊哈哈、这是開玩笑的♪」
							PRINTW
						ENDIF
					ENDIF
				;現在位置が椛、文、極的家
				ELSEIF GROUPMATCH(CFLAG:MASTER:現在位置, 807, 808, 809)
					;文宅
					IF CFLAG:MASTER:現在位置 == 808
						IF FIRSTTIME(SELECTCOM)
							PRINTFORML 「喂、这里是文小姐的家……」
							PRINTFORML 「%CALLNAME:MASTER%阁下这种轻车熟路的感觉是怎么回事」
							PRINTFORML （难道是从那只狡猾的鸦天狗那里得到了备用钥匙……）
							PRINTW
						ELSE
							IF TFLAG:194 >= 2
								PRINTFORML 「这堆垃圾是怎么回事……」
								PRINTFORML 「啊、这里也有废纸……都是些应该扔掉的东西」
								PRINTW
							ELSE
								PRINTFORML 「因为文小姐这么精力充沛地到处活动、所以我以为房间会乱糟糟的」
								PRINTFORML 「果然还是不能让喜欢的人看到肮脏的房间吧。真是可怜啊」
							ENDIF
						ENDIF
					;極宅
					ELSEIF CFLAG:MASTER:現在位置 == 809
						IF FIRSTTIME(SELECTCOM)
							PRINTFORML 「喂、这里是姬海棠小姐的家……」
							PRINTFORML 「%CALLNAME:MASTER%阁下这种轻车熟路的感觉是怎么回事」
							PRINTFORML （嘛、那个人好像会把备用钥匙给喜欢的人）
							PRINTW
						ELSE
							IF TFLAG:194 >= 2
								PRINTFORML 「那位真是……意外的懒散啊」
								PRINTFORML 「因为平时就闭门不出、所以垃圾越积越多」
								PRINTFORML 「传言说、有人刚開始连上厕所都觉得麻烦……好像还没到那种程度」
								PRINTW
							ELSE
								PRINTFORML 「姬海棠打扫得意外干净呢」
								PRINTFORML 「嗯、看起来不怎么忙、应该也有时间打扫吧」
							ENDIF
						ENDIF
					;椛宅
					ELSEIF CFLAG:MASTER:現在位置 == 807
						IF FIRSTTIME(SELECTCOM)
							PRINTFORML 「喂、这里是椛小姐的家……」
							PRINTFORML 「%CALLNAME:MASTER%阁下这种轻车熟路的感觉是怎么回事」
							PRINTFORML （她好像会把这种事情划清界限、却意外地热情高涨呢）
							PRINTW
						ELSE
							IF TFLAG:194 >= 2
								PRINTFORML 「那位真是……意外的懒散啊」
								PRINTFORML 「我经常看见她打扫卫生、是很忙吗？」
								PRINTFORML 「还是忙着找谁呢～？」
								PRINTFORML 被典紧紧地盯着……
								PRINTW
							ELSE
								PRINTFORML 「椛小姐打扫得很干净呢。不愧是打扫能手」
								PRINTFORML 「平时收拾得很勤快、在职场也不乱啊」
							ENDIF
						ENDIF
					ENDIF
				;天狗娘以外の室内
				ELSE
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K139_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;幻想郷最強
	IF ABL:MASTER:戦闘能力 > 5
		;よっちゃんとＴ恤衬衫ヤローに勝利済み
		IF CFLAG:98:弾幕勝負勝利 == 1 && CFLAG:113:弾幕勝負勝利 == 1
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「啊啊…算了吧…我怎么可能赢呢…」
				PRINTFORML 典把尾巴夹在双腿之间、怯生生地颤抖着…
				PRINTW
				PRINTFORML 吵死了！！！　快開始吧！！！
				PRINTFORML %CALLNAME:MASTER%随意放出的弹幕变成了耀眼的极粗闪光、简直就如同要剜去地面一般
				PRINTW
				PRINTFORML 「啊哇、啊哇哇哇…现在这、是什么啊…难道是类似魔理沙的、Final Spark之类的符卡吗…」
				PRINTW
				PRINTFORML …可惜现在没有Final Spark…
				PRINTL 只有Narrow Spark啊…
				PRINTW
				PRINTFORML 「我受够了！　请让我回去吧！」
				PRINTW
			CASE 1
				PRINTFORML 提议如果赢了自己就请典吃好吃的
				PRINTFORML 「我不需要好吃的东西　请让我回家吧…」
				PRINTW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORML 试着让典见识了一下自己设计的弹幕后、典就发飙了
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「什么『全程必杀』、请再多学学地底的勇仪阁下啊！」
					PRINTFORML 「就算是鬼都有好好地划分出一个安全地带哦！？　恶魔吧、你是！」
				CASE 1
					PRINTFORML 「什么『全画面梦魇』、这是不给活路的粪作啊、粪作！」
					PRINTFORML 「请向斯卡雷特小姐道歉！　现在立刻马上！」
				CASE 2
					PRINTFORML 「什么鬼啊刚刚那个叫『不朽的金阁寺』的！　感觉让人完全没法躲開吧！」
				ENDSELECT
			CASE 1
				PRINTFORML 「呜咿咿咿咿咿！　要死了！　我会死的啊啊啊啊啊！！！！！」
				PRINTFORML 典一边哭一边拼命躲避着弹幕…
			CASE 2
				PRINTFORML 「典已经死了……咕ー……」
				PRINTFORML 被%CALLNAME:MASTER%弄得满身疮痍的典趴在地上…
			ENDSELECT
			PRINTW
		ENDIF
	;典より格上
	ELSEIF ABL:MASTER:戦闘能力 > 2
		IF CFLAG:140:弾幕勝負勝利 == 1
			SELECTCASE RAND:2
			CASE 0
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					PRINTFORML 「%CALLNAME:MASTER%阁下、会对姐姐手下留情的吧～♪」
					CALL ASK_YN("不干","没门")
					IF !RESULT
						PRINTFORML 「魔鬼ー！　恶魔ー！」
					ELSE
						PRINTFORML 「%CALLNAME:MASTER%阁下的血是什么颜色的呢～～」
					ENDIF
					PRINTW
				ELSE
					PRINTFORML 「你看你看♪　虽说是侥幸、但你还是战胜了我不是吗♪」
				ENDIF
			CASE 1
				PRINTFORML 「不行不行、饶了我吧！」
				PRINTFORML 「连饭纲丸大人都能战胜的你、我又怎么可能打得过啊ー！」
			ENDSELECT
		ELSE
			PRINTFORML 「等一下、等一下啊！　请您务必要手下留情！」
		ENDIF
	;典以下。ざぁこ♥
	ELSEIF ABL:MASTER:戦闘能力 < 2
		;典にまぐれ勝ち？
		IF CFLAG:139:弾幕勝負勝利 == 1
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「哎呀哎呀♪　请回想起那时战胜我的情景♪」
				PRINTFORML 「那样是成为不了坚强的孩子的哦～？」
			ELSE
				PRINTFORML 「你看你看♪　虽说是侥幸、但你还是战胜了我不是吗♪」
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「来啊来啊♪　让姐姐看看你帅气的一面吧♪」
			ELSE
				PRINTFORML 「哎呀哎呀、就这点程度吗？」
			ENDIF
			PRINTW
		ENDIF
	;互角
	ELSE
		;典に勝ち
		IF CFLAG:139:弾幕勝負勝利 == 1
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「嗯嗯…看来你比姐姐更强啊…」
				PRINTFORML 「比姐姐还强、真是太自大了」
			ELSE
				PRINTFORML 「喔喔…你变得更强了吗？」
				PRINTFORML 「真没意思啊…」
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「欸？　变得更强了一些吗？」
				IF TALENT:恋慕 || TALENT:恋人
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「等你变强了、你会保护姐姐吗？」
						CALL ASK_YN("我会保护你的","我能行吗")
						IF !RESULT
							PRINTFORML 「！」
							PRINTFORML （说出那句话的同时、感觉脸也变帅了很多呢…%UNICODE(0x2665) *1%）
						ELSE
							PRINTFORML 「哦～、就算是说谎也是没问题的哦、请对姐姐说出『我会保护你的』这句话吧」
						ENDIF
						PRINTW
					CASE 1
						PRINTFORML 「也许我已经没有什么东西可以教你了」
						IF TALENT:140:恋人
							PRINTFORML （这孩子还是待在饭纲丸大人身边比较好…）
							PRINTFORML （因为我的任性、一直待在我身边的话会毁掉他的才能的…）
						ELSE
							IF TALENT:140:恋慕
								PRINTFORML （我有点不放心、还是交给饭纲丸大人比较好…）
								;你が龍に好意？
								IF CFLAG:1004 == 1
									PRINTFORML （不过、%CALLNAME:MASTER%阁下也对饭纲丸大人寄予了不少感情）
								ELSE
									PRINTFORML （不过、过几天要是对饭纲丸大人产生了好感的话）
								ENDIF
								PRINTFORML （啊啊啊～～～～、我不想毁掉这孩子的才能、
								PRINTFORML 　但我不想眼睁睁地让给饭纲丸大人～～）
								PRINTW
							ELSE
								PRINTFORML （我可能很难提高这个孩子的才能）
								PRINTFORML （把他交给饭纲丸大人也许会变得更强）
							ENDIF
						ENDIF
					CASE 2
						PRINTFORML 「不用变得比姐姐更强也可以的～♪」
					ENDSELECT
				ELSE
					PRINTFORML 「不用变得比姐姐更强也可以的～♪」
				ENDIF
			ELSE
				PRINTFORML 「喔喔…你变得更强了吗？」
				PRINTFORML 「真没意思啊…」
				PRINTW
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;412,学习
;ABL:教養(ABL:MASTER:教養より大=MASTERが教えてもらう ABL:MASTER:教養より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K139_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
;典の教養は3
	;典 > 你
	IF ABL:139:教養 > ABL:MASTER:教養
		IF FIRSTTIME(SELECTCOM)
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「没问题吗、%CALLNAME:MASTER%阁下」
				PRINTFORML 「学习并不是装进脑子里就可以了」
				PRINTFORML 「重要的是如何将知识转化为智慧」
			ELSE
				PRINTFORML 「我也不是教师吧…不去和乡里的老师学习吗？」
				PRINTFORML 「因为说得很深奥所以犯困？　原来如此」
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SELECTCASE RAND:5
				CASE 0
					PRINTFORML 「像这样拿着笔…是的、字写得很好呢」
				CASE 1
					PRINTFORML 「你可以大声读出来。这样就更容易记住知识」
				CASE 2
					PRINTFORML 「一開始你有三个苹果…如果再买两个、你会有多少个苹果？」
					CALL ASK_YN("你是在瞧不起我吗？当然是5个","首先问这三个苹果是在哪里买的")
					IF !RESULT
						PRINTFORML 「正确答案。做得很好呢」
					ELSE
						PRINTFORML 「你在说什么傻话啊。题目里没有这样的要素吧」
						PRINTFORML 「与问题无关的事情随便加上去就会被打个大大的×」
					ENDIF
				CASE 3
					PRINTFORML 典知道的真多啊、真是佩服
					SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「是吧、是吧♪　任何事情都可以问姐姐哦♪」
					CASE 1
						PRINTFORML 「嗯哼、不管怎么说、毕竟典是%CALLNAME:MASTER%阁下的姐姐啊」
						PRINTFORM 典挺起%OPPAI_DESCRIPTION(TARGET,1)%、得意地哼哼了两声
					CASE 2
						PRINTFORML 「是吗？%UNICODE(0x2665) *1%　可以再多多夸奖姐姐哦～%UNICODE(0x2665) *1%」
					ENDSELECT
				CASE 4
					PRINTFORML 「你知道吗？　管狐一旦被小孩子抱住、力量就会变强哦」
				ENDSELECT
				PRINTW
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「没学问是可耻的吗？　不、不是的」
					PRINTFORML 「可耻的是不去运用好不容易学到的知识」
				CASE 1
					PRINTFORML 「是这里吗？　应该是这里吧…」
				CASE 2
					PRINTFORML 「…这就是真相」
					PRINTFORML 「你理解这个异变发生的原因了吗？」
				CASE 3
					PRINTFORML 「你知道吗？　所谓管狐、就是只要给很多饭就会为你带来财富的好妖怪」
				ENDSELECT
				PRINTW
			ENDIF
		ENDIF
	;典 = 你
	ELSEIF ABL:139:教養 == ABL:MASTER:教養
		IF FIRSTTIME(SELECTCOM)
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「…我很惊讶。你真的很用功啊」
				PRINTFORML 「还是我不够努力学习呢…哎呀哎呀」
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%阁下真的很勤奋呢」
				PRINTFORML 「我也很勤奋吗？　哎呀呀～、这种程度的勤奋还是有的啦♪」
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「平时也在学习吗。真了不起」
					PRINTFORML 典温柔地摸了摸你的头
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%阁下竟然知道那个吗？　好厉害！」
					PRINTFORML 典微笑着为你鼓掌
				ENDSELECT
			ELSE
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「这里吗？　这里是…这样啊」
					PRINTFORML 「不不、不用客气」
				CASE 1
					PRINTFORML 「%CALLNAME:MASTER%阁下、你知道这个吗？」
					PRINTFORML 「嗯嗯、原来如此、两个人在学习上很有进展呢」
				ENDSELECT
				PRINTW
			ENDIF
		ENDIF
	;典 < 你
	ELSE
		IF FIRSTTIME(SELECTCOM)
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「…你连这种事都知道啊」
				PRINTFORML 「看来我也不得不虚心请教了呢」
			ELSE
				PRINTFORML 「虽然我对自己的知识很有自信、但我深深地感到自己是一只井底之蛙」
				PRINTFORML 「能请您指导一下典吗」
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SELECTCASE RAND:4
				CASE 0
					PRINTFORML 「对不起、果然还是典不够用功啊」
				CASE 1
					PRINTFORML 「原来如此…这意味着…」
				CASE 2
					PRINTFORML 「%CALLNAME:MASTER%阁下学识很渊博。我很佩服」
				CASE 3
					PRINTFORML 你学到了吗、摸了摸典的头
					PRINTFORML 「嗯～～、那明明是姐姐想为你做的…」
				ENDSELECT
				PRINTW
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%阁下的教学方法很容易理解」
					IF ABL:MASTER:話術技能 < 2
						PRINTFORML （就是有点难以听清…）
					ELSE
						PRINTFORML （教学方法竟然会有如此大的变化…难道是教师吗）
					ENDIF
				CASE 1
					PRINTFORML 典一反常态地认真听着%CALLNAME:MASTER%的说明
				CASE 2
					PRINTFORML 「我明白了…原来是这样啊」
				ENDSELECT
				PRINTW
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=甜点 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K139_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:TARGET:睡眠
	ELSEIF FLAG:70
	ELSE
		;固有料理
		IF DISHNAME == "きつねごはん"
			IF CFLAG:1010 == 0
				PRINTFORML 「嚯嚯、想向我学做料理吗。用心可嘉啊」
				PRINTFORML 「这样的话…那就来做狐狸米饭吧」
				PRINTW
				PRINTFORML 「油炸豆腐要先去油、根据个人的喜好来定」
				PRINTFORML 「最重要的是切成狐狸耳朵那样的三角形」
				PRINTW
				PRINTFORML 「胡萝卜最好切成细丝、只要不切得太厚就行」
				PRINTFORML 「之后还可以根据自己的喜好加入牛蒡和鸡肉」
				PRINTW
				PRINTFORML 「淘米、酒！　酱油！　甜料酒！　少许醋和盐」
				PRINTFORML 「然后把刚才做好的高汤倒进去」
				PRINTW
				PRINTFORML 「最后把切好的食材放上去煮」
				PRINTFORML 「做好了。很简单吧？」
				PRINTW
				PRINTFORML 「顺便一提、虽然是事先做好的」
				PRINTFORML 「我不太喜欢这个呢。因为过于朴素了」
				PRINTW
			ELSEIF STRCOUNT(DISH_TASTE, "練習")
				IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
					PRINTFORML 「…我必须现在教你吗？」
					PRINTFORML 「没办法啊…」
					PRINTW
				ELSE
					PRINTFORML 「你不是已经很熟练了吗？」
					PRINTFORML 「再过一会儿就可以完美制成了呢」
					PRINTW
				ENDIF
			;完成後
			ELSE
				PRINTFORML 「我想告诉你…其实我喜欢鸡蛋料理和肉类料理…」
				PRINTFORML 「我想吃[亲子盖饭]。下次做给我吃吧」
				PRINTW
			ENDIF
			CFLAG:1010 = 1
		ELSE
			IF TALENT:恋慕 || TALENT:恋人
				IF ABL:料理技能 == 0
					PRINTDATADL
						DATAFORM 「就交给典吧♪　…那个、请不要露骨地露出讨厌的表情」
						DATAFORM 「料理就是『火焰』！　火力才是烹饪中最重要的东西！」
						DATAFORM 「请交给我吧。虽然我从来没有拿过比筷子还重的东西、不过身为菅牧典的我会把料理做得十分出色的」
						DATAFORM 「一定要为%CALLNAME:MASTER%阁下准备美味的料理…！」
						DATAFORM 「把这个放进去吧！　绝对会很美味的♪」
					ENDDATA
				ELSEIF  ABL:料理技能 == 1
					PRINTDATADL
						DATAFORM 「我已经进步了一点！　请放心地交给我吧！」
						DATAFORM 次序虽然十分缓慢、但典是十分精心地准备的
						DATAFORM 典用双手做出♥的形状、似乎在对着料理传达着什么东西…
						DATAFORM 「这是在加微量的秘密佐料…不行吗？」
					ENDDATA
				ELSE
					IF ABL:料理技能 > ABL:MASTER:料理技能
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「交给典吧♪　让我来帮你做你想吃的料理吧♪」
						CASE 1
							PRINTFORML 「%CALLNAME:MASTER%阁下可以帮我准备一下吗？」
							PRINTFORML 「烹饪就交给典吧。让我来做一道%CALLNAME:MASTER%阁下喜欢的菜肴吧♪」
						CASE 2
							PRINTFORML 「这身打扮？　很奇怪吗」
							PRINTFORML 典换上了一套不知道从哪里掏出来的主妇服加三角巾的套装
						ENDSELECT
					;你の料理技能3以上
					ELSEIF ABL:料理技能 < ABL:MASTER:料理技能
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「典有什么可以帮忙的吗？」
							PRINTFORML 「这个吗？　我知道了！」
						CASE 1
							PRINTFORML 「这个给我？　交给我吧♪」
							PRINTFORML 能帮上%CALLNAME:MASTER%的忙、典似乎很高兴
						CASE 2
							PRINTFORML 「一点也没有浪费呢」
							PRINTFORML 典感叹着%CALLNAME:MASTER%精巧的手法
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「我们分头行动吧、这样做会更快」
						CASE 1
							PRINTFORML 「不好意思、这里可以拜托一下你吗？」
							PRINTFORML 「哇、不愧是%CALLNAME:MASTER%阁下♪」
						CASE 2
							PRINTFORML 「共同作业也很不错呢」
							PRINTFORML 「我们就像是夫妻一样♪」
							CALL ASK_YN("已经是夫妻了吧？","确实不错")
							IF !RESULT
								PRINTFORML 「咦！？　那个、你是认真的吗…？」
								PRINTFORML 「即使是開玩笑的…典也很幸福呢…%UNICODE(0x2665) *1%」
							ELSE
								PRINTFORML 「嘸嘸♪」
								PRINTFORML 典的尾巴呼呼地摇晃着
							ENDIF
						ENDSELECT
						PRINTW
					ENDIF
				ENDIF
			ELSE
				IF ABL:料理技能 < ABL:MASTER:料理技能
					IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「姐姐很期待%CALLNAME:MASTER%阁下做的料理哦♪」
							PRINTFORML 典一边托着腮、一边摇着尾巴
						CASE 1
							PRINTFORML 「想借助姐姐的力量吗？　这样啊、这样啊♪」
							PRINTFORML 「有什么需要帮助的尽管说出来吧♪　姐姐都会帮你做的♪」
						CASE 2
							PRINTFORML 「%CALLNAME:MASTER%阁下、真是太棒了」
							PRINTFORML 「姐姐为你感到自豪哦♪」
							PRINTFORML 典好像没怎么帮忙…
						ENDSELECT
						PRINTW
					ELSE
						SELECTCASE RAND:4
						CASE 0
							PRINTFORML 「唔ー、应该没有需要典出场的时候吧？」
							PRINTFORML 「需要帮忙？　我明白了」
						CASE 1
							PRINTFORML 「哎呀、您真是太棒了」
							PRINTFORML 典十分敬佩地看着%CALLNAME:MASTER%工作
						CASE 2
							PRINTFORML 「很期待完成品呢」
							PRINTFORML 典观察着%CALLNAME:MASTER%的手部动作说道
						CASE 3
							PRINTFORML 「%CALLNAME:MASTER%阁下、是做料理的人。而我、是吃料理的人」
							PRINTFORML 「我知道了。我这就来帮忙、请不要对我撒豆子啊」
						ENDSELECT
						PRINTW
					ENDIF
				ELSE
					IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
						SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「手要像猫的手一样灵活一些哦。要仔细看着手边哦。还有…」
							PRINTFORML 典唠叨个不停、告诉她这样会让自己分心后、典就垂头丧气的
						CASE 1
							PRINTFORML 「啊啊…这样不会切到手吗…」
							PRINTFORML 铛！
							PRINTFORML 「！！！　啊啊啊、那样很危险啊！　不行、不能这么粗暴地使用啊！」
							PRINTFORML 典罕见地乱了阵脚…
						ENDSELECT
					ELSE
						SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「%CALLNAME:MASTER%阁下、这里可以拜托一下你吗？」
						CASE 1
							PRINTFORML 「不好意思、这里可以拜托一下你吗？」
							PRINTFORML 「哇、不愧是%CALLNAME:MASTER%阁下♪」
						CASE 2
							PRINTFORML 「共同作业也很不错呢」
							PRINTFORML 「简直就像夫妻一样对吧？」
							PRINTW
							CALL ASK_YN("干脆结为夫妻吧？","是啊")
							IF !RESULT
								PRINTFORML 「其实结婚登记已经办好了哦ー%UNICODE(0x2665) *1%」
								PRINTFORML 「接下来%CALLNAME:MASTER%阁下只需要盖个图章就可以了♪」
								PRINTFORML 「啊哈哈、这是開玩笑的♪」
							ELSE
								PRINTFORML 「嗯ー、冷淡的回答」
								PRINTFORML 「不过、既没有否定也就是说、还是有希望的对吧？　啊好疼」
								PRINTFORML 因为典坏笑着朝你走来、所以你用萝卜的尾部戳了戳她的额头
							ENDIF
						ENDSELECT
						PRINTW
					ENDIF
				ENDIF
			ENDIF
		ENDIF
		;一緒に料理を作ったフラグ
		TCVAR:139:356 = 1
	ENDIF
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_K139_414
;成否判定
;TFLAG:192(-2=指令終了(非TARGET時強制失敗)、-1＝強制失敗、0=COM依存(非TARGET時強制成功)、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_414_1
RETURN RESULT

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

	;料理そのものに対する反応
	;分類分けは露米亜口上を参考にしています
	;基本的に好物と嫌いなもの
	;主食・軽食
	;CASE "料理：喜欢的味道"
		;肉料理*3/卵*3/油炸食品/甜*2/辣*2/
		;简易/淡白/豪華/上品/新鲜/粘稠/
	;CASE "料理：讨厌的味道"
		;"酸*2/濃厚/質素*2/野趣*2/"
	SELECTCASE DISHNAME
	;大好物１（DISH_TASTEが＋５以上）
	CASE "煎蛋巻" , "玉米汤" , "親子盖饭" , "蛋包饭" , "咖喱鱼" , "青蛙咖喱" , "担担麺"
		SELECTCASE DISHNAME
		CASE "煮鸡蛋" , "煎蛋巻" , "親子盖饭" , "蛋包饭"
			PRINTFORML 「果然、使用了大量鸡蛋的料理真是太棒了…♪」
			PRINTW
		CASE "咖喱鱼" , "青蛙咖喱" , "担担麺"
			PRINTFORML 「我很喜欢辣的料理呢ー♪」
			PRINTFORML 「这刺鼻的味道真让人受不了…♪」
			PRINTW
		CASE "玉米汤"
			PRINTFORML 「玉米的甜味和口感是最棒的。快来品尝吧♪」
			PRINTW
		ENDSELECT
	CASE "千原锅"
		PRINTFORML 「我最喜欢辣的火锅了。红色的锅底很鲜艳也很漂亮、食材也很丰富」
		PRINTW
	CASE "油淋鶏"
		PRINTFORML 「在肉块上加上辣的调味料不是最棒了吗。如果味道够浓就好了」
		PRINTW
	CASE "法式鹹派"
		PRINTFORML 「典喜欢吃甜的鸡蛋料理。这一点请记住哦♪」
	;好物（DISH_TASTEが＋３以上）
	CASE "司康餅"
		PRINTFORML 「因为味道香甜、所以我喜欢这个食物」
		PRINTW
	CASE "法式吐司"
		PRINTFORML 「把面包做成甜食的想法还挺有意思的呢。很合我胃口」
		PRINTW
	CASE "煎蛋吐司"
		PRINTFORML 「虽然看起来不符合典的口味、但不知为何却勾起了我的食欲」
		PRINTW
	CASE "漢堡" , "热狗" , "唐揚鸡" , "炸鸡" , "法兰克福"
		PRINTFORML 「我也不讨厌这类垃圾食品。因为里面都是肉啊」
		PRINTW
	CASE "卡路里棒"
		PRINTFORML 「虽然看起来很没意思…但我对甜食很着迷…」
		PRINTW
	CASE "葛切"
		PRINTFORML 「这光滑的外表、这充满高级感的甜度、葛切还真是好东西呢…」
		PRINTW
	CASE "红豆饭"
		PRINTFORML 「红豆的红色真鲜艳啊」
		PRINTW
	CASE "猪排饭"
		PRINTFORML 「把炸好的肉放在盖浇饭上…人类的想法真是太奇妙了」
		PRINTFORML 「在对饮食的执念这一点上、我们妖怪是敌不过人类的吧」
		PRINTW
	CASE "海鮮饭" , "寿司"
		PRINTFORML 「五颜六色的生鱼片。看起来非常鲜艳」
		PRINTFORML 「我并不是不喜欢鱼。只是对鱼的料理比较挑剔而已」
		PRINTW
	CASE "咖喱饭"
		PRINTFORML 「比起黏稠的咖喱、我还是最喜欢介于顺滑和中等之间的咖喱呢」
		PRINTFORML 「如果能放上煮鸡蛋的切片就更好了♪」
		PRINTW
	CASE "乌冬麺"
		PRINTFORML 「啊、多么上品的面条啊」
		PRINTFORML 「虽然只是面条、看起来却很通透」
		PRINTW
	CASE "关东煮"
		PRINTFORML 「麻烦请多给我一些鸡蛋！」
		PRINTW
	CASE "涮涮锅" , "寿喜烧"
		PRINTFORML 「请交给典来放肉吧♪」
		PRINTW
	CASE "燉菜" , "面包碗燉菜"
		PRINTFORML 「我很喜欢这个炖菜」
		PRINTFORML 「又甜又柔软…让人想再来几碗♪」
		PRINTW
	CASE "御好烧"
		PRINTFORML 「有面粉、有蔬菜、有肉…非常合理的料理呢」
		PRINTFORML 「可以根据自己的喜好来选择配料、这很棒」
		PRINTW
	CASE "麻婆茄子"
		PRINTFORML 「外观也很鲜艳、很能勾起食欲」
		PRINTW
	CASE "儿童午餐"
		PRINTFORML 「感到意外吗？　我喜欢这类料理」
		PRINTFORML 「因为里面不是放了蛋包饭吗！」
		PRINTFORML 「以及、为了让孩子们吃得更香、外观更鲜艳、调味也更甜」
		PRINTFORML 「这正是我的喜好」
		PRINTW
	CASE "年节菜"
		PRINTFORML 「真是华丽的外表啊」
		PRINTFORML 「吃了这个能带来好运就好了」
		PRINTW
	;嫌い１（DISH_TASTEが－２以下）
	CASE "飯団" , "涼拌菜" , "漬物" , "菜肉卷" , "竜田揚" , "文也鱼" , "味噌汤" , "猪肉蔬菜味噌汤"
		PRINTFORML 「虽然说好听点可以说是朴素、但确实外观不够讲究呢」
		PRINTW
	;嫌い２
	CASE "杯麵" , "盛的滿滿的飯" , "漬物大碗飯" , "炒麺"
		PRINTFORML 「做法简单、虽然这是个优点…但外观这么寒酸真的好吗…」
		PRINTW
	;大嫌い１（DISH_TASTEが－４以下）
	CASE "野菜沙拉" , "水煮蝗虫" , "蜂の子" , "鱼干" , "煮毛豆" , "盐烤鱼" , "盐烤青蛙"
		PRINTFORML 「我啊、实在是很不擅长面对这种朴实无华的料理…该说是看上去就完全没有食欲吧…」
		PRINTFORML 「要说为什么的话、因为想先通过华丽的外表来享受一下不是吗。外表啊、很重要哦」
		PRINTFORML 「如果忽视外表的话、再怎么美味我也不会去尝试的呢」
		PRINTFORML 「因为在拿起来尝试之前完全就是在浪费时间」
		PRINTW
	;大嫌い２
	CASE "梅干"
		PRINTFORML 「对不起、我最受不了这个了…」
		PRINTFORML 「不吃不行吗…呜呜…」
	CASEELSE
		PRINTFORML 「看起来很好吃呢。赶快開动吧」
		PRINTW
	ENDSELECT

	;甜点
	SELECTCASE DISHNAME
	;大好物１（DISH_TASTEが＋５以上）
	CASE "小蛋糕" , "巧克力蛋糕" , "薄烤饼" , "奶油蛋糕" , "派" , "蛋撻" , "马卡龙" , "可丽饼" , "奶油泡芙"
		PRINTFORML 「哇啊啊…！！」
		PRINTFORML 典的目光被眼前的%DISHNAME%给吸引住了
		PRINTW
	;大好物２
	CASE "芭菲" , "布丁" , "青蛙布丁" , "曲奇" , "甜甜圈" , "苹果糖" , "蜂蜜蛋糕" , "万圣节蛋糕" , "圣诞蛋糕"
		PRINTFORML 「这个可以吃吗！！」
		PRINTFORML 典似乎对甜品很着迷、一副垂涎欲滴的样子看着%DISHNAME%
		PRINTW
	;好物（DISH_TASTEが＋３以上）
	CASE "果凍" , "冰淇淋" , "馅蜜" , "羊羹" , "大福" , "栗金団" , "杏仁豆腐" , "水果拼盘" , "赏月団子"
		PRINTFORML 「看起来很好吃啊…嘛、真想快点尝尝」
		PRINTW
	;ふつう
	CASE "酸奶" , "団子" , "蒸馒头" , "草莓豆腐"
		PRINTFORML 「看起来又甜又好吃呢。期待实际吃起来的感受♪」
		PRINTW
	CASE "珍珠奶茶"
		IF TALENT:TARGET:胸圍 > 0
			PRINTFORML 「快看快看♪　%CALLNAME:MASTER%阁下♪　看看这个♪」
			PRINTFORML 典把珍珠奶茶的杯子放在胸上喝着…
			PRINTW
		ELSE
			PRINTFORML 「欸？　『珍珠奶茶挑战』？　那是什么东西？」
			PRINTFORML 「……我不做。换句话说、我做不到」
			PRINTFORML 「我不是说得很清楚了吗。我是绝对不会做的」
			PRINTW
		ENDIF
	ENDSELECT

	;跳蛋
	SELECTCASE DISHNAME
	;嫌い１（DISH_TASTEが－２以下）
	CASE "油炸跳蛋"
		PRINTFORML 「把跳蛋做成油炸食品…这可不是一般人的想法」
		PRINTFORML 「话说、跳蛋是一种食物吗？　从地里长出来的？　这样啊…」
		PRINTW
	;好物（DISH_TASTEが＋３以上）
	CASE "振动棒跳蛋冰淇淋"
		PRINTFORML 「这是一个像振动棒一样的、伪装成冰淇淋的旋转装置…」
		PRINTFORML 「我的大脑似乎一片混乱…」
		PRINTW
	;ふつう
	CASE "电动按摩风跳蛋湯引" , "飛機杯剪裁跳蛋水煮"
		PRINTFORML 「这是为惩罚游戏准备的吗？」
		PRINTW
	ENDSELECT

	;固有料理。主に妖怪之山勢
	SELECTCASE DISHNAME
	;◎大好物（DISH_TASTEが＋５以上）
	;極
	CASE "布丁セス甜点"
		PRINTFORML 「我觉得她的厨艺还不错。除了不喜欢鸡蛋这一点外」
		PRINTFORML 「顺便一提、我可以開始吃了吗？」
	;椛
	CASE "もみじ饅頭"
		PRINTFORML 「我和犬走小姐的喜好倒是相当相似呢」
		PRINTFORML 「啊、不过我们是狼和狐狸啊。相似也是应该的」
		PRINTFORML 「欸？　狼和狐狸是不吃甜品的吧？　嘛、那是另一回事啦♪」
	;百々世
	CASE "ドラゴン牛扒"
		PRINTFORML 「让人能够领略到百百世大人强大之处的料理吗」
		PRINTFORML 「如果一直吃这个、典也能变成大妖怪吗」
	;○好物（DISH_TASTEが＋３以上）
	;早苗
	CASE "痩馬（やしょうま）"
		PRINTFORML 「是巫女大人故乡的料理啊。看起来很高雅、我很喜欢」
	;諏訪子
	CASE "のたもち"
		PRINTFORML 「名字很微妙、豆子的绿色很鲜艳呢」
	;久侘歌
	CASE "ひよ子"
		PRINTFORML 「呀、好可爱！　不过、做这种二羽渡神用来喂小鸡的点心有些…」
	;千亦
	CASE "レインボー蛋撻"
		PRINTFORML 「感觉又漂亮又好吃的样子、不过感觉身体在发12种颜色的光」
	;ミケ
	CASE "小判焼き"
		PRINTFORML 「做了道对于猫妖来说非常讲究的东西呢」
	;▲嫌い（DISH_TASTEが－２以下）
	;藍
	CASE "お稲荷さん"
		PRINTFORML 「九尾大人做的料理可真够朴素的」
		PRINTFORML 「是不是被人类对狐狸的印象牵着鼻子走了？」
	;神奈子
	CASE "オンバシラ指揮棒"
		PRINTFORML 「确实是那种追求实际利益的人会考虑设计的外观呢」
		PRINTFORML 「实在是太过于没用了、吃它的乐趣也大大…」
		PRINTFORML 「如果将其包装得比较华丽再卖给信徒的话、说不定能赚很多钱呢」
	;荷取
	CASE "黄瓜のキューちゃん"
		PRINTFORML 「如此寒酸的外表真的能被称之为料理吗…」
	;龍。主ェ…
	CASE "大天狗の麦飯"
		PRINTFORML 「给你说个我一般不会说的秘密…我、其实不是很喜欢这道料理呢…」
		PRINTFORML 「虽然做出来的话我还是会吃…大概饭纲丸大人也是明知如此所以故意做的吧…」
	;×大嫌い（DISH_TASTEが－４以下）
	;たかね。ぶっちぎりで大嫌い
	CASE "グリーン沙拉"
		PRINTFORML 「说好听点这是来自大山的恩惠…」
		PRINTFORML 「但如果住在妖怪之山的话、并不是什么稀奇的东西…」
	ENDSELECT

	IF CFLAG:睡眠
		PRINTFORML
		RETURN 1
	;憤怒
	ELSEIF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
		IF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「…姐姐、可不会因为一顿饭就被哄開心啊」
				PRINTFORML 虽然这么说、但典还是把你做的料理一点不留地吃掉了…
			ELSE
				PRINTFORML 「…我開动了…」
				PRINTFORML  典虽然很生气、但还是不停地动筷吃着饭
			ENDIF
		ELSE
			PRINTFORML 「…我開动了…」
			PRINTFORML  典虽然很生气、但还是不停地动筷吃着饭
		ENDIF
		PRINTW
	;まずい
	ELSEIF TFLAG:193 == -1
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「…………」
				PRINTFORML 典露出了平时从未见过的表情…
			CASE 1
				PRINTFORML 「好难吃、好难吃…」
				PRINTFORML 典一边哭一边拼命地吃着难吃的饭…
			ENDSELECT
			PRINTW
		;それ以外
		ELSE
			;ショタには甘めな典ちゃん
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「呜呜、啊、刚刚是因为太过美味所以连话都…呕噗」
					PRINTFORML 典脸色苍白、拼命往嘴里送菜…
				CASE 1
					PRINTFORML 「那ー啥…这个、打包回去再吃可以吗？　不行？」
					PRINTFORML 典露出僵硬的笑容…
				CASE 2
					PRINTFORML 「唔ー嗯保守来说…」
					PRINTFORML 典假装自己在吃饭、同时悄悄把饭菜倒入垃圾桶…
					PRINTW
				ENDSELECT
			;ショタじゃないと辛辣な典ちゃん
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「也许地上的草会更好吃…」
				CASE 1
					PRINTFORML 「这是、用来送客的料理吗？」
				CASE 2
					PRINTFORML 「嗯ー这个果然是垃圾吧♪」
					PRINTFORML 典把料理扔进了垃圾桶…
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
	;おいしい
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「%CALLNAME:MASTER%阁下、如果能为姐姐这么做的话、我想姐姐会吃得更香哦」
					PRINTFORML 典张着嘴等着%CALLNAME:MASTER%喂她吃料理…
				CASE 1
					PRINTFORML 「姐姐感动得筷子都停不下来了…%UNICODE(0x2665) *1%」
					PRINTFORML 典以惊人的气势把眼前的菜吃得精光…
				ENDSELECT
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%阁下做的料理是最棒的♪」
				PRINTFORML 做了那么多料理、一转眼就快被吃完了…
			ENDIF
		;それ以外
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「这道菜很好地传达了你对姐姐的爱…♪　啊、不是吗？」
			ELSE
				PRINTFORML 「可以再添一碗吗♪　不管多少我都会吃下去♪」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_SUCCESS_COM_K139_415
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠
		PRINTFORML
		RETURN 1
	;憤怒
	ELSEIF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
		IF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「…姐姐、可不会因为一顿饭就被哄開心啊」
				PRINTFORML 虽然这么说、但典还是把你做的料理一点不留地吃掉了…
			ELSE
				PRINTFORML 「…我開动了…」
				PRINTFORML  典虽然很生气、但还是不停地动筷吃着饭
			ENDIF
		ELSE
			PRINTFORML 「…我開动了…」
			PRINTFORML  典虽然很生气、但还是不停地动筷吃着饭
		ENDIF
		PRINTW
	;まずい
	ELSEIF TFLAG:193 == -1
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「…………」
				PRINTFORML 典露出了平时从未见过的表情…
			CASE 1
				PRINTFORML 「好难吃、好难吃…」
				PRINTFORML 典一边哭一边拼命地吃着难吃的饭…
			ENDSELECT
			PRINTW
		;それ以外
		ELSE
			;ショタには甘めな典ちゃん
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「呜呜、啊、刚刚是因为太过美味所以连话都…呕噗」
					PRINTFORML 典脸色苍白、拼命往嘴里送菜…
				CASE 1
					PRINTFORML 「那ー啥…这个、打包回去再吃可以吗？　不行？」
					PRINTFORML 典露出僵硬的笑容…
				CASE 2
					PRINTFORML 「唔ー嗯保守来说…」
					PRINTFORML 典假装自己在吃饭、同时悄悄把饭菜倒入垃圾桶…
					PRINTW
				ENDSELECT
			;ショタじゃないと辛辣な典ちゃん
			ELSE
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「也许地上的草会更好吃…」
				CASE 1
					PRINTFORML 「这是、用来送客的料理吗？」
				CASE 2
					PRINTFORML 「嗯ー这个果然是垃圾吧♪」
					PRINTFORML 典把料理扔进了垃圾桶…
					PRINTW
				ENDSELECT
			ENDIF
		ENDIF
	;おいしい
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「姐姐感动得筷子都停不下来了…%UNICODE(0x2665) *1%」
				PRINTFORML 典以惊人的气势把眼前的菜吃得精光…
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%阁下做的料理是最棒的♪」
				PRINTFORML 做了那么多料理、一转眼就快被吃完了…
			ENDIF
		;それ以外
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「这道菜很好地传达了你对姐姐的爱…♪　啊、不是吗？」
			ELSE
				PRINTFORML 「可以再添一碗吗♪　不管多少我都会吃下去♪」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;416,演奏
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:使用楽器(1=電子琴 2=鋼琴 3=吉他 4=小號 5=小提琴)
;==================================================
@M_KOJO_SUCCESS_COM_K139_416
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 1
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「太棒了！　姐姐很感动哦！」
			PRINTFORML 典兴奋地为你鼓掌
		ELSE
			PRINTFORML 「……哈！？　没事没事、我完全被带入了音乐的世界里」
			PRINTFORML 「结束真是太可惜了」
		ENDIF
		PRINTW
	CASE 0
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「很不错哦♪　就是这个样子♪」
			PRINTFORML 典微笑着为你鼓掌
		ELSE
			PRINTFORML 「演奏得很不错呢。不由得听入迷了」
		ENDIF
		PRINTW
	CASE -1
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「啊哈哈、下次再加油吧」
			PRINTFORML 典垂下眉尾、报以热烈的掌声
		ELSE
			PRINTFORML 「多么前卫的音乐。题目是『阿鼻地狱』吧！？」
			PRINTFORML 明明演奏的是童谣…%CALLNAME:MASTER%如此想道
		ENDIF
		PRINTW
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;417,午睡をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔に接吻された 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処or阴茎揉み
;CFLAG:陪睡中(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K139_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_417_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
	CASE 0
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「欸嘿嘿…%CALLNAME:MASTER%…%UNICODE(0x2665) *1%　喜欢你哦…%UNICODE(0x2665) *1%」
			PRINTFORML 典露出不成体统的表情、一把抱住了%CALLNAME:MASTER%
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%」
			SELECTCASE RAND:5
			CASE 0
				PRINTFORML 「上当了呢…这是…陷阱、啊…」
				PRINTFORML 在梦中遭遇了怎样的痛苦呢
			CASE 1
				PRINTFORML 「已经吃不下了…♪」
				PRINTFORML 在梦中也仍然着迷于吃东西吗
			CASE 2
				PRINTFORML 「那是我的…呀啊啊啊…%UNICODE(0x2665) *1%」
				PRINTFORML 好像在做什么色情的梦…
			CASE 3
				PRINTFORML 「出荷よぉー…」
				PRINTFORML (´・ω・`)おほーっ
			CASE 4
				PRINTFORML 「绝不能喝下这个药…啊ー啊…喝下去了…♪」
				PRINTFORML 是什么药呢
			ENDSELECT
		ENDIF
		PRINTW
	CASE 1
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「嗯？　%CALLNAME:MASTER%阁下？」
			PRINTFORML 「明明天气这么适合睡觉ー、姐姐、还想再多睡会儿呢ー」
			PRINTFORML 典用脸在%CALLNAME:MASTER%的大腿上蹭来蹭去
		ELSE
			PRINTFORML 「啊欸？　我、睡着了吗？」
			PRINTFORML 「真是的、明明天气这么适合睡觉ー、真是坏心眼」
			PRINTFORML 典鼓起双颊表示抗议
		ENDIF
		PRINTW
	CASE 2
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「早上好♪　昨晚睡得好吗？」
			PRINTFORML 「对姐姐来说、如果能再睡一会儿就好了…%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORML 「早上好♪　昨晚睡得好吗？」
			PRINTFORML 「你问我是不是做了什么？　那么、我什么都没做♪」
		ENDIF
		PRINTW
	CASE 3
		IF TALENT:TARGET:恋慕 || TALENT:TARGET:愛欲
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「你好像醒了呢」
				PRINTFORML 「看到%CALLNAME:MASTER%阁下这么可爱的睡颜、真是让姐姐大饱眼福了…%UNICODE(0x2665) *1%」
			ELSE
				PRINTFORML 「你好像醒了呢」
				PRINTFORML 「我一直在看%CALLNAME:MASTER%阁下的睡颜呢。嗯嗯、一直哦♪」
			ENDIF
			PRINTW
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				PRINTFORML 「真是的、突然起来的话会吓到姐姐的」
				PRINTFORML （我还想再看看你的睡颜呢…）
			ELSE
				PRINTFORML 「请不要突然起来啊」
				PRINTFORML （一直默默地看着睡颜什么的、真的不太像是我的风格啊）
			ENDIF
			PRINTW
		ENDIF
	CASE 4
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「哎呀、你醒了吗？」
			PRINTFORML 「没关系哦、就这样再睡一会儿也可以」
			PRINTFORML 典一直温柔地抚摸着你的头、直到你意识清醒
		ELSE
			PRINTFORML 「哎呀、你醒了吗？」
			PRINTFORML 「嘸嘸、枕在典的大腿上睡得如何呢？」
		ENDIF
		PRINTW
	CASE 5
		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			PRINTFORML 「哎呀、起来了吗」
			PRINTFORML 「呼呼、因为刚刚感觉你睡得很香、实在忍不住想摸一摸♪」
			PRINTFORML 「明明没有意识却一颤一颤的样子实在是太可爱了…%UNICODE(0x2665) *1%」
		ELSE
			PRINTFORML 「哎呀、你醒了吗？」
			PRINTFORML 「问我在做什么、只是摸了摸某些东西而已♪」
			PRINTFORML 「不愿意的话、把我的手拍開也可以哦♪　哦呀、不打算拍開吗？　那么、就接着摸了哦♪」
		ENDIF
		PRINTW
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;421,祈願する
;条件が複雑なので、COMF421 祈願.ERBおよび、EVENT_MESSAGE_COM400.ERBの祈願するの項を参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K139_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:1008 == 2
		PRINTFORML 「嘸嘸、又想让我帮你自慰了吗？」
		CALL ASK_M("请求重新開始", 1,"保留", 1,"彻底结束", 1)
		SELECTCASE RESULT
		CASE 0
			PRINTFORML 「我明白了。那么、到了那个时候、我会来帮你的♪」
			CFLAG:1008 = 1
		CASE 1
			PRINTFORML 「是吗。有需要的话请再叫我」
		CASE 2
			PRINTFORML 「哎呀、那真是太遗憾了。您难道不喜欢吗？」
			PRINTFORML 「不过也不能勉强啊。那么、契约就这样终止了…」
			PRINTFORML 「谢谢您一直以来的关照」
			CFLAG:1008 = 3
		ENDSELECT
	ELSE
		IF CFLAG:睡眠 || CFLAG:陪睡中 || TCVAR:烂醉 || CFLAG:衰弱
			RETURN 1
		;この時点で恋慕
		ELSEIF FLAG:祈願内容 == 206 && FLAG:子宝祈願 == 139
			IF FIRSTTIME("子作り祈願")
				PRINTFORML 「%CALLNAME:MASTER%阁下、你许了什么愿呢？」
				PRINTFORML 老实地告诉典、希望能和典有个孩子
				PRINTW
				IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
					PRINTFORML 「%CALLNAME:MASTER%阁下…！」
					PRINTFORML 典眼眶湿润地抱住了%CALLNAME:MASTER%
					PRINTW
					PRINTFORML 「姐姐真的太高兴了！　%CALLNAME:MASTER%阁下竟然为我考虑了这种事情！」
					PRINTFORML 「生下来吧！　姐姐也想生下%CALLNAME:MASTER%阁下的孩子！」
					PRINTW
					PRINTFORML 知道心爱的%CALLNAME:MASTER%希望能有个孩子、典似乎又下定了决心…
					PRINTFORML 典拥有了[妊娠願望]
					PRINTW
					TALENT:139:妊娠願望 = 1
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%阁下…！　典真的很高兴…！」
					PRINTFORML 典睁大眼睛、一脸欢喜地抱住你
					PRINTW
					PRINTFORML 「您真的很爱典呢…%UNICODE(0x2665) *1%」
					PRINTFORML 「我也喜欢您%UNICODE(0x2665) *1%　努力地生孩子、建立一个真正的家庭吧%UNICODE(0x2665) *1%」
					PRINTW
					PRINTFORML 知道心爱的%CALLNAME:MASTER%希望能有个孩子、典似乎又下定了决心…
					PRINTFORML 典拥有了[妊娠願望]
					PRINTW
					TALENT:139:妊娠願望 = 1
				ENDIF
			ELSE
				IF TALENT:育児中
					PRINTFORML 「真是性急啊%UNICODE(0x2665) *1%」
					PRINTFORML 「不过、给%SHOW_CHILDNAME(139)%添个妹妹或弟弟、或许也不错呢…%UNICODE(0x2665) *1%」
					PRINTW
				ELSEIF !TALENT:妊娠
					IF EXP:出産経験 > 0
						PRINTFORML 「你又想要孩子了吗？」
						PRINTFORML 「嘸嘸、那么、接下来是第{EXP:出産経験 + 1}个孩子、一起加油吧…%UNICODE(0x2665) *1%」
					ELSEIF EXP:出産経験 == 0
						PRINTFORML 「%CALLNAME:MASTER%阁下、为我虔诚地祈祷着呢」
						PRINTFORML 「虽然我从来没有依靠过神佛、但作为妖怪的我、现在也想依靠一下」
						PRINTFORML 典在%CALLNAME:MASTER%身旁闭上眼睛、拼命向不知名的神祈祷着…
					ENDIF
					PRINTW
				ELSEIF TALENT:妊娠
					PRINTFORML 「上一个孩子还在肚子里就開始考虑生下一个孩子了吗…%UNICODE(0x2665) *1%」
					PRINTFORML 「肚子里的这个孩子会不愿意的哟。等这孩子的养育告一段落之后再说、好吗…%UNICODE(0x2665) *1%」
					PRINTW
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

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

;==================================================
;431,在浴室里放鬆
;TFLAG:209(4=人类之里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;TFLAG:194(1=連続入浴不可(表示しない可能性あり？
;==================================================
@M_KOJO_MESSAGE_COM_K139_431
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_431_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;432,在浴室里放鬆
;表示タイミングは入浴後なので、お浴室上がりでの
;TFLAG:209(4=人类之里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;==================================================
@M_KOJO_MESSAGE_COM_K139_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_432_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_432_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CHK_DATENOW(CFLAG:139:约会中)
		;CFLAG:TARGET:6 = 態度
		;態度 > 0 == 合意判定150以上（ATTITUDE.ERB参照）。恋慕ならその時点で達成
		;思慕や炮友でも親密、欲望LVが高かったり、不埒刻印などついてれば達成できるはず
		IF CFLAG:MASTER:現在位置 == 940 && CFLAG:TARGET:6 > 0
			PRINTFORMW 温泉事件…
			PRINTL
			CALL ASK_YN("看（典会有失去处女的可能性）","不看")
			IF !RESULT
				IF TCVAR:発情
					IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
						SETCOLOR 0xFF69B4
						CALL HPH_PRINT,@"「不可以哟HPH　不好好泡在里面的话会感冒的HPH」","L"
						RESETCOLOR
						PRINTFORML 典从后面抱住了%CALLNAME:MASTER%、紧紧贴了上来…
						IF TALENT:TARGET:胸圍 > 0
							PRINTL 拥有压倒性重量的柔软双乳
						ELSEIF TALENT:TARGET:胸圍 == -1
							PRINTL 虽然较小但很柔软的胸部
						ELSEIF TALENT:TARGET:胸圍 == -2
							PRINTL 看起来无法承载母乳的、硬挺挺的乳头
						ELSE
							PRINTL 外形良好的胸部
						ENDIF
						PRINTFORML 顶在了背上、让%CALLNAME:MASTER%小鹿乱撞…
						PRINTW
						BASE:MASTER:勃起 += 200
						IF BASE:MASTER:勃起 >= 1000
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「HPH」","L"
							RESETCOLOR
							PRINTFORML 眼尖发现了%CALLNAME:MASTER%正在勃起之中的典、用五根指头轻轻环握住那根东西后開始缓慢撸动起来
							PRINTW
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「怎么了？　发出了奇怪的声音HPH　泡澡的时候发出那种声音可不行哟HPH」","L"
							CALL HPH_PRINT,@"「小鸡鸡？　小鸡鸡、怎么了吗？HPH」","L"
							RESETCOLOR
							PRINTFORML 典似乎很享受%CALLNAME:MASTER%的反应、一边用手上下撸动一边注意着你的表情
							PRINTW
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「要出来了？　什么东西要出来了吗？　不好好说出来的话、姐姐、可不明白啊…HPH」","L"
							RESETCOLOR
							CALL ASK_YN("精子、出来了","白色的尿要出来了")
							IF !RESULT
							ELSE
							ENDIF
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「那、就停下咯～HPH」","L"
							RESETCOLOR
							PRINTFORML 典嗖的一下把手从濒临射精的阴茎上拿開了
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「把大家都要用的温泉、弄脏了可不行对吧？　所以、忍一忍吧HPH」","L"
							CALL HPH_PRINT,@"（啊啊、一副「为什么停下了？」的泫然欲泣的表情、做出那种表情可不行哟…HPH）","L"
							CALL HPH_PRINT,@"（姐姐、肚子里開始想要的停不下来了…HPHHPH）","L"
							RESETCOLOR
							PRINTW
							PALAM:潤滑 += 3000
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"（那么、该怎么办呢…HPH）","L"
							RESETCOLOR
							CALL ASK_M("用下面的嘴把精液全喝进去", EXP:膣射経験 > 0,"用上面的嘴把精液全喝进去", EXP:精飲経験 > 0,"用屁股把精液全喝进去", EXP:肛射経験 > 0,"果然还是忍一忍吧", 1)
							SELECTCASE RESULT
							;下のお口
							CASE 0
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「…要对浴场老板保密哟…HPH」","L"
								RESETCOLOR
								PRINTFORML 典把%CALLNAME:MASTER%推到在床上、然后跨在你身上、把食指贴在%CALLNAME:MASTER%的嘴唇上
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「你看…龟头、进去了…HPH」","W"
								CALL HPH_PRINT,@"「还没有全部进去哟…HPH　忍下忍下…HPH」","W"
								CALL HPH_PRINT,@"「全部、进来了…HPH」","L"
								RESETCOLOR
								SELECTCASE RAND:2
								CASE 0
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									SETCOLOR 0xFF69B4
									PRINTFORML 「啊嘞？　已经射出来了吗？」
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「只是插进去就射了什么的、和看上去不同完全是个弱鸡的杂鱼鸡巴呢…HPH」","L"
									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「只是插进去就射了什么的、和看上去一样完全是个弱鸡的杂鱼鸡巴呢…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「只是插进去就射了什么的、完全是个弱鸡的杂鱼鸡巴呢…HPH」","L"
									ENDSELECT
									CALL HPH_PRINT,@"「杂鱼鸡巴HPH　杂鱼鸡巴HPH　输给姐姐的小穴了吧HPH」","L"
									CALL HPH_PRINT,@"「但是%CALLNAME:MASTER%的杂鱼鸡巴、姐姐、最喜欢了…HPH」","L"
									RESETCOLOR
									PRINTFORML 被典在耳边呢喃一般辱骂着、像电流一般的快感从耳朵流入了全身、让你再次射精了
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「哇、哇HPH　又射出来了HPH　真是根没有节操的肉棒呢HPH」","L"
									CALL HPH_PRINT,@"「可以哟HPH　在姐姐的小穴里面、全部射出来吧…HPH」","L"
									CALL HPH_PRINT,@"「舒服的射精、再多来几次吧…HPHHPH」","L"
									RESETCOLOR
									PRINTFORML 被典温柔地抚摸着脑袋的同时、肉棒随着每次一颤一颤的跳动、都会把积蓄的精液全部在典的体内倾吐而出
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「已经可以熟练的射精了呢…HPH那么…」","W"
									CALL HPH_PRINT,@"「第2回合、開始吧HPH」","W"
									CALL HPH_PRINT,@"「问我为什么…因为姐姐、还没有高潮啊HPH」","W"
									CALL HPH_PRINT,@"「难道说%CALLNAME:MASTER%阁下、只顾着自己高潮却对姐姐不管不顾吗？HPH」","W"
									RESETCOLOR
									PRINTL [0]已经不行了
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「不做了吗？HPH」","W"
									RESETCOLOR
									PRINTL [0]已经不
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「你看、小鸡鸡还很有精神哟？HPH」","W"
									RESETCOLOR
									PRINTL [0]已经
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「那么、我就開动了ーHPH」","W"
									RESETCOLOR
									PRINTL [0]ｱｯｰ
									PRINTL
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊HPH　啊HPH　啊HPH」","L"
									RESETCOLOR
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊HPH去了HPH又去了HPH」","L"
									RESETCOLOR
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「小鸡鸡HPH　还好硬啊HPH　小孩子的小鸡鸡真是太棒了HPHHPH」","L"
									RESETCOLOR
									PRINTFORML 现在自己是怎样的丑态呢…
									PRINTFORML 感受着下半身融化的感觉、%CALLNAME:MASTER%開始打起了盹
									PRINTW
									EX:膣内精液 = 3000
								CASE 1
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「忍耐住了吗、了不起了不起HPH」","L"
									CALL HPH_PRINT,@"「『请等一下？』你在说什么呢、姐姐也已经忍耐到极限了哦HPH」","L"
									CALL HPH_PRINT,@"「不要乱动HPH　很快就会结束的HPHHPH」","L"
									RESETCOLOR
									PRINTW
									PRINTFORMW 典浮起腰、将快要到极限的阴茎从膣穴中拔出
									PRINTFORML 然后、又用力地将腰落下去
									CALL HPH_PRINT,@"嗞妞呜……呣啾！！HPHHPH","L"
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊啊啊HPH进来了HPH%CALLNAME:MASTER%的小鸡鸡HPH」","W"
									RESETCOLOR
									PRINTFORML 与刚才缓慢地插入不同、这次一下就直接突入到了最里端、典的后背一下就变成了弓形
									PRINTFORML 膣肉包裹住龟头的触感、令%CALLNAME:MASTER%不由得发出了没出息的声音
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊啊啊、好厉害……硬硬的一直进到最里面！　哦哦嗯、再动一下！HPH」","W"
									RESETCOLOR
									PRINTFORML 典一边淫荡地叫着、一边開始用双手揉搓自己的胸部
									PRINTFORML 她手指间夹着的乳头、已经十分坚硬地挺起来了
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「要出来了吗？ 快射出来吧！ 往里面注入一大堆精液吧！HPH」","W"
									RESETCOLOR
									PRINTFORML 下腹部用力拼命忍住射精、终于到了极限
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「拜托了！ 快点、快点射出来！HPH」","W"
									RESETCOLOR
									PRINTFORML 浴场里回响着典的尖叫。与此同时、膣穴開始剧烈痉挛
									PRINTFORML 被紧紧勒住的感觉、令%CALLNAME:MASTER%忍不住射精了
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									PRINTFORML %CALLNAME:MASTER%每次腰部向上顶撞释放时、脑髓都有麻痹般的快感
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊嗯HPH　热热的精液、从膣内咕噜咕噜地流出来了啊HPH」","W"
									CALL HPH_PRINT,@"「啊啊去了HPH　被中出到高潮了HPHHPH　啊HPH　──～～HPHHPH」","L"
									RESETCOLOR
									PRINTFORML 典似乎也一样。在发出非常高亢的悲鸣背部抽搐之后、
									PRINTFORML 精疲力竭地倒在了%CALLNAME:MASTER%的身上
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊哈…HPH　好舒服啊…HPH」","W"
									CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下觉得如何？　感觉舒服吗？HPH」","W"
									CALL HPH_PRINT,@"「嘸嘸、看你那表情和那副模样、似乎用不着问了呢…HPH」","L"
									RESETCOLOR
									PRINTW
									PRINTFORML 现在自己是怎样的丑态呢…
									PRINTFORML 感受着下半身融化的感觉、%CALLNAME:MASTER%開始打起了盹
									PRINTW
									EX:膣内精液 = 1000
								ENDSELECT
								PRINTW
								PRINTL ……
								PRINTL …
								PRINTW
								PRINTFORML %CALLNAME:MASTER%恢复意识后、感到脸上有凉爽的空气、后脑勺有柔软的触感
								PRINTFORML 模糊的视野变得清晰起来
								PRINTFORML 进入眼帘的、是面带温柔微笑扇着团扇的典
								PRINTW
								PRINTFORML 「你好像醒了呢」
								PRINTFORML 看来自己高潮之后就昏过去了
								PRINTW
								PRINTFORML 「姐姐、似乎让%CALLNAME:MASTER%阁下有些干劲过度了呢」
								PRINTFORMW 总的来说似乎干劲过度的人是典…
								PRINTFORML 你如此想道、但又觉得她可能会反驳、所以决定不说话
								PRINTW
								PRINTFORML 典用团扇遮住嘴、对着%CALLNAME:MASTER%耳语道
								PRINTFORML 「不过、在泡澡时H、感觉也不坏吧？」
								PRINTL
								CALL ASK_YN("……很舒服","……")
								IF !RESULT
									PRINTFORML 「真是个听话的孩子♪」
									PRINTFORML 典微微一笑、摸了摸%CALLNAME:MASTER%的头
									PRINTW
								ELSE
									PRINTFORML 「啊ー、不诚实的孩子将来会变成坏大人的哟？」
									PRINTFORML 老实说不想被典这么说…但不知道对方会反驳什么、所以决定还是闭上嘴
									PRINTW
									PRINTFORML 「在变得诚实之前、今后每天都去温泉吧…♪」
									PRINTFORML 身体还能吃得消吗…%CALLNAME:MASTER%有些不安起来…
									PRINTW
								ENDIF
							;口交（上のお口）
							CASE 1
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「那么、就坐在那里吧…HPH　现在要用嘴来做了哟HPH」","L"
								PRINTFORML 典让%CALLNAME:MASTER%坐在温泉的边缘、把脸埋在他的股间
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「我会用很多种方式来欺负你的哟…HPH」","L"
								RESETCOLOR
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"啾嗯HPH　啾嗯HPH　","L"
								CALL HPH_PRINT,@"啾嗯HPH　啾嗯嗯嗯嗯嗯HPH　","L"
								CALL HPH_PRINT,@"「嗯HPH　嗯唔HPH　嗯HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典把%CALLNAME:MASTER%的阴茎含在嘴里、一边动着舌头一边開始用手指刺激起自己
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"（%CALLNAME:MASTER%的小鸡鸡、好硬…HPH　小孩子的小鸡鸡真是太棒了…HPH）","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典的口腔里热乎乎的、嘴唇和舌头的动作毫不停顿
								PRINTFORML 平时以「姐姐」形象示人的她、现在却变成了一只雌性淫兽
								PRINTW
								PRINTFORML 在这种可以说是暴力的快感的波涛中、%CALLNAME:MASTER%眨眼之间就已经快要到极限
								PRINTFORML 典也察觉到了这一点、開始更加激烈地动了起来
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"啾噗HPH啾噗HPH啾噗HPH啾噗HPH","L"
								CALL HPH_PRINT,@"嘎噗HPH嘎噗HPH嘎噗HPH嘎噗HPH","L"
								RESETCOLOR
								PRINTW
								SIF TALENT:TARGET:胸圍 > 0
									PRINTFORML 每当典的头上下晃动、她丰满的胸部就会剧烈晃动
								PRINTFORML 典松開嘴后、開始用舌尖像滚动一样爱抚起%CALLNAME:MASTER%的乳头
								PRINTFORML 其间她的手也没有停下
								PRINTW
								PRINTFORML 典用舌头从乳头、肚脐、下腹部等移动、再次将即将发射的肉棒含在嘴里
								PRINTFORML 典用力吮吸肉棒的同时、%CALLNAME:MASTER%感觉全身有电流一样的东西流过、就这样在典的口中达到了高潮
								PRINTW
								PRINTL 噼呦噜噜、哔咕哔咕
								PRINTL 　　哔呦ーーー、哔呦ーーー
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「嗯唔HPH　嗯嗯HPH」","W"
								CALL HPH_PRINT,@"「咕ーーーーーーーHPH　呼ーーーーーーーHPH」","W"
								CALL HPH_PRINT,@"「嗯、哈啊啊…HPH　多谢款待…HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典张開嘴、把口腔内堆积的精液充分展示出来
								PRINTFORML 随后闭上嘴、慢慢地咽下去
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊哈HPH　全部都喝下去了呢HPH」","W"
								CALL HPH_PRINT,@"「但是还有些精液残留在尿道里…HPH」","L"
								CALL HPH_PRINT,@"「你看、轻轻一吸就吸出来了哦HPH　就是因为太浪费了所以才要吮吸出来啊HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 还没来得及阻止、典就又吻上了敏感的阴茎、吸了起来
								PRINTFORML %CALLNAME:MASTER%慌忙起身、想要按住典、
								PRINTFORML 典推開他的手、继续吮吸着%CALLNAME:MASTER%的阴茎
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"啾嗯HPH　啾嗯HPH　","L"
								CALL HPH_PRINT,@"咕呼HPH　咕呼HPH　咕呼HPH","L"
								CALL HPH_PRINT,@"「又变大了呢HPH　明明刚刚才射出来那么多…HPH」","L"
								RESETCOLOR
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"噗啵HPH　咕噜咕噜HPH","L"
								RESETCOLOR
								PRINTFORML 典一边轻咬着玉袋、一边上下撸动着颤抖的肉棒
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「雄臭比刚才还浓了…HPH　姐姐光是闻着就要晕过去了呢…HPH」","L"
								CALL HPH_PRINT,@"「出来的时候请告诉我哦HPH　我会用嘴全部喝下去的…HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「要出来了吗？　好的HPH　快射出来吧HPH」","L"
								RESETCOLOR
								PRINTFORML 典再次把即将发射的肉棒含在嘴里、上下摇动着头
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"啾噗HPH啾噗HPH啾噗HPH啾噗HPH","L"
								CALL HPH_PRINT,@"啾噗HPH啾噗HPH啾噗HPH啾噗HPH","L"
								RESETCOLOR
								PRINTFORML 典用力吮吸肉棒的同时、%CALLNAME:MASTER%感觉全身有电流一样的东西流过、就这样在典的口中达到了高潮
								PRINTW
								PRINTL 噼呦噜噜、哔咕哔咕
								PRINTL 　　哔呦ーーー、哔呦ーーー
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「HPH　HPHHPH」","W"
								CALL HPH_PRINT,@"「嗯、呼…嗯嗯…HPH　虽然是第二次、但还是很浓呢…HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「不过、似乎已经无法勃起了呢…出了浴室之后休息一下吧HPH」","L"
								RESETCOLOR
								PRINTFORMW 典戳了戳已经完全萎缩变小的阴茎、轻轻地笑了
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「等恢复精神的时候、再让它biubiu地射出来吧…HPH」","L"
								RESETCOLOR
								PRINTW
							;肛門性交
							CASE 2
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「不能弄脏温泉呢…是啊HPH」","L"
								CALL HPH_PRINT,@"「坐在这边吧…HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典跨到你身上、用力扶着肉棒、将其引向秘裂后面的穴…对准了菊穴
								PRINTFORML 然后慢慢地坐下来
								PRINTW
								CALL HPH_PRINT,@"咕嗯HPH","L"
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「嗯呼……啊啊嗯……进来了……HPH」","L"
								CALL HPH_PRINT,@"「欸嘿嘿……感觉如何？舒服吗？HPH」","L"
								RESETCOLOR
								PRINTW
								IF TALENT:尻穴狂
									PRINTFORMW 把%CALLNAME:MASTER%精液榨尽的典的菊穴、是足以给%CALLNAME:MASTER%带来快乐的名器
									PRINTFORML 肛交这种在一般情况下是不可能发生的行为、但被改造成第二性器的典的肠内却在不停地蠕动、
									PRINTFORML 分泌大量的肠液、促进%CALLNAME:MASTER%的射精
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"啾噜HPH　啾噜HPH啾噜HPH　啾噜HPH","L"
									CALL HPH_PRINT,@"「啊啊！好厉害啊！HPH　小孩子的小鸡鸡、硬硬的真是太棒了HPHHPH」","L"
									RESETCOLOR
									PRINTW
									PRINTFORML 从一開始就毫不留情的逆强奸活塞运动
									PRINTFORML 典拼命地扭动着腰。%CALLNAME:MASTER%也被这种快感所摆布、无意识地挺起腰
									PRINTW
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「看见了吗HPH　%CALLNAME:MASTER%阁下的大鸡鸡、被菊穴吃进去了哦HPH」","L"
										CALL HPH_PRINT,@"「还是老样子呢、虽然是个孩子却有这么大的鸡鸡…HPH」","L"
										CALL HPH_PRINT,@"「姐姐的菊穴、都已经变成%CALLNAME:MASTER%阁下的形状了呢HPH」","L"
									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「啊唔HPH　啊啊唔HPH　好厉害HPH」","L"
										CALL HPH_PRINT,@"「小鸡鸡在姐姐的菊穴里不断顶撞着HPH」","L"
										CALL HPH_PRINT,@"「再继续HPH　再继续抽插姐姐的菊穴吧HPHHPH」","L"
										PRINTW
									CASE 5;イボ付き
										CALL HPH_PRINT,@"「啊、啊啊啊HPH　屁股里被刮来刮去的HPH」","L"
										CALL HPH_PRINT,@"「明明是个孩子、却有这么凶恶的鸡鸡HPH」","L"
										CALL HPH_PRINT,@"「呼唔ーーHPH　呼唔ーーHPH　里面被不断地搅弄着HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「啊啊～！好、好厉害！这个大小能顶到肚子最里面哟！HPH」","L"
										CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的小鸡鸡真的很大呢HPH」","L"
									ENDSELECT
									PRINTW
									PRINTFORML 典的肠内
									PRINTFORML 下腹部用力拼命忍住射精、终于到了极限
									PRINTFORML %CALLNAME:MASTER%挺直了脚尖、脑子里只想着射精
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「要出来了吗？ 快射出来吧！ 往里面注入一大堆精液吧！HPH」","W"
									RESETCOLOR
									PRINTFORML 浴场里回响着典的尖叫。与此同时、肠内和肛門開始剧烈收缩
									PRINTFORML 在肉竿和龟头同时被收紧之前、%CALLNAME:MASTER%忍不住射精了
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊去了HPH　去了HPH　啊HPH　────～～～～～HPHHPHHPHHPH」","L"
									CALL HPH_PRINT,@"「哦HPH　又去了HPH　哦HPH　哦哦HPH　哦哦哦～～～～～～HPHHPH」","L"
									RESETCOLOR
									PRINTFORML 同时典也迎来了高潮。典仰起身子喷出了盛大的潮吹、直到高潮结束
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊…HPH　哈、啊啊啊…HPH」","L"
									CALL HPH_PRINT,@"（用小孩子的小鸡鸡盛大地高潮了呢…HPH）","L"
									CALL HPH_PRINT,@"（啊哈哈…%CALLNAME:MASTER%因为我而变得湿漉漉的了呢…HPH）","L"
									RESETCOLOR
								;肛門性交・尻穴狂無
								ELSE
									PRINTFORML 典的菊穴非常温暖、不由得叫出了声来
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「姐姐也变得舒服起来了呢……HPH」","L"
									RESETCOLOR
									PRINTFORML 说着、典開始动起了腰部
									PRINTW
									PRINTFORML 咕啵、咕啵、咕啵、咕啵…
									SETCOLOR 0xFF69B4
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"「呼、唔、唔呣HPH」","L"
										CALL HPH_PRINT,@"「还是老样子呢、虽然是个孩子却有这么大的鸡鸡…HPH」","L"
										CALL HPH_PRINT,@"「菊穴似乎都要变不回原样了…HPH」","L"
									CASE 1,2;粗チン
										CALL HPH_PRINT,@"「啊唔HPH　啊啊唔HPH　好厉害HPH」","L"
										CALL HPH_PRINT,@"「小鸡鸡在姐姐的菊穴里不断顶撞着HPH」","L"
										PRINTW
										CALL HPH_PRINT,@"（用菊穴侵犯刚開始精通的小孩子鸡鸡什么的…HPH）","L"
										CALL HPH_PRINT,@"（光是这种背德感就足以让我高潮了…HPH）","L"
									CASE 5;イボ付き
										CALL HPH_PRINT,@"「啊、啊啊啊HPH　屁股里被刮来刮去的HPH」","L"
										CALL HPH_PRINT,@"「明明是个孩子、却有这么凶恶的鸡鸡…HPH」","L"
									CASEELSE
										CALL HPH_PRINT,@"「啊啊～！好、好厉害！这个大小能顶到肚子最里面哟！HPH」","L"
										CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的小鸡鸡真的很大呢HPH」","L"
									ENDSELECT
									PRINTW
									PRINTFORML 下腹部用力拼命忍住射精、终于到了极限
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「要出来了吗？ 快射出来吧！ 往里面注入一大堆精液吧！HPH」","W"
									RESETCOLOR
									PRINTFORML 浴场里回响着典的尖叫。与此同时、肠道内開始收缩起来
									PRINTFORML 被紧紧勒住的感觉、令%CALLNAME:MASTER%忍不住射精了
									PRINTW
									PRINTL 噼呦噜噜、哔咕哔咕
									PRINTL 　　哔呦ーーー、哔呦ーーー
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊啊啊！　出来了！　热热的精液射进来了啊！HPH」","L"
									RESETCOLOR
									PRINTFORML 同时典也迎来了高潮。她全身战栗、品味着热腾腾的精液流入肠内的感觉
									PRINTW
									SETCOLOR 0xFF69B4
									CALL HPH_PRINT,@"「啊…HPH　哈、啊啊啊…HPH」","L"
									CALL HPH_PRINT,@"（小鸡鸡在菊穴里反复抽插、注入精液的感觉…好喜欢HPH）","L"
									RESETCOLOR
								;肛門性交素質分岐終わり
								ENDIF
								PRINTW
								CALL HPH_PRINT,@"「嗯HPH　拔出来吧HPH」","L"
								RESETCOLOR
								PRINTFORML 失去硬度的阴茎从典的菊穴中嗖的一声脱落、贴在了%CALLNAME:MASTER%的下腹上
								PRINTFORML 典慌忙把手放在屁股上、接住从菊穴中流出来的精液
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「差点把温泉弄脏了呢…这是安全措施哦HPH」","W"
								CALL HPH_PRINT,@"「嘸嘸、舒服吗…HPH」","L"
								CALL HPH_PRINT,@"「姐姐也很舒服呢…HPH」","L"
								PRINTW
								PRINTFORML 「待得有点久了。差不多该走了吧」
								CALL HPH_PRINT,@"「想继续的话、就去别的地方吧、呐…HPH」","L"
								RESETCOLOR
								PRINTW
							;やっぱり我慢
							CASE 3
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「不要做出那种表情…HPH　下次開始就不能一起泡温泉了哦…HPH」","L"
								CALL HPH_PRINT,@"「不过、从温泉出来后、去情人旅馆做些舒服的事吧…HPH」","W"
								CALL HPH_PRINT,@"「姐姐、会让%CALLNAME:MASTER%阁下多多高潮的…HPH」","W"
								RESETCOLOR
								PRINTFORML 典用一只手的手指做成圆环的形状、又用另一只手的食指做了个对着那里反复进出的动作给你看…
								PRINTFORML 想象一下今后和典的性生活、%CALLNAME:MASTER%的股间变得更硬了
								PRINTW
								BASE:MASTER:勃起 += 500
							ENDSELECT
						;ショタ・勃起ていない
						ELSE
							SETCOLOR 0xFF69B4
							PRINTFORML 「…………」
							PRINTFORMW （明明都用胸部这样挤压了、别说推倒了、连勃起都没有…）
							PRINTFORML （%CALLNAME:MASTER%应该不是性无能吧？）
							PRINTFORMW （只有我一个人发情了什么的…总有种、输了的感觉啊…）
							RESETCOLOR
							PRINTW
							PRINTFORML 之后、两个人泡在了热腾腾的温泉里…
							PRINTW
						ENDIF
					;大人の反応
					ELSE
						IF BASE:MASTER:勃起 >= 1000
							IF !TALENT:処女
								PRINTL
								CALL HPH_PRINT,@"啪HPH　啪HPH　啪HPH　啪HPH　","L"
								CALL HPH_PRINT,@"啪HPH　啪HPH　啪HPH　啪HPH　啪HPH","W"
								PRINTL
								CALL HPH_PRINT,@"　　　哦HPH","L"
								CALL HPH_PRINT,@"　　　　　哦HPH","L"
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「为什么泡澡之前小鸡鸡就勃起了呢HPHHPH」","L"
								CALL HPH_PRINT,@"「几乎像在说HPH“请让我插进小穴”一样在眼前勃起了HPH」","L"
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下也想这么做吧HPH」","L"
								RESETCOLOR
								PRINTL
								CALL HPH_PRINT,@"　　　哈HPH","L"
								CALL HPH_PRINT,@"　　　　　　　　哈HPH","L"
								PRINTW
								PRINTFORML 只剩下两个人的时候、典推倒了%CALLNAME:MASTER%、開始以骑乘位侵犯起来
								PRINTFORML 典的膣穴已经湿润、做好了迎接雄性的准备
								PRINTW
								SETCOLOR 0xFF69B4
								SELECTCASE TALENT:MASTER:形状
								CASE 6,10;巨根、馬並み
									CALL HPH_PRINT,@"啊──～～～～HPH","L"
									CALL HPH_PRINT,@"　　　啊──～～～～HPH","L"
									PRINTL
									CALL HPH_PRINT,@"「哦咕呜HPH　哈哦HPH　」","L"
									CALL HPH_PRINT,@"「子宫HPH　要被顶坏了HPHHPH」","L"
								CASE 1,2;粗チン
									CALL HPH_PRINT,@"「啊唔HPH　啊啊嗯HPH　来再加把劲HPH」","L"
									CALL HPH_PRINT,@"「像小孩子一样地肉棒HPH　再往里面塞一些HPH」","L"
									PRINTW
								CASE 5;イボ付き
									CALL HPH_PRINT,@"「啊、啊啊啊HPH　小穴里被刮来刮去的HPH」","L"
									CALL HPH_PRINT,@"「疙疙瘩瘩地蹭着HPH　疙疙瘩瘩的好喜欢…！HPH」","L"
								CASEELSE
									CALL HPH_PRINT,@"「啊啊HPH　接着往上顶！HPH」","L"
									CALL HPH_PRINT,@"「好想被%CALLNAME:MASTER%阁下的鸡巴、一直这样干下去HPH」","L"
								ENDSELECT
								CALL HPH_PRINT,@"「呀啊HPH　已经去了HPH　发小穴高潮了HPHHPH」","L"
								CALL HPH_PRINT,@"「请HPH　请把精液往我的子宫里满满地射出来HPHHPH」","L"
								PRINTW
								RESETCOLOR
								PRINTFORML 为了不辜负典的期待、从下面竭尽全力往上冲刺、仿佛要贯穿子宫一般
								PRINTFORML 所带来的冲击、让典的屁股不停在空中上下舞动
								PRINTW
								CALL HPH_PRINT,@"啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH","L"
								CALL HPH_PRINT,@"啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH","L"
								PRINTL
								CALL HPH_PRINT,@"「去了HPH去了去了HPH　去了啊啊啊～～～HPHHPH」","L"
								CALL HPH_PRINT,@"　　　　HPH%UNICODE(0x2665) *1%","L"
								CALL HPH_PRINT,@"「～～～～────────────HPHHPH」","L"
								CALL HPH_PRINT,@"　　HPH　　　　　　　%UNICODE(0x2665) *1%HPH","L"
								PRINTW
								PRINTFORML 咚咻噜！！
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊啊啊啊～～～！！！HPHHPHHPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 嘟咕……嘟咕唔……咚噼呦…………
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「嗯哦哦哦哦HPHHPHHPH 好厉害HPH 又射了HPHHPHHPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 咚噗……咚噗……咚噗……咚噼呦……
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「咿咿咿咿HPHHPHHPH 去了HPH　又去了啊HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 嘟咕……嘟咕唔……嘟咕……嘟咕唔……
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「不行HPH　要被弄坏了HPH　肚子要被弄坏了HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 咕噼呦…
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊HPH　哦HPH　好难受…HPH　去了呜…HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTL ……
								PRINTL …
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊～～HPH　啊HPH　啊啊HPH　啊～～HPH」","L"
								RESETCOLOR
								PRINTFORML 典精疲力竭地仰面朝天、从她的股间里流出大量混合着爱液和精液的液体
								SIF TALENT:TARGET:胸圍 > 0
									PRINTFORML 丰满的胸部无法抵抗自重、開始左右下垂
								PRINTW
								PRINTFORML 让表情呆滞的典吮吸同样沾满爱液和精液的阴茎
								PRINTFORML 虽然已经精疲力竭了、但典还是充满奉仕精神地吮吸着龟头、将上面的污秽舔净
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「呼～～～～HPH　HPHHPH　噗ーーHPH」","L"
								CALL HPH_PRINT,@"「…HPH　嗯HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「哈…变得干净了呢…HPH」","L"
								CALL HPH_PRINT,@"「真的…真是太棒了…HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「子宫里、被%CALLNAME:MASTER%阁下的精液填充得满满的…HPH」","L"
								CALL HPH_PRINT,@"「啊啊…有些流出来了…真是可惜…HPH」","L"
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「…HPH」","W"
								CALL HPH_PRINT,@"「那个、%CALLNAME:MASTER%阁下、虽然非常抱歉…HPH」","W"
								CALL HPH_PRINT,@"「但你看起来还很精神…可以继续做吗…HPH」","L"
								PRINTW
								RESETCOLOR
								PRINTFORML 典抱住膝盖、把双腿大张成M字、然后抬起腰来
								PRINTFORML 股间滴落着爱液和精液的秘裂刺激着你的欲望
								PRINTW
								PRINTFORML 这下子看来是暂时没法解放了…
								PRINTFORML %CALLNAME:MASTER%把进入临战状态的肉棒再度插入了典…
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊啊啊啊嗯HPH　十分感谢HPH　啊嗯HPH　啊嗯HPH」","L"
								RESETCOLOR
								PRINTW
								EX:膣内精液 += 1500
							;処女
							ELSE
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「哈啊…好暖和啊…HPH」","L"
								RESETCOLOR
								PRINTFORML 典被%CALLNAME:MASTER%从背后抱着、享受着温泉
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「一直都觉得地底的温泉没有什么大不了的地方所以很不屑一顾、没想到、还是挺…HPH」","L"
								CALL HPH_PRINT,@"「谢谢你带我来这么好的地方HPH」","L"
								RESETCOLOR
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"（%CALLNAME:MASTER%、一直紧贴着我、闻我的气味并亲吻我的脖子…HPH）","L"
								CALL HPH_PRINT,@"（%CALLNAME:MASTER%、也和我一样兴奋吗…？HPH）","L"
								PRINTW
								PRINTFORML 典柔软的臀部、被一根又硬又翘的肉棒抵住了
								PRINTFORML 肉棒在屁股上来回摩擦
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"（肉棒变得这么硬、还在屁股上来回摩擦…HPH）","L"
								CALL HPH_PRINT,@"（似乎是在诉说着想插进我的小穴里、并在膣内中出呢…HPH）","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典张開双腿、故意稍微站起身来
								PRINTFORML 这样一来、就能故意做些什么
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"（啊哈、双腿被抱起来了…HPH）","L"
								CALL HPH_PRINT,@"（那里有一个又硬又热的东西在摩擦着…HPH）","L"
								PRINTW
								CALL HPH_PRINT,@"（现在我的处女就要被夺走了…HPH）","L"
								CALL HPH_PRINT,@"「啊…HPH」","L"
								RESETCOLOR
								PRINTFORML 典为即将发生的事而激动不已
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「那个ー…HPH　%CALLNAME:MASTER%阁下…？HPH」","L"
								CALL HPH_PRINT,@"「我的股间被一个硬硬的东西碰到了…HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「错觉…？　自己只是在享受温泉…？HPH」","W"
								CALL HPH_PRINT,@"「…………HPH」","W"
								CALL HPH_PRINT,@"「是、是这样啊…HPH　只是我的错觉而已…HPH」","L"
								PRINTW
								RESETCOLOR
								PRINTFORML 龟头咯吱咯吱地插进阴道里
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊…啊、嗯……HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 插入暂时停止、感觉有什么东西被撕碎了
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「嗯、唔、咿……HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 终于、%CALLNAME:MASTER%的阴茎连根带茎全部插入了典的膣穴里
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「噢、噢噢噢噢……HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典并没有感觉到破瓜的疼痛。一看表情就一目了然
								PRINTFORML 因为发情的原因快感也增大了、疼痛也变成了一部分快乐
								PRINTW
								TCVAR:139:破瓜 = 1
								TALENT:処女 = 0
								SETCOLOR 0xFF69B4
								SELECTCASE TALENT:MASTER:形状
								CASE 6,10;巨根、馬並み
									CALL HPH_PRINT,@"（处女小穴HPH　被大鸡巴插进来了…HPHHPH）","L"
									CALL HPH_PRINT,@"（被这样HPH　挤进挤出的HPHHPH）","L"
								CASE 1,2;粗チン
									CALL HPH_PRINT,@"（是因为很小吗、好像没有那么痛…HPH）","L"
									CALL HPH_PRINT,@"（像小孩子一样的杂鱼鸡巴、好可爱好喜欢…HPH）","L"
								CASE 5;イボ付き
									CALL HPH_PRINT,@"（咕呜呜、疙瘩的颗粒感、太强了…HPH）","L"
									CALL HPH_PRINT,@"（这种东西、插进处女穴里是不行的吧…HPH）","L"
								CASEELSE
									CALL HPH_PRINT,@"（无论硬度还是长度都无可挑剔HPH）","L"
									CALL HPH_PRINT,@"（明明才刚插进来、相性、却似乎、非常好…HPHHPH）","L"
								ENDSELECT
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「什、什么都没有…HPH」","L"
								CALL HPH_PRINT,@"「只是温泉太舒服了、所以发出了点声音罢了…HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"呣噗…HPH　呣噗…HPH","L"
								CALL HPH_PRINT,@"　　　呣噗…HPH　　呣噗…HPH","L"
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「没错、肯定不是因为做爱…HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"呣噗HPH　呣噗HPH","L"
								CALL HPH_PRINT,@"　　　呣噗HPH　　呣噗HPH","L"
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「只不过、跨坐在%CALLNAME:MASTER%阁下的肉棒上面而已…HPH」","L"
								CALL HPH_PRINT,@"「只不过、是肉棒大人在和小穴打招呼而已…HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"嗞啾HPH　嗞啾HPH","L"
								CALL HPH_PRINT,@"　　　嗞啾HPH　　嗞啾HPH","L"
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"　　　「啊──～～～～HPH」","L"
								CALL HPH_PRINT,@"　　　　　　「啊──～～～～HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"卟啾HPH　奴卟HPH　奴卟HPH","L"
								CALL HPH_PRINT,@"　　　奴卟HPH　卟啾HPH　奴卟HPH","L"
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「HPH嗯HPH哦HPH　啊HPH　啊啊HPH　啊HPH」","L"
								CALL HPH_PRINT,@"（十指相扣着做爱HPH　好舒服HPHHPH）","L"
								CALL HPH_PRINT,@"　　　「咿HPH　啊HPH啊──～～～～HPH」","L"
								CALL HPH_PRINT,@"（仅仅是先走汁就把穴内弄得湿湿滑滑的了HPHHPH）","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"呣啵……咚啾HPH","L"
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「唔咿咿HPH」","L"
								CALL HPH_PRINT,@"（里面HPH　一瞬间像要飞起来一样HPHHPH）","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"啪HPH啪HPH啪HPH啪HPH啪HPH","L"
								CALL HPH_PRINT,@"啪HPH啪HPH啪HPH啪HPH啪HPH","L"
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊HPH啊HPH啊HPH啊HPH」","L"
								CALL HPH_PRINT,@"「去了HPH去了呜HPHHPH啊────～～～～HPH」","L"
								CALL HPH_PRINT,@"（肉棒開始膨胀了HPH　来了HPH　要被播种了HPH）","L"
								CALL HPH_PRINT,@"（在刚失去处女的小穴、要被毫不留情地射精了HPHHPH）","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"咚噗HPH","L"
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「哦HPH啊HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"卟哔呦HPH　卟哔呦哔呦HPH","L"
								CALL HPH_PRINT,@"哔呦────～～～～HPH哔呦────～～～～HPHHPH","L"
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊HPH　啊HPH　啊────～～～～HPH　啊────～～～～HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"哔呦HPH　哔呦…HPH","L"
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊…HPH　啊…HPH」","L"
								RESETCOLOR
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「和%CALLNAME:MASTER%阁下的性爱…真是最棒了…HPH」","L"
								RESETCOLOR
								PRINTFORML 典把手臂挂在从背后紧紧抱着自己的%CALLNAME:MASTER%的脖子上、整个人向后靠在你身上
								PRINTW
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「不过、身体的疼痛还是消不下去啊…HPH」","L"
								CALL HPH_PRINT,@"「可以陪着我、直到这个痛感消失为止吗…HPH」","L"
								RESETCOLOR
								PRINTW
								CALL HPH_PRINT,@"随着典的恳求、膣壁一缩HPH一缩HPH地裹住了肉棒","L"
								PRINTFORML 发情的子宫已经開始渴求下一次的种子了…
								PRINTW
								EX:膣内精液 += 500
							;処女・非処女分岐おわり
							ENDIF
						;大人・勃起ていない
						ELSE
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下…这里、让我来帮你清洗一下吧…HPH」","L"
							RESETCOLOR
							PRINTFORML 典注意到%CALLNAME:MASTER%还没有勃起
							SETCOLOR 0xFF69B4
							PRINTFORML （明明我都已经想做得不得了了…这位都看了我的裸体却居然还是没有反应…）
							PRINTFORML （如果你是那个意思的话、我也会有我的想法…！）
							RESETCOLOR
							PRINTW
							PRINTFORML 典握住%CALLNAME:MASTER%的肉棒、開始上下摩擦
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「怎么了吗…HPH　不把鸡鸡洗干净的话、会有臭味哦…HPH」","L"
							CALL HPH_PRINT,@"「得这样子摩擦、把耻垢给弄下来恥垢…HPH」","L"
							RESETCOLOR
							PRINTFORML 由于典的爱抚、本已萎靡的阴茎萎又開始慢慢昂起了头
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「哦呀哦呀、開始变硬了呢HPH」","L"
							CALL HPH_PRINT,@"「明明只是在帮你清洗、真奇怪呢…HPH」","L"
							RESETCOLOR
							PRINTW
							PRINTFORML 典用手掌来回揉搓着从前面開始慢慢地漏出汁液的龟头
							PRINTFORML 由于马眼受到刺激产生的灼热感和快感、让先走汁的量增加了起来、摩擦龟头的手也动得更加顺畅
							PRINTW
							PRINTL
							CALL HPH_PRINT,@"啾咯啾咯HPH","L"
							CALL HPH_PRINT,@"　　咻咻HPH","L"
							PRINTL
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「呵呵、真是根没出息的鸡鸡呢HPH」","L"
							CALL HPH_PRINT,@"「越是清洗、污垢反而越多了哟HPH」","L"
							RESETCOLOR
							PRINTL
							CALL HPH_PRINT,@"咕啾咕啾HPH","L"
							CALL HPH_PRINT,@"　　妞咕妞咕HPH","L"
							PRINTL
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「还真是顽固的污垢呢…HPH」","L"
							CALL HPH_PRINT,@"「真是没办法…那么、就用这边的海绵来清洗吧…HPH」","L"
							RESETCOLOR
							PRINTW
							BASE:MASTER:勃起 = 1000
							PRINTFORML 典跨坐在仰躺着的%CALLNAME:MASTER%身上、摆出一副蜘蛛一般的姿势
							PRINTFORML 然后、用秘裂咕啾咕啾地对着龟头使劲挤压
							PRINTW
							CALL ASK_YN("稍微等下","套套、还没…")
							IF !RESULT
							ELSE
							ENDIF
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「你在说什么呢HPHHPH」","L"
							CALL HPH_PRINT,@"「如果再这么慢吞吞的话、我的脑袋就要变的奇怪了HPHHPH」","L"
							PRINTW
							IF TALENT:MASTER:非童貞 == 0
								PRINTFORML 「处男就是处男、只需要考虑怎么让肉棒变舒服不就行了…」
							ELSE
								PRINTFORML 「%CALLNAME:MASTER%阁下还真是老实、好好硬着肉棒等着穴内射精就行了…」
							ENDIF
							CALL HPH_PRINT,@"「哟！！HPHHPH」","L"
							RESETCOLOR
							CALL HPH_PRINT,@"梆啾！！HPH","L"
							PRINTW
							SETCOLOR 0xFF69B4
							SELECTCASE TALENT:MASTER:形状
							CASE 6,10;巨根、馬並み
								CALL HPH_PRINT,@"「只不过是根大点的败犬鸡巴HPH」","L"
								CALL HPH_PRINT,@"「让典的小穴来让你明白这一点吧HPH」","L"
								PRINTL
								CALL HPH_PRINT,@"（这根大鸡巴HPHHPH　果然我好爱HPHHPH）","L"
								CALL HPH_PRINT,@"（小穴、都要被扩张了HPHHPH）","L"
							CASE 1,2;粗チン
								CALL HPH_PRINT,@"「和小孩子的差不多大的杂鱼鸡巴HPH」","L"
								CALL HPH_PRINT,@"「就用内射来向我道歉吧HPHHPH」","L"
								PRINTW
								CALL HPH_PRINT,@"（和小孩子的差不多大的鸡巴大人HPH）","L"
								CALL HPH_PRINT,@"（只是想了想插进来的感觉就甜美地高潮了HPHHPH）","L"
							CASE 5;イボ付き
								CALL HPH_PRINT,@"「虚有其表的败犬鸡巴HPH」","L"
								CALL HPH_PRINT,@"「来吧HPH　让典明白它的厉害HPH　来嘛来嘛っHPH」","L"
								PRINTW
								CALL HPH_PRINT,@"（带疣的鸡巴HPH　这东西真是凶恶过头了HPH）","L"
								CALL HPH_PRINT,@"（肉壁被刮蹭个不停HPH　其他地方也一样HPH）","L"
							CASEELSE
								CALL HPH_PRINT,@"「只有外表还算不错的杂鱼鸡巴HPH」","L"
								CALL HPH_PRINT,@"「不甘心的话就让典怀孕来证明它的厉害吧HPHHPH」","L"
								PRINTW
								CALL HPH_PRINT,@"（啊哈哈HPH　已经完全明白了HPHHPH）","L"
								CALL HPH_PRINT,@"（这根鸡巴、和我的相形实在太好了吧HPHHPH）","L"
							ENDSELECT
							RESETCOLOR
							PRINTW
							IF TALENT:処女 == 1
								PRINTFORML 从和不停逞强的典的结合处、流出了身为处女的鲜红的证据
								CALL ASK_YN("莫非…","是处女…？")
								IF !RESULT
								ELSE
								ENDIF
								TCVAR:139:破瓜 = 1
								TALENT:処女 = 0
								PRINTL
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「啊啊、没错哟…HPH　这是、第一次…HPH」","W"
								CALL HPH_PRINT,@"「你本来觉得、我就是个滥交婊子之类的吧…HPH」","W"
								CALL HPH_PRINT,@"「可ー惜HPH　典是货真价实的、处女～～…HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「什么为什么…就是那什么…虽说正值发情、可是女孩子、想把自己的处女献出去哟…HPH」","W"
								CALL HPH_PRINT,@"「还能有、什么其他的理由吗…HPH」","L"
								RESETCOLOR
								PRINTW
								PRINTFORML 典红着脸颊、捂着嘴的样子、让你感到下半身更加沸腾起来…
								PRINTW
								CALL HPH_PRINT,@"嗞嗯HPH","L"
								SETCOLOR 0xFF69B4
								CALL HPH_PRINT,@"「哈呜！？HPH」","W"
								CALL HPH_PRINT,@"「干、干什么、突然间…哦呜！？HPHHPH　哦HPH　哦哦HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「啊…HPH　鸡巴大人、比刚刚变得、更硬了哦…HPH」","L"
								CALL HPH_PRINT,@"「啊、啊啊啊HPH　这是什么、超级舒服的…HPHHPH」","L"
								PRINTW
								CALL HPH_PRINT,@"（温柔地摆着腰的\@ TALENT:恋人 == 1 ? # 如同 \@恋人间的性爱HPHHPHHPH）","L"
								CALL HPH_PRINT,@"（可是HPH　却重点攻击敏感的部位HPHHPH）","L"
								CALL HPH_PRINT,@"（太过幸福了HPH　小穴欢呼雀跃HPHHPH）","L"
							;処女のみ分岐おわり
							ENDIF
							CALL HPH_PRINT,@"咚HPH　咚HPH　咚HPH　咚HPH","L"
							PRINTW
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「呼呼、肉棒、開始膨胀起来了哟HPH　看来要射了呢HPH」","L"
							CALL HPH_PRINT,@"「可以哦HPH　射精吧HPH　多多射精吧HPH」","L"
							RESETCOLOR
							PRINTFORML 典一边抚摸%CALLNAME:MASTER%的脑袋、一边加快了晃腰的速度
							PRINTW
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「不可以哟HPH　不允许你在膣穴里以外的地方射精HPH」","L"
							CALL HPH_PRINT,@"「在发情危险日的小穴里穴内射精HPH　肯定要当爸爸了呢HPH　恭喜你啦HPHHPH」","L"
							RESETCOLOR
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「啊唔HPH　啊唔HPH　好舒服～～HPHHPH」","L"
							CALL HPH_PRINT,@"「让我看看你高潮时没出息的表情HPH　加油HPH　加油HPH」","L"
							CALL HPH_PRINT,@"「杂鱼鸡巴在咻咻咻地射个不停吧HPH　射出来吧HPH　给我射精吧HPH」","L"
							RESETCOLOR
							PRINTL
							CALL HPH_PRINT,@"咚噗HPH","L"
							PRINTL
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「哦HPH啊HPH」","L"
							RESETCOLOR
							PRINTW
							CALL HPH_PRINT,@"卟哔呦HPH　卟哔呦哔呦HPH","L"
							CALL HPH_PRINT,@"哔呦────～～～～HPH哔呦────～～～～HPHHPH","L"
							PRINTL
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「啊哈HPH　在穴内啾噜啾噜地射出来了哟HPH　真不像样呢HPH」","L"
							CALL HPH_PRINT,@"「好啦全部射出来HPH　杂鱼鸡巴HPH　再努把力哦HPH」","L"
							RESETCOLOR
							PRINTW
							CALL HPH_PRINT,@"哔呦HPH　哔呦…HPH","L"
							PRINTL
							SETCOLOR 0xFF69B4
							CALL HPH_PRINT,@"「啊ー啊、在发情危小穴里、中出了这么多了HPH」","L"
							SIF TALENT:MASTER:濃厚精液
								CALL HPH_PRINT,@"「而且还是如此大量的、如同浆糊一样的臭烘烘的精液…HPH」","L"
							IF TALENT:MASTER:万能孕 || TALENT:MASTER:讓妖怪懷孕
								CALL HPH_PRINT,@"「着床HPH　怀孕HPH　板上钉钉了呢…HPH」","L"
							ENDIF
							PRINTW
							IF TALENT:恋慕 || TALENT:恋人
								IF EXP:出産経験 > 0
									CALL HPH_PRINT,@"「小孩子、有多少都不错吧…HPH」","L"
									CALL HPH_PRINT,@"「再多一个人、也没什么不妥HPH」","L"
								ELSE
									CALL HPH_PRINT,@"「反正迟早、也会打算要孩子的吧…HPH」","L"
									CALL HPH_PRINT,@"「和%CALLNAME:MASTER%阁下的孩子、好想要呢…HPH」","L"
								ENDIF
							ELSE
								IF EXP:出産経験 > 0
									CALL HPH_PRINT,@"「已经生了{EXP:出産経験}个孩子了呢…HPH」","L"
									CALL HPH_PRINT,@"「再多一个人、也没什么不妥HPH」","L"
								ELSE
									CALL HPH_PRINT,@"「如果是%CALLNAME:MASTER%阁下的孩子的话、我觉得怀上也挺好的呢…HPH」","L"
									CALL HPH_PRINT,@"「如果不是这样、单凭气氛可不会让我做到这种地步哟…HPH」","L"
								ENDIF
							ENDIF
							PRINTW
							CALL HPH_PRINT,@"「嘛虽然我觉得怀孕的几率应该挺高、但必须要以防万一…HPH」","W"
							CALL HPH_PRINT,@"「所以说HPH　第二回合、開始吧…HPHHPH」","L"
							RESETCOLOR
							PRINTL
							PRINTFORML 典紧紧握住%CALLNAME:MASTER%的%TINKO(PLAYER)%、使其紧贴上正往外留着白浊液和爱液的穴口…
							PRINTW
							EX:膣内精液 = 1000
						;大人・勃起分岐おわり
						ENDIF
					;発情・大人／ショタ分岐おわり
					ENDIF
				;発情していない
				ELSE
					IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
						CALL HPH_PRINT,@"「怎么了、%CALLNAME:MASTER%阁下。与我保持这么远的距离HPH」","L"
						PRINTFORML 和典分别入浴的时候、悄无声息地被拉近了距离
						PRINTW
						CALL HPH_PRINT,@"「真是的HPH　好不容易能和姐姐一起进来」","L"
						CALL HPH_PRINT,@"「离得那么远就没有意义了…HPH」","L"
						PRINTFORML %CALLNAME:MASTER%的肩膀和典光滑的肩膀轻轻碰在一起
						PRINTW
						;胸圍・普通以上
						IF TALENT:TARGET:胸圍 >= 0
							;你が傲慢
							IF (TALENT:MASTER:応答 == 1 || TALENT:MASTER:態度 == 1)
								CALL HPH_PRINT,@"「啊啊～、一个劲地看着姐姐的欧派、真是H啊HPH」","L"
								CALL ASK_YN("没有看！","挂着那种碍事的东西可不好")
								IF !RESULT
									PRINTFORML %CALLNAME:MASTER%把头扭向一边
									PRINTFORML 「嗯～。那么这个也不看吗？」
									PRINTFORML 典从浴池站起来、走到%CALLNAME:MASTER%眼前
									PRINTW
									PRINTFORML 拥有压倒性质量的乳房迫近眼前、%CALLNAME:MASTER%因它的气势而屏住呼吸
									PRINTFORML 视线向下、这次映入眼帘的是女性柔美曲线的腰身和巨大的臀部
									PRINTFORML 修长的大腿、勾勒出优美的腿部线条美
									PRINTFORML 然后――
									PRINTW
									PRINTFORML 是女性最重要的一部分
									PRINTFORML 那里很光滑、只有一条线
									PRINTFORML 但是、这背后是作为女性成熟的象征
									PRINTFORML 花瓣深处的膣口、已经被爱液弄得湿漉漉的了
									PRINTW
									PRINTFORML 「真是H」
									PRINTFORML 大概是注意到%CALLNAME:MASTER%在目不转睛地盯着自己、典眯起眼睛微微一笑
									PRINTW
								;「そんな邪魔なもの…」
								ELSE
									PRINTFORML 「啊啊～、被当成碍事的东西、真是～太过分了」
									PRINTFORML 典按着%CALLNAME:MASTER%的头、将其按在自己胸前
									PRINTW
									CALL HPH_PRINT,@"「来嘛来嘛HPH　这也是碍事的东西吗～？HPH」","L"
									PRINTFORML 一个软软的东西贴在脸上、差点喘不过气来
									PRINTW
									CALL HPH_PRINT,@"「来嘛来嘛HPH　不投降的话还会继续的哦～HPH　…啊咧、那个？」","L"
									PRINTFORML 典惊讶于对方突然没有抵抗、看向%CALLNAME:MASTER%的脸
									PRINTW
									PRINTFORML 「%CALLNAME:MASTER%阁下！？　%CALLNAME:MASTER%阁下！！？？」
									PRINTFORML 「糟糕了！！　难道是上火了吗！！　得赶紧照顾一下才行！」
									PRINTW
									PRINTL ……
									PRINTL …
									PRINTW
									PRINTFORML %CALLNAME:MASTER%恢复意识后、感到脸上有凉爽的空气、后脑勺有柔软的触感
									PRINTFORML 模糊的视野变得清晰起来
									PRINTFORML 映入眼帘的是一脸抱歉地扇着团扇的典
									PRINTW
									PRINTFORML 「%CALLNAME:MASTER%阁下、对不起、我太得意忘形了」
									PRINTFORML 典垂着头、标志性的狐狸耳朵现在也低垂了下来
									PRINTW
									CALL ASK_YN("…其实我也很想看","原谅你了")
									IF !RESULT
										PRINTFORML 听到%CALLNAME:MASTER%这句话、典一瞬间露出了惊讶的表情
										PRINTFORML 「…这是什么啊。是现在应该说的话吗？」
										PRINTFORML 典笑了笑、呼地喘了口气、将嘴唇凑到了耳边
										PRINTW
										PRINTFORML 「…下次我会在更凉快的地方给你看哟…%UNICODE(0x2665) *1%」
										PRINTFORML ……好不容易凉下来的身体又要热起来了…
										PRINTW
									ELSE
										PRINTFORML 好像真的有在反省、就原谅你了
										PRINTFORML 「……%CALLNAME:MASTER%阁下真是温柔呢」
										PRINTFORML 典的手指抚摸着%CALLNAME:MASTER%的头发。那种感觉很舒服
										PRINTW
										PRINTFORML 「姐姐我更喜欢%CALLNAME:MASTER%阁下了呢♪」
										PRINTFORML 「啊啊、请不要移開视线嘛。明明是真的～」
										PRINTW
									ENDIF
								;CALL ASK_YN("没有看！","挂着那种碍事的东西可不好")
								ENDIF
							;你の性格ふつう
							ELSE
								CALL HPH_PRINT,@"「来嘛来嘛～、现在可以摸姐姐的欧派哦～HPH」","L"
								PRINTFORML  典的%OPPAI_DESCRIPTION(TARGET,1)%挤压在%CALLNAME:MASTER%的手臂上…
								PRINTW
								CALL HPH_PRINT,@"「啊、刚才你把手腕贴上来了对吧…HPH　%CALLNAME:MASTER%阁下、真色…HPH」","L"
								PRINTFORML %CALLNAME:MASTER%向典解释这是个误会
								PRINTW
								PRINTFORML 沉甸甸的胸、向着%CALLNAME:MASTER%的视野里弹了进来
								CALL HPH_PRINT,@"「啊ー、果然在看啊HPH　真色HPH」","L"
								PRINTW
								PRINTFORML 说着、典紧紧抱住你、用胸埋住你的脸
								PRINTFORML 被柔软的乳房包裹着、心情变得很幸福……
								PRINTW
								CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下还是个孩子、所以不需要忍耐哟HPH」","L"
								CALL HPH_PRINT,@"「\@ TALENT:MASTER:性別 == 2 ? 男孩子啊、 # \@无论是谁都会喜欢胸部的HPH」","L"
								PRINTW
								CALL HPH_PRINT,@"「而且、%CALLNAME:MASTER%阁下的话摸姐姐的哪里都可以哟…HPH」","L"
								CALL HPH_PRINT,@"「来吸吸看吧、胸部…？HPH」","L"
								PRINTW
								PRINTFORML 乳头就在柔软的乳房下面、接近嘴巴的位置……
								PRINTFORML 正当犹豫着要不要把它含在嘴里时、典在你耳边小声说道
								PRINTW
								CALL HPH_PRINT,@"「―――我说、你在像个小婴儿一样吸乳头哦……HPH」","W"
								PRINTFORML 说着典的手环到了%CALLNAME:MASTER%的脑袋后面、把你的脑袋引向她的胸
								PRINTW
								PRINTFORML 这一瞬间、你的脑袋里有什么一下子断開了……
								PRINTW
								PRINTFORML 把眼前的粉色突起物含进嘴里、開始大口大口地吮吸起来
								IF TALENT:母乳体質 || TALENT:母性
									PRINTFORML 然后、从那里渗出了乳白色的甜美液体
									PRINTFORML 因为想要喝到更多所以就用舌头舔舐起来、甘甜在口中扩散開来……
									IF TALENT:母乳体質
										CALL HPH_PRINT,@"「嗯、呼…HPH　乳汁出来了哦…HPH」","L"
									ELSE
										CALL HPH_PRINT,@"（骗人的吧…这孩子在喝着我的母乳…HPH）","L"
									ENDIF
								ELSE
									PRINTFORML 感觉那里好像有甘甜的液体流出来、拼命地吸着
									PRINTW
								ENDIF
								PRINTFORML 在这期间、手也在玩弄着别的东西
								IF TALENT:TARGET:胸圍 > 0
									PRINTFORML 用从下面撑着的方式紧紧地握住这对大到用手无法完全握住的胸部
									PRINTFORML 典的胸部柔软得几乎要从手掌里滑出来、但却很有弹性
								ELSEIF TALENT:TARGET:胸圍 == -1
									PRINTFORML 用手抓着那与身材相称的胸部
									PRINTFORML 典的胸部虽小却很柔软、足以让人感到安心
								ELSEIF TALENT:TARGET:胸圍 == -2
									PRINTFORML 抓住她那对女性来说过于扁平的胸部
									PRINTFORML 典的胸部太平了以至于无法享受柔软的感觉、但乳头的柔软却与众不同
								ELSE
									PRINTFORML 抓着那匀称的胸部
									PRINTFORML 典的胸部有着令人舒适的弹性、让人沉浸在想一直揉下去的氛围里
								ENDIF
								PRINTW
								CALL HPH_PRINT,@"「撒娇鬼…HPH　乖孩子、乖孩子…HPH」","L"
								PRINTFORML %CALLNAME:MASTER%对着典的胸撒娇的时候、典一直温柔地抚摸着你的头…
								PRINTW
								IF BASE:MASTER:勃起 >= 1000
									CALL HPH_PRINT,@"「哦呀…这里也像被我用乖孩子来夸奖呢…HPH」","L"
									PRINTFORML 说着、典開始在热水里轻抚起有自己主张的股间
									PRINTW
									PRINTFORML 就像在哄小孩子一样、十分缓慢地抚摸着、
									PRINTFORML 尽管如此、还是给亢奋的男性生殖器带来了刺激感、%CALLNAME:MASTER%只能在这种快感中浑身发抖……
									PRINTW
									PRINTFORML 啾咕HPH　啾咕HPH
									PRINTFORML 　　啾咕HPH　啾咕HPH
									PRINTW
									SELECTCASE TALENT:MASTER:形状
									CASE 6,10;巨根、馬並み
										CALL HPH_PRINT,@"（和往常一样、是根规格外的鸡巴呢…HPH）","L"
										IF EXP:Ｖ性交経験 > 0
											CALL HPH_PRINT,@"（这个东西、已经进入过我的小穴了呢…HPH）","L"
											CALL HPH_PRINT,@"（都已经被改造成它的形状了啊…HPH）","L"
										ELSE
											CALL HPH_PRINT,@"（这么大、真的能塞进我的膣穴里吗…HPH）","L"
											CALL HPH_PRINT,@"（会被撑松的、到时候除了这根形状以外其他都爱不起来了吧…HPH）","L"
										ENDIF
									CASE 1,2;粗チン
										CALL HPH_PRINT,@"（和往常一样、可爱的小孩子鸡巴…HPH）","L"
										CALL HPH_PRINT,@"（即使这么小、也会因为自己的主张而变得这么大…HPH）","L"
										CALL HPH_PRINT,@"（越看就越觉得可爱…HPH）","L"
										PRINTW
										IF EXP:Ｖ性交経験 > 0
											CALL HPH_PRINT,@"（这根小鸡鸡、啾噜唔HPH一下进来的感觉…好喜欢HPH）","L"
											CALL HPH_PRINT,@"（都想让我　加油HPH　加油HPH　的给它应援了呢…HPH）","L"
										ELSE
											CALL HPH_PRINT,@"（第一次插入的时候、该做些什么反应呢…HPH）","L"
											CALL HPH_PRINT,@"（「啊嘞、已经进来了吗？」「清楚地、感觉到了哟」哪个好呢…HPH）","L"
										ENDIF
									CASE 5;イボ付き
										CALL HPH_PRINT,@"（和往常一样、如同魔物一样的鸡巴外形…HPH）","L"
										IF EXP:Ｖ性交経験 > 0
											CALL HPH_PRINT,@"（第一次被插进来的时候的感觉很不得了呢…HPH）","L"
											CALL HPH_PRINT,@"（如今、如果不是这根带疣鸡巴的话就满足不了了…HPH）","L"
										ELSE
											CALL HPH_PRINT,@"（要是被插进来的话、我的小穴会变成什么样呢…HPH）","L"
											CALL HPH_PRINT,@"（我也总是好奇心胜过恐惧呢…HPH）","L"
										ENDIF
									CASEELSE
										CALL HPH_PRINT,@"（嘸嘸、虽然也可以说是与年龄相符、不过还真是一根非常漂亮的小鸡鸡啊…HPH）","L"
										IF EXP:Ｖ性交経験 > 0
											CALL HPH_PRINT,@"（果然还是年轻、硬度和恢复力都很强…HPH）","L"
											CALL HPH_PRINT,@"（技术什么的是次要的、但总是会输给一心一意的腰技呢…HPH）","L"
										ELSE
											CALL HPH_PRINT,@"（啊啊、真想快点用姐姐的小穴来迎接你啊…HPH）","L"
											IF TALENT:MASTER:非童貞 == 0
												CALL HPH_PRINT,@"（%CALLNAME:MASTER%的童贞、我是第一个收下的人呢…HPH）","L"
											ELSE
												CALL HPH_PRINT,@"（虽然没能夺走童贞、但我会把它变成只渴求于我的小鸡鸡…HPH）","L"
											ENDIF
										ENDIF
										PRINTW
									ENDSELECT
									CALL HPH_PRINT,@"「啊啦、已经要出来了吗？ 真是没办法啊……HPH」","L"
									PRINTFORML 说着、典舔了舔你的耳朵、然后把嘴凑到你耳边低语道
									PRINTW
									PRINTFORML 啾咕HPH　啾咕HPH
									PRINTFORML 　　啾咕HPH　啾咕HPH
									PRINTW
									CALL HPH_PRINT,@"「可以哟……射出来吧……HPH」","L"
									CALL HPH_PRINT,@"「配合姐姐的声音…从蛋蛋往上涌…HPH」","L"
									PRINTW
									PRINTFORML 啾咕HPH　啾咕HPH　啾咕HPH　啾咕HPH
									PRINTFORML 　　妞咕HPH　妞咕HPH　妞咕HPH　妞咕HPH　妞咕HPH
									PRINTW
									CALL HPH_PRINT,@"「五～、四～HPH」","L"
									PRINTW
									PRINTFORML 啾咕HPH　啾咕HPH　啾咕HPH　啾咕HPH
									PRINTFORML 　　妞咕HPH　妞咕HPH　妞咕HPH　妞咕HPH　妞咕HPH
									PRINTW
									CALL HPH_PRINT,@"「三～、二～、一～～…HPH」","W"
									PRINTL
									CALL HPH_PRINT,@"「射・吧HPH」","L"
									PRINTW
									PRINTFORML 下个瞬间、%CALLNAME:MASTER%释放了白色的欲望……
									PRINTW
									PRINTFORML 咚哔呦噜噜噜噜噜噜！！！
									CALL HPH_PRINT,@"「HPH」","L"
									PRINTFORML 哔呦噜噜噜！　哔呦ーー、哔呦ーー
									PRINTW
									CALL HPH_PRINT,@"「很ー好、表现得很棒呢……HPH」","L"
									PRINTFORML 典抚摸着%CALLNAME:MASTER%的脑袋以犒劳射精
									PRINTW
									CALL HPH_PRINT,@"「接下来、泡澡出去之后就在地铺上做吧…HPH」","L"
									PRINTW
									PRINTFORML 典一边说着一边站了起来、屁股朝着你这边
									PRINTFORML 典的秘所、被和温泉里的水不同的透明液体濡湿了、在灯光的照射之下一闪一闪的发着光……
									PRINTW
									PALAM:潤滑 += 3000
								;ショタ勃起分岐おわり
								ENDIF
							;你の性格分岐おわり
							ENDIF
						;贫胸
						ELSE
							PRINTFORML 「怎么了？　一直盯着姐姐的胸看」
							PRINTFORML 「真是的～～、真是好色啊♪　那么想看的话…」
							CALL ASK_M("…有点小呢", 1,"你的胸好小啊", (TALENT:MASTER:応答 == 1 || TALENT:MASTER:態度 == 1))
							SELECTCASE RESULT
							CASE 0
								PRINTFORML 「唔唔唔…你是不是、在想什么失礼的事情啊…」
								PRINTFORML 被典半眯着眼瞪了一下、你说了句才没有后慌忙转移了视线
								PRINTW
							CASE 1
								PRINTFORML 「什…！？　胸的大小并不是全部！　形状才是重要的！」
								IF TALENT:65:胸圍 > 0
									PRINTFORML 你说了句可是椛姐姐的胸又大形状又漂亮
									PRINTFORML 「那种的根本就不能叫胸！　只能叫乳房！　就和牛什么的是一个等级！」
								ENDIF
								PRINTFORML 「你看啊、姐姐也是有胸的吧！　快好好确认一下！」
								PRINTFORML 典抓住%CALLNAME:MASTER%的手腕、把手掌压倒自己的胸上
								PRINTW
								;絶壁
								IF TALENT:TARGET:胸圍 == -2
									PRINTFORML 「看啊看啊、我明明也…」
									PRINTFORMW ……
									PRINTFORML 「我的、胸也…」
									PRINTFORMW ……
									PRINTFORML 「我也、呜、呜哎哎…呜哎哎……」
									PRINTFORMW ！！！？？？
									PRINTFORML 因为典真的開始哭了起来、你赶紧安慰道女性的胸并不是全部（意译）
									PRINTFORML 虽然胸小但形状很好（意译）
									PRINTW
									PRINTFORML 「咕嘶…真的…？」
									PRINTFORML 你不停点头说真的真的
									PRINTW
									PRINTFORML 「那你、喜欢姐姐吗…？」
									PRINTFORML 你不停点头说喜欢喜欢
									PRINTW
									PRINTFORML 「会想和姐姐结婚吗…？」
									CALL ASK_YN("点头说想结婚","点头说想结…婚？")
									IF !RESULT
									ELSE
									ENDIF
									PRINTFORML 「库、库、库……」
									PRINTFORML 「库呼呼呼呼♪　这样啊、这样啊♪」
									PRINTFORML 「%CALLNAME:MASTER%阁下就这么想和姐姐结婚吗♪」
									PRINTW
									PRINTFORML 抬起头的典、露出了邪恶（？）的笑容
									PRINTFORML 得逞了呢！
									PRINTW
									PRINTFORML 「两情相悦的话就没有任何阻碍了呢♪办个婚礼吧♪」
									PRINTFORML 「新婚旅行去哪里好呢？　天界？　白玉楼？　月之都？」
									PRINTFORML 「婚房盖在哪里呢♪　小一点也没关系、但要带个浴室、景色也要好…」
									PRINTFORML 「啊、要不先商量一下孩子的事吧♪　%CALLNAME:MASTER%阁下觉得男孩子和女孩子、要哪个好呢？」
									PRINTFORML 「还有、还有…」
									PRINTFORML 典的妄想在此后十几分钟内一直没停下来…
									PRINTW
								;貧乳
								ELSE
									PRINTFORML 确实、虽然较小但女性特有的柔软触感、通过手心传了过来
									CALL HPH_PRINT,@"「欸嘿HPH　一边说我胸小、一边还挺沉迷嘛HPH」","L"
									PRINTW
									PRINTFORML 你一言不发只顾继续揉着典的胸部
									CALL HPH_PRINT,@"「嗯HPH　那、那个…%CALLNAME:MASTER%阁下…？」","L"
									PRINTW
									PRINTFORML 你一言不发只顾继续揉着典的胸部
									CALL HPH_PRINT,@"「姐姐、開始有些奇怪的感觉…HPH」","L"
									PRINTW
									PRINTFORML 你一言不发只顾继续揉着典的胸部
									CALL HPH_PRINT,@"「唔…HPH　呼HPH　咕呜HPH　我说、也差不多该HPH」","L"
									PRINTW
									PRINTFORML 你一言不发只顾继续揉着「好了、到ー此为止♪」
									PRINTFORML 吃了典一记手刀之后、你回过神来
									PRINTW
									PRINTFORML 「真是的、虽然你揉姐姐的胸我会很高兴、但还是希望你能再稍微注意一下气氛呢」
									PRINTFORML 「要做的话、附近有个情人旅馆、到那里、继续做吧…%UNICODE(0x2665) *1%」
									PRINTW
								;典贫胸分岐おわり
								ENDIF
							ENDSELECT
						;胸圍分岐おわり
						ENDIF
					;発情してない・大人
					ELSE
						PRINTFORML 「哈啊…%UNICODE(0x2665) *1%　很舒服呢…%UNICODE(0x2665) *1%」
						PRINTFORML 典在%CALLNAME:MASTER%的身旁、享受着地狱的温泉
						PRINTFORML 脸颊和胸口都被染成了红色、是因为温泉的温度吗、她用有些迷离的眼神注视着%CALLNAME:MASTER%
						PRINTW
						PRINTFORML 「呵呵、这样子、就像夫妻一样呢…%UNICODE(0x2665) *1%」
						PRINTFORML 「能和%CALLNAME:MASTER%阁下一起享受温泉、典真的很幸福…%UNICODE(0x2665) *1%」
						PRINTW
						PRINTFORML 从她身上飘散着肥皂的香味、看到她那艳丽的身姿不禁让人心跳加速
						PRINTFORML 「哦呀哦呀、%CALLNAME:MASTER%阁下。莫非是看见我的裸体所以兴奋起来了吗？」
						PRINTFORML 典一边露出坏笑、一边恶作剧似的询问你
						PRINTW
						CALL ASK_YN("可以的话想立刻抱住你","才没有那种事")
						PRINTL
						IF !RESULT
							BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
							PRINTFORML 「诶诶～～、认真的吗～～？」
							PRINTFORML %CALLNAME:MASTER%无言站起、伫立在典的眼前
							PRINTW
							PRINTFORML 「讨厌～唔%UNICODE(0x2665) *1%　要被%CALLNAME:MASTER%阁下给侵犯…了…」
							PRINTFORML 典的眼前、青筋暴起的勃起肉棒逼迫了过来
							PRINTW
							PRINTFORML 「呜哇啊啊……」
							PRINTFORML 典目不转睛地盯着这副光景
							PRINTW
							CALL HPH_PRINT,@"「啊…HPH　呼啊…HPH」","L"
							PRINTFORML 流着先走汁地%TINKO(PLAYER)%、接近到几乎要贴上典的脸的程度
							PRINTW
							CALL HPH_PRINT,@"「不、不行哟…HPH　这里是、温泉啊…HPH」","L"
							PRINTFORML 虽然这么说着、典的视线却完全集中在%TINKO(PLAYER)%上
							PRINTW
							CALL HPH_PRINT,@"「被展示着看了这种东西的话…咕嘟HPH」","L"
							PRINTFORML 典无意识地张開嘴、朝着%TINKO(PLAYER)%伸出了舌头
							PRINTFORML 那副样子就如同面对食物的狗一样
							PRINTW
							CALL HPH_PRINT,@"「很、很抱歉……不小心……HPH」","L"
							PRINTFORML 典虽然在道歉、却開始轻轻舔起你的龟头
							PRINTW
							CALL HPH_PRINT,@"「就、就稍微一下…可以吗…HPH」","L"
							PRINTFORML 典一副无法忍耐的表情、用嘴唇抵住马眼、发出啾啪啾啪的声音開始吮吸起来
							PRINTW
							CALL HPH_PRINT,@"「再苏微腻下、再苏微腻下…HPH」","L"
							CALL HPH_PRINT,@"「啾啵HPH　啾呜啵HPH　啾噗呜呜呜HPHHPH」","L"
							PRINTW
							PRINTFORML 如果注意看、会发现典已经沉迷于%CALLNAME:MASTER%的肉棒
							PRINTFORML 把手放在%CALLNAME:MASTER%的大腿上、把脸埋在你的股间
							PRINTW
							CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的鸡鸡、好硬…你看、这么硬HPH」","L"
							CALL HPH_PRINT,@"「啾噜噜HPH　啾HPH　啾噜噜噜噜呜HPH」","L"
							PRINTFORML 典用嘴巴含着%CALLNAME:MASTER%的肉棒、在上面涂满唾液、拼命地侍奉着
							PRINTW
							CALL ASK_YN("想要插进去了","就这样射出来咯")
							;挿れたくなった
							IF !RESULT
								CALL HPH_PRINT,@"「好…HPH」","L"
								PRINTFORML 典点了点头后用手扶住岩石、变成把屁股朝向你这边的姿势
								PRINTW
								CALL HPH_PRINT,@"「拜托您了……请侵犯我吧……HPH」","L"
								PRINTFORML 典的秘裂往外滴着爱液
								PRINTFORML 能清楚发现只用指尖碰一下就会湿到不行
								CALL ASK_YN("湿得很厉害呢","只是吸了吸鸡巴就湿了吗")
								PRINTL
								IF !RESULT
									CALL HPH_PRINT,@"「是的…HPH」","L"
									CALL HPH_PRINT,@"「吸一吸的话、就会想着这根东西会不会进入小穴什么的…就湿了…HPH」","L"
								ELSE
									CALL HPH_PRINT,@"「是的…HPH」","L"
									CALL HPH_PRINT,@"「我是个脑袋里除了含肉棒以外空空如也的、色情淫乱母狐狸…HPH」","L"
								ENDIF
								PRINTW
								CALL HPH_PRINT,@"「啊HPH唔HPH啊啊啊HPHHPH」","L"
								PRINTFORML 用中指和食指在穴内来回搅动进行刺激
								PRINTFORML 咕啾咕啾的水声响彻起来、典发出了甜美的声音
								PRINTW
								CALL HPH_PRINT,@"「啊唔HPH啊啊啊HPH那里HPH好厉害呜HPHHPH」","L"
								PRINTFORML 找到一个有些发硬的部分、開始用两个手指挤弄着反复摩擦
								PRINTFORML 典一下子就格外大声地叫了起来。看来这个部位很不错
								PRINTW
								CALL HPH_PRINT,@"「咿呀呜PH不行HPH那样做的话会马上就会HPH啊咿HPHHPH」","L"
								PRINTFORML 典的脸一片通红、流着泪扭动身子
								PRINTFORML 腰不停颤抖着、能看出来她光是保持站姿就已经竭尽全力
								PRINTW
								CALL HPH_PRINT,@"「啊HPH不要那样HPH去了HPH要高潮了HPH要高潮噜HPH啊ー──～～HPH」","L"
								PRINTFORML 典大幅反弓着背、迎来了绝顶
								PRINTFORML 一边潮吹、一边断断续续地剧烈痉挛着
								PRINTW
								CALL HPH_PRINT,@"「啊HPH　哈啊……HPH　哈啊…HPH」","L"
								PRINTFORML 典一边喘着粗气、一边靠在了岩壁上
								PRINTFORML 然而%CALLNAME:MASTER%还没有满足
								PRINTFORML 又把滴滴答答滴着先走汁地龟头、顶到了典的膣口上
								PRINTW
								PRINTFORML 「先、先等一下……现在让我稍微休息……」
								PRINTFORML 无视了典的话、从她的背后欺身压上然后插了进去、一口气顶到了最里面
								PRINTW
								CALL HPH_PRINT,@"　HPH　　HPHHPH","L"
								CALL HPH_PRINT,@"「啊啊啊啊～～～～～～HPHHPH」","L"
								CALL HPH_PRINT,@"　　　HPH　　　　HPHHPH","L"
								PRINTL
								PRINTFORML 典的口中发出了尖锐的悲鸣
								CALL HPH_PRINT,@"「好大……HPH鸡鸡、实在太大了HPHHPH」","L"
								PRINTFORML 典一脸兴奋地喃喃自语着
								PRINTW
								PRINTFORML 这个姿势的话可以看见整个结合处
								PRINTFORML %CALLNAME:MASTER%的%TINKO(PLAYER)%、到根部为止整个都被典的阴部吞了进去根
								IF TALENT:処女 == 1
									PRINTFORML 刚才为止还是纯洁的证明、从结合处流了下来
									CALL HPH_PRINT,@"「典的第一次、献给了%CALLNAME:MASTER%阁下…HPH」","L"
									CALL HPH_PRINT,@"「很吃惊吗…？　这种色情女居然还一直守着处女什么的…HPH」","L"
									CALL HPH_PRINT,@"「对象是%CALLNAME:MASTER%阁下…被%CALLNAME:MASTER%阁下夺走、我很開心…HPH」","L"
									TCVAR:139:破瓜 = 1
									TALENT:処女 = 0
								ENDIF
								PRINTW
								PRINTFORML 「那个…可以让我来动吗……？」
								PRINTFORML 典一脸害羞地询问道
								CALL ASK_YN("随你喜欢","自己想让典舒服")
								;好きにしろ
								IF !RESULT
									CALL HPH_PRINT,@"「好……非常感谢……HPH」","L"
									PRINTFORML 典高兴地道了谢后、開始缓缓动起来
									IF TCVAR:139:破瓜 == 1
										PRINTFORML 最初非常生涩、但也许是慢慢习惯了、动作開始变得连贯起来
									ELSEIF TALENT:139:淫壺 == 1
										PRINTFORML 无数次接受过%CALLNAME:MASTER%%TINKO(PLAYER)%的媚肉、
										PRINTFORML 像是在焦急地等待着对方的归来似的温柔地拥抱着、欢喜地不断收缩着
									ELSE
										PRINTFORML 因为前戏開始变得放松起来的小穴、顺滑地接受了%TINKO(PLAYER)%
									ENDIF
									PRINTW
									CALL HPH_PRINT,@"「啊啊啊HPH好舒服HPH小鸡鸡、\@ TCVAR:139:破瓜 == 1 ? 好喜欢HPHHPH # 開始变得好喜欢HPH \@」","L"
									PRINTFORML 典一边扭着腰、一边忘我地沉溺在快乐之中
									PRINTW
									CALL HPH_PRINT,@"「啊啊HPH喜欢HPH喜欢你的肉棒HPH请继续插进来HPH」","L"
									PRINTFORML 典的动作变得剧烈起来
									PRINTFORML 她已经完全沉溺在性爱之中
									PRINTW
									CALL HPH_PRINT,@"「啊啊啊啊HPH去了HPH又去了HPH已经不行了HPHHPH」","L"
									PRINTFORML 典再次迎来了绝顶、身体不停抖动着
									PRINTW
									PRINTFORML 此时%CALLNAME:MASTER%也、接近了极限
									CALL HPH_PRINT,@"「射出来HPH　我想要你在里面满满地射出来HPH」","L"
									CALL HPH_PRINT,@"「想要你填满我的子宫HPHHPH」","L"
									PRINTFORML 典恳求一般说着
									PRINTW
									IF CFLAG:TARGET:允许无套 > 1 || (CFLAG:生理周期 == 1 || CFLAG:生理周期 == 2)
										EX:139:膣内精液 += 500
										PRINTFORML 作为回答、你把达到极限的%TINKO(PLAYER)%挤进膣穴深处射出了精液
										PRINTL
										CALL HPH_PRINT,@"　　　　　　　　　　　　　　　　　　HPHHPH","L"
										CALL HPH_PRINT,@"「啊啊啊啊HPH热热的出来了HPH啊√~~レ──────～～～～～～HPHHPH」","L"
										CALL HPH_PRINT,@"　　　　　　　　　　　　　　　　　　　　　　　HPHHPH","L"
										PRINTL
										PRINTFORML 随着肉棒一下一下的鼓动、典激烈地喘息着
										PRINTW
										PRINTFORML 不久等全部射出来之后、你拔出了肉棒
										PRINTFORML 典的膣穴之内、\@ TALENT:MASTER:濃厚精液 ?糨糊一般 # \@的白浊液往外溢着
										PRINTW
										CALL HPH_PRINT,@"「好过分……被射了这么多的话……HPH　我、会怀孕的哦…HPH」","L"
										PRINTFORML 典露出一脸陶醉的表情
										PRINTW
										IF TALENT:妊娠願望
											IF TALENT:MASTER:恋人 && !TALENT:139:恋人
												PRINT 一瞬、
												IF TALENT:29:恋人
													PRINT 文
												ELSEIF TALENT:42:恋人
													PRINT 极
												ELSEIF TALENT:65:恋人
													PRINT 椛
												ELSEIF TALENT:140:恋人
													PRINT 龍
												ELSE
													PRINT 恋人
												ENDIF
												PRINT 的笑颜在脑内一闪而过、
											ENDIF
											PRINTFORML 能的话就好了、典说着从背后抱紧你的同时在你的脸上亲了一下
											PRINTFORML 「好了…%UNICODE(0x2665) *1%　我很享受…%UNICODE(0x2665) *1%」
										ELSEIF ESTRUS_CYCLE(TARGET) == 150
											PRINTFORML 「虽然我之前忘说了但…今天、是危险日」
											PRINTFORML 「不知不觉就乘兴做了…非常抱歉♪」
										ELSEIF ESTRUS_CYCLE(TARGET) == 15
											PRINTFORML 「啊啊不过…今天是安全日」
											PRINTFORML 「接下来就算危险日…也多多地射进来吧？」
										ENDIF
										PRINTW
									;安全日以外、または允许无套２段階以上ない
									ELSE
										PRINTFORML 至今为止不避孕就能中出的许可都仅限安全日
										PRINT 但如今不同了。
										IF ESTRUS_CYCLE(TARGET) == 150
											PRINTFORML 危险日也一样了
										ELSEIF ESTRUS_CYCLE(TARGET) == 100
											PRINTFORML 排卵日也一样了
										ELSE
											PRINTFORML 不是安全日的日子也一样了
										ENDIF
										IF TALENT:MASTER:胆量 == -1 || FLAG:甲斐性無
											PRINTFORML 不不果然那种事还是太那啥了而且孩子什么的还太早了、%CALLNAME:MASTER%は没志气地解释道
											PRINTFORML 然而腰的动作并没有停止表明了其意志的软弱
										ELSEIF TALENT:MASTER:胆量 == 1 || TALENT:MASTER:快感応答 == 1
											PRINTFORML 就算你不说、我也打算让你怀孕、你这么告诉典
										ELSE
											PRINTFORML 真好啊、那我就在典的里面射出来了哦、你这么告诉典
										ENDIF
										PRINTW
										CALL HPH_PRINT,@"「拜托了HPH　请让我怀孕吧HPH　好希望你让我怀孕HPH」","L"
										PRINTFORML 典用满是期待的目光盯着你
										PRINTW
										PRINTFORML 听了这句话后、你终于再也无法抑制住自己的射精欲
										PRINTFORML %CALLNAME:MASTER%顺从欲望、在典的最里面释放出精液
										PRINTW
										EX:139:膣内精液 += 1000
										CALL HPH_PRINT,@"「啊HPH出来了……HPH热热的东西流进来了……HPH」","L"
										PRINTFORML 感受到膣穴内被注入的精液、典再度迎来了绝顶
										PRINTW
										CALL HPH_PRINT,@"「啊啊……HPH　好開心……HPH　会怀上宝宝吗……？」","L"
										IF TALENT:恋慕 && TALENT:恋人
											PRINTFORML 「不过没关系的哦……。因为我会变成你的妻子嘛……%UNICODE(0x2665) *1%」
										ELSEIF TALENT:恋慕 || TALENT:恋人
											PRINTFORML 「如果受孕了的话…典不会后悔…%UNICODE(0x2665) *1%」
										ELSE
											PRINTFORML 「没关系哟、不用那么担心。让你负责任之类的话、我是不会说的…%UNICODE(0x2665) *1%」
											PRINTFORML 「不过、想要一些和你一起的制造的有意义的东西而已…只要这样、就够了」
										ENDIF
										PRINTFORML 典用陶醉的表情轻声说着
										PRINTW
										IF TALENT:MASTER:胆量 == -1 || FLAG:甲斐性無
											PRINTFORML 啊啊啊、怎么办、还是做了…%CALLNAME:MASTER%的内心战战兢兢…
										ENDIF
										PRINTW
									;允许无套分岐おわり
									ENDIF
								;典を気持ちよくしたい
								ELSE
									PRINTFORML 当你诉说自己想让典感到舒服后、典红着脸低下了头
									CALL HPH_PRINT,@"「我明白了…HPH　就如%CALLNAME:MASTER%阁下、所希望的那样…HPH」","L"
									PRINTFORML 典怯生生地撅起了屁股
									PRINTW
									PRINTFORML 開始缓缓的活塞运动
									CALL HPH_PRINT,@"「啊HPH　唔HPH　哈啊HPH　啊啊啊HPHHPH」","L"
									PRINTFORML 最初很克制、但慢慢的激烈程度開始增加起来
									PRINTW
									PRINTFORML 啪！啪！啪！！啪！啪！啪！！
									PRINTFORML 不久、肉体之间相互碰撞的清脆声音、和两人粗乱的呼吸開始在周围回响起来
									PRINTW
									CALL HPH_PRINT,@"「啊啊啊HPH好厉害HPH这样的第一次HPH」","L"
									PRINTFORML 典湿润了眼睛、发出了欣喜的声音
									PRINTW
									CALL HPH_PRINT,@"「唔HPH啊HPH啊啊啊HPH那里HPH　被粗暴地顶着HPHHPH　请继续这样顶HPH」","L"
									PRINTFORML 看来子宫口被撞击的感觉很不得了。你用龟头的前端、顶着子宫口转来转去对其施加刺激
									PRINTW
									CALL HPH_PRINT,@"「嗯咿咿HPH那样不可以HPH被那样的话会变得奇怪的HPHHPH」","L"
									PRINTFORML %CALLNAME:MASTER%反而加快了腰部的速度
									PRINTFORML 典似乎也接近极限了、大幅度地仰起背来
									PRINTW
									CALL HPH_PRINT,@"「啊啊啊HPH又要来了HPH已经不行了HPH我……去了HPH」","L"
									PRINTFORML 典浑身颤抖着、迎来了绝顶
									PRINTFORML %CALLNAME:MASTER%開始快速冲刺起来、激烈地用腰反复撞击
									PRINTW
									CALL HPH_PRINT,@"「唔咿HPHHPH　啊啊啊HPHHPH　去了HPH　啊啊去了HPH　去了呜呜呜HPHHPH」","L"
									PRINTFORML 典睁大双眼、发出了动物般的叫声的同时达到了高潮
									PRINTW
									PRINTFORML 膣穴内剧烈收缩着、想要从你的阴茎里榨取精液
									PRINTFORML 感受到射精前兆的子宫口、温柔地迎接流着半透明粘液的龟头、開始啾啾啾地吮吸起来
									PRINTFORML 仿佛连灵魂都被榨取一般的快感、让%CALLNAME:MASTER%翻着白眼的同时射精了
									PRINTW
									EX:膣内精液 += 1000
									CALL HPH_PRINT,@"「啊啊啊HPH　出来了HPH　被射得满满的HPH　哦哦HPH　哦哦哦HPH」","L"
									PRINTFORML 典的膣穴里面、就好像活物一样脉动着
									PRINTFORML 尿道里残留的精子也被贪婪地吸了出去
									PRINTW
									CALL HPH_PRINT,@"「哈～～～～HPH　哈～～～～HPH　哈～～～～HPH」","L"
									PRINTFORML 不久后膣穴内紧紧的裹缠感開始放松了下来。总算平静下来了
									IF TCVAR:139:破瓜 == 1
										CALL HPH_PRINT,@"「哈啊……HPH哈啊……HPH好厉害……HPH做爱原来是这么舒服的事情什么的……HPH」","L"
									ELSEIF TALENT:139:淫壺 == 1
										CALL HPH_PRINT,@"「哈啊……HPH哈啊……HPH　果然、和%CALLNAME:MASTER%阁下的性爱、最棒了…HPH」","L"
									ELSE
										CALL HPH_PRINT,@"「哈啊……HPH哈啊……HPH太厉害了……HPH」","L"
									ENDIF
									PRINTFORML 典露出一副恍惚的表情
									PRINTW
									PRINTFORML 你从阴道内拔出快要完全软掉的阴茎后、粘稠的白浊物也流了出来
									PRINTFORML 「啊……在穴内、射出来好多呢」
									PRINTW
									CALL ASK_YN("舒服过头一不小心","抱歉")
									IF !RESULT
										IF TALENT:妊娠願望
											PRINTFORML 「没有、没有。不如说、典很高兴哟♪」
											PRINTFORML 「那种被全力撞击腰部的感觉…把想要让典怀孕的意志传递了过来♪」
											PRINTFORML 典用手捂着脸颊、露出一副心醉神迷的表情
											PRINTW
											PRINTFORML 「那么、要是这次能怀上就好了…」
											PRINTFORML 典抚摸着现在应该有大量精虫在游动的子宫的附近
											PRINTW
											IF TALENT:恋慕 && TALENT:恋人
												PRINTFORML 肯定能怀上的所以没关系、你说着用自己的手叠在典的手上
												PRINTFORML 「好……%UNICODE(0x2665) *1%　我相信你…%UNICODE(0x2665) *1%」
												PRINTFORML 你和典唇瓣重叠、然后又轻轻放開。视线相交的瞬间、两人都自然地笑了出来
												PRINTW
											ELSE
												IF TALENT:MASTER:恋人 && !TALENT:139:恋人
													IF TALENT:29:恋人
														IF TALENT:29:妊娠
															PRINTFORML 如果被怀着孕的文发现的话会被杀掉也说不定…
														ELSEIF TALENT:29:育児中
															PRINTFORML 如果放着含辛茹苦育儿的文不管、跑去一心和其他女性造小孩被发现的话会怎么样呢…
														ENDIF
													ELSEIF TALENT:42:恋人
														IF TALENT:29:妊娠
															PRINTFORML 如果被怀着孕的极发现的话会被杀掉也说不定…
														ELSEIF TALENT:29:育児中
															PRINTFORML 如果放着含辛茹苦育儿的极不管、跑去一心和其他女性造小孩被发现的话会怎么样呢…
														ENDIF
													ELSEIF TALENT:65:恋人
														IF TALENT:65:妊娠
															PRINTFORML 如果被怀着孕的极发现的话会被杀掉也说不定…
														ELSEIF TALENT:65:育児中
															PRINTFORML 如果放着含辛茹苦育儿的极不管、跑去一心和其他女性造小孩被发现的话会怎么样呢…
														ENDIF
													ELSEIF TALENT:140:恋人
														IF TALENT:140:妊娠
															PRINTFORML 如果被怀着孕的极发现的话会被杀掉也说不定…
														ELSEIF TALENT:140:育児中
															PRINTFORML 如果放着含辛茹苦育儿的龙不管、跑去一心和其他女性造小孩被发现的话会怎么样呢…
														ENDIF
													ELSE
														PRINTFORML 如果放着恋人不管、跑去一心和其他女性造小孩被发现的话会怎么样呢…
													ENDIF
												ENDIF
											;典の陥落分岐おわり
											ENDIF
										;妊娠願望無
										ELSE
											IF TALENT:恋慕 && TALENT:恋人
												PRINTFORML 「嘛…好吧。一直想着什么时候要和%CALLNAME:MASTER%阁下谈一谈」
												PRINTFORML 「所以说、干嘛一脸茫然啊。就是造小孩哟、造小孩」
												PRINTFORML 「今天的事情、也许真好是个不错的机会呢」
												PRINTW
												PRINTFORML 「也就是说、从今天開始就不避孕直接做吧♪」
												PRINTFORMW 这次的性交、似乎点燃了典的繁殖欲望…
												PRINTL
												PRINTFORML 典得到了[妊娠願望]
												PRINTFORML 从典那里得到了[危険日也可以无套做爱・中出]的許可
												PRINTL
												TALENT:妊娠願望 = 1
												IF CFLAG:139:允许无套 < 2
													CFLAG:139:允许无套 = 2
												ENDIF
											ELSEIF TALENT:恋慕 || TALENT:恋人
												PRINTFORML 「嘸嘸、典倒是无所谓♪」
												CALL HPH_PRINT,@"「怀上%CALLNAME:MASTER%阁下的孩子…这就是我所希望的…HPH」","L"
												PRINTFORML 典说着、拉起%CALLNAME:MASTER%的手、让你抚摸着精子正在里面游动的下腹部
												PRINTW
												IF TALENT:MASTER:恋人 && !TALENT:139:恋人
													IF TALENT:29:恋人
														PRINTFORML 「不如说、让人头疼的人是%CALLNAME:MASTER%阁下哟…？」
														PRINTFORML 「不知道会被射命丸小姐说什么呢…？」
													ELSEIF TALENT:42:恋人
														PRINTFORML 「不如说、让人头疼的人是%CALLNAME:MASTER%阁下哟…？」
														PRINTFORML 「姬海棠小姐说不定会生气、然后大声哭叫吧…？」
													ELSEIF TALENT:65:恋人
														PRINTFORML 「不如说、让人头疼的人是%CALLNAME:MASTER%阁下哟…？」
														PRINTFORML 「犬走小姐可能会真的伤心哦…？」
													ELSEIF TALENT:140:恋人
														PRINTFORML 「不如说、让人头疼的人是%CALLNAME:MASTER%阁下哟…？」
														PRINTFORML 「说不定会被爱慕着你的主人给撕成八块吧…？」
														PRINTFORML （…嘛、虽说那时候我肯定也会一起遭难…）
													ELSE
														PRINTFORML 「不如说、让人头疼的人是%CALLNAME:MASTER%阁下哟…？」
														PRINTFORML 「可能会和恋人小姐分手哟…？」
													ENDIF
												;典が恋人
												ELSE
													PRINTFORML 「能让所爱之人满足、作为\@ TALENT:恋人 == 1 ? 恋人 # 女性 \@来说比任何事情都要更高兴♪」
													PRINTFORML 「嘛、虽然有种被气氛所驱使的感觉…」
													PRINTW
												ENDIF

												IF CFLAG:TARGET:允许无套 < 2
													PRINTFORML 「如果、从今以后也能继续爱着典的话…」
													PRINTFORML 「从今天開始、就不避孕直接做吧…？」
													PRINTW
													PRINTFORML 典坐在岩石上、轻轻左右张開双腿让你看
													PRINTFORML 从一颤一颤缓缓动着的秘裂里、先前刚注入进去的精液流了出来
													PRINTW
													PRINTFORML 看见这副光景的瞬间、%CALLNAME:MASTER%再度被兽欲支配
													PRINTFORML 结果、之后和典做了不知多少次、
													PRINTFORML 终于满足时典已经瘫软在床上、变得精疲力竭气息奄奄
													PRINTW
													SETCOLOR 0xFF69B4
													CALL HPH_PRINT,@"「啊、啊啊…HPH　真是的、里面满满的、都是…HPHHPH」","L"
													CALL HPH_PRINT,@"「被%CALLNAME:MASTER%用肉棒、给配种了…HPHHPH」","L"
													RESETCOLOR
													PRINTW
													PRINTFORML 喝下了巨量的精子后典的腹部如同孕妇一样膨胀了起来、
													PRINTFORML 从穴口溢出的白浊液顺着大腿像瀑布一样流下来
													PRINTW
													SETCOLOR 0xFF69B4
													CALL HPH_PRINT,@"（不做避孕的无责任中出性爱、太棒了…HPHHPH）","L"
													CALL HPH_PRINT,@"（居然这么舒服的话、如果从最開始就这么做就好了…HPHHPH）","L"
													RESETCOLOR
													PRINTW
													EX:膣内精液 += 500
												ELSE
													PRINTFORML 「而且、典和你无套做的时候、穴内被龟头摩擦的触感和、
													PRINTFORML 　子宮口被精子沐浴的瞬间真是太让人着迷了…%UNICODE(0x2665) *1%」
													PRINTW
													PRINTFORML 典轻轻地把手放在%CALLNAME:MASTER%的阴茎上
													CALL HPH_PRINT,@"「怎么了吗…HPH　倒是、还有些时间…」","L"
													CALL HPH_PRINT,@"「要把蛋蛋里的东西、全都灌注给典吗…HPH」","L"
													PRINTW
												ENDIF
											;陥落無
											ELSE
												PRINTFORML 「呼呼、让男性感到满足是女性的义务啊…%UNICODE(0x2665) *1%」
												IF CFLAG:TARGET:允许无套 == 2
													PRINTFORML 「而且、渴求%CALLNAME:MASTER%阁下的种子的可是典…」
													PRINTFORML 典握住%CALLNAME:MASTER%的手、引导它轻轻抚摸自己的下腹部
													PRINTW
													CALL HPH_PRINT,@"「再多往这里、倾注精液直到怀孕如何呢…HPH」","L"
													PRINTFORML 典的脸上、已经是一副因情欲而饥渴的雌性表情
												ELSE
													PRINTFORML 「而且、虽然平常会希望做避孕措施但…」
													PRINTFORML 典握住%CALLNAME:MASTER%的手、引导它轻轻抚摸自己的下腹部
													PRINTW
													CALL HPH_PRINT,@"「是典的雌性本能、在诉说着想要受孕的缘故…HPH」","L"
													PRINTFORML 典的瞳孔、闪着妖媚的光
													PRINTW
												ENDIF
											;典の陥落分岐おわり
											ENDIF
										;妊娠願望分岐おわり
										ENDIF
									;「膣内に…」→「すまない」
									ELSE
										IF TALENT:妊娠願望
											PRINTFORML 「为什么要道歉？　不是早就定好要造小孩了吗」
											PRINTFORML 「典能被%CALLNAME:MASTER%阁下注入种子、真是太幸福了…%UNICODE(0x2665) *1%」
											PRINTW
										ELSE
											IF TALENT:恋慕 && TALENT:恋人
												PRINTFORML 「嘛、虽说平常都会很顾虑怀孕…」
												PRINTFORML 「但要说心里话的话、那个、如果是和%CALLNAME:MASTER%阁下的孩子、就算怀上也…」
												PRINTFORML 「不如说、好想怀上啊ー…这样」
												PRINTW
												PRINTFORML 「啊、突然就開始第二回合了吗！？」
												PRINTFORML 「倒不是不愿意、虽然挺好、但心理准备还」
												CALL HPH_PRINT,@"「啊ー、身体动不了了、啊、呀、啊HPH」","L"
												PRINTW
												CALL HPH_PRINT,@"咚HPH　咚HPH　咚HPH","L"
												CALL HPH_PRINT,@"「唔HPH　好激烈HPH」","L"
												PRINTW
												CALL HPH_PRINT,@"咚HPH　咚HPH　咚HPH","L"
												CALL HPH_PRINT,@"「唔HPH　唔～～～～HPH」","L"
												PRINTW
												CALL HPH_PRINT,@"啪HPH　啪HPH　啪HPH","L"
												CALL HPH_PRINT,@"「啊嗯HPH　啊嗯HPH　啊嗯HPH」","L"
												PRINTW
												CALL HPH_PRINT,@"啪HPH　啪HPH　啪HPH啪HPH啪HPH","L"
												CALL HPH_PRINT,@"「去了HPH　高潮了HPH　我投降HPH」","L"
												PRINTW
												CALL HPH_PRINT,@"啪HPH啪HPH啪HPH啪HPH啪HPH","L"
												CALL HPH_PRINT,@"「去了HPH　去了HPH　已经去了啊HPH」","L"
												PRINTW
												CALL HPH_PRINT,@"啪！HPH啪！HPH啪！HPH啪！HPH啪！HPH","L"
												CALL HPH_PRINT,@"「～～～～────HPHHPH　啊HPH　去了HPH　又去了HPHHPH」","L"
												PRINTW
												CALL HPH_PRINT,@"「啊啊～～～～────HPHHPH」","L"
												CALL HPH_PRINT,@"哔呦ーーHPH　哔呦哔呦ーーーーHPH","L"
												PRINTW
												PRINTL ……
												PRINTL …
												PRINTW
												CALL HPH_PRINT,@"「哈ーーHPH　哈ーーHPH　哈ーーHPH」","L"
												CALL HPH_PRINT,@"「真是…HPH　%CALLNAME:MASTER%阁下这个笨蛋…HPH」","L"
												PRINTW
												PRINTFORML 典一边骂着一边紧抱住%CALLNAME:MASTER%、然后在你耳边低声道
												PRINTFORML 「爱你哦、比任何人都…%UNICODE(0x2665) *1%」
												PRINTW
											ELSEIF TALENT:恋慕 || TALENT:恋人
												PRINTFORML 「不过、因为太舒服了、所以我也没来得及阻止…」
												PRINTFORML 「而且、并不只是一时冲动、说本就是愿望也不为过…」
												PRINTW
												PRINTFORML 「你问是什么啊、小孩子哟、小孩子。和%CALLNAME:MASTER%阁下生的」
												PRINTFORML 「……不要做出一副好像很意外的表情意外。典可是、女的哟」
												PRINTFORML 「如果是爱慕对象的孩子的话、就算想要也不是什么不自然的事情吧？」
												PRINTW
												PRINTFORML 「如果…%CALLNAME:MASTER%阁下希望的话、典会接受的」
												PRINTFORML 「所以、下次要好好用言语表达出来哦♪」
												PRINTW
											ELSE
												IF CFLAG:生理周期 == 1 || CFLAG:生理周期 == 2
													PRINTFORML 「嘛…今天是安全日。我想应该没问题」
												ELSE
													PRINTFORML 「嘛…我稍后会吃紧急避孕药、所以没关系」
													PRINTFORML 「或者是…就这样顺其自然呢？」
													SIF CFLAG:生理周期 == 7
													PRINTFORML 「而且、今天是危险日哦…%UNICODE(0x2665) *1%」
													SIF ESTRUS_CYCLE(TARGET) == 100
													PRINTFORML 「今天是排卵予定日呢…%UNICODE(0x2665) *1%」
													PRINTW
													CALL ASK_YN("不要避孕","拜托避孕")
													PRINTL
													IF !RESULT
														PRINTFORML 「我会照您吩咐的那样去做的…%UNICODE(0x2665) *1%」
														PRINTFORML 「现在…在典的子宮里、%CALLNAME:MASTER%阁下的子种们都在争先恐后地争夺着卵子呢…%UNICODE(0x2665) *1%」
														PRINTFORML 典露出妖艳的笑容、像是在给精子加油似的轻轻抚摸着她的下腹部
														PRINTW
													ELSE
														PRINTFORML 「我知道了…虽然很遗憾、但还是会照您吩咐的那样去做」
														PRINTW
														TCVAR:139:口服避孕薬 = 1
													ENDIF
												ENDIF
											ENDIF
										ENDIF
									;CALL ASK_YN("舒服过头一不小心","抱歉")分岐おわり
									ENDIF
								;CALL ASK_YN("随你喜欢","自己想让典舒服")分岐おわり
								ENDIF
							;分岐「このまま出すぞ」
							ELSE
								PRINTFORML %CALLNAME:MASTER%按住典的后脑勺、把肉棒塞到喉咙深处
								SETCOLOR 0xFF69B4
								PRINTFORML 「咕啵！ 唔咳！！」
								RESETCOLOR
								PRINTFORML 虽然典发出痛苦的声音、但她并没有反抗
								PRINTFORML 反而拼命地移动舌头来刺激%CALLNAME:MASTER%的肉棒
								PRINTW
								CALL HPH_PRINT,@"（哦豁…HPH　好厉害HPH）","L"
								CALL HPH_PRINT,@"（%CALLNAME:MASTER%的肉棒大人HPH 在我的嘴里猛烈地冲撞着HPHHPH）","L"
								PRINTW
								PRINTFORML %CALLNAME:MASTER%抓着典的头、反复活塞运动了好几次
								SETCOLOR 0xFF69B4
								PRINTFORML 「嗯噢噢噢噢！！ 哦噗！ 哦噗！」
								RESETCOLOR
								PRINTFORML 典的口中溢出了冒泡的唾液
								PRINTFORML 虽然泪流满面、但典还是拼命地奉仕着
								PRINTW
								PRINTFORML 在典的口腔里的%TINKO(PLAYER)%膨胀得非常大
								CALL HPH_PRINT,@"「唔卟呜呜呜呜呜呜！！！ HPH」","L"
								CALL HPH_PRINT,@"（出来了！ 出来了哦哦哦哦！！ 精液牛奶HPH）","L"
								CALL HPH_PRINT,@"（把你的浓厚种子汁射到典的嘴穴里吧啊啊啊啊HPH）","L"
								PRINTW
								PRINTFORML 咚哔呦噜噜噜噜噜噜！！！
								PRINTFORML 哔呦噜噜噜！　哔呦ーー、哔呦ーー
								PRINTW
								CALL HPH_PRINT,@"　　　　HPH%UNICODE(0x2665) *1%","L"
								CALL HPH_PRINT,@"「～～～～────────────HPHHPH」","L"
								CALL HPH_PRINT,@"　　HPH　　　　　　　%UNICODE(0x2665) *1%HPH","L"
								PRINTL
								CALL HPH_PRINT,@"（来了啊啊啊HPH 热热的精液满满地射出来了HPH）","L"
								IF ABL:精液中毒 > 0
									PRINTFORML 即使被注入了大量的精液、典也没有松開自己的嘴
									PRINTFORML 不仅如此、还会把残留在尿道里的精子也吸走
									CALL HPH_PRINT,@"「叻噜HPH啾啪HPH 好好次HPH」","L"
									PRINTW
									CALL HPH_PRINT,@"嗞…啵HPH嗞…啵HPH","L"
									CALL HPH_PRINT,@"「呼ーーHPH　呼ーーHPH　嘿啊…HPH　感觉都要忘记呼吸了呢…HPH」","L"
									PRINTW
									PRINTFORML 漫长射精终于结束后、典吐出肉棒
									PRINTFORML 典的嘴角垂下白浊色的液体
									PRINTW
									CALL HPH_PRINT,@"「可惜……HPH」","L"
									PRINTFORML 典用手指捧起垂下的精液、直接送进嘴里
									PRINTFORML 依依不舍地舔着精液的动作、既充满献身精神又显得淫猥
									PRINTW
								ELSE
									CALL HPH_PRINT,@"「哦HPH　啵HPH　咕HPH」","L"
									CALL HPH_PRINT,@"「呼～～HPH　呼～～HPH　对、对不起、吐出来了…HPHHPH」","L"
									PRINTW
									PRINTFORML 可能是还没有习惯精液的味道、典还没来得及喝下去就将其吐出来了
									CALL ASK_YN("很舒服","下次要全部喝下去")
									IF !RESULT
										PRINTFORML 「！　是吗%UNICODE(0x2665) *1%　欸嘿嘿…%UNICODE(0x2665) *1%」
										PRINTFORML 温柔地抚摸典的头和脸颊、典的嘴角沾着精液、露出孩子般天真的笑容
										PRINTW
									ELSE
										CALL HPH_PRINT,@"「好的、我知道了…HPH」","L"
										CALL HPH_PRINT,@"「请把典变成%CALLNAME:MASTER%阁下的嘴巴飞机杯…HPH」","L"
										PRINTW
									ENDIF
								ENDIF
								PRINTFORML 这之后把典被精液弄脏的身体彻底冲洗干净了…
								PRINTW
							;選択分岐「挿れたくなった」「このまま出すぞ」おわり
							ENDIF
						;「興奮した？」→「そんなことはない」
						ELSE
							PRINTFORML 「啊啦啊啦？　真的吗？」
							PRINTFORML 典面带微笑、稍微拉近了距离
							PRINTFORML 不知道是洗发水还是沐浴露、一股香甜的味道在鼻腔里萦绕着
							PRINTW
							IF BASE:MASTER:勃起 >= 1000
								PRINTFORML 「……这是什么呢～？」
								PRINTFORML 典一边扶着耸立在%CALLNAME:MASTER%股间的逸物、一边微笑着
								PRINTW
								PRINTFORML 「变得这么大、真的是很色情的样子呢…♪」
								PRINTFORML 典一边说着一边在热水里上下摩擦起肉棒
								PRINTW
								PRINTFORML 那手势非常温柔、只能给人一种令人着急的刺激感、但这反而增加了快感
								PRINTFORML 「啊咧咧～？　怎么了？ 从刚才開始、你的腰就一直在动呢？♪」
								PRINTW
								PRINTFORML 典咯咯地笑着、把脸凑了过来
								PRINTFORML 然后就那样在耳边低语道
								PRINTW
								CALL HPH_PRINT,@"「如果想和我一起舒服舒服的话……请诚实地说出来……♪HPH」","L"
								CALL ASK_YN("投降了","想要和典sex")
								PRINTL
								IF !RESULT
								ELSE
								ENDIF
								PRINTFORML 表示投降后、典露出了高兴的笑容
								CALL HPH_PRINT,@"「那么、就一起舒服起来吧HPH」","L"
								PRINTW
								PRINTFORML 说着、典又凑了过来、慢慢地吻上嘴唇
								CALL HPH_PRINT,@"咕唔HPH啾噗HPHreroHPH","L"
							;勃起ていない
							ELSE
								PRINTFORML 「……似乎是真的」
								PRINTFORML 典凝视着%CALLNAME:MASTER%的股间说道
								PRINTW
								PRINTFORML 「看见我的裸体却不感到兴奋、你不觉得失礼吗？」
								IF TALENT:TARGET:胸圍 > 0
									PRINTFORML 「我对自己的欧派也很有自信…」
									PRINTFORML 配合着典的动作、柔软的双乳開始摇晃起来
								ELSEIF TALENT:TARGET:胸圍 == -1
									PRINTFORML 「嗯、虽然欧派很小…你看、这样的话我也能做到…」
									PRINTFORML 典把贫瘠的胸部往中间挤压、拼命挤出乳沟
								ELSEIF TALENT:TARGET:胸圍 == -2
									PRINTFORML 「虽然说、欧派没什么料…」
									PRINTFORML 典摸了摸像砧板一样的胸口、噘起了嘴
								ELSE
									PRINTFORML 「我觉得我的身材很有女人味…」
									PRINTFORML 典从下面抬起形状优美的胸部、呼呼地上下晃动着
								ENDIF
								PRINTW
								PRINTFORML 不喜欢被用那种目光看待吗？试着提问了
								PRINTFORML 「那个…我不会和那样的人一起光着身子去泡温泉的」
								PRINTFORML 典无奈地苦笑道
								PRINTW
								PRINTFORML 「而且…并不是谁都能看典的裸体的哦…？」
								PRINTFORML 典靠在%CALLNAME:MASTER%的肩上、抬眸眼望道
								PRINTW
								IF TALENT:恋人
									PRINTFORML 「我们本来不就是恋人吗」
									PRINTFORML 「典除了%CALLNAME:MASTER%阁下以外不会给任何人看自己的肌肤的哦～？」
									PRINTFORML 典对%CALLNAME:MASTER%暗送秋波
									PRINTW
									PRINTFORML 「不过、和饭纲丸大人一起泡澡的时候是例外…」
									PRINTW
								ELSE
									IF !TALENT:処女
										PRINTFORML 「本来就是能够肌肤相亲的关系啊♪」
										PRINTFORML 典咯咯地笑了起来
									ELSE
										PRINTFORML 「如果是%CALLNAME:MASTER%阁下的话无论要做什么我都能应对得了哦♪」
										PRINTFORML 典咯咯地笑了起来
									ENDIF
								ENDIF
								PRINTFORML 「嘛、如果你现在不愿意的话那我也不会强迫你」
								PRINTFORML 作为交换、典靠在了%CALLNAME:MASTER%的肩上
								PRINTW
								PRINTFORML 「只是撒撒娇的话、应该不会遭什么报应吧…%UNICODE(0x2665) *1%」
								PRINTFORML 典抓着你的手臂、把自己的胸挤压了过去
								PRINTW
								PRINTFORML 「嘸嘸、好热啊、感觉都要上火了呢…%UNICODE(0x2665) *1%」
								PRINTFORML 那应该是我的台词吧、%CALLNAME:MASTER%如此想道
								PRINTW
							;勃起分岐おわり
							ENDIF
						;なんなら今すぐ抱きたい／そんなことはない選択分岐おわり
						ENDIF
					;発情してない・年齢分岐おわり
					ENDIF
				;発情分岐・おわり
				ENDIF
			;温泉イベントを見ない
			ELSE
			;温泉イベント分岐・おわり
			ENDIF
		;地獄の温泉・一緒に入っていない
		ELSEIF CFLAG:MASTER:現在位置 == 940 && CFLAG:TARGET:6 < 1
			IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
				PRINTFORML 「%CALLNAME:MASTER%阁下～%UNICODE(0x2665) *1%　来这里如何～%UNICODE(0x2665) *1%」
				PRINTFORML 「非常舒服哦～%UNICODE(0x2665) *1%」
				PRINTW
				PRINTFORML 典的声音隔着隔板回荡着…
				PRINTFORML 听到有人大声叫自己的名字、%CALLNAME:MASTER%感到很不好意思…
				PRINTW
			ELSE
				PRINTFORML 有什么好玩的、非得一个人进去…！
				PRINTFORML 「%CALLNAME:MASTER%阁下～、这里很舒服呢～%UNICODE(0x2665) *1%」
				PRINTFORML 「本来想和你一起进去的、真是太遗憾了～～%UNICODE(0x2665) *1%」
				PRINTFORML 总有一天要和你混浴…！　%CALLNAME:MASTER%在心中发誓…
				PRINTW
			ENDIF
		;それ以外の温泉入浴
		ELSE
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;436,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K139_436
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_436_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_436_1
;==================================================
;440,等待
;==================================================
@M_KOJO_MESSAGE_COM_K139_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_440_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;441,聽課(慧音専用
;==================================================
@M_KOJO_MESSAGE_COM_K139_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_441_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;442,伐採（未実装
;==================================================
@M_KOJO_MESSAGE_COM_K139_442
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_442_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;445,採集
;TFLAG:193(採集物のID, 0=『何も見つからなかった…』
;TFLAG:194(今回採集した個数
;==================================================
@M_KOJO_MESSAGE_COM_K139_445
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_445_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_445_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF !TFLAG:193
	ELSE
		SELECTCASE TFLAG:193
		CASE 600
			PRINTFORML 「真是个平淡无奇的蘑菇啊。虽然很好吃」
			PRINTFORML 「啊、不能碰那边的蘑菇哦。会起斑疹的」
		CASE 602
			PRINTFORML 「%CALLNAME:MASTER%阁下、这个形状、像不像什么…%UNICODE(0x2665) *1%」
			PRINTFORML 「特别是这个能弄出黏黏糊糊的线条的地方…%UNICODE(0x2665) *1%」
		CASE 616
			PRINTFORML 「这是好山芋啊。吃了好像会强精呢♪」
			PRINTFORML 「请务必让%CALLNAME:MASTER%阁下多吃一些…%UNICODE(0x2665) *1%」
		CASE 633
			PRINTFORML 「这个、虽然是石头、但是很软、所以有很多用途呢」
		CASE 640
			PRINTFORML 「没想到能见到这么贵重的东西…」
			PRINTFORML 「因为很稀少、所以要好好使用哦」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;448,罠を仕掛ける／虫トラップ
;TFLAG:193,
;   -1=罠が壊れた
;    0=罠を仕掛けた
;    1=獲物が得られた
;   10=虫トラップを仕掛けた
;   11=虫トラップを破棄した
;   12=ムシを捕まえた
;FLAG:194,獲物の番号
;ムシの名前は MUSHI_NAME で表示したり判別したりできます
;==================================================
@M_KOJO_MESSAGE_COM_K139_448
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_448_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_448_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;お出かけ中
	IF !IN_HOME(CFLAG:MASTER:現在位置)
		PRINTFORML 「我想想啊…这附近的话」
		SELECTCASE CFLAG:MASTER:現在位置
		;神社～
		;桜花道的鳥居("花樹土")
		CASE 10
			PRINTFORML 「[蓮花蝶]是很有价值的猎物呢」
		;神社境内("土岩家")
		CASE 20
			PRINTFORML 「[Roomba]是很有价值的猎物呢」
		;妖精的大樹
		CASE 50;("草花樹土")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		;命蓮寺～
		CASE 倒垂的柳樹下;("草土樹")
			PRINTFORML 「[闘蟋]是很有价值的猎物呢」
		CASE 命蓮寺境内;("土岩家")
			PRINTFORML 「[蝎子][彩蚴]是很有价值的猎物呢」
		CASE 墓地;("草花土岩")
			PRINTFORML 「[闘蟋]是很有价值的猎物呢」
		;人类之里～
		CASE 広場;("土岩家")
			PRINTFORML 「[天竿魚]是很有价值的猎物呢」
		CASE 長屋街;("家")
			PRINTFORML 「[Roomba]是很有价值的猎物呢」
		;霧之湖～紅魔館～
		CASE 霧之湖;("草水")
			PRINTFORML 「[昔蜻蜒][Neo水螅][大王具足蟲][箭毒蛙]是很有价值的猎物呢」
		CASE 廃洋館;("家")
		CASE 正門;("草花樹土")
			PRINTFORML 「[昔蜻蜒]是很有价值的猎物呢」
			;迷途竹林～
		CASE 竹林入口;("草土樹")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		CASE 迷失的小道;("草土樹")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		CASE 斜角的竹林;("草土樹")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		CASE 兎的洞穴;("草土樹")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		CASE 無名之丘;("草花土")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		CASE 太陽花田;("草花土")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		;魔法之森～
		CASE 森林的入口;("草樹土")
			PRINTFORML 「[魔法蝴蝶][武士兜蟲]是很有价值的猎物呢」
		CASE 古木的大樹;("草樹土")
			PRINTFORML 「[魔法蝴蝶][武士兜蟲]是很有价值的猎物呢」
		CASE 再思之道;("草花土")
			PRINTFORML 「[魔法蝴蝶]是很有价值的猎物呢」
		CASE 無縁塚;("草樹花土岩")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽]是很有价值的猎物呢」
		;三途之川～冥界～
		CASE 中有之道;("草土")
			PRINTFORML 「[死神螳螂][怪物旱地沙螽]是很有价值的猎物呢」
		CASE 三途之川;("草水")
			PRINTFORML 「[三葉虫][奇蝦]是很有价值的猎物呢」
		CASE 彼岸;("花水")
			PRINTFORML 「[三葉虫][奇蝦][黒死蝶]是很有价值的猎物呢」
		CASE 白玉楼庭;("花樹土家")
			PRINTFORML 「[黒死蝶]是很有价值的猎物呢」
		CASE 地獄;("土岩")
		;妖怪之山;(山麓)～
		CASE 山麓樹海;("草樹土")
			PRINTFORML 「[武士兜蟲]是很有价值的猎物呢」
		CASE 玄武之澤;("水岩")
			PRINTFORML 「[巨型蟾蜍]是很有价值的猎物呢」
		CASE 大蛤蟆之池;("草水")
			PRINTFORML 「[巨型蟾蜍]是很有价值的猎物呢」
		;妖怪之山;(山頂)
		CASE 絶景之丘;("草樹土岩")
			PRINTFORML 「[武士兜蟲]是很有价值的猎物呢」
		CASE 山之湖;("草水")
			PRINTFORML 「[怪物旱地沙螽][昔蜻蜒][大王具足蟲][箭毒蛙]是很有价值的猎物呢」
		CASE 守矢神社境内;("土岩家")
			PRINTFORML 「[蝎子][彩蚴]是很有价值的猎物呢」
		;地底～
		CASE 幻想風穴;("土岩")
			PRINTFORML 「[蒙古死亡蠕虫][蚁后][犍陀多蜘蛛]是很有价值的猎物呢」
		CASE 地獄的深道;("土岩水")
			PRINTFORML 「[蒙古死亡蠕虫][蚁后][犍陀多蜘蛛]是很有价值的猎物呢」
		CASE 旧地獄街道;("土家")
			PRINTFORML 「[蒙古死亡蠕虫][蚁后][犍陀多蜘蛛]是很有价值的猎物呢」
		CASE 地霊殿;("家")
			PRINTFORML 「有哪些有价值的猎物呢…」
		;夢之世界～月～
		CASE 寧靜海;("月")
			PRINTFORML 「[好奇号]是很有价值的猎物呢」
		ENDSELECT
	;山頂のみ反応。其他はスルー
	ELSE
		SELECTCASE CFLAG:MASTER:現在位置
		CASE 801;山頂入口("草樹土岩")
			PRINTFORML 「[武士兜蟲][大鍬形]是很有价值的猎物呢」
		CASE 805;頂上("草樹土岩")
			PRINTFORML 「[武士兜蟲][大鍬形]是很有价值的猎物呢」
		CASE 806;瀑布背面("水岩")
			PRINTFORML 「[蝎子][彩蚴]是很有价值的猎物呢」
		CASE 811;境内("土岩家")
			PRINTFORML 「[蝎子][彩蚴]是很有价值的猎物呢」
		CASE 814;湖畔("草水")
			PRINTFORML 「[亞歷珊卓皇后鳥翼蝶][怪物旱地沙螽][昔蜻蜒]是很有价值的猎物呢」
		CASE 815;庭("草花樹土家")
			PRINTFORML 「[武士兜蟲][大鍬形]是很有价值的猎物呢」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;449,虫捕り
;TFLAG:193,
;   -2=殺してでもうばいとる（取っ組み合いの末逃がす）
;   -1=ゆずってくれ！→拒否
;    0=捕獲失敗
;    1=MASTERが捕まえた
;    2=キャラが捕まえたのをMASTERが褒めた
;    3=ゆずってくれ！→渋々オッケー
;    4=ゆずってくれ！→オールオッケー
;TRAINMESSAGEを省略する場合は虫カゴに入れる処理を忘れないように
;ムシの名前は MUSHI_NAME で表示したり判別したりできます
;==================================================
@M_KOJO_MESSAGE_COM_K139_449
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_449_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;483,ムシバトル
;TFLAG:193,
;    1=１対１の対戦
;    2=３～４人戦
;    3=２対２のチーム戦
;TFLAG:194にMASTERの順位が入っています（MASTERが1ならキャラ負け）
;バトル中の口上はイベント口上ファイルに入っています
;==================================================
@M_KOJO_MESSAGE_COM_K139_483
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_483_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;约会系指令
;约会系口上は文字街道外出先で発生
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,约会会話
;==================================================
@M_KOJO_MESSAGE_COM_K139_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_600_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K139_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_MESSAGE_COM_K139_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_602_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K139_603
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		SELECTCASE RAND:4
		CASE 0
			PRINTFORML 「嘸嘸、好像很清楚约会的心得呢♪」
		CASE 1
			PRINTFORML 「嘸嘸、不用慌、姐姐会跟着你走的♪」
		CASE 2
			PRINTFORML 「用普通的牵手方式真的好吗？　比如…」
			PRINTFORML 典十指相扣地牵住了你的手
			PRINTFORML 「你看、这样子才像是恋人吧…%UNICODE(0x2665) *1%」
		CASE 3
			PRINTFORML 「小ー手ー手、牵ー起来ー♪」
			PRINTFORML 典一边唱歌一边向前走
		ENDSELECT
	ELSE
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 「要被带到奇怪的地方去了吗！？　就像是小薄本上写的那样♪」
			PRINTFORML 典好像很高兴
		CASE 1
			PRINTFORML 「我很期待你会带我去哪里♪」
		CASE 2
			PRINTFORML 「……」
			PRINTFORML 「不、这种正儿八经的交往、出乎意料地让人不好意思…」
			PRINTFORML 看着被温柔地牵着的手、典的脸颊微微泛红
		ENDSELECt
	ENDIF
	PRINTW
ENDIF
RETURN 1

;==================================================
;604,散步
;约会中の場合、CFLAG:現在位置に移動先の場所が既に入ってる
;==================================================
@M_KOJO_MESSAGE_COM_K139_604
;散步にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K139_604_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;605,繞道
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_SUCCESS_COM_K139_605
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_605
;繞道にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K139_605_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;610,請吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K139_610
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;约会中
	IF !IN_HOME()
		SELECTCASE CFLAG:MASTER:現在位置
			;人类之里
			CASE 230
				PRINTFORML 「人类这个种族…虽然很弱小、但在这种文化方面、其他种族是远远无法企及的」
				PRINTFORML 「嗯、这个也很不错…嗯、嗯…」
				PRINTW
			;竹林
			CASE 410
				PRINTFORML 「嗯ー、蒲烧酱汁的甜味是很难舍弃的、但是把干烤的素材发挥出来的烤法也很棒…」
				PRINTFORML 「店主把工作做得很好呢」
				PRINTW
			;中有之道
			CASE 610
				PRINTFORML 「嗯嗯、这地狱拉面、扑鼻的辣味又勾起了我的食欲…！」
				PRINTFORML 「研制这个拉面的人还挺懂…滑溜溜的豆腐也是点睛之笔…嗯、嗯…」
				PRINTFORML 「对不起、能再给我多追加一些面吗♪」
				PRINTW
			;旧地獄街道
			CASE 930
				PRINTFORML 「嗯、虽然看起来不那么精致、但味道却意外的不错」
				PRINTFORML 「对不起、再来一份这个地狱温泉蛋盖饭吧…」
				PRINTW
		ENDSELECT
	ELSE
		SELECTCASE CFLAG:MASTER:現在位置
			;人类之里
			CASE 218
				PRINTFORML 「人类这个种族…虽然很弱小、但在这种文化方面、其他种族是远远无法企及的」
				PRINTFORML 「嗯、这个也很不错…嗯、嗯…」
				PRINTW
			;竹林
			CASE 444
				PRINTFORML 「嗯ー、蒲烧酱汁的甜味是很难舍弃的、但是把干烤的素材发挥出来的烤法也很棒…」
				PRINTFORML 「店主把工作做得很好呢」
				PRINTW
			;中有之道
			CASE 601
				PRINTFORML 「嗯嗯、这地狱拉面、扑鼻的辣味又勾起了我的食欲…！」
				PRINTFORML 「研制这个拉面的人还挺懂…滑溜溜的豆腐也是点睛之笔…嗯、嗯…」
				PRINTFORML 「对不起、能再给我多追加一些面吗♪」
				PRINTW
			;旧地獄街道
			CASE 933
				PRINTFORML 「嗯、虽然看起来不那么精致、但味道却意外的不错」
				PRINTFORML 「对不起、再来一份这个地狱温泉蛋盖饭吧…」
				PRINTW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;613,賺錢（オミットされました
;==================================================
@M_KOJO_SUCCESS_COM_K139_613
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K139_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_613_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;614,採購食材
;TFLAG:193(1=購入＆約會経験アップ 0=購入 -1=非購入)
;==================================================
@M_KOJO_MESSAGE_COM_K139_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_615_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K139_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:恋慕 || TALENT:恋人
		PRINTFORML 「%CALLNAME:MASTER%阁下。好的、啊～～嗯%UNICODE(0x2665) *1%」
		PRINTFORMW 典把自己的那份喂给了%CALLNAME:MASTER%
		PRINTFORML 「好吃吗？　那真是太好了♪」
		PRINTW
		PRINTFORML 作为回礼、把自己的那份也喂到了典的嘴里
		PRINTFORMW 「唔呣…嗯～%UNICODE(0x2665) *1%　很好吃呢♪」
		PRINTFORML 典双手捂着脸颊、露出非常幸福的表情
		PRINTW
	ELSE
		IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
			PRINTFORMW 「姐姐我、好想让%CALLNAME:MASTER%阁下也来尝一尝啊ー」
			PRINTFORMW 「这个距离不太好喂、坐远点吧？　好的、这个距离就很适合喂你呢♪」
			PRINTFORML
		ELSE
			PRINTFORML 「真好吃啊♪」
			PRINTFORML 典一脸幸福地咂着嘴品尝着甜品
			PRINTW
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_MESSAGE_COM_K139_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_621_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
		PRINTFORML 「…………」
		PRINTFORML 典一脸不悦地钓着鱼…
		PRINTW
	ELSE
		PRINTFORML 「鱼儿啊ー、鱼儿啊ー♪　何时上钩呢ー♪」
		PRINTFORML 钓鱼时的典很天真
		PRINTW
	ENDIF

	SELECTCASE TFLAG:194
	;典が釣った
	CASE IS >= 1000
		SELECTCASE TFLAG:193
		CASE 0
			PRINTFORML 「哎哎！　欸、什么也没钓上来啊…」
			PRINTFORML 看见典什么也没钓上来的%CALLNAME:MASTER%大笑起来、典却一脸严肃
			PRINTFORML 「唔ー。下次我要钓条大鱼给你看ー」
			PRINTW
		;普通の魚
		CASE 1 TO 4
			PRINTFORML 「请看。%CALLNAME:MASTER%阁下、典钓到鱼了呢♪」
			PRINTFORML 典一边展示着扑哧扑哧跳着的%FISH_NAME(TFLAG:193)%、一边露出得意的笑容
			PRINTW
		;好吃的魚
		CASE 11 TO 15
			PRINTFORML 「%CALLNAME:MASTER%阁下！　%CALLNAME:MASTER%阁下！　是%FISH_NAME(TFLAG:193)%啊！」
			PRINTFORML 「钓到了%FISH_NAME(TFLAG:193)%哟！（ﾄﾞﾔｧ）」
			PRINTW
		;木材
		CASE 610
			PRINTFORML 「这是怎么回事！」
			PRINTFORML 「觉得很重、结果是木材啊…这样的话、那就不能用了呢」
			PRINTW
		;守矢之守札
		CASE 131
			PRINTFORML 「哇、钓到垃圾了」
			PRINTFORML 「…失礼了、不小心说了脏话」
			PRINTW
		;跳蛋
		CASE 21
			PRINTFORML 「啊咧、这个是跳蛋吧…是谁把它放到河里的」
			PRINTFORML 「…你要用吗？」
			PRINTW
		;氷之鱗
		CASE 609
			PRINTFORML 「真是漂亮的鳞片啊…都是很珍贵的材料」
			PRINTFORML 「不过、不溶于河水真是不可思议啊」
			PRINTW
		;龍之爪
		CASE 606
			PRINTFORML 「不不不…没想到龙真的存在吗」
			PRINTFORML 「虽说是龙的爪、但并不是龙大人的爪」
			PRINTW
		ENDSELECT
	;你が釣った
	CASEELSE
		IF TALENT:139:心情 == -1 || CFLAG:139:ブチギレ == 1
			SELECTCASE TFLAG:193
			CASE 0
				PRINTFORML 典看见%CALLNAME:MASTER%什么也没钓上来、讥笑了一声
			CASE 1 TO 4
				PRINTFORML 看见%CALLNAME:MASTER%钓到了%FISH_NAME(TFLAG:193)%、典露出了生气的表情
			CASE 11 TO 15
				PRINTFORML 看着%CALLNAME:MASTER%得意洋洋地炫耀着%FISH_NAME(TFLAG:193)%、
				PRINTFORML 典的钓竿開始剧烈颤抖起来…
			CASE 21
				PRINTFORML 拿着震动的跳蛋靠近典、典用力把你推開了
				PRINTFORML 结果打在了%CALLNAME:MASTER%的脸上
				PRINTFORML ┏━━━━━━┓
				PRINTFORML ┃　好痛！　┃
				PRINTFORML ┗━━━━━━┛
			CASEELSE
				PRINTFORML 把钓到的鱼拿给典看、典若无其事地「嗯ー」了一声
			ENDSELECT
			PRINTW
		ELSE
			SELECTCASE TFLAG:193
			CASE 0
				SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「…嘛、也有这种情况」
					PRINTFORML 典露出为难的笑容、安慰着你
				CASE 1
					PRINTFORML 「说不定下次就能钓到了哦。不要放弃、加油吧」
				CASE 2
					PRINTFORML 「啊啊、%CALLNAME:MASTER%阁下钓上来的是『只有傻瓜才看不见的鱼』…」
					PRINTFORML 「因为典是个愚者…所以才看不见鱼的身影」
					PRINTFORML 这家伙明明知道什么也没钓上来…
				ENDSELECT
				PRINTW
			;普通の魚
			CASE 1 TO 4
				PRINTFORML 「请看。%CALLNAME:MASTER%阁下、典钓到鱼了呢♪」
				PRINTFORML 典一边展示着扑哧扑哧跳着的%FISH_NAME(TFLAG:193)%、一边露出得意的笑容
				PRINTW
			;好吃的魚
			CASE 11 TO 15
				PRINTFORML 「%CALLNAME:MASTER%阁下！　%CALLNAME:MASTER%阁下！　是%FISH_NAME(TFLAG:193)%啊！」
				PRINTFORML 「钓到了%FISH_NAME(TFLAG:193)%哟！（ﾄﾞﾔｧ）」
				PRINTW
			;跳蛋
			CASE 21
				PRINTFORML 「那是…新品种的鱼…是吗」
				PRINTFORML 咕噜噜噜噜噜！！
				PRINTFORML 「…很有活力呢」
				PRINTW
			CASEELSE
				PRINTFORML 「哎呀、钓到什么稀有的东西了」
				PRINTW
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;626,土産屋
;TFLAG:194(行動結果(-2=ひやかし -1=ウィンドウショッピング 1=400点未満（BAD） 2=～699点（NOMAL） 3=700点以上（GOOD）
;CFLAG:性格傾向による地の文分岐あり
;==================================================
@M_KOJO_MESSAGE_COM_K139_626
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_626_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_626_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		SELECTCASE TFLAG:194
			;ひやかし
			CASE -2
				PRINTFORML 「那个店主很生气呢」
				PRINTFORML 「下次给你买点什么吧」
				PRINTW
			;果然还是算了（見送り）
			CASE -1
				PRINTFORML 「没有想要的东西吗？」
				PRINTFORML 「姐姐今天也没什么想要的呢」
				PRINTW
			;400点未満（BAD）
			CASE 1
				PRINTFORML 「嗯嗯嗯嗯嗯、嗯嗯～～～～、嗯嗯嗯～～……」
				PRINTFORML 「非、非常感谢…姐姐、高兴吗ー…？　很高兴哦…」
				PRINTFORML 好像送了一个让典连蹩脚的谎言都说不出来的礼物…
			;400点～699点（NOMAL）
			CASE 2
				PRINTFORML 「嗯♪　姐姐很高兴哦♪」
				IF TALENT:恋人
					PRINTFORML 「%CALLNAME:MASTER%阁下是经过认真考虑、选择了姐姐会高兴的礼物」
					PRINTFORML 「如果有金钱价值的话、这确实是有意义的…但这不是唯一的价值观」
					PRINTFORML 「虽然说了有些深奥的事情、但姐姐还是很高兴能得到这个礼物的♪」
					PRINTW
				ELSE
					PRINTFORML 「想给对方什么是很重要的…思考给对方什么会让她高兴也是很重要的」
					PRINTFORML 「无论多么昂贵的东西、如果不感兴趣、对那个人来说都只是废品、垃圾」
					PRINTFORML 「有了喜欢的人、就要注意这一点」
					SIF TALENT:恋慕
					PRINTFORML （如果你喜欢我的话…不不、应该没有这回事吧）
					PRINTW
				ENDIF
			;700点以上（GOOD）
			CASE 3
				IF TALENT:恋人
					PRINTFORML 「%CALLNAME:MASTER%阁下…这个…」
					PRINTFORML 「好高兴…姐姐我、会一直珍藏着它的…%UNICODE(0x2665) *1%」
					PRINTFORML 典这时也不像平时那样揶揄、而是轻轻抱住了%CALLNAME:MASTER%
					PRINTW
				ELSE
					PRINTFORML 「真是的…被送了这么好的礼物…我会越来越喜欢%CALLNAME:MASTER%阁下的哦…%UNICODE(0x2665) *1%」
					PRINTFORML 「姐姐看起来像是在開玩笑吗？」
					PRINTFORML 「谢谢、%CALLNAME:MASTER%阁下。姐姐我、会一直珍藏着它的」
					PRINTW
				ENDIF
		ENDSELECT
	ELSE
		SELECTCASE TFLAG:194
			;ひやかし
			CASE -2
				PRINTFORML 「那个店主很生气呢」
				PRINTFORML 「一直左挑右选却不买可不行哟？」
				PRINTFORML 虽然这么说但是问了一堆关于那些商品的问题的人明明是典才对…
				PRINTW
			;果然还是算了（見送り）
			CASE -1
				PRINTFORML 「没有想要的东西吗？」
				PRINTFORML 「我也没找到一眼相中的东西…真遗憾」
				PRINTW
			;400点未満（BAD）
			CASE 1
				PRINTFORML 「不行不行不行…%CALLNAME:MASTER%阁下…」
				PRINTFORML 「如果你想送礼物的话、就多再考虑考虑吧…」
				PRINTFORML 「如果认为无论送什么礼物女人都会很高兴的话、那就大错特错了」
				PRINTW
			;400点～699点（NOMAL）
			CASE 2
				PRINTFORML 「非常感谢。嘸嘸、我就收下了」
				PRINTW
			;700点以上（GOOD）
			CASE 3
				PRINTFORML 「这个是、给我的吗…？」
				PRINTFORML 「…没什么、非常感谢。我会好好珍惜的」
				PRINTFORML 典并没有装腔作势、而是面红耳赤地把礼物轻轻抱在胸前
				PRINTW
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;660,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K139_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		SELECTCASE TFLAG:193
		CASE 1
		CASE 2
		CASE 3
		CASE 4
		CASE 5
			;典が非処女、被逆推回数３回以上、幻想郷縁起イベントを見ていない
			IF !TALENT:処女 && CFLAG:1014 >= 3 && CFLAG:1015 == 0
				PRINTFORML 「什……什……」
				PRINTFORML 典一边看书一边抖个不停
				PRINTFORML 「这是什么啊～～～～！」
				PRINTFORML 看着典气势汹汹的样子、不由得吓了一跳
				PRINTW
				PRINTFORML 「%CALLNAME:MASTER%阁下～～！　真是太过分了、请看看这个～～」
				PRINTFORML 典以猛烈的气势所展现的、是稗田阿求所记录的幻想乡缘起
				PRINTW
				PRINTFORML 性骚扰淫兽
				PRINTFORML 菅牧　典
				PRINTL
				PRINTFORML 能力:只会对孩子进行性骚扰的能力
				PRINTFORML 危险度:（贞操：极高　生命：极低）
				PRINTFORML 人类友好度:（孩子：极高）
				PRINTFORML 主要活动场所:任何有可爱孩子的地方
				PRINTL
				PRINTFORML 她是大天狗之一饭纲丸龙的得力助手、能带来超出命令预期的成果……至少是被这样认为的。
				PRINTFORML 实际上是只要有时间就总是对自己喜欢的孩子（尤其是男孩子）进行性骚扰、以此为乐的凶恶妖怪。
				PRINTL
				PRINTFORML 背着上司搞性骚扰、偷偷说各种各样的隐语、一副很忙的样子。
				PRINTFORML 大概是工作能力强吧、大天狗、市场之神、还有大蜈蚣都很信任她、经常找她商量各种事情。
				PRINTW
				PRINTFORML 但她的真实身份是管狐。
				PRINTL
				PRINTFORML 基本上是个很会照顾人的姐姐、但听从她的甜言蜜语的人会被宠坏的吧。
				PRINTFORML 但也不能忘记、等待着你的结局将是被玩弄到全身筋疲力尽为止。
				PRINTL
				PRINTFORML 最后失去童贞的罪魁祸首、归根结底还是她的教唆。
				PRINTL
				PRINTFORML 【对策】被盯上了就放弃吧。
				PRINTL
				PRINTFORML 编集协力・%CALLNAME:MASTER%
				PRINTW
				PRINTFORML 「啊咧…写在这句末的名字…」
				PRINTFORML 典像生锈的机器一样扭着脖子、%CALLNAME:MASTER%不由得转过了脸去
				PRINTW
				PRINTFORML 嘎咻！
				PRINTFORML 典抓住%CALLNAME:MASTER%的肩膀。那力量比想象的还要强大…
				PRINTFORML 「关于这件事、必须～～得和我好好谈谈、%CALLNAME:MASTER%阁下～～～～？」
				PRINTW
				CFLAG:1015 = 1
			ELSE
			ENDIF
		CASE 6
			PRINTFORML 「哎呀哎呀～？　那是什么奇怪的书呀♪」
			PRINTFORML 偷偷看小薄本的时候被典发现了！
			PRINTW
			PRINTFORML 「呐呐～、%CALLNAME:MASTER%阁下喜欢的类型是什么呢～…」
			CALL ASK_M("被年长女性温柔教导的小薄本", 1,"年下系攻陷年上系女性的小薄本", 1,"有关巨乳女性的小薄本", 1,"兽耳狐狸少女本", 1)
			SELECTCASE RESULT
			CASE 0
				PRINTFORML 「嗯～嘸～～～～嗯？(ΦωΦ)」
				PRINTFORML 典一脸茫然地看着%CALLNAME:MASTER%的脸
				PRINTW
				PRINTFORML 「%CALLNAME:MASTER%阁下～%UNICODE(0x2665) *1%」
				PRINTFORML 「你直接和姐姐说一声、不就好了嘛～～姐姐会温柔地溺爱你的%UNICODE(0x2665) *1%」
				PRINTW
				PRINTFORML 「来嘛♪　说一下让我听听♪说『想被典姐姐疼爱』、咕嗯！？」
				PRINTFORML 因为语气实在是太恶心了所以让她吃了个脑瓜嘣
				PRINTW
			CASE 1
				PRINTFORML 「嚯嚯～～～～～～？(ΦωΦ)三(ΦωΦ)」
				PRINTFORML 典一脸茫然地看着%CALLNAME:MASTER%的脸
				PRINTW
				PRINTFORMW 「是这样吗是这样吗、%CALLNAME:MASTER%阁下、喜欢对什么部位用什么方式进攻、之类的…%UNICODE(0x2665) *1%」
				PRINTFORML 「……那么、得用更加严肃坦荡的态度、来强迫姐姐才行哟…%UNICODE(0x2665) *1%」
				PRINTFORML 原以为会被典揶揄、没想到典只是露出了温柔的笑容、戳了戳你的额头
				PRINTW
				CALL HPH_PRINT,@"（那位%CALLNAME:MASTER%阁下有着想要做攻的愿望呢HPH　这还真是让人心潮澎湃啊HPHHPH）","L"
				PRINTFORML 典的内心像瀑布一样垂涎三尺…
				PRINTW
			CASE 2
				IF TALENT:TARGET:胸圍 == 0 || TALENT:TARGET:胸圍 == -1 || TALENT:TARGET:胸圍 == -2
					PRINTFORML 「欸ー。嗯ー。嚯ー」
					PRINTFORML 典的情緒明显低落了起来…
					PRINTFORML 「这本书果然是垃圾吧」
					PRINTFORML 典噗的一声扔了出去、慌忙捡起来了
					PRINTW
				ELSE
					PRINTFORML 典笑着来回看着书中的女人和%CALLNAME:MASTER%
					PRINTFORML 「原来如此～♪　原来最喜欢大欧派了呀～♪」
					PRINTW
					PRINTFORML 「有什么好害羞的呢♪　谁不喜欢欧派呢♪」
					PRINTFORML 「顺便一提、这本书里的胸部和姐姐的胸部、你更喜欢哪一个呢？　呐呐、哪一个？」
					PRINTW
				ENDIF
			CASE 3
				PRINTFORML 「啊啦啊啦啊啦、这本书里的女孩子、怎么和姐姐一模一样呢～(`ω´)」
				PRINTFORML 「虽然平时很害羞、但其实是很喜欢姐姐的吧～？」
				CALL ASK_YN("…喜欢","吵死了")
				IF !RESULT
					CALL PRINT_FACE, [[典]], "自慰", "服", "", ""
					PRINTFORML 「…欸！　是、是是、是ー吗ー♪　还真是一反常态的坦诚呢♪」
					PRINTFORML 「真、真是ー、讨厌啊♪　你在说些什么啊…♪」
					CALL HPH_PRINT,@"（%CALLNAME:MASTER%阁下说了喜喜喜喜喜喜欢！？HPH）","L"
					CALL PRINT_FACE, [[典]], "自慰", "裸", "", ""
					CALL HPH_PRINT,@"（啊啊啊啊糟糕啊仅仅是这副表情和话语就让我稍微高潮了HPH）","L"
					PRINTW
				ELSE
					PRINTFORML 「呀ー也不用那么害羞嘛ー♪　毕竟我们是%UNICODE(0x2665) *1%　相・思・相・爱呀ー%UNICODE(0x2665) *1%」
					PRINTFORML 「请看这边ー♪　你看、我是身为兽耳狐狸少女的典哦ー♪　看啊看啊ー♪」
					PRINTW
				ENDIF
			ENDSELECT
		CASE 7
			PRINTFORML 「哎呀哎呀、你很用功啊」
			PRINTFORML 正在看书的时候、典从旁边看过来
			PRINTW
			PRINTFORML 「不用那么害羞也可以哟♪　因为这是很重要的学习啊」
			PRINTFORML 典把身体靠过来、在耳边低语道
			PRINTW
			CALL HPH_PRINT,@"「不过、比起书本上的知识、实际操作更能让人记住对吧…HPH」","L"
			CALL HPH_PRINT,@"「让姐姐来给你当教科书吧…HPH」","L"
			PRINTW
		CASE 8
			PRINTFORML 「嚯嚯、我还以为你在认真读什么呢…」
			PRINTFORML 典把嘴唇凑到%CALLNAME:MASTER%低语道
			CALL HPH_PRINT,@"「大ー色ー狼HPH」","L"
			PRINTW
		ENDSELECT
	;大人
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;698,進入房間
;TARGETの進入房間場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K139_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_698_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;699,外出
;==================================================
@M_KOJO_MESSAGE_COM_K139_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;前ターン膝枕後身体接觸指令
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_SUCCESS_SCOM_K139_60
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

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

ENDIF
RETURN 1
;==================================================
;61,抱枕
;(TARGET睡眠時間or衰弱)陪睡中、前ターン抱きつく後就寝指令
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K139_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K139_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K139_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_K139_62
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K139_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K139_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K139_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		PRINTFORML 「嘸嘸、好痒啊」
		PRINTFORML 「这是姐姐的回礼哦♪」
		PRINTW
		SELECTCASE RAND:2
		CASE 0
			PRINTFORML 典亲吻了%CALLNAME:MASTER%的额头
		CASE 1
			PRINTFORML 典亲吻了%CALLNAME:MASTER%的脸
			PRINTFORML 「呼呼♪　我说过要给你回礼、但我没说是在额头上呀♪」
			PRINTFORML 「呀ー、被骗了♪」
		ENDSELECT
		PRINTW
	ELSE
		PRINTFORML 「真是、太装腔作势了吧」
		SIF ABL:欲望 >= 5
			PRINTFORML 「那么、能不能再换一个地方呢…%UNICODE(0x2665) *1%」
		PRINTW
	ENDIF
ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;前ターン接吻後接吻
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_SUCCESS_SCOM_K139_63
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K139_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K139_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K139_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		IF TCVAR:発情
			IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「啊HPH　咕HPH　呼呜HPH」","L"
				CALL HPH_PRINT,@"（%CALLNAME:MASTER%阁下的開关好像也被打開了呢HPH）","L"
				CALL HPH_PRINT,@"（自己拼命地用舌头缠着我的舌头HPH　逞能的样子真是可爱呢HPH）","L"
				RESETCOLOR
				PRINTW
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"（呼呼、要不要趁着这个机会让他摸摸欧派呢HPH）","L"
				CALL HPH_PRINT,@"（来、摸一摸姐姐的欧派HPH　姐姐也兴奋起来了呢）","L"
				RESETCOLOR
				PRINTW
				IF BASE:MASTER:勃起 >= 1000
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「啊咧、这里…HPH」","L"
					CALL HPH_PRINT,@"「光是接吻就已经变成这样了吗…HPH」","L"
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、真是H呢HPH」","L"
					PRINTW
					CALL HPH_PRINT,@"「这么H的%CALLNAME:MASTER%阁下、姐姐一定要惩罚一下才行…HPH」","L"
					RESETCOLOR
					PRINTFORML 典用双手夹住%CALLNAME:MASTER%的脸颊、把你拉近到几乎能碰到她嘴唇的距离
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「多么…浓厚的吻、%CALLNAME:MASTER%阁下的脑袋、都要变傻了哦…HPH」","L"
					RESETCOLOR
					PRINTFORML 将自己的兽欲暴露出来的典、将她的脸再度覆盖到了%CALLNAME:MASTER%的脸上…
					PRINTW
				ENDIF
				RESETCOLOR
			ELSE
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「嗯嗯HPH　嗯HPH　哈HPH　哈呼HPH　更多、再更多地亲吻我吧…哈啊HPH」","L"
				RESETCOLOR
				PRINTFORML %CALLNAME:MASTER%和典就像蛞蝓交配一样黏糊糊地缠绕着舌头、吞咽着对方的唾液…
			ENDIF
			PRINTW
		ELSE
			IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
				CALL HPH_PRINT,@"「HPH　HPH　嗯HPH　嗯呼HPH　哈…HPH」","L"
				CALL HPH_PRINT,@"（嘸嘸、脸红红的、拼命地吻着…HPH）","L"
				PRINTW
				CALL HPH_PRINT,@"「噗哈…HPH　啊、怎么了？」","L"
				CALL HPH_PRINT,@"「已经结束了吗…？　姐姐我还想让%CALLNAME:MASTER%阁下再多吻吻我呢…HPH」","L"
				PRINTW
				IF BASE:MASTER:勃起 >= 1000
					PRINTFORML 典突然往下看、注意到%CALLNAME:MASTER%的股间已经膨胀起来了
					CALL HPH_PRINT,@"（啊啊、原来如此…HPH）","L"
					PRINTW
					CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、因为和姐姐的接吻、小鸡鸡变得这么大了呢…HPH」","L"
					CALL HPH_PRINT,@"「真是个坏孩子…HPH」","L"
				ENDIF
			ELSE
				CALL HPH_PRINT,@"「嗯HPH　嗯呼HPH　嗯嗯HPH　哈啊…HPH」","L"
				IF ABL:MASTER:舌 > 2
					CALL HPH_PRINT,@"「你很擅长接吻呢…HPH」","L"
					CALL HPH_PRINT,@"「那个…可以再更多地亲吻我吗…HPH」","L"
				ELSE
					CALL HPH_PRINT,@"（虽然绝对称不上熟练…但是个很热情的吻HPH）","L"
					IF TALENT:MASTER:体型 >= 2 && TALENT:MASTER:胆量 == -1
						PRINTFORML （我一直以为他的胆子比他的身体还要小…这不是只要去做就能做到嘛%UNICODE(0x2665) *1%）
						PRINTFORML （这么拼命地接吻…真是个可爱的人啊%UNICODE(0x2665) *1%）
					ELSE
						IF TALENT:MASTER:胆量 == -1
							PRINTFORML （因为太胆小所以只能做出像小孩子一样的吻…）
							PRINTFORML （呼呼、似乎稍微自信了一些呢%UNICODE(0x2665) *1%）
						ELSE
							PRINTFORML （虽然没什么技术但还是想保持主导地位…真是个可爱的人啊%UNICODE(0x2665) *1%）
						ENDIF
						PRINTW
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;约会出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_SCOM_K139_80
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_SCOM_K139_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K139_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K139_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		IF TALENT:恋人
			PRINTDATADL
				DATAFORM 「哈嗯%UNICODE(0x2665) *1%」
				DATAFORM 「哦哦%UNICODE(0x2665) *1%」
				DATAFORM 「哈呜%UNICODE(0x2665) *1%」
			ENDDATA
				PRINTFORML 「啊、对不起…因为%CALLNAME:MASTER%阁下的手的触感很舒服、所以不知不觉就…把内心的所想说出来了…」
				PRINTFORML （因为是我的男朋友所以逞强地守护我的%CALLNAME:MASTER%阁下…）
				PRINTFORML （不肖菅牧典、在这一刻理解了什么叫萌…！）
				PRINTW
		ELSE
			PRINTFORML 「啊啦、你是要护送姐姐吗？」
			PRINTFORML （这孩子也在努力让我開心呢）
			PRINTW
			PRINTFORML 「…………♪」
			PRINTFORML 「好啦好啦、不用这么用力拉姐姐也可以、姐姐会跟着你走的♪」
			PRINTW
		ENDIF
	ELSE
		IF TALENT:恋人
			PRINTFORML 「…好的♪」
		ELSEIF TALENT:恋慕
			PRINTFORML 「啊…」
			IF TALENT:140:恋人
				PRINTFORM （饭纲丸大人、仅限这次、典是属于这位的…）
			ELSEIF TALENT:29:恋人
				PRINTFORM （射命丸、曾经抱紧你的手、现在正紧握着我的手呢）
			ELSEIF TALENT:42:恋人
				PRINTFORM （姫海棠、曾经牵着你的手、现在却在牵着我）
			ELSEIF TALENT:65:恋人
				PRINTFORM （犬走、曾经温柔地抚摸着你的头的手、现在却握住了我的手）
			ELSE
				PRINTFORML （%CALLNAME:MASTER%阁下、似乎完全不在意恋人的存在呢）
				PRINTFORML （如果就这样把我带走、那该有多好啊）
				PRINTFORML （但是、时间一到、这个人就会松開手、回到自己爱的人身边吧…）
			ENDIF
		ELSE
			IF TALENT:140:恋人
				PRINTFORM （饭纲丸大人、你的恋人现在正牵着部下的手呢…♪）
			ELSEIF TALENT:29:恋人
				PRINTFORM （射命丸、不好好拴紧恋人的话、）
			ELSEIF TALENT:42:恋人
				PRINTFORM （姫海棠、曾经牵着你的手、现在却在牵着我）
			ELSEIF TALENT:65:恋人
				PRINTFORM （犬走、曾经温柔地抚摸着你的头的手、现在却握住了我的手）
			ELSE
				PRINTFORML （%CALLNAME:MASTER%阁下、似乎完全不在意恋人的存在呢）
				PRINTFORML （如果就这样把我带走、那该有多好啊）
				PRINTFORML （但是、时间一到、这个人就会松開手、回到自己爱的人身边吧…）
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;Exソース
;ショタ（年齢=子ども、幼児／幼児退行）なら手指挿入、肛門、接吻以外反感がつかない
;大人の場合は10回まで（接吻は１回のみ）
;特に仲も良くない女性の撫摸肚子とか、イケメンでもヤバい行為なので性騷擾扱いに
;==================================================
;306,撫摸肚子ExS
@M_KOJO_EXTRASOURCE_COM_K139_306
;発情時ならどっちでもウェルカム
IF TCVAR:発情
	SOURCE:反感 = 0
	SOURCE:歓楽 = 300
	SIF SOURCE:反感 < 0
		SOURCE:反感 = 0
;ショタなら心情不快でなければ何回でも性騷擾できちまうんだ！
ELSEIF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 && (!TALENT:139:心情 == -1 || !CFLAG:139:ブチギレ)
	SOURCE:反感 = 0
	SOURCE:歓楽 = 200
	SIF SOURCE:反感 < 0
		SOURCE:反感 = 0
;10回までなら大人でも平気
ELSEIF TCVAR:352 <= 10 && (!TALENT:139:心情 == -1 || !CFLAG:139:ブチギレ)
	SOURCE:反感 = 0
	SOURCE:歓楽 = 200
	SIF SOURCE:反感 < 0
		SOURCE:反感 = 0
ENDIF

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【139】典/M_KOJO_K139_日常系コマンド.ERB

license: unknown