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_K30_300
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
;裁判中会話は強制失敗扱い。代わりに会話累積値を打ち消して「気まずい空気」を発生させない
IF 仕事中チェック(30) && BETWEENTIME(540, 719) && (CFLAG:30:現在位置 == CFLAG:30:職場) && CFLAG:30:職種 == 43
	TFLAG:192 = -1
	TCVAR:301 = 0
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_MESSAGE_COM_K30_300
;TRAIN_MESSAGEを消す条件並べる。TFLAG:193を借りてフラグ立てる
;初回or変Ｔで初対面日
IF !STRCOUNT(CSTR:30:0, "300/") || (CFLAG:30:衣装一時変更 == 62 && STRCOUNT(CSTR:30:1, "初対面"))
	TFLAG:193 = 4
;口交抜き
ELSEIF TFLAG:193 == -999
;変Ｔ
ELSEIF K30_CHECK_HEN_T() && !GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館, OMANEKIBEYA())
	TFLAG:193 = 2
;振動棒约会中
ELSEIF CHK_DATENOW(CFLAG:30:约会中) && TCVAR:30:364 > 0
	TFLAG:193 = 5
;事後の会話
ELSEIF TIME_PROGRESS(CFLAG:1504) <= 10 && TALENT:恋慕 && !K30_BE_SEEN() && TALENT:心情 > -1 && !MARK:反発刻印 && !K30_CHECK_HEN_T()
	CALLF ONCE("会話＠記念日")
	TFLAG:193 = 6
;裁判中
ELSEIF (仕事中チェック(30) && BETWEENTIME(540, 719) && (CFLAG:30:現在位置 == CFLAG:30:職場) && CFLAG:30:職種 == 43)
;接吻魔取得時確率
ELSEIF TALENT:接吻魔 && TALENT:恋慕 && RAND:(50 - TALENT:心情 * 25 - (CFLAG:积攒度 / 50)) == 0 && TALENT:心情 != -1 && MARK:30:反発刻印 == 0 && (K30_BE_SEEN() == 0 || RAND:2 == 1)
	TFLAG:193 = 3
;他は通常どおり
ELSE
	CALL TRAIN_MESSAGE
	CALL M_KOJO_MESSAGE_COM_K30_300_1
	RETURN RESULT
ENDIF
;TRAIN_MESSAGE抜きで口上メイン呼出
CALL K30_D_LINE
CALL M_KOJO_MESSAGE_COM_K30_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_300_1
#DIM 一日一回
#DIM A_COUNT
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;初回＠強引だけど映姫様能力ナーフしないと話にならない。長い
	;変Ｔであんまし偉そうなこと言うのは変だよね、ってことで別Ver.用意
	IF FIRSTTIME(SELECTCOM)
		IF K30_CHECK_HEN_T()
			PRINTFORMW 「…还有什么事要找我？」
			PRINTFORMW 「………………」
			PRINTFORMW 「还是很在意这身打扮吗?…」
			IF YOUBI_MATCH(DAY, "金")
				PRINTFORML 「这是一周只有一次的阎魔制服…仅此而已」
			ELSE
				PRINTFORML 「这是，比我地位高的人的意思，仅此而已…」
			ENDIF
			PRINTFORMW 「作为侍奉是非曲直厅的组织的一员，作为閻魔，我遵守规则…」
			PRINTFORMDW …知道映姬很认真，在很辛苦的职场工作
			PRINTFORML
			PRINTFORMW 「………是的，不管是什么样的打扮，我都要作为阎魔行动」
			PRINTFORML 「我改变了主意。还是在这个场合反映你的罪行吧」
			PRINTFORMDW 说着映姬不知从哪里取出手镜，集中精神做什么…
			PRINTFORML
			PRINTFORML 「………………骗人！？」
			PRINTFORMDW 过了一会儿，映姬动摇地看着%CALLNAME:MASTER%和镜子
			PRINTFORMW 「…镜子照不到吗?……你到底是何人？大妖的化身，还是神格的转生……」
			PRINTFORMW 「……不对啊， 似乎不是那块料」
			PRINTFORMW 「但是看不到未来…对于阎魔的我……」
			PRINTFORMDW 映姫多少受到了冲击……
			PRINTFORML
			PRINTFORML 「不行，现在想不通……」
			PRINTFORMDW 过了一会儿，映姬自言自语般软弱地嘟囔着
			PRINTFORMW 「%K30_C_NAME(MASTER)%」
			PRINTFORMW 「你的罪，现在看不见…不犯罪的人是不存在的」
			PRINTFORMW 「为了打消这个念头，你要多做善事」
			PRINTFORMW 「现在的我能说的，只有那个…」
			PRINTFORMW 「那么…失礼了」
		ELSE
			PRINTFORML 「哦呀,明明没什么事还跟我搭话,是何居心呢」
			PRINTFORML 「就趁此良机。当场把你的罪映照出来吧」
			PRINTFORMDW 这样说着，映姬从怀里拿出了手镜
			PRINTFORML
			PRINTFORMW 「侵犯隐私？　……原来如此，有想隐藏的秘密吗」
			PRINTFORML 「那既然这样,你为什么还要站在阎魔面前呢？」
			PRINTFORML 「而且我又不是什么偷窥天狗,不会去向任何人去张扬的」
			PRINTFORMW 「原本这个净琉璃之镜映照出的就是你的一生,目的就是为了让你了解并深刻体会一下自己的罪过……！」
			PRINTFORML
			PRINTFORMDL 打算開始说教的映姬有点动摇，%CALLNAME:MASTER%和镜子对比
			PRINTFORML 「…镜子照不到吗?……你到底是何人?大妖的化身，还是神格的转生……」
			PRINTFORML 「……不像呀，不是那块料。接下来会发生什么也无法预知……完全无法看清……」
			PRINTFORMDW 映姬在沉思着什么……
			PRINTFORML
			PRINTFORML 「……不管你是谁,我都得负起自己的职责」
			PRINTFORMDW 过了一会儿，映姬对%CALLNAME:MASTER%严肃地说
			PRINTFORML 「%K30_C_NAME(MASTER)%」
			PRINTFORML 「你的罪孽,现在虽然看不到,但是从不犯罪的人是不可能的存在」
			PRINTFORML 「所以你要认清自己的罪责,以善行来赎罪。」
			PRINTFORMW 「我也会在力所能及的范围内关注并给予你建议的,所以每天都好好努力吧」
			PRINTFORMW 「明白了么？」
		ENDIF
	;変Ｔ初日会話は封印
	ELSEIF TFLAG:193 == 4
		PRINTFORML 「……………………」
		PRINTDATADW
			DATAFORM 映姬陷入了沉思。没有听这边的话…
			DATAFORM 映姬正在考虑事情。妨碍也不好…
			DATAFORM 映姬对%CALLNAME:MASTER%的话也心不在焉…
		ENDDATA
	;口交抜き
	ELSEIF TFLAG:193 == -999
			PRINTFORMDL %CALLNAME:MASTER%与映姬面对面交谈
			PRINTFORMDL 特别在意妙熱的喘息和水汪汪的眼神…
			PRINTFORMW
			PRINTFORML 「……%K30_C_NAME(MASTER)%、我脸上有东西？」
			PRINTFORML 「你用那种奇怪的眼神看我，我也很为难…」
			PRINTFORMDL 虽然是岔開话题，另一方面来看映姬的欲求不满也暴露了
			PRINTFORMDW %CALLNAME:MASTER%建议『痛快』一次可以集中精力工作
			PRINTFORML
			PRINTFORML 「…即使被这么说」
			PRINTFORML 「和你相爱后…我没有自信还能集中精力工作…」
			PRINTFORMDL 当然被拒绝了，但抵抗比平时弱
			PRINTFORMDW 说得好听点，总觉得能得到什么让步…！
			PRINTFORML
			PRINTFORML 「…只是含着，也…？确实…不讨厌…但是…」
			PRINTFORMW 「………」
			PRINTFORML 「没办法啊…%K30_C_NAME(MASTER)%が…如果无论如何都无法忍耐的话」
			PRINTFORML 「快点……用嘴，就做一次…」
			PRINTFORMDW 映姬终于屈服于勾引，%CALLNAME:MASTER%的面前跪下…
			CALL K30_BLOW_JOB_IN_COURT
	;仕事中会話
	ELSEIF 仕事中チェック(30) && CFLAG:30:職種 == 43 && CFLAG:30:現在位置 == CFLAG:30:職場
		IF CFLAG:ブチギレ && TIME >= 720
			PRINTFORML 「………………」
			PRINTFORMDW 映姫对%CALLNAME:MASTER%无视着，并\@ TIME < 780 ? 正在休息 # 继续工作 \@
		;午後の仕事中はノーマル会話に一部流す
		ELSEIF TIME >= 720 && RAND:(2 + K30_CHECK_HEN_T()) != 1
			IF K30_CHECK_HEN_T()
				CALL K30_TALK_STRANGE_TSHIRT
			ELSE
				CALL K30_TALK_NORMAL
			ENDIF
		ELSE
			IF K30_CHECK_HEN_T() && TIME > 719
				IF TIME < 780
					PRINTFORMDL 一边担心着发呆的映姬一边搭话
				ELSE
					PRINTFORMDL 一边留意着默默工作的映姬，一边搭话
				ENDIF
				PRINTFORMW
			ENDIF
			SELECTCASE TIME
				;裁判中
				CASE 540 TO 719
					PRINTDATADL
						DATAFORM 不会读空气%TEXTR("裁判/説教/")%中的映姬搭话
						DATAFORM 本想搭话，却打断了映姬的说教
						DATAFORM 肃静的法庭上响起了%CALLNAME:MASTER%的声音
					ENDDATA
					PRINTFORMW
					PRINTFORML 「………………！！」
					IF TALENT:恋慕 && !CFLAG:ブチギレ
						PRINTFORMDL 映姬慌忙使了个眼色
					ELSE
						PRINTFORMDL 映姬不耐烦地瞪着我一眼
					ENDIF
					PRINTFORMDW 现在好像不搭话比较好…
					RETURN 1
				;昼休み
				CASE 720 TO 779
					PRINTDATAW
						DATAFORM 「那么……这之后也必须努力」
						DATAFORM 「参观审判是没关系的，但内容请不要太过张扬哦」
						DATAFORM 「值得转生的灵魂，最近真的变少了」
					ENDDATA
				;事務処理
				CASE 780 TO 1019
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「工作量吗？总是这样差不多」
							PRINTFORML 「老实说，地狱的财政非常困难…」
							PRINTFORMW 「对个人造成负担也是没办法的」
						CASE 1
							PRINTFORML 「因为没有部下能胜任这样的工作…」
							PRINTFORML 「虽然量有点多，但我只能一个人做」
							PRINTFORMW 「大家真的都是好孩子」
						CASE 2
							PRINTFORML 「有御阿礼的孩子帮忙的时候工作也会变得轻松呢」
							PRINTFORML 「但是，现在是她履行职责的重要时期」
							PRINTFORMW 「所以我也只能做好本职而已。不能抱怨很辛苦」
					ENDSELECT
				;書類整理
				CASE 1020 TO 1139
					PRINTDATAW
						DATAFORM 「因为是轮流工作……这一带的工作绝对不能马虎」
						DATAFORM 「如果在这里做好了，后天的工作就会变得轻松」
						DATAFORM 「尽早完成很重要」\n「但更重要的是要做得完美」
					ENDDATA
			ENDSELECT
		ENDIF
	;事後の会話
	ELSEIF TFLAG:193 == 6
		CALL K30_TALK_AFTERSEX
	;接吻魔なら会話でも接吻してくる＠せっかく属性あるからなんとなく
	ELSEIF TFLAG:193 == 3
		PRINTFORMDL 刚想開口,转身一看,映姬的脸就近得让人吓一跳……
		PRINTFORMW
		PRINTFORML 「吶、%K30_C_NAME(MASTER)%………啾噜，就噜噜噜啾♥♥」
		PRINTFORMDL 在说什么之前，映姬先吻了我……而且非常热烈
		PRINTFORMDW 好不容易分開了嘴,唾液顺着彼此的舌头拉出了一条银线……
		EXP:接吻経験 ++
		EXP:MASTER:接吻経験 ++
		IF K30_BE_SEEN() == 0
			PRINTFORMW 「呼呼呼っ、没有人在看，没关系……♥」
		ELSE
			PRINTFORMW 「\@ K30_FIND_LOVER() == 2 ? 已经… # \@%K30_C_NAME(K30_FIND_AROUND(),1)%就算被人看了我也受不了……♥」
		ENDIF
	;待客室と情人旅館会話
	ELSEIF GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館, OMANEKIBEYA())
		;酔いと心情不快は手抜き
		IF TALENT:心情 == -1 || MARK:30:反発刻印 > 0 || CFLAG:ブチギレ
			PRINTFORMW 「对不起。我有点不舒服…」
		ELSEIF K30_DRUNK() > 1 || (K30_DRUNK() == 1 && RAND:2 == 1) || TCVAR:烂醉
			CALL K30_TALK_DRUNK(TFLAG:193)
		;振動棒约会中も手抜き
		ELSEIF TCVAR:30:364
		 	IF CFLAG:現在位置 != OMANEKIBEYA()
				PRINTFORMDL %CALLNAME:MASTER%为了让映姬暂时平静下来而想说
				PRINTFORMW
			ENDIF
			CALL HPH_PRINT, "「……HPHHPH」", "L"
			PRINTFORMDW 看来映姬比起语言更希望行动…
		;通常会話すら手抜き
		ELSE
			CALL K30_TALK_NORMAL
		ENDIF
	;约会中会話
	ELSEIF CHK_DATENOW(CFLAG:30:约会中)
		SIF NOWEX:Ａ絶頂
			TFLAG:194 = 19
		;酔酒以上
		IF K30_DRUNK() > 1
			IF K30_DRUNK() == 2
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「等一下,我有点跟不上了」
					CASE 1
						PRINTFORMW 「如果不稍微,稍微休息一下的话……」
					CASE 2
						PRINTFORMW 「呼唔,走着走着感觉就累起来了……」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「不行了~动不了了……」
					CASE 1
						PRINTFORMW 「你…可以背我一下吗？」
					CASE 2
						PRINTFORMW 「好难受……」
				ENDSELECT
			ENDIF
		;振動棒约会会話
		ELSEIF TCVAR:30:364 > 0
			一日一回 = DAY
			LOCAL = K30_FIND_AROUND()
			PRINTFORMD %CALLNAME:MASTER%对映姫%TEXTR("小心翼翼地/在附近散步的同时/为了让心情平静下来/一边紧张地说/压低声音说/")%
			IF NOWEX:Ａ絶頂
				PRINTFORMDL 想要说话
				PRINTFORMDL 但是映姬%TEXTR("闭上秀目颤抖身体/用手捂着嘴/眼光湿润身体僵硬/双手抱住自己")%站着%TEXTR("つくし/停下来/")%的样子…
			ELSE
				PRINTFORMDL 说着话
			ENDIF
			PRINTFORMW
			IF NOWEX:Ａ絶頂
				IF (!GROUPMATCH(LOCAL, 0, 49) || DATE_HITOGOMI()) && RAND:2
					STRDATA LOCALS
						DATAFORM 「…%K30_C_NAME(MASTER)%…光是站在那里，就快到了？」\n「现在，%K30_C_NAME(LOCAL,2)%から…没发现，对吧HPH」
						DATAFORM 「%K30_C_NAME(LOCAL,2)%は、看起来没问题…」\n「那么，我…」\n「要去了，吶…HPH」
						DATAFORM 「%K30_C_NAME(LOCAL,2)%も…好像没有注意到」\n「不管怎样，吶…」\n「已经…去了、哟HPH　我，停不下来…的HPH」
						DATAFORM 「声音，忍耐…这样的话，就可以若无其事地すHPH」\n「%K30_C_NAME(LOCAL,2)%も、没看…见吧？」\n「…啊っHPH　好厉害，咕噜…HPH」
					ENDDATA
				ELSE
					STRDATA LOCALS
						DATAFORM 「…啊嗯っHPH　好厉害，来吧…HPH」\n「稍等…一下…HPH」
						DATAFORM 「对不，起…HPH」\n「一次，之后、吶…HPH」
						DATAFORM 「…啊哇っHPH　%K30_C_NAME(MASTER)%…HPH」\n「看着吧，吶…HPH　我…去了…地方…HPH」
						DATAFORM 「…没关系，よHPH」\n「声音是，忍耐…因为做…HPH」
						DATAFORM 「呼ーっHPH　呼ーっ…HPH　嗯啊っHPH」\n「现在，不行…没有，余裕…HPH」\n「…！！」
					ENDDATA
				ENDIF
			;道中
			ELSEIF TFLAG:约会道中 && RAND:3
				STRDATA LOCALS
					DATAFORM 「羞死了……羞死了啊…？」\n「但是……比这更厉害…好舒服…HPH」
					DATAFORM 「慢慢地…走吧」\n「没什么急的事吧…HPH」
					DATAFORM 「走着走着……很厉害，擦得很厉害…HPH」\n「屁股……不断地，越来越热了…HPH」
					DATAFORM 「别担心，这点程度的话…我可以忍耐」\n「我想，谁都不会注意到的HPH」
					DATAFORM 「绕道而行吗…？」\n「好啊，约会…慢慢地，享受吧HPH」
					DATAFORM 「和谁都…没擦肩而过呢…」\n「嗯っ…HPH　我的话…大概，没问题」\n「在人前掩饰……因为我已经习惯了HPH」
				ENDDATA
			;小町・久侘歌同室
			ELSEIF GROUPMATCH(LOCAL, 76, 129) && !RAND:3
				STRDATA LOCALS
					DATAFORM 「%K30_C_NAME(LOCAL)%が、甚至都没注意到…」\n「只属于我们的秘密，应该没问题吧…HPH」
					DATAFORM 「%K30_C_NAME(LOCAL)%…这边，在看？」\n「呼呼っHPH　即使是那个孩子…」\n「閻魔大人的…这样的秘密，也不知道吧HPH」
					DATAFORM 「即使在外出时，%K30_C_NAME(LOCAL)%的见面…真是太偶然了」\n「啊哇っHPH　那个孩子…在扭头呢」\n「我的气氛，和平时，不一样吧HPH」
				ENDDATA
			;ネームド同室。覚は色々ややこしいので見なかったことに
			ELSEIF !GROUPMATCH(LOCAL, 0, 49, RANDOM_CHARANUM) && RAND:2
				STRDATA LOCALS
					DATAFORM 「%K30_C_NAME(LOCAL)%に、说是不会被注意到？」\n「呼呼呼っ…HPH　那么，反过来…我问你」\n「正经的阎魔…竟然会做这种事」\n「%K30_C_NAME(LOCAL)%が、想起来…你觉得可能吗HPH」
					DATAFORM 「%K30_C_NAME(LOCAL)%、这边…在看呢」\n「好像不是看我，是你吗？」\n「呼呼っHPH　%K30_C_NAME(MASTER)%比较，看起来…不自然啊HPH」
					DATAFORM 「看、%K30_C_NAME(MASTER)%…你也挺直腰杆」\n「和我，并排…那样做是理所当然的吧？」\n「不然的话…%K30_C_NAME(LOCAL)%に、会被怀疑的…HPH」
				ENDDATA
			;路人湧き場所
			ELSEIF DATE_HITOGOMI() && RAND:2
				STRDATA LOCALS
					DATAFORM 「请看…周围的人」\n「谁…都不在乎我们HPH」\n「就这样…两个人，一起享受吧HPH」
					DATAFORM 「果然，看到我……人会避開的」\n「如果是平常的话，我会叹息的…」\n「呼呼呼っHPH　现在的话……恰好方便HPH」
					DATAFORM 「嗯っ…HPH　如果是平常的话，在这里…」\n「我会，考虑向别人……说教…」\n「今天…那样的余裕、到底是…没有啊ねHPH」
				ENDDATA
			;誰也不在
			ELSE
				STRDATA LOCALS
					DATAFORM 「脸和，身体都……非常，热…HPH」\n「你的安慰，我是……很期待HPH」
					DATAFORM 「主动…说出来，是什么」\n「这样，好害羞…」\n「竟然这么舒服…没想到…HPH」
					DATAFORM 「这个，拆下来的时候…非常期待…HPH」\n「现在開始…等不及了HPH」
					DATAFORM 「突然…大一点，声音什么的…出来，都没关系…」\n「あっ…HPH　但是，如果是我的话……不管多少，多么芝麻小……好像很有效呢HPH」
					DATAFORM 「ふふっ…HPH　阎魔大人的…这样的秘密」\n「这样的，害羞的…秘密，只有你知道HPH」\n「好厉害…不心动吗?HPH」
				ENDDATA
			ENDIF
			SIF !RAND:15 && !NOWEX:Ａ絶頂
				LOCALS = 「恰啊！」\n「不要紧，慢下来的脚步…只是…纠结了一下…」\n「脚下…软绵绵，已经去了…HPH」
			CALL HPH_PRINT, LOCALS, "W"
		ELSEIF TALENT:恋人
			;一日一回の会話
			IF 一日一回 != DAY
				一日一回 = DAY
				IF K30_CHECK_HEN_T()
					IF TCVAR:30:358 == 0
						PRINTFORML 「呼呼,今天要带我去哪儿？我很期待呢♪」
						PRINTFORMW 「只要和你在一起的话不管哪里都可以……」
					ELSE
						PRINTFORML 「哪里都可以」
						PRINTFORMW 「请带我去没有人的地方…」
					ENDIF
				ELSEIF TCVAR:30:358 == 0
					PRINTFORML 「呵呵呵，我很期待你今天带我去哪里呢?」
					PRINTFORMW 「只要和你在一起，哪里都可以……」
					PRINTFORMW 「期待着哦，%K30_C_NAME(MASTER)%」
				ELSE
					PRINTFORMW 「明明是我邀约你的,但是」
					PRINTFORMW 「对不起！我完全没有决定今天的计划……」
					PRINTFORMW 「……因为眼睛一离開你,就感觉摇摇晃晃的……」
					PRINTFORMW 「去的地方は%K30_C_NAME(MASTER)%可以根据自己的喜好决定，那就原谅我吧，ね？」
				ENDIF
			ELSEIF K30_CHECK_HEN_T()
				CALL K30_TALK_STRANGE_TSHIRT
			ELSE
				SELECTCASE RAND:4
					CASE 0
						PRINTFORMW 「还,还是再和你黏得更紧一些比较好吗？」
					CASE 1
						PRINTFORML 「%K30_C_NAME(MASTER)%、你知道今天应该做的善行吗？」
						PRINTFORMW 「……你得要和我变得更加亲密哦。呼呼」
					CASE 2
						PRINTFORMW 「像恋人一样聊天、意、意外的很困难呢…」
						PRINTFORMW 「我一直以来都是那种高高在上的态度…毕竟一直是那样的说话方式…」
					CASE 3
						PRINTFORML 「与其说是约会,不如说是想和你在一起的地方,首先想到的就是彼岸花田」
						SIF CFLAG:30:現在位置 == 640 && MAIN_MAP != 6
							PRINTFORMW 「看呐,这里很漂亮呢。但是……」
						PRINTFORMW 「对不起。这样的话和往常一样呢」
				ENDSELECT
			ENDIF
		ELSEIF TALENT:恋慕
			;一日一回の会話
			IF  一日一回 != DAY
				一日一回 = DAY
				IF K30_CHECK_HEN_T()
					IF TCVAR:30:358 == 0
						PRINTFORML 「呼呼,今天要带我去哪儿？我很期待呢♪」
						PRINTFORMW 「只要和你在一起的话不管哪里都可以……」
					ELSE
						PRINTFORML 「哪里都可以」
						PRINTFORMW 「请带我去没有人的地方…」
					ENDIF
				;约会誘った会話
				ELSEIF TCVAR:30:358 == 0
					IF K30_FIND_LOVER() == 2
						PRINTFORMW 「要,要去那里么…」
					ELSE
						SELECTCASE RAND:3
							CASE 0
								PRINTFORMW 「今天要去哪里？」
							CASE 1
								PRINTFORMW 「谢谢你今天邀我约会。」
								PRINTFORMW 「尽情享受一下吧」
							CASE 2
								PRINTFORMW 「……今天就做一天的恋人吧」
						ENDSELECT
					ENDIF
				ELSE
					;约会誘われた会話
					SELECTCASE K30_FIND_LOVER()
						CASE 0
							PRINTFORMW 「像这样一起出去的话,就能更加了解对方了吧」
							PRINTFORMW 「我也想让你更加了解我」
						CASE 1
							IF RAND:2 == 1
								PRINTFORMW 「想要约我是没什么问题…但是这样可以么？」
							ELSE
								PRINTFORMW 「虽然我觉得是不可以…但很高兴能和你约会。」
							ENDIF
						CASE 2
							PRINTFORMW 「那么,早点到那边去吧…」
					ENDSELECT
				ENDIF
			ELSEIF K30_CHECK_HEN_T()
				CALL K30_TALK_STRANGE_TSHIRT
			ELSEIF K30_FIND_LOVER() == 2
				PRINTFORMW 「吶、吶哎…换个地方好吗…」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「我们会被看作什么样的关系呢？」
						PRINTFORMW 「只要和你一起出门的话,感觉大家都在看这边……」
					CASE 1
						PRINTFORML 「在不同的地方说说话感觉也不错呢」
						PRINTFORMW 「请让我再多听听关于你的事情。」
					CASE 2
						PRINTFORMW 「两个人出去走走也很開心呢」
						PRINTFORMW 「总觉得连景色都看起来很新鲜…」
				ENDSELECT
			ENDIF
		;思慕以下では宴会付き合って以外誘われない
		ELSE
			IF 一日一回 != DAY && K30_CHECK_HEN_T() && TCVAR:30:358
				一日一回 = DAY
				PRINTFORML 「今天的宴会…先到会场去吧」
				PRINTFORMW 「嗯，这样算是尽了人情…」
			ELSE
				IF K30_CHECK_HEN_T()
					CALL K30_TALK_STRANGE_TSHIRT
				ELSEIF RAND:2 == 1
					CALL K30_TALK_NORMAL
				ELSE
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「我并没有打算说教哦」
							PRINTFORML 「为了你们着想而说话的教诲」
							PRINTFORMW 「偶尔听起来像是说教」
						CASE 1
							PRINTFORML 「边走边说也很新鲜呢」
							PRINTFORML 「那么…你关于善行、烦恼和恶行」
							PRINTFORMW 「你最想听哪个故事？」
						CASE 2
							PRINTFORMW 「你计划好了去哪里了吗？」
							SIF TCVAR:30:358 == 0
								PRINTFORMW 「邀请女性的时候可不能说『还没决定』哦？」
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	;陪睡中
	ELSEIF CFLAG:陪睡中
		IF TALENT:心情 == -1 || MARK:30:反発刻印
			PRINTFORMW 「………哼,已经很困了…」
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「唔……我还没起床呢……怎么了？」
				CASE 1
					PRINTFORML 「唔ー,是这……样么…………呼啊」
					PRINTFORMDW 应答得口齿不清的。映姬好像很困的样子…
				CASE 2
					PRINTFORML 「你…还不想睡觉啊？　……」
					PRINTFORMW 「我…还是……有点困……」
			ENDSELECT
		ENDIF
	;酒気帯び会話＠微醺は変Ｔでない時1/3、それ以上は確定で酒酔い会話
	ELSEIF K30_DRUNK() > 1 || (K30_DRUNK() == 1 && RAND:3 == 1 && !K30_CHECK_HEN_T()) || TCVAR:烂醉
		CALL K30_TALK_DRUNK(TFLAG:193)
	;不高興会話＠反発刻印無しなら1/3、有りなら2/3、ブチギレなら必ず。変Ｔ時は会話失敗・心情不快、反発刻印持ちで必ず
	ELSEIF ((TALENT:心情 == -1 || MARK:30:反発刻印 > 0 || TFLAG:193 < 0) && K30_CHECK_HEN_T()) || ((TALENT:心情 == -1 && RAND:3 == 1) || (MARK:30:反発刻印 > 0 && RAND:3 != 1)) || CFLAG:ブチギレ
		IF K30_CHECK_HEN_T()
			IF TALENT:恋慕
				IF RAND:2 == 1
					PRINTFORMW 「……现在请不要管我」
				ELSE
					PRINTFORMW 「现在没有说话的那种心情……」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORML 「……今天我没有什么要说的。」
					PRINTFORMW 「所以、你也不要跟我说话，好吗？」
					PRINTFORMW 「顺便、不要看着我…」
				ELSE
					PRINTFORML 「……………」
					PRINTFORMDW 映姫保持着\@ TALENT:心情 == -1 ? 心情不快的表情 # 目光望向远方 \@、好像完全没有听到%CALLNAME:MASTER%的话…
				ENDIF
			ENDIF
		ELSE
			PRINTDATAW
				DATAFORM 「到地狱的底部有8万由旬。光是掉到底就要花两千年」
				DATAFORM 「虽然说是『地狱的折磨』,但是在地狱里真正痛苦的可是没有尽头的」
				DATAFORM 「据说在外面的世界里也有因为反复淫行而堕入地狱的人」
				DATAFORM 「听说有些愚蠢的家伙居然会自己斩断,伸向自己的援助之手」
				DATAFORM 「如果恶行堆积过多的话，就会从轮回的圈中脱落，无法返还化为乌有」
				DATAFORM 「如果去触及禁忌的事物的话,一定也会遭到到报应的」
			ENDDATA
			IF CFLAG:ブチギレ || MARK:30:反発刻印 >= 2
				PRINTDATAW
					DATAFORM 「总有一天你会切身体会到的」
					DATAFORM 「亲身体验一下就能明白了吧」
					DATAFORM 「就尽量做好觉悟吧」
				ENDDATA
			;今日は虫の居所が悪そうな時＠反発刻印を取得してなくて今日怒らせてないけど心情が悪い
			ELSEIF TCVAR:30:372 == 1 && MARK:30:反発刻印 == 0
				PRINTFORMW 「……………………」
				PRINTFORMW 「……对不起。突然说出奇怪的话」
				PRINTFORMDW 映姫似乎有点着急
			ELSE
				IF MARK:30:反発刻印
					PRINTFORMDW 映姫似乎对%CALLNAME:MASTER%很生气
				ELSE
					PRINTFORMDW 映姫似乎对%CALLNAME:MASTER%有所不满
				ENDIF
			ENDIF
		ENDIF
	;『話しかけようとしたが言葉が見つからない』
	ELSEIF TCVAR:30:会話不能 && !TALENT:恋慕
		PRINTDATAW
			DATA 「……乖乖听我的教诲怎么样」
			DATA 「……如果你固执地跟我强搭话，我也会很为难」
			DATA 「……与其动嘴，不如动脑子」
		ENDDATA
	;会話失敗
	ELSEIF TFLAG:193 == -1
		IF TALENT:恋人
			PRINTFORML 「呼呼,别说那些了」
			PRINTFORMW 「到这儿来,一起悠闲地度过吧？」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「不用勉强和我说话也没事的哦…」
		ELSEIF TALENT:思慕
			PRINTDATAW
				DATAFORM 「对不起。这是一个不太感兴趣的话题…」
				DATAFORM 「呜，别和我開『阎萝王』这种玩笑」
			ENDDATA
		ELSE
			IF RAND:2 == 1
				PRINTFORML 「你比阎魔还能说,但内容却毫无价值」
				PRINTFORMW 「我知道你内心肯定藏有什么愧疚」
			ELSE
				PRINTFORML 「我有很多话想说…」
				PRINTFORMW 「听你的话有什么意义吗」
			ENDIF
		ENDIF
	;教養が足りない
	ELSEIF TFLAG:193 == -2
		SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「积极地来向我请教是好事。但是……」
				PRINTFORMW 「但如果你没法理解，不能将其作为你的精神食粮的话,就无法积德行善」
			CASE 1
				PRINTFORMW 「还以为你得意洋洋的过来想说什么来着……」
			CASE 2
				PRINTFORML 「…再重新回人間之里的学堂好好学一下如何交流如何？」
				PRINTFORMW 「这样只是浪费我们彼此的时间」
			CASE 3
				PRINTFORMW 「……不，不是那样的。怎么说才能传达呢……」
		ENDSELECT
	;変T会話
	ELSEIF TFLAG:193 == 2
		CALL K30_TALK_STRANGE_TSHIRT
	;映姫様が外出時会話＠現在位置が映姫様の住んでいる地域ではない場合。待客室もMAIN_MAP上に存在するのでここ
	ELSEIF TCVAR:30:359 == 0 && GET_MAPID(GET_CHARAHOME(30)) != GET_MAPID(CFLAG:MASTER:現在位置) && RAND:2 == 1
		TCVAR:30:359 ++
		;一晩一緒に過ごした=おはようorおやすみ口上通した
		IF TCVAR:30:373 || CFLAG:1605
			;昨日から拠点にお泊り
			IF TCVAR:30:连住禁止 == 0
				IF TALENT:恋人 || (TALENT:恋慕 && TALENT:MASTER:恋人 == 0)
					PRINTFORML 「真希望我能永远和你在一起」
					PRINTFORMW 「%K30_C_NAME(MASTER)%不考虑…搬一下家么？」
					PRINTFORMW 「你看,这样比起我来借宿,不是更方便一些么」
				ELSEIF K30_FIND_LOVER() > 0
					PRINTFORMW 「虽然也知道这样对%K30_C_NAME(TALENT:MASTER:恋人)%不好…」
					PRINTFORMW 「尽管如此,还是…很期待和你一起渡过的夜晚…」
				;思慕,炮友以下は通常会話に流す
				ELSE
					CALL K30_TALK_NORMAL
				ENDIF
			;待客室
			ELSE
				PRINTFORMW 「…今天就住在我的房间里,稍微忍耐一下吧」
				PRINTFORMW 「如果出入太频繁的话会被部下看到…」
			ENDIF
		;映姫様が恋慕引っ越し後の冥界
		ELSEIF CFLAG:現在位置 / 100 == 6
			PRINTFORML 「为了腾出和%K30_C_NAME(MASTER)%在一起的时间」
			PRINTFORML 「因为工作来这里很费事呢」
			PRINTFORMW 「万一有紧急情况，让小町来接就行了」
			PRINTFORML 「滥用职权？」
			PRINTFORMW 「……不知道的词呢」
		;自慰我慢して会いに来ましたor前日同居時自慰
		ELSEIF CFLAG:1603 > 1 && AT_HOME(30)
			PRINTFORML 「えーと…对不起，你在说什么…？」
			PRINTFORMDW 今天的映姬并没有平静，总觉得心神不定
			PRINTFORML 「是，是的。是那件事吧…」
			PRINTFORMDW 不知为何，视线一直在追着%CALLNAME:MASTER%的胯间…
		;前日縁結びした
		ELSEIF CFLAG:1603 == 1 && AT_HOME(30)
			IF RAND:2 == 1
				PRINTFORML 「今天不知道为什么总感觉被呼唤到这里，所以来了」
				PRINTFORML 「刚觉得有点不可思议，不知道被什么召唤了」
				PRINTFORMW 「感觉到了和你很接近的气氛…」
			ELSE
				PRINTFORML 「直到昨天，%K30_DIARY_PLACE(CFLAG:現在位置)%我本来不打算来的」
				PRINTFORML 「不知道为什么，今天我就自然而然地走过去了」
				PRINTFORMW 「真的是为什么呢…」
			ENDIF
		;恋人で主动会い来了
		ELSEIF TALENT:恋人 && AT_HOME(30) && RAND:3 != 1
			IF RAND:2== 1
				PRINTFORML 「今天是来干什么的？」
				PRINTFORMW 「当然不就是为了来见你么」
				SIF RAND:2 == 1
					PRINTFORMW 「要是能真的住在一起就好了…」
			ELSE
				PRINTFORML 「抱歉,又来打扰你了」
				PRINTFORMW 「但是，无论如何都想见见%K30_C_NAME(MASTER)%」
			ENDIF
		;説教しにきました
		ELSEIF RAND:4 != 1
			SELECTCASE RAND:5
				CASE 0
					PRINTFORML 「特意来说教？你在说什么」
					PRINTFORMW 「我只是来看看你有没有好好遵循我的教诲，还有不许叫我『阎萝王』」
				CASE 1
					PRINTFORML 「如果我到处说教能帮助别人积善的话」
					PRINTFORMW 「那就没有什么比此更令人高兴的事了」
				CASE 2
					PRINTFORML 「不用那么警惕也没关系哦。我又不是来惩罚说谎的人」
					PRINTFORMW 「我来这里只是因为单纯的兴趣,来向大家说教而已」
				CASE 3
					PRINTFORML 「擦肩而过的各位不知为何一看到我就移開了视线」
					PRINTFORML 「我也不会咬人或吃它。」
					PRINTFORMW 「真奇怪啊」
				CASE 4
					PRINTFORML 「以我的身份，也不是不能召唤大家来说教」
					PRINTFORML 「但是，即使那样聆听的话，你们也不会往心里去吧」
					PRINTFORMW 「所以我亲自去，用心地说教」
			ENDSELECT
		;人・場所にまつわる話＠内容少ないので確率低め
		ELSE
			SELECTCASE K30_DIARY_PLACE(CFLAG:30:現在位置)
				;博霊神社
				CASE "三妖精之家", "夢幻遺跡", "博麗神社"
					IF RAND:2 == 1
						PRINTFORML 「博丽的巫女能好好遵循我的教诲吗？」
						PRINTFORMW 「那个旁若无人的态度能稍微改一改就好了……」
					ELSE
						PRINTFORML 「这里的神社无论什么时候来都是些奇怪的家伙」
						PRINTFORMW 「没有参拜者,却净是住人,这到底是怎么回事呢？」
					ENDIF
				;命蓮寺＠野良で出現場所
				CASE "命蓮寺"
					SELECTCASE RAND:2
						CASE 0
							PRINTFORML 「听说这里的寺庙很吉利,所以很受信仰」
							PRINTFORMW 「不管有何目的,只要能帮助人们积善,我都相当欢迎」
						CASE 1
							PRINTFORML 「人类与妖怪的融和…」
							PRINTFORMW 「说实话，这在幻想乡是很难被接受的」
						CASE 2
							PRINTFORML 「这里的住持是积德颇丰的了不起的人。不愧是自称大阿阇梨啊」
							PRINTFORMW 「能自己积德，帮助人们行善，真是太好了。」
					ENDSELECT
				CASE "神霊廟"
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「扭曲轮回之理，抱住长生紧紧不放，真是罪孽深重」
							PRINTFORMW 「万物总有一天迎来终结的时候，谁也逃不掉，届时受到相应的天罚吧」
						CASE 1
							PRINTFORMW 「道教是……我只能说违背了我的教诲」
						CASE 2
							PRINTFORML 「难道你也对长生不老感兴趣了吗？」
							PRINTFORMW 「绝对不可以。那是向禁忌越界的行为」
					ENDSELECT
				;人里＠野良で出現場所
				CASE "人里"
					SELECTCASE RAND:5
						CASE 0
							PRINTFORML 「最近这一带劝诱活动很盛行。而且盛况空前呢」
							PRINTFORML 「但却没有人肯来听我说教」
							PRINTFORMW 「真是令人悲叹呐」
						CASE 1
							PRINTFORML 「…在人間之里也有很多妖怪在阔步前行呢」
							PRINTFORMW 「最近人类和妖怪的关系也变融洽了」
						CASE 2
							PRINTFORMW 「御阿礼的孩子…\@ CFLAG:現在位置 == CFLAG:80:現在位置 ? 看起来很有精神呢 # 身体还好么 \@…」
						CASE 3
							PRINTFORML 「看着每天平静生活的人们，心情会平静下来」
							PRINTFORMW 「即使是成为审判罪孽的阎魔的现在，这一点也没有改变」
						CASE 4
							PRINTFORML 「…妖怪满不在乎地看店，混入顾客中」
							PRINTFORML 「这个，真的没问题吗？」
							PRINTFORML 「如果博丽的巫女同意的话，我也不会插嘴」
							PRINTFORMW 「我担心会不会有多馀的火苗…」
					ENDSELECT
				;紅魔館
				CASE "霧之湖"
					PRINTFORML 「妖精是自然之力具象化的存在」
					PRINTFORML 「即使眼睛看到的力量很弱，也不能轻视」
					PRINTFORMW 「有时候会失控或者拥有难以驾驭的力量」
				CASE "騒霊の廃洋館"
					PRINTFORML 「对于妖怪和物怪来说，存在的理由是非常重要的」
					PRINTFORML 「如果被遗忘，或者介乎间的暧昧，可能会消失」
					PRINTFORMW 「这里的骚灵们很好地找到了自己的归宿呢」
				CASE "紅魔館"
					PRINTFORML 「侍从忠于主是一件非常棒的事情」
					PRINTFORMW 「如果可以的话，希望能把对主上的温柔对周围也撒向一点点」
				;迷途竹林
				CASE "永遠亭"
					PRINTFORML 「没有反省,不好好悔过」
					PRINTFORML 「这便是没有正视自己罪行的证据」
					PRINTFORMW 「住在这附近的兔子就是很好的例子呢」
				CASE "迷途竹林"
					PRINTFORML 「即使别人良言相劝，也只是三步就忘的金鱼脑」
					PRINTFORML 「比想象的还要无处不在呢」
					PRINTFORML 「摊子的老板娘和我的部下，马上就在眼前」
					PRINTFORMW 「实在是令人悲哀。」
				CASE "太陽花田", "夢幻館"
					PRINTFORML 「活着就是罪，活得久了就罪孽深重」
					PRINTFORMW 「无论是人类还是妖怪，即使是作为神之身的我也无法逃脱罪过」
				CASE "無名之丘"
					PRINTFORML 「如果是死后不来我身边的存在，当然不能审判」
					PRINTFORMW 「但是，相反，不是可以通过说教来拯救吗……我是这么想的」
				;魔法之森
				CASE "香霖堂", "霧雨魔法店", "人偶的洋館", "再思之道", "無縁塚", "魔法之森"
					PRINTFORML 「『偷东西和撒谎可是会落入地狱的哦』」
					PRINTFORML 「我觉得这句话相当简单易懂」
					PRINTFORMW 「但无论怎么在说,也有完全不听的人呢…」
				;妖怪之山（山麓）
				CASE "天邪鬼の住処", "仙人的宅邸", "妖怪之山の山麓"
					PRINTFORML 「这里的河童还是一如既往地随心所欲呢」
					PRINTFORML 「对煽动它的神也感到为难」
					PRINTFORMW 「明明有那种力量,所以如果能让他们稍微安分一些就好了…」
				;妖怪之山（山頂）
				CASE "守矢神社", "虹龍洞", "天界", "妖怪之山の山頂"
					PRINTFORML 「关于报纸的内容,我姑且说一句吧」
					PRINTFORML 「还是一如既往地模糊事实,夸大真相」
					PRINTFORMW 「妖魔化是非曲直厅，妄图蒙蔽阎魔的法眼！」
				;地霊殿
				CASE "旧都", "地霊殿", "旧地獄", "地底"
					PRINTFORML 「原本只是被遗弃的地域,但这一带现在却相当繁荣了」
					PRINTFORMW 「她果然是一个很优秀的管理者呢」
				;月
				CASE "槐安通路", "月之都", "月都の郊外", "月の世界"
					PRINTFORMW 「一想到要和赫卡提亚大人见面就紧张起来了…」
				CASEELSE
					PRINTFORML 「…顺便问一下，这是什么地方？」
					PRINTFORMW 「真不好意思、我……回去的路也有点不认识…」
			ENDSELECT
		ENDIF
	;一日一回会話＠雛・クラピ口上構文参考にしてます
	;思いつくままに入れたら統一性なくて見づらい
	ELSEIF ONCE("会話＠記念日")
		;元旦(春1日) プレイ初日は発生しない
		IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
			PRINTFORML 「%K30_C_NAME(MASTER)%,新年快乐！」
			PRINTFORMW 「一年之计在于春。你有什么抱负吗？」
			IF TALENT:恋人
				PRINTFORMDW %CALLNAME:MASTER%在恋人的映姬耳边悄悄说着今年的抱负……
				SELECTCASE FLAG:抱負
					CASE 1
						PRINTFORML 「……比起一个,还是两个比较……！」
						PRINTFORMDW 说到一半，映姬满脸通红……
					CASE 2
						PRINTFORML 「诶っ？　那就是……那个……欸欸っ多……」
						PRINTFORMDW 映姬很困惑的样子……
					CASE 3
						PRINTFORML 「開拓……是吗…………♥」
						PRINTFORMDW 映姬摸着下腹部沉默了
						PRINTFORMDW 似乎在想象着什么,脸就慢慢变红了……
					CASE 4
						PRINTFORMW 「………拜托了♥」
						PRINTFORMDW 似乎是符合彼此希望的好抱负……
					CASE 5
						PRINTFORMW 「………………………………」
						PRINTFORMW 「………………………………」
					CASE 6, 9
						IF CFLAG:1805 > 1
							PRINTFORML 「………………」
							PRINTFORMW 「是和我无关的话啊…」
						ELSEIF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
							PRINTFORML 「……我也\@ !EXP:出産経験 ? 想早点见面 # 还想要呢 \@。和%K30_C_NAME(MASTER)%的、婴儿」
							PRINTFORMW 「……加油吧♥」
						ELSEIF TALENT:育児中 || TALENT:妊娠
							PRINTFORML 「确实啊，\@ TALENT:育児中 ? %SHOW_CHILDNAME(30)% # 这个孩子 \@也，有个弟弟或妹妹比较好吧…」
							PRINTFORMW 「\@ TALENT:育児中 ? 现在有了%SHOW_CHILDNAME(30)%就已经竭尽全力了 # 有点，太早了 \@…」
						ELSEIF GETBIT(CFLAG:1502, 3)
							PRINTFORMW 「是认真的吗……？」
							PRINTFORMW 「如你所愿…我也是…是一样的」
							PRINTFORMW 「%K30_C_NAME(MASTER)%…还能一起努力吗？」
							PRINTFORMDW 映姫似乎非常希望能够和は%CALLNAME:MASTER%再养育一个孩子
							SETBIT CFLAG:1502, 4
						ELSE
							PRINTFORML 「…………你是认真的么？………」
							PRINTFORMDW 映姬低着头,没法看到她的表情……
						ENDIF
				ENDSELECT
			ELSE
				PRINTFORML
				PRINTFORMW 「诶……？不能告诉我,到底是抱着怎样的抱负呢……」
			ENDIF
		;兔子之日(毎月28日)
		ELSEIF DAY:3 == 28
			IF FIRSTTIME("兔子之日")
				PRINTFORML 「听说今天是穿兔子衣服的日子」
				PRINTFORML 「我也通过别人的渠道弄到了玉兔的衣服」
				PRINTFORMW 「好像有什么不一样呢…」
				PRINTFORML 「嗯，但是……那样露出皮肤的衣服，我绝对不淡定」
				PRINTFORMW 「\@ DAY % 2 ? 说教的 # 仕事 \@好像也不方便，我想这样就可以了」
			ELSE
				PRINTFORML 「果然我更喜欢这样的服装呢」
				PRINTFORML 「勒紧腰带整理仪容的话精神也会紧张」
				PRINTFORMW 「\@ DAY % 2 ? 说教 # 仕事 \@也会张弛有度，心情放松地去做」
			ENDIF
			PRINTFORML 「………嗯，是的」
			PRINTFORMW 「什么羞耻的打扮…一周一次就足够了…」
		;女兒節(春3日)＠雛口上女兒節イメージ参考にしました
		ELSEIF DAY:2 == 1 && DAY:3 == 3
			PRINTFORML 「今天是女儿节呢。是祈祷女孩子健康成长的节日」
			PRINTFORMW 「为了承受流雏的灾厄,山上的厄运神大人也要好好加油哦」
			PRINTFORMW 「我也想帮帮忙。为了让不幸的孩子减少一个也好……」
		;母親節(春11日)
		ELSEIF DAY:2 == 1 && DAY:3 == 11
			PRINTFORML 「今天是母亲节……你能去见妈妈吗…？」
			PRINTFORMW 「如果不能有见面的机会的话，今天一整天请不要忘记感恩的心情」
			PRINTFORML 「还有…请你也不要做让母亲伤心的事」
			PRINTFORMW 「不管是过去还是现在，我都见过那种场面……那真的很痛苦」
		;白色情人節(春14日)未返礼時のみ
		ELSEIF DAY:2 == 1 && DAY:3 == 14 && CFLAG:バレンタイン < 100
			PRINTFORML 「白色情人节的回礼?嗯，那我就很高兴了，所以怎么样呢?」
			PRINTFORML 「…礼物中最重要的是思念对方的心，珍惜对方的心情」
			PRINTFORMW 「如果因为回礼而感到困扰的话,那就先将这份心情传达给对方如何？」
			SIF TALENT:恋慕 && !TALENT:MASTER:恋人
				PRINTFORMW 「嗯、比起什么东西……我等着你发自内心的话」
		;例大祭(春25日)
		ELSEIF DAY:2 == 1 && DAY:3 == 25 && !INRANGE(CFLAG:30:現在位置, 1, 99)
			PRINTFORML 「博丽神社的例大祭,你要去看看吗？」
			PRINTFORMW 「我不怎么去神社,所以很在意博丽的巫女有没有在好好做」
			PRINTFORMW 「虽然不能太期待……但是只要遵守我的教导就好了」
		;七夕(夏7日)
		ELSEIF DAY:2 == 2 && DAY:3 == 7
			PRINTFORML 「七夕,牛郎和织女的相会……但是没错,你注意到了吗？」
			PRINTFORMW 「隔着大河分開,无法随便过河,只能一年一次在这个季节见面……」
			PRINTFORML 「嗯,没错。和将彼岸和此岸隔開的三途川一模一样呢」
			PRINTFORMW 「也许，这两个人并不是因为怠惰而被分開的，而是死别了」
		;盂蘭盆節(夏14日)
		ELSEIF DAY:2 == 2 && DAY:3 == 14
			PRINTFORML 「像你这样奇怪的人暂且不提,只有这个季节才能往返彼岸」
			PRINTFORMW 「托你的福,我们的船老大也不偷懒地工作着。这也是件好事」
			IF !CHARA_HOLIDAY(30, 1) && CFLAG:30:職種 == 43
				PRINTFORML 「是我的工作吗？ 我和往常一样」
				PRINTFORMW 「意思是不断增加，而完全没有减少」
			ELSE
				PRINTFORML 「……那孩子好好工作，我却休息，总觉得不舒服」
				PRINTFORMW 「现在也去宣讲教义吧…」
			ENDIF
		;収穫祭(秋27日)
		ELSEIF DAY:2 == 3 && DAY:3 == 27 && !INRANGE(CFLAG:30:現在位置, 200, 299)
			PRINTFORML 「很在意村子里的收获祭呢……」
			PRINTFORMW 「秋神一出，人也聚集在一起」
			PRINTFORML 「就趁人聚在一起的时候,让我来说教一会吧」
			PRINTFORMW 「就能帮助更多的人积德行善了」
		;萬聖節(秋30日)
		ELSEIF DAY:2 == 3 && DAY:3 == 30
			PRINTFORML 「听说今天是外面的世界,某个地区的盂兰盆节」
			PRINTFORMW 「即使住处和风俗完全不同,祭祀灵魂,致敬先祖的这份感情也不会改变」
			PRINTFORMW 「所以听了很多外界的事情的话会觉得相当寂寞。因为很多人都不知道这一天的意义……」
		;情人節(冬14日)
		ELSEIF DAY:2 == 4 && DAY:3 == 14
			SELECTCASE CFLAG:バレンタイン
				CASE 0
					PRINTFORML 「从外来人那里传播開来的节日也多了起来。今天也是其中之一呢」
					PRINTFORMW 「只是这个节日的由来谁都不知道……不知不觉间就变成了互相交换礼物的风俗呢」
					PRINTFORML 「是的,我也给部下送了。连同感谢的心情一起,向着对于总是很努力,认真的孩子」
					PRINTFORMW 「……对于那个不认真的孩子,我送了很多充满『爱意』的话」
				CASE 1
					PRINTFORML 「其实比起给你巧克力，我认为对你開始说教有很大的帮助」
					PRINTFORMW 「不过，唉…也有糖和鞭子的例子，偶尔甜甜也是不错的选择」
				CASE 2
					PRINTFORML 「…虽然是秘密，但是比交给其他人的东西稍微好一点…那个巧克力」
					PRINTFORML 「我并没有偏袒你」
					PRINTFORMW 「对于来认真听我教导的你，我表示轻轻的感谢」
				CASE 3
					$KAIWA_SKIP
					PRINTFORML 「刚才给您的巧克力，是我非常喜欢的味道」
					PRINTFORMW 「虽然不太甜，但味道很好，容易下咽…」
					PRINTFORML 「……这么说来，%K30_C_NAME(MASTER)%喜欢多少甜度？」
					PRINTFORMW 「我……想知道更多你喜欢的味道和喜欢的东西」
				CASE 4
					SIF !TALENT:恋慕
						GOTO KAIWA_SKIP
					;稍微だけ重い女
					SELECTCASE K30_FIND_LOVER()
						CASE -1
							PRINTFORMW 「巧克力，能好好地交给你真是太好了」
							PRINTFORMW 「%K30_C_NAME(MASTER)%、我不可能变心」
							PRINTFORMW 「今后也会继续喜欢你的」
							PRINTFORMW 「%K30_C_NAME(MASTER)%…你喜欢我吗…？」
						CASE 0
							PRINTFORMW 「刚才的巧克力的意思，你完全明白吧…？」
							PRINTFORMW 「…我已经习惯了忍耐和忍受。可以一直等下去」
							PRINTFORMW 「所以，%K30_C_NAME(MASTER)%」
							PRINTFORMW 「仔细考虑之后你的回答…请什么时候告诉我」
						CASEELSE
							PRINTFORMW 「巧克力，谢谢你收下」
							PRINTFORMW 「…%K30_C_NAME(TALENT:MASTER:恋人)%我真的很对不起」
							PRINTFORMW 「即便如此…只是，依偎在你的身边…会原谅我吧?」
					ENDSELECT
			ENDSELECT
		;聖誕節(冬25日)
		ELSEIF DAY:2 == 4 && DAY:3 == 25
			PRINTFORML 「听说今天是伟大的神的受肉日。因为是传闻,所以可能意思有些不太一样……」
			PRINTFORMW 「想问一下关于这位大人所受的『罪』,但却听到了各式各样的版本」
			PRINTFORML 「虽然我想为了将来的更多的学习一点,但是遗憾的是幻想乡的情报很少……」
			PRINTFORMW 「出租书店和图书馆,有时间的话,我也很想去看看」
		;大晦日(冬31日)
		ELSEIF DAY:2 == 4 && DAY:3 == 31
			PRINTFORML 「今年在今天就结束了……今年一年,你积善了吗？」
			PRINTFORMW 「生者的一生漫长而又短暂。什么都不做的话,一转眼就结束了」
			PRINTFORML 「所以不要连,去后悔做错了什么的时间都挤不出来。好好反省,然后继续前进吧」
			PRINTFORMW 「希望明年对你来说是更好的一年」
		;台風
		ELSEIF FLAG:異常気象 == 9
			PRINTFORML 「台风接近了。真是好厉害的风呢…」
			IF CFLAG:MASTER:初期位置 == CFLAG:30:初期位置
				PRINTFORMW 「今天就不要出去了吧」
			ELSEIF 拠点_家主 == 30
				PRINTFORMW 「因为曲直厅也已经是很古老的建筑了,所以有点担心」
			ELSEIF FLAG:地主
				PRINTFORMW 「你可能也很担心田地,但也不要勉强哦」
			ELSE
				PRINTFORMW 「%CALLNAME:拠点_家主%有没有需要帮忙的地方，你最好问问」
			ENDIF
		;吹雪,猛吹雪
		ELSEIF TIME:5 == 9 || FLAG:異常気象 == 10
			PRINTFORML 「果然很冷呢……你没事么」
			PRINTFORMW 「想扫雪的话,等完全停下来之后也没事的」
		;胖次
		ELSEIF FLAG:異常気象 == 7
			IF DIARY:30:11 == 1
				PRINTFORML 「又是这样奇怪的天气…」
				PRINTFORML 「与被红雾覆盖或春天不来相比，没什么大不了的」
				PRINTFORMW 「不知道目的和意思会很困扰」
			ELSE
				PRINTFORML 「从刚才開始就在空中飞舞的那些,到底是什么呢…」
				PRINTFORMW 「天狗的报纸？好像也不是……」
				PRINTFORMW 「嗯っ？　……那个，难道是……」
			ENDIF
		;敏感,桃色の風
		ELSEIF INRANGE(FLAG:異常気象, 1, 8)
			PRINTFORML 「真是奇怪的天气呐……」
			PRINTFORMW 「总觉得身体软绵绵的发烫，静不下来……」
		;其他季節・時間・天候の会話
		ELSE
			SELECTCASE DAY:2
				;春
				CASE 1
					IF RAND:2 == 1 && CFLAG:MASTER:初期位置 != CFLAG:30:初期位置
						PRINTFORML 「都说春眠不觉晓」
						;起床がPM18からAM4
						IF !INRANGE(TIME:3 / 60, 4, 18)
							PRINTFORMW 「但这和夜行性的你似乎没什么关系呢」
						;午前中
						ELSEIF TIME:2 < 3
							PRINTFORMW 「过着有规律的生活,比什么都好」
						;午後
						ELSE
							PRINTFORMW 「今早有好好起来么？」
							PRINTFORML 「首先你得过上有规律的生活」
							PRINTFORMW 「应该先从约束自己開始」
						ENDIF
					ELSE
						;虹=死に分岐
						IF TIME:7 == 1
							PRINTFORML 「彩虹…………！」
							PRINTFORMW 「…能\@ TALENT:恋慕 ? 和你一起 # \@看到这样不错的景观真是太好了」
						;晴天
						ELSEIF TIME:5 < 2
							PRINTFORML 「春天開的花为了迎接这样的好日子,一直在忍受着寒冷的冬天」
							PRINTFORMW 「我认为这种忍耐力是所有人都应该学习的」
						;陰天
						ELSEIF TIME:5 < 4
							PRINTFORML 「明明是这种季节,却是这样天气啊,有点遗憾」
							PRINTFORMW 「好不容易盛開的春花,还是在温暖的阳光下最为合适不过了………」
						;雨
						ELSE
							PRINTFORMW 「虽说是春天,但在这样的天气里还是感觉有点冷」
						ENDIF
					ENDIF
				;夏
				CASE 2
					IF RAND:2 == 1
						PRINTFORML 「是这件衣服吗？嗯，看上去就很热哦」
						PRINTFORML 「但这是阎魔的制服,必须得好好穿着」
						PRINTFORMW 「不能让人看到不检点的样子」
					;昼間まで
					ELSEIF TIME:2 < 4
						PRINTFORML 「今天好像也很热…」
						PRINTFORMW 「要好好做好身体调整哦」
					;昼下がり
					ELSEIF TIME:2 == 4
						PRINTFORML 「这个时间的炎热最让身体受不了」
						PRINTFORMW 「要是有什么夏服就好了…」
					;夕方以降
					ELSE
						PRINTFORML 「虽然今天一天也很热」
						PRINTFORMW 「太阳落山之后,好像就舒服多了」
						SIF !INRANGE(TIME:3 / 60, 4, 18)
							PRINTFORMW 「…有点羡慕夜行性的你」
					ENDIF
				;秋
				CASE 3
					;立秋
					IF DAY:3 < 7
						IF	RAND:2 == 1
							PRINTFORML 「日历上已经是秋天了，但热天还是热天」
							PRINTFORML 「我也习惯了忍耐…」
							PRINTFORMW 「虽说如此，但并不是不在乎」
						ELSE
							PRINTFORML 「山里的蝉虫依然很热闹」
							PRINTFORML 「早晚也能听到寒蝉的声音」
							PRINTFORMW 「这个炎热，也只是再忍耐一下而已」
						ENDIF
					;処暑
					ELSEIF DAY:3 < 13
						IF	RAND:2 == 1
							PRINTFORML 「虽然炎热的日子还在继续，但终于比之前一段时间平静下来了」
							PRINTFORMW 「穿这件衣服的话,就更能真实感受到这一点了」
						ELSE
							PRINTFORML 「蝉鸣声也快听完了」
							PRINTFORML 「即使生命短暂,也要竭尽全力地表现出活着的喜悦…」
							PRINTFORMW 「我却听不到这样的叫声」
						ENDIF
					;白露
					ELSEIF DAY:3 < 19
						IF	RAND:2 == 1
							PRINTFORML 「早晚都很舒服呢」
							PRINTFORMW 「现在是读书学习,锻炼自己的最好时期」
						ELSE
							PRINTFORML 「早晚已经完全变成秋天的空气了」
							PRINTFORML 「不过，请注意哦」
							PRINTFORML 「这种时候疏忽大意的话,盛夏的疲劳就会一口气冒出来的」
							PRINTFORMW 「身体不舒服的话,就不能好好的去积德行善了」
						ENDIF
					;秋分
					ELSEIF DAY:3 < 23
						IF RAND:2 == 1
							PRINTFORML 「差不多收获的季节即将到来」
							IF FLAG:地主
								PRINTFORMW 「你在这种地方怠慢不要紧吗?？」
							ELSE
								PRINTFORML 「你也不要在这种地方晃悠」
								PRINTFORMW 「去帮一下秋神怎么样？」
							ENDIF
						ELSE
							PRINTFORML 「彼岸花也差不多要開了呢」
							PRINTFORML 「我很喜欢那朵花」
							PRINTFORMW 「与黄色的稻穗对称,染上赤红的风景非常美丽」
						ENDIF
					;秋の彼岸
					ELSEIF DAY:3 == 23
						PRINTFORML 「我想你不能去扫墓…」
						PRINTFORML 「今天是彼岸，就是为了彼岸的日子」
						PRINTFORMW 「不能忘记对祖先的感谢」
					;お祭り前
					ELSEIF INRANGE(DAY:3, 24, 26)
						PRINTFORML 「在收获祭之前,不知为何人間之里的大家都焦虑不安的样子」
						PRINTFORMW 「正因如此,我的话比平时更加无法让人听进去了…」
					;萬聖節前
					ELSEIF GROUPMATCH(DAY:3, 28, 29)
						PRINTFORML 「万圣节前夕,村里的孩子们都兴高采烈的…」
						PRINTFORML 「而且不知为什么连妖怪们都一起漂浮着」
						PRINTFORMW 「就那么想要甜点吗…」
					;冬目前
					ELSE
						PRINTFORML 「冬天的准备万无一失吗？ 虽然我不知道外面的世界是怎么做的」
						PRINTFORMW 「这里是幻想乡。做了半吊子的准备的话可是会后悔的」
						SIF CFLAG:MASTER:初期位置 == CFLAG:30:初期位置
							PRINTFORMW 「…之后一起去确认一下过冬的东西吧」
					ENDIF
				;冬
				CASE 4
					;虹 =死に分岐
					IF TIME:7 == 1
						PRINTFORML 「彩虹…………！」
						PRINTFORMW 「…能\@ TALENT:恋慕 ? 和你一起 # \@看到这样不错的景观真是太好了」
					;ダイヤモンドダスト =死に分岐
					ELSEIF TIME:7 == 2
						PRINTFORML 「周围闪闪发光很漂亮呢…」
						PRINTFORMW 「我活了这么多年，几乎没见过」
						SIF TALENT:恋慕
							PRINTFORMW 「能和你一起看那个，很幸福…」
					;晴天
					ELSEIF TIME:5 < 2
						PRINTFORML 「今天是难能可贵的冬日里的大晴天呢。你有什么需要收拾整理的吗」
						PRINTFORMW 「结束了之后再好好努力行善吧」
					;多雲り
					ELSEIF TIME:5 == 2
						PRINTFORML 「要是能就这样一直放晴就好了」
						PRINTFORMW 「就算是我,也是很留恋温暖的阳光的」
					;陰天
					ELSEIF TIME:5 == 3
						PRINTFORML 「说起这个季节特有的天气就是这样吧」
						PRINTFORMW 「阴沉沉的,连肌肤都觉得更加寒冷了」
					;雨と雨雪交加と冰雹
					ELSEIF GROUPMATCH(TIME:5, 4, 5, 6, 12, 13)
						PRINTFORML 「这场雨…」
						PRINTFORML 「这和积雪相比，孰优孰劣很微妙」
						PRINTFORMW 「腿脚不好，鞋子都快挤烂了，真伤脑筋」
					;雪
					ELSEIF INRANGE(TIME:5, 8, 10)
						PRINTFORML 「积雪到了春天之后就会变成滋润田地的恩惠」
						PRINTFORMW 「确实现在这个时节会比较艰辛,但也不能忘记对自然的感恩之心」
					;霧と霧雪
					ELSEIF GROUPMATCH(TIME:5, 7, 11)
						PRINTFORML 「视野这么差的时候,你也要小心一些呢」
						PRINTFORMW 「注意到的时候已经在妖怪的腹底…这样的事情也很普通」
					ENDIF
			ENDSELECT
		ENDIF
	;映姫様が冥界にいる時の会話
	ELSEIF TCVAR:30:359 < 2 && GET_MAPID(CFLAG:MASTER:現在位置) == 6 && RAND:4 == 1
		TCVAR:30:359 ++
		IF MAIN_MAP == 6
			LOCAL = MAP_SEARCH_REPLACEMENT_6(CFLAG:MASTER:現在位置)
			IF GROUPMATCH(CFLAG:MASTER:現在位置, 612, 615, 616)
				LOCAL = CFLAG:MASTER:現在位置
			ELSEIF INRANGE(CFLAG:MASTER:現在位置, 610, 619)
				LOCAL = 1
			ELSEIF CFLAG:MASTER:現在位置 == 604
				LOCAL = 640
			ENDIF
		ELSE
			LOCAL = CFLAG:MASTER:現在位置
		ENDIF
		SELECTCASE LOCAL
			;是非曲直庁汎用
			CASE 1
				IF RAND:2 == 1
					PRINTFORML 「这里的建筑已经很老旧了，请勿大声喧哗」
					PRINTFORMW 「各种各样的声音…会导致掉落。」
				ELSE
					PRINTFORML 「和以前相比，地狱里的不公平现象也减少了很多。」
					PRINTFORMW 「取而代之的是财政变得严峻……这座建筑、也是这么一回事」
				ENDIF
			;中有之道
			CASE 610
				IF RAND:2 == 1
					PRINTFORML 「在这里，地狱里的罪人们会为了赎罪和谋生而工作。」
					PRINTFORMW 「为了不让你也在这里工作，现在就要积累可行的善行。」
				ELSE
					PRINTFORML 「……不行。 这附近相当的没有活力了」
					PRINTFORMW 「得让久侘歌好好调查原因」
				ENDIF
			;是非曲直庁法廷
			CASE 612
				IF RAND:2 == 1
					PRINTFORML 「虽然正在休庭，但此处是给予死者裁决的神圣场所」
					PRINTFORMW 「请不要轻举妄动」
				ELSE
					PRINTFORML 「……我想你总有一天也会在此受到审判的。」
					PRINTFORMW 「现在的时间正是为那一刻而准备。好好积累善行，做好准备。」
				ENDIF
			;映姫様私室
			CASE 615
				IF CFLAG:MASTER:初期位置 == CFLAG:30:初期位置 || TALENT:恋人
					IF TIME:2 < 3 && ONCE("会話＠予定", 1) && RAND:2 == 1
						CALLF ONCE("会話＠予定")
						IF !CHARA_HOLIDAY(30)
							PRINTFORML 「%K30_C_NAME(MASTER)%虽然想一直在一起，但是我今天有工作…」
							IF RAND:2 == 1
								PRINTFORMW 「你有安排吗？午休的时候，如果能来看我的话我会很高兴的」
							ELSEIF ABL:MASTER:教養 >= 4
								PRINTFORMW 「如果可以的话，能帮我从下午開始的工作吗?」
							ELSE
								PRINTFORMW 「傍晚就告一段落了，在那之前必须忍耐」
							ENDIF
						ELSEIF RAND:2 == 1
							PRINTFORML 「喂、%K30_C_NAME(MASTER)%…我觉得今天就这样悠闲自在也不错」
							PRINTFORMW 「呵呵呵，就算你向我撒娇…也没关系哦？」
						ELSE
							PRINTFORML 「%K30_C_NAME(MASTER)%,今天要做些什么？」
							PRINTFORMW 「如果要出门的话，我可以一起去吗？」
						ENDIF
					ELSEIF YOGORE:(615) >= 1000
						PRINTFORML 「喂、%K30_C_NAME(MASTER)%……一起打扫房间吗?」
						PRINTFORMW 「我觉得稍微有点不像样...」
					ELSEIF RAND:2 == 1
						PRINTFORML 「%K30_C_NAME(MASTER)%能和你成为好朋友是非常高兴的事，不过，有稍微担心的事」
						PRINTFORMW 「这栋建筑已经很有年头了，所以应该有许多人问过你吧...」
					ELSE
						PRINTFORML 「%K30_C_NAME(MASTER)%的行李…可以在这附近多放一点吗?」
						PRINTFORMW 「不要顾虑。 毕竟…我和你的关系」
					ENDIF
				ELSEIF TALENT:恋慕
					IF RAND:2 == 1
						PRINTFORML 「好不容易来一趟，请不要拘束」
						PRINTFORMW 「对了，偶尔也由我来泡杯茶吧」
					ELSE
						PRINTFORML 「好不容易到我房间来，光是我说也不行啊」
						PRINTFORMW 「%K30_C_NAME(MASTER)%，能告诉我你在外面世界的时候在做什么吗？」
					ENDIF
				ELSEIF TALENT:思慕 && RAND:3 == 1
					PRINTFORML 「特意跑到我的私人房间来，你果然是个奇怪的人」
					PRINTFORMW 「我不记得有多少人会主动来听我说话」
				ELSE
					IF RAND:2 == 1
						PRINTFORML 「主动来听阎魔的话，是个好心肠」
						PRINTFORMW 「如果认真听了，用脑子理解了的话，接下来就请付诸行动吧」
					ELSE
						PRINTFORML 「这里姑且算是私人房间。如果你想跟我说话，在那边的休息室也可以。」
						PRINTFORMW 「算了……也没有什么不能让人看的。」
					ENDIF
				ENDIF
			;小町的房間
			;何か言わせると誇張に矛盾しそうなのでYOGOREだけ見る
			CASE 616
				IF YOGORE:(616) >= 1000
					PRINTFORML 「但是…是什么呢?这个房间的散乱程度…」
					PRINTFORMW 「真的，被说的时候不马上打扫才会变成这样…」
					SIF CFLAG:76:現在位置 == 616
						PRINTFORMW 「…こら！　小町！！你有好好听吗！？」
				ELSEIF YOGORE:(616) < 100
					PRINTFORML 「即便如此…这个房间比预想的还要漂亮呢…」
					PRINTFORMW 「那个吊儿郎当的孩子居然能做到这一步，稍微有点吃惊」
					SIF CFLAG:76:現在位置 == 616
						PRINTFORMW 「…小町，我对你刮目相看了。请继续这样下去」
					SIF YOGORE:(615) > 1000
						PRINTFORMW （真糟糕。我\@ CFLAG:MASTER:初期位置 == 615 ? 们 # \@的房间也要马上打扫…）
				ELSEIF CFLAG:76:現在位置 == 616
					PRINTFORMDW 映姬环视着小町的房间…
					PRINTFORML 「欸、保持这样就合格了吧」
					PRINTFORML 「小町，我们作为裁决方的立场，必须始终光明正大地端正自己」
					PRINTFORML 「作为第一步，保持房间的干净是理所当然的。此外…」
					PRINTFORMDW 说教的矛头好像指向了小町
				ELSE
					PRINTFORML 「和部下的房间是一样的，随便进去很不好意思」
					PRINTFORMW 「看起来没有问题，要不要换个地方」
				ENDIF
			;風呂
			CASE 617
				IF RAND:2 == 1
					PRINTFORML 「这个风吕使用的是地狱之火作为热源」
					PRINTFORML 「所以整天不停地煮也没关系」
					PRINTFORMW 「是这座建筑唯一能做到的奢侈」
				ELSE
					PRINTFORML 「%K30_C_NAME(MASTER)%、热水的温度这样可以吗？」
					PRINTFORML 「我喜欢更热的」
					PRINTFORMW 「如果一起进去的话，我想迎合你的喜好」
				ENDIF
			;三途之川
			;瓔花口上参考にしました
			CASE 620
				IF YOUBI_MATCH(DAY, "月水金") && INRANGE(TIME / 60, 10, 15) && ((CFLAG:[[小町]]:現在位置 != 三途之川 && MAIN_MAP != 6) || (CFLAG:[[小町]]:現在位置 != 602 && MAIN_MAP == 6)) && !CFLAG:76:産休中
					PRINTFORML 「……果然小町的船一直停在那里。也不是奇怪的事情。」
					PRINTFORMW 「你还得和那个孩子好好谈谈」
				ELSEIF SHIRAHU(127) && CFLAG:127:現在位置 == CFLAG:MASTER:現在位置 && !RAND:3
					PRINTFORML 「………！」
					PRINTFORMDL 映姬想说些什么，忽然痛苦垂下了美目
					PRINTFORMDW 视线的前方是快乐地堆石头的水鬼孩子们…
					PRINTFORML
					PRINTFORML 「…我得到了裁决之力，却失去了作为地藏的拯救之力」
					PRINTFORML 「拯救那些孩子……已经无法实现了」
					PRINTFORML 「而且作为阎魔连引导到来世都被否决了……什么也做不了」
					PRINTFORMW 「每次走到这里，我都痛感自己的无力…」
				ELSEIF CFLAG:1805 > 2
					PRINTFORML 「…走到这里，我就会意识到自己的罪孽深重」
					PRINTFORMW 「总有一天卸任阎魔的时候，我会受到不可估量的惩罚…」
				ELSEIF CFLAG:兒童人数 || CFLAG:妊娠自覚状態
					PRINTFORML 「…这里真是个痛苦的地方」
					PRINTFORMW 「和以前相比，我的立场变了，不知是什么原因，直到有了孩子。…」
					PRINTFORML 「正因为如此，才会感到把孩子送到这里的父母们的悲哀……直接感受到了」
					PRINTFORMW 看样子有点受不了…
				ELSE
					PRINTFORML 「%K30_C_NAME(MASTER)%。如果，你有了孩子的话…」
					PRINTFORMW 「请一定要好好重视。守护着他健康成长」
					PRINTFORMW 「可以吗？ 一定，一定。 约定好了……」
				ENDIF
			;八雲邸・畜生界・霊長園 = 映姫様は出入りしない場所
			CASE 630, 680, 690
				IF RAND:2 == 1
					PRINTFORML 「特意跑到这种地方来，你打算干什么?」
					PRINTFORMW 「我在这里也没什么事」
				ELSE
					PRINTFORML 「……从立场上来说，我不太喜欢在这里」
					PRINTFORMW 「快点转移地方吧」
				ENDIF
			;彼岸
			CASE 640
				SELECTCASE RAND:6
					CASE 0
						PRINTFORML 「彼岸在三途之川与此岸隔開，是乘上死神之船的地方」
						PRINTFORMW 「……本该是这样才对，但是最近总有人从空中飞进来，这让我很困扰。」
					CASE 1
						PRINTFORML 「在这里绽放的花朵中，有些寄宿着无缘的灵魂。」
						PRINTFORMW 「请不要弄断了」
					CASE 2
						PRINTFORML 「……感觉这一带開的花比平时多了」
						PRINTFORMW 「也许外面的世界发生了不好的事情」
					CASE 3
						PRINTFORML 「未判决的灵魂，在增加呢……」
						PRINTFORMW 「阎魔不需要休息，但也要遵守组织的规则」
						PRINTFORMW 「这是一个麻烦的地方。」
					CASE 4
						PRINTFORML 「另一个阎王吗？只是你没看见，他还在呢」
						PRINTFORMW 「不要说“不见面”或“不想见”之类失礼的话。」
					CASE 5
						PRINTFORML 「我认为部下的失态是上司的责任。我还有很多不足之处呢」
						PRINTFORMW 「所以，在小町改变想法之前，我也打算好好教导她」
				ENDSELECT
			;白玉楼庭
			CASE 650
				IF RAND:2 == 1
					PRINTFORML 「请不要太靠近那棵古树」
					PRINTFORMW 「……恕我不能告知详情，但相当危险」
				ELSE
					PRINTFORML 「那边的樱花怎么等也不会開…」
					PRINTFORMW 「嗯，那样就好了。就那样静静待着吧」
				ENDIF
			;白玉楼
			CASE 660
				IF RAND:2 == 1
					PRINTFORML 「虽说是宽敞漂亮的馆，但太过晃荡的话会给人添麻烦的」
					PRINTFORMW 「如果因为误解而被从者砍了，我不会去阻止的哦」
				ELSE
					PRINTFORML 「请和这个馆的主人有分寸地接触」
					PRINTFORMW 「仅从温吞优雅的外表和轻松的氛围来判断的话，可是会吃到苦头哦」
				ENDIF
			;地獄 = MAIN_MAPでは該当場所無し？
			CASE 670
				PRINTFORML 「你这个人真是哪儿都来啊」
				PRINTFORMW 「我还是第一次见到有人类来这里。」
		ENDSELECT
	ELSE
		;通常会話を待客室でも使用ため別ルーチン
		CALL K30_TALK_NORMAL
	ENDIF
ENDIF
RETURN 1
;-------------------------------------------------
;通常会話
;映姫様は他の角色より陥落無しでの会話が多くなりそうだからもっと増やしたい
@K30_TALK_NORMAL
#DIM TEMP
#DIM 回数
#DIM 分岐量
;-------------------------------------------------
;恋人＠パターン少ないので1/3で下へ
IF TALENT:恋人 && RAND:3 != 0
	SELECTCASE RAND:7
		CASE 0
			PRINTFORML 「%K30_C_NAME(MASTER)%喜欢上了我的哪里？」
			PRINTFORMW 「说真的，第一次见面时的印象,着实不太好」
			PRINTFORML 「…我也曾认为你是个很可疑的人」
			PRINTFORMW 「到底是什么呢，呐♥能告诉我么？」
		CASE 1
			PRINTFORML 「就算和阎王成为了恋人,也不能随便撒谎哦」
			PRINTFORMW 「呼呼♥我可不会偏袒的哦」
		CASE 2
			PRINTFORML 「呼呼……从没想到我会和他人坠入爱河」
			PRINTFORMW 「只是和你说说话就觉得很幸福。感觉很不可思议呢…」
		CASE 3
			IF !CFLAG:衣装一時変更
				PRINTFORML 「我喜欢这套制服。穿着的时候身体很紧绷」
				PRINTFORMW 「………还有」
				PRINTFORMW 「%K30_C_NAME(MASTER)%に、帮我脱衣服的时候……」
				PRINTFORMW 「束缚的解放感……让人受不了……♥」
			ELSE
				PRINTFORML 「今天换了平时不穿的衣服...」
				PRINTFORMW 「这样子怎么样,给您什么样的印象呢?」
				PRINTFORML 「.........」
				PRINTFORMW 「谢谢您,%K30_C_NAME(MASTER)%...♥」
			ENDIF
		CASE 4
			PRINTFORML 「虽然你和我所渡过的时间不同」
			PRINTFORMW 「正因为如此,我才必须好好珍惜现在这样的时间」
		CASE 5
			PRINTFORML 「自从遇见你之后,我也改变了很多呢」
			PRINTFORMW 「因为别人而产生改变,以前的我根本从没想过」
			PRINTFORMW 「但是现在我很高兴那个。%K30_C_NAME(MASTER)%、真的谢谢」
		CASE 6
			PRINTFORMW 「知道了被满足的喜悦,也会意识到失去的恐惧」
			PRINTFORMW 「尽管如此，%K30_C_NAME(MASTER)%。能遇见你真的是一件很幸福的事」
	ENDSELECT
;恋慕＠1/3で下へ恋人ならここまで
ELSEIF TALENT:恋慕 && RAND:3 != 1 || TALENT:恋人
	;恋慕初回会話、二人きりだと呼び名変更提案
	IF FIRSTTIME("稱呼",1) && K30_BE_SEEN() == 0
		PRINTFORML 「吶、%K30_C_NAME(MASTER)%」
		PRINTFORMW
		PRINTFORMW 「在我看来，你果然是个特别的人。所以，那个……」
		PRINTFORMW 「只有两个人的时候，用不同的称呼也可以…可以吗？」
		PRINTFORML
		RESETCOLOR
		CALL ASK_YN("好啊", "不好意思，不行")
		CALL M_KOJO_COLOR_K30
		IF !RESULT
			CALL K30_SET_C_NAME(1)
			CALL M_KOJO_COLOR_K30
			IF RESULT == -1
				PRINTFORMW 「……果然，害羞了？」
				PRINTFORMW 「对不起，总觉得我也突然害羞起来了…」
				PRINTFORMW 「和平时一样最好…」
			ELSE
				PRINTFORMW 「呼呼呼、这是只有两个人的秘密，desu……%K30_C_NAME(MASTER)%」
			ENDIF
		ELSE
			PRINTFORML 「是、是啊……」
			PRINTFORMW 「我是不是有点太得意了……」
			PRINTFORMDW 映姫面红耳赤
		ENDIF
		CSTR:30:0 = %CSTR:(30):0%呼び名/
		RETURN 1
	ENDIF
	SELECTCASE RAND:8
		CASE 0
			PRINTFORML 「%K30_C_NAME(MASTER)%认识你之后，我学到了很多东西」
			PRINTFORMW 「关于男女间的微妙…以前很多事情即使照在镜子里我也不知道」
			PRINTFORML 「但是最近好像能理解了…为了能做出更公正的裁决」
			PRINTFORMW 「也有不经历就不知道的事情呢」
		CASE 1
			IF ONCE("会話＠予定", 1) && K30_FIND_LOVER() < 1
				CALLF ONCE("会話＠予定")
				SELECTCASE TIME
					CASE 360 TO 549
						IF CHARA_HOLIDAY(30)
							PRINTFORML 「%K30_C_NAME(MASTER)%,今天要做些什么？」
							PRINTFORMW 「如果要出门的话,如果可以的话,我想跟你一起去…」
						ELSE
							PRINTFORML 「我今天接下来要工作吧…」
							PRINTFORMW 「%K30_C_NAME(MASTER)%，对参观法庭感兴趣吗？」
						ENDIF
					CASE 550 TO 719
						PRINTFORML 「%K30_C_NAME(MASTER)%，决定好计划了吗？」
						PRINTFORMW 「今天的一针，也叫明天的十针。做事不能拖延」
						PRINTFORMW 「……所以，如果你犹豫要不要和我一起出去，就应该马上邀请我♥」
					CASE 720 TO 789
						IF 仕事中チェック(30) && CFLAG:30:職種 == 43
							PRINTFORML 「为了准备下午的工作，必须养精蓄锐」
							PRINTFORMW 「所以，还得和%K30_C_NAME(MASTER)%多悠闲几句话♥」
						ELSE
							PRINTFORML 「真快啊。已经是中午了」
							IF TIME_PROGRESS(TCVAR:30:空腹時刻) > 0
								PRINTFORMW 「午饭还没吃的话，一起去怎么样?」
							ELSE
								PRINTFORML 「你这之后有安排吗」
								PRINTFORMW 「……果然还是打扫吧？」
							ENDIF
						ENDIF
					CASE 790 TO 1029
						IF 仕事中チェック(30) && CFLAG:30:職種 == 43
							PRINTFORML 「看不出工作在减少？　嘛，也许确实是这样」
							PRINTFORML 「能在曲直厅办事务的，只有我和另外一个人…」
							IF TCVAR:30:帮忙工作量
								PRINTFORMW 「所以能得到你的帮助真的是帮了大忙」
								PRINTFORMW 「谢谢,%K30_C_NAME(MASTER)%」
							ELSEIF ABL:MASTER:教養 >= 4 && TALENT:心情 != -1
								PRINTFORML 「啊ー啊，要是能有个聪明又温柔的人帮忙，那就太好了…」
								PRINTFORMDW 嘻嘻笑的映姬一直盯着这边看
							ELSE
								PRINTFORMW 「…现在说那种话也没办法啊。我只是尽职而已」
							ENDIF
						ELSE
							PRINTFORML 「%K30_C_NAME(MASTER)%,方便的话,不一起出趟门么？」
							PRINTFORMW 「想去的地方？两个人在一起的话哪里都很期待哦」
						ENDIF
					CASE 1030 TO 1329
						PRINTFORML 「啊ー,已经到这种时候了……」
						PRINTFORMW 「%K30_C_NAME(MASTER)%、\@ GETBIT(CFLAG:30:既成事實, 1) ? 晚上还有时间吧 # 聊会天的时间还是有的吧 \@？」
					CASEELSE
						PRINTFORMW 「毕竟已经到了睡觉的时间了吧…」
				ENDSELECT
			ELSE
				PRINTFORML 「%K30_C_NAME(MASTER)%在此岸和彼岸之间来来往往」
				PRINTFORMW 「这样真的没事么……」
			ENDIF
		CASE 2
			PRINTFORMW 「为什么总是在说教？真是太失礼了」
			PRINTFORML 「……死后的审判只有一次。谁也无法颠覆」
			PRINTFORML 「活着的时候多积善的话,罪责也会相应的减少」
			PRINTFORML 「所以为了让罪责减轻一些,我才会去说教」
			PRINTFORMW 「无论什么样的罪人,我都没法弃之不顾」
		CASE 3
			PRINTFORML 「将裁决死者送去地狱,这本身也是罪过」
			PRINTFORMW 「阎魔也无法避免罪责。更不用说人类和妖怪了」
			PRINTFORMW 「所以要经常注意行善」
		CASE 4
			IF !CFLAG:衣装一時変更
				PRINTFORML 「我很喜欢这套制服」
				PRINTFORMW 「穿着这件衣服光明正大地行动,我感到很自豪哦」
				PRINTFORMW 「……只是,这条裙子果然还是太短了吧？」
			ELSE
				PRINTFORML 「我一直在思考,作为闫魔应该保持什么样的形象」
				PRINTFORML 「今天我虽然换上了这样的服装」
				PRINTFORMW 「但我认为重要的不是外表,而是从举止言谈中体现出闫魔应有的风范」
				SIF STRCOUNT(CSTR:30:0, "変Ｔ")
				    PRINTFORMW 「.........」\n「当然,我也意识到有时候还达不到要求」\n「我自己也觉得,我还有很大进步的空间...」
			ENDIF
		CASE 5
			PRINTFORML 「%K30_C_NAME(MASTER)%平时都做些什么呢」
			PRINTFORMW 「……不是审判，也不是审问。只是想直接从你那里听到而已」
			PRINTFORMW 「只要在能说的范围内就可以。呐…能告诉我吗?」
		CASE 6
			PRINTFORMW 「ねえ……%K30_C_NAME(MASTER)%」
			IF K30_BE_SEEN() == 0 && CSTR:30:80 != "" && CSTR:30:80 != MASTERNAME:30
				PRINTFORMW 「…………………」
				PRINTFORML 「……呼呼っ、这个称呼」
				PRINTFORMW 「果然……咚咚心跳加速呢…♥」
			ELSE
				PRINTFORML 「あの……………」
				PRINTFORMW 「…………………」
				PRINTFORMW 「………很难在不中断的情况下说话呢」
				PRINTFORML 「为了说明教诲一直说的话完全不在乎…」
				PRINTFORMW 「%K30_C_NAME(MASTER)%和我聊天開心吗……？」
			ENDIF
		;小町口上のパ…松鼠ペクト若しくはアンサー。地主の時は胡麻畑持ちなので好物でもおかしくない
		CASE 7
			IF ABL:料理技能 < 2
				PRINTFORML 「之前请小町教我的菜非常好吃」
				PRINTFORMW 「%K30_C_NAME(MASTER)%也一定要尝尝」
				PRINTFORML 「菜的名字吗？嗯……『芝麻香油盐纳豆』可以吗…」
				PRINTFORMW 「制作方法是……哎呀？ 不用问也知道？？」
			ELSEIF ABL:料理技能 < 4
				PRINTFORML 「我開始学习做料理，最近也在挑战做点心」
				PRINTFORML 「听说点心比做饭还难」
				PRINTFORMW 「对我来说料理比较难呢」
				PRINTFORML 「……每道料理的分量有一小份，也有少许。」
				PRINTFORMW 「那种含糊不清的说法，我实在不擅长」
			ELSE
				PRINTFORML 「%K30_C_NAME(MASTER)%に训练我做料理，我也做了很多尝试」
				PRINTFORMW 「芝麻炸鳟鱼、芝麻拌扁豆、黑白芝麻豆腐……然后，是啊…」
				PRINTFORML 「呃?有什么偏颇？」
				PRINTFORML 「芝麻，不是很好吗。我很喜欢哦」
				PRINTFORMW 「从一開始就黑白分明，你不觉得是很棒的食材吗」
			ENDIF
	ENDSELECT
	SIF GETBIT(CFLAG:1502, 2)
		RETURN 1
	;恋慕で信賴度積むと妊娠願望フラグ
	IF CFLAG:信賴度 >= 1500 && !(TALENT:妊娠 || EXP:出産経験)
		PRINTFORMW
		PRINTFORMDL 对话结束后，映姬仍用一种奇怪的眼神看着%CALLNAME:MASTER%…
		PRINTFORMW
		PRINTFORMW （%MASTERNAME:30%桑。我喜欢喜欢得不得了的人）
		SELECTCASE CFLAG:1502
			CASE 0
				PRINTFORMW （即使和你能活下去的时间不同，也可以祈愿吗）
			CASE 1, 2
				PRINTFORMW （并不是任由你摆布。 我也是，我也是……）
			CASE 3
				PRINTFORMW （你都那么认真地考虑过了，我还犹豫什么呢）
		ENDSELECT
		SETBIT CFLAG:1502, 2
		PRINTFORMW （与%MASTERNAME:30%的宝宝，果然……）
		PRINTFORML
		PRINTFORMW 「…对不起，我稍微考虑了一下」
	ENDIF
;思慕＠2/3で下へ恋慕付いてたらここまでで選ぶ
ELSEIF (TALENT:思慕 && RAND:3 == 0) || TALENT:恋慕
	SELECTCASE RAND:8
		CASE 0
			IF !CHARA_HOLIDAY(30, 1) && CFLAG:30:職種 != 49
				PRINTFORML 「听说外面世界的阎王大人有非常冷静、能干的辅佐官」
				PRINTFORMW 「不过，以曲直厅的规模和财政，实在雇不起这样的人」
				PRINTFORML 「……也试着让小町和久侘歌帮助过我的工作」
				PRINTFORML 「嗯，工作果然是人尽其才」
				PRINTFORMW 「那个时候能切身感受到这一点，的好经验…」
			ELSE
				PRINTFORML 「休息日？嗯，阎王也有休息哦」
				PRINTFORMW 「我也不是一直在曲直厅工作的。工作是交班制。」
				PRINTFORML 「你看不出我在休息么」
				PRINTFORMW 「现在的时间也是工作休息，说教是兴趣时间哟？」
			ENDIF
		CASE 1
			PRINTFORML 「在死神中也有亲自将人引向死亡的存在」
			PRINTFORML 「%K30_C_NAME(MASTER)%觉得我家的小町够不上死神的标准吗？那是例外」
			PRINTFORML 「明明是只要去做就能做到的孩子,但是只要一偷懒就立马变得忘乎所以起来……」
			PRINTFORMW 「真是让人头疼」
		CASE 2
			PRINTFORML 「原来如此,只要好好积累教养,任何人都能回到彼岸……」
			PRINTFORMW 「……嗯？」
		CASE 3
			PRINTFORML 「久侘歌是一个认真工作,很会照顾人的好孩子」
			PRINTFORMW 「希望她也不要太勉强自己」
		CASE 4
			PRINTFORML 「不要进入畜生界比较明智。我不知道会对你有什么影响。」
			PRINTFORMW 「……但是，若无其事地出入彼岸的%K30_C_NAME(MASTER)%……」
		CASE 5
			PRINTFORML 「就算你说偶尔也想被夸奖几句,我也很困扰呢」
			PRINTFORMW 「像%K30_C_NAME(MASTER)%这样每天都晃晃荡荡的人被夸奖…嗯……」
			PRINTFORMW 「夸奖……慰劳……啊,想到有可以颁给你的奖了…」
			PRINTFORMW 「需要罪孽深重奖吗？」
		CASE 6
			IF TALENT:MASTER:清掃中毒
				PRINTFORMW 「即使从刚才開始说，%K30_C_NAME(MASTER)%也只在意周围的人呢…？」
				PRINTFORML 「原来如此……打扫中毒了吗」
				PRINTFORML 「真是业障深重…」
				PRINTFORMW 「这也是沉溺于欲望的罪吗…？」
			ELSEIF ABL:MASTER:清掃技能 > 4 && RAND:2 == 1
				PRINTFORML 「%K30_C_NAME(MASTER)%的打扫技术如果足够好」
				PRINTFORMW 「好像有很多工作岗位，但还是老样子…」
				PRINTFORML 「热心打扫是很好的用心，这是没错的」
				PRINTFORMW 「看着你，我觉得不仅仅是这样」
			ELSE
				PRINTFORML 「听说%K30_C_NAME(MASTER)%非常爱干净」
				PRINTFORMW 「不管去什么地方都会打扫。很用心呢」
			ENDIF
		CASE 7
			PRINTFORML 「与外面的世界相比，幻想乡充满了自然的恩惠」
			PRINTFORML 「%K30_C_NAME(MASTER)%与其闲着没事干，不如去打猎采集怎么样」
			PRINTFORMW 「当然吃的时候不能忘记感恩的心情哦」
	ENDSELECT
ELSE
	;更新履歴に書いてないけど小言だけはちょくちょく増えてる
	;量増えたのでローテーションで表示するテスト
	分岐量 = 40
	SIF !回数
		CALLF FUNC_FISHER_YATES_SHAFFLE(LOCAL, 分岐量)
	SELECTCASE LOCAL:回数
		CASE 0
			PRINTFORML 「净是说教？ 我只说正确的道路的存在方式」
			PRINTFORMW 「因为对自己的罪责而感到愧疚,所以才听起来像说教吧。」
		CASE 1
			IF FLAG:地主
				PRINTFORML 「你有好好地在修整田地吗？」
			ELSE
				PRINTFORML 「你有好好在工作吗？」
			ENDIF
			PRINTFORMW 「我看你好像每天都无所事事,晃来晃去的样子」
		CASE 2
			IF 拠点_家主 == 30 || 拠点_家主 == 66
				;角色データ.ERBでも『三途之川をうろつくのはやめなさいという心遣い』とあるので
				PRINTFORML 「如果可以的话,我想请你搬走。」
				PRINTFORMW 「因为不知道住在彼岸会对你产生什么样的影响」
			ELSEIF 拠点_家主 == 56
				PRINTFORML 「你住在仙界是为了什么?」
				PRINTFORMW 「依事而定……做好心理准备吧」
			ELSEIF 拠点_家主 == 26
				PRINTFORML 「你的来历不明，果然和那个间隙妖怪有关吧」
				PRINTFORMW 「迷路的人类也有，但住在那里的人类还是第一次听说。」
			ELSE
				PRINTFORML 「你有好好的向家主的%CALLNAME:拠点_家主%表达感谢吗？」
				PRINTFORML 「虽然能帮忙去做的事情有很多很多」
				PRINTFORMW 「但至少每天不打声招呼可是不行的」
			ENDIF
		CASE 3
			PRINTFORML 「……是么。外面的世界最近是这样的啊」
			PRINTFORMW 「真是令人叹息。我都想直接去说教了。」
		CASE 4
			PRINTFORML 「我不可会拔舌。那是另一个阎王大人的逸闻」
			PRINTFORML 「我用这个手板代替。如果你被它打到，疼痛就会与罪恶的重量成正比……」
			PRINTFORMW 「比起被拔舌头,可能会更痛苦哦」
		CASE 5
			PRINTFORML 「你有好好地打扫自己的房间吗？」
			PRINTFORMW 「收拾身边的东西也是很好的善行哦」
		CASE 6
			PRINTFORML 「你是否想着现在每天过的不错就可以了呢？」
			PRINTFORML 「人死后会度过比生前更加漫长的时间」
			PRINTFORMW 「即使现在无法理解也没关系,但为了做好死后的准备,必须要好好积德行善」
		CASE 7
			PRINTFORMW 「还特意来跟我搭话,难道说你……」
			PRINTFORMW 「就这么想被我说教么。真的很用心呢」
		CASE 8
			PRINTFORML 「最近，能够接受转世的灵魂越来越少了。」
			PRINTFORML 「也正是因为如此，面对罪恶积累善行的人类也在减少……」
			PRINTFORMW 「实在是令人悲哀。」
		CASE 9
			PRINTFORML 「什么是善行」
			PRINTFORMW 「对于每个人都有所不同。对你来说，是啊……」
			PRINTFORMW 「大概花上三天时间的话，应该能聊到某种程度。 要继续听下去吗？」
		CASE 10
			PRINTFORML 「外面世界的阎王大人的脸很红」
			PRINTFORML 「那是由于为了补偿审判亡者的罪，受到了喝烧融的铜的惩罚」
			PRINTFORMW 「我因为不成熟而被免除了惩罚……但是审判人的罪是很重的」
		CASE 11
			IF CFLAG:1901 != 30 && RAND:2 == 1 && !TALENT:思慕
				PRINTFORML 「我不知道像你这样的人和%CALLNAME:(CFLAG:1901)%有什么交集」
				PRINTFORMW 「对突然出现的你，是信赖到把你放在身边的关系吗?…？」
				PRINTFORMW 「难道，掌握着把柄威胁…之类的，没做过吧？」
			ELSEIF (CFLAG:1900 % 3 == 1 ) && RAND:2 == 1
				PRINTFORML 「搬到幻想乡之前还能理解，但在那里首先选择彼岸就不太懂了」
				PRINTFORMW 「普通情况下这样就死了吧…你应该会有这样的担心…」
			ELSE
				PRINTFORML 「像你这样的人住在只有女人的地方，我有点担心。」
				PRINTFORMW 「我也不想否定所有的欲望…」
				PRINTFORMW 「一旦失去节制，就会沦为畜生。请不要忘记那个」
			ENDIF
		CASE 12
			TEMP = DAY - TOINT(K30_DIARY_DATA(1, 0))
			SELECTCASE TEMP
				CASE IS < 32
					PRINTFORML 「在幻想乡的生活和外面的世界有很大的不同」
					PRINTFORMW 「但是，人的营生无论在哪里都不会有那么大的变化
					PRINTFORMW 「互相帮助和扶持是很重要的」
				CASE 32 TO 124
					PRINTFORML 「说实话，像你这样的人出现，我还以为是不太好的异变前兆呢…」
					PRINTFORMW 「好像没发生大问题，平静地生活着，这比什么都好」
					PRINTFORMW 「之后会好好积善，所以那件事我也没什么好说的」
				CASEELSE
					PRINTFORML 「你好像也完全习惯了在这里的生活呢」
					PRINTFORML 「幻想乡有很多和外面不同的规则」
					PRINTFORMW 「只要好好遵守，即使多少有些不便，也是生活上不错的地方」
			ENDSELECT
		CASE 13
			IF FLAG:神簽契約
				PRINTFORML 「………是这样吗。你和博丽的巫女签订了神签的合同」
				PRINTFORMW 「确实，如果是她的话，即使不是很有用，也会有效果的」
				PRINTFORML 「但是，不能把抽签的内容用在失败和责任的逃避上」
				PRINTFORMW 「不管写的是什么，归根到底都是占卜，一切的行为都是自作自受」
			ELSE
				PRINTFORML 「………是这样的吗?你不太相信抽签和碰运气」
				PRINTFORMW 「确实，这也不是『运气在天』里随便试的东西」
				PRINTFORML 「既然神签里有喜有忧的话…」
				PRINTFORMW 「应该尽可能地积累善行，努力吸引天运」
			ENDIF
		CASE 14
			PRINTFORML 「也许你也误解了…」
			PRINTFORML 「我的话并不是特别长」
			PRINTFORMW 「正因为听者有各种各样的问题，所以该说的话才会越来越多」
		CASE 15
			PRINTFORML 「有一个词叫『一期一会』…」
			PRINTFORML 「你死前也会遇到阎王大人」
			PRINTFORML 「你意识到这是非常宝贵的经验吗？」
			PRINTFORMW 「所以不要错过这个机会，认真听我的教诲哦」
		CASE 16
			PRINTFORML 「像你这样的人，或者是偶尔的东西」
			PRINTFORMW 「最近除了妖怪以外，越来越多的人越过结界来到这里」
			PRINTFORML 「也许是因为外面的世界正在发生剧烈的变化」
			PRINTFORMW 「但是，太快的变化会带来什么影响……我有点担心」
		CASE 17
			PRINTFORML 「我知道别人都说我爱『唠叨』」
			PRINTFORMW 「欸，因为自己也有自觉」
			PRINTFORML 「但这也是为了你们」
			PRINTFORMW 「我一点也不打算阻止你们的看法」
		CASE 18
			IF ABL:MASTER:戦闘能力 > 4
				PRINTFORML 「看着你，我感到很不可思议…」
				PRINTFORML 「为什么在人的身上同时，拥有能与我匹敌的力量呢」
				PRINTFORMW 「还是像博丽的巫女一样承担着特别的作用呢？」
			ELSEIF ABL:MASTER:戦闘能力 > 1
				PRINTFORML 「你似乎有足够的自卫能力」
				PRINTFORML 「不过骄傲和大意都是幻想乡的大忌」
				PRINTFORMW 「因为有很多外表和危险度完全不相符的存在」
			ELSE
				PRINTFORML 「看着你，我感到很不可思议…」
				PRINTFORML 「为什么能那么毫无戒备地在那边普拉普拉的乱逛呢」
				PRINTFORML 「食人妖怪和野生动物，生命的危险是到处存在的」
				PRINTFORMW 「还是说你有一定能逃跑的手段？」
			ENDIF
		CASE 19
			IF ABL:MASTER:話術技能 > 3 && RAND:2 == 1
				PRINTFORML 「话说回来，你还是个能说会道的人呢」
				PRINTFORML 「不，并不是什么坏事」
				PRINTFORML 「但是，口若悬河的口才如果没有诚实的话也是空虚的」
				PRINTFORMW 「那里请不要弄错」
			ELSE
				PRINTFORML 「我不会让你从一開始就完全理解我说的话」
				PRINTFORML 「只是想放在脑海的一角，每天一点一点地引出来」
				PRINTFORMW 「只有不断积累才是善行。因为这不是一时兴起或心血来潮的事情」
			ENDIF
		CASE 20
			;炮友+愛人の人数を算出
			TEMP = (SUMCARRAY(TALENT:炮友, 1) - CMATCH(TALENT:炮友, 2, 1))
			SELECTCASE TEMP
				CASE IS > 6
					PRINTFORML 「你是来这个幻想乡钓女人的吗？」
					PRINTFORMW 「我只听到一些很难听的糜烂传闻」
					PRINTFORML 「如果你认为只要现在開心就无所谓，那就到此为止…」
					PRINTFORMW 「我断言吧。那样的生活方式一定会后悔的」
				CASE IS > 3
					PRINTFORML 「我听传闻说你有很烂的女性关系…」
					PRINTFORML 「那是本人的自由意志，我也不能阻止」
					PRINTFORMW 「不要太玩弄女性」
					PRINTFORMW 「不然的话，在黑暗的夜路上突然被谁…这也是很有可能的」
				CASE IS > 0
					PRINTFORML 「听说有好几个人和你交往得很亲密呢」
					PRINTFORML 「大家都不是木石之类的，所以会有这种事我也能理解」
					PRINTFORMW 「只是要注意分寸」
				CASE 0
					PRINTFORML 「主动来到幻想乡的人类虽然很少见，但也能看到」
					PRINTFORML 「特意搬来的你一定是按照自己的意思来的吧」
					PRINTFORML 「目的是什么\@ TALENT:思慕 ? 事到如今 # 敢于承认 \@我不会追究」
					PRINTFORMW 「只是，请不要做误入歧途的事」
			ENDSELECT
		CASE 21
			PRINTFORML 「小人闲居为不善…」
			PRINTFORMW 「哎，看到你这样的人很轻浮，我很担心」
		CASE 22
			IF ABL:MASTER:教養 > 3 && RAND:2 == 1
				PRINTFORML 「即便如此，你还是个很博学的人呢」
				PRINTFORMW 「……原来如此，来这里之后好好学习了」
				PRINTFORML 「确实，在幻想乡有很多机会接触到外面世界没有的知识，我很欣慰」
				PRINTFORML 「但是，请小心。 积累的知识只有为了别人和自己而活用」
				PRINTFORMW 「只死读书头重脚轻是不行的」
			ELSE
				PRINTFORML 「在外面的世界里，有一种工具可以帮助我们获取各种各样的知识和信息」
				PRINTFORML 「它的力量在某种意义上甚至超过了我的净琉璃之镜」
				PRINTFORML 「只是，过于便利的力量和工具总会出现一些弊端」
				PRINTFORMW 「在这一点上，我有点担心外面的世界还好吗」
			ENDIF
		CASE 23
			PRINTFORML 「虽然常说『有钱能使鬼推磨』…」
			PRINTFORML 「你也不要真信了这种瞎话」
			PRINTFORMW 「我的审判是绝对的，不可能因为钱而动摇」
			PRINTFORML 「积累善行而发财就很好」
			PRINTFORML 「但是如果拘泥于眼前的小利而不断犯下恶行…」
			PRINTFORMW 「死后会连三途川的渡船费都不够哦」
		CASE 24
			PRINTFORML 「在审判厅偶尔会有死后灵魂说出『转生特典』啦『ちーと』之类莫名其妙的话…」
			PRINTFORML 「外面世界的阎王爷都这么感叹」
			PRINTFORML 「听好了，今世不积善就没有更好的来世」
			PRINTFORMW 「你要这样铭记于心地度过每一天哦」
		CASE 25
			PRINTFORML 「阁下似乎不满足于跨越区区三途川」
			PRINTFORML 「听说地底，天界，甚至连月之都要去」
			PRINTFORMW 「也只有其行动力值得称赞吧」
			PRINTFORML 「但是，只是这样是不行的吧」
			PRINTFORMW 「应该把精力用到帮助有困难的人等更有益的事上吧」
		CASE 26
			PRINTFORML 「我并不是要强人所难」
			PRINTFORMW 「我只是希望大家每天努力行善，每天都过得清白、正确」
			PRINTFORMW 「……有那么难吗？？」
		CASE 27
			PRINTFORML 「如果你们这些人每天都有好好善行的话」
			PRINTFORML 「我也不用唠叨地说教了…」
			PRINTFORML 「是的，我现在的状态是非常非常地」
			PRINTFORMW 「不能默默地视而不见」
		CASE 28
			PRINTFORML 「稍微好一点吗？」
			PRINTFORMW 「把手放在自己的胸口上，\@ TIME:2 < 3 ? 昨 # 今 \@天做的事回想一下」
			PRINTFORMW 「……那是何等的恶行，不，怎样的淫行」
			PRINTFORML 「哼！我不会在这惩罚你的」
			PRINTFORML 「请改悔罢！吾不收你天自收之！」
			PRINTFORMW 「如果阁下反省，不再屡教不改，善莫大焉」
		CASE 29
			PRINTFORML 「在幻想乡经常能感觉到妖怪和物怪就在身边」
			PRINTFORML 「你憧憬她们的奔放和强大的力量也没关系」
			PRINTFORMW 「但是生活在幻想乡不能以人身化妖……那是很大的罪过」
			PRINTFORML 「若是阁下脱离人理，博丽的巫女会不需问答地毁灭你的」
			PRINTFORML 「比我的裁决还要残酷无情哦…等待它的是字面意义上的消失」
			PRINTFORMW 「你也不要有什么奇怪的想法」
		CASE 30
			PRINTFORML 「反复说同样的话让人很郁闷」
			PRINTFORML 「你……一丝一毫也没考虑过我的劝告吗？」
			PRINTFORMW 「既然觉得厌烦的话，同样错事也是重复着的你为什么不開始改变呢」
		CASE 31
			PRINTFORML 「昨天之过已不可变」
			PRINTFORML 「但今日之行犹可改，只要有心一切都来得及」
			PRINTFORML 「撒，好好制定计划，从现在開始励志行善哦」
		CASE 32
			PRINTFORML 「道歉和感激之心都要好好地传递给对方」
			PRINTFORML 「请放弃那种“总觉得你会体谅我”的天真想法」
			PRINTFORML 「吾反复向大家说教…也是这种心情的表现」
			PRINTFORMW 「如果不好好传达并得到理解的话，就没有说教的意义了」
		CASE 33
			PRINTFORML 「即使是妖怪和神灵，也不是一切都是万能的。」
			PRINTFORML 「因为一点小事被困扰也是经常有的」
			PRINTFORML 「像你这样有闲工夫的人，一定很受器重吧」
			PRINTFORMW 「撒，不要一直在那里拖拖拉拉，来帮大家的忙吧！」
		CASE 34
			PRINTFORML 「常说“三岁看老,七岁看成”,看来您从小就对女性的内衣物有着异常的执着吧...?」
			PRINTFORMW 「......您的业力真够深的」
		CASE 35
			PRINTFORML 「据说有位修炼飞行术已臻化境的仙人,一见美女就从天上掉下来了」
			PRINTFORMW 「您也总是追着女人跑,说不定哪天也会吃点苦头」
		CASE 36
			PRINTFORML 「学会把自己想要的对待别人很重要」
			PRINTFORML 「体贴、友善、表达感谢」
			PRINTFORMW 「这些都是建立和维系良好人际关系所必需的」
			PRINTFORML 「...烦请注意,我不是说」
			PRINTFORML 「您动不动就觊觎女性,这种行为」
			PRINTFORMW 「不能称之为善举...希望您能自重」
		CASE 37
			PRINTFORML 「幻想乡与外界隔绝,日复一日看似千篇一律」
			PRINTFORML 「但界内时间依然流逝,四季还在变迁」
			PRINTFORML 「没错,任何强大的力量也无法逃避无常这个真理」
			PRINTFORMW 「您应该积累善行,以应对终有一日的到来」
		CASE 38
			PRINTFORML 「我并不主张禁欲」
			PRINTFORMW 「人有正常的食欲和睡眠需求,这些都是身体的本能」
			PRINTFORML 「...然而,您的色欲实在过于旺盛」
			PRINTFORML 「这可不仅仅是生命的灯火,更像要将自己烧成灰烬的业火」
			PRINTFORMW 「我建议您学会适可而止」
		CASE 39
			PRINTFORML 「佛祖的弟子中,就有一位只管勤勤恳恳地打扫,终于悟道的」
			PRINTFORMW 「或许您也可能通过这样的修行,达到那个境界......」
			PRINTFORML 「.........」
			PRINTFORMW 「...非常抱歉,我实在无法想象您获得觉悟的样子」
	ENDSELECT
	回数 = (回数 == (分岐量 - 1)) ? 0 # 回数 + 1
ENDIF
RETURN 1
;-------------------------------------------------
;酒気帯びトーク
@K30_TALK_DRUNK(ARG)
;-------------------------------------------------
;酔うと沸点が低くなる
IF MARK:30:反発刻印 > 0
	IF K30_DRUNK() > 1
		PRINTFORMW 「酒都要变难喝了！给我到那边去！」
	ELSE
		PRINTFORMW 「没什么好说的…」
	ENDIF
	RETURN 1
ELSEIF TALENT:心情 == -1
	;MASTERが悪くない時
	IF TCVAR:30:372 == 1
		IF K30_DRUNK() > 1
			PRINTFORMW 「你,你肯定,也一直觉得我喋喋不休的很烦吧！」
			PRINTFORMW 「真是的～…你们知道我是有多么为你们着想么……」
			PRINTFORMDW 酒后吐真言…
		ELSE
			PRINTDATAL
				DATAFORM 「最近的年轻人真是的…」
				DATAFORM 「真是的,那孩子总是一个劲地偷懒,稍微向久侘歌学学啊…」
				DATAFORM 「为什么都不好好听我说话呢…」
			ENDDATA
			PRINTFORMDW 一个人在嘟囔着什么“不就胸部稍微大些么,那个间隙妖怪”…
		ENDIF
	;你が悪い時＠反発刻印を今日期けた
	ELSE
		IF K30_DRUNK() > 1
			PRINTFORMW 「刚才的事,我还记得很清楚！」
		ELSE
			PRINTFORMW 「对不起,现在有点不方便…」
		ENDIF
	ENDIF
	RETURN 1
ELSEIF TCVAR:30:会話不能 && !TALENT:恋慕
	CALL M_KOJO_COLOR_K30
	IF K30_DRUNK() > 1
		PRINTFORMW 「什～么～？　你在说什么～？」
	ELSE
		PRINTFORMW 「把想说的话好好说清楚如何」
	ENDIF
	RESETCOLOR
	RETURN 1
ENDIF
SELECTCASE ARG
	;酔い＆会話教養レベル差あり＠多分死に分岐なので適当
	CASE -2
		PRINTFORML 「这个笨蛋……真是的……已经年事已高……」
		PRINTFORMDW 映姬在嘟囔着什么,完全无法理解……
	;酔い＆会話失敗（微醺のみ？）
	CASE -1
		PRINTFORMW 「唔ー你……已经喝醉了么？」
	;会話成功
	CASE 0, 1
		;不省人事
		IF K30_DRUNK() == 3
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「诶嘿嘿ふっ、吶%K30_C_NAME(MASTER)%～」
						PRINTFORMW 「啾～我们，  让我们来～啾♥」
					CASE 1
						PRINTFORML 「%K30_C_NAME(MASTER)%っ、%K30_C_NAME(MASTER)%～。喜欢我的哪里？」
						PRINTFORMW 「我啊，我好喜欢你啊~～♥」
					CASE 2
						PRINTFORML 「啊哈哈哈、%K30_C_NAME(MASTER)%有两个人呢~哪个才是真的～？」
						PRINTFORMDL 好像喝得太多了,都看到重影了。真的没问题吗……
						PRINTFORMW 「嗯～、嗯～…嗯呼呼呼♪　哪个都喜欢～♥」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「啊哈哈哈！那是什么～」
						PRINTFORMDW 映姫在爆笑……
					CASE 1
						PRINTFORML 「%K30_C_NAME(MASTER)%っ、没羞没臊～」
						PRINTFORMW 「不好好多喝一些可不行哦～」
					CASE 2
						PRINTFORML 「唔呼呼,我可还没喝醉哦～」
						PRINTFORML 「你的命运啊~直白点!阿鼻地狱～」
						PRINTFORMDW 要是之后告诉阎王撒酒疯的情景,肯定就没脸见人了,还是算了吧……
				ENDSELECT
			ENDIF
		;酔酒
		ELSEIF K30_DRUNK() == 2
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「那张脸,又在想什么H的事了吧～」
						PRINTFORMW 「呀～你还真是个H的家伙呐～」
					CASE 1
						PRINTFORML 「%K30_C_NAME(MASTER)%っ！　…你一直在走吗？」
						PRINTFORMW 「……现在马上抱紧我,这就是现在你所能做的善行哦♪」
					CASE 2
						PRINTFORMW 「%K30_C_NAME(MASTER)%…♥　……唔呼呼、只是试着叫一下♥」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「还想着小町去哪了,果然又去什么地方偷懒了……？」
						PRINTFORMW 「喂，有好好听吗？要好好听别人的话！いい？」
						PRINTFORMDW 都已经听了3次同样的话,所以完全没问题……
					CASE 1
						PRINTFORMW 「唔唔ー可能有点喝多了…」
					CASE 2
						PRINTFORML 「居然说我不成体统,真是多么失礼啊」
						PRINTFORMW 「站在组织顶点的我喝醉了,怎么可能会这样……」
						PRINTFORMDW 在前后不着调的情况下開始了说教,%CALLNAME:MASTER%好不容易让她停了下来……
				ENDSELECT
			ENDIF
		;微醺
		ELSE
			IF TCVAR:烂醉
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「别,别跟我搭话…」
						PRINTFORMW 「脑袋里现在嗡嗡作响的…」
					CASE 1
						PRINTFORML 「完全…喝多了…」
						PRINTFORMW 「我,没做什么…奇怪的事吧…？」
					CASE 2
						PRINTFORML 「身体好热,而且好困…」
						PRINTFORMW 「看来不能喝太多啊…」
				ENDSELECT
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「呼呼…身体有些轻飘飘的」
						PRINTFORMW 「%K30_C_NAME(MASTER)%,坐在一起吧」
					CASE 1
						PRINTFORML 「～♪　～～♪　～♪」
						PRINTFORMDW 映姫在哼着小曲。似乎相当惬意的样子。
					CASE 2
						PRINTFORML 「不再稍微喝点酒么？」
						PRINTFORMW 「……但和你这样聊天感觉更開心」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「意外我嗜酒吗？ 确实，我几乎不参加宴会……」
						PRINTFORMW 「只不过是摘不下面子,并不是讨厌喝」
					CASE 1
						PRINTFORMW 「唔……不要这么急。慢慢地来喝酒吧」
					CASE 2
						PRINTFORMW 「酒就得像这样,控制得刚刚好的程度」
				ENDSELECT
			ENDIF
		ENDIF
ENDSELECT
RETURN 1
;-------------------------------------------------
;変T会話
@K30_TALK_STRANGE_TSHIRT
#DIM 回数
#DIM 分岐量
;-------------------------------------------------
;外出時会話フラグ消す
TCVAR:30:359 = 1
IF ONCE("会話＠記念日", 1) && RAND:5 == 0 && (TALENT:思慕 || TALENT:恋慕) && !TALENT:妊娠 && !仕事中チェック(30)
	CALLF ONCE("会話＠記念日")
	PRINTFORMDL 实际上，在苗条的映姬身上，和休闲服装看起来很搭…虽然裙子方面很难找到更合适的说法
	PRINTFORMDL 所以%CALLNAME:MASTER%把想法告诉了映姬，设法鼓励她
	PRINTFORMW
	SELECTCASE RAND:3
		CASE 0
			PRINTFORML 「拜托了。 请不要……」
			PRINTFORMW 「这个样子，真的很羞耻…」
		CASE 1
			PRINTFORML 「即使不用照镜子，也能知道不是说谎…我知道，所以才」
			PRINTFORMW 「所以才，更加…不好意思…」
		CASE 2
			PRINTFORML 「你、你突然说什么啊！！」
			PRINTFORMW 「……像这样露出皮肤的样子，很害羞」
	ENDSELECT
	PRINTFORMDW  映姬用快要消失的声音喃喃自语
	RETURN 1
ELSE
	PRINTFORMD %CALLNAME:PLAYER%和映姫
	PRINTDATADL
		DATAFORM 一边打听她的情况一边说了话
		DATAFORM 在尴尬的气氛中说话了
		DATAFORM 一边担心着她一边说了话
		DATAFORM 努力和往常一样说话了
		DATAFORM 一边关心着她一边说了话
	ENDDATA
	PRINTFORMW
	分岐量 = 21
	SIF !回数
		CALLF FUNC_FISHER_YATES_SHAFFLE(LOCAL, 分岐量)
	SELECTCASE LOCAL:回数
		CASE 0
			IF CFLAG:MASTER:現在位置 == CFLAG:113:現在位置
				PRINTFORML 「赫喀提亚大人称赞适合我」
				PRINTFORMW 「嗯，是非常棒的笑容…」
			ELSE
				PRINTFORML 「赫喀提亚大人看到我，会说什么呢？」
				PRINTFORMW 「很期待呢。呵呵呵…」
				PRINTFORMDW 映姬的嘴上笑着，但美目依然死气沉沉……
				RETURN 1
			ENDIF
		CASE 1
			IF 仕事日チェック(30) && TIME < 540
				PRINTFORML 「虽然我一直以自豪和自负的态度工作」
				PRINTFORMW 「这种打扮的日子，还是会动摇…」
				PRINTFORMW 「…我想休假…」
			ELSEIF 仕事中チェック(30)
				PRINTFORML 「至少在审判死者的时候，我想穿平时的衣服…」
				PRINTFORMW 「阎魔的威严……好像要全部崩塌了…」
			ELSE
				PRINTFORML 「穿这么薄的衣服在人前露面」
				PRINTFORMW 「想快点恢复平时的服装…」
			ENDIF
		CASE 2
			PRINTFORML 「这件衬衫，我觉得胸口很松」
			PRINTFORMW 「不知道会不会有什么闪失，好恐惧呀…」
		CASE 3
			IF !CHARA_HOLIDAY(30, 1)
				PRINTFORMW 「这件衣服，真的提高了工作效率」
				PRINTFORML 「…不，根本不能放松。 不如，恰恰相反」
				PRINTFORMW 「不想考虑其他所有的事情，只专注于眼前的工作…」
			ELSE
				PRINTFORML 「总觉得大家都在看我。」
				PRINTFORMW 「今天好像什么也做不到…」
			ENDIF
		CASE 4
			PRINTFORML 「穿着这身衣服就能保持那种实力和威严」
			PRINTFORMW 「赫喀提亚大人果然很厉害」
			PRINTFORMW 「我无论如何也做不到…」
		CASE 5
			PRINTFORML 「如果是在外面的世界，这个样子也没有违和感吧」
			PRINTFORMW 「……对我来说门槛太高了。」
		CASE 6
			PRINTFORML 「今天我要告诉你一件很重要的事」
			PRINTFORMW 「不要以貌取人」
			PRINTFORMW 「…可以吧？」
		CASE 7
			PRINTFORML 「…奉职宫中是很痛苦的事」
			PRINTFORMW 「………」
			PRINTFORMW 「不可思议啊。这样的事情我一次也没想过…」
		CASE 8
			PRINTFORML 「赫喀提亚大人是个会照顾人的非常温柔的人」
			PRINTFORMW 「也许是她无法衡量我的想法，或者说和在一般感性上有偏差……」
		CASE 9
			IF !CHARA_HOLIDAY(30, 1)
				PRINTFORML 「我知道这件衣服和帽子不合适」
				PRINTFORML 「但是，如果不带点什么证明自己是阎罗王的话，会比裸体更不安…」
				PRINTFORMW 「而且，如果只有这件衬衫和裙子的话，我想谁也不会认真听我的审判…」
			ELSE
				PRINTFORML 「其实我想有时间和%TEXTR("小町好好地/久侘歌慢慢地/部下好好地/")%谈谈」
				PRINTFORMW 「但穿成这个样子总觉得……」
			ENDIF
		CASE 10
			PRINTFORML 「如果可以的话，请不要看这边。」
			PRINTFORMW 「对不起。真的拜托了…」
		CASE 11
			PRINTFORMW 「快一点，快一点到明天吧…」
		CASE 12
			IF FLAG:ファッション == 62
				IF GET_TARGETNUM() == 1 || (GET_TARGETNUM() == 2 && CFLAG:MASTER:現在位置 == CFLAG:113:現在位置)
					PRINTFORML 「……今天其他人也换上了这件衣服吧?」
					PRINTFORMW 「没错，不应该只有我有这样的遭遇……」
				ELSE
					PRINTFORML 「哎呀……这件衣服，我\@ CFLAG:MASTER:現在位置 == CFLAG:113:現在位置 ? 赫喀提亞大人 # \@只穿了这样的…」
					PRINTFORML 「えっ、心理作用？　……是这様吗，是啊……」
					SIF CFLAG:MASTER:衣装一時変更 == 62
						PRINTFORML 「甚至连无关的你都换了衣服…一定是这样的吧…」
					WAIT
				ENDIF
			ELSE
				IF !CHARA_HOLIDAY(30, 1)
					PRINTFORML 「来接受审判的灵魂进入了法庭」
					PRINTFORML 「看到我时的那种反应，已经…」
					PRINTFORMW 「非常……受不了…」
				ELSE
					PRINTFORML 「这身打扮无论走到哪里都会引人注目。」
					PRINTFORMW 「说教今天也休息……」
				ENDIF
			ENDIF
		CASE 13
			PRINTFORML 「这个裙子很短……很为难……」
			PRINTFORMW 「那个……莫非、看见了……没有吧？」
		CASE 14
			PRINTFORML 「实际上...和穿这件衣服一起，赤足也差点成为规则」
			PRINTFORMW 「也许确实可以放松，但是……到底还是让我阻止了……」
		CASE 15
			PRINTFORML 「……项圈是戴不上的」
			PRINTFORMW 「那个项圈是赫喀提亚大人力量到达三个世界的标志」
			PRINTFORMW 「既不能模仿，也不能由我来代替」
			PRINTFORMW 「……绝对不是无法接受那个性的外表……」
		;勝手版も面白いよ
		CASE 16
			PRINTFORML 「只是模仿了赫喀提亚大人的随身物品，确实这件衬衫可以称为神器」
			PRINTFORMW 「香霖堂的店主看过一次，那个时候确实说…」
			PRINTFORML 「对四元素和地狱、麻痹、恐怖、疯狂有耐性之类的」
			PRINTFORMW 「不明白意思？嗯，我也完全不懂。…」
		CASE 17
			IF CFLAG:MASTER:衣装一時変更 == 62
				PRINTFORML 「……为什么连你也那么高兴地换衣服呢」
				PRINTFORMW 「開心吗？」
				PRINTFORML 「……………………」
				PRINTFORMW 「看起来很開心……」
			ELSE
				;クラピ裤襪の映姫様誰かうｐして
				PRINTFORML 「赫喀提亚大人觉得真的很好，所以向您推荐这件衣服」
				PRINTFORMW 「所以，如果不喜欢的话，会换成其他的衣服吧」
				PRINTFORML 「但是，在那种情况下，下一个候选恐怕…」
				PRINTFORMW 「最近很喜欢那种地狱妖精般的小丑服…」
				PRINTFORMW 「那个，就算只有一次，呃……穿新衣服的话，还是……这个比较好…」
			ENDIF
		CASE 18
			IF CFLAG:妊娠経過日数 >= 15
				PRINTFORML 「…看着可能会不安，但是没关系哦」
				PRINTFORML 「完全不用担心肚子里的这个孩子」
			ELSEIF DAY:2 == 4
				PRINTFORML 「没关系。虽然是这个季节，但是几乎不冷」
			ELSE
				PRINTFORML 「这件衣服…虽然外观奇特，但是穿着很舒适哦」
			ENDIF
			PRINTFORMW 「可以说是因为是受到伟大女神庇佑的衣服吗」
			PRINTFORML 「在这一点上，我平时的制服远远不及」
			PRINTFORMW 「但是，功能的好坏不一定和穿着者的心境一致…」
		CASE 19
			PRINTFORML 「有外来者看到我的裙子,大呼小叫说 “Cosplay装” 之类的」
			PRINTFORMW 「我不太明白意思,但可以感觉不是恭维的话...」
		CASE 20
			PRINTFORML 「...这不是衣领太长的问题」
			PRINTFORML 「这就是这种服装的样式」
			PRINTFORMW 「对,真是没办法...」

	ENDSELECT
ENDIF
IF RAND:3 == 1
	PRINTDATADW
		DATAFORM 映姬无力地笑着…
		DATAFORM 现在的映姬没有平时威严的样子
		DATAFORM 映姬的秀目里更加失去了生气…
	ENDDATA
ENDIF
回数 = (回数 == (分岐量 - 1)) ? 0 # 回数 + 1
RETURN 1
;-------------------------------------------------
;事後のエロ会話
;映姫様もヤッた直後ならえっちな話をしてくれる…という妄想
@K30_TALK_AFTERSEX
;-------------------------------------------------
#DIMS CHOSEN
;汎用セリフの選択肢
CHOSEN = 1/2/3/
;随意パラメータを拾い選択肢に足す
SIF !EQUIP:連体内衣 && PALAM:欲情 >= PALAMLV:(4 + 2 * (GET_INT(30, "上半身内衣_はだけ不可", EQUIP:上半身内衣１, "布料厚度")))
	CHOSEN += "4/"
SIF INRANGE(EX:膣内精液, 10, 400)
	CHOSEN += "5/"
SIF EX:膣内精液 > 400
	CHOSEN += "6/"
SIF EX:肛門内精液 > 400
	CHOSEN += "7/"
FOR COUNT, 1, 6
	;V/A挿入で3回以上強絶頂した体位を見る
	SIF GETBIT(TCVAR:30:389, COUNT)
		CHOSEN += @"{COUNT + 7}/"
	;陥落した部位で5回以上絶頂した
	SIF TALENT:(71 + COUNT) && TCVAR:30:(389 + COUNT) > 4
		CHOSEN += @"{COUNT + 12}/"
NEXT
;ポルチオ超強絶頂3回以上
SIF GETBIT(TCVAR:30:389, 7) && TALENT:心情 == 1
	CHOSEN += "18/"
SIF TALENT:精愛味覚 && TCVAR:30:395 > 4
	CHOSEN += "19/"
SIF TALENT:処女 && GETBIT(CFLAG:1910, 7)
	CHOSEN += "20/"
PRINTFORMD %CALLNAME:PLAYER%は
PRINTDATAD
	DATAFORM 性奋还没有消退
	DATAFORM 喘息急促的样子
	DATAFORM 散发着雌香的荷尔蒙味
	DATAFORM 湿润的美目甜蜜地凝视着这边
	DATAFORM 面浮红潮不断泛出了香汗
ENDDATA
PRINTFORMDL 跟映姬闲聊着
PRINTFORMDL 映姬倚靠在%CALLNAME:PLAYER%身上，呢喃着对他耳语
PRINTFORMW
SELECTCASE TOINT(TEXTR(CHOSEN))
	CASE 1
		PRINTFORML 「原本是拿石头雕刻身体的我」
		PRINTFORML 「能这样和你缠绵，总觉得不可思议…」
		PRINTFORMW 「但是，非常舒服……非常幸福…♥」
	CASE 2
		PRINTFORML 「%K30_C_NAME(MASTER)%…♥♥」
		PRINTFORMDW 映姫\@ TALENT:恋人 ? 和恋人一样 # 就像恋人一样 \@与%CALLNAME:MASTER%指间交缠…
		PRINTFORML 「不可能一辈子这样下去，可是…」
		PRINTFORML 「不想分開，我不想分開啊…♥」
		PRINTFORMW 「就这样…再温存一会儿吧…♥」
	CASE 3
		PRINTFORML 「准备结束了，差不多该换衣服了…」
		PRINTFORMDL 一边这样说着，一边映姬抱住了%CALLNAME:MASTER%
		PRINTFORML 「要不，等等…再等一下下…♥」
		PRINTFORMW 「……嗯~、%K30_C_NAME(MASTER)%的气味…喜欢…♥」
	CASE 4
		PRINTFORML 「嗯~…♥　胸部，衣服上都…很显眼了…」
		PRINTFORML 「但是，我…只要感受到你的温暖，就会变成这样」
		PRINTFORMW 「讨厌、事到如今…♥」
	CASE 5
		PRINTFORMW 「……啊♥」
		PRINTFORML 「…滴垂下来了♥」
		PRINTFORMDW 映姬害羞地捂着私处
	CASE 6
		PRINTFORML 「真是冤家，不管怎么擦，还是会滴落下来…」
		PRINTFORMW 「这里是不是…该装个塞子好呢？」
		PRINTFORMW 「…用你的，大肉棒♥」
		PRINTFORML 「……呵呵，開玩笑的♥」
		PRINTFORMDW 映姬意味深长地微笑着…
	CASE 7
		CALL COLORMESSAGE("『……卟hi』", GETDEFCOLOR(), 1, 1)
		PRINTFORMDL ……从映姬的裙子下面传出了非常下流的声音
		PRINTFORMW 「…！！！」
		PRINTFORML 「烦请，刚才的…刚才的，就当没听见吧…」
		PRINTFORMW 「那样被拔出来的话……我也没办法啊…」
	CASE 8
		PRINTFORML 「…谢谢，%K30_C_NAME(MASTER)%…真是太好了♥」
		PRINTFORML 「我舒服的地方…那么卖力地探索」
		PRINTFORML 「弄得我死去活来…紧紧地拥抱我」
		PRINTFORMW 「我…最喜欢了♥」
	CASE 9
		PRINTFORMW 「我……让我从后面做…最喜欢了、因为我知晓了」
		PRINTFORML 「只专注于%K30_C_NAME(MASTER)%的小鸡鸡」
		PRINTFORML 「从看不见的地方，被撞得满满的话…」
		PRINTFORML 「会舒服到莫名其妙了…♥」
		PRINTFORMW 「自己竟然能发出那么下流的声音…都不知道♥」
	CASE 10
		PRINTFORML 「%K30_C_NAME(MASTER)%我骑在上面…你是怎么想的？」
		PRINTFORML 「总觉得只有我一个人变舒服了了」
		PRINTFORMW 「我是不是没顾上你…有点在意」
		PRINTFORML 「…还有，每次做完之后…把你弄得湿漉漉的」
		PRINTFORMW 「我觉得很抱歉呢…」
	CASE 11
		PRINTFORML 「嗯…嗯呼呼♥」
		PRINTFORML 「被紧紧地拥抱着，一直吻着我…」
		PRINTFORML 「那样子……被顶起来操弄…」
		PRINTFORMW 「是的，非常……我很满足呀♥」
	CASE 12
		PRINTFORML 「嗯……很厉害，很舒服的说……」
		PRINTFORMW 「%K30_C_NAME(MASTER)%、是不是对我玩弄得有点过头了？」
		PRINTFORML 「被那样摆弄，而且…被玩弄了很多的话…」
		PRINTFORML 「太舒服了，真的…我想我会变成那种痴女…」
		PRINTFORMW 「不，不是讨厌……如果能再稍微手下留情一点就好了…」
	CASE 13
		PRINTFORML 「小妹妹。还在…发牢骚」
		PRINTFORML 「\@ CFLAG:没穿内裤 ? 即使只是走路 # 一直擦着内衣 \@也会感觉怪怪的…♥」
		PRINTFORML 「啊，但是……在人前可以自持，别担心」
		PRINTFORMW 「没有比和你做更舒服的事了♥」
	CASE 14
		PRINTFORML 「拥有欲望本身并不是罪」
		PRINTFORMW 「只顾欲望，沉溺于欲望是罪」
		PRINTFORML 「…所以%K30_C_NAME(MASTER)%、为了以后我不再重复罪孽」
		PRINTFORML 「我重要的地方…请用你的鸡鸡好好教育它♥」
		PRINTFORML 「已经无法独自抑制这种肉欲了…♥」
		PRINTFORMDW 映姬抚摸着腹下，仿佛在确认刚才的余韵…
	CASE 15
		PRINTFORML 「啊啊…好厉害的♥♥　还在鸡皮疙瘩…停不下来…♥」
		PRINTFORMDW 肛门几度陷入绝顶，映姬心情就像做梦一样
		PRINTFORML 「把我改造成…用屁眼感觉快乐的变态」
		PRINTFORML 「%K30_C_NAME(MASTER)%真的这么做了呢♥」
		PRINTFORML 「把阎王爷贬到如此淫乱地步的罪…很重哦」
		PRINTFORMW 「今后你要永远这样，这个污秽下流的洞…负起责任安慰它♥」
	CASE 16
		PRINTFORML 「我的欧派，可能没有%K30_C_NAME(MASTER)%期望的那么大…」
		PRINTFORML 「但是，变得非常敏感…是按照你的喜好转变的」
		IF TALENT:母乳体質 == 2
			PRINTFORML 「而且乳汁，随时都可以榨出来给你喝哦…♥」
		ELSE
			PRINTFORML 「被摸、被舔…不，只是和你接触…」
			PRINTFORML 「胸部很快就会变得很舒服…♥」
		ENDIF
		PRINTFORMW 「所以如果今后也能多多疼爱我的话……会很高兴的♥」
	CASE 17
		PRINTFORML 「口唇上好像还残留着触感…♥」
		PRINTFORMDL 映姬恋恋不舍地捂着嘴
		PRINTFORML 「真想忘记时间和别人的目光，一直吻下去…不过」
		PRINTFORMW 「嗯，我知道不可能…现在就到这里吧」
		PRINTFORMW 「…接下来，我随时等着你哦…♥」
	CASE 18
		PRINTFORML 「%K30_C_NAME(MASTER)%、真的…太厉害、了♥」
		PRINTFORMDL 映姬露出了迷醉的笑容，紧紧地抱住了%CALLNAME:MASTER%吸着味道
		PRINTFORMDW 阴道绝顶的快乐，强烈得阎王爷连骨头都软掉了…
		PRINTFORML 「只是，不仅仅是舒服啊…脑子一片空白，什么都想不了了」
		PRINTFORML 「身体全部…像是化了，好幸福…」
		PRINTFORMW 「如果被教了那样的事情……就再也忘不掉了…♥」
	CASE 19
		PRINTFORMW 「呼呼っ♥　喝了很多…♥」
		PRINTFORML 「不可思议啊……一般来说，精液是又臭又奇怪的味道…虽然是这样」
		PRINTFORML 「欧金金满满吃下，%K30_C_NAME(MASTER)%会很高兴」
		PRINTFORML 「最后射出舒服的证据…」
		PRINTFORMW 「映姬我也真的很幸福…变得很開心♥」
		PRINTFORMW 「还有…再做吧，可以吗♥」
	CASE 20
		PRINTFORML 「那个……我，如果是%K30_C_NAME(MASTER)%的话……连第一次也可以献上哦？」
		PRINTFORMW 「应该说，除了你以外的人是不会考虑的……」
		PRINTFORML 「让屁股舒服的事，喜欢…但是」
		PRINTFORML 「%K30_C_NAME(MASTER)%爱过我的证明，希望能好好地刻在我身上」
		PRINTFORMW 「小女子不才…期待%K30_C_NAME(MASTER)%君的指教哦」
ENDSELECT

;==================================================
;301,泡茶
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_301
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_301_1
#DIM TEA_TIME
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	RESULT = 1
	;初回
	IF FIRSTTIME(SELECTCOM)
		TEA_TIME = DAY
		IF K30_CHECK_HEN_T()
			PRINTFORMW 「…是，非常谢谢」
			PRINTFORMDW 映姬只道谢，默默地喝着茶
			SIF TFLAG:193 == -1
				PRINTFORMDW 稍微有点搞错了，拿出了极苦茶，映姬却都没注意到
			PRINTFORML 「关于这个礼物，日后我再给你讲个好故事…」
			PRINTFORMW 「今天就到此为止…」
		ELSE
			PRINTFORMW 「给我茶……？是代替供品吗？」
			PRINTFORML 「就算向阎魔上供品也没有意义」
			PRINTFORMW 「给平时关照过你的人去帮帮忙,才是你应当去做的善行哦？」
			PRINTFORMW
			PRINTFORML 「还是说……是想要聆听我的教诲么」
			PRINTFORMW 「那等我用茶润润嗓子后,再好好的和你聊聊吧」
			PRINTFORMW 「你还真的很用心呢。那我開动了」
			PRINTFORMW
			;茶淹れ失敗
			IF TFLAG:193 == -1
				PRINTFORML 「…唔……。……太苦了」
				PRINTFORML 「有好好给别人泡过吗？」
				PRINTFORMW 「想要款待他人之心是非常好,但是为此也需要一定的努力和练习」
				PRINTFORML 「不播种的种子是不会长出来的。得好好地继续努力…………」
				PRINTFORMDW 映姬的说教開始了…
			;それ以外(=成功 or 大成功)
			ELSE
				PRINTFORML 「……嚯。泡得很不错呢」
				PRINTFORML 「………多谢款待」
				PRINTFORMW 「这个一定得回礼才行」
				PRINTFORML 「那么来谈谈你应该做的善行吧。说起来……」
				PRINTFORMDW 映姬的说教開始了…
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;酔酒以上
		IF K30_DRUNK() > 1 || TCVAR:烂醉
			IF RAND:2 == 1
				PRINTFORMW 「谢谢,很不错呢…」
			ELSE
				PRINTFORMW 「有点喝多了…」
			ENDIF
			RETURN 1
		ELSEIF 仕事中チェック(30) && CFLAG:30:職種 == 43
			;午後の仕事中
			;大成功・失敗・ブチギレ中・変Ｔは通常へ流す
			SIF TIME > 720 && (TFLAG:193 != 0 || CFLAG:318 == 1 || K30_CHECK_HEN_T())
				GOTO OTHER
			SIF TIME > 720
				PRINTFORML 「非常感谢」
			SELECTCASE TIME
				;裁判中
				CASE 540 TO 719
					IF TALENT:恋慕 && !CFLAG:ブチギレ && !K30_CHECK_HEN_T()
						PRINTFORMDW 映姫对%CALLNAME:MASTER%微笑着喝了茶
					ELSE
						PRINTFORMDW 映姬只对%CALLNAME:MASTER%行注目礼就喝了茶
					ENDIF
				;昼休み
				CASE 720 TO 779
					PRINTDATAW
						DATAFORM 「片刻休息一杯茶…真的是很好的搭配」
						DATAFORM 「呼ぅ……在这里好好休息，下午也要加油」
						DATAFORM 「工作还在继续，现在要慢下来吗」
					ENDDATA
				;事務処理
				CASE 780 TO 1019
					PRINTDATAW
						DATAFORM 「为了整理头脑，休息得正好呢」
						DATAFORM 「是啊。歇口气吧」
						DATAFORM 「刚刚告一段落」
						DATAFORM 「好不容易来一次，我把茶点拿来吧」
					ENDDATA
				;書類整理
				CASE 1020 TO 1139
					PRINTDATAW
						DATAFORM 「…诶度…已经是这个时间了吗」
						DATAFORM 「今天也好好工作了一天…」
						DATAFORM 「喝完之后再努力一次吧」
						DATAFORM 「稍微休息一下就一口气结束」
					ENDDATA
			ENDSELECT
			RETURN 1
		ENDIF
		$OTHER
		IF K30_CHECK_HEN_T()
			IF TEA_TIME != DAY || CFLAG:318 != 1
				TEA_TIME = DAY
				IF TFLAG:193 > -1
					IF RAND:2 == 1
						PRINTFORMW 「……谢谢。我開动了」
						PRINTFORMW 「啊…心情平静……果然还是和往常一样是最好的…」
						PRINTFORMDW 像平时一样对待映姬，让她松了一口气
					ELSE
						PRINTFORMW 「嗯，我喝了…」
						PRINTFORMDL 映姬只道谢一下，默默地喝茶
						SIF !仕事中チェック(30)
							PRINTFORMDW 看来今天是没心情讲法了…
					ENDIF
				ELSE
					PRINTFORML 「……连茶的味道都不知道」
					PRINTFORMW 「好不容易给我泡了一杯，对不起…」
					PRINTFORMDW 今天的映姬好像没有时间品茶了…
				ENDIF
			ELSE
				PRINTFORML 「………………」
				PRINTFORMDW 映姬默默地啜着茶…
				SIF TFLAG:193 == -1
					PRINTFORMDW 就连茶是失败之作也完全没有注意到
			ENDIF
			RETURN 1
		ELSEIF CFLAG:318 == 1
			PRINTFORML 「…非常感谢」
			PRINTFORMDW 虽然谢了，但映姬还是板着脸抿着茶
		;振動棒约会中
		ELSEIF TCVAR:30:364
			PRINTFORML 「嗯……果然很好吃…」
			PRINTFORMW 「平时的话，这样的话……会很平静的…嗯♥」
			CALL HPH_PRINT, "「现在的我♥…没有那种余裕HPH」", "W"
			TEA_TIME = DAY
			RETURN 1
		ELSEIF TALENT:恋慕
			;茶入れ大成功
			IF TFLAG:193 == 1
				PRINTFORML 「非常感谢。很好喝哦」
				PRINTFORMW 「呼呼……正合我的口味呢」
			;茶淹れ失敗
			ELSEIF TFLAG:193 == -1
				PRINTFORML 「呼っ、啊拉……？　稍微单薄的……？」
			;それ以外(=成功)
			ELSE
				IF TEA_TIME != DAY
					TEA_TIME = DAY
					PRINTFORML 「我正好有点渴了。你是察觉到了吗？」
					PRINTFORMW 「……呼唔。这个一定得回礼才行呢」
					PRINTFORMW 「要说我能做的事,果然还是这个吧」
					CALL K30_LECTURE_BENEFIT
				ELSE
					PRINTFORMW 「呼呼,只要是你泡的茶,不管多少我都能喝下去」
				ENDIF
			ENDIF
		ELSEIF TALENT:思慕
				;茶入れ大成功
			IF TFLAG:193 == 1
				PRINTFORML 「…………真是太棒了,感谢你的款待」
				PRINTFORMW 「把美味发挥到了这种程度,看来付出了相当多的努力呢」
				PRINTFORMW 「很用心呢」
				;茶淹れ失敗
			ELSEIF TFLAG:193 == -1
				PRINTFORML 「ん…？　茶好苦啊」
				PRINTFORMW 「失败了吗?的确，每个人都有失败的时候」
				PRINTFORMW 「所以以备不时之需,无论做什么事都得每日精进」
			ELSE
				;それ以外(=成功)
				IF TEA_TIME != DAY
					TEA_TIME = DAY
					PRINTFORML 「正好喉咙有些干,真是帮大忙了」
					PRINTFORMW 「……呼唔。这个一定得回礼才行呢」
					PRINTFORMW 「多谢款待。那么可以请你稍微听一会么」
					CALL K30_LECTURE_BENEFIT
				ELSE
					PRINTFORMW 「哦呀,喝了好几杯,谢谢」
				ENDIF
			ENDIF
		ELSE
			;茶入れ大成功
			IF TFLAG:193 == 1
				PRINTFORML 「泡得恰到好处呢」
			;茶淹れ失敗
			ELSEIF TFLAG:193 == -1
				PRINTFORML 「呼唔,外来人也有喝这种茶的习惯呢」
				PRINTFORMW 「哎呀，不是吗？只是失败？」
				PRINTFORMW 「…那可就更加不行了哦」
			;それ以外(=成功)
			ELSE
				IF TEA_TIME != DAY
					TEA_TIME = DAY
					PRINTFORML 「你为我斟茶,我为你教授善行。嗯,能建立不错的互利关系呢」
					PRINTFORMW 「呼唔…那么開始吧」
					CALL K30_LECTURE_BENEFIT
				ELSE
					PRINTFORMW 「抱歉。总是让你费心」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	SIF IS_WISEMAN() && !RESULT
		CALL K30_KENJYA_TIME
ENDIF
RETURN 1
;==================================================
;302,身体接觸＠ナズ構文コピペです
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_302
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_302
IF BATHCHECK(CFLAG:MASTER:現在位置) && IN_HOME(CFLAG:MASTER:現在位置) || TCVAR:30:364
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;初回
	IF FIRSTTIME(SELECTCOM)
		IF K30_CHECK_HEN_T()
			PRINTFORMDW 想把手伸到映姬露出的裸肩上…
			PRINTFORML 「嫌っ！！」
			PRINTFORMDW 被断然拒绝了
			PRINTFORMW 「什、你要干什么呢…请住手……」
		ELSE
			PRINTFORML 「……想和我接触……？」
			PRINTFORML 「…………？」
			PRINTFORMDW 映姬目瞪口呆地看着%CALLNAME:MASTER%
			PRINTFORML 「…我可不是许愿地藏,就算碰了也不会有什么好处」
			PRINTFORMW 「本来我就不同意你随便碰女人」
			PRINTFORML 「其罪孽之重，刻骨铭心」
			PRINTFORMDW 映姬高高举起悔过棒
		ENDIF
	;二回目以降
	;◆憤怒
	ELSEIF CFLAG:ブチギレ
		PRINTFORMW 「……你想现在就被判罪吗？」
	;◆待客室と情人旅館と私室
	ELSEIF GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館, OMANEKIBEYA()) || (CFLAG:30:現在位置 == 615 && !K30_CHECK_HEN_T() && K30_BE_SEEN() == 0)
		IF TFLAG:193 == -1 && (CFLAG:30:現在位置 == OMANEKIBEYA() || CFLAG:30:現在位置 == 615)
			PRINTFORMDW …在開始触碰身体之前，被敲门的声音打扰了…
			PRINTFORMW
			PRINTFORMDL 『四季大人~这个文件里有想问的事情～……』
			PRINTFORMW 「……嗨、是！　现在就出来！」
			PRINTFORMDW 阎魔大人的工作好像很辛苦…
		ELSEIF K30_DRUNK() > 1
			PRINTFORMW 「%K30_C_NAME(MASTER)%～、唔呼呼～っ♪」
			PRINTFORMDW 已经喝醉的映姫向%CALLNAME:MASTER%\@ TALENT:恋慕 ? 紧紧抱上来,不肯放開 # 靠了过来 \@…
		ELSEIF TCVAR:30:364
			PRINTFORMDL %CALLNAME:MASTER%对映姫的%TEXTR("后背用手指抚划了一下/侧腹试着戳了一下/脖子试着轻抚了一下")%
			PRINTFORMW
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT, "「啊呼HPH　嗯…HPH」", "L"
					PRINTFORMDW 只是轻轻地碰了一下映姬就绵软无骨地瘫坐下了…
					CALL HPH_PRINT, "「已经…HPH　只是摸的话，禁止哦…HPH」\n「哪里都变得敏感了…厉害的不得了HPH」", "W"
				CASE 1
					PRINTFORMW 「哈，哈希！？」
					PRINTFORML 「要，你要干什么，真是的…」
					PRINTFORMDL 也许是突然被碰了吧，映姬发出了大意的娇声…
					PRINTFORMW 「哇，请不要笑！」
				CASE 2
					CALL HPH_PRINT, "「啊嗯…HPH」", "L"
					PRINTFORMDW 映姬把温香软玉地身体托付给了%CALLNAME:MASTER%…
					PRINTFORML 「真的…坏心眼，是吧…」
					CALL HPH_PRINT, "「我这边，已经…准备好了…HPH」", "W"
			ENDSELECT
		ELSEIF TALENT:恋人
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMDL %CALLNAME:MASTER%试着挠了挠映姬
					PRINTFORMW 「咔！　ちょ、稍微…痒、咔，咔哈哈…」
					PRINTFORMW 「诶咿……真是回敬你的♪」
					PRINTFORMDW 映姫也挠了回来,就像小孩子一样互相嬉戏了一会……
				CASE 1
					PRINTFORMDL %CALLNAME:MASTER%握住了映姬的手,一直盯着她看
					PRINTFORMW 「突然怎么了？ 事到如今还用这种事害羞吗……」
					PRINTFORMDW 再次和映姬十指相扣握住,在耳边低声说着甜蜜的爱语………
					PRINTFORMW 「……抱…歉。果然,像这样…还是有些受不了……」

				CASE 2
					PRINTFORMW 「吶、%K30_C_NAME(MASTER)%…这里，可以吗？」
					PRINTFORMDW 映姬像坐在椅子上一样坐在%CALLNAME:MASTER%的大腿上
					PRINTFORML 「呼呼……像这样之后,就很安心了呢……」
					PRINTFORMDW 映姬呵气如兰的微甜香味扑鼻而来……
					IF BASE:MASTER:勃起 > 1000
						PRINTFORML 「但是，怎么办呢……你好像坐立不安呢……♥」
						PRINTFORMDW 察觉到了贴在屁股上的坚硬触感,映姬嫣然一笑……
					ENDIF
			ENDSELECT
		;恋慕
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMDL %CALLNAME:MASTER%为映姫按摩起了腰部
					PRINTFORMDW ………
					PRINTFORMDL ……
					PRINTFORMW 「唔～好舒服…」
					PRINTFORMW 「这里,正好因为最近工作增多了,很酸呢…」
				CASE 1
					PRINTFORML 「%K30_C_NAME(MASTER)%、在这里的话可以不客气地撒娇哦」
					PRINTFORMW 「而且……如果不这样做的话,我也会感觉有些不足呢…」
				CASE 2
					PRINTFORMDW %CALLNAME:MASTER%试着向映姬的耳朵吹气
					PRINTFORML 「咔…!?……就算没人看到，也太过分了……」
					PRINTFORMDW 虽然这么说，但映姬看起来并不满足…
			ENDSELECT
		;思慕
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「这样的事很開心吗…？」
					PRINTFORML 「………看起来很開心呢」
					PRINTFORMDW 映姬虽然很吃惊，但没有摆脱的样子
				CASE 1
					PRINTFORMDL %CALLNAME:MASTER%试着握住映姬的手
					PRINTFORMW 「嗯,只是这种程度的话…」
				CASE 2
					PRINTFORMW 「呀啊……我说,你在干什么啊！」
					PRINTFORMDL 映姬用悔悟棒啪嚓啪嚓地敲过来
					PRINTFORMDW 因为什么都没写所以根本不痛
			ENDSELECT
		;陥落無
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「…你满足了么？」
					PRINTFORMDW 映姬即使被%CALLNAME:MASTER%握住手也没有什么反应
				CASE 1
					PRINTFORMDW %CALLNAME:MASTER%本来想抱抱映姬的肩膀,但是突然被拉開了距离……
				CASE 2
					PRINTFORMW 「只要在这里出声的话,马上就会有人来」
					PRINTFORMW 「你已经做好了,因为这种事而被惩罚的觉悟么？」
			ENDSELECT
		ENDIF
	;◆约会中
	ELSEIF CHK_DATENOW(CFLAG:TARGET:约会中)
		IF TCVAR:30:364
			IF NOWEX:Ａ絶頂 && RAND:2
				PRINTFORMDL %CALLNAME:MASTER%靠近的时候，映姬突然扑到怀里，抱住了…
				PRINTFORMW
				CALL HPH_PRINT, "「ふぅーっHPH　ふぅーっHPH　ふぅーっ……」", "W"
				CALL HPH_PRINT, "「对不起，了…好厉害，好像要来了…HPH」", "L"
				CALL HPH_PRINT, "「声，忍耐…请，帮下忙…HPH」", "W"
				PRINTFORMDL 映姬更加用力地抱住%CALLNAME:MASTER%
				PRINTFORMDW 把脸埋在%CALLNAME:MASTER%的胸前，映姬做好了不漏出声音的准备…
				TFLAG:194 = 19
				RETURN
			ENDIF
			SELECTCASE RAND:4
				CASE 0
					PRINTFORMDL %CALLNAME:MASTER%把映姬的额头出的\@ DAY:2 == 2 ? 湿透了 # 薄薄的 \@香汗擦干了
					PRINTFORMW
					CALL HPH_PRINT, @"「呃っ…HPH　%K30_C_NAME(MASTER)%、谢谢…HPH」", "L"
					CALL HPH_PRINT, @"「身体…\@ DAY:2 == 2 ? 已经，很烫了…很厉害 # 热乎乎的 \@…HPH」", "W"
				CASE 1
					PRINTFORMDL %CALLNAME:MASTER%拥抱映姬的肩膀
					PRINTFORMW
					CALL HPH_PRINT, @"「んんっ、%K30_C_NAME(MASTER)%…HPH」", "L"
					PRINTFORMDW 映姬像是把身体倚靠在了%CALLNAME:MASTER%…
					PRINTFORML 「稍微的，给我一点时间…拜托了…」
					CALL HPH_PRINT, "「太过，舒服了…要倒下了…HPH」", "W"
				CASE 2
					PRINTFORMDL %CALLNAME:MASTER%靠近的时候，映姬那边抱住了手臂
					PRINTFORMW
					CALL HPH_PRINT, "「稍微，这样做也没关系吗…HPH」", "W"
					CALL HPH_PRINT, "「んっ…HPH　比想象的还要难走，是吧…这里…HPH」", "W"
				CASE 3
					PRINTFORMDL %CALLNAME:MASTER%和映姬手牵手
					PRINTFORMW
					CALL HPH_PRINT, "「嗯，总觉得…安心、能行…HPH」", "L"
					CALL HPH_PRINT, "「现在，摔倒了…这样的话，就麻烦了…所以HPH」", "W"
			ENDSELECT
		;恋人
		ELSEIF TALENT:恋人
			IF K30_DRUNK() > 1
				PRINTFORML 「%K30_C_NAME(MASTER)%～、做这样的事，大家都在看哦～♥」
				PRINTFORMW 「啊,还是说～是故意给别人看呢～？」
				PRINTFORMW 「嗯呼呼，我也是啊～♥」
			ELSEIF K30_CHECK_HEN_T()
				IF RAND:2 == 1
					PRINTFORMDL %CALLNAME:MASTER%抱着映姬的肩膀，把身体靠在她身边
					PRINTFORMW 「就这样，就这样……不能正视大家的脸…」
				ELSE
					PRINTFORMDL %CALLNAME:MASTER%和映姬手牵手
					PRINTFORMW 「………………」
					PRINTFORMDW 映姬什么都没说%CALLNAME:MASTER%的手紧紧地握着
				ENDIF
			ELSEIF TFLAG:193 == 1
				PRINTFORMDL 从映姬那边积极地抱了过来…
				PRINTFORMW 「呼呼,偶尔也得回一下礼吧？」
				PRINTFORMW 「和相爱之人之间和睦相处」
				PRINTFORMW 「也是一件了不起的善行哦」
			ELSEIF TFLAG:193 == -1
				PRINTFORMW 「……抱歉,果然…还是有些不好意思…不要…看着我的脸…」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMDW %CALLNAME:MASTER%抚摸着映姬的头发
						PRINTFORMW 「……呼呼呼♥」
					CASE 1
						PRINTFORMDW %CALLNAME:MASTER%像牵起恋人一样拉起了映姬的手
						PRINTFORMW 「这个…太不好意思了……但是……别停…♥」
					CASE 2
						PRINTFORMDW 映姫挽着%CALLNAME:MASTER%的胳膊
						PRINTFORMW 「呐,也去那边看看吧！」
						PRINTFORMDW 映姫十分欢闹
				ENDSELECT
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			IF K30_DRUNK() > 1
				PRINTFORMW 「%K30_C_NAME(MASTER)%、啾的～能给我吗？　啾的～って♥」
				PRINTFORMW 「诶嘿嘿ふっ、那么，我也～嗯啾～っ♥」
				PRINTFORMDW 映姫抱了回来…
			ELSEIF K30_CHECK_HEN_T()
				IF RAND:2 == 1
					PRINTFORMDL %CALLNAME:MASTER%虽然抱着映姬的肩膀，但因为紧张身体僵硬
					PRINTFORMW 「啊、呜……怎么办才好呢，不知道…」
				ELSE
					PRINTFORMDL %CALLNAME:MASTER%和映姬手牵手
					PRINTFORMW 「………………」
					PRINTFORMDW 或许是因为脸红，映姬的手比平时更凉丝丝
				ENDIF
			ELSEIF TFLAG:193 == 1
				PRINTFORMDL 难得映姬主动的拥抱了我
				PRINTFORMW 「呼呼,就算是我也能做到这种事的」
				SIF TALENT:MASTER:恋人
					PRINTFORMW （所以只有现在,只把我当作恋人…）
			ELSEIF TFLAG:193 == -1
			PRINTFORMW 「……抱歉,果然…还是有些不好意思…不要…看着我的脸…」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMDL %CALLNAME:MASTER%抚摸着映姬的头发
						PRINTFORMW 「呼呼、果然还是很在意？这个发型」
						PRINTFORMW 「我倒是挺中意的」
					CASE 1
						PRINTFORMDW %CALLNAME:MASTER%像牵起恋人一样拉起了映姬的手
						PRINTFORMW 「这样…还真是…相当让人不好意思呐…」
					CASE 2
						PRINTFORMDW 映姫挽着%CALLNAME:MASTER%的胳膊
						PRINTFORMW 「……就这样走到对面去吧」
				ENDSELECT
			ENDIF
		;思慕
		ELSEIF TALENT:思慕
			IF K30_DRUNK() > 1
				PRINTFORML 「%K30_C_NAME(MASTER)%、今天特别哟～」
				PRINTFORMW 「来吧,把头放这在吧！」
				PRINTFORML 「嗯呼呼呼♪　…好孩子，好孩子…」
				PRINTFORMDW 映姬不知为何抚摸着%CALLNAME:MASTER%的头…
			ELSEIF K30_CHECK_HEN_T()
				IF RAND:2 == 1
					PRINTFORML 「！！！」
					PRINTFORMDW %CALLNAME:MASTER%向映姬伸出手，映姬却跳了起来。
					PRINTFORMW 「今天，这样的事，不停止吗……」
				ELSE
					PRINTFORML 「呀！！」
					PRINTFORMDW %CALLNAME:MASTER%が我伸手摸了摸映姬的肩膀，她惊叫了一声
					PRINTFORMW 「啊，那个……对不起，吓了我一跳…」
					IF K30_BE_SEEN()
						PRINTFORMDL ……多亏如此，吸引了众人的目光，映姬的身体陷入了挣扎。
						PRINTFORMW 「～～～～～！！」
					ENDIF
				ENDIF
			ELSEIF TFLAG:193 == 1
				PRINTFORMW 「真拿你没办法呐。那就只有现在哦」
			ELSEIF TFLAG:193 == -1
				PRINTFORMW 「……再亲密的朋友也得有一定的礼貌」
			ELSE
				SELECTCASE  RAND:3
					CASE 0
						PRINTFORMW 「你不在意别人的目光吗？」
					CASE 1
						PRINTFORMW 「这样,\@ DAY:2 == 2 ? 会更加热的难受的 #会变得更难走路的 \@…」
					CASE 2
						PRINTFORMW 「…你不管对谁……都会去做这种事吧？」
				ENDSELECT
			ENDIF
		ELSE
			IF K30_DRUNK() > 1
				PRINTFORML 「你,不仅想让我喝得酩酊大醉,还摸了上来」
				PRINTFORMW 「真是不得了的罪孽呐,必须得好好教育你才行」
			ELSEIF K30_CHECK_HEN_T()
				IF RAND:2 == 1
					PRINTFORML 「！！！」
					PRINTFORMDW %CALLNAME:MASTER%向映姬伸出手，映姬却跳了起来。
					PRINTFORMDW 「今天，请不要做，这样的事……」
				ELSE
					PRINTFORML 「呀！！」
					PRINTFORMDW %CALLNAME:MASTER%が我伸手摸了摸映姬的肩膀，她惊叫了一声
					PRINTFORMW 「啊，那个……对不起，吓了我一跳…」
					IF K30_BE_SEEN()
						PRINTFORMDL ……多亏如此，吸引了众人的目光，映姬的身体陷入了挣扎。
						PRINTFORMW 「～～～～～！！」
					ENDIF
				ENDIF
			ELSEIF TFLAG:193 == 1
				PRINTFORMW 「这样粘过来…那个…」
				PRINTFORML 「不是…我是想说…那个…」
				PRINTFORMW 「要是被别人看到的话…很不好意思的…」
			ELSEIF TFLAG:193 == -1
				PRINTFORMW 「………要把握分寸」
			ELSE
				IF RAND:2 == 0
					PRINTFORML 「哈啊…。那么这一次…」
					PRINTFORMW 「…这样满足了吗？」
				ELSE
					PRINTFORMW 「……还是…不太习惯这样的事……」
				ENDIF
			ENDIF
		ENDIF
	ELSE
		;恋人
		IF TALENT:恋人
			;浴場
			;構文構成小町口上からお借りして、内容も露骨に小町口上に寄せていってます
			IF BATHROOM(CFLAG:現在位置)
				IF K30_DRUNK() > 1
				;MASTER、映姫、小町の3人
				ELSEIF K30_FIND_AROUND() == 76
					;こまえーき丼もぐもぐしてたら、三人仲良く
					IF GET_UWAKI_HISTORY(30, 76) == 2 && RAND:2 == 1
						PRINTFORMDL 三个人并排泡在浴池里，无论如何都很在意被赤裸裸地压着的大胸部。
						PRINTFORMDW 过了一会儿，甚至有手伸出来抚摸%CALLNAME:MASTER%的阴茎
						PRINTFORMDL 看着手伸出来的方向，小町咧嘴笑着递了个眼色…
						PRINTFORMDW 偷瞄映姬的明眸，就是说，%CALLNAME:MASTER%的表情看起来很有趣
						CLEARLINE 2
						PRINTFORML
						PRINTFORMW  「…两个人，都觉得不会被发现吗？」
						PRINTFORML
						PRINTFORMDW 与小町二人吃惊的蹦起来那样不同，映姬接着的声音意外地平静
						PRINTFORML 「虽然有点恶作剧太过分了，不过，暂且宽恕吧」
						PRINTFORMW 「小町，还有你也是，%K30_C_NAME(MASTER)%有多花心，我已经明白了」
						PRINTFORMW 「……%K30_C_NAME(MASTER)%と、做的是……非常舒服的事情」
						PRINTFORML 「不过，现在不要想这些，一起享受泡澡吧？」
						PRINTFORMW 「和重要的人一起悠闲度过的时间，是非常宝贵而难得的…」
						PRINTFORMDW %CALLNAME:MASTER%和小町反省了一下，决定在映姬所说的街道上享受风吕之乐趣
						PRINTFORMDW 非常幸福的时光流逝了
					ELSE
						;恋人なら部下の前でもいちゃいちゃ
						SELECTCASE RAND:3
							CASE 0
								PRINTFORMDL %CALLNAME:MASTER%让映姬帮忙搓背了
								PRINTFORMW
								PRINTFORML 「%K30_C_NAME(MASTER)%、我来给您搓背吧……♪」
								PRINTFORMW 「诶!?之前也是，在这里…?小町，看到了哦……」
								PRINTFORMW 「无论如何，是吗?……我明白了。那么…」
								PRINTFORMDW 映姬的手指细心地清洗了重要的地方…
							CASE 1
								PRINTFORMDL %CALLNAME:MASTER%为映姬擦背
								PRINTFORMW
								PRINTFORML 「%K30_C_NAME(MASTER)%、虽然能帮我搓背很好…」
								PRINTFORMW 「动作，很下流，哇……虽然不是不喜欢，但是…」
								PRINTFORMW 「啊……嗯♥ ……到那种程度…♥」
								PRINTFORMW 「…小町，嘻嘻哈哈地，不要笑！」
							CASE 2
								PRINTFORML 「%K30_C_NAME(MASTER)%、好不容易来一次，我也给你洗头吧」
								PRINTFORMW 「那么，请躺在这里睡觉…♥」
								PRINTFORMDL 也不介意小町似乎想说些什么似的看着，映姬用手指着她的膝枕
								PRINTFORMDW 就这样确定把头埋在映姬的胯间，让她洗头发。
								PRINTFORMDW …非常舒服的说
						ENDSELECT
					ENDIF
				;成功
				ELSEIF TFLAG:193 == 1
					PRINTFORMDL 用淋浴给映姬洗了重要的地方
					PRINTFORMW
					PRINTFORMW 「这个…好厉害，非常……不好意思…」
					PRINTFORMDL 大腿张開的映姫露出了美丽的%SLIT(30)%，用强力的淋浴头冲洗…
					PRINTFORMW 「嗯っ♥　小穴、噫…对了……呀啊♥」
					PRINTFORMDW 每次改变淋浴的位置和强度，映姬身体都会性奋得蹦扭…
				;失敗
				ELSEIF TFLAG:193 == -1
					PRINTFORMDL %CALLNAME:MASTER%为映姬擦背
					PRINTFORMW
					PRINTFORMW 「啊!讨厌…动作真恶心」
					PRINTFORMDW 被映姬狠狠地打了一下手…
				;標準
				ELSE
					IF RAND:2 == 0
						PRINTFORMDL 用香皂打满泡沫，用手直接洗了映姬的身体
						PRINTFORMW
						PRINTFORMW 「等一下…这个，快要撩上火了…♥」
					ELSE
						PRINTFORMDL %CALLNAME:MASTER%让映姬帮忙搓背了
						PRINTFORMW
						PRINTFORMW 「呀啊……擦背可不是这么擦的吧」
						PRINTFORMW 「啊ぅぅ♥　你在摸哪里啊，真是……♥」
					ENDIF
				ENDIF
			ELSEIF K30_CHECK_HEN_T()
				;失敗
				IF TFLAG:193 == -1
					PRINTFORML 「现在没有那种心情…」
					PRINTFORMW 「对不起…」
					PRINTFORMDW 映姫轻轻地离開了%CALLNAME:MASTER%的身边
				;標準
				ELSE
					IF RAND:2 == 0
						PRINTFORMDL 把手搭在映姬的肩上，她就这样把身体靠了过来…
						PRINTFORMW 「这个样子总觉得有点不安…」
						PRINTFORMW 「暂时保持这样…一会…」
					ELSE
						PRINTFORMDL 一握住映姬的手，就被紧紧握了回来
						PRINTFORMW 「不要放開哦……」
					ENDIF
				ENDIF
			ELSE
				;成功
				IF K30_DRUNK() > 1
					PRINTFORMW 「%K30_C_NAME(MASTER)%～、这样做的话，会被看到的哦～っ♥」
					PRINTFORMW 「啊,还是说～是故意给别人看呢～？」
					PRINTFORMW 「嗯呼呼，我也是啊～♥」
				ELSEIF TFLAG:193 == 1
					PRINTFORMW 「唔……」
					PRINTFORMDW 映姬从后面一把抱住，脸就埋在了背上
					PRINTFORMW 「就这样……稍微保持一会吧…」
				;失敗
				ELSEIF TFLAG:193 == -1
					PRINTFORMDW 映姫对%CALLNAME:MASTER%轻轻地按住了
					PRINTFORMW 「……再亲密的朋友也得有一定的礼貌」
				;標準
				ELSE
					SELECTCASE RAND:3
						CASE 0
							PRINTFORMDL %CALLNAME:MASTER%给映姬揉着肩膀
							PRINTFORML 「最近肩酸也减少了」
							PRINTFORMW
							PRINTFORMW 「嗯？　不，工作量没有那么减少」
							PRINTFORMW 「那个,你看,因为不是有个连身体的各个角落都…给我按摩放松的人么…」
						CASE 1
							PRINTFORMDL %CALLNAME:MASTER%触碰着映姬的头发
							PRINTFORMW 「注意到了吗?比以前更注重保养了」
						CASE 2
							PRINTFORMDL %CALLNAME:MASTER%戳了戳映姬的侧腹
							PRINTFORMW 「咔呀！ 真是的，突然要做什么呢……」
							PRINTFORMW 「不要说什么可,可爱的反应……」
					ENDSELECT
				ENDIF
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			;浴場
			;がっつり小町口上参照してます。入浴条件覚書もとても参考成为了。ありがとうございます
			IF BATHROOM(CFLAG:現在位置)
				IF K30_DRUNK() > 1
				ELSEIF K30_FIND_AROUND() == 76
					IF TALENT:76:恋人
						;この辺は線引きする。映姫様は公明正大な方
						SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「希望你能给我搓背…这么说…可以吗？」
								PRINTFORMW 「小町明明是那样看着的……不是很可怜吗…」
							CASE 1
								PRINTFORML 「如果要冲身体的话……这里应该拜托小町」
								PRINTFORMW 「因为是恋人，所以不诚实是不好的…」
							CASE 2
								PRINTFORML 「洗我的身体…现在不用了」
								PRINTFORMW 「我来替你搓背…」
						ENDSELECT
						PRINTFORMDW 小町目不转睛地瞪着我，映姬帮我洗了背…
					ELSEIF TALENT:76:恋慕
						;両方恋慕なら鞘当てが始まる
						PRINTFORML 「小町，你什么时候才能上来呢」
						PRINTFORMW 「诶？我不认为一直偷懒的你需要那么长时间的热水」
						PRINTFORMW 「…不能置之不理啊。『和四季sama不同，肩膀容易酸痛』是什么意思呢？」
						PRINTFORMDL %CALLNAME:MASTER%被映姬和小町夹在中间展開舌战…
						PRINTFORMDL 压到双臂的大小胸部竞相推挤，尽管处于这种的最棒状况
						PRINTFORMDW %CALLNAME:MASTER%却完全不能放松
					ELSE
						;対抗意識がないと恥じらう
						PRINTFORMDL 在手上打起肥皂泡，像抚摸映姬一样细心地洗了一下…
						PRINTFORMW
						PRINTFORMW 「在那个孩子面前，这个……不好意思…嗯♥」
						PRINTFORMW 「不行，不行!……这么奇怪的清洗手法……嗯嗯♥」
					ENDIF
				ELSEIF TFLAG:193 == 1
					PRINTFORMDL %CALLNAME:MASTER%让映姬帮忙搓背了
					PRINTFORMW
					PRINTFORML 「%K30_C_NAME(MASTER)%、机会难得，我也给你洗头哦」
					PRINTFORMW 「呼呼呼っ♪　……怎么样？有什么痒的地方吗？」
					PRINTFORMDW 映姬比平时更细心地照顾我
				ELSEIF TFLAG:193 == -1
					PRINTFORMDL %CALLNAME:MASTER%为映姬擦背
					PRINTFORMW
					PRINTFORMW 「我一…一个人…也可以洗的！」
					PRINTFORMDW 被映姬狠狠地打了一下手
				ELSE
					PRINTFORMDL %CALLNAME:MASTER%为映姬擦背
					PRINTFORMW
					IF RAND:2 == 0
						PRINTFORML 「这样,好,好痒啊」
						PRINTFORMW 「如果摸到奇怪的地方…不行的！」
					ELSE
						PRINTFORMW 「前，前面的就算了!可以自己洗！！」
					ENDIF
				ENDIF
			ELSEIF K30_CHECK_HEN_T()
				;失敗
				IF TFLAG:193 == -1
					PRINTFORMDL 向映姬伸出手，一下子就被拉開了距离…
					PRINTFORML 「啊…那个，嗯…」
					PRINTFORMW 「那个，不好意思…今天是稍微的…」
				;標準
				ELSE
					IF RAND:2 == 1
						PRINTFORMDL 虽然搂着映姬的肩膀，但因为紧张身体好像很僵硬。
						PRINTFORMW 「啊、呜……怎么办才好呢，不知道…」
					ELSE
						PRINTFORMDL %CALLNAME:MASTER%和映姬手牵手
						PRINTFORMW 「………………」
						PRINTFORMDW 或许是因为脸红，映姬的手比平时更凉丝丝
					ENDIF
				ENDIF
			ELSE
				IF K30_DRUNK() > 1
					PRINTFORMW 「%K30_C_NAME(MASTER)%、啾的～能给我吗？　啾的～って♥」
					PRINTFORMW 「诶嘿嘿ふっ、那么，我也～嗯啾～っ♥」
					PRINTFORMDW 映姫抱了回来…
				;失敗
				ELSEIF TFLAG:193 == -1
					PRINTFORMW 「……再亲密的朋友也得有一定的礼貌」
				;成功
				ELSEIF TFLAG:193 == 1
					PRINTFORMDW %CALLNAME:MASTER%抚摸着映姬的脸颊
					PRINTFORMW 「那,那个……很不好意思的…要……做什么…」
				ELSE
					SELECTCASE RAND:3
						CASE 0
							PRINTFORMDW 映姫肩膀微微颤抖着,过了一会就老实下来被抚摸着。
						CASE 1
							PRINTFORMW 「简直就像恋人一样呢…」
							PRINTFORMW （\@ TALENT:MASTER:恋人 ? 但是，你已经和%K30_C_NAME(TALENT:MASTER:恋人)%… # 难道…我…？　 \@）
						CASE 2
							PRINTFORMDL %CALLNAME:MASTER%给映姬揉了揉肩膀
							PRINTFORMDW 也许是工作过于疲劳吧,映姬的肩膀似乎酸痛得厉害
							PRINTFORMW 「…最近需要想的事情变多了…」
							PRINTFORMDW 只说了一句话，之后就沉默了
					ENDSELECT
				ENDIF
			ENDIF
		;思慕
		ELSEIF TALENT:思慕
			IF K30_DRUNK() > 1
				PRINTFORML 「%K30_C_NAME(MASTER)%、今天特别哟～」
				PRINTFORMW 「来吧,把头放这在吧！」
				PRINTFORML 「嗯呼呼呼♪　…好孩子，好孩子…」
				PRINTFORMDW 映姬不知为何抚摸着%CALLNAME:MASTER%的头…
			ELSEIF K30_CHECK_HEN_T()
				;失敗
				IF TFLAG:193 == -1
					PRINTFORMDL 向映姬伸出手，一下子就被拉開了距离…
					PRINTFORML 「请停止…」
					PRINTFORMW 「我今天不想陪你。」
				;標準
				ELSE
					IF RAND:2 == 0
						PRINTFORMDL 摸了摸映姬裸露的肩膀
						PRINTFORML 「呀！？」
						PRINTFORMW 「啊，那个……想做什么呢…」
					ELSE
						PRINTFORMDL 一握住映姬的手，她就被吓了一跳。
						PRINTFORML 「ひっ！？　…」
						PRINTFORMW 「别吓我…」
					ENDIF
				ENDIF
			ELSEIF TFLAG:193 == -1
				PRINTFORML 「你能搞清亲近和亲密的区别么？」
				PRINTFORMW 「直说了,我有点很不開心」
				CALL K30_LECTURE_CHECK(24 + RAND:10, 1)
			ELSEIF TFLAG:193 == 1
				PRINTFORMDL 出其不意地捉弄了一下映姬
				PRINTFORMW 「诶？等…等等…呼呼…好,好痒呀…呀哈哈…」
				PRINTFORMW 「…………把,把刚才,忘掉吧…」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「開心吗………看起来很開心呢………」
						PRINTFORMDW 映姬虽然很吃惊，但没有摆脱的样子
					CASE 1
						PRINTFORMDL %CALLNAME:MASTER%试着握住映姬的手
						PRINTFORMW 「嗯,只是这种程度的话…」
					CASE 2
						PRINTFORMW 「呀啊……我说,你在干什么啊！」
						PRINTFORMDL 映姬用悔悟棒啪嚓啪嚓地敲过来
						PRINTFORMDW 因为什么都没写，所以不痛
				ENDSELECT
			ENDIF
		;陥落無
		ELSE
			IF K30_DRUNK() > 1
				PRINTFORML 「你,不仅想让我喝得酩酊大醉,还摸了上来」
				PRINTFORMW 「真是不得了的罪孽呐,必须得好好教育你才行」
			ELSEIF K30_CHECK_HEN_T()
				;失敗
				IF TFLAG:193 == -1
					PRINTFORMDL 还没伸手去靠到映姬，就被拉開了距离…
					PRINTFORML 「请停止…」
					PRINTFORMW 「今天我不想陪你。」
				;標準
				ELSE
					IF RAND:2 == 0
						PRINTFORMDL 摸了摸映姬裸露的肩膀
						PRINTFORMW 「呀！？」
						PRINTFORML 「不行…请停下来…」
						PRINTFORMDW 映姬用比平时更慌张的样子躲開了%CALLNAME:MASTER%的手
					ELSE
						PRINTFORMDL 一握住映姬的手，她就被吓了一跳。
						PRINTFORML 「ひっ！？」
						PRINTFORMW 「别吓我…」
					ENDIF
				ENDIF
			ELSEIF TFLAG:193 == -1
				PRINTFORMDL 被悔悟棒打了一巴掌
				PRINTFORML 「虽然我也不会否定欲望本身的存在」
				PRINTFORMW 「但…」
				PRINTFORMW 「屈服欲望而行可是大罪」
				CALL K30_LECTURE_CHECK(29 + RAND:10, 1)
			ELSEIF TFLAG:193 == 1
				PRINTFORMW 「要是阎魔不变得平易近人一些,以后也很不好办吧」
				PRINTFORMW 「…真没办法。就稍微允许你一下下吧」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「…你满足了么？」
						PRINTFORMDW 映姬即使被%CALLNAME:MASTER%握住手也没有什么反应
					CASE 1
						PRINTFORMDW %CALLNAME:MASTER%本来想抱抱映姬的肩膀,但是突然被拉開了距离……
					CASE 2
						PRINTFORMW 「企图对阎魔做这种事,罪可会不轻哦」
						PRINTFORMW 「而且,这样可是会给我留下很差的印象,听到了么？」
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,道歉
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_303
;成否判定＠閻魔様は徳が高いのできちんと謝れば許してくれる(=1/2で強制成功)
;點心盒も返してくれる。ただし私情が交じる(思慕がつく)と通常になる
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
IF  !TALENT:恋慕 && !TALENT:思慕 && RAND:2 == 1 && MARK:30:反発刻印 == 1
	TFLAG:192 = 1
ELSE
	TFLAG:192 = 0
ENDIF
@M_KOJO_MESSAGE_COM_K30_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 2, 1
			;道歉ようなことをしたフラグ
			TCVAR:30:372 = 0
			PRINTFORML 「我知道了。就接受你的谢罪吧」
			PRINTFORML 「毕竟不能说什么『绝不饶恕罪犯』之类的话」
			PRINTFORMW 「那谁也活不下去了」
			PRINTFORML 「好好反省你的罪过,多多积善来弥补你的罪责吧」
			PRINTFORML 「这才是谢罪时的最佳表现」
			PRINTFORMW 「明白了么？」
			IF TFLAG:193 == 2
				PRINTFORML
				PRINTFORML 「…还有,这个点心盒」
				IF TALENT:恋慕 || TALENT:思慕
					PRINTFORML 「就让我们两个人一起来吃吧？」
					PRINTFORMW 「另外,也可以边吃边说」
					PRINTFORML 「关于对我的%TEXTR("反省/誠意/善行/謝罪")%，会好好教你的」
					PRINTFORMW 「要好好听着哦」
					PRINTFORMDW …被好好地教训了一顿
				ELSE
					PRINTFORML 「我不能接受。还给你吧」
					PRINTFORMW 「要是被别人说阎魔一盒礼物被搞定了,那可就不好了」
					ITEM:點心盒 ++
				ENDIF
			ENDIF
		CASE 0
			TCVAR:30:372 = 0
			PRINTFORML 「坦率道歉是需要勇气的」
			PRINTFORML 「道歉这种行为本身也可以算作善行」
			PRINTFORMW 「这次就看在这一点的份上原谅你吧」
			PRINTFORML 「重要的是不要再犯同样的错」
			PRINTFORML 「请不要再做那种事了」
			PRINTFORMW 「明白了么？」
		CASEELSE
			IF MARK:30:反発刻印 >= 2
				PRINTFORML 「你的所作所为已经超越了我忍耐极限」
				PRINTFORML 「谢罪不只是用言语而是要用行动来表示」
				PRINTFORMW 「到底怎样做才好？这是你该思考的事情」
			ELSEIF TALENT:恋慕 || TALENT:思慕
				PRINTFORML 「………………………………」
				PRINTFORMW 「……我很为难」
				PRINTFORML 「虽然这不是阎魔该说的话」
				PRINTFORMW 「虽然你的罪责已经消除了」
				PRINTFORML 「但我感觉还不能原谅你」
				PRINTFORML 「得好好分清黑白是非」
				PRINTFORMW 「可以稍微…腾出些时间吗…」
			ELSE
				PRINTFORML 「虽然你想请求原谅,但诚意还是不够」
				PRINTFORMW 「我现在无法受你的謝罪」
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;304,幫忙干活
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:沒法幫忙(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_SUCCESS_COM_K30_304
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0
TFLAG:194 = BASE:30:工作量
@M_KOJO_MESSAGE_COM_K30_304
IF TFLAG:193 == -999
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_304_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
		SELECTCASE TIME
			;事務処理
			CASE 780 TO 1019
				PRINTFORMDL 尽管如此，我还是想着能不能帮上忙，把映姬手里的文件哗啦哗啦地翻了一下
				PRINTFORMDW 很遗憾，不是阎魔大人的判决就不行…
			;書類整理
			CASE IS > 1019
				PRINTFORMDL 实在不像是一般能完成的工作量…
				PRINTFORMDW %CALLNAME:MASTER%在冻结的时间里默默地整理文件
		ENDSELECT
	;口交抜き
	ELSEIF TFLAG:193 == -999
		PRINTFORMDL %CALLNAME:PLAYER%对%CALLNAME:TARGET%的工作进行帮助
		PRINTFORMDL 映姬总觉得心神不定，无法集中精力工作…
		PRINTFORMW
		PRINTFORML 「嗯…今天怎么也想不出个头绪来…」
		PRINTFORML 「明明还有很多要做的事情……真为难啊…」
		PRINTFORMDL 映姬似乎对燥热的身体很不适应
		PRINTFORMDW %CALLNAME:MASTER%建议映姬果断的『转换心情』
		PRINTFORML
		PRINTFORML 「……说那样的话，只是你，想做而已吧…？」
		PRINTFORML 「现在正在完成，重要的任务…所以…」
		PRINTFORMW 「即使…即使是%K30_C_NAME(MASTER)%的邀请…稍微…」
		PRINTFORMDL 原以为会被骂得狗血淋头，没想到反应还不错
		PRINTFORMDW %CALLNAME:MASTER%自己也忍受不了于是又鼓动了一下…
		PRINTFORML
		PRINTFORML 「和你相爱的话…就不知道下班的时候了…」
		PRINTFORMW 「真的现在……很为难…」
		PRINTFORML 「……但是，如果无论如何都要的话」
		PRINTFORML 「用嘴…一次，只有一次…那样的，可以的话…」
		PRINTFORMDW 映姬像是在给自己找借口一样嘟囔着的同时，在%CALLNAME:MASTER%的前面雌伏地跪下了…
		CALL K30_BLOW_JOB_IN_COURT
	;通常
	ELSE
		;日記フラグ
		SIF DIARY:30:9 == 0
			CALL K30_WRITE_DIARY(9)
		SELECTCASE TIME
			;事務処理
			CASE 780 TO 1019
				PRINTFORML 「%K30_C_NAME(MASTER)%，你会帮忙吧?」
				PRINTFORML 「非常感谢。真是帮了大忙」
				PRINTFORMW 「嗯嗯，因为有很多工作」
			;書類整理
			CASE IS > 1019
				IF BASE:30:工作量 > 0
					PRINTFORML 「那个……虽然有点抱歉…」
					PRINTFORML 「这段时间的工资可不够给？」
					PRINTFORMW 「如果可以的话，能把这里的文件先整理一下吗」
				ELSE
					PRINTFORML 「对不起。连最后的善后工作都做了」
					PRINTFORML 「真的非常感激」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;305,索求膝枕
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:体型 > TALENT:体型 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:親密(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_SUCCESS_COM_K30_305
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:318 == 1
		PRINTFORMW 「……感觉快要忍到极限了」
	ELSEIF TFLAG:193 == -5
	ELSEIF TALENT:TARGET:妊娠
		IF CFLAG:身に覚え_母 == 1 && !CFLAG:無自覚妊娠 && TALENT:恋慕
			IF CFLAG:妊娠経過日数 >= 25 && RAND:2 == 1
				IF RAND:2 == 1
					PRINTFORML 「呼呼呼っ、就算耳朵不贴着，也能感觉出来它很有活力」
					PRINTFORML 「…啊、痛，有点…今天，真的很精神…」
					PRINTFORMW 「想早点见到爸爸吗？」
				ELSE
					PRINTFORML 「不仅仅是听，还跟这个孩子搭话？」
					PRINTFORMW 「也要好好记住爸爸的声音」
				ENDIF
			ELSEIF CFLAG:TARGET:妊娠経過日数 >= 20
				IF RAND:2 == 1
					PRINTFORML 「%K30_C_NAME(MASTER)%…贴着耳朵，温柔地拍着肚子？」
					PRINTFORMDW %CALLNAME:MASTER%试着照说的做
					PRINTFORMDW 映姬的肚子里传来了“卟工”的一声反应…
					PRINTFORMW 「怎么样，明白了吗？这孩子好好地给我回信了…♥」
				ELSE
					PRINTFORML 「嗯っ？　感觉没怎么动？」
					PRINTFORML 「这孩子也正好是睡觉的时间呢」
					PRINTFORMW 「呼呼っ、就这样三个人悠闲地度过吧…♥」
				ENDIF
			ELSEIF CFLAG:TARGET:妊娠経過日数 >= 15
				IF RAND:2 == 1
					PRINTFORML 「安静地躺着的时候，会感觉到这个孩子在动」
					PRINTFORMW 「无法传达给你，总觉得很着急呢…」
				ELSE
					PRINTFORMDW 映姬的肚子里确实有传来声音…？
					PRINTFORML 「啊っ…现在，响起的声音是…那个…」
					PRINTFORMW 「孕吐也治好了，食欲也恢复了…」
					IF TIME_PROGRESS(TCVAR:30:空腹時刻) <= 0
						PRINTFORML 「刚才……吃了很多，肚子好像咕噜咕噜的…」
					ELSE
						PRINTFORML 「非常，肚子饿了…肚子好像响了，看…」
					ENDIF
					PRINTFORMW 「被这样问，真不好意思…」
				ENDIF
			ELSEIF CFLAG:TARGET:妊娠経過日数 >= 10
				IF RAND:2 == 1
					PRINTFORML 「最近，有时候肚子会咕噜咕噜叫」
					PRINTFORMW 「如果被问到的话，会有点不好意思…」
				ELSE
					PRINTFORML 「我啊，还没有从这个孩子那里听到过什么呢」
					PRINTFORML 「明明很清楚你在这里」
					PRINTFORMW 「真希望能快点告诉我啊…」
				ENDIF
			ELSEIF CFLAG:TARGET:妊娠経過日数 >= 5
				IF RAND:2 == 1
					PRINTFORML 「呼呼呼っ、真性急啊」
					PRINTFORMW 「我也终于有了实感」
				ELSE
					PRINTFORML 「刚刚寄宿在这里的生命…」
					PRINTFORMW 「请好好守护他」
				ENDIF
			ENDIF
		ENDIF
	ELSEIF K30_DRUNK() > 1
	ELSEIF K30_CHECK_HEN_T() && !GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館, OMANEKIBEYA())
		IF ABL:親密 > 2
			PRINTFORMDW 被抚摸头的感觉和映姬的大腿很舒服…
			PRINTFORML 「…………」
			IF ABL:TARGET:親密 > 5 && TALENT:心情 > -1
				PRINTFORMDW 沉默着用死了的眼睛窥视的映姬稍微变得可怕了
			ELSE
				PRINTFORMDW 从刚才開始，一言不发的映姬有点怜悯的样子
			ENDIF
		ELSE
			PRINTDATAW
				DATAFORM 「…………」
				DATAFORM 「……有什么意义呢」
				DATAFORM 「心情好了的话，请把头挪開……」
				DATAFORM 「已经可以了吗……」
			ENDDATA
		ENDIF
	ELSE
		IF ABL:TARGET:親密 > 2
			IF TCVAR:30:364
				PRINTDATAD
					DATAFORM 从映姬升起的情欲的蜜香和甜甜气息
					DATAFORM 从大腿传来震动棒的震动和映姬压抑的喘息声
					DATAFORM 映姬无法忍受震动棒带来的快感，摇曳着身体。
				ENDDATA
				PRINTFORMDL 被吸引了注意力，%CALLNAME:MASTER%总觉得不安…
				PRINTFORMW
				STRDATA LOCALS
					DATAFORM 「啊呼…HPH」\n「对不……起，腰……任性的，动起来了…HPH」
					DATAFORM 「呼ーっHPH　呼ーっHPH　嗯嗯っ…HPH」\n「稍微，有点难啊……这个…」
					DATAFORM 「哔嗯HPH　讨厌…这个，不得了…」\n「坐的话，就深深…进来……响啊嗯っHPH」
				ENDDATA
				CALL HPH_PRINT, LOCALS, "W"
			ELSEIF TALENT:恋人
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMDL 突然想到，%CALLNAME:MASTER%试着趴着看
						PRINTFORMDW 映姬的香甜气息扑鼻而来……
						SIF PALAM:潤滑 > PALAMLV:2
							PRINTFORMDL 情欲之蜜所散发出的芳醇香气也令人十分沉醉……
						PRINTFORMW 「你，你在干什么！！因为害羞…别这样……」
					CASE 1
						PRINTFORMDL 突然抚摸着头的手停了下来，映姬转而抚摸着脖颈和耳边
						PRINTFORMW 「呼呼，怎么样…心情平静了吗?还是……♥」
					CASE 2
						PRINTFORML 「……看着心爱之人,我的内心也平静了下来」
						PRINTFORMDW 映姬脸上露出了难得一见的温柔笑容
				ENDSELECT
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「……这种姿势,要偶尔来听听一些过去的故事么？」
						PRINTFORMW 「嗯,那是我还是地藏菩萨的时候的事」
						PRINTFORMW 「说起来,那的确还是在和十王的各位见面之前………」
					CASE 1
						PRINTFORML 「嗯,偶尔娇惯你一会也不坏吧」
						PRINTFORMW 「……被撒娇的感觉也不错呢」
					CASE 2
						PRINTFORML 「居然向我寻求治愈,你还真是个奇怪的人」
						PRINTFORMW 「……我也没说不可以。要再这样坐一会么」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「……累了么？」
					CASE 1
						PRINTFORMW 「……嗯,偶尔娇惯你一会也没事吧」
					CASE 2
						PRINTFORMW 「……这种姿势的话,就无法从我说教下逃跑了吧？」
				ENDSELECT
			ENDIF
		ELSE
			IF K30_BE_SEEN()
				PRINTFORMW 「要被看到了,还是不要这样了吧……」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「……你也该差不多够了吧？」
					CASE 1
						PRINTFORMW （……好尴尬啊）
					CASE 2
						PRINTFORMW 「……有做这种事的必要么？」
				ENDSELECT
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;TFLAG:193(1=ABL:親密6以上かつ妊娠時 0=成功 -1=ABL:親密5以下)
;極口上構文参考にしています
;==================================================
@M_KOJO_MESSAGE_COM_K30_306
IF (((TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && TFLAG:193 == 0 ) || TCVAR:30:364) && SHIRAHU(30)
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF !SHIRAHU(30)
		RETURN 1
	;初回/
	IF FIRSTTIME(SELECTCOM)
		PRINTFORML 「你,如果不马上收回只手的话」
		PRINTFORMW 「马上连自己的肚子都摸不了了哦？」
		PRINTFORMDW 映姬甩開了%CALLNAME:MASTER%的手
	;リンパマッサージ(大嘘)
	ELSEIF NOWEX:Ｖ絶頂 && TALENT:恋慕
		IF TFLAG:193 == 1
			PRINTDATAL
				DATAFORM 「是的…对这孩子…对我…也要温柔…」\n「……啊嗯っ♥」
				DATAFORM 「吓我一跳，不行哟…♥」\n「温柔，温柔点啊…♥」
				DATALIST
					DATAFORM 「啊嗯…♥　这个孩子，也能理解吗…」
					DATAFORM 「爸爸和妈妈…非常要好的事情…♥」
				ENDLIST
			ENDDATA
		ELSE
			PRINTFORMDL %CALLNAME:MASTER%的手进一步向下延伸，重点抚摸突出的部分…
			PRINTDATAW
				DATAFORM 「等一下…！现在，在那里…被抚摸的话…」\n「刚才的那个，嘠……嗯啊♥」
				DATAFORM 「恰♥　手法、太下流了…」\n「啊！　不行，先停、一下…」
				DATAFORM 「摸、摸的地方…是不是太低了……hi嗯♥」\n「那里，现在…现在，不行…♥」
			ENDDATA
		ENDIF
	ELSEIF CFLAG:陪睡中
		IF TFLAG:193 == 1
			PRINTFORMW 「嗯……抚摸我，给我？　…高兴…♥」
		ELSEIF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && TFLAG:193 == 0
			PRINTFORMW 「嗯…在梦里也是…祈祷，不做不行…」
			PRINTFORMW 「小宝宝，真想要啊…」
		ELSE
			PRINTFORMW 「不要摸,那种地方…………」
		ENDIF
	ELSEIF CFLAG:318 == 1
		PRINTFORMW 「住手。把手拿開」
	ELSE
		SELECTCASE TFLAG:193
			CASE 1
				;合意と自覚ある妊娠のみ口上あり。かわいそうなのは抜けない
				IF CFLAG:身に覚え_母 == 1 && !CFLAG:無自覚妊娠 && TALENT:恋慕
					SELECTCASE GET_MAPID(GET_CHARAHOME(30))
						CASE 0
							LOCALS = 博麗神社的各位
						CASE 2
							LOCALS = 御阿礼之子和长屋的各位
						CASE 3
							LOCALS = 紅魔館的各位
						CASE 4
							LOCALS = 住在竹林里的诸位
						CASE 6
							LOCALS = 小町和久侘歌
						CASEELSE
							LOCALS = 周围的各位
					ENDSELECT
					IF K30_CHECK_HEN_T() && TALENT:心情 > -1
						PRINTFORMDL 只有谈到孩子的时候，映姬的美目才会恢复光芒…
						PRINTFORML
					ENDIF
					IF CFLAG:妊娠経過日数 >= 28
						SELECTCASE RAND:4
							CASE 0
								PRINTFORMW 「马上就要来见我们了…」
							CASE 1
								PRINTFORML 「什么时候出生都不奇怪」
								PRINTFORMW 「%LOCALS%也说什么时候都没关系」
								PRINTFORMW 「%K30_C_NAME(MASTER)%、生产的时候…能在我身边吗？」
							CASE 2
								PRINTFORML 「男孩和女孩的名字，两个都准备好了吧？」
								PRINTFORMW 「如果你临时起意想到一个奇怪的名字，我不会原谅你的」
							CASE 3
								PRINTFORML 「%K30_C_NAME(MASTER)%…我的胸部，虽然是这样」
								PRINTFORML 「你忍忍，\@ TALENT:母乳体質 == 1 ? 请 # 暂时 \@让我来保管」
								IF TALENT:母乳体質 == 1
									PRINTFORMW 「这是给孩子吃的饭，当然的啊」
								ELSE
									PRINTFORMW 「也不能把这孩子重要的饭拿走，没办法…」
								ENDIF
						ENDSELECT
					ELSEIF CFLAG:妊娠経過日数 >= 25
						SELECTCASE RAND:4
							CASE 0
								PRINTFORML 「说真的就在自己家里静养吧…是这样的时期，但我不能那样」
								PRINTFORMW 「不过没关系的。你知道我原来是地藏菩萨吧？」
								PRINTFORMW 「因为保佑孩子是本职的神明大人…我一定会庇佑这个宝宝」
							CASE 1
								PRINTFORML 「又踢又闹…是个非常调皮的孩子」
								PRINTFORMW 「所以没关系…绝对能健康地出生哦」
							CASE 2
								PRINTFORML 「自己的肚子大到这个地步\@ EXP:出産経験 ? 嗯、果然很辛苦啊 # 没想到啊 \@」
								PRINTFORML 「光是走路就很累…」
								PRINTFORMW 「但是，为了这个孩子……再忍耐一下就好了」
							CASE 3
								PRINTFORML 「我有了这样的肚子、真的很在意%LOCALS%」
								PRINTFORMW 「另外，也有兴致勃勃地来摸肚子的孩子，很有趣哦」
								PRINTFORMW 「…能得到大家的祝福，这个孩子和我都很幸福」
						ENDSELECT
					ELSEIF CFLAG:妊娠経過日数 >= 20
						SELECTCASE RAND:4
							CASE 0
								IF TALENT:母乳体質 == 1
									IF !(STRCOUNT(CSTR:30:0, "噴乳") || EXP:出産経験)
										PRINTFORML 「虽然肚子变得很显眼了…」
										PRINTFORML 「我的胸部也变得很紧绷」
										PRINTFORMW 「稍微……长大了哦。知道吗？」
									ELSE
										PRINTFORML 「迎接婴儿的准备，\@ EXP:出産経験 ? 不管做了多少次还是 # 都是些不懂的东西，真的 \@很辛苦」
										PRINTFORML 「但是，目前似乎还不用担心这个孩子不够吃」
										PRINTFORMW 「…胸部，竟然出那么多。 自己也有点吃惊」
									ENDIF
								ELSE
									PRINTFORML 「虽然肚子变得很显眼了…」
									PRINTFORML 「不只是这样」
									PRINTFORMW 「最近胸部的凸度好像又变好了」
									PRINTFORMW 「……………」
									PRINTFORML 「……在这个孩子出生之前我也很难敷衍」
									PRINTFORMW 「我的胸部给最爱的你…想让你喝一杯…♥」
								ENDIF
							CASE 1
								PRINTFORML 「！！　……现在，肚子…扑通、一声」
								PRINTFORMW 「啊…又，踢了…%K30_C_NAME(MASTER)%、现在…明白了？」
								PRINTFORMW 「呼呼呼、一定是在和爸爸打招呼哦」
							CASE 2
								PRINTFORML 「只要发出很大的声音，就会抖动」
								PRINTFORMW 「耳朵好像已经能听见了…」
								PRINTFORMW 「所以，要多多跟这个孩子搭话哦，爸爸…♥」
							CASE 3
								PRINTFORML 「这孩子的名字怎么办？ 什么样的名字好呢…」
								PRINTFORMW 「男孩子和女孩子两人份，从现在開始不得不考虑？」
								PRINTFORML 「如果是女孩子的话…也许想给她加上『姫』这个字…」
								PRINTFORMW 「如果是男孩…试着从『%CALLNAME:MASTER%』中取一个字？」
						ENDSELECT
					ELSEIF CFLAG:TARGET:妊娠経過日数 >= 15
						SELECTCASE RAND:4
							CASE 0
								PRINTFORML 「别担心，你看不到的时候也没关系」
								PRINTFORMW 「%LOCALS%对我也很关照…我都不好意思了」
								IF LOCALS == "小町和久侘歌"
									PRINTFORML 「特别是小町『不会让四季大人担心!』之类的话…」
									PRINTFORMW 「工作也比平时加倍努力」
									PRINTFORMW 「…虽然偷懒的频率只减少了一半」
								ENDIF
							CASE 1
								PRINTFORML 「从外观上看，%K30_C_NAME(MASTER)%也会有真实感吗？」
								PRINTFORMW 「是啊。你和我的孩子，现在就在这里…」
							CASE 2
								PRINTFORML 「晚上躺着的时候…」
								PRINTFORMW 「从肚子里……能传达出啵通啵通的感觉」
								PRINTFORMW 「这个孩子好像会告诉我，她在这里哦，很好哦」
								PRINTFORMW 「非常…感到幸福…♥」
							CASE 3
								PRINTFORML 「…老实说，已经度过了担心的时期，松了一口气」
								PRINTFORMW 「在成为阎魔之前，真的看到了很多痛苦的离别和悲伤」
								PRINTFORMW 「……………」
								SIF GETBIT(CFLAG:1502, 3)
									PRINTFORML 「我也有不安的时候哦。 所以…」
								PRINTFORMW 「%K30_C_NAME(MASTER)%、请好好支持我，吶」
						ENDSELECT
					ELSEIF CFLAG:TARGET:妊娠経過日数 >= 10
						SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「我的孕吐没有那么严重…」
								PRINTFORMW 「这样的抚摸果然很安心」
								PRINTFORMW 「…请再坚持一会儿♥」
							CASE 1
								PRINTFORML 「即使这样摸，也不会长得那么大…」
								PRINTFORMW 「%K30_C_NAME(MASTER)%还很难理解吗」
								PRINTFORMW 「两个人的小宝宝，好好地在这里哦」
							CASE 2
								PRINTFORML 「呼呼…好好地抚摸，把你的想法也好好地传达给他」
								PRINTFORMW 「希望能茁壮成长…」
						ENDSELECT
					ELSEIF CFLAG:TARGET:妊娠経過日数 >= 5
						SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「是男孩还是女孩…」
								PRINTFORMW 「呼呼呼、很期待呢」
							CASE 1
								PRINTFORML 「%LOCALS%说我怀孕了，已经告诉你了哦」
								IF LOCALS == "小町和久侘歌"
									PRINTFORMW 「如果妨碍工作的话就不可避免了，这是理所当然的」
								ELSE
									PRINTFORMW 「也会给您添麻烦，这是理所当然的」
								ENDIF
								PRINTFORML 「接下来，其他人该怎么办呢」
								PRINTFORMW 「想说的，还是控制一下比较好……非常烦恼」
							CASE 2
								PRINTFORML 「…%K30_C_NAME(MASTER)%和我爱的结晶」
								PRINTFORMW 「好好地守护着等待着到来吧」
						ENDSELECT
					ENDIF
				ENDIF
			CASE 0
				IF TCVAR:30:364
					PRINTFORMDL %CALLNAME:MASTER%对\@ 充填率(30,1) > 30 ? 种了很多种子 # \@的映姬肚子抚摸着
					PRINTFORMDL 一停下手，就能清楚地感觉到从肚子传来的轻微振动…
					PRINTFORMW
					STRDATA LOCALS
						DATAFORM 「あっ…HPH　呀，讨厌…」\n「那个…总觉得，不好意思…要不要确认…」
						DATAFORM 「那个，那个……到底是很显眼哦…」
						DATAFORM 「啊HPH　不行啊…那里是…」\n「现在，变得非常…敏感…HPH」
					ENDDATA
					CALL HPH_PRINT, LOCALS, "W"
				ELSEIF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
					PRINTFORMDL %CALLNAME:MASTER%对\@ 充填率(30,1) > 30 ? 种了很多种子 # \@的映姬肚子抚摸着
					PRINTFORMDL 映姬将自己的手悄悄地交叠在%CALLNAME:MASTER%的手中
					PRINTFORMW
					IF 充填率(30, 1) && !TCVAR:口服避孕薬
						IF TCVAR:種付けられ自覚
							PRINTDATAW
								DATAFORM 「如果可以的话……就好了呢…♥」
								DATAFORM 「因为是你的种子…我想他应该很有精神吧」\n「…也许，现在，已经…在这里…♥」
								DATAFORM 「一起……拜托了，可以吗」\n「一定能做到吧…」
							ENDDATA
						ENDIF
					ELSE
						SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「\@ TALENT:妊娠願望 ? 总有一天 # 下次 \@这里有我们的宝宝…」
								PRINTFORMW 「一定，会来的吧」
							CASE 1
								PRINTFORML 「下次，再去祈祷吧」
								PRINTFORMW 「如果祈祷的话、\@ TALENT:妊娠願望 ? 总有一天一定… # 也许这次… \@」
							CASE 2
								PRINTFORML 「没错，这是我最重要的地方…」
								PRINTFORML 「一定\@ TALENT:妊娠願望 ? 总有一天 # 下次 \@赐予宝宝的重要场所」
								PRINTFORMW 「不温柔地对待我是不行的哟」
						ENDSELECT
					ENDIF
				ELSEIF 充填率(30, 3) >= 100
					PRINTFORML 「hiっ！！　不行！不行啊…」
					PRINTFORMW 「别碰那里…好难为情…」
					PRINTFORMDW 映姬像要遮住膨胀的肚子一样，甩開了%CALLNAME:MASTER%的手
				ELSEIF TALENT:恋慕 && !TFLAG:194
					IF K30_BE_SEEN()
						PRINTDATAW
						    DATAFORM 「不、不行...」\n「%K30_C_NAME(K30_FIND_AROUND(), 2)%在的话...不行的」
						    DATAFORM 「啊...嗯♪:红心:」\n「不行...那样抚摸的话」\n「%K30_C_NAME(K30_FIND_AROUND(), 2)%在旁边的话...我会忍不住的...♥」
						ENDDATA
						PRINTDATAW
						    DATAFORM 「...我们换个地方吧♥」
						    DATAFORM 「要到...更安静的地方,好吗...♥」
						ENDDATA
						ELSEIF 充填率(TARGET,1) > 30 && TCVAR:種付けられ自覚 && !K30_CREAMPIE()
						    PRINTDATAW
						        DATAFORM 「啊呜♪♥」\n「肚子里...暖暖的」\n「和您的抚摸一起...真舒服...♥」
						        DATAFORM 「呵呵...♥ 您灌注的种子...」\n「还留在里面...好多好多呢♥」
						        DATAFORM 「我最重要的地方」\n「被%K30_C_NAME(MASTER)%...填满了...」\n「您知道吗...♥」
						    ENDDATA
						ELSE
						    PRINTDATAW
						        DATAFORM 「是想逗我还是引诱我?」\n「%K30_C_NAME(MASTER)%真是的...」\n「好色呢...♥」
						        DATAFORM 「嗯...那种抚摸...」\n「真是...很淫乱呢...♥」
						        DATAFORM 「嗯嗯♪♥」\n「那样抚摸的话...」\n「会让我...很心痒的...♥」
						    ENDDATA
					ENDIF
				ELSE
					PRINTDATAL
						DATAFORM 「你你不要摸奇，奇怪的地方…」
						DATAFORM 「抚摸那样的地方的话…会被误解的哦」
						DATAFORM 「又没有什么特别的地方……什么意思呀这是」
					ENDDATA
					PRINTFORML 「总之先到这里吧…真难为情呀…」
					PRINTFORMDW 映姬抓住%CALLNAME:MASTER%的怪手从肚子上拿開了
				ENDIF
			CASE -1
				IF TALENT:心情 > -1
					PRINTDATAL
						DATAFORM 「……什么意思,是在表示我很胖的意思么？」
						DATAFORM 「欸っ…？？」\n「你、你在干什么！！」
						DATAFORM 「！！？」\n「喂喂，停，请停一下！」
					ENDDATA
					PRINTDATADW
						DATAFORM 映姬一脸嫌弃地拍掉了%CALLNAME:MASTER%的手
						DATAFORM 映姬用恐怖的眼神瞪过来…
					ENDDATA
				ELSE
					PRINTFORMW 「非要直接了当的告诉你不能这么做才可以么？」
					PRINTFORMW 「给我把怪手收回去」
					CALL K30_LECTURE_CHECK(27 + RAND:13, 1)
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;ほぼ性騷擾行為にわりと怒ったりする映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_306
SIF !SHIRAHU(30) || (NOWEX:30:Ｖ絶頂 && TALENT:30:恋慕) || CFLAG:30:陪睡中
	RETURN
SIF TFLAG:193 == 1 || TCVAR:30:364 || TALENT:30:妊娠願望 || GETBIT(CFLAG:30:1502, 4)
	RETURN
IF TALENT:30:恋慕
	TFLAG:194 = K30_PUSH_DOWN() > 100 ? 0 # 1
ELSE
	TFLAG:97 -= 3
	TFLAG:193 = -1
ENDIF
;==================================================
;307,捏臉蛋
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:恋慕(受け入れつつ笑顔でやり返す
	;ABL:親密(6以上=怯生生地やり返す
	;ABL:従順(5以上=されるがまま
;==================================================
@M_KOJO_SUCCESS_COM_K30_307
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_307
IF K30_CHECK_HEN_T() && !(FLAG:70 || CFLAG:睡眠 || TCVAR:烂醉 == 1)
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_307_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:睡眠 || TCVAR:烂醉 == 1
	;通常
	ELSEIF K30_CHECK_HEN_T()
		PRINTFORMDL %CALLNAME:PLAYER%把手伸到映姬的脸颊用手指捏…
		PRINTFORMDL 映姬面无表情让%CALLNAME:PLAYER%随心所欲……
		PRINTFORMW
		PRINTDATAW
			DATAFORM 「……心情好了吗?」
			DATAFORM 「……如果厌倦了，请放開手。」
			DATAFORM 「…………」
		ENDDATA
		PRINTFORMDW …感到抱歉的%CALLNAME:PLAYER%马上放手了
	ELSE
		SELECTCASE TFLAG:193
			CASE 0, 1
				IF TALENT:恋慕
					PRINTFORML 「嗯……我是阎王大人，　是很可怕的ー♪」
					PRINTFORMDW 被映姬柔软的手指回击着,感觉有点舒服…
				ELSEIF ABL:親密 > 5
					PRINTFORMW 「那个…这种时候还击回去就好了吧…」
				ELSEIF ABL:従順 >= 5
					PRINTFORMW 「真是的……就随你的便吧」
				ELSE
					PRINTFORML 「玩弄女性的脸颊可不太好哦」
					PRINTFORMDW 被映姬悄悄地舔了一下
				ENDIF
			CASE -1
				IF TALENT:恋慕
					PRINTFORML 「好了好了……」
					PRINTFORMDW 也许是时机不好吧,映姬似乎没什么兴致的样子
				ELSEIF ABL:親密 > 5
					PRINTFORML 「哈啊……真是的…」
					PRINTFORMDW 是不是因为有些烦躁呢,感觉语气有些带刺…
				ELSEIF ABL:従順 >= 5
					PRINTFORML 「…………」
					PRINTFORMDW 与其说是害羞，不如说是吃惊的表情。%CALLNAME:MASTER%马上放開了手
					CALL K30_LECTURE_CHECK(5 + RAND:35, 1)
				ELSE
					PRINTFORML 「保持良好的距离感,在交往的过程中可是很重要的」
					PRINTFORMW 「你误会什么了吗？」
					CALL K30_LECTURE_CHECK(15 + RAND:25, 1)
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;陪睡中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_308
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;309,摸頭
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:親密(6以上=通常成功時分岐
;==================================================
@M_KOJO_SUCCESS_COM_K30_309
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_309_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	ELSEIF CFLAG:30:睡眠 || TCVAR:烂醉 == 1
	ELSEIF CFLAG:30:ブチギレ
		PRINTFORMW 「……不要碰我」
	;初回
	ELSEIF FIRSTTIME(309)
		PRINTFORML 「……对别人的头上有什么特别在意的地方吗？」
		PRINTFORMW 「倒不如说我也很在意你的脑袋,应该说是里面的东西」
		PRINTFORML 「一定是有哪里不足」
		PRINTFORMW 「首先从那个罪的重量直接敲进去吧？」
		PRINTFORMDW 映姬把%CALLNAME:MASTER%的手伸出，握住了悔悟棒
	;通常
	ELSEIF CFLAG:陪睡中
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「想让你…摸摸头……」
			CASE 1
				PRINTFORMW 「嗯ー…嗯呼呼♪　……很舒服…」
			CASE 2
				PRINTFORML 「对待孩子吗?……嗯，那也可以吧……」
		ENDSELECT
	ELSEIF TALENT:恋人
		IF RAND:2 == 0
			PRINTFORMW 「……♥♥」
		ELSE
			PRINTFORMW 「这一侧也是…请摸摸…♥」
		ENDIF
	ELSEIF TALENT:恋慕
		IF TFLAG:193 > -1
			IF RAND:2 == 0
				PRINTFORMW 「………发型」
				PRINTFORMW 「…不要弄乱就好了…」
			ELSE
				PRINTFORMW 「再稍微一会,再稍微继续摸一会吧…」
			ENDIF
		ELSE
			PRINTFORMW 「再这样下去就关系到阎魔的威严了…」
		ENDIF
	ELSEIF ABL:30:親密 > 5
		IF TFLAG:193 > -1
			IF RAND:2 == 0
				PRINTFORMW 「………啊,帽子……」
			ELSE
				PRINTFORML 「…我又不是小孩子」
				PRINTFORML 「做这种事情我才不会高兴呢」
				PRINTFORMDW 映姫对%CALLNAME:MASTER%边遮住脸边说
			ENDIF
		ELSE
			PRINTFORMDW 映姬无言地推開%CALLNAME:MASTER%的手
			CALL K30_LECTURE_CHECK(10 + RAND:25, 1)
		ENDIF
	ELSE
		IF TFLAG:193 > -1
			PRINTFORML 「如果想摸头的话,不如去帮%TEXTR("妖怪伞/白泽")%的忙吧」
			PRINTFORMW 「既能工作挣钱,又能让孩子们高兴,还能得到雇主的感谢」
			PRINTFORMW 「比起做这样的事来,能积累更多的善行哦」
		ELSE
			PRINTFORMW 映姬无言地摊開手，瞪了%CALLNAME:MASTER%
			CALL K30_LECTURE_CHECK(20 + RAND:12, 1)
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;独自イベントっぽくする。薬プレイにハマる映姫様
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_331
;成否判定
;TFLAG:192(-2=強制失敗(注、非指令終了）、-1＝強制失敗、0=COM依存、1=強制成功or大成功(注、睡眠薬冰淇淋ティーは眠気を感じていると飲まない)
;イベント前提条件-周りに誰也不在、合意あり、恋慕で高信賴度、妊娠無、媚薬在庫2個以上、媚薬茶を用意、心情悪くなくて、反発0、一日一回、1日おき
IF K30_KIMESEKU() && K30_BE_SEEN() == 0  && TFLAG:131 == 41 && !TCVAR:30:379
	;後は口上とパラメータをいじって、薬盛る→えっちになる→推倒てくる、が自然な流れでつながる…かも
	IF !STRCOUNT(CSTR:30:0, "キメセク")
		PRINTFORMDL …如果再加些媚药，会不会更色情?…？
		CALL ASK_YN("试试看", "不，会暴露的吧")
	ELSE
		PRINTFORMDL 从以前的样子来看，或许…
		CALL ASK_YN("总之先加一下试试", "留着")
	ENDIF
	IF !RESULT
		PRINTFORMDL 又加了一剂春药…
		TFLAG:192 = -1
		TCVAR:30:379 = RAND:3 + 1
		SIF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
			TCVAR:30:379 = 4
		SIF !STRCOUNT(CSTR:30:0, "キメセク")
			TCVAR:30:379 = 5
		ITEM:41 --
	ELSE
		PRINTFORMDL 到底是自重了
		TFLAG:192 =0
	ENDIF
ELSE
	;前提満たさない、周りに誰かいれば通常どおり
	TFLAG:192 =0
ENDIF

@M_KOJO_MESSAGE_COM_K30_331
;TFLAG制御がうまくいかないので力技
IF TCVAR:30:379 > 0
	TFLAG:192 = -1
	TFLAG:193 = -1
	TCVAR:30:媚薬 = 0
ENDIF
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_331_1
#DIM キメた
キメた = STRCOUNT(CSTR:30:0, "キメセク") ? 1 # 0
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 == -1
		SIF !TCVAR:30:379
			PRINTFORML 「哈啊……真是的……」
		IF TCVAR:30:379 > 0
			IF キメた
				PRINTFORMW 「............!!」
				PRINTFORML 「这东西,要我喝下去吗...?」
				PRINTFORML 「喂我喝下去后,打算做什么呢...♥」
				PRINTFORMDW 映姫已经明白接下来要发生什么,露出了妖艳的笑容...
			ELSE
				PRINTFORMW 「虽然我真的不太清楚你想做什么」
				PRINTFORML 「如果想玩把戏的话,应该动动脑筋」
				PRINTFORMW 「……茶里残留的药浮着哦」
				PRINTFORMDW %CALLNAME:MASTER%诅咒自己的迂阔…
			ENDIF
			PRINTFORML
			PRINTFORML 「这么明显可疑的茶,您觉得我会喝吗?」
			PRINTFORMDW 一边拿着可疑的茶,映姫立刻就开始\@ キメた ? 义正言辞地 # \@说教。
			PRINTFORML 「首先,您到底想让我喝下什么呢?」
			RESETCOLOR
			CALL ASK_YN, @"%\@ キメた ? 这已经很明显了吧 # 其实是媚药... \@%", "真的非常对不起"
			CALL M_KOJO_COLOR_K30
			IF !RESULT
				ITEM:41 --
				IF FIRSTTIME("キメセク")
					PRINTFORML 「真没办法......那药,您肯定还留着吧?」
					PRINTFORMDW 被映姫质问,%CALLNAME:MASTER%老实地把药递给她
					PRINTFORML 「我明白了,这是要我把这药」
					PRINTFORML 「全部喝下去,然后......」
					PRINTFORML 「对我为所欲为...」
				ELSE
					PRINTFORML 「是吗...那个,会让人」
					PRINTFORML 「非常、非常舒服的药...」
					PRINTFORMDW %CALLNAME:MASTER%轻轻把媚药放在映姫的手心里
					PRINTFORML 「对,就是这个......」
					PRINTFORML 「如果我再次把这个」
					PRINTFORML 「喝下去的话......」
				ENDIF
				PRINTFORML 「........................」
				PRINTFORMDW 拿着茶的映姫陷入了深思...
				PRINTFORML
				PRINTFORMDL 下一刻,映姫将特浓媚药茶含入口中,又一口气把手中的媚药倒了进去
				PRINTFORMDW 她在口中来回搅拌,慢慢把剩下的茶全部喝干
				PRINTFORML
				PRINTFORMDL 她凝视着\@ キメた ? 傻眼了的 # 被惊呆了的 \@%CALLNAME:MASTER%,\@ キメた ? 妩媚地笑着 # \@淫荡地对他笑着
				PRINTFORMDL 然后用热吻把茶渡到了他嘴里
				PRINTFORMDW 热烈的亲吻和药效的帮助下,%CALLNAME:MASTER%的阴茎滚烫的可怕...
				ITEM:41 --
				CALL K30_KIMESEKU_BUFF
				PRINTFORMW 「嗯っ、嗯呼っ♥　苦啾……嗯、苦啾……噗哈♥」
				PRINTFORMDL 接吻结束后，映姬的美目似乎带着可疑的爱心，连缠绕的气氛也和往常不同。
				PRINTFORMDW 她挂着妩媚的笑容,与严格的阎魔大人完全相反,就像是[淫乱]的化身...
				SELECTCASE  TCVAR:30:379
					CASE 1
						PRINTFORML 「只要稍微喝一点，对男人也很有效呢……这个药」
						PRINTFORML 「把这种东西『偷偷』搞到饮料里的人,也太过分了吧？」
						PRINTFORMW 「所以，%K30_C_NAME(MASTER)%…觉悟，做好了吗…♥」
					CASE 2
						PRINTFORML 「嗯呜♥　这个药…果然是分開使用的吗」
						PRINTFORML 「好厉害啊……衣服只是摩擦，已经……好舒服，噫喏♥」
						PRINTFORMW 「再这样下去，会出大事的…%K30_C_NAME(MASTER)%……你会帮我的，对吧♥」
					CASE 3
						PRINTFORML 「呼呼っ…呼呼呼♥　偷偷给你吃能见效的药…」
						PRINTFORML 「相信『有效』而喝的话，会变得很厉害呢…」
						PRINTFORMW 「%K30_C_NAME(MASTER)%、会变成什么样呢，我来确认一下…♥」
					CASE 4
						PRINTFORML 「…从肚子深处，開始变热了……我现在非常，非常明白」
						PRINTFORML 「无论如何都想要和你的宝宝，现在想马上和%K30_C_NAME(MASTER)%做孩子…」
						PRINTFORMW 「%K30_C_NAME(MASTER)%、今天直到孕育我为止…不要放開我♥」
					CASE 5
						PRINTFORML 「%K30_C_NAME(MASTER)%…舒服的事……我又不是讨厌」
						PRINTFORML 「但是，如果不是一起的话，不行。 只有我一个人用药什么的，不可以…」
						PRINTFORMW 「两个人，舒服地…………♥」
				ENDSELECT
				PRINTFORMDL 映姬抱在脖子上，擦着脸颊下起了接吻的雨
				PRINTFORMDW 就这样被压着，%CALLNAME:MASTER%被体重……
			ELSE
				IF キメた
					PRINTFORMW 「诶？啊，啊拉……？」
					PRINTFORML
					PRINTFORML 「是啊，是啊…明白了就好了。明白的话…」
					PRINTFORML 「如果你在反省，那么…」
					PRINTFORMDW 映姬失望的同时，把药还给了我
					ITEM:41 ++
				ELSE
					PRINTFORML 「……如果只是道歉的话，从一開始就不要做这样的事！」
					PRINTFORMDL 当然被骂了……但是，说教没有继续，不知为何还是错过了
					PRINTFORMDW 也许是心理作用吧，映姬看起来很遗憾……
				ENDIF
				TCVAR:30:379 = -1
			ENDIF
		ELSEIF TALENT:恋人
		    PRINTFORMW 「我很高兴知道您想做的事,但...」
		    PRINTFORMW 「是否满足您的愿望就是另一回事了」
		ELSEIF TALENT:恋慕
		    PRINTFORMW 「我以为自己已经知道您会做出突发奇想的举动...」
		    PRINTFORMW 「没想到您会做这种无聊的事,的确超出我的预料」
		ELSEIF TALENT:思慕
		    PRINTFORMW 「我还以为您正在一步步积累善行,却做出这种事...」
		    PRINTFORMW 「看来我也需要控制住欲望,好好地教导您」
		ELSE
		    PRINTFORMW 「您想用这种手段欺骗阎魔,未免也太看轻我了」
		    PRINTFORMW 「看来必须立即让您了解自己罪孽的严重程度」
		ENDIF
	ELSE
		IF TCVAR:30:媚薬 == 210
			PRINTFORML 「唔……嗯？………这是什么……？」
			PRINTFORMW 「身体……热起来了……唔」
		ELSEIF TCVAR:30:利尿剤 == 210
			PRINTFORMW （啊咧……突然……想去厕所……）
		ELSEIF TCVAR:30:催情薬 == 210
			PRINTFORML 「………？　…………对不起，我眼睛有点花……」
			PRINTFORMW （………真伤脑筋……是操劳过度………疲倦了么……）
		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_K30_332
;成否判定＠仕事ある時は強制失敗に
;TFLAG:192(-1＝強制失敗、0=COM依存)
IF !CHARA_HOLIDAY(30) && CFLAG:30:職種 == 43
	TFLAG:192 = -1
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_MESSAGE_COM_K30_332
CALL TRAIN_MESSAGE
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;失敗（仕事中）
	IF TFLAG:192 == -1
		SELECTCASE TIME
			CASE IS < 540, 720 TO 779
				PRINTFORML
				PRINTDATAW
					DATAFORM 「非常抱歉，\@ TIME < 540 ? 接下来 # 还 \@有工作」
					DATAFORM 「现在不行啊。工作再结束的话就拜托了」
					DATAFORM 「我也不讨厌酒，但有工作怎么能喝呢」
				ENDDATA
			CASE IS > 779
				PRINTFORML
				PRINTDATAL
					DATAFORM 「你知道我现在在做什么吗…？」
					DATAFORM 「请考虑时间和场合。说白了就是麻烦」
					DATAFORM 「…你在想什么呢。现在怎么可能喝呢」
					DATAFORM 「…我不知道是恶作剧还是開玩笑，但实在笑不出来」
				ENDDATA
				PRINTFORMDW 映姫对此\@ TALENT:恋慕 ? 露出惊讶的神色 # 怒目而视 \@无奈的…
			CASEELSE
				PRINTFORMDW 映姬对%CALLNAME:MASTER%视而不见地回到了审判中
		ENDSELECT
	ELSEIF TALENT:30:心情 == -1 || (K30_CHECK_HEN_T() && K30_DRUNK() == 0)
		PRINTFORMW 「……谢谢」
	ELSEIF TALENT:恋慕
		SELECTCASE ALCOHOL_TASTE(TFLAG:194)
			;口には合わなかったようだ
			CASE IS <= 10
				IF K30_DRUNK() > 1
					PRINTFORML 「……一点都不好喝！」
					PRINTFORMW 「来嘛来嘛,你肯定还有更好的酒吧～？」
				ELSE
					PRINTFORML 「唔,有点不合口味吧……」
					PRINTFORMW 「明明是送我品尝的东西,真是抱歉」
				ENDIF
			;普通
			CASE 11 TO 15
				IF K30_DRUNK() > 1
					PRINTFORML 「嗯,只是这种程度没事的,只是这种程度」
					PRINTFORMW 「只是这样的话,应该还可以喝吧！」
				ELSE
					PRINTFORML 「不错啊,是很好喝的酒呢」
					PRINTFORMW 「你也来,喝点吧」
				ENDIF
			;気に入ってくれたようだ
			CASE IS > 15
				IF K30_DRUNK() > 1
					PRINTFORML 「嗯嗯っ！　这个，好喝～♪」
					PRINTFORML 「不是很了不起嘛，%K30_C_NAME(MASTER)%。这是奖励，奖励」
					PRINTFORMDW ………被满脸笑容的映姫%TEXTR("抱了抱/摸了摸头/揉了揉肩")%
				ELSE
					PRINTFORML 「嗯ー,这酒不错呢……」
					PRINTFORML 「但一个人喝的话就太浪费了」
					PRINTFORMW 「%K30_C_NAME(MASTER)%也来一起喝吧,喝吧」
				ENDIF
			;神酒
			CASE 30
				IF K30_DRUNK() > 1
					PRINTFORML 「！！　……这不是珍藏的佳酿么♪」
					PRINTFORMW 「这必须得给你什么作为回礼……给你什么……」
					PRINTFORML 「就为你来一次特别的说教吧！」
					PRINTFORMDW ……诚心诚意地谢绝
				ELSE
					PRINTFORML 「这是……相当珍藏的一种吧」
					PRINTFORML 「只让我独享这种美味真的没关系么？」
					PRINTFORMW 「……呼呼,谢谢♪」
				ENDIF
		ENDSELECT
	ELSE
		SELECTCASE ALCOHOL_TASTE(TFLAG:194)
			;口に合わない
			CASE IS < 10
				IF K30_DRUNK() > 1
					PRINTFORML 「唔,有点不合我的口味」
					PRINTFORMW 「明明是你特意送我的,抱歉呐」
				ELSE
					PRINTFORML 「嗯,谢谢」
					PRINTFORMW 「我只要这些就够了,剩下就留给你吧」
				ENDIF
			;普通
			CASE 11 TO 15
				IF K30_DRUNK() > 1
					PRINTFORML 「呼唔ー很普通,很普通呢」
					PRINTFORML 「但是如果是和谁一起喝的话,这样的就足够了」
					PRINTFORMW 「所以,来一起喝吧」
				ELSE
					PRINTFORML 「好的,谢谢」
					PRINTFORMW 「嗯,真是不错的好酒呢」
				ENDIF
			;気に入る
			CASE IS > 15
				IF K30_DRUNK() > 1
					PRINTFORML 「哇,不是带了不错的好酒么」
					PRINTFORML 「这样也可以算不错的善行哦」
				ELSE
					PRINTFORML 「哦～这可真是好酒」
					PRINTFORMW 「那我就不客气了」
				ENDIF
			;神酒
			CASE 30
				IF K30_DRUNK() > 1
					PRINTFORML 「……好好喝。只是喝了一点就感觉要醉了」
					PRINTFORMW 「谢谢你的这么好喝的酒」
				ELSE
					PRINTFORML 「这是……特意为我准备的吗」
					PRINTFORMW 「收到了不可多得的好东西了呢。十分感激」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_333
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
			PRINTFORML 「呼っ呼っ呼っ♪　原来是这样啊～」
			PRINTFORMDW 肩膀也被啪啪的拍着。还挺疼的…
		CASE 5
		;成功（酔い）
			PRINTFORML 「唔～就是啊,果然我就觉得不是这样的」
		CASE 4
		;失敗（酔い）
			PRINTFORML 「就是说啊～明明我是为了大家着想才这么说的」
			PRINTFORMW 「那个，真是的……喂，你听了吗？　你也好好地听著～？　！」
		CASE 3
		;大成功
			IF TCVAR:30:372 == 0
				PRINTFORML 「你到底做错了什么,终于明白了么」
			ELSE
				PRINTFORML 「抱歉,让你陪我发无聊的牢骚」
			ENDIF
			PRINTFORMW 「感谢你认真听我说」
			IF K30_CHECK_HEN_T()
				PRINTFORML
				PRINTFORML 「………………！」
				PRINTFORMDW …映姬调整心情后发现自己的现状\@ TCVAR:30:372 == 0 ? 再次掌握了 # 突然意识到\@什么
				PRINTFORMDW 映姬的眼中渐渐失去了生气…
			ENDIF
		CASE 2
		;成功
			IF TCVAR:30:372 == 0
				PRINTFORMW 「好了,对你的不满就这些而已」
			ELSE
				PRINTFORMW 「嗯,就是这样啊。很高兴你能理解我」
			ENDIF
			IF K30_CHECK_HEN_T()
				PRINTFORML
				PRINTFORML 「………………！」
				PRINTFORMDW …映姬调整心情后发现自己的现状\@ TCVAR:30:372 == 0 ? 再次掌握了 # 突然意识到\@什么
				PRINTFORMDW 映姬的眼中渐渐失去了生气…
			ENDIF
		CASE 1
		;失敗
			IF TCVAR:30:372 == 0
				PRINTFORMW 「你,终于知道我为什么生气了吧」
				PRINTFORMW 「再重新审视一下自己的举止如何」
			ELSE
				PRINTFORML 「真遗憾。没想到你也这么认为」
				PRINTFORMW 「已经够了」
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,碰杯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:妊娠自覚状態(1=吃飯)
;TALENT:酒耐性(-2=吃飯)
;==================================================
@M_KOJO_SUCCESS_COM_K30_334
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:30:妊娠自覚状態 == 1
		PRINTFORMW 「谢谢……这个很美味好喝呢」
	ELSE
		SELECTCASE TFLAG:193
			CASE 0
				IF K30_DRUNK() > 1
					PRINTFORMW 「好的,干杯ー」
				ELSE
					PRINTFORMW 「嗯,来干杯吧」
				ENDIF
			;大成功
			CASE 1
				IF K30_DRUNK() > 1
					PRINTFORMW 「唔呼呼,那么,干杯～♪」
				ELSE
					PRINTFORMW 「那么,干杯～」
				ENDIF
			CASE -1
			;失敗
				IF K30_DRUNK() > 1
					PRINTFORMW 「唔～,请你说得再清楚一些」
				ELSE
					PRINTFORMW 「那个……是,是这样吗……」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;335,照料
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_335
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_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_K30_336
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 = 0
@M_KOJO_MESSAGE_COM_K30_336
TFLAG:193 = TALENT:恋慕 ? MIN(TFLAG:193, 0) # TFLAG:193
IF K30_CHECK_HEN_T() && K30_BE_SEEN()
	CALL K30_D_LINE
	TFLAG:193 = -10
ELSEIF TCVAR:30:364
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:30:364
		PRINTFORMDL %CALLNAME:PLAYER%躺在%CALLNAME:TARGET%膝上
		PRINTFORMDL %CALLNAME:TARGET%坐立不安地摇着身体…
		PRINTFORMW
		STRDATA LOCALS
			DATAFORM 「啊唔…HPH　这个……稍微，可能不行…」\n「一动不动的话…屁股，非常…在意…HPH」
			DATAFORM 「呀，讨厌…HPH　安静地…的话…」\n「声音……回响着，感觉……静不下来…」
			DATAFORM 「啊呼っ…HPH　舒服…好…HPH」\n「想做，更多…HPH　更强，一点…HPH」
		ENDDATA
		CALL HPH_PRINT, LOCALS, "L"
		IF STRFIND(LOCALS, "あふっ") > -1
			LOCAL = GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館, OMANEKIBEYA())
			PRINTFORMD 映姬的手无意识地朝着振动棒的方向伸去…
			PRINTFORMDL \@ LOCAL ? \n 就这样从衣服上抚摸振动棒，映姬沉溺于更强的快感中 # %CALLNAME:MASTER%忙急让住手 \@
		ENDIF
		WAIT
	ELSEIF TFLAG:193 == -10
		PRINTFORMDL %CALLNAME:PLAYER%躺在%CALLNAME:TARGET%膝上
		PRINTFORMDL %CALLNAME:TARGET%看起来很不舒服…
		PRINTFORMW
		PRINTDATAW
			DATAFORM 「抱歉、实在没有放松的心情…」
			DATAFORM 「感觉更加引人注目了…」
			DATAFORM 「……我可以起来了吗?」\n「这身打扮躺着的话…可能会看到很多东西…」
		ENDDATA
	ELSEIF TFLAG:193 == 1
		PRINTFORMW 「呼啊啊啊……嗯嗯……」
		PRINTFORMW 「………啊啦！？」
		PRINTFORML 「这样松懈的地方……竟然给你看…」
		PRINTFORMW 「如果可以的话…请忘记…」
	ELSE
		SELECTCASE ABL:親密
			CASE IS < 5
				IF K30_BE_SEEN()
					PRINTFORML 「被看到了呢……」
					PRINTFORMW 「…已经够了吧」
					PRINTFORMDW 映姫察觉到了别人的目光,赶紧坐了起来
				ELSEIF RAND:2 == 1
					PRINTFORMW （完全冷静不下来…）
				ELSE
					PRINTFORML 「抱歉…现在可以起来了吗？」
					PRINTFORMW 「我还不太习惯这样的事情…」
				ENDIF
			CASE 5 TO 9
				IF K30_BE_SEEN()
					PRINTFORML 「这个,有点…不好意思…」
					PRINTFORMW 「让阎魔这个样子真的可以么…」
				ELSEIF RAND:2 == 1
					PRINTFORML 「不,并没有想象中的那么坏」
					PRINTFORMW 「只是,不能让别人看到啊…」
				ELSE
					PRINTFORML 「感觉像小孩子一样……啊,并没有不喜欢意思」
					PRINTFORMW 「我只是在意面子什么的…」
				ENDIF
			CASEELSE
				IF TALENT:恋人
					IF K30_BE_SEEN()
						PRINTFORML 「看着悠闲的阎魔大人…」
						PRINTFORMW 「大家…会怎么想呢…」
						PRINTFORMW 「反正很幸福…不管了…」
					ELSE
						SELECTCASE RAND:3
							CASE 0
								PRINTFORML 「像这样…委身于自己的幸福什么的…」
								PRINTFORMW 「以前…想都不敢想呢…」
							CASE 1
								PRINTFORML 「吶，%K30_C_NAME(MASTER)%……哎♪」
								PRINTFORMDW 放松下来的映姬戳了戳%CALLNAME:MASTER%的侧腹…
								PRINTFORMW 「呼呼…对这样一个无防备的女性，你不能反击♥」
							CASE 2
								PRINTFORML 「想听听更多关于你的事…」
								PRINTFORMW 「总是我在上你在下,单方面地说话」
								PRINTFORMW 「难得这种姿势……我想悠闲地听你说说…」
						ENDSELECT
					ENDIF
				ELSE
					IF K30_BE_SEEN()
						PRINTFORML 「虽然很害羞…但也并不讨厌…」
						PRINTFORMW 「这样就好了…」
					ELSEIF RAND:2 == 1
						PRINTFORML 「大丈夫？　…不会发麻？」
						PRINTFORMW 「是么…那就这样吧…」
					ELSE
						PRINTFORML 「也能摸摸头的话…就更好了」
						PRINTFORMDW 回应要求抚摸起了映姬的头…
						PRINTFORMW 「……♥」
					ENDIF
				ENDIF
		ENDSELECT
	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_K30_350
;朝诶嘿嘿時初手or推倒返しは通常口上を回避
IF TCVAR:30:363 == -2 || TFLAG:COMABLE管理 == 3
	CALL M_KOJO_COLOR_K30
	CALL K30_JUDGE_PUSHDOWN
	RETURN
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_350_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
CALL M_KOJO_COLOR_K30
VARSET TCVAR:30:0, 0, 383, 388
IF LOCAL
	IF FLAG:70 || TCVAR:烂醉
		CALL K30_PRESET_UFUFU
		SIF TCVAR:烂醉
			PRINTFORMW 「唔,唔唔…怎么～啦～？」
		RETURN 1
	ELSE
		SIF TFLAG:194 < 1 && !INRANGE(TCVAR:30:181, 6, 8)
			CALL K30_PRESET_UFUFU
		SELECTCASE TFLAG:194
			;成功
			CASE 0
				SELECTCASE TCVAR:30:181
					;初回限定
					CASE 1
						IF TALENT:恋人
							PRINTFORML 「…要温柔点哦,呐？」
							PRINTFORMW 「能等到了这一步,真的非常感动，现在我或许天下是最幸福的女人呢」
							PRINTFORML 「喜欢哟，%K30_C_NAME(MASTER)%。请抱着我…」
							PRINTFORMW 「将我……变成你的东西吧……让映姬的肉体记住你吧」
						ELSEIF TALENT:恋慕
							SELECTCASE K30_FIND_LOVER()
								;MASTERに恋人無
								CASE 0
									PRINTFORML 「能和你这样相拥,我真的很開心」
									PRINTFORMW 「所以，%K30_C_NAME(MASTER)%」
									PRINTFORML 「不用马上回应我也可以。我会永远等着你的回答」
									PRINTFORMW 「希望你能只关注我,看着我……」
								;恋人あり
								CASE 1
									PRINTFORML 「………虽然我也知道这是不可以做的事」
									PRINTFORMW 「但是……这样做之后,感觉非常幸福……」
									PRINTFORMW 「%K30_C_NAME(MASTER)%。只有现在……请成为我的恋人」
								;恋人同伴＠無理だったはずだけど一応
								CASE 2
									PRINTFORML 「你,你们、真的觉得这样可以么……？」
									PRINTFORMDW 映姫为预想之外的事态而混乱了起来……
									IF CFLAG:1801
										TCVAR:30:387 = 1
										TCVAR:30:385 = 1
									ENDIF
							ENDSELECT
						;属性が複雑骨折してる
						ELSEIF TALENT:風騷
							PRINTFORML 「这样的事……很奇怪啊,绝对很奇怪啊……」
							PRINTFORMW 「我竟然想被你抱……怎么会这样…」
							PRINTFORMW 「我明明没这种打算的……这一定…是哪里搞错了…哪里…出了问题…」
							TCVAR:30:385 = 1
						ELSEIF TALENT:思慕
							PRINTFORML 「诶…？你…怎么了…突然就…住手」
							PRINTFORMW 「就那么…想要我么…但是,还没有……诶？」
							PRINTFORML 「但如果是你的话…但是我………」
							PRINTFORMDW 从逡巡徘徊的映姬那里得到了谅解，强行推倒了
							TCVAR:30:385 = 1
						;映姫様に真っ当な手段で陥落素質無しの合意＠多分死に分岐
						ELSE
							PRINTFORML 「你，是你做了什么吧！？」
							PRINTFORMW 「这样的事……很奇怪啊,绝对很奇怪啊……肯定哪里搞错了」
							PRINTFORML 「我明明没这种打算的……这一定…是哪里搞错了…哪里…出了问题…」
							PRINTFORMDW 从混乱的映姬那里得到了同意就抱了过来
							TCVAR:30:385 = 1
						ENDIF
					;接吻してないじゃん
					CASE 2
						IF TALENT:風騷
							PRINTFORML 「明明连接吻都还没接吻过…」
							PRINTFORMW 「我竟然想被你抱……怎么会这样…」
							PRINTFORMW 「我明明没这种打算的……这一定…是哪里搞错了…哪里…出了问题…」
						ELSE
							PRINTFORML 「诶…？你…怎么了…突然就…住手」
							PRINTFORMW 「就那么…想要我什么的…但是,还没有……诶？」
							PRINTFORML 「但是,我…还没和你…吻过…」
							PRINTFORMDW 总算得到了犹豫不决的映姬的同意，将其推翻了
						ENDIF
						SIF CFLAG:1801 && !TALENT:恋慕
							TCVAR:30:385 = 1
					;薬にはかてなかったよ
					CASE 3
						PRINTFORMDL 映姬面红耳赤，呼吸急促的揭開衣服
						PRINTFORMW 「！！　………嗯，是啊…现在……对我来说……」
						PRINTFORML 「只要能让这股剧痛…停下来的话…」
						PRINTFORMDW 映姬也许是因为药物而失去了理性，完全没有反抗
						SIF CFLAG:1801 && !TALENT:恋慕
							TCVAR:30:385 = 1
					;刻印にはかてなかったよ
					CASE 4
						PRINTFORML 「诶…？你…想要我？…但是,还没有……」
						PRINTFORMW 「但是…我也……为什么？  …是你…」
						PRINTFORMDL 映姬扛不住在无意识刻下的快乐印记诱惑而混乱
						PRINTFORMDW 还在犹豫的时候被%CALLNAME:MASTER%推倒了…
						SIF CFLAG:1801 && !TALENT:恋慕
							TCVAR:30:385 = 1
					;まんざらでもない
					CASE 6
						IF TALENT:恋人
							PRINTFORML 「虽然我们……已经是这样的关系了……」
							PRINTFORMW 「但还是再稍微……再稍微等一下吧……」
						ELSE
							PRINTFORML 「突、突然是什么！突然抱住我……诶？」
							PRINTFORMW 「想做…？怎么这样……我………」
							PRINTFORMDW 她似乎并没有那种心情,%CALLNAME:MASTER%只得暂时放開了她…
						ENDIF
					;いやだ
					CASE 7
						PRINTFORML 「请停止。我没这个意思」
						PRINTFORML 「并不是说要断绝色欲」
						PRINTFORMW 「但你已经被它冲昏头脑了」
					;論外
					CASE 8
						PRINTFORML 「你知道你在对谁出手么？」
						PRINTFORML 「都说过分的欲望会毁灭自己…」
						PRINTFORMW 「需要我现在在这里证明一下么？」
					;二回目以降
					CASEELSE
						;振動棒约会
						IF TFLAG:193 == 350
							CALL HPH_PRINT, @"「啊~…HPH　我、已经…等不及了HPH」", "L"
							CALL HPH_PRINT, @"「身体…非常热……脑子，也快烧断了哦HPH」", "W"
							PRINTFORML 「%K30_C_NAME(MASTER)%…快点，我的…」
							CALL HPH_PRINT, @"「快点…我的、这里…安慰…HPH」", "L"
							PRINTFORMDL 映姬忍不住主动撩起了裙子
							CALL K30_PRINT_BUTT_IMAGE(0, 2, 0, 3, 1, 0)
							PRINTFORMW
							PRINTFORMDL 抖擞光滑的臀部在其中心颤动的振动棒裸露出来
							PRINTFORMDL 映姬焦急地放松了菊门，一口气拔出了肛用振动棒…
						ELSEIF TALENT:恋慕
							;仕事出勤前(07:00～)
							IF !CHARA_HOLIDAY(30) && TIME >= 420
								PRINTFORML 「稍等一下……从现在開始，是吗！？」
								PRINTFORMW 「不，不是这个意思……到要工作为止时间不太多了……」
								PRINTFORML 「匆忙的我也很为难……咔啊！？」
								PRINTFORMDW 半强行推倒了担心工作而不情愿的映姬…
							;変Ｔ
							ELSEIF K30_CHECK_HEN_T() && K30_FIND_LOVER() != 2
								IF RAND:2 == 1
									PRINTFORML 「今天已经……脑子里乱七八糟的…」
									PRINTFORMW 「不温柔也可以。你的……随你的便」
									PRINTFORMW 「让我，舒服…只用想着舒服…」
								ELSE
									PRINTFORML 「那个…今天很激烈……做也可以」
									PRINTFORMW 「把我弄得乱七八糟吧，让我忘记吧……」
								ENDIF
							;小町or久侘歌と同時
							ELSEIF (CFLAG:76:現在位置 == CFLAG:30:現在位置 || CFLAG:129:現在位置 == CFLAG:30:現在位置) && GROUPMATCH(K30_FIND_AROUND(), 76, 129)
								;部下が恋人
								IF K30_FIND_LOVER() == 2
									PRINTFORMW 「%CALLNAME:(TALENT:MASTER:恋人)%…有我在，可以吗…？」
									PRINTFORMW 「………………」
									PRINTFORML 「谢谢，%CALLNAME:(TALENT:MASTER:恋人)%」
									IF K30_FIND_AROUND() == 76
										PRINTFORMW 「你真是个细心的孩子，我不能隐瞒什么……」
									ELSE
										PRINTFORMW 「你真是个温柔的孩子，对我也这么关心……」
									ENDIF
								;３人同時
								ELSEIF CFLAG:76:現在位置 == CFLAG:30:現在位置 && CFLAG:129:現在位置 == CFLAG:30:現在位置
									PRINTFORML 「把上司和部下并驾齐驱…男人会向往这样的东西吗？」
									PRINTFORMW 「呼呼，我明白了，让我们来为您服务吧…♥」
									PRINTFORML 「閻魔，死神和二羽渡神在你面前也只是女人」
									PRINTFORMW 「我和这些孩子们，请多多疼爱…♥」
								;小町
								ELSEIF CFLAG:76:現在位置 == CFLAG:30:現在位置
									IF RAND:2 == 1
										PRINTFORML 「呼呼…%K30_C_NAME(MASTER)%、现在的心情怎么样？」
										PRINTFORMW 「把我和小町一起……满足吗♥」
										PRINTFORML 「%K30_C_NAME(MASTER)%真是个罪孽深重的人，这样的人怎么能放任不管呢」
										PRINTFORMW 「嗯，决定了。阎魔和死神今后也会一直追着你…」
										PRINTFORMW 「死之前逃不掉，死了之后…也不会放手的♥」
									ELSE
										PRINTFORML 「好像可以比较，稍微有点不好意思…」
										PRINTFORMW 「小町的话…我不在乎」
										IF TALENT:恋人
											PRINTFORMW 「和我一样，也请疼爱这个可爱的孩子♥」
										ELSEIF TALENT:MASTER:恋人
											PRINTFORML 「……在你心中最喜欢我们的两个人」
											PRINTFORMW 「光是这样就很開心了…」
											PRINTFORMW 「阎罗魔也好死神也好…在您面前很没出息」
										ELSE
											PRINTFORML 「当然我不会输的」
											PRINTFORMW 「我会让你…好好回头的♥」
										ENDIF
									ENDIF
								;久侘歌
								ELSE
									PRINTFORML 「……连像久侘歌那样认真的乖孩子都在诱惑你吗」
									PRINTFORMW 「我也是，为什么会被你这样的人吸引呢…？」
									IF RAND:2 == 1
										PRINTFORML 「……光想也没用啊，但是我只想让你记住这些」
										PRINTFORMW 「我和这个孩子，对%K30_C_NAME(MASTER)%一心一意的想法是一样的」
										PRINTFORMW 「无论怎么选，都要考虑这个…请好好珍惜」
									ELSE
										PRINTFORMW 「……想也没用。现在，就好好享受吧…」
									ENDIF
								ENDIF
							;子作りしたい
							ELSEIF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && ESTRUS_CYCLE(30) >= 100 && K30_FIND_LOVER() != 2
								PRINTFORMW 「今天只是舒服……不行的日子，是什么呢」
								PRINTFORML 「我，在被抱之前，肚子的深处…慢慢地，很热，很难过」
								PRINTFORMW 「如果是今天，我们也有可能……」
								PRINTFORMW 「期待…着哦♥」
							;我慢してきました
							ELSEIF CFLAG:1603 > 2
								PRINTFORML 「你会抱我的吧…♥」
								PRINTFORMW 「我，从昨天開始一直一直…一直忍耐着」
								PRINTFORML 「所以…忍耐的奖励，可以期待吗」
								PRINTFORMW 「奖励吧…我的\@ CFLAG:1603 == 4 ? 屁股 # 这里 \@请…给我，多一点♥」
							;同居時自慰
							ELSEIF CFLAG:1603 == 2
								PRINTFORML 「会好好做的吧…？」
								PRINTFORMW 「已经不用再忍耐了，也不用一个人…做了吧」
								PRINTFORML 「又寂寞…又害怕？也许你厌倦了我」
								PRINTFORMW 「所以要补偿…请给我足够的」
								PRINTFORMW 「我的身体和心灵…全部，%K30_C_NAME(MASTER)%で…请满满的灌注」
							ELSEIF TALENT:恋人
								IF RAND:2 == 1
									PRINTFORMW 「嗯,可以哦…」
									PRINTFORMW 「要更加更加，疼爱我哦…♥」
								ELSE
									PRINTFORMW 「还会再做的吧…」
									PRINTFORMW 「请告诉我更多更舒服的事情…♥」
								ENDIF
							ELSE
								SELECTCASE K30_FIND_LOVER()
									CASE 0
										IF RAND:2 == 1
											PRINTFORML 「我不太擅长这种事情……」
											PRINTFORMW 「所以我也不知道该怎么做」
											PRINTFORMW 「但我相信你哦……」
										ELSE
											PRINTFORML 「肌肤重叠在一起，那个…虽然很舒服…」
											PRINTFORMW 「想要连心都更相连的是…是太，任性吗？」
											PRINTFORMW 「等待着，你的答案……」
										ENDIF
									CASE 1
										IF RAND:2 == 1
											PRINTFORML 「像这样之后,就变得非常安心……」
											PRINTFORMW 「虽然知道这是不被允许的事情，但现在我们是恋人吧……」
											PRINTFORMW 「%K30_C_NAME(MASTER)%、请温柔的…做……」
										ELSE
											PRINTFORML 「…我知道这真是罪孽深重」
											PRINTFORMW 「但是，不行。这种心情无法抑制……」
											PRINTFORMW 「%K30_C_NAME(MASTER)%、只有现在…请爱我……」
										ENDIF
									CASE 2
										PRINTFORML 「……如果你们觉得这样可以的话,那我就也就……」
										PRINTFORMW 「没什么好说的了……」
										IF CFLAG:1801
											TCVAR:30:385 = 1
											TCVAR:30:387 = 1
										ENDIF
								ENDSELECT
							ENDIF
						ELSEIF TALENT:炮友 || TALENT:愛欲 || TALENT:風騷
							PRINTFORML 「………嗯,可以哦。快点吧……」
							PRINTFORMDW 映姬简短的回答中充满了矛盾和自责的心情……
							TCVAR:30:385 = 1
						ELSEIF TALENT:思慕
							PRINTFORML 「……诶？…那是……那是……肯定是哪里搞错了……」
							PRINTFORMW 「的确…我可能…是被你所吸引了……」
							PRINTFORML 「也希望能成为……这样的关系……但是……」
							PRINTFORMDW 一面觉得是个麻烦的女人，一面%CALLNAME:MASTER%设法安抚映姬，把她抱了过来
							TCVAR:30:385 = 1
						ELSE
							PRINTFORML 「好奇怪…果然…很奇怪啊…绝对…有什么……」
							PRINTFORMW 「……………………」
							TCVAR:30:385 = 1
						ENDIF
				ENDSELECT
			CASE 1
				PRINTFORML 「えっ…不行…不行！我做不到！」
				PRINTFORMW 「要是…被谁看到的话…我……」
			CASE 2
				PRINTFORML 「竟然要,要在这里做,你在说什么啊……」
				PRINTFORMW 「这可是『私密事』啊！？」
				PRINTFORMW 「在外面什么的太乱来了……」
			CASE 3
				PRINTFORML 「你……」
				PRINTFORMW 「…对不起…我,我做不到……」
				PRINTFORMW 「就不能……二人独处么……？」
			CASE 4
				IF TALENT:恋慕
					PRINTFORMW 「对不起，我现在还没那个心情…」
				ELSE
					PRINTFORMW 「你觉得我看起来有那种想法吗？」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;振動棒约会で映姫様が自己引き抜くEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_350
SIF FLAG:時間停止 || !TCVAR:30:364
	RETURN
CALL COM45
EXP:MASTER:道具使用経験 --
;快感オマケして苦痛と反感抑えておく
SOURCE:快Ａ += 150
SOURCE:苦痛 /= 2
SOURCE:反感 /= 3
;口上に渡すフラグ
TFLAG:193 = 350
TCVAR:30:364 = 0
RETURN
;-------------------------------------------------
;攻守交代判定口上
;-------------------------------------------------
@K30_JUDGE_PUSHDOWN
;-------------------------------------------------
;朝诶嘿嘿初手or欲求不満高い時or専用フラグ時は抵抗
IF (CFLAG:积攒度 > 750 || TCVAR:30:363 == -2 || TCVAR:30:362) && GET_TARGETNUM() == 1
	IF TCVAR:30:362
		PRINTFORMDL %CALLNAME:MASTER%总觉得没劲\@ ONCE("推倒") ? # 再一次 \@把映姬推開
		IF TCVAR:30:362 == 1
			PRINTFORMDL 但是映姬紧紧地抱着不让分開…
			PRINTFORMW
			PRINTFORML 「不要…♥　不会给你离開的」
			PRINTFORML 「不好好给我里面的话…不行啊♥」
		ELSE
			PRINTFORMDL 可是被映姬巧妙的舌头灵活攻击腰部使不上劲…
			PRINTFORMW
			GOTO SKIP
		ENDIF
	ELSEIF TALENT:恋慕
		PRINTFORMDL %CALLNAME:MASTER%为了\@ TCVAR:30:363 == -2 ? 抑制暴走 # 夺回主导权 \@\@ ONCE("推倒") ? # 再一次 \@想把映姬推倒
		PRINTFORMDL 可是对映姬那看似纤弱的身体怎么努力也纹丝不动…
		PRINTFORMW
		PRINTDATAL
			DATAFORM 「不ー行♥　我不会放过你的」
			DATAFORM 「呼呼呼♥　不像平时那样是啊」
			DATAFORM 「还没呢♥　现在轮到我了」
		ENDDATA
		PRINTDATAL
			DATAFORM 「你什么都别想，放轻松就好…♥」
			DATAFORM 「偶尔，这种享受方式也不错吧…♥」
			DATAFORM 「今天就这样一直…做下去吧♥」
		ENDDATA
	ELSE
		PRINTFORML 「啊，你就安静吧！！」
	ENDIF
	PRINTFORMDW 映姬似乎还不打算交出主导权
	$SKIP
	CFLAG:MASTER:诶嘿嘿 = 2
	CFLAG:30:诶嘿嘿 = 2
	TIME -= 1
	RETURN 0
ENDIF
TCVAR:30:376 = 1
IF !TALENT:恋慕
	PRINTDATAW
		DATAFORM 「不,不用这么有干劲也没事哟？」
		DATAFORM 「…要手下留情,呐？」
	ENDDATA
;朝诶嘿嘿フラグ立て終了時
ELSEIF TCVAR:30:363 == -3
	PRINTFORMDL 映姬露出笑容全身无力，被%CALLNAME:MASTER%简单地按倒在地…
	PRINTFORML 「你那么想要我啊…♥」
	PRINTDATAW
		DATAFORM 「来，请进。请好好享用我吧…♥」
		DATAFORM 「还是…不够吗？您希望更激烈一点吗…♥」
		DATAFORM 「从这里開始和往常一样，喜欢我…请吧♥」
	ENDDATA
	TCVAR:30:363 = -4
ELSEIF CFLAG:积攒度 > 250
	PRINTFORMDL 趁着映姬攻势缓和的间隙，总算夺回了主动权…
	PRINTDATAW
		DATAFORM 「明,明明…是我想为你侍奉的说…」
		DATAFORM 「由我来做的话…满足不了你了么？」
		DATAFORM 「明明还想就这样享受一会的…」
	ENDDATA
ELSE
	PRINTFORMDL 推倒映姬并没有任何抵抗，被%CALLNAME:MASTER%征服了…
	PRINTDATAW
		DATAFORM 「现，现在被激烈地攻击的话，会变得很厉害的…」
		DATAFORM 「各种各样的……变得敏感了……请手下留情，吶？」
	ENDDATA
ENDIF
RETURN 1

;==================================================
;351,帯出去
;==================================================
@M_KOJO_MESSAGE_COM_K30_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:同行 == 60
		;推倒気まんまんの時
		IF TALENT:恋慕 && (ENDURE(TARGET) > 600 && !HETEROSEX(MASTER, TARGET)) && !CAN_IRAI_CHARA_GO_TOGATHER(TARGET)
			IF K30_CHECK_HEN_T()
				PRINTFORML 「………………」
				PRINTFORMDW 映姬无言地牵起了%CALLNAME:MASTER%的手…
				RETURN 1
			ENDIF
			PRINTDATAL
				DATAFORM 「我想去的地方…你已经知道了吧♥」
				DATAFORM 「是啊…去更好的地方…走吧♥」
				DATAFORM 「在这里做不到的事，我会帮你做的…♥」
			ENDDATA
			IF K30_BE_SEEN()
				PRINTDATADW
					DATAFORM 映姬悄悄咬着耳垂吹热气…
					DATAFORM 映姬用水润欲滴的美目看着这边…
				ENDDATA
			ELSE
				PRINTDATADW
					DATAFORM 映姬媚眼如丝毫不掩饰盯着…
					DATAFORM 映姬明目张胆地对%CALLNAME:MASTER%撩拨着…
				ENDDATA
			ENDIF
		;変Ｔ
		ELSEIF K30_CHECK_HEN_T() && !CAN_IRAI_CHARA_GO_TOGATHER(TARGET)
			PRINTDATAW
				DATAFORM 「今天明明不想出去散步…」
				DATAFORM 「这种日子别带我到处跑…」
				DATAFORM 「待在这里，不行吗…」
			ENDDATA
		ELSEIF TALENT:恋人
			IF CAN_IRAI_CHARA_GO_TOGATHER(TARGET)
				PRINTFORMW 「你马上就答应我的请求了？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「要带我去哪里呢…好期待啊」
			ELSE
				PRINTFORMW 「如果是%K30_C_NAME(MASTER)%的话，我哪里都会跟着你的」
			ENDIF
		ELSEIF TALENT:恋慕
			IF CAN_IRAI_CHARA_GO_TOGATHER(TARGET)
				PRINTFORMW 「你马上就答应我的请求了？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「好啊，走吧」
			ELSE
				PRINTFORMW 「换个地方吗？ 嗯，我们走吧」
			ENDIF
		ELSEIF TALENT:思慕
			IF CAN_IRAI_CHARA_GO_TOGATHER(TARGET)
				PRINTFORMW 「那就托付给您了」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「……你打算去哪里？」
			ELSE
				PRINTFORMW 「……有什么事吗？」
			ENDIF
		ELSE
			IF CAN_IRAI_CHARA_GO_TOGATHER(TARGET)
				PRINTFORMW 「那就托付给您了」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「带阎魔到处走，真有福气」
			ELSE
				PRINTFORMW 「有必要特意换个地方吗？」
			ENDIF
		ENDIF
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;FLAG:甲斐性無(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_SUCCESS_COM_K30_352
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
CALL K30_DENY_POLYAMORY(2)
LOCAL = RESULT
IF 仕事中チェック(30) && BETWEENTIME(540, 719)
	TFLAG:192 = -1
	TFLAG:194 = -1
ELSEIF LOCAL
	TFLAG:192 = -1
	TFLAG:194 = LOCAL
ELSE
	TFLAG:192 =0
ENDIF

@M_KOJO_MESSAGE_COM_K30_352
IF TFLAG:194 > 0
	CALL K30_D_LINE
ELSE
CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_352_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;成功
	IF TFLAG:193
		PRINTFORML 「………」
		PRINTFORMDW 接到告白的映姬似乎吓了一跳，过了一会儿才開口
		PRINTFORML
		PRINTFORML 「…我也喜欢你，%K30_C_NAME(MASTER)%」
		PRINTFORMW
		PRINTFORMW 「呼呼,老实告诉我,你是不是也被吓了一跳呢？」
		PRINTFORMDW 映姬用明朗的笑容说着
		PRINTFORMW 「我也感觉和你在一起的时候也是最棒的时刻」
		PRINTFORMW 「最近终于注意到了」
		PRINTFORMW 「还以为自己是因为工作上的事情而苦恼」
		PRINTFORMW 「现在终于明白了,真是太好了」
		PRINTFORMW 「谢谢,%K30_C_NAME(MASTER)%」
		PRINTFORMW 「今后也请多关照」
		SETBIT CFLAG:30:1505, 0
	;失敗
	ELSE
		SELECTCASE  TFLAG:194
			CASE -1
				PRINTFORML 「…………？」
				PRINTFORMDL 映姬惊讶地看着这边…
				PRINTFORMDW 总觉得好像要被骂了，所以还是不告白了
			CASE 0
				PRINTFORML 「哦呀,你……怎么了？」
				PRINTFORMW 「对阎魔大人有所隐瞒可不好哦？」
			CASE 1
				PRINTFORMDL %CALLNAME:MASTER%鼓起勇气向映姫传达了爱意...
				PRINTFORMW
				IF FIRSTTIME("左拥右抱")
				    PRINTFORMW 「.........」
				    PRINTFORML 「和您一样...我也确实被%K30_C_NAME(MASTER)%吸引着」
				    PRINTFORML 「但这种感情应该隐藏在心底」
				    PRINTFORMW 「我认为不应该打扰或介入他人」
				    PRINTFORML 「再说了,您能当着%K30_C_NAME(TALENT:MASTER:恋人)%的面说出同样的话吗?」
				    PRINTFORML 「请不要令%K30_C_NAME(TALENT:MASTER:恋人)%难过」
				    PRINTFORMDW 被映姫拒绝了...
				ELSE
				    PRINTFORMDL 映姫低着头,默默地摇摇头...
				ENDIF
			CASE 2
				PRINTFORMDL %CALLNAME:MASTER%表达了想和映姫重新开始的愿望...
				PRINTFORMW
				IF FIRSTTIME("ぽりあもりー")
				    PRINTFORMW 「.........」
				    PRINTFORML 「在和%K30_C_NAME(MASTER)%相处时,我都忘记了...」
				    PRINTFORMW 「人世间的一切都是无常的,没有什么是永恒不变的」
				    PRINTFORML 「我一直都在思念着您,但...」
				    PRINTFORMW 「既然您已经改变,我认为我们维持现状比较好」
				    PRINTFORML 「我也不想让%K30_C_NAME(TALENT:MASTER:恋人)%难过」
				    PRINTFORML 「这件事就...当没发生过吧」
				    PRINTFORMDW 被映姫拒绝了...
				ELSE
				    PRINTFORMDW 映姫露出些许寂寞的笑容,默默摇了摇头...
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;353,猥褻
;FLAG:甲斐性無(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K30_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_353_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_353_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	TCVAR:30:385 = 1
ENDIF
RETURN 1
;==================================================
;354,陪睡（相手は起きて被窝に招く感じ）
;CFLAG:衰弱(1以上=起きない
;CFLAG:招待(0以外=起きない
;==================================================
@M_KOJO_MESSAGE_COM_K30_354
CALL TRAIN_MESSAGE
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_354_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:時間停止
	ELSEIF CFLAG:TARGET:招待 != 0
	ELSEIF CFLAG:衰弱 > 0
		PRINTFORMDL 为香汗淋漓正在休息的映姬擦拭
		PRINTFORMW \@ TALENT:恋慕 ? 「…嗯嗯…%K30_C_NAME(MASTER)%……最喜欢…」 # \@
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「唔……这边哦……」
				PRINTFORMW 「哼哼……抱枕…ね……♥」
			CASE 1
				PRINTFORMW 「唔ー……这种时候也……感觉很棒呢……」
			CASE 2
				PRINTFORML 「那你就在这里吧……」
				PRINTFORMW 映姬稍微挪了挪身体,啪嗒啪嗒地拍了拍了床垫
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;355,時止め（地の文の改変程度に留めるべき
;==================================================
@M_KOJO_MESSAGE_COM_K30_355
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_355_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;356,邀请去阴暗处
;ABL:露出癖 + TALENT:羞恥心で判定
;成否判定
;TFLAG:192(-1＝強制失敗、0=COM依存、1=強制成功
;==================================================
@M_KOJO_SUCCESS_COM_K30_356
;RETURN RESULT
CALL K30_D_LINE
TFLAG:192 = -1
;映姫様はお仕事最優先。邪魔するやつはぶん殴る
IF 仕事中チェック(30) && CFLAG:30:職種 == 43
	PRINTFORMD %CALLNAME:MASTER%想把%GET_JOBNAME(30)%中的映姬拉到法庭的角落里
	IF ONCE("邪魔")
		PRINTFORMDL 一脸焦躁地甩開了手
		PRINTFORMW
		PRINTFORML 「…我不会再说第二次」
		PRINTFORMW 「你能不能别这样？」
		PRINTFORMDL 妨碍阎罗王的%GET_JOBNAME(30)%确实不妥
		PRINTFORMDL 在真的被骂之前还是放弃比较好
		BASE:30:憤怒 += MAXBASE:30:憤怒 / 3 * 2
	;良いペナルティ思いつかないのでSKIP
	[SKIPSTART]
	ELSEIF STRCOUNT(CSTR:30:1, "マジギレ") && INRANGE(TIME, 540, 719)
		PRINTFORML
		PRINTFORMDL 映姬发出的压迫感让人无法动弹…
		PRINTFORMW
		PRINTFORMW 「…………………」
		PRINTFORMDL 过于愤怒，映姬连表情都消失了
		PRINTFORMDL 用令人毛骨悚然的眼神瞥了我一眼之后
		PRINTFORMDW 在悔悟棒上无言地写着罪状…
		PRINTFORML
		PRINTFORMDL 终于写完的映姬无言地挥舞着悔悟棒
		TCVAR:30:371 = 6
		CALL K30_DISCIPLINE_HEAD
	[SKIPEND]
	ELSE
		PRINTFORML
		PRINTFORMDL 被映姬击落手，狠狠地瞪着…
		PRINTFORMW
		TALENT:心情 = -1
		BASE:30:情緒 = 0
		IF STRCOUNT(CSTR:30:1, "マジギレ")
			PRINTFORML 「够了，适可而止吧」
		ELSE
			PRINTFORML 「…别開玩笑了」
		ENDIF
		SELECTCASE TIME
			CASE 540 TO 719
				PRINTFORML 「看不明白吗？现在正在审判中」
				PRINTFORML 「还是说作为阎魔的我难道要放弃审判吗…？」
				TCVAR:30:371 = 4
			CASE 720 TO 779
				PRINTFORML 「我现在正在准备工作。不能约会」
			CASEELSE
				PRINTFORML 「让被委托管理冥界的我，别管工作了…」
				PRINTFORML 「叫我放弃这个重要的职务…你想这么说吗？」
				TCVAR:30:371 = 3
		ENDSELECT
		IF TCVAR:30:371
			BASE:30:憤怒 = MAXBASE:30:憤怒
			CFLAG:心情不快 = 3
			CFLAG:ブチギレ = 1
			IF ONCE("マジギレ")
				PRINTFORMDW 映姬好像真的生气了…
				PRINTFORML
				PRINTFORML 「…总是把自己的任性强加给别人的人」
				PRINTFORMW 「好像不好好灸一下就不行」
				PRINTFORML
			ELSE
				PRINTFORMDW 映姬气得前所未见…
				PRINTFORML
				PRINTFORML 「愚弄阎魔到这种地步，真叫人目瞪口呆」
				PRINTFORMW 「其罪，好好地抵偿一下吧」
				PRINTFORML
				TCVAR:30:371 = 5
			ENDIF
			CALL K30_DISCIPLINE_HEAD
		ELSE
			BASE:30:憤怒 += MAXBASE:30:憤怒 / 3
			PRINTFORMDL 伤了映姬的心…
		ENDIF
	ENDIF
;バグ多いし口上内のフラグ管理と相性悪すぎ。ほぼ発動不会うにする
ELSEIF !(TALENT:恋慕 || TALENT:炮友 || TALENT:愛欲)
	PRINTFORMDL %CALLNAME:MASTER%想把映姬拉到暗处，却被她的手一打…
	PRINTFORMW
	PRINTFORML 「你在想什么！！」
	PRINTFORML 「我根本没打算做那种事！」
	TALENT:心情 = LIMIT(TALENT:心情 - 1, -1, 1)
	BASE:30:憤怒 += MAXBASE:30:憤怒 / 3
	BASE:30:情緒 = MIN(BASE:30:情緒, 50)
ELSEIF GET_TARGETNUM() > 1
	PRINTFORMDL %CALLNAME:MASTER%想把映姬拉到暗处，却被她甩開了手…
	PRINTFORMW
	PRINTFORML 「えっ……無理！　無理！　不行！！」
	PRINTFORML 「%K30_C_NAME(K30_FIND_AROUND())%明明就在那里，做不到那样的事！」
	BASE:30:情緒 = MIN(BASE:30:情緒, 100)
ELSEIF TCVAR:30:364
	PRINTFORMDL %CALLNAME:MASTER%想把映姬拉到暗处，反被抓住了手…
	PRINTFORMW
	PRINTFORML 「不行，的啊…%K30_C_NAME(MASTER)%」
	PRINTFORMW 「这里…不是做那种事的地方」
	CALL HPH_PRINT, "「比起那个…如果你也想的话…快点，走吧HPH」", "L"
	CALL HPH_PRINT, "「两个人…找个能冷静下来的地方…吶HPH」", "L"
	RESETCOLOR
	RETURN RESULT
ELSEIF CFLAG:积攒度 < 850 || (ABL:露出癖 + TALENT:羞恥心 < 3) || !TCVAR:発情
	PRINTFORMDL %CALLNAME:MASTER%想把映姬拉到暗处，却被软弱无力地甩開了手…
	PRINTFORMW
	PRINTFORML 「……我想要的是和%K30_C_NAME(MASTER)%的秘密」
	PRINTFORMW 「只有你……我只想让你能看到羞耻的地方…」
	PRINTFORML 「在不知道其他男人能看到的地方」
	PRINTFORML 「对不起，我不行…」
	BASE:30:情緒 = MIN(BASE:30:情緒,150)
ELSEIF !TCVAR:烂醉
	PRINTFORMDL %CALLNAME:MASTER%想把映姬拉到暗处，却被她用颤抖的手抵抗了…
	PRINTFORMW
	PRINTFORML 「%K30_C_NAME(MASTER)%…我只想普通…普通地互相确认两个人的爱…」
	PRINTFORML 「这样的…坏心眼，请不要这样做呀…」
	RESETCOLOR
	RETURN RESULT
ELSE
	PRINTFORMDL 喝得烂醉如泥的映姬，似乎无法做出正确的判断…
	RESETCOLOR
	RETURN RESULT
ENDIF
CFLAG:30:延迟 += (1440 - TIME)
RESETCOLOR
RETURN RESULT
;==================================================
;357,炮友契約
;基本的に指令内で完結するのでほぼ蛇足
;==================================================
@M_KOJO_MESSAGE_COM_K30_357
;炮友契約にTRAIN_MESSAGEは無い
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_357_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_357_1
SIF TALENT:炮友 || TFLAG:193 > -2
	RETURN 1
PRINTFORMW 「…对了，%K30_C_NAME(MASTER)%」
PRINTFORML 「你跟我说了一些很无聊的话」
PRINTFORML 「我也有很多话想跟你说…」
PRINTFORML 「嗯，已经…想说的话真是源源不断」
PRINTFORMW 「能全部传达出来吗…我对自己的事情有点没有自信呢…」
PRINTFORML 「那么%K30_C_NAME(MASTER)%…做好觉悟了吗」
PRINTFORMDL 映姬干脆露出了爽朗的笑容
PRINTFORMDL 『笑本来就是有攻击性的～』
PRINTFORMDW 这样的句子在%CALLNAME:MASTER%的脑海里闪过……但似乎太晚了
PRINTFORML 「%CALLNAME:MASTER%！！　现在马上就端坐在那里！」
LOCALS:0 '= "…………", "……", "…"
RESETCOLOR
DRAWLINE
CALL PRINT_GROUP(LOCALS, 3)
PRINTFORMDL 被映姬教训到记忆模糊
PRINTFORMDL %CALLNAME:MASTER%精疲力竭地瘫倒在地…

BASE:MASTER:体力 = 0
BASE:MASTER:気力 = 0
BASE:MASTER:精力 = 0
CALL SET_SLEEP(1,MASTER,0)
CFLAG:MASTER:就寝時間 = DAY * 1440 + TIME + 180
TFLAG:106 = 0

RETURN 1
;==================================================
;360,任憑擺佈＠とりあえずEVENT_MESSAGE_COM.300とCOUNTER_MESSAGEの分岐を拾ってみる
;使われてないやつ書いてたら泣ける
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K30_360
IF TCVAR:30:363 == -2
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
SIF TCVAR:20 == 51 && TCVAR:30:363 != -2
	CALL K30_BLOW_JOB_ANIME(2)
CALL M_KOJO_MESSAGE_COM_K30_360_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TCVAR:20
		;接吻
		CASE 30
			IF RAND:2 == 1
				PRINTFORMW 「啾…啾咕…啊呜っ、……啾っ♥」
			ELSE
				PRINTFORML 「啊呜…啾♥　啾、嘞咯…噗哈」
				PRINTFORMW 「…和%K30_C_NAME(MASTER)%的接吻、无论做多少次，都很棒…♥」
			ENDIF
		;从后面将抱きつく
		CASE 31
			IF RAND:2 == 1 || TALENT:PLAYER:2 & 1
				PRINTFORMW 「很想就这样不要分開…」
			ELSE
				PRINTFORMW 「在宽阔怀里…总觉得可以安心…」
			ENDIF
		;前から抱きつく
		CASE 32
			IF RAND:2 == 1
				PRINTFORMW 「身体火辣辣的,受不了了……」
				PRINTFORMW 「帮我平息、帮忙……会给我的吧…♥」
			ELSE
				PRINTFORMW 「对，你只要放松就行了…」
				PRINTFORMW 「全部交给我吧…」
			ENDIF
		;胸を揉ませる
		CASE 33
			IF NOWEX:噴乳
				IF RAND:2 == 1
					PRINTFORML 「嗯呼♥　%K30_C_NAME(MASTER)%、很擅长哦…♥」
					PRINTFORMW 「是的，就这样……我梆梆的胸部，温柔地揉着…」
					PRINTFORMW 「啊呼…♥　胸部…出来啦，对…♥」
				ELSE
					PRINTFORML 「奶子……要出来了，%K30_C_NAME(MASTER)%，请…帮我…」
					PRINTFORML 「像从下面抬起一样……是啊，慢慢地……解開…」
					PRINTFORMW 「嗯…♥　乳头，很烫…♥」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「能感受到心脏扑通扑通跳得很厉害么……？」
					PRINTFORMW 「%K30_C_NAME(MASTER)%と、做的时候，总是…是这样的…♥」
				ELSE
					PRINTFORMW 「你明白吧？ 说是心跳得很厉害…」
					PRINTFORMW 「%K30_C_NAME(MASTER)%的话、是怎么样…」
				ENDIF
			ENDIF
		;股間をまさぐる
		CASE 34
			IF RAND:2 == 1 || TALENT:PLAYER:2 & 1
				PRINTFORMW 「%K30_C_NAME(MASTER)%的『这里』呀，非常坦率啊…♥」
			ELSE
				PRINTFORMW 「『这里』啊，让我舒服的重要地方…♥」
			ENDIF
		;裙子の中を見せる
		CASE 35
			IF TEQUIP:TARGET:50 == MASTER
				IF RAND:2 == 1
					PRINTFORMW 「你看♥ 这样的话，能看得很清楚吧…」
					PRINTFORMW 「我的，这里…好好地吞下了你的…♥」
				ELSE
					PRINTFORMW 「哈っ、哈啊…♥　%K30_C_NAME(MASTER)%、好好看吧」
					PRINTFORMW 「好舒服的地方♥ 要进来的地方，看♥」
				ENDIF
			ELSEIF TEQUIP:TARGET:51 == MASTER
				IF RAND:2 == 1
					CALL HPH_PRINT, @"「呼呼呼HPH　结合一起的地方，我会好好给你看的」", "L"
					CALL HPH_PRINT, @"「怎么样，用屁股…把你的，这么下流，吞下去了HPH」", "W"
				ELSE
					CALL HPH_PRINT, @"「看吧，看得很清楚吧…HPH」", "L"
					CALL HPH_PRINT, @"「屁股…就这样展開…连下流的声音都发出来了HPH」", "W"
				ENDIF
			ELSEIF !EQUIP:下半身内衣２
				IF PALAM:潤滑 < PALAMLV:6
					PRINTFORMW 「怎么样？兴奋起来了吗……？」
				ELSE
					PRINTFORMW 「能看清吧……我的,这里」
					PRINTFORMW 「这样……粘糊糊的……太下流了…♥」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「我的%PANTSNAME(EQUIP:下半身内衣２, TARGET)%,现在正被盯着…」
					PRINTFORMW 「想脱吗？还是…就这样好呢？」
				;関係ないけど、随机でたまにとんでもないやつ是てるよね
				ELSE
					PRINTFORMW 「今天的%PANTSNAME(EQUIP:下半身内衣２, TARGET)%,你觉得合适么？」
				ENDIF
			ENDIF
		;从后面将胸もみ
		CASE 36
			GOTO OTHER_COUNTER
		;糖強奪＠なんだこれ
		CASE 39
			GOTO OTHER_COUNTER
		;おねだり＠死に分岐だったのでCounterへ移動
		CASE 41, 43
		;後背位Ａ挿入おねだり＠死に分岐だったのでCounterへ移動
		CASE 44
		;手淫
		CASE 50
			IF NOWEX:MASTER:11
				PRINTFORMW 「看呐,已经这么黏糊糊的了…」
				PRINTFORMW 「快，拿出来吧…♥」
			ELSE
				PRINTFORMW 「%K30_C_NAME(MASTER)%请放轻松…」
				PRINTFORMW 「只要用我的手感到舒服就行了…」
			ENDIF
		;口交、舐陰
		CASE 51
			;特殊処理(寝起き诶嘿嘿)
			IF TCVAR:30:363 == -2
				PRINTFORML 「对…就这样全部交给我吧…」
				PRINTFORML 「就像我不能没有你一样」
				PRINTFORMW 「%K30_C_NAME(MASTER)%も…沉溺于我吧…♥」
			ELSEIF TALENT:PLAYER:2 & 2
				IF NOWEX:MASTER:11
					IF TCVAR:30:362 && !RAND:3
						PRINTFORML 「嗯，嗯…叽啵，叽啵♥　啾噜……啾噜噜♥」
						PRINTFORMDL 映姬的嘴唇、舌头、喉咙全部来寻求%CALLNAME:MASTER%的白浆
						PRINTFORMDW 虽然想尽可能长久地享受快乐，但是看起来完全受不了映姬的责难…
					ELSEIF (EXP_UP(15, TARGET) == NOWEX:PLAYER:射精 * 3) && !RAND:3
						PRINTFORML 「啾噜、嗯嗯…♥　就快，到了吗…？」
						PRINTFORML 「没关系的，射在嘴里…都发射出来」
						PRINTFORMW 「我正要好好喝的地方…看着吧♥」
					ELSE
						PRINTFORML 「吶…就这样，射出来…♥」
						PRINTFORMW 「嘴里，快点…请给我♥　哈呜，嗯呜……」
					ENDIF
				ELSE
					IF TCVAR:30:362
						PRINTFORML 「嗯啾、啾……啾~~♥」
						PRINTFORMDW 映姬仿佛要把精液全部舔干净似的，紧紧地吸着阴茎上…
					ELSEIF RAND:2 == 1
						PRINTFORMW 「啾…啾啵…」
						PRINTFORMW 「…无论多少次我都会为你做的」
						PRINTFORMW 「不能忍耐哦…♥」
					ELSE
						PRINTFORMW 「嗯啾、啾♥……嘞咯」
						PRINTFORMW 「…呼呼、现在的地方，很舒服吧？　一跳一跳的，就像♥」
						PRINTFORMW 「那么，再给你做一次鸡巴按摩吧…♥」
					ENDIF
				ENDIF
			ELSE
				GOTO OTHER_COUNTER
			ENDIF
		;素股
		CASE 52
			IF !(TALENT:PLAYER:2 & 2)
				GOTO OTHER_COUNTER
			ELSEIF NOWEX:MASTER:11
				IF TEQUIP:PLAYER:避孕套 == 0 && K30_CREAMPIE() > 1
					PRINTFORML 「你的，很热…哔库哔库的…」
					PRINTFORML 「但是……不行，放在这里……忍耐一下吧」
					PRINTFORMW 「%K30_C_NAME(MASTER)%的话…能做到吧…♥」
					PRINTFORMDL ………………
					PRINTFORMW 「啊~……」
				ELSE
					PRINTFORML 「%K30_C_NAME(MASTER)%即使不能放进去……也很舒服？」
					PRINTFORML 「是吗…那就和我一起…♥　这个，非常…好舒服啊…♥」
					PRINTFORMW 「所以，不需要忍耐…对这个腿穴使劲发泄吧…♥」
				ENDIF
			ELSE
				PRINTFORMW 「啊啊…♥　好硬啊…磨蹭起来、可以♥　非常，可以♥」
			ENDIF
		;乳交
		CASE 53
			IF NOWEX:MASTER:11
				PRINTFORML 「嗯…♥　在我的胸部…能感觉到吗」
				PRINTFORML 「已经无法忍受了…想要更多…」
				IF NOWEX:噴乳
					PRINTFORML 「我也，一起哦♥　胸部…非常的炙热」
					PRINTFORMW 「……啊、啊啊！　出来了♥」
				ELSE
					PRINTFORMW 「什么时候都可以…♥」
				ENDIF
			ELSE
				PRINTFORML 「怎么样？很舒服吧…♥」
				PRINTFORMW 「我也摩擦的…很舒服♥」
				IF NOWEX:噴乳
					PRINTFORML 「啊嗯~…♥　奶子…前端，阵阵发麻…」
					PRINTFORMW 「欧金金…把它，弄得更加粘糊糊的吧♥」
				ENDIF
			ENDIF
		;足交
		CASE 54
			IF NOWEX:MASTER:11
				PRINTFORMW 「你的脸看起来很爽…♥」
				PRINTFORMW 「就这样射在地板上吧…♥」
			ELSE
				PRINTFORMW 「好可爱的声音啊，让我多听听…♥」
			ENDIF
		;肛門愛撫,舐肛
		CASE 55, 56
			IF ABL:30:Ａ感覚 >= 2
				PRINTFORMW 「%K30_C_NAME(MASTER)%も、在这里…会变得舒服吗？」
				PRINTFORMW 「没关系，我会给你更多…♥」
			ELSE
				PRINTFORMW 「你真是个…变态桑呢」
			ENDIF
		;指挿入
		CASE 57
			GOTO OTHER_COUNTER
		;胸愛撫
		CASE 58
			IF TALENT:PLAYER:2 & 1
				GOTO OTHER_COUNTER
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「就算是男人,这里也会……感觉很舒服呢…」
				ELSE
					PRINTFORMW 「怎么了？连这样的地方都硬了…♥」
				ENDIF
			ENDIF
		;ディープ接吻
		CASE 60
			IF RAND:2 == 1
				PRINTFORMW 「啾、嗯……啾噜…嘞咯、滋兹……啾噜…♥」
				PRINTFORMW 「噗哈……」
				PRINTFORMW 「…换气，结束。更多…我会继续的♥」
				PRINTFORMW 「啊呜…嘞咯，啾噜♥　啾噗…」
			ELSE
				PRINTFORMW 「啊呜…嘞咯、滋っ♥　叽噗、啾噜…」
				PRINTFORMW 「噗哈……」
				PRINTFORMW 「…一直，想做下去。%K30_C_NAME(MASTER)%也这么认为吗？」
			ENDIF
		;強制舐陰
		CASE 70
			PRINTFORMW 「啊♥ 是的…在那里♥」
			PRINTFORMW 「那里…好好地，舔…♥」
		;肛門奉仕
		CASE 72
			CALL K30_PRINT_BUTT_IMAGE(4)
			IF RAND:2 == 1
				CALL HPH_PRINT, @"「啊啊嗯HPH　屁股…好舒服，噫唷HPH」", "L"
				CALL HPH_PRINT, @"「啊HPH　啊HPH　力量，掉下来了HPH」", "W"
			ELSE
				CALL HPH_PRINT, @"「嗯唔~HPH　做得很好，%K30_C_NAME(MASTER)%…」", "L"
				CALL HPH_PRINT, @"「那里！好啊，哦咕HPH　舔到，里面去HPH」", "W"
			ENDIF
		;ぱふぱふ
		CASE 73
			PRINTDATAW
				DATAFORM 「能听到吗……这么紧张…」
				DATAFORM 「你的温度传递过来…我也，很幸福…♥」
			ENDDATA
		;強制アソコ愛撫
		CASE 76
			IF TALENT:TARGET:処女
				PRINTFORMW 「虽然还有点害怕……要慢慢地……动哦…」
				PRINTFORMW 「还是想和你连结在一起呢…」
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「那里，好…好啊♥」
					PRINTFORMW 「嗯嗯♥　没关系……再，强硬，一点♥」
				ELSE
					PRINTFORMW 「啊♥　啊♥　好厉害…♥」
				ENDIF
			ENDIF
		;乳を吸わせる
		CASE 77
			IF CFLAG:1802 && NOWEX:噴乳
				PRINTFORML 「果然，忍耐…做不到」
				PRINTFORML 「%K30_C_NAME(MASTER)%…再多吸吸奶子」
				PRINTFORMW 「我的奶水…浓浓的喝吧……♥」
			ELSEIF NOWEX:噴乳
				PRINTFORML 「嗯呼呼っ、%K30_C_NAME(MASTER)%、很擅长吸胸部呢…♥」
				PRINTFORMW 「好好吸的话，会有很多奖励哦♥　……啊呼♥」
			ELSE
				PRINTFORMW 「啊~嗯♥　再吸一点…用力，吸…可以啊…♥」
			ENDIF
		;Ｖ挿入する
		CASE 85
			IF NOWEX:Ｖ絶頂 && RAND:2 == 1
				PRINTFORML 「啊♥　啊啊♥　好厉，害…♥」
				PRINTFORML 「%K30_C_NAME(MASTER)%っ、对不起♥　只有我很舒服，对不起♥」
				PRINTFORMW 「只是放进去了，就很幸福♥　要去了♥　对不起♥♥」
			ELSEIF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && !TEQUIP:PLAYER:避孕套 && !TCVAR:口服避孕薬 && RAND:3 != 1
				PRINTFORML 「啊嗯…♥　哦咕…到达了，像…一样♥」
				PRINTFORMW 「请在这里♥　里面…快点，给我♥」
			ELSEIF RAND:2 == 1
				PRINTFORML 「嗯~♥　从我这里，加油…动起来」
				PRINTFORMW 「请用我，舒服地，变成这样…♥」
			ELSE
				PRINTFORML 「啊♥　里面，你的…♥」
				PRINTFORML 「呼呼♥　就这样，交给我吧，吶」
				PRINTFORMW 「好好的，舒服的，为你做哦♥♥」
			ENDIF
		;だいしゅき大堂ド
		CASE 86
			PRINTFORML 「嗯嗯♥　哈啊~…♥　心颤颤的啊，好爽呀！　…%K30_C_NAME(MASTER)%っ、%K30_C_NAME(MASTER)%っ！」
			IF  (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && !TEQUIP:PLAYER:避孕套 && !TCVAR:口服避孕薬
				PRINTFORMW 「出来吧♥　多多的，射出来吧♥　小宝宝的，嘿呀，射出来♥♥」
			ELSEIF !TEQUIP:PLAYER:避孕套
				PRINTFORMW 「给我，出来♥　更多更多！　出来吧♥♥」
			ELSE
				PRINTFORMW 「一起，去吧♥　……啊♥　啊啊♥　一库！　一库呜♥」
			ENDIF
		;Ａ挿入する
		CASE 87
			SIF GROUPMATCH(TEQUIP:体位, 2, 5)
				CALL K30_PRINT_BUTT_IMAGE(63)
			IF NOWEX:Ａ絶頂 && RAND:2 == 1
				CALL HPH_PRINT, @"「咿呀HPHHPH　这个，不行HPH」", "L"
				CALL HPH_PRINT, @"「屁屁，太好了HPH　这样的，动不了HPHHPH」", "L"
				CALL HPH_PRINT, @"「啊HPH　啊啊HPHHPH　不行，已经不行了HPHHPH」", "W"
			ELSEIF RAND:2 == 1
				PRINTFORML 「都是%K30_C_NAME(MASTER)%的错…我这么做也是因为…」
				CALL HPH_PRINT("「负起责任，舒服起来，吶…HPH」", "W")
			ELSE
				PRINTFORML 「我自己主动去做这种事……明明这样是不可以的…」
				CALL HPH_PRINT("「好舒服啊，停不下来…HPH」", "W")
			ENDIF
		;腰振りＶ
		CASE 88
			IF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && !TEQUIP:PLAYER:避孕套 && !TCVAR:口服避孕薬
				IF NOWEX:MASTER:11
					PRINTFORML 「啊嗯~♥　能行吗？　噫唷、噫呐唷♥」
					PRINTFORMW 「给我，拿出来♥ 就在这里♥ 小宝宝，做吧♥」
				ELSEIF BASE:MASTER:射精 > (MAXBASE:MASTER:射精 / 3 * 2)
					PRINTFORML 「啊哈♥ 我也不只是舒服…♥」
					PRINTFORMW 「很高兴…非常幸福…♥」
					PRINTFORMW 「肚子里的…里面，紧紧地…停不下来♥」
				ELSE
					PRINTFORML 「嗯嗯~♥　我，非常，期待…♥」
					PRINTFORMW 「给我，拿出来…让我，怀孕♥」
				ENDIF
			ELSEIF !TEQUIP:PLAYER:避孕套
				IF NOWEX:MASTER:11
					PRINTFORML 「嗯~♥　那张脸…马上就要到了呢♥」
					PRINTFORML 「不需要忍耐什么的」
					PRINTFORMW 「什么，拿出来也可以…♥」
				ELSEIF BASE:MASTER:射精 > (MAXBASE:MASTER:射精 / 3 * 2)
					PRINTFORML 「啊嗯~♥　这样做也很舒服吧…♥」
					PRINTFORMW 「呼啊~♥　再系紧一点好吗…♥」
					PRINTFORMW 「还是，更加，激烈…啊，嗯♥　到深处，嗯嗯~♥」
				ELSE
					PRINTFORML 「呼呼~♥　我会全部给你的…♥」
					PRINTFORMW 「%K30_C_NAME(MASTER)%は、交给我，由我来做，很舒服♥」
				ENDIF
			ELSE
				PRINTFORML 「%K30_C_NAME(MASTER)%っ♥　%K30_C_NAME(MASTER)%っ♥」
				PRINTFORMW 「这个，太厉害了♥都停不下来♥」
			ENDIF
		;腰振りＡ
		CASE 89
			SIF GROUPMATCH(TEQUIP:体位, 2, 5)
				CALL K30_PRINT_BUTT_IMAGE(75)
			IF RAND:2 == 1
				CALL HPH_PRINT("「啊啊啊~屁股一HPH　哦咕HPH　好厉害的，哦！HPH」", "L")
				CALL HPH_PRINT("「到里面HPH到里面来了了了了了HPH」", "W")
			ELSE
				CALL HPH_PRINT("「腰HPH　停不下来了HPH　这样的，这样的HPH」", "L")
				CALL HPH_PRINT("「明明不行啊，好厉害啊HPH　好厉害啊HPHHPH」", "W")
			ENDIF
		;固有Counterは141～145
		;TRAIN_MESSAGEは共通「%CALLNAME:PLAYER%把身体交给%CALLNAME:TARGET%任凭摆布……」
		CASE 141
			PRINTFORML 「啊呜~，嗯♥　嗯呃，嗯~……♥」
			IF TEQUIP:体位 == 2
				PRINTFORMDW 映姬似乎沉醉在身体全部被%CALLNAME:MASTER%蹂躏的感觉中…
				PRINTFORML （%K30_C_NAME(MASTER)%的手…%K30_C_NAME(MASTER)%的，大鸡巴…）
				PRINTFORMW （更加，更加…搅动我吧…♥）
			ELSE
				PRINTFORMDW %CALLNAME:MASTER%的手臂被抱着，映姬用陶醉的痴态吮吸着手指…
				PRINTFORML 「……嗯~♥　嗯啾……嗯啊~♥　嗯嗯·~…♥」
				PRINTFORMDL 爱蜜突然从映姬那里溢出，\@ TEQUIP:50 == MASTER ? 膣 # 尻 \@的紧箍变强了
				PRINTFORMDW 映姬似乎感受到了为%CALLNAME:MASTER%侍奉的快乐…
			ENDIF
		CASEELSE
			$OTHER_COUNTER
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「没错…就这样…安分一点吧…」
					PRINTFORMW 「很舒服吧？ …就这样，没关系…」
				CASE 1
					PRINTFORML 「来吧,全部交给我吧…」
					PRINTFORML 「%K30_C_NAME(MASTER)%只要保持安静」
					PRINTFORMW 「光是这样就能舒服起来…♥」
			ENDSELECT
	ENDSELECT
	;Ａ性交中は絶頂に応じて一言
	IF ABL:Ａ感覚 > 2 && (NOWEX:MASTER:11 || (PALAM:欲情 > PALAMLV:4 && NOWEX:Ａ絶頂)) && TEQUIP:51 == PLAYER
		IF TCVAR:20 == 87
			CALL K30_PRE_ORG_MES_A(6)
		ELSE
			CALL K30_PRE_ORG_MES_A(1)
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;361,抵抗＠なんか変なことやってるけど、一応これで全部に反応があるはず
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K30_361
IF TCVAR:30:363 == -2
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_361_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_361_1
#DIM BUNKI
#DIM ANATA
#DIM EIKI
;特殊処理(寝起き诶嘿嘿)
IF TCVAR:30:363 == -2
	PRINTFORML 「嗯…？不舒服吗？」
	PRINTFORML 「……呼呼呼，既然如此…我会让你有这样的感觉♥」
	PRINTFORMW 「首先，这里不是变得这么有精神了吗……没有说服力啊♥」
	RETURN 1
ENDIF
;どの部位をつかって诶嘿嘿中か調べる
EIKI = 0
FOR COUNT:0, 1, 9
	ANATA = COUNT:0
	FOR COUNT:1, 1, 9
		SIF MASTER_POSE(COUNT:1, COUNT:0) == 30
			EIKI = COUNT:1
	NEXT
	SIF EIKI
		BREAK
NEXT
;映姫様に生えてる・你にも穴はあるんだよな…の場合、そこを使ってたらパス
SIF EIKI == 1 || GROUPMATCH(ANATA, 2, 6)
	RETURN RESULT
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;你・映姫様の接触部位を指令ごとに割り振り
	;MASTER_POSEで進めると地の文との乖離がひどい
	ANATA = 0
	EIKI = 0
	SELECTCASE TCVAR:20
		;你の阴茎
		CASE 34, 50 TO 54, 85 TO 89
			ANATA = 1
		;你の指
		CASE 33, 76, 141
			ANATA = 3
		;你の口
		CASE 30, 60, 70, 72, 73, 77
			ANATA = 4
		;你の胸
		CASE 58, 59
			ANATA = 5
		;你の肛門
		CASE 55, 56
			ANATA = 7
	ENDSELECT
	SELECTCASE TCVAR:20
		;映姫様の栗
		CASE 52, 70
			EIKI = 2
		;映姫様の指
		CASE 34, 50, 55, 58
			EIKI = 3
		;映姫様の口
		CASE 30, 51, 56, 59, 60, 141
			EIKI = 4
		;映姫様の胸
		CASE 33, 53, 73, 77
			EIKI = 5
		;映姫様のあそこ
		CASE 76, 85, 86, 88
			EIKI = 6
		;映姫様のおしり
		CASE 72, 87, 89
			EIKI = 7
		;映姫様の足
		CASE 54
			EIKI = 8
	ENDSELECT
	;挿入おねだりと掀裙子
	IF GROUPMATCH(TCVAR:20, 35, 41, 43, 44)
		;掀裙子＠たくし上げしてるのに「退屈そう」は結構ひどい
		IF TCVAR:20 == 35
			IF TEQUIP:50 == PLAYER || TEQUIP:51 == PLAYER
				PRINTFORML 「…为什么？不兴奋吗？能满足吗…？」
			ELSE
				PRINTDATAL
					DATAFORM 「……我没有那么大的魅力吗」
					DATAFORM 「那个，那个反应是什么！这样也不错……明明很害羞…」
					DATAFORM 「那个反应…我有点寂寞…」
				ENDDATA
			ENDIF
			PRINTFORMDW 映姬有些失落…
		;挿入おねだり
		ELSE
			;欲情高いと騎乗位Counterへ移行
			IF PALAM:欲情 >= PALAMLV:8 && RAND:3
				PRINTDATAL
					DATAFORM 「这、这样子放着，这样啊…」
					DATAFORM 「这样的事，交给我……我该怎么办…」
					DATAFORM 「事，事到如今，忍耐一下什么的…做不到啊」
				ENDDATA
				PRINTFORMW 「………………」
				PRINTDATAL
					DATAFORM 「如果自己动的话，就没有意见了吧……？」
					DATAFORM 「也没有问你的必要…吧…」
					DATAFORM 「……没什么，可以。 我会随我节奏的」
				ENDDATA
				PRINTFORMDW 映姬美目里闪着可疑的光凝视着%CALLNAME:MASTER%…
				TCVAR:30:次回Counter = 85
				SIF TCVAR:20 == 44
					TCVAR:30:次回Counter = 87
			ELSE
				PRINTDATAL
					DATAFORM 「啊……为什么要忍耐呢…？」
					DATAFORM 「这，这么邀请你……为什么？」
					DATAFORM 「不给我吗……？」
				ENDDATA
				PRINTDATAW
					DATAFORM （我没有那么大的魅力吗…）
					DATAFORM （讨厌……突然，变得不好意思了…）
					DATAFORM （\@ TCVAR:20 == 44 ? 屁股 # 这里 \@，明明这么…难受…）」
				ENDDATA
			ENDIF
		ENDIF
	;映姫様の栗
	ELSEIF EIKI == 2
		PRINTDATAL
			DATAFORM 「事到如今，怎么了?……不会放过你的♥」
			DATAFORM 「不ー行♥　逃跑是不・行・的・哟♥」
			DATAFORM 「呼呼~♥　因为是个好地方…不会让你停下来的♥」
		ENDDATA
		PRINTFORMD 映姬%TEXTR("淘气地笑/微微一笑/浮现出淫乱的笑容/")%
		SELECTCASE ANATA
			CASE 1
				PRINTFORMDW ，更兴奋地动了动腰…
			CASE 3
				PRINTFORMDW %CALLNAME:MASTER%的手臂被抓着强行移动…
			CASE 4
				PRINTFORMDW 把%SLIT(30)%用力压在了%CALLNAME:MASTER%的脸上…
		ENDSELECT
	;映姫様の指
	ELSEIF EIKI == 3
		;肛門愛撫
		IF ANATA == 7
			PRINTDATAL
				DATAFORM 「你不习惯这么做吗？　\@ ABL:Ａ感覚 > 4 ? …这样的话，我会让你像我一样习惯起来的 # 嘿嘿嘿っ、不试试怎么知道哟 \@♥」
				DATAFORM 「ふふっ♥　朝这里攻击的话、果然完全没有叛逆力气了呀♥」
			ENDDATA
		;TINKOと乳頭をまとめる暴挙
		ELSE
			PRINTDATAL
				DATAFORM 「即使是露出那样的表情，也不行……这里变得这么硬了♥」
				DATAFORM 「呼呼♥　就算装出一副讨厌的样子，这里不是也这么高兴吗…♥」
				DATAFORM 「可以停止吗？这么硬着不管，能做到吗…♥」
			ENDDATA
		ENDIF
			PRINTDATAD
				DATAFORM 遭到抵抗的映姬似乎更兴奋了，
				DATAFORM 映姬好像觉得忍耐的%CALLNAME:MASTER%很有趣，
			ENDDATA
		SELECTCASE ANATA
			CASE 1
				PRINTFORMDW 用手全力搓揉%TINKO()%…
			CASE 5
				PRINTFORMDW 比平时更大胆地继续玩弄%CALLNAME:MASTER%的乳头…
			CASE 7
				PRINTFORMDW 指尖稍微侵入了肛门…
		ENDSELECT
	;映姫様の口で
	ELSEIF EIKI == 4
		;口交
		IF ANATA == 1
			PRINTDATAL BUNKI
				DATAFORM 「哈姆、嗯噗っ、叽啵っ…叽啵っ、reroっ♥」
				DATAFORM 「嗯、啾啵……啾噜♥　……嗯嗯っ、啾噜」
				DATAFORM 「啾噜、啾噜！　叽っ啵、啾っ卟♥　滋滋兹っ～」
			ENDDATA
		;他
		ELSE
			PRINTDATAL BUNKI
				DATAFORM 「嗯、啾……啾っ、reroっ♥　啾っ」
				DATAFORM 「嗯っ、啾啵っ、啾♥　……嗯嗯っ、啾っ」
				DATAFORM 「啾っ…reroっ…叽っ♥　啾っ♥　啾噜噜」
			ENDDATA
		ENDIF
		PRINTFORMD 映姬
		IF ANATA == 1
			PRINTDATAD
				DATAFORM 脑子里好像只剩下要含着那。
				DATAFORM 好象对口淫完全着迷了。
			ENDDATA
			PRINTDATAD
				DATAFORM 不介意从嘴里流出口水，
				DATAFORM 不管不顾拼命忍耐的%CALLNAME:MASTER%
			ENDDATA
		ELSE
			PRINTFORMD 的热情让%CALLNAME:MASTER%抵抗不住了。
		ENDIF
		SIF BUNKI == 2
			PRINTFORMD 尽管\@ ANATA == 4 ? 口水止不住的流下 # 发出下流的声音 \@，依然
		SELECTCASE ANATA
			CASE 1
				PRINTFORMD %TINKO()%を
			CASE 3
				PRINTFORMD 吸吮着手指
			CASE 4
				PRINTFORMD 激烈的热吻
			CASE 5
				PRINTFORMD 舔舐着乳头
			CASE 7
				PRINTFORMD 舔舐着肛门
		ENDSELECT
		IF ANATA == 1
			PRINTFORMDW %TEXTR("吸到喉咙深处/继续吮吸着/嘴里被塞满了/")%的…
		ELSE
			PRINTFORMDW \@ BUNKI == 2 ? 沉迷于此一样 # 满脑都被这件事填满 \@，映姬就像是…
		ENDIF
	;映姫様の胸部胸部＠地の文も「苦笑い」とか結構ひどい。貧乳は人々に夢や希望を与えている至高の存在
	ELSEIF EIKI == 5
		IF ANATA == 1
			PRINTDATAL
				DATAFORM 「…我…明白的…」
				DATALIST
					DATAFORM 「我果然还是完全做不到…」
					DATAFORM 「我、很想给你这样做…但是却…」
				ENDLIST
				DATAFORM 「………………………」
				DATAFORM 「这么小的、你不会讨厌吧…？」
			ENDDATA
			PRINTDATADW
				DATAFORM 映姬似乎受到了很大的打击…
				DATAFORM 映姬的表情真的很悲伤…
				DATAFORM 映姬面色阴沉地垂下秀目…
			ENDDATA
		ELSEIF NOWEX:噴乳 && TEQUIP:吸乳头
			PRINTFORML 「不行哟、现在是喂奶时间♥」
			PRINTFORML 「不好好吃奶的话、是不会长大的哟…♥」
			PRINTFORMDW 映姫把%CALLNAME:MASTER%像小孩子一样抱着的同时、让%CALLNAME:MASTER%将乳头完全含住…
		ELSE
			PRINTDATAL
				DATAFORM 「诶っ…你有点、不喜欢吗…」
				DATAFORM 「你在躲開吗…？　还是说…」
				DATAFORM 「呜哇、我明明是、鼓起了很大的勇气、下了很大的决心才这样做的…」
				DATAFORM 「难不成你是、在拿我和别人比较吗…？」
			ENDDATA
			PRINTDATADW
				DATAFORM 映姫满脸写着不服气…
				DATAFORM 映姫用怀疑的眼神看向%CALLNAME:MASTER%…
				DATAFORM 映姫表情变得复杂起来…
			ENDDATA
		ENDIF
	;映姫様のあそこ
	ELSEIF EIKI == 6
		;おせっせ
		IF ANATA == 1 && TCVAR:20 != 86
			PRINTDATAL
				DATAFORM 「不要忍耐…没关系的 ♥ 和我一起去吧 ♥」
				DATAFORM 「啊啊♥　%K30_C_NAME(MASTER)%、已经不想再刻意忍耐了♥　两个人一起，愉悦又舒服地去吧…♥」
				DATALIST
					DATAFORM 「我还想、再忍一忍？」
					DATAFORM 「呼呼呼っ、那可不行啊♥，我会让你更舒服的…♥」
				ENDLIST
			ENDDATA
		;舐陰・愛撫強制
		ELSEIF TCVAR:20 != 86
			PRINTDATAL
				DATAFORM 「不是我、要求你这样做  ♥　是你应当、这样做…♥」
				DATAFORM 「我要跟你、两个人…一起变的舒服。所以说、准备工作…你也要来帮忙才行…♥」
				DATAFORM 「只是这样、有点单调了…？　怎么会呢？要循・序・渐・进・哟…♥」
			ENDDATA
		ENDIF
		IF ANATA == 1
			SELECTCASE TEQUIP:体位
				;正常位
				CASE 1
					PRINTFORMDL 映姫用一双玉腿夹住%CALLNAME:MASTER%的身体
					PRINTFORMDL %SLIT(30)%完全地将%CALLNAME:MASTER%的%TINKO()%吞没到里面…
				;後背位
				CASE 2
					PRINTFORMDL 映姫主动撅着雪白的屁股前后摇曳，让%TINKO()%不断拔出再插入
					PRINTFORMDL 像淫荡的母狗一样摇着雪臀的映姬的身姿和%SLIT(30)%的炙热，%TINKO()%无法辩驳地沸腾起来…
				;騎乗位
				CASE 3
					IF TCVAR:20 != 86
						IF RAND:3 == 1
							PRINTFORMDL 映姫半蹲着坐到%CALLNAME:MASTER%的腰间、像打桩一样摆动着柳腰
							PRINTFORMDL %TEXTR("雌穴/肉壺/蜜壺/膣内/")%传来灼热的快感、%CALLNAME:MASTER%的忍耐防线很快就要崩溃了…
						ELSEIF RAND:2 == 1
							PRINTFORMDL 映姬双腿呈M形张開，展示着阴茎被%TEXTR("雌穴/肉壺/蜜壺/膣内/")%吞没的样子
							PRINTFORMDL 平时根本无法想象的阎王大人猥亵的样子，%CALLNAME:MASTER%被吸引到目不转睛地盯着…
						ELSE
							PRINTFORMDL 映姫用手撑着%CALLNAME:MASTER%的腰、缓缓開始主动摆动起纤细的腰肢
							PRINTFORMDL 上下反复着、在%CALLNAME:MASTER%上，上演了一段能够榨尽男人精气的淫靡舞蹈。…
						ENDIF
					ENDIF
			ENDSELECT
			SIF TCVAR:20 != 86
				PRINTFORMW
			IF NOWEX:MASTER:11
				PRINTDATAL
					DATAFORM 「看♥ 看吧♥ 很舒服的吧♥　完全不需要、继续忍耐下去了♥」
					DATAFORM 「呼呼~嘶♥　感受到了、能感受到、就要来了♥　很舒服、很快乐、已经、要高潮了嘶♥」
				ENDDATA
				IF TCVAR:20 == 86
					PRINTDATAL
						DATAFORM 「哎呀っ♥　没什么不好意思的~♥　你想要的、我都会给你的♥」
						DATAFORM 「哈啊…哈啊…んっ♥　很抱歉？什么嘛~♥　能这么舒服、不是很好嘛っ♥」
					ENDDATA
				ENDIF
				IF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && !TEQUIP:PLAYER:避孕套 && !TCVAR:口服避孕薬
					PRINTFORML 「给我吧♥　我愿意、给我吧っ♥　拜托你、让我怀孕吧っ♥♥」
				ELSEIF !TEQUIP:PLAYER:避孕套
					PRINTFORML 「可以哟っ♥ 在里面、射出来什么的っ♥ 尽管射吧、射满我、满满地射进来吧！♥♥」
				ELSEIF NOWEX:Ｖ絶頂
					PRINTFORML 「一起来吧♥　我准备好了♥　两个人、一起、更多的快乐♥　啊っ♥　啊啊っー♥♥」
				ELSE
					PRINTFORML 「没关系的、你先射出来、没问题的♥　因为我会继续、做下去、没问题的っ♥　我们两个人、再多做几次、再多做几次就好了っ♥♥」
				ENDIF
				PRINTFORMW
			ENDIF
		;舐陰・愛撫強制
		ELSE
			SELECTCASE ANATA
				CASE 3
					PRINTFORMDW 映姫抓住了%CALLNAME:MASTER%的手腕、引导向能让自己既变得舒服的地方…
				CASE 4
					PRINTFORMDW 映姫把%SLIT(30)%压在%CALLNAME:MASTER%的嘴边、将她溢出的爱汁倾注进去、…
			ENDSELECT
		ENDIF
	;映姫様はお尻が弱い
	ELSEIF EIKI == 7
		LOCAL = 0, 63, 0, 5, 4
		SIF !(ANATA == 1 && TEQUIP:体位 == 1)
			CALL K30_PRINT_BUTT_IMAGE(LOCAL:ANATA)
		PRINTDATA
			DATAFORM 「达咩っ
			DATAFORM 「咿呀っ
			DATAFORM 「呼呼っ
			DATAFORM 「啊嗯っ
		ENDDATA
		CALL HPH_PRINT(@"HPH　")
		PRINTDATA
			DATAFORM 想半途而废的话、我可不允许っ
			DATAFORM 继续、多…多一点、请继续吧ぉ
			DATAFORM 屁股~嘶哈、再多来一点っ
			DATAFORM 啊~感觉很好、完全停不下来啊っ
		ENDDATA
		CALL HPH_PRINT, @"HPHHPH」", "L"
		PRINTFORMD 映姬是%CALLNAME:MASTER%的
		PRINTDATAD
			DATAFORM 完全无视了%CALLNAME:MASTER%的目标
			DATAFORM 抵抗住了%CALLNAME:MASTER%
		ENDDATA
		SELECTCASE ANATA
			CASE 1
				PRINTDATADW
					DATAFORM 、贪图着肛门性交的快感…
					DATAFORM 、一个劲地活动腰部、反复抽送菊穴…
					DATAFORM 、直腸和%TINKO()%噗啾噗啾地反复挤压摩擦…
				ENDDATA
			CASE 3
				PRINTFORMDW 、握住%CALLNAME:MASTER%的手、像用震动棒一样自行抽插起来…
			CASE 4
				PRINTFORMDW 、将菊穴压在を%CALLNAME:MASTER%的嘴上…
		ENDSELECT
	;足は足交一択
	ELSEIF EIKI == 8
		PRINTDATAL
			DATAFORM 「……有那么，讨厌吗？」
			DATAFORM 「即使你露出那样的表情，我也…」
		ENDDATA
		PRINTDATAW
			DATAFORM 「还是含着比较好吧?我也…我喜欢你♥」
			DATAFORM 「我知道了。那么，我舔你……这样就没有意见了？」
			DATAFORM 「下次我会好好照顾你的。给你舔，吶…」
		ENDDATA
		;確かめた範囲では誘導できてる
		TCVAR:30:次回Counter = 51
	;ソフトCounter・抱きしめ等
	ELSE
		PRINTDATAL
			DATAFORM 「诶……这种反应，总觉得很受伤…」
			DATAFORM 「那样的……明明想和你接触…不行吗？」
			DATAFORM 「为什么…？ 明明想让你好好舒服的…」
		ENDDATA
		PRINTDATADW
			DATAFORM 映姬有点闹别扭了…
			DATAFORM 映姬有些失望…
			DATAFORM 映姬轻轻地撅着嘴…
		ENDDATA
	ENDIF
	;Ａ性交中は絶頂に応じて一言
	IF ABL:Ａ感覚 > 2 && (NOWEX:MASTER:11 || (PALAM:欲情 > PALAMLV:4 && NOWEX:Ａ絶頂)) && TEQUIP:51 == PLAYER
		IF TCVAR:20 == 87
			CALL K30_PRE_ORG_MES_A(6)
		ELSE
			CALL K30_PRE_ORG_MES_A(1)
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;363,朗読（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:陪睡中(1=被窝orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_SUCCESS_COM_K30_363
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_363_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;368,陪同行動
;==================================================
@M_KOJO_MESSAGE_COM_K30_368
IF Activity_Type:30 != 5 || TCVAR:30:364
	CALL TRAIN_MESSAGE
	SIF TCVAR:30:364
		RETURN 1
ELSE
	CALL K30_D_LINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_368_1
RETURN RESULT
@M_KOJO_MESSAGE_COM_K30_368_1
#DIM NUM
#DIM PLACE
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;Activity_Type =0考え事/=1玩遊戲/=2吃飯/=3つまみ食い/=4掃除/=5運動/=6読書/=7料理
	;				=8セッション/=9採集/=10釣魚/=11調合/=12休憩/=13晩酌/=14買い物/=15説教/=16落とし穴
	SELECTCASE Activity_Type:30
		CASE 0
			IF TFLAG:193 == -1
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「……这与你无关」
					CASE 1
						PRINTFORML 「是啊……关于应该对你说的话有很多吗」
						PRINTFORML 「如果是什么的话，我现在就告诉你？」
						PRINTFORMDW %CALLNAME:MASTER%竭力推辞了…
					CASE 2
						PRINTFORML 「……在思考我的工作」
						PRINTFORMW 「当然不能告诉你」
				ENDSELECT
			ELSE
				PRINTDATAL
					DATAFORM 「不。虽然不是什么大不了的事情」
					DATAFORM 「也不是什么值得一提的事」
					DATAFORM 「听着也不是什么有趣的事哦？」
				ENDDATA
				PRINTDATA
					DATAFORM 「小町的偷懒习惯，
					DATAFORM 「久侘歌的健忘
					DATAFORM 「是非曲直庁の財政
					DATAFORM 「审判的效率
				ENDDATA
				PRINTFORMW %TEXTR("如果能解决的话/能不能想想办法/希望能有所改善")%…」
			ENDIF
		CASE 2
			$EAT
			IF TFLAG:193 < 0
				PRINTFORML 「『请给我一口』…是吗？」
				PRINTFORMW 「不是很有礼貌的事情呢」
			ELSEIF TALENT:恋慕
				PRINTFORML 「嗯，一起吃吧」
				PRINTFORMW 「这样吃起来更美味」
			ELSE
				PRINTFORML 「如果你说想要，我可以给你…」
				PRINTFORMW 「要不先洗手，好好坐下」
			ENDIF
		CASE 4
			;映姫様私室なら掃除指令に丸投げ
			IF CFLAG:30:現在位置 == CFLAG:30:初期位置
				TFLAG:193 = 1
				SELECTCASE YOGORE:(CFLAG:30:現在位置)
					CASE IS < 500
						TFLAG:194 = 0
					CASE IS < 2000
						TFLAG:194 = 1
					CASE IS < 5000
						TFLAG:194 = 2
					CASEELSE
						TFLAG:194 = 3
				ENDSELECT
				CALL M_KOJO_MESSAGE_COM_K30_410_1
			ELSE
				PRINTFORML 「能帮我吗？非常感谢」
				IF RAND:2 == 1
					PRINTFORML 「注意到的人注意到的时候把它打扫干净」
					PRINTFORMW 「保持舒适的地方是理所当然的」
				ELSE
					PRINTFORML 「我也不能因为是阎魔就逞威风」
					PRINTFORMW 「只有成为大家的模范，才有资格教导别人」
				ENDIF
			ENDIF

		CASE 5
			PRINTFORMDL %CALLNAME:PLAYER%和映姬一起练习弹幕游戏。
			PRINTFORMW
			PRINTFORML 「你当练习对手？非常感谢」
			IF ABL:MASTER:戦闘能力 < ABL:30:戦闘能力
				PRINTFORML 「为了以防万一，积累锻炼是非常重要的哦」
				PRINTFORMW 「我也全力以赴吧…」
			ELSE
				PRINTFORML 「%K30_C_NAME(MASTER)%如果是你做对手，那就再好不过」
				PRINTFORMW 「从一開始就全力以赴…」
			ENDIF
			PRINTFORML 「審判『最后判决』！」
			PRINTFORMW
			PRINTFORMDW ……虽然吃了不少苦头，但是训练得很好
		CASE 6
			IF TFLAG:193 == -1
				PRINTFORMW 「………………」
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「阿加莎·克里斯Q老师的小说，，正如评价的那样有趣」
						PRINTFORMW 「听说在后面的出租屋租也是排队的…这也是可以理解的」
					CASE 1
						PRINTFORML 「一边学习，一边解读很多世界上的神话」
						PRINTFORML 「但是，怎么说呢…无论在哪个地方掌管地狱的女神」
						PRINTFORMW 「说是有个性，还是自我意识强的人比较多，很辛苦吧…」
					CASE 2
						PRINTFORML 「幻想乡缘起，以不同于以往的切入点进行总结，非常有趣」
						PRINTFORML 「虽然留给御阿礼之子的时间不多了」
						PRINTFORMW 「我希望她能继续编纂，不要后悔」
				ENDSELECT
			ENDIF
		CASE 7
			IF TFLAG:193 == 2
				SELECTCASE ABL:TARGET:料理技能
					CASE IS <= 1
						PRINTFORMW 「呃……使用菜刀的时候……嗯，确实是……手按住……」
						PRINTFORMW 「……讶！！」
					CASE 2, 3
						PRINTFORML 「能帮我吗？非常感谢」
						PRINTFORMW 「那么，需要的东西就在那里，能按顺序切吗」
					CASEELSE
						PRINTFORML 「根据步骤和安排的不同，料理的火候和效果也有很大的不同呢」
						PRINTFORML 「这适用于任何事情哦。 从平时的行动開始好好制定计划……」
						PRINTFORMDW 映姬灵巧地同时进行着料理和对%CALLNAME:MASTER%进行着说教
				ENDSELECT
			ELSE
				GOTO EAT
			ENDIF
		CASE 9
			;採集可能な高級素材以上をひとつ選択
			NUM = 0
			VARSET LOCAL
			PLACE = GATHERING_SPOT(CFLAG:現在位置, 1)
			FOR COUNT, 600, 710
				SIF !GATHERING_PRODUCT(COUNT, PLACE)
					CONTINUE
				SIF ITEMPRICE:COUNT < 3000
					CONTINUE
				LOCAL:NUM = COUNT
				NUM ++
			NEXT
			;高級素材以上がない
			IF !NUM
				PRINTFORML 「嗯ーん…完全找不到」
				PRINTFORMW 「不是这里吗…」
			ELSE
				NUM = LOCAL:RAND(NUM)
				LOCALS = %ITEMNAME:NUM%
				PRINTFORML 「能帮我吗？非常感谢」
				PRINTDATAW
					DATAFORM 「那么找到%LOCALS%的话请告诉我」
					DATAFORM 「努力寻找%LOCALS%吧」
					DATAFORM 「这附近一定有%LOCALS%」
				ENDDATA
				;季節条件外していて指摘できる教養がある
				;SIF !GATHERING_SEASON(NUM, PLACE) && (ABL:MASTER:教養 >= 3 || (ITEMPRICE:NUM < 10000 && ABL:MASTER:教養 >= 2))
					;PRINTFORMW 「……诶？　现在这个季节不行吗…？」
			ENDIF
		CASE 13
			IF TALENT:恋慕
				IF ONCE("お酌")
					PRINTFORML 「%K30_C_NAME(MASTER)%、坐在我旁边？」
					PRINTFORML 「对对…能紧紧贴在一起就好了…」
					PRINTFORMW 「来吧…来一个，请…♥」
				ELSEIF RAND:2 == 1
					PRINTFORML 「喝的量要适当」
					PRINTFORML 「和%K30_C_NAME(MASTER)%聊天很有趣」
					PRINTFORMW 「喝醉了的话，不是很可惜吗」
				ELSE
					PRINTFORML 「因为想和阎魔对饮的人不多」
					PRINTFORML 「很高兴你能陪我…」
					PRINTFORMW 「嗯~…总觉得…心情好好…♪」
				ENDIF
			ELSE
				IF ONCE("お酌")
					PRINTFORML 「%K30_C_NAME(MASTER)%也来一杯怎么样？」
					PRINTFORML 「…不用那么警惕也没关系哦」
					PRINTFORMW 「不会因为喝醉了而说教什么的」
				ELSEIF CHARA_HOLIDAY(30, 1)
					PRINTFORML 「只喝一小口一小口？当然，当然」
					PRINTFORML 「酒气不能留到明天」
					PRINTFORMW 「宿醉的法官不是最糟糕的吗」
				ELSE
					PRINTFORML 「今天也好好工作了一天…」
					PRINTFORML 「哎，我偶尔也会放松一下」
					PRINTFORMW 「%K30_C_NAME(MASTER)%、能再陪我一会儿吗？」
				ENDIF
			ENDIF
		CASE 15
			IF TFLAG:193 == 1
				PRINTFORML 「哦呀？　%K30_C_NAME(MASTER)%也对我的教导感兴趣？」
				PRINTFORML 「很好吧。我也跟你好好谈谈吧」
				PRINTFORMW 「可以吗……」
			ELSE
				PRINTDATAL
					DATAFORM 「……是的，你有点………太！ 懂吗……」
					DATAFORM 「……有好好听吗？这也是为你着想……」
					DATAFORM 「……积累善行是非常重要的。尽管如此……」
				ENDDATA
				PRINTFORML 「………………！　………………！！」
			ENDIF
			PRINTFORMDW 映姬神采奕奕…
	ENDSELECT
ENDIF
RETURN 1

;自由行動判定用関数
;上記貂プレに対応するCASEでRETURN -1するとその自由行動をしなくなります
;調合/休憩/買い物/炬燵を制限
@自由行動判定_K30(ARG)
SELECTCASE ARG
	CASE 11, 12, 14, 18
		RETURN -1
	CASEELSE
		RETURN 0
ENDSELECT

;==================================================
;402,就寝
;TFLAG:193(0=通常 1=兒童と一緒に川の字で寝る)
;==================================================
@M_KOJO_MESSAGE_COM_K30_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_402_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠
		CFLAG:1605 = 1
		PRINTFORMDW 看着映姬安稳的睡脸%CALLNAME:MASTER%也睡着了
	ELSEIF CFLAG:MASTER:初期位置 == CFLAG:30:初期位置 || CFLAG:MASTER:現在位置 == OMANEKIBEYA() || FLAG:一時滞在 == 30 || CFLAG:30:陪睡中
		CFLAG:1605 = 1
		IF CFLAG:318 == 1
			PRINTFORMW 「…哼！」
			PRINTFORMDW 映姬在睡觉之前背过了身去
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「…希望明天也是美好的一天呢」
				CASE 2
					PRINTFORML 「…%K30_C_NAME(MASTER)%,已经睡着了么？」
					PRINTFORMW 「………」
					PRINTFORML …ちゅ♥
				CASE 3
					PRINTFORML 「也是呢,快睡吧」
			ENDSELECT
			PRINTFORMW 「晚安,%K30_C_NAME(MASTER)%……」
		ENDIF
	ELSEIF CFLAG:MASTER:現在位置 != CFLAG:30:初期位置
		PRINTFORML 「这样啊,那么失礼了」
		PRINTFORMW 「%K30_C_NAME(MASTER)%,晚安」
	ELSE
		CFLAG:1605 = 1
		PRINTFORML 「嗯……今天、你会留下来…对吧…」
		PRINTFORMW 「晚安,%K30_C_NAME(MASTER)%……」
	ENDIF
ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:睡眠(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_MESSAGE_COM_K30_403
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_403_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠
	ELSEIF TCVAR:烂醉 == 1
		PRINTFORMW 「唔～不休息一下的话…」
	ELSEIF TCVAR:30:364
		PRINTFORML 「%K30_C_NAME(MASTER)%...平静下来之后...」
		CALL HPH_PRINT, "「快...快点,来我这里...HPH」", "L"
		PRINTFORMDW 现在的状态似乎无暇休息
	ELSEIF K30_CHECK_HEN_T() && TALENT:心情 > -1
		PRINTFORMDW 映姬一动不动地只是坐着。 变得有点担心……
	ELSE
		;映姫様体力半分以下or気力半分以下
		IF BASE:TARGET:体力 <= (MAXBASE:TARGET:体力 / 2) || BASE:TARGET:気力 <= (MAXBASE:TARGET:気力 / 2)
			IF TALENT:恋慕
				PRINTFORML 「…我好像也累了」
				PRINTFORMW 「一起休息吧」
			ELSE
				PRINTFORMW 「这样啊。那我也休息一下吧」
			ENDIF
		;MASTER体力半分以下
		ELSEIF BASE:MASTER:体力 <= (MAXBASE:MASTER:体力 / 2)
			IF TALENT:恋慕
				PRINTFORML 「不要太勉强哦」
				PRINTFORMW 「你看，坐在我旁边…稍微休息一下吧」
			ELSE
				PRINTFORML 「您好像很累了」
				PRINTFORMW 「请慢慢来」
			ENDIF
		;MASTER気力1/4以下
		ELSEIF BASE:MASTER:気力 <= (MAXBASE:MASTER:気力 / 4)
			IF TALENT:恋慕
				PRINTFORML 「%K30_C_NAME(MASTER)%、眼睛稍微有点呆滞了哦」
				PRINTFORMW 「该休息的时候就休息吧。你看，坐在这边…」
			ELSE
				PRINTFORML 「总觉得有点发愣…没事吧？」
				PRINTFORMW 「这样的话，善行也积不起来。请稍微休息一下」
			ENDIF
		ELSE
			PRINTFORML 「你看起来不那么累……有时间了吗？」
			PRINTFORMW 「机会难得，这个时间我给你讲讲道理吧」
			PRINTFORMDW ……在接受说教的间隙休息了
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会
;条件が厄介なので、COMF405 外出.ERBを参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K30_405
;外出にTRAIN_MESSAGEは無い
CALL M_KOJO_MESSAGE_COM_K30_405_1
;约会お誘いスイッチオフ
TCVAR:30:358 = 0
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
PRINTFORML
CALL M_KOJO_COLOR_K30
IF LOCAL
	;TARGETと约会
	IF CFLAG:同行
		CALL K30_DENY_POLYAMORY(1)
		RESULT = 0
		SIF !GETBIT(CFLAG:1609, 2)
			CALL K30_INSERT_VIBE_DATE
		SIF RESULT
			GOTO SKIP
		IF K30_CHECK_HEN_T()
			PRINTFORMW 「今天不去不行吗…」
		ELSEIF TALENT:恋慕
			IF ENDURE(30) > 600
				IF RAND:2 == 1
					PRINTFORML 「和你一起出门当然很開心…」
					PRINTFORMW 「要不要找一个两个人独处的地方?…♥」
				ELSE
					PRINTFORML 「现、现在就出发…可以吗…？」
					PRINTFORML 「让我想想该去哪里呢……」
					PRINTFORMW 「算了、没什么…」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORML 「要出门吗？　ええ、可以啊よ」
					PRINTFORMW 「放心~。只要是跟你在一起、阎魔大人也可以放假的」
					PRINTFORMW 「……是不是真心的？ 没问题啦、我会忍住不对你进行说教的……大概吧……」
				ELSE
					PRINTFORML 「要去约会吗？那我们走吧」
					PRINTFORML 「这可是珍稀的休息时间、能和珍惜的人一起度过就再好不过了」
				ENDIF
			ENDIF
		ELSE
			PRINTFORML 「要一起出去吗？　ええ、可以哟~」
			PRINTDATAL
				DATALIST
					DATAFORM 「换个地方、换个心情、认真地聆听我的教诲吧」
					DATAFORM 「真是个好计划呢」
				ENDLIST
				DATAFORM 「我会在路上沿途教你行善的道理的」
				DATAFORM 「现在出去的话，也不知道能够教化多少人…」
			ENDDATA
			PRINTFORMDW 将阎魔大人从说教中拉出来了…
		ENDIF
	;TARGET以外と约会
	ELSEIF CFLAG:MASTER:同行
	;お出かけお見送り
	ELSE
	ENDIF
ENDIF
$SKIP
RESETCOLOR
RETURN 1
;==================================================
;410,掃除
;掃除バリアントなんだし、もっと分量増やしたい
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(掃除前の清潔度 3=垃圾山 2=低～やや低 1=中～やや高 0=高～最高
;OUTROOF(CFLAG:現在位置)(野外掃除（冬は扫雪
;==================================================
@M_KOJO_MESSAGE_COM_K30_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_410_1
#DIM DRIP
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時間停止
	IF FLAG:70
		PRINTFORMDW 扫除结束后,静静地拂去了映姬身上的\@ (OUTROOF(CFLAG:現在位置)&& DAY:2 == 4) ? 雪 # 灰尘 \@。
	;ウフフ中
	ELSEIF CFLAG:317 > 0
		PRINTFORMW 「…………？」
		PRINTFORMW 「那是现在该做的事吗…？」
	ELSEIF TCVAR:烂醉 == 1
		PRINTFORMW 「啊哈哈～在努力呢～？」
		SIF TFLAG:193 == 1
			PRINTFORMW 「真拿你没办法呐～我也会加油的～」
	ELSEIF CFLAG:30:睡眠
	ELSEIF K30_CHECK_HEN_T()
		IF TFLAG:193 == 0
			PRINTFORML 「……………………」
			PRINTFORMDW 映姫只是呆呆地看着做\@ (OUTROOF(CFLAG:現在位置) && DAY:2 == 4) ? 扫雪 # 掃除 \@的%CALLNAME:MASTER%
		ELSE
			PRINTDATAL
				DATAFORM 「不要看这边，请集中精力\@ (OUTROOF(CFLAG:現在位置) && DAY:2 == 4) ? 扫雪 # 掃除 \@…」
				DATAFORM 「振作点……干吧…」
				DATAFORM 「活动一下身体……得改变心情……」
			ENDDATA
			PRINTFORMDW 映姬一边在意着胸口的松垮感一边\@ (OUTROOF(CFLAG:現在位置) && DAY:2 == 4) ? 扫雪 # 掃除 \@\@ SELECTCOM == 410 ? 帮忙 # 继续 \@着
		ENDIF
	;見てるだけ
	ELSEIF TFLAG:193 == 0
		;映姫様的房間
		IF CFLAG:MASTER:現在位置 == CFLAG:30:初期位置
			PRINTFORML 「诶？你想要打扫么？」
			PRINTFORMW 「虽然不太想让你帮忙…」
			PRINTFORMW 「那么除了我指示的东西以外,请不要碰别的东西」
		ELSE
			PRINTFORMW 「很用心呢」
			;扫雪
			IF 	OUTROOF(CFLAG:現在位置)&& DAY:2 == 4
				PRINTFORML 「以奉献之心益他人」
				PRINTFORML 「这也是能积少成多的善行」
			ELSE
				PRINTFORML 「扫除可以磨练自己的内心」
				PRINTFORML 「请不要忘记这种感觉」
			ENDIF
			PRINTFORMDW 映姬满意地点头
		ENDIF
	;手伝う
	ELSE
		;扫雪
		IF OUTROOF(CFLAG:現在位置) && DAY:2 == 4
			IF RAND:2 == 1
				PRINTFORML 「为了大家而做的行动一定能得到大家的感激的」
				PRINTFORMW 「更不用说是像扫雪这样辛苦的工作了」
				PRINTFORMW 「请务必也让我来帮忙吧」
			ELSE
				PRINTFORML 「这么辛苦的事，一个人是做不到的。我也来帮忙」
				PRINTFORML 「可能很重?不不，这点小事我完全无所谓」
				PRINTFORMDL 实际上，映姬是轻轻松松地收拾着沉重的积雪
				PRINTFORMDW 那纤细的手臂哪里有那样的力量呢…
				PRINTFORML
				PRINTFORML 「悔悟棒、有吧？　那个的重量会随着罪人罪孽的重量而增加」
				PRINTFORML 「和平时我审判的罪的重量相比，这雪就像羽毛一样」
				PRINTFORML 「没错，罪孽是如此沉重」
				PRINTFORMW 「可以吗，%K30_C_NAME(MASTER)%……」
				PRINTFORML
				PRINTFORMDW 多亏了映姬，扫雪一转眼就结束了，剩下的时间全部都被说教了
			ENDIF
		;映姫様的房間
		ELSEIF CFLAG:MASTER:現在位置 == CFLAG:30:初期位置
			;事後＠汚部屋になるのは主に映姫様の汁のせい
			IF TALENT:恋慕 && TCVAR:30:378 && TFLAG:194 != 0
				IF DRIP == DAY
					PRINTFORML 「终于把地面擦完了」
					PRINTFORMW 「还有很多残留物需要打扫…」
					PRINTFORMW 「……………………」
					PRINTFORMW 「早点做完吧か…」
				ELSEIF TFLAG:194 > 1
					PRINTFORMW 「为什么这么脏…」
					PRINTFORMW 「……无论怎么说」
					PRINTFORMW 「…%K30_C_NAME(MASTER)%还有、我……」
					PRINTFORMW 「我…把这里…弄得太脏了…」
					IF CFLAG:1607 > 1 && RAND:3 == 1
						PRINTFORMW 「用屁股…来做、实在是、太舒服了…」
						PRINTFORMW 「我的爱液、完全停不下来、从里面…一直喷出来」
						PRINTFORMW 「老是这样…把周围、弄得一团糟…啊…」
					ELSEIF RAND:3 == 1
						PRINTFORMW 「每次…跟你做的时候、我…」
						PRINTFORMW 「我的身体…就会变得敏感、浑身发热、大喊大叫的…还有高潮的时候」
						PRINTFORMW 「汗水、口水还有爱液…弄得到处都是…」
					ELSEIF RAND:2 == 1
						PRINTFORMW 「你看、我这边…太舒服了、……」
						PRINTFORMW 「一不留神、爱液都…哦、溢出来了」
						PRINTFORMW 「连你身上、都湿透了呀…好多、好多水啊…」
					ELSE
						PRINTFORMW 「%K30_C_NAME(MASTER)%呀、真是不懂得…一点点的怜香惜玉…」
						PRINTFORMW 「我们…两个…的体液、到处都是…」
						PRINTFORMW 「到最后…快感、完全停不下来…」
					ENDIF
					PRINTFORMW 「……………………」
					PRINTFORMW 「扫除工作、我们来擦擦干净吧……」
					PRINTFORML
					PRINTFORMW 「……阿嚏、连这种地方都…灰尘都扬起来了……」
					DRIP = DAY
				ELSE
					PRINTFORML 「诶诶、可以哟。就这样清理吧」
					PRINTFORMW 「我们早点打扫完毕吧」
					PRINTFORMW 「……………………」
					PRINTFORML 「要是我们的爱的痕迹被人发现的话」
					PRINTFORMW 「我可就要羞到找层地狱钻进去了…」
				ENDIF
			;同棲中的房間
			ELSEIF CFLAG:MASTER:初期位置 == CFLAG:30:初期位置
				IF TFLAG:194 > 1
					PRINTFORML 「你\@ TFLAG:194 == 3 ? 和我 # \@的个人物品、究竟应该归置在哪里呢？」
					PRINTFORMW 「像这样乱丢搞得一团糟、让部下看见像什么样子啊」
					PRINTFORMW 「快来快来、我们赶紧打扫一下」
				ELSE
					PRINTFORMW 「因为是能二人独处的重要场所」
					PRINTFORMW 「肯定要打扫的干干净净嘛…♥」
				ENDIF
			;映姫様的房間
			ELSE
				IF TALENT:恋慕
					PRINTFORMW 「嗯？…我的房间需要打扫、你对这个这么关注吗？」
					PRINTFORMW 「抱歉,有点不好意思…」
					PRINTFORMW 「我们两人一起、让它干净起来吧」
				ELSE
					PRINTFORMW 「想打扫一下这里？　不介意不介意、请便吧」
					PRINTFORML 「但是、有些东西随意触碰的话、到时候会很麻烦的」
					PRINTFORMW 「所以说、你就把我清理出来的垃圾丢掉就好，怎么样？」
				ENDIF
			ENDIF
		;小町的房間
		;小町口上での映姫様個室的家捜し感がとても良かったのでまねしてみました。小町口上作者様、ありがとうございます
		ELSEIF CFLAG:MASTER:現在位置 == CFLAG:76:初期位置
			IF TFLAG:194 > 1
				PRINTFORML 「哇……那个孩子的房间果然是一如既往的……没事……」
				PRINTFORMW 「不管我怎么提醒她、她就只是回复我『是、是』……」
			ELSE
				PRINTFORML 「多亏我平日里还对这孩子苦口婆心地教导、要是不时刻耳提面命的话还不知要变成什么样子」
				PRINTFORMW 「是诶、那孩子就是典型的『大大咧咧』的类型……」
			ENDIF
			IF CFLAG:76:現在位置 == CFLAG:76:初期位置 && SHIRAHU(76)
				PRINTFORML 「…你有好好在听吗！小町！　我命令你、不准在一旁傻看着！」
				PRINTFORMDW 映姫一边抽打小町的屁股，一边驱赶着她将\@ TFLAG:194 > 1 ? 乱糟糟的# \@房间打扫干净
			ELSE
				PRINTFORMDW 映姫一边发牢骚一边将\@ TFLAG:194 > 1 ? 乱糟糟的 # \@的房间打扫干净
			ENDIF
			PRINTFORML
			;汚部屋の時はブラ
			IF TFLAG:194 > 1
				;こまえーき丼頂いていた時
				IF GET_UWAKI_HISTORY(30, 76) == 2 && RAND:2 == 1
					PRINTFORML 「啊咦？……这是？…」
					PRINTFORMDW 发现了一只脱下的胸罩、映姬停下了手上的动作
					PRINTFORMW （这是小町她跟我…和%K30_C_NAME(MASTER)%一起XX的时候、穿着的内衣啊…）
					PRINTFORMW （…说起来、那个孩子的胸部、简直就是又大…又漂亮……）
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML （被那个胸部夹着的时候、%K30_C_NAME(MASTER)%露出了舒服的表情…）
							PRINTFORMW （小町当时笑的也很開心…总觉得很可愛……）
						CASE 1
							PRINTFORML （只是稍微摸了一下、真的是又柔软、又温暖…心跳加速啊…）
							PRINTFORMW （%K30_C_NAME(MASTER)%把脸埋在里面时候的表情……呜呜、好羡慕…）
						CASE 2
							PRINTFORML （乳头被刺激到的时候、她真是吓了一跳、然后又笑起来…露出了可爱的表情…）
							PRINTFORMW （看着%K30_C_NAME(MASTER)%在嘬奶、连我都想跟他一起去嘬了…）
					ENDSELECT
					PRINTFORMW （…讨厌啦、我、我在想些什么东西啊…）
				ELSEIF RAND:2 == 1
					PRINTFORML 「这是……」
					PRINTFORMDW 映姬被看到被忘记在地上的胸罩，将其捡起
					PRINTDATAW
						DATAFORM （这怎么回事？…比之前看到的、更大了…？）
						DATAFORM （这个…还能叫胸罩？搞什么啊…这个大小…简直就是两个帽子接在一起一样…）
						DATAFORM （这个钢丝硬撑…应该是类似于、用来支撑的道具吗？）
						DATAFORM （还有这个…与其说是肩带、不如说是背带…这样才能支撑起那么大的吗？）
						DATAFORM （这是啥啊、形容罩杯的文字吗…按字母顺序来看的话………诶诶！！！？）
					ENDDATA
				ENDIF
			;そうでない時はサボりの証拠かブラ
			ELSEIF RAND:4 != 1
				PRINTFORML 「这……？」
				PRINTFORMDW 映姬被看到被忘记在地上的胸罩，将其捡起
				PRINTDATAW
					DATAFORM （这怎么回事？…比之前看到的、更大了…？）
					DATAFORM （这个…还能叫胸罩？搞什么啊、这个大小…简直就是两个帽子接在一起一样…）
					DATAFORM （这个钢丝硬撑…应该是类似于、用来支撑的道具吗？）
					DATAFORM （还有这个…与其说是肩带、不如说是背带…这样才能支撑起那么大的吗？）
					DATAFORM （这是啥啊、形容罩杯的文字吗…按字母顺序来看的话………诶诶！！！？）
				ENDDATA
			ELSEIF RAND:2 == 1
				PRINTFORML 「嗯？　这是什么……？」
				PRINTFORMDW 映姬发现了一沓可疑的文件，停下了手里的工作
				PRINTFORML （这是…收据？人之里和旧都的商店…守矢和博丽还有命莲寺的小摊…全部都是饮食费）
				PRINTFORMW （是非曲直庁抬头的发票。附言写着…『中有之道活性化調査費』？）
				PRINTFORML （这明明是拜托久侘歌去进行的工作的文件，为什么会在这个家伙的房间里？……）
				PRINTFORMW （恐怕是用什么鬼话哄骗了久侘歌，借着市场调查的名头去寻访美食了吧）
				PRINTFORML （而且为了不让我发现，特地申请了活动经费的报销单。原来如此…）
				PRINTFORMW （这种事情，看来需要久违的来一次説教了）
			ELSE
				PRINTFORML 「啊呀、这个是……？」
				PRINTFORMDW 看到一张可疑的便条，映姬停下手上的动作读了起来
				PRINTFORML （『◎-茨華仙宅　可以假装工作　还可以在这里随便吃东西　是最好的休憩场所』）
				PRINTFORML （『○-旧都酒吧　某人不会来这里巡逻　酒也很好喝』）
				PRINTFORMW （『Ｘ-人間之里近辺　最近在这里被抓包过』）
				PRINTFORMW （…大脑要宕机了。怎么会有人为了偷懒制定这么详尽的计划的……）
			ENDIF
		;MASTER的房間
		ELSEIF CFLAG:MASTER:現在位置 == CFLAG:MASTER:初期位置
			IF TALENT:恋慕
				IF TFLAG:194 > 1
					PRINTFORMW 「怎么这么脏啊……」
					PRINTFORML 「你明明在外面是以打扫著称的」
					PRINTFORMW 「身边的地方却疏忽了、这不是本末倒置吗？」
					PRINTFORMW 「我也来帮忙、快点做完吧」
				ELSE
					PRINTFORML 「随时保持房间的整洁是个好习惯呢」
					PRINTFORMW 「两个人一起来的话。很快就可以完成了~」
				ENDIF
			ELSE
				PRINTFORML 「虽然话是这样说、人要寻求一切可能的帮助 」
				PRINTFORMW 「但是要閻魔来打扫自己的房間也太过于骇人听闻了」
				PRINTFORML 「……不过这也是一个很好感悟道理的机会。能让你理解做扫除有很大的好处」
				PRINTFORMW 「如果房间很乱的话、处于其中的你心情也会难以坐定。在这种情况下想要积累善行的话……」
				PRINTFORMW 「所以说我们要……………………………………」
				PRINTFORMW 「……………………………………」
				PRINTFORMDL 映姫的手一直都没有闲下来、口中也不停地说着有道理的话
				PRINTFORMDW 虽然阎魔的工作能做得又快又好、但是和她打扫得很累
			ENDIF
		;拠点内お風呂＠状況的にお互い素っ裸でお風呂使いながらの掃除になる
		ELSEIF BATHCHECK(CFLAG:MASTER:現在位置)
			IF TFLAG:194 > 1
				PRINTFORML 「这确实是…好脏啊」
				PRINTFORML 「如果可以，我想在沐浴前先清洁…」
				PRINTFORML 「没办法，開始打扫吧」
			ELSE
				PRINTFORML 「呃っ？　现在開始打扫…」
				PRINTFORML 「又没有那么乱，洗完澡之后不行吗？」
				PRINTFORML 「嘛，如果一定要的话……我也来帮忙…」
			ENDIF
			PRINTFORMDW 兴味索然的映姬帮我打扫了浴室
			PRINTDATAW
				DATAFORM （%K30_C_NAME(MASTER)%、那样晃荡…不是很在意吗…）
				DATAFORM （不解风情，比起赤身裸体的我，你更在意打扫吗…？）
				DATAFORM （哼，是不是该把浴衣带来…比较好呢…）
			ENDDATA
		;是非曲直庁内
		ELSEIF MAIN_MAP == 6 && INRANGE(CFLAG:MASTER:現在位置, 610, 619)
			IF TFLAG:194 > 1
				PRINTFORML 「说来惭愧、光靠我自己恐怕是打扫不完的」
				PRINTFORMW 「小町吗……不必多说，就像你想的那样、她……」
				IF 拠点_家主 == 30
					PRINTFORMW 「%K30_C_NAME(MASTER)%に来帮我打扫真是帮了大忙了」
				ELSE
					PRINTFORMW 「特地来这里打扫，真是谢谢你了」
				ENDIF
			ELSE
				PRINTFORML 「…这样果然不行。看的的时间长了都习惯了、就会不自觉地忽略细小的污点」
				PRINTFORML 「不如说正因为是非常古旧的建筑了，所以需要更仔细的保养」
				PRINTFORMW 「谢谢\@ TALENT:恋人 ?  # 你啦~  \@、%K30_C_NAME(MASTER)%」
				PRINTFORMW 「也请让我来帮忙吧」
			ENDIF
		ELSE
			IF INROOM(CFLAG:現在位置)
				IF RAND:2 == 1
					PRINTFORML 「打扫卫生吗？　我们一起来吧」
					PRINTFORMW 「房间一团乱的话,内心也会迷乱」
					PRINTFORML 「在这种境况下想要积累善行的话、也是事倍功半甚至不可能的」
					PRINTFORMW 「所以说、平日里的打扫工作、对任何人都是非常重要的」
				ELSE
					PRINTFORML 「能马上把在意的地方收拾干净是很好的习惯」
					PRINTFORMW 「良好的习惯会带来善行的积累」
					PRINTFORMW 「这是非常好的事情。请让我来帮忙吧」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORML 「成为一个关注身边脏乱的人，时刻关注身边的垃圾」
					PRINTFORMW 「如果人人都能做到这一点、就没有特地进行打扫的必要了…」
					PRINTFORML 「当然这是很难做到的事。更不用说不容易被人注意的房子外面了」
					PRINTFORML 「所以你能够率先做到很干净，真的很出色」
					PRINTFORMW 「请务必让我来帮你吧」
				ELSE
					PRINTFORML 「寺中小僧、在刚開始修行的阶段，并不会去诵经，而是从打扫開始修行」
					PRINTFORML 「扫除作为积累善行的第一步来说、很简单、但是非常重要」
					PRINTFORMW 「当然我也会来帮忙的」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K30_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_411_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML 「不放松锻炼,真的很用心呢」
	PRINTFORMW 「那么開始吧。请好好加油」
	CALL K30_D_LINE
	IF ABL:MASTER:戦闘能力 < ABL:30:戦闘能力
		PRINTFORML 「机会！你这家伙还是太甜（天真）了！」
		PRINTDATAL
			DATAFORM 「请好好注意一下自己中弹部位的偏差！」
			DATAFORM 「好好分清瞄准自机狙和散弹的区别！」
			DATAFORM 「看穿对方的疏漏！一定有可以避開的地方！」
			DATAFORM 「不擅长应付抱摔吗！？　好，再摔一次！」
			DATAFORM 「那个子弹不动就会被打中！是判断力的较量！」
			DATAFORM 「动作要有节奏变化！　如果一昧龟缩、只会被逼到绝境！」
		ENDDATA
		PRINTFORMDW %CALLNAME:MASTER%被映姫用严厉的方式训练了……
	ELSEIF ABL:MASTER:戦闘能力 == 6 && RAND:2
		PRINTFORMW 「……！　看起来……是我输了」
		PRINTFORMW 「我认输了。是你的胜利」
		PRINTFORML
		PRINTFORML 「没想到我会成为被指导的一方……真是非常厉害呢」
		PRINTFORMW 「但是不能骄傲哦？特别是你不磨练心灵是不行的」
	ELSE
		PRINTFORMW 「……这就是所谓的千日手吧」
		PRINTFORMW 「不就在这里点到为止么」
		PRINTFORML
		PRINTFORML 「如此势均力敌,最后的胜负可能要看运气如何了」
		PRINTFORML 「而能带来好运的关键也是平日的用心」
		PRINTFORMW 「…也就是说,从平时開始就多多积善是很重要的」
		IF ABL:MASTER:戦闘能力 == 6
			PRINTFORML 「实际上可能你的力量要稍高一些」
			PRINTFORMW 「即便如此,我还是能你势均力敌」
		ENDIF
	ENDIF
	CALL K30_D_LINE
	PRINTFORML 「辛苦了」
	PRINTFORMW 「通过这个训练，只要有些许能成为你的一部分就比什么都好」
ENDIF
RETURN 1
;==================================================
;412,学习
;ABL:教養(ABL:MASTER:教養より大=MASTERが教えてもらう ABL:MASTER:教養より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K30_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF !SHIRAHU(30) || K30_CHECK_HEN_T()
		RETURN
	IF ABL:MASTER:教養 > ABL:30:教養
		IF TALENT:恋慕
			PRINTFORMW 「%K30_C_NAME(MASTER)%,有个地方想请教一下」
		ELSE
			PRINTFORMW 「我想问你一下」
		ENDIF
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「关于外界的司法制度―――」
				CALL K30_D_LINE
				PRINTFORMW
				PRINTFORMW 「……由人类裁决人类,果然还是会在什么地方出现差错的吧」
			CASE 1
				PRINTFORMW 「关于外界的历史―――」
				CALL K30_D_LINE
				PRINTFORMW
				PRINTFORMW 「……恐怕这就是花之异变原因吧。真是令人悲哀啊」
			CASE 2
				PRINTFORMW 「关于外面世界的宗教观―――」
				CALL K30_D_LINE
				PRINTFORMW
				PRINTFORMW 「……能转生的灵魂减少也是可以理解的，非常遗憾」
		ENDSELECT
		PRINTFORMW 「谢谢。又让我学到了很多」
	ELSE
		IF RAND:2 == 1
			PRINTFORML 「知识对人来说是不可缺少的。所以必须每天学习呢」
			PRINTFORMW 「但也只要获取你所想要的知识就足够了。不要什么都一口气装进脑子里哦」
		ELSE
			PRINTFORML 「人的一生是短暂的，但正因为如此，每天都要保持上进心」
			PRINTFORMW 「如果你有目的地有干劲的话，那是非常好的事情」
		ENDIF
	ENDIF
	SIF IS_WISEMAN()
		CALL K30_KENJYA_TIME
ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=甜点 2=主食 1=軽食
;==================================================
@M_KOJO_MESSAGE_COM_K30_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_413_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_413_1
#DIM 顔
顔 = 0
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠 || FLAG:70 || TCVAR:烂醉
	ELSEIF DISHNAME == "地獄拉麺（極辣）"
		IF TALENT:心情 > -1 && !K30_CHECK_HEN_T() && SHIRAHU(30) && !MARK:反発刻印
			COM_STR = K30_辛味調理
			顔 = 1
		ENDIF
		IF FIRSTTIME("極辛")
			CALL K30_WRITE_DIARY(26)
			PRINTFORMW 「！！」
			PRINTFORMW 「%K30_C_NAME(MASTER)%也对这道菜感兴趣？」
			PRINTFORML 「嗯，嗯…我觉得是非常棒的」
			PRINTFORML 「虽然小町和久侘歌很难理解这道菜的好处」
			PRINTFORML 「如果是带着主动兴趣来听的%K30_C_NAME(MASTER)%的话」
			PRINTFORML 「一定，一定！ 我相信你会注意到这份美好」
			PRINTFORML 「那么，首先从制作方法開始………」
			PRINTFORML 「………………………」
			PRINTFORML 「……………」
			PRINTFORMW
			PRINTFORMDL 映姬说话不顾他人方便是常有的事，但总觉得样子不一样
			PRINTFORMDL 和说教时不同，语速很快，%CALLNAME:MASTER%没听也完全不介意…
			PRINTFORMW
			IF 顔
				CALL K30_PRINT_MESHIGAO("お星")
				PRINTFORML 「完成了，%K30_C_NAME(MASTER)%的第一号试制品」
				PRINTFORMW 「来，趁着还没凉吃吧」
				PRINTFORMDL ……像血池一样鲜红的汤和充满香辛料的面的组合非常勾起食欲……才不
				PRINTFORMDW 面对地狱般的料理，映姬露出了从未见过的笑容
			ENDIF
		ELSEIF STRCOUNT(DISH_TASTE, "練習")
			SIF 顔
				CALL K30_PRINT_MESHIGAO("笑顔")
			PRINTFORML 「还记不住做法，太可惜了…」
			PRINTFORML 「啊，我并不是在责备你」
			PRINTFORML 「在你记住之前，不管多少次我都会认真教你」
			SIF 顔
				PRINTFORMDL PRINTFORMDL 映姬似乎非常高兴能记住自己的独家料理
			WAIT
		ELSE
			SIF 顔
				CALL K30_PRINT_MESHIGAO("笑顔")
			PRINTFORML 「果然这个料理，吃过一次就会上瘾呢♪」
			PRINTFORML 「那就做吧」
			PRINTFORMW
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「唐辛子、山椒、胡椒加花椒…」
					PRINTFORML 「辣油、豆板醤…再加一点…」
					PRINTFORML 「啊…大蒜也要充分磨碎、と…」
					PRINTFORMDW 映姫随意扔进去，以惊人的速度消耗香料…
				CASE 1
					PRINTFORML 「ん～、这个香味让人受不了…」
					PRINTFORML 「正是令人食欲大振的芬芳啊♪」
					PRINTFORMDW 只是站在旁边眼睛和鼻子就疼起来了…
				CASE 2
					PRINTFORML 「也叫饥饿是最好的香料」
					PRINTFORML 「真想饿着肚子吃好吃的呢。」
					PRINTFORMDW 要是空腹真吃了这个，可不得了…
			ENDSELECT
		ENDIF
	ELSEIF TALENT:恋慕
		IF ABL:料理技能 < 2
			PRINTFORMW 「%K30_C_NAME(MASTER)%,\@  ABL:MASTER:料理技能 > 1 ? 能教我一下如何做料理么 # 要和我一起学学如何烹饪么 \@」
			PRINTFORMW 「好不容易做的话，我想给你做好吃的料理…」
		ELSE
			PRINTFORML 「%DISHNAME%吗？　那么一起做吧」
			PRINTFORMW
			IF ABL:MASTER:料理技能 < 2
				PRINTFORML 「啊拉？　手法很差…」
				PRINTFORMW 「你以前这么不擅长做菜吗…？」
			ELSEIF ABL:MASTER:料理技能 < 4
				PRINTFORMW 「看起来很好吃」
				PRINTFORMW 「趁刚做好的时候吃吧」
			ELSE
				PRINTFORML 「无论什么时候，手法都很好呢…」
				PRINTFORMW 「为了不输给%K30_C_NAME(MASTER)%，我也得多学习」
			ENDIF
		ENDIF
	ELSE
		PRINTFORMW 「%K30_C_NAME(MASTER)%,要做料理么？」
		IF  ABL:MASTER:料理技能 >  ABL:30:料理技能
			PRINTFORMW 「可以的话可以教我做法吗」
		ELSE
			PRINTFORMW 「难得来一次,有什么我可以帮忙的么」
		ENDIF
	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_K30_414
;成否判定
;TFLAG:192(-2=指令終了(非TARGET時強制失敗)、-1＝強制失敗、0=COM依存(非TARGET時強制成功)、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_414_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_414_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠 || FLAG:70 || TCVAR:烂醉
		RETURN 1
	ELSEIF DISHNAME == "地獄拉麺（極辣）"
		IF FIRSTTIME("実食")
			PRINTFORML 「我先问一下…」
			PRINTFORML 「\@ GET_TARGETNUM() > 1 ? 诸位 # %K30_C_NAME(MASTER)%は \@辣的东西…能接受吗？」
			PRINTFORML 「这料理非常好吃，但是有点挑人…」
			PRINTFORMW 「嗯，习惯了的话一定会上瘾的」
		ELSE
			PRINTFORML 「为了把这道料理作为中有之道的名产好好地卖出去」
			PRINTFORML 「我想听听吃了的\@ GET_TARGETNUM() > 1 ? 诸位 # %K30_C_NAME(MASTER)% \@的意见」
			PRINTFORMW 「所以，请好好品尝一下」
		ENDIF
	ELSEIF TALENT:恋慕
		IF DISH_ASSI == 30
			PRINTFORMW 「%K30_C_NAME(MASTER)%烧的料理、做得好吃吗…」
			IF  ABL:30:料理技能 < 2 && ABL:MASTER:料理技能 < 2
				PRINTFORMW 「外表看上去很普通,味道也会很普通…对吧…？」
			ELSE
				PRINTFORML 「啊、但是…有你在旁边看着，我也不需要多余的担心」
			ENDIF
		ELSE
			PRINTFORMW 「%K30_C_NAME(MASTER)%亲手做的料理吗？　非常感谢」
			SIF ABL:MASTER:料理技能 > 3
				PRINTFORMW 「你做的料理真的很好吃,我很期待呢」
		ENDIF
	ELSE
		IF DISH_ASSI == 30
			PRINTFORML 「在吃饭前\@ GET_TARGETNUM() > 1 ? 大家也 # \@要好好双手合十哦」
		ELSE
			PRINTFORMW 「啊啦、给我\@ GET_TARGETNUM() > 1 ? 们 # \@做饭了吗？非常感谢」
			SIF GET_TARGETNUM() > 1
				PRINTFORMW 「大家吃饭前也得好好双手合十哦」
		ENDIF
	ENDIF
	PRINTFORMW 「那么,我開动了」
	CALL K30_TASTE_DISH
ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_SUCCESS_COM_K30_415
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_415_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠 || FLAG:70 || TCVAR:烂醉
		RETURN 1
	ELSEIF DISHNAME == "地獄拉麺（極辣）"
		PRINTFORMW 「诶，%K30_C_NAME(MASTER)%不吃吗」
		PRINTFORML 「难道……光看外表就敬而远之了…？」
		PRINTFORML 「多么可惜啊…」
		PRINTFORMW 「没办法啊。你那部分我多吃点吧」
	ELSEIF TALENT:恋慕
		IF DISH_ASSI == 30
			IF ABL:30:料理技能 < 2 &&  ABL:MASTER:料理技能 < 2
				PRINTFORMW 「外表看上去很普通,味道也会很普通…对吧…？」
				PRINTFORMW 「诶，%K30_C_NAME(MASTER)%不吃吗?……不狡猾吗？」
			ELSE
				PRINTFORMW 「和你一起做的料理,会更好吃么」
				PRINTFORMW 「啊啦，%K30_C_NAME(MASTER)%不吃吗？　稍微有点寂寞…」
			ENDIF
		ELSE
			PRINTFORMW 「%K30_C_NAME(MASTER)%亲手做的料理吗？　非常感谢」
			SIF ABL:MASTER:料理技能 > 3
				PRINTFORMW 「你的料理真的很好吃，我很期待」
			PRINTFORMW 「啊啦，%K30_C_NAME(MASTER)%不吃？　总觉得很抱歉…」
		ENDIF
	ELSE
		IF DISH_ASSI == 30
			PRINTFORML 「在吃饭前\@ GET_TARGETNUM() > 1 ? 大家也 # \@要好好双手合十哦」
			PRINTFORMW 「嗯？　好不容易做的菜不吃吗」
			PRINTFORMW 「……%K30_C_NAME(MASTER)%、对食材的感谢之情不够哦？」
		ELSE
			PRINTFORMW 「啊啦、给我\@ GET_TARGETNUM() > 1 ? 们 # \@做饭了吗？非常感谢」
			SIF GET_TARGETNUM() > 1
				PRINTFORMW 「大家吃饭前也得好好双手合十哦」
			PRINTFORMW 「哦呀，你不吃啊…我\@ GET_TARGETNUM() > 1 ? 们 # \@单独吃真的可以吗？」
		ENDIF
	ENDIF
	CALL K30_TASTE_DISH
ENDIF
RETURN 1
;-------------------------------------------------
;吃飯の反応＠艾倫・影狼口上参考にしています
;-------------------------------------------------
@K30_TASTE_DISH
#DIM 顔
#DIM 辛み
顔 = 0
辛み = STRCOUNT(DISH_TASTE, ESCAPE("辣/"))
IF TALENT:心情 > -1 && !K30_CHECK_HEN_T() && SHIRAHU(30) && !MARK:反発刻印 && TFLAG:193 >= 0
	顔 = 1
	COM_STR = %\@ 辛み > 2 ? K30_辛味大好き # \@%
ENDIF
;失敗時
PRINTFORML
IF TFLAG:193 == -1
	;好みを考えるとまずないけど一応。正邪と作ると当てはまるかも
	IF DISHNAME == "地獄拉麺（極辣）"
		PRINTFORMW 「……？？？」
		PRINTFORML 「诶ー哆、%K30_C_NAME(MASTER)%…这个料理怎么说呢…」
		PRINTFORML 「\@ DISH_ASSI == 30 ? 我还记得我是怎么教的 # 和谁一起，是怎么做的呢 \@…？」
		PRINTFORMW 「这个看起来一点也不辣…？？」
		COM_STR =
	;一緒に作った
	ELSEIF DISH_ASSI == 30
		IF STRCOUNT(DISH_TASTE, ESCAPE("謎料理/"))
			SIF 辛み
				PRINTFORML 「虽然调味很合我的口味……」
			PRINTFORML 「…我为什么会想用这种东西呢」
			PRINTFORMDL 映姬用筷子把煮好的跳蛋拉上来
			PRINTFORMW 「%K30_C_NAME(MASTER)%、真的为什么会推荐这样的东西呢」
			PRINTFORMW 「诶！？　这个…是在田地里采摘…农作物？？」
			RETURN 1
		ELSEIF TALENT:恋慕
			IF ABL:30:料理技能 < 2
				PRINTFORMW 「……不好好练习之后再做可是不行的」
			ELSE
				PRINTFORMW 「好奇怪啊……明明我也在旁边看着…」
				PRINTFORMW 「是不是哪里做错了呢」
			ENDIF
		ELSE
			PRINTFORMW 「真奇怪啊…可能弄错了什么」
		ENDIF
		PRINTFORMW 「…下次做的时候要更加努力」
	ELSE
		IF STRCOUNT(DISH_TASTE, ESCAPE("謎料理/"))
			PRINTFORML 「这道菜到底是什么…？」
			PRINTFORMDW 映姬用筷子把煮好的跳蛋拉上来
			PRINTFORML 「……加了这种材料，该不该生气」
			PRINTFORML 「应该佩服他做出了能好好吃的东西吗」
			PRINTFORMW 「难以评价…」
		ELSEIF 辛み
			PRINTFORML 「味道稍微有点微妙呢…」
			PRINTFORML 「调味本身很刺激很好」
			PRINTFORMW 「有什么不同或者不足的地方吗…」
		ELSEIF TALENT:恋慕 && ABL:30:料理技能 < 2 && ABL:MASTER:料理技能 < 2
			PRINTFORML 「%K30_C_NAME(MASTER)%是刚学会做菜吗」
			PRINTFORMW 「下次要不要和我一起学习做饭？」
		ELSE
			PRINTFORML 「对不起。好不容易做的菜…」
			PRINTFORMW 「但有点不合口味…」
		ENDIF
	ENDIF
;成功と通常まとめて感想
ELSE
	SIF 辛み <= 3
		PRINTFORML 「谢谢您的款待。非常好吃哦」
	;映姫様は跳蛋料理苦手
	IF STRCOUNT(DISH_TASTE, ESCAPE("謎料理/"))
		PRINTFORML 「只是…那个食材怎么样……」
		PRINTFORMW 「%K30_C_NAME(MASTER)%は…那个、你经常吃吗？」
	;辣もの好きな映姫様いいよね
	ELSEIF 辛み
		IF DISHNAME == "地獄拉麺（極辣）"
			PRINTFORMDL 映姬不一会儿就吃完了辣得离谱的拉面…
			PRINTFORML
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「啊~…这种刺人的调味…」
					PRINTFORMW 「果然，让人上瘾呢…」
				CASE 1
					PRINTFORML 「就是这个，这个…这个刺激的味道让人受不了…」
					PRINTFORMW 「平日的疲劳也会被这个味道治愈…」
				CASE 2
					PRINTFORML 「这么好吃的话马上就吃完了…」
					PRINTFORMW 「果然还是模仿外面世界的阎王大人，一天吃三次吧…」
			ENDSELECT
			PRINTFORML
			PRINTFORML 「承蒙款待」
			IF (SELECTCOM == 415 && GET_TARGETNUM() > 1) || SELECTCOM == 414
				PRINTFORML 「这个味道，\@ GET_TARGETNUM() > 1 ? 各位 # 阁下 \@如果你也喜欢的话我会很高兴的」
			ELSE
				PRINTFORML 「为了我一个人弄这么好吃的东西，真的非常感动」
			ENDIF
			IF 顔
				PRINTFORML
				CALL K30_PRINT_MESHIGAO("笑顔")
				PRINTFORMDL 吃了最爱吃的东西的映姬满脸笑容地称赞着，好像心情很好
				PRINTFORMDL 连平时不怎么显露的神圣气场都流露出来了…
			ENDIF
			WAIT
		ELSE
			SELECTCASE 辛み
				CASE 1
					PRINTFORML 「恰到好处的辣味勾起了我的食欲」
					PRINTFORML 「如果说还差点什么的话……」
					PRINTFORMW 「不，和大家一起吃的话，这些就够了呢」
				CASE 2
					PRINTFORML 「%DISHNAME%知道我喜欢辣的」
					PRINTFORML 「但是，我是说啊……」
					PRINTFORMW 「你不觉得再辣一点会更好吃吗？」
				CASE 3
					PRINTFORML 「刺激性的调味，从头到尾真的很好吃」
					IF DISHNAME == "泡菜"
						PRINTFORML 「接下来……再让它成熟一点，味道会更加辛辣和深沉哦」
					ELSEIF DISHNAME == "担担麺"
						PRINTFORML 「汤的辣味也是个人选择的话，应该很合大家的口味」
					ELSE
						PRINTFORML 「我也想记住这道料理的做法」
						PRINTFORML 「在配料上再加点辣味的话应该会更好吃吧」
					ENDIF
					SIF 顔
						PRINTFORMDL 因为吃了有眼力见儿的料理，映姬的心情比以往都好。
					WAIT
				;辛味4以上は助手効果or固有料理のはず
				CASEELSE
					IF DISH_ASSI == 30
						PRINTFORMW 「啊~、很好吃…」
						PRINTFORML 「还是辣到这个程度比较好吃」
						PRINTFORML 「虽然周围的人很难理解…」
						PRINTFORML 「%K30_C_NAME(MASTER)%怎么样」
						PRINTFORMW 「觉得辣点更好吃吧？」
						PRINTFORML 「是啊？」
					ELSE
						PRINTFORML 「！！　这，这个……」
						PRINTFORMW 「这个调味……是和谁一起，怎么制作的呢？」
						PRINTFORML 「对我来说，一定，一定要！请告诉我！」
					ENDIF
					SIF 顔
						PRINTFORMDL 映姬因为找到了超级喜欢辣的同好而喜出望外
					WAIT
			ENDSELECT
		ENDIF
	;小町の作った料理
	ELSEIF DISH_ASSI == 76
		PRINTFORML 「而且总觉得有一种令人怀念的味道，非常适合我的口味」
		PRINTFORML 「是谁做的呢…」
		PRINTFORMW 「呃！？　是小町吗？　…对，就是那个孩子……」
	;久侘歌の作った料理
	ELSEIF DISH_ASSI == 129
		PRINTFORML 「而且……吃完后才注意到」
		PRINTFORML 「喉咙很清爽，很舒服呢」
		PRINTFORML 「这道料理一定是和久侘歌一起做的吧」
		PRINTFORMW 「很像那个总是关心周围人的孩子，真的是很好的料理」
	;助手効果
	ELSEIF STRCOUNT(DISH_TASTE, ESCAPE("慈悲/"))
		PRINTFORML 「而且有非常温柔的味道」
		PRINTFORMW 「能感受到制作者的用心」
	;陳米で付く
	ELSEIF STRCOUNT(DISH_TASTE, ESCAPE("質素/"))
		PRINTFORML 「华丽的大餐固然很好」
		PRINTFORML 「但通过吃这种朴素的饮食」
		PRINTFORMW 「才能够更有体会,感谢每日的恩惠」
	;汎用評価
	ELSEIF DISH_ASSI ==30
		IF TALENT:恋慕
			IF ABL:30:料理技能 < 2 && ABL:MASTER:料理技能 < 2
				PRINTFORMW 「我还很担心能不能做好,真是太好了」
				PRINTFORMW 「今后也一起多多练习吧」
			ELSE
				PRINTFORMW 「但是因为是和%K30_C_NAME(MASTER)%一起做的，所以变得好吃是理所当然的」
				PRINTFORMW 「…下次再一起做吧♥」
			ENDIF
		ELSE
			IF ABL:MASTER:料理技能 >  ABL:30:料理技能
				PRINTFORMW 「我也一点点的记住如何制作料理了」
				PRINTFORMW 「再次感谢你」
			ELSE
				PRINTFORMW 「真是一次很有价值的帮手体验呢」
			ENDIF
		ENDIF
	ELSE
		SELECTCASE ABL:MASTER:料理技能
			CASE 0, 1
				PRINTFORMW 「虽然没法说外观很好」
				PRINTFORMW 「但这确实是一道用心制作的非常棒的料理」
			CASE 2, 3
				PRINTFORMW 「而且外表也不错,也让我很開心」
				PRINTFORMW 「谢谢」
			CASE IS >= 4
				PRINTFORMW 「你总是在做这么好吃的料理么？」
				PRINTFORMW 「这样的话,不管在哪里都能成为专业料理人哦」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;416,演奏
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:使用楽器(1=電子琴 2=鋼琴 3=吉他 4=小號 5=小提琴)
;==================================================
@M_KOJO_SUCCESS_COM_K30_416
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_416_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF !SHIRAHU(30)
		RETURN 1
	;バイブデート
	IF TCVAR:30:364
		PRINTFORML 「............」
		IF TFLAG:193 == -1 || !ABL:MASTER:音楽技能
		    PRINTFORMDW 映姫紧闭双眼,似乎在忍受着%CALLNAME:MASTER%难以入耳的演奏...?
		ELSE
		    PRINTFORMDW 映姫闭着惬意的眼睛,似乎陶醉在%CALLNAME:MASTER%的演奏中...?
		ENDIF
		IF NOWEX:Ａ絶頂
		    CALL HPH_PRINT, @"「...屁股%TEXTR("...太棒了,要来了啊/...啊嗯,啊噢HPH 噗啊...啊啊HPH/...要去了,已经...要去了HPH")%HPH」", "L"
		    PRINTFORMDL ...她似乎完全没有在听%CALLNAME:MASTER%的演奏
		    PRINTFORMDW 难以抑制高潮的映姫泄露出细微的呻吟
		    TFLAG:194 = 19
		ELSE
		    CALL HPH_PRINT, @"「...%TEXTR("嗯啊/啊,呼呼/太棒了...这个,太棒了")%HPH」", "L"
		    PRINTFORMDL ...映姫从半张的嘴里%TEXTR("垂下银丝/淫荡地吐出舌头/漏出热烈的呼吸")%
		    PRINTFORMDW 她似乎一直在自娱自乐,和%CALLNAME:MASTER%的演奏毫无关系...
		ENDIF
	;失敗
	ELSEIF TFLAG:193 == -1
		PRINTFORML 「弘法大师也有笔误」
		PRINTFORML 「我也不会责怪失败」
		PRINTDATAW
			DATAFORM 「…对不起。 因为我不擅长，所以也不能给你太多建议」
			DATAFORM 「但是，那个……不堪入耳的演奏也是事实」
			DATAFORM 「比起那个，自己从失败中发现课题更重要哦」
		ENDDATA
	;技能0
	ELSEIF !ABL:MASTER:音楽技能
		PRINTFORML 「…嘲笑想要变好的努力，我不会做的」
		PRINTDATAW
			DATAFORM 「但是……那个，如果是练习的话能在别的地方做吗」
			DATAFORM 「只是，那样的努力不是炫耀的哦」
			DATAFORM 「只是，如果能为听到那个的人着想的话就帮大忙了」
		ENDDATA
	;大成功
	ELSEIF TFLAG:193 == 1
		PRINTFORMW 「真是精彩的演奏啊…」
		PRINTFORML 「……%K30_C_NAME(MASTER)%的话比起每天游手好闲」
		PRINTFORML 「如果想以艺立身，难道不应该更加认真对待吗？」
		PRINTFORMW 「与其每天随心所欲地生活，不如努力磨练自己，人才能成长……」
		PRINTFORML 「……对，你的生活态度……………」
		PRINTFORML 「…………………………」
		PRINTFORMDW 明明演奏得很精彩，但不知为什么却被映姬说教了…
	;成功
	ELSEIF TALENT:恋慕
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「……关于音乐的好坏，说实话我不太清楚」
				PRINTFORML 「但是，即使是那样的我也觉得这演奏很精彩」
				PRINTFORMW 「真的很棒…♥」
			CASE 1
				PRINTFORML 「非常…太好了」
				PRINTFORML 「那个……演奏也很好…」
				PRINTFORMW 「认真致力于演奏的%K30_C_NAME(MASTER)%的样子…也很棒…」
			CASE 2
				PRINTFORML 「是现在这首曲子，的感想吗…？」
				PRINTFORMW 「呃，那个……老实说…」
				PRINTFORML 「是听得入迷了吗……是看入迷了吗…」
				PRINTFORMW 「没好好记在脑子里啊……对不起」
		ENDSELECT
	ELSE
		PRINTFORML 「呃……我觉得你很擅长」
		PRINTDATAW
			DATAFORM 「……对不起，我不知道该说什么」
			DATAFORM 「…不凑巧，我不懂音乐，所以说不出好听的话」
			DATAFORM 「…我只能说些平庸的话，总觉得很抱歉」
			DATAFORM 「和我相比……」\n「不，这样说反而失礼了吧…」
		ENDDATA
	ENDIF
ENDIF
RETURN 1
;==================================================
;417,午睡をする＠寝顔を見るのとTINKO揉みが等確率随机なのも那个なので地の文を改変
;恋慕とそうでない時に分けてみる＠映姫様の移動節度を考えるとほぼ死に分岐だけどまあよし
;CFLAG:陪睡中(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K30_417
;CALL TRAIN_MESSAGE
CALL K30_D_LINE
CALL M_KOJO_MESSAGE_COM_K30_417_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_417_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;衰弱中に添い寝
	IF CFLAG:衰弱 > 0
		PRINTFORMDL 比一起休息的映姬醒得早
		PRINTFORMDL 疲惫不堪的映姬还没有醒来…
		PRINTFORMW
		IF (充填率(30, 2) > 20 && ABL:Ａ感覚 > 4 && RAND:2 == 1) || TCVAR:30:374
			PRINTFORML 「嗯呜…%K30_C_NAME(MASTER)%……屁股……更多…」
			PRINTFORMDW 看来即使在梦中也会因为屁股被攻击而感到高兴…
		ELSE
			PRINTFORML 「嗯……%K30_C_NAME(MASTER)%……好H…」
			PRINTFORMDW 映姬梦中的自己在做什么色情的事呢…
		ENDIF
	ELSEIF CFLAG:陪睡中
		PRINTFORMDL 一起\@ TIME > 750 && TIME < 990 ? 午睡 # 假寐 \@比映姬早醒了
		PRINTDATADL
			DATAFORM 映姬在%CALLNAME:MASTER%的旁边发出安详的呼吸声…
			DATAFORM 因为被映姬用胳膊代替了枕头，所以稍微有点麻木…
		ENDDATA
		PRINTFORMW
	;心情が良くない
	ELSEIF TALENT:心情 == -1 || MARK:反発刻印
		PRINTFORML 「阔啦！　起来吧！！」
		PRINTFORMDL 被映姬的大叫声吵醒了……
		PRINTFORMW
		IF TIME > 750 && TIME < 990
			PRINTFORML 「有这样大白天就呼呼大睡的人吗！」
		ELSE
			PRINTFORML 「这个时间还睡个懒觉，这是怎样的生活习惯啊！」
			LOCAL = 0
		ENDIF
		IF CFLAG:ブチギレ
			PRINTFORMW 「快起来坐在那里。我想说的话堆积如山！」
		ELSE
			PRINTFORMW 「快起来干活吧。积累善行的时间是有限的。」
		ENDIF
		PRINTFORMDL 只是在自己的房间里睡觉，真是不讲理…
		IF CFLAG:ブチギレ
			PRINTFORMDL 虽然%CALLNAME:MASTER%是这么想的，不过和劲头满满的阎魔大人反着干，也不会有好下场
			PRINTFORMDL 结果\@ LOCAL ? 午睡 # 假寐 \@草草了事，%CALLNAME:MASTER%陷入了映姬冗长的说教…
		ENDIF
		WAIT
	;午睡口交
	ELSEIF COM_STR == "K30_午睡口交"
		;一時的に拡張顔絵に変更
		LOCAL = FLAG:立絵種類
		FLAG:立絵種類 = 1
		LOCAL:1 = CFLAG:30:差し替え適用
		CFLAG:30:差し替え適用 = 1
		PRINTFORMDL 睁開眼睛旁边坐着映姬
		PRINTFORMDL 当她发现%CALLNAME:MASTER%已经醒了时，慌忙地连连往后退…
		CALL K30_SPTALK, "発情", "「……！！」"
		PRINTFORMDL 为什么红唇边隐约有白色粘稠物
		PRINTFORMDL 你在午睡时做了什么啊…
		PRINTFORMW
		PRINTFORMW 「……%K30_C_NAME(MASTER)%也不好哦？」
		PRINTFORML 「因为坐立不安……明明很期待的」
		PRINTFORMW 「一个人呼呼地午睡，丢下可怜的映姬不管」
		PRINTFORML 「再加上睡觉的时候……那么地元气满满啊…」
		PRINTFORML 「忍耐…怎么可能做到呢…」
		PRINTFORMDW 映姬一边撒娇地辩解，一边擦拭红润的娇唇…
		;変数後始末
		FLAG:立絵種類 = LOCAL
		CFLAG:30:差し替え適用 = LOCAL:1
		COM_STR =
		CFLAG:口内精液 = 0
	ELSEIF TALENT:恋慕
		IF STRCOUNT(CSTR:30:0, "推倒") && K30_PUSH_DOWN() > 100 && GET_TARGETNUM() == 1
			PRINTFORMDL 睁開眼睛旁边坐着映姬
			PRINTFORMDL 不知怎的，牵着%CALLNAME:MASTER%的手按在自己的胸前
			PRINTFORMDL %CALLNAME:MASTER%很惊讶，映姬却毫不在意地搭话
			PRINTFORMW
			PRINTFORML 「%K30_C_NAME(MASTER)%，做了好梦吗?？」
			PRINTFORML 「睡觉的时候，你的手还在这里摸来摸去」
			PRINTFORMW 「你真的是睡也好醒也好…真H啊」
			PRINTFORMW 「但是很温暖…温柔的，%K30_C_NAME(MASTER)%的好色之手…我喜欢哦…♥」
		ELSEIF GETBIT(CFLAG:既成事實, 0) && RAND:2 == 1 && GET_TARGETNUM() == 1
			PRINTFORMDL %CALLNAME:MASTER%睁開眼睛，眼前出现了映姬的脸
			PRINTFORMDL 好像被窥视着睡颜了，不知为什么映姬就这样不肯挪開
			PRINTFORMDL 就这样被一直盯着看，%CALLNAME:MASTER%总觉得不好意思…
			PRINTFORMW
			PRINTFORML 「……讨厌…%K30_C_NAME(MASTER)%可真不机灵啊」
			PRINTFORMW 「这种时候要做的事，只有一件吧？」
			PRINTFORMDL 映姬的脸终于和我分開了，仔细一看，连耳朵都红了
			PRINTFORMDW 看来映姬也一样很害羞
		ELSE
			PRINTFORMDL %CALLNAME:MASTER%睁開眼睛是映姬坐在枕边
			PRINTFORMDL 看来睡觉的时候握着%CALLNAME:MASTER%的手
			PRINTFORMDL %CALLNAME:MASTER%打招呼之前映姬先来搭话了
			PRINTFORMW
			PRINTFORML 「%K30_C_NAME(MASTER)%…起床了？」
			PRINTFORML 「那就别老是午睡了，快起床吧」
			PRINTFORML 「\@ GET_TARGETNUM() == 1 ? 一人で # \@一直等也很无聊」
			PRINTFORMDW ……被映姬拉起来了
		ENDIF
	ELSE
		LOCAL = YOGORE:(CFLAG:MASTER:現在位置)
		IF (LOCAL >= 1000 && RAND:2 == 1) || LOCAL >= 2000
			YOGORE:(CFLAG:MASTER:現在位置) -= 500
			PRINTFORMDL 醒来的%CALLNAME:MASTER%注意到映姬不知为何在打扫房间
			PRINTFORMDL 发现%CALLNAME:MASTER%起来了，映姬停下了打扫的手
			PRINTFORMW
			PRINTFORML 「听说你到处都在打扫卫生」
			PRINTFORMW 「身边这样的话真是本末倒置啊」
			PRINTFORML 「总之，我只简单地收拾了一下看到的地方」
			PRINTFORMW 「打扫重要的不是心血来潮，而是认真地做」
			PRINTFORMDW ……幸亏没找到内裤收藏
		ELSE
			PRINTFORML 醒来的%CALLNAME:PLAYER%发现映姬在房间里
			PRINTFORML 好像是在%CALLNAME:MASTER%睡觉的时候观察了房间
			PRINTFORMW
			PRINTFORML 「哎呀，好像起来了，有点打扰你了」
			PRINTFORMW 「从白天開始睡觉的懒汉的房间，会变成什么样，我很感兴趣」
			PRINTFORMDW 太失礼了…一瞬间这么想，但是因为是自己一直在做的事情所以什么也不能反驳…
		ENDIF
	ENDIF
ENDIF
RETURN 1

;午睡中のTINKOを狙う映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_417
SIF K30_BE_SEEN() || !SHIRAHU(30) || !TALENT:恋慕 || MARK:反発刻印 || TALENT:心情 == -1
	RETURN 0
SIF TIME_PROGRESS(CFLAG:1504) < 300 || !GETBIT(CFLAG:30:既成事實, 1)
	RETURN 0
SIF !(TALENT:PLAYER:2 & 2) || 挿入不可(30) == 3 || K30_CHECK_HEN_T() || !STRCOUNT(CSTR:30:0, "推倒")
	RETURN 0
SIF (BASE:MASTER:体力 < MAXBASE:MASTER:体力 / 3 * 2) || (BASE:MASTER:気力 < MAXBASE:MASTER:気力 / 3 * 2) || !BASE:MASTER:精力
	RETURN 0
SIF (BASE:体力 < MAXBASE:体力 / 3 * 2) || (BASE:気力 < MAXBASE:気力 / 3 * 2) || CFLAG:現在位置 != CFLAG:前一次的位置
	RETURN 0
SIF EXP:精飲経験 <= 300 || ABL:精液中毒 < 10 || K30_PUSH_DOWN() < 100
	RETURN 0
SIF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
	RETURN 0
SIF !ONCE("口交抜き")
	RETURN 0
;ここまで抜けたら確定。你だけ絶頂するように操作
CALL COM81
TCVAR:MASTER:要去了 = 1
BASE:MASTER:射精 = MAXBASE:MASTER:射精
SOURCE:反感 = 0
SOURCE:快Ｍ = 0
SOURCE:PLAYER:快Ｃ /= 2
COM_STR = K30_午睡口交
RETURN 1

;==================================================
;421,祈願する
;条件が複雑なので、COMF421 祈願.ERBおよび、EVENT_MESSAGE_COM400.ERBの祈願するの項を参照のこと
;==================================================
@M_KOJO_MESSAGE_COM_K30_421
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_421_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
COM_STR =
IF LOCAL
	IF CFLAG:睡眠 || CFLAG:陪睡中 || TCVAR:烂醉 || CFLAG:衰弱
		RETURN 1
	ELSEIF FLAG:祈願内容 == 206 && FLAG:子宝祈願 == 30
		IF CFLAG:1805 > 1
			PRINTFORMDW …隣にいる映姫は能面のように無表情だ
			COM_STR = K30_無表情
		ELSEIF FIRSTTIME("子作り祈願")
			PRINTFORML 「…吶、%K30_C_NAME(MASTER)%。祈愿了，什么…？」
			PRINTFORMDW 热心祈祷%CALLNAME:MASTER%被看见，映姬似有所察觉似地问道
			PRINTFORMDW %CALLNAME:MASTER%诚实地告知想要两个孩子
			PRINTFORML
			PRINTFORMW 「…\@ CFLAG:1502 ? 果然… # \@认真，的是吧」
			PRINTFORMW 「……………………」
			PRINTFORML 「…和交换了心意之人的孩子，怎么可能不期待」
			PRINTFORMW 「但我是阎魔。从古至今、以至将来、我将一直肩负着审判幻想乡死者的职责」
			PRINTFORML 「假如有了孩子、这个孩子日后长大……后来变老、迎来死亡的时刻」
			PRINTFORMW 「我真的能够正确地审判这个孩子吗？我实在是没有这个自信啊~」
			PRINTFORMW 「将自己的孩子亲手审判送到地狱去…这样的事情、光是想想就已经让我恐惧……」
			PRINTFORMW 「……………………」
			PRINTFORMW 「曾经的我不会有这样的烦恼、所有的一切对我来说都是可以做到黑白分明的」
			PRINTFORMW 「但是、自从遇到了%K30_C_NAME(MASTER)%…」
			PRINTFORMW 「不知是好是坏、自从遇到了你、我的内心就产生了奇妙的变化…」
			PRINTFORMW 「……………………」
			PRINTFORMW 「不好意思、我说的太多了、请让我、再稍微、考虑一下吧…」
			SETBIT CFLAG:1502, 1
		;落とすのくっそ面倒な映姫様＋こんな口上に付き合ってくれたならこの程度のBOUNS是いよね
		ELSEIF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
			PRINTFORMDW …突然很在意，就询问了旁边的映姬的情况
			PRINTFORMDL \@ TALENT:妊娠願望 ?甚至都没注意到我的视线、 # \@映姫也在虔诚的祈祷能够有个孩子…
			PRINTFORMW
			PRINTFORMDW 获得胖次之神更多的祝福了
			CFLAG:30:子宝補正 ++
			SIF TALENT:妊娠願望
				CFLAG:30:子宝補正 ++
		;条件たりない
		ELSEIF !GETBIT(CFLAG:1502, 3)
			PRINTFORMDW …突然很在意，就询问了旁边的映姬的情况
			IF !EXP:出産経験
				PRINTFORMDW 不知道映姬在考虑什么。脸上阴晴不定…
			ELSE
				PRINTFORMDW 映姬低着头，完全看不到脸上的表情
			ENDIF
		;育児終わってたら疑似[妊娠願望]付与
		ELSE
			PRINTFORMW 「呐，%K30_C_NAME(MASTER)%。你许了什么愿望…？」
			PRINTFORMW 「诶！？　你是想…再要一个…？」
			IF TALENT:育児中
				IF CFLAG:出産経過日 < CHILD_しつけ
					PRINTFORML 「真是的…也太着急了吧」
					PRINTFORML 「现在我光是照顾%SHOW_CHILDNAME(30)%就已经精疲力尽了」
					PRINTFORMDW 果然是我太着急了吗、映姬稍微有些生气的样子
				ELSEIF CFLAG:出産経過日 < CHILD_自立前
					PRINTFORML 「可以啊…%SHOW_CHILDNAME(30)%也想要个弟弟或者妹妹呢…」
					PRINTFORML 「不过…现在我想还是先把这个孩子照看好吧」
					PRINTFORMW 「可以、再多等一些日子吗？」
				ELSE
					PRINTFORML 「…我确实想跟你一起……啦~」
					PRINTFORMW 「但是、%SHOW_CHILDNAME(30)%还需要再过一点时间才能独立生活」
					PRINTFORML 「现在应该珍惜那孩子离巢前的生活、等他建立家庭…」
					PRINTFORMW 「所以说…请您稍微、再多等我一下吧…」
				ENDIF
				RETURN
			ENDIF
			PRINTFORML 「……是啊…我也是、这样想的」
			PRINTFORML 「能够成为一位母亲、确实是非常幸福的事情、我很想再来一次」
			PRINTFORMW 「所以、一起为了这个再努力一下吧…%K30_C_NAME(MASTER)%？」
			PRINTFORML
			PRINTFORMDW 映姫似乎非常希望能够和は%CALLNAME:MASTER%再养育一个孩子
			SETBIT CFLAG:1502, 4
		ENDIF
		RETURN 1
	ENDIF
	PRINTFORMDL 祈愿的时候也顺便询问一下映姬吧……
	LOCALS:0 = %\@ GETBIT(CFLAG:1606, 0) ? 早上请正常叫醒我 # 希望你改变早上的叫醒方式 \@%
	RESETCOLOR
	{
	CALL ASK_M("呼び名を変えてほしい", !GETBIT(CFLAG:1803, 2),
	"二人きりの時の呼び名を変えたい", FIRSTTIME("稱呼",1) == 0 && K30_BE_SEEN() == 0,
	@"%LOCALS:0%", CFLAG:MASTER:初期位置 == CFLAG:30:初期位置 && STRCOUNT(CSTR:30:0, "朝から") && ABL:精液中毒 > 4 && K30_BE_SEEN() == 0,
	@"约会に付けていく飾品ーについて", GETBIT(CFLAG:1609, 3) && K30_BE_SEEN() == 0,
	"特に無いので雑談",1)
	}
	CALL M_KOJO_COLOR_K30
	SELECTCASE RESULT
		CASE 0
			PRINTFORML 「…你知道这不是轻易能改变的事情吧？」
			PRINTFORML 「如果你坚持的话、我会听从这一次」
			RESETCOLOR
			CALL ASK_YN("変えたいです", "やめときます")
			IF !RESULT
				CALL K30_SET_C_NAME(2)
				CALL M_KOJO_COLOR_K30
				IF RESULT == -1
					PRINTFORMW 「你到底想做什么啊…我已经搞不懂了啊！」
				ELSE
					PRINTFORMW 「就这样吧」
				ENDIF
				SETBIT CFLAG:1803, 2
			ELSE
				CALL M_KOJO_COLOR_K30
				PRINTFORMW 「那样会更好吧」
			ENDIF
		CASE 1
			PRINTFORML 「想让我换个方式称呼你吗？」
			PRINTFORMW 「好吧、您想让我怎么称呼呢」
			CALL K30_SET_C_NAME(3)
			CALL M_KOJO_COLOR_K30
			IF RESULT == -1
				PRINTFORMW 「结果是不用改了吗？　你到底怎么考虑的啊、真是的…」
			ELSE
				PRINTFORML 「……%K30_C_NAME(MASTER)%……呼呼呼~、这个称呼也不错嘛」
				PRINTFORMW 「没关系的。我不会搞错、一不留神在外人面前说出来什么的」
				PRINTFORMW 「……不过好羞耻呀~」
			ENDIF
		CASE 2
			IF GETBIT(CFLAG:1606, 0)
				PRINTFORML 「啊、啊啦…？　用那种方法叫醒你…以后不要那样做了吗？」
				PRINTFORML 「是这様吗……如果%K30_C_NAME(MASTER)%这样说的话…」
				PRINTFORMW 「真是没办法呢…」
				PRINTFORML
				PRINTFORMDW 早安咬的可能性取消了！
				CLEARBIT CFLAG:1606, 0
			ELSEIF GETBIT(CFLAG:1606, 1)
				PRINTFORML 「毕竟、那种起床的方式…比较好吗？」
				PRINTFORML 「诶诶、那就交给我吧」
				PRINTFORMW 「用你喜欢的方式、舒舒服服地…把你“唤醒”♥」
				PRINTFORML
				PRINTFORMDW 早安咬变成两天一次的频率了！
				SETBIT CFLAG:1606, 0
			ELSE
				PRINTFORMW 「……『那种』叫起床的方式、你很喜欢吗…？」
				PRINTFORML 「欸、我知道啦…我也很喜欢吶♥」
				PRINTFORMW 「我会尽力让你满足地起来的、非常努力哟…♥」
				PRINTFORML 「……哎呀、不对、工作的日子还是不行的」
				PRINTFORMW 「因为那种时间需要节制才行哦」
				PRINTFORML
				PRINTFORMDL 映姫不工作的日子、早上会固定用早安咬叫醒了哦~
				PRINTFORMDW 想回到固定频率的话，就再次祈愿吧
				;Bit0＆Bit1を同時にON
				CFLAG:1606 = 3
			ENDIF
		CASE 3
			IF GETBIT(CFLAG:1609, 2)
				PRINTFORML 「啊？…等一下、我需要再确认一次…真的可以这样吗？」
				PRINTFORMW 「…嗯姆……谢谢你哦」
				PRINTFORMW 「那么、等下次有机会的时候…♥」
				PRINTFORML
				PRINTFORMDL 约会的时候，\@ TALENT:尻穴狂 ? # 有概率 \@映姫会佩戴着肛用震动棒
				PRINTFORMDW 想要禁止这样做、就再次祈愿吧
				SIF !CFLAG:1608
					SETBIT CFLAG:1609, 0
			ELSE
				PRINTFORML 「果然啊、那样做…过于痴女了？」
				PRINTFORMW 「……说的也是啊、万一被其他人注意到的话…可就大事不妙了…」
				PRINTFORMW 「对不起、以后我会保持自重的…」
				PRINTFORML
				PRINTFORMDL 不会在约会时安装肛用震动棒了
				PRINTFORMDW 想要允许这样做、就再次祈愿吧
			ENDIF
			INVERTBIT CFLAG:1609, 2
		CASE 4
			SELECTCASE RAND:5
				CASE 0
					PRINTFORML 「%K30_C_NAME(MASTER)%信仰的神明大人是什么样的啊？」
					PRINTFORMW 「好奇心我肯定是有一点啦、是司掌什么的神明啊？」
					PRINTFORMDW 是胖次之神
					PRINTFORMDW ……因为实在说不出口、所以巧妙地蒙混过去了
				CASE 1
					PRINTFORML 「在进行祈祷吗？　如果是诚心诚意的祈愿、神明一定能听到的」
					PRINTFORMW 「为了以后能实现这个愿望，自己也不要懈怠努力是很重要的」
					PRINTFORMW 「看见人们努力工作的样子、然后再给予帮助、这才是神明大人的职责」
					PRINTFORML 「正因如此、神明并不会听到人的祈愿就马上实现它…」
					PRINTFORML 「人一定要不断地精进自己才行……」
					PRINTFORMDW 只需要收取几条胖次就能实现愿望的胖次神，莫非是很糟糕的神明吗…
				CASE 2
					PRINTFORML 「祈願啊……我曾经也经常听到呢」
					PRINTFORMW 「希望与朋友和解的孩子...希望孩子健康的母亲...希望永远幸福的恋人…」
					PRINTFORML 「小小的但是非常诚挚的愿望…让人感到亲切又怀念」
					PRINTFORML 「如果你的愿望能够实现的话，就再好不过了呢…」
					PRINTFORMDW 似乎是想起曾经做地藏的时光、映姬静静地回忆
					PRINTFORML
					IF GROUPMATCH(FLAG:祈願内容,202 ,203 ,999) || TFLAG:OPPAI
						IF TFLAG:OPPAI
							LOCALS = 奶子奶子
						ELSEIF FLAG:祈願内容 == 202
							LOCALS = 涩涩的胖次！！！！
						ELSEIF FLAG:祈願内容 == 203
							LOCALS = 想让大家发情
						ELSE
							LOCALS = 希望映姬更加H起来
						ENDIF
						PRINTFORMDL …现在的气氛似乎并不适合说出「%LOCALS%」的愿望啊
					ELSE
						PRINTFORMDL …遗憾的想法充斥着%CALLNAME:MASTER%的内心
					ENDIF
					PRINTFORMDW 为了不破坏映姬的美好回忆、还是不要把愿望的内容说出来了吧
				CASE 3
					PRINTFORML 「『遇到困难就求神拜佛』……这样的吗？」
					PRINTFORML 「不不不、这其实并不是什么坏事」
					PRINTFORMW 「相比之下、我更担心那些穷途末路也不愿意接受他人帮助的人」
					PRINTFORML 「如果你祈求了神灵保佑、得到心灵的支持、终能摆脱困境的话」
					PRINTFORML 「希望你能够努力行善来还愿」
					PRINTFORMW 「在我的认知里、这才是人与神相处的正确方式」
				CASE 4
					PRINTFORML 「现居在幻想乡的神明们、确实大多数给人的印象都是很宽容轻松的」
					PRINTFORMW 「然而、这只是你能看见的其中一面而已」
					PRINTFORML 「如果太得意忘形而忘记礼仪和敬畏的话……」
					PRINTFORMW 「就需要十分小心了、很多代价是无法挽回的」
			ENDSELECT
	ENDSELECT
ENDIF
RETURN 1

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

;==================================================
;429,換装
;変なＴ恤衬衫から逃さない＆変なＴ恤衬衫に抵抗
;==================================================
@M_KOJO_MESSAGE_COM_K30_429
IF K30_CHECK_HEN_T() && CFLAG:衣装一時変更 != 62
	CALL K30_D_LINE
	PRINTFORMW 「………」
	PRINTFORML 「%K30_C_NAME(MASTER)%关心我的衣品我很開心啦…」
	PRINTFORMW 「但是已经规定好的规则…我无论如何都必须遵守的…」
	PRINTFORML 「嗯嗯、这跟我本人的意愿其实没什么关系啦…」
	PRINTFORMDW 映姬换上了原来的奇怪T恤衫
	CFLAG:衣装一時変更 = 62
	RESETCOLOR
	RETURN
ELSEIF !(DAY % 7 == 5 || FLAG:ファッション == 62) && CFLAG:衣装一時変更 == 62
	CALL K30_D_LINE
	PRINTFORMW 「………」
	PRINTFORML 「…不管%K30_C_NAME(MASTER)%怎么请求」
	PRINTFORMW 「就是有能听和不能听的两种情况」
	PRINTFORML 「只有这件衣服…请饶了我吧…」
	PRINTFORMDW 映姬换上了平时穿的衣服
	CFLAG:衣装一時変更 = 0
	RESETCOLOR
	RETURN
ENDIF

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

@M_KOJO_MESSAGE_COM_K30_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF BATHROOM(CFLAG:現在位置)
		IF RAND:3 == 1 && DAY:2 == 4
			PRINTFORMW 「这个季节，果然洗澡是最好的……」
			PRINTFORMDW 两个人愉快地泡在澡盆里，连身体的内心都暖和了…
		ELSEIF RAND:3 == 1 && DAY:2 == 2
			PRINTFORMW 「流汗之后，吃点凉的吧」
			PRINTFORMDW 偶尔泡杯冷麦茶也未尝不可
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「果然，不泡在浴缸里的话，感觉就没有消除疲劳了呢……」
					PRINTFORMDL 映姬在浴池里舒展着手脚，浑身瘫软……
					PRINTFORMDW 懒散的阎王大人这不是相当罕见的光景吗
				CASE 1
					PRINTFORMW 「嗯ーっ……适当的水温……」
					PRINTFORML 「………………………………」
					PRINTFORMW 「……………………………？」
					PRINTFORML 「………………………………」
					PRINTFORMW 「……………………………♥」
					PRINTFORMDW 虽然两个人没有像对话一样的对话，但是度过了非常满足的时间…
				CASE 2
					PRINTFORMW 「……怎么了？」
					PRINTFORMDW …不知不觉就被在旁边放松的映姬迷住了
					PRINTFORMDL 被热水弄湿的脖子上贴着短发的样子很性感
					PRINTFORMDW 微微泛着朱红的晶莹肌肤，防水般的吹弹可破，妖艳动人
					PRINTFORMDW 从水面若隐若现的身体线条纤细，带着女体独有的魅力…
					PRINTFORML 「不，请停止！！不要突然说出奇怪的话！」
					PRINTFORMDW 称赞一番后，和预想的结果羞了起来。 那个样子果然也很可爱
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;432,在浴室里放鬆
;表示タイミングは入浴後なので、お風呂上がりでの
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;==================================================
@M_KOJO_MESSAGE_COM_K30_432
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_432_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_432_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && TCVAR:30:364
	PRINTFORMW 「…好的，让您久等了……」
	CALL HPH_PRINT, @"「没关系…哦HPH　不会被看到的」", "L"
	CALL HPH_PRINT, @"「好好地…重新插入吧、已经很想要了…吶HPH」", "W"
ENDIF
RETURN 1
;==================================================
;436,読書＠660,読書と統合
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K30_436
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_436_1
;==================================================
;440,等待
;==================================================
@M_KOJO_MESSAGE_COM_K30_440
IF TCVAR:30:364 > 0
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_440_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_440_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70 || TCVAR:烂醉
	ELSEIF CFLAG:ブチギレ || TALENT:心情 == -1
		PRINTFORML 「…………………………」
		PRINTFORMW 「……………………」
		PRINTFORMDW 和\@ CFLAG:ブチギレ ? 憤怒在心頭的 # 心情不好的 \@映姬度过了一段尴尬的时光
	ELSEIF TCVAR:30:364
		PRINTFORMDL %CALLNAME:MASTER%观察着\@ NOWEX:Ａ絶頂 ? 眼神湿润急促喘息 # 扭捏燥热 \@的映姬消磨时间…
		PRINTFORMW
		IF NOWEX:Ａ絶頂
			LOCALS = 「啊唔…HPH　不行，已经…不行…HPH」\n「很舒服…忍耐，做不到…HPH」
		ELSE
			STRDATA LOCALS
				DATAFORM 「…那、那个…%K30_C_NAME(MASTER)%」\n「%K30_C_NAME(K30_FIND_AROUND(),2)%に…好像一直在看着我…？」\n「是心理作用吗…」
				DATAFORM 「…%K30_C_NAME(MASTER)%、不要…那样死死地盯着呀」\n「身体…好烫，已经…受不了了HPH」
				DATAFORM 「啊呼…HPH、啊っ…啊啦？」\n「多长时间…过去了吗…？」\n「太舒服了…脑子已经…乱七八糟了…HPH」
			ENDDATA
		ENDIF
		CALL HPH_PRINT, LOCALS, "W"
	ELSEIF K30_CHECK_HEN_T()
		PRINTFORML 「………………………」
		PRINTFORMD 映姬
		PRINTDATAD
			DATA 用手按住胸口
			DATA 用双手按住裙子的下摆
			DATA 一边观察周围的情况
		ENDDATA
		PRINTFORMDW 、只是站着…
	ELSEIF TALENT:接吻魔 && TALENT:恋人 && K30_BE_SEEN() == 0 && !MARK:反発刻印
		PRINTFORML 「……恋人之间不更要有意义地使用时间吗?」
		PRINTFORMW 「具体来说……」
		PRINTFORMW ……啾♥
		PRINTFORMW 「呼呼っ、谁也没看见，ね♥」
	ELSEIF TALENT:恋慕
		IF RAND:2 == 1
			PRINTFORMW 「什么也不做的时间，总觉得不安……」
		ELSE
			PRINTFORMDL 突然转头一看，映姬正瑟瑟发抖……
			PRINTFORMDW 看着%CALLNAME:MASTER%一副想说教的样子
		ENDIF
	ELSEIF TALENT:思慕
		PRINTFORMDL 映姬好像想说什么似的看着这边……
		PRINTFORMW 「……………！」
		PRINTFORMDW %CALLNAME:MASTER%四目相对，映姬移開了视线
	ELSE
		PRINTFORML 「什么都不做就这样度过，该怎么说呢?」
		PRINTFORML 「听好了，不管怎么度过，时间都是一样流逝的」
		PRINTFORML 「你这么虚度光阴，到底在想什么……」
		PRINTFORMDW 和阎魔大人悠闲地消磨时间好像很难……
	ENDIF
ENDIF
RETURN 1
;==================================================
;441,聽課(慧音専用
;==================================================
@M_KOJO_MESSAGE_COM_K30_441
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_441_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

;==================================================
;442以降の指令もM_KOJO_MESSAGE_COMを置けば口上が表示されるようになった
;==================================================
;445,採集
;TFLAG:193(採集物のID, 0=『何も見つからなかった…』
;TFLAG:194(見つけた個数
;==================================================
@M_KOJO_MESSAGE_COM_K30_445
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_445_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_445_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF !SHIRAHU(30) || 仕事中チェック(30)
		RETURN 1
	IF TCVAR:30:364
		IF !TFLAG:193
			PRINTFORMW 「找不到…的？」
			CALL HPH_PRINT, "「现在，到处走动的话……我会变得很辛苦的…HPH」", "L"
			CALL HPH_PRINT, "「没能帮上忙……对不起啊HPH」", "W"
		ELSEIF RAND:2 == 1
			PRINTFORML 「找到什么了吗？」
			CALL HPH_PRINT, @"「%ITEMNAME:(TFLAG:193)%、是吗…太好了呢…HPH」", "W"
			CALL HPH_PRINT, @"「…啊啊HPH　即便如此，也很热……真的很热啊HPH」", "L"
			PRINTFORMDL 虽然只是一直在看的映姬也\@ DAY:2 == 2 ? 已经汗流浃背了 # 微微流了香汗 \@…
		ELSE
			PRINTFORML 「还在…寻找？」
			CALL HPH_PRINT, "「没关系，请继续…好的HPH」", "L"
			CALL HPH_PRINT, "「我们…好好享受、这随意的乐趣吧…HPH」", "W"
		ENDIF
	ELSEIF !TFLAG:193
		IF TALENT:恋慕 && !RAND:3
			IF RAND:2 == 1
				PRINTFORML 「嗯，找不到好的东西…」
				PRINTFORMW 「对不起没能帮上什么忙」
			ELSE
				PRINTFORML 「找不到想要的东西？」
				PRINTFORMW 「唯有这个只能耐心地去寻找了」
			ENDIF
		ELSE
			IF RAND:2 == 1
				PRINTFORML 「没有成果的话会更累…」
				PRINTFORML 「%K30_C_NAME(MASTER)%也不能只挑自己喜欢的哦？」
			ELSE
				PRINTFORML 「找了这么多也找不到…」
				PRINTFORMW 「难道…找错地方了吗？」
			ENDIF
		ENDIF
	ELSE
		LOCALS = %ITEMNAME:(TFLAG:193)%
		SELECTCASE ITEMPRICE:(TFLAG:193)
			;初級？素材
			CASE 1 TO 999
				;粪
				IF TFLAG:193 == 636
					PRINTFORML 「嗯，算了……而且掉在那边了…」
					PRINTFORMW 「我觉得随便拿多少都没关系」
					PRINTFORMW 「…那个，请不要拿着靠近我」
				;5個以上採れた
				ELSEIF TFLAG:194 > 4
					PRINTFORML 「这一带经常采集到%LOCALS%呢」
					PRINTFORMW 「不用客气，拿去吧」
				ELSEIF RAND:2 == 1
					PRINTFORML 「啊…这里有%LOCALS%哦」
					PRINTFORMW 「%K30_C_NAME(MASTER)%、是，请拿」
				ELSE
					PRINTFORML 「%LOCALS%的话，两个人分头就行了」
					PRINTFORMW 「现在，%K30_C_NAME(MASTER)%需要的部分，找到了吗？」
				ENDIF
			;中級素材
			CASE 1000 TO 2999
				IF RAND:2 == 1
					PRINTFORML 「确实……沿着这样的地方走的话…」
					PRINTFORMW 「有了，%LOCALS%，找到」
				ELSE
					PRINTFORML 「即使在乌云中到处寻找也很难找到」
					PRINTFORML 「这样，如果着眼于……」
					PRINTFORMW 「看，有%LOCALS%哦」
				ENDIF
			;高級素材
			CASE 3000 TO 9999
				IF RAND:2 == 1
					PRINTFORML 「%LOCALS%说起来是相当贵重的东西，不过，很容易找到…」
					PRINTFORMW 「真的很佩服%K30_C_NAME(MASTER)%の的技能」
				ELSE
					PRINTFORML 「找到%LOCALS%有什么诀窍吗？」
					PRINTFORMW 「我怎么也没有自信一个人能找到」

				ENDIF
			;最高級素材
			CASE IS >= 10000
				IF RAND:2 == 1
					PRINTFORML 「嗯ー唔…什么也找不到…」
					PRINTFORMW 「%K30_C_NAME(MASTER)%这是什么……诶！？」
					PRINTFORML 「那个……不是%LOCALS%吗…」
					PRINTFORMW 「竟然真的找到了…好厉害啊…」
				ELSE
					PRINTFORML 「诶诶っ！？　那个…%LOCALS%！？　真的吗！？」
					PRINTFORML 「……呃……在找到之前虽然是那样」
					PRINTFORMW 「那么贵重的东西，就这样拿走没关系吗…？」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;448,罠を仕掛ける／虫トラップ
;TFLAG:193,
;   -1=罠が壊れた
;    0=罠を仕掛けた
;    1=獲物が得られた
;   10=虫トラップを仕掛けた
;   11=虫トラップを破棄した
;   12=ムシを捕まえた
;TFLAG:194,獲物の番号
;ムシの名前は MUSHI_NAME で表示したり判別したりできます
;==================================================
;作者写了 但是我没加进来
;==================================================

;==================================================
;449,捕虫
;TFLAG:193,
;   -2=殺してでもうばいとる→映姫様に説教される
;   -1=ゆずってくれ！→拒否
;    0=捕獲失敗
;    1=MASTERが捕まえた
;    2=角色が捕まえたのをMASTERが褒めた
;    3=ゆずってくれ！→渋々オッケー
;    4=ゆずってくれ！→オールオッケー
;TRAINMESSAGEを省略する場合は虫カゴに入れる処理を忘れないように
;ムシの名前は MUSHI_NAME で表示したり判別したりできます
;==================================================
@M_KOJO_MESSAGE_COM_K30_449
IF TFLAG:193 == -2
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_449_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_449_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF !SHIRAHU(30) || TCVAR:30:364
		RETURN 1
	SELECTCASE TFLAG:193
		;閻魔様から強奪とかいかんでしょ
		CASE -2
			CALL GET_ANGRY(30, 1)
			TCVAR:30:372 = 0
			PRINTFORMDL 为了夺取映姬抓住的%MUSHI_NAME%，%CALLNAME:MASTER%迅速伸出了手…
			PRINTFORMW
			PRINTFORML 「阔啦！！」
			CALL K30_QUAKE
			PRINTFORMDL 好痛！ ！ 被悔悟棒狠狠地拍了一巴掌…
			PRINTFORML
			PRINTFORML 「偏偏要抢阎魔的东西…！」
			PRINTFORMW 「到底在想什么……你真的疯了吗！？」
			PRINTFORML 「总之，首先……」
			PRINTFORML 「%CALLNAME:MASTER%桑，马上跪坐在那里……现在，给我快点！」
			PRINTFORMW 「为人之道，常识…啊，真是的…想说的话堆积如山！！」
			PRINTFORMDL ……………
			PRINTFORMDL 被映姬像鬼一样说教了…
			PRINTFORMDL 当然%MUSHI_NAME%被吓跑了
			CALL RECOVER(MASTER, -200, "気力", "鬼のような説教")
			CALL RECOVER(MASTER, -200, "体力", "容赦のない折檻")
			WAIT
		CASE -1
			PRINTFORML 「很遗憾，我不能渡让给您」
			PRINTFORML 「需要的话请您亲自抓」
			IF MARK:反発刻印 || TALENT:心情
				PRINTFORMDW 心情不好的映姬冷淡地拒绝了…
			ELSE
				PRINTFORMDW 被映姬无情地拒绝了…
			ENDIF
		CASE 0
			IF MARK:反発刻印 || TALENT:心情 < 0 || !RAND:10
				PRINTFORMW 「完全不行吧…」
				PRINTFORML 「……说不定你平时的不稳重是产生这样结果的原因呢？」
				PRINTFORMW 「因为平时做事总是飘忽不定，关键时刻无法集中心神，拿不下猎物」
				PRINTFORML 「对，你有点………！」
				PRINTFORML 「………………！！」
				PRINTFORMDL ……………
				PRINTFORMDW 只因为捕虫失败就被映姬说教了一通…
			ELSE
				PRINTDATAW
					DATAFORM 「可惜…我也错过了」\n「下次我们都要慎重」
					DATAFORM 「啊…啊啦？　意外地敏捷…」
					DATAFORM 「啊ー…明明就差一点儿了…」\n「我也得打起精神了」
				ENDDATA
			ENDIF
		CASE 1
			IF RAND:2 == 1
				PRINTFORML 「顺利抓住了真是太好了呢」
				PRINTFORML 「…但是可以吗，就算是一个小虫的生命，也是一个重要的生命」
				PRINTFORMW 「既然抓到了，%K30_C_NAME(MASTER)%就要负责照顾它」
				PRINTFORML 「当然，除了无益的杀生，出生在这个世界上的生命都没有轻重之分……」
				PRINTFORML 「………………」
				PRINTFORMDL ……………
				PRINTFORMDW 只是抓住了虫子不知为何映姬的開始说教了…
			ELSE
				PRINTFORML 「看起来很顺利真是太好了」
				PRINTFORMW 「既然抓住了，就请好好养它」
			ENDIF
		CASE 2
			IF RAND:4
				PRINTFORML 「呼呼、非常感谢」
				PRINTFORMW 「尝试一下捕虫，好像找回了童心，真開心呢」
			ELSE
				PRINTFORMW 「呼呼呼、非常感谢♪」
				PRINTFORML 「………………」
				PRINTFORMW 「对不起，我有点太兴奋了…」
			ENDIF
		CASE 3
			IF RAND:2 == 1
				PRINTFORML 「欸多，既然你这么说了，我就让你了…」
				PRINTFORMW 「我觉得你还是控制一下自己的物欲比较好」
			ELSE
				PRINTFORML 「你这么执着，我也很为难啊…」
				PRINTFORML 「诶？嘛…转让给您也没关系」
				PRINTFORMW 「不得不佩服你的贪心」
			ENDIF
		CASE 4
			IF RAND:2 == 1
				PRINTFORML 「嗯，没关系」
				PRINTFORMW 「好的请」
			ELSE
				PRINTFORML 「嗯，这个本来是打算送给你的」
				PRINTFORML 「因为我现在手上持有的有足够的自信」
				PRINTFORMW 「那么请好好珍惜」
			ENDIF
	ENDSELECT
ENDIF
RETURN 1

;虫を奪われたら喧嘩ではなく説教を始める映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_449
SIF TFLAG:193 > -2
	RETURN
DOWNBASE:30:体力 = 0
DOWNBASE:30:気力 = 0
TIME += 20
RETURN

;==================================================
;481,测定仪
;指令内で完結しているので結果は口上に反映できない
;==================================================
@M_KOJO_MESSAGE_COM_K30_481
SIF !SHIRAHU(30)
	RETURN
CALL M_KOJO_COLOR_K30
PRINTFORML
IF 仕事中チェック(30) && TIME < 720
	PRINTFORMDL 映姬无视%CALLNAME:MASTER%的奇行进行着审判
ELSE
	PRINTFORML 「突然又拿出奇怪的东西……」
	PRINTDATAL
		DATAFORM 「这是什么啊……单片眼镜？」
		DATALIST
			DATAFORM 「一直盯着别人看，独自一人%TEXTR("理解了/吓了一跳/不能理解/")%的脸…」
			DATAFORM 「真的，我不太明白你在做什么」
		ENDLIST
		DATAFORM 「总觉得…马上就要坏掉的眼镜？的说…」
		DATAFORM 「没关系吗？那个，它不会突然爆炸？」
	ENDDATA
ENDIF
RESETCOLOR

;==================================================
;490,道具
;TFLAG:193(使用道具のID
;TFLAG:194(0=MASTER,1=TARGET
;==================================================
@M_KOJO_MESSAGE_COM_K30_490
;道具にTRAIN_MESSAGEはない
CALL M_KOJO_MESSAGE_COM_K30_490_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_490_1
;国士無双の薬を過剰摂取時は台詞無
SIF !SHIRAHU(30) || (TFLAG:193 == 515 && ((!TCVAR:国士無双の薬 && TFLAG:194) || (!TCVAR:MASTER:国士無双の薬 && !TFLAG:194))) || TARGET != 30
	RETURN
SIF !CFLAG:诶嘿嘿 || !TALENT:恋慕 || !CHARA_HOLIDAY(30)
	RETURN
CALL K30_D_LINE
LOCAL = TIME - UFUFU_START_TIME
LOCAL = LOCAL < 0 ? LOCAL + 1440 # LOCAL
;你が使用
IF !TFLAG:194
	SIF !GETBIT(CFLAG:30:既成事實, 0) || TEQUIP:30:口接触部位 != 4
		GOTO SKIP
	SIF K30_KISS_CANCEL() || RAND:2
		GOTO SKIP
	PRINTFORMDL 在喝光药的同时，映姬贪婪地探求着%CALLNAME:MASTER%的嘴唇
	PRINTFORMDL 温热地追逐舌头，吸着混着药的唾液…
	PRINTFORMW
	PRINTFORML 「啾…咕啾、滋兹っ……呃嗯っ♥」
	PRINTFORMW 「噗哈…」
	PRINTDATAL
		DATAFORM 「我不喜欢，%K30_C_NAME(MASTER)%」
		DATAFORM 「那个药…比我的嘴唇还重要？」
	ENDDATA
	PRINTFORMW 「现在请把注意力集中在这里…♥」
	PRINTFORML 「啊姆、啾……啾♥」
	CALL RECOVER(30, 10, "体力", @"%ITEMNAME:(TFLAG:193)%をおすそ分け")
	CALL RECOVER(30, 10, "気力", @"%ITEMNAME:(TFLAG:193)%をおすそ分け")
	WAIT
	RETURN
	$SKIP
	PRINTFORMDL 喝光药的%CALLNAME:MASTER%被映姫以%TEXTR("期待满满/热情/神魂颠倒/")%的目光凝视着…
	PRINTFORMW
	IF LOCAL < 30
		PRINTFORML 「总觉得很有干劲呢…」
		PRINTFORMW 「呼呼呼、请您轻点…♥」
	ELSE
		PRINTDATAW
			DATAFORM 「%K30_C_NAME(MASTER)%…从这里開始打算更加努力？」\n「呜啊♥　我会变成什么样呢…♥」
			DATAFORM 「如果累了，可以正常休息？」\n「还是…连那样的时间都舍不得吗…♥」
			DATAFORM 「还不想放開我…」\n「这样的事情可以吗？」\n「…太好了，我也不想和你分開♥」
		ENDDATA
	ENDIF
;映姫様に使用
ELSE
	IF TFLAG:193 == 511
		PRINTFORMDL 吃了药的映姬一瞬间就恢复了，吓了一跳
		PRINTFORMDW
		PRINTFORML 「嗯っ……非常感谢」
		PRINTFORMW 「即便如此，这个药也太有效了，有点恐怖呢…」
	ELSEIF BASE:体力 < MAXBASE:体力 / 2
		PRINTFORMDL 映姫把%ITEMNAME:(TFLAG:193)%慢慢地喝干之后吐了一口气
		PRINTFORMW
		PRINTFORML 「非常感谢…%K30_C_NAME(MASTER)%」
		PRINTFORM 「%TEXTR("虽然还很软绵绵/虽然还有点头晕/已经平静下来了")%…
		IF BASE:体力 < 650
			PRINTFORMW 再努力一点吧…」
		ELSE
			PRINTFORMW 我觉得已经不要紧了…」
		ENDIF
		PRINTFORML 「……%TEXTR(@"只要不乱来就行/温柔地、对待我吧/不用忍耐，也可以哟」\n「继续…")%♥」
		PRINTFORMDW 映姫\@ BASE:体力 < 650 ? 还在喘气，但还是紧紧抱住 # 即使身躯疲惫依然 \@对%CALLNAME:MASTER%不断求欢
	ELSE
		PRINTFORMDL %ITEMNAME:(TFLAG:193)%被饮下的映姬以平静的笑容搭话
		PRINTFORMDW
		PRINTFORML 「%K30_C_NAME(MASTER)%、谢谢你的药」
		IF BASE:体力 > MAXBASE:体力 / 4 * 3
			PRINTFORMW 「托您的福，身体完全恢复了」
		ELSE
			PRINTFORMW 「托您的福，喘了一口气」
		ENDIF
		IF LOCAL > 60
			PRINTDATAW
				DATAFORM 「所以，你看…」\n「更多更多…可以让你更爱我吗?♥」
				DATAFORM 「所以不用忍耐…可以啊？」\n「那么，继续云雨同枕吧…♥」
				DATAFORM 「……还，想做吧？」\n「没关系的……来，一起共赴爱河…♥」
			ENDDATA
		ENDIF
	ENDIF
ENDIF

;==================================================
;491,白色情人節
;TFLAG:193(0=返礼品を制作 1～7=渡した返礼品の種類
;CFLAG:バレンタイン(1～4= 受け取った巧克力の種類 +100で返礼品贈呈済、周回以外でフラグリセットされない
;未実装道具あり？
;==================================================
@M_KOJO_MESSAGE_COM_K30_491
;白色情人節にTRAIN_MESSAGEはない
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_491_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_491_1
SIF TFLAG:193
	PRINTFORML
SELECTCASE TFLAG:193
	CASE 0
		PRINTFORML
		PRINTFORML 「回礼是手工做的吗？」
		IF INRANGE(CFLAG:バレンタイン, 1, 4)
			PRINTFORML 「我可以期待吗…」
		ELSE
			PRINTFORML 「意外的勤快啊…」
		ENDIF
	CASE 1
		;黑雷神巧克力
		PRINTFORML 「诶っ多、这个……很简单就完成了呢」
		IF CFLAG:バレンタイン > 102
			PRINTFORMW 「这个补偿会有点儿贵哦？」
			PRINTFORML 「是啊…比方说…」
			PRINTFORMW 「…在这之后，你有空吗…」
		ELSE
			PRINTFORML 「嘛，重要的是感谢的心情」
			PRINTFORMW 「这个就这样了，谢谢，我收下了」
		ENDIF
	CASE 2
		;跳蛋巧克力
		PRINTFORML 「还是老样子…%K30_C_NAME(MASTER)%净做奇怪的东西…」
		PRINTFORMW 「而且居然这么好吃，我更加无法接受了」
	CASE 3
		;WD巧克力
		;まだ無い？
	CASE 4
		;手制巧克力曲奇
		PRINTFORML 「哎呀，好可爱…这是%K30_C_NAME(MASTER)%亲手做的吗？」
		PRINTFORMW 「做得很好哦」
		IF CFLAG:バレンタイン > 102
			PRINTFORML 「一个人吃有点浪费啊」
			PRINTFORMW 「%K30_C_NAME(MASTER)%也一起怎么样？」
		ELSE
			PRINTFORML 「这个就这样带回去当工作中的茶点吧」
			PRINTFORMW 「%K30_C_NAME(MASTER)%、非常感谢哦」
		ENDIF
	CASE 5
		;WD布丁
		;まだ無い？
	CASE 6
		;手制布丁
		PRINTFORML 「这又是…精致的点心啊…」
		IF CFLAG:バレンタイン > 102
			PRINTFORMW 「莫非…是为了我做的吗？」
			PRINTFORML 「总是从你那里收到……有点不好意思了」
			PRINTFORMW 「真的非常感激」
		ELSE
			PRINTFORML 「没想到会收到这么丰盛的回礼」
			PRINTFORML 「虽然有点不好意思…真是难得，我就收下吧」
			PRINTFORMW 「%K30_C_NAME(MASTER)%、真的非常感激」
		ENDIF
	CASE 7
		;装饰蛋糕
		;Buffやべぇ
		PRINTFORML 「诶诶っ！？　这个蛋糕…真有点厉害啊…」
		IF CFLAG:バレンタイン < 103
			PRINTFORML 「不，只是送了\@ CFLAG:バレンタイン < 102 ? 那样的 # \@巧克力就把这个奉还给我的话，任谁都会吃惊的。…」
			PRINTFORML 「该怎么办呢、要适当的回礼…有什么事相求吗…」
			PRINTFORMDW 映姬对如此豪华的回礼感到困扰
			PRINTFORML
			PRINTFORML 「……我拼命想了我能做的事情」
			PRINTFORML 「作为回报……我会多花点时间给你说教吧」
			PRINTFORML 「以前在哪里听说过三倍返还这个词」
			PRINTFORMW 「为了能帮助你的善行，不说三倍，我的教诲再多几个小时也无妨…」
			PRINTFORMDW %CALLNAME:MASTER%郑重地谢绝了提议
		ELSEIF !TALENT:恋慕
			PRINTFORMW 「这就是…是你对我的感情，是真的么…？」
			PRINTFORML 「很高兴，我很高兴……人都晕乎乎的了…」
			PRINTFORMW 「总、总之…真的非常感谢」
		ELSE
			SELECTCASE K30_FIND_LOVER()
				CASE -1
					PRINTFORMW 「%K30_C_NAME(MASTER)%、谢谢你这么棒的回礼」
					PRINTFORMW 「对不起，虽然有点失礼……可以在这里尝尝吗」
					PRINTFORMDL 映姬舀起鲜奶油含入嘴里
					PRINTFORML 「……啾♥」
					PRINTFORMDW …就这样吻了我
					PRINTFORML 「呼呼、%K30_C_NAME(MASTER)%…味道怎么样？」
					PRINTFORMW 「很甜…是一种非常幸福的味道♥」
				CASE 0
					PRINTFORML 「这个，%K30_C_NAME(MASTER)%が…是为我做的吧」
					PRINTFORMW 「谢谢…真的非常感谢啊」
					PRINTFORML 「…居然会为我准备这么棒的回礼」
					PRINTFORMW 「我可以，再稍微…期待一下吗…？」
				CASEELSE
					PRINTFORMW 「那个…没关系吗？　给的对象…没有搞错吗？」
					PRINTFORML 「不，我很高兴……很高兴的说」
					PRINTFORMW 「真的可以吗…」
			ENDSELECT
		ENDIF
ENDSELECT
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;约会系指令
;约会系口上は文字街道外出先で発生
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,约会会話
;==================================================
@M_KOJO_MESSAGE_COM_K30_600
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_600_1
RETURN RESULT
@M_KOJO_MESSAGE_COM_K30_600_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K30_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_MESSAGE_COM_K30_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_602_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K30_603
IF TCVAR:30:364
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_603_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:30:364
		PRINTFORMDL %CALLNAME:MASTER%拉起了映姬的素手
		PRINTFORMDL 映姬手热得惊人，握着的小手湿漉漉的…真态香生谁画得，玉如纤手嗅梅花……
		PRINTFORMW
		CALL HPH_PRINT, @"「%K30_C_NAME(MASTER)%…谢谢HPH」", "W"
		STRDATA LOCALS
			DATAFORM 「脚下，软绵绵的…因为…」\n「如果并排走的话…就安心了HPH」
			DATAFORM 「我……为了不摔倒，像这样…好好地，看着我哦HPH」
			DATAFORM 「……啊哈っHPH　手，仅仅是…牵着」\n「身体…也变得热起来…HPH」
		ENDDATA
		CALL HPH_PRINT, LOCALS, "W"
	ELSEIF TFLAG:193 == -1
		PRINTFORMW 「あっ…！」
		PRINTFORML 「%K30_C_NAME(MASTER)%、稍微问一下…」
		PRINTDATAW
			DATAFORM 「你剪指甲是多少天前…？」
			DATAFORM 「摆弄完土之后，指甲之间也好好洗了吗…？」
		ENDDATA
		PRINTFORML
		PRINTFORML 「就是这样，%K30_C_NAME(MASTER)%」
		PRINTFORML 「无论人类的内心多么重要，首先要从外表来判断」
		PRINTFORMW 「如果疏忽了细致的保养，仅此评价就会一点点下降……」
		PRINTFORML 「………………………………………………」
		PRINTFORML 「……说起来你是怎么想的……」
		PRINTFORML 「……………………」
		PRINTFORMDW 被映姬紧紧地握着手说教了…
	ELSEIF TALENT:恋慕
		PRINTDATAW
			DATAFORM 「嗯、总觉得事到如今…」\n「光是这样，就咚咚心跳加速。…♥」
			DATAFORM 「呼呼っ、%K30_C_NAME(MASTER)%…不能放開哦」
			DATAFORM 「呼呼呼っ、像这样牵着手的话…」\n「感觉好像在约会呢♪」
		ENDDATA
	ELSE
		PRINTDATAW
			DATAFORM 「是是、没办法啊……」
			DATAFORM 「嘛…没办法啊」\n「如果不牵你的手，你马上就会飘飘然的。」
		ENDDATA
	ENDIF
ENDIF
RETURN 1

;==================================================
;604,散步
;约会中の場合、CFLAG:現在位置に移動先の場所が既に入ってる
;==================================================
@M_KOJO_MESSAGE_COM_K30_604
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_604_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_604_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館) && TALENT:心情 != -1
		IF TCVAR:30:烂醉
			PRINTFORML 「这里～哪里～？」
		ELSEIF TCVAR:30:364
			CALL HPH_PRINT, "「是啊，进去吧…HPH」", "L"
			CALL HPH_PRINT, "「差不多了，脚上…使不上劲…HPH」", "L"
		ELSEIF !TALENT:恋慕
			PRINTFORML （为什么…我……顺势就……）
		ELSEIF K30_CHECK_HEN_T() && GETBIT(CFLAG:30:既成事實, 1)
			PRINTFORML 「……确实，在这里的话就不引人注目了」
			PRINTFORML 「…………%TEXTR("不是，不愿意/做，吗/走吧/")%」
		ELSEIF GETBIT(CFLAG:30:既成事實, 1)
			PRINTFORML 「………%TEXTR("是/想做…对吧？/好啊/")%」
			PRINTFORMDL 呢喃了一句，映姬满脸通红地低下了头
		ELSE
			PRINTFORML （%K30_C_NAME(MASTER)%的话、我……）
			PRINTFORMDL 映姬沉默着，跟着%CALLNAME:MASTER%に来了
		ENDIF
	ELSEIF K30_FIND_LOVER() == 2
		PRINTFORML 「啊………」
		PRINTFORMDL 映姫在%CALLNAME:(TALENT:MASTER:恋人)%注意到前尴尬地低下头躲闪着…
	ENDIF
ENDIF
RETURN 1
;==================================================
;605,繞道
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_SUCCESS_COM_K30_605
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_605
;繞道にはTRAIN_MESSAGEが無い
CALL K30_D_LINE
CALL M_KOJO_MESSAGE_COM_K30_605_1
RESETCOLOR
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_605_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMDL %CALLNAME:MASTER%は%TEXTR("试着走进了一条岔道/总觉得绕了个远路/选了条合适的路走了")%
	PRINTFORMW
	IF TCVAR:30:364
		STRDATA LOCALS
			DATAFORM 「欸欸、是啊…」\n「慢慢地，悠闲地…走吧HPH」
			DATAFORM 「到此为止，不受欢迎的路…不用选择，也没关系哦」\n「我……可以正常地行动…HPH」
			DATAFORM 「对了对了…约会的话，悠闲地享受是最好的」\n「现在，即使想赶时间……也赶不上…HPH」
		ENDDATA
		CALL HPH_PRINT, LOCALS, "W"
	ELSEIF CFLAG:宴会参加
		PRINTFORMW 「绕道…？」
		PRINTFORML 「因为有人叫我，所以我认为先去那里是礼貌」
		PRINTFORMW 「看……赶紧赶紧，消磨时间到了那边也可以哦」
	ELSEIF TALENT:恋慕
		IF TCVAR:30:358 == 1
			PRINTDATAW
				DATAFORM 「两个人在一起的话，这样绕远路也不错」
				DATAFORM 「呼呼っ、和你在一起的话能发现什么新鲜事吗？」
			ENDDATA
		ELSE
			PRINTDATAW
				DATAFORM 「哎呀，连邀请去的地方都没决定吗…？」\n「嚯啦嚯啦，请带我去个好地方吧♪」
				DATAFORM 「%K30_DIARY_PLACE(CFLAG:現在位置)%去那里要绕远路哦？」\n「……啊っ、但是」\n「现在也没有必要着急啊」
			ENDDATA
		ENDIF
	ELSE
		PRINTDATAW
			DATAFORM 「真的，没办法啊…」\n「在任何地方都悠哉悠哉的，已经是你的习性了吗？」
			DATAFORM 「啊拉？　去%K30_DIARY_PLACE(CFLAG:現在位置)%还有这样一条路啊…」\n「不知道呢」
		ENDDATA
	ENDIF
ENDIF
RETURN 1

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

@M_KOJO_MESSAGE_COM_K30_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_610_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:30:364
		PRINTFORML 「%K30_C_NAME(MASTER)%…有点，坏心眼…」
		PRINTFORMW 「这样的话……饭什么的很好吃……却不能吃…」
	;失敗
	ELSEIF TFLAG:193 == -1
		PRINTFORML 「不,每道菜我都吃得很开心」
		PRINTFORMW 「只是...」
		PRINTDATAL
		    DATAFORM 「您一直在盯着女服务员的屁股看」\n「任何人都一眼就看出来了...」
		    DATAFORM 「您一直试图偷瞄坐在旁边女性的胸部」\n「周围的人都注意到了...」
		    DATAFORM 「您假装弄掉筷子去偷看别人的裙子」\n「太不知羞耻了,我都看不下去...」
		ENDDATA
		PRINTFORMDW 问题似乎不在于食物,而在于%CALLNAME:MASTER%
	;成功
	ELSE
		PRINTFORML 「多谢款待。很美味」
		SELECTCASE CFLAG:現在位置 / 100
			CASE 2
				PRINTFORML 「菜做得十分美味，相当细心。」
				PRINTFORMW 「在生意上还是不如活着的人类啊…」
				PRINTFORMDW 阎魔大人专心调查竞争对手……
			CASE 4
				PRINTFORML 「传说中的夜雀烤串店，正如大家所评价的那样」
				PRINTFORMW 「能不能在中有之道也摆摊呢…」
				PRINTFORMDW 阎魔大人在考虑确保人才……
			CASE 6
				PRINTFORML 「这里的摊贩也因为竞争对手的增加而很辛苦，但是必须要努力。」
				PRINTFORMW 「…在地狱的财政上，如果不努力的话就不好办了。」
				PRINTFORMDW 阎王大人似乎有比较切实的烦恼……
			CASE 9
				PRINTFORML 「在享受喝酒和吃饭这件事上，果然鬼们有一整天时间呢」
				PRINTFORMW 「好好参考一下，让中有之道也繁荣起来…」
				PRINTFORMDW 阎魔大人专心调查竞争对手……
			CASE 10
				PRINTFORML 「即便如此…听说月球上的人民把地上的食物视为污秽而回避」
				PRINTFORMW 「这样吃也不太清楚区别…」
				PRINTFORMDW 阎魔大人歪着头……
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

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

@M_KOJO_MESSAGE_COM_K30_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_613_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;614,採購食材
;TFLAG:193(1=購入＆約會経験UP 0=購入 -1=非購入)
;非購入の場合(TFLAG =-1)はここに飛んでこない様子
;==================================================
@M_KOJO_MESSAGE_COM_K30_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_614_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_614_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && FLAG:约会的对象 == 30
	IF TCVAR:30:364
		PRINTFORML 「购物…是吗？」
		CALL HPH_PRINT, "那…我在这里…慢慢地看看HPH」", "W"
	ELSEIF CFLAG:MASTER:初期位置 == CFLAG:30:初期位置 || TALENT:恋人
		PRINTFORML 「买什么食材？是啊，那么今天呢……」
		PRINTDATAW
			DATAFORM 「要不要一起做点什么？」
			DATAFORM 「%K30_C_NAME(MASTER)%的\@ ABL:MASTER:料理技能 > 2 ? 美味 # 制作 \@料理，想吃啊」
			DATAFORM 「我\@ ABL:30:料理技能 > 2 ? # 要加油了 \@，我会做好的，你就看着吧？」
		ENDDATA
		SIF TFLAG:193 == 1
			PRINTFORMW 「……总觉得像夫妇一样呢…♥」
	ELSEIF TALENT:恋慕
		PRINTFORML 「和女性去约会，买食材…」
		PRINTFORMW 「这样的话，我的礼物是饭团或者%TEXTR("菜粥/大碗饭/雑燴粥/")%吗？　简直%TEXTR("饿肚子的仙人/大胃王亡灵/")%这样的待遇？」
		PRINTFORMW 「……呵呵呵，開玩笑的。行李多的话我帮你吧」
		SIF TFLAG:193 == 1
			PRINTFORMW 「大丈夫です。和你一起去哪里都很開心哦♪」
	ELSE
		IF TCVAR:30:358
			PRINTFORM 「我确实说过，有空的时间可以交手，
		ELSE
			PRINTFORM 「特意把阎魔拉出来
		ENDIF
		PRINTFORML 然后让她搬运行李吗……」
		PRINTFORMW 「不，我没有说不做。我会陪你到最后的」
		SIF TFLAG:193 == 1
			PRINTFORMW 「毕竟这是非常新鲜的经验」
	ENDIF
ENDIF
RETURN 1
;==================================================
;615,吃便當
;実行可能場所　地蔵小路,倒垂的柳樹下,霧之湖,玄武之澤,大蛤蟆之池,絶景之丘,山之湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:料理技能(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_MESSAGE_COM_K30_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_615_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_615_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FIRSTTIME(SELECTCOM)
		PRINTFORML 「我做了便当,虽然这是第一次」
		PRINTFORMW 「抱歉,我也觉得我自己做得并不怎么好…」
		PRINTFORMW 「如果可以的话,下次可以教我做料理吗？」
	ELSEIF TCVAR:30:364
		PRINTFORML 「请，慢慢来…请吃吧」
		CALL HPH_PRINT, "「我只要看着…就好了…HPH」", "W"
	ELSE
		SELECTCASE ABL:30:料理技能
			CASE IS < 2
				PRINTDATAW
					DATAFORM 「我还不是很有自信…感觉怎样？」
					DATAFORM 「我也姑且做了一些练习…感觉怎样？」
					DATAFORM 「我也努力过了,好吃吗？」
				ENDDATA
				CALL K30_D_LINE
				PRINTFORML
				IF TFLAG:193 == -1
					PRINTFORMW 「哎呀…微妙的表情…嗯，我也来一口…」
					PRINTDATAW
						DATAFORM 「………对不起。我也不知道为什么这么酸…」
						DATAFORM 「……好甜啊…」
						DATAFORM 「……好,好苦…为什么这么苦…」
						DATALIST
							DATAFORM 「……我觉得辣味很好，很好吃」
							DATAFORM 「えっ…？　辣得不能吃?真的？」
						ENDLIST
					ENDDATA
				ELSE
					PRINTDATAW
						DATAFORM 「………抱歉,让你费心了」
						DATAFORM 「……嗯,你能吃下去我很高兴。下次我会更加努力的」
						DATAFORM 「…………是啊,也不可能一口进步的。我再多多练习一下吧」
					ENDDATA
				ENDIF
			CASE IS < 4
				PRINTDATAW
					DATAFORM 「最近自己做料理感觉很開心……味道怎么样？」
					DATAFORM 「今天做的是非常自信的作品,很好吃吧？」
					DATAFORM 「我自己也觉得自己的料理进步了,你不这么觉得么？」
				ENDDATA
				CALL K30_D_LINE
				PRINTFORML
				PRINTDATAW
					DATAFORM 「……太好了。果然料理要让人品尝到美味才是最好的」
					DATAFORM 「……呼呼,有努力做出来的价值了」
					DATAFORM 「……你能開心比什么都好。请好好期待下次吧」
				ENDDATA
			CASEELSE
				IF RAND:2 == 1
					PRINTFORML 「很美味吧？　当然这是根据%K30_C_NAME(MASTER)%的喜好制作的」
					PRINTFORMW 「能做出这样料理也都多亏了你」
					PRINTFORMW 「谢谢,%K30_C_NAME(MASTER)%」
				ELSE
					PRINTFORML 「…吃得这么開心。有点被你吓到了呢」
					PRINTFORMW 「但是%K30_C_NAME(MASTER)%，我很高兴能做出喜欢的料理」
					PRINTFORMW 「这样,我也能算得上擅长料理了吧」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_SUCCESS_COM_K30_617
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_MESSAGE_COM_K30_617
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_617_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:30:364
		PRINTFORML 「不太能…尝到…」
		CALL HPH_PRINT, "「另外，再有机会……请带我来哦…HPH」", "W"
	ELSEIF TFLAG:193 == 1
		IF TALENT:恋慕
			PRINTFORMW 「很好吃呢,多谢你的款待」
			PRINTFORMW 「%K30_C_NAME(MASTER)%,下次再一起来吧」
		ELSE
			PRINTFORMW 「我一个人没有机会去这样的店…」
			PRINTFORMW 「谢谢你能邀我去」
		ENDIF
	ELSEIF TFLAG:193 == -1
		PRINTFORMW 「甜味不需要冒险心」
		PRINTFORMW 「失败。你应该点普通的豆馅蜜…」
	ELSE
		PRINTFORML 「虽然有时会送慰问品」
		PRINTFORMW 「偶尔吃点甜食也不错啊」
	ENDIF
ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_MESSAGE_COM_K30_618
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_618_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_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御伽草子
;==================================================
;SUCCESS_COMを勝手に置いてみるテスト
;コマンド中断は出来ないが、実行前の変数と比較することで作りたい分岐を作れる
@M_KOJO_SUCCESS_COM_K30_620
TFLAG:192 = FINDELEMENT(ITEM, 1, 101, 111)
TFLAG:194 = FLAG:借书返还期限

@M_KOJO_MESSAGE_COM_K30_620
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_620_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_620_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	LOCALS = %\@ CFLAG:MASTER:現在位置 == CFLAG:70:現在位置 ? 小鈴 # 店員 \@%
	CALL M_KOJO_COLOR_K30
	;振動棒约会中
	IF TCVAR:30:364
		CALL HPH_PRINT, @"「啊っ呼HPH　嗯…HPH」", "L"
		PRINTFORML （…啊っ、%LOCALS%先生，在往…这边看？）
		PRINTFORMDW 映姬在意%LOCALS%的视线，躲在了书架的影子里…
	;貸し出し不可
;	ELSEIF TFLAG:193 <= 0
;		;貸し出し中を選択
;		PRINTDATAW
;			DATAFORM 「坏心眼也就到此为止了」\n「%LOCALS%不是也很为难吗」
;			DATAFORM 「出借中，上面清楚写着……」\n「我不喜欢用奇怪的方式刁难人」
;			DATAFORM 「并不能因为是客人就做什么都可以哦」\n「用古怪的事情来麻烦%LOCALS%」
;		ENDDATA
	;借りた
	ELSEIF TFLAG:194 < 8
		;貸出延長
		IF FINDELEMENT(ITEM, 1, 101, 111) == TFLAG:192
			PRINTDATAL
			    DATAFORM 「读书百遍,义自现」\n「认真读进去直到熟记为止,这才好」
			    DATAFORM 「理解快慢因人而异」\n「与其蒙在鼓里,重复研读会好很多」
			    DATAFORM 「勤奋学习是好事」\n「有什么我能帮到的就告诉我」
			ENDDATA
			PRINTFORMDW 映姫一脸深有同感地点着头
	;借りた
	ELSE
		PRINTFORMW 「有什么好书吗？」
		PRINTL
		IF ITEM:101 == 1
			PRINTFORML 「战术指南书吗…锻炼身体是件好事」
			PRINTFORMW 「弹幕决胜的训练，如果我可以的话，我会陪你的。」
		ELSEIF ITEM:102 == 1
			PRINTFORML 「是烹饪指南书吗…和别人一起做饭也很有趣。」
			PRINTFORMW 「和别人一起做菜的话，会发现和平时不一样的调味。」
		ELSEIF ITEM:103 == 1
			PRINTFORML 「字典吗…是啊，知识才是让人成为人的重要的东西」
			PRINTFORML 「重要的事情也不能交给没有良好教养的人」
			PRINTFORMW 「向别人学习的时候，请充分利用这一点，好好掌握它。」
		ELSEIF ITEM:104 == 1
			PRINTFORML 「是御伽草子吗…非常适合小孩子，」
			PRINTFORML 「不过这本书写得还真够漂亮的……」
			PRINTFORMW 「不朗读的话，理解起来也很难。」
		ELSEIF ITEM:105 == 1
			PRINTFORML 「是演奏指南书吗…我很不擅长乐器，所以我很尊敬会乐器的人。」
			PRINTFORML 「但是请小心。不是每个人都想听别人演奏。」
			PRINTFORMW 「因为吵架的人也很多…请不要引起多余的纠纷」
		;バグ道具なので消されても気にしない
		ELSEIF ITEM:106 == 1
			PRINTFORML 「是连环画吗……」
			PRINTFORML 「………」
			PRINTFORMW 「对别人借的东西说这说那，你能想到什么用途吗？」
		ELSEIF ITEM:107 == 1
			PRINTFORML 「是百鱼图鉴吗…原来如此，不仅是名字，生态也写得很详细啊。」
			PRINTFORMW 「如果有知识的话，在钓鱼的时候也会比只是等待的效率要高得多。」
		ELSEIF ITEM:108 == 1
			PRINTFORML 「采集指南吗…这个不错啊。用图表和说明让它更容易理解。」
			PRINTFORMW 「即便如此，采集也是一项艰巨的工作。请制定计划，有效利用时间」
		ELSEIF ITEM:109 == 1
			PRINTFORML 「是药学教材吗?我也不懂这些专业的东西…」
			PRINTFORMW 「我认为，像调配一样以经验为基础的工作，事前的准备和知识是不可或缺的」
		ELSEIF ITEM:110 == 1
			PRINTFORML 「伐木心得吗…如果你要做樵夫，我给你一个忠告」
			PRINTFORML 「这片土地上的树木是重要的财产。还有很多像依代、神木这样重要的东西す」
			PRINTFORMW 「伐木时，如果不想被山妖或天狗袭击，请务必得到许可。」
		ENDIF
	ENDIF
	;当日借り換え
	ELSE
		PRINTFORML 「......这本书不是今天才借的吗」
		PRINTDATAL
		    DATAFORM 「您真的已经全部读完了吗...?」
		    DATAFORM 「您的钱真的那么多吗?」
		    DATAFORM 「再怎么付费」\n「也不该总是麻烦%LOCALS%」
		    DATAFORM 「您是这么想引起%LOCALS%的注意吗...?」
		ENDDATA
		PRINTFORMDW 映姫嫌弃地嘀咕着
	ENDIF
ENDIF
RETURN 1
;==================================================
;621,釣魚＠隠岐奈口上構文参考にしました
;TFLAG:193(0=釣れない 1～4=魚 11～15=好吃的魚 610=木材 131=守矢之守札 21=跳蛋 609=氷之鱗 606=龍之爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K30_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_621_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_621_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF DIARY:30:22 == 0 && TFLAG:194 > 1000  && (TALENT:恋慕 || TALENT:思慕)
		CALL K30_WRITE_DIARY(22)
	IF TCVAR:30:364
		IF TFLAG:194 > 1000
			CALL HPH_PRINT, "「嗯嗯~！　嗯啊HPH　………啊呼HPH」", "W"
			PRINTFORML 「诶……钓到什么了吗…？」
			PRINTFORMDL 映姬被快感夺走心神，连拉竿都不记得了…
			PRINTFORMDW 结果是%CALLNAME:MASTER%代她钓上来，就这样把钓果收下了
		ELSE
			STRDATA LOCALS
				DATAFORM 「呼ーっHPH　呼ーっHPH　呼ーっ…HPH」
				DATAFORM 「啊っ、好厉っHPH　咕哩咕哩、里面、的…HPH」
				DATAFORM 「…这么…这么舒服…什么的HPH」
			ENDDATA
			CALL HPH_PRINT, @"%LOCALS%\n「…%TEXTR("啊呼っ/啊っ啊啊啊っ嗯っ/哈啊啊~っ")%HPH」", "W"
			CALL HPH_PRINT, @"「………啊っHPH　钓到鱼了，是吧…恭喜HPH」", "L"
			SELECTCASE TFLAG:193
				CASE 0
					PRINTFORMDL …从映姬那里得到了意想不到的祝贺
					PRINTFORMDW 撇開钓鱼不谈，映姬似乎沉溺于肛门甜蜜的快乐中…
				CASE 1 TO 20, 22 TO 31
				 	PRINTFORMDL …虽然收到了祝贺的话语，但是散发着雌香的映姬，似乎无法对钓到的东西提起兴趣
				 	PRINTFORMDW 紧闭上美目，再次品味从洞穴震动中涌出的快感…
				CASEELSE
				 	PRINTFORMDL …看来映姬完全没有看到钓到了什么
					CALL HPH_PRINT, @"「…啊呜呜っHPH　又、很厉害…来了…HPH」", "L"
				 	PRINTFORMDW 在%CALLNAME:MASTER%收拾%ITEMNAME:(TFLAG:193)%的旁边，映姬的意识再次回到了肛门的快乐…
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	SELECTCASE TFLAG:193
	;釣れない
		CASE 0
			IF RAND:2 == 1
				PRINTFORMW 「着急是不行的」
			ELSE
				PRINTFORMW 「这就是所谓的“钓鱼”。」
			ENDIF
			RETURN 1
		;魚
		CASE 1 TO 8, 10 TO 20, 22, 25, 26, 27, 29
			IF TFLAG:194 > 1000
				PRINTFORMW 「啊，钓到了……」
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「是啊。在结果出来之前保持冷静是很重要的。」
				ELSE
					PRINTFORMW 「呵呵，进展得很顺利啊」
				ENDIF
			ENDIF
		;大きい魚＠FISHING_SIZEでm級定義の魚
		CASE 9, 23, 24, 28, 30, 31
			IF TFLAG:194 > 1000
				PRINTFORMW 「…能钓到这么大的鱼，我自己也吓了一跳」
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「不是很厉害吗。%FISH_NAME(TFLAG:193)%多么难得能钓到啊」
				ELSE
					PRINTFORMW 「不是很厉害吗?%K30_C_NAME(MASTER)%你很会钓鱼啊」
				ENDIF
			ENDIF
		;守矢之守札
		CASE 131
			IF TFLAG:194 > 1000
				PRINTFORMW 「嗯？　是什么呢？」
				PRINTFORMW 「……这个只是被人扔掉了。」
			ELSE
				IF RAND:2 == 1
					PRINTFORML 「有用得上的地方，我觉得留着也不错。」
					PRINTFORMW 「就算不要，再扔在那边也不行哦。」
				ELSE
					PRINTFORMW 「啊、被什么东西卡住了……是什么呢？」
					PRINTFORMW 「……那个，是谁扔掉的，大概是…」
				ENDIF
			ENDIF
			RETURN 1
		;跳蛋
		CASE 21
			IF TFLAG:194 > 1000
				PRINTFORMW 「……えっ？」
				PRINTFORMW 「……%K30_C_NAME(MASTER)%由您处理……」
			ELSE
				PRINTFORMW 「啊、有什么东西挂住了……！？」
				PRINTFORMW 「……%K30_C_NAME(MASTER)%啊，这种东西就算错了也不要用啊!！」
			ENDIF
			RETURN 1
		;お宝
		CASE 606, 609, 643
			IF TFLAG:194 > 1000
				PRINTFORMW 「这是……%ITEMNAME:(TFLAG:193)%？　这么贵重的东西为什么…？」
			ELSE
				IF RAND:2 == 1
					PRINTFORML 「好厉害啊。这不是很贵重的东西吗」
					PRINTFORMW 「我觉得这是足够的钓果」
				ELSE
					PRINTFORMW 「太好了。一定是平时的善行结出了果实吧」
				ENDIF

			ENDIF
		;木材
		CASE 610
			IF TFLAG:194 > 1000
				PRINTFORMW 「只要没有生根就好了……」
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「……嗯，也许有什么用武之地。重新振作起来吧。」
				ELSE
					PRINTFORMW 「也有这样的事。线没断不就好了吗」
				ENDIF
			ENDIF
			RETURN 1
		;青蛙
		CASE 706
			IF TFLAG:194 > 1000
				PRINTFORMW 「诶诶……鱼姑且不论…青蛙，是吗……」
				PRINTFORMW 「%K30_C_NAME(MASTER)%送给您…」
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「钓到了是的……怎么办，那个」
					PRINTFORMW 「……要吃吗？」
				ELSE
					PRINTFORMW 「蛙…我不认为有什么用途」
					PRINTFORMW 「啊，姑且是拿着吧…」
				ENDIF
			ENDIF
		;未対応の何か
		CASEELSE
			IF TFLAG:194 > 1000
				PRINTFORMW 「为什么在这里能钓到这样的东西呢…」
				PRINTFORMW 「…难道，是什么异变？」
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「好吧，因为是%K30_C_NAME(MASTER)%，所以钓什么都不奇怪…」
					PRINTFORMW 「……不，真的不奇怪吗？　是%ITEMNAME:(TFLAG:193)%哦？」
				ELSE
					PRINTFORML 「你总是做些奇怪的事」
					PRINTFORMW 「没想到都钓不到正常的东西了」
					PRINTFORMW 「……为什么能钓到%ITEMNAME:(TFLAG:193)%呢？」
				ENDIF
			ENDIF
			RETURN 1
	ENDSELECT
	SIF IS_WISEMAN()
		CALL K30_KENJYA_TIME
ENDIF
RETURN 1
;==================================================
;626,土産屋
;TFLAG:194(行動結果(-2=ひやかし -1=ウィンドウショッピング 1=400点未満（BAD） 2=～699点（NOMAL） 3=700点以上（GOOD）
;CFLAG:性格傾向による地の文分岐あり
;==================================================
@M_KOJO_MESSAGE_COM_K30_626
IF TCVAR:30:364 && TFLAG:194 > -2
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_626_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_626_1
#DIMS 品名
#DIMS 属性
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;贈っていたら本体名と属性を取得しておく
	IF TFLAG:194 > 0
		CALL GIFTDATA_MAIN(GET_GIFTDATA(TCVAR:30:今天的礼物, "本体"))
		品名 = %RESULTS%
		IF STRFIND(RESULTS:1, "握住") >= 0
			属性 = 握る
			SIF STRFIND(RESULTS:1, "装飾") >= 0
				属性 = 身につける
		ELSEIF STRFIND(RESULTS:1, "抱住") >= 0
			属性 = 抱く
		ELSEIF STRFIND(RESULTS:1, "穿戴") >= 0
			属性 = 身につける
		ELSE
			属性 = 眺める
		ENDIF
	ENDIF
	;振動棒约会中
	IF TCVAR:30:364
		SELECTCASE TFLAG:194
			CASE -2
				STRDATA LOCALS
					DATAFORM 「…等等，现在……好厉害，好地方HPH」\n「好厉害啊，快死了…的…HPH」
					DATAFORM 「…呼ーっHPH　呼ーっHPH　呼ーっHPH」\n「再、再等一下…HPH」
					DATAFORM 「…是、来了HPH」\n「马上，所以…已经，马上…去了、的说HPH」
				ENDDATA
				CALL HPH_PRINT, LOCALS, "L"
				PRINTFORMDL 在%CALLNAME:MASTER%犹豫买什么的时候，映姬一个人好像快忍不住的性奋了
				PRINTFORMDW 为了不让店员发现，%CALLNAME:MASTER%慌忙把映姬拉到外面…
			CASE -1
				PRINTFORMDL 很遗憾，没有找到好的礼物
				PRINTFORMDL %CALLNAME:MASTER%正要离開店里，但映姬跟不上…
				PRINTFORMW
				CALL HPH_PRINT, @"「%UNICODE(0x2026)*RAND(6,12)%%TEXTR("啊嗯/一、一起去…/啊呼唔")%HPH」", "L"
				STRDATA LOCALS
					DATAFORM 「…嗯啊？　已经…买完东西了？」\n「我这边…无论多少、都等得了HPH」
					DATAFORM 「…嗯っHPH　好吧…已经要出来了」\n「去外面啊…HPH」
					DATAFORM 「…啊，不行HPH　如果现在開始走路…」\n「啊、啊呜呜ぅ…HPH」
				ENDDATA
				CALL HPH_PRINT, LOCALS, "L"
				PRINTFORMDL 顾不上购物，映姬沉浸在肛门的快乐中
				PRINTFORMDW 在%CALLNAME:MASTER%的催促下，映姬迈着软绵绵的步子走出店外…
			CASE IS > 0
				PRINTFORMDL %CALLNAME:MASTER%给映姬买了%品名%
				PRINTDATADL
					DATAFORM 映姬大腿内侧一直偷偷互相磨蹭着，扭扭捏捏地高兴着…
					DATAFORM 映姬无法抑制地耽溺着快感，嘴角微淌着口水露出笑颜…
					DATAFORM 映姬面露红潮，眼中含着舒服的泪水，很開心…
				ENDDATA
				PRINTFORMW
				CALL HPH_PRINT, "「啊…HPH　谢谢，非常感谢…HPH」", "L"
				SELECTCASE 属性
					CASE "觀賞", "抱住"
						PRINTFORML 「但是，现在……能帮我保管吗」
						CALL HPH_PRINT, "「如果掉了的话……很辛苦，所以…HPH」", "W"
					CASE "穿戴"
						CALL HPH_PRINT, "「但是，这个……往后推……好吗HPH」", "L"
						CALL HPH_PRINT, "「漂亮的装饰，已经…戴在身上了HPH」", "W"
					CASE "握住"
						CALL HPH_PRINT, "「那么……赶紧使用吧…HPH」", "L"
						PRINTFORMDL 映姬紧紧攥着%品名%
						PRINTFORMDW 看起来像是在拼命用力忍耐着什么…
				ENDSELECT
		ENDSELECT
		RETURN 1
	ENDIF
	SELECTCASE TFLAG:194
		;ひやかし
		CASE -2
			IF TALENT:恋慕
				IF RAND:2 == 1
					PRINTFORMW 「…你这么认真挑选我很高兴，但给店员添麻烦就不好了」
				ELSE
					PRINTFORML 「…光是%K30_C_NAME(MASTER)%一起看就很開心，不知不觉我也迷上了」
					PRINTFORMW 「下次遇到店员不道歉可不行啊…」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORMW 「…被骂是理所当然的。 有什么可犹豫的呢」
				ELSE
					PRINTFORML 「…是这么难决定的事情吗？」
					PRINTFORMW 「我不能理解」
				ENDIF
			ENDIF
		;果然還是放棄（見送り）
		CASE -1
			IF TALENT:恋慕
				IF RAND:2 == 1
					PRINTFORMW 「光是和%K30_C_NAME(MASTER)%看各种各样的东西就很開心」
					PRINTFORML 「呼呼呼…从没想过我会在选择的时候犹豫」
					PRINTFORMW 「但是，这种消磨时间的方法也很棒呢」
				ELSE
					PRINTFORML 「不用强行选择哦，因为我总是从你那里收到很多」
					PRINTFORMW 「与之替代的是，在这之后去各种各样的地方吧」
				ENDIF
			ELSE
				IF RAND:2 == 1
					PRINTFORML 「无意义地光收礼物也很尴尬」
					PRINTFORMW 「不勉强选择也没关系哦」
				ELSE
					PRINTFORML 「如果只是看的话，就在适当地结束吧」
					PRINTFORMW 「不要妨碍工作时间」
				ENDIF
			ENDIF
		;400点未満（BAD）
		CASE 1
			;日記フラグ
			SIF DIARY:30:14 == 0
				CALL K30_WRITE_DIARY(14)
			PRINTDATAL
				DATAFORM 「诶…在挑选要送给我的赠物？」
				DATAFORM 「啊、啊啦？　给我%品名%…是吗？」
				DATAFORM 「诶ー多、赠物…%品名%……？」
			ENDDATA
			PRINTDATAW
				DATAFORM （我还以为是送给别的孩子的礼物呢…）
				DATAFORM （有点…这个给我也不好办啊）
				DATAFORM （真伤脑筋…明明完全不喜欢…）
			ENDDATA
			PRINTFORMW 「实、实在非常感谢…」
		;400点～699点（NOMAL）
		CASE 2
			;日記フラグ
			SIF DIARY:30:13 == 0
				CALL K30_WRITE_DIARY(13)
			PRINTDATAL
				DATAFORM 「%品名%…可以吗？收下了」
				DATAFORM 「很久以前就非常在意的%品名%…」\n「难道…你知道吗？」
				DATAFORM 「你注意到我一直在看%品名%了吗…」\n「对不起，就像是在索要一样呢」
			ENDDATA
			PRINTFORMW 「非常感谢。会%TEXTR("好好珍惜的/好好保重的/")%」
		;700点以上（GOOD）
		CASE 3
			;日記フラグ
			SIF DIARY:30:12 == 0
				CALL K30_WRITE_DIARY(12)
			;形容詞+本体名を取得
			CALL GIFTNAME(TCVAR:30:今天的礼物)
			PRINTFORML 「啊…%RESULTS%……这个，给我？」
			PRINTFORMW 「非常感谢你。非常棒…」
			SELECTCASE 属性
				CASE "觀賞"
					IF 品名 == "手板"
						PRINTFORML 「…但是，怎么办呢，这个手板……虽然想一直拿着」
						PRINTFORMW 「我，也放不下悔悟棒吧……为难了…」
						PRINTFORMW 「诶？　二刀流…？　那确实有点……」
					ELSE
						PRINTFORML 「要装饰在哪里呢？ 得找个最好的地方…」
						PRINTFORMDW 映姫把%品名%小心翼翼地放进了原来的箱子里
					ENDIF
				CASE "抱住"
					PRINTFORML 「收到这么好的东西，回礼可不容易啊…」
					PRINTFORMDW 映姬小心翼翼地捧着%品名%生怕磕蹭
				CASE "握住"
					PRINTFORML 「呼呼呼、必须要珍惜啊」
					PRINTFORMDW 映姬珍而重之地把%品名%塞进了怀里
				;映姫様がいいねしてくれる装飾グッズは出ないかもしれない=おそらく死に分岐
				CASE "穿戴"
					IF TALENT:恋慕
						PRINTFORML
						PRINTFORML 「欸欸っ多、那个…%K30_C_NAME(MASTER)%に……」
						PRINTFORMW 「%K30_C_NAME(MASTER)%に…如果能把这%品名%帮我戴上…会很高兴、大概的说……」
						PRINTFORMDL 映姬娇羞地提出请求
						PRINTFORMDW 应要求，%CALLNAME:MASTER%将%品名%为其戴上
						PRINTFORML
						PRINTFORMW 「怎么样……适合…吗？」
						PRINTFORML 「……呼呼呼，谢谢。 我好開心」
						PRINTFORMDW 映姬腼腆地微笑着
					ELSE
						PRINTFORML
						PRINTFORML 「…这个%品名%、可以在这里戴吗？」
						PRINTFORMDW  映姬似乎对礼物完全满意
						PRINTFORML 「……感觉非常好呢」
						PRINTFORMW 「%K30_C_NAME(MASTER)%、这么贴心的礼物真的非常感谢」
					ENDIF
			ENDSELECT
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;660,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_MESSAGE_COM_K30_660
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_660_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && SHIRAHU(30)
	IF TCVAR:30:364
		CALL HPH_PRINT, "「………HPH」", "L"
		PRINTFORMDL 映姬背着人在别处热心地读着什么书
		PRINTFORMDW 很在意映姬在读什么，看了下放回原处的书标题…
		PRINTDATADL
			DATAFORM 『不可以的屁股游戏』
			DATAFORM 『秘密的臀開发日记』
			DATAFORM 『肛交薄本全集』
			DATAFORM 『提肛！你不知道的括约肌知识』
		ENDDATA
		PRINTFORMDW ……阎王爷还真是用功
		RETURN 1
	ENDIF
	PRINTFORML 「你在读什么?」
	PRINTFORMDW 映姫\@ TALENT:恋慕 ? 饶有兴趣地看着 # 隔着肩膀看了一眼 \@%CALLNAME:MASTER%的书
	PRINTFORML
	SELECTCASE TFLAG:193
		;ニンジャスレイヤー
		CASE 1
			PRINTFORMW 「『aieee！』『ukatsu！』『gouranga！』……？（注：忍杀用语）」
			PRINTFORML 「………？？？」
			PRINTFORMW 「……文学也有多样性是好事吧……大概」
		;文学（失敗）
		CASE 2
			PRINTFORMW 「…手停了。不一样的书不也挺好的吗」
		;文学（成功）
		CASE 3
			PRINTFORML 「是那个故事吗?非常棒」
			PRINTFORML 「优秀的故事可以超越时代、文化和种族的差异。」
			PRINTFORMW 「我也想读很多，如果有推荐的话请一定告诉我」
		;実用書（失敗）
		CASE 4
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「『用这个咒语，受女孩子欢迎，财运提升! !』……」
					PRINTFORMW 「……你不会相信吧？」
				CASE 1
					PRINTFORML 「『可怕的上司很差劲！不被发现的工作偷懒方法』……」
					PRINTFORMW 「……请把那本书放回不显眼的地方」
				CASE 2
					PRINTFORML 「『怪奇現象特集！　幽霊？　妖怪？　彻底验证是否真的存在！』……」
					PRINTFORMW 「……在幻想乡读相当没意义的书。」
			ENDSELECT
		;実用書（成功）
		CASE 5
			PRINTFORML 「热心学习是非常好的事情。 今后如何使用知识很重要哦」
			PRINTFORMW 「为了自己，而且为了别人正确地使用知识，关系到出色的善行」
		;薄くて高い本＠雛口上参考にしました
		CASE 6
			PRINTFORML 「装帧漂亮的书啊。是珍本之类的吗」
			PRINTFORMW 「让我看看上面写的是什么。」
			PRINTFORMW 「……诶！？」
			PRINTFORML
			LOCAL = RAND:5
			SELECTCASE LOCAL
				CASE 0
					PRINTFORMDW 书的内容是阎王爷接受调教沦落为性奴，是个残酷的凌辱剧
					PRINTFORMDL 两孔被性玩具打開，猪的阳物被塞进嘴里的阎王爷…
					PRINTFORMDW 在開场白中，这样的场面被凄烈地描绘出来，被映姬漂亮地看到了
				CASE 1
					PRINTFORMDW 书的内容是阎王大人在妖魔的迷宫中徘徊，相当厉害的触手本
					PRINTFORMDL 抱着鼓胀的肚子喷出母乳，呜咽着生出触手的阎王爷…
					PRINTFORMDW 在開场白中，这样的场面被描绘得很阴森凄惨，被映姬漂亮地看到了
				CASE 2
					PRINTFORMDW 书的内容是阎王大人与人类合作对抗异变，是王道的纯爱故事
					PRINTFORMDL 桃雾异变中，终于下定决心向思念的人献上第一次阎王大人…
					PRINTFORMDW 在開场白中精心地描绘了这样的场面，被映姬漂亮地看到了
				CASE 3
					PRINTFORMDW 书的内容是阎王大人用性支配人类，罕见的反强奸本
					PRINTFORMDL 骑在无法动弹的男人身上，带着刻薄的笑容淫猥地扭动腰肢的阎王爷…
					PRINTFORMDW 在開场白中淫靡地描绘了那样的场面，被映姬漂亮地看到了那里
				CASE 4
					PRINTFORMDW 书的内容是阎罗王用力量和肉欲统一幻想乡的别開生面的战记
					PRINTFORMDL 在战胜的宴会中，阎王一边插着假阳具侵犯死神，另一边两个肉洞被二羽渡神玩弄…
					PRINTFORMDW 在開场白中，这样的场面被激烈地描绘出来，映姬很漂亮地看到了那里
			ENDSELECT
			PRINTFORMW 「呀啊啊啊啊！这…什，什么啊！这是！ ？」
			;日記フラグ
			IF DIARY:30:25 == 0
				TFLAG:193 = LOCAL < 2 ? 1 # 0
				CALL K30_WRITE_DIARY(25)
			ENDIF
		;保健体育
		CASE 7
			PRINTFORMW 「『%TEXTR("温柔的保健体育/婴儿从哪里来? /女人的构造")%』……」
			IF GETBIT(CFLAG:30:既成事實, 1) && RAND:2 == 1
				PRINTDATAL
					DATAFORM 「诶，难道是知识也没有…对我、连那样的事都……？」
					DATAFORM 「……你不会连那个行为的意义都不知道吧……？」
					DATAFORM 「……没问题吧?我们…做过的事…你完全明白意思的吧？」
				ENDDATA
			ELSE
				PRINTDATAL
					DATAFORM 「错误的知识确实会让人困惑，但从这么初级的地方開始……？」
					DATAFORM 「……容易理解确实很好，但难道从那里……？」
					DATAFORM 「……难道外面的世界比我们更不了解这种事吗？」
				ENDDATA
			ENDIF
			PRINTFORMDW 映姬不知该如何反应
		;カーマ・スートラ
		CASE 8
			PRINTFORMW 「是《爱经》吗……」
			SELECTCASE RAND:9
				CASE 0 TO 3
					PRINTFORML 「%K30_C_NAME(MASTER)%，是不是只挑了色情的地方读？」
					PRINTFORMDW 被映姬用稍微冷淡的目光看了一眼……
				CASE 4 TO 7
					PRINTFORML 「%K30_C_NAME(MASTER)%，眼睛炯炯有神呢？」
					PRINTFORMDW 被映姬用微妙的目光看着……
				CASE 8
					PRINTFORMDL 「要读的话，请好好读哦」
					PRINTFORMDW 映姬应该知道这是一本什么样的书，但她的反应却出乎意料地冷静
					PRINTFORML 「确实，那本书…主要写的是关于性爱技巧，但不仅如此」
					PRINTFORML 「听好了吗，首先，即使是性爱，也必须与正义、财物保持协调。」
					PRINTFORML 「这在開头就已经说明了。……只挑色情的地方读是不行的哦？」
					PRINTFORMW 「那么正义是什么呢……」
					PRINTFORMDL 不知什么时候映姬開始说教了
					PRINTFORMDW 连小黄书都能说教的阎魔大人真厉害%CALLNAME:MASTER%再次佩服了…
			ENDSELECT
	ENDSELECT
	SIF IS_WISEMAN() && GROUPMATCH(TFLAG:193, 1, 3, 5)
		CALL K30_KENJYA_TIME
ENDIF
RETURN 1
;==================================================
;698,進入房間
;TARGET的房間に入る場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K30_698
CALL TRAIN_MESSAGE
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_698_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_698_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FIRSTTIME(SELECTCOM)
		PRINTFORML 「来吧,这边,请进吧」
		PRINTFORMDL 映姬的私人房间和预想的一样收拾得很干净
		PRINTFORMDW 倒不如说太整齐了,看起来完全没有生活感…
		PRINTFORMW
		PRINTFORMW 「工作在法庭上进行，所以在这里几乎只需要睡觉」
		PRINTFORMW 「休息的时候吗？休假也只是为了兴趣出去了哦」
		PRINTFORMW 「无论如何都很在意你们是否遵循了我的教诲」
	ELSEIF TCVAR:30:364
		PRINTFORML 「来，快点…进来吧…」
		CALL HPH_PRINT, "「已经，各种各样的…界线，也许…HPH」", "W"
	ELSEIF TALENT:恋人
		PRINTFORML 「%K30_C_NAME(MASTER)%♪　……ふふっ」
		PRINTFORML 两个人独处的时候映姬很快就缠上了手臂
		PRINTFORMW 「在大家面前,果然还是有些在意…」
		PRINTFORMW 「两人一起悠闲地放松一下吧♪」
	ELSEIF TALENT:恋慕
		PRINTFORML 「那么,我去准备茶吧」
		PRINTFORMW 「这是平时的回礼。偶尔这样也没什么的吧」
	ELSE
		PRINTFORML 「那,那么往这边…」
		PRINTFORMDL 映姬看起来有点紧张
		PRINTFORMW （如果只是聊天的话，还是在别的地方比较好吧…）
	ENDIF
ENDIF
RETURN 1
;==================================================
;699,外出
;小町・久侘歌が大体居るのでその反応のみ
;==================================================
@M_KOJO_MESSAGE_COM_K30_699
CALL TRAIN_MESSAGE
CALL M_KOJO_COLOR_K30
CALL M_KOJO_MESSAGE_COM_K30_699_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_699_1
#DIM MITA
#DIM ASATYUN
ASATYUN = 0
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF CFLAG:睡眠 || CFLAG:衰弱
		PRINTFORMDW 为了不吵醒\@ CFLAG:衰弱 ? 疲惫不堪地躺着 # 安稳地睡着 \@的映姫，起身出门
	ELSEIF CFLAG:76:現在位置 == 640 || CFLAG:129:現在位置 == 640
		;基本小町が反応。恋人持ち久侘歌が居ればそっち
		MITA = 76
		SIF CFLAG:76:現在位置 != 640 || (CFLAG:129:現在位置 == 640 && TALENT:129:恋人)
			MITA = 129
		PRINTFORMDL 映姫と%TEXTR("边调情边/牵着手/抱着胳膊/")%走出房间
		PRINTFORMDW 和在外面的%CALLNAME:MITA%突然相遇了……
		;待客室お泊り
		IF BETWEENTIME(360, 599) && TCVAR:30:连住禁止
			PRINTFORMD 显然很享受住在这里
			ASATYUN = 1
		ELSEIF TALENT:恋人
			PRINTFORMD 非常和睦
		ELSE
			PRINTFORMD 举止宛如恋人
		ENDIF
		;見ちゃった方の反応
		PRINTFORMD 二人を見て、%CALLNAME:MITA%は
		IF TALENT:MITA:恋人
			PRINTFORMDL \@ MITA == 76 ? 难以置信地说 # 眼看就要哭出来了 \@，脸上显示出
		ELSEIF TALENT:MITA:恋慕
			PRINTFORMDL \@ MITA == 76 ? 羡慕的眼神 # 憧憬的视线 \@を望着这边
			SIF ASATYUN
				PRINTFORMDL 总觉得脸也红了…好像在想象『什么』事在昨晚发生了
		ELSEIF TALENT:MITA:思慕
			PRINTFORMDL 一副很不高兴的样子
		ELSEIF ASATYUN
			PRINTFORMDL \@ MITA == 76 ? 明显地笑眯眯的 # 脸涨得通红，扭过脸去了 \@
		ELSE
			PRINTFORMDL \@ MITA == 76 ? 咧嘴一笑 # 红着脸的 \@
		ENDIF
		PRINTFORMW
		;映姫様の反応
		LOCALS = %K30_GREETING_EIKI()%
		SIF LOCALS == "おはようございます"
			LOCALS = おはよう
		IF TALENT:MITA:恋人
			PRINTFORML 「あっ……%CALLNAME:MITA%…」
			SIF ASATYUN
				PRINTFORML 「真的，对不起……」
		ELSEIF TALENT:恋人
			PRINTFORML 「%LOCALS%、%CALLNAME:MITA%」
			IF ASATYUN
				PRINTFORML 「怎么了？　和%K30_C_NAME(MASTER)%在一起会不会很奇怪？」
				PRINTFORML 「是恋人嘛。这是当然的？」
			ENDIF
		ELSEIF TALENT:MITA:恋慕
			PRINTFORML 「%LOCALS%、%CALLNAME:MITA%」
			PRINTFORMDL 映姬像给%CALLNAME:MITA%看一样和%CALLNAME:MASTER%重新挽起了胳膊
		ELSE
			PRINTFORML 「啊，啊啦…%LOCALS%、%CALLNAME:MITA%…」
			IF ASATYUN
				PRINTFORML 「欸っ多…%K30_C_NAME(MASTER)%和、那个…」
				PRINTFORML 「诶诶、和我想的一样吗…」
			ENDIF
		ENDIF
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;前ターン膝枕後身体接觸指令
;人の耳をがりっとやって慌てる映姫様はイメージ合わないので強制成功に
;さすがの映姫様でも振動棒挿れてたら強制失敗
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_SUCCESS_SCOM_K30_60
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 = TCVAR:30:364 ? -1 # 1

@M_KOJO_MESSAGE_SCOM_K30_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K30_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K30_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:30:364
		PRINTFORML 「荒、太荒谬了…别说了」
		PRINTFORMW 「在这种时候，拜托%K30_C_NAME(MASTER)%的…不像话…」
	ELSEIF ONCE("掏耳朵") && RAND:3 == 1
		;隙あらば説教できる。閻魔様はスゴイ、俺は感動を覚えずに是られなかった
		PRINTFORML 「稍微…有点脏哦。 你自己有好好清理耳朵吗？」
		PRINTFORMDW 糟糕，用掏耳朵的姿势是逃不掉映姬的说教的…
		PRINTFORML
		PRINTFORML 「如果把仪容交给别人的话，平时的生活习惯会被怀疑。可以吗……」
		PRINTFORMDW 虽然映姬一直没怎么说教，但她的手指始终是\@ TFLAG:193 == 1 ? 温柔的 # 精心 \@继续采耳
		PRINTFORML
		PRINTFORML 「……光装饰外表是没有意义的。只有保持内心纯洁，才能做善事……」
		PRINTFORMDW 就算嘴巴动了这么多，指尖也不会乱。阎魔大人真厉害，%CALLNAME:MASTER%再次这么想
		CALL K30_D_LINE
		PRINTFORML 「是的，结束了哦。 很清爽啊。」
		PRINTFORMDW ……耳朵里很舒服，但代之以各种各样的感觉。
	ELSEIF TALENT:恋慕
		IF RAND:2 == 1
			PRINTFORML 「好的，结束了。最后失陪了。」
			PRINTFORMDW 掏完一只耳朵后，映姬把嘴凑到耳边
			IF K30_PUSH_DOWN() > 200
				SETCOLOR 206, 8, 21
				PRINTFORML
				PRINTFORML ふーっ♥
				PRINTFORMW
				CALL M_KOJO_COLOR_K30
				PRINTFORMDL ……滚烫的吐气碎成碎片
				PRINTFORMDW 吃惊地看着映姬意味深长地微笑着…
			ELSE
				PRINTFORMDW 哼
				PRINTFORMDW …虽然有点痒，但是很清爽
				PRINTFORMW 「漂亮的成就了。辛苦了」
			ENDIF
		ELSE
			PRINTFORML 「请别动……不痛吧？」
			PRINTFORMDW 映姬非常用心地为我掏耳朵。而且不知道为什么好像很高兴
			PRINTFORML 「好的，这边结束了。请转向另一边。♪」
			PRINTFORMDW 虽然在立场上很难做到，但本来就喜欢为别人尽力吧
			IF GETBIT(CFLAG:30:既成事實, 1) && EXP:精飲経験 > 20 && RAND:3 == 1
				PRINTFORML
				PRINTFORMDL 忽然%CALLNAME:MASTER%想起了爱含着阴茎的映姬
				PRINTFORMDW ……一定是真的喜欢侍奉。
			ENDIF
		ENDIF
	ELSE
		IF RAND:2 == 1
			PRINTFORML （为什么我要做这种事呢……）
			PRINTFORMDW 映姬一副无法释怀的样子，继续用手指掏耳朵
			PRINTFORML 「…积攒了很多呢。 你有好好自己处理了吗？」
			PRINTFORMDW 不管怎么说，从性格上来说好像不会偷懒，映姬一直细心到最后
		ELSE
			PRINTFORMW 「对阎罗大人的请求倒是大不相同……」
			PRINTFORML 「难不成………『掏耳朵』是想好好听我说话吗？」
			PRINTFORMW 「那样就好了吧。 好好打扫之后再好好教训你哦」
			PRINTFORMDW ……可能弄错了拜托的对象
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;61,抱枕
;(TARGET睡眠時間or衰弱)陪睡中、前ターン抱きつく後就寝指令
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K30_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K30_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K30_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_K30_62
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0
SIF (RAND:3 ==1 && CFLAG:1801 == 1) || MARK:反発刻印
	TFLAG:192 = -1
@M_KOJO_MESSAGE_SCOM_K30_62
IF CFLAG:1801 == 0 || CFLAG:TARGET:睡眠 || FLAG:70 || TCVAR:烂醉 || CFLAG:诶嘿嘿 == 2
	TFLAG:194 = 1
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_SCOM_K30_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K30_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF TFLAG:194
	IF FLAG:70
	ELSEIF CFLAG:TARGET:睡眠
	ELSEIF TCVAR:烂醉 == 1
		PRINTFORMW 「呼唔……突然之间,做什么啊～」
	ELSEIF TALENT:恋慕
		PRINTFORML 「……这里,还空着哦？」
		PRINTFORMDW 映姫用食指,指了指自己的嘴唇…绛唇寂寞桃花殷，宿妆娇羞偏髻鬟
	ELSEIF ABL:欲望 >= 5
		PRINTFORMW 「……只是这样,就可以了么？」
	ELSEIF ABL:親密 >= 5
		PRINTFORML 「……你以为只是这样的亲爱之印就能让我满足么…」
		PRINTFORMDW 映姫满脸通红的捂着自己额头…
	ELSE
		PRINTFORMW 「我们之间、明明都还不是那种关系…」
	ENDIF
	RETURN 1
ENDIF
CALL K30_D_LINE
IF TFLAG:193 == -1
	PRINTFORMDL %CALLNAME:PLAYER%在%CALLNAME:TARGET%的额头上轻轻地…
	IF MARK:反発刻印
		PRINTFORMDL 刚要接吻就被悔悟棒顶住下巴…
	ELSE
		PRINTFORMDL 想要接吻的时候却被映姬的指尖挡住了…
	ENDIF
ELSE
	PRINTFORMDL %CALLNAME:PLAYER%轻吻了%CALLNAME:TARGET%的额头…
	IF TALENT:恋慕
		PRINTFORMDL %CALLNAME:TARGET%意犹未尽地凝视着%CALLNAME:PLAYER%…
	ELSE
		PRINTFORMDL %CALLNAME:TARGET%羞得满脸通红…
	ENDIF
ENDIF
PRINTFORMW
IF LOCAL
	;失敗
	IF TFLAG:193 == -1
		IF MARK:反発刻印
			PRINTFORML 「我现在想要的不是亲爱的印记」
			PRINTFORMW 「请给我有形式的道歉」
		ELSE
			PRINTFORML 「总是冷不防的对女性……」
			PRINTFORMW 「不要以为会一直行得通哦？」
		ENDIF
	ELSEIF TALENT:恋人
		PRINTFORML 「……这里,还空着哦？」
		PRINTFORMDW 映姫用食指,指了指自己的嘴唇…绛唇寂寞桃花殷，宿妆娇羞偏髻鬟
	ELSEIF TALENT:恋慕
		PRINTFORMW 「……只是这样,就可以了么？」
	ELSEIF ABL:親密 >= 5
		PRINTFORMW 「你以为只是这样的亲爱之印就能让我满足么……」
		PRINTFORMDW 映姫满脸通红的捂着自己额头…
	ELSE
		PRINTFORMW 「我们之间、明明都还不是那种关系…」
	ENDIF
ENDIF
RETURN 1
	;==================================================
;63,更多的接吻
;前ターン接吻後接吻
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_SUCCESS_SCOM_K30_63
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
IF MARK:反発刻印 || (!TALENT:接吻魔 && !K30_TRY_HARASS() && SHIRAHU(30))
	TFLAG:192 = -1
ELSE
	TFLAG:192 = 0
ENDIF
@M_KOJO_MESSAGE_SCOM_K30_63
CALL K30_KOJO_MESSAGE_SCOM_63
CALL M_KOJO_MESSAGE_SCOM_K30_63_1
RETURN RESULT

@M_KOJO_MESSAGE_SCOM_K30_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠 || TCVAR:烂醉 == 1
	ELSEIF CFLAG:陪睡中
		SIF MARK:反発刻印
			RETURN 1
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「嗯ー…………♥」
			CASE 1
				PRINTFORMW 「嗯~……明天也……做很多吧……♥」
			CASE 2
				PRINTFORMW 「………幸福♥」
		ENDSELECT
	ELSEIF TFLAG:193 < 0
		CFLAG:1602 = 1
		IF MARK:反発刻印
			PRINTFORML 「一次又一次…怎么以为能一直蒙混过去呢？」
			PRINTFORMW 「该道歉时就道歉，先让我看看你的诚意」
		ELSEIF TALENT:恋慕
			PRINTFORML 「呼呼,你的表情变得很奇怪呢♪」
			PRINTFORMDW 被映姬耍得团团转
			IF K30_BE_SEEN()
				PRINTDATAW
					DATAFORM 「……想继续的话，明白吧♥」
					DATAFORM 「…别生气啊？」\n「看，%K30_C_NAME(K30_FIND_AROUND(),2)%不是就在那里吗」
				ENDDATA
			ENDIF
		ELSEIF ABL:親密 >= 5
			PRINTFORMW 「抱歉。\@ K30_BE_SEEN() ? 被看着呢 # 现在没有那种心情 \@,所以下次再说吧」
		ELSE
			PRINTFORML 「虽然我也并没有说不愿意,但是这么多次我也很困扰的……」
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF TFLAG:194 > 0
				PRINTDATAW
					DATAFORM 「呼呼……无论做多少次都很棒……♥」
					DATAFORM 「做多少次都不够吗？」\n「哼呼呼…和我一样啊♥」
					DATAFORM 「啊~…现在的感觉，喜欢♥」\n「吶，再来一次…这次再久一点好吗…♥」
				ENDDATA
			ELSE
				PRINTFORMW 「已经……还是那么强行了…♥」
			ENDIF
		ELSEIF ABL:親密 >= 5
			PRINTFORMW 「噗哈……明明都还没做好心理准备…」
		ELSE
			PRINTFORMW 「哈啊,哈啊……明明都不是恋人…居然就这样……」
		ENDIF
	ENDIF
ENDIF
RETURN 1

@K30_KOJO_MESSAGE_SCOM_63
DRAWLINE
IF FLAG:70 == 1
	PRINTFORMDL %CALLNAME:PLAYER%用自己的嘴堵上了%CALLNAME:TARGET%的樱唇…
	PRINTFORMDL 被时间静止的%CALLNAME:TARGET%在无抵抗的情况下被轻薄…
ELSEIF CFLAG:TARGET:睡眠
	PRINTFORMDL %CALLNAME:PLAYER%用自己的嘴堵住了沉睡着的%CALLNAME:TARGET%的朱唇
	IF ABL:親密 >= 8 && TFLAG:194 > -1
		PRINTFORMDL 唇齿分离，%CALLNAME:TARGET%拘谨地微笑着…
	ELSEIF ABL:親密 >= 5 && TFLAG:194 > -1
		PRINTFORMDL %CALLNAME:TARGET%有点痛苦地皱起了眉头…
	ELSE
		PRINTFORMDL %CALLNAME:TARGET%皱眉，无意识地别过脸去…
	ENDIF
ELSEIF CFLAG:陪睡中
	PRINTFORMDL %CALLNAME:PLAYER%用自己的嘴堵住了陪睡的%CALLNAME:TARGET%的红唇…
	IF  !MARK:反発刻印
		PRINTFORMDL %CALLNAME:TARGET%迷迷糊糊地露出了微笑
	ELSE
		PRINTFORMDL %CALLNAME:TARGET%迷迷糊糊地皱起眉头，似乎有点嫌恶…
	ENDIF
ELSEIF TFLAG:193 > -1
	PRINTFORMDL %CALLNAME:PLAYER%用自己的嘴堵上了%CALLNAME:TARGET%的樱唇…
	IF TALENT:恋慕
		IF K30_PUSH_DOWN() > 300 || CFLAG:诶嘿嘿 == 2 || TCVAR:30:364
			PRINTFORMDL %CALLNAME:TARGET%搂着脖子积极地缠着舌头…
			TFLAG:194 = 1
		ELSE
			PRINTFORMDL %CALLNAME:TARGET%满脸通红的也将嘴唇压上来…
		ENDIF
	ELSEIF ABL:親密 >= 5
		PRINTFORMDL %CALLNAME:TARGET%毫不客气的咚咚拍着%CALLNAME:MASTER%的肩膀…
	ELSE
		PRINTFORMDL %CALLNAME:TARGET%似乎喘不上气了…
	ENDIF
ELSE
	PRINTFORMD %CALLNAME:TARGET%对再次接近%CALLNAME:PLAYER%的嘴
	IF MARK:反発刻印
		PRINTFORMDL 抽出悔悟棒抵住…
	ELSEIF TALENT:恋慕
		PRINTFORMDL 用手指捏了下后哧哧地笑了起来…
	ELSEIF ABL:親密 >= 5
		PRINTFORMDL 眼看就要碰到的时候闪開了…
	ELSE
		PRINTFORMDL 用手掌挡住了…
	ENDIF
ENDIF
TFLAG:400 = RAND:2
SIF TFLAG:400 && (DATE_HITOGOMI() || WITH_MOB() == 9)
	CALL DATE_HITOGOMI_MESSAGE(CFLAG:PLAYER:現在位置)
CALL M_KOJO_COLOR_K30
RETURN

;==================================================
;80,拉手
;约会出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_SUCCESS_SCOM_K30_80
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 = TCVAR:30:364 ? -1 # 0
@M_KOJO_MESSAGE_SCOM_K30_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K30_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K30_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:30:364
		PRINTDATAW
			DATAFORM 「讨厌……不要拉，不行…哟…」\n「慢慢地，走吧…」
			DATAFORM 「等等…这么快走……很可怕…」
			DATAFORM 「等、等一下！？」\n「不，不行…拜托，不能催啊…」
		ENDDATA
		IF NOWEX:Ａ絶頂
			CALL HPH_PRINT, @"「啊…HPH　%TEXTR("真的，等等…等灯/求求了…一下，停一下吧")%…HPH」", "W"
			PRINTFORMDW 映姬握着的手不自觉的攥紧了…就这样止步，用力地闭上了美目…
			TFLAG:194 = 19
		ENDIF
	;约会に誘った
	ELSEIF TCVAR:30:358 == 0
		IF TALENT:恋慕
			PRINTFORML 「…早点到再悠闲地度过也不错，但是」
			PRINTFORML 「我也喜欢这样两个人走在一起的时光」
			PRINTFORMW 「着急也要适可而止，吶」
		ELSE
			PRINTFORMW 「啊，请不要那么急…」
		ENDIF
	;誘われた
	ELSE
		IF TALENT:恋慕
			PRINTFORML 「不要那么慌张…」
			PRINTFORMW 「%K30_C_NAME(MASTER)%慢慢地走下去不行吗？」
		ELSE
			PRINTFORML 「恰啊」
			PRINTFORMW 「请不要突然……」
		ENDIF
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;SOURCEやNOWEXを使ってSELECTCOMに依存しない口上があってもいいんじゃない
;MESSAGE_COMが用意されてない指令で呼び出される汎用口上
;何かに使えそうと思ったけどやっぱり使ってない
@M_KOJO_MESSAGE_COM_K30_00
;性交処女喪失をRETURN 100して
;IF RESULT == 100 でまとめるとか
;苦痛や快楽のSOURCEをトリガーとして汎用あえぎ口上を作るとか
;いろいろ利用方法は考えられますが随意やってください

;PRINTFORMW テストメッセージ
;THROW M_KOJO_MESSAGE_COM_K30_00の処理です
[SKIPEND]

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_日常系コマンド.ERB