code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:反発刻印(3以上=会話不能)(4以上はバグ
;TCVAR:烂醉(1=通常成功or大失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_300
;指令共通メッセージ(TRAIN_MESSAGE)
;削除すると「～说着话。」とかが消えます。また、削除した場合は自動で口上色が付きません。
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_MESSAGE_COM_K53_300_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:烂醉
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「呼喵～～～…」
			CASE 1
				PRINTFORML 「呜～嗯…呜～嗯…」
		ENDSELECT
	ELSEIF CFLAG:ブチギレ
		PRINTFORML 「…太煩人的話、會惹怒因幡們喲…」
	ELSEIF IsHeat(TARGET)
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「嗯…嗯、呼…、看、看什麼啊、什麼事都沒有喲…」
			CASE 1
				PRINTFORML 「嗯…呼………、哦…？……啊、對不起、…那個、你說了什麼…」
			CASE 2
				PRINTFORML 「哈啊…哇呼…、…誒？聽、聽到了啦……好啦、你繼續說下去…」
		ENDSELECT
		PRINTFORML 帝不時漏出甜蜜的聲音、和%CALLNAME:PLAYER%的会話還在繼續…
	ELSE
		;お話
		SELECTCASE RAND:4
			;身内の話
			CASE 0
				SELECTCASE RAND:4
					;因幡
					CASE 0
						PRINTFORML 「這麼說來之前因幡們～…」
					;鈴仙
					CASE 1
						PRINTFORML 「和鈴仙好好相處吧」
						PRINTFORML 「那孩子雖然很胆小，但是戲弄她還是很開心的」
					;永琳
					CASE 2
						PRINTFORML 「永琳是我的師匠」
						PRINTFORML 「只是稍微惡作劇一下就生氣有點受傷呢～」
					;輝夜
					CASE 3
						PRINTFORML 「公主雖然總是一直待在家裡」
						PRINTFORML 「但是最近偶爾也會到人里去～」
				ENDSELECT
			;あることないこと
			CASE 1
				SELECTCASE RAND:4
					CASE 0
						PRINTFORML 「我要是發生了什麼事，幻想郷中的１億只因幡不會保持沉默的說」
						PRINTFORML 「明白了的話，你還不快來跪拜我」
					CASE 1
						PRINTFORML 「鈴仙總是保持一副很正常的清純模樣」
						PRINTFORML 「但是你沒看見她穿著什麼內衣哦…」
					CASE 2
						PRINTFORML 「實際上在迷途森林裡有隱藏的寶藏在沉眠喲」
						PRINTFORML 「而記載了寶藏位置的地圖就在師匠放內衣的櫃子裡…」
					CASE 3
						PRINTFORML 「你知道公主每天深夜都在偷偷幹什麼麼？」
						PRINTFORML 「是啊，說晚上做的事的確不大好…」
				ENDSELECT
			;商談
			CASE 2
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「喂、不買點藥麼？現在有鈴仙穿過的胖次附送喲？」
					CASE 1
						PRINTFORML 「意中人對你不感興趣？那麼我向你推薦這款商品！」
					CASE 2
						PRINTFORML 「拿著的話就會有好事發生！幸運的护符『開運大紋』！」
						PRINTFORML 「現在買的話就算你便宜一些喲」
				ENDSELECT
			;你の話を聞く
			CASEELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「呼～嗯，原來是那樣啊～…」
					CASE 1
						PRINTFORML 「誒～、那之後怎麼樣了？」
					CASE 2
						PRINTFORML 「啊ー、原來如此呢～」
				ENDSELECT
				;様子
				SELECTCASE TFLAG:193
					CASE 0
						PRINTFORML 帝坐在一個舒適的地方，啪嗒啪嗒的甩著腳…
					CASE 1
						PRINTFORML 帝被%CALLNAME:PLAYER%逗弄著，庫斯庫斯的笑著…
					CASE -1
						PRINTFORML 帝聽了%CALLNAME:PLAYER%的話打著哈欠，一副無聊的樣子…
				ENDSELECT
		ENDSELECT

	ENDIF

	WAIT

ENDIF
RETURN 1
;==================================================
;301,泡茶
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_301
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_301_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;烂醉
	IF TCVAR:烂醉
		SELECTCASE TFLAG:193
			CASE 0
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「嗚……咕………咕………」
					CASE 1
						PRINTFORML 「呼ー呼ー呼哈！呼ー呼ー！」
				ENDSELECT
			CASE 1
				PRINTFORML 「%CALLNAME:PLAYER%的茶不好喝～…」
			CASE -1
				PRINTFORML 「哦吼哦吼、…不要！快拿酒來！」
		ENDSELECT
		PRINTFORML 給爛醉如泥的帝喝了一些茶…
	;ブチギレ
	ELSEIF CFLAG:ブチギレ
		PRINTFORML 「………………」
		PRINTFORML 帝瞥了%CALLNAME:PLAYER%一眼，什麼都沒說就把茶拿過去了…
	;初回
	ELSEIF FIRSTTIME(301)
		PRINTFORML 「誒、這茶是哪裡來的？…嘛、我會喝的」
		PRINTFORML 帝警戒的接過了%CALLNAME:PLAYER%手中的茶
	;通常
	ELSE
		PRINTFORML 「泡了茶給我喝？謝謝」
		PRINTFORML 帝一邊道謝一邊從%CALLNAME:PLAYER%手中接過了茶
		PRINTL
		SELECTCASE TFLAG:193
			CASE 0
				SELECTCASE RAND:2
					CASE 0
						PRINTFORML 「嗯…嘖嘖…………呼…」
					CASE 1
						PRINTFORML 「咕嚕…咕嚕……呼哈ー」
				ENDSELECT
			CASE 1
				PRINTFORML 「嗯、真好喝！」
				PRINTFORML 「呼呼、手藝變好了呢…」
				PRINTFORML 那奇怪的語調是在模仿永琳麼…
			CASE -1
				PRINTFORML 「誒、等等！你這泡茶的技術能不能好好練練？」
		ENDSELECT
	ENDIF

	WAIT

ENDIF
RETURN 1
;==================================================
;302,身体接觸
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_302
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_302_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TCVAR:烂醉
		;普段より大胆な身体接觸
		;抱きつかれる　耳かぷ
	ELSEIF CFLAG:ブチギレ
		PRINTFORML 「吖啊、吵死了！到那邊去！」
	ELSEIF IsHeat(TARGET)
		SELECTCASE RAND:3
			;くすぐる
			CASE 0
				PRINTFORML 從帝的腋下部分的縫隙伸進手去進行逗弄
		 		PRINTFORML 「咿哈！…嗚呼、嗯嗯嗯、…現、現在、不要再、再、碰我了、啊！呼啊！」
		 		PRINTFORML 帝一邊扭動著身體一邊發出H的聲音…
			;肩に手を置く
		 	CASE 1
		 		PRINTFORML 拍了拍全身發熱的帝的肩膀
		 		PRINTFORML 「咿呀啊啊啊！？…嗯、不、不要、不要突然碰我、什、什麼事情都沒有！」
		 		PRINTFORML 突然受到驚嚇的帝不自覺的發出了美妙的聲音…
		 	;頬を撫でる
		 	CASE 2
		 		SELECTCASE TFLAG:193
		 			CASE 1
						PRINTFORML 臉色很紅不要緊麼，一邊問一邊用手掌摸了摸帝的臉
						PRINTFORML 「…嗯？……啊呼…」
						PRINTFORML （あ…%CALLNAME:PLAYER%の手…つめたくて、きもちぃ…）
					CASEELSE
						PRINTFORML 熱っぽい表情をしている帝の頭に、大丈夫か？と言って手の平を当てた
						PRINTFORML 「ふえ？…ひゃぁっ！？きゅ、きゅうにさわるなっ、な、なんでもないからっ」
				ENDSELECT
		 ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;耳を触る
			CASE 0
				PRINTFORML 摸摸了帝垂下來的兔子耳朵
				PRINTFORML 「呀啊、不要摸耳朵、會pikopiko嚮的～」
			;くすぐる
			CASE 1
				PRINTFORML 從後方把手伸向帝的腋窩開始撓癢癢
				PRINTFORML 「咿呀！？呀、啊哈哈哈哈、雅、亞美爹、亞美爹喲、啊哈哈哈哈哈哈哈」
			;手を触る
			CASE 2
				PRINTFORML 把帝的手放到自己手中
				PRINTFORMW 「…誒？什、什麼？這樣感覺很惡心的…」
		ENDSELECT
	ENDIF

	WAIT

ENDIF
RETURN 1
;==================================================
;303,道歉
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_303
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_303_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 2
			PRINTFORML 「哈啊～？糖果點心？想要用那樣的東西來讓我消氣…」
			PRINTFORML 「…啊！這、這是山吹色的……」
			PRINTFORML 「…呼～嗯、嘛、這次就這樣算了，下次要小心點記住了麼？」
		CASE 1
		CASE 0
			PRINTFORML 「…再有下一次的話就不原諒你了…」
		CASE -1
		CASE -2
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;304,幫忙干活
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:沒法幫忙(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_MESSAGE_COM_K53_304
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_304_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;305,索求膝枕
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:体型 > TALENT:体型 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:親密(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_MESSAGE_COM_K53_305
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_305_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;TFLAG:193(1=ABL:親密6以上かつ妊娠時 0=成功 -1=ABL:親密5以下)
;==================================================
@M_KOJO_MESSAGE_COM_K53_306
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_306_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:恋慕(受け入れつつ笑顔でやり返す
	;ABL:親密(6以上=怯生生地やり返す
	;ABL:従順(5以上=されるがまま
;==================================================
@M_KOJO_MESSAGE_COM_K53_307
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_307_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;陪睡中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_308
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_308_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;睡眠中
	IF CFLAG:睡眠

	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;309,摸頭
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:親密(6以上=通常成功時分岐
;==================================================
@M_KOJO_MESSAGE_COM_K53_309
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_309_1
RETURN RESULT

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

	ENDIF

ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_331
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_331_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 0
			PRINTFORML （…？好像有什麼奇怪的味道………嘛、算了）
			PRINTFORMW 帝雖然感覺到了違和感，但是沒有特別在意就喝了帶藥的茶
		CASE 1
			PRINTFORML 帝完全沒有感覺到違和的氣味，美美的把茶喝完了
		CASE -1
			PRINTFORML 「…？嗅嗅……這是什麼？總感得有種奇怪的味道……重新泡」
			PRINTFORMW 帝拒絕喝這杯茶並把茶杯還給%CALLNAME:MASTER%…
	 ENDSELECT
ENDIF
RETURN 1
;==================================================
;332,勸酒
;TFLAG:193(0=不會喝酒成功 -1=不會喝酒失敗 -2=不會喝酒大失敗 -5=不會喝酒あきらめ)
;TFLAG:194(51=濁酒 52=清酒 53=鬼殺酒)
;ALCOHOL_TASTE(TFLAG:194)(15以上=気に入る 9以下=口に合わない)
;==================================================
@M_KOJO_MESSAGE_COM_K53_332
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_332_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;「昔の鬼の酒の味」を知っている
ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_333
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_333_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3
		;大成功
		CASE 2
		;成功
		CASE 1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,碰杯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:妊娠自覚状態(1=吃飯)
;TALENT:酒耐性(-2=吃飯)
;==================================================
@M_KOJO_MESSAGE_COM_K53_334
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_334_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;335,照料
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_335
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_335_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕
;ABL:親密(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:膝枕した)(44以下=失敗
;==================================================
@M_KOJO_MESSAGE_COM_K53_336
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_336_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 > 0
	;寝ちゃった
	ELSE
	;それ以外
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,推倒（時姦時猥褻
;TFLAG:194 (0=成功 1=人目がある　2=野外は嫌でござりまする　3=多人数プレイは勘弁　4=合意があっても情緒が足りぬ）
;TCVAR:初次拥抱　1=普通に合意ゲット　2=先に接吻ぐらいしろよ　3=媚薬or発情には勝てなかったよお…　4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
;5=強引に迫られると断れぬ(素質膽怯持ち専用) 6=まんざらでもない　7=駄目　8=論外
;==================================================
@M_KOJO_MESSAGE_COM_K53_350
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_350_1
RETURN RESULT

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

	;合意持ち失敗
	ELSEIF TFLAG:194
		SELECTCASE TFLAG:194
			;人目がある
			CASE 1
			;野外は嫌
			CASE 2
				PRINTFORML 「所以說了啊，好好的選擇地方再說吧」
				PRINTFORML 「我才不想像那邊奇怪的兔子一樣吼吼的就那麼在外面做了」
			;多人数は嫌
			CASE 3
			;情緒が足りない
			CASE 4
				PRINTFORML 「那個啊ー、我可是受人尊敬的女士，才不是隨隨便便的女人」
		ENDSELECT
	;初次拥抱or合意持ちで成功
	ELSE
		;初次拥抱
		IF TCVAR:初次拥抱
			SELECTCASE TCVAR:初次拥抱
				;普通に合意ゲット
				CASE 1
					IF TALENT:風騷
						PRINTFORML 「诶～？你居然对我这种看起来像小孩子的身体感兴趣～？」
						PRINTFORML 「…什～麼別的意思都沒有，好好做讓我舒服起來吧」
					ELSEIF TALENT:恋慕 && TALENT:恋人
						PRINTFORML 「…嗯，可以哟…」
						PRINTFORML 「好好的、温柔的做…哦…」
						PRINTFORML 没有平时不正经的态度，温柔的答应了…
					ELSE
						PRINTFORML 「诶、誒誒誒、那種事是互相喜歡的人才做的吧！？」
						PRINTFORML 「去找師匠和你做不就好了……！」
						PRINTFORML 「呀、我、我知道了啦……真是的、不要太過分了…」
					ENDIF
				;接吻がまだ
				CASE 2
					PRINTFORML 「所以啊～這是我的初吻啊！」
					PRINTFORML 「真沒辦法啊………哈啊…嘛，這又不算什麼」
				;媚薬or発情
				CASE 3
					PRINTFORML 「呼ー…呼ー…哇、放開我…！不要碰我…！」
				;時姦刻印
				CASE 4
					PRINTFORML 「咿呀呀！？…呀、呀啊、等等…慢、慢著………嗯、嗯咿咿咿！？」
					PRINTFORML （為…為什…麼…聞到這個傢伙身上的味道後…身體…身體竟然無法抵抗……？）
				;強引に迫られると断れない（膽怯持ち
				CASE 5
				;まんざらでもない
				CASE 6
				;駄目
				CASE 7
				;論外
				CASE 8
					PRINTFORML 「不要靠近我！蘿莉控！HENTAI！」
			ENDSELECT
		;合意持ち
		ELSE
			PRINTFORML 「又、又要…？現在…？」
			PRINTFORML 「…嗯、沒什麼…可以喲、來吧…」
		ENDIF
	ENDIF
	PRINTFORMW
ENDIF
RETURN 1
;==================================================
;351,帯出去
;==================================================
@M_KOJO_MESSAGE_COM_K53_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K53_351_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:同行 == 60
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;FLAG:甲斐性無(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_352
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_352_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;353,猥褻
;FLAG:甲斐性無(1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_353
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_353_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;360,任憑擺佈
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_MESSAGE_COM_K53_360
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_360_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;363,朗読（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:陪睡中(1=被窝orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_MESSAGE_COM_K53_363
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_363_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_363_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;陪睡中		%CALLNAME:PLAYER%は\@ INROOM(CFLAG:MASTER:現在位置) == 2 ? ベッド # ふとん \@の中で本を読んでやった…
	;膝の上			%CALLNAME:PLAYER%は%CALLNAME:TARGET%を膝の上に乗せながら本を読んでやった…
	;%CALLNAME:PLAYER%は%CALLNAME:TARGET%に本を読んでやった

	;朗読初回
	IF PREVCOM != 363
		PRINTFORMW 「呐ー呐ー%CALLNAME:MASTER%ー，讀這本書ー」
		PRINTFORM 帝要求讀給她聽得書是
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 兒童向繪本
			CASE 1
				PRINTFORMW 日本神話為主題的繪本
			CASE 2
				PRINTFORML 著名經濟學家撰寫的書
				IF ABL:MASTER:教養 >= 3
				ELSE
					PRINTFORMW 對於%CALLNAME:PLAYER%來說太難了…！
				ENDIF
		ENDSELECT
	;連続実行
	ELSE
		PRINTFORML 「%CALLNAME:PLAYER%快點、繼續繼續！」
		PRINTFORMW 在帝的催促下%CALLNAME:MASTER%繼續讀書的後續
	ENDIF

	PRINTL

	;陪睡中
	IF CFLAG:TARGET:陪睡中
		PRINTFORMW 帝和%CALLNAME:PLAYER%一起在\@ INROOM(CFLAG:MASTER:現在位置) == 2 ? 床上 # 被子裡 \@讀了書
		IF TFLAG:193 == 0
			PRINTFORMW 剛開始時還很感興趣的聽著書的內容，但在睡意襲來後，變得迷迷糊糊的…
		ENDIF
	;膝の上
	ELSEIF TALENT:MASTER:体型 > TALENT:TARGET:体型 && INROOM(CFLAG:MASTER:現在位置)
		PRINTFORMW 帝讓%CALLNAME:PLAYER%讀書並坐在了膝蓋上

		PRINTFORML
		PRINTFORML %CALLNAME:MASTER%一邊讀書一邊
		PRINTFORM 以不讓帝發現的動作
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 聞她頭髮的味道…
			CASE 1
				PRINTFORMW 享受屁股柔軟的觸感…
			CASE 2
				PRINTFORMW 感受幼女身上的溫度…
		ENDSELECT

		;你が勃起
		IF (TALENT:PLAYER:2 & 2) && BASE:MASTER:勃起 >= 1000
			PRINTFORML
			PRINTFORML %CALLNAME:MASTER%勃起了…
			PRINTFORMW %CALLNAME:MASTER%勃起的肉棒頂在帝的背部和屁股正中，不經意的摩擦讓%CALLNAME:MASTER%產生一陣陣無法言喻的快感…
			IF TFLAG:193 >= 0
				PRINTFORMW 「……………背後好像有什麼東西…」
				PRINTFORML 帝皺著眉頭眼睛直直盯著%CALLNAME:MASTER%看
				PRINTFORMW 雖然一副毫不在意的感覺但臉看起來紅紅的…
			;失敗
			ELSEIF TFLAG:193 == -1
				PRINTFORML 「……………………………」
				PRINTFORML 帝面帶慍色用眼睛瞪著%CALLNAME:MASTER%
				PRINTFORMW 「HENTAI、蘿莉控、色狼、去死吧」
				PRINTFORMW 看來勃起還是被發現了的樣子…
				PRINTFORMW 帝輕蔑的看著%CALLNAME:MASTER%從膝蓋上離開了…
			ENDIF
		ENDIF

	ELSE

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

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

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

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

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

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

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

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

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

@M_KOJO_MESSAGE_COM_K53_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGETと约会
	IF CFLAG:同行
	;TARGET以外と约会
	ELSEIF CFLAG:MASTER:同行
	;お出かけお見送り
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:現在位置)(野外掃除（冬は扫雪
;==================================================
@M_KOJO_MESSAGE_COM_K53_410
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_410_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 == 0
		PRINTFORMW 帝完全不在意在打掃的%CALLNAME:MASTER%，悠閒自在的渡過了這段時間
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_MESSAGE_COM_K53_411
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_411_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;412,学习
;ABL:教養(ABL:MASTER:教養より大=MASTERが教えてもらう ABL:MASTER:教養より小=TARGETが教えてもらう
;==================================================
@M_KOJO_MESSAGE_COM_K53_412
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_412_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K53_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;通常
	SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「誒ー，我不明白」
		CASE 1
			PRINTFORMW 「好無聊ー、再給我更多的樂趣ー」
		CASE 2
			PRINTFORMW 「啊ー啊、這裡是這樣解開的」
	ENDSELECT

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

@M_KOJO_MESSAGE_COM_K53_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;414,吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:194(1=没穿内裤涮涮锅 2=禁断のメニュー 31=興奮劑高湯 30=奶酪番茄沙拉 34=银吉獣料理
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K53_414
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_414_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_MESSAGE_COM_K53_415
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_415_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;416,演奏
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:使用楽器(1=電子琴 2=鋼琴 3=吉他 4=小號 5=小提琴)
;==================================================
@M_KOJO_MESSAGE_COM_K53_416
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_416_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;417,午睡をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔に接吻された 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処or阴茎揉み
;CFLAG:陪睡中(1=一緒に寝ている
;==================================================
@M_KOJO_MESSAGE_COM_K53_417
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_417_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

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

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

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

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

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

ENDIF
RETURN 1
;==================================================
;440,等待
;==================================================
@M_KOJO_MESSAGE_COM_K53_440
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_440_1
RETURN RESULT

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

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

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

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

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

ENDIF
RETURN 1

;==================================================
;442以降の指令は、実行しても口上はおそらく表示されないので貂プレでもスルー
;==================================================

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

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

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_MESSAGE_COM_K53_601
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_601_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_MESSAGE_COM_K53_602
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_602_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1

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

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

ENDIF
RETURN 1
;==================================================
;605,繞道
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_MESSAGE_COM_K53_605
;繞道にはTRAIN_MESSAGEが無い
CALL M_KOJO_MESSAGE_COM_K53_605_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;610,請吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_COM_K53_610
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_610_1
RETURN RESULT

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

ENDIF
RETURN 1

;==================================================
;613,賺錢（オミットされました
;==================================================
@M_KOJO_MESSAGE_COM_K53_613
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_613_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;614,採購食材
;TFLAG:193(1=購入＆約會経験UP 0=購入 -1=非購入)
;==================================================
@M_KOJO_MESSAGE_COM_K53_614
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_614_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;615,吃便當
;実行可能場所　地蔵小路,倒垂的柳樹下,霧之湖,玄武之澤,大蛤蟆之池,絶景之丘,山之湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:料理技能(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_MESSAGE_COM_K53_615
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_615_1
RETURN RESULT

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

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

@M_KOJO_MESSAGE_COM_K53_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;机の下で

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

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

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

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

ENDIF
RETURN 1
;==================================================
;621,釣魚
;TFLAG:193(0=釣れない 1～4=魚 11～15=好吃的魚 610=木材 131=守矢之守札 21=跳蛋 609=氷之鱗 606=龍之爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_MESSAGE_COM_K53_621
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_621_1
RETURN RESULT

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

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

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

ENDIF
RETURN 1
;==================================================
;698,進入房間
;TARGET的房間に入る場合のみ表示
;==================================================
@M_KOJO_MESSAGE_COM_K53_698
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_698_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;699,外出
;==================================================
@M_KOJO_MESSAGE_COM_K53_699
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K53_699_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;前ターン膝枕後身体接觸指令
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_60
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_60_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;61,抱枕
;(TARGET睡眠時間or衰弱)陪睡中、前ターン抱きつく後就寝指令
;分岐無し
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_61
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_61_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;62,亲額頭
;前ターン頭撫で後接吻
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:欲望(5以上=物足りない
;ABL:親密(5以上=照れる
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_62
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_62_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;前ターン接吻後接吻
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_63
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_63_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		CALL K53_AUTO_PVOICE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;约会出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_MESSAGE_SCOM_K53_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_SCOM_K53_80_1
RETURN RESULT
@M_KOJO_MESSAGE_SCOM_K53_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/M_KOJO_K53_日常系コマンド.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/M_KOJO_K53_派生コマンド.ERB

license: unknown


path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/M_KOJO_K53_絶頂.ERB


path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/M_KOJO_K53_育児イベント.ERB


path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/M_KOJO_K53_道具系コマンド.ERB


code:
eraTheWorld　因幡帝口上
●この口上の完成度
未完成感丸出しだよ

●この口上の帝について
・傲嬌気味な感じだよ
・会話ではあることないこと口にするよ
・嘘をつくときは語尾にウサがつくよ
・臭いに敏感だよ
・少し情緒不安定だよ

●ウフフでの特徴
基本的に性情景の描写追加が無いので、地の文で出ていなくても、
接吻継続中や、揉胸中の場合は、それに該当する喘ぎが加わります。
例　口交等の奉仕中に陰蒂夾の刺激に喘ぐ

また、陥落や、感覚等のABLでの変化ではなく、基本CUP、PALAM量で喘ぎ方が変化する用になっています。

・快感による変化
選択指令に該当する部位の快感だけでなく、一度に与えられた全ての快感に反応するようになっています。
例　愛撫のみより
　　挿入時愛撫のほうが総快感量は多いため、激烈地喘ぐ

・PALAM量での変化
例　PALAM:欲情が高いと、口交が積極的になる

你の性技能が高すぎると、常に刺激が強すぎて逆に変化が見られないかもしれません。

●謝辞
自動喘息声は愛麗絲・覚口上を参考にさせて頂きました。
時姦要素は美鈴・天子口上を参考にさせて頂きました。
其他様々な口上を参考にさせて頂きました。
この場にて礼物を申し上げます。

●作者
帝口上の人


code:
口上ライセンス貂プレ
-----------------------------------------------------
　○○口上
  作者：××（XXスレ目>>123 等でもOKなので、何か他人と被らないものを）
  ＜改変した場合はここに改変者の名前を追加する＞

  ＜この口上について語ったりするスペース＞
  まだまだ未完成です
　自動喘息で力尽きました
　どなたか加筆していただければ幸い

  ライセンス：
  この口上について以下で作者が○をつけた行為は、作者以外の者も連絡不要で行うことができます

  +--------------------------------------+
  | 再配布                               |
  +--------------------------------------+
  | ○ | 単体での再UPロード          |
  +----+---------------------------------+
  | ○ | 本体への同梱・口上まとめへの収録|
  +--------------------------------------+
  | 再配布を許可する場合の改変           |	//改変可・再配布不可を防ぐためのif文
  +--------------------------------------+
  | ○ | バグ・誤字脱字の修正            |
  +----+---------------------------------+
  | ○ | 口上の加筆                      |
  +----+---------------------------------+
  | ○ | 口上の改変                      |	//加筆OK・改変NGの口上って結構ある（俺調べ）
  +--------------------------------------+
  | 其他                               |
  +--------------------------------------+
  | ○ | このバリアント以外での利用      |	//例えばNTR嫌いなのにNTR口上に改変された！みたいな行為を防ぐため
  +--------------------------------------+ 	//era外での利用も含む？
  | ○ | 他言語版バリアントへの流用・翻訳|
  +----+---------------------------------+	//加筆・改変禁止と別枠なのは「NTR部分の口上だけ別に作る」みたいな抜け道を潰すため
  | 　 | 金銭のやり取りを伴う利用        |	//商用利用だと同人が入らないようにも見えるのでこの表現に
  +--------------------------------------+
  | 　 | 二次創作                        |
  +--------------------------------------+
  | 　 | era以外への流用                 |
  +--------------------------------------+

	○：許可　△：要相談、連絡が取れない場合は不許可　×：不許可、相談を受けても許可しない
	○のついていない・○以外のついた行為や、ここに書かれていない行為を無断で行うことを禁止します。
	必要な場合は事前に作者の許可を得て行ってください。
  ・この口上を使用したことによる損害等について、作者は一切の責任を負いません。
  ・改変を行った際には、改変部分も同じライセンスを適用しなければなりません。
  ・このライセンスに反しない限り、作者はその者に対するこのライセンスによる許可を取り消すことはできません。
  ・このライセンスは現バージョンのみに適用されます。
  　作者は次期バージョンからのライセンスを変更することはできますが、旧バージョンのライセンスを変更することはできません。
-----------------------------------------------------

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/ライセンス.txt


code: #DIM CONST K53C_ウフフ回数	=	350

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/追加ファイル/てゐ用DIM.ERH


code:
;*********************************************************************************
;K53_PLIST_NUM			喘ぎ声列表数			喘ぎ声パターンを追加したらこの数をいじる
;K53_PVOICE_FRAG			使用可能な喘ぎ声列表		(=0 使用不可　=1 使用可
;		0:対象部位　1:你部位　2:快感　3:苦痛　4:反感　5:接吻　6:口交　7:吐息　8:深喉插入　9:声我慢
;
;K53_台詞使用可			台詞系は使用一回まで		(=0 使用不可　=1 使用可
;RAND:K53_台詞発生確率
;*********************************************************************************
@K53_AUTO_PVOICE

;初期化・初期設定
VARSET LOCALS

K53_NUM = 40
K53_台詞発生確率 = 3

;使用喘ぎ列表初期化
FOR LOCAL, 0, K53_PLIST_NUM
	K53_PVOICE_FRAG:LOCAL = 0
NEXT
K53_台詞使用可 = 1

;*********************************************************************************
;合計快感量、快感から接触部位を判定
;総PALAMLVとってるけどたぶん不使用かも
;*********************************************************************************
;快感総量判定
K53_快感 = CUP:快Ｃ + CUP:快Ｖ + CUP:快Ａ + CUP:快Ｂ + CUP:快Ｍ

;快感を与えられている部位の総PALAMLVと
;快感を与えられている部位を検索
;検索する快感0:快Ｃ 1:快Ｖ 2:快Ａ 3:快Ｂ 4:快Ｍ
K53_総PALAMLV = 0
K53_接触部位 =
FOR LOCAL,0, 5
	;快感が与えられている
	IF CUP:TARGET:LOCAL > 0
		;総PALAMLV増加
		K53_総PALAMLV += GETPALAMLV(PALAM:TARGET:LOCAL,4)

		;接触部位記憶
		SELECTCASE LOCAL
			CASE 0
				K53_接触部位 += "Ｃ"
			CASE 1
				K53_接触部位 += "Ｖ"
			CASE 2
				K53_接触部位 += "Ａ"
			CASE 3
				K53_接触部位 += "Ｂ"
			CASE 4
				K53_接触部位 += "Ｍ"
		ENDSELECT

	ENDIF

NEXT
;*********************************************************************************
;使用可能喘ぎ声列表判定
;*********************************************************************************
;深喉插入中
IF SELECTCOM == 140
	;イマラチオ
	K53_PVOICE_FRAG:8 = 1
	IF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
		;あえぎ声
		IF K53_刺激LV("反感") >= 1
			;反感
			K53_PVOICE_FRAG:4 = 1
		;強い快感
		ELSEIF K53_刺激LV("快感") >= 2
			;口ふさぎ　部位　快感
			K53_PVOICE_FRAG = 1
			K53_PVOICE_FRAG:2 = 1
			K53_PVOICE_FRAG:9 = 1
		ENDIF
	ELSE
		;深喉插入嫌
		IF K53_刺激LV("反感") >= 1
			;反感
			K53_PVOICE_FRAG:4 = 1
		ENDIF
	ENDIF
ELSEIF STRCOUNT(K53_接触部位, "Ｍ")
	;口交中
	IF TEQUIP:TARGET:口接触部位 == 1
		;Ｍ以外の接触部位がある
		IF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
			;強い快感
			IF K53_刺激LV("快感") >= 2
				;快感が強い場合口ふさぎ強快感で代用、口交喘ぎ無し
				K53_PVOICE_FRAG:2 = 1
				K53_PVOICE_FRAG:9 = 1
			ELSE
				;口交　快感　部位
				K53_PVOICE_FRAG = 1
				K53_PVOICE_FRAG:1 = 1
				K53_PVOICE_FRAG:2 = 1
				K53_PVOICE_FRAG:6 = 1
			ENDIF

		;口交系のみ
		ELSE
			;口交
			K53_PVOICE_FRAG:1 = 1
			K53_PVOICE_FRAG:6 = 1
		ENDIF

	;接吻or愛撫or継続接吻中の行為
	ELSE
		;Ｍ以外の接触部位がある
		IF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
			;チュパ
			;強い快感の場合口ふさぎで代用
			IF K53_刺激LV("快感") >= 2
				K53_PVOICE_FRAG:9 = 1
			ELSE
				K53_PVOICE_FRAG:5 = 1
			ENDIF
			;接吻中に反発の付きかねない指令実行
			IF K53_刺激LV("苦痛") >= 1 || K53_刺激LV("反感") >= 1
				;継続接吻中に指插入処女膜喪失、子宮口責め等

				IF K53_刺激LV("苦痛") >= 1
					;苦痛
					K53_PVOICE_FRAG = 1
					K53_PVOICE_FRAG:1 = 1
					K53_PVOICE_FRAG:3 = 1
				ELSE
					;反感
					K53_PVOICE_FRAG = 1
					K53_PVOICE_FRAG:1 = 1
					K53_PVOICE_FRAG:4 = 1
				ENDIF

			;接吻＋喘ぎ
			ELSE
				;チュパ　快感　部位
				K53_PVOICE_FRAG = 1
				K53_PVOICE_FRAG:1 = 1
				K53_PVOICE_FRAG:2 = 1
			ENDIF

		;接吻
		ELSE
			;接吻嫌		この分岐は発生しないかもしれない
			IF K53_刺激LV("反感") >= 1
				;チュパ　反感
				K53_PVOICE_FRAG:4 = 1
				K53_PVOICE_FRAG:5 = 1

			;接吻、継続接吻
			ELSE
				;チュパ
				K53_PVOICE_FRAG:5 = 1
			ENDIF
		ENDIF
	ENDIF

;奉仕系		奉仕快楽判定
;騎乗位、逆強姦系も含まれる
ELSEIF TCVAR:108 == 1
	;喘ぎ声のみ
	IF K53_刺激LV("快感") >= 2
		;快感　部位
		K53_PVOICE_FRAG = 1
		K53_PVOICE_FRAG:2 = 1

	;吐息＋喘ぎ
	ELSEIF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
		;奉仕　快感
		K53_PVOICE_FRAG = 1
		K53_PVOICE_FRAG:1 = 1
		K53_PVOICE_FRAG:2 = 1
		K53_PVOICE_FRAG:7 = 1

	;吐息のみ
	ELSE
		;吐息
		K53_PVOICE_FRAG:1 = 1
		K53_PVOICE_FRAG:7 = 1
	ENDIF
;
ELSE
	;苦痛
	;痛み目安	処女:1250 子宮口責め:～500 打屁股:450+幼稚350 肛門愛撫:100 正常位肛交:800
	IF K53_刺激LV("苦痛") >= 1
		;快感も強い
		IF K53_刺激LV("快感") >= 2
			;苦痛　快感
			K53_PVOICE_FRAG = 1
			K53_PVOICE_FRAG:1 = 1
			K53_PVOICE_FRAG:2 = 1
			K53_PVOICE_FRAG:3 = 1

		;悲鳴のみ
		ELSE
			;苦痛　部位
			K53_PVOICE_FRAG = 1
			K53_PVOICE_FRAG:1 = 1
			K53_PVOICE_FRAG:3 = 1
		ENDIF

	;反感・恐怖
	;反感目安	後背位:600 挿入Ｇスポット・子宮口責め:500+贞操重视1000
	ELSEIF K53_刺激LV("反感") >= 1 || K53_刺激LV("恐怖") >= 1
		;快感も強い		挿入Ｇスポット等	2000くらい？
		IF K53_刺激LV("快感") >= 2
			;反感　部位　快感
			K53_PVOICE_FRAG = 1
			K53_PVOICE_FRAG:1 = 1
			K53_PVOICE_FRAG:2 = 1
			K53_PVOICE_FRAG:4 = 1

		;悲鳴のみ
		ELSE
			;反感　你部位
			K53_PVOICE_FRAG = 1
			K53_PVOICE_FRAG:1 = 1
			K53_PVOICE_FRAG:4 = 1
		ENDIF

	;快感
	ELSEIF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
		;快感　部位　你部位
		K53_PVOICE_FRAG = 1
		K53_PVOICE_FRAG:1 = 1
		K53_PVOICE_FRAG:2 = 1

	;其他
	ELSE
		;薬系・道具不使用の什麼也不做、等
		;吐息
		K53_PVOICE_FRAG:7 = 1
	ENDIF
ENDIF

;修正
;睡姦中
IF CFLAG:睡眠
	;台詞系無し
	K53_PVOICE_FRAG = 0
	K53_PVOICE_FRAG:1 = 0

	;苦痛、恐怖、反感無
	K53_PVOICE_FRAG:3 = 0
	K53_PVOICE_FRAG:4 = 0

	;快感を吐息へ
	IF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
		K53_PVOICE_FRAG:2 = 0
		K53_PVOICE_FRAG:7 = 1
	ENDIF

ELSE
	[SKIPSTART]
	;喘ぎ声我慢（作りかけ　地の文が無いため、よくわからないことになっている

	;Ｍ以外の接触部位がある
	IF STRCOUNT(K53_接触部位, "Ｃ") || STRCOUNT(K53_接触部位, "Ｖ") || STRCOUNT(K53_接触部位, "Ａ") || STRCOUNT(K53_接触部位, "Ｂ")
		;素質
		IF TALENT:自尊心 || TALENT:自制心 || TALENT:貞操 || TALENT:羞恥心 || TALENT:快感応答 == -1
			K53_PVOICE_FRAG:9 = 1
			;確立で完全がまん
			SELECTCASE RAND:4
				CASE 0
					K53_PVOICE_FRAG:2 = 0
			ENDSELECT
		;状況
		;ベッドルームで後背位
		ELSEIF BEDROOM() && TEQUIP:体位 == 2
			K53_PVOICE_FRAG:9 = 1
			;確立で完全がまん
			SELECTCASE RAND:4
				CASE 0
					K53_PVOICE_FRAG:2 = 0
			ENDSELECT
		ENDIF
	ENDIF
	[SKIPEND]
ENDIF

;被逆推
IF CFLAG:诶嘿嘿 == 2

ENDIF
;*********************************************************************************
;K53_部位台詞設定
;責められている部位への台詞
;*********************************************************************************
K53_部位台詞 =
IF STRCOUNT(K53_接触部位, "Ｃ")
	IF TEQUIP:陰蒂夾
		SELECTCASE RAND:2
			CASE 0
				K53_部位台詞 = 咕、咦咦咦咦咦咦咦、呀、呀啊
			CASE 1
				K53_部位台詞 = 咕、唔嗯
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 0
				K53_部位台詞 = 咕哩
			CASE 1
				K53_部位台詞 = 小穴
			CASE 2
				K53_部位台詞 = 豆豆
		ENDSELECT
	ENDIF
ELSEIF STRCOUNT(K53_接触部位, "Ｖ")
	IF TEQUIP:振動棒
		K53_部位台詞 = 呀、呀啊、肚、肚子…、…咿、咿咿咿咿、啊…
	ELSE
		SELECTCASE RAND:3
			CASE 0
				K53_部位台詞 = 要坏了
			CASE 1
				K53_部位台詞 = 呐
			CASE 2
				K53_部位台詞 = 小穴
		ENDSELECT
	ENDIF
ELSEIF STRCOUNT(K53_接触部位, "Ａ")
	IF TEQUIP:肛用振動棒
		K53_部位台詞 = 嗚、呼嗚咿、屁屁、呼、咿…、…卟嗚嗚嗚、呼呀…
	ELSE
		SELECTCASE RAND:3
			CASE 0
				K53_部位台詞 = 屁屁
			CASE 1
				K53_部位台詞 = 菊穴
			CASE 2
				K53_部位台詞 = 屁股
		ENDSELECT
	ENDIF
ELSEIF STRCOUNT(K53_接触部位, "Ｂ")
	SELECTCASE RAND:3
		CASE 0
			K53_部位台詞 = 姆吶
		CASE 1
			K53_部位台詞 = 胸部
		CASE 2
			K53_部位台詞 = 乳頭
	ENDSELECT
ELSE
	K53_PVOICE_FRAG = 0
ENDIF

;*********************************************************************************
;指令台詞設定
;指令に対する台詞
;*********************************************************************************
K53_指令台詞 =
SELECTCASE SELECTCOM
	;愛撫
	CASE 0
		IF TEQUIP:乳頭夾 || TEQUIP:陰蒂夾
			SELECTCASE RAND:2
				CASE 0
					K53_指令台詞 =不行 、那個、不行、啊哈啊啊啊啊啊～～～
				CASE 1
					K53_指令台詞 = 咿、哇、好痛苦、不要戴上那個、不要、咿呀呀呀
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 呀、那裡…不要一直欺負那裡…
				CASE 1
					K53_指令台詞 = 這樣的、才不算什麼、才一點也不…舒服……
				CASE 2
					K53_指令台詞 = 手指、一直進進出出、好、好厲害…
			ENDSELECT
		ENDIF
	;舐陰
	CASE 1
		IF TCVAR:102
			K53_指令台詞 = 你、把我弄髒了、要好好清理乾淨…
		ELSE
			SELECTCASE RAND:2
				CASE 0
					K53_指令台詞 = 舔舔
				CASE 1
					K53_指令台詞 = 舌
					SELECTCASE RAND:2
						CASE 0
							K53_指令台詞 += "嘖嘖"
						CASE 1
							K53_指令台詞 += "舔"
					ENDSELECT
			ENDSELECT
		ENDIF
	;指插入
	CASE 3
		IF EX:膣内精液 > 300
			K53_指令台詞 = 精液…%K53_ハート付与()%裡面搞得亂七八糟的…
		ELSE
			IF TEQUIP:振動棒
				K53_指令台詞 = 不、不行、那個、咿呀呀呀、嗚嗯、啊啊啊啊啊～～～
			ELSE
				SELECTCASE RAND:2
					CASE 0
						K53_指令台詞 = 手指
					CASE 1
						K53_指令台詞 = 手指雞雞
				ENDSELECT
			ENDIF
		ENDIF
	;舐肛
	CASE 4
		SELECTCASE RAND:2
			CASE 0
				K53_指令台詞 = 舔舔
			CASE 1
				K53_指令台詞 = 呀啊、那裡、那裡不行
		ENDSELECT
	;肛門愛撫
	CASE 5
		IF TEQUIP:肛用振動棒
			K53_指令台詞 = 哦、哦啊、麻、麻麻的、那、那個、不、不要
		ELSE
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 屁屁麻麻的、奇怪的、感覺…
				CASE 1
					K53_指令台詞 = 屁屁要壞掉了、拔、拔出來…
				CASE 2
					K53_指令台詞 = 呀啊、嗚、嗚咿、火辣辣的、呀呀呀呀啊…
			ENDSELECT
		ENDIF
	;胸愛撫系
	CASE 6, 7, 12
		IF TEQUIP:乳頭夾
			K53_指令台詞 = 呀啊、乳頭要壞掉了、不要、快拿下來
		ELSE
			SELECTCASE RAND:2
				CASE 0
					K53_指令台詞 = 乳頭、要掉下來了…、呀啊…
				CASE 1
					K53_指令台詞 = 呀、呀啊啊…、乳頭、不要用手指彈啊…
			ENDSELECT
		ENDIF
	;吸乳头
	CASE 11
		SELECTCASE RAND:3
			CASE 0
				K53_指令台詞 = 呀…不要吸乳頭…呀啊…
			CASE 1
				K53_指令台詞 = 咿呀呀呀！？不、不要用牙齒、禁止用牙咬…
			CASE 2
				K53_指令台詞 = 啊、喂、一直吸乳頭的話…
		ENDSELECT
	;秘貝・張開肛門
	CASE 8, 13
		;列表操作:反感閉じる　吐息開放
		K53_PVOICE_FRAG:4 = 0
		K53_PVOICE_FRAG:7 = 1
		;中出しされた
		IF TCVAR:102
			K53_指令台詞 = 啊ー啊，被蘿莉控的雞雞玷污了，要不要去跟師匠說呢～
		;ELSEIF TCVAR:104
		ELSE
			K53_指令台詞 = …怎樣、這樣満足了麼？……HENTAI
		ENDIF
	;自慰
	CASE 9
		;列表操作
		K53_PVOICE_FRAG = 0
		K53_PVOICE_FRAG:4 = 0
		;IF ABL:露出癖 >= 3
		;TEQUIP:振動棒 && TEQUIP:肛用振動棒
		;IF TEQUIP:振動棒
		;IF TEQUIP:肛用振動棒
		;IF TEQUIP:振動棒 && TEQUIP:肛用振動棒 && ABL:Ｖ感覚 >= 5 && ABL:Ａ感覚 >= 5 && ABL:Ｃ感覚 >= 5 && ABL:Ｂ感覚 >= 5 && PALAM:欲情 >= PALAMLV:4
		;ELSEIF TEQUIP:振動棒 && ABL:Ｖ感覚 >= 5 && ABL:Ｃ感覚 >= 5 && ABL:Ｂ感覚 >= 5 && PALAM:欲情 >= PALAMLV:4
		;ELSEIF TEQUIP:肛用振動棒 && ABL:Ａ感覚 >= 5 && ABL:Ｃ感覚 >= 5 && ABL:Ｂ感覚 >= 5 && PALAM:欲情 >= PALAMLV:4
		;ELSEIF ABL:自慰中毒 >= 3 && ABL:Ｃ感覚 >= 5 && ABL:Ｂ感覚 >= 5 && PALAM:欲情 >= PALAMLV:4

		;ELSE
			K53_指令台詞 = 不、不要看…！HENTAI…HENTAI～…呀
		;ENDIF
	;性交Ｖ系
	CASE 60, 61, 64, 65, 67, 68, 71
		K53_指令台詞 = %K53_TINPO()%
	;Ｇスポ責め
	CASE 72
		K53_指令台詞 = 呀、那裡%K53_ハート付与()%好厲害
	;子宮責め
	CASE 73
		SELECTCASE EXP:TARGET:子宮口開発経験
			CASE IS < 25
				K53_指令台詞 = 哦、哦啊…%K53_ハート付与()%呼呼、呼嗚…咿咿……！呼、嗚
			CASE 25 TO 50
				SELECTCASE RAND:3
					CASE 0
						K53_指令台詞 = 呀啊、那裡…%K53_ハート付与()%我、我說…、不要碰……
					CASE 1
						K53_指令台詞 = 啊、頂到頭了…%K53_ハート付与()%滑滑的…來、來了……
					CASE 2
						K53_指令台詞 = 那裡、不要咕嗯、放開我%K53_ハート付与()%雞雞進來了～～
				ENDSELECT
			CASE IS > 50
				SELECTCASE RAND:3
					CASE 0
						K53_指令台詞 = 最、最裡面…快進來、快……%K53_ハート付与()%哦
					CASE 1
						K53_指令台詞 = 不、不要%K53_ハート付与()%雞雞、那裡不行、咿呀……
					CASE 2
						K53_指令台詞 = 嗯、咕啊%K53_ハート付与()%太粗魯了、壞掉了、壞掉了、要壞掉了、咿呀啊啊啊…
				ENDSELECT
		ENDSELECT
	;性交Ａ系
	CASE 62, 63, 66, 69, 70, 71, 74, 75
		SELECTCASE RAND:3
			CASE 0
				K53_指令台詞 = 呼嗚嗚嗚、屁、屁屁…、好痛、苦……
			CASE 1
				K53_指令台詞 = 呀啊、再慢一點…再慢一點動…
			CASE 2
				K53_指令台詞 = 要、要壞掉了、不行了、不…不要…
		ENDSELECT
	;手淫
	CASE 80
		SELECTCASE RAND:2
			CASE 0
				K53_指令台詞 = 居然要我握住這個…、真的是、太差勁了ー…
			CASE 1
				K53_指令台詞 = 唔唔～…%K53_TINPO()%出來好多汁･･･
		ENDSELECT
	;口交・真空口交
	CASE 81, 88
		IF GETPALAMLV(PALAM:欲情, 15) >= 9
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 真、真是的…、%K53_TINPO()%真、真的好多…
				CASE 1
					K53_指令台詞 = 嗯嗯…%K53_TINPO()%汁、好好吃…嘖嘖嘖嘖…
				CASE 2
					K53_指令台詞 = 吸吸…%CALLNAME:MASTER%%K53_TINPO()%的味道、吸吸…
			ENDSELECT
		ELSEIF GETPALAMLV(PALAM:欲情, 15) >= 6
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 吸吸…哈啊…%CALLNAME:MASTER%的雞雞…
				CASE 1
					K53_指令台詞 = 這個、%K53_TINPO()%…、我會把它清理得乾乾淨淨的…
				CASE 2
					K53_指令台詞 = 哈啊～…這個味道…讓人受不了～呢、吸吸…
			ENDSELECT
		ELSEIF GETPALAMLV(PALAM:欲情, 15) >= 3
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 姆嗯…有熱熱的東西……
				CASE 1
					K53_指令台詞 = 咳嗽…吸吸吸……真是的、真惡心…
				CASE 2
					K53_指令台詞 = 呀啊、%K53_TINPO()%不要看我這樣子的臉～…
			ENDSELECT
		ELSEIF GETPALAMLV(PALAM:欲情, 15) >= 0
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 嗯嗯嗯…有什麼…奇怪的味道、吸吸…
				CASE 1
					K53_指令台詞 = …多麼奇怪的味道…
				CASE 2
					K53_指令台詞 = …吶、你這個真的有好好洗過了？…聞起來好臭啊…
			ENDSELECT
		ENDIF
	;乳交
	CASE 82
		K53_指令台詞 = %K53_TINPO()%
	;素股
	CASE 83
		IF EQUIP:0
			SELECTCASE RAND:3
				CASE 0
					K53_指令台詞 = 呀、胖次、%K53_TINPO()%、鑽進來了…
				CASE 1
					K53_指令台詞 = 嗚～…胖次、%K53_TINPO()%的氣味沾上了…
				CASE 2
					K53_指令台詞 = 雞雞進進出出的…好下流…
			ENDSELECT
		ELSE
			;ちんぽいれたい
			IF BASE:MASTER:勃起 >= 1000 && EXP:Ｖ経験 >= 100 && ABL:欲望 >= 8
				K53_指令台詞 = 那麼大的放不進陰道裡？可以喲？可以放進來的
			;ちんぽ是っちゃう
			ELSEIF BASE:MASTER:勃起 >= 1000 && EXP:Ｖ経験 >= 50 && PALAM:潤滑 >= PALAMLV:4
				K53_指令台詞 = 呀…雞雞那麼猛烈的插進來的話、不、不行
			ELSE
				SELECTCASE RAND:3
					CASE 0
						K53_指令台詞 = %K53_TINPO()%、對我來說太過粗魯了…
					CASE 1
						K53_指令台詞 = 雖、雖然是你的%K53_TINPO()%、但是可以自慰的吧…
					CASE 2
						K53_指令台詞 = 呀、屁屁、要壞掉了、咿呀、太過分了、HENTAI、HENTAI…
				ENDSELECT
			ENDIF
		ENDIF
	;泡泡浴
	CASE 84
		K53_指令台詞 = 為什麼我要、這樣…
	;足交
	CASE 85
		SELECTCASE RAND:3
			CASE 0
				K53_指令台詞 = 用腳踩%K53_TINPO()%舒服麼？
			CASE 1
				K53_指令台詞 = 被一個小孩子踩很興奮麼、呼～嗯
			CASE 2
				K53_指令台詞 = …庫斯庫斯、%K53_TINPO()%一抖一抖的、真可愛～
		ENDSELECT
	;媚薬、利尿剤
	CASE 181, 182
		;口移し
		SIF ABL:MASTER:技巧 >= 3
			K53_PVOICE_FRAG:5 = 1
	;動起腰身（Ｖ）
	CASE 317
		SELECTCASE TFLAG:194
			;激烈地
			CASE 1
				SELECTCASE RAND:2
					CASE 0
						K53_指令台詞 = 呀呀啊～%K53_ハート付与()%快、快一點%K53_ハート付与()%再快一點～～～
					CASE 1
						K53_指令台詞 = 不行%K53_ハート付与()%不行%K53_ハート付与()%不行%K53_ハート付与()%不行呀啊啊啊啊～～～～
				ENDSELECT
			;ねちっこく
			CASE 2
			;グラインド
			CASE 3
				K53_指令台詞 = 不、不要、好熱%K53_ハート付与()%小穴裡好熱～～～
			;通常
			CASEELSE
				K53_指令台詞 = 停、停不下來%K53_ハート付与()%這是我做的、糟糕了、呀、呀啊
		ENDSELECT
	;对方主導性交系
	CASE 320, 321, 322, 323
		K53_指令台詞 = 嗯嗯嗯、…進來…%K53_ハート付与()%%K53_TINPO()%插進來了～

	CASEELSE
		;指令台詞閉じる
		K53_PVOICE_FRAG:1 = 0
ENDSELECT
;派生系
SELECTCASE TFLAG:50
	;六九式
	CASE 1
	;岩清水
	CASE 2
	;Gスポット刺激
	CASE 3
	;乱牡丹
	CASE 4
	;手淫口交
	CASE 5
	;乳夾口交
	CASE 12
ENDSELECT

;*********************************************************************************
;要去了台詞
;指令台詞に上書き
;*********************************************************************************
IF NOWEX:Ｃ絶頂 || NOWEX:Ｖ絶頂 || NOWEX:Ａ絶頂 || NOWEX:Ｂ絶頂 || NOWEX:Ｍ絶頂

	;一応指令台詞開放
	;睡姦中でない
	SIF !CFLAG:睡眠
		K53_PVOICE_FRAG:1 = 1
	;共通
	IF K53_合計絶頂数 >= 1
		SELECTCASE RAND:2
			CASE 0
				K53_指令台詞 = 又、又來了%K53_ハート付与()%又、又一庫了、咕…！
			CASE 1
				K53_指令台詞 = 啊、又要一庫了%K53_ハート付与()%一庫、一庫～～～…！
		ENDSELECT
	ELSEIF K53_合計絶頂数 == 0
		SELECTCASE RAND:3
			CASE 0
				K53_指令台詞 = 像小寶寶一樣%K53_ハート付与()%尿出來……了…～～～！
			CASE 1
				K53_指令台詞 = 什、什麼要來了…%K53_ハート付与()%來了…～！
			CASE 2
				K53_指令台詞 = 這、這樣、的、的事情～%K53_ハート付与()%嗯、嗯、啊！
		ENDSELECT
	ENDIF

	SELECTCASE SELECTCOM
		;性交Ｖ系
 		CASE 60, 61, 64, 65, 67, 68, 71, 72, 73, 317
		;挿入直後
		K53_指令台詞 = 咿、咿…%K53_ハート付与()%一庫%K53_TINPO()%要壞掉了…～
	ENDSELECT

	K53_合計絶頂数 = EX:Ｃ絶頂 + EX:Ｖ絶頂 + EX:Ａ絶頂 + EX:Ｂ絶頂 + EX:Ｍ絶頂

ENDIF

;*********************************************************************************
;喘ぎ声作成
;開放されている列表から随机に選択し、LOCALSに追加する、を繰り返す
;台詞系は一度使用したら閉じる
;開放されていない列表も選択する可能性があるため、無駄処理が発生しやすい
;文字数が一定（K53_NUM）に達したら終了　台詞系で大幅に超過する可能性あり
;*********************************************************************************
REPEAT 999
	;随机に列表選択
	SELECTCASE RAND:K53_PLIST_NUM
		;責められている部位
		CASE 0
			IF K53_PVOICE_FRAG
				LOCALS += K53_部位台詞
				K53_PVOICE_FRAG = 0
				K53_PVOICE_FRAG:1 = 0

				LOCALS += K53_ハート付与()
			ENDIF
		;你の責めている部位
		CASE 1
			IF K53_PVOICE_FRAG:1
				LOCALS += K53_指令台詞
				K53_PVOICE_FRAG:1 = 0
				K53_PVOICE_FRAG = 0

				LOCALS += K53_ハート付与()
			ENDIF
		;快感
		CASE 2
			;使用可能
			IF K53_PVOICE_FRAG:2
				;喘ぎ声
				IF K53_刺激LV("快感") >= 2
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "咿啊啊"
						CASE 1
							LOCALS += "啊"
						CASE 2
							LOCALS += "啊啊"
						CASE 3
							LOCALS += "嗯啊"
						CASE 4
							LOCALS += "呀啊"
						CASE 5
							LOCALS += "咿呀"
						CASE 6
							LOCALS += "嗯嗯嗯"
						CASE 7
							LOCALS += "～～～"
						CASE 8
							LOCALS += "～"
					ENDSELECT
					SELECTCASE RAND:6
						CASE 1
							LOCALS += "！"
						CASE 2
							LOCALS += "！？"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ELSEIF K53_刺激LV("快感") == 1
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "啊"
						CASE 1
							LOCALS += "啊"
						CASE 2
							LOCALS += "啊嗯"
						CASE 3
							LOCALS += "呀"
						CASE 4
							LOCALS += "呀啊"
						CASE 5
							LOCALS += "哈啊"
						CASE 6
							LOCALS += "嗯嗯"
						CASE 7
							LOCALS += "哈啊"
						CASE 8
							LOCALS += "咿嗚"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 1
							LOCALS += "…"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ELSEIF K53_刺激LV("快感") == 0
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "嗯"
						CASE 1
							LOCALS += "嗯呢"
						CASE 2
							LOCALS += "嗯嗯"
						CASE 3
							LOCALS += "嗚…"
						CASE 4
							LOCALS += "哈啊"
						CASE 5
							LOCALS += "啊…"
						CASE 6
							LOCALS += "哈呼"
						CASE 7
							LOCALS += "………"
						CASE 8
							LOCALS += "嗯…"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 0
							LOCALS += "…"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ENDIF

				;台詞
				IF K53_台詞使用可
					SELECTCASE RAND:K53_台詞発生確率
						CASE 0
							IF K53_刺激LV("快感") >= 2
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "稍、稍等"
									CASE 1
										LOCALS += "不、不行～～"
									CASE 2
										LOCALS += "太、太厲害了"
								ENDSELECT
							ELSEIF K53_刺激LV("快感") == 1
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "……這個…"
									CASE 1
										LOCALS += "好、好舒服……"
									CASE 2
										LOCALS += "黏糊糊…的…"
								ENDSELECT
							ELSEIF K53_刺激LV("快感") == 0
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "什、什麼…奇…"
									CASE 1
										LOCALS += "奇怪的感覺…"
									CASE 2
										LOCALS += "癢癢的…"
								ENDSELECT
							ENDIF
						K53_台詞使用可 = 0
						LOCALS += K53_ハート付与(1)
					ENDSELECT
				ENDIF
			ENDIF
		;苦痛
		CASE 3
			IF K53_PVOICE_FRAG:3
				IF K53_刺激LV("苦痛") == 2
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "咿"
						CASE 1
							LOCALS += "咿咕"
						CASE 2
							LOCALS += "咿咕呀"
						CASE 3
							LOCALS += "啊咕"
						CASE 4
							LOCALS += "啊嗚"
						CASE 5
							LOCALS += "咦咦"
						CASE 6
							LOCALS += "好疼啊"
						CASE 7
							LOCALS += "咦咕"
						CASE 8
							LOCALS += "～～～"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 0
							LOCALS += "！"
						CASE 1
							LOCALS += "！？"
						CASE 2
							LOCALS += "…"
						CASE 3
							LOCALS += "、"
					ENDSELECT
				ELSEIF K53_刺激LV("苦痛") == 1
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "咦"
						CASE 1
							LOCALS += "好疼"
						CASE 2
							LOCALS += "咦咦"
						CASE 3
							LOCALS += "呀"
						CASE 4
							LOCALS += "快住手"
						CASE 5
							LOCALS += "雅達！"
						CASE 6
							LOCALS += "呀啊"
						CASE 7
							LOCALS += "………"
						CASE 8
							LOCALS += "咿嗚"
					ENDSELECT
					SELECTCASE RAND:5
						CASE 0
							LOCALS += "！"
						CASE 1
							LOCALS += "！？"
						CASE 2
							LOCALS += "…"
						CASE 3
							LOCALS += "……"
						CASE 4
							LOCALS += "、"
					ENDSELECT
				ENDIF
				;台詞
				IF K53_台詞使用可
					SELECTCASE RAND:K53_台詞発生確率
						CASE 0
							IF K53_刺激LV("反感") == 2
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "真討厭"
									CASE 1
										LOCALS += "請停下來"
									CASE 2
										LOCALS += "不要再繼續了"
								ENDSELECT
							ELSEIF K53_刺激LV("反感") == 1
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "討厭"
									CASE 1
										LOCALS += "我已經受夠了…"
									CASE 2
										LOCALS += "住手…"
								ENDSELECT
							ENDIF
						K53_台詞使用可 = 0
					ENDSELECT

				ENDIF
			ENDIF
		;反感
		CASE 4
			IF K53_PVOICE_FRAG:4
				IF K53_刺激LV("反感") >= 2  || K53_刺激LV("恐怖") >= 2
					SELECTCASE RAND:8
						CASE 0
							LOCALS += "雅達"
						CASE 1
							LOCALS += "雅達！"
						CASE 2
							LOCALS += "雅達雅達！"
						CASE 3
							LOCALS += "呀啊啊啊啊"
						CASE 4
							LOCALS += "討厭"
						CASE 5
							LOCALS += "討厭啊"
						CASE 6
							LOCALS += "快住手"
						CASE 7
							LOCALS += "亞美爹亞美爹"
						CASE 8
							LOCALS += "真的太討厭了"
					ENDSELECT
					SELECTCASE RAND:3
						CASE 0
							LOCALS += "！"
						CASE 1
							LOCALS += "！？"
						CASE 2
							LOCALS += "、"
					ENDSELECT
				ELSEIF K53_刺激LV("反感") == 1 || K53_刺激LV("恐怖") == 1
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "呀"
						CASE 1
							LOCALS += "雅達！"
						CASE 2
							LOCALS += "呀"
						CASE 3
							LOCALS += "討厭"
						CASE 4
							LOCALS += "亞美"
						CASE 5
							LOCALS += "亞美爹"
						CASE 6
							LOCALS += "…"
						CASE 7
							LOCALS += "～～～"
						CASE 8
							LOCALS += "呀啊"
					ENDSELECT
					SELECTCASE RAND:3
						CASE 0
							LOCALS += "…"
						CASE 1
							LOCALS += "！"
						CASE 2
							LOCALS += "、"
					ENDSELECT
				ENDIF
				;台詞
				IF K53_台詞使用可
					SELECTCASE RAND:K53_台詞発生確率
						CASE 0
							IF K53_刺激LV("反感") >= 2  || K53_刺激LV("恐怖") >= 2
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "真討厭"
									CASE 1
										LOCALS += "亞美爹喲"
									CASE 2
										LOCALS += "不要再繼續了"
								ENDSELECT
							ELSEIF K53_刺激LV("反感") == 1 || K53_刺激LV("恐怖") == 1
								SELECTCASE RAND:3
									CASE 0
										LOCALS += "咿、咿呀…"
									CASE 1
										LOCALS += "夠了…"
									CASE 2
										LOCALS += "這個不喜歡…"
								ENDSELECT
							ENDIF
						K53_台詞使用可 = 0
					ENDSELECT

				ENDIF
			ENDIF
		;接吻
		CASE 5
			IF K53_PVOICE_FRAG:5
				SELECTCASE RAND:9
					CASE 0
						LOCALS += "嗯"
					CASE 1
						LOCALS += "嗯呢"
					CASE 2
						LOCALS += "啾"
					CASE 3
						LOCALS += "啾～"
					CASE 4
						LOCALS += "啾～～"
					CASE 5
						LOCALS += "啾嗯"
					CASE 6
						LOCALS += "哈啊…"
					CASE 7
						LOCALS += "哈…"
					CASE 8
						LOCALS += "………"
				ENDSELECT
				SELECTCASE RAND:2
					CASE 0
						LOCALS += "…"
					CASE 1
						LOCALS += K53_ハート付与()
				ENDSELECT
			ENDIF
		;口交
		CASE 6
			IF K53_PVOICE_FRAG:6
				IF ABL:TARGET:舌 >= 5
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "啾唔"
						CASE 1
							LOCALS += "啾卟"
						CASE 2
							LOCALS += "啾噗"
						CASE 3
							LOCALS += "啾卟卟"
						CASE 4
							LOCALS += "啾嚅嚅嚅"
						CASE 5
							LOCALS += "嘞咯嘞咯嘞咯"
						CASE 6
							LOCALS += "咕噗咕噗咕噗"
						CASE 7
							LOCALS += "咕噗咕噗"
						CASE 8
							LOCALS += "啾啾"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 0
							LOCALS += K53_ハート付与()
						CASE 1
							LOCALS += "～～"
						CASEELSE
							LOCALS += ""
					ENDSELECT
				ELSEIF ABL:TARGET:舌 >= 3
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "卟"
						CASE 1
							LOCALS += "啾嗚"
						CASE 2
							LOCALS += "啾嗯"
						CASE 3
							LOCALS += "啾唔"
						CASE 4
							LOCALS += "嘞咯嘞咯"
						CASE 5
							LOCALS += "嘞嚅"
						CASE 6
							LOCALS += "啾嚅嚅"
						CASE 7
							LOCALS += "嗯嗚嗯嗯"
						CASE 8
							LOCALS += "哈呼"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 0
							LOCALS += K53_ハート付与()
						CASE 1
							LOCALS += "～～"
						CASEELSE
							LOCALS += ""
					ENDSELECT
				ELSE
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "啊姆嗚"
						CASE 1
							LOCALS += "嗯呢"
						CASE 2
							LOCALS += "啾"
						CASE 3
							LOCALS += "嗯嗯"
						CASE 4
							LOCALS += "啾～"
						CASE 5
							LOCALS += "啾嗯"
						CASE 6
							LOCALS += "哈"
						CASE 7
							LOCALS += "咳呼"
						CASE 8
							LOCALS += "誒呼"
					ENDSELECT
					SELECTCASE RAND:3
						CASE 0
							LOCALS += "…"
						CASE 1
							LOCALS += "……"
						CASE 2
							LOCALS += K53_ハート付与()
					ENDSELECT
				ENDIF
			ENDIF
		;吐息
		CASE 7
			IF K53_PVOICE_FRAG:7
				IF GETPALAMLV(PALAM:欲情, 15) >= 4
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "嗯"
						CASE 1
							LOCALS += "嗯呢"
						CASE 2
							LOCALS += "嗯嗯"
						CASE 3
							LOCALS += "呼呼"
						CASE 4
							LOCALS += "哈"
						CASE 5
							LOCALS += "哈啊"
						CASE 6
							LOCALS += "呼嗚"
						CASE 7
							LOCALS += "呼唔"
						CASE 8
							LOCALS += "呼啊"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 0
							LOCALS += "、"
						CASE 1
							LOCALS += "…"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ELSE
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "嗯"
						CASE 1
							LOCALS += "嗯呢"
						CASE 2
							LOCALS += "嗯嗯"
						CASE 3
							LOCALS += "嗚…"
						CASE 4
							LOCALS += "哈"
						CASE 5
							LOCALS += "哈啊…"
						CASE 6
							LOCALS += "呼嗚"
						CASE 7
							LOCALS += "………"
						CASE 8
							LOCALS += "嗯…"
					ENDSELECT
					SELECTCASE RAND:4
						CASE 0
							LOCALS += "…"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ENDIF
			ENDIF
		;深喉插入
		CASE 8
			IF K53_PVOICE_FRAG:8
				SELECTCASE RAND:9
					CASE 0
						LOCALS += "哦卟嗚"
					CASE 1
						LOCALS += "卟"
					CASE 2
						LOCALS += "嗯卟"
					CASE 3
						LOCALS += "嗚卟"
					CASE 4
						LOCALS += "嗚卟嗚"
					CASE 5
						LOCALS += "姆"
					CASE 6
						LOCALS += "姆嗚"
					CASE 7
						LOCALS += "姆卟"
					CASE 8
						LOCALS += "哦卟"
				ENDSELECT
				IF CFLAG:睡眠
					SELECTCASE RAND:5
						CASE 0
							LOCALS += "？"
						CASE 1
							LOCALS += "…"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ELSE
					SELECTCASE RAND:5
						CASE 0
							LOCALS += "！"
						CASE 1
							LOCALS += "！？"
						CASEELSE
							LOCALS += K53_ハート付与()
					ENDSELECT
				ENDIF
			ENDIF
		;声がまん・口ふさぎ
		CASE 9
			IF K53_PVOICE_FRAG:9
				;刺激が大きい場合接吻感覚外処理
				IF K53_刺激LV("快感") >= 2 || K53_刺激LV("苦痛") >= 1 || K53_刺激LV("反感") >= 1
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "嗯嗯嗯"
						CASE 1
							LOCALS += "嗯呢"
						CASE 2
							LOCALS += "嗯姆～～！？"
						CASE 3
							LOCALS += "嗯嗯！"
						CASE 4
							LOCALS += "嗯嗚嗚嗚～～"
						CASE 5
							LOCALS += "嗯嗯嗯嗚！？"
						CASE 6
							LOCALS += "卟"
						CASE 7
							LOCALS += "嗯姆嗚"
						CASE 8
							LOCALS += "～～～"
					ENDSELECT
					SELECTCASE RAND:2
						CASE 0
							LOCALS += K53_ハート付与()
					ENDSELECT
				ELSEIF K53_刺激LV("快感") >= 0
					SELECTCASE RAND:9
						CASE 0
							LOCALS += "嗯"
						CASE 1
							LOCALS += "嗯呢"
						CASE 2
							LOCALS += "嗯～"
						CASE 3
							LOCALS += "嗯姆"
						CASE 4
							LOCALS += "呼"
						CASE 5
							LOCALS += "呼唔"
						CASE 6
							LOCALS += "唔"
						CASE 7
							LOCALS += "呼"
						CASE 8
							LOCALS += "嗚嗚嗚"
					ENDSELECT
					SELECTCASE RAND:2
						CASE 0
							LOCALS += K53_ハート付与()
						CASE 1
							LOCALS += "…"
					ENDSELECT
				ENDIF
			ENDIF
	ENDSELECT

	;文字数が一定に達したら終了
	SIF STRLENSU(LOCALS) > K53_NUM
		BREAK
REND

;*********************************************************************************
;あえぎ声描画
PRINTFORML 「%LOCALS%」
PRINTW

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/追加ファイル/自動喘ぎ/K53_自動喘ぎ.ERB


path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/追加ファイル/自動喘ぎ/K53_自動喘ぎ用DIM.ERH


code:
;*********************************************************************************
;刺激（CUP）を刺激レベルに変換
;ここで統一しておけば調整しやすい
;*********************************************************************************
@K53_刺激LV(ARGS)
#FUNCTION
;快感系CUPの合計
;LV:0くすぐったい LV:1感じている LV:2強い快感 LV:3非常に強い快感 LV:4絶頂レベル
IF ARGS == "快感"
	SIF K53_快感 >10000
		RETURNF 4
	SIF K53_快感 >5000
		RETURNF 3
	SIF K53_快感 >1000
		RETURNF 2
	SIF K53_快感 >100
		RETURNF 1
	SIF K53_快感 > 0
		RETURNF 0
ENDIF

IF ARGS == "苦痛"
;LV0:我慢できる LV1:痛い LV2:ひぎぃ
;苦痛刻印は2000～だが、ＳＭの無いＴＷではまず発生しない
;処女:1250 子宮口責め:～500 打屁股:450+幼稚350 肛門愛撫:100 正常位肛交:800
	SIF CUP:TARGET:苦痛 > 2000
		RETURNF 2
	SIF CUP:TARGET:苦痛 > 500
		RETURNF 1
	SIF CUP:TARGET:苦痛 > 0
		RETURNF 0
ENDIF

IF ARGS == "反感"
;LV0:我慢できる LV1:いや LV2:やめて LV3:コロス
;反発刻印:反感＋不快	1:500~1000 2:1001~2000 3:2000~
;反感目安	挿入Ｇスポット・子宮口責め:500+贞操重视1000
	SIF CUP:TARGET:反感> 2000
		RETURNF 3
	SIF CUP:TARGET:反感> 1000
		RETURNF 2
	SIF CUP:TARGET:反感 > 500
		RETURNF 1
	SIF CUP:TARGET:反感 > 0
		RETURNF 0
ENDIF

IF ARGS == "恐怖"
	SIF CUP:TARGET:恐怖> 2000
		RETURNF 3
	SIF CUP:TARGET:恐怖> 1000
		RETURNF 2
	SIF CUP:TARGET:恐怖 > 500
		RETURNF 1
	SIF CUP:TARGET:恐怖 > 0
		RETURNF 0
ENDIF

;ちんぽ呼び
@K53_TINPO(ARG)
#FUNCTIONS
VARSET RESULTS

SELECTCASE RAND:2
	CASE 0
		RESULTS += "欧金金"
	CASE 1
		SELECTCASE RAND:4
			CASE 0
				RESULTS += "変態"
			CASE 1
				RESULTS += "色狼"
			CASE 2
				RESULTS += "蘿莉控"
		ENDSELECT
		RESULTS += "雞雞"
ENDSELECT
RETURNF RESULTS

;まんこ呼び
@K53_MANKO(ARG)
#FUNCTIONS
VARSET RESULTS

SELECTCASE RAND:5
	CASE 0
		RESULTS += "幼女"
	CASE 1
		RESULTS += "蘿莉"
	CASE 2
		RESULTS += "小"
	CASE 3
		RESULTS += "孩子"
ENDSELECT

RESULTS += "小穴"

RETURNF RESULTS

;ハートか"、"をつける
;ARG = 1 "、"つけない
;ARG >= 2 確実にARG-1数ハート付与
@K53_ハート付与(ARG)
#FUNCTIONS

A = 0
SIF ARG >= 2
	A += ARG - 1

;欲情LVに応じて確立でハートをつける
IF GETPALAMLV(PALAM:欲情, 15) >= 12
	SELECTCASE RAND:3
		CASE 0
			A += 1
	ENDSELECT
	SELECTCASE RAND:3
		CASE 0
			A += 1
	ENDSELECT
	SELECTCASE RAND:3
		CASE 0
			A += 1
	ENDSELECT
ELSEIF GETPALAMLV(PALAM:欲情, 15) >= 8
	SELECTCASE RAND:3
		CASE 0
			A += 1
	ENDSELECT
	SELECTCASE RAND:3
		CASE 0
			A += 1
	ENDSELECT
ELSEIF GETPALAMLV(PALAM:欲情, 15) >= 4
	SELECTCASE RAND:3
		CASE 0
			A += 1
	ENDSELECT
ENDIF

IF A > 0
	RETURNF UNICODE(0x2764) * A
ELSEIF ARG == 0
	RETURNF "、"
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/追加ファイル/自動喘ぎ/K53_自動喘ぎ用関数.ERB


code:
感覚に限らず与えられる快感量（CUP）で喘ぎ声が激烈地なる
　你の技量でも快感量が変わるため

総快感量で判定
　Ｖに５０００の快感があるとき接吻１００で判定すると矛盾が生じるため

陥落要素でなくPALAM:欲情の量で台詞にハートが付く
　エロ絵エロ同人脳

●流れ
１．初期化

２．快感総量取得・快感を与えられている部位取得

３．状況から使用する喘ぎ声列表を設定

４．選択指令から台詞を設定

５．喘ぎ声列表と台詞を随机に選択し文章を作る
　　５をループ
　　　文章文字数が一定に達したら終了

６．作成された文章を表示

path: ERB/口上・メッセージ関連/個人口上/【53】てゐ/追加ファイル/自動喘ぎ/仕様書.txt