code:
;雛、ナズの口上構文参考にしてます
;※※※※※※※※※※※※※※※※※※※※※※※※※
;道具系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;40,跳蛋
;==================================================
@M_KOJO_MESSAGE_COM_K30_40
IF K30_INST_AND_TOY()
	CALL K30_D_LINE
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_40_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_40_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時姦中
	IF FLAG:70
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	;服の上から＠用意はしたけど該当する衣装あるのかな？
	IF GETBIT(TEQUIP:30:0, 2)
		IF ABL:Ｃ感覚 < 2
			PRINTDATAL
				DATAFORM 「嗯っ…」\n「坐立不安……感觉很奇怪…」
				DATAFORM 「呀っ、嗯っ……这是，什么…」\n「舒服的…但又好像不是…」
			ENDDATA
			PRINTFORMDW 对跳蛋的无机质振动感到困惑，映姬的反应十分迷茫
		ELSEIF RAND:4 || ABL:Ｃ感覚 < 5
			PRINTDATAL
				DATAFORM 「恰呀っ…♥」\n「不、不行啊…」\n「这样下去的话，衣服上…都渗进那个…」
				DATAFORM 「啊っ♥　那么……用力、中间的话…」\n「啊、脱内衣之后再，不是更好吗…」
			ENDDATA
			PRINTFORMDW 在意%SHOW_BOTTOM(30, 3)%会被爱液弄脏、映姬拼命忍住快感
		ELSE
			PRINTDATAL
				DATAFORM 「唔唔っ…呜咕っ♥」\n「啊啊…我、变得…更想要了…♥」
				DATAFORM 「嗯嗯っ♥　嗯啊っ♥」\n「…不行，不够……再强一点……在这里…♥」
			ENDDATA
			PRINTFORMDW 映姬不满足于隔着衣服的刺激，主动把胯下压上来…
		ENDIF
	;露出させた
	ELSE
		SELECTCASE ABL:Ｃ感覚
			CASE 0, 1
				PRINTFORMW 「%TEXTR("嗯嗯っ…呜、啊っ/啊っ…讨、讨厌/咿っ！　咿呀っ、那里…咿呀っ/唔咕っ！　唔唔っ、呃っ")%…」
				IF NOWEX:Ｃ絶頂
					PRINTFORML 「嗯っ、嗯啊っ♥　有什么，上来了…」
					PRINTFORMDW 在机械振动中，映姬被半强制地逼上绝顶…
				ELSE
					PRINTDATAL
						DATAFORM 「被用力推的话…会有点痛…」
						DATAFORM 「舒服、但…总觉得、火辣辣的…好辛苦」\n「痛呀，这个也是…会习惯的吗？」
						DATAFORM 「希望…希望你能更温柔一点」\n「好痛，如果可以的话…是你的手…」
					ENDDATA
					PRINTFORMDL 映姬扭动着娇躯泪眼汪汪
					PRINTFORMDW 对于未開发的淫核来说，跳蛋的刺激似乎有点太强了…
				ENDIF
			CASE 2, 3, 4
				PRINTFORML 「%TEXTR("啊っ、不行っ…那样子，不行啊/呃啊っ！　强压上来的话不行啊、/那里……温柔地，描着……啊嗯っ")%…♥」
				PRINTDATAL
					DATAFORM 「啊っ、啊哈っ…小豆…好厉害…♥」
					DATAFORM 「嗯嗯っ！　不行啊…这种东西，要记住了…不行…♥」
					DATAFORM 「啊っ、呀…那里，太过分，太厉害了…♥」
				ENDDATA
				PRINTFORMDW 映姬的呼吸越来越急促，似乎渐入佳境
			CASE IS >= 5
				IF K30_INST_AND_TOY()
					TFLAG:194 = 1
					PRINTFORMDL \@ !TEQUIP:50 ? 蜜壶 # 肛门 \@\@ TEQUIP:体位 < 3 ? 入到深处 # 激烈地推起 \@映姬的绝顶也快到了
					PRINTFORMDL 为了\@ NOWEX:MASTER:射精 ? 一起高潮 # 让映姬更加混乱 \@、%CALLNAME:MASTER%把跳蛋用力压在阴蒂上，继续抽插
					PRINTFORMW
					IF TEQUIP:50 == MASTER
						PRINTFORML 「%TEXTR("噫噫噫噫噫噫嗯/啊啊啊啊啊啊啊っ/不行啊啊啊啊啊啊っ")%♥♥」
						PRINTDATAL
							DATAFORM 「啊っ♥　住っ、住手っ♥　不行っ♥　别这样っ！　呀啊啊啊啊っ♥」
							DATAFORM 「哦っ♥　哦っ♥　小妹妹っ、一库っ♥　豆子っ、一库っ♥　去了唔呜呜♥」
							DATAFORM 「不行っ♥　不行啊♥　那个、不行っ♥　不行っ♥　不行啊啊啊♥♥」
						ENDDATA
						PRINTFORMDL 随着映姬那一声凄清的娇声，膣肉開始在阴茎上扭动。
						PRINTFORMDW 豆子和里面同时被欺负，映姬如坠云端只顾喘息，快乐的都忘了自我…
					ELSE
						CALL HPH_PRINT, @"「%UNICODE(0XFF5E)* RAND(8, 16)%%TEXTR("ッ/っ/")%%TEXTR("HPH/HPHHPH/")%HPH」", "L"
						STRDATA LOCALS
							DATAFORM 「啊゛啊～～～ッHPH　啊゛ぅHPH　啊゛呜ぅHPH　啊っHPH　啊っHPHHPH」
							DATAFORM 「哦゛っHPH　屁゛股っHPH　屁股っHPH　嗯哦、哦゛っHPH　哦っHPHHPH」
							DATAFORM 「呃啊啊啊啊啊啊啊っHPH　嗯啊゛っHPH　啊゛っHPH　啊啊゛っHPH」
						ENDDATA
						CALL HPH_PRINT, LOCALS, "L"
						PRINTFORMDL 强烈的快感让映姬发出了不似阎罗大人的猛烈娇声
						PRINTFORMDW %CALLNAME:MASTER%的手毫不留情地快乐责备，映姬喘息着任其施为…
						CALL K30_PEEING
					ENDIF
				ELSE
					PRINTDATAL
						DATAFORM 「呀啊啊啊啊啊っ♥　就是这个！　不行っ♥　不行啊♥」
						DATAFORM 「啊啊っ！！　这个っ、去了唔♥　马上っ、要去了唔呜呜♥」
						DATAFORM 「哦っ♥　豆豆，豆豆っ♥　奇怪，变得奇怪了♥」
					ENDDATA
					PRINTFORML 「%TEXTR("咿呀っ♥　咿呀昂♥　咕哩咕哩的、咿呀啊/啊啊啊っ！　不行っ♥　剥開的、会受不了呀♥")%♥」
					PRINTFORMDL %CALLNAME:MASTER%对%TEXTR("突然鼓起来/把皮掀起来/两根手指捏起来")%的阴蒂把跳蛋更用力地压在上
					PRINTFORMDW 映姬半痉挛地娇躯狂颤着，被从阴蒂推上来的快乐持续玩弄着…
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;挿入+道具コンボの判定用式中関数
@K30_INST_AND_TOY()
#FUNCTION
SIF FLAG:70 || TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
	RETURNF 0
SIF ABL:Ｃ感覚 < 5 || GETBIT(TEQUIP:30:0, 2) || !NOWEX:Ｃ絶頂
	RETURNF 0
SIF !((ABL:Ｖ感覚 > 4 && NOWEX:Ｖ絶頂 && !TEQUIP:50) || (ABL:Ａ感覚 > 4 && NOWEX:Ａ絶頂 && !TEQUIP:51))
	RETURNF 0
RETURNF 1

;特殊おもらし判定関数
@K30_PEEING
SIF GET_TARGETNUM() > 1 || ABL:Ａ感覚 < 10 || !TEQUIP:振動棒
	RETURN
SIF !NOWEX:MASTER:射精 || STRFIND(CSTR:30:1, "おもらし") > -1 || !SUMARRAY(NOWEX:30:0, 7, 10) || TEQUIP:MASTER:避孕套
	RETURN
CALLF ONCE("おもらし")
PRINTFORML
PRINTFORMDL 被攻击尻穴而呻吟的映姬突然变了脸色恳求道
STRDATA LOCALS
	DATAFORM 「啊っ、啊っHPH　等、等一下！　等一下HPH　等一下啊啊HPH」
	DATAFORM 「啊っっHPH　住手っHPH　住手っ！　先停一下っ、停下啊HPH」
	DATAFORM 「呀HPH　不行、不行！　真的，不行啊HPH」
ENDDATA
LOCALS = %LOCALS%\n「%TEXTR("漏掉了！会漏掉的/不行HPH　尿尿！　不行啊啊")%HPH」\n「原谅我っ！　原谅我吧HPHHPH」

CALL HPH_PRINT, LOCALS, "W"
PRINTFORMDL 羞耻的穴全都被欺负了，尿意已经接近极限了…
RESETCOLOR
PRINTBUTTON "[許す]　　　", 0
PRINTBUTTON "[許さぬ]", 1
CALL M_KOJO_COLOR_K30
DO
	INPUT
	CLEARLINE 1
	IF !RESULT
		PRINTFORMDL …把閻魔大人的尊严剥夺到那种程度，有点不好意思
		PRINTFORMDW %CALLNAME:MASTER%立刻集中精力活动腰部以迎接射精
		RETURN 1
	ELSEIF RESULT == 1
		BREAK
	ENDIF
LOOP 1
TFLAG:194 = 045
TCVAR:30:374 = 1
NOWEX:放尿 = NOWEX:Ｃ絶頂
EX:放尿 ++
EXP:放尿経験 += EXP_UP(5, 30)
TCVAR:利尿剤  = 10
DOWNBASE:30:体力 = BASE:30:体力  - 400
PRINTFORMDL …真的超过了极限的映姬到底会展现出什么样的痴态呢？
IF SELECTCOM == 40
	PRINTFORMDL %CALLNAME:MASTER%不顾哀求的声音，把跳蛋一下子推到了狭窄小孔里…
ELSE
	PRINTFORMDL %CALLNAME:MASTER%将映姬打算并拢的双腿进一步扒開，用手指按摩尿道口…
ENDIF
PRINTFORML 「！！！」
CALL HPH_PRINT, "「呀，不要看HPH　咿呀！不要看啊！　呀啊啊啊啊~啊啊啊啊っっHPHHPH」", "L"
CALL HPH_PRINT, "「漏っHPH　漏了HPH　尿，漏出来了啊啊唔HPH」", "W"
RETURN

;==================================================
;41,電動按摩棒
;==================================================
@M_KOJO_MESSAGE_COM_K30_41
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_41_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_41_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	ENDIF
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;42,陰蒂夾
;==================================================
@M_KOJO_MESSAGE_COM_K30_42
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_42_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_42_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	ENDIF
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:陰蒂夾
		;時姦中
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;43,飛機杯
;==================================================
@M_KOJO_MESSAGE_COM_K30_43
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_43_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_43_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:飛機杯
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1

;==================================================
;44,振動棒
;==================================================
@M_KOJO_MESSAGE_COM_K30_44
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_44_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_44_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中・睡眠中
	IF CFLAG:MASTER:恶作剧 == 2 || FLAG:70
		RETURN 1
	ENDIF
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF CFLAG:1801 == 1
			IF TCVAR:破瓜 != 0
				PRINTFORMW 「什么啊，那个道具……啊，难道是」
				PRINTFORMW 「不行！绝对不行！用那样的性道具開什么玩笑！？」
				PRINTFORMW 「……真的吗…等等……不，拜托了，不要！处女怎么说也不想给这个东西！」
				PRINTFORMW 「别这样！　…啊啊啊ぁっ！！」
				TCVAR:30:不耐烦 = 1
				TCVAR:30:强行 = 1
				;フラグに残す
				SIF TCVAR:破瓜 == 1
					SETBIT CFLAG:1800, 2
				RETURN 1
			ELSE
				PRINTFORMW 「那个道具,是怎么回事……呜噫！…在里面……震动……」
				PRINTFORMW 「讨厌…里面……震动着……」
				RETURN 1
			ENDIF
		ELSE
			IF TCVAR:破瓜 != 0
				PRINTFORML 「我的…第一次被道具给………明明想…不,没,没什么……」
				PRINTFORMW 「稍微、请稍等一下！……ひっ！」
				PRINTFORMW 「…处女被道具………不、不，请不要再……」
				RETURN 1
			ELSE
				PRINTFORMW 「那个道具,是怎么回事……呜噫！…在里面……震动……」
				PRINTFORMW 「讨厌…里面……震动着……」
				RETURN 1
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	;基本セット
	;振動棒解除時
	IF !TEQUIP:振動棒
		IF EXP:Ｖ経験 > 70
			IF RAND:2 == 1
				PRINTFORML 「啊、拔掉了……那么、接下来…」
				PRINTFORMW 「%K30_C_NAME(MASTER)%、想让你爱我」
			ELSE
				PRINTFORML 「……不要拔出来。」
				PRINTFORMW 「我希望你能更加欺负我…♥」
			ENDIF
		;Ｖ経験40以上
		ELSEIF EXP:Ｖ経験 > 40
			PRINTFORML 「哈、は哈……」
			PRINTFORMW 「啊……结束了吗?」
		;Ｖ経験20以上
		ELSEIF EXP:Ｖ経験 > 20
			PRINTFORMW 「嗯……果然还是不习惯啊…」
		;それ以外
		ELSE
			PRINTFORMW 「讨厌，还……还有被什么插着的感觉…」
		ENDIF
	;%TINKO%引き抜いてからすぐ入れた
	ELSEIF TCVAR:100 == MASTER
			IF EXP:Ｖ経験 > 100
				IF RAND:2 == 1
					PRINTFORML 「はぅ……嗯~♥　不对的，对的，弄对了~」
					PRINTFORMDW 被震动棒从身体深处搅动，映姬的表情也立刻荡漾起来……
				ELSE
					PRINTFORML 「啊哈啊啊~♥　好厉害啊！这边也很厉害♥」
					PRINTFORMDL %CALLNAME:MASTER%松開震动棒上，震动棒和映姬的身体一样咻咻地抽动着
					PRINTFORMDW 也可以看到映姬的阴道仿佛在咀嚼着一样想要吞下震动棒……
				ENDIF
			ELSEIF EXP:Ｖ経験 > 20
				PRINTFORMW 「啊唔…♥　用道具什么的，那可不行……」
			ELSE
				PRINTFORMW 「不、要…不要那种道具、是你的…你的就好了啊…」
			ENDIF
	ELSE
		IF ABL:Ｖ感覚 > 2
			IF RAND:2 == 1
				PRINTFORML 「进来……里面，送到了…♥」
				PRINTFORMW 「啊啊~♥　不行、不行！　这个啊…不行♥」
				PRINTFORMDW 将震动棒吞入阴道深处，映姬发出一声不知是悲鸣还是喜极的声音……
			ELSE
				PRINTFORML 「拜托，请快点插入……♥」
				PRINTFORMDW 误以为是在挑逗，映姬向我撒娇…
				PRINTFORMDL 为了满足要求，%CALLNAME:MASTER%把震动棒塞进映姬湿滑的肉壶里。
				PRINTFORMW 「呼啊啊啊啊ぁっ♥　おくぅ、真恶心」
			ENDIF
		ELSEIF PALAM:潤滑 <= PALAMLV:1
			PRINTFORML 「稍等一下……等一下！　太荒唐了、不要做…」
			PRINTFORMDW 震动棒在还没有完全湿透的映姬的裂缝上，看起来很吃力…………
		ELSEIF EXP:Ｖ経験 > 20
			IF RAND:2 == 1
				PRINTFORML 「ぁ……啊…、咚咚…到里面……哈啊啊啊嗯~♥」
				PRINTFORMDW 把震动棒全部接受后，映姬大舒了一口气
			ELSE
				PRINTFORML 「啊啊啊~♥　哎？诶诶？呀，这样的…进来的话……」
				PRINTFORMDW 与不安的口吻相反，映姬的阴道顺利地接受了震动棒…
			ENDIF
		ELSE
			IF RAND:2 == 1
				PRINTFORMW 「那个道具，有点可怕……不会痛吗？」
			ELSE
				PRINTFORML 「如果只是动的话就好了，但是…那个颤动太过于，所以…」
				PRINTFORMDW 映姬好像还没有习惯震动棒微妙的振动…
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;45,肛用振動棒
;ナズ口上構文参考にして二本差し分岐も追加
;==================================================
@M_KOJO_MESSAGE_COM_K30_45
IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
	CALL TRAIN_MESSAGE
ELSEIF FLAG:70
	IF TEQUIP:肛用振動棒 || (!TEQUIP:肛用振動棒 && !TCVAR:30:364)
		CALL TRAIN_MESSAGE
	ELSE
		CALL K30_TRAIN_MESSAGE_45
	ENDIF
ELSE
	CALL K30_TRAIN_MESSAGE_45
ENDIF
CALL K30_PRINT_BUTT_IMAGE(SELECTCOM)
CALL M_KOJO_MESSAGE_COM_K30_45_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_45_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	IF FLAG:70
		RETURN 1
	ENDIF
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	;基本セット
	;解除
	IF !TEQUIP:肛用振動棒
		SELECTCASE ABL:Ａ感覚
			CASE IS > 4
				IF NOWEX:Ａ絶頂 && !NOWEX:二重絶頂
					CALL HPH_PRINT("「啊~HPH　啊~、啊啊啊~HPH　掉了！掉下来了HPH」", "W")
				ELSE
					CALL HPH_PRINT("「啊~HPH　啊~、啊啊啊~HPH　……哈啊~…哈啊~」", "W")
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「……屁股、拔掉、不要」
							PRINTFORMW 「ねぇ……更加……♥」
						CASE 1
							PRINTFORML 「现在、拔掉的话、有些…难受」
							PRINTFORMW 「这次……想要你的…♥」
						CASE 2
							PRINTFORML 「哈啊~、哈啊~……太厉害，了……♥」
					ENDSELECT
				ENDIF
			CASE 2, 3, 4
				CALL HPH_PRINT("「嗯~HPH　拔掉…了……啊嗯~HPH」", "W")
				IF RAND:2 == 1
					PRINTFORMW 「嗯嗯~…结束…了？　……是吗…」
				ELSE
					PRINTFORMW 「……啊，不要说张開着扩大了之类的那种羞耻的话！」
				ENDIF
			CASE 1
				PRINTFORML 「不行！不行！不要看！出来了！　…啊~、啊啊~♥」
				PRINTFORMW 「…真的、很羞耻、不要看…拜托了…」
			CASE 0
				PRINTFORMW 「嗯、咕噜…噜噜…啊啊！！」
				PRINTFORML 「哈、哈、哈………」
				PRINTFORMDW 映姬靠在肩上喘着气、好一会没有看向我…
		ENDSELECT
	;装着
	ELSE
		;二本差し
		IF TEQUIP:50 == PLAYER || TEQUIP:振動棒
			SELECTCASE ABL:Ａ感覚
				CASE IS > 4
					SELECTCASE RAND:3
						CASE 0
							PRINTFORML 「啊啊…\@ TEQUIP:振動棒 ? 前 # 你的 \@光是这样\@ ABL:Ｖ感覚 > 2 ? 好厉害 # 满满的 \@明明……屁股，也…♥」
							CALL HPH_PRINT("「啊っ…啊~、啊啊啊~HPH　进来吧唔唔HPH」", "W")
						CASE 1
							CALL HPH_PRINT(@"「啊啊啊~HPH　不要、不要HPH　一起来，吧\@ TEQUIP:振動棒 ? かし # い \@ちゃ、不行啊HPH」", "L")
							IF TEQUIP:50 == PLAYER
								PRINTFORMDW 映姬夹住肛门用震动棒后，阴道内的热度和蠕动度更加高涨…
							ELSE
								PRINTFORMDW 映姬被双孔震动棒带来的无机质快感捉弄，持续不断的娇声连连
							ENDIF
						CASE 2
							CALL HPH_PRINT("「啊~、啊啊~HPH　不行、不行啊HPH　这种东西、不行啊HPH」", "L")
							PRINTFORMD %CALLNAME:MASTER%故意低声问，什么不行？
							IF TEQUIP:振動棒
								PRINTFORMDW 拔掉了两个震动棒…
							ELSE
								PRINTFORMDW 把\@ TEQUIP:体位 < 3 ? 缓慢前后 # 轻轻往上 \@推…
							ENDIF
							CALL HPH_PRINT("「呀啊HPH　中，中了HPH　摩擦HPH　不行啊HPH」", "W")
					ENDSELECT
				CASE 2, 3, 4
					IF RAND:2 == 1
						CALL HPH_PRINT("「啊…两个、都进去了、嗯、嗯っHPH」", "W")
						CALL HPH_PRINT("「这个…不行，一旦习惯了…不行HPH」", "W")
					ELSE
						PRINTFORML 「这么简单地进入，感觉…变好了…”」
						CALL HPH_PRINT(@"啊~HPH　不行…现在\@ TEQUIP:振動棒 ? 动的话 # 由你来动\@如果…HPH」", "W")
					ENDIF
				CASE 1
					PRINTFORML 「啊，啊呜，虽然有点累……呜」
					PRINTFORMW 「啊、等一下…動か\@ TEQUIP:振動棒 ? さ # \@就那样…」
					PRINTFORMW 「啊~……♥」
				CASE 0
					PRINTFORMW 「呜…痛、痛…の…果然、不行…」
			ENDSELECT
		ELSE
			;肛用振動棒のみ
			SELECTCASE ABL:Ａ感覚
				CASE IS > 4
					SELECTCASE RAND:3
						CASE 0
							CALL HPH_PRINT("「啊~HPH　好厉害，到屁股的深处…嗯~HPH　嗯嗯~HPH」", "W")
							CALL HPH_PRINT("「哦咕HPH　肚子，深处HPH　在发抖HPH」", "W")
						CASE 1
							PRINTFORMW 「…快点，插入……请……我受不了了，在屁股上……快点…♥」
							PRINTFORMDL 映姬着急的摇晃着屁股要求插入，身上散发着一种难以言喻的色香味
							PRINTFORMDW %CALLNAME:MASTER%把贴在狭窄处的震动棒塞进映姬的深处…
							CALL HPH_PRINT("「―――っ！　噫HPHHPH　这个，好棒噫~噫HPHHPH」", "W")
						CASE 2
							PRINTFORMW 「准备好了哦……快点，然后……请搅一搅…♥」
							PRINTFORMDL 将震动棒塞进去，映姬的肛门柔软地张開，将震动棒吞进肚子里…
							CALL HPH_PRINT("「啊~HPH　啊~HPH　哈啊~HPH　屁股、说的是啊HPH」", "W")
					ENDSELECT
				CASE 2, 3, 4
					IF RAND:2 == 1
						PRINTFORML 「这么羞耻的事…把东西放进不净的洞里…」
						PRINTFORMDW 映姬恨恨地嘟囔着，不过，她对设定好的震动棒的振动做出了剧烈的反应…
						PRINTFORMDL %CALLNAME:MASTER%慢慢地把碰到肛口狭窄的震动棒压了进去…
						CALL HPH_PRINT("「唔…啊…啊~…啊~~、啊~HPH　肚子，被按下了…HPH」", "W")
					ELSE
						PRINTFORML 「………唔…啊、うぅっ…啊啊啊~♥」
						PRINTFORMDW 被插了肛用震动棒的映姬想办法忍耐快感
						PRINTFORMDL 但是，准确地欺负弱点的震动，轻易地打破了这种觉悟…
						CALL HPH_PRINT("「いいのHPH　我……屁股，很舒服，噫哟…HPH」", "W")
					ENDIF
				CASE 1
					PRINTFORML 「太羞耻了…请不要看，不要看…啊！」
					PRINTFORMW 「啊…呜…、果然…好痛苦…」
				CASE 0
					PRINTFORMW 「嗯…嗯，好痛苦…嗯，拜托了…抽出…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1
;-------------------------------------------------
;肛用振動棒地の文＠淫乱がないと地の文分岐が半分も拾えないのはもったいないと思って
@K30_TRAIN_MESSAGE_45
DRAWLINE
RESULT = 1
;解除時
IF !TEQUIP:肛用振動棒 && TCVAR:30:364 != 0
	PRINTFORMDL \@ FLAG:70 ? 在停止的時間中 # \@把映姬的菊门含住的震动棒一口气拔了出来
	PRINTFORMDL 突然张開的肛门为了寻求本应有的东西而贪婪地蠕动着…
ELSEIF !TEQUIP:肛用振動棒
	PRINTFORMDL 从映姫的菊門那里拔出肛用震动棒
	PRINTFORMD 映姬
	SELECTCASE ABL:Ａ感覚
		CASE IS > 4
			IF NOWEX:NOWEX:Ａ絶頂 && RAND:3
				PRINTDATAL
					DATAFORM 弓着背喘着气…
					DATAFORM 由于拔出来的刺激，身体剧烈地颤抖着…
					DATAFORM 身体一跳一跳的发颤…
				ENDDATA
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMD 秘唇口不断流淌的同时、%HIP(TARGET)%不断地扩展…
					CASE 1
						PRINTFORMD 水润的眼睛恳求似的摇着屁股…
					CASE 2
						PRINTFORMD 露出荡漾的表情脱力了…
				ENDSELECT
			ENDIF
		CASE 2, 3, 4
			IF RAND:2 == 1
				PRINTFORMD 有点依依不舍地摇着%HIP(TARGET)%…
			ELSE
				PRINTFORMD 一边扭动着蜜桃般地臀部，边露出松了一口气的表情…
			ENDIF
		CASE 1
			PRINTDL 被强制的排泄感染红了脸颊…
		CASE 0
			PRINTDL 用痛苦的表情忍受着刺激…
	ENDSELECT
ELSE
	PRINTFORMD 映姫の
	SIF TEQUIP:0 & 2
		PRINTFORMD %SHOW_BOTTOM(TARGET,2)%错開、
	PRINTFORMDL \@ GETBIT(CFLAG:1910, 7) ? 纵长 # \@的菊穴贴在肛用震动棒上…
	PRINTFORMD 映姬
	SELECTCASE ABL:Ａ感覚
		CASE IS > 4
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMD 以融化的表情，扩张自己的%HIP(TARGET)%
				CASE 1
					PRINTFORMD 扭着纤腰焦急地等待着插入
				CASE 2
					PRINTFORMD 染红脸颊，%HIP(TARGET)%期待的摇晃着的
			ENDSELECT
		CASE 2, 3, 4
			IF RAND:2 == 1
				PRINTFORMD 在狭窄的地方被给予的震动棒的刺激使娇躯颤抖
			ELSE
				PRINTFORMD 期待和否定混杂在一起的复杂表情
			ENDIF
		CASE 1
			PRINTFORMD 染上羞耻感的脸扶低着
		CASE 0
			PRINTFORMD 表现出不洁之穴被侵犯的耻辱和屈辱感
	ENDSELECT
	PRINTFORMDL 进行中…
	IF TEQUIP:振動棒
		PRINTFORMD %CALLNAME:MASTER%在映姬前面的洞里也夹着震动棒，
	ELSEIF TEQUIP:50 == PLAYER
		PRINTFORMD %CALLNAME:MASTER%一边享受着映姬的热热膣内
	ELSE
		PRINTFORMD %CALLNAME:MASTER%は\@ ABL:Ａ感覚 > 4 ? 想快点咽下去的映姬の # 配合映姬紧张的呼吸 \@
	ENDIF
	SIF PALAM:潤滑 >= PALAMLV:4
		PRINT 泥泞不堪
	PRINTFORMDL 在菊门上慢吞吞地插上了震动棒…
ENDIF
PRINTFORMW
CALL K30_COMPENSATE_MESSAGE
RETURN 1

;==================================================
;47,乳頭夾
;==================================================
@M_KOJO_MESSAGE_COM_K30_47
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_47_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_47_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	ENDIF
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:乳頭夾
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;==================================================
;48,搾乳機
;==================================================
@M_KOJO_MESSAGE_COM_K30_48
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_48_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_48_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:搾乳機
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
	ENDIF
ENDIF
RETURN 1
;==================================================
;49,乳頭跳蛋
;==================================================
@M_KOJO_MESSAGE_COM_K30_49
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_49_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_49_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	ENDIF
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ENDIF
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;50,避孕套装备
;妊娠願望実装…と見せかけた肛門おねだり口上
;==================================================
@M_KOJO_MESSAGE_COM_K30_50
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_50_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_50_1
#DIM ONEDARI
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
		RETURN 1
	;マグロスイッチ
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		IF TEQUIP:PLAYER:避孕套
			ONEDARI = 0
			CALL K30_GASPING_MAGURO
			RETURN 1
		ELSEIF TCVAR:30:烂醉
		ELSEIF TCVAR:30:强行
			PRINTFORMW 「到底，想干什么…」
		ELSEIF TCVAR:30:385
			PRINTFORMW 「取下吗…？如果可以的话…」
		ENDIF
	;装着時
	ELSEIF TEQUIP:PLAYER:避孕套
		ONEDARI = 0
		;中出しOK時
		IF !K30_CREAMPIE()
			IF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4))
				PRINTDATAW
					DATAFORM 「那样的……需要吗？」
					DATAFORM 「为什么戴着……？」
					DATAFORM 「……能取下来吗」
				ENDDATA
				PRINTFORMDW 映姬不满地仰望着%CALLNAME:MASTER%
				ONEDARI = 3
				RETURN 1
			ELSEIF ABL:膣射中毒
				PRINTDATAW
					DATAFORM 「生孩子……果然还是很犹豫？」
					DATAFORM 「……被中出、那种感觉，我也、并不讨厌」
					DATAFORM 「……是应该那样做呢……」
				ENDDATA
			ELSE
				PRINTDATAW
					DATAFORM 「那样比较好」
					DATAFORM 「应该、那样做呢…」
					DATAFORM 「这样比较好吗…」
					DATAFORM 「这样比较放心吧」
				ENDDATA
			ENDIF
		;中出しNG時
		ELSE
			PRINTDATAW
				DATAFORM 「谢谢。我可以放心了。」
				DATAFORM 「太好了。这么照顾我」
				DATAFORM 「是啊。如果能做到的话就麻烦了」
			ENDDATA
		ENDIF
		;Ａ挿入慣れてて、Ａの方が好きか見る
		SIF !ABL:肛射中毒 || ABL:Ａ感覚 < 2 || (ABL:膣射中毒 >= ABL:肛射中毒 && !RAND:5)
			RETURN 1
		SIF K30_CREAMPIE()
			PRINTFORMD 虽然嘴上这么说
		PRINTFORMDW 映姬对被橡胶覆盖的%TINKO()%遗憾地抚摸着…
		;0にも100にもならない適当な判定。他人の前では自重
		IF MIN(ABL:肛射中毒, 7) < NOISE3(GETTIME(), 9) || GET_TARGETNUM() > 1 || K30_CREAMPIE() == 1
			PRINTFORMW 「…对不起。不要在意」
			ONEDARI = 1
		ELSE
			PRINTFORML
			PRINTFORMW 「…………………」
			PRINTFORML 「吶、%K30_C_NAME(MASTER)%」
			IF ABL:Ａ感覚 > 4 && ABL:肛射中毒 > 4 && ABL:露出癖 > 4
				PRINTFORMW 「现在还需要套套吗?…？」
				PRINTDATA
					DATAFORM 「放在这里的话，两个人都很快乐哦
					DATAFORM 「你，放在屁股里也是……喜欢吧
					DATAFORM 「比起放在那样的地方……我更希望你用这个
				ENDDATA
				CALL HPH_PRINT, @"HPH」", "W"
				PRINTFORMDL 映姬主动掰開了臀瓣，要求生插入…
				PRINTFORMDW 似乎完全沉浸在肛射的快感中，已经不想掩饰了
				ONEDARI = 2
			ELSE
				PRINTFORMW 「…………………」
				PRINTDATAW
					DATAFORM 「……屁股上，的话…没关系的…」
					DATAFORM 「…屁股，那…没关系的…」
					DATAFORM 「……屁股上，怎么样?…」
				ENDDATA
				PRINTFORMDL …好像忘不了肛射的感觉
				PRINTFORMDW 自说自话，映姬连耳朵都红了
				ONEDARI = 1
			ENDIF
		ENDIF
	;取り外し時
	ELSE
		SELECTCASE ONEDARI
			CASE 0
				IF K30_CREAMPIE() > 1 && RAND:2 == 1
					PRINTFORMW 「…你明白吗?这是不做不行的日子。？」
				ELSE
					PRINTDATAW
						DATAFORM 「…浪费了一张，明明没必要」
						DATAFORM 「…又戴又摘，看起来很忙呀」
					ENDDATA
				ENDIF
			CASE 1
				PRINTDATAW
					DATAFORM 「…谢谢」
					DATAFORM 「…做，给我吧」
				ENDDATA
			CASE 2
				IF RAND:2 == 1
					PRINTFORML  「哼哼~、终于有了那个想法♪」
					CALL HPH_PRINT, @"「在这里，映姬会好好让你心情舒畅的HPH」", "W"
				ELSE
					PRINTFORML 「是吧。从一開始就这样做就好了」
					CALL HPH_PRINT, @"「在这么快活的地方…不做太可惜了HPH」", "W"
				ENDIF
			CASE 3
				IF RAND:2 == 1
					SIF ESTRUS_CYCLE(30) >= 100
						PRINTFORML 「今天，正好…这是个危险的日子。所以…」
					PRINTFORMW 「做吧……我们的，小宝宝」
					PRINTFORMW 「加油……多多相爱吧♥」
				ELSE
					PRINTFORML 「对不起，我任性地说了。但是…」
					SIF ESTRUS_CYCLE(30) < 70
						PRINTFORML 「即使不是值得期待的日子，只要有可能性…没有，想做的」
					PRINTFORMW 「无论如何都想要，和你的孩子」
				ENDIF
		ENDSELECT
		ONEDARI = 0
	ENDIF
ENDIF
RETURN 1

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


code:
				eraTheWorld 四季映姫 口上
		;-------------------------------------------------
				角色コンセプト
・閻魔様だけあって公明正大で堅い性格だが、元地蔵＋説教好きで人里にも出步行のことから人类を見守るのが好きな本当は慈悲深くて献身的な神様
・でもやっぱり堅い。[思慕]が付いた＝想いが募る相手でも诶嘿嘿するのに抵抗があるぐらい堅い
・そのかわり[恋慕]がついたら白黒はっきりついてちゅっちゅらびゅらびゅに振り切れる
・口調は丁寧語が基本。発言はたしなめる、諭す言い方が多い。内容は道徳的、仏教的なものをそれっぽく,ついでに長ったらしく
・どの勢力の誰とも基本的に中立だが、道教勢力だけは教義の点から否定的
・诶嘿嘿に関してはなるべく卑語・淫語を言わせない。あえぎ声は否定的なものを多めに。Ａ系・奉仕系は積極的で
 (20/09追記)
・把柄はなるべく貯めない方向に。後々ねちねち言うのでは無く、逐一くどくど説教しそうなイメージなので。それで収まらなければ悔悟棒で一撃
  あと、你のお尻に恶作剧してニヤニヤするより、你にお尻をいじめられて悶えるほうが似合ってる。間違いなくそっちの方が良い。そうあるべき
		;-------------------------------------------------
				注意事項
・普通体型男主人公外来人設定で口上書いてます。扮演、女主人公、巨躯矮小ショタ、地元民だと口上と確実にずれます
・映姫様が貧乳のみ対応です。一部揶揄する書き方もあるので気になる方は気をつけて下さい
・诶嘿嘿口上は恋慕しか書いてません。其他のは後付けなので誇張に矛盾します
・初口上・初スクリプト組みの為、不具合や至らぬ点多々あると思います。思いつきを気ままに書いた為、口上・構文に統一性がありません
・特に追加関数はかなり見苦しいのもあります。導入の際はセーブデータ退避等の準備の上でお願いします
・通してテストプレイ出来てないのでバグありそうです。発見された方はeratoho総合スレに報告をお願いします
・更新履歴さえ追記してもらえればライセンスオールフリーです
  案・意見・一言でもスレに投げてもらえると作者は喜びます
		;-------------------------------------------------
				感謝の辞
  YM映姫様の口上を松鼠ペクトする形で書き始めました。自分の力量不足でとてもフォロワーとは呼べない何かとなりましたが
  作成のモチベーションに大きく関わっています。口上作者様ありがとうございました
  TWナズ、TW小鈴、TW椛、TW雛、TW愛麗絲の各口上作者様、構文特に参考にさせて頂きました。ありがとうございました
  eratoho総合スレ262>>884様、妄想捗るアイデアありがとうございました
  バリアント作者の◆eraTWk3.v6様、絶え間ない保养とUP约会本当にお疲れさまです。ありがとうございます
  其他eraに関わる皆様方、ありがとうございます
		;-------------------------------------------------
				使用素材
・喘ぎ声ジェネレータ | にゃんくるアパートメント
https://web.archive.org/web/20180106024449/http://nyancleap.net:80/aeggen/
・んもうだめジェネレータ
http://tekito.kanichat.com/nmoudame/
・青空文庫 「仏教人生読本」 岡本かの子 著
https://www.aozora.gr.jp/cards/000076/files/52342_51795.html
		;-------------------------------------------------
				更新履歴・今後の予定
  長くなったので更新履歴等.txtに分離
		;-------------------------------------------------
				チラ裏

本当は諏訪子様や覚様口上のような時姦バレをやってみたかった。けど表現力や想像力が足りなくて断念
時止めレイプ魔を鷹揚に許したり身内びいきで無かったことにしてくれる映姫様がどうしても思い浮かばなかった

肛門や口交描写、おまけに妙な地の文ぶっこむくらい気合あるなら
ちゃんと貂プレ穴埋めしろよとは自己も思う、けど性癖だもの。しょうがないね

思慕→恋慕での口上差はものすごく不自然だけど「白黒はっきりつけた」ということで流して

周回要素あるんだし事前に警告した上、次周には持ち込まないリセット前提で
映姫様マジ切れ→ものすごく重いペナルティをぶつけるとか入れてみたい
というかYM映姫様の記憶消去耐性や
 *---------------------------*
 *        Information        *
 *映姫様のストレスが7000上昇 *
 *否定の珠　16000獲得        *
 *反発刻印　レベル3取得      *
 *恐怖刻印　レベル3取得      *
 *---------------------------*
これのインパクトが凄かったので稍微でも真似できたらいいなと

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/ReadMe.txt

license: unknown


path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/おまけ/30.csv


code:
※なにこれ？
LoAを参考にした一発ネタ
まばたきする、それだけです

※導入方法
該当ファイルを上書き、バックUP必須

※既知の不具合
多人数描画や720p新立絵尺寸との相性が悪く、たまにemueraごと死机発生

※注意事項
こちらのファイル導入は個人的な改造行為に中奖了バリアント主さんのサポート範囲外です
不具合やトラブル発生時の対処を含め全て自己責任でお願いします
クラッシュ等不具合起きた場合、作成者が提示できる解決策はCSVの差し戻しだけとなります

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/おまけ/おまけreadme.txt


code:
;特殊保护功能，保护版本更新后首次游玩的玩家防止初见杀
#DIM SAVEDATA K30_PLAYER_PROTECTION									;四季映姬初期口上保护用，防止分手初见杀

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/おまけ/魔改作者自添加变量.ERH


code:
;  四季映姫口上
;  作者：TW映姫様口上作った人
;
;  ＜この口上について語ったりするスペース＞
;
;  口上って難しいね。
;
;  ライセンス：
;  作者は以下で○をつけた行為について、誰でも無断で行えるものとし、違反しない限り許可を撤回しないものとします。
;    ○：常に許可　△：要相談、上記の作者と改変者全員に連絡が取れない場合は不許可　×：不許可、相談を受けても許可しない
;
;  +----+-----------------------------------+
;  | 口上の再配布                           |
;  +----+-----------------------------------+
;  | ○ | 単体での再UPロード            |
;  | ○ | 本体への同梱・口上まとめへの収録  |
;  +----+-----------------------------------+
;  | 再配布を許可する場合の改変             |
;  +----+-----------------------------------+
;  | ○ | 口上の加筆                        |
;  | ○ | 口上の改変・其他改変            |
;  +----+-----------------------------------+
;  | 其他                                 |
;  +----+-----------------------------------+
;  | ○ | 他の口上での利用                  |
;  | ○ | 他のeraバリアントでの利用         |
;  | ○ | era以外への流用                   |
;  | ○ | 翻訳・他言語版バリアントへの流用  |
;  | ○ | 商用利用・金銭のやり取りを伴う利用|
;  | ○ | 二次創作                          |
;  +----+-----------------------------------+
;  ・以下の行為に関しては上記と関係なく、無断で行えるものとします。
;    １：バグ・誤字脱字の修正・本体VerUpへの対応のための改変
;  ・以下の行為に関しては上記と関係なく、作者であっても禁止とします。
;    １：以下の例外を除き、この口上からライセンス文・添付文章（ファイル名を除く）の内容を変更・削除すること
;        ・次期バージョンから、ライセンスの○・△を×に変更すること
;        ・次期バージョンから、上記の作者と改変者全員の許可が那个ば、それ以外の変更も
;    ２：この口上が二次創作等の場合に、原作者が禁止を宣言している行為
;  ・改変者は自分の名前を削除することができ、それによりこの口上に関する一切の権利を放棄し、放棄できない権利について行使しないことを宣言したものとします。
;  ・この口上を使用したことによる損害等について、バリアント・口上の作者、改変者は一切の責任を負いません。

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/ライセンス.txt


code:
		;-------------------------------------------------
				更新履歴
  最新確認環境 ver4.881
  TW+催眠では未確認

  20/04/09 Ver 0.5
  作ってて煮詰まったので投下

  20/04/10 Ver 0.51
  大量の初歩的な記述ミス修正、大変申し訳ありません

  20/07/08 Ver 0.7
  タイプミス・フラグ管理ミス・バグ修正
  変Ｔ＆カジュアル炸鱼デー追加に合わせて既存口上轻轻地オーバー大堂
  		会話・Counter等で映姫様は一日中身悶えしてます
  小町と约会中遭遇口上書き直し。小町口上参考にいたしました。作者様ありがとうございます
  通常会話（主に冥界Map内）・雙重口交射精時追記
  雙重乳交・什麼也不做、道具系指令の一部、日常系指令の7割程度口上追加
  依頼.ERBを追加。途中書き、その上動作確認できてません。問題那个ばスレにお願いします

  20/09/27 Ver 0.8
  タイプミス・フラグ管理ミス・バグ修正
  呼び名の変更を導入
  		途中導入時にはUPDATE必須です
  		CSTR:80を使用、本体バージョンUP時に競合の可能性あり
  初回遭遇イベント・指令FIRSTTIMEの一部を変Ｔバージョンでも追記
  		テストプレイだと真っ先に逢いに行くから違和感に気づかなかった
  		271スレの>>367さん、指摘ありがとうございます
  日常系・性交系・派生系・道具系指令口上追加
  		妊娠願望仮対応、フレーバーイベント等
  		性交関連はＡしか増えてなかったり。映姫様はお尻が弱いから、しょうがないよね
  把柄握りを能動的に減らせるように変更
  		説法の後に折檻したり、胖次密輸はその場で説教接受とノーカンになったりする

  20/10/31 Ver 0.85
  タイプミス・フラグ管理ミス・バグ修正
  日記.ERBを追加
  		パッチ投下時にお試しで書いてたもの。ほぼ途中書き
  		内容も覚口上のSSに影響受けすぎだけど、お試し版ということで許してください
  イベント・日常系指令口上追記
  		被逆推時の口上追記。指令「抵抗」を全部反応するようにしたり、Counter口上追記したり
  		情事を見た・見られた反応、時止め終了時の反応に分岐を追加
  		AFTERTRAの一言に顔絵付きメッセージ導入。映姫様の顔絵差分OFFでメッセージのみになります

  20/12/04 Ver 0.851（差分）
  バグ修正
		273スレの>>899さん、274スレの>>960さん報告ありがとうございます
  日常系指令口上一点のみ追記(土産屋)
		贈り物に反応無いのは寂しいのでお試しに

  21/02/07 Ver 0.89
  タイプミス・フラグ管理ミス・バグ修正
  日記.ERBを仕様変更
  		日期/場所/天気等を页記述時に保存、閲覧時に反映
  独自イベント追記
  		朝口交に分岐色々と追加。朝诶嘿嘿導入
  依頼口上追記
  		映姫様の文通相手に覚・赫喀提亞を設定して手紙依頼＆固有依頼口上追記
  物陰指令を基本お断りに設定
  攻守交代を欲求不満度66％以上だと中止する仕様を追加
  日常系指令(会話)少々追記

  21/02/28  Ver 0.895
  タイプミス・フラグ管理ミス・バグ修正
  		277スレの>>299さん報告ありがとうございます
  初回挨拶回りの構文整理
  性交系指令(騎乗位肛交)追記
  派生系指令(六九式・小町との雙重口交・乳夾口交)追記
  Ａ絶頂/Ａ射精口上の追記
  部屋描写用関数を作り直し
  		272スレ>>607さんの構文アイデアお借りしました
  映姫様に縦割れ肛門を日記とイベントで追加
  		素質や诶嘿嘿口上としては未実装です

  21/06/08 Ver 0.9
  タイプミス・フラグ管理ミス・バグ修正
  		279スレの>>787さん報告ありがとうございます
  母乳口上の追加(Ｂ系愛撫・自慰・絶頂時)
  派生系指令(同時吸乳头・授乳PLAY)追加
  素股→挿入派生口上/足交→口交派生口上追記
  		極口上から素晴らしい発想お借りしてます。毎回すみません

  21/07/06 Ver 0.905（差分）
  タイプミス・フラグ管理ミス・バグ修正
  日常系指令口上追加(採集・演奏・陪同行動)
  角色データ改変に合わせて吃飯反応を変更

  21/08/11 Ver 0.95
  タイプミス・フラグ管理ミス・バグ修正
  性交系指令(正常位・後背位・騎乗位）追加
  派生系指令(挿入Ｇスポ責め・挿入子宮口玩弄)追加
  		内容薄めなのでＶ挿入中にフレーバー文本を表示する関数も追加
  既存イベント口上(吃飯カツアゲ・约会後贈り物・手を引かれる・同棲開始)追加
  ぱんつボッシュートイベント追記
  		合意で貰ったものだけを取り上げられた場合、詫びぱんつを要求できるように
  映姫様の足交苦手具合をパワーUP
  		たまに指令自体無視して咥えてくるように
  ステータス「角色介绍」の文章の追記
  		早苗口上を参考にしました。独自イベントヒントを匂わせたりしてます

  21/09/02 Ver 0.96
  タイプミス・フラグ管理ミス・バグ修正
  角色データに固有料理を追加
  		辣*6の人を選ぶ料理
  resourcesにメシの顔を追加
		辣*3以上の料理を食べる/固有製作料理とお目々キラキラになります
  愛撫系指令(張開陰唇・張開肛門)追記
  		单薄的本でよく見る同時にくぱぁをやらせたくなった
  		複数诶嘿嘿時、擬似的にダブル指令化します。EXTRASOURCE使って相方にもソース入ります
  同棲時、条件を満たすと祈願指令から朝の起こし方を指定できるように
  		映姫様が仕事休みで心情不快でなければ、しゃぶって起こしてくれます

  21/10/17 Ver 0.965
  タイプミス・フラグ管理ミス・バグ修正
  肛用振動棒挿入约会イベント追加
  		映姫様が恋慕+縦割れ肛門で低確率/[尻穴狂]取得で毎回、邀请去约会と提案されます
  		约会中/移動中でも挿れっぱ無。日常指令も稍微だけ専用の対応あり
  		约会終了/情人旅館・待客室诶嘿嘿で解除。発生後に祈願でイベント自体を抑制出来ます
  日記口上追記
  		えっちな事中心。既存データで発生タイミングずれるのは仕様です
  イベント口上(デイリーイベント・帰宅時)追記
  日常系口上(约会系口上)修正/追記

  22/03/15 Ver 0.99
  タイプミス・フラグ管理ミス・バグ修正
  口交のアニメーション追加
  		体は素材からそのまま、服装差分もありませんがそれでもよければ
  		UPDATEからON/OFF可、射精はごっくん、だらだらこぼす、顔射に対応
  仕事中の映姫様が口交抜きしてくれる会話を追記
  		発情or媚薬or欲求不満度85％以上で勝手に進行
  		単なる会話の選択肢ですが、一応出すまで抜いてくれるのでイベントっぽくはなってます
  性交系口上(対面座位・背面座位、Ａ対面座位・Ａ背面座位）追記
  		EXTRASOURCE使った微妙なこだわりと分岐が入ってます
  		通常座位は肛門の方の流用で単語ちょろっと入れ替えた程度
  日常系口上(道具)追記
  		誰に何を使ったかTFLAGで渡せるように本体側ERBも追記してます
  陥落がついている場合EXTRASOURCE使ってＡ系指令の减少ソースを軽減
  		人目がない＆心情不快でなければさらに軽減。コピペを並べただけで詳しい影響は計算してません
  你賢者タイム中の反応を追加

  22/04/24 Ver 0.A
  タイプミス・フラグ管理ミス・バグ修正
  口交アニメーションの追加と修正
  		「手に吐き出し」「エンドレス」パターン付け足し
  映姫様のおしり画像追加
  		おしりです
  		最初は汎用性持たせるつもりだったけど、うまくまとめられませんでした
  映姫様にうさぎ衣装追加
 		フリー素材の兔女郎衣装拾えなかったので代替絵を追加
  固有Counter追加
  		せっかく作ってもらった新機能なのでまずはお試しにひとつ、恋慕+挿入中限定なので発生率低め
  日常系口上(白色情人節)追記
  		一部道具未実装っぽいので口上も中途半端
  おまけフォルダの追加

  22/10/10 Ver 1.0
  タイプミス・フラグ管理ミス・バグ修正
  UPDATE時に素質[不怕痛]を付与＆口上色選択機能を追加
  映姫様の画像追加
 		ぱんつのバリエーション
  		ぼて玉兎服 - Stable diffusion任せでかなり適当です
  		あへ顔 - 白蓮別立絵の構文をそのまま流用、Ａ絶頂かつ三重絶頂以上で表示されます
  		後光 - 地獄拉麺関連の顔絵に付きます
  口上新規追記
  		えっちなやつ：跳蛋/喝套内精液/被舐肛門/打屁股
  		えっちじゃないやつ：捕虫/斗虫/育児イベント
  口上追記
 		釣魚/土産屋/採集/等待 - 肛用振動棒约会時の反応
  		午睡 - お午睡口交
  		会話 - 恋慕で和姦後に诶嘿嘿内容に応じた反応を返す/他分岐もほんのり追加
  曇らせモード
  		無自覚妊娠発覚後、好心情にならなくなる/孕まなくなる/一部指令の反応変わります
  		フラグ管理面倒なので復旧手段やON/OFFはつけてません
  		败者・食尘でリセットされます

  22/12/31 Ver 1.1
  タイプミス・フラグ管理ミス・バグ修正
  リソース追加と整理
  		水手服追加
  		顔絵まばたきアニメ実装
  		立絵を@COMPOSE_SPRITE生成に変更してファイル容量削減
  炮友契約口上追加
  		意図的に堅くしてありますが肛門攻略でやわくなります
  口上追記
  		技能レベルUP/兒童自由行動/日記

  23/01/02 Ver 1.11
  		変Ｔを表示できない重篤なバグ修正

		;-------------------------------------------------
				今後の予定
 (22/10更新)
・とりあえず一区切り
  バグ取りor本体新規イベント追加orまたしょうもないこと思いついたら更新予定

以下ネタバレ

  ※地の文改変
・通常時の接吻を止めたりかわしたりする描写がついてる。人目があると回避率がUP
  「人目がある」=TARGETが二人以上or路人がいるor路人湧き指定の場所にいること
  SOURCEや経験は変動しないただのフレーバー
  ※説教
  内裤走私者バレ、性騷擾指令失敗時確率、非恋慕で通常(诶嘿嘿でない)時人目があってＶＡ性騷擾指令使用で
  随机長文を垂れ流す。信賴度わずかにプラス。２・３回繰り返すと悔悟棒で張り倒される。
  ペナルティ撒き散らしても鬱陶しいだけなので、頻度は少なく数値で减少されるのは気力・体力のみ
  ※説法
  「泡茶」通常成功時に一日一回話す。好感度、信賴度に少しプラス

 (20/09追記)
・恋慕時会話で二人きりの時限定の呼び名変更設定。敬称も取れる。変更会話見た後は祈願から変更可
・危険日生Ｈ許可・子作り祈願・恋慕会話時信賴度1500以上で[妊娠願望]付与。被逆推、中出し時の台詞が一部変わる程度
・映姫様の把柄握りを消せる。茶→説法の後、把柄握りあると選択肢。悔悟棒で一撃喰らって消去。威力は最大で現在体力を全部持ってくぐらい
・恋慕・信賴度2000以上・媚薬在庫2以上・被逆推が成立する場所で媚薬入り茶出すと映姫様から媚薬を積極的に飲むフレーバーイベント

（21/02追記）
  ※仕事設定
・出勤日は偶数日。場所は是非曲直庁法廷(612)。時間は9時～19時
・ 9～12時 = 裁判		沒法幫忙
・12～13時 = 昼休み		ステータス上は仕事扱い。沒法幫忙
・13～17時 = 事務仕事  	教養LV4と信賴度300以上で手伝える、早くは終わらない。工资は最低レベル
・17～19時 = 書類整理	信賴度300以上で手伝える、手伝うと早く終わる。無給
  『酒をふるまう』『邀请去阴暗处』を必ず拒否する

○これ以降の記述は恋慕＆反発刻印0＆心情普通以上＆TARGET映姫様のみ＆仕事休み＆not変Ｔが基本の前提条件

  ※朝口交＆朝诶嘿嘿
・映姫様と同棲中で在室/精液中毒2以上/6:00～8:50に你が起床で朝口交が発生
  確率は欲求不満度と精液中毒に依存。[濃厚精液][妊娠願望]、発射箇所、妊娠中の性交制限期間で地の文が分岐
・朝口交条件+精液中毒5以上/中出しOK/妊娠願望&濃厚精液&危険日or欲求不満度33％以上or前日同室自慰で朝诶嘿嘿が発生
  確率は朝口交準拠。起床挨拶後に直接被逆推モードへ移行。口交→Ｖ/Ａ騎乗位までCounter行動を固定

（21/06追記）
  ※素股から挿入
  攻守交代と該当指令条件クリア/TARGET映姫様のみ/体力・気力が600・100以上/そのターンでMASTER射精しないことが前提
・映姫様が妊娠願望所持/危険日or危険日前日/口服避孕薬不使用/潤滑LV5以上で素股指令中に被逆推騎乗位に変化
・映姫様のＡ感覚5以上/积攒度25%以上/欲情LV10以上で素股指令中に被逆推Ａ騎乗位に変化

（22/10追記）
  ※縦割れ肛門
  Ａ性交経験100以上/Ａ感覚5以上で付与。口上独自イベントのトリガーになる

  ※肛用振動棒挿入约会
  縦割れ肛門/露出癖6以上/低確率or尻穴狂取得後に约会すると持ち礦物碎片れる
  日常・约会中指令に専用分岐あり。祈願から発生OFF

  ※疑似ダブル指令化
・張開陰唇 - 3P中は派生表示に変更。相方が小町で恋慕の場合はさらに別派生に移行
・張開肛門 - 3P中は派生表示に変更
・被舐肛門 - 3P中別角色に挿入or口交→TARGET変更指令選択で派生表示
・接吻 - 3P中別角色に接吻→TARGET変更指令選択で派生表示

  ※高精液中毒時、映姫様が勝手に咥えてくる指令
・足交/喝套内精液 - 確率で口交指令扱いになる
・午睡 - 互いに気力体力７割以上、情緒上がった状態で午睡とこっそり口交を始める
・会話/幫忙干活 - 映姫様の仕事日で午後の休憩以降、発情or媚薬服用or积攒度85%以上で息抜き口交を始める

  ※物陰指令条件
  仕事時間外/他角色がいない(TARGETが一人だけ)/积攒度85％以上/発情＆烂醉中
  口上ギミックと相性最悪、バグも多いのでほぼ発動不会うに変更

  ※うれション
  Ａ感覚10以上、Ａ挿入＋振動棒挿入＋跳蛋＋你射精＋三重絶頂以上
  条件揃うと選択肢→多重絶頂の派生を表示
  映姫様が残り体力に係わらずダウンする
  欲求不満で離してくれない時でもすぐ诶嘿嘿を終わらせられます

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/更新履歴等.txt


code:
;==================================================
;自動喘息声口上（まぐろ）
;口上どうしても思い浮かばないのでAUTO_AEGI改変関数
;部位・感度等無視して矛盾しない喘ぎ声をつくるのを目標に
@K30_GASPING_MAGURO
;--------------------------------------------------
#DIM 状況
#DIM 心神喪失
#DIM ひどい
#DIM TEMP
#DIM TEMP2
心神喪失 = 0
ひどい = 0
TEMP = 0
TEMP2 = 0
SIF !CFLAG:30:诶嘿嘿
	RETURN 0
;ノーマルまぐろ
状況 = 0
;炮友
SIF TALENT:愛欲 || TALENT:炮友 || TALENT:風騷
	状況 = 4
;烂醉まぐろ
IF TCVAR:烂醉
	状況 = 5
	心神喪失 =1
ENDIF
;睡眠まぐろ
IF CFLAG:睡眠
	状況 = 9
	心神喪失 =1
ENDIF
;接吻時
SIF GROUPMATCH(SELECTCOM, 19, 20)
	状況 = 1
;口交時
SIF GROUPMATCH(SELECTCOM, 81, 88, 89, 140, 501, 505, 508, 509, 512)
	状況 = 2
;個別処理時(薬
SIF GROUPMATCH(SELECTCOM, 50, 51, 180, 181, 182, 192, 490)
	状況 = 6
;SM系(SOURCE入らない)時
SIF GROUPMATCH(SELECTCOM, 100, 104, 105, 107)
	状況 = 7
;奉仕(ちゅぱ音無し)時
SIF GROUPMATCH(SELECTCOM, 80, 82, 83, 84, 85, 510, 511)
	状況 = 8
;Ａ関連
SIF GROUPMATCH(SELECTCOM, 4, 5, 13, 45, 62, 63, 66, 69, 70, 71, 74, 75, 514, 515)
	状況 = 3
PRINTFORM 「
SIF TCVAR:强行
	PRINTFORM %TEXTR("やだ/いや/だめ/やめて")%っ！　…
;炮友、心神喪失、薬、ＳＭは必ず最初に一言
IF (RAND:2 == 0 || GROUPMATCH(状況, 4, 6, 7) || 心神喪失) && !TCVAR:强行
	CALL K30_GASPING_RAND(状況)
	;ＳＭは一言で処理終了
	SIF 状況 == 7
		RETURN 1
	TEMP = 1
ENDIF
;行中の処理
REPEAT 5 + RAND:2
	SELECTCASE 状況
	;接吻・口交はちゅぱ音
	;心神喪失・强行時は頻度半分
		CASE 1, 2
			IF (RAND:2 == 1 && !(心神喪失 || TCVAR:强行)) || (RAND:4 == 1 && (心神喪失 || TCVAR:强行))
				IF 状況 == 1
					PRINTFORM …%TEXTR("嗯唔/呸咯/哈姆/啾噜/唔姆")%
				ELSE
					PRINTFORM …%TEXTR("唔噗/啾啵/啾噜/滋噜/啾噗")%
				ENDIF
				SIF PALAM:30:欲情 > PALAMLV:7 && !TCVAR:强行 && RAND:3 != 1
					PRINTFORM ♥
			ELSE
				PRINT …
			ENDIF
	;通常は拒否っぽい声	、準強制わいせつは寝言っぽいのを、炮友・恋人同伴は肯定をそれぞれ2回まで
		CASE 0, 4, 5, 9
			IF TEMP2 < 3 && !TCVAR:强行
				IF RAND:3 == 1
					TEMP2 ++
					IF TCVAR:烂醉
						PRINTFORM ……%TEXTR("唔呼呼/唔嗯～/啊唔/唔唔/咿咕")%
					ELSEIF CFLAG:睡眠
						PRINTFORM ……%TEXTR("呼喵/啊呼/唔/啊嗯/嗯唔")%
					ELSEIF 状況 == 4 || TALENT:恋慕
						PRINTFORM ……%TEXTR("好舒服/那里/啊啊/好棒/啊嗯/呀唔")%
						IF (PALAM:30:欲情 > PALAMLV:3 && RAND:3 == 1) || (PALAM:30:欲情 > PALAMLV:5 && RAND:3 != 1)
							PRINTFORM っ
						ENDIF
						IF PALAM:30:欲情 > PALAMLV:6
							SIF RAND:2 == 1
								CALL HPH_PRINT(@"HPH　")
						ELSEIF PALAM:30:欲情 > PALAMLV:3 && RAND:3 != 1
							PRINTFORM ♥
						ENDIF
					ELSE
						PRINTFORM ……%TEXTR("这样不行/不行了/感觉好奇怪/感觉有什么……/不要/要变奇怪了")%
						IF (PALAM:30:欲情 > PALAMLV:2 && RAND:3 == 1) || PALAM:30:欲情 > PALAMLV:6
							PRINTFORM っ
						ENDIF
						IF PALAM:30:欲情 > PALAMLV:9
							SIF RAND:4 == 1
								CALL HPH_PRINT(@"HPH　")
						ELSEIF PALAM:30:欲情 > PALAMLV:5 && RAND:3 == 1
							PRINTFORM ♥
						ENDIF
					ENDIF
				ELSE
					PRINT …
				ENDIF
			ELSE
				PRINT …
			ENDIF
	;他は無言
		CASEELSE
			PRINT …
	ENDSELECT
REND
IF TEMP == 0
	;强行・薬時は語尾に一言だけ、後はどっちかに一言だけ TCVAR:30:386 强行口上反映フラグ
	IF TCVAR:强行
		TCVAR:30:386 = 1
	;强行時に避妊
		SIF (SELECTCOM == 51 || TEQUIP:PLAYER:避孕套) && TCVAR:30:不耐烦 == 1
			PRINTFORM %TEXTR("你想干什么…？/根本搞不懂你想怎样…/别開玩笑了…/你到底在想什么呢…")%
		PRINTFORM %TEXTR("…够了…住手/…太过分了/…已经够了吧/…明明这么信任着你/…给我适可而止/…不要碰我")%
	ELSE
		CALL K30_GASPING_RAND(状況)
	ENDIF
ENDIF
PRINTFORMW 」
PRINTFORML
;MASTER射精直前
IF NOWEX:MASTER:11 && !心神喪失
	;强行避妊無しで中出し
	IF TCVAR:强行 && !TCVAR:30:口服避孕薬 && TEQUIP:PLAYER:避孕套 == 0 && TCVAR:PLAYER:2 == 1
		;閻魔様の罰は準備中
		SETBIT CFLAG:1800, 0
		ひどい ++
		PRINTDATA
			DATAFORM 「等一下…拜托了……
			DATAFORM 「不要,不要啊……
			DATAFORM 「住手！！拔出来吧！！　……
			DATAFORM 「里面是！里面不行！！　……
		ENDDATA
		SELECTCASE ひどい
			CASE 1
				PRINTFORM %TEXTR("不要再…了/这样做…不要这样/真的…不要这样")%………
			CASEELSE
				PRINTFORM %TEXTR("已经不…饶过我吧…/…真的是…真讨厌呀…/拜托了…别这样…")%………
		ENDSELECT
		PRINTFORML %TEXTR("不要啊啊——/咿咦呀————！！/不行啊啊———！！/啊啊啊啊——！")%！」
	ELSEIF 状況 == 2
		SIF EXP:30:精飲経験 < 20 && !TALENT:恋慕
			PRINTFORMW （%TEXTR("等会就吐出来…/真不想咽下去啊…/射在外面啊…")%）
	ENDIF
;絶頂直前
ELSEIF (NOWEX:Ｃ絶頂 || NOWEX:Ｖ絶頂 || NOWEX:Ａ絶頂 || NOWEX:Ｂ絶頂 ) && !心神喪失 && !GROUPMATCH(状況, 1, 2, 8)
	PRINTFORMDW 映姫为了忍住突如其来的绝顶感,%TEXTR("身体颤抖了起来/不停地摇着头/拼命捂住了嘴巴/紧紧地搂住了自己的胸口/紧紧闭上了眼睛")%……
	;炮友にはなんとなく悔し(ryな煽りを入れる
	IF 状況 == 4
		PRINTDATADW
			DATAFORM 然而,早已沉溺于肉欲的身体却轻易的就到达了高潮……
			DATAFORM 但是,早已在身体上铭记的那份雌性的天性,使得她的抵抗毫无任何作用……
			DATAFORM 无法抗拒的快感像是要嘲笑这份毫无意义的抵抗似的,从映姬的内心涌了出来……
			DATAFORM 但是,在这絶頂的时刻,映姬已经被更加甜美的快感所迷住了……
			DATAFORM 但是这也只不过只是一时的挣扎,反而,因为一直压抑而变得膨胀的快感向映姬袭了过来……
		ENDDATA
	ENDIF
ENDIF
RETURN 1
;==================================================
;まぐろ喘ぎ表示
@K30_GASPING_RAND(ARG)
;--------------------------------------------------
#DIM TEMP2
TEMP2 = ARG
SELECTCASE TEMP2
;ノーマル時は肯定否定半々
	CASE 0
		PRINTFORM %TEXTR("啊啊/啊嗯/噫唔/不要/不行了")%
		SIF PALAM:30:欲情 > PALAMLV:8 && RAND:2 == 1
			PRINTFORM っ
		SIF PALAM:30:欲情 > PALAMLV:5 && RAND:2 == 1
			PRINTFORM ♥
;接吻・口交はちゅぱ音
	CASE 1
		PRINTFORM %TEXTR("啾呋/叻咯/哈姆/啾/唔姆")%
		SIF PALAM:30:欲情 > PALAMLV:7 && RAND:2 == 1
			PRINTFORM ♥
	CASE 2
		PRINTFORM %TEXTR("唔噗/啾啵/啾噜/滋噜/啾噗")%
		SIF PALAM:30:欲情 > PALAMLV:7 && RAND:2 == 1
			PRINTFORM ♥
;Ａ弱点なのでハートマシマシ
	CASE 3
		PRINTFORM %TEXTR("啊嗯/不行/那里是/啊哈啊/不要啊/屁股")%
		IF PALAM:30:欲情 > PALAMLV:7 && RAND:2 == 1
			CALL HPH_PRINT(@"HPH　")
			SIF PALAM:30:欲情 > PALAMLV:9
				CALL HPH_PRINT(@"HPH　")
		ELSEIF PALAM:30:欲情 > PALAMLV:4 && RAND:2 == 1
			PRINTFORM ♥
		ENDIF
;炮友、烂醉時は肯定のみ、ハートマシマシ
	CASE 4, 5
		PRINTFORM %TEXTR("呀啊/啊唔/噫啊/唔啊/噫唔/唔唔/呀唔/啊啊/啊哈啊")%
		SIF PALAM:30:欲情 > PALAMLV:4 && !RAND:3 == 1
			PRINTFORM っ
		SIF PALAM:30:欲情 > PALAMLV:7 && RAND:2 == 1
			CALL HPH_PRINT(@"HPH　")
		SIF PALAM:30:欲情 > PALAMLV:9
			CALL HPH_PRINT(@"HPH　")
;薬時＠こことか個別の方がどう考えてもいいよね。また今度やる
	CASE 6
		IF TCVAR:烂醉 || CFLAG:睡眠
		ELSE
			SELECTCASE SELECTCOM
				CASE 50, 51
					IF TCVAR:强行
					ELSE
						PRINTFORM %TEXTR("谢谢/安心了/拜托了")%
					ENDIF
				CASEELSE
					PRINTFORM %TEXTR("你要干什么/不要用奇怪的东西/有什么…奇…怪的…")%
			ENDSELECT
		ENDIF
;ＳＭ時＠ここも個別だ。また今度
	CASE 7
		;打屁股
		IF SELECTCOM == 100
			IF TCVAR:烂醉
				PRINTFORML %TEXTR("好疼……/不～要～/呀唔…/住…手…")%……」
			ELSE
				PRINTFORML %TEXTR("好痛/讨厌/痛")%！　……%TEXTR("你在干什么？唔！？/求你了…不要啊/不要…别打我了")%………」
			ENDIF
		;それ以外
		ELSE
			IF TCVAR:烂醉
				PRINTFORML %TEXTR("んんっ/ん～/う～ん")%……」
			ELSE
				PRINTFORML %TEXTR("好怕…/你要做什么/不要做…那么可怕的事")%………」
			ENDIF
		ENDIF
;奉仕(ちゅぱ音無し)時
	CASE 8
		IF TCVAR:烂醉
			PRINTFORM %TEXTR("嗯～？/什～么～？/硬…的？　/姆噜…姆噜？")%
		ELSEIF CFLAG:睡眠
			PRINTFORM %TEXTR("んんっ/んー？　/うーん/んっんんっ")%
		ELSE
			PRINTDATA
				DATAFORM 这样就可以了么？
				DATAFORM 这样就满足了么？
				DATAFORM 这样做就行了么？
				DATAFORM 像这样动就可以了么？
				DATAFORM 是这种感觉么？
			ENDDATA
		ENDIF
ENDSELECT
RETURN 0
;==================================================
;朝口交＆朝诶嘿嘿
;例え構文が汚くても地の文と合わなくても好きなシチュなので書く
;好きなシチュなのでどんどんバリエーションが増える。
;--------------------------------------------------
@K30_CHECK_MORNING_UFUFU
#DIM S_VAL
#DIM PREG
#DIM BUNKI
#DIM CUM
#DIM WISH
#DIMS 台詞
#DIMS 表情
LOCAL = 0
WISH = GETBIT(CFLAG:1606, 0)
;調教者が男人か扶她じゃないとダメ
SIF !(TALENT:PLAYER:2 & 2)
	RETURN 1
;被逆推解禁後じゃないとダメ
SIF CFLAG:30:1801 == 1 && !STRCOUNT(CSTR:30:0, "推倒")
	RETURN 1
;映姫様の仕事時間前じゃないとダメ
SIF TIME > 529
	RETURN 1
;反発刻印持ち、ブチギレはダメ
SIF MARK:30:反発刻印 >= 1  || CFLAG:318 == 1
	RETURN 1
;(念の為)完全に二人きりじゃないとダメ
SIF K30_BE_SEEN()
	RETURN 1
;恋慕じゃないとダメ
SIF !TALENT:恋慕
	RETURN 1
;诶嘿嘿解禁じゃないとダメ
SIF !GETBIT(CFLAG:既成事實, 1)
	RETURN 1
;無自覚孕ませで傷付いていたらダメ
SIF CFLAG:1805
	RETURN 1
;ある程度経験ないとダメ
SIF ABL:精液中毒 < 2
	RETURN 1
;妊活条件揃ってたら必ずねだりにくる
IF (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && ESTRUS_CYCLE(30) >= 100 && TALENT:MASTER:濃厚精液
	S_VAL = 1000
	GOTO BEG
ENDIF
;前日に同室時自慰→仕事休みならGOサイン。仕事日なら判定無終了
IF CFLAG:1603 == 3
	IF DAY % 2 == 1
		S_VAL = 999
		GOTO BEG
	ELSE
		RETURN
	ENDIF
ENDIF
;妊娠中の性交制限期間→仕事休みで不高興でなければ必ず実行。仕事日なら判定無終了
PREG = TALENT:妊娠 && !INRANGE(CFLAG:妊娠経過日数, 10, 25)
IF PREG
	IF DAY % 2 == 1 && TALENT:心情 > -1
		GOTO SUCK
	ELSE
		RETURN
	ENDIF
ENDIF
;积攒度と精液中毒を見る
S_VAL = CFLAG:30:积攒度 / 50 + MIN(ABL:30:精液中毒, 25) * 2 / 3
;积攒度が30%ないと率減少
SIF CFLAG:30:积攒度 < 300
	S_VAL -= (30 - CFLAG:30:积攒度 / 10)
;こんな素質付けてたら誇張にBOUNS
SIF TALENT:30:精愛味覚
	S_VAL += 33
;溜まってると嗅ぎつけてくる
SIF TALENT:MASTER:濃厚精液
	S_VAL += 20
;裁判の日は自重
SIF DAY % 2 == 0
	S_VAL -= 30
;最低保証3%
SIF S_VAL < 2
	S_VAL = 2
;祈願から依頼中
SIF WISH && DAY % 2 == 1 && TALENT:心情 != -1
	GOTO BEG
SIF RAND:100 > S_VAL
	RETURN
$BEG
;ここまで抜けたら実行。不高興を解消
TALENT:心情 = TALENT:心情 >= 0 ? 1 # 0
;目覚ましお願いしていて、仕事日なのに素の確率で通ったら分岐
SIF WISH && DAY % 2 == 0
	WISH = 2
TCVAR:30:372 = 0
;朝诶嘿嘿の条件 = 仕事お休み、中出しOKな日、把柄が無し、精液中毒5以上、ある程度溜まってるor妊活日orGOサインが出てる
;ＹＭのお目覚め騎乗位とかいいよね。でもＴＷだとこの後に服装処理入るから直入れはできない
IF DAY % 2 == 1 && (CFLAG:30:积攒度 > 500 || GROUPMATCH(S_VAL, 1000, 999)) && !CFLAG:30:掌握把柄 && ABL:30:精液中毒 > 4 && !K30_CREAMPIE()
	LOCAL = CFLAG:积攒度 / 10
	;妊活最適日(危険日周辺かつ濃厚精液)
	IF S_VAL == 1000
		BUNKI = 1
	;GOサイン(前日同部屋自慰してた)
	ELSEIF S_VAL == 999
		BUNKI = 2
	;妊娠願望無しor祈願中
	ELSEIF !(TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4))
		BUNKI = 3
		SIF WISH
			BUNKI = 6
	;妊娠願望有りで危険日周辺なら確率
	ELSEIF ESTRUS_CYCLE(30) >= 100 && S_VAL >= RAND:(MIN(100, 150 - LOCAL))
		BUNKI = 4
	;妊娠願望のみなら高確率ではじく
	ELSEIF S_VAL >= RAND:(MIN(150, 200 - LOCAL))
		BUNKI = 5
	ELSE
		GOTO SUCK
	ENDIF
	;関数修飾語・次回Counter達成値の為パラメータをかさ上げ
	BASE:MASTER:勃起 = 1500
	PALAM:潤滑 = PALAMLV:4
	PALAM:欲情 = PALAMLV:5
	PRINTFORMDW 胯间莫名地发痒。这样实在睡不着…
	PRINTFORMW
	PRINTFORMDL 睁開眼睛，映姬不知为何骑在%CALLNAME:MASTER%身上
	PRINTFORMDW 注意到%CALLNAME:MASTER%苏醒了、对着微笑了
	PRINTFORMD ……既然如此，为什么映姬会
	PRINTDATADW LOCAL
		DATAFORM 对%EXPR_VAR("CROTCH")%晨勃的貂棒狠狠摩擦
		DATAFORM 隔着裤子捋着高高耸立的%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%
	ENDDATA
	SIF LOCAL
		PRINTFORMDW 而且另一只手还在不停地玩弄自己的%EXPR_VAR("CROTCH")%…
	PRINTFORML 「%K30_GREETING_EIKI()%、%K30_C_NAME(MASTER)%」
	PRINTFORML 「…在做什么？」
	PRINTFORML 「呼呼~、正如你所看到的……这是接下来要做的事情的准备哦…♥」
	PRINTFORMDW 向我微笑的映姬眼中已经摇曳着情欲的火焰…
	PRINTFORML
	IF !LOCAL
		PRINTFORMDW 映姫は%CALLNAME:MASTER%的耳边，一边吐出香甜的热息一边低语
	ELSE
		PRINTFORMDW 映姬的素手暂停抚捋%TEXTR("阴茎/陰茎/肉棒/鸡巴/剛直/男根/怒張")%，同时伴随着粗重的雌香吐息对着%CALLNAME:MASTER%喃喃低语
	ENDIF
	SELECTCASE BUNKI
		CASE 1
			PRINTFORML 「……一直在做计划，忍耐欲望和你做」
			PRINTFORML 「那个忍耐到今天就结束了——不对，我再也不能忍耐了…」
			PRINTFORMW 「我们的宝宝……从现在開始，现在马上……不做吗♥」
		CASE 2
			PRINTFORML 「……我知道。昨天晚上…你默默地看着的事」
			PRINTFORML 「真的很过分的人…看着自我安慰的我開心吗？」
			PRINTFORML 「我一点也不開心…嗯，虽然积攒了很多」
			PRINTFORMW 「所以从现在開始，我要摆脱我的抑郁。%K30_C_NAME(MASTER)%…我不会再逃了♥」
		CASE 3
			PRINTFORML 「……吶，居然在随时都触手可及的距离里…对我若即若离？」
			PRINTFORML 「过分的人……不管你还有其他的」
			PRINTFORMW 「对我来说是只有%K30_C_NAME(MASTER)%…你明白吗♥」
		CASE 4
			PRINTFORML 「……从月亮的东西计算的话，我……今天是正好的一天」
			PRINTFORML 「这个阎魔的身体…生孩子\@ TALENT:妊娠願望 ? 老实说是很难成功的 # 竟然能生好几个、如果没有发生奇迹，那是不可能的 \@也许，也许吧」
			PRINTFORML 「尽管如此，如果你能全心全意地爱我、如果能给我注入很多的话…」
			PRINTFORMW 「难道，你不这么想吗呼呼…♥」
		CASE 5
			PRINTFORML 「……对不起。如果是真的，考虑到月经，我应该忍耐」
			PRINTFORML 「但是，已经……好像不行了。身体很难受，已经没有办法了」
			PRINTFORMW 「我的心，身体…重要的地方，都想要你…无论如何都想要…♥」
		CASE 6
			PRINTFORML 「虽然很喜欢用嘴叫醒你…」
			PRINTFORML 「今天的我…仅此就很不够了」
			PRINTFORML 「而且你也，期待着会变成这样吧…」
			PRINTFORMW 「呵呵…是吧♥」
	ENDSELECT
	IF !LOCAL
		PRINTFORMDL 在低语的间隙，映姬的腰也在不停地淫猥着。
		PRINTFORMDL %SLIT(30, 1)%接下来是%TEXTR("淫汁/淫蜜/愛液/")%が溢出来，在互相的衣服上产生了污渍…
	ELSE
		PRINTFORMDL 细语的间隙映姬也是只有玩弄%EXPR_VAR("VULVA")%的手一点也不能休息
		PRINTFORMDL 彼此的内衣已经抢先用%TEXTR("淫汁/淫蜜/愛液/")%留下羞耻的污渍…
	ENDIF
	PRINTFORMW
	PRINTFORML 「今天工作也休息。所以有很多时间…」
	PRINTFORML 「无论做多少次…做什么都没关系的日子。我不会让任何人打扰的」
	PRINTFORMW 「就这样，让我喜欢你吧…♥」
	PRINTFORMDL 映姬的瞳孔中浮现出心形标记，迫近了%CALLNAME:MASTER%
	PRINTFORMDW 这已经跑不掉啦。看来只能照閻王大人说的去做了…
	;诶嘿嘿に入る処理。パラメータに木屐を履かせ宥めて終了が出来ないようにする
	CALLF FIRSTTIME("朝から")
	CFLAG:30:积攒度 = MAX(CFLAG:30:积攒度, 800)
	CFLAG:MASTER:诶嘿嘿 = 2
	CFLAG:30:诶嘿嘿 = 2
	TCVAR:30:378 = 1
	UFUFU_START_TIME = TIME
	UFUFU_START_DAY = DAY
	BASE:30:情緒 = 1200
	BASE:30:理性 = 100
	CFLAG:30:同行 = 60
	CFLAG:MASTER:同行 = 60
	CFLAG:30:延迟 = 0
	CFLAG:30:同室 = 1
	;地の文とつながり考慮して次回行動を固定
	TCVAR:30:次回Counter = 51
	;朝诶嘿嘿開始のフラグ
	TCVAR:30:363 = -2
	;被逆推ている時に立つフラグ
	TCVAR:30:376 = 2
	RETURN 1
ENDIF
$SUCK
;妊娠願望あり=我慢する
IF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
	IF S_VAL == 1000
		PRINTFORMDL 胯间感到奇怪的压迫感%CALLNAME:MASTER%醒了
		PRINTFORMDW …映姬把脸埋在胯下，轻轻地闻着味道
		PRINTFORML 「你也一样…在禁欲呢…」
		PRINTFORML 「呵呵，这么有精神……光是这个味道，我…♥」
		PRINTFORMDW 閻魔大人这样的人，到底在干什么呢…
		PRINTFORML 「做什么…不是很好吗，就这样」
		PRINTFORML 「我也是被‘委托’着一直忍耐着？」
		PRINTFORML 「但是……今天也结束了呢…♥」
		PRINTFORMDW 映姬看起来很開心，但却露出了淫乱的笑容
		PRINTFORML 「今天的我…\@ ESTRUS_CYCLE(30) == 150 ? 可是非常期待 # 大概可以吧 \@日、ですよ」
		IF DAY % 2 == 1
			PRINTFORMW 「……我会等你的」
		ELSE
			PRINTFORMW 「……工作结束，后」
		ENDIF
	ELSE
		PRINTFORMDL %CALLNAME:MASTER%的裤裆被揉得七零八落的感觉吵醒了
		PRINTFORMDL …映姬正脸继续着猥亵的按摩
		PRINTFORMDW 閻魔大人这样的人，到底在干什么呢…
		PRINTFORML 「做什么…变得精神起来，咒语…？」
		PRINTFORML 「因为想要结实的宝宝，看……这里不健康的话？」
		PRINTFORMDW …映姬一本正经的笑话很难判断，很尴尬。
		IF TALENT:MASTER:濃厚精液
			PRINTFORML 「如果出错了就麻烦了，今天就到这里吧」
			SELECTCASE  CFLAG:900
				CASE 2, 3, 4
					PRINTFORML 「再等几天就不行了」
					PRINTFORMDW 彼此能忍耐到那种程度吗…
				CASE 5, 6
					PRINTFORML 「…此外，再忍耐一下」
					PRINTFORMDW 彼此都很能忍耐…
				CASE 1, 9, 10
					PRINTFORMW 「嗯，算起来……啊，哎呀？」
					PRINTFORML 「时间相当空啊…」
					PRINTFORMW 「……怎么办呢，能忍耐吗？」
					PRINTFORMW 「………………」
			ENDSELECT
		ELSE
			PRINTFORML 「我现在就这样慰劳你…」
			PRINTFORMW 「配合我的月经，还请继续忍耐一下」
		ENDIF
	ENDIF
	;仕事の日は少し自重するように
	IF DAY % 2 == 0
		LOCAL = 540 - TIME:0
		SIF LOCAL < 30
			LOCAL = 30
		CFLAG:30:延迟 = LOCAL
	ENDIF
	PRINTFORML
	PRINTFORMW 「啊…必须好好打招呼」
	PRINTFORML 「%K30_GREETING_EIKI()%、%K30_C_NAME(MASTER)%」
	PRINTFORMW 「今天一天也努力行善吧」
	TCVAR:30:363 = -1
	RETURN 1
ENDIF
;TINKO関数修飾語の為かさ上げ
BASE:MASTER:勃起 = MAXBASE:MASTER:勃起
;口交アニメ制御
TCVAR:30:357 = 2
CALLF FIRSTTIME("朝から")
PRINTDATADW
	DATAFORM 一股一股的快感突然向还在梦中的%CALLNAME:MASTER%袭来……
	DATAFORM 总觉得股间有种暖暖的感觉…但好像又和梦遗不太一样……
	DATAFORM 感觉从腰间传来了哔恰哔恰的水声……
ENDDATA
CALL K30_BLOW_JOB_ANIME(0)
IF TALENT:30:精愛味覚 && TALENT:MASTER:濃厚精液 && !PREG && !WISH && RAND:2 == 1
	PRINTFORMDL 抬头一看，映姬把脸埋在%CALLNAME:MASTER%的胯间热情地口交着
	PRINTFORMDW 看来快结束了,映姬的嘴唇和舌头激烈地缠绕在肉棒上……
	PRINTFORMDL 马上就到极限的%CALLNAME:MASTER%向等着饮精的映姬射出了%EXPR_VAR("SPERM")%
	CALL K30_BLOW_JOB_ANIME(4)
	PRINTFORML
	PRINTFORMW （哈，嗯... 美味……%CALLNAME:MASTER%的精液、最喜欢了……♥）
	PRINTFORMDL 也许是因为已经忍耐了很久吧,映姬露出了恍惚的表情,继续吸吮着射精之后的阴茎……
	PRINTFORMDW 用喉咙和舌头一番充分榨取了浓厚的精液之后，映姬终于对上了眼睛打招呼
	PRINTFORML 「%K30_GREETING_EIKI()%、%K30_C_NAME(MASTER)%。还有…多谢款待♥」
	TIME:0 -= 10
	CUM = 1
ELSE
	;随机構文の練習
	PRINTFORMD %TEXTR("一醒过来一睁開眼")%
	IF (TALENT:30:精愛味覚 || PREG || WISH) && RAND:3 == 1
		PRINTFORMDL 映姫把%TINKO(MASTER)%含到喉咙深处
		PRINTFORMDW 我注意到的映姬\@ PREG || WISH == 1 ? 慢慢地 # 不情不愿 \@放開了嘴…
	ELSE
		PRINTDATADW
			DATAFORM 映姫用舌头对黏黏糊糊的%TINKO(MASTER)%攀爬着。映姬也注意到了，头转向这边…
			DATAFORM 和吸吮着%TINKO(MASTER)%的映姫完美地对视上了……
			DATAFORM 和抬头看的映姬对视……好像是一边询问这边的情况一边进行了口交
		ENDDATA
	ENDIF
	IF PREG || WISH == 1
		PRINTFORML 「%K30_GREETING_EIKI()%、%K30_C_NAME(MASTER)%」
		IF WISH
			PRINTFORML 「呵呵呵♥，从早上開始这里就很有精神…」
			PRINTDATAW
				DATAFORM 「我会比睡着的你先叫醒你……是这样的约定吧？」
				DATAFORM 「被拜托的早上第一个工作中哟…你可以放轻松一点吗」
				DATAFORM 「因为是你的请求，所以认真地听是理所当然的吧？」
			ENDDATA
		ELSE
			PRINTDATAW
				DATAFORM 「即使在睡觉的时候你这里也很有精神…就这样安慰你吧」
				DATAFORM 「你躺着就行了…交给，我吧」
				DATAFORM 「已经醒了吗?我的照顾还远远不够呢」
			ENDDATA
		ENDIF
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMDL 映姬把视线转向这边，轻轻地刺激着球和竿
				PRINTFORMDW %CALLNAME:MASTER%似乎是希望不要萎靡不振变得更硬…
			CASE 1
				PRINTFORMDL 寒暄结束后映姬把积攒在嘴里的唾沫顺着%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%滴落润滑
				PRINTFORMDW 增加了滑腻感%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%用手抚摸的同时，露出慈爱的表情…
			CASE 2
				PRINTFORMDL 映姬用一种理所当然的口气跟我搭话
				PRINTFORMDW 表情也像审判时一样认真…
		ENDSELECT
		GOTO RESTART
	ELSEIF WISH == 2
		PRINTFORML 「………%K30_GREETING_EIKI()%、%K30_C_NAME(MASTER)%」
		PRINTFORML 「嗯…今天，是工作日……」
		IF TALENT:MASTER:濃厚精液
			PRINTFORML 「最近，因为积存了很多，所以不知不觉…所以」
		ELSE
			PRINTDATAW
				DATAFORM 「自己，也注意到了…就这样做了…」
				DATAFORM 「无论如何都想帮你……不知不觉…所以…」
			ENDDATA
		ENDIF
		SELECTCASE RAND:2
			CASE 0
				PRINTFORMDL 没想到阎魔大人这么不遵守自己定的规矩
				PRINTFORMDW 映姬不好意思地垂下眼睛，%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%挣扎的手没有停止…
			CASE 1
				PRINTFORMDL 映姬为了尽快完成工作，似乎非常激烈地嘬吸着
				PRINTFORMDW 比任何时候都黏糊糊的%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%和映姬的嘴角就说明了这一点…
		ENDSELECT
		GOTO RESTART
	ELSEIF TALENT:30:精愛味覚 && RAND:3 == 1
		PRINTFORML 「早上好，%K30_C_NAME(MASTER)%」
		PRINTFORMW 「还在睡觉也没关系哦。先吃饭……我要開动了。♥」
	ELSE
		PRINTDATAW
			DATALIST
				DATAFORM 「……早上好」
				DATAFORM 「对不起。我忍不…不知不觉，所以…」
			ENDLIST
			DATALIST
				DATAFORM 「嗯，你那有精神，我很在意…」
				DATAFORM 「啊…还有，早上好…」
			ENDLIST
			DATALIST
				DATAFORM 「……%K30_C_NAME(MASTER)%，早上好」
				DATAFORM 「本想小小的恶作剧的打算，但不知何故变得有趣了……」
			ENDLIST
		ENDDATA
	ENDIF
	IF TALENT:30:精愛味覚 && RAND:3 == 1
		PRINTFORMDL 说完后，映姬就反复亲吻龟头，想要继续下去
		PRINTFORMDW 映姬的口水顺着%CALLNAME:MASTER%の%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%流淌，连被窝都弄脏了…
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMDL 一看映姬的嘴角都是口水和%CALLNAME:MASTER%の%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%的先走り汁
				PRINTFORMDW 闪闪发着光。好像玩了相当长的时间…
			CASE 1
				PRINTFORMDL 虽然用抱歉的语气说话，但是映姬的眼睛充满了期待和欲望
				PRINTFORMDW 而且手一直在肉棒上套弄,似乎没有停下来的打算…
			CASE 2
				PRINTFORMDL %CALLNAME:MASTER%的阴茎越过晨起的水平，噌噌地起勃
				PRINTFORMDW 映姬似乎相当热心地继续奉仕着……
		ENDSELECT
	ENDIF
	$RESTART
	PRINTFORML
	IF WISH == 1
		PRINTDATAL
			DATAFORM 「但是请放心，我并不是讨厌你」
			DATAFORM 「当然了，也不是谁都会做的」
			DATALIST
				DATAFORM 「啊…但是，不要担心」
				DATAFORM 「我一点也不觉得你是被强迫的」
			ENDLIST
		ENDDATA
		PRINTFORML 「%K30_C_NAME(MASTER)%那么，因为是你，我…我想为你做更多♥」
	ELSEIF PREG
		PRINTDATAL
			DATAFORM 「你积累的东西…我，只想要全部接受…」
			DATAFORM 「暂时不能做激烈的事…尽管如此，我还是希望给你舒服…」
			DATAFORM 「直到\@ CFLAG:妊娠経過日数 < 10 ? 肚子里的孩子稳定下来 # 这个孩子能健康地出生 \@之前，即便如此我也不想让你忍耐…」
		ENDDATA
		PRINTFORML 「所以，就这样…♥」
	ELSEIF WISH == 2
		PRINTDATAL
			DATALIST
				DATAFORM 「到此为止…你也好，我也好…你已经受不了了吧？」
				DATAFORM 「嘴里……好想立刻吃到嘴里、可以么…」
			ENDLIST
			DATALIST
				DATAFORM 「呵，呵呵，看……时间还很充裕…」
				DATAFORM 「再努力一点，我会让你心情变好的……可以吧…」
			ENDLIST
		ENDDATA
	ELSEIF TALENT:30:精愛味覚 && RAND:3 == 1
		PRINTFORML 「已、已经不能忍耐了…快点，给我精液…♥」
	ELSE
		PRINTDATAL
			DATALIST
				DATAFORM 「呵，呵呵，你看，这是男人的憧憬吧…？」
				DATAFORM 「所以，不是很好吗，就这样♥…」
			ENDLIST
			DATALIST
				DATAFORM 「喂，喂，忍耐什么的不好啊？」
				DATAFORM 「就这样也不会消失吧，所以…」
			ENDLIST
			DATALIST
				DATAFORM 「啊，不是很好吗，偶尔这样的也…」
				DATAFORM 「更加，更加、我会让你更快乐的…」
			ENDLIST
		ENDDATA
	ENDIF
	TCVAR:30:357 = 1
	CALL K30_BLOW_JOB_ANIME(0)
	PRINTDATAL
		DATAFORM 「姆吱…嗯っ、叽卟っ…啾噜…」
		DATAFORM 「啾噜！　…叽卟っ、啾唔呜呜…」
		DATAFORM 「啾噜っ！　啾噜っ、啾っ噜…」
	ENDDATA
	IF !PREG || WISH
		IF WISH == 1
			PRINTFORMDL 映姫再次%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%を開心地開始%TEXTR("舐め/しゃぶり/咥え/")%
		ELSE
			PRINTFORMDL 被拜托了映姫%CALLNAME:MASTER%の不等回信、再次開始%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%を%TEXTR("舐め/しゃぶり/咥え/")%
		ENDIF
		IF TALENT:30:精愛味覚 && RAND:3 == 1
			PRINTFORMDW 就像觅食的雌兽一样眼睛变了颜色，狼吞虎咽的对着%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%吞咽…
		ELSE
			PRINTDATADW
				DATAFORM 为了求精，嘴唇吸附着龟头，空着的手会温柔地揉開卵蛋…
				DATAFORM 完全苏醒的%CALLNAME:MASTER%被更舒适的快乐包围…
				DATAFORM 似乎没有了顾虑似的,嘴和舌头大胆地活动了起来,淫靡的水声和急促的呼吸声在房间里回响……
			ENDDATA
		ENDIF
	ELSE
		PRINTFORMDL 映姫微笑着对%CALLNAME:MASTER%重新開始了爱的口交
		PRINTFORMDL \@ CFLAG:妊娠経過日数 < 10 ? 迎来安定期 # 平安生产 \@后，映姬依然想好好“照顾”我
		PRINTDATADW
			DATAFORM 看来映姬担心%CALLNAME:MASTER%会不会变心转移到其他孩子身上…
			DATAFORM 在这期间似乎也想一人独占%CALLNAME:MASTER%…
			DATAFORM 映姬似乎是想通过比平时更多的服务来牵住%CALLNAME:MASTER%…
		ENDDATA
	ENDIF
	PRINTFORML
	IF (PREG || TALENT:恋人) && RAND:2 == 1
		PRINTFORMD 映姫の愛情たっぷりな奉仕
	ELSEIF TALENT:30:精愛味覚 && RAND:2 == 1
		PRINTFORMD 情欲に突き動かされた映姫の奉仕
	ELSEIF RAND:2 == 1
		SELECTCASE ABL:舌
			CASE IS < 2
				PRINTFORMD 虽然笨拙但热情的映姬侍奉着
			CASE IS > 4
				PRINTFORMD 训练地极好的映姬侍奉着
			CASEELSE
				PRINTFORMD 映姬细心侍奉着
		ENDSELECT
	ELSE
		PRINTFORMD 映姫の献身的な奉仕
	ENDIF
	PRINTDATADL
		DATAFORM は%CALLNAME:MASTER%被逼入绝境，转眼间就没有余地了
		DATAFORM 确实抓住了%CALLNAME:MASTER%的G点，实在无法忍受。
		DATAFORM 同时满足了%CALLNAME:MASTER%的征服欲和满足感，马上就要达到高潮
	ENDDATA
	PRINTFORMD %CALLNAME:MASTER%は…
	RESETCOLOR
	PRINTBUTTON "[０:映姫の顔にかける]", 0
	PRINTFORM
	PRINTBUTTON "[１:映姫の口にだす]", 1
	PRINTFORML
	$LOOP
	INPUT
	IF !GROUPMATCH(RESULT, 0, 1)
		CLEARLINE 1
		REUSELASTLINE
		GOTO LOOP
	ENDIF
	CUM = RESULT
	IF CUM
		CLEARLINE 2
		PRINTFORMDW %CALLNAME:MASTER%就这样放进映姬的嘴里
		PRINTFORML
		PRINTFORMDL 映姬也察觉到了含着的%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%激烈的上下起伏…
		PRINTDATADL
			DATAFORM %CALLNAME:MASTER%射精前紧紧抓住映姬的头，用喉咙深处顶住
			DATAFORM %CALLNAME:MASTER%忍耐到极限，看着映姬咽到最深处的瞬间
			DATAFORM %CALLNAME:MASTER%把%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%塞进欲用眼神倾诉的映姬的嘴里
		ENDDATA
		PRINTFORMDL %TEXTR("如愿以偿/充分/不客气")%奖励给%EXPR_VAR("SPERM")%を%TEXTR("射出/倾吐/发射")%完成
		CALL K30_BLOW_JOB_ANIME(4)
	ELSE
		CLEARLINE 2
		PRINTFORMDW %CALLNAME:MASTER%决定弄脏%EXPR_VAR("SPERM")%映姬的脸
		PRINTFORML
		PRINTFORMDL 映姬似乎也察觉到了，对%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%的侍奉更加热忱起来…
		PRINTDATADL
			DATAFORM 映姬松開嘴，用手稍微用力摩擦%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%就扑通一声跳起来
			DATAFORM 在射精前%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%从映姬的口中拔出贴在鼻尖上
			DATAFORM 最后映姬一舔底筋%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%就迎来了极限
		ENDDATA
		PRINTFORMDL 奖励的%EXPR_VAR("SPERM")%对脸上%TEXTR("磅礴/瞄准地/满满地")%%TEXTR("泼溅了/发泄出来了/迸发出来")%
		CALL K30_BLOW_JOB_ANIME(3)
	ENDIF
	TCVAR:30:357 = 0
	PRINTFORML
	CALL M_KOJO_COLOR_K30
	CALL HPH_PRINT, @"「……HPHHPH」", "L"
	IF CUM
		CALL HPH_PRINT, @"「んんっHPH　"
		PRINTDATA
			DATAFORM 啾……嗯、嗯る……好像出了很多
			DATAFORM 嗯ふっ……嗯、嗯っ……全部，都饮下了
			DATAFORM じ啾……じゅぷ、啾……结束了吗
		ENDDATA
		CALL HPH_PRINT, @"HPH」", "W"
		CALL HPH_PRINT, @"「……………あっHPH」", "W"
		PRINTDATA
			DATAFORM 「善后工作我也会好好处理的…
			DATAFORM 「也许只剩下一点点…
			DATAFORM 「我会帮你最后的清洁完的…
		ENDDATA
		CALL HPH_PRINT, @"HPH　ちゅっ、ちゅる…HPH」", "W"
	ELSE
		CALL HPH_PRINT, @"「すごい…HPH　"
		PRINTDATA
			DATAFORM 早上第一发…量好大啊
			DATAFORM 脸上已经…黏糊糊的…
			DATAFORM 这么多，好多…
		ENDDATA
		CALL HPH_PRINT, @"HPH」", "W"
		PRINTDATA
			DATAFORM 「而且，这个味道…看起来很头晕…
			DATAFORM 「而且……非常热，好像会烫伤…
		ENDDATA
		CALL HPH_PRINT, @"HPH」", "W"
	ENDIF
	IF CUM
		PRINTFORMD 将残留在尿道里的%EXPR_VAR("SPERM")%通通吸光、
	ELSE
		PRINTFORMD 飞溅的%EXPR_VAR("SPERM")%を\@ TALENT:30:精愛味覚 ? 往嘴里送 # 一直沾着 \@
	ENDIF
	PRINTFORMDW 映姫は\@ TALENT:30:精愛味覚 ? 恍惚の表情 # 満足的笑顔 \@浮现在脸上…
ENDIF
LOCALS:0 '= "…………", "……", "…"
RESETCOLOR
DRAWLINE
CALL PRINT_GROUP(LOCALS, 3)
CALL M_KOJO_COLOR_K30
TIME += 10
;顔絵エフェクト用フラグ
TCVAR:30:363 = TIME
台詞 = 「从早上開始就给我射了很多…好開心啊♥」/
IF PREG
	台詞 = %台詞%「虽然现在只能用嘴接受……」/「再忍耐一下，请再多爱我一点♥」
ELSEIF WISH == 1
	{
	台詞 = %台詞%%TEXTR("「但是如果是你的话…还是第一次吧？」/
		「吃了第一份早餐后，接下来是…哪里好呢」/
		「呵呵呵，这个…已经完全是假日的乐趣了」")%/
		「在这之后、只要%K30_C_NAME(MASTER)%你愿意…」/
		「我会，好好陪你的…♥」
	}
ELSEIF TALENT:30:精愛味覚 && !RAND:3 && CUM
	台詞 = %台詞%「这样的话今天一天会很努力的哦」/「谢谢…承蒙款待♥」
ELSE
	{
	台詞 = %台詞%%TEXTR("「你看，清爽苏醒也不错吧？」/
		「因为是你，这点小事完全无所谓吧？」/
		「你是不是也痛快了、今天不是要努力行善吗？」")%/
		「那么，今天一天也加油吧」
	}
ENDIF
;一時的に拡張顔絵に変更
VARSET LOCAL
LOCAL = FLAG:立絵種類
FLAG:立絵種類 = 1
LOCAL:1 = CFLAG:30:差し替え適用
CFLAG:30:差し替え適用 = 1
PRINTFORML
CALL K30_SPTALK, @"%\@ TALENT:30:精愛味覚 ? LOVE # 笑顔 \@%", 台詞
WAIT
;元に戻す
FLAG:立絵種類 = LOCAL
CFLAG:30:差し替え適用 = LOCAL:1
;射出量は超適当
LOCAL:1 =(ABL:MASTER:Ｃ感覚 / 2 + 15) / 2 * (ABL:30:舌 / 3 * 2)
CFLAG:30:累計精飲 += LOCAL:1
;経験を足す
;あとで何やってるか忘れそうなんで平文で置く
LOCAL = (HETEROSEX(TARGET, PLAYER) == 1)
PRINTFORMDL Ｃ経験 +1(%CALLNAME:MASTER%)
PRINTFORMDL 絶頂経験 +1(%CALLNAME:MASTER%)
PRINTFORMDL 射精経験 +2(%CALLNAME:MASTER%)
SIF LOCAL
	PRINTFORMDL 百合経験 +7(%CALLNAME:MASTER%)
PRINTFORMDL
PRINTFORMDL Ｍ経験 +1(映姫)
PRINTFORMDL 精液経験 +4(映姫)
PRINTFORMDL 精飲経験 +4(映姫)
PRINTFORMDL 口淫経験 +2(映姫)
PRINTFORMDL 奉仕快楽経験 +6(映姫)
PRINTFORMDL 愛情経験 +1(映姫)
SIF LOCAL
	PRINTFORMDL 百合経験 +7(映姫)
PRINTFORMW
EXP:MASTER:Ｃ経験 += 1
EXP:MASTER:絶頂経験 += 1
EXP:MASTER:射精経験 += 2
EXP:30:Ｍ経験 += 1
EXP:30:精液経験 += 4
EXP:30:精飲経験 += 4
EXP:30:口淫経験 += 2
EXP:30:奉仕快楽経験 += 6
EXP:30:愛情経験 += 1
;TCVAR～は次ターンで経験変動を出さない為の処理
IF LOCAL
	EXP:MASTER:百合経験 += 7
	EXP:30:百合経験 +=7
	TCVAR:MASTER:百合経験 += 7
	TCVAR:30:百合経験 += 7
ENDIF
TCVAR:MASTER:Ｃ経験 += 1
TCVAR:MASTER:絶頂経験 += 1
TCVAR:MASTER:射精経験 += 2
TCVAR:30:Ｍ経験 += 1
TCVAR:30:精液経験 += 4
TCVAR:30:精飲経験 += 4
TCVAR:30:口淫経験 += 2
TCVAR:30:奉仕快楽経験 += 6
TCVAR:30:愛情経験 += 1
;顔射時は3割の確率で脸上精液エフェクトを持ち越し
TCVAR:30:363 = (CUM == 0 && !RAND:3) ? TIME + 5 # TIME
[SKIPSTART]
;精力も減らす。TINKOはふにゃっとさせる
;朝の回復と重なるのでオミット
;一日一回フラグ折るのもやりすぎなので保留
SETBIT TFLAG:一日一回,8
BASE:MASTER:精力 -= LOCAL:1
BASE:MASTER:体力 -= LOCAL:1 / 5
BASE:MASTER:勃起 = 700 - (RAND:250 + 1)
[SKIPEND]
RETURN 1

;==================================================
;映姫様に仕事中でも咥えてもらう関数
;诶嘿嘿と仕事の挙動両立は不具合出そうなので1指令内に留める
;--------------------------------------------------
@K30_BLOW_JOB_IN_COURT
LOCALS:0 '= "…………", "……", "…"
RESETCOLOR
CALL PRINT_GROUP(LOCALS, 3)
CALL K30_D_LINE
PRINTFORMDL %TEXTR("一片寂静/毫无其他人声/弥漫着庄严的气氛")%的法廷有%TEXTR("粗重的呼吸和隐秘的/哔擦哔擦黏糊糊的/极其不般配的")%水声回响…
PRINTFORMW
CALL K30_BLOW_JOB_ANIME(0)
PRINTFORML 「啊、嗯嗯……♥　啾叭、啾噜~……哈啊、呼啊…♥」
PRINTDATAW
	DATAFORM 「%K30_C_NAME(MASTER)%…♥　还没有…是吗　还没、射么…♥」
	DATAFORM 「唔呵呵…♥　%K30_C_NAME(MASTER)%、因为不需要忍耐啊♥」
	DATAFORM 「啊　%K30_C_NAME(MASTER)%这里…一跳一跳的很辛苦…」\n「没关系，请轻松一点…♥」
ENDDATA
PRINTFORML 「不快点…射精的话…我\@ INRANGE(TIME, 720, 749) ? 的休憩间隔，也快没有了 # 工作…也在等着 \@呀♥」
PRINTFORMD 把脸埋在%CALLNAME:MASTER%的胯座里、閻魔様が%TEXTR("如饥似渴地/不雅地/慈爱地")%
PRINTFORMDW %TEXTR("吮吸着小鸡鸡/含着阴茎/来回舔着肉棒")%
PRINTFORML
PRINTFORML 「不要急？…时间真没有那么多了！」
PRINTFORMW 「真的…我们该怎么办呢?」
PRINTDATAW LOCAL
	DATAFORM 「果然，还…不舒服吗」\n「更多…更加、用舌头……嗯啾、rero…」
	DATAFORM 「只有这个，还不够吗」\n「再多吮吸点…到里面去的话……嗯~，嗯♥」
	DATAFORM 「更加…快点动、就好了吗」\n「那嚒……啊，嗯♥」
ENDDATA
PRINTFORMDL 映姬没有穿好阎魔的制服，\@ INRANGE(TIME, 720, 759) ? 休息顾不上 # 尽管在工作 \@耽于淫乱的行为
PRINTFORMDW 在神圣的法庭上玷污阎魔大人的背德感、%CALLNAME:MASTER%的兴奋越来越高涨…
PRINTFORML
SELECTCASE LOCAL
	CASE 0
		PRINTFORML 「rero，rero♥　嗯啾…」\n「呼呼♥　这里很舒服…？　还是…这边♥　嗯啾、rero…」
		PRINTFORMDL 映姬的舌头纵横交错移动，准确地捕捉到铃口、里筋、雁首等敏感的地方
		PRINTFORMDW 平常被认为是说教专用的阎魔的舌头，变成了从雄性身上榨取精气的专用器官…
	CASE 1
		PRINTFORML 「嗯呃……嗯，嗯♥　嗯咯……啾噜噜！」
		PRINTFORMDL 映姬抱着%CALLNAME:MASTER%的腰，用深喉把阴茎吞到里面
		PRINTFORMDW 平时的长篇大论锻炼出来的喉舌没有干涸的迹象，湿润的触感，舒适地箍紧龟头…
	CASE 2
		PRINTFORML 「嗯呼っ…滋波っ、叽啵っ♥　嗯っ、嗯っ、啾噜っ♥　啾噜っ！」
		PRINTFORMDL 映姬把帽子放在旁边，一边叼着肉棒一边激烈地摇着头
		PRINTFORMDW 在审判现场对死者发出严厉斥责的那张嘴，现在却传出粗俗的啜饮声和甜言蜜语…
ENDSELECT
PRINTFORML
PRINTFORMDL 是想尽快回去\@ INRANGE(TIME, 720, 769) ? 休憩 # 仕事 \@，还是欲火焚身
PRINTFORMDL 本来不情愿的映姬的侍奉比什么都强烈，实在让人受不了。
PRINTFORMDW 比体感短得多的时间，%CALLNAME:MASTER%的欲望即将爆发…

;==================================================
;映姫様に仕事中でも咥えてもらった後始末
;ただの茶番
;--------------------------------------------------
@K30_AFTER_BLOW_JOB_IN_COURT
;一時的に拡張顔絵に変更
VARSET LOCAL
LOCAL = FLAG:立絵種類
FLAG:立絵種類 = 1
LOCAL:1 = CFLAG:30:差し替え適用
CFLAG:30:差し替え適用 = 1
LOCAL:2= INRANGE(TIME, 720, 769)
LOCALS:0 '= "…………", "……", "…"
RESETCOLOR
DRAWLINE
CALL PRINT_GROUP(LOCALS, 3)
CALL M_KOJO_COLOR_K30
CALL K30_SPTALK, "反発", "「你看，这种地方要是被谁看到可不得了」/「你也快点穿好衣服吧…要暴露到什么时候？」"
PRINTFORMDL 映姬迅速整理了略微凌乱的服装，已经坐在自己的座位上
PRINTFORMDW …那张脸\@ LOCAL:2 ? 就这样继续休息 # 可以回去工作\@吗？
PRINTFORML
PRINTFORML 「我不知道你到底在在意什么，不过我知道你自己的脸」
PRINTFORMW 「这边的善后…是的，从现在開始…♥」
CALL K30_SPTALK, "LOVE", "「んっ…れろっ、んちゅ…」"
PRINTFORMDW 映姬用手指直接擦拭沾在脸上的精液，吧嗒吧嗒地舔着。

IF LOCAL:2
	PRINTFORML 「因为还在休息，所以很期待哦…♥」
ELSE
	PRINTFORML 「返回工作前的快乐…留到最后不也可以吗…♥」
ENDIF
PRINTFORMDW 就像继续口淫一样，映姬的手指和舌头艳丽地舞动着，淫行的残渣消失了…
PRINTFORML
PRINTFORML 「…是，漂亮地成了」
PRINTFORMW 「这就真的结束了，你也好好切换一下吧。」
;立絵種類を元に戻すのと口内精液リセット
FLAG:立絵種類 = LOCAL
CFLAG:30:差し替え適用 = LOCAL:1
CFLAG:30:口内精液 = 0
CFLAG:30:积攒度 /= 2

;==================================================
;Ｖ性交汎用あえぎ関数
;--------------------------------------------------
@K30_GASPING_V(ARGS)
SELECTCASE ARGS
	CASE "挿入継続"
		IF NOWEX:Ｖ絶頂 > 1 && RAND:3 != 1
			PRINTDATAL
				DATAFORM 「啊♥ 好厉害♥\@ TCVAR:102 > 1 ? 明明，射了这么多 # 全然 \@、停不下来…♥」
				DATAFORM 「\@ TCVAR:102 > 1 ? 还在，继续吗，明明，射了这么多 # んんっ♥　%K30_C_NAME(MASTER)%、がっつきすぎ \@…♥」
				DATAFORM 「阿哈~♥　\@ TCVAR:102 > 1 ? 明明出来了，这么多…仍然 # 我…好舒服？　在里面、 \@硬硬的…♥」
			ENDDATA
			PRINTDATAL
				DATAFORM 「……啊，等等♥　那样的，话，就不行了♥　那里，不行♥」
				DATAFORM 「哈♥　哈♥　哈呼…♥　激烈、太、激烈♥」
				DATAFORM 「……啊，啊啊♥　好快乐，要来了♥　好厉害啊，来了♥」
				DATAFORM 「啊♥　啊♥　啊呼♥　不行啊…只有那里，不行啊♥」
			ENDDATA
		ELSE
			PRINTDATAL
				DATAFORM 「嗯呼呼♥　真的，好有精神…♥」
				DATAFORM 「你不想分開吗？　呼呼♥　爱撒娇的孩子啊…♥」
				DATAFORM 「嗯呼呼…♥　沉浸其中…可爱的人♥」
			ENDDATA
			PRINTDATAL
				DATAFORM 「好啊…请更多地品尝我。♥」
				DATAFORM 「%K30_C_NAME(MASTER)%，让我更舒服一点吧…♥」
				DATAFORM 「我啊，也不想在别的房间…想和你亲密在一起♥」
			ENDDATA
		ENDIF
		;立位
		IF TFLAG:193
			PRINTDATADL
				DATAFORM %CALLNAME:MASTER%は\@ EX:膣内精液 > 500 ? 像是把滴下来的精液再一次注在映姬里面一样 # 一边享受着因溢出的爱液而变得更加光滑的美穴 \@继续抽插…
				DATAFORM \@ EX:膣内精液 > 500 ? 注入的精液也毫不在意地被搅动着、 # 更加增加了湿润和水分 \@映姫的%SLIT()%每次往上推都会发出咕噜咕噜的猥亵声…
				DATAFORM 从结合处滴下两人猥亵的体液，但彼此都没有时间在意…
			ENDDATA
		ELSE
			PRINTDATADL
				DATAFORM 映姫を\@ TEQUIP:体位 == 1 ? # 从背后 \@拥抱加快抽插时、\@ EX:膣内精液 > 500 ? %SLIT()%溢出了白浊和爱蜜 # 咕啾咕啾的水声更大了 \@…
				DATAFORM 映姬的蜜穴内越插越熟悉，\@ TCVAR:30:396 > 2 ? 无论射出多少次 # 太舒服了 \@%CALLNAME:MASTER%的腰停不下来的动着…
				DATAFORM %CALLNAME:MASTER%が\@ TEQUIP:体位 == 1 ? 按住肩膀 # 紧紧地抓住腰 \@比刚才更激烈地抽送，映姫的嬌声\@ NOWEX:Ｖ絶頂 > 2 && RAND:3 != 1 ? 变的更激烈更淫荡 # 也随之成为同样的节奏 \@…
			ENDDATA
		ENDIF
	CASE "基本セット"
		PRINTFORM 「%TEXTR("啊哈/嗯呜呜/嗯~/啊呼~卟/啊啊嗯")%…♥
		PRINTDATAL
			DATAFORM 到里面、进去了…♥」
			DATAFORM 没关系，就像你想做的那样…让它动起来♥」
			DATAFORM 没关系，我没有勉强你…」
			DATAFORM 更多，爱着我的你…喜欢♥」
			DATAFORM 肚子里…你的，感觉到了…♥」
		ENDDATA
		PRINTDATAL
			DATAFORM 「再多，做一点…好♥两个人的心情变得更好吧♥」
			DATAFORM 「我感觉很舒服…%K30_C_NAME(MASTER)%が、最喜欢了…♥」
			DATAFORM 「好舒服…不止是……我，非常非常，幸福啊…♥」
			DATAFORM 「就这样，连在一起而已…我就能满足了…♥」
			DATAFORM 「光是这样，心情就很好…好啊，随你高兴♥」
		ENDDATA
		;立位
		IF TFLAG:193
			PRINTDATADL
				DATAFORM 映姬的身体美得让人想要激烈地撞进去，不过%CALLNAME:MASTER%还是一边忍耐一边晃了晃腰…
				DATALIST
					DATAFORM 映姬露出灿烂的笑容，眼中却闪烁着淫靡的光芒。
					DATAFORM 尝试\@ TEQUIP:体位 == 1 ? 紧紧抱住轻轻地顶上去 # 从后面轻轻地推进去 \@と、她的表情马上变成了雌性的醉态。…
				ENDLIST
				DATALIST
					DATAFORM 期待已久的插入，映姬很快就要坐下了
					DATAFORM %CALLNAME:MASTER%像支撑一样紧紧地\@ TEQUIP:体位 == 1 ? 拥抱 # 抓住腰 ? \@て、開始贪恋享受映姬纤弱的身体…
				ENDLIST
			ENDDATA
		ELSE
			PRINTDATADL
				DATALIST
					DATAFORM \@ TEQUIP:体位 == 1 ? 映姬张開双腿，阴道里软绵绵的， # 与小巧的臀部相应的、映姬紧绷的阴道内 \@比想象的还要舒服
					DATAFORM 为了延长这种快感，%CALLNAME:MASTER%小心翼翼地动起了腰…
				ENDLIST
				DATALIST
					DATAFORM 映姬的笑容隐藏着雌性的表情
					DATAFORM %CALLNAME:MASTER%開始抽送的时候，表情马上就開始用动听的声音叫了…
				ENDLIST
				DATALIST
					DATAFORM \@ TEQUIP:体位 == 2 ? 最奥まで # \@慢慢地把刺进去的东西拔出来，灼热的阴道肉紧紧地缠绕着
					DATAFORM 为了从映姬那里得到更好的反应，%CALLNAME:MASTER%试探似的開始抽插
				ENDLIST
			ENDDATA
		ENDIF
	ENDSELECT
	WAIT
RETURN

;==================================================
;Ｖ性交中にフレーバー行動を表示させる
;--------------------------------------------------
@K30_FLAVOR_MES_V
#DIM CHECK = 0, 60, 61, 65, 67, 68
;TEQUIP走査して道具装着を見る。搾乳機,縄,拘束中なら返回
SIF SUMARRAY(TEQUIP:30:0, 17, 26)
	RETURN

;条件項目付き等確率分岐表示の例。272スレ>>607さんの構文アイデアを弄ったものです
;抽選用文字列を初期化
LOCALS =
;条件確認して満たしている項目のタグをTEXTR関数の形式で抽選用文字列に追加
SIF NOWEX:MASTER:射精 && PALAM:欲情 > PALAMLV:6 && TEQUIP:体位 == TEQUIP:体位２ && !RAND:3
	LOCALS += "体位おねだり/"
SIF !NOWEX:MASTER:射精 && CHECK_SWEAT(30) && TEQUIP:体位 != 3 && !SUMARRAY(TEQUIP:30:0, 41, 46) && !RAND:7
	LOCALS += "脖子/"
SIF NOWEX:MASTER:射精 && TCVAR:30:396 > 4 && TEQUIP:体位 != 2  && !RAND:4
	LOCALS += "頭なでられ/"
SIF NOWEX:Ｖ絶頂 && TEQUIP:体位 != 2 && !RAND:6
	LOCALS += "頭撫で/"
SIF SUMARRAY(NOWEX:30:0, 6, 10) && !TEQUIP:揉胸 && !RAND:4
	LOCALS += "手繋ぎ/"
IF SYNCED_ORGASM(30) && (BASE:体力 < MAXBASE:体力 / 2)
	SIF STRCOUNT(CSTR:30:1, "囁く") && NOWEX:Ｖ絶頂 > 2 && ABL:欲望 > 19 && BASE:気力 == 0 && !RAND:3
		LOCALS += "淫語/"
	SIF !STRCOUNT(CSTR:30:1, "囁く") && !GROUPMATCH(TEQUIP:体位, 2, 3)  && !SUMARRAY(TEQUIP:30:0, 41, 46) && MASTER_POSE(4, 4) == 0 && !SUMARRAY(TEQUIP:30:0, 11, 26)
		LOCALS += "囁く/"
ENDIF
;抽選用文字列が空ならここで終了
SIF LOCALS == ""
	RETURN
WAIT
CALL M_KOJO_COLOR_K30
;TEXTRで抽選して戻り値を使いSELECTCASE分岐
SELECTCASE TEXTR(LOCALS)
	CASE "体位おねだり"
		;Counter行動決定とだいたい同じ手順
		CALL FISHER_YATES_SHAFFLE(6)
		FOR COUNT, 0, 6
			SIF !SHAFFLE_ARRAY:COUNT || SHAFFLE_ARRAY:COUNT == TEQUIP:体位
				CONTINUE
			CALLFORM COM_ABLE{CHECK:(SHAFFLE_ARRAY:COUNT)}
			SIF !RESULT
				CONTINUE
			LOCAL = SHAFFLE_ARRAY:COUNT
			BREAK
		NEXT
		LOCAL:1 = (TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) && !TCVAR:口服避孕薬
		IF SUMARRAY(NOWEX:30:0, 0, 5)
			PRINTFORM 「はぁ…はぁ…♥
			IF LOCAL:1
				PRINTFORMW %TEXTR("里面…溢出来了…/这个…想要…/还没…还想要…/")%♥」
			ELSE
				PRINTFORMW %TEXTR("好厉害…太美了……/太…太厉害了…/绝…妙…/")%♥」
			ENDIF
		ELSE
			IF LOCAL:1 && RAND:2 == 1
				PRINTDATAW
					DATAFORM 「嗯……这样就，出来了…？还是…不够呢…♥」
					DATAFORM 「…明明出了这么多，我…又想要了…♥」
				ENDDATA
			ELSE
				PRINTFORMW 「呼呼呼~、%TEXTR("辛苦了♪/舒服吗…？/再做…一次吗？/")%」
			ENDIF
		ENDIF
		PRINTFORML 「……%K30_C_NAME(MASTER)%、%TEXTR("如果可以的话/那个…这次/下一个…/")%…」
		SELECTCASE LOCAL
			CASE 0
				PRINTDATAW
					DATAFORM 「更深处…能顶到这里吗?…♥」\n「我的身体全部…请爱我♥」
					DATAFORM 「浅的地方…想要摩擦」\n「你的…咯哈，挂住的感觉…已经，受不了…♥」
				ENDDATA
			CASE 1
				IF (BEDROOM(CFLAG:現在位置) || (BATHROOM() && ITEM:20)) && !RAND:3
					PRINTFORMW 「让我横躺…吗？」
					IF LOCAL:1 && RAND:2 == 1
						PRINTFORML 「让我怀孕的地方，请让我好好看看…♥」
					ELSE
						PRINTFORMW 「所以…更多更多的，想要你%TEXTR("猛插/愛/疼/")%我…♥」
					ENDIF
				ELSE
					PRINTFORMW 「从前面…%TEXTR("我/爱我/")%%TEXTR("可以给我吗/能给我吗/")%？」
					PRINTDATAW
						DATAFORM 「更希望你…我想要你抱抱我…♥」
						DATAFORM 「虽然有点不好意思，但是因为…想看你的脸…♥」
					ENDDATA
				ENDIF
			CASE 2
				PRINTFORMW 「从后面将…%TEXTR("我/爱我/")%%TEXTR("可以给我吗/能给我吗/")%？」
				IF LOCAL:1 && RAND:3 == 1
					PRINTFORMW 「想和你『交尾』……受不了…♥」
				ELSEIF EXP:子宮口開発経験 > 50 && RAND:3 == 1
					PRINTFORMW 「更深处…你的，想要…♥」
					SIF LOCAL:1
						PRINTFORMW 「在我的最深处种下种子…」
				ELSE
					PRINTDATAW
						DATAFORM 「更加…更加，我想要你顶进去…♥」
						DATAFORM 「那个样子…厉害，好兴奋…♥」
					ENDDATA
				ENDIF
			CASE 3
				IF RAND:2 == 1
					PRINTFORMW 「请你，稍微休息一下」
					PRINTFORMW 「我…想去上位啊…♥」
				ELSE
					PRINTFORMW 「你上面，我可以坐吗?」
					PRINTFORMW 「我的…可以动了吗…♥」
				ENDIF
			CASE 4
				PRINTFORMW 「我... 抱住我」
				PRINTFORMW 「抱的同时，\@ LOCAL:1 && RAND:2 ? 让我怀孕 # %TEXTR("舒畅/愛我/し/")% \@て%TEXTR("可以给我吗/想要的/请给我")%…♥」
			CASE 5
				PRINTFORMW 「在你的膝盖上... 我能坐下吗？？」
				PRINTFORMW 「就那样、从后面将…\@ LOCAL:1 && RAND:2 ? 让我怀孕 # %TEXTR("舒畅/愛我/し/")% \@て%TEXTR("可以给我吗/想要的/请给我")%…♥」
		ENDSELECT
	CASE "脖子"
		PRINTFORMDL %CALLNAME:MASTER%は映姫の%TEXTR("脖子/耳边/脖颈/")%用舌头舔了一下…
		;絶頂無
		IF !SUMARRAY(NOWEX:30:0, 0, 5)
			PRINTFORMDL 映姬很在意带着汗水汽的身体，看起来有点害羞…
			PRINTFORMW
			PRINTFORML 「%TEXTR("吓/啊嗯/")%」
			PRINTDATAW
				DATAFORM 「这，不是很吓人吗…」
				DATAFORM 「嗯，你做了奇怪的事…」
				DATAFORM 「好，好痒啊…」
			ENDDATA
		;絶頂
		ELSE
			PRINTFORMDL 对燥热的身体的刺激映姬吃惊地发出可爱的声音…
			PRINTFORMW
			PRINTFORML 「%TEXTR("啊嗯/恰嗯/啊呼/吓")%♥」
			PRINTDATAW
				DATAFORM 「Q，突然这么狡猾啊…」
				DATAFORM 「这，这样的话……我吓发出声音…」
				DATAFORM 「…现在，非常... 我吓了一下…♥」
			ENDDATA
		ENDIF
	;映姫様にバブみを感じるのは正常
	CASE "頭なでられ"
		PRINTFORML 「んっ♥　%TEXTR("辛苦了/好像，中出了很多/很高兴你，这么努力/")%…」
		IF LOCAL:1 && RAND:3
			IF RAND:2 == 1
				PRINTFORML 「但是……不休息也没关系？」
				PRINTFORMW 「婴儿也是…你不用这样着急…」
			ELSE
				PRINTFORML 「不过不要勉强哦？」
				PRINTFORMW 「虽然想要孩子，但是两个人舒服才是最好的…」
			ENDIF
		ELSE
			IF RAND:2 == 1
				PRINTFORML 「啊\@ CHECK_SWEAT(30) ? …你也出汗了， # 、大汗… \@出了很多呢…」
				PRINTFORMW 「虽然喜欢拼命的你……但是不能乱来哦？」
			ELSE
				PRINTFORML 「但是... 我一直在想要不要紧？」
				PRINTFORMW 「稍微休息一下也可以哦…就这样和你黏在一起也可以…」
			ENDIF
		ENDIF
		PRINTFORML 「……………」
		PRINTFORMW 「吶…%K30_C_NAME(MASTER)%、\@ GROUPMATCH(TEQUIP:体位, 1, 4) ? 脸…再靠近我一点… # 能把头扭过来吗？ \@」
		PRINTFORML 「呼呼呼♪　%K30_C_NAME(MASTER)%…你这么努力，真了不起♥ 了不起…♥」
		IF GROUPMATCH(TEQUIP:体位, 1, 4)
			PRINTFORMDW %CALLNAME:MASTER%推乳房到脸上同时，映姬慈爱的一样抚摸着我的头…
		ELSE
			PRINTFORMDW %CALLNAME:MASTER%が%TOKANJIT(TCVAR:30:396)%第二次射精结束后，映姬像犒劳一样地摸了摸我的头…
		ENDIF
	CASE "頭撫で"
		PRINTFORMDL %CALLNAME:MASTER%は絶頂%TEXTR("的余韵未平/终于下来了")%映姫の%TEXTR("髪/頭/")%轻轻地抚摸着
		PRINTFORMDL 映姬露出非常满足的表情…
		PRINTFORMW
		PRINTDATAW
			DATAFORM 「嗯♥ 这个…喜欢……♥」
			DATAFORM 「更多，更加…♥」
			DATAFORM 「\@ NOWEX:Ｖ絶頂 > 2 ? とっても # すごく \@、好舒服…太好了…♥」
		ENDDATA
	CASE "手繋ぎ"
		PRINTFORMDL %CALLNAME:MASTER%は\@ NOWEX:TotalEX > 5 ? 同時 # 強烈地 \@迎来了绝顶，握住了筋疲力尽的映姬的手
		PRINTFORMDL 映姬幸福地微笑着握回了手…
		PRINTFORMW
		PRINTDATAW
			DATAFORM 「%K30_C_NAME(MASTER)%…♥　喜欢…♥」
			DATAFORM 「不要放開我…♥」
			DATAFORM 「幸福……非常的，幸福…♥」
		ENDDATA
	CASE "淫語"
		PRINTDATAL
			DATAFORM 「呀… ♥　讨厌……小穴，别拔啦♥」
			DATAFORM 「做…♥　小穴，更多…再做…♥」
			DATAFORM 「……小穴，咿…♥　小穴，好快乐…♥」
			DATAFORM 「想要…更多♥　小穴，だしてぇ♥」
			DATAFORM 「咿…♥　小穴，叽噗叽噗…好舒服…咿呀♥」
		ENDDATA
		PRINTDATAW
			DATAFORM 「%K30_C_NAME(MASTER)%……再做，一点…♥♥」
			DATAFORM 「%K30_C_NAME(MASTER)%、更多，请…♥♥」
			DATAFORM 「%K30_C_NAME(MASTER)%…放弃了，不行了…♥♥」
		ENDDATA
		PRINTFORMDL 对着射出结束的%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%打算拔出的%CALLNAME:MASTER%映姬嘟囔着
		PRINTFORMDW 反复达到高潮的映姬恍惚了，连自己在说什么不知道…
	CASE "囁く"
		CALLF ONCE("囁く")
		PRINTFORML 「はぁ…♥　はぁ…♥　はぁ…」
		PRINTFORMD 虽然反复多次绝顶消耗了很多，但映姬还是%CALLNAME:MASTER%
		PRINTDATADL
			DATAFORM 在我的臂弯中幸福地微笑着
			DATAFORM 梦寐以求的追寻
			DATAFORM 毫不拒绝地接受
		ENDDATA
		PRINTFORMDL %CALLNAME:MASTER%无法抑制的喜爱，在映姬耳边低语情话…
		PRINTFORMW
		SELECTCASE RAND:3
			CASE 0
				CALL HPH_PRINT, @"「啊哈っHPH　我也是，我也是っ、好喜欢HPH　%K30_C_NAME(MASTER)%、喜欢…HPHHPH」", "L"
			CASE 1
				CALL HPH_PRINT, @"「啊啊っHPH　现在，如果被这么说的话…」", "L"
				CALL HPH_PRINT, @"「我、太高兴了…要变得奇怪了…HPHHPH」", "L"
			CASE 2
				CALL HPH_PRINT, @"「我这边、更加、更ー加っ喜欢っHPH」", "L"
				CALL HPH_PRINT, @"「从现在開始，一~直%K30_C_NAME(MASTER)%が、最喜欢了っ…HPHHPH」", "L"
		ENDSELECT
		CALL HPH_PRINT, @"「%K30_C_NAME(MASTER)%っHPH　%K30_C_NAME(MASTER)%っHPH　最爱了HPH　…啾っHPH　嗯啾っ、啾噜噜…っHPH」", "W"
		PRINTFORMDL 映姬幸福地流着泪，疯狂贪食%CALLNAME:MASTER%的嘴唇，连同爱的誓言一起啄吻
		CALL HPH_PRINT, @"「啾っHPH　嗯啾っ……！！　嗯嗯ーっHPH　呃嗯…っHPHHPH」", "L"
		;さすがにうれションは自重
		PRINTDATADL
			DATAFORM 同时连接着的%SLIT(30)%が再次%TEXTR("阴茎/陰茎/肉棒/イチモツ/剛直/男根/怒張")%紧紧地勒紧
			DATAFORM 同时连接着的%SLIT(30)%透明的液体噗噗地吹湿了周围
			DATAFORM 缠绕在一起的舌头%CALLNAME:MASTER%被拥抱的身体一颤一颤抖动着，依然热得发烫
		ENDDATA
		PRINTFORMDW ……只要是%CALLNAME:MASTER%的话就可以了
		;継続接吻の処理
		CALL TOUCH_SET(SET_FROM_M, SET_M, 30)
		TEQUIP:継続接吻 = 1
ENDSELECT
RESETCOLOR
PRINTFORML
RETURN

;==================================================
;Ａ性交用中出し射精、潮吹きメッセージ関数
;--------------------------------------------------
;ARG:状況分岐 =1 被逆推時 =2 背面駅弁 =3 まんぐりがえし =4 膣裏・Ｓ状結腸攻め =5 交互挿入(一人目の時のみ) = 6 CounterＡ挿入
;--------------------------------------------------
@K30_PRE_ORG_MES_A(ARG)
#DIM BODY
BODY = TEQUIP:体位
SIF BODY == 0
	BODY = TEQUIP:体位２
;中出し射精時に添える一言。フレーバー体位ではスキップ
LOCAL:1 = 0
SIF NOWEX:MASTER:11
	LOCAL:1 = 1
IF NOWEX:MASTER:11 && !TEQUIP:MASTER:避孕套
	;開発進むと同時ばかりなので随意散らす
	IF (NOWEX:Ａ絶頂 > 1 && RAND:4 == 1) || ARG > 1
		GOTO SQUIRTING
	ENDIF
	PRINTFORML
	PRINTDATA
		DATAFORM 「啊啊嗯~
		DATAFORM 「啊哈~
		DATAFORM 「啊呼~
		DATAFORM 「嗯~
	ENDDATA
	CALL HPH_PRINT(@"HPH　")
	PRINTDATA
		DATAFORM 给我，吧，炙热的，会把那、给我吧
		DATAFORM 忍耐，的话已经不能…是啊，是什么呀…
		DATAFORM 好啊…就这样，射出来…吶，射出来
		DATAFORM 又变粗了…马上就要到了吧
		DATAFORM 我做的舒服吗?对我满意吗?
	ENDDATA
	CALL HPH_PRINT, @"HPH」", "L"
	;Ａ同時絶頂分岐。開発(ry
	IF NOWEX:Ａ絶頂 > 1 && RAND:2 == 1
		SELECTCASE RAND:3
			CASE 0
				CALL HPH_PRINT, @"「我也要、来了HPH　所以、一起、一起HPH」", "W"
			CASE 1
				CALL HPH_PRINT, @"「吶、满满的，中出吧っHPH　我也、马上っHPH」", "W"
			CASE 2
				CALL HPH_PRINT, @"「我也要、一起、去了っHPH　就这样，一起去吧HPH」", "W"
		ENDSELECT
	;Ｖ中出しがダメな分岐
	ELSEIF K30_CREAMPIE()
		PRINTDATA
			DATAFORM 「这里的话，随时都可以射出来…没关系的
			DATAFORM 「这边的话，不需要担心…
			DATAFORM 「前面\@ K30_CREAMPIE() == 2 ? …暂缓一下、 # …不行… \@所以，在我的屁股上…
		ENDDATA
	CALL HPH_PRINT, @"HPH」", "W"
	ELSE
		PRINTDATA
			DATAFORM 「用我的屁股…用我的，变快乐…
			DATAFORM 「想射出来的地方……喜欢的地方都可以哦
			DATAFORM 「屁股也是…那里也不错，随便你…
		ENDDATA
	CALL HPH_PRINT, @"HPH」", "W"
	ENDIF
	RETURN 1
ENDIF
;Ａ強絶頂以上で潮吹き。冗長になるので射精時口上とは排他
;表示確率最大30%、同時絶頂、交互挿入時、CounterＡ挿入で+15%
$SQUIRTING
SIF NOWEX:Ａ絶頂 < 2
	RETURN 1
SIF RAND:100 > MIN(ABL:Ａ感覚 * 3, 30) + (LOCAL:1 * 15) + ((ARG == 5) * 15) + ((ARG == 6) * 15)
	RETURN 1
PRINTFORML
CFLAG:1607 ++
;潮吹きで部屋を汚す
SIF AT_HOME(30)
	YOGORE:(CFLAG:30:現在位置) += RAND:75 + 50
IF ARG == 2
	LOCAL = K30_FIND_AROUND()
	CALL HPH_PRINT, @"「不行啊HPH　已经…已经、不行了啊啊HPH」", "L"
	SIF LOCAL
		CALL HPH_PRINT, @"「我っ、明明是阎魔っHPH　%K30_C_NAME(LOCAL)%っ、明明在ぃHPH」", "W"
	PRINTFORMDL 映姬婉转动听的娇吟久久不停歇，同时从%SLIT(30)%喷射出的透明液体划出漂亮的弧线
	PRINTFORMDW 用这个样子吹潮的话，真的有一种小便的奇妙错觉…
;ニッチな性癖を攻めすぎだろ
ELSEIF ARG == 3
	CALL HPH_PRINT, @"「啊啊っHPH　啊啊啊啊~、不行啊啊HPH」", "L"
	PRINTFORMDW 被交叠的体位插进雪臀的映姬，突然发出急迫的声音
	PRINTFORMDW 同时从%SLIT(30)%透明液体%TEXTR("猛地迸发/大量喷出/激烈的飞溅/")%、全都落在了映姬身上
	CALL HPH_PRINT, @"「讨厌，讨厌啊HPH　这样的、这样的啊……HPH」", "L"
	PRINTFORMDW 被蒙上的爱液弄湿了头发，映姬在屈辱感和羞耻中颤抖着身体，登上了肛门绝顶…
	RETURN 1
ELSEIF ARG == 6 && BODY == 3
	PRINTFORMDW 主动将阴茎吞入肛門、但映姬已经没有余裕就快要登顶极乐…
	CALL HPH_PRINT, @"「总觉得HPH　奇怪！　这个HPH　中出HPH　中出了唔唔呜HPH」", "L"
	PRINTFORMDW 因快乐而放松的的%SLIT(30)%里，透明的爱液以%TEXTR("猛地迸射/大量喷出/激烈地飞溅/")%、把什么都没做的%CALLNAME:MASTER%弄得黏糊糊的…
ELSE
	SIF ARG == 5
		LOCAL = MASTER_POSE(7, 1, 1)
	IF BODY == 3
		PRINTFORMD 自己主动摇着腰贪图菊花快乐的映姬
	ELSE
		PRINTFORMD %CALLNAME:MASTER%
		SELECTCASE BODY
			CASE 1, 4
				IF BODY == 1 && (!BEDROOM(CFLAG:PLAYER:現在位置) && !(BATHROOM() && ITEM:20))
					PRINTFORMD 面对面
				ELSE
					PRINTFORMD 从正面
				ENDIF
			CASE 2, 5
				IF BODY == 2 && (!INROOM(CFLAG:PLAYER:現在位置) && !(BATHROOM() && ITEM:20))
					PRINTFORMD 从背后
				ELSE
					PRINTFORMD 从后面将
				ENDIF
		ENDSELECT
		SIF ARG == 5
			PRINTFORMD 和%CALLNAME:LOCAL%两个人一起
		PRINTFORMD 肛门被插入的映姬
	ENDIF
	IF ABL:露出癖 > 4 && CFLAG:1607 > 4 && K30_FIND_AROUND() == 0
		PRINTDATADL
			DATAFORM 身体突然失去力气
			DATAFORM 突然浑身颤抖
			DATAFORM 紧紧地夹住肉棒
		ENDDATA
	ELSE
		PRINTDATADL
			DATAFORM 身体僵硬猛地屏住呼吸
			DATAFORM 身体剧烈一弹
			DATAFORM 突然瞪大眼睛猛摇头
		ENDDATA
	ENDIF
	PRINTFORMD 同时%SLIT(30)%里透明的液体%TEXTR("猛地迸发/大量喷出/激烈的飞溅/")%、
	SELECTCASE BODY
		CASE 1
			IF (!BEDROOM(CFLAG:PLAYER:現在位置) && !(BATHROOM() && ITEM:20))
				PRINTFORMDW %CALLNAME:MASTER%湿漉漉的…
			ELSE
				PRINTFORMDW 彼此的腹沟间都湿濡了…
			ENDIF
		CASE 2
			IF (!INROOM(CFLAG:PLAYER:現在位置) && !(BATHROOM() && ITEM:20))
				PRINTFORMD 映姫白嫩嫩的玉足和\@ BATHROOM() ? 床 # 地面 \@湿透了…
				PRINTFORMDW
			ELSE
				PRINTFORMD 哗啦哗啦
				IF BEDROOM(CFLAG:MASTER:現在位置)
					PRINTFORMD 被褥
				ELSEIF INROOM(CFLAG:MASTER:現在位置)
					PRINTFORMD \@ INROOM(CFLAG:MASTER:現在位置) == 1 ? 畳 # 床 \@
				ELSE
					PRINTFORMD 地面
				ENDIF
				PRINTFORMDW 弄湿了…
			ENDIF
		CASE 3
			IF TCVAR:30:398 == 1
				PRINTFORMDW 正面划出一道漂亮的弧线……
			ELSE
				PRINTDATADW
					DATAFORM 连%CALLNAME:MASTER%的脸上都全部皆是…
					DATAFORM %CALLNAME:MASTER%从胸部到脸上都湿透了…
					DATAFORM 处于下面的%CALLNAME:MASTER%像淋浴一样被浇遍了…
					DATAFORM 处于下面的%CALLNAME:MASTER%黏糊糊的…
				ENDDATA
			ENDIF
		CASE 4
			PRINTFORMDW 彼此的肚子都湿透了…
		CASE 5
			PRINTFORMDW 正面划出一道漂亮的弧线……
	ENDSELECT
ENDIF
IF CFLAG:1607 == 1
	IF ARG > 1
		PRINTFORML 「不是的！！这个，真的不是！……不要看…」
		PRINTFORMDW 潮吹的羞耻和快乐混杂在一起，映姬登上了肛门的极乐……
	ELSE
		PRINTFORML 「诶~…诶~！？　我，我我怎么啦…？」
		PRINTFORMDW 对第一次的潮吹感到困惑的同时，映姬登上了菊花峰的山顶…
	ENDIF
ELSEIF K30_FIND_AROUND() || ARG == 5
	LOCAL = K30_FIND_AROUND()
	SIF ARG == 5
		LOCAL = MASTER_POSE(7, 1, 1)
	PRINTFORMD %CALLNAME:LOCAL%对閻魔様的潮吹
	IF PALAM:LOCAL:欲情 < PALAMLV:8
		PRINTFORMDW %TEXTR("看得目瞪口呆/看着吃惊不已/把它当成了情趣，脸红了/")%
	ELSE
		PRINTFORMDW %TEXTR("用好奇的目光注视着/不可思议地用手指比划着水滴/目不转睛地死死盯着看/")%
	ENDIF
	SELECTCASE RAND:3
		CASE 0
			CALL HPH_PRINT, @"「不要看！　%K30_C_NAME(LOCAL)%っ、求你了HPH　不要看啊HPH」", "L"
		CASE 1
			CALL HPH_PRINT, @"「啊啊啊っHPH　%K30_C_NAME(LOCAL)%が…%K30_C_NAME(LOCAL)%がっ、明明在看…HPH」", "L"
		CASE 2
			CALL HPH_PRINT, @"「讨厌，讨厌啊HPH　%K30_C_NAME(LOCAL)%…这个，不是的HPH　不是这样啊HPH」", "L"
	ENDSELECT
	PRINTDATAD
		DATAFORM 一点点也好，映姬扭动着娇躯，试图从%CALLNAME:LOCAL%的视线中逃脱。
		DATAFORM 映姫面对%CALLNAME:LOCAL%的视线、顿觉強烈的羞恥\@ ABL:露出癖 > 7 ? 和興奮 # \@之感
		DATAFORM 无法在%CALLNAME:LOCAL%面前停下来，映姬颤抖着身体不断攀登绝顶
	ENDDATA
	PRINTFORMDW 同时登上肛门绝顶…
ELSEIF ABL:露出癖 > 4 && CFLAG:1607 > 10
	;ニッチな性癖(ry
	IF BODY == 3 && TCVAR:30:398 == 0
		SELECTCASE RAND:3
			CASE 0
				CALL HPH_PRINT, @"「呼呼っHPH　尿尿似的、像…HPH」", "L"
			CASE 1
				CALL HPH_PRINT, @"「啊哇っHPH　湿透了、呢…HPH」", "L"
			CASE 2
				CALL HPH_PRINT, @"「呜呼呼っHPH　让我愉快、的奖励、吶…HPH」", "L"
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 0
				CALL HPH_PRINT, @"「呼呼っ…HPH　满满…中出了HPH」", "L"
			CASE 1
				CALL HPH_PRINT, @"「啊哇っHPH　有什么…不可思议的感觉HPH」", "L"
			CASE 2
				CALL HPH_PRINT, @"「呜呼呼っHPH　中出了……HPH」", "L"
		ENDSELECT
	ENDIF
	SELECTCASE RAND:3
		CASE 0
			CALL HPH_PRINT, @"「…啊ー啊HPH　到周围…全湿漉漉…HPH」", "L"
		CASE 1
			CALL HPH_PRINT, @"「…特别的、很舒服、哦HPH」", "L"
		CASE 2
			CALL HPH_PRINT, @"「…停不下来，没办法了HPH」", "L"
	ENDSELECT
	PRINTDATAD
		DATAFORM 映姬放纵吹潮感、
		DATAFORM 映姬沉浸在排尿般的奇妙感觉中、
		DATAFORM 映姬对溢出的潮水感到满足
	ENDDATA
	PRINTFORMDW 同时登上肛门绝顶…
ELSE
	SELECTCASE RAND:3
		CASE 0
			CALL HPH_PRINT, @"「不对，这个，不是的HPH」", "L"
		CASE 1
			CALL HPH_PRINT, @"「停不下来HPH　停不下来啊HPH」", "L"
		CASE 2
			CALL HPH_PRINT, @"「不行啊HPH　忍耐，做不到呀HPH」", "L"
	ENDSELECT
	PRINTDATAD
		DATAFORM 映姬一边困惑于不断涌出的潮水，
		DATAFORM 映姬一边因潮吹的羞耻和快乐而浑身发抖，
		DATAFORM 映姬一边因为潮吹的害羞而把脸颊染成红色，
	ENDDATA
	PRINTFORMDW 一边登上肛门的绝顶…
ENDIF
RETURN 1

;==================================================
;縦割れ肛門発覚
;変な電波が降りてきたので勢いで書く
;--------------------------------------------------
@K30_VERTICAL_ANUS
#DIMS BUNKI
;こういう事言うには信頼関係が大事
SIF !TALENT:恋慕 || SHIRAHU(30) != 2
	RETURN
;何か入っている時はわからない
SIF TEQUIP:肛用振動棒 || TEQUIP:Ａ接触部位 == 1
	RETURN
;張開肛門だと即指摘
SIF SELECTCOM == 13
	GOTO LOOK
;お尻が広がる指令と見つける指令を無駄に精査
SIF !GROUPMATCH(PREVCOM, 5, 45, 62, 63, 66, 69, 70, 74, 75)
	RETURN
SIF !GROUPMATCH(SELECTCOM, 0, 1, 3, 4, 5, 8, 40, 41, 44, 45, 60, 61)
	RETURN
IF PREVCOM == 45
	BUNKI = 肛用振動棒でぽっかり開いた
ELSEIF MASTER_POSE(7, 1, 1) == 30
	BUNKI = %CALLNAME:MASTER%の阴茎で拡がった
ELSE
	BUNKI = %CALLNAME:MASTER%の指で拡げた
ENDIF
$LOOK
WAIT
SETBIT CFLAG:1910, 7
CALL K30_D_LINE
IF SELECTCOM == 13
	PRINTFORMDL 映姫が\@ ABL:露出癖 >= 5 ? 高兴地 # 不情愿地 \@放大展示给我的肛门慢慢恢复原样
ELSE
	PRINTFORMDL %BUNKI%映姬的肛门慢慢恢复了原来的样子
ENDIF
PRINTFORMDW 过了一会儿就会像原来那样紧紧地合上，但%CALLNAME:MASTER%感觉有什么不对劲的感觉…
IF SELECTCOM == 13
	PRINTFORML 「那，那么，一直被盯着看的话，总觉得…很为难啊…」
	PRINTFORML 「给你看了这么多，有什么…还有吗…」
ELSE
	PRINTFORML 「吶，为什么总是盯着屁股看呢，有什么好看的…」
ENDIF
PRINTFORML 「诶诶哆…难道，有什么…奇怪？　我的屁股，哪里…奇怪吗…？」
CALL K30_PRINT_BUTT_IMAGE(0, 1, 0, 1, 0, 0)
PRINTFORMW
PRINTFORMDL 有点焦虑的观察映姬的肛门。%CALLNAME:MASTER%终于发现了不协调的真面目
PRINTFORMDL 映姬的菊花已经不再狭窄，不知什么时候变成了纵长的缝隙
PRINTFORMDW 慢慢開发的结果，排泄器官好像变成了为了接受快乐的第二性器…
PRINTFORML
PRINTFORML 「告诉我，真的是怎么了…?说不出口…有什么奇怪的吗…？」
PRINTFORMDW 面对不安的映姬，%CALLNAME:MASTER%把事情说清楚了
PRINTFORML
PRINTFORML 「屁股…的洞，变成了…竖缝？　……这到底是，怎么回事…？」
PRINTFORMW 「……………」
PRINTFORML 「诶~哆、简单来说…『我的屁股清楚地记住了你的…小鸡鸡的形状』……？？」
PRINTFORMW 「……………」
CALL COLORMESSAGE("「～～～～～＠☆！！」", C_RED,1, 0)
PRINTFORMDL 说明结束后，映姬已经羞不可遏的遮住了通红的面容
PRINTFORMDL 只有暴露在外面的纵裂肛门还是一如既往地引诱着
CALL K30_D_LINE
RESETCOLOR
PRINTFORMW
RETURN

;==================================================
;振動棒挿入约会
;さらに変な電波が降りてきたので勢いで書く
;パールの人と違ってリアリティは投げ捨て
;挿絵と収集胖次の都合で振動棒约会中は没穿内裤扱い
;--------------------------------------------------
;判定関数
@K30_INSERT_VIBE_DATE
VARSET LOCAL
VARSET LOCALS
SIF TCVAR:30:380 || STRFIND(CSTR:30:1, "振動棒约会") > -1
	RETURN 0
SIF K30_CHECK_HEN_T() || DAY % 2 == 0
	RETURN 0
SIF MARK:反発刻印 || TALENT:心情 == -1 || CFLAG:妊娠自覚状態 || (TALENT:育児中 && TFLAG:描写中の兒童)
	RETURN 0
SIF !GETBIT(CFLAG:30:1910, 7) || ABL:露出癖 < 6
	RETURN 0
;口上から予約済み
IF GETBIT(CFLAG:1609, 0) && !CFLAG:1608
	CLEARBIT CFLAG:1609, 0
	LOCAL = 1
	GOTO SKIP
ENDIF
SIF TALENT:尻穴狂 && CFLAG:1608
	GOTO SKIP
SIF RAND:1000 >= (MAX(CFLAG:积攒度 / 10, 75) + MIN(CFLAG:1608 * 75, 750))
	RETURN 0
$SKIP
CALLF ONCE("振動棒约会")
SETBIT CFLAG:1609, 3
IF !CFLAG:1608
	PRINTFORMW 「……………啊诺」
	PRINTFORMDL %CALLNAME:MASTER%\@ TCVAR:30:358 ? 邀约后、 # 被约会后 \@映姬不知为何环顾四周，确认有没有人在看
	PRINTFORMDL 是有什么难以启齿的事吗…？
	PRINTFORMW
	PRINTFORMW 「那个，是吧…现在開始，出门…之前，那个……」
	PRINTFORMW 「%K30_C_NAME(MASTER)%……如果，可以的话…把这个…对我…」
	PRINTFORMW 「经你之手…把这个，给我…能给我戴上吗…?」
	PRINTFORMDL 映姬提心吊胆地拿出的竟然是肛用振动棒…！
	PRINTFORMDL 而且还可以用皮带固定……难道可以插上这个约会吗？？
	PRINTFORMW
	IF LOCAL
		PRINTFORMW 「我的屁股，被你太多次…给疼爱着。…」
		PRINTFORMW 「太舒服了，已经…忘不了了，屁股…好痛，没办法了…」
		PRINTFORMW 「我那个，最尴尬的秘密... 给你知道了」
		PRINTFORMW 「想变得更，更…乱七八糟，更舒服…」
	ELSE
		PRINTFORMW 「真是，太愚蠢了…真是太丢人了…你知道我在拜托一件蠢事」
		PRINTFORMW 「但是…我，和你两个人…我想拥有绝对，不能对任何人说的秘密」
		PRINTFORMW 「和改变了的我，就这样做了%K30_C_NAME(MASTER)%的…只有两个人的秘密…」
	ENDIF
	PRINTFORMW 「……怎么样……不行吗？这么低级的事…」
	RESETCOLOR
	CALL ASK_YN("放棄ように諭す", "とことん交手")
	CALL M_KOJO_COLOR_K30
	CLEARLINE 1
	IF !RESULT
		PRINTFORMW 「……………」
		PRINTFORML 「是啊，是啊……我在想什么呢…」
		PRINTFORMW 「嗯，现在的事情…请全部忘记」
		PRINTFORMW 「那，那么，快点出门吧」
		SETBIT CFLAG:1609, 2
		RETURN 1
	ENDIF
	PRINTFORMW 「啊，感激，不尽」
	PRINTFORMW 「所以…%K30_C_NAME(MASTER)%」
	IF EQUIP:30:下半身内衣２
		PRINTFORML 「这个，先…交给您」
		PRINTFORMDW 映姬递给我什么……是刚脱下来的内衣
		PRINTFORML 「一直穿的话，就不能很好地戴上……」
		PRINTFORML 「这也是，你和我的…秘密…呢」
		PRINTFORMDW %CALLNAME:MASTER%把%PANTSNAME(EQUIP:30:下半身内衣２, 30)%谨慎的收好
		CALL K30_PANTS_GETTING
		PRINTFORML 「还有…心理准备做好了。用你的手…可以拜托你吗？」
	ELSE
		PRINTFORML 「我已经做好了心理准备……现在能在这里……拜托你了吗？」
	ENDIF
	PRINTFORMW
	CALL K30_PRINT_BUTT_IMAGE(-1, 1, 0, -1, 1, 0)
	PRINTFORMDL 映姬主动卷起裙子，竖缝的菊穴就露出来了
	PRINTFORMDW 彼此被异样的紧张和兴奋所包围的同时，%CALLNAME:MASTER%让映姬的柔软的肛门吃下振动棒…
	LOCALS:3 = んっ…HPH　没关系，已经……能走了HPH
	LOCALS:6 =「那么，%K30_C_NAME(MASTER)%…让您久等了」\n「只有你和我的，『秘密』の约会…我们走吧HPH」
	LOCAL = 3
ELSE
	PRINTFORML 「……那个、%K30_C_NAME(MASTER)%」
	PRINTDATAW
		DATAFORM 「今天也……拜托在屁股上……可以吗」
		DATAFORM 「之前的……太快乐了，完全忘不了…」\n「还可以，拜托你吗」
		DATAFORM 「之前的，好激动啊…已经很想念了…」\n「可以，再来一次吗」
	ENDDATA
	PRINTFORML 「和%K30_C_NAME(MASTER)%一起出门的同时」
	PRINTFORMW 「我的屁股%TEXTR("如此下流/如此卑鄙")%、想要让您…%TEXTR("教育我/欺负我/惩罚我/")%…♥」
	PRINTFORMDL 映姬用夹杂着兴奋和情欲的眼神，恳求地凝视着我……
	RESETCOLOR
	CALL ASK_YN("今日は普通に", "しっかり交手")
	CALL M_KOJO_COLOR_K30
	CLEARLINE 1
	IF !RESULT
		PRINTFORMW 「啊啦…？」
		PRINTFORML 「是、是吗…如果%K30_C_NAME(MASTER)%这么说…」
		PRINTFORMW 「呃哆…那么，我们早点走吧」
		RETURN 1
	ENDIF
	PRINTFORMDL %CALLNAME:MASTER%当然同意，把映姬拉到了一个不起眼的地方
	PRINTFORMW
	IF EQUIP:30:下半身内衣２
		PRINTFORML 「呼呼~…♥　阿里嘎多，%K30_C_NAME(MASTER)%」
		PRINTFORML 「那么，这个是…和我交往的奖励♥」
		PRINTFORMDL 不知何时脱的，映姫尚有余温的%PANTSNAME(EQUIP:下半身内衣２, 30)%递给了我
		PRINTFORMDW %CALLNAME:MASTER%把%PANTSNAME(EQUIP:30:下半身内衣２, 30)%谨慎的收好
		CALL K30_PANTS_GETTING
		PRINTFORML 「%TEXTR("啊啊……好厉害，心跳加速了/呃哆…已经准备好了/…嗯~♥　对不起，我……已经，很难受了")%…」
	ELSE
		PRINTFORML 「%TEXTR("已经……等不及了/什么时候都可以/就是这里…请在这里")%…」
	ENDIF
	STRDATA LOCALS
		DATAFORM 「求求了，快点…给我，快点…HPH」
		DATAFORM 「只有我和你…两个人的秘密，快点…在这里…HPH」
		DATAFORM 「是，这样吗…？　这样做，容易插入吗…HPH」
	ENDDATA
	CALL HPH_PRINT, LOCALS, "W"
	PRINTFORML
	CALL K30_PRINT_BUTT_IMAGE(-1, 1, 4, -1, 1, 0)
	PRINTFORMDL 映姬主动让看到她那纵长的臀洞，下意识地扭着腰央求
	PRINTFORMDW 那个姿态让%CALLNAME:MASTER%感到强烈的背德感的同时，让映姬的肛门吞下了震动棒
	LOCALS:3 '= "啊呼っHPH　已经习惯了…好像…HPH", "嗯っ、呼呼っHPH　这个、想要…HPH", "啊嗯っHPH　屁股、发抖……很舒服…HPHHPH"
	LOCALS:6 = 「%K30_C_NAME(MASTER)%…HPH　没关系，我们走吧HPH」\n「愉快的约会…来吧HPH」
	LOCAL = RAND:3 + 3
ENDIF
PALAM:潤滑 = PALAMLV:4
TCVAR:30:364 = 1
SETBIT CFLAG:1609, 1
TEQUIP:肛用振動棒 = 1
LOCALS:0 '= "…………", "……", "…"
RESETCOLOR
CALL PRINT_GROUP(LOCALS, 3)
CALL M_KOJO_COLOR_K30
CALL HPH_PRINT, @"「%LOCALS:LOCAL%」", "W"
CALL K30_PRINT_BUTT_IMAGE(-1, 2, 4, 3, 0, 0)
CALL HPH_PRINT, @"%LOCALS:6%", "W"
PRINTDATAD
	DATAFORM …被震动棒插着的映姫全身都是藏不住的淫靡色香、
	DATAFORM …偷偷忍受快感的映姬的表情非常诱惑、
	DATAFORM …映姬湿润的眼睛和烫热的呼吸，就像做爱时一样
ENDDATA
PRINTFORMDL %TEXTR("任谁都看得入迷了/不知不觉就被吸引住了目光/光看着就能激起情欲")%
PRINTFORMDL %TEXTR("这会不会被别人发现/总觉得特别引人注目/这样会被眼尖的人发现的/")%…？
PRINTFORMDW %CALLNAME:MASTER%一边这样担心一边和费洛蒙全開的映姬去约会了。
CFLAG:1608 ++
SIF DIARY:30:38 == 0
	CALL K30_WRITE_DIARY(38)
RETURN 1

;装着・ソース操作
@K30_DATE_WITH_VIBERATOR
;约会終了/中断でのリセット処理
IF (GET_MAPID(CFLAG:現在位置) == MAIN_MAP && CFLAG:現在位置 != OMANEKIBEYA())|| CFLAG:MASTER:约会中 != CFLAG:30:约会中
	TEQUIP:肛用振動棒 = 0
	TCVAR:30:364 = 0
	RETURN 1
ENDIF
TEQUIP:肛用振動棒 = 1
BASE:理性 = MAX((BASE:理性 - (50 + RAND:100)), 0)
CFLAG:积攒度 = MIN((CFLAG:积攒度 + RAND:30), 1000)
PALAM:潤滑 += 2000 + RAND:750
;こうしないと勝手に怒ったりすぐ倒れたりする。酷いソース操作だけど陥落後の茶番なので許して
SOURCE:反感 /= 10
SOURCE:鬱屈 /= 10
BASE:30:体力 += (DOWNBASE:体力 / 3 * 2)
BASE:30:気力 += (DOWNBASE:気力 / 3 * 2)
DOWNBASE:体力 /= 3
DOWNBASE:気力 /= 3
RETURN

;装着時约会終了処理
@K30_PULL_OUT_VIBE
SIF !TEQUIP:肛用振動棒
	RETURN
PRINTFORML
PRINTFORMW 「稍等…等一下、%K30_C_NAME(MASTER)%」
CALL HPH_PRINT, "「这样下去的话…回不去了、哟…HPH」", "L"
PRINTFORMDW 就在二人到达%K30_DIARY_PLACE(MAIN_MAP * 100)%之前、被映姬拉进了岔道…
PRINTFORML
CALL HPH_PRINT, "「好好地……到最后，我的……屁股，请多多指教…HPH」", "L"
PRINTFORMDL 映姫展示似的把裙子卷上来
PRINTFORMDL 洁白嫩滑的雪臀中心上有非常不相称的肛门震动棒在颤抖…
CALL K30_PRINT_BUTT_IMAGE(-1, 2, 4, 3, 1, 0)
PRINTFORMW
PRINTFORMDW %CALLNAME:MASTER%傻笑着，故意把插进去的震动棒慢慢地拔出来…
CALL HPH_PRINT, "「～～～～～～～～～っHPH」", "L"
LOCALS:0 '= "…………", "……", "…"
RESETCOLOR
CALL PRINT_GROUP(LOCALS, 3)
PRINTFORML
PRINTFORML 道具使用経験 +1(%CALLNAME:MASTER%)
PRINTFORML
PRINTFORML Ａ経験 ＋2(映姫)
PRINTFORML Ａ絶頂経験 ＋6(映姫)
PRINTFORMW 絶頂経験 ＋6(映姫)
DRAWLINE
PRINTFORML
PRINTFORML 一直享受到最后之最后的两人终于约会归来了…
PRINTFORMW
CALL M_KOJO_COLOR_K30
EXP:MASTER:道具使用経験 += 1
EXP:Ａ経験 += 2
EXP:Ａ絶頂経験 += 6
EXP:絶頂経験 += 6
;経験値UP表示を次ターンで出さない為の処理
TCVAR:MASTER:道具使用経験 += 1
TCVAR:30:Ａ経験 += 2
TCVAR:30:Ａ絶頂経験 += 6
TCVAR:30:絶頂経験 += 6
TEQUIP:肛用振動棒 = 0
TCVAR:30:364 = 0
RETURN 1

;==================================================
;後付け母乳口上＠せっかく噴乳差分も作ったんだし口上少しでも埋める
;映姫様は兒童を出産間近or授乳期間中だと你 <= 兒童というスタンス
;--------------------------------------------------
@K30_MILK_SQUIRT
#DIM 強絶頂
#DIMS 名前
;初回
SIF !FIRSTTIME("噴乳")
	GOTO SKIP
IF TALENT:母乳体質 == 1
	IF !EXP:出産経験
		PRINTFORML 「！！　欧派这... 出来了…！！」
		PRINTFORML 「看啊…请看、%K30_C_NAME(MASTER)%！　我…的奶水…」
		PRINTFORML 「我，已经成为妈妈了呢…好好地，对这个孩子的母亲……！」
		PRINTFORMDW 映姬有点感动得泪流满面
	ELSE
		PRINTFORML 「胸部好胀，所以，奶水出来了呢…」
		PRINTFORMW 「你看，%K30_C_NAME(MASTER)%…我也很好地成为了妈妈」
	ENDIF
ELSE
	PRINTFORML 「诶！　…诶诶诶~！！？　私！？　胸部！？　为什么胸部！？」
	PRINTFORMDW 映姬忘记了胸部的快感，一副非常吃惊的样子…
	PRINTFORML
	PRINTFORML 「不是因为宝宝…既然如此…」
	PRINTFORML 「这奶水……是为了你吗?」
	PRINTFORMW 「我的胸部…为了让%K30_C_NAME(MASTER)%喝掉……」
	PRINTFORMW 「……稍微，也许可以♥」
	CALLF FIRSTTIME("母乳定着")
ENDIF
RETURN
$SKIP
;恒常母乳体質取得
IF TALENT:母乳体質 == 2 && !STRCOUNT(CSTR:30:0, "母乳定着")
	PRINTFORML 「呵呵…吃惊吗，%K30_C_NAME(MASTER)%？」
	PRINTFORML 「你总是和%\@ CFLAG:出産経過日 ? %SHOW_CHILDNAME(30)% # 那些孩子 \@%互相争夺乳房…」
	PRINTFORMW 「我的，胸部好像一直出奶水来了…♥」
	PRINTFORML 「所以这样就放心了」
	PRINTFORMW 「%K30_C_NAME(MASTER)%，随时... 请多喝一杯。♥」
	CALLF FIRSTTIME("母乳定着")
	RETURN
ENDIF
;二回目以降
;噴乳で部屋を汚す
SIF AT_HOME(30)
	YOGORE:(CFLAG:30:現在位置) += RAND:15 + 15
;口が塞がる指令中はスキップ
SIF GROUPMATCH(SELECTCOM, 19, 20, 81, 88, 89, 91, 140)
	RETURN
強絶頂 = (TEQUIP:50 >= 0 || TEQUIP:51 >= 0 || TEQUIP:振動棒 || TEQUIP:肛用振動棒 || SELECTCOM == 9 || TFLAG:50 == 19) && NOWEX:TotalEX > 1
名前 = %\@ CFLAG:出産経過日 ? %SHOW_CHILDNAME(30)% # もうすぐ産まれるこの子 \@%
PRINTFORML
;噴乳
IF !TEQUIP:吸乳头
	PRINTDATADL
		DATAFORM 映姬的粉红乳头上黏稠地喷着雪白乳汁
		DATAFORM 映姬硬邦邦的美丽乳頭里还流着母乳
		DATAFORM 映姬的如粉红珍珠的奶头上还渗着母乳，慢慢地变成水滴滴下来
	ENDDATA
	;;同時絶頂時は余裕無さそう+絶頂口上に被るのであまり喋らせない
	IF 強絶頂
		PRINTFORML 「%TEXTR("啊哈~/嗯呼呼/啊呼~/")%♥　胸部%TEXTR("这…无法停止/…biubiu的跳着、好舒服/…出来了")%…♥」
		PRINTDATADL
			DATAFORM 映姬幸福地微笑着，尝到了喷乳绝顶的余韵…
			DATAFORM 滴落的母乳涂抹在她的乳房上，映姬沉醉在喷乳的快感中…春盎双峰玉有芽，背立银红喘未苏
			DATAFORM 在嘬吸母乳的同时，映姬露出了荡漾的笑容…
		ENDDATA
	ELSEIF CFLAG:1802
		PRINTDATAL
			DATAFORM 「嗯…出了很多…」
			DATAFORM 「胸部…出了很多呢…」
			DATAFORM 「嗯嗯~、很快就会溢出来…」
		ENDDATA
		PRINTDATAL
			DATAFORM 「%名前%让你也好好喝一杯吧…」
			DATAFORM 「因为%名前%，我的身体……非常努力啊…」
			DATALIST
				DATAFORM 「让%名前%喝我的奶\@ TALENT:妊娠 ? 等不及了 # 的事 \@…」
				DATAFORM 「\@ TALENT:妊娠 ? 好想，早点见面啊 # 觉得理所当然，是非常幸福的事情 \@」
			ENDLIST
		ENDDATA
	ELSE
		PRINTDATAL
			DATAFORM 「呼呼呼~、\@ NOWEX:噴乳 > 1 ? 奶水很多 # 满满 \@出来了…」
			DATAFORM 「厉害…如此\@ NOWEX:噴乳 > 1 ? 许多 # 厉害 \@的奶水啊…」
			DATAFORM 「尖尖、一直潮津津的…乳房，永远不停吗…」
		ENDDATA
		PRINTDATAL
			DATAFORM 「%K30_C_NAME(MASTER)%…吃一口怎么样♥」
			DATAFORM 「%K30_C_NAME(MASTER)%、我的…要不要再尝一尝我的味道♥」
			DATALIST
				DATAFORM 「别客气、%K30_C_NAME(MASTER)%」
				DATAFORM 「\@ TALENT:妊娠 ? 现在的话……可以喝哦 # 这个奶水…因为是你的东西 \@♥」
			ENDLIST
		ENDDATA
	ENDIF
;授乳
;強絶頂時
ELSEIF 強絶頂
	IF CFLAG:1802
		PRINTFORML 「%TEXTR("啊呼~…♥　嗯~/哈啊啊……♥　啊哈~/嗯…♥　诶嘿嘿っ/")%……♥」
		PRINTDATAL
			DATAFORM 「\@ TALENT:妊娠 ? 这孩子 # 那个孩子 \@的份儿…留下吧，吶♥」
			DATAFORM 「H的小宝宝\@ TALENT:妊娠 ? 、快出生 # …增加 \@了…♥」
			DATAFORM 「%K30_C_NAME(MASTER)%に、被喂奶…幸福…♥」
		ENDDATA
		PRINTDATADL
			DATAFORM 被强烈的快乐冲走，映姬一边喂着%CALLNAME:MASTER%的母乳一边露出最幸福的笑容
			DATAFORM 强烈的高潮余韵让思考变得模糊，映姬对哺乳行为也产生欲情。
			DATAFORM 映姫对趴在乳头上的%CALLNAME:MASTER%呆滞茫然看着
		ENDDATA
	ELSE
		PRINTFORML 「%TEXTR("啊呼~…♥　嗯~/哈啊啊……♥　啊哈~/嗯~…♥　嗯哈啊/")%…♥　啊哇哈……♥」
		PRINTDATAL
			DATAFORM 「好多、被喝了好多…♥」
			DATAFORM 「胸部…啾ー啾ー的被吸着，好舒服…♥」
			DATAFORM 「%K30_C_NAME(MASTER)%，胸部…很好吃吧♥」
		ENDDATA
		IF SELECTCOM == 9
			PRINTFORMDL 一边喂奶一边自慰这种几重倒错的行为，映姬的思考也放飞了，露出了呆滞的笑容
		ELSEIF TEQUIP:50 >= 0 || TEQUIP:51 >= 0
			PRINTFORMDL \@ TEQUIP:50 >= 0 ? 雌穴 # 肛門 \@边交流边哺乳给映姬带来强烈的快乐，身心都像被融化了一样
		ELSEIF TFLAG:50 == 19
			PRINTFORMDL 被哺乳PLAY强烈地刺激着母性和性欲，映姬像做梦一样抚摸着%CALLNAME:MASTER%的头
		ELSE
			PRINTFORMDL \@ TEQUIP:51 >= 0 ? 肛門 # \@因为震动棒和哺乳而达到高潮的映姬，不见了平时的威严，恍惚地嘟囔着
		ENDIF
	ENDIF
;授乳PLAY
ELSEIF TFLAG:50 == 19
	名前 = %\@ CFLAG:出産経過日 ? %SHOW_CHILDNAME(30)% # お腹にいるこの子 \@%
	IF TCVAR:30:375 && !STRCOUNT(CSTR:30:0, "授乳手コキ")
		PRINTFORML 「………真不愧是…做得太过分了吧…？」
		PRINTFORML 「自己也，稍微…害羞…」
		PRINTFORMW 「但是…偶尔的话，这个程度…♥」
		CALLF FIRSTTIME("授乳手コキ")
		CALLF FIRSTTIME("授乳PLAY")
		TCVAR:30:375 = 0
		RETURN
	ELSE
		IF TCVAR:30:375
			TCVAR:30:375 = 0
			PRINTFORML 「诶嘿嘿ふっ♥　%MASTERNAME:30%酱，胸部，好喝吗♥　好喝吗♥」
			PRINTFORMW 「乖呀 乖呀♥　嘭嘭、满满的…♥」
			PRINTFORML 「……………あっ」
			PRINTDATAW
				DATAFORM 「稍微，这个…好像会上瘾，很为难呢…」
				DATAFORM 「这个，做这样的事，对别人一定要保密啊…」
			ENDDATA
			RETURN
		ELSEIF CFLAG:1802
			PRINTFORML 「我是…%名前%的妈妈，但是…」
			PRINTFORML 「这样做也很幸福。真的，很幸福…♥」
		ELSEIF !EXP:出産経験 && RAND:2 == 1
			PRINTFORML 「啊…总觉得充满了幸福的心情…」
			PRINTFORML 「做妈妈……是这样的吗…♥」
		ELSE
			PRINTFORML 「这样做……总觉得很開心」
			PRINTFORML 「请，再对我，撒撒娇…♥」
		ENDIF
	ENDIF
	PRINTFORMDL 映姬露出满足的笑容，就像哄着%CALLNAME:MASTER%一样继续喂奶
;授乳期間中
ELSEIF CFLAG:1802
	;映姫様主導
	IF CFLAG:诶嘿嘿 == 2
		PRINTFORML 「这个欧派…%名前%的东西，是什么…吶」
		PRINTFORML 「%K30_C_NAME(MASTER)%如果能喝的话，我会很高兴……幸福，不由得…」
	ELSE
		PRINTFORM 「%TEXTR("あんっ/んんっ/あふっ/")%…
		PRINTDATAL
			DATAFORM 这些奶水是%名前%最重要的饭，要说的话…」
			DATAFORM %K30_C_NAME(MASTER)%、和%名前%胸部的争夺」
			DATAFORM 那么吸的话，%名前%的份儿可能就没了…」
		ENDDATA
		PRINTDATAL
			DATAFORM 「不能全部喝掉哦…?」
			DATAFORM 「请至少留下一侧哦…？」
			DATAFORM 「稍微客气一下啊…？」
		ENDDATA
	ENDIF
	PRINTDATADL
		DATAFORM 映姬温柔的抱着%CALLNAME:MASTER%的头有点困扰
		DATAFORM 映姬脸上浮现出快感中略带罪恶感的微妙表情
	ENDDATA
ELSE
	PRINTFORM 「%TEXTR("啊嗯~/啊呼~/啊呼~/嗯嗯~")%♥
	PRINTDATAL
		DATAFORM 真的…好像成为了%K30_C_NAME(MASTER)%的妈妈…♥」
		DATAFORM 真的是H的吸法…但是，这种感觉…非常好♥」
		DATAFORM 不只是舒服…还有非常幸福的感觉…♥」
	ENDDATA
	PRINTDATAL
		DATAFORM 「\@ TALENT:妊娠 ? 趁现在 # 还会出现 \@、请多喝点…♥」
		DATAFORM 「不用慌张…直到%K30_C_NAME(MASTER)%满足之前，请慢用…♥」
		DATAFORM 「……恰啊嗯♥　吸了那么多，就这样停不下来了♥」
	ENDDATA
	PRINTDATADL
		DATAFORM 映姬因哺乳的快感和满足而浑身颤抖
		DATAFORM 抱着%CALLNAME:MASTER%的头，映姬紧紧地推着玉乳
		DATAFORM 嘬吸乳头的%CALLNAME:MASTER%刺激了母性，映姬露出了恍惚的表情
	ENDDATA
ENDIF
WAIT
RETURN

;口上内で攻守交代したのを元に戻す関数
@K30_REVERT_POSITION
CALL K30_D_LINE
SIF SELECTCOM == 850
	RETURN
IF TCVAR:30:362 == 2
	PRINTFORM 「%TEXTR("嗯嗯~/呼呼呼~/哈啊~/")%♥
	PRINTDATAL
		DATAFORM 中出了好多…♥」
		DATAFORM 总觉得很幸福……♥」
		DATAFORM 这样的话阎魔大人也会怀孕的吧…♥」
	ENDDATA
	PRINTFORMDW 暂时满足的映姬拔出阴茎后，%SAMEN_DESCRIPTION(MASTER,1)%扑通一声溢出来了…
	PRINTFORML 「谢谢，%K30_C_NAME(MASTER)%」
	PRINTFORML 「从这里開始，就按照你的喜好，请吧…♥」
	PRINTFORMDL 映姬躺在那里引诱着我%CALLNAME:MASTER%を看了过来
ELSE
	PRINTFORM 「%TEXTR("嗯~/啊呼~/呼呼呼~/")%…♥
	PRINTDATAL
		DATAFORM 总之是这样的地方吧♥」
		DATAFORM 怎样？　\@ TCVAR:30:362 == 4 ? 完全干净了 # 非常舒服 \@不是吗♥」
		DATAFORM \@ TCVAR:30:362 == 4 ? 又变大了 # 出了很多 \@♥」
	ENDDATA
	PRINTFORMDL \@ TCVAR:30:362 == 4 ? 把剩余的精液全部吸出来 # 充分在嘴里射出来 \@映姬似乎暂时满足了
	PRINTFORML 「然后呢…%K30_C_NAME(MASTER)%」
	PRINTFORML 「希望你，还能再做…♥」
	PRINTFORMDL 映姫对\@ TCVAR:30:362 == 4 ? 再度勃起 # 没有衰退的迹象 \@的阴茎热切地看了过来…
ENDIF
PRINTFORMW
;接触部位リセットして推倒に移行
CALL TOUCH_SET(0,0,0,1)
SIF TCVAR:30:362 == 2
	CALL 挿入解除(30)
TCVAR:30:362 = 0
CFLAG:MASTER:诶嘿嘿 = 1
CFLAG:30:诶嘿嘿 = 1
TFLAG:COMABLE管理 = 2
RETURN

;==================================================
;映姫様に顔射口上
;勢いで顔射アニメまで作ったけど対応する地の文が無い→自己つくれば解決
;--------------------------------------------------
@K30_FACECUM
#DIM 分岐
分岐 = 0
;条件判定
;恋慕時「精液を飲み下すだけで完全に発情する身体になっている」で大量射精時に33%
IF SELECTCOM == 88 && TFLAG:192
	分岐 = 1
	GOTO SKIP
ENDIF
SIF TCVAR:30:385 || TCVAR:30:强行 || !SHIRAHU(30) || !TALENT:恋慕
	RETURN 0
SIF TFLAG:193 || TCVAR:30:362 == 3 || TCVAR:30:375 || RAND:3
	RETURN 0
SIF EXP:精飲経験 <= 300 || ABL:精液中毒 < 10 || NOWEX:MASTER:射精 == 1
	RETURN 0
$SKIP
;ここまで抜けたら確定
;顔射アニメ
CALL K30_BLOW_JOB_ANIME(3)
PRINTFORML
;你絶頂描写を地の文からコピペ
RESETCOLOR
VARSET LOCAL
LOCAL = SUMARRAY(NOWEX:MASTER:0, 0, 5)
IF LOCAL >= 1
	PRINTFORM %CALLNAME:MASTER%は
	IF NOWEX:MASTER:五重絶頂 || NOWEX:MASTER:四重絶頂
		PRINTFORML 强烈的快感风暴席卷全身，一边苦闷的呻吟叫喊一边疯狂战栗
	ELSE
		IF NOWEX:MASTER:Ｃ絶頂
			PRINT 阴茎
			LOCAL:1 = 1
		ENDIF
		IF NOWEX:MASTER:Ｖ絶頂
			SIF LOCAL:1
				PRINT と
			PRINT 膣
			LOCAL:1 = 1
		ENDIF
		IF NOWEX:MASTER:Ａ絶頂
			SIF LOCAL:1
				PRINT と
			PRINT 肛門
			LOCAL:1 = 1
		ENDIF
		IF NOWEX:MASTER:Ｂ絶頂
			SIF LOCAL:1
				PRINT と
			IF TALENT:MASTER:性別 & 1
				PRINT 胸
			ELSE
				PRINT 乳頭
			ENDIF
			LOCAL:1 = 1
		ENDIF
		IF NOWEX:MASTER:Ｍ絶頂
			SIF LOCAL:1
				PRINT と
			PRINT 唇
			LOCAL:1 = 1
		ENDIF
		IF LOCAL >= 5
			PRINTFORML 感受到了袭来的强烈的绝顶感，脑子一片空白
		ELSE
			PRINTFORML 绝顶的快感令身体不断颤抖
		ENDIF
	ENDIF
ENDIF
;映姫様にかける地の文
IF 分岐 || RAND:2
	PRINTFORML 在高潮前一刻,映姬松开了嘴,满足地凑近了%TINKO(PLAYER)%
ELSE
	PRINTFORML 射精前抽出%TINKO(PLAYER)%抵到映姬面前
ENDIF
PRINTFORMW 被撒出来的%SAMEN_DESCRIPTION(PLAYER,1)%污浊了脸的同时、映姫\@ SUMARRAY(NOWEX:30:0, 0, 5) ? 恍惚 # 歓喜 \@的表情逐渐隐现…
CALL POISONBODY_MESSAGE(3)
CALL M_KOJO_COLOR_K30
;口上の反応もこっちでやる
IF 分岐
PRINTDATAL
		DATAFORM 「嘴巴...脸...肚子里面...」\n「全部...全部被%K30_C_NAME(MASTER)%...填满了...♥」
        DATAFORM 「收到了那么多...♥」\n「非常...满足...♥」
        DATAFORM 「怎么样...?我的舌头和嘴...」\n「也让%K30_C_NAME(MASTER)%满意了吗...♥」
	ENDDATA
ELSE
	PRINTDATAL
	DATAFORM 「啊哈…♥ 整个脸都被你的味道…包围着…♥」\n「奇怪的味道…但是，这个，我喜欢这个…非常喜欢…♥」
	DATAFORM 「脸上…很热，非常的，热…♥」\n「连头都……晕乎乎的…♥」
	DATAFORM 「出来了，很多呢…非常，的多♥」\n「怎么办…眼睛，都睁不開了…♥」
	DATAFORM 「唔呼♥　你的味道，让我浸透了……」\n「我已经…是你的东西了呢…♥」
	DATAFORM 「嗯……出来了，很多呢…」\n「那么，接下来…是不是该收拾干净了…♥」
	ENDDATA
ENDIF
PRINTDATADW
	DATAFORM 为了不让垂下的%SAMEN_DESCRIPTION(PLAYER,1)%洒出来，映姬把舌头伸向%TINKO(PLAYER)%…
	DATAFORM 映姬不顾从脸上垂下来的%SAMEN_DESCRIPTION(PLAYER,1)%，继续亲吻着眼前的肉枪……
	DATAFORM 映姬将滴下的%SAMEN_DESCRIPTION(PLAYER,1)%用手指擦拭，含入嘴里\n映姬继续着清扫工作，慢慢品味着…
ENDDATA
RETURN 1

;==================================================
;賢者タイム中映姫様に褒めてもらえる口上
;--------------------------------------------------
@K30_KENJYA_TIME
SIF STRCOUNT(CSTR:30:1, "賢者") || RAND:2 || CFLAG:1701 < 10
	RETURN
CALLF ONCE("賢者")
CALL K30_D_LINE
SELECTCASE SELECTCOM
	CASE 301
		PRINTFORMD 感谢的谈话结束后
	CASE 412
		PRINTFORMD %CALLNAME:MASTER%做完功课收拾东西的时候
	CASE 436
		PRINTFORMD 把读完的书放回去的时候
	CASE 621
		PRINTFORMD 钓上来了\@ GROUPMATCH(TFLAG:193, 606, 609, 643) ? 宝贝 # 魚 \@，在收起的过程中
ENDSELECT
PRINTFORMDL 映姬跟我搭话了
PRINTFORMW
PRINTFORM 「…怎么说呢」\n「今天的%K30_C_NAME(MASTER)%は
PRINTDATAL
	DATAFORM 看起来很沉着，给人留下了很好的印象」
	DATAFORM 也没有像往常一样浮躁的地方，总觉得很好」
	DATAFORM 看起来在深思熟虑」\n「看起来和往常不一样了」
ENDDATA
IF RAND:2 == 1
	PRINTDATAW
		DATAFORM 「可以清楚地看到，你并没有被烦恼所迷惑。」\n「你似乎理解了我的教诲，非常好」
		DATAFORM 「不被任何人扰乱心智的无我境界」\n「一朝一夕就到达了那样的地方吗…」\n「总之很棒呢」
	ENDDATA
ELSE
	SELECTCASE SELECTCOM
		CASE 301
			PRINTDATAW
				DATAFORM 「我花时间去传授我的教诲」
				DATAFORM 「你能认真听我说话，我也很高兴」
			ENDDATA
		CASE 412
			IF ABL:MASTER:教養 > ABL:30:教養
				PRINTDATAL
					DATAFORM 「所以我也明白我学到了什么。」
					DATAFORM 「托您的福，我的学习也有了很大的进展」
				ENDDATA
				PRINTFORMW 「真的非常感谢」
			ELSE
				PRINTDATAW
					DATAFORM 「对方理解得快的话，教的人也会变得快乐。」
					DATAFORM 「看，学习进行了这么多，都到了这个时间…」\n「你看起来真的很专注。」
				ENDDATA
			ENDIF
		CASE 436
			PRINTFORMW 「你能在这个时间读完这么多，说明你很专注。」
		CASE 621
			PRINTDATAW
				DATAFORM 「所以才会有今天这样的好成绩。」
				DATAFORM 「是因为你保持了安静，集中注意力，所以才会有结果」
			ENDDATA
	ENDSELECT
ENDIF
PRINTFORMDL 映姫は\@ TALENT:恋慕 ? 总觉得很高兴地点头 # 志得意满的自夸 \@
IF FLAG:祈願内容 == 201
	PRINTFORMDL 虽然只是为了平息焦躁的祈祷而平静下来，但也不是特意说的吧…
ELSE
	PRINTFORMDL 似乎只是误解了贤者时间，就这样保持沉默就好了…
ENDIF
PRINTFORMDL 好感度 ＋5(映姫)
PRINTFORMDL 信賴度 ＋5(映姫)
PRINTFORMW
CFLAG:30:好感度 += 5
CFLAG:30:信賴度 += 5
RETURN 1

;==================================================
;無自覚孕ませ警告文
;--------------------------------------------------
@K30_WARNING_MAKE_PREGNANT
SIF CFLAG:口上用引継ぎ枠 || SHIRAHU(30)
	RETURN
SIF TCVAR:口服避孕薬 || TEQUIP:MASTER:避孕套
	RETURN
CFLAG:口上用引継ぎ枠 = 1
PRINTFORMDL %CALLNAME:MASTER%的头脑中突然响起一个神秘的声音
FONTITALIC
PRINTFORMDL 「映姬大人因无意识怀孕而心有创伤,部分选项被限制」
PRINTFORMDL 「请谨慎地采取无防护内射行为」
PRINTFORMW
FONTREGULAR

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/追加ファイル/M_KOJO_K30_オート喘ぎ(まぐろ)・追加シチュ.ERB


path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/追加ファイル/M_KOJO_K30_関数・お説教ライブラリ.ERB