code:
;-------------------------------------------------
;奴隷の絶頂時の口上
;NOWEX:0～4 CVABM絶頂
;NOWEX:6 二重絶頂
;NOWEX:7 三重絶頂
;NOWEX:8 四重絶頂
;NOWEX:9 五重絶頂
;NOWEX:10 噴乳
;NOWEX:11 射精
;NOWEX:12 放尿
;-------------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_B_K30
#DIM RESET
#DIM SEX_COUNT, 8
CALL PALAM_MESSAGE_B
IF RESET < TCVAR:30:383
	RESET = TCVAR:30:383
	VARSET SEX_COUNT
ENDIF
;诶嘿嘿時の絶頂をカウント
IF CFLAG:诶嘿嘿 && SHIRAHU(30)
	FOR COUNT, 0, 5
		SIF NOWEX:COUNT
			TCVAR:30:(390 + COUNT) ++
	NEXT
ENDIF
;時止めはパス
SIF FLAG:70
	RETURN 1
;非恋慕時、其他は別に飛ばす
IF TCVAR:30:385 == 1 || TCVAR:烂醉 || TCVAR:30:强行
	CALL K30_PALAMCNG_MAGURO
	RETURN 1
ENDIF
;Ａ絶頂かつＡ挿入中の三重絶頂or四重絶頂以上or別途専用フラグ時でアヘ顔
IF (SUMARRAY(NOWEX:30:0, 7, 10) && NOWEX:Ａ絶頂) || TFLAG:194 == 045
	SIF ((TEQUIP:肛用振動棒 || TEQUIP:51 >= 0) && NOWEX:三重絶頂) || SUMARRAY(NOWEX:30:0, 8, 10) || TFLAG:194 == 045
		CALL K30_PRINT_AHEGAO
ENDIF
;挿入中強絶頂した体位をカウント
IF (!TEQUIP:50 && NOWEX:Ｖ絶頂 > 1) || (!TEQUIP:51 && NOWEX:Ａ絶頂 > 1)
	SEX_COUNT:(TEQUIP:体位) ++
	SIF SEX_COUNT:(TEQUIP:体位) > 2
		SETBIT TCVAR:30:389, TEQUIP:体位
ENDIF
;子宮口責め超強絶頂をカウント
IF TFLAG:50 == 7 && NOWEX:Ｖ絶頂 && !(NOWEX:Ｖ絶頂 % 3)
	SEX_COUNT:7 ++
	SIF SEX_COUNT:7 == 3
		SETBIT TCVAR:30:389, 7
ENDIF
;-------------------------------------------------
;噴乳
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:噴乳
	PRINTFORMW
ENDIF
;-------------------------------------------------
;射精
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:射精
	PRINTFORMW
ENDIF
;-------------------------------------------------
;放尿＠特定指令のみの反応
;-------------------------------------------------
IF NOWEX:放尿 && TFLAG:194 == 045
	TCVAR:30:利尿剤  = 0
	STRDATA LOCALS
		DATAFORM 「我的、要漏了…HPH　小便、要漏出来了…」\n「啊啊不要看、非常…很舒服、噫噫…HPH」
		DATAFORM 「大腿…好热、屁股…好热HPH」\n「不要看啊，啊非常，非常…好烫…HPH」
		DATAFORM 「啊哈HPH　啊哈哈っHPH　小便…尿尿HPH」\n「这么……好快乐啊…HPH」
	ENDDATA
	CALL HPH_PRINT, @"%LOCALS%", "L"
	PRINTFORMDL 失禁的羞耻，强烈的快感，混合着奇妙的解放感，映姬兴奋中带着手足无措
	PRINTFORMDW 但是被下流地教育了的后洞依然含着%CALLNAME:MASTER%阴茎不放開
	PRINTFORML
	PRINTFORMW 「嗯っ…嗯啊っ♥　啊っ…我…我、%CALLNAME:MASTER%…三、屁股、二…」
	CALL HPH_PRINT, @"「……啊啊っHPH　%K30_C_NAME(MASTER)%…%K30_C_NAME(MASTER)%っHPH　屁股，再多做一点っHPH」", "L"
	CALL HPH_PRINT, @"「再多一点！　深一点HPH　啊゛っHPH　啊啊っHPHHPH　对!再多一点!再多一点!！　啊゛啊゛啊啊っHPH」", "L"
	PRINTFORMDW …不一会，神志不清的映姬淫浪地更加追求肛虐
	CALL HPH_PRINT, @"「更゛多、请给我っHPH　屁゛股っ、哦っ、哦゛咕っHPHHPH　啊゛啊ーっHPH」", "L"
	PRINTFORMDL 激烈的性交和失禁的冲击，理性的枷锁似乎从映姬身上完全脱落了
	PRINTFORMDW 作为閻魔的尊严和自制都没有了，发出野兽交尾般的浪叫……
	PRINTFORML
	CALL HPH_PRINT, @"「咕，咕呃゛っHPH　屁゛股っHPH　屁っHPHHPH　哦゛っHPH　哦哦゛～っHPH」", "L"
	CALL HPH_PRINT, @"「！！　あ゛あッ%UNICODE(0XFF5E)* RAND(8, 16)%%TEXTR("ッ/っ/")%%TEXTR("HPH/HPHHPH/")%HPH」", "L"
	PRINTFORMDL 被教育成最优化处理欧金金的映姬尻穴为了索求精液而收缩
	PRINTFORMDW 犹如小穴般的快感令%CALLNAME:MASTER%无法忍受，鸡巴狠狠穿透屁股最深处…
;-------------------------------------------------
;五重絶頂
;-------------------------------------------------
ELSEIF NOWEX:五重絶頂
	CALL HPH_PRINT("「…HPH　………ぁぅ………HPH　………HPHHPH」", "L")
	PRINTFORMDL 在惊人的快乐面前映姬连声音都无法发出来
	PRINTFORMDL 在从未有过的快感中，身体弹跳一样痉挛着……
	CALL HPH_PRINT("「……HPH　…ぅ………っ………HPH　………ぁぅHPHHPH」", "W")
	TCVAR:30:397 ++
;-------------------------------------------------
;四重絶頂
;-------------------------------------------------
ELSEIF NOWEX:四重絶頂
	SELECTCASE NOWEX:四重絶頂
		;Ｍ含まない絶頂
		CASE 1
			PRINTFORMDL 性感带被毫不留情的攻击着，一瞬间绝顶的映姬发出了格外高昂的娇声
			CALL HPH_PRINT("「啊っ、啊啊啊啊啊啊啊っ～HPH　～～～HPHHPH」", "L")
			PRINTFORMDW 随着声音渐渐小下来，映姬筋疲力尽的身体不住的颤抖着……
			CALL HPH_PRINT("「……哈ぅHPH　…………哈啊………HPH　……哈啊… HPH」", "W")
		;Ｍを含む絶頂
		CASEELSE
			PRINTFORMDL 映姬被涌走又回返的绝顶之波玩弄着，已经无法思考了…
			IF TEQUIP:30:口接触部位 == 4
				PRINTFORMDL 沉溺于贪婪的吻中，只发出含混不清的娇声…
			ELSEIF TEQUIP:30:口接触部位 == 1
				PRINTFORMDL 沉迷于大口大口地吮嘬阴茎，，身心都被奉仕的快乐所支配…
			ELSE
				PRINTFORMDL 舌头触碰%CALLNAME:MASTER%的感觉全部转换成快乐…
			ENDIF
			PRINTFORMDW 很快几重波浪同时涌来，映姬在如此暴力的快感连声音都发不出来，直接高潮了……
			CALL HPH_PRINT("「ッッ！　～～～～～～～ッ！　～～～～HPHHPH」", "W")
	ENDSELECT
;-------------------------------------------------
;三重絶頂
;-------------------------------------------------
ELSEIF NOWEX:三重絶頂
	SELECTCASE NOWEX:三重絶頂
		;両穴+他絶頂
		CASE 1, 2, 7
			PRINTFORMDL 两穴都被玩弄着,映姬快乐得几乎癫狂了…
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT("「啊啊啊っっHPH　～～嗯嗯っ～ HPH」", "W")
				CASE 1
					CALL HPH_PRINT("「这个好美啊っHPH　啊っ…阿西！　西喺ぃぃHPHHPH」", "W")
				CASE 2
					CALL HPH_PRINT("「哈啊――っHPHHPH　哈啊――っHPH　哈啊――っHPHHPH」", "W")
			ENDSELECT
			CALL HPH_PRINT("「～～っ！？　不，不行！ 屁股，那里HPH要去了呜～HPHHPH」", "W")
		;他絶頂
		CASEELSE
			IF TEQUIP:30:口接触部位 == 4
				PRINTFORMDL 结束贪婪的长吻，映姬快活得又哭又笑……
			ELSEIF TEQUIP:30:口接触部位 == 1
				PRINTFORMDL 映姬一边忍着快感一边持续着口淫，但几乎已经极限了，苦闷的喘息着……
			ELSE
				PRINTFORMDL 映姬紧闭的朱唇断断续续漏着甜蜜叹息，被逼到了绝顶，无法抑制发出了更大的娇声……
			ENDIF
			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
	ENDSELECT
;-------------------------------------------------
;二重絶頂＠全部スキップ
;-------------------------------------------------
[SKIPSTART]
ELSEIF NOWEX:二重絶頂
	SELECTCASE RAND:3
		CASE 0
			CALL HPH_PRINT("「讨厌、一库！　要去了呜呜ううっHPH」", "W")
		CASE 1
			CALL HPH_PRINT("「恰、啊啊っ！　要去了唔うぅHPH」", "W")
		CASE 2
			CALL HPH_PRINT("「不行っ、啊ッ！　啊啊啊啊啊～ッHPH」", "W")
	ENDSELECT
	SELECTCASE NOWEX:二重絶頂
		;Ｃ＆Ｖ絶頂
		CASE 1
			PRINTFORMW
			RETURN 1
		;Ｃ＆Ａ絶頂
		CASE 2
			PRINTFORMW
			RETURN 1
		;Ｖ＆Ａ絶頂
		CASE 3
			PRINTFORMW
			RETURN 1
		;Ｃ＆Ｂ絶頂
		CASE 4
			PRINTFORMW
			RETURN 1
		;Ｖ＆Ｂ絶頂
		CASE 5
			PRINTFORMW
			RETURN 1
		;Ａ＆Ｂ絶頂
		CASE 6
			PRINTFORMW
			RETURN 1
		;Ａ＆Ｍ絶頂
		CASE 7
			PRINTFORMW
			RETURN 1
		;Ｖ＆Ｍ絶頂
		CASE 8
			PRINTFORMW
			RETURN 1
		;Ｃ＆Ｍ絶頂
		CASE 9
			PRINTFORMW
			RETURN 1
		;Ｂ＆Ｍ絶頂
		CASE 10
			PRINTFORMW
			RETURN 1
	ENDSELECT
[SKIPEND]
ELSE
	IF NOWEX:Ａ絶頂
		LOCAL = NOWEX:Ａ絶頂
		SIF NOWEX:二重絶頂
			LOCAL /= 2
		;振動棒约会中１
		IF TCVAR:30:364 > 0 && !GROUPMATCH(CFLAG:現在位置, 情人用宿屋, 情人旅館, OMANEKIBEYA())
			LOCAL = K30_FIND_AROUND()
			LOCAL:1 = GROUPMATCH(LOCAL, 0, 49)
			CALL HPH_PRINT(@"「%UNICODE(0XFF5E)* RAND(5, 15)%%TEXTR("ッ/っ/")%%TEXTR("HPH/HPHHPH/")%HPH」", "W")
			IF (!GROUPMATCH(LOCAL, 0, 49) || DATE_HITOGOMI()) && RAND:2
				STRDATA LOCALS
					DATAFORM （我……我在…HPH）\n（%\@ LOCAL:1 ? 人 # %K30_C_NAME(LOCAL)%的 \@%面前…去了HPH）
					DATAFORM （好厉害…太快乐了HPH）\n（%K30_C_NAME(LOCAL, 2)%も…明明在，却这么……舒服…HPH）
					DATAFORM （啊啊…HPH　大脑…空白、了…HPH）\n（在人前，所以……这么兴奋……吗…HPH）
				ENDDATA
			ELSE
				STRDATA LOCALS
					DATAFORM （这个…好…HPH　非常、好…HPH）
					DATAFORM （啊啊…HPH　我…要漏出来了…HPH）
					DATAFORM （像这、样…HPH　好厉…害…HPH）
					DATAFORM （嗯っ…HPH　明明，变成…这样…HPH）
				ENDDATA
			ENDIF
			CALL HPH_PRINT(LOCALS, "L")
			PRINTFORMD 尽力%TEXTR("暗中/压住声音/屏住呼吸/")%地静下\@ LOCAL > 1 && RAND:2 ? 激烈的 # な \@迎来了高潮
			PRINTDATADW
				DATAFORM 之后的映姬仍在余韵中颤抖…
				DATAFORM ，映姬满足地微笑了…
				DATAFORM 之后，映姬长长地喘出了一口气…
				DATAFORM 于是，香汗淋漓的映姬轻轻地擦了擦…
				DATAFORM 映姬慌忙擦掉了滚落的口水
			ENDDATA
		;振動棒约会中２
		ELSEIF TFLAG:193 == 350
			CALL HPH_PRINT, @"「啊啊っ！　啊っ啊啊嗯HPH　一库っ！　一库呜HPH」\n「屁股っHPH　一っ一库呜呜ぅううHPHHPH」", "W"
			CALL HPH_PRINT, @"「哈啊…HPH　哈啊…HPH　哈啊…HPH」", "W"
			CALL HPH_PRINT, @"「%K30_C_NAME(MASTER)%…快点，♥来吧…HPH」", "W"
			PRINTFORMDL 映姬的肛门骚浪地等待着应该收纳的东西，反复收缩
			PRINTFORMDW 向外翻卷的粉红色粘膜看起来像是在舌头舔舐…
		;超強絶頂Ａ
		ELSEIF LOCAL >= 3
			IF SELECTCOM == 13
				CALL HPH_PRINT, @"「%UNICODE(0XFF5E)* RAND(5, 15)%%TEXTR("ッ/っ/")%%TEXTR("HPH/HPHHPH/")%」", "L"
				PRINTFORMDL 映姬用自己的手指撑開了肛门，就这样狼狈地去了…
				CALL HPH_PRINT, @"「啊呜呜、啊唔HPH　%K30_C_NAME(MASTER)%…HPH」\n「这样看着的话…咿呀HPH」", "W"
			ELSEIF TCVAR:30:393 < 2
				CALL HPH_PRINT("「火辣辣ぃHPH　火辣辣的……但是很舒服…咿咿HPH」", "L")
				CALL HPH_PRINT("「啊っHPH　啊っHPHHPH　映姬要被你干死了，不！别真的停，用力呀……一库、屁股要去了呜呜うぅうHPH」", "W")
			ELSEIF SELECTCOM == 45
				IF !TEQUIP:肛用振動棒
					CALL HPH_PRINT("「屁股…HPH　好快乐啊…停不下来啊HPHHPH」", "L")
					PRINTFORMDW 光是振动棒的余韵，映姬就绝顶了，好像不能从那里下来
				ELSE
					CALL HPH_PRINT("「好厉害っHPH　…这っ、好厉害啊っHPHHPH」", "L")
					CALL HPH_PRINT("「卟噜卟噜的っ、要去了！　一直、一~直的HPH　要去了呜呜ぅうHPH」", "W")
				ENDIF
			ELSEIF RAND:3 == 1 || TCVAR:30:393 < 6 || (TEQUIP:30:Ａ接触部位 != 1 && RAND:3 != 1) || (TEQUIP:30:Ａ接触部位 == 1 && CFLAG:诶嘿嘿 == 2)
				SELECTCASE TEQUIP:30:Ａ接触部位
					;Ａ性交
					CASE 1
						SELECTCASE RAND:9
						 ;+ (GET_TARGETNUM() == 1 && (BASE:30:気力 * 2 < MAXBASE:30:気力)))
							CASE 0 TO 2
								CALL HPH_PRINT("「屁股，记住了HPH　你的、要变成你的形状了HPH」", "L")
								CALL HPH_PRINT("「屁股啊っHPH　好快乐啊，会记住的呜呜呜っHPHHPH」", "W")
							CASE 3 TO 5
								CALL HPH_PRINT("「屁股っ、不断地刺激っHPH　再多点…再多一点、啊っHPH」", "L")
								CALL HPH_PRINT("「我的…屁股っHPH　就让它成为你的东西吧HPHHPH」", "W")
							CASE 6 TO 8
								CALL HPH_PRINT("「好快乐呀…好舒服咿唷っHPH　屁股、融化吧呜呜HPH」", "L")
								CALL HPH_PRINT("「屁股っHPH　身體连在一起、要融化了呜呜HPHHPH」", "W")
							;二人きりで気力が減っていると、たまに淫語を口走るとか。まだ保留
							CASE 9
								CALL HPH_PRINT("「咿呀…ッHPHHPH　啊……啊…呜啊HPH」", "L")
								PRINTFORMDL 强烈的快乐使映姬只剩一半的清醒
								CALL HPH_PRINT("「………………………哦咕っHPHHPH」", "W")
								CALL HPH_PRINT("「……欧金金，好厉害唷HPH　屁股…叽啵叽啵…真厉害啊HPH」", "L")
								CALL HPH_PRINT("「比小妹妹还好啊…把屁股…变成第二个小穴、吧HPH」", "W")
								PRINTFORMDL 映姬荒唐的说着什么话…
								;日記とかも埋めたいなあ
								;SIF DIARY:30:XX == 0
								;	CALL K30_WRITE_DIARY(XX)
						ENDSELECT
					;愛撫
					CASE 3
						CALL HPH_PRINT("「屁股っHPH　来了！好厉害啊，来了HPH」", "L")
						CALL HPH_PRINT("「被咕扭咕扭、做了、一库っHPH　咿加呜呜呜呜唔っHPH」", "W")
					;舐め
					CASE 4
						CALL HPH_PRINT("「啊っHPH　啊啊っHPH　屁股っ、屁股啊っHPH　乱七八糟了HPH」", "L")
						CALL HPH_PRINT("「屁股っHPH　软绵绵的っHPH　不能这么欺负啊呜っHPH」", "W")
					CASEELSE
						CALL HPH_PRINT("「啊哈ぁHPH　屁股ぃ、停下来HPH　好舒服咿唷，不，停下来呜~HPH」", "L")
						CALL HPH_PRINT("「屁股ぃHPH　屁股里HPH　要变得奇怪呜~~~HPH」", "W")
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						CALL HPH_PRINT("「记住了HPH　屁股里…已经、要记住形状了HPH」", "L")
						CALL HPH_PRINT("「原谅我…已经…屁股里、饶了吧…啊啊啊啊啊啊っHPH」", "W")
					CASE 1
						CALL HPH_PRINT("「屁股，等一下……好舒服啊，等一下呀！」", "L")
						CALL HPH_PRINT("「啊っ！　啊啊啊啊HPH　屁股…屁股的っHPH　要坏掉了呜呜うHPH」", "W")
					CASE 2
						CALL HPH_PRINT("「好可怕…好可怕啊HPH　太舒呼了、好可怕啊HPH」", "L")
						CALL HPH_PRINT("「不要っHPH　怪怪的っ、太怪了呜呜HPHHPH」", "W")
				ENDSELECT
			ENDIF
			;表現くどいので他のには重ねない
			GOTO SKIP
		;強絶頂Ａ
		ELSEIF LOCAL == 2
			IF TCVAR:30:392 > 5
				IF RAND:2 == 1
					CALL HPH_PRINT("「屁股っHPH　好舒服啊っ…太美了っHPH　啊っ、啊啊啊啊啊啊HPH」", "W")
				ELSE
					CALL HPH_PRINT("「啊啊っHPH　来了！　屁股啊，好厉害啊っ…来了うぅうHPH」", "W")
				ENDIF
			ELSEIF RAND:2 == 1
				CALL HPH_PRINT("「啊っHPH　啊哇っHPH　不行，用屁股，太棒了うぅううHPH」", "W")
			ELSE
				CALL HPH_PRINT("「不要っHPH　屁股嘠啊，屁股啊っHPH　不行啊ぇええぇHPH」", "W")
			ENDIF
		;絶頂Ａ
		ELSE
			IF TCVAR:30:392 > 4
				IF RAND:2 == 1
					CALL HPH_PRINT("「去了HPH　屁股っ……又要っ、去了ううHPH」", "W")
				ELSE
					CALL HPH_PRINT("「啊っHPH　啊啊っ！　屁股，一阵接一阵的来…る…HPH」", "W")
				ENDIF
			ELSEIF RAND:2 == 1
				CALL HPH_PRINT("「啊啊HPH　……不行っ……屁股哇………啊啊っHPH」", "W")
			ELSE
				CALL HPH_PRINT("「不行…用屁股是不行的っ……啊っ、啊啊啊HPH」", "W")
			ENDIF
		ENDIF
	ENDIF
	IF NOWEX:Ｃ絶頂
		LOCAL = NOWEX:Ｃ絶頂
		SIF NOWEX:二重絶頂
			LOCAL /= 2
		;超強絶頂Ｃ
		IF LOCAL >= 3
			CALL HPH_PRINT("「不行，太棒了！　不可以这样玩弄啊，小豆豆要到了…咿呀ううぅHPH」", "W")
		;強絶頂Ｃ
		ELSEIF LOCAL == 2
			PRINTFORMW 「啊っ♥　豆子啊…一库っ、嗯呃ーー库っ！」
		;絶頂Ｃ
		ELSE
			PRINTFORMW 「呼啊っ……啊っ！　………啊…啊嗯…♥」
		ENDIF
	ENDIF
	IF NOWEX:Ｖ絶頂
		LOCAL = NOWEX:Ｖ絶頂
		SIF NOWEX:二重絶頂
			LOCAL /= 2
		;日常＠お腹をなでる
		IF SELECTCOM == 306
			PRINTFORMW 「有什么……爬上去……！　啊っ、不行っ！　不行啊えぇぇ♥」
		;超強絶頂Ｖ
		ELSEIF LOCAL >= 3
			CALL HPH_PRINT("「咕っHPH　咕哈っ、不行っ！爽的要死掉了　啊っ、怎么这么舒服，脑子要变成白痴了，嗯嗯、呃啊啊啊っHPH」", "W")
		;強絶頂Ｖ
		ELSEIF LOCAL == 2
			PRINTFORMW 「啊啊っ！　那里っ、这样插っ♥　一库っ、一库呜呜ぅぅ！」
		;絶頂Ｖ
		ELSE
			PRINTFORMW 「哈啊、哈啊っ……嗯嗯～～～っ♥」
		ENDIF
	ENDIF
	IF NOWEX:Ｂ絶頂
		LOCAL = NOWEX:Ｂ絶頂
		SIF NOWEX:二重絶頂
			LOCAL /= 2
		;強絶頂Ｂ
		IF LOCAL >= 3
			CALL HPH_PRINT("「乳头っ、酥酥麻麻の！　呀、一库うぅっHPH」", "W")
		;強絶頂Ｂ
		ELSEIF LOCAL == 2
			PRINTFORMW 「乳房，很舒服♥　一库っ、要去了うぅ！」
		;絶頂Ｂ
		ELSE
			PRINTFORMW 「呼啊啊啊……啊啊っ！　………哈啊、哈啊っ……♥」
		ENDIF
	ENDIF
	IF NOWEX:Ｍ絶頂
		;強度でなく接触部位で振り分け
		SELECTCASE TEQUIP:30:口接触部位
			;口交
			CASE 1
				PRINTFORML 「叽啵、滋兹っ……！！　…嗯嗯っ、呃っ…♥♥」
				PRINTDATAW
					DATAFORM （……欧金金……只是舔一下就好了…♥）
					DATAFORM （%K30_C_NAME(MASTER)%的、欧金金…嘴巴、很幸福…♥）
					DATAFORM （啊哈♥　这个味道，这个气息…我，已经…♥）
				ENDDATA
				;朝诶嘿嘿口上
				IF TCVAR:30:363 == -2
					TCVAR:30:363 = -3
					PRINTFORML
					PRINTFORMDL 沉浸奉仕的喜悦，映姬恋恋不舍地对%TEXTR("阴茎/陰茎/肉棒/欧金金/剛直/男根/怒張")%松口
					PRINTFORMW 「…只有我一个人，对不起。为我服侍很高兴…♥」
					PRINTFORML 「接下来…你也会变得更舒服。我的\@ TCVAR:30:次回Counter == 87 ? 屁股 # 这里 \@呀…」
					IF TCVAR:30:次回Counter == 87
						PRINTFORMDW 映姬将小巧玲珑的臀围抵在%CALLNAME:MASTER%的腰上…
					ELSE
						PRINTFORMDW 映姫在%CALLNAME:MASTER%的膝盖上淫靡地摩擦着胯间…
					ENDIF
					PRINTFORMW 「更多，来做吧…♥♥」
				ENDIF
			;接吻
			CASE 4
				IF CFLAG:诶嘿嘿
					PRINTFORMW 「啾っ、嗯啾……嗯っ！　……嗯嗯っ♥」
					PRINTFORMDW 映姬的嘴唇颤抖，缠绕的舌头突然无力。好像被吻高潮了……
				;日常
				ELSE
					PRINTFORML 「嗯啾…啾っ……！！　呃っ……嗯嗯っ♥　嗯……♥」
					PRINTFORMDL 交缠的舌头终于分開后，映姬仍沉浸在高潮和亲吻的余韵中…
					PRINTFORMW 「这个……喜欢，非常喜欢……居然会这样……♥」
				ENDIF
			CASEELSE
				;舐陰させる,乳頭舐め,肛門奉仕等诶嘿嘿時
				IF CFLAG:诶嘿嘿
					PRINTFORMW 「rero、reroっ………！！　……♥」
					PRINTFORMDL 半张的嘴角滴下一缕香唾
					PRINTFORMDW 看来映姬因为口交侍奉的喜悦到达极乐巅峰……
				;口交抜き。TEQUIP:口接触部位が0のままなのでここに割り振られる
				ELSEIF TFLAG:193 == -999
					PRINTFORML 「嗯嗯っ♥♥　呃っ♥　嗯っ♥　嗯呼ぅ…♥♥」
					PRINTFORMDW 在喉咙最深处含着阴茎，映姬只凭服务的喜悦就可以高潮
					PRINTFORML （在这个下判决的神圣之地……我…这种事…多么下流啊…）
					PRINTFORMW （啊啊…但是，嘴巴和身体都……非常高兴…♥）
				;日常
				ELSE
					PRINTFORML 「嗯啾…啾っ……！！　呃っ……嗯嗯っ♥　嗯……♥」
					PRINTFORMW 「这个……喜欢，非常喜欢……居然会这样……♥」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
$SKIP
;絶頂→逆ギレを軽減する処理
SIF !(TALENT:思慕 || TALENT:恋慕 || TALENT:炮友 || TALENT:愛欲)
	RETURN
SOURCE:逸脱 /= 2
SOURCE:鬱屈 = SOURCE:鬱屈 / 3 * 2
SIF TALENT:心情 == -1 || K30_BE_SEEN()
	RETURN
SOURCE:反感 /= 2
SOURCE:不潔 = SOURCE:不潔 / 3 * 2
SIF !TALENT:恋慕 || !(NOWEX:Ａ絶頂 || TFLAG:193 == -999)
	RETURN
SOURCE:反感 /= 3
SOURCE:鬱屈 /= 3

;-------------------------------------------------
;奴隷の睡眠絶頂時の口上
;-------------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_B2_K30
CALL PALAM_MESSAGE_B

;-------------------------------------------
;調教後の文本＠調教後というか指令後
;诶嘿嘿等に関係なくTARGET指定中なら毎ターン読み込まれるので仕込んだフラグの整理に使ってみる
;-------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_C_K30
;口上单薄的ところはシステムメッセージ
SIF !GROUPMATCH(SELECTCOM, 21, 81, 352)
	CALL PALAM_MESSAGE_C
;非诶嘿嘿時のフラグ掃除
IF !CFLAG:诶嘿嘿
	TCVAR:30:362 = 0
	SIF TCVAR:30:364 != 0
		CALL K30_DATE_WITH_VIBERATOR
	SIF TFLAG:193 == -999
		CALL K30_AFTER_BLOW_JOB_IN_COURT
	SIF !SHIRAHU(30)
		RETURN
	TCVAR:今天有否见面 = 1
	CFLAG:最後に会った日 = DAY
	RETURN
ENDIF

;ここから诶嘿嘿時の挙動
;複数人诶嘿嘿にTARGET外で入った場合のフラグフォロー
SIF TCVAR:30:376 == 0
	CALL K30_FOLLOW_UP
TCVAR:30:376 = CFLAG:诶嘿嘿 == 1 ? 1 # 2
;振動棒约会保留フラグ
SIF TCVAR:30:364
	TCVAR:30:364 = FLAG:時間停止 ? -1 # TCVAR:30:364
;無自覚妊娠警告
SIF TCVAR:100 == MASTER && TCVAR:MASTER:要去了
	CALL K30_WARNING_MAKE_PREGNANT
SIF (!TALENT:恋慕 && CFLAG:30:1801) || !SHIRAHU(30)
	RETURN

;ここから恋慕かつシラフの挙動
;オーバードーズで淫乱なら絶頂でエナジードレイン
IF (GETBIT(TCVAR:30:367, 2) || GETBIT(TCVAR:30:367, 3)) && SUMARRAY(NOWEX:30:0, 0, 5)
	BASE:体力 = MIN(MAXBASE:体力, BASE:体力 + MAXBASE:体力 / 10)
	BASE:気力 = MIN(MAXBASE:気力, BASE:気力 + MAXBASE:気力 / 10)
	;CFLAG:积攒度 = LIMIT(CFLAG:积攒度 + 20, 20, 1000)
	BASE:MASTER:体力 -= MAXBASE:MASTER:体力 / 250
	BASE:MASTER:気力 = MAX(0, BASE:MASTER:気力 - MAXBASE:MASTER:気力 / 50)
	IF !RAND:4
		STRDATA LOCALS
			DATAFORM 每次让映姫达到高潮,我感觉她变得更加精神抖擞...
			DATAFORM 让映姫满足似乎比平时更加耗费我的精力...
			DATAFORM 我开始觉得映姫在吸取我的某种能量...
		ENDDATA
		CALL COLORMESSAGE, LOCALS, C_YELLOW, 1, 0
		PRINTFORML
	ENDIF
ENDIF
;口上で攻守交代したのを元に戻す
IF TCVAR:30:362 > 1 && TCVAR:30:361 != TIME
	CALL K30_REVERT_POSITION
	RETURN
ENDIF
SIF FLAG:99
	GOTO HIDE
;縦 割 れ ア ナ ル
IF EXP:Ａ性交経験 > 99 && ABL:Ａ感覚 > 4 && !GETBIT(CFLAG:1910, 7)
	CALL K30_VERTICAL_ANUS
	RETURN
ENDIF
;母乳判定
IF NOWEX:噴乳 && !CFLAG:1805
	WAIT
	CALL K30_MILK_SQUIRT
	RETURN
ENDIF
;Ｖ性交中のフレーバー文本
IF TEQUIP:50 == PLAYER && CFLAG:诶嘿嘿 == 1 && TFLAG:194 != -99 && !CFLAG:1805
	CALL K30_FLAVOR_MES_V
	RETURN
ENDIF
RETURN

$HIDE
;物陰モードかつ他に誰かいるなら情景描写
SIF GET_TARGETNUM() == 1
	RETURN
LOCALS =
LOCALS += @"%\@ MASTER_POSE(SET_M, SET_M) == 30 ? 0/ # \@%"
LOCALS += @"%\@ TEQUIP:50 == MASTER ? 1/ # \@%"
LOCALS += @"%\@ TEQUIP:51 == MASTER ? 2/ # \@%"
LOCALS += @"%\@ TEQUIP:口接触部位 == 0 ? 3/ # \@%"
SIF LOCALS == ""
	RETURN
SELECTCASE TOINT(TEXTR(LOCALS))
	CASE 0
		PRINTDATADL
			DATAFORM 不想泄露声音的映姬拼命地把嘴唇抵在%CALLNAME:MASTER%上…
			DATAFORM 感受%CALLNAME:K30_FIND_AROUND()%气息，映姬的动摇即使隔着嘴唇也能清楚地感觉…
			DATALIST
				DATAFORM 一边接吻一边被映姬紧紧抱住
				DATAFORM 因为%CALLNAME:K30_FIND_AROUND()%近在咫尺，身体的颤抖似乎止不住…
			ENDLIST
		ENDDATA
	CASE 1
		PRINTDATADL
			DATAFORM %CALLNAME:K30_FIND_AROUND()%の气息一察觉到，映姬的%TEXTR("雌穴/肉壺/蜜壺/膣内/")%就忍不住紧紧的夹住…
			DATAFORM 迷乱的映姬%TEXTR("雌穴/肉壺/蜜壺/膣内/")%紧紧地不放，%TEXTR("淫汁/淫蜜/愛液/")%噗噗地喷出…
			DATAFORM 会对%CALLNAME:K30_FIND_AROUND()%的声音起反应，映姬的%TEXTR("雌穴/肉壺/蜜壺/膣内/")%更热地蠢蠢欲动…
		ENDDATA
	CASE 2
		PRINTDATADL
			DATAFORM 为了不被%CALLNAME:K30_FIND_AROUND()%发现，映姬拼命克制肛交的快感。…
			DATAFORM 每当%CALLNAME:K30_FIND_AROUND()%的声音传来，映姬的菊门就会紧合…
			DATAFORM 由于羞耻和快乐，映姬的尻穴比平时更粘稠…
		ENDDATA
	CASE 3
		PRINTDATADL
			DATAFORM 听到%CALLNAME:K30_FIND_AROUND()%的声音，映姬害羞地摇着头否认…
			DATAFORM 感受%CALLNAME:K30_FIND_AROUND()%的气息，映姬拼命用自己的手堵住了嘴…
			DATAFORM 知道%CALLNAME:K30_FIND_AROUND()%就在附近，映姬明显动摇了…
		ENDDATA
ENDSELECT
PRINTFORML
RETURN

;-------------------------------------------------
;射精に関する口上の表示
;一時的にTARGETを口上主に設定している
;-------------------------------------------------
;TFLAG:1 射精部位 (ビット0=避孕套 1=膣内 2=肛門 3=手淫 4=口淫 5=乳交 6=素股 7=足交 8=体表 9=肛門奉仕
;20=手淫口交 21=乳夾口交22=六九式 24=子宮口 25=疑似 26=授乳PLAY
@M_KOJO_MESSAGE_PALAMCNG_A_K30_0(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;避孕套
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
CALL M_KOJO_COLOR_K30
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
	;肛門
	ELSEIF GETBIT(TCVAR:30:50, 2)
		IF ABL:肛射中毒 > 3
			PRINTDATAW
				DATAFORM 「吶…为什么害怕？」
				DATAFORM 「坏心眼……」
				DATAFORM 「屁股上明明想要……」
				DATALIST
					DATAFORM 「……下次不用戴了」
					DATAFORM 「给我，满满的…请给我」
				ENDLIST
			ENDDATA
		ELSEIF ABL:肛射中毒 > 0
			PRINTFORMW 「…如果是这里的话，射出来也可以哦？」
		ELSE
			PRINTFORMW 「是，是啊，不是该射出来的地方…」
		ENDIF
	;膣内
	ELSEIF GETBIT(TCVAR:30:50, 1)
		;中出しOK時
		IF !K30_CREAMPIE()
			IF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
				PRINTDATAW
					DATAFORM 「啊啊、太浪费了…」
					DATAFORM 「…为什么、戴着呢？」
					DATAFORM 「…宝宝，不想要么？」
				ENDDATA
			ELSEIF ABL:膣射中毒
				PRINTDATAW
					DATAFORM 「那个…明明里面想要的……」
					DATAFORM 「为什么…可以吗？」
					DATAFORM 「…现在不戴也可以哦？」
				ENDDATA
			ELSE
				PRINTDATAW
					DATAFORM 「嗯…出来了很多呢…」
					DATAFORM 「很快乐的吧？　那样的话，我也很高兴…」
				ENDDATA
			ENDIF
		;避妊推奨時
		ELSE
			IF ABL:膣射中毒
				PRINTDATAW
					DATAFORM 「没办法啊…婴儿是很困扰的东西…」
					DATAFORM 「现在我会忍耐的……我也很開心？」
				ENDDATA
			ELSE
				PRINTDATAW
					DATAFORM 「嗯，必须要好好避孕啊」
					DATAFORM 「嗯，好好戴的话就放心了」
				ENDDATA
			ENDIF
		ENDIF
	ELSE
		;喝套内精液が6以上で変わるから
		IF ABL:精液中毒 > 5 && RAND:2 == 1
			PRINTDATAW
				DATAFORM 「就这样发射出来……好吗？…」
				DATAFORM 「明明不是给你看，而是就这样想要的…」
				DATAFORM 「放在那样的地方，可能太可惜了…？」
			ENDDATA
		ELSE
			PRINTDATAW
				DATAFORM 「如果你满意的话那就好了？」
				DATAFORM 「不会飞到头发上……那个也有吧…」
				DATAFORM 「不弄脏是好事吗…？」
			ENDDATA
		ENDIF
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_23(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
TCVAR:30:395 ++
;-------------------------------------------------
;深喉插入
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSEIF ABL:30:精液中毒 >= 5 && RAND:2 == 1
		PRINTFORML 「嗯咕，嗯姆…嗯～…嗯……哈啊…哈啊……」
		PRINTFORMW 「……总算能吞下去了……这个，好难受啊……」
	ELSE
		PRINTFORML 「咕嚯！！　咳！　咳咳っ……呕……哕………」
		PRINTFORMW 「不要做太荒唐的事……」
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_22(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
TCVAR:30:395 ++

;-------------------------------------------------
;六九式
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「嗯…量多了洒出来了…」
			CASE 1
				PRINTFORMW 「嗯…射出了很多啊……」
			CASE 2
				PRINTFORMW 「咳嚯，咳嚯…有点呛到我」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_21(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
TCVAR:30:395 ++

;-------------------------------------------------
;乳夾口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSEIF NOWEX:TARGET:Ｂ絶頂 || NOWEX:TARGET:Ｍ絶頂
		PRINTFORML 「%TEXTR("嗯呼っ/嗯嗯っ/嗯っ/")%！　…%TEXTR("嗯咕っ/嗯姆っ/嗯っ/")%…%TEXTR("嗯咕っ/啊姆っ/嗯嗯っ/")%、噗哈…」
		PRINTDATAW
			DATAFORM 「努力的奖励…谢谢♥」
			DATAFORM 「很好…没有洒出来地喝完了…♥」
			DATAFORM 「嗯っ…稍微洒了一点…」
			DATALIST
				DATAFORM 「啊っ…难道是、想用手吗？」
				DATAFORM 「对不起，我想要吃…♥」
			ENDLIST
		ENDDATA
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_20(ARG)
;射精アニメ
CALL K30_BLOW_JOB_ANIME(4)
PRINTFORML
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
TCVAR:30:395 ++

;-------------------------------------------------
;手淫口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSEIF EXP_UP(15, TARGET) == NOWEX:PLAYER:射精 * 3
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「啾,嗯啾、嗯…嗯…」
				PRINTFORMDW  映姬停止捋茎，打算把剩下的吸出来
			CASE 1
				PRINTFORML 「っ！？　………嗯、啾噗…啾卟…嗯っ」
				PRINTFORMW 「更多，更多……好像能挤出来呢…♥」
			CASE 2
				PRINTFORML 「嗯姆っ！？　……嗯咕っ…啾噜…噗哈っ」
				PRINTFORMW 「碰在嗓子上…。有点吃惊…」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「呼呼呼っ、满意了吗？　或者，再来一次？」
			CASE 1
				PRINTFORMW 「讨厌、手和嘴周围都黏糊糊的…♥」
			CASE 2
				PRINTFORML 「还是那么屹立不倒呢…♥」
				PRINTFORMDW 映姬更进一步地用舌尖啄击着马眼…
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_9(ARG)
#DIM CHR
;-------------------------------------------------
;肛門奉仕
;疑似ダブル指令化のため変なことやってます
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF TFLAG:194 < 4
	PRINTFORM 伴随着腰部深处酥麻的快乐，%CALLNAME:MASTER%的阴茎
	IF NOWEX:MASTER:射精 >= 2
		PRINTFORM 大量的%SAMEN_DESCRIPTION(MASTER)%咚咚地迸发
	ELSE
		PRINTFORM %SAMEN_DESCRIPTION(MASTER)%咕嘟咕嘟地漏了出来
	ENDIF
	IF TFLAG:194 == 3
		PRINTFORML
		PRINTFORML 映姬像榨取最后一滴一样不停地动着香舌和纤手，
		PRINTFORM 螓首一直紧贴着%CALLNAME:MASTER%直到完全射完后才挪開
	ENDIF
	PRINTFORMW …
ENDIF
TCVAR:30:396 ++
CALL M_KOJO_COLOR_K30
IF LOCAL
	;マグロスイッチオン
	SIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	SELECTCASE TFLAG:194
		CASE 0
			PRINTFORML 「欸っ…！？」
			PRINTFORMW 「现在…射出来了呢…」
		CASE 1, 2
			PRINTDATAW
				DATAFORM 「即使不碰，也会这么出来啊…♥」
				DATAFORM 「呼呼っ…这么舒服呀、我很高兴…♥」
			ENDDATA
		CASE 3
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「我的嘴和手…很舒服吧…♥」
					PRINTFORMW 「诶诶、可以啊…喜欢的时候请随时使用♥」
				CASE 1
					PRINTFORMW 「怎么样？　比一般用手做…更快乐吧♥」
			ENDSELECT
		CASE 4
			RESETCOLOR
			CHR = TFLAG:193
			IF NOWEX:CHR:Ｍ絶頂
				PRINTFORML 满嘴都是%TINKO(MASTER)%的%CALLNAME:CHR%露出迷醉的表情
				PRINTFORML 下一秒，嘴唇和肩膀一起颤抖，%CALLNAME:CHR%到达了那极致
			ENDIF
			PRINTFORML %CALLNAME:MASTER%同时淫戏二人，穿过映姬的舌侧，射精到%CALLNAME:CHR%的口内
			IF NOWEX:MASTER:射精 == 1
				PRINTFORML %CALLNAME:CHR%的红唇捋着龟头，把所有的%SAMEN_DESCRIPTION(PLAYER)%都收进嘴里，然后
				PRINTFORML 咽下口内的%SAMEN_DESCRIPTION(PLAYER,1)%
			ELSE
				PRINTFORML %CALLNAME:CHR%咬着龟头饮下了嘴里放出的大量%SAMEN_DESCRIPTION(PLAYER)%
			ENDIF
			TRYCALLFORM M_KOJO_COLOR_K{CHR}
			PRINTFORML 「………♥♥」
			PRINTFORMDL 在映姫的辅助下\@ NOWEX:MASTER:射精 > 1 ? 足足的 # \@绞出的精液，%CALLNAME:CHR%满足的接下…
			CALL M_KOJO_COLOR_K30
			PRINTDATAW
				DATAFORM 「接下来是…轮到我了吧…？」
				DATAFORM 「那么、%K30_C_NAME(CHR)%…不换班吗」
				DATAFORM 「总觉得只有我…被放置了？」
			ENDDATA
	ENDSELECT
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_8(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;泡泡浴
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;同時射精
	IF NOWEX:射精 && NOWEX:MASTER:射精
		PRINTFORMW
		RETURN 1
	;TARGETだけ射精
	ELSEIF NOWEX:射精
		;PLAYERについてる
		IF GETBIT(TALENT:PLAYER:性別,1)
			PRINTFORMW
			RETURN 1
		;付いてない
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;PLAYERだけ射精
	ELSE
		;TARGETについてる
		IF GETBIT(TALENT:性別,1)
			PRINTFORMW
			RETURN 1
		;付いてない
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_7(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;足交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSEIF NOWEX:MASTER:射精 > 1
		PRINTDATAW
			DATAFORM 「好厉害…总觉得像喷泉一样…」
			DATAFORM 「溅出得那么多……」
		ENDDATA
	ELSE
		PRINTDATAW
			DATAFORM 「连……脚都粘糊糊的。」
			DATAFORM 「这样做也很舒服呢…」
		ENDDATA
	ENDIF
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_6(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;素股
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSEIF 充填率(30, 1) >= 15 && RAND:2 == 1
		PRINTFORMW 「讨厌…和垂下来的东西混在一起，都乱七八糟了…」
	ELSEIF K30_CREAMPIE() > 1
		IF CFLAG:诶嘿嘿 == 1
			PRINTFORML 「明明叫你住手的……」
			PRINTFORMW 「…请让我稍微擦拭一下」
		ELSE
			PRINTFORML 「啊啦啊啦，不好好忍耐可不行…♥」
			PRINTFORMW 「真有那么舒服吗？」
		ENDIF
	ELSEIF NOWEX:MASTER:射精 < 2
		PRINTFORMW 「嗯…做得很舒服，太好了…」
	ELSE
		PRINTFORMW 「哇…出了很多呢…」
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_5(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;乳交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSE
		PRINTDATAW
			DATAFORM 「呀啊、\@ NOWEX:MASTER:射精 >1 ? 好厉害的牛奶发射 # 一跳一跳的好可爱 \@…♥」
			DATAFORM 「欧派…好烫……」
			DATAFORM 「这样的欧派，你也会高兴吗…」
			DATAFORM 「在我的欧派上…很快活吗？」
		ENDDATA
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_4(ARG)
#DIM CHR
IF SELECTCOM == 417
	CALL M_KOJO_COLOR_K30
	PRINTFORMDL 映姬偷偷地咽下了含在嘴里的精液…
	PRINTFORML （んっ…美味し…♥）
	RETURN 1
ENDIF
TCVAR:30:396 ++
TCVAR:30:395 ++
CALL K30_FACECUM
SIF RESULT
	RETURN 1
IF SHIRAHU(30)
	CALL K30_BLOW_JOB_ANIME(4)
	PRINTFORML
ENDIF
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;口交
;小町口上で百合百合している映姫様がとても良かったのでもろに影響うけてます
;おしゃぶり＆ごっくんで火がついて普段の害羞も忘れ…というイメージ
;小町・久侘歌・阿求とはすぐにちゅっちゅしちゃって、蓬莱人と上位の神霊には遠慮があるように
;フレーバーだしいろんなパラメーターと齟齬があっても気にしない
;百合経験がつくのは、つまりこういうことじゃないかと
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CHR = TCVAR:30:375
	;フラグ折っておく
	TCVAR:30:375 = 0
	;マグロスイッチオン
	SIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉 || FLAG:70
		RETURN 1
	;仕事中口交抜き
	IF TFLAG:193 == -999
		PRINTFORML 「嗯咕っ…嗯っ、嗯咕っ…嗯咕っ…嗯呼唔♥」
		PRINTFORMDL 即使%CALLNAME:MASTER%射精后開始萎缩，映姬也不愿松口
		PRINTFORMDW 花了比平时多的时间，真的舔到最后一滴之后才停止吮吸
		PRINTFORMW 「噗哈…♥」
		PRINTFORML 「…不能因为这种事弄脏工作场所」
		PRINTFORML 「欸、是的」
		PRINTFORMW 「这样弄干净…也是没办法的事…♥」
	;喝套内精液派生
	ELSEIF TFLAG:194 == 590
		IF (EXP_UP(15, TARGET) == NOWEX:PLAYER:射精 * 3)
			IF RAND:2 == 1
				PRINTFORML 「嗯っ……嗯呼呼っ♥」
				PRINTFORMW 「刚榨好的…果然是最好吃的呢♥」
			ELSE
				PRINTFORML 「啊哈っ♥　用我的嘴…心情变好了呢…♥」
				PRINTFORML 「果然，不直接射精的话…不喜欢」
				PRINTFORMW 「是的，这样的话……会非常满足的♥」
			ENDIF
		ELSE
			PRINTFORML 「咳嚯っ、咳呵咳呵……嗯嗯っ」
			PRINTFORML 「对不起，好不容易射精了」
			PRINTFORML 「\@ NOWEX:MASTER:射精 > 2 ? 量很大 # 卡在喉咙里 \@没法喝完…」
			SIF NOWEX:MASTER:射精 > 1
				PRINTFORML 「而且…加上刚才的，出这么多…」
			WAIT
		ENDIF
	;足交派生で精飲/吐き出し見せつけ
	ELSEIF (TCVAR:30:362 == 3 || TFLAG:193 == 99)
		IF (EXP_UP(15, TARGET) == NOWEX:PLAYER:射精 * 3)
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「嗯っ、\@ NOWEX:MASTER:射精 >1 ? 这么多、出来了 # 射出来了很多呢 \@…」
					PRINTFORMW 「看？　比起脚，嘴更厉害…很舒服吧♥」
				CASE 1
					PRINTFORML 「嗯嗯っ、出这么多…满足了么？」
					PRINTFORMW 「我的嘴…非常的、H和舒服……♥」
				CASE 2
					PRINTFORML 「嗯呼っ…果然、我还是喜欢这个…」
					PRINTFORMW 「我喜欢用嘴让你爽起来♥」
			ENDSELECT
		ELSE
			IF RAND:2 == 1
				PRINTFORML 「你看…就是这么射出来的…♥」
				PRINTFORMW 「怎么样，比起脚，还是我的嘴更好吧？」
			ELSE
				PRINTFORML 「你看？　因为是嘴，所以出了这么多…」
				PRINTFORML 「那么，就不留“剩饭”了…♥」
				PRINTFORMDW 映姬把展示后的白浊舔得一干二净
			ENDIF
		ENDIF
	;映姫様が攻め
	ELSEIF CFLAG:诶嘿嘿 == 2
		IF (EXP_UP(15, TARGET) == NOWEX:PLAYER:射精 * 3)
			IF RAND:2 == 1
				PRINTFORMW 「别担心，我会全部喝完的…再多多射出吧♥」
			ELSE
				PRINTFORMW 「再给我一点。 还差得远……榨的不够♥」
			ENDIF
		ELSEIF NOWEX:PLAYER:射精 == 1
			PRINTFORMW 「看…不要克制，多射出点…没关系」
		ELSE
			IF RAND:2 == 1
				PRINTFORMW 「嗯っ、量很大…但是，还不满足呢♥」
			ELSE
				PRINTFORML 「呵呵…出来了很多。」
				PRINTFORML 「不过，看起来还很精神…」
				PRINTFORMW 「欸、好啊…无论几次♥」
			ENDIF
		ENDIF
		RETURN 1
	;精飲判定
	ELSEIF (EXP_UP(15, TARGET) == NOWEX:PLAYER:射精 * 3) && EXP:30:精飲経験 >= 20
		;「喉を鳴らして飲み込んだ」
		IF ABL:精液中毒 < 3
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「嗯嗯っ……嗯咕、嗯咕っ……噗哈っ」
					PRINTFORML 「…虽然不觉得好吃」
					PRINTFORMW 「这样做，能让你高兴吗…」
				CASE 1
					PRINTFORML 「嗯っ、嗯嗯っ……嗯咕っ」
					PRINTFORML 「要是%K30_C_NAME(MASTER)%感觉很好，我会很高兴的」
					PRINTFORMW 「为了你……什么都可以做哦」
				CASE 2
					PRINTFORML 「嗯嗯っ…这个味道还是不习惯啊…」
					PRINTFORML 「啊っ、但是……并不是讨厌做的」
					PRINTFORMW 「请不要那么在意」
			ENDSELECT
		ELSEIF NOWEX:PLAYER:射精 == 1
			SELECTCASE RAND:(3 + (EXP:精飲経験 > 150 && ABL:精液中毒 >= 5) * 3)
				CASE 0
					PRINTFORML 「咕啾，咕啾……嗯咕，嗯咕……嗯嗯」
					PRINTFORMW 「看……好好地做到了…♥」
				CASE 1
					PRINTFORML 「嗯嗯っ…咕啾っ、咕啾っ…啾噗……」
					PRINTFORMW 「再多射出点……也没关系的…♥」
				CASE 2
					PRINTFORML 「看……好好地喝了…♥」
					PRINTFORMW 「啊っ…但是，透明的汤汁…又出来了呢…」
					PRINTFORMW 「这个也要弄干净…可以吗？」
				CASE 3
					PRINTFORML 「嗯っ…%K30_C_NAME(MASTER)%、\@ BASE:MASTER:精力 > 0 ? 不太舒服 # 有点累了 \@是吗？」
					PRINTFORML 「更多更多，再多射出一点也没关系」
					PRINTFORML 「不管多少次，我都会帮你打起精神的…嗯っ、啾っ…♥」
					PRINTFORMDW 映姬甜蜜地反复亲吻着龟头…
				CASE 4
					PRINTFORML 「……一下子，就射出了么」
					PRINTFORMW 「别客气，更加的蹂躏我的嘴吧…♥」
				CASE 5
					PRINTFORML 「…嗯っ、嗯呼呼っ♥」
					PRINTFORML 「嘴里哦、\@ TALENT:MASTER:形状 > 5 ? 这么大 # 你 \@的一跳一跳抖动…」
					PRINTFORMW 「总觉得那个…非常可爱…♥」
			ENDSELECT
		;咥えたまま飲み込む
		ELSE
			SELECTCASE RAND:(4 + (EXP:精飲経験 > 150 && ABL:精液中毒 >= 5) * 5 + (NOWEX:Ｍ絶頂 > 1))
				CASE 0
					PRINTFORML 「嗯呼、嗯咕っ…嗯咕っ……嗯嗯っ」
					PRINTFORMW 「好大的量……我的嘴、有那么好吗……♥」
				CASE 1
					PRINTFORML 「嗯嗯嗯っ…♥　嗯咕っ…嗯嗯っ♥」
					PRINTFORMW 「嗯呼っ、被射这么多……我还以为喝不完呢♥」
				CASE 2
					PRINTFORML 「啾、啾噜、嗯咕、咕…」
					PRINTFORMW 「嗯…谢谢款待♥」
				CASE 3
					PRINTFORML 「嗯っ…嗯っ……嗯呼っ、嗯咕っ……噗哈啊っ」
					PRINTFORML 「呼呼呼っ、满满的…发射出来了呢♥」
				CASE 4
					PRINTFORML 「啊啊，好厉害…气味…」
					PRINTFORMW 「嘴巴，肚子里…全部都被你染上了呀…♥」
				CASE 5
					PRINTFORML 「……射精后再全部喝完」
					PRINTFORML 「%K30_C_NAME(MASTER)%满意的表情…这样仰望…」
					PRINTFORMW 「我…我最喜欢了…♥」
				CASE 6
					PRINTFORML 「嗯っ…嗯っ、嗯咕っ…♥」
					PRINTFORML 「……明明我只是吃进嘴里」
					PRINTFORMW 「但是腹下…好热、好难受…映姬想要…♥」
				CASE 7
					PRINTFORML 「嗯咕っ…嗯っ、嗯っ…♥」
					PRINTFORML 「哼哼哼っ、真的，很苦……奇怪的味道」
					PRINTFORMW 「但是，我…我越来越想要了…♥」
				CASE 8
					PRINTFORML 「……嗯、嗯咕……啾噗……嗯っ…♥」
					PRINTFORMW 「是，全部饮下了……♥」
					PRINTFORMDW 映姬涩情地张嘴吐出香舌给我看没有精液残留……
				CASE 9
					CALL HPH_PRINT, "「噗哈っ…HPH　这个量…我的嘴，清晰地感受到了…HPH」", "L"
					CALL HPH_PRINT, "「总觉得…很高兴…HPH」", "W"
					CALL HPH_PRINT, "「…啾っHPH　嗯啾っ…HPH」", "L"
					PRINTFORMDW 映姬迎着绝顶，颤抖的朱唇爱恋地吻着肉茎…
					RETURN 1
			ENDSELECT
		ENDIF
		;精飲できるくらいだしこれぐらいやってしまえ
		IF CHR && ABL:精液中毒 > 2
			IF (EXP_UP(15, CHR) == NOWEX:PLAYER:射精 * 3)
				PRINTFORML
				PRINTFORML 「%K30_C_NAME(CHR)%也好好地喝了吗……」
				PRINTFORMW 「嗯……还剩下一点呢……♥　看…」
				PRINTFORMD 映姬对准%CALLNAME:CHR%唇边垂下的白浊
				IF GROUPMATCH(CHR, 76, 129, 80) || (((TALENT:CHR:神霊 && CFLAG:CHR:地位 < 900) || !TALENT:CHR:神霊) && !CHECK_CHARA(CHR, "蓬莱人") && PALAM:欲情 >= PALAMLV:5)
					PRINTFORMDL 嘴唇重叠在一起，淫靡地吃着。
					IF GROUPMATCH(CHR, 76, 129, 80) && PALAM:CHR:欲情 >= PALAMLV:8 && ABL:精液中毒 > 4
						PRINTFORMDW %CALLNAME:CHR%因为映姬的吻，媚眼如水，嘴也顺从地半张…
						PRINTFORML 「啾、啾っ……呼呼っ♥　%K30_C_NAME(CHR)%…非常，可爱哦…♥」
						PRINTFORMDW 映姫的舌头勾描着%CALLNAME:CHR%的齿背，吸尽了香唾混合的美味牛奶…
					ELSEIF PALAM:CHR:欲情 >= PALAMLV:10 || GROUPMATCH(CHR, 76, 129, 80)
						PRINTFORMDW %CALLNAME:CHR%陶醉地接受了映姬的激吻…
					ELSE
						PRINTFORMDW %CALLNAME:CHR%被映姬的淫行吓了一跳…
					ENDIF
				ELSE
					PRINTFORMDL 用手指拭了下含进嘴里
					PRINTFORMDW %CALLNAME:CHR%被映姬的淫行吓了一跳…
				ENDIF
			ELSEIF EXP:CHR:精飲経験 < 20 || (NOWEX:PLAYER:射精 != 1 && EXP:CHR:精飲経験 >= 20)
				PRINTFORML
				PRINTFORML 「%K30_C_NAME(CHR)%还不习惯%K30_C_NAME(MASTER)%的味道吗？」
				IF GROUPMATCH(CHR, 76, 129, 80)
					PRINTFORMW 「呼呼っ…这么可惜的事，我是不会允许的……♥」
				ELSE
					PRINTFORMW 「呼呼っ…让我来帮你吧……♥」
				ENDIF
				PRINTFORMD 映姬精液をこぼす%CALLNAME:CHR%
				IF GROUPMATCH(CHR, 76, 129, 80) || (((TALENT:CHR:神霊 && CFLAG:CHR:地位 < 900) || !TALENT:CHR:神霊) && !CHECK_CHARA(CHR, "蓬莱人") && PALAM:欲情 >= PALAMLV:5)
					IF GROUPMATCH(CHR, 76, 129, 80) && PALAM:CHR:欲情 >= PALAMLV:7 && ABL:精液中毒 > 4 && PALAM:欲情 >= PALAMLV:7 && RAND:3 != 1
						PRINTFORMDL 把脸凑近，准备把溅洒的白浊舔干净
						PRINTFORML 「要是……这么浪费，可不行」
						PRINTFORMW 「身为\@ CHR == 80 ? 守护阁下的管理者 # 你的上司 \@，得为不检点负责…♥」
						PRINTFORML 「你看，接下来就是嘴里了……啊姆っ」
						PRINTFORMDW 映姫把%CALLNAME:CHR%的脸清理干净后，交换口水開始近乎窒息的法式浓吻
						PRINTFORML 「嗯嗯っ…啾っ、啾噜っ♥　啾っ…」
						PRINTFORMDW 映姬的口舌追索着%CALLNAME:MASTER%的最后一滴精华、香艳地蹂躏%CALLNAME:CHR%的口内
						RESETCOLOR
						TRYCALLFORM M_KOJO_COLOR_K{CHR}
						PRINTFORML 「………♥　……♥♥」
						CALL M_KOJO_COLOR_K30
						PRINTFORMDW \@ CHR == 80 ? 因缘深厚的恩人 # 敬爱的上司 \@的舌头原因么，%CALLNAME:CHR%被吻的全身绵软好似一根骨头都无…

					ELSEIF PALAM:CHR:欲情 >= PALAMLV:10 || GROUPMATCH(CHR, 76, 129, 80)
						PRINTFORMDL 接吻后把剩下的精液吸进嘴里
						PRINTFORMDW %CALLNAME:CHR%陶醉地沉浸于映姬的接吻，对灵活的舌肉追逐嗦吸着…
					ELSE
						PRINTFORMDL 接吻的同时啄吸着飞溅的精液
						PRINTFORMDW %CALLNAME:CHR%被映姬的淫行吓了一跳…
					ENDIF
				ELSE
					PRINTFORMDL 用手擦拭嘴巴周围，然后舔舐葱指
					PRINTFORMDW %CALLNAME:CHR%被映姬的淫行吓了一跳…
				ENDIF
			ENDIF
		ENDIF
	ELSE
		;飲めなかった
		;精飲経験20未満で「精液の味に慣れないようだ…」
		IF EXP:30:精飲経験 < 20
			IF (RAND:3 == 1 || EXP:精飲経験 == 0) && EXP:30:精飲経験 < 15
				PRINTFORML 「咳嚯，咳呵，…嗯……」
				PRINTFORML 「…这个\@ EXP:精飲経験 ? 还是让她喝比较好 # 真的能喝 \@ 吗？」
				PRINTFORMW 「太勉强了，味道怪怪的……」
			ELSEIF RAND:2 == 1
				PRINTFORML 「咳嚯，咳呵っ……呕…」
				PRINTFORMW 「等、等，等一下…好大的量…咳咳っ、咳哈っ…」
			ELSE
				PRINTFORML 「嗯，嗯嗯……咳嚯，咳咳……」
				PRINTFORMW 「卡在喉咙里，有点痛苦……」
			ENDIF
			RETURN 1
		;「手に吐き出し見せつける」
		ELSEIF NOWEX:PLAYER:射精 == 1
			SELECTCASE RAND:(2 + (EXP:精飲経験 > 150 && ABL:精液中毒 >= 5) * 2)
				CASE 0
					PRINTFORMW 「你看，你…射出了这么多啊」
				CASE 1
					PRINTFORML 「嗯っ…你的，如此的多…」
					PRINTFORMW 「我很擅长吧」
				CASE 2
					PRINTFORML 「嚯啦、你看…」
					PRINTFORML 「和我的唾沫混在一起，这么多」
					PRINTFORMW 「非常…的涩情呢…♥」
				CASE 3
					PRINTFORML 「出了这么多啊」
					PRINTFORMW 「我的嘴…好像很舒服呢…♥」
			ENDSELECT
			SIF ABL:精液中毒 < 3 || !CHR || EXP:CHR:精飲経験 < 20
				RETURN 1
			IF GROUPMATCH(CHR, 76, 129, 80) || (((TALENT:CHR:神霊 && CFLAG:CHR:地位 < 900) || !TALENT:CHR:神霊) && !CHECK_CHARA(CHR, "蓬莱人") && PALAM:CHR:欲情 >= PALAMLV:5)
				IF PALAM:欲情 >= PALAMLV:5 && (EXP_UP(15, CHR) == NOWEX:PLAYER:射精 * 3)
					PRINTFORML
					IF GROUPMATCH(CHR, 76, 129, 80)
						IF PALAM:CHR:欲情 < PALAMLV:8
							PRINTFORML 「%K30_C_NAME(CHR)%居然也这么喜欢吃…我们平分怎么样？」
							PRINTFORMDW 映姬玉指舀起手中的白浊，送到%CALLNAME:CHR%的嘴边
							PRINTFORMDL %CALLNAME:CHR%高兴地吮嘬起映姬的玉指，还把手上的精液舔了…
							PRINTFORMW 「呼呼っ、%K30_C_NAME(CHR)%…好像满足了呢」
						ELSE
							PRINTFORML 「%K30_C_NAME(CHR)%能这么喜欢喝真了不起啊。所以我也要奖励你…」
							PRINTFORMDW 映姬把手上的精液含进嘴里，和%CALLNAME:CHR%檀口重叠在一起
							PRINTFORMDL %CALLNAME:CHR%神魂颠倒地接受了湿吻，肉棒牛奶流入喉内…
							PRINTFORMW 「嗯咕…嗯呼っ、啾噗…啾噜っ……嗯っ……♥」
						ENDIF
					ELSE
						PRINTFORML 「%K30_C_NAME(CHR)%这么喜欢喝呢……那就一起分享，如何？」
						PRINTFORMDL 映姬玉指舀起手中的精液，送到%CALLNAME:CHR%的嘴边
						PRINTFORMDW %CALLNAME:CHR%怯怯地含着手指，品尝混合映姬味道的白浊…
					ENDIF
				ENDIF
			ENDIF
		;「口からダラダラとこぼす」
		ELSE
			IF PALAM:欲情 >= PALAMLV:5 && PALAM:CHR:欲情 >= PALAMLV:5 && (EXP_UP(15, CHR) == NOWEX:PLAYER:射精 * 3) && CHR
				PRINTFORML
				PRINTFORMDL ……欲情勃发%CALLNAME:(CHR)%喝光了%CALLNAME:(MASTER)%的精液好像还不够
				IF GROUPMATCH(CHR, 76, 129, 80)
					PRINTFORMDW 把脸凑近映姬嘴边垂下的精液，一脸陶醉地舔了起来
					PRINTFORML 「嗯っ！？　%K30_C_NAME(CHR)%……？」
					PRINTFORMW 「……呼呼っ、拿你没法子，真是贪心的孩子呢♥」
					PRINTFORMDW 同样充满情欲的映姬，将口中仅剩的精液口渡让给她，用亲吻的方式
				ELSE
					PRINTFORMDW 用手刮着映姬脸上的精液，接着吮吸葱指
					PRINTFORML 「算了，%K30_C_NAME(CHR)%的话……就，分享下吧」
					PRINTFORMDW 若无其事地映姬也把擦拭自己脸的手指放进%CALLNAME:(CHR)%的嘴里…
				ENDIF
			ELSEIF PALAM:欲情 >= PALAMLV:5 && (PALAM:CHR:欲情 >= PALAMLV:5 || GROUPMATCH(CHR, 76, 129, 80)) && EXP:CHR:精飲経験 >= 20 && (EXP_UP(15, CHR) != NOWEX:PLAYER:射精 * 3) && CHR
				PRINTFORML
				PRINTFORMDL ……欲情难耐的映姬发现了和自己一样洒落精液的%CALLNAME:(CHR)%
				IF GROUPMATCH(CHR, 76, 129, 80)
					PRINTFORMW 「%K30_C_NAME(MASTER)%的琼浆，可不能这样浪费哦。%K30_C_NAME(CHR)%…」
					PRINTFORMDL 映姬用手抬起%CALLNAME:(CHR)%的下巴，同时開始舔掉散落在脸上的精液
					PRINTFORMDW %CALLNAME:(CHR)%被\@ CHR == 80 ? 因缘深厚的恩人 # 敬爱的上司 \@的大胆行为所痴迷、软绵绵任凭摆布
					PRINTFORMW 「%K30_C_NAME(CHR)%、变干净了。 再来一次…可以吧♥」
				ELSE
					PRINTFORML 「呼呼呼っ…%K30_C_NAME(CHR)%、彼此的表情都很糟糕哦」
					PRINTFORMW 「要不要弄干净一点…」
					PRINTFORMDL 映姬如葱玉的纤指刮拭%CALLNAME:(CHR)%的下巴、把手指送到自己嘴里開始吮嘬
					PRINTFORMDL %CALLNAME:(CHR)%同样手指刮拭映姬的脸颊，然后送到自己嘴里
					PRINTFORMDW 淫靡香艳的舔声中，两人互相善后着…
				ENDIF
			ELSE
				IF ABL:精液中毒 < 3
					SELECTCASE RAND:3
						CASE 0
							PRINTFORMW 「好大的量啊，喝不完啊……」
						CASE 1
							PRINTFORML 「啊……不小心弄洒了」
							PRINTFORMW 「下次我会用心的」
						CASE 2
							PRINTFORMW 「对不起…因为出了很多，所以没喝完……」
					ENDSELECT
				ELSE
					SELECTCASE RAND:(3 + ((EXP:精飲経験 > 150 && ABL:精液中毒 >= 5) * 3) + (NOWEX:Ｍ絶頂 > 2))
						CASE 0
							PRINTFORMW 「啊嗯っ、好不容易得到的，太可惜了…」
						CASE 1
							PRINTFORML 「啊啊っ、不好……洒出来什么的，不行…」
							PRINTFORMDW 映姬葱指擦拭着嘴角的精液
						CASE 2
							PRINTFORML 「咳呼っ、咳呼っ…咳嚯っ…」
							PRINTFORML 「嗯っ、对不起…等等…奇怪的地方，被卡住了…」
							PRINTFORMW 「好不容易让我取出来的…」
						CASE 3
							PRINTFORML 「嗯っ、嗯嗯っ…不管怎么吸，都会出来的牛奶」
							PRINTFORMW 「我的嘴里都快装不下了…♥」
						CASE 4
							PRINTFORML 「閻魔大人的嘴…做这种事情…」
							PRINTFORML 「%K30_C_NAME(MASTER)%的这里真的是…罪孽深重。…♥」
							PRINTFORMDW 这么说着，映姫却開心地舔着从铃口渗出的汁液，生怕不给吃
						CASE 5
							CALL HPH_PRINT, @"「……HPHHPH」\n「%K30_C_NAME(MASTER)%、太有精神了…HPH」", "L"
							PRINTFORMDL 难以想象平时正直的曲直厅之主，阎罗殿下露出淫媚微笑，像妓女般张大了朱唇
							PRINTFORMDW 从嘴角到弧线优美的下巴，%CALLNAME:MASTER%释放的白浊粘稠淫靡地垂下来。…
						CASE 6
							CALL HPH_PRINT, "「对、对不起…HPH　嘴巴、好像变得很淫荡的，舒服起来了HPH」", "L"
							CALL HPH_PRINT, "「吼棒呃…一姬喝想要哇…咕HPH」", "L"
							PRINTFORMDL 映姬光是吮吸就高潮了，连话都说不清
							PRINTFORMDW 口齿不清的小小阎王爷，既新奇又可爱…
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_26(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;授乳PLAY
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ENDIF
	IF TCVAR:30:375
		LOCALS = %\@ TCVAR:30:375 == 1 ? %MASTERNAME:30%酱 # %K30_C_NAME(MASTER)% \@%
		TCVAR:30:375 = TCVAR:30:375 == 1 ? 1 # 0
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「呼呼っ♥　%LOCALS%这样的话…就会出来了…♥」
				PRINTFORML 「乖，乖…真是乖孩子，吃得很好♥」
			CASE 1
				PRINTFORML 「啊哈っ…♥　能出这么多，%LOCALS%真了不起♥」
				PRINTFORML 「%LOCALS%…好孩子♥　好孩子♥」
			CASE 2
				PRINTFORML 「呼呼呼っ♥　出了很多…很努力呢♥」
				PRINTFORML 「%LOCALS%、了不起♥　了不起♥」
		ENDSELECT
		PRINTFORMDW 映姬一边捋着脉动的阴茎，一边温柔地抚摸着%CALLNAME:MASTER%的头…
		IF !(TCVAR:30:375 || STRCOUNT(CSTR:30:0, "授乳PLAY"))
			PRINTFORML
			PRINTFORML 「………有点做过头了吧？」
			PRINTFORMW 「但是，这个…我也快上瘾了…♥」
			CALLF FIRSTTIME("授乳PLAY")
		ENDIF
		RETURN 1
	ELSEIF ABL:TARGET:精液中毒 >= 5 && ABL:TARGET:技巧 > 3 && RAND:2 == 1
		PRINTFORML 「啊哈っ…♥　好厉害…好烫…」
	ELSEIF NOWEX:PLAYER:射精 == 1
		PRINTFORML 「呀っ…！　这么能干啊…」
	ELSE
		PRINTFORML 「嗯っ、好大的量…哪里都黏糊糊的了」
	ENDIF
	PRINTDATAW
		DATAFORM 「会好好“照顾”你的，直到全射出为止♥」
		DATAFORM 「……还是一跳一跳的…那么舒服啊♥」
	ENDDATA
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_3(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;手淫
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	ELSEIF ABL:30:精液中毒 >= 5 && ABL:30:技巧 > 3 && !RAND:3 == 1
	;「恍惚の表情で舌を突き出しあびる」
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「嗯…好热…」
				PRINTFORMW 「更多更多，还想要的吧…♥」
			CASE 1
				PRINTFORML 「呼啊啊……出了很多呢…」
				PRINTFORMW 「你能满足真是太好了…♪」
			CASE 2
				PRINTFORMDL 映姬满足地伸出香舌，故意慢悠悠地舐着手指上的精液
				PRINTFORMDL 而后也像猫洗脸一样，把沾在脸上的精液也舔掉…
				PRINTFORML 「嗯呼っ…♥　和直接入口，有点味道…不同？」
				PRINTFORMW 「嗯っ…但是，都…喜欢♥」
		ENDSELECT
	ELSE
		SELECTCASE RAND:2
			CASE 0
				PRINTFORMW 「这样，出来了呢……」
			CASE 1
				PRINTFORMW 「呵呵，我的手指也舒服吗？」
		ENDSELECT
	ENDIF
RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_2(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;肛門
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
	ELSEIF TFLAG:194 == 045
		CALL HPH_PRINT, "「哦っHPH　哦西っHPH　屁、股……啊゛啊～HPH」", "L"
		CALL HPH_PRINT, "「肚子，啊…满满的，恶、好…HPHHPH」", "L"
		PRINTFORMDL 映姬的直肠像喉咙一样蠕动，一滴也不放过地吸着
		PRINTFORMDW %CALLNAME:MASTER%经久不息地射着，给映姬狠狠注入了精液…
		CALL HPH_PRINT, "「啊、哈…HPH　啊哈、哈HPH　又、出来…了…HPH」", "L"
		CALL HPH_PRINT, "「啊啊……幸、福…HPH」", "L"
		PRINTFORMDL 尿从松弛的尿道口溢出，与爱液混合滴下
		PRINTFORMDW 抛弃閻罗的假面，纵情肉欲的映姬露出非常满足的笑容…

	ELSEIF ABL:30:肛射中毒 > 3
		IF NOWEX:MASTER:射精 < 2
			STRDATA LOCALS
				DATAFORM 「啊啊HPH　屁股，肚子……好暖和……HPH」
				DATAFORM 「嗯っHPH　肚子里…慢慢地，扩散…HPH」
				DATAFORM 「屁股，颤颤的…发抖…HPH」
				DATAFORM 「啊呋…HPH　臀部、暖烘烘…的HPH」
				DATAFORM 「屁股…好温暖…好幸福……HPH」
			ENDDATA
			CALL HPH_PRINT, LOCALS, "W"
		ELSE
			SELECTCASE RAND:(6 + (NOWEX:MASTER:射精 == 3) * 2)
				CASE 0
					CALL HPH_PRINT("「屁股，出来了…满满的…HPH」", "W")
				CASE 1
					CALL HPH_PRINT("「屁股ぃ、要来了HPH　……想要，满满的…HPH」", "W")
				CASE 2
					CALL HPH_PRINT("「啊…屁股也……快要融化了…啊、啊、嗯HPH」", "W")
				CASE 3
					CALL HPH_PRINT("「屁股后面……好热啊，好累啊…HPH」", "W")
				CASE 4
					CALL HPH_PRINT("「屁股…被爱着……我，好幸福……HPH」", "W")
				CASE 5
					CALL HPH_PRINT("「啊啊~…HPH　屁股……好像要烧灼了……好热…HPH」", "W")
				CASE 6
					CALL HPH_PRINT("「屁股的深处，嗖嗖的…中出了…HPH」", "W")
				CASE 7
					CALL HPH_PRINT("「啊呼っHPH　还在出来……屁股上，停不下来…HPH」", "W")
			ENDSELECT
		ENDIF
	ELSEIF ABL:Ａ感覚 >= 2
		SELECTCASE NOWEX:MASTER:射精
			CASE 1
				CALL HPH_PRINT, @"「嗯っ…屁股上…出来了…HPH」", "W"
			CASE 2 ,3
				PRINTDATA
					DATAFORM 「嗯呃っ…屁股上、出现了、好厉害……
					DATAFORM 「肚子好涨…快要溢出来了……
					DATAFORM 「肚子好像要胀大了…
					DATAFORM 「呃っ、屁股……热……好舒服…
				ENDDATA
				CALL HPH_PRINT, @"HPH」", "W"
		ENDSELECT
	ELSE
		PRINTDATAW
			DATAFORM 「诶っ……臀部、在…？」
			DATAFORM 「屁股…奇怪的感觉…」
		ENDDATA
	ENDIF
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K30_1(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;膣内
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SIF TCVAR:30:362 == 1
		TCVAR:30:362 = 2
	IF FLAG:70 || TCVAR:30:烂醉
	ELSEIF TCVAR:30:强行
		PRINTDATAW
			DATAFORM 「讨厌…讨厌…不要…」
			DATAFORM 「为何…为什么……要做这样的事…」
			DATAFORM 「明明相信……」
		ENDDATA
		PRINTFORMW 映姫は%TEXTR("带着厌恶的表情/流着泪/像能乐面具一样面无表情")%喃喃自语着…
	;マグロスイッチオン
	ELSEIF TCVAR:30:385
		RETURN 1
	ELSEIF ABL:30:膣射中毒 > 3
		IF NOWEX:MASTER:射精 < 2
			IF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
				PRINTDATAW
					DATAFORM 「呼呼っ、这样…一定会让我们也…♥」
					DATAFORM 「哈…啊♥　小婴儿的素材，给我…」
				ENDDATA
				SIF (ESTRUS_CYCLE(30) >= 70 || TCVAR:強制排卵) && RAND:2 || TCVAR:30:362 == 2
					PRINTFORMW 「今天……满满，更多的……想要啊…♥」
			ELSE
				PRINTDATAW
					DATAFORM 「不要客气……更多的，给我……涂抹上吧…♥」
					DATAFORM 「呼啊啊っ…你的白浊牛奶…来了啊…♥」
					DATAFORM 「哈、啊啊……%K30_C_NAME(MASTER)%を…里面，有感觉吗…♥」
					DATAFORM 「啊，哈啊…♥　非常的、烫…♥」
				ENDDATA
			ENDIF
		ELSE
			IF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
				PRINTDATAW
					DATAFORM 「涂到里面…让我怀孕…♥」
					DATAFORM 「婴儿的材料…溢出来了，我…很幸福呢♥」
					DATAFORM 「连我的子宫都…全部满足……♥」
					DATAFORM 「只要是你的种子，无论多少…无论多少次♥」
					DATAFORM 「重要的地方…全部被你浸染…想要♥」
				ENDDATA
				IF (ESTRUS_CYCLE(30) >= 70 || TCVAR:強制排卵) && RAND:2 || TCVAR:30:362 == 2
					PRINTDATAW
						DATAFORM 「今天是…值得期待的一天，因为……♥」
						DATAFORM 「如果今天能做到的话，我会很高兴的…♥」
						DATAFORM 「今天……一直注入到溢出为止…♥」
					ENDDATA
				ENDIF
			ELSE
				PRINTDATAW
					DATAFORM 「小腹好热啊……好像要融化了……好烫…♥」
					DATAFORM 「请再多给我注入……把我……染上你的…♥」
					DATAFORM 「在腹下的里面，我能感觉到…被你正爱着…♥」
					DATAFORM 「烫烫的，满满的…来了呜…♥」
					DATAFORM 「……！　…啊っ、啊啊っ！　热热的…溢出来了…♥」
					DATAFORM 「就这样，不要拔出来……哦哦！全部染上了呀……♥」
				ENDDATA
			ENDIF
		ENDIF
	ELSEIF ABL:30:膣射中毒 > 0
		IF NOWEX:MASTER:射精 < 2
			IF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
				PRINTFORMW 「就这样…如果能孕上，我会很高兴的…」
			ELSE
				PRINTFORMW 「嗯……好暖和…」
			ENDIF
		ELSE
			IF TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)
				PRINTDATAW
					DATAFORM 「帮我注满…直到怀上为止…」
					DATAFORM 「满满…出来了……如果可以的话就好了……」
				ENDDATA
			ELSE
				PRINTDATAW
					DATAFORM 「啊嗯…快要溢出来了…」
					DATAFORM 「呃嗯……好厉害，出来了…」
				ENDDATA
			ENDIF
		ENDIF
	ELSE
		PRINTFORMW 「…中出了…」
	ENDIF
	RETURN 1
ENDIF
RETURN 1

;-------------------------------------------------
;眠姦射精に関する口上の表示
;一時的にTARGETを口上主に設定している
;-------------------------------------------------

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_0(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;避孕套
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_23(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++

;-------------------------------------------------
;深喉插入
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_7(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;足交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_5(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;乳交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_4(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_3(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;手淫
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_2(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;肛門
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A2_K30_1(ARG)
CALL PALAM_MESSAGE_A
TCVAR:30:396 ++
;-------------------------------------------------
;膣内
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_F_K30(ARG)
CALL PALAM_MESSAGE_F
;-------------------------------------------------
;挑逗
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1
;-------------------------------------------------
;絶頂抵抗表現
;見やすくするためここに
@K30_PALAMCNG_MAGURO
;-------------------------------------------------
;噴乳
;-------------------------------------------------
IF NOWEX:噴乳
	IF SHIRAHU(30)
		CALLF FIRSTTIME("噴乳")
		PRINTFORML 「欧派…喷出来了…」
		SIF FIRSTTIME("母乳定着") && TALENT:母乳体質 == 2
			PRINTFORML 「为什么，我…怎么…？」
	ENDIF
ENDIF

;烂醉はパス
SIF TCVAR:烂醉 == 1
	RETURN 1
;-------------------------------------------------
;五重絶頂
;-------------------------------------------------
IF NOWEX:五重絶頂
	CALL HPH_PRINT("「呀啊啊啊啊あああアアァァァ！！♥♥♥♥♥　……HPHHPH」", "L")
	PRINTFORMDW 足以将贞女转成痴女的快感风暴面前，什么都做不到……
	PRINTFORMDL 映姬只来得及喊了一声，双目翻白，玉体重重后仰，剧烈地痉挛了……
	CALL HPH_PRINT("「咕……HPH　噫…咿…哦咕♥……太舒呼，太爽，了♥………HPH　这样…不行……啊♥HPHHPH」", "W")
	TCVAR:30:397 ++
	RETURN 1
;-------------------------------------------------
;四重絶頂
;記入チェック（=0, 非表示、1, 表示）
;-------------------------------------------------
ELSEIF NOWEX:四重絶頂
	SELECTCASE NOWEX:四重絶頂
		;Ｍ含まない絶頂
		CASE 1
			PRINTFORMDL 超过了正常量的极致快感，映姬发出了被征服的长声娇吟…
			CALL HPH_PRINT("「呀っ♥、呀啊啊啊啊啊啊っ♥♥♥～HPH　～～～HPHHPH」", "W")
			PRINTFORMDW 身体颤抖着升到绝顶后，映姬似乎坏掉了，瞳孔空虚茫然……
			PRINTFORMW 「……哈唔……哈啊……哈啊……」
			RETURN 1
		;Ｍを含む絶頂
		CASEELSE
			PRINTFORMDW 被毫不留情地攻击着性感带，映姬的身体被迫沉浸在快乐中……
				IF TEQUIP:30:口接触部位 == 4
					PRINTFORMDL 强行撬開唇齿索取闪躲的香舌，非爱的接吻只为满足欲望……
				ELSE
					PRINTFORMDL 尽管朱唇拒绝侍奉工作，但缠绕的双舌不自禁地被转换成愉悦的快感…
				ENDIF
			PRINTFORMDW 绝顶波浪同时涌来，映姬在前所未有的快乐里连声音都发不出来，颤抖的娇躯大幅后仰……
			CALL HPH_PRINT("「ッッ！　～～～～HPH　～～～ッ！　～～～～HPH」", "W")
			RETURN 1
	ENDSELECT
	RETURN 1
;-------------------------------------------------
;三重絶頂
;-------------------------------------------------
ELSEIF NOWEX:三重絶頂
	SELECTCASE NOWEX:三重絶頂
;両穴+他絶頂
		CASE 1,2,7
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT("「不行不行不行，不行，要去了HPH」", "L")
				CASE 1
					CALL HPH_PRINT("「讨厌、我不要了！　已经…一库呜呜～…HPH」", "L")
				CASE 2
					CALL HPH_PRINT("「啊啊啊――っ、不行！　不行―っ…呵啊啊啊啊HPH」", "L")
			ENDSELECT
			PRINTFORMDL 娇泣的映姬抗拒绝顶，但两个洞被同时玩弄，一下子就屈服了……
			RETURN 1
;他絶頂
		CASEELSE
			IF TEQUIP:30:口接触部位 == 4
				PRINTFORMDL 映姬为了逃避接吻而扭动娇躯，但因快感上升而口嫌体正直地发出娇美的呻吟……
			ELSEIF  TEQUIP:30:口接触部位 == 0
				PRINTFORMDL 映姬拼命摇着头不承认快感，但被给予的快乐，依然让她忍不住漏出大大的娇声……
			ELSE
				PRINTFORMDL 映姬自欺欺人的用口淫侍奉来掩饰快乐，果然马上又忍不住松開嘴发出屈从的娇吟……
			ENDIF
			SELECTCASE RAND:3
				CASE 0
					CALL HPH_PRINT("「ひっ！　不行，不……不，不要啊啊啊啊っっHPH」", "W")
				CASE 1
					CALL HPH_PRINT("「噫呀！　明明讨厌！　不行…会去的唔唔呃！HPH」", "W")
				CASE 2
					CALL HPH_PRINT("「啊啊っ！　放过我吧、已经不要了……咿呀、咕っHPH」", "W")
			ENDSELECT

	ENDSELECT
	RETURN 1
ENDIF
;-------------------------------------------------
;二重絶頂＠書き分けできないのでパス
;-------------------------------------------------
[SKIPSTART]
IF NOWEX:二重絶頂
	;部位を指定せず簡易的に書く場合、[SKIPSTART]&[SKIPEND]のコメントアウトを外して、[SKIPSTART]とこのコメントの間に書いてください
	SELECTCASE RAND:3
		CASE 0
			CALL HPH_PRINT("「讨厌、一库！　要去了呜呃っHPH」", "W")
		CASE 1
			CALL HPH_PRINT("「咿呀っ！　啊啊っ！要去了呜うぅHPH」", "W")
		CASE 2
			CALL HPH_PRINT("「那样，不行！　啊っ、啊啊啊啊～ッHPH」", "W")
	ENDSELECT
	RETURN 1
ENDIF
[SKIPEND]
SIF NOWEX:Ｃ絶頂
	PRINTFORMW 「那里…玩弄的话……呀…嗯…嗯呃呃！」
SIF NOWEX:Ｖ絶頂
	PRINTFORMW 「住手，不行啊…不行，不行不行啊啊！」
SIF NOWEX:Ａ絶頂
	PRINTFORMW 「不行……感觉到了……不能用屁股…但是……啊啊…！」
SIF NOWEX:Ｂ絶頂
	PRINTFORMW 「不行……不行……胸…这么……去，去了啊！」
IF NOWEX:Ｍ絶頂
	SELECTCASE TEQUIP:30:口接触部位
	;強度でなく接触部位で振り分け
		CASE 1
		;口交
		CASE 2
		;舐陰させる
		CASE 4
		;接吻
		CASE 7
		;肛門奉仕＠どういう絵面だこれ
	ENDSELECT
ENDIF
RETURN 1

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


code:
;TW你は育児に係わるべきではないダメ人类…というのが口上作者の脳内設定
;なので育児イベント内では全力でパージされています

@M_KOJO_EVENT_K30_CHILD_RAISING_回復
SIF GETBIT(CFLAG:1804, TALENT:育児中)
	RETURN
PRINTFORML 「呼呜……终于恢复了吗…」
PRINTFORML 「床上修养早就该结束了，总不能一直拖拖拉拉的吧」
PRINTFORMW 「%SHOW_CHILDNAME(30)%…妈妈今后会更加努力的」

@M_KOJO_EVENT_K30_CHILD_RAISING_離乳
SIF GETBIT(CFLAG:1804, TALENT:育児中)
	RETURN
IF TALENT:母乳体質 == 2
	PRINTFORML 「…即使奶水分泌得再多，也差不多到了断奶时期……啊」
	PRINTFORML 「%SHOW_CHILDNAME(30)%酱…对不起，还是忍着不要吃奶了吧」
	PRINTFORML 「哈啊…」
	PRINTFORMDW 映姬对哺乳期结束感到有点寂寞…
ELSE
	PRINTFORML 「%SHOW_CHILDNAME(30)%、好的、啊ー嗯…」
	PRINTFORML 「好乖好乖、好好吃…好棒好棒」
	PRINTFORML 「…欧派也已经毕业了……可能…有点寂寞」
	PRINTFORML
	IF TALENT:母乳体質 == 1 && EXP:噴乳経験 > 500 && EXP:出産経験 > 1
		PRINTFORML 「但是…奶水的话，没有停止渗出的意思…」
		PRINTFORMW 「这果然是、%K30_C_NAME(MASTER)%的错…？」
	ELSE
		PRINTFORML 「%SHOW_CHILDNAME(30)%、吮吸乳房时可爱的脸」
		PRINTFORML 「妈妈最喜欢了…」
		PRINTFORMDW 映姬对哺乳期结束感到有点寂寞…
	ENDIF
ENDIF
PRINTFORML

@M_KOJO_EVENT_K30_CHILD_RAISING_玩具
SIF GETBIT(CFLAG:1804, TALENT:育児中)
	RETURN
PRINTFORMDL 关于%SHOW_CHILDNAME(30)%要玩的玩具，映姬左思右想…
PRINTFORML
PRINTFORML 「要%SHOW_CHILDNAME(30)%使用得既安全又耐用」
PRINTFORML 「玩着玩着也益智大脑的玩具…有什么地方出售…？」
PRINTFORMW 「…小町和久侘歌、也要帮忙寻找吶」

@M_KOJO_EVENT_K30_CHILD_RAISING_つかまり立ち
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
PRINTFORML 「啊啊…错过了…」
PRINTFORMDL 在映姬叹息的边上、%SHOW_CHILDNAME(30)%笑嘻嘻的扶着桌子站着
PRINTFORML 「不知不觉就长得飞快，好像稍微移開视线似的，就会变得越来越高…」
PRINTFORMW 「但是，从这里…真的会让人目不转睛呢…」

@M_KOJO_EVENT_K30_CHILD_RAISING_よちよち
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
PRINTFORML 「诶欸っ！？　等等…不知不觉到了那里！？」
PRINTFORMDL 注意到一个蹒跚学步的小逃犯即将摆脱宅邸
PRINTFORMDL 发出与阎王不相称的、惊慌失措的悲鸣
PRINTFORML 「%SHOW_CHILDNAME(30)%、虽然很有元気很好…但不要太吓妈妈呀」
PRINTFORML 「呼呜…要是有小町那样的能力，就能稍微放松心情了…」
PRINTFORMDW 天真无邪笑着的%SHOW_CHILDNAME(30)%要抱抱、映姬疲惫地嘟囔着…

@M_KOJO_EVENT_K30_CHILD_RAISING_会話寸前
;3日間同じイベントは微妙なので1日のみ
IF CFLAG:出産経過日 > CHILD_喋る - 3 || GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
PRINTFORMDL 正因为是阎魔的孩子，%SHOW_CHILDNAME(30)%学说话也很快…
PRINTFORML
PRINTFORML 「妈妈」
CALL COLORMESSAGE(@"「妈妈」", K30_CHILDWORD() ,1 ,0)
PRINTFORML 「早上好」
CALL COLORMESSAGE(@"「早上好」", K30_CHILDWORD() ,1 ,0)
PRINTFORML 「真乖真乖、做的真棒♪」
PRINTFORMDL 映姬高兴得不得了，抚摸着%SHOW_CHILDNAME(30)%头顶的发旋…
CALL COLORMESSAGE(@"「做得很好！」", K30_CHILDWORD() ,2 ,0)

@M_KOJO_EVENT_K30_CHILD_RAISING_喋る
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
PRINTFORMDL 随着发育迅速，%SHOW_CHILDNAME(30)%向映姬提出了各种各样的问题…
PRINTFORML
CALL COLORMESSAGE(@"「妈妈~妈妈，这是什么？」", K30_CHILDWORD() ,1 ,0)
PRINTFORML 「那是啊，花。她说想開得很漂亮，让大家都看看」
CALL COLORMESSAGE(@"「妈妈，为什么这朵花这么红？」", K30_CHILDWORD() ,1 ,0)
PRINTFORML 「呼呼っ、那是妈妈也不知道的…为什么呢？」
PRINTFORMDL 映姬一边认真地面对提问，一边对孩子的好奇心之深感到惊讶
PRINTFORML
CALL COLORMESSAGE(@"「吶~吶~，妈妈！」", K30_CHILDWORD() ,1 ,0)
CALL COLORMESSAGE(@"「为什么那个小姐姐总是睡午觉呢？」", K30_CHILDWORD() ,1 ,0)
PRINTFORMDL %SHOW_CHILDNAME(30)%指着的地方，小町正在酣睡…
PRINTFORML 「……真的不知道为什么。妈妈也完全不明白」
PRINTFORMW 「让我们来听听那位姐姐的故事吧…」

@M_KOJO_EVENT_K30_CHILD_RAISING_語彙
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
PRINTFORMDL %SHOW_CHILDNAME(30)%也长了不少智慧，開始各种各样的调皮
PRINTFORMDL 映姬觉得自己的孩子已经该懂事了，正在考虑管教…
PRINTFORML
PRINTFORML 「听好了、我们常说『撒谎是偷窃的開始』」
PRINTFORML 「如果对小小的坏事变得不在乎的话，即使是非常不好的事也渐渐不会放在心上」
PRINTFORML 「%SHOW_CHILDNAME(30)%今后可能会有畏惧说『对不起』的时候」
PRINTFORML 「但是，在那里说谎…」
PRINTFORML
PRINTFORMDL 映姬尽可能地简短，结果还是一如既往地成了说教
PRINTFORMDL 聪明的%SHOW_CHILDNAME(30)%总算跟上了话题
CALL COLORMESSAGE(@"「…妈妈的话、太ー唠ー叨！」", K30_CHILDWORD() ,1 ,0)
PRINTFORMDW 看来懂事和能忍耐是两码事…

@M_KOJO_EVENT_K30_CHILD_RAISING_しつけ
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
LOCAL = FLAG:口上色 ? 0xFF003C # GETDEFCOLOR()
LOCALS = %\@ CHILD_SEX:30:(TALENT:育児中) == 1 ? わたし # ぼく \@%
CALL COLORMESSAGE(@"「姐姐喜欢吃午饭，%LOCALS%知道」", K30_CHILDWORD() ,1 ,0)
CALL COLORMESSAGE(@"「工作结束后，再打个盹吧」", K30_CHILDWORD() ,1 ,0)
CALL COLORMESSAGE(@"「但是，现在不行！　马上妈妈又要生气了！」", K30_CHILDWORD() ,1 ,0)
CALL COLORMESSAGE(@"「嗨、是这样啊……」", LOCAL ,1 ,0)
PRINTFORMDW ……路过的映姬面前，正端坐着的小町和搭话的%SHOW_CHILDNAME(30)%
PRINTFORML
PRINTFORMW 「欸っ多？　%SHOW_CHILDNAME(30)%に…小町…？」
PRINTFORML 「……哈啊」
PRINTFORML 「需要管教的也需要动手的…没想到是这孩子…」
PRINTFORMDW 映姬马上明白了原因，无奈地叹了口气
PRINTFORML
PRINTFORML 「%SHOW_CHILDNAME(30)%、妈妈和这个姐姐还有『很多』事要聊」
PRINTFORML 「你去别的地方玩吧」
CALL COLORMESSAGE(@"「哈ー咿！」", K30_CHILDWORD() ,1 ,0)
CALL COLORMESSAGE(@"「うええ…简直是两个四季大人，唠叨也是两倍啊…」", LOCAL ,1 ,0)
PRINTFORMDW 小町已经确定要接受更多的说教了，肩膀沮丧地垮下来…

@M_KOJO_EVENT_K30_CHILD_RAISING_就学
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
PRINTFORMDL 去寺子屋的第一天，精神满满出门的%SHOW_CHILDNAME(30)%被映姬送走了
PRINTFORML
PRINTFORML 「…听好了，在寺子屋要好好听先生的话」
PRINTFORML 「还有，如果朋友有什么困难的话，请主动帮助他」
PRINTFORML 「那么，一路走好。要小心哦」
CALL COLORMESSAGE(@"「哈ー咿！　我走ー了！！」", K30_CHILDWORD() ,1 ,0)
PRINTFORML
PRINTFORMDW 映姬感慨地目送着元气满满的%SHOW_CHILDNAME(30)%跑起来的背影…

@M_KOJO_EVENT_K30_CHILD_RAISING_自立前
IF GETBIT(CFLAG:1804, TALENT:育児中)
	CALL K30_CLEAR_TEXTLINE
	RETURN
ENDIF
IF CHILD_SEX:30:(TALENT:育児中) == 1
	PRINTFORMDL %SHOW_CHILDNAME(30)%个子也长高了，和母亲长得一模一样的漂亮
ELSE
	PRINTFORMDL %SHOW_CHILDNAME(30)%早就超过了母亲的个头，茁壮成长了强壮的孩子
ENDIF
PRINTFORMDL 展望未来，映姬正在和自己的孩子聊着…
PRINTFORML
PRINTFORML 「%SHOW_CHILDNAME(30)%说想帮助我工作，真是是非常高兴哦」
PRINTFORML 「如果你一直坚持下去的话，确实会轻松很多」
PRINTFORML 「但是，作为母亲，我不能认可」
PRINTFORML 「…审判罪的…本身就带有原罪，审判者，也逃脱不了罪的」
PRINTFORML 「我不想让%SHOW_CHILDNAME(30)%背负那样的重担……知道了吗？」
CALL COLORMESSAGE(@"「………」", K30_CHILDWORD() ,1 ,0)
PRINTFORML
PRINTFORMDW 映姬和%SHOW_CHILDNAME(30)%的相谈一直持续到很晚…

@K30_CHILD_INDEPENDENCE
CALL K30_D_LINE
IF CFLAG:1805
	PRINTFORMDL 映姬暗自抚养的孩子终于迎来了自立的时刻
	PRINTFORMDL 考虑到今后的事情，%CSTR:30:83%似乎要离開幻想乡了
	PRINTFORMDL 静静地结束了离别的问候，映姫独自守护着%CSTR:30:83%离開了家…
	PRINTFORMDW 映姬只能流泪祈祷自己的孩子平安无事
	PRINTFORML
	PRINTFORMDL …目送%CSTR:30:83%走后，映姬流泪用木棒狠狠击打腹下子宫处，自残的避孕惩罚自己
	CALL COLORMESSAGE, "映姫の最大体力が200減りました", C_YELLOW ,1 ,1
	CALL COLORMESSAGE, "映姫の最大気力が200減りました", C_YELLOW ,2 ,1
	PRINTFORML
	CALL COLORMESSAGE, "映姬再也不能生育了…", C_RED, 2 ,1
	BASE:30:体力 -= 200
	MAXBASE:30:体力 -= 200
	BASE:30:気力 -= 200
	MAXBASE:30:気力 -= 200
ELSE
	LOCALS = %\@ CHILD_SEX:30:(TALENT:育児中) == 1 ? 娘 # 息子 \@%
	PRINTFORMDL 映姫的%LOCALS%、%SHOW_CHILDNAME(30)%平安迎来了独立的日子
	PRINTFORML
	PRINTFORML 「…你总有一天会再回到我身边的吧」
	PRINTFORML 「那时是审判方和被审判…届时请让我好好回顾一下%SHOW_CHILDNAME(30)%的一生」
	PRINTFORML 「但是没关系，你是我引以为豪的%LOCALS%…」
	PRINTFORML 「如果%SHOW_CHILDNAME(30)%三思而行的话一定不会迷茫」
	PRINTFORML 「为了能挺起胸膛，微笑着再次相遇，今后也积累善行吧」
	PRINTFORML 「好了，你走吧」
	PRINTFORML
	IF CFLAG:妊娠経過日数 >= 5 && CFLAG:妊娠自覚状態
		PRINTFORMW 望着孩子远去的背影，映姬暗暗发誓，一定要把肚子里的宝宝也平安养大
	ELSE
		PRINTFORMW 映姬看着远去的孩子的背影，祈祷着%LOCALS%的平安无事
	ENDIF
	CALL 自立先選定(30, TALENT:育児中)
	CALL ASK_DIARY(@"%SHOW_CHILDNAME(30)%が独り立ちした。")
	TALENT:育児中 = 0
	CFLAG:育児人数 = 0
	CFLAG:MASTER:育児人数 -= 1
ENDIF
CFLAG:出産経過日 = 0
PRINTFORML

@M_KOJO_EVENT_K30_CHILD_RAISING_登下校(ARGS,ARG,ARG:1)
SIF GETBIT(CFLAG:1804, TALENT:育児中)
	RETURN
IF !ARG
	PRINTDATAL
		DATAFORM 「%SHOW_CHILDNAME(30)%、一路走好」\n「不会很晚就会再会」
		DATAFORM 「没有遗忘的东西吗？　不要紧吧？」\n「好的，那走好」
		DATAFORM 「啊啦？　今天出门很早？」\n「…对了，你有事要做」\n「那你路上小心」
	ENDDATA
ELSE
	PRINTDATAL
		DATAFORM 「嗨，欢迎回来」\n「请先洗手」
		DATAFORM 「%SHOW_CHILDNAME(30)%、欢迎回来」\n「…呼呼っ、总觉得你很開心呢。有什么好事吗？」
		DATAFORM 「欢迎回来，今天来得真早啊」
	ENDDATA
ENDIF

@M_KOJO_EVENT_K30_CHILD_RAISING_吃飯(ARGS,ARG,ARG:1)
SIF GETBIT(CFLAG:1804, TALENT:育児中) || CFLAG:MASTER:現在位置 != CFLAG:30:現在位置
	RETURN
IF ARGS == "授乳"
	PRINTDATAL
		DATAFORM 「乖啦乖啦…%SHOW_CHILDNAME(30)%酱、吃奶奶、真棒…」
		DATAFORM 「多喝点，喝大点的那个…」
		DATAFORM 「%SHOW_CHILDNAME(30)%，好孩子好孩子…」\n「妈妈的奶奶，赶紧吃吧…」
	ENDDATA
ELSEIF ARGS == "離乳食"
	PRINTDATAL
		DATAFORM 「啊啦啊啦、就这么洒了…」\n「嗨、再来一次、啊ー嗯…」
		DATAFORM 「啊っ、不行…可能还有点热…」\n「呼ー、呼ー……」\n「嗨、请」
		DATAFORM 「唔ー嗯、是现在心情不好吗…」\n「拜托了，请再张開嘴嘴？　吶？」
	ENDDATA
ELSEIF CFLAG:出産経過日 < 15
	PRINTDATAL
		DATAFORM 「诶？　想和妈妈吃一样的东西…？」\n「这是%SHOW_CHILDNAME(30)%吃的话、嘴可能会不适应…」
		DATAFORM 「%SHOW_CHILDNAME(30)%、饭要好好嚼着吃哦」
		DATAFORM 「%SHOW_CHILDNAME(30)%、不能挑食哦」
	ENDDATA
ELSE
	SELECTCASE RAND:3
		CASE 0
			PRINTFORML 「今天为%SHOW_CHILDNAME(30)%准备了她喜欢的食物哦」
			PRINTFORML 「要多吃一点呢」
			PRINTFORMDL %SHOW_CHILDNAME(30)%正在大口吃着看起来辣得让人眼泪汪汪的食物...
			PRINTFORMDL 她的味觉和胃口真的很像映姫
		CASE 1
			PRINTFORML 「%SHOW_CHILDNAME(30)%,听好了,每粒米饭里都住着7位神明」
			PRINTFORML 「如果糟蹋饭食会被打屁股的...当然,剩饭是绝对不可以的」
			PRINTFORML 「还有啊...」
			PRINTFORMDL %SHOW_CHILDNAME(30)%一边认真听映姫的教导,一边规规矩矩地进食
		CASE 2
			PRINTFORML 「要表达对食材和所有付出劳动的人的感激之情,最好的方法就是好好吃掉」
			PRINTFORML 「%SHOW_CHILDNAME(30)%每次都能吃得那么漂亮,妈妈非常高兴」
			PRINTFORMDL 映姫微笑地看着%SHOW_CHILDNAME(30)%用优雅的动作进餐
	ENDSELECT
ENDIF
[SKIPSTART]
@M_KOJO_EVENT_K30_CHILD_RAISING_BATH(ARGS,ARG,ARG:1)
IF ARGS == "幼児期"

ELSEIF ARGS == "幼少期"

ELSE

ENDIF

@M_KOJO_EVENT_K30_CHILD_RAISING_SLEEPING(ARGS,ARG,ARG:1)
IF ARGS == "幼児期"

ELSEIF ARGS == "幼少期"

ELSE

ENDIF

@M_KOJO_EVENT_K30_CHILD_RAISING_OYASUMI(ARGS,ARG,ARG:1)

@M_KOJO_EVENT_K30_CHILD_RAISING_TOY(ARGS,ARG,ARG:1)
IF ARGS == "幼児期"

ELSEIF ARGS == "幼少期"

ELSE

ENDIF
[SKIPEND]
;兒童自由行動
;同室者にあいさつをする
@M_KOJO_EVENT_K30_CHILD_RAISING_OTHER(ARGS,ARG,ARG:1)
#DIM CHR
#DIM VAL
#DIM TEMP
#DIM L_COUNT
#DIMS 角色名
#DIMS あいさつ
SIF GETBIT(CFLAG:1804, TALENT:育児中) || !GET_TARGETNUM()
	RETURN
VARSET LOCAL
VAL = 0
TEMP = 0
IF GET_TARGETNUM() == 1
	CHR = TARGET
ELSE
	CHR = TARGET:(RAND:(GET_TARGETNUM()) + 1)
	SIF !CHR
		RETURN
ENDIF
IF ARGS == "幼児期"
	CHR = RAND:3 ? CHR # MASTER
	CHR = RAND:2 ? 30 # CHR
	PRINTDATADL
		DATAFORM %SHOW_CHILDNAME(30)%向%CALLNAME:CHR%挥了挥手
		DATAFORM %SHOW_CHILDNAME(30)%一直盯着%CALLNAME:CHR%的脸看…
		DATAFORM %SHOW_CHILDNAME(30)%望着%CALLNAME:CHR%的脸高兴地笑着…
		DATAFORM %SHOW_CHILDNAME(30)%凝视着%CALLNAME:CHR%的头顶\n看到了什么吗…？
		DATAFORM %SHOW_CHILDNAME(30)%看着%CALLNAME:CHR%的脸瞪圆了眼睛\n在惊讶什么呢…？
	ENDDATA
ELSEIF CFLAG:出産経過日 < 15
	SELECTCASE CHR
		CASE 23
			角色名 = %\@ RAND:3 ? 妖姆 # 半灵 \@%
		CASE 24
			角色名 = %\@ RAND:3 ? 橙 # %TEXTR("小猫/喵喵")% \@%
		CASE 25
			角色名 = %\@ RAND:3 ? 蓝 # %TEXTR("狐狸/多尾巴")% \@%
		CASE 30
			角色名 = 妈妈
		CASE 26
			角色名 = %\@ RAND:3 ? 紫 # 缝隙的 \@%
		CASE 66
			角色名 = %\@ RAND:3 ? 幽幽子 # %TEXTR("幽灵/饭量大")% \@%
		CASE 67
			角色名 = %\@ RAND:3 ? 慧ー音 # \@%老师
		CASE 76
			角色名 = %\@ RAND:2 ? 小町 # \@%姐姐
		CASE 113
			角色名 = 漂亮的
		CASE 127
			角色名 = %\@ RAND:3 ? 璎花 # %TEXTR("水母/垒石头的")% \@%
		CASE 128
			角色名 = %\@ RAND:3 ? 润美 # %TEXTR("哞哞/鱼屋的")% \@%
		CASE 129
			角色名 = %\@ RAND:2 ? 久侘歌 # \@%姐姐
		CASE 130
			角色名 = %\@ RAND:3 ? 八千惠 # 龟甲的 \@%
		CASE 131
			角色名 = %\@ RAND:3 ? 磨弓 # 土俑的 \@%
		CASE 132
			角色名 = 袿ー姬
		CASE 133
			角色名 = %\@ RAND:3 ? 早鬼 # 大马 \@%
		CASE 143
			角色名 = %\@ RAND:3 ? 尤魔 # 绵羊 \@%
		CASEELSE
			角色名 =
	ENDSELECT
	SIF !GROUPMATCH(CHR, 30, 67, 76, 129)
		角色名 = %角色名%姐姐
	IF ONCE(@"幼%TOSTR(CHR)%")
		あいさつ = %\@ INRANGE(TIME, 240, 599) ? 早上好 # %K30_GREETING_EIKI()% \@%
		CALL COLORMESSAGE, @"「%角色名%、%あいさつ%！」", K30_CHILDWORD() ,1 ,0
		PRINTFORMDL %SHOW_CHILDNAME(30)%向%\@ CHR == 30 ? 映姬反复打招呼 # %CALLNAME:CHR%很有精神地打招呼 \@%
	ELSE
		あいさつ = 来画画吧ー/%\@ TALENT:CHR:体型 < 0 ? 一起玩吧ー # 要抱抱ー \@%/
		あいさつ += @"%\@ TALENT:CHR:音楽知識 == 2 ? 唱首歌吧！ # 讲个故事吧！ \@%/%\@ TALENT:CHR:動物耳 ? 摸摸你的耳朵！ # \@%/"
		あいさつ += @"%\@ CFLAG:CHR:妊娠経過日数 > 15 ? 肚子好大啊！ # 你还好吗ー？ \@%/%\@ TALENT:CHR:心情 > 0 ? 有好事吗？ # \@%/"
		あいさつ += @"%\@ K30_JOBCHECK(CHR) ? 工作忙吗？ # \@%/%\@ BASE:CHR:酒気 <= 2 ? # 酒臭味好ー重！ \@%/"
		CALL COLORMESSAGE, @"「%角色名%、%TEXTR(あいさつ)%」", K30_CHILDWORD() ,1 ,0
		PRINTFORMDL %SHOW_CHILDNAME(30)%似乎希望%CALLNAME:CHR%能照顾他
	ENDIF
ELSEIF ONCE(@"自%TOSTR(CHR)%")
	あいさつ = %\@ INRANGE(TIME, 240, 599) ? 早上好 # %K30_GREETING_EIKI()% \@%
	SELECTCASE CHR
		;映姫
		CASE 30
			IF CHILD_SEX:30:(TALENT:育児中) == 1
				CALL COLORMESSAGE, @"「妈妈，那个呢…」", K30_CHILDWORD() ,1 ,0
			ELSE
				CALL COLORMESSAGE, @"「妈，那个…」", K30_CHILDWORD() ,1 ,0
			ENDIF
			PRINTFORMDL %SHOW_CHILDNAME(30)%正和映姬攀谈着
		;小町/久侘歌
		CASE 76, 129
			CALL COLORMESSAGE, @"「%CALLNAME:CHR%阿姐%あいさつ%」", K30_CHILDWORD() ,1 ,0
			SIF K30_JOBCHECK(ARG)
				CALL COLORMESSAGE, @"「工作%\@ CHR == 76 ? …有在努力吧？ # 请加油哦 \@%」", K30_CHILDWORD() ,1 ,0
			PRINTDATADL
				DATAFORM %SHOW_CHILDNAME(30)%对%CALLNAME:CHR%正%TEXTR("没隔阂地/亲切地")%打招呼
				DATAFORM %CALLNAME:CHR%和%SHOW_CHILDNAME(30)%亲密交谈的样子简直就像亲姐%\@ CHILD_SEX:30:(TALENT:育児中) == 1 ? 妹 # 弟 \@%的一样
			ENDDATA
		;ヘカーティア
		CASE 113
			CALL COLORMESSAGE, @"「赫喀提亚殿下%あいさつ%」", K30_CHILDWORD() ,1 ,0
			PRINTDATADL
				DATAFORM %SHOW_CHILDNAME(30)%向赫喀提亚恭恭敬敬地打招呼
				DATAFORM 在赫喀提亚面前%SHOW_CHILDNAME(30)%似乎有些紧张
			ENDDATA
		;さとり/阿求/幽々子/紫/妖夢
		CASE 49, 80, 66, 26, 23
			CALL COLORMESSAGE, @"「%CALLNAME:CHR%桑%あいさつ%」", K30_CHILDWORD() ,1 ,0
			SIF K30_JOBCHECK(ARG)
				CALL COLORMESSAGE, @"「您工作辛苦了」", K30_CHILDWORD() ,1 ,0
			PRINTDATADL
				DATAFORM %SHOW_CHILDNAME(30)%笑着向%CALLNAME:CHR%打招呼
				DATAFORM %CALLNAME:CHR%和%SHOW_CHILDNAME(30)%在谈%TEXTR("社会/工作")%的事情
			ENDDATA
		;神霊廟住人
		CASE 56, 89 TO 92
			CALL COLORMESSAGE, @"「%CALLNAME:CHR%桑%あいさつ%」", K30_CHILDWORD() ,1 ,0
			PRINTFORMDL  %SHOW_CHILDNAME(30)%对%CALLNAME:CHR%打招呼
		CASEELSE
			角色名 = %CALLNAME:CHR%%\@ TALENT:CHR:神霊 ? 殿下 # 桑 \@%
			CALL COLORMESSAGE, @"「%角色名%%あいさつ%」", K30_CHILDWORD() ,1 ,0
			SIF K30_JOBCHECK(ARG)
				CALL COLORMESSAGE, @"「您工作辛苦了」", K30_CHILDWORD() ,1 ,0
			PRINTFORMDL  %SHOW_CHILDNAME(30)%对%CALLNAME:CHR%正%TEXTR("很有礼仪/郑重")%地打招呼
	ENDSELECT
ENDIF

;仕事中の声掛けか判定する関数
@K30_JOBCHECK(ARG)
#FUNCTION
SIF !仕事中チェック(ARG)
	RETURNF 0
;玩耍/宴会に参加/宴会後の酔い/女子会
SIF GROUPMATCH(CFLAG:ARG:職種, 46, 49, 51, 52)
	RETURNF 0
;其他職種
RETURNF 1

;@M_KOJO_EVENT_K30_CHILD_DAIRY_口上手紙(ARG)

;@M_KOJO_EVENT_K30_CHILD_DAIRY_共通手紙(ARG, ARGS)

@M_KOJO_EVENT_K30_CHILD_DAIRY_寺子屋(ARGS,ARG,ARG:1)
SIF GETBIT(CFLAG:1804, TALENT:育児中)
	RETURN
IF ARGS == "怪我させた"
	CALL K30_CLEAR_TEXTLINE(4)
	PRINTFORMDL 好像是庇护被欺负的小孩，一人面对霸凌的孩子们…
	PRINTFORML
	PRINTFORML 「……是的，挥舞着手中的尺子，毫不留情地把那些欺负人的孩子揍了一顿」
	PRINTFORML 「最后让那些孩子全员端坐，一边不停地唠叨一边严厉地敲打着…」
	PRINTFORML 「打哭道歉方的样子…连老师也稍微退缩了」
	PRINTFORML 「说起来变得像我的话是这样的…但是有点过于像了…」
	PRINTFORML
	PRINTFORMDL 被迷你阎王大人毫不留情地责骂，大人也受不了
	PRINTFORMDL 那些孩子或许需要治疗…以及心理医生吧…
ELSEIF ARGS == "褒められた"
	CALL K30_CLEAR_TEXTLINE(2)
	PRINTFORML
	IF RAND:2
		PRINTFORML 「呼呼呼っ♪　%SHOW_CHILDNAME(30)%都说『太丢人了』不让我告诉你」
		PRINTFORML 「那孩子每天早上都早早出门，为大家打扫教室」
		PRINTFORML 「真是太好了%K30_C_NAME(MASTER)%」
		PRINTFORML 「%SHOW_CHILDNAME(30)%完全继承了你为数不多的优点哦」
		PRINTFORMDL …虽然被映姬委婉地贬低了，但因为是真的，一时语塞
	ELSE
		PRINTFORML 「………就这样，朋友之间的争吵被很好地仲裁了」
		PRINTFORML 「%SHOW_CHILDNAME(30)%虽然在说『没什么大不了的，不过是模仿妈妈的话』…」
		PRINTFORML 「那个孩子用他自己的方式思考，做出了他认为正确的行动」
		PRINTFORML 「呼呼呼っ…不仅仅是身体%SHOW_CHILDNAME(30)%成长得很好呢」
		PRINTFORMDL 映姬好像非常高兴自己孩子的成熟…
	ENDIF
ENDIF

;無自覚孕ませ関連口上
@K30_INSENSIBLE_PREGNANCY
#DIM NUM
LOCAL = FLAG:立絵種類
FLAG:立絵種類 = 1
LOCAL:1 = CFLAG:30:差し替え適用
CFLAG:30:差し替え適用 = 1
IF CFLAG:妊娠経過日数 == 15
	COM_STR = K30_無表情
	CALL PRINT_FACE, 30, "無表情", "妊娠服"
	PRINTFORML 「是的，只是有什么不对……肯定是这样的…」
	PRINTFORML 「肚子变大了，只是胖了…」
	PRINTFORML 「容易疲劳和月事不来都是……只是身体没调理好」
	PRINTFORML 「对，对，一定…这样的事，不可能发生…！」
	PRINTFORMDW 映姬拼命地想自欺欺人…
ELSEIF CFLAG:妊娠経過日数 == 20
	CALL PRINT_FACE, 30, "絶頂", "妊娠服"
	PRINTFORML 「妊娠…我的、婴儿…？」
	PRINTFORML 「为何，为何…我、在这种地方…」
	PRINTFORML 「为什么？　为什么！？　为什么！！！」
	PRINTFORML 「唔っ…呜呜っ、呜っ……」
	PRINTFORMDW 映姬受到了巨大的打击，只是哭泣…
ELSEIF CFLAG:出産経過日 == 1
	COM_STR = K30_無表情
	CALL PRINT_FACE, 30, "無表情", "服_睡衣"
	PRINTFORML 「我不知道他的父亲是谁」
	PRINTFORML 「是我忍着腹痛生下这个孩子的」
	PRINTFORML 「%SHOW_CHILDNAME(30)%的妈妈无疑是我…」
	PRINTFORML 「只有我，只有我才能守护你…」
	PRINTFORMDW 在熟睡的孩子旁边，映姬下定决心独自抚养%SHOW_CHILDNAME(30)%
	;出産隠蔽処理
	NUM = TALENT:育児中
	CSTR:30:83 = %SHOW_CHILDNAME(30)%
	CHILDNAME:30:NUM =
	CHILD_WEATHER:30:NUM =
	CHILD_AREA:30:NUM = 0
	CHILD_SEX:30:NUM = 0
	CHILD_BIRTHDAY:30:NUM = 0
	CHILD_BIRTHDATE:30:NUM = 0
	CHILD_LOVE:30:NUM = 0
	CFLAG:育児人数 = 0
	CFLAG:兒童人数 --
	CFLAG:MASTER:兒童人数 --
	CFLAG:MASTER:育児人数 --
	TALENT:育児中 = 0
ENDIF
FLAG:立絵種類 = LOCAL
CFLAG:30:差し替え適用 = LOCAL:1
COM_STR =
RETURN 1

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_育児イベント.ERB

license: unknown


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;逆肛交系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;90,被愛撫肛門
;==================================================
@M_KOJO_MESSAGE_COM_K30_90
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_90_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_90_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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
;==================================================
;91,被舐肛門
;ＴＷだと施虐属性よりの指令だけど、肛門奉仕はＭっぽい行為というのが個人的な印象
;そういうわけでSOURCE変動から指令内容を弄ってます
;==================================================
@M_KOJO_MESSAGE_COM_K30_91
CALL M_KOJO_MESSAGE_COM_K30_91_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_91_1
#DIM CHR
CHR = TFLAG:193
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;地の文総入れ替え
	CALL K30_D_LINE
	SELECTCASE TFLAG:194
		CASE 0
			PRINTFORMDL %CALLNAME:MASTER%命令映姬做肛门侍奉
			PRINTFORMDL 映姫对这吩咐\@ TCVAR:30:烂醉 ? 厌恶地摇了摇头，但最终听从的 # 迟疑地游移视线后 \@亲吻%CALLNAME:MASTER%的屁眼…
		CASE 1
			PRINTFORMDL %CALLNAME:MASTER%命令映姬为肛门侍奉
			PRINTFORMDL 映姬没有特别嫌弃的样子、伸出小舌舔着%CALLNAME:MASTER%的肛门…
		CASE 2
			PRINTFORMDL %CALLNAME:MASTER%只要抬起屁股示意，映姬自己就会主动俯下身贴近螓首
			PRINTFORMDL 在向屁股驯服地献吻之后，便開始用香舌郑重为其侍奉…
		CASE 3
			PRINTFORMDL %CALLNAME:MASTER%撅起地示意屁股的时候，映姬笑着握紧阴茎咯吱咯吱响的上下处理
			PRINTFORMDL 被快感击中的肛门难耐地收缩，接着映姬的丁香小舌恭顺地侍奉着屁眼…
		CASE 4
			PRINTFORMDL %CALLNAME:CHR%的\@ !TEQUIP:CHR:50 ? 腟 # 尻 \@穴一面侵犯着、同时命令映姬舔肛
			PRINTFORMDL 映姬盯着%CALLNAME:MASTER%和%CALLNAME:CHR%的结合处，羞得连耳垂都红透了
			PRINTFORMDL 晃晃悠悠地凑近%CALLNAME:MASTER%的肛门，玉颊贴紧伸出舌头舐着…
		CASE 5
			PRINTFORMDL 在%CALLNAME:CHR%吮吸着的情况下，命令映姬舔肛
			PRINTFORMDL 映姫对%CALLNAME:CHR%投以艳羡的目光
			PRINTFORMDL 马上重新振作起来，開始为%CALLNAME:MASTER%的肛门侍奉…
	ENDSELECT
	PRINTFORMW
	;初めて
	IF FIRSTTIME(SELECTCOM)
		IF TCVAR:30:烂醉
			PRINTFORMW 「这样的事，不喜欢…」
		ELSEIF TCVAR:30:385 || TCVAR:30:强行
			PRINTFORMW 「…你这个人真的……业障有多深呢？」
		ELSEIF ABL:Ａ感覚 < 2 || ABL:30:奉仕精神 < 5
			PRINTFORML 「……居然拜托我这种事，真是个拿你该怎么办」
			PRINTFORMW 「但是，无法拒绝的我也…是相似的。…」
		ELSE
			PRINTFORML 「……你也觉得…这个可以吗…？」
			PRINTFORMW 「…我也会加油的」
		ENDIF
		RETURN 1
	ENDIF
	SIF TCVAR:30:强行 || TCVAR:30:烂醉
		RETURN 1
	SELECTCASE TFLAG:194
		CASE 0
			PRINTFORML 「啾っ、reroっ………唔、唔唔っ……哕呜…」
			PRINTDATAW
				DATAFORM 「%K30_C_NAME(MASTER)%知道『遭报应』这个词吗？」\n「…现在的你知道了」
				DATAFORM 「…%K30_C_NAME(MASTER)%这种没节操的人应该无所谓吧」\n「对我来说…只能认为是屈辱…」
				DATAFORM 「…与其说肮脏，不如说更在意触摸到污秽」\n「我真的在做罪孽深重的淫事啊…」
			ENDDATA
		CASE 1
			PRINTFORML 「reroっ……啾っ、啾呜……嗯啾っ♥」
			PRINTDATAW
				DATAFORM 「欸っ多…好像掌握诀窍了」\n「怎么样，你的这里…很快活吧？」
				DATAFORM 「…用舌头啄食的话、欧金金…就会无法忍耐的颤抖」\n「你看起来很喜欢…」\n「连我也高兴起来了…♥」
				DATAFORM 「…这个让人舒服的地方、是你教我的」\n「所以我也…想好好报答你。…♥」
			ENDDATA
			IF NOWEX:MASTER:射精
				PRINTFORML
				PRINTDATAW
					DATAFORM 「嚯啦，不要克制」\n「这样，就这样去…就好了…♥」
					DATAFORM 「…啊哇っ♥　从这边看袋子就会很可爱的…非常好理解呢。」\n「好了，拿出来吧…♥」
					DATAFORM 「…马上就到了吧、对吧？」\n「虽然很想要吃……但是现在就这样射出去吧♥」
				ENDDATA
			ENDIF
		CASE 2, 3
			PRINTFORMW 「reroっ…嗯啾っ♥　reroっ、reroぉ…♥」
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「……我知道这是閻魔殿下不应该有的淫行」
					PRINTFORML 「但这样一来，就觉得自己变成了一个为你侍奉的存在。……」
					PRINTFORMW 「非常的、性奋…♥」
				CASE 1
					PRINTFORML 「%K30_C_NAME(MASTER)%、很舒服吧…？」
					PRINTFORML 「如果能让你高兴的话…什么地方我都无所谓哦」
					PRINTFORMW 「閻王的口和舌、%K30_C_NAME(MASTER)%请随意使用吧♥」
				CASE 2
					PRINTFORML 「是受你的命令才这么做的…不讨厌哦」
					PRINTFORML 「让看到如此难为情的姿态，明明是这样…我、却很兴奋…♥」
					PRINTFORMW 「直到%K30_C_NAME(MASTER)%满意为止、请让我好好为您服务♥」
			ENDSELECT
			IF TFLAG:194 == 3
				PRINTFORML
				PRINTFORML 「…呼呼っ♥　已经这样%TEXTR("柔软了/咔叽咔叽/硬了")%…♥」
				PRINTFORML 「我希望你能变得更…舒服……嗯啾っ♥　啾噜っ…」
				PRINTFORMDW 映姬加快了玩弄阴茎的速度，尻穴被%TEXTR("发出淫音吸着/舌尖侵入/反复热烈的吻着")%催促射精…
			ENDIF
		CASE 4
			PRINTFORML 「啾噜っ…啾噜噜っ♥　嗯啾っ、啾呜唔♥」
			PRINTDATAW
				DATAFORM 「啊嗯っ♥　那样动的话，很难帮你舔哦…♥」\n「还是…是太舒服控制不了吗？」
				DATAFORM 「%K30_C_NAME(CHR)%看起来也很舒服…♥」\n「接下来可以…给我吧？」
				DATAFORM 「%K30_C_NAME(CHR)%、好厉害……扩张成了非常H的形状…♥」\n「会变成这样呢…」
				DATAFORM 「制伏%K30_C_NAME(CHR, 3)%，乖乖地让阎魔舔她屁眼」\n「你一定是幻想乡最变态…也是最幸福的变态先生哦♥」
			ENDDATA
			PRINTFORML
			IF NOWEX:MASTER:射精
				PRINTFORMDL 映姬像支持%CALLNAME:MASTER%射精一样，继续为肛门侍奉。
				PRINTFORMDL 每一条褶皱都用香舌勾描開来，%CALLNAME:MASTER%也不由自主地放缓抽插，享受快感
				PRINTFORMDW %CALLNAME:CHR%の\@ !TEQUIP:CHR:50 ? 膣穴 # 菊門 \@催促般收紧时、%CALLNAME:MASTER%的忍耐也终于到了极限…
			ELSE
				PRINTFORMDL 映姬的肛门侍奉非常细致，腰以下都快舒服到脱力了
				PRINTFORMDL 与%CALLNAME:CHR%的\@ !TEQUIP:CHR:50 ? 柔软的肉褶 # 强烈的紧箍 \@相结合、为%CALLNAME:MASTER%带来如痴如醉的快感
				PRINTFORMDW 为了能尽可能长久地享受这种快乐，%CALLNAME:MASTER%咬紧牙关抑制射精欲…
			ENDIF
		CASE 5
			PRINTDATAL
				DATAFORM 「%K30_C_NAME(MASTER)%的这里…抖的非常厉害…♥」\n「我也要努力不输给%K30_C_NAME(CHR)%…」
				DATAFORM 「呼呼呼っ♥　我和%K30_C_NAME(CHR)%的小嘴…」\n「现在只是为了让你舒畅的道具」\n「更多更多、请尽情感受…♥」
				DATAFORM 「%K30_C_NAME(CHR)%的话……看起来很好吃的样子在舔啊…♥」\n「欸，有点羡慕…」\n「但是现在…要让你快乐比较优先吶♥」
			ENDDATA
			PRINTFORMW 「んふっ…ちゅるっ♥　ぢゅっ、じゅる……じゅるるっ♥」
			IF NOWEX:MASTER:射精
				PRINTFORMDL 映姬的舌技太厉害了，甚至已经不在乎是为不净之穴服务
				PRINTFORMDW 当叼着肉棒的%CALLNAME:CHR%加快了嘴的动作、%CALLNAME:MASTER%一下子到了极限…
			ELSE
				PRINTFORMDL %CALLNAME:CHR%和映姬都沉醉在这种倒错式的侍奉中…
				PRINTFORMDL 如果映姬舔得皱纹都湿透了，%CALLNAME:CHR%就会对抗性一样咽到喉咙深处
				PRINTFORMDW 两个美少女猥亵的侍奉三明治强烈地满足了%CALLNAME:MASTER%的征服欲…
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;舐肛で施虐属性ではなく奉仕精神が上がる映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_91
#DIM CHR
;ソース変更処理
SOURCE:征服 = 0
SOURCE:情愛 = 0
SOURCE:達成 = 300
SOURCE:屈従 = 2500
SOURCE:逸脱 = 1200
SOURCE:反感 = 1200
TCVAR:MASTER:射精部位 = 9
;地の文分岐決定
SIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
	RETURN
SOURCE:反感 /= 2
SIF !TALENT:30:恋慕 || ABL:30:奉仕精神 < 5 || ABL:30:Ａ感覚 < 2 || !STRCOUNT(CSTR:30:0, "/91/")
	RETURN
SOURCE:情愛 = 200
SOURCE:反感 /= 3
TFLAG:194 ++
SIF ABL:30:Ａ感覚 < 5 || ABL:30:奉仕精神 < 7 || PALAM:30:欲情 < PALAMLV:9 || !RAND:4
	RETURN
SOURCE:情愛 *= 2
SOURCE:達成 *= 2
SOURCE:反感 /= 2
TFLAG:194 ++
CHR = MASTER_POSE(0, 1)
;３Ｐ中挿入or口交→TARGET変更舐肛で疑似タブル指令化
IF CHR && ((!TEQUIP:CHR:50 && ABL:CHR:Ｖ感覚 > 2) || (!TEQUIP:CHR:51 && ABL:CHR:Ａ感覚 > 2))
	TFLAG:193 = CHR
	TFLAG:194 = 4
ELSEIF CHR && TEQUIP:CHR:口接触部位 == 1 && EXP:CHR:精飲経験 > 19
	TFLAG:193 = CHR
	TFLAG:194 = 5
;你が射精直前でTINKOが空いてたら舐肛手コキ扱い
ELSEIF TCVAR:MASTER:要去了 && (!CHR || GROUPMATCH(MASTER_POSE(30, 1, 1), 3, 4))
	TFLAG:194 = 3
	CALL TOUCH_SET(SET_FROM_YUBI, SET_P, 30)
	TCVAR:MASTER:射精快感強度 = 700
	SOURCE:MASTER:快Ｃ += ABL:30:指 * 20
	EXP:30:手淫経験 ++
ENDIF
;==================================================
;92,被Ａ正常位
;==================================================
@M_KOJO_MESSAGE_COM_K30_92
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_92_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_92_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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
;==================================================
;93,被Ａ後背位
;==================================================
@M_KOJO_MESSAGE_COM_K30_93
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_93_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_93_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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
;==================================================
;94,被Ａ騎乗位
;==================================================
@M_KOJO_MESSAGE_COM_K30_94
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_94_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_94_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;※※※※※※※※※※※※※※※※※※※※※※※※※
;助手による指令、及びレズプレイ
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;120,強制舐陰
;==================================================
@M_KOJO_MESSAGE_COM_K30_120
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_120_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_120_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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

;==================================================
;121,貝あわせ
;==================================================
@M_KOJO_MESSAGE_COM_K30_121
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_121_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_121_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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

;==================================================
;123,给对方足交
;==================================================
@M_KOJO_MESSAGE_COM_K30_123
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_123_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_123_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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
;==================================================
;124,给对方手淫
;==================================================
@M_KOJO_MESSAGE_COM_K30_124
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_124_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_124_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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
;==================================================
;125,被愛撫
;==================================================
@M_KOJO_MESSAGE_COM_K30_125
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_125_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_125_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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

;==================================================
;126,互揉胸部
;==================================================
@M_KOJO_MESSAGE_COM_K30_126
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_126_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_126_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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

;=================================================
;特殊指令
;=================================================
;-------------------------------------------------
;180,潤滑液
;-------------------------------------------------
;コマンド実行前の潤滑を保存
@M_KOJO_SUCCESS_COM_K30_180
TFLAG:194 = PALAM:30:潤滑

@M_KOJO_MESSAGE_COM_K30_180
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_180_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_180_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時姦中＆チョコレートプレイ
	IF FLAG:70 || GETBIT(STAIN:1, 7)
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ELSEIF TALENT:処女 && HAS_PENIS(MASTER)
	    PRINTFORML 「虽然变得黏糊糊了...」
	    PRINTFORMW 「还是...想插进来吗...?」
	ELSEIF HAS_PENIS(MASTER) && (ABL:Ｖ感覚 + ABL:Ａ感覚 > 7) && TFLAG:194 >= PALAMLV:7 && RAND:3
	    PRINTFORMW 「我已经...不太需要了吧...?」
	    PRINTFORML 「...这样可太可惜了,%K30_C_NAME(MASTER)%,不如分给我一些...怎么样?」
	    PRINTFORML 「涂得湿漉漉的...一起舒服起来吧...♥」
	    PRINTFORMDL 映姫从已经湿润的%SLIT(30)%中挖出润滑,涂抹在%CALLNAME:MASTER%的%TINKO(MASTER)%上...
	    SELECTCASE BASE:MASTER:勃起
	        CASE 0 TO 499
	            WAIT
	            PRINTFORML 「嘻嘻♥ 小小的也很可爱,不过...」
	            PRINTFORML 「我也喜欢粗大的%K30_C_NAME(MASTER)%...♥」
	            PRINTFORMDW 映姫只是轻轻碰触,%CALLNAME:MASTER%就感觉下体迅速勃起
	            BASE:MASTER:勃起 = 1000
	        CASE 500 TO 999
	            WAIT
	            PRINTFORML 「嗯嗯嗯:红心: 再精神些...♥」
	            PRINTFORMDW 在映姫涂抹润滑的抚弄下,%CALLNAME:MASTER%也完全兴奋起来
	            BASE:MASTER:勃起 = 1500
	        CASE 1500
	            PRINTFORML
	            PRINTFORMDW ......被映姫柔软的手指抚弄,差点就要射了出来
	        CASEELSE
	            PRINTFORMDW 映姫的触碰让%CALLNAME:MASTER%更加膨胀
	    ENDSELECT
	ELSEIF TFLAG:194 >= 30000 && PALAM:30:欲情 > PALAMLV:6 && RAND:2
	    PRINTFORML 「润滑剂...好像用不着呢?」
	    PRINTFORML 「因为...我已经忍不住了,已经...这样子了...♥」
	    PRINTFORMDL 映姫期待和兴奋地分泌出爱液
	    PRINTFORMDW 那湿湿的%SLIT(30)%正一抽一抽地诱惑着...
	ELSE
	    PRINTDATAW
	        DATAFORM 「黏黏的...晶莹剔透...」\n「这样子...看起来真挑逗...♥」
	        DATAFORM 「嗯...有点冰冷呢...」\n「希望%K30_C_NAME(MASTER)%能快点...捂热它...♥」
	        DATAFORM 「湿湿的...好害羞...」\n「却还是会期待...下一次体验...♥」
	    ENDDATA
	ENDIF
ENDIF
RETURN 1

;==================================================
;181,媚薬,
;マイ・椛口上参考にしました
;==================================================
;コマンド実行前の効果時間を一時保存して分岐に使う
@M_KOJO_SUCCESS_COM_K30_181
TFLAG:192 = TCVAR:30:媚薬
SIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
	RETURN
IF TCVAR:30:367
	TFLAG:194 = 3
	RETURN
ENDIF
SELECTCASE TFLAG:192
	CASE 0
	CASE 1 TO 270
		TFLAG:194 = 1
	CASEELSE
		TFLAG:194 = 2
ENDSELECT
;媚薬効果時間が累積する映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_181
IF TFLAG:194 < 3
	TCVAR:30:媚薬 = TFLAG:192 + 180
;もう飲まない処理
;ソース変動と媚薬タイマーをコマンド実行前に戻す
ELSE
	TCVAR:30:媚薬 = TFLAG:192
	IF TALENT:PLAYER:調合知識
		DOWNBASE:体力 -= 150
		DOWNBASE:気力 -= 150
	ELSE
		DOWNBASE:体力 -= 300
		DOWNBASE:気力 -= 300
	ENDIF
	UP:欲情 = 0
	SOURCE:逸脱 = 0
	IF HETEROSEX(30, MASTER)
		EXP:(50 + HETEROSEX(30, MASTER)) -= 1
		EXP:PLAYER:(50 + HETEROSEX(30, MASTER)) -= 1
	ENDIF
	ITEM:媚薬 ++
ENDIF

@M_KOJO_MESSAGE_COM_K30_181
IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
CALL TRAIN_MESSAGE
	RETURN 1
ELSE
	CALL K30_D_LINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_181_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_181_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:194
		CASE 0, 1
			SELECTCASE RAND:3
				CASE 0
				    PRINTFORMDL %CALLNAME:MASTER%压制住映姫,将口中的媚药连同唾液一起滴入她口中
				    PRINTFORMDL 映姫全数接受,发出呻吟声一滴不剩地吞下去...
				    PRINTFORMW
				    PRINTFORML 「呜呜...♥ 噗、噗...呜呜...♥」
				    PRINTFORML
				    PRINTFORMW (啊...我在做,多么...淫荡的事...♥)
				CASE 1
				    PRINTFORMDL %CALLNAME:MASTER%将指尖的媚药递到映姫面前
				    PRINTFORMDL 映姫含住手指吞下媚药,吞下后还在持续吮吸...
				    PRINTFORMW
				    PRINTFORML 「嗯嘬...嗯嘬:红心: 噗嗤...嘬嘬,啧啧...♥」
				    PRINTFORML
				    PRINTFORML (光是舔着...身体,已经...发热......)
				    PRINTFORMW (只靠手指...还不够...♥)
				CASE 2
				    PRINTFORMDL %CALLNAME:MASTER%以口对口喂映姫吞下媚药
				    PRINTFORMDL 映姫搂住%CALLNAME:MASTER%的脖子,紧贴着%CALLNAME:MASTER%的嘴吮吸...
				    PRINTFORMW
				    PRINTFORML 「嗯呼...吧唧,嗯嘬♥ 噗...吧嗒吧嗒...♥」
				    PRINTFORML
				    PRINTFORML (%K30_C_NAME(MASTER)%的,嘴巴...好美味...♥)
				    PRINTFORML (一直...接吻,还要...吮吸...)
				    PRINTFORMW (还想要...更多更多...♥)
			ENDSELECT
			PRINTFORML
			PRINTFORML 「ぷはっ…♥」
			PRINTFORMW
			IF TFLAG:192 < 120
			    SELECTCASE RAND:3
			        CASE 0
			            PRINTFORML 「这些药...全部都是这些药的错」
			            PRINTFORML 「会做这么...淫荡的事,会流这么多淫液」
			            PRINTFORML 「接下来...会大声呻吟,做很多色色的事」
			            PRINTFORML 「都是这些药和...你的错...♥」
			        CASE 1
			            PRINTFORML 「就不能...普通地做吗?」
			            PRINTFORML 「好吧,没关系...我会好好配合的♥」
			            PRINTFORML 「不过...要对点燃我欲火负责任哦...♥」
			        CASE 2
			            PRINTFORML 「这些药真的非常有效果...太厉害了」
			            PRINTFORML 「即使只是聊天,脑海里已经浮想联翩...♥」
			            PRINTFORML 「%K30_C_NAME(MASTER)%...会满足我吧♥」
			    ENDSELECT
			ELSEIF RAND:2 == 1
			    PRINTFORML 「即使不靠这些药,我也已经迷恋上你了♥」
			    PRINTFORML 「...不过给我吃这么多,会让我变得奇奇怪怪的哦...♥」
			ELSE
			    PRINTFORML 「...喂我吃这么多药,你到底打算怎么样?」
			    PRINTFORMW 「想把我...弄得乱七八糟吗...♥」
			    PRINTFORML 「...记住了,%K30_C_NAME(MASTER)%」
			    PRINTFORML 「在我体内...也隐藏着淫荡的欲望」
			    PRINTFORML 「如果被激发的话...请好好对我负责吧♥」
	ENDIF
			PRINTDATADW
			    DATAFORM 映姫用热切的眼神注视着%CALLNAME:MASTER%
			    DATAFORM 映姫妖艳地微笑着...
			    DATAFORM 映姫嘴角滴下涎水...
			ENDDATA
			CASE 2
			    SETBIT TCVAR:30:367, 0
			    PRINTFORMDL 映姫默默地喝下%CALLNAME:MASTER%递来的媚药...
			    PRINTFORMW
			    IF K30_KIMESEKU()
			        CALL K30_KIMESEKU_BUFF
			        PRINTFORML 「.........啊♥♥」
			        PRINTFORMDL 映姫的状态看起来有点奇怪...
			        PRINTFORMDW 似乎因为药物陷入了[发情]
			        IF GETBIT(TCVAR:30:367, 1)
			            PRINTFORMDL 不仅如此,还散发出与平日端庄稳重的阎魔大人完全不同的,妖艳淫乱的气息
			            PRINTFORMDL ......看来药力影响,让她陷入了[淫乱]状态
				ENDIF
				PRINTFORMW
				PRINTFORML 「呵呵...呵呵呵♥」
				PRINTFORML 「...太多了,已经...到极限了♥」
				PRINTFORML 「%K30_C_NAME(MASTER)%...算了吧,不要药了...」
				PRINTFORMW 「快...快点,安慰我...♥」
			ELSE
				PRINTFORML 「...过犹不及啊」
				PRINTFORML 「今天就到这里吧,我会保留一点理智的」
				PRINTFORMW 「从现在开始...只想体会舒服的感觉...♥」
				PRINTFORMDL 映姫试图表现得理性,但眼神怪异...
				PRINTFORMDW 似乎因为药物陷入了[发情]状态
				TCVAR:30:発情 = 1
			ENDIF
		CASE 3
			PRINTFORMDL 想给映姫喂媚药,但被拒绝了...
			PRINTFORMW
			IF !GETBIT(TCVAR:30:367, 2)
			    PRINTFORMW 「过度依赖药物也不太好吧」
			ELSEIF RAND:2 == 1
			    PRINTFORML 「呐,%K30_C_NAME(MASTER)%」
			    PRINTFORML 「我,不是要药...」
			    PRINTFORMW 「我想要...%K30_C_NAME(MASTER)%的...♥」
			ELSE
			    PRINTFORML 「我现在不是要药...而是想要%K30_C_NAME(MASTER)%♥」
				PRINTFORMW 「再用力拥抱我,更多更多...地要我,好不好♥♥」
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;182,利尿剤,
;==================================================
@M_KOJO_MESSAGE_COM_K30_182
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_182_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_182_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	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

;==================================================
;183,攝像機,
;==================================================
@M_KOJO_MESSAGE_COM_K30_183
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_183_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_183_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
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;187,浴室PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K30_187
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_187_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_187_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:浴室PLAY
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;188,淋浴
;==================================================
@M_KOJO_MESSAGE_COM_K30_188
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_188_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_188_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
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;189,新妻PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K30_189
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_189_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_189_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;開始
	IF TEQUIP:新妻PLAY
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;終了
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;190,新妻（になる）プレイ
;==================================================
@M_KOJO_MESSAGE_COM_K30_190
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_190_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_190_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
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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