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

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

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

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_0(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;コンドーム
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_23(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;イラマチオ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_22(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;シックスナイン
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;同時射精
	IF NOWEX:射精 && NOWEX:MASTER:射精
		PRINTFORML
		RETURN 1
	;TARGETだけ射精
	ELSEIF NOWEX:射精
		;PLAYERについてる
		IF GETBIT(TALENT:PLAYER:性別,1)
			PRINTFORML
			RETURN 1
		;付いてない
		ELSE
			PRINTFORML
			RETURN 1
		ENDIF
	;PLAYERだけ射精
	ELSE
		;TARGETについてる
		IF GETBIT(TALENT:性別,1)
			PRINTFORML
			RETURN 1
		;付いてない
		ELSE
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_26(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;授乳プレイ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_21(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;パイズリフェラ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_9(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;アナル奉仕
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_6(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;素股
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_5(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;パイズリ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_4(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;フェラチオ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A_K49_2(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;アナル
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A2_K49_0(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;コンドーム
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A2_K49_23(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;イラマチオ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A2_K49_5(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;パイズリ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

@M_KOJO_NK_MESSAGE_PALAMCNG_A2_K49_4(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;フェラチオ
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

@M_KOJO_NK_MESSAGE_PALAMCNG_A2_K49_2(ARG)
CALL PALAM_MESSAGE_A
;-------------------------------------------------
;アナル
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

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

@M_KOJO_NK_MESSAGE_PALAMCNG_F_K49(ARG)
CALL PALAM_MESSAGE_F
;-------------------------------------------------
;焦らし
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/性/M_KOJO_K49_310_絶頂.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/性/M_KOJO_K49_310_育児.ERB

license: unknown


path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/性/M_KOJO_K49_310_过激.ERB


path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/性/M_KOJO_K49_310_道具系.ERB


code:
@关系_310(ARG)
#FUNCTION
IF !ARG
	ARG=49
ENDIF

IF MARK:ARG:反発刻印>=2
	RETURNF 0
ELSEIF CFLAG:38:3100
	IF TALENT:ARG:恋人
		IF CFLAG:ARG:清い交際
			IF ABL:ARG:欲望>=30
				RETURNF 117
			ELSE
				RETURNF 107
			ENDIF
		ELSEIF ABL:ARG:欲望>=30
			RETURNF 116
		ELSE
			RETURNF 106
		ENDIF
	ELSEIF CFLAG:ARG:好感度>=15500&&CFLAG:ARG:信賴度>=9300&&ABL:ARG:親密>=30
		RETURNF 105
	ELSEIF CFLAG:ARG:好感度>=9300&&CFLAG:ARG:信賴度>=4650&&ABL:ARG:親密>=20
		RETURNF 104
	ELSEIF CFLAG:ARG:好感度>=5580&&CFLAG:ARG:信賴度>=1860&&ABL:ARG:親密>=10
		RETURNF 103
	ELSEIF CFLAG:ARG:好感度>=1860&&CFLAG:ARG:信賴度>=620&&ABL:ARG:親密>=5
		RETURNF 102
	ELSE
		RETURNF 101
	ENDIF
ELSE
	IF TALENT:ARG:恋人
		IF CFLAG:ARG:清い交際
			IF ABL:ARG:欲望>=20
				RETURNF 16
			ELSE
				RETURNF 6
			ENDIF
		ELSEIF ABL:ARG:欲望>=20
			RETURNF 15
		ELSE
			RETURNF 5
		ENDIF
	ELSEIF CFLAG:ARG:好感度>=7500&&CFLAG:ARG:信賴度>=3500&&ABL:ARG:親密>=20
		RETURNF 4
	ELSEIF CFLAG:ARG:好感度>=4500&&CFLAG:ARG:信賴度>=1500&&ABL:ARG:親密>=10
		RETURNF 3
	ELSEIF CFLAG:ARG:好感度>=1500&&CFLAG:ARG:信賴度>=500&&ABL:ARG:親密>=5
		RETURNF 2
	ELSE
		RETURNF 1
	ENDIF
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/自作/M_KOJO_K49_310_关系判定.ERB


code:
@厌弃_49
IF TARGET==49 && 关系_310()==0
	SELECTCASE RAND:3
		CASE 0
			PRINTFORMDW   似乎现在觉还不想搭理%CALLNAME:MASTER%。
		CASEELSE
			PRINTFORMDW   觉看也不打算看%CALLNAME:MASTER%一眼。
	ENDSELECT
	TFLAG:好感度管理=MAX(TFLAG:好感度管理-RAND:5,0)
	TFLAG:信賴度管理=MAX(TFLAG:信賴度管理-RAND:3,0)
	IF !RAND:5
		TALENT:心情=MAX(TALENT:心情-RAND:2,-1)
	ENDIF
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/自作/M_KOJO_K49_310_反発处理.ERB


code:
@睡眠_310
IF CFLAG:49:睡眠
	PRINTFORML 「呜…恋…」
	PRINTFORMDL   地底的大小姐在睡梦中毫无防备，
	PRINTFORMDW   显出与平日不一样的可爱。
	PRINTFORMDW   似乎是梦到恋了呢。
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/自作/M_KOJO_K49_310_睡眠.ERB


code:
@RESTART_310
#DIM CONST 重启=3100
#DIM 角色
IF (关系_514()>3 && 关系_310()>4) && (!CFLAG:38:重启 && GET_MAPID(CFLAG:49:現在位置) == MAIN_MAP)
	IF CFLAG:49:現在位置!=CFLAG:MASTER:初期位置
		FOR 角色,1,CHARANUM
			IF 角色!=49
				CFLAG:角色:現在位置=99
			ELSE
				CFLAG:角色:現在位置=CFLAG:MASTER:初期位置
			ENDIF
		NEXT
		PRINTFORMDL   和觉说话的时候，察觉到周围一片死寂…
		PRINTFORMDW   使用察知能力，才发现大家都不见了。
		PRINTFORMDL   这时，觉走进了%CALLNAME:MASTER%的房间。
		PRINTFORMDW   要跟上去看看吗？
		CALL ASK_YN
			IF !RESULT
				PRINTFORMDW   %CALLNAME:MASTER%决定把事情问清楚。
					CFLAG:MASTER:現在位置=CFLAG:MASTER:初期位置
					PRINTFORMDW   走进房间，只见觉凝视着自己。
					PRINTFORMW 「梦开始的地方，也是梦消失的地方」
					PRINTFORML 「	一开始，这里并没有任何一个谁」
					PRINTFORMW 「	想要找回她们吗？」
					PRINTFORML 「迈出了这一步就不可能反悔了，请做好觉悟」
					PRINTFORMW 「准备好撕开面纱，揭晓谜底了吗？」
					CALL ASK_YN
					IF !RESULT
						PRINTFORML 「看来对真相的渴望胜过了不安」
						;PRINTFORMW 「现在，请将此刻定格封存」
						;	SAVEGAME
						PRINTFORMW 「那么，踏上这条不归路吧」
						PRINTFORMDW   %CALLNAME:MASTER%的意识顿时沉入深渊。
							CFLAG:38:重启++
							RESETCOLOR
							CALL 強行開始新的游戏
					ELSE
						PRINTFORML 「这样啊…」
						PRINTFORMW 「准备好的时候，就一起回来这里吧」
					ENDIF
			ELSE
				PRINTFORMDW   %CALLNAME:MASTER%决定先搞清楚发生了什么，再找觉了解情况。
			ENDIF
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【49】古明地觉_试制口上v0.053/自作/M_KOJO_K49_310_重启.ERB


code:
;-------------------------------------------------
; eraTheWorld proto4.48用 TW魅魔口上（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;------ ｷﾘﾄﾘ ｶｲｼ -----------
;eraTheWorld proto4.07パッチ取り込み用 Ver1.13
;貂プレートの使い方
;初めに置換指令等により KX を K(角色No) に変更して下さい
;角色NoはCSVフォルダのCharaファイルを参照　例(霧雨 魔理沙の場合)：KX =置換=> K11
;
;------ ｷﾘﾄﾘ ｵﾜﾘ -----------

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;
;
;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K4(ARG)
;別人版を作成する際はこの貂プレではなく別人版用口上貂プレをご利用ください

;口上存在判定です、けしてコメントアウトしないでください
;他の処理は一切行わないように
RETURN 1

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K4
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;Xには角色番号を入れてください

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0
;CFLAG:X:扮演口上有 = 0

;破瓜中止口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPで中止の成否を操作できます
;CFLAG:X:破瓜中止口上有 = 0

;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで推倒の成否を操作できます
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;推倒禁止に1を入れると、主动推倒てこなくなります
;以下は恋慕か炮友がつくまで推倒てこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:炮友
;	CFLAG:X:推倒禁止 = 1
;ELSE
;	CFLAG:X:推倒禁止 = 0
;ENDIF

;来訪不能に1を入れると、来訪してこなくなります
;以下は面識があるまで来訪してこなくなる使用例
;IF !CFLAG:X:面識
;	CFLAG:X:来訪不能 = 1
;ELSE
;	CFLAG:X:来訪不能 = 0
;ENDIF

;### 口上色判定 ###################################
@M_KOJO_COLOR_K4

;ここでSETCOLORすることで口上に色を付けられます
;例：SETCOLOR 0xC07070

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K4
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAGを使用場合、角色番号の指定が必要になります
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K4
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
	PRINTFORML
	PRINTFORMW 「啊拉，是新来的吗」
	PRINTFORMW 眼前看不到腿的女性，抱着胳膊，瞪着%CALLNAME:MASTER%
	PRINTFORMW 「我的名字叫魅魔。是个彻头彻底的恶灵」
	PRINTFORMW 「你在这里干什么是你的自由，我住在神社里只要打声招呼立马就能见面」
	PRINTFORMW 看来第一印象并不太好……
	PRINTFORML
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K4_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORML
	PRINTFORMW 「啊，那个，稍等一下……」
	PRINTFORMW 正在回家的路上，突然被魅魔从背后打了招呼
	PRINTFORMW 想着有什么事的%CALLNAME:MASTER%回过头和魅魔对上了眼
	PRINTFORMW 「今天能和你见面非常高兴，那个…」
	PRINTFORMW 「果然，因为是男人和女人，所以才会想做这样的事情吧……」
	PRINTFORMW 这样说着，她靠了过来，在脸上轻轻地亲了一下
	PRINTFORMW 「好、好了！这就结束了，赶紧回去吧！」
	PRINTFORMW 脸上一片绯红的魅魔狠狠地敲打着%CALLNAME:MASTER%的背，催促其赶紧回去
	PRINTFORML
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K4_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
			PRINTFORML
			PRINTFORMW 「稍等一下」
			PRINTFORMW 一脸认真的魅魔和你搭话了
			PRINTFORMW 「我不擅长拐弯抹角的说话。所以就单刀直入地说了」
			PRINTFORMW 「我喜欢你」
			PRINTFORMW 「没有開玩笑哦。和你在一起就感觉身心都得到了洗礼」
			PRINTFORMW 「在平时糊涂的脑子里，宛如被粉红色的烟雾笼罩一般……非常舒服」
			PRINTFORMW 魅魔做了一次深呼吸，认真的注视着%CALLNAME:MASTER%
			PRINTFORMW 「能和我成为恋人吗？」
			PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
			PRINTFORML
			PRINTFORMW 「…………」
			PRINTFORMW 「哼！我早就知道了！　你肯定会同意的！」
			PRINTFORMW 「怎么会有人拒绝我这种美人的告白呢！我才没有紧张呢！」
			PRINTFORMW 魅魔在浮现出安心的表情的同时，大声地叫了起来
			PRINTFORMW 「……那么、真的可以吗？」
			PRINTFORMW %CALLNAME:MASTER%毫不犹豫的点了点头
			PRINTFORMW 「呵呵，是吗……」
			PRINTFORMW 「那么，拜托了%CALLNAME:MASTER%%UNICODE(0x2665)%」
			PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			PRINTFORML
			PRINTFORMW 「…………」
			PRINTFORMW 「怎么了？　难道你以为我会像小姑娘一样哭出来吗？」
			PRINTFORMW 「真是不凑巧，我可是恶灵。可没什么太大的感情起伏」
			PRINTFORMW 「哎呀哎呀，今天就放过你吧」
			PRINTFORMW 「但是一定要记住啊。恶灵可是很执拗的哦」
			PRINTFORMW 魅魔眼角留着泪水回去了
			PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K4_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
;CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		IF CFLAG:318 == 1
			PRINTFORMW 「……」
			PRINTFORMW 魅魔愤怒地踏上了回家的路
		ELSEIF TALENT:恋人
			PRINTFORMW 「啊，已经结束了吗…」
			PRINTFORMW 魅魔露出了很遗憾的表情，抓住了%CALLNAME:MASTER%的手臂
			PRINTFORMW 「下次有空的话可以再邀请我吗？」
			PRINTFORMW 当然，爽快地承诺之后魅魔又重回了笑颜
		ELSEIF TALENT:恋慕
			PRINTFORMW 「哎，已经要回去了吗？」
			PRINTFORMW 向其回答时间不早了
			PRINTFORMW 「嗯…？门禁算什么，我可是恶灵呐」
			PRINTFORMW 魅魔虽然要求继续约会还是不得不勉强放弃回去了
		ELSEIF TALENT:思慕
			PRINTFORMW 「呼，累了」
			PRINTFORMW 「虽然很累，但玩得很開心哟」
			PRINTFORMW 魅魔似乎一脸满足的踏上了归途
		ELSE
			PRINTFORMW 「啊ー好累好累……」
			PRINTFORMW 「下次出门时你一个人去吧」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		IF TALENT:恋人
			PRINTFORMW 「……知道了，原谅你吧」
			PRINTFORMW 「看来只是因为一念之差。谁都会有犯错的时候」
			PRINTFORMW 「所以，来个和好的拥抱吧，%CALLNAME:MASTER%♪」
			PRINTFORMW 魅魔笑着和%CALLNAME:MASTER%抱在一起
		ELSE
			PRINTFORMW 「……好吧，这次就宽容你一下吧」
			PRINTFORMW 「但是如果下次再有得意忘形的情况，就做好觉悟吧」
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		IF TALENT:恋人
			PRINTFORMW 「……差劲」
			PRINTFORMW 魅魔还皱着脸,不过，比刚才缓和了
		ELSE
			PRINTFORMW 魅魔冷淡的俯视着%CALLNAME:MASTER%，不留情的扭过了脸
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		IF TALENT:恋人
			PRINTFORMW 「我是不是最近太宠溺你了呢？」
			PRINTFORMW 「如果我有那个意愿的话，瞬间就可以干掉你哦？」
			PRINTFORMW 魅魔简短了威吓了%CALLNAME:MASTER%就立马不说话了
		ELSE
			PRINTFORMW 「在我还算冷静的时候去别的什么地方吧，不然的话就干掉你」
			PRINTFORMW 魅魔气得浑身发抖地做了忠告
		ENDIF
		PRINTL
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K4_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		IF CFLAG:318 == 1
			PRINTFORML 「有什么事吗？」
			PRINTFORMW 魅魔皱起了眉头
		ELSEIF TALENT:恋人
			PRINTFORML 「哦，这不是%CALLNAME:MASTER%吗」
			PRINTFORMW 魅魔露出了開心地笑容
		ELSEIF TALENT:恋慕
			PRINTFORML 「嘸嘸、%CALLNAME:MASTER%」
			PRINTFORMW 魅魔坦率地打了招呼
		ELSEIF TALENT:思慕
			PRINTFORML 「嗯？是你啊」
			PRINTFORMW 魅魔注意到了%CALLNAME:MASTER%稍稍地做了寒暄
		ELSE
			PRINTFORMW 魅魔瞥了一眼%CALLNAME:MASTER%就马上转了回去
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		IF CFLAG:318 == 1
			PRINTFORML 「……」
			PRINTFORMW 魅魔无视了%CALLNAME:MASTER%
		ELSEIF TALENT:恋人
			PRINTFORML 「哦，这不是%CALLNAME:MASTER%吗」
			PRINTFORMW 魅魔露出了開心地笑容
		ELSEIF TALENT:恋慕
			PRINTFORML 「嘸嘸、%CALLNAME:MASTER%」
			PRINTFORMW 魅魔坦率地打了招呼
		ELSEIF TALENT:思慕
			PRINTFORML 「嗯？是你啊」
			PRINTFORMW 魅魔注意到了%CALLNAME:MASTER%稍稍地做了寒暄
		ELSE
			PRINTFORMW 魅魔瞥了一眼%CALLNAME:MASTER%就马上转了回去
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		IF CFLAG:318 == 1
			PRINTFORML 「……」
			PRINTFORMW 魅魔无视了%CALLNAME:MASTER%
		ELSEIF TALENT:恋人
			PRINTFORML 「%CALLNAME:MASTER%，我也可以进去吗？」
			PRINTFORMW 拥有丰满身体的魅魔移动到了%CALLNAME:MASTER%身旁
		ELSEIF TALENT:恋慕
			PRINTFORML 「我也要进去了哦」
			PRINTFORMW 魅魔用小小的毛巾遮住丰满的身体进入了浴室
		ELSEIF TALENT:思慕
			PRINTFORML 「别碍事」
			PRINTFORMW 魅魔一点都不在意%CALLNAME:MASTER%直接进入了浴室
		ELSE
			PRINTFORML 「别碍事」
			PRINTFORMW 魅魔毫不介意%CALLNAME:MASTER%的存在进入了浴室
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		IF CFLAG:318 == 1
			PRINTFORML 「……」
			PRINTFORMW 魅魔看到%CALLNAME:MASTER%就沉默着离開了
		ELSEIF TALENT:恋人
			PRINTFORML 「啊，抱歉，你已经在里面了吗」
			PRINTFORMW 魅魔确认了%CALLNAME:MASTER%的身影后离開了浴室
		ELSEIF TALENT:恋慕
			PRINTFORML 「啊……对、对不起」
			PRINTFORMW 魅魔看到%CALLNAME:MASTER%的样子，红着脸出来了
		ELSEIF TALENT:思慕
			PRINTFORML 「啊，已经有人了吗？」
			PRINTFORMW 魅魔确认了%CALLNAME:MASTER%的身影后慌慌张张地出去了
		ELSE
			PRINTFORML 「什么嘛，你在啊」
			PRINTFORMW 魅魔一瞥见%CALLNAME:MASTER%就叹起气来
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K4_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K4_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K4_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K4_5(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K4_6(ARG,ARG:1)
;口上主はTARGET
;ARGに情事相手
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K4_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて目撃者も参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG:1 == 4
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める
;==================================================
@M_KOJO_EVENT_K4_8(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERだけ問い詰め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;二人とも説教
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;胖次没収された
;==================================================
@M_KOJO_EVENT_K4_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;同じ場所に居て胖次を回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;遠距離移動中に胖次を回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K4_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE ARG:1
			CASE 0
			;抜け出した
				PRINTFORML
				RETURN 1
			CASE 1
			;抱き着きモード満足終了
				PRINTFORML
				RETURN 1
			CASE 2
			;抱き着きモード強制終了
				PRINTFORML
				RETURN 1
		ENDSELECT
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		SELECTCASE ARG:1
			CASE 1
			;随便状態から抜け出せなかった
				PRINTFORML
				RETURN 1
			CASE 2
			;欲求不満が高くて抜け出せなかった
				PRINTFORML
				RETURN 1
		ENDSELECT
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K4_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K4_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K4_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている工作量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;吃飯系
;==================================================
@M_KOJO_EVENT_K4_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K4_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;陪睡
;==================================================
@M_KOJO_EVENT_K4_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K4_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;幼稚持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K4_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			PRINTFORMW 「不好意思，可以请你能好好的做好避孕措施吗？…」
		ELSEIF TALENT:思慕
			PRINTFORMW 「如果不避孕的话，我可不想做呐啊」
		ELSE
			PRINTFORMW 「你啊…带上套子不也是可以的吗」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORMW 「抱歉呐……那个稍微有点……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「不好意思我拒绝」
		ELSE
			PRINTFORMW 「那太勉强了」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			PRINTFORMW 「……你啊，就不能简单的为我考虑一下吗…？」
		ELSEIF TALENT:思慕
			PRINTFORMW 「适可而止吧！不是都已经说了不愿意了！」
		ELSE
			PRINTFORMW 「你啊，不适可而止一点的话，我可要把你的那个小兄弟带走了哦？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋慕
			PRINTFORMW 「嗯，那么……不是危险日的时候，就没什么关系…%UNICODE(0x2665)%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「你那么想吗？那么除了危险日之外的日子就允许你做吧」
		ELSE
			PRINTFORMW 「哈……。我知道了，危险日之外日子的就允许你吧」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋慕
			PRINTFORMW 「嗯唔…%UNICODE(0x2665)%　如果是你的孩子的话……没关系的…%UNICODE(0x2665)%」
		ELSEIF TALENT:思慕
			PRINTFORMW 「听好咯？真的是！因为你很特别的才允许的哦」
		ELSE
			PRINTFORMW 魅魔好像放弃了一切似的摇着头
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K4_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K4_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K4_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		PRINTFORMW 「啊ー…」
		PRINTFORMW （难道说我也坠入爱河了么……）
		PRINTFORMW （都已经是一把岁数的恶灵了，真羞耻呐）
		PRINTFORMW （而且，我也不知道那家伙是不是对我有意思…）
		PRINTFORMW 「……%CALLNAME:MASTER%……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		PRINTFORMW （%CALLNAME:MASTER%、か）
		PRINTFORMW （看来不是坏家伙）
		PRINTFORMW （……从明天開始试着更温和的与他接触吧…）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K4_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K4_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			PRINTFORMW 「哇，抱歉……有点不好意思呢……」
		ELSEIF TALENT:思慕
			PRINTFORMW 「不要。一个人进去不就行了吗」
		ELSE
			PRINTFORMW 「你就不能一个人洗自己的身体吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORMW 「好吧！那咱们就一起进去吧」
		ELSEIF TALENT:思慕
			PRINTFORMW 「没什么关系，但是别一直盯着我看。」
		ELSE
			PRINTFORMW 「……嘛，算了」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K4_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K4_25(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K4_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K4_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K4_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K4_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が推倒を解除
;==================================================
@M_KOJO_EVENT_K4_30(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文。
;默认のものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K4_ONABARE_1(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文。
;默认のものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K4_ONABARE_2(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレ無崩しックスの地の文。
;默认のものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K4_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ責め
	CASE 2
		PRINTFORML Ｂ責め
	CASE 3
		PRINTFORML Ｍ責め
ENDSELECT

IF 本番はどっちか
	PRINTFORML Aで本番
ELSE
	PRINTFORML Vで本番
ENDIF
;-------------------------------------------------
[SKIPEND]

path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_イベント.ERB


path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_カウンター.ERB


path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_コマンド.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;性騷擾系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;310,摸屁股
;TFLAG:193(1=不快(TALENT:膽怯なら涙目) 2&&3=恥ずかしがる(TALENT:討厭男人兼MASTERが男なら、身をすくめる) 4=されるがまま)
;CFLAG:诶嘿嘿==2&&TCVAR:20(胖次無し顔面騎乗(70=強制舐陰 71=口交強制 72=肛門奉仕) 35=裙子内見せつけ 52=素股)
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K4_310
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSE
		IF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 「这里的部分还是肉体哟♪」
				PRINTFORMW %CALLNAME:MASTER%仔细的品味着魅魔柔软的屁股
			ELSEIF RAND:4 == 0
				PRINTFORML 「芙芙芙…%UNICODE(0x2665)%　被这样摸的话不就会兴奋起来吗…%UNICODE(0x2665)%」
				PRINTFORMW 魅魔妩媚的在%CALLNAME:MASTER%脸上吹气
			ELSEIF RAND:3 == 0
				PRINTFORML 隔着衣服揉屁股的时候，被魅魔责备了
				PRINTFORMW 「喂，停手啦…%UNICODE(0x2665)%」
			ELSEIF RAND:2 == 0
				PRINTFORML 「啊……%CALLNAME:MASTER%……」
				PRINTFORMW 被摸了屁股的魅魔，用充满色情的眼神看着%CALLNAME:MASTER%
			ELSE
				PRINTFORML 「嗯唔…%UNICODE(0x2665)%　真是…%UNICODE(0x2665)%」
				PRINTFORMW 魅魔就这样被抚摸着屁股
			ENDIF
		ELSEIF TALENT:思慕
			IF RAND:5 == 0
				PRINTFORML 「比起我还是去摸灵梦的屁股吧。那个小姑娘出乎意料的大呐」
				PRINTFORMW 魅魔不惜出卖亲人……
			ELSEIF RAND:4 == 0
				PRINTFORML 「喂！喂！你在摸什么地方！」
				PRINTFORMW %CALLNAME:MASTER%引起了魅魔的注意
			ELSEIF RAND:3 == 0
				PRINTFORML 「呀！？　等下！你啊……」
				PRINTFORMW 魅魔惊讶得发出了少女般的声音
			ELSEIF RAND:2 == 0
				PRINTFORML 「抚摸恶灵的屁股很有趣吗？」
				PRINTFORMW 魅魔扭扭捏捏地问%CALLNAME:MASTER%
			ELSE
				PRINTFORML 「别这样了，真是的…」
				PRINTFORMW 魅魔一脸无奈地被摸着屁股
			ENDIF
		ELSE
			IF RAND:5 == 0
				PRINTFORML 「……」
				PRINTFORMW 被抚摸屁股的魅魔用冰冷的眼神俯视着%CALLNAME:MASTER%
			ELSEIF RAND:4 == 0
				PRINTFORML 被用力的抓住了手腕
				PRINTFORMW 「去摸自己的屁股吧」
			ELSEIF RAND:3 == 0
				PRINTFORML 「你就那么想提前去地狱吗？」
				PRINTFORMW 魅魔的样子如同恶鬼一般…
			ELSEIF RAND:2 == 0
				PRINTFORML 「哈啊！」
				PRINTFORMW 魅魔在%CALLNAME:MASTER%的手碰到屁股之前就打了下来
			ELSE
				PRINTFORML 「以我为性骚扰对象，还真是不错的胆量呐」
				PRINTFORMW %CALLNAME:MASTER%的手腕被扭了过来
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,擁抱
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 60=ディープ接吻 73=ぱふぱふ 74=乳合わせ 77=乳を吸わせる ＶＡ性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K4_311
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CHK_DATENOW(CFLAG:LOCAL:约会中)
	ELSEIF CFLAG:睡眠
	ELSE
		IF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML %CALLNAME:MASTER%将脸埋在魅魔的胸前，结果被训斥了
				PRINTFORMW 「那个，H的事情可不允许哟」
			ELSEIF RAND:4 == 0
				PRINTFORML 「不用客气。请尽情地拥抱我」
				PRINTFORMW %CALLNAME:MASTER%用力的将魅魔抱到身边，魅魔的胸部都压扁了
			ELSEIF RAND:3 == 0
				PRINTFORML 「像这样被你紧紧抱住，不知为何却莫名的有安心感」
				PRINTFORMW 魅魔以平静的表情与%CALLNAME:MASTER%互相拥抱着
			ELSEIF RAND:2 == 0
				PRINTFORML 「寂寞了吗？　乖哦乖哦…♪」
				PRINTFORMW 魅魔抚摸了%CALLNAME:MASTER%的头
			ELSE
				PRINTFORML 「还真喜欢撒娇呢……♪」
				PRINTFORMW 魅魔開心的回抱过来
			ENDIF
		ELSEIF TALENT:思慕
			IF RAND:5 == 0
				PRINTFORML 「又不是小孩子了，真是的」
				PRINTFORMW 魅魔一脸害羞的责备着%CALLNAME:MASTER%
			ELSEIF RAND:4 == 0
				PRINTFORML 「嗯？怎么了？」
				PRINTFORMW 魅魔不可思议地望着紧紧抱住自己的%CALLNAME:MASTER%
			ELSEIF RAND:3 == 0
				PRINTFORML 「……」
				PRINTFORMW 魅魔无言地抱回来了
			ELSEIF RAND:2 == 0
				PRINTFORML 「呀勒呀嘞…想要撒娇吗？」
				PRINTFORMW 魅魔安慰起%CALLNAME:MASTER%來
			ELSE
				PRINTFORML 「不要突然抱过来呀」
				PRINTFORMW 魅魔露出为难的神色
			ENDIF
		ELSE
			IF RAND:5 == 0
				PRINTFORML 「呼……」
				PRINTFORMW 魅魔似乎在做着深呼吸来平定内心的愤怒
			ELSEIF RAND:4 == 0
				PRINTFORML 魅魔用冰冷的表情俯视着%CALLNAME:MASTER%
				PRINTFORMW 「想要缩短寿命的话那就继续抱着吧」
			ELSEIF RAND:3 == 0
				PRINTFORML 「真的好恶心啊…」
				PRINTFORMW 魅魔用打从心底讨厌的声音推開了%CALLNAME:MASTER%
			ELSEIF RAND:2 == 0
				PRINTFORML 「死！」
				PRINTFORMW %CALLNAME:MASTER%被魅魔狠狠地揍了一顿
			ELSE
				PRINTFORML 「滚開！」
				PRINTFORMW 魅魔用力地推開了%CALLNAME:MASTER%
			ENDIF
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;312,接吻
;TFLAG:193(99=拒絶(接吻不可) 1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 50=手淫 60=接吻 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K4_312
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_312_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSE
		IF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 「多谢款待……%UNICODE(0x2665)%」
				PRINTFORMW 魅魔眨着眼用食指轻抚嘴唇
			ELSEIF RAND:4 == 0
				PRINTFORML 「啾…啾…%UNICODE(0x2665)%　你啊%UNICODE(0x2665)%　不觉得害羞吗%UNICODE(0x2665)%」
				PRINTFORMW 魅魔又自己亲了过来
			ELSEIF RAND:3 == 0
				PRINTFORML 「嗯…%UNICODE(0x2665)%　再多一会…%UNICODE(0x2665)%」
				PRINTFORMW 魅魔索求更多kiss
			ELSEIF RAND:2 == 0
				PRINTFORML 「嗯唔…%UNICODE(0x2665)%　啾噜…%UNICODE(0x2665)%　%CALLNAME:MASTER%…%UNICODE(0x2665)%」
				PRINTFORMW 魅魔妩媚地吻着%CALLNAME:MASTER%
			ELSE
				PRINTFORML 「啾…%UNICODE(0x2665)%　嗯？　只有这样吗？」
				PRINTFORMW 魅魔的神情充满了期待
			ENDIF
		ELSEIF TALENT:思慕
			IF RAND:5 == 0
				PRINTFORML 「啾……嗯……」
				PRINTFORMW 魅魔一脸为难的样子接吻着
			ELSEIF RAND:4 == 0
				PRINTFORML 「嗯，真是的…不要让女性为难啊」
				PRINTFORMW 魅魔责备地说
			ELSEIF RAND:3 == 0
				PRINTFORML 接吻时不知为何魅魔露出了闹情緒的表情
				PRINTFORMW 「……和恶灵接吻到底哪里有趣了…」
			ELSEIF RAND:2 == 0
				PRINTFORML 已经够了吧，真是的」
				PRINTFORMW 魅魔红着脸
			ELSE
				PRINTFORML 「嗯唔……突然做什么！」
				PRINTFORMW 魅魔瞪着眼睛。
			ENDIF
		ELSE
			IF RAND:5 == 0
				PRINTFORML 「跟你接吻，还不如吸一口泥水」
				PRINTFORMW 魅魔用衣袖擦着嘴角
			ELSEIF RAND:4 == 0
				PRINTFORML 「啧……绝对，不会原谅你的」
				PRINTFORMW 魅魔散发着充满憎恶的气场
			ELSEIF RAND:3 == 0
				PRINTFORML 「停下！　你这个混蛋！」
				PRINTFORMW 魅魔打算从%CALLNAME:MASTER%的唇下逃跑
			ELSEIF RAND:2 == 0
				PRINTFORML 「呜唉！　呸！　呸！」
				PRINTFORMW 魅魔扭头吐着
			ELSE
				PRINTFORML 「滚！」
				PRINTFORMW %CALLNAME:MASTER%吃了魅魔一巴掌
			ENDIF
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;313,胸愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(27=谷間を見せる 33=胸を揉ませる 53=乳交(小分岐は地の文EVENT_MESSAGE_COM_性騷擾.ERB参照) 73=ぱふぱふ 77=乳を吸わせる 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;ABL:Ｂ感覚(2未満=性的には感じてない 5未満=多少感じてる 5以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;乳の尺寸でも変わる場合があるので、地の文EVENT_MESSAGE_COM_性騷擾.ERB参照
;==================================================
@M_KOJO_MESSAGE_COM_K4_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSE
		IF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 「嘿嘿好痒…♪　来呀来呀，再来一次…%UNICODE(0x2665)%」
				PRINTFORMW %CALLNAME:MASTER%从下方抬起魅魔的胸部，然后突然放手享受着乳摇带来的乐趣
			ELSEIF RAND:4 == 0
				PRINTFORML 「只是隔着衣服揉一下就满足了吗？」
				PRINTFORMW 魅魔带着意味深长的笑容
			ELSEIF RAND:3 == 0
				PRINTFORML 「果然男孩子还是喜欢大大的胸部呢……%UNICODE(0x2665)%」
				PRINTFORMW 用画圆的方式揉捏起这对大胸脯来作为了回答
			ELSEIF RAND:2 == 0
				PRINTFORML 「嗯唔…%UNICODE(0x2665)%　啊…%UNICODE(0x2665)%　喂！%UNICODE(0x2665)%」
				PRINTFORMW 一边揉着胸一边向凸起的山顶按摩，却被魅魔制止了
			ELSE
				PRINTFORML 当透过衣服享受着柔软胸部时，魅魔扑哧的笑了。
				PRINTFORMW 「很柔软吧%UNICODE(0x2665)%」
			ENDIF
		ELSEIF TALENT:思慕
			IF RAND:5 == 0
				PRINTFORML 「反正要揉的话，顺便能帮我揉揉肩膀的话就帮大忙了」
				PRINTFORMW %CALLNAME:MASTER%从背后揉搓魅魔的乳房后，顺便给肩膀做了按摩
			ELSEIF RAND:4 == 0
				PRINTFORML 一边揉胸一边打算占领高地的%CALLNAME:MASTER%，被魅魔抓住了手腕
				PRINTFORMW 「那里可不行」
			ELSEIF RAND:3 == 0
				PRINTFORML 「揉胸就那么開心吗？」
				PRINTFORMW %CALLNAME:MASTER%更用力的揉捏起魅魔的巨乳来回应她的质问
			ELSEIF RAND:2 == 0
				PRINTFORML 「嘛，这个神社里没有比我胸更大的女性了，这可是事实呢」
				PRINTFORMW 魅魔洋溢着骄傲的微笑
			ELSE
				PRINTFORML 「喂喂，不要随便揉别人的胸部呐」
				PRINTFORMW %CALLNAME:MASTER%正在揉搓魅魔的乳房
			ENDIF
		ELSE
			IF RAND:5 == 0
				PRINTFORML 「我也来帮你掐一下脖子吧？」
				PRINTFORMW 对于魅魔的威胁%CALLNAME:MASTER%慌忙缩回了手
			ELSEIF RAND:4 == 0
				PRINTFORML 「你知道性骚扰这个词吗？」
				PRINTFORMW 魅魔浮现出侮蔑的表情
			ELSEIF RAND:3 == 0
				PRINTFORML 「揉着别人的胸到底哪里有趣了」
				PRINTFORMW 魅魔在发怒的同时似乎很吃惊
			ELSEIF RAND:2 == 0
				PRINTFORML 「反正男人就是这样的东西……」
				PRINTFORMW 魅魔宛如看到肮脏的东西一般瞥了一眼揉正在搓胸部的%CALLNAME:MASTER%
			ELSE
				PRINTFORML 「揉了这样的脂肪块，你就满足了吧？」
				PRINTFORMW 魅魔杀气腾腾地问着%CALLNAME:MASTER%
			ENDIF
		ENDIF
	ENDIF

ENDIF
RETURN 1
;==================================================
;314,肛門愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(72=肛門奉仕
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;ABL:Ａ感覚(2未満=受け入れられない 4未満=異物感に翻弄 4以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K4_314
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_314_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;315,陰蒂愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(35=裙子の中を見せる 70=強制舐陰 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振り
;ABL:Ｃ感覚(4未満=くすぐったい 6未満=稍微いいかも 6以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K4_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;CFLAG:诶嘿嘿==2&&TCVAR:20(35=裙子の中を見せる 70=強制舐陰 87=Ａ挿入する 89=腰振りＡ
;TALENT:処女(指挿入れ連続時喪失注意、基本拒否ぎみ)
;ABL:Ｖ感覚(1未満=違和感に戸惑う 5未満=稍微気持ちいい 5以上＝カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K4_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_316_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;317,Ｖ腰を振る
;ABL:Ｖ感覚(2未満=まだ気持ち良くない 5未満=稍微気持ちいい 5以上=カイカン
;==================================================
@M_KOJO_MESSAGE_COM_K4_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_317_1
RETURN RESULT

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

ENDIF
RETURN 1
;==================================================
;318,Ａ腰を振る（現状存在せず
;==================================================
;@M_KOJO_MESSAGE_COM_K4_318
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K4_318_1
;RETURN RESULT

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

;ENDIF
;RETURN 1
;==================================================
;330,掀裙子
;TFLAG:193(-5=拒絶（ビンタ） -3=拒絶（つねり） -1=いやがる 0=いやがる（嬉しげ） 1=受け入れ)
;TFLAG:193=1&&ABL:露出癖(5以上=人目のある場所で、自ら裙子をまくり上げる 4以下=人目のある場所でめくられるさいに弱い抵抗 3以上=人目のない場所で自ら裙子をまくり上げる 3未満=弱い抵抗)
;TFLAG:400(1=约会先or地底の路人が反応する)
;从后面将ピラリ、ではなく、前からペラって感じ（そうじゃなかったら、めくり上げようとするのを止めて即座にビンタとか無理、めくり上げられた後にしかならないしその状況ならビンタ食らうより普通に弾幕で一発ＫＯにならないほうがおかしい
;==================================================
@M_KOJO_MESSAGE_COM_K4_330
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
		IF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 「只是看着就可以了吗…？」
				PRINTFORMW 魅魔色气地摩擦着内腿
			ELSEIF RAND:4 == 0
				PRINTFORML 从后面出其不意地卷起魅魔的裙子
				PRINTFORMW 「呀！？　等下，%CALLNAME:MASTER%！」
			ELSEIF RAND:3 == 0
				PRINTFORML 「你看，你看……%UNICODE(0x2665)%　这里还是肉身哦…%UNICODE(0x2665)%」
				PRINTFORMW 大腿上面是肌肤的颜色，穿着很玲珑的胖次
			ELSEIF RAND:2 == 0
				PRINTFORML 「太，太害羞了已经可以了吧…？」
				PRINTFORMW 魅魔想用双手把胖次遮起来
			ELSE
				PRINTFORML 「喂，等下…%UNICODE(0x2665)%」
				PRINTFORMW 卷起裙子凝视着魅魔的内衣
			ENDIF
		ELSEIF TALENT:思慕
			IF RAND:5 == 0
				PRINTFORML 想看灵体部分，却被魅魔制止了
				PRINTFORMW 「对不起，我还不打算给你看。」
			ELSEIF RAND:4 == 0
				PRINTFORML 「等下，想看我的内衣也不用这样吧？」
				PRINTFORMW 魅魔露出了八字眉表示抗议
			ELSEIF RAND:3 == 0
				PRINTFORML 「哎呀，你这个恶作剧小鬼」
				PRINTFORMW 魅魔迅速地拉下被卷起的裙子
			ELSEIF RAND:2 == 0
				PRINTFORML 为了确认里面的情况，向裙子伸出了手，但是被魅魔遮住了
				PRINTFORMW 「想知道下半身是怎样的吗？不好意思，我不给你看」
			ELSE
				PRINTFORML 「你打算干什么？！」
				PRINTFORMW 魅魔慌忙用手捂住了裙子
			ENDIF
		ELSE
			IF RAND:5 == 0
				PRINTFORML 「哈啊…」
				PRINTFORMW 魅魔深深地叹了一口气，甩開了%CALLNAME:MASTER%的手
			ELSEIF RAND:4 == 0
				PRINTFORML 「你很幸运啊。如果我的心情不好的话，早就把你的手指折断了。」
				PRINTFORMW 魅魔放開了打算掀起裙子的%CALLNAME:MASTER%的手指
			ELSEIF RAND:3 == 0
				PRINTFORML 「真肮脏……」
				PRINTFORMW 魅魔冷蔑的看了一眼
			ELSEIF RAND:2 == 0
				PRINTFORML 想看裙子里面,不过，被魅魔遮住了
				PRINTFORMW 「想看的话就在地上爬吧」
			ELSE
				PRINTFORML 「别给我瞎闹了！」
				PRINTFORMW 魅魔的额头上浮起了青筋……
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_セクハラコマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_ハードなコマンド.ERB


code:
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K4
;このままだと地の文が表示されません
;地の文を表示したい方は、下記のコメントアウトを削除して下さい
;CALL MARK_MESSAGE
;苦痛刻印
IF TFLAG:22 == 1
	PRINTFORMW
ELSEIF TFLAG:22 == 2
	PRINTFORMW
ELSEIF TFLAG:22 == 3
	PRINTFORMW
ENDIF

;時姦刻印
IF TFLAG:時姦刻印取得 == 1
	PRINTFORMW
ELSEIF TFLAG:時姦刻印取得 == 2
	PRINTFORMW
ELSEIF TFLAG:時姦刻印取得 == 3
	PRINTFORMW
ENDIF

;快楽刻印
IF TFLAG:23 == 1
	PRINTFORMW
ELSEIF TFLAG:23 == 2
	PRINTFORMW
ELSEIF TFLAG:23 == 3
	PRINTFORMW
ENDIF

;不埒刻印
;快楽による刻印
;LV1
IF TFLAG:24 == 11
	PRINTFORMW
;LV2
ELSEIF TFLAG:24 == 12
	PRINTFORMW
;LV3
ELSEIF TFLAG:24 == 13
	PRINTFORMW
;屈服、恭順による刻印
;LV1
ELSEIF TFLAG:24 == 31
	PRINTFORMW
;LV2
ELSEIF TFLAG:24 == 32
	PRINTFORMW
;LV3
ELSEIF TFLAG:24 == 33
	PRINTFORMW
ENDIF

;反発刻印
IF TFLAG:21 == 1
	PRINTFORMW
ELSEIF TFLAG:21 == 2
	PRINTFORMW
ELSEIF TFLAG:21 == 3
	PRINTFORMW
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_刻印取得.ERB


path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_加虐系コマンド.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;奉仕系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;80,手淫
;==================================================
@M_KOJO_MESSAGE_COM_K4_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_80_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:恋慕
			PRINTFORMW 「哇……变硬了呢…」
			PRINTFORMW 魅魔胆怯地抓住了%CALLNAME:MASTER%的阴茎
			PRINTFORMW 「用手来对付这家伙，让它变舒服就可以了吧？」
			PRINTFORMW %CALLNAME:MASTER%点了点头，魅魔露出了干脆的笑容
			PRINTFORMW 「哟西……♪交给魅魔大人吧♪」
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 在恶灵的侍奉下，子种一点点从龟头渗了出来
				PRINTFORML 「哦呀%UNICODE(0x2665)%　呼呼呼…%UNICODE(0x2665)%」
				PRINTFORMW 魅魔将食指按在龟头上，在子种到处乱飞前抑制了下来
			ELSEIF RAND:4 == 0
				PRINTFORML 「很舒服吧…%UNICODE(0x2665)%」
				PRINTFORML 魅魔用手指做环状上下套弄着阴茎
				PRINTFORMW 巧妙的手淫%CALLNAME:MASTER%抚摸着阴囊
			ELSEIF RAND:3 == 0
				PRINTFORML 「咕啾咕啾咕啾…♪」
				PRINTFORML 五根手指在龟头上揉搓着
				PRINTFORMW 令人痒痒的快感使得%CALLNAME:MASTER%挺起了腰
			ELSEIF RAND:2 == 0
				PRINTFORML 阴囊在魅魔的手掌上舞动着
				PRINTFORML 「这里也要好好疼爱一下呢…%UNICODE(0x2665)%」
				PRINTFORMW 魅魔一边抚摸着阴茎一边揉捏着阴囊取悦着%CALLNAME:MASTER%
			ELSE
				PRINTFORML 「这里怎样呢？」
				PRINTFORML 魅魔握住下半部分上下摩擦着阴茎
				PRINTFORMW 「哦，反应不错呢%UNICODE(0x2665)%」
			ENDIF
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;81,口交
;==================================================
@M_KOJO_MESSAGE_COM_K4_81
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_81_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_81_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:恋慕
			PRINTFORMW %CALLNAME:MASTER%向魅魔拜托了用嘴来做
			PRINTFORMW 「嘴巴？用嘴舔%CALLNAME:MASTER%的那个吗？」
			PRINTFORMW %CALLNAME:MASTER%胆怯的点了点头，魅魔露出了微笑
			PRINTFORMW 「真拿你没办法呢…因为是你才做的哦」
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 「ちろ…ちろ…」
				PRINTFORML 魅魔闭上眼睛一边用舌尖舔着龟头
				PRINTFORMW 灵巧地动着舌头,爱抚着龟头
			ELSEIF RAND:4 == 0
				PRINTFORML 「嗯唔…啾…啾噜ー…」
				PRINTFORML 魅魔含住阴茎并用舌头舔舐着龟头
				PRINTFORMW 「啾噜ー…啾啪……pero…pero…」
			ELSEIF RAND:3 == 0
				PRINTFORML 里面也被魅魔细心地舔着
				PRINTFORML 「pero…啾噜…呼呼%UNICODE(0x2665)%　真可爱呐…%UNICODE(0x2665)%」
				PRINTFORMW 每次被舌头舔过的时候，阴茎都会立刻弹跳起来
			ELSEIF RAND:2 == 0
				PRINTFORML 「这边也要…哈姆…」
				PRINTFORML 魅魔把悬在竿根上的袋子含在嘴里
				PRINTFORMW 满口唾液的舌头在咂着阴囊
			ELSE
				PRINTFORML 「啾噜…啾噜…啾噜…」
				PRINTFORML 魅魔叼着阴茎，前后动着脸
				PRINTFORMW 时不时闭上嘴玩弄着%CALLNAME:MASTER%
			ENDIF
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;82,乳交
;==================================================
@M_KOJO_MESSAGE_COM_K4_82
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_82_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_82_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:恋慕
			PRINTFORMW %CALLNAME:MASTER%把自己的阴茎贴在了魅魔的胸前
			PRINTFORMW 「想被胸部夹着…？」
			PRINTFORMW 魅魔用湿润的眼睛盯着%CALLNAME:MASTER%
			PRINTFORMW 「你啊，平时就看着我的胸部想着那种事吗？…」
			PRINTFORMW 轻轻地叹了口气之后，魅魔握着阴茎导向自己的山谷
			PRINTFORMW 「……要对大家保密哟？」
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 魅魔无言地继续着乳交
				PRINTFORML 从两侧加力，交替揉搓，用各种各样的方法取悦着阴茎。
				PRINTFORMW 被柔软的巨乳紧紧压迫的触感使得%CALLNAME:MASTER%的腰自然地挺了起来
			ELSEIF RAND:4 == 0
				PRINTFORML 魅魔抓住了阴茎用乳头摩擦着龟头
				PRINTFORML 「像这样不停的转来转去，也不坏吧…？」
				PRINTFORMW 被乳头刺激的%CALLNAME:MASTER%从龟头中慢慢渗出了种汁
			ELSEIF RAND:3 == 0
				PRINTFORML 「啊，又见面了呢♪」
				PRINTFORML 每次魅魔降下乳房的时候，龟头就从山谷里探出了头
				PRINTFORMW 埋藏在乳房中反复出现的阴茎渐渐变硬了。
			ELSEIF RAND:2 == 0
				PRINTFORML 魅魔用两团乳肉上下摇动揉搓着可爱的阴茎
				PRINTFORML 被夹在两个柔肉中的阴茎使得全身发软
				PRINTFORMW 「很舒服吧…%UNICODE(0x2665)%　你都開始颤抖起来了呢」
			ELSE
				PRINTFORML 魅魔上下活动着乳房侍奉阴茎
				PRINTFORML 「真的是，很变态呢…」
				PRINTFORMW 满不在乎地苦笑着，继续用胸摩擦着阴茎。
			ENDIF
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;83,素股
;==================================================
@M_KOJO_MESSAGE_COM_K4_83
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_83_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_83_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:恋慕
			PRINTFORMW 把勃起的阴茎贴在了魅魔的秘裂上
			PRINTFORMW 「啊，等下…如果要插入的话，要先告诉我哦………」
			PRINTFORMW 「诶？不插只在外面磨蹭吗？」
			PRINTFORMW 魅魔因为%CALLNAME:MASTER%的提案扶着额头付诸了行动
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML %CALLNAME:MASTER%的亀頭磨蹭着秘裂
				PRINTFORML 「啊！%UNICODE(0x2665)%　嗯阿%UNICODE(0x2665)%　%CALLNAME:MASTER%%UNICODE(0x2665)%」
				PRINTFORMW 魅魔似乎感受到了不错的快感
			ELSEIF RAND:4 == 0
				PRINTFORML %CALLNAME:MASTER%与魅魔一起扭动腰部互相摩擦着性器
				PRINTFORML 触电般的快感穿过大腿遍布全身
				PRINTFORMW 「嗯唔…%UNICODE(0x2665)%　哈啊…%UNICODE(0x2665)%　哦…%UNICODE(0x2665)%」
			ELSEIF RAND:3 == 0
				PRINTFORML 「哈…啾…%UNICODE(0x2665)%　唔嗯…%UNICODE(0x2665)%」
				PRINTFORML %CALLNAME:MASTER%和魅魔一边素股一边深吻
				PRINTFORMW 两人的胯间变得更加湿润了
			ELSEIF RAND:2 == 0
				PRINTFORML 滑溜溜的棍子在两腿之间来来回回
				PRINTFORML 「嗯唔…%UNICODE(0x2665)%　啊，那里%UNICODE(0x2665)%」
				PRINTFORMW 从互相的性器中流出了快乐之液
			ELSE
				PRINTFORML 「啊呜%UNICODE(0x2665)%　唔%UNICODE(0x2665)%　恩姆…%UNICODE(0x2665)%」
				PRINTFORML 魅魔漏出了被爱抚秘裂般的娇喘
				PRINTFORMW %CALLNAME:MASTER%用阴茎反复擦拭着被爱液淋湿的秘部
			ENDIF
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;84,泡泡浴
;==================================================
@M_KOJO_MESSAGE_COM_K4_84
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_84_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_84_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:恋慕
			PRINTFORMW 「泡沫弄成这样就可以了吧……」
			PRINTFORMW 魅魔在全身涂抹了肥皂的泡沫之后，压在了在塑料垫子仰面朝天的%CALLNAME:MASTER%身上
			PRINTFORMW 「会给你洗得干干净净的，要老实一点哦？」
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 魅魔用沾着泡沫的手，套弄着阴茎
				PRINTFORML 「这里也得好好洗呢…」
				PRINTFORMW 一只手揉搓洗着阴囊，手指在竿子的各个角落蠕动。
			ELSEIF RAND:4 == 0
				PRINTFORML 魅魔用被泡沫包裹的乳房夹住了阴茎
				PRINTFORML 「滑溜溜的呢」
				PRINTFORMW 魅魔抬起胸部在山谷间擦洗着阴茎
			ELSEIF RAND:3 == 0
				PRINTFORML 「好勒……要来咯」
				PRINTFORML 魅魔的胸部从%CALLNAME:MASTER%的身体滑到了阴茎
				PRINTFORMW 「嗯？要再来一次？」
			ELSEIF RAND:2 == 0
				PRINTFORML 魅魔把阴茎夹在大腿之间
				PRINTFORML 「就这样…」
				PRINTFORMW 魅魔的下半身上下移动，弄得阴茎满是泡沫。
			ELSE
				PRINTFORML 「嗨哟……嗨哟……」
				PRINTFORML 魅魔的身体前后摇晃，腹部摩擦着阴茎
				PRINTFORMW 沾满泡沫的湿润皮肤触感刺激着%CALLNAME:MASTER%的阴茎
			ENDIF
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;85,足交
;==================================================
@M_KOJO_MESSAGE_COM_K4_85
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_85_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_85_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:恋慕
			PRINTFORMW 「哈？用脚？」
			PRINTFORMW 魅魔对于%CALLNAME:MASTER%的请求产生了诧异
			PRINTFORMW 「你真的希望我用脚来踩你吗？？」
			PRINTFORMW %CALLNAME:MASTER%点了点头，魅魔露出了困惑的表情
			PRINTFORMW 「嘛，既然已经说到这个份上，我就帮帮你吧……」
			PRINTFORMW 魅魔向下半身送出力量，长出了一对漂亮的脚
		ELSE
		ENDIF
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
			IF RAND:5 == 0
				PRINTFORML 「%CALLNAME:MASTER%真是个变态先生呢%UNICODE(0x2665)%」
				PRINTFORML 魅魔一边俯视着%CALLNAME:MASTER%一边微笑着
				PRINTFORMW 「这样的事，即使嘴巴被撕開也不能对大家说哦…%UNICODE(0x2665)%」
			ELSEIF RAND:4 == 0
				PRINTFORML 魅魔巧妙的控制力度踩踏阴茎
				PRINTFORML 稍微一拿開脚掌，阴茎反抗似的高高跳了起来。
				PRINTFORMW 「哎呀%UNICODE(0x2665)%　别这么急躁，真是的%UNICODE(0x2665)%」
			ELSEIF RAND:3 == 0
				PRINTFORML 魅魔的脚指在阴茎上面慢慢蠕动着
				PRINTFORML 「库呼呼、%CALLNAME:MASTER%很喜欢这里呢%UNICODE(0x2665)%」
				PRINTFORMW 不争气的种汁慢慢的从龟头里渗了出来
			ELSEIF RAND:2 == 0
				PRINTFORML 阴茎被魅魔的脚掌压迫着
				PRINTFORML 棒子一抖动,魅魔就露出嗜虐的笑容
				PRINTFORMW 「真讨厌呐…♪　一被踩到就这么兴奋…♪」
			ELSE
				PRINTFORML 「不疼吗？？」
				PRINTFORML 魅魔一边看着%CALLNAME:MASTER%的脸色一边踩着阴茎
				PRINTFORMW 因为恰好的刺激，%CALLNAME:MASTER%的阴茎喜悦地颤抖了起来
			ENDIF
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;88,真空口交
;==================================================
@M_KOJO_MESSAGE_COM_K4_88
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K4_88_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K4_88_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

path: ERB/口上・メッセージ関連/個人口上/【4】魅魔/M_KOJO_K4_奉仕系コマンド.ERB