repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【12】ルーミア/M_KOJO_K12_派生コマンド.ERB

license: unknown


code:
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
;分岐作りに有用そうな変数などのメモ
;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
;NOWEX:Ｃ絶頂 NOWEX:Ｖ絶頂 NOWEX:Ｂ絶頂 NOWEX:Ａ絶頂 NOWEX:Ｍ絶頂
;各部位の絶頂強度。まず0~3が割り当てられ、多重絶頂により最大16倍される。つまり単部位なら最大3、5重絶頂で最大48
;NOWEX:TotalEX
;多重絶頂補正を接受前の各部位絶頂強度の合計値。1~15。この貂プレにおける分岐の基準。

;TEQUIP:50
;Ｖに誰の竿が入ってるか。TEQUIP:50 = MASTERで你が挿入中となる。
;TEQUIP:51
;Ａに誰の竿が入ってるか。TEQUIP:51 = MASTERで你が挿入中となる。
;NOWEX:射精
;射精量、最大3。たとえばIF NOWEX:MASTER:射精 > 1だと、你が大量射精以上した場合となる。
;SYNCED_ORGASM(TARGET)
;相手と你が同時に絶頂した場合真となる。絶頂の部位は問わない。

;-------------------------------------------------
;絶頂時の口上
;-------------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_B_K12
#DIM TotalEX
CALL PALAM_MESSAGE_B
;-------------------------------------------------
;噴乳
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && NOWEX:噴乳
	IF TCVAR:発情
		IF TALENT:恋慕
			IF ABL:Ｂ感覚 >= 10
				SELECTCASE RAND:4
					CASE 1
						CALL HPH_PRINT("「嗯嗯…HPH　榨乳什么的…好舒服啊HPH」」","W")
					CASE 2
						CALL HPH_PRINT("「一喷一喷…的HPH　欸嘿嘿HPH」","W")
					CASE 3
						CALL HPH_PRINT("「还想要更多…HPH　看…还在不断往外流HPH」","W")
					CASEELSE
						CALL HPH_PRINT("「爽的快要飞了…HPH　还想要做更多…HPH」","W")
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						CALL HPH_PRINT("「讨厌…胸部都停不下来了…HPH」","W")
					CASE 2
						CALL HPH_PRINT("「哈啊啊…HPH　奶水出来了…」","W")
					CASEELSE
						CALL HPH_PRINT("「又、又出来了…HPH」","W")
				ENDSELECT
			ENDIF
		;ELSEIF TALENT:思慕

		ELSE
			SELECTCASE RAND:3
				CASE 1
					CALL HPH_PRINT("「讨厌…停不下来了…HPH」","W")
				CASE 2
					CALL HPH_PRINT("「胸部好痒…嗯、嗯嗯HPH」","W")
				CASEELSE
					CALL HPH_PRINT("「不要看…好害羞啊…HPH」","W")
			ENDSELECT
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF ABL:Ｂ感覚 >= 10
				SELECTCASE RAND:5
					CASE 1
						PRINTFORMW 「嗯…榨乳、感觉好像有点舒服…」
					CASE 2
						PRINTFORMW 「欸嘿嘿…出来了这么多。要不要喝一点？」
					CASE 3
						PRINTFORMW 「随时都可以当妈妈哟。嘿嘿♪」
					CASE 4
						PRINTFORMW 「%CALLNAME:MASTER%的孩子、想要嘛？」
					CASEELSE
						PRINTFORMW 「还是有点涨涨的。想再榨一些出来啊ー」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「稍微有点难受、但如果是%CALLNAME:MASTER%来帮我挤的话…」
					CASE 2
						PRINTFORMW 「等习惯了就可以轻松地榨出来了吧…」
					CASEELSE
						PRINTFORMW 「如何？兴奋了ー？哼哼…♪」
				ENDSELECT
			ENDIF
		;ELSEIF TALENT:思慕

		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「真是的、不能快点停下来嘛…」
				CASE 2
					PRINTFORMW 「胸部也痛衣服也弄脏了…真是一点好处都没有呢」
				CASEELSE
					PRINTFORMW 「别用奇怪的眼神看我啦…」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
;-------------------------------------------------
;射精した
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL && NOWEX:射精
	;口
	IF TCVAR:2 == 4
		IF TCVAR:発情
			IF TALENT:恋慕
				IF ABL:Ｃ感覚 >= 10
					SELECTCASE RAND:5
						CASE 1
							CALL HPH_PRINT("「喜欢我的精液吗？喜欢对吧？HPH　那现在就给你…接好了HPH」","W")
						CASE 2
							CALL HPH_PRINT(@"「%CALLNAME:MASTER%的嘴真不错。HPH　还想要继续射出来…HPH」","W")
						CASE 3
							CALL HPH_PRINT("「吸啊！吸精液HPH　啊…要出来了HPH」","W")
						CASE 4
							CALL HPH_PRINT("「要射到嘴里了哦HPH　可以吧？喝下去！全部喝下去HPH」","W")
						CASEELSE
							CALL HPH_PRINT(@"「再来舔一次HPH　%CALLNAME:MASTER%也想再来一次对吧？」","W")
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
						CASE 1
							CALL HPH_PRINT(@"「不行了…！%CALLNAME:MASTER%用嘴让我去吧HPH」","W")
						CASE 2
							CALL HPH_PRINT("「一直舔最前面的话…要去了啊HPH」","W")
						CASEELSE
							CALL HPH_PRINT("「啊啊…精液被咕嘟咕嘟地喝下去了HPH」","W")
					ENDSELECT
				ENDIF
			ELSEIF TALENT:思慕
					SELECTCASE RAND:3
						CASE 1
							CALL HPH_PRINT("「小鸡鸡实在太舒服了…忍不住了啊…HPH」","W")
						CASE 2
							CALL HPH_PRINT("「就这样射出来了哦…？要把精液喝下去哦？…HPH」","W")
						CASEELSE
							CALL HPH_PRINT("「舒服得…停不下来HPH」","W")
					ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						CALL HPH_PRINT("「已经射完了、可以松嘴了HPH」","W")
					CASE 2
						CALL HPH_PRINT("「刚刚才去过…不要舔了啦…HPH」","W")
					CASEELSE
						CALL HPH_PRINT("「呜呜…忍不住了嘛HPH」","W")
				ENDSELECT
			ENDIF
		ELSE
			;IF TALENT:恋慕
			;	SELECTCASE RAND:5
			;		CASE 1
			;			PRINTFORMW 「」
			;		CASE 2
			;			PRINTFORMW 「」
			;		CASE 3
			;			PRINTFORMW 「」
			;		CASE 4
			;			PRINTFORMW 「」
			;		CASEELSE
			;			PRINTFORMW 「」
			;	ENDSELECT
			IF TALENT:思慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「不好吃对吧？不用勉强哦ー」
					CASE 2
						PRINTFORMW 「射到嘴里了…抱歉」
					CASEELSE
						PRINTFORMW 「哈啊…肉棒、好厉害…」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORMW 「那个、不好吃对吧ー？」
					CASE 2
						PRINTFORMW 「让我做到射精为止什么的…真是恶趣味」
					CASEELSE
						PRINTFORMW 「居然喝精液什么的…变态」
				ENDSELECT
			ENDIF
		ENDIF
	ELSEIF TCVAR:2 == 1
	;PRINTFORMW 阴道

	ELSE
	;PRINTFORMW 其它

	ENDIF

ENDIF
;-------------------------------------------------
;放尿
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:放尿
	PRINTFORMW
ENDIF
;-------------------------------------------------
;絶頂
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
;合計絶頂数で分岐
;これだけではどの部位が絶頂したかは区別されないため、書き分けたければ任意で分岐を加筆されたし。
IF LOCAL
	SELECTCASE NOWEX:TotalEX
		;強
		CASE 5 TO 15
			PRINTFORMW
		;中
		CASE 2 TO 4
			PRINTFORMW
		;弱
		CASE 1
			PRINTFORMW
	ENDSELECT
ENDIF

;-------------------------------------------------
;奴隷の睡眠絶頂時の口上
;-------------------------------------------------
@M_KOJO_MESSAGE_PALAMCNG_B2_K12
CALL PALAM_MESSAGE_B
;-------------------------------------------------
;睡眠噴乳
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:噴乳
	PRINTFORMW
ENDIF
;-------------------------------------------------
;睡眠射精した
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:射精
	PRINTFORMW
ENDIF
;-------------------------------------------------
;睡眠放尿
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL && NOWEX:放尿
	PRINTFORMW
ENDIF
;-------------------------------------------------
;睡眠絶頂
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
;合計絶頂数で分岐
;これだけではどの部位が絶頂したかは区別されないため、書き分けたければ任意で分岐を加筆されたし。
IF LOCAL
	SELECTCASE NOWEX:TotalEX
		;強
		CASE 5 TO 15
			PRINTFORMW
		;中
		CASE 2 TO 4
			PRINTFORMW
		;弱
		CASE 1
			PRINTFORMW
	ENDSELECT
ENDIF

;-------------------------------------------------
;你が射精したときに関する口上の表示
;一時的にTARGETを口上主に設定している
;-------------------------------------------------

@M_KOJO_MESSAGE_PALAMCNG_A_K12_00(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;TARGETの手による射精で、射精対象が非TARGET
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL

	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_0(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;避孕套
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	SELECTCASE RAND:4
		CASE 1
			PRINTFORMW 「一抖一抖的ー。好有趣ー」
		CASE 2
			PRINTFORML 「哦哦ー…变长了变长了…哇呀」
			PRINTFORMW 橡胶破裂、内容物四溅而出…
		CASE 3
			PRINTFORMW 「戴着这个会舒服嘛？」
		CASEELSE
			PRINTFORMW 「呜哇ー…　被精液撑得满满的…」
	ENDSELECT
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_23(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;深喉插入
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_4(ARG)
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_22(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;六九式
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_4(ARG)
	;同時射精
	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_K12_26(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;授乳PLAY
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_3(ARG)
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_21(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;乳夾口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_4(ARG)
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_20(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;手淫口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_4(ARG)
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_9(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;肛門奉仕
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_8(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;泡泡浴
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_3(ARG)
	;同時射精
	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_K12_7(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;足交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_3(ARG)
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_6(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;素股
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF (TALENT:恋慕 || TALENT:恋人) && CFLAG:允许无套 == 2 && TALENT:処女 == 0 && TALENT:妊娠 == 0
		PRINTFORML
		SELECTCASE RAND:5
			CASE 1
				PRINTFORML 「射到外面去了吗ー。遗ー憾」
				PRINTFORMW 露米娅用包含着期待的目光望着%CALLNAME:MASTER%…
			CASE 2
				PRINTFORMW 「好厉害的量。要是中出的话、说不定会一发入魂…♪」
			CASE 3
				CALL HPH_PRINT("「这样做的话…　说不定就进到里面、了呢HPH」","L")
				PRINTFORMW 露米娅把沾满精液的阴道扩開来…
			CASE 4
				PRINTFORML 「射到里面也是可以的噢…」
				PRINTFORMW 露米娅似不满般仰望着%CALLNAME:MASTER%
			CASEELSE
				CALL HPH_PRINT("「好浪费ー。精液要射到在里面…懂吗HPH」","L")
				PRINTFORMW 露米娅一边抚着自己的小腹、一边窃笑了起来…
		ENDSELECT
	ELSE
		CALL M_KOJO_MESSAGE_PALAMCNG_A_K12_3(ARG)
	ENDIF
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_5(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;乳交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	IF TALENT:恋慕 || TALENT:恋人
		SELECTCASE RAND:4
			CASE 1
				PRINTFORMW 「欸嘿嘿。胸口上、弄得黏糊糊的」
			CASE 2
				CALL HPH_PRINT("还不能动。等我帮你榨出来为止…HPH」","W")
			CASE 3
				CALL HPH_PRINT("「被小孩子的胸部弄到去了吗？　嗤嗤HPH」","W")
			CASEELSE
				CALL HPH_PRINT("「胸部沾满了精液…　兴奋起来了…HPH」","W")
		ENDSELECT
	ELSEIF CFLAG:既成事實 >= 1
		SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「在我眼前射精什么的、有些可爱呢」
			CASE 2
				PRINTFORMW 「呀、都飞到脸上来了ー。擦一下ー」
			CASEELSE
				PRINTFORMW 「%CALLNAME:MASTER%的精液好多啊…有那么舒服吗？」
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_4(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;口交
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	IF EXP:精飲経験 >= 200 && TCVAR:発情
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:5
				CASE 1
					CALL HPH_PRINT("精液、很好吃哦…　再多射一些…HPH」","L")
				CASE 2
					CALL HPH_PRINT("「啊唔、已经射了…？　再来一次嘛HPH」","L")
				CASE 3
					CALL HPH_PRINT("「唔咕、唔咕…　噗哈HPH　美味的精液、多谢款待HPH」","L")
				CASE 4
					CALL HPH_PRINT("「只有这些可不够哟。再在嘴巴里来一次…　啊ー唔HPH」","L")
				CASEELSE
					CALL HPH_PRINT(@"「嘴里全是%CALLNAME:MASTER%的精液…　好幸福HPH」","L")
			ENDSELECT

			PRINTFORMW 露米娅露出迷醉的表情%CALLNAME:MASTER%吸着肉棒…
		ELSEIF CFLAG:既成事實 >= 1
			SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「明明不好吃…　怎么说呢、让人上瘾的味道…」
				CASE 2
					PRINTFORMW 「%CALLNAME:MASTER%让我喝了好多、所以喜欢上了」
				CASE 3
					PRINTFORMW 想再来一份。不行吗？」
				CASE 4
					PRINTFORMW 「让我再喝点嘛ー。会让你爽一爽的、好不好嘛？」
				CASEELSE
					PRINTFORMW 「还能再射一点嘛ー…　啾、啾呜呜…」
			ENDSELECT
		ENDIF
	ELSEIF EXP:精飲経験 >= 20
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「把嘴里射得满满的…有那么舒服吗？」
				CASE 2
					PRINTFORMW 「总觉得很美味…因为是%CALLNAME:MASTER%的缘故吧」
				CASE 3
					PRINTFORMW 「射得多到都喝不完。好開心啊」
				CASE 4
					PRINTFORMW 「啾噜噜…噗呜。　全部喝完了、快夸我ー♪」
				CASEELSE
					PRINTFORMW 「小弟弟好像累了呢ー。要不我再舔舔？」
			ENDSELECT
		ELSEIF CFLAG:既成事實 >= 1
			SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「我或许、有些喜欢上这个味道了」
				CASE 2
					PRINTFORMW 「射的时候用嘴使劲吸的话会出来很多很多。你知道吗？」
				CASE 3
					PRINTFORMW 「等等。啾…　还剩了一点、所以我吸出来了…」
				CASE 4
					PRINTFORMW 「量有点少欸？　不舒服嘛？」
				CASEELSE
					PRINTFORMW 「不要突然射出来啊。都有些溢出去了不是吗」
			ENDSELECT
		ENDIF
	ELSE
		IF TALENT:恋慕 || TALENT:恋人
			SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「想让我喝下去吗？　嗯ー、我会加油」
				CASE 2
					PRINTFORMW 「精液不好吃吧ー」
				CASE 3
					PRINTFORML 「嗯嗯ー…　咳咳、咕咳」
					PRINTFORMW 「一半的话倒是可以啊ー…」
				CASE 4
					PRINTFORMW 「嗯咕咕…　对不起。好像还是不行」
				CASEELSE
					PRINTFORMW 「喝了点下去。喉咙涩涩的ー」
			ENDSELECT
		ELSEIF CFLAG:既成事實 >= 1
			SELECTCASE RAND:5
				CASE 1
					PRINTFORMW 「唔诶诶…　好苦ー」
				CASE 2
					PRINTFORMW 「嘴里粘粘的ー」
				CASE 3
					PRINTFORMW 「嗯咕咕…　果然不行啊ー。纸巾…」
				CASE 4
					PRINTFORMW 「这简直不是妖怪能喝下去的东西啊ー」
				CASEELSE
					PRINTFORMW 「%CALLNAME:MASTER%也来喝喝试试呗。给、一半」
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_MESSAGE_PALAMCNG_A_K12_3(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;口でも胸でも中でもないのは全部ここ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	IF TALENT:恋慕 || TALENT:恋人
		SELECTCASE RAND:5
			CASE 1
				CALL HPH_PRINT("「到处都沾满了精液…HPH」","W")
			CASE 2
				PRINTFORMW 「哼哼…　接下来想射到哪里？」
			;CASE 3
				;PRINTFORMW 「」
			CASE 4
				PRINTFORMW 「让我非常舒服呢。总感觉、有点開心…」
			CASEELSE
				PRINTFORMW 「射了好多呢ー。很舒服嘛？」
		ENDSELECT
	ELSEIF CFLAG:既成事實 >= 1
		SELECTCASE RAND:5
			CASE 1
				PRINTFORMW 「沾到身上了。讨厌、粘粘的ー…」
			CASE 2
				PRINTFORMW 「这个味道、总感觉让人有些兴奋…」
			CASE 3
				PRINTFORML 「变得好红啊ー。不痛吗？」
				PRINTFORMW 露米娅戳了戳还在滴着精液和前列腺液的的龟头…
			CASE 4
				PRINTFORMW 「射这么多、不会干涸嘛？　没事吧？」
			CASEELSE
				PRINTFORMW 「让鸡鸡射出来、好像也挺有趣的」
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
RETURN 1

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

@M_KOJO_MESSAGE_PALAMCNG_A_K12_1(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;膣内
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF TEQUIP:50 == MASTER
		PRINTFORML
		;初めて
		IF CFLAG:1002 == 0
			IF CFLAG:既成事實 == 0
			ELSEIF CFLAG:1003 == 1
				PRINTFORML 「在里面噗滋噗滋的出来了哟…　第一次在阴道内射精、感觉怎么样？」
				CALL HPH_PRINT("「下次要稍微忍耐一下、一起舒服起来哦ーHPH」","W")
			ELSE
				PRINTFORML 「欸、这是！？　肚子里、有热热的进来了…」
				PRINTFORML 「…难道是精液？　这样啊ー、这就是射精啊…」
				PRINTFORMW 露米娅似有些感慨般的望向持续搏动着的结合之处…
				PRINTFORML
				IF (TALENT:恋慕 || TALENT:恋人) && CFLAG:允许无套 > 1
					PRINTFORML 「…这样子、就能造出小宝宝来吧」
					PRINTFORML 「%CALLNAME:MASTER%想要孩子吗？　想让我来生吗？」
					PRINTFORMW 「如果%CALLNAME:MASTER%希望的话我…　可以哦？」
				ELSEIF CFLAG:允许无套 >= 1
					PRINTFORML 「…要是有了的话、要怎么办？　两个人一起养育嘛？」
					PRINTFORMW 露米娅直勾勾地盯着%CALLNAME:MASTER%的眼睛…
				ELSEIF CFLAG:既成事實 >= 1
					PRINTFORML 「…不行！　被中出的话会怀上的！」
					PRINTFORMW 压住回过神来的露米娅、%CALLNAME:MASTER%将精液直到最后一滴为止全部注入其中…
				ENDIF
			ENDIF
			CFLAG:1002 = 1
		ELSEIF !TCVAR:12:口服避孕薬 && !TALENT:妊娠
			IF TALENT:恋慕 || TALENT:恋人
				IF CFLAG:允许无套 > 1
					;吸乳头で射精
					IF SELECTCOM == 10 || SELECTCOM == 11
						SELECTCASE RAND:5
							CASE 1
								PRINTFORML 「真是个好色的宝宝啊。想让妈妈怀孕嘛ー？」
							CASE 2
								CALL HPH_PRINT("「这种被满足的感觉、好棒…HPH」","L")
							CASE 3
								CALL HPH_PRINT(@"「有些想要个宝宝了呢HPH　%CALLNAME:MASTER%…HPH」","L")
							CASE 4
								PRINTFORML 「一边吃奶一边射个不停、真是爱撒娇的孩子呢♪」
							CASEELSE
								PRINTFORML 「肉棒牛奶、收到了好多啊」
								IF TALENT:母乳体質
									CALL HPH_PRINT("「作为回礼、也请尽情品尝我的牛奶HPH」","L")
								ELSE
									CALL HPH_PRINT("「说不定真的能把胸部榨出奶…HPH」","L")
								ENDIF
						ENDSELECT
						PRINTFORMW 露米娅将%CALLNAME:MASTER%温柔地抱紧、接受着你的射精…
					;子宮口責め
					ELSEIF SELECTCOM == 73
						IF CFLAG:生理周期 == 7
							SELECTCASE RAND:5
								CASE 1
									GOTO _NAKADASI10
								CASE 2
									CALL HPH_PRINT("「还不能拔出来ー。在填满子宫之前是不会放開你的…HPH」","L")
								CASE 3
									CALL HPH_PRINT(@"「进入到肚子深处了…　%CALLNAME:MASTER%的妊娠汁…HPH」…HPH」","L")
								CASE 4
									CALL HPH_PRINT("「比平时都要多哦…　让我怀孕的气势满满呢ーHPH」","L")
								CASEELSE
									CALL HPH_PRINT("「精液越积越多…　肚子要鼓起来了HPH」","L")
							ENDSELECT
							PRINTFORMW 露米娅的子宫仿佛要将%CALLNAME:MASTER%的精液吸出来一般蠕动着…
						ELSE
							SELECTCASE RAND:5
								CASE 1
									GOTO _NAKADASI11
								CASE 2
									CALL HPH_PRINT("「可以再压紧一点噢ー。我会全部喝下去的…HPH」","L")
								CASE 3
									CALL HPH_PRINT("「一颤一颤地抵在里面哦…HPH」","L")
								CASE 4
									CALL HPH_PRINT("「如此粗暴的射精、好舒服…HPH」","L")
								CASEELSE
									CALL HPH_PRINT("「抱紧我…　全部射给我…HPH」","L")
							ENDSELECT
							PRINTFORMW 露米娅的子宫将%CALLNAME:MASTER%的龟头紧紧吸住不肯放松…
						ENDIF
					ELSE
						IF CFLAG:生理周期 == 7
							$_NAKADASI10
							SELECTCASE RAND:6
								CASE 1
									CALL HPH_PRINT("「全部射出来了？　嘿嘿、好想快点成为母亲啊…HPH」","L")
								CASE 2
									CALL HPH_PRINT("「这样就能怀孕了吗ー。以防万一、想要再多来点啊ーHPH」","L")
								CASE 3
									CALL HPH_PRINT("「怀上孩子的话就一起养吧、孩子他爸HPH」","L")
								CASE 4
									CALL HPH_PRINT("「多ー多地射出来HPH　让我生个小孩吧HPH」","L")
								CASE 5
									CALL HPH_PRINT("「这样或许就行了吧ーHPH　嘿嘿嘿…HPH」","L")
								CASEELSE
									GOTO _NAKADASI13
							ENDSELECT
							PRINTFORMW 露米娅幸福地抚摸着小腹…
						ELSE
							$_NAKADASI11
							SELECTCASE RAND:6
								CASE 1
									CALL HPH_PRINT("「小腹里面暖呼呼的好舒服啊…　诶嘿嘿HPH」","L")
								CASE 2
									CALL HPH_PRINT("「肚子灌得满满的HPH　好幸福ー♪」","L")
								CASE 3
									CALL HPH_PRINT("「肉棒和精液在里面闹腾着HPH　超舒服…HPH」","L")
								CASE 4
									CALL HPH_PRINT("「小穴里满满都是精液HPH　呀、溢出来了…」","L")
								CASE 5
									CALL HPH_PRINT("「全部给你榨干HPH　多ー多地出来吧…HPH」","L")
								CASEELSE
									GOTO _NAKADASI14
							ENDSELECT
							PRINTFORMW 露米娅一本满足地摩擦着肚子…
						ENDIF
					ENDIF
				;危険日生許可無
				ELSE
					IF SELECTCOM == 73
						$_NAKADASI13
						SELECTCASE RAND:4
							CASE 1
								CALL HPH_PRINT(@"「%CALLNAME:MASTER%的精液、全被子宫吞进去了…HPH」","W")
							CASE 2
								PRINTFORMW 「被播上了好多种…　嘿嘿嘿♪」
							CASE 3
								PRINTFORMW 「明明都射精了却还是那么大ー。要继续做吗？」
							CASEELSE
								PRINTFORMW 「在里面被狠狠地射进去了、好舒服」
						ENDSELECT
					ELSE
						$_NAKADASI14
						SELECTCASE RAND:4
							CASE 1
								PRINTFORMW 「舒服吗？可以多射点噢♪」
							CASE 2
								PRINTFORMW 「開始、喜欢上被中出了」」
							CASE 3
								PRINTFORMW 「被这样中出的话、说不定哪天就怀上了哦…　開玩笑的♪」
							CASEELSE
								PRINTFORMW 「啊、精液溢出来了…　再来一次吧♪」
						ENDSELECT
					ENDIF
				ENDIF
			ELSEIF CFLAG:既成事實 >= 1 && CFLAG:允许无套 > 0
				IF SELECTCOM == 73
					SELECTCASE RAND:4
						CASE 1
							PRINTFORMW 「别在那么深的地方射ー。要是怀上了怎么办啊ー」
						CASE 2
							PRINTFORMW 「在肚子里面闹个不停…　虽然很舒服、但是有点可怕」
						CASE 3
							PRINTFORMW 「如果不是和喜欢的人的话是不可以生小宝宝的哦？」
						CASEELSE
							PRINTFORMW 「讨厌…　进到子宫里面了…」
					ENDSELECT
				ELSE
					SELECTCASE RAND:4
						CASE 1
							PRINTFORMW 「要是怀上了的话要负起责任噢」
						CASE 2
							PRINTFORMW 「感觉怪怪的呢ー。啊、滴下来了…」
						CASE 3
							PRINTFORMW 「真是的ー、想要孩子的话就和恋人去做啊」
						CASEELSE
							PRINTFORMW 「在小穴里一颤一颤的…　是射了吗…」
					ENDSELECT
				ENDIF
			ELSEIF !CFLAG:允许无套
				IF CFLAG:生理周期 < 3
					IF CFLAG:既成事實 >= 1
						GOTO _NAKADASI12
					ELSE
						SELECTCASE RAND:3
							CASE 1
								PRINTFORMW 「强行插入什么的…　最差劲了」
							CASE 2
								PRINTFORMW 「不可以中出ー、好恶心ー」
							CASEELSE
								PRINTFORMW （今天是安全日…　来着、是吧？）
						ENDSELECT
					ENDIF
				ELSE
					SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「才不要精液…　快拔出去…」
						CASE 2
							PRINTFORMW 「为什么、要做这么過分的事…？　%CALLNAME:MASTER%…」
						CASEELSE
							PRINTFORMW 「呜呜、要怀上宝宝了哟…」
					ENDSELECT
				ENDIF
			ENDIF
		ELSEIF TALENT:妊娠
			SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「呼、肚子好难受…」
				CASE 2
					PRINTFORMW 「真希望你能更温柔点啊ー」
				CASEELSE
					PRINTFORMW 「至少射在外面啊。小宝宝也太可怜了」
			ENDSELECT
		ELSE
			;IF (TALENT:恋慕 || TALENT:恋人) && TALENT:育児中
			;	SELECTCASE RAND:3
			;		CASE 1
			;			PRINTFORMW 「」
			;		CASE 2
			;			PRINTFORMW 「」
			;		CASEELSE
			;			PRINTFORMW 「等孩子不用那么费心之后、就给他生个弟弟或妹妹吧」
			;	ENDSELECT
			;口服避孕薬中出し口上が思いつかなかったのでコピペ
			IF TALENT:恋慕 || TALENT:恋人
				SELECTCASE RAND:5
					CASE 1
						CALL HPH_PRINT("「小腹里面暖呼呼的好舒服啊…　诶嘿嘿HPH」","L")
					CASE 2
						CALL HPH_PRINT("「肚子灌得满满的HPH　好幸福ー♪」","L")
					CASE 3
						CALL HPH_PRINT("「肉棒和精液在里面闹腾着HPH　超舒服…HPH」","L")
					CASE 4
						CALL HPH_PRINT("「小穴里满满都是精液HPH　呀、溢出来了…」","L")
					CASEELSE
						CALL HPH_PRINT("「全部给你榨干HPH　多ー多地出来吧…HPH」","L")
				ENDSELECT
				PRINTFORMW 露米娅一本满足地摩擦着肚子…
			ELSE
				$_NAKADASI12
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「男性射精之前的表情、好有趣啊ー」
						PRINTFORMW 「要再来一次吗？」
					CASE 2
						PRINTFORMW 「我不太喜欢中出呢ー。而且善后处理也很麻烦」
					CASEELSE
						PRINTFORMW 「反正不会怀上、随你喜欢就好了」
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		RETURN 1
	ENDIF
	RETURN 1
ENDIF
RETURN 1

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

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

@M_KOJO_MESSAGE_PALAMCNG_A2_K12_23(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;深喉插入
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

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

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

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

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

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

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

@M_KOJO_MESSAGE_PALAMCNG_F_K12(ARG)
CALL PALAM_MESSAGE_F
;-------------------------------------------------
;挑逗
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
	RETURN 1
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【12】ルーミア/M_KOJO_K12_絶頂.ERB


code:
没イベの残骸

		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
				IF TALENT:MASTER:性別 == 2 && TALENT:MASTER:非童貞 == 0 && TALENT:MASTER:禁断的知識 && TALENT:12:処女 == 0 && EXP:12:Ｖ経験 >= 50 && CFLAG:12:既成事實 >= 1
					IF CFLAG:12:允许无套 == 1
						CFLAG:12:1002 = 2
					ELSEIF CFLAG:12:允许无套 == 2
						CFLAG:12:1002 = 3
					ELSE
						CFLAG:12:1002 = 1
					ENDIF

					BASE:MASTER:射精 = 0
					SIF BASE:MASTER:勃起 < 1000
						BASE:MASTER:勃起 = 1000
					SIF PALAM:12:潤滑 < 10000
						PALAM:12:潤滑 = 10000
					CFLAG:12:1003 = 0
					TCVAR:次回Counter = 35
					CFLAG:12:允许无套 = 2
					PRINTFORML 「ごめんね、もう我慢できなくなっちゃった」
					PRINTFORML 「こんな美味しそうな匂いさせて…よだれが止まらないの」
					PRINTFORMW
					PRINTFORML 露米亜は慢慢地裙子をたくし上げた
					PRINTFORML 白い太ももと、そこを伝う透明な液体から%CALLNAME:MASTER%は目を離せない
					PRINTFORML 「…ね、%CALLNAME:MASTER%の『はじめて』頂戴？」
					EQUIP:12:裤子 = 0
					EQUIP:12:連体内衣 = 0
					EQUIP:12:緊身内衣 = 0
					EQUIP:12:連衣裙 = 0
					EQUIP:12:裙子 = 1
					;服がなかったら女式衬衫を着せる
					SIF !EQUIP:12:上身衣服２ && !EQUIP:12:上身衣服１ && !EQUIP:12:和服 && !EQUIP:12:外搭
						EQUIP:12:上身衣服２ = 1
				ELSE
					;PRINTFORML 「推倒」
				ENDIF
		ENDIF
		RETURN 1

;==================================================
;裙子の中を見せる
;==================================================
@M_KOJO_MESSAGE_COUNTER_K12_35
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_MESSAGE_COUNTER_K12_35_1
RETURN RESULT
@M_KOJO_MESSAGE_COUNTER_K12_35_1
	IF CFLAG:12:1002 > 0 && CFLAG:12:1003 == 0
		IF EQUIP:12:下半身内衣１
			PRINTFORML 「まずは%PANTSNAME(EQUIP:下半身内衣１, TARGET)%を脱がないとね。…んしょ、っと」
			PRINTFORML 露米亜は内衣を脱ぎ捨て、%CALLNAME:MASTER%の前に充分湿润的秘所をさらした
			EQUIP:12:下半身内衣１ = 0
		ELSEIF EQUIP:12:下半身内衣２
			PRINTFORML 「まずは%PANTSNAME(EQUIP:下半身内衣２, TARGET)%を脱がないとね。…んしょ、っと」
			PRINTFORML 露米亜は内衣を脱ぎ捨て、%CALLNAME:MASTER%の前に充分湿润的秘所をさらした
			EQUIP:12:下半身内衣２ = 0
		ELSE
			;PRINTFORML 沒穿
		ENDIF
		PRINTFORML
		CALL HPH_PRINT(@"「これが女の子のおまんこだよー。今から%CALLNAME:MASTER%の童貞さんを食べちゃうの…HPH」","L")
		PRINTFORMW 露米亜は%CALLNAME:MASTER%に見せつけるように膣口を指でかき回している…
		BASE:MASTER:射精 = 0
		BASE:MASTER:勃起 = 1500
		TCVAR:次回Counter = 85
		CFLAG:12:1003 = 1
	ENDIF
RETURN 1

;==================================================
;Ｖ挿入する（TARGET受け）
;==================================================
@M_KOJO_MESSAGE_COUNTER_K12_85
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_MESSAGE_COUNTER_K12_85_1
RETURN RESULT
@M_KOJO_MESSAGE_COUNTER_K12_85_1
	IF CFLAG:12:1002 > 0 && CFLAG:12:1003 == 1
		PRINTFORML 「そろそろ挿れちゃうね…おちんちんの先っぽ、くっつけてー」
		CALL HPH_PRINT("「诶嘿嘿HPH　このまま腰をおろせば童貞卒業だよHPH」","L")
		PRINTFORMW

		IF !TCVAR:12:口服避孕薬
			PRINTFORML 「…ゴム着けなくていいのかって？」
			PRINTFORML 「今日は特別よ。初めてのおまんこの中、いっぱい感じて気持ち良くなってね」

			IF CFLAG:12:生理周期 < 3
				PRINTFORML 「それに、今日は大丈夫な日だから。遠慮しないで出してね♪」
			ELSEIF CFLAG:12:生理周期 == 7
				PRINTFORML 「もしかすると初めての性交で出来ちゃうかも♪」
			ELSE
				PRINTFORML 「そう簡単に妊娠しないから、大丈夫よ♪」
			ENDIF
		ELSE
		ENDIF
		PRINTFORML
		CALL HPH_PRINT(@"「覚悟是い？%CALLNAME:MASTER%のはじめて、もらっちゃうね…HPH」","W")
		TCVAR:次回Counter = 88
		CFLAG:12:1003 = 2
	ENDIF
RETURN 1

;==================================================
;Ｖ腰振り（MASTER受け）
;==================================================
@M_KOJO_MESSAGE_COUNTER_K12_88
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_MESSAGE_COUNTER_K12_88_1
RETURN RESULT
@M_KOJO_MESSAGE_COUNTER_K12_88_1
	IF CFLAG:12:1002 > 0 && CFLAG:12:1003 == 2
		PRINTFORML 「あはっ。童貞卒業おめでと♪　膣内でビクビクしてるの、感じるよ」
		SIF TALENT:MASTER:形状 > 2
			CALL HPH_PRINT("「大きいおちんちんにえぐられて…私も気持ちいいっ…よHPH」","L")

		CALL HPH_PRINT("「でも…ここからが本番よ。ほら、ほら、ほらぁっHPH」","L")
		PRINTFORMW 露米亜は叩きつけるように腰を振り始めた…
		PRINTFORML
		IF TCVAR:MASTER:要去了
			PRINTFORML 「うん？　もう要去了？」
			PRINTFORML 「稍微早いけど、初めてだもん。仕方ないよね」
			CALL HPH_PRINT("「それじゃあイかせてあげる。思いっきり、中に出してHPH」","L")
			PRINTFORMW 露米亜は小刻みに腰を揺らして%CALLNAME:MASTER%の射精を促している…
			CFLAG:12:1003 = 5
		ELSE
			PRINTFORML 「要去了になっちゃった？　まだ我慢して…」
			PRINTFORMW 「私をいっぱい味わって…%CALLNAME:MASTER%をいっぱい味あわせて…」
			TCVAR:次回Counter = 88
			CFLAG:12:1003 = 3
		ENDIF
	ELSEIF CFLAG:12:1003 == 3
		CALL HPH_PRINT("「そろそろ奥まで挿れてあげる…んんっHPH」","L")
		PRINTFORML 露米亜がさらに腰を落とし、%CALLNAME:MASTER%の阴茎が根元まで飲み込まれた
		PRINTFORML 「当たってるの、わかる？　一番奥の、赤ちゃん作る部屋…よ♪」
		SIF TALENT:MASTER:形状 > 2
			PRINTFORML 「おちんちんの先っぽでぐいぐい押してきて…中に入っちゃいそう…」

		PRINTFORMW
		IF TCVAR:MASTER:要去了
			PRINTFORML 「もう出ちゃう？　我慢できない？」
			PRINTFORML 「いいよ。ぐぐーって、思いっきり押し付けて…」
			CALL HPH_PRINT("「子宮の奥まで届くくらい…出してHPH」","L")
			PRINTFORMW 露米亜は%CALLNAME:MASTER%の阴茎を膣奥で温柔的締めつけている…
			CFLAG:12:1003 = 5
		ELSE
			PRINTFORML 「おまんこの奥って、気持ちいいでしょ？」
			PRINTFORML 「つんつん突いたりぎゅーって押したり、ぎりぎりまで抜いて一気に押し込んだり…」
			PRINTFORMW 「%CALLNAME:MASTER%の好きにやっていいんだよ？」
			BASE:MASTER:射精 = 10000
			TCVAR:次回Counter = 86
			CFLAG:12:1003 = 4
		ENDIF
	ENDIF
RETURN 1

;==================================================
;だいしゅき大堂ド
;==================================================
@M_KOJO_MESSAGE_COUNTER_K12_86
CALL EVENT_COUNTER_MESSAGE
CALL M_KOJO_MESSAGE_COUNTER_K12_86_1
RETURN RESULT
@M_KOJO_MESSAGE_COUNTER_K12_86_1
	IF CFLAG:12:1003 == 4
		SOURCE:12:快Ｖ = 9999
		CALL HPH_PRINT("「おちんちん震えてるよHPH　いっぱい我慢したんだね」","L")
		CALL HPH_PRINT("「私も同じだから…一緒にイこHPH」","L")
		PRINTFORMW 露米亜は%CALLNAME:MASTER%の手を握り、ゆったりと動いている
		PRINTFORML 絶頂直前の膣肉が搾り取るように吸いつき、%CALLNAME:MASTER%を責め立てた
		PRINTFORML
		CALL HPH_PRINT("「私の膣内でイってHPH」","L")
		CALL HPH_PRINT("「%CALLNAME:MASTER%の中出しでイかせてHPH」","L")
		CALL HPH_PRINT("「おなかいっぱい出してHPH」","L")
		CALL HPH_PRINT("「赤ちゃん、作っちゃおHPH」","W")
		CFLAG:12:1003 = 5
	ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【12】ルーミア/メモ/残骸.txt


code:
CFLAG1001 膝枕イベント
CFLAG1002 初めての膣内射精
CFLAG1003 童貞暴発
CFLAG1004 固有料理
CFLAG1005 甘味

GOTO　21まで使用

path: ERB/口上・メッセージ関連/個人口上/【12】ルーミア/メモ/自分用メモ.txt


code:
ＴＷ露米亜口上ver0.16

口上色　0xE4FC08(少し緑っぽい黄色)

まだ大して喋りませんがよろしければ

　「危険日に月が見えるところで勸酒と発情する」イベントを仕込んでいます

　露米亜は甜酒が好き

加筆・改変・再配布等は、金銭がからまず、個人の責任で行う分には随便ください

バグ報告等は、era板+のeratoho総合スレまで

制作に当たり、ＴＷ用恋口上を参考にさせていただきました
この場を借りて礼物申し上げます

2020/06/03 お試し版
2020/06/05 ミス修正、ちょこっと加筆
2020/08/26 遭遇・抱き寄せ・帯出去・掃除・主人公射精　　　ver0.1
2020/09/05 正常位・後背位・対面座位・背面座位・子宮口責め　ver0.11
2021/10/05 固有料理・料理　　　　　　　　　　　　　　　　　ver0.12
2021/10/06 バグ修正　　　　　　　　　　　　　　　　　　　　ver0.121
2021/10/10 訓練・勉強・吃飯                                ver0.13
2021/10/15 吃飯・採取・釣魚                                ver0.14
2021/10/23 牽手・請吃飯・お弁当・甘味処・土産屋    ver0.15
2021/11/18 抱きつく・接吻(日常)・もっと接吻・胸愛撫(日常)　ver0.16

作者　葦

path: ERB/口上・メッセージ関連/個人口上/【12】ルーミア/ルーミアread_me.txt