code:
;-------------------------------------------------
; eraTheWorld 4.763用 露娜切露德口上ショタ你対応 ver0.962（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

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

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;CFLAG:6:1001　兒童でない場合でも一部口上を表示させるフラグです。
;CFLAG:6:1002　日記用フラグです。日記記入時の你の居場所を保管したりします。
;
;******************************************************************************

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

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

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K6
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;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_K6
SETCOLOR C_CREAM
;ここでSETCOLORすることで口上に色を付けられます
;例：SETCOLOR 0xf7c9ff
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K6
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等の角色変数を使用場合、角色番号の指定が必要になります
IF TALENT:MASTER:年齢 > -1 || !TALENT:MASTER:幼児／幼児退行
;你が兒童でない場合に表示
	SETCOLOR C_CREAM
	PRINTFORML 露娜切露德口上有一部分只有当你是个孩子的情况下才会显示。（素质里的[幼児／幼児退行]）
	PRINTFORML 因为你并不是儿童，所以请自行选择下面的选项。
	$LOOP
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORML [0] 同意并继续使用。（口上部分显示）
	PRINTFORML [1] 催眠露娜、在她眼中你是个正太。（口上全部显示）
	INPUT
	SELECTCASE RESULT
		CASE 0
			;PRINTFORMW 我が刀法がお前が如き妖物に通ずるか興味。
			PRINTFORMW 只显示了设定上不会引起矛盾的口上。
		CASE 1
			CFLAG:6:1001 = 1
			;PRINTFORMW 你は肥後の出成为了。
			PRINTFORMW 虽然你并不是个小孩子、但是口上依旧全部显示了（要记得代入正太哦）。
		CASEELSE
			GOTO LOOP
	ENDSELECT
	RESETCOLOR
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K6
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
#DIM LCOUNT

IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
	IF CFLAG:MASTER:初期位置  == 35
		SETCOLOR C_CREAM
		RESETCOLOR
		PRINTFORM %CALLNAME:MASTER%小心翼翼踏入的地方前方、有和自己同样身高的少女
		IF CFLAG:6:現在位置 == CFLAG:5:現在位置 || CFLAG:6:現在位置 == CFLAG:7:現在位置
			PRINTFORML 们？正在讨论着。
		ELSE
			PRINTFORML 正在思考着。
		ENDIF
		PRINTFORML 但是%CALLNAME:MASTER%不知道该不该上前搭话。
		PRINTFORMW 背对着%CALLNAME:MASTER%的少女背上、长着一眼可知不同于人类的薄薄的翅膀。
		PRINTFORML
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORMW 「那个人类小孩是什么人啊…。唔ー嗯、这样的话必须要去问问本人了呢」
		PRINTFORML
		IF CFLAG:6:現在位置 == CFLAG:7:現在位置
			SETCOLOR C_AQUA
			PRINTFORMW 「那么就按谁提议谁先做的法则。本人似乎朝这边来了露娜问问看吧」
			PRINTFORML
			SETCOLOR C_CREAM
			PRINTFORMW 「…唉？」
		ENDIF
		IF CFLAG:6:現在位置 == CFLAG:5:現在位置
			PRINTFORML
			SETCOLOR 255,230,250
			PRINTFORMW 「如果是人間之里的孩子的话别说是退治灵梦桑会直接把我们消灭的哇！」
			PRINTFORML
		ENDIF
		PRINTFORML
		SIF CFLAG:6:現在位置 == CFLAG:5:現在位置 || CFLAG:6:現在位置 == CFLAG:7:現在位置
			PRINTFORML 是注意到了在那里的%CALLNAME:MASTER%吗、少女惊讶地回头看着在思考着要怎么办的%CALLNAME:MASTER%。
		SETCOLOR C_CREAM
		PRINTFORMW 「……啊、你醒来了呀」
		RESETCOLOR
		PRINTFORML
		PRINTFORMW 「「………」」
		PRINTFORML
		RESETCOLOR
		PRINTFORMW 尴尬的沉默…。最先打破沉默的是卷起亚麻色金发的、小嘴如同栗子一样的少女。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORML 「唔ー嗯。毕竟捡到你的也是我、真是没办法啊」
		PRINTFORMW 「我是露娜切尔德。算是将你带到这里的罪魁祸首吧………等、不要逃掉呀！」
		PRINTFORML
		RESETCOLOR
		PRINTFORMW ……%CALLNAME:MASTER%试图从声称诱拐了自己的犯人手中逃走时、少女慌忙地抱住了%CALLNAME:MASTER%的手臂。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORML 「等下！这不是诱拐什么的事情呀」
		PRINTFORMW 「等…哇啊！」
		PRINTFORML
		IF CFLAG:6:現在位置 == CFLAG:7:現在位置 || CFLAG:6:現在位置 == CFLAG:5:現在位置
			SETCOLOR C_AQUA
			PRINTFORMW 「啊啦啊啦、露娜可真积极呢」
			PRINTFORML
			SETCOLOR C_CREAM
		ENDIF
		RESETCOLOR
		PRINTFORMW %CALLNAME:MASTER%因用力过猛顺着势头被摔倒的少女推倒了。西洋人偶一般可爱地脸蛋在了眼前、%CALLNAME:MASTER%的心脏扑通扑通地跳个不停。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORMW 「好痛痛…都说了真的不是诱拐呀！桑尼发现了倒在家门口的你、我们是在照顾你哟！」
		PRINTFORML
		RESETCOLOR
		PRINTFORML 压在%CALLNAME:MASTER%上面紧紧抱住的少女努力申辩着。%CALLNAME:MASTER%被她散发出的女孩子的香味迷住了不由得点了点头。
		PRINTFORMW
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORML 「太、太好了…。那么有先要确认的事情…」
		PRINTFORMW 「你是…人間之里的人类吗？」
		PRINTFORML
		RESETCOLOR
		PRINTFORMW %CALLNAME:MASTER%摇头后、少女露出了打心底里安心的表情站了起来按着自己的胸口。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORMW 「啊啊太好啦ー。……那么、你是从哪里来的呢？」
		PRINTFORML
		RESETCOLOR
		PRINTFORML 看着可爱的歪着头的她的红瞳、%CALLNAME:MASTER%告诉她自己忘记了。
		PRINTFORMW 听到了回答的红眼的少女皱起了眉。虽然感到无法形容的不安、%CALLNAME:MASTER%决定等待着她的话语。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORMW 「那就是说……」
		IF CFLAG:6:現在位置 == CFLAG:5:現在位置
			PRINTFORML
			SETCOLOR 255,230,250
			PRINTFORMW 「这个人类的小孩是外来人吗？」
			PRINTFORML
		ENDIF
		IF CFLAG:6:現在位置 == CFLAG:7:現在位置
			SETCOLOR C_AQUA
			PRINTFORML 「……………」
			PRINTFORMW 「耳朵过来下露娜、桑尼ー」
			PRINTFORML
			SETCOLOR C_CREAM
			PRINTFORMW 「等下斯塔ー怎么了啊这么突然」
			PRINTFORML
			PRINTFORMW …私语私语私语。
			PRINTFORML
		ENDIF
		SETCOLOR C_CREAM
		PRINTFORML 「………」
		PRINTFORML 「…唔ー嗯」
		PRINTFORML 「呐、你没有地方的话就在这里住下如何？」
		PRINTFORMW 「幻想乡里有很多恐怖的食人妖怪。小孩的你的话马上就能把你吃掉的妖怪可是不一般地多呢」
		PRINTFORML
		RESETCOLOR
		PRINTFORMW 听到妖怪这个词的%CALLNAME:MASTER%一瞬间就因为恐怖而颤抖着。都没有注意到少女轻微地笑声。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORMW 「这当然不仅是善意。你要代替我们去人类的村庄打工、也要帮忙进行扫家务活哟」
		PRINTFORML
		RESETCOLOR
		PRINTFORMW %CALLNAME:MASTER%即答般拼命地点着头、少女松了口气安心地抚摸着胸口。
		PRINTFORML
		SETCOLOR C_CREAM
		PRINTFORML 「呼呜太好啦。从现在開始请多指教。…说起来你的名字是什么？………%CALLNAME:MASTER%啊。」
		PRINTFORMW 「我是露娜切尔德。妖精哟」
		PRINTFORML
		IF CFLAG:6:現在位置 == CFLAG:5:現在位置
			SETCOLOR 255,230,250
			SIF CFLAG:5:面識 != 0
				PRINTFORML 「那么就再听一次我的自我介绍吧！」
			PRINTFORMW 「我是桑尼米尔克！同样也是妖精哇！」
			PRINTFORML
		ENDIF
		IF CFLAG:6:現在位置 == CFLAG:7:現在位置
			SETCOLOR C_AQUA
			SIF CFLAG:7:面識 != 0
				PRINTFORML 「虽说已经见面了但我一个人不做自我介绍也不太好呢」
			PRINTFORMW 「我是斯塔萨菲雅。同样也是妖精哟」
		ENDIF
		SETCOLOR C_CREAM
		PRINTFORML
		PRINTFORML 「房间的话%CALLNAME:MASTER%是在地下室醒来的就住在那里吧」
		PRINTFORMW 「那么就赶紧的…」
		IF CFLAG:6:現在位置 == CFLAG:5:現在位置
			PRINTFORML
			SETCOLOR 255,230,250
			PRINTFORMW 「去森林里取回魔法西瓜吧！」
		ENDIF
		IF CFLAG:6:現在位置 == CFLAG:7:現在位置
			SETCOLOR C_AQUA
		PRINTFORMW 「能来尝尝这个刚踩到的紅天狗茸的味道吗？」
		PRINTFORML
		ENDIF
		SETCOLOR C_CREAM
		SIF CFLAG:6:現在位置 == CFLAG:5:現在位置 || CFLAG:6:現在位置 == CFLAG:7:現在位置
			PRINTFORML 「人类的小孩很脆弱这么做的话马上就会死掉的吧…」
		PRINTFORML 「交给那两人的话不管有几条命都不够用呢…。我也稍微来帮帮你哇」
		PRINTFORMW 「快点我们走吧」
		PRINTFORML
		RESETCOLOR
		PRINTFORMW 露娜切尔德握住了%CALLNAME:MASTER%的手带去了地下室。
		PRINTFORMW %CALLNAME:MASTER%对未来的生活充满对未知的不安和期望跟在了她的后面。
	ELSE
		PRINTFORML
		PRINTFORML
		PRINTFORML ―
		PRINTFORML ―――
		PRINTFORML ―――――
		PRINTFORML %CALLNAME:MASTER%突然停下了脚步。周围没有一点声音静得令人毛骨悚然。
		PRINTFORML 被月夜和死一般的寂静包围着的%CALLNAME:MASTER%。因为对未知的恐惧拼命地跑到附近的阴影里去了。
		PRINTFORML ―――！？――――「Kya！」咚
		PRINTFORML
		PRINTFORMW 「好痛痛痛痛…突然就跑进这里什么的…」
		PRINTFORML
		PRINTFORML
		PRINTFORML 是潜伏在阴影之中吗、感觉撞到了某人的%CALLNAME:MASTER%看到的是、屁股着地摔倒按着头的少女。
		PRINTFORML 身穿白色连衣裙有着亚麻色金发的她、人偶般眼眸的眼角边含着泪水似乎在忍耐着疼痛。
		PRINTFORML 突然注意到了已经能够听到声音也听到了周围的声音。
		PRINTFORML %CALLNAME:MASTER%思考着她是不是寂静的原因、暂且决定伸出手来帮她站起来。
		PRINTFORML
		PRINTFORML
		PRINTFORML 「唉…谢、谢谢你」
		PRINTFORML
		PRINTFORML
		PRINTFORMW 虽然脸上的表情十分困惑、少女沉默着在%CALLNAME:MASTER%的帮助下站了起来。
		PRINTFORML
		PRINTFORML
		PRINTFORML 「………你可真奇怪啊」
		PRINTFORML 「明明是试图对你做恶作剧的人、而且还帮助了妖精什么的」
		PRINTFORML
		PRINTFORML
		PRINTFORML %CALLNAME:MASTER%露出了惊讶的表情、被女孩子道谢而害羞了起来。
		PRINTFORML 看到这幅姿态的少女也露出了惊讶的表情拭去了衣服上的污渍。
		PRINTFORML
		PRINTFORML
		PRINTFORML 「并不是在夸奖你啊…嘛算啦。我是露娜切尔德。你是？……%CALLNAME:MASTER%呢」
		PRINTFORML 「下次见面的时候我不会做恶作剧了。如果你还记得我的话」
		PRINTFORML 「那么就再见呢」
		PRINTFORML
		PRINTFORML
		PRINTFORML 露娜切尔德转过身去往回走不知道去哪里了。
		PRINTFORMW 如果再见面就好了哪…之类的、%CALLNAME:MASTER%这么想着目送着她离去
	ENDIF
	PRINTFORML
	PRINTFORML 要将露娜切尔德变换为适合口上的能力吗？
	PRINTFORML （一部分能力変動)

	$LOOP

	PRINTFORML
	PRINTFORML
	PRINTFORML [0] 好的
	PRINTFORML [1] 不行
	PRINTFORML [2] 看看会变动的能力值

	INPUT
	SELECTCASE RESULT
		CASE 0
			ABL:6:料理技能 = 3
			ABL:6:奉仕精神 = 3
			ABL:6:教養 = 1
			EXP:6:料理経験 = 200
			EXP:6:学習経験 = 5
			PRINTFORML 料理技能变成C了。
			PRINTFORML 奉仕精神变成D了。
			PRINTFORMW 教養变成D了。
		CASE 1
			PRINTFORMW 露娜的能力没有进行变更。
		CASE 2
			PRINTFORML
			PRINTFORML  料理技能： E → 料理技能： C
			PRINTFORML  奉仕精神： G → 奉仕精神： D
			PRINTFORMW      教養： E →     教養： D
			GOTO LOOP
		CASEELSE
			IF LCOUNT >5
				PRINTFORMW 都说了没有进行设定了啊！
			GOTO LOOP
			ELSE
				PRINTFORMW 没有进行设定。
				LCOUNT ++
			GOTO LOOP
			ENDIF
	ENDSELECT
ENDIF

RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K6_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;接吻を中止したい場合は以下を開放
		;TCVAR:中止接吻 = 1
		PRINTFORML 「今天也很開心呢。也给桑尼和斯塔买了特产」
		PRINTFORML 「和%CALLNAME:MASTER%一起碰到的都是好事呢。摔倒的时候也被帮助了…」
		PRINTFORML 「因为没有碰到太多倒霉事、所以比起平时真的十分開心哟」
		PRINTFORML 「…必须要给点回礼呢。…！」
		PRINTFORMW 「%CALLNAME:MASTER%啊、那个…k、kiss什么的有做过吗？」
		IF TALENT:MASTER:無接吻経験
			PRINTFORML 「那、那么现在就正好呢」
		ELSE
			PRINTFORML 「有、有过啊。和外表不同已经是大人了…」
		ENDIF
		PRINTFORML 「被kiss的话男孩子会很欢喜对吧？所以说…嗯」
		PRINTFORML 露娜把手贴在%CALLNAME:MASTER%的脸颊上、小嘴亲吻着。
		PRINTFORML 「怎、怎样？没有奇怪的味道吧？」
		PRINTFORML 「……尝起来是团子的味道？…这是因为回来前吃了团子吗？」
		PRINTFORML 「～～～～要是有好好漱口就好了…。这不是白费了吗…」
		PRINTFORMW 在安慰着露娜的同时、%CALLNAME:MASTER%们踏上了归途。
	ENDIF
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K6_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;告白内容
		;この告白内容表示後に接受かどうかの選択分が表示されます
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 0
			PRINTFORML 「……呐%CALLNAME:MASTER%」
			PRINTFORML 「%CALLNAME:MASTER%啊、有正在交往的女孩子吗？」
			PRINTFORML 「这样、没有啊。…那、那么」
			PRINTFORML 「我的话、怎样？…等下、这不是開玩笑啊！」
			PRINTFORML 「…这是真的啊」
			PRINTFORML 「我经常摔倒而且很迟钝、你是知道的吧？」
			PRINTFORML 「但是你一直会来帮助我、会牵着我的手」
			PRINTFORML 「今天也只有我们两人去玩耍了、这已经不是约会了」
			PRINTFORML 「这样子不喜欢上的话反而更奇怪啊」
			PRINTFORML 「…虽然不知道你是怎么想的、至少我是喜欢%CALLNAME:MASTER%的」
			PRINTFORMW 「……%CALLNAME:MASTER%は、你是怎么想的呢？」
		ENDIF
		;-------------------------------------------------
		;告白オッケー（恋人が付く）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			PRINTFORML 「（嚯）那么就决定了呢。我们从现在起就是恋人了」
			PRINTFORML 「那么赶紧、来」
			PRINTFORML 「你在ー发什么呆啊？如果是恋人的话、牵着手回去很普通的对吧。我们走吧」
			PRINTFORML 「牵着手的话不是和以往一样吗？没有这种事哇」
			PRINTFORMW 「我、比以往任何时候都要快乐呢」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;告白失敗
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			PRINTFORML 「…是这样啊」
			PRINTFORML 「……抱歉、我先回去了」
			PRINTFORML 「………请不要跟过来！拜托你了！」
			PRINTFORMW 「现在看到%CALLNAME:MASTER%的脸、绝对会…哭出来的呜……嘤」
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K6_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
		IF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「…不在多玩一会儿吗？」
					PRINTFORML 露娜略显遗憾地抓住了%CALLNAME:MASTER%衣服的袖子。
					PRINTFORML 「约会这么快就结束什么的…实在太可惜了啊」
					PRINTFORML %CALLNAME:MASTER%约好了下次也要约会之后、露娜啪的一下抬起了头。
					PRINTFORML 「是、是呢。没玩够的份在下次的约会尽情地玩耍补上就好了呢」
					PRINTFORMW 「约定、请不要忘掉了呢%CALLNAME:MASTER%」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「呼唉、今天也玩得很開心啊。只有两人一起玩也很開心呢」
					PRINTFORMW 「今天的事情要对桑尼和斯塔保密哟？…不然的话她们会很吵的」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「今天看了幻想乡的各种景色呢。有学到什么对吧？」
					PRINTFORML 「还想要去的话我会跟着你的啦。虽然仅限有空的时候」
					PRINTFORMW 「那么、我们回去吧」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「这之前的事就当作%CALLNAME:MASTER%一时迷茫就让它随着水流过去吧」
		PRINTFORML 「但是呢、%CALLNAME:MASTER%所做的事情是不能被原谅的、要好好的反省啊」
		PRINTFORMW 靠近%CALLNAME:MASTER%鼻尖的露娜的眼瞳、已经不像之前那样含着怒气了。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 返回途中、和%CALLNAME:MASTER%保持着距离走路的露娜瞪着%CALLNAME:MASTER%看。
		PRINTFORML 「…明明对我做了过分的事情、为什么能这么坦然地邀请我约会呢？」
		PRINTFORML 「你可能是想道歉但我不打算原谅你呢」
		PRINTFORMW （但是、这样被邀请的我怎么看还是对他依恋着的呢…）
		;PRINTFORML ―――啪唧！
		;PRINTFORML 干脆的声音在谁也没有的道路上回想着。
		;PRINTFORML 「很痛？肯定呢、毕竟是认真的打的」
		;PRINTFORML 「但是%CALLNAME:MASTER%对我做的事情可比这更过分哟」
		;PRINTFORML 「他人对自己的身体随意上下其手谁都会讨厌的啊」
		;PRINTFORML 「这种事我绝对不会原谅！…虽然是这么想着的」
		;PRINTFORML 「…如果%CALLNAME:MASTER%能变得像今天一样温柔的话、也不是不能原谅你啊」
		;PRINTFORML 「要好好努力啊。…那么明天再见」
		;PRINTFORMW %CALLNAME:MASTER%把脸颊上残留的疼痛深深地刻在心里、目送着回去的露娜。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 说是监视比较好的杀气腾腾的约会结束了。
		PRINTFORML 结果%CALLNAME:MASTER%在约会中完全没看到露娜的笑容。
		PRINTFORML 「…那好吧」
		PRINTFORMW 只是最后告别的一句话和看这边的表情、那是不带怒气的柔软的感觉。
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K6_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;MASTERが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORMW
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML
						PRINTFORMW
					CASE 0
						PRINTFORML 露娜偷偷地看着%CALLNAME:MASTER%。
						PRINTFORMW （啊啊啊啊…这样的不是很奇怪吗！）
					CASEELSE
						PRINTFORML 露娜注意到%CALLNAME:MASTER%后她兴冲冲地立即拿出手镜開始整理头发。
						PRINTFORMW
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「呐%CALLNAME:MASTER%。读了早上的新闻吗？」
						PRINTFORMW
					CASE 0
						PRINTFORML 露娜注意到%CALLNAME:MASTER%后合上了书靠了过来。
						PRINTFORMW 「一起来读书如何？」
					CASEELSE
						PRINTFORML 「啊、这不是%CALLNAME:MASTER%嘛」
						PRINTFORMW 「是来邀请我去玩的吗？」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 露娜似乎正在读书。
						PRINTFORMW 「………」
					CASE 0
						PRINTFORML 「嗯？有什么事吗？」
						PRINTFORMW
					CASEELSE
						PRINTFORML 露娜是消除了声音吗并没有注意到%CALLNAME:MASTER%。
						PRINTFORMW 「………哇！什么时候来的呀？」
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが入ってきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
		;露娜的房間で遭遇
			IF CFLAG:6:現在位置 == P33露娜私室
				IF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋人
					SELECTCASE RAND:3
						CASE 1
							PRINTFORMW 「没在我的房间里做奇怪的事情对吧？」
							PRINTFORML
							PRINTFORML
							PRINTFORML
							PRINTFORML
							PRINTFORMW 「……不做吗？」
						CASE 0
							PRINTFORML 「我的房间里有什么在意的东西吗？」
							PRINTFORMW 「…虽然可以借你看一下、但是不要弄坏了呢？」
						CASEELSE
							PRINTFORML 比起上次来的时候露娜房间里的私物似乎增加了。
							PRINTFORML 「怎样、很棒对吧？」
							PRINTFORMW 「把更多更多月亮的东西收集起来把这里变成地上的月亮哟」
					ENDSELECT
				ELSEIF TALENT:恋慕
					SELECTCASE RAND:3
						CASE 1
							PRINTFORML 「如果准备好茶什么的就好了哇…」
						CASE 0
							PRINTFORML 「难、难道收……」
							PRINTFORMW 「我、我的…心理准备还没…！」
						CASEELSE
							PRINTFORML 「%CALLNAME:MASTER%！？」
							PRINTFORMW 「不、不要看！没有打扫过就被看着什么的…」
					ENDSELECT
				ELSEIF TALENT:思慕
					SELECTCASE RAND:3
						CASE 1
							PRINTFORML 「难道说是来邀请我一起去玩的吗？」
							PRINTFORMW
						CASE 0
							PRINTFORML 「还以为你不在原来在这里呢」
							PRINTFORMW 「在我的房间里就很快能冷静下来吗？」
						CASEELSE
							PRINTFORML 「…你是问房间里放着的东西是从哪里来的吗？」
							PRINTFORML 「十六夜职时的满盈着力量的满月会稍微有点月缺」
							PRINTFORML 「然后那残缺的碎就会片降落在地上哟」
							PRINTFORMW 「所以说十六夜之时很容易就能找到从月上掉下来的东西呢」
					ENDSELECT
				ELSE
					SELECTCASE RAND:4
						CASE 2
							PRINTFORML 「是在找谁吗？」
							PRINTFORML 「这样的话问问斯塔就好了哇。…但是」
							PRINTFORMW 「不要指望斯塔能免费帮你比较好哟」
						CASE 1
							PRINTFORML 「啊咧、什么时候进来的呀？」
							PRINTFORML 「想要触摸房间里的道具？不行不行」
							PRINTFORMW 「好不容易收集来的东西被当成玩具对待可受不了呢」
						CASE 0
							PRINTFORML 「明明屋主不在却随便的进去会被讨厌的哟」
							PRINTFORMW 「也有可能会被赶出去所以要注意呢」
						CASEELSE
							PRINTFORML 「是来寻问什么的吗？」
							PRINTFORMW
					ENDSELECT
				ENDIF
			ENDIF
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 露娜注意到%CALLNAME:MASTER%的时候耳朵涨得通红羞得低下了头。
						PRINTFORMW
					CASE 0
						PRINTFORML 「哟、今天也是好天气呢…！」
						SIF TIME:5 >= 3
							PRINTFORML %CALLNAME:MASTER%边看外面不妙的天气边暧昧地回应着。
						PRINTFORMW
					CASEELSE
						PRINTFORML 「啊…！唉多、那个…Kya」
						PRINTFORMW 露娜红着脸在迷惑的时候摔倒了。
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「你看到桑尼和斯塔了吗？」
						SIF CFLAG:MASTER:現在位置 == CFLAG:7:現在位置 || CFLAG:MASTER:現在位置 == CFLAG:5:現在位置
						PRINTFORMW 	「啊、你们在一起啊」
					CASE 0
						PRINTFORML 「%CALLNAME:MASTER%似乎已经习惯了这里呢」
						PRINTFORMW
					CASEELSE
						PRINTFORMW 「在这在这呢。很闲的话要来聊聊天吗？」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「啊、这不是%CALLNAME:MASTER%嘛」
						PRINTFORMW
					CASE 0
						PRINTFORMW 「不知道有没有什么有趣的东西掉落在这附近呢」
						PRINTFORML
					CASEELSE
						PRINTFORML 「唔ー嗯这里也没有吗…」
						PRINTFORMW
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて一緒に入る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		;自分用メモ…MASTERと性別が同じ、時止め中、害羞が０かつ親密が５以上のどれかなら一緒に入る？
		IF LOCAL:1 && ARG == 3
			IF FLAG:時間停止
				RETURN 1
			ELSEIF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「%CALLNAME:MASTER%！？」
						PRINTFORMW 「把、前面遮一下啊前面！」
					CASE 0
						PRINTFORML 「…不可以死盯着这里看啊！」
						PRINTFORMW 「并不会在意？我可是会在意的啊！」
					CASEELSE
						PRINTFORML 「Kya…！%CALLNAME:MASTER%在的话就告诉我哟！」
						PRINTFORML 「呜ー…想要穿外套服从头開始啊…」
						PRINTFORMW 「这、这样的话我也要一起进去了呢！」
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「哈啊ー…今天也弄得脏兮兮的…。想要快点洗净身体啊…」
						PRINTFORMW 「啊、%CALLNAME:MASTER%也可以啊。能不能帮我洗身体呢？」
					CASE 0
						PRINTFORML 「你从刚才開始就在看什么啊」
						PRINTFORMW 「真是的……明明这样的幼儿体型完全不会有令人的要素…」
					CASEELSE
						PRINTFORML 「～♪」
						PRINTFORMW 露娜撇了一眼%CALLNAME:MASTER%没有特别在意就開始洗自己的身体。
				ENDSELECT

			ELSE
				SELECTCASE RAND:4
					CASE 2
						PRINTFORML 「进来也可以的但是在浴室不要滑跤…Kya！？」
						PRINTFORMW 露娜因为掉在地上的肥皂狠狠地摔了一跤。
					CASE 1
						PRINTFORML 「啊咧%CALLNAME:MASTER%、刚刚才进来的吗」
						PRINTFORMW 「嘛也行哇。即使是擅自进来的也不要在意」
					CASE 0
						PRINTFORML 「%CALLNAME:MASTER%－如果不好好的浸泡肩膀的话会感冒的哇」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「这之后就要失礼了哇」
						PRINTFORMW 「……先说一下不要有奇怪的情緒呢」
				ENDSELECT
			ENDIF
				PRINTFORML 「\@ TALENT:恋慕 ? ……(偷看） # 说起来… \@」
				PRINTFORML 露娜在往这里\@ TALENT:恋慕 ? 偷偷地 #悄悄地 \@看着……。
				SELECTCASE TALENT:MASTER:形状
					CASE 1 TO 2
					;未成熟か粗チン
						PRINTFORMW (好小…）
					CASE 3
					;普通
						PRINTFORMW (好大…）
					CASE Is >= 4
					;巨根、異形チンコ等
						PRINTFORMW 「噫…！」
					CASEELSE
					;ない
						PRINTFORMW （本来就没有长吗…）
				ENDSELECT
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて出て行った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		;自分用メモ…態度が３より下、接吻か诶嘿嘿止まり、恋慕か炮友ではない、なら発生？
		IF LOCAL:1 && ARG == 4
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					CASE 0
						PRINTFORML 「我倒是可以接受在一起洗啦…」
						PRINTFORMW 「好了好了、%CALLNAME:MASTER%也到了很纤细的年龄了呢。我会在外面等着的哇」
					CASEELSE
						PRINTFORML 「如果不快点出去的话…内裤或许就要被藏起来了哟？」
						PRINTFORMW 露娜哧哧地笑着离開了浴室。
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「出去的话要告诉我一声哟ー」
						PRINTFORMW
					CASE 0
						PRINTFORML 「我想要一个人悠闲地泡澡之后再进来哇」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「什么啊。%CALLNAME:MASTER%已经在里面了啊」
						PRINTFORMW 「我之后也要进来要好好弄干净呢」
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;TARGETが風呂に入ってきて追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		;自分用メモ…態度が３以上、接吻か诶嘿嘿止まり、恋慕か炮友ではない、から把柄を握られてたら発生？
		IF LOCAL:1 && ARG == 5
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORML
			ELSE
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					;CASE 0
						;PRINTFORML
						;PRINTFORMW
					CASEELSE
						PRINTFORML 「我之后就要进去了可以出去吗？」
						PRINTFORML 「你不要吗？…说出这种话真的可以吗？」
						PRINTFORMW %CALLNAME:MASTER%老实的离開了浴室。
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;外出先で遭遇した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「啊、%CALLNAME:MASTER%…」
						PRINTFORMW 「%CALLNAME:MASTER%也是来玩的吗？」
					CASE 0
						PRINTFORML 「啊……奇、奇遇呢。没想到能在这种地方见面」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「难、难道说是来找我的吗？」
						PRINTFORMW
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「哇啊啊啊啊对不起我会放弃然后回家的！…啊咧？」
						PRINTFORMW 「太好了是%CALLNAME:MASTER%啊。哈啊…安心啦」
					CASE 0
						PRINTFORML 「如果有什么事情要办的话就来叫我吧」
						PRINTFORMW
					CASEELSE
						PRINTFORML 听不到声音…。露娜说不定就在附近呢。
						PRINTFORMW （悄无声息地悄悄靠近的寂静的月之光…露娜切尔德！…呼呼呼呼）
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 听不到声音…。环顾四周时发现露娜切尔德藏在了阴影里。
						PRINTFORML 「噫…！什么嘛是%CALLNAME:MASTER%啊。真是的不要吓我啊」
						PRINTFORMW 「啊、不要跟我搭话。我现在正在藏起来呢」
					CASE 0
						PRINTFORML 「啊、%CALLNAME:MASTER%」
						PRINTFORMW 「桑尼和斯塔ー？我又不是随时随地都和那两人在一起哇」
					CASEELSE
						PRINTFORML 「啊啦、这不是%CALLNAME:MASTER%嘛」
						PRINTFORMW
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色と约会中に遭遇した
		;ARG:1に约会的对象
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORMW
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML ――――ziki。
						PRINTFORML 「…呜」
						PRINTFORMW 露娜拼命地抑制着胸口传来的疼痛。
					CASE 0
						PRINTFORML 「你在那闷骚个什么劲啊…」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「……你们在说什么呢」
						PRINTFORMW 吊着眼角的露娜忍住了升腾的愤怒…。
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「啊啦啊啦…」
						PRINTFORMW
					CASE 0
						PRINTFORML 「是要做到什么程度呢…。没什么、只是自言自语呢」
						PRINTFORMW
					CASEELSE
						PRINTFORMW 「…看起来不是挺開心的嘛？」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「呼哼%CALLNAME:MASTER%也到了这个年龄了啊」
						PRINTFORMW 「约会是可以啦但是不可以让女孩子哭泣哟？」
					CASE 0
						PRINTFORML 「和女孩子一起玩是可以、不过就算你被吃掉我也不管啊」
						PRINTFORMW
					CASEELSE
						PRINTFORML 「这里应该要、示范一下出现在妖精面前的情侣会变成什么样呢…」
						PRINTFORMW 「但是稍微有点可怜啊……嘛算啦」
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;非同棲かつ相手が先に起きてる
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			;-------------------------------------------------
			;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && !ARG:1
				IF FLAG:時間停止
				ELSEIF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「呼呜…呼呜…」
							PRINTFORML %CALLNAME:MASTER%感受着温暖的触感和轻微的呼吸声睁開了眼睛、
							PRINTFORML 看了看旁边看到露娜可爱的睡脸正在呼呼睡着。
							PRINTFORML %CALLNAME:MASTER%暂时眺望着露娜可爱地睡脸
							PRINTFORML 是感到了视线吗露娜睁開了眼睛。
							PRINTFORML 「呼……呼…嗯呜……啊咧…？」
							PRINTFORML 「%CALLNAME:MASTER%…为什么在这里…？啊…这样啊昨天……」
							PRINTFORML 睡眼惺忪的露娜自言自语着、眼看着脸颊变得越来越红。
							PRINTFORML 「不、不对…！这只是因为很困而已啦…」
							PRINTFORML 「才不是想看%CALLNAME:MASTER%的睡脸什么的…Kya！」
							PRINTFORML 在小床上倒退着的露娜轻松地从床上跳出然后摔了下来。
							PRINTFORMW %CALLNAME:MASTER%可笑着把露娜扶了起来開始了今天的活动。
					ENDSELECT
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 1
				IF FLAG:時間停止
				ELSEIF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「%CALLNAME:MASTER%－早上了哟」
							PRINTFORML 「还打算睡多久呀。再睡的话就要变成牛了哟」
							PRINTFORML 「呐起来哟ー呐啊…」
							PRINTFORML 「…如果还要睡的话就要恶作剧了哟」
							PRINTFORML 「………现在要做也没问题呢…」
							PRINTFORML 「只是稍微做一下的话……唔嗯」
							PRINTFORML 「因为都是睡着的%CALLNAME:MASTER%不好…」
							PRINTFORML 「嗯…」
							IF EXP:6:接吻経験 > 0
								EXP:接吻経験 += 1
								EXP:6:接吻経験 += 1
								PRINTFORML 数分后、%CALLNAME:MASTER%感受着嘴唇的温暖歪着头起来了。
								PRINTFORMW 「早上好%CALLNAME:MASTER%。好啦快点准备好我们去玩吧」
							ELSE
								PRINTFORML 数分后、%CALLNAME:MASTER%歪着头看着在房间角落里捂着通红的脸蛋的露娜从床上起来了。
								PRINTFORMW （～～～果然kiss什么的做不到呀！！）
							ENDIF
					ENDSELECT
				ELSEIF TALENT:思慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORMW 「%CALLNAME:MASTER%－已经早上了哟」
							PRINTFORMW 「……呐你啊」
							PRINTFORMW 「快ー起ー来…」
							PRINTFORMW 「赶紧起来！」
							PRINTFORML %CALLNAME:MASTER%感受着天旋地转的感觉一起从床上摔了下来终于醒了。
							PRINTFORML 「你终于起来了呢贪睡鬼。太阳早就升起了了哟」
							PRINTFORMW %CALLNAME:MASTER%的一天在失望的露娜俯视下開始了。

					ENDSELECT
				ELSE
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
						CASEELSE
							PRINTFORML 「等下%CALLNAME:MASTER%你要睡到什么时候啊」
							SIF CFLAG:MASTER:初期位置  == 35
								PRINTFORML 「不早点起来的话就把%CALLNAME:MASTER%的那份早餐吃掉了哟」
							PRINTFORMW %CALLNAME:MASTER%被露娜催促着慢慢的起来了。
					ENDSELECT
				ENDIF
				RETURN 1
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲かつ相手が起きている
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 多亏了早起%CALLNAME:MASTER%迎来了心情舒畅的一天的開端。
					PRINTFORML 「什么叫早起啊。已经到了这个时间哟」
					PRINTFORML 露娜停下来拿着新闻的手、给了刚起来的%CALLNAME:MASTER%一杯咖啡。
					PRINTFORML 「早上好%CALLNAME:MASTER%。放入了以往一样量的砂糖了呢」
					PRINTFORMW 「发着呆的话一天一转眼就要过去了呢」
			ENDSELECT
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲かつ相手が寝ている
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			PRINTFORML 「库唔…库唔…」
			PRINTFORML %CALLNAME:MASTER%从梦中醒来后
			PRINTFORML 睡在旁边的露娜好像还在梦的世界里散步。
			PRINTFORML …带着可爱睡脸的露娜的脸颊看起来十分的柔软。
			PRINTFORML
			PRINTFORML 「呼呜……呼呜…」戳戳「呼纽…」
			PRINTFORML 「呼呜…呼呜…」戳戳「呼呜…」
			PRINTFORML 觉得再做下去就太可怜的%CALLNAME:MASTER%静静地从床上爬出来開始做着今天的准备。
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERが起きていて、相手が起きてきた
		;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			;-------------------------------------------------
			;非同棲
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && !ARG:1
				PRINTFORML 「呼哇啊…」
				PRINTFORML 「嗯ー…早上好%CALLNAME:MASTER%、…啊咧？」
				PRINTFORML 「难道说ー你一直都是醒着的吗？」
				PRINTFORML 「…不可能会这样的呢。那么、我也要開始准备了」
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;同棲中
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 1
				PRINTFORML 「啊呼…」
				PRINTFORML 「已经早上了…？早上好…」
				PRINTFORML 「我是不是熬夜过度了呀。还很困…」
				PRINTFORML 「…%CALLNAME:MASTER%、能稍微过来下吗？」
				PRINTFORML 「唔嗯、坐在那里…呼呜…」
				PRINTFORML 露娜把身体靠在了正坐在床上的%CALLNAME:MASTER%身上。
				PRINTFORML 「%CALLNAME:MASTER%在附近的话…很能安心呢」
				PRINTFORMW 「再稍微保持一会儿这样…」

				RETURN 1
			ENDIF
			PRINTFORMW
			RETURN 1
		ENDIF
		;其他
		PRINTFORML
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「呐…明天也能见面的对吧」
					PRINTFORMW 「…只是有点不安而已哟。晚安%CALLNAME:MASTER%」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「天已经黑了差不多该去睡觉了呢」
					PRINTFORMW 「需要在梦里思考明天的安排呢。晚安%CALLNAME:MASTER%」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「那么、差不多该回家了吧」
					PRINTFORMW 「%CALLNAME:MASTER%如果不早点睡的话会被妖怪袭击的呢」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「不用担心我…」
					PRINTFORMW 「%CALLNAME:MASTER%也想睡的话先睡没关系哟…」
				CASEELSE
					PRINTFORML 露娜为了不睡着拼命地睁大着眼睛咬紧牙关。
					PRINTFORMW 「想和你在一起…、还不想要睡哟…」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「有愉快的事情时就感觉睡觉实在是太浪费了呢」
					PRINTFORMW 「但是…眼皮好沉落下来了…没办法阻止呢…」
				CASE 0
					PRINTFORML 露娜合上了正在读着的书、伸了个大大的懒腰。
					PRINTFORMW 「今夜就读到这里、剩下的就留到明天享受吧」
				CASEELSE
					PRINTFORML 「哈呼唔…哈欠漏出来了」
					PRINTFORMW 「%CALLNAME:MASTER%还不困吗？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 露娜闭着眼睛发着呆。
					PRINTFORMW 「……或许已经…想去睡觉了呢」
				CASEELSE
					PRINTFORML 「…也许今天已经玩够了呢。呼哇啊…」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「呼ー…呼ー………」
					PRINTFORMW
				CASE 0
					PRINTFORML 露娜是做了美梦吗微笑着睡着了」
					PRINTFORMW 「…呼呼」
				CASEELSE
					PRINTFORML 「呼唔呼唔…」
					PRINTFORMW 「………%CALLNAME:MASTER%」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「唔ー嗯……唔ー嗯……」
					PRINTFORMW 「腹部要被桑尼压坏了ー…」
				CASE 0
					PRINTFORML 「嘶呀嘶呀」
					PRINTFORMW
				CASEELSE
					PRINTFORML 是无意识发动了能力了吗、房间里听不到任何声音…。
					PRINTFORMW 「―――――――――」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「嘶呀……」
					PRINTFORMW
				CASE 0
					PRINTFORML 「唔ー嗯…」
				CASEELSE
					PRINTFORML 「姆喵…」
					PRINTFORMW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 1
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%扶住了踉跄着的露娜。
					PRINTFORMW 「啊…谢谢你%CALLNAME:MASTER%。抱歉、我先去休息一下…」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「唔ー嗯抱歉呢%CALLNAME:MASTER%。我似乎已经到极限了…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 摇摇晃晃的露娜当场摊倒在地上。
					PRINTFORMW
				CASE 0
					PRINTFORML 「已经到极限了…」
					PRINTFORML 「要是带着草莓之类能吃的东西就好了…」
					PRINTFORMW
				CASEELSE
					PRINTFORMW 「是玩得太累了吗…」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF FLAG:時間停止
		ELSEIF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「擅自的努力然后擅自的倒下…」
					PRINTFORMW 「也要设身处地为担心你的人着想啊…抽泣」
				CASEELSE
					PRINTFORML 「啊咧、难道说刚才那个是…chance？」
					PRINTFORML 「……咕噜」
					PRINTFORMW 「果、果然还是算了吧…」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「啊ー真是的我会照顾你的啦」
					PRINTFORMW 露娜一边嘟囔着一边把%CALLNAME:MASTER%运回了私室。
				CASE 0
					PRINTFORML 「现在别说话了。不要不考虑后果胡来啊」
					PRINTFORMW 「好啦肩膀借我下。会把你运回去的啦」
				CASEELSE
					PRINTFORML 「这种时候就很羡慕大妖精的瞬间移动能力呢」
					PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORMW 「为什么我要做这种事情…」
					SIF CFLAG:MASTER:初期位置  == 35
						PRINTFORML 「但是毕竟是同居所以没办法啊…」
				CASE 0
					PRINTFORML 「啧啧…%CALLNAME:MASTER%还是挺重的呢…」
					PRINTFORMW 「这样的话要求一袋咖啡作为报酬也许并不划算啊」
				CASEELSE
					PRINTFORML 「一般来说这样被搬着的应该是我来着…？」
					PRINTFORMW

			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			IF CFLAG:318 == 1
				PRINTFORMW
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					CASE 0
						PRINTFORML 「还以为不在呢原来在这里啊」
						PRINTFORMW 「明明好不容易找到你了…。今天没能好好玩的份你要明天陪着我来补偿呢」
					CASEELSE
						PRINTFORML 「呼哇啊…啊、在等着我吗？」
						PRINTFORMW 「但是已经到极限了…明天再说吧…呼呜…」
				ENDSELECT
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF CFLAG:318 == 1
				PRINTFORMW
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					CASE 0
						PRINTFORML 「%CALLNAME:MASTER%还想醒着待一会儿吗？」
						PRINTFORMW 「…在半夜起来的坏孩子、会被妖怪绑走的哟ー…什么的」
					CASEELSE
						PRINTFORML 「今天的夜间散步结束了…那么」
						PRINTFORMW 「我已经困了要玩的话就等明天吧。那么就晚安了」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 1
						PRINTFORML 「呜哇吓我一跳。什么时候在的啊？」
						PRINTFORMW 「因为要睡了你能出去吗？」
					;CASE 0
						;PRINTFORML
						;PRINTFORMW
					CASEELSE
						PRINTFORML 「那么今天就去睡吧…。晚安啦」
						PRINTFORMW 露娜把%CALLNAME:MASTER%赶到外面去就直接钻进床里了。
				ENDSELECT
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF CFLAG:318 == 1
				PRINTFORML
			ELSE
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					CASE 0
						PRINTFORML 「很、很奇怪哟%CALLNAME:MASTER%你们！」
						PRINTFORMW 「在别人的房间里做那、那种事情…。不要再做了啊！」
					CASEELSE
						PRINTFORML 「在、在在在干什么呀笨蛋！」
						PRINTFORML 露娜怒吼着把%CALLNAME:MASTER%们从房间里赶出去了。
						PRINTFORMW 「呜呜…我的房间被…」
				ENDSELECT
			ENDIF
		RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		IF FLAG:時間停止
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 露娜不停地偷瞄着这边。
					PRINTFORMW
				CASEELSE
					PRINTFORML 「poー…」
					PRINTFORMW 露娜托着脸颊心不在焉得眺望着上空。
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「报纸上登刊在哪里了啊…」
					PRINTFORMW 「还是说登载那边了呢？」
				CASEELSE
					PRINTFORML 露娜喝着刚煮的咖啡喘了一口气。
					PRINTFORMW 「唔ー嗯真棒的香味啊…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「逃到这里的话就没问题了吧」
					PRINTFORMW 「先稍微休息一会儿…」
				CASE 0
					PRINTFORML 露娜读着书似乎正在休息着。
					PRINTFORMW
				CASEELSE
					PRINTFORML 「又被丢下不管了…」
					PRINTFORMW 「在这里稍微休息下然后回家吧…」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
			IF FLAG:時間停止
			ELSEIF TALENT:恋慕
				PRINTFORML 「啊…哎ー哆…今天也是好天…」
				PRINTFORML （在搭话之前就走掉了…）
			ELSE
				PRINTFORML 「要注意不要摔倒哟ー」
			ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
			IF FLAG:時間停止
			ELSEIF TALENT:恋慕 || TALENT:思慕
				PRINTFORML 「那么急是有什么事吗…？」
			ELSE
				PRINTFORML 「看起来非常忙碌呢」
			ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K6_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきた角色（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	IF CFLAG:318 == 1
		PRINTFORML
	ELSEIF TALENT:恋慕
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			CASE 0
				PRINTFORML 「等…有谁来了！？」
				PRINTFORML 「啊、抱歉」
				PRINTFORMW %CALLNAME:MASTER%被露娜的突进击飞了拉開了距离。
			CASEELSE
				PRINTFORML 「果然不行呀在这里做什么的…」悄悄地
				PRINTFORMW
		ENDSELECT
	ELSEIF TALENT:思慕
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 「…咳嗯。咳呜咳呜、咳呜咳呜！！」
				PRINTFORMW 露娜故意的咳嗽着装作什么也没有发生的样子…。
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			;CASE 1
				;PRINTFORML
				;PRINTFORMW
			;CASE 0
				;PRINTFORML
				;PRINTFORMW
			CASEELSE
				PRINTFORML 露娜整理好仪容匆匆地离開了%CALLNAME:MASTER%身边。
				PRINTFORMW 「…没暴露吧？」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORML 「……快离開啊」
					PRINTFORMW 「快点从%CALLNAME:MASTER%身边离開啊！！」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「在、在做什么呀%CALLNAME:MASTER%！？」
					PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「在做什么呀%CALLNAME:MASTER%你们？」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「…唉？……唉？」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORMW 「谁更加喜欢%CALLNAME:MASTER%…。这可是胜负哟！」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「我、我的话这种程度也能…！」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%在的话…我也加入进去没问题的吧？」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML
				CASEELSE
					PRINTFORML 「讨厌讨厌…%CALLNAME:MASTER%什么的讨厌！」
					PRINTFORML 露娜擦着被泪水弄脏的脸从现场逃走了…。
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML
				CASEELSE
					PRINTFORML 「那个…、请去没人的地方去做呢」
					PRINTFORMW %CALLNAME:MASTER%羞答答地移開了视线匆匆地离開了。
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML
				CASE 0
					PRINTFORML
				CASEELSE
					PRINTFORML 「我、我知道了哟。不会对任何人说的哟…」
					PRINTFORMW 在%CALLNAME:MASTER%的气魄的威压下露娜转身回到了来的路上。
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORML 露娜把羞红的脸藏在了%CALLNAME:MASTER%的胸前。
					PRINTFORMW （快、快点离開啦…）
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「要、要怎么办啊这个…」hisohiso
					PRINTFORMW 「装作在相扑吗？不可能的吧…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML 「被…被看到了！、%CALLNAME:MASTER%快点离開啦！」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「啊…不对那个是…」
					PRINTFORMW 「妖、妖精的舞蹈中哟！」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「呐、那个啊…%CALLNAME:MASTER%可是我的啊」
					PRINTFORMW 「现在就要说清楚…！」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「你好像和那个女孩关系很好」
					PRINTFORMW 「不会是特意把她叫来的吧…？」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORMW 「唉、等下%CALLNAME:MASTER%认真的吗…？」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「啊啊啊啊………」
					PRINTFORMW 「被看见了啊…」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORMW 「这就是为什么我讨厌在这里做啊…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORMW 「没、没问题吗？如果传言传出去的话…」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める（現在無し
;==================================================
@M_KOJO_EVENT_K6_8(ARG,ARG:1)
RETURN 1

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

IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		;MASTERと同フロアで胖次を没収した
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「啊呜」kokei！
			PRINTFORML %CALLNAME:MASTER%被绊倒的露娜抓住衣服一同摔倒在地上。
			PRINTFORML 「好痛痛痛…抱歉%CALLNAME:MASTER%。…等、这是什么？」
			PRINTFORML 很不幸藏在怀里的内裤飞了出来、暴露在了试图起身的露娜面前。
			PRINTFORML 「呐%CALLNAME:MASTER%这个啊…」
			PRINTFORML 「…嘿是手帕啊。哇ー真是奇特的手帕呢……才不可能是这样吧」
			PRINTFORML 「这个就交给我保管吧。等、你在抓着哪里啊！要撕裂了要撕裂了！」
			PRINTFORMW %CALLNAME:MASTER%的战利品被露娜全部没收了…。

			RETURN 1
		;MASTERが移動してる際に胖次を没収した
		ELSEIF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「……%CALLNAME:MASTER%。稍微等下」
			PRINTFORML 露娜带着并非平时那般的严肃表情站在打算若无其事地通过的%CALLNAME:MASTER%面前。
			PRINTFORML 「你在藏着什么吧？……什么也没有藏？」
			PRINTFORML 「你在说谎哟。因为经常近距离观察着说谎的人所以我知道的。呐你到底在藏着什么？」
			PRINTFORML 露娜把手伸进打算逃跑的%CALLNAME:MASTER%的怀里、拿出了隐藏着的东西。
			PRINTFORML 「……等、这个是」
			PRINTFORML 被扣押了证据物的%CALLNAME:MASTER%只能被露娜以吃惊和蔑视的眼神俯视着。
			PRINTFORML 「呜哇…糟透了ー」
			PRINTFORML 「孩子们啊、为什么会喜欢这样幼稚的恶作剧呢…」
			PRINTFORMW %CALLNAME:MASTER%被露娜不停地唠叨直到她厌烦为止。
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				IF FIRSTTIME("推倒",0)
					PRINTFORML 露娜扑在被推倒的%CALLNAME:MASTER%的上面、眼泪汪汪地抱住了%CALLNAME:MASTER%。
					PRINTFORML 「啊啊啊……明明不想做这样的事情的…」
					PRINTFORML 「但是我不知道要怎么办才好呀…」
					PRINTFORML 露娜完全不理解自身对性的欲求、只是凭着本能磨蹭着%CALLNAME:MASTER%的全身试图消解自身的性欲。
					PRINTFORML 「想要紧紧的抱紧%CALLNAME:MASTER%。但是这样还完全不够哟…」
					PRINTFORML 然而这样的动作反而激起了情欲、露娜的下腹部很难受得颤抖着。
					PRINTFORML 「更多更多…在我身体的深处…想要%CALLNAME:MASTER%来触摸着呀…！」
					PRINTFORMW
				ELSE
					PRINTFORML 「抱歉%CALLNAME:MASTER%。我可能又要忍不住了…」
					PRINTFORML 拉着%CALLNAME:MASTER%的手的露娜小脸红透了、痛苦地吐着炽热的气息。
					PRINTFORML 「不痛了就会停下来了、所以只有今天……拜托了」
					PRINTFORML 露娜的指尖触碰着%CALLNAME:MASTER%的胸前。
					PRINTFORML 「%CALLNAME:MASTER%来…疼爱我吧…」
					PRINTFORMW 露娜那就这样缠着情欲的幼小的身体垂了下来紧贴着%CALLNAME:MASTER%。
				ENDIF
			ELSE
				PRINTFORML 「…我也知道自己这样很奇怪哟」
				PRINTFORML 「不可以做这样子的事情的。但是…」
				PRINTFORML 「抱歉。已经停不下来了」
				PRINTFORMW 露娜这么说着整个人扑到了%CALLNAME:MASTER%的上面。
			ENDIF
			IF FIRSTTIME("推倒",0)
				PRINTFORML 露娜抚摸着%CALLNAME:MASTER%的下腹部。
				PRINTFORML 尽管苦战了一会儿、露娜还是让已经进入临战状态的%CALLNAME:MASTER%的股间暴露了出来。
				PRINTFORML 「这…这就是%CALLNAME:MASTER%的欧、欧金金…」
				PRINTFORML
				SELECTCASE TALENT:MASTER:形状
					CASE 1 TO 2
					;未成熟か粗チン
						PRINTFORML 「这么小得注意不要把这个咬碎呢…」
					CASE 3
					;普通
						PRINTFORML 「这、这个要怎么办才好呢…」
					CASE 4
					;発光
						PRINTFORML 「……这个在发光吗？」
					CASE 5
					;イボつき
						PRINTFORML 「噫…！总、总觉得这个很凹凸不平呢…」
					CASE 6
					;ゴンぶと
						PRINTFORML 「噫耶……比我的手臂还要粗…」
					;馬並み
					CASE 10
						PRINTFORML 「唉、唉…？%CALLNAME:MASTER%、这么大的你是怎么把它隐藏起来的啊？」
					CASEELSE
						PRINTFORML
				ENDSELECT
				PRINTFORML
			ENDIF
		RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF FLAG:時間停止
			ELSEIF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					;CASE 0
						;PRINTFORML
						;PRINTFORMW
					CASEELSE
						PRINTFORML 「请更多的疼爱我哟…」
						PRINTFORML 「请了解我的心情哟…」
				ENDSELECT
			ELSEIF TALENT:思慕
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					;CASE 0
						;PRINTFORML
						;PRINTFORMW
					CASEELSE
						PRINTFORML 「果然还是不太好呢、这样的事…」
						PRINTFORML 「明明我要是能控制住自己就好了…这样的话不就只是顺从性欲的野兽了吗…」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					;CASE 1
						;PRINTFORML
						;PRINTFORMW
					;CASE 0
						;PRINTFORML
						;PRINTFORMW
					CASEELSE
						PRINTFORML 「…抱歉、我好像有点变得奇怪了」
						PRINTFORML 露娜沉默的把视线从%CALLNAME:MASTER%身上移開了。
				ENDSELECT
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 露娜使出了纤细的身姿无法想象的力量将%CALLNAME:MASTER%按倒了。
			PRINTFORML 「等下…再稍微做一会儿…」
			PRINTFORMW 「这样的话还满足不了、拜托了…」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML 「哈啊ー…%UNICODE(0x2665) *1%哈啊ー…%UNICODE(0x2665) *1%」
			PRINTFORML %CALLNAME:MASTER%的力量似乎推不開现在兴奋不已的露娜…。
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF FLAG:時間停止
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORML 「我、想要一个人悠闲地泡温泉呢」
					PRINTFORMW
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORML 「不好意思我就先进去了呢」
					PRINTFORMW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
		ELSEIF CFLAG:318 == 1
			PRINTFORML
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「为、为什么一副理所当然的表情进来了啊！」
					PRINTFORML 「不有句谚语吗。男女七岁不同席…席…唉ー哆……」
					PRINTFORMW 「应该是一样的意思吧…？啊咧、那么一起进来也没问题了吧？？」
				CASE 0
					PRINTFORML 「………」盯ﾞｰ
					PRINTFORML 露娜忘我地看着%CALLNAME:MASTER%的股间…。
					PRINTFORML 「哈…！不、不对、这是为了供以后研学习…等才不对…！」
					PRINTFORMW 对露娜的辩解感到奇怪惊讶的%CALLNAME:MASTER%開始清洗着身体。
				CASEELSE
					PRINTFORMW 「………只有今天可以呢、一起进去吧」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
		ELSE
			PRINTFORML 「吵死了…我想睡觉别来碍事啊」
			PRINTFORMW 露娜用怒目凝视瞪着%CALLNAME:MASTER%粗暴地关上了门。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF FLAG:時間停止
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「呼呜…呼呜…」
					PRINTFORMW
				CASE 0
					PRINTFORML 「嘶呀嘶呀」
					PRINTFORMW
				CASEELSE
					PRINTFORML 「唔ー嗯唔ー嗯…」
					PRINTFORMW 「我的蛍光灯在ー……」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF FLAG:時間停止
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
				CASEELSE
					PRINTFORML 「唉…%CALLNAME:MASTER%？」
					PRINTFORML 「难道说这是在做梦？」扭呜呜呜「不对好痛…」
					PRINTFORMW 「有、有什么事吗在这深夜里…」
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF FLAG:時間停止
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「―――库…」
					PRINTFORML 还以为声音被消除了般、露娜深深地熟睡着。
					PRINTFORMW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF FLAG:時間停止
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「就算是我睡觉的时候被吵醒也是会生气的啊！」
					PRINTFORMW
				CASE 0
					PRINTFORML 「我睡觉的时候就已经是该睡觉的时间了」
					PRINTFORMW 「如果没玩够的话就请去昼夜逆转生活的天邪鬼一起玩去」
				CASEELSE
					PRINTFORML 「我明明好不容易才睡着的…！」
					PRINTFORMW
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		IF FLAG:時間停止
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「抱歉、今天或许真的不行理了」
					PRINTFORMW 露娜一副无精打采的表情请%CALLNAME:MASTER%回去了。
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「差不多该去玩耍了啊…」
		PRINTFORMW 「%CALLNAME:MASTER%也要来吗？虽然要在桑尼的房间或妖精的大树前集合呢」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
				CASE 0
					PRINTFORML 「啊呜」zibei
					PRINTFORML %CALLNAME:MASTER%很担心的看着比起平时跌倒更多的露娜。
					PRINTFORML (平、平常心平常心…）
				CASEELSE
					PRINTFORML %CALLNAME:MASTER%之间的距离似乎越来越近了。
					PRINTFORML 「距离在不断接近吗？因、因为森林越来越小了所以看起来是这样的哟」
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 「不觉得这个毛绒布偶很可爱嘛？」
				CASE 0
					PRINTFORML 「要让这个荧光灯发光的话……」
				CASEELSE
					PRINTFORML 「希望今天不要逃得太迟就好了…」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML 露娜正在读着外界的书。
					PRINTFORML 「呼ー嗯我可是无慈悲的夜之女王呢…」
				CASE 0
					PRINTFORML 露娜被喂着吃惩罚游戏的芥菜酱料团子。
					PRINTFORML 「哈啊…为什么只有我」
					PRINTFORML 「……好－辣！！」
				CASEELSE
					PRINTFORML 露娜似乎对大家的玩耍并不怎么热衷。
					PRINTFORML 「呐、呐那个还是不要做比较好吧？」
			ENDSELECT
		ENDIF

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「我就先不玩了呢」
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		IF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「%CALLNAME:MASTER%的料理…%CALLNAME:MASTER%的料理…%CALLNAME:MASTER%的料理…」
					PRINTFORML 「吃掉的话虽然太可惜了、让别人吃的话倒不如…但是…」
					PRINTFORMW 露娜在%CALLNAME:MASTER%的料理前纠结着、最后还是吃掉了。
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「从%CALLNAME:MASTER%的手中夺走食物这种事情、对妖精的话可以说是不费吹灰之力」「朝飯前指轻而易举也对应下一句的饭后
					PRINTFORML 「…耶、已经是饭后了」
					PRINTFORMW 露娜带着骄傲的表情呸咯得舔了舔手指上的料理的余味。
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORML
				CASEELSE
					PRINTFORMW 「拿着这样的东西的话要被吃掉了哟」
					PRINTFORML
					PRINTFORML
					PRINTFORMW 「就像现在一样…」
					PRINTFORML %CALLNAME:MASTER%注意到的时候%CALLNAME:MASTER%手里的料理就已经不见了、
					PRINTFORMW 取而代之的是在料理的残骸前双手合十伫立着的露娜。
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;未実装（推倒指令に統合？
		;MASTERが推倒た（ウフフ開始時）
		;記入チェック（=0, 非表示、1, 表示）
		;LOCAL:1 = 1
		;-------------------------------------------------
		;IF LOCAL:1 && ARG == 1
			;PRINTFORML
			;RETURN 1
		;ENDIF
		;-------------------------------------------------
		;逢瀬終了（ウフフ終了時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			IF CFLAG:睡眠
			ELSEIF TALENT:恋慕
					PRINTFORML 「怎么这样、已经结束了…？」
					PRINTFORML 露娜保持着衣衫凌乱的状态寂寞地抬头看着%CALLNAME:MASTER%。
				ELSEIF TALENT:思慕
					PRINTFORML 「这种事情、就这样持续下去真的可以吗…」
					PRINTFORML 「总觉得不继续能做下去啊」
					PRINTFORML 露娜整理着内裤时困惑地歪着头。
					PRINTFORML 「我也不是特别讨厌这种事、但是这种事果然还是长大后在做比较好…」
					PRINTFORMW 「…唔嗯、如果能戒掉的话就不用这么辛苦了吧」
				ELSE
					PRINTFORML 「…满足了吗？」
					PRINTFORML 露娜离開了%CALLNAME:MASTER%旁边迅速的穿上了凌乱的衣服
					PRINTFORML 「因为把声音消除了、刚才的声音谁也听不到哟」
					PRINTFORMW 「…没问题、这件事我不会向任何人说的」

			ENDIF
			RETURN 1
		ENDIF
		;其他
		PRINTFORML
		;-------------------------------------------------
		;事後描写
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			;-------------------------------------------------
			;精液が垂れてきた
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 1
				IF FLAG:時間停止
				ELSEIF CFLAG:睡眠
				ELSEIF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋慕
						SELECTCASE RAND:3
							;CASE 1
								;PRINTFORML
								;PRINTFORMW
							;CASE 0
								;PRINTFORML
								;PRINTFORMW
							CASEELSE
								PRINTFORML 「%CALLNAME:MASTER%温暖的那个洒出来了…」
								PRINTFORML 露娜收紧下腹部、为了让%CALLNAME:MASTER%注入的精液不漏出来以内八字压着」
								PRINTFORMW 「讨厌……不要漏出来呀。留在肚子里…」

						ENDSELECT
				ELSEIF TALENT:思慕
						SELECTCASE RAND:3
							;CASE 1
								;PRINTFORML
								;PRINTFORMW
							;CASE 0
								;PRINTFORML
								;PRINTFORMW
							CASEELSE
								PRINTFORML 「呜呜…小腹里好重…」
								PRINTFORML 「%CALLNAME:MASTER%经常射出来的这个没法干透呢。好奇怪哟…」
								PRINTFORML 「这个都垂到大腿上了…稍微控制一下啊真是的…」
						ENDSELECT
				ELSE
						SELECTCASE RAND:3
							;CASE 1
								;PRINTFORML
								;PRINTFORMW
							;CASE 0
								;PRINTFORML
								;PRINTFORMW
							CASEELSE
								PRINTFORML 「呀呜！…难道说」
								PRINTFORML 「啊ー…垂下来了啊。有没有擦手纸啊…」
						ENDSELECT
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;愛液が垂れてきた
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 2
				IF FLAG:時間停止
				ELSEIF CFLAG:睡眠
				ELSEIF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「我…好像还想要被%CALLNAME:MASTER%拥抱疼爱着…」
							PRINTFORML 「明明已经结束了、这里还是这么地…%UNICODE(0x2665) *1%」
							PRINTFORMW 露娜抚摸着自己黏糊糊地濡湿的下腹部、用渴求的眼神看着%CALLNAME:MASTER%。
					ENDSELECT
				ELSEIF TALENT:思慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「%CALLNAME:MASTER%要是稍微手下留情些就好了哇」
							PRINTFORML 「被那样得责弄着你看…。全部都是%CALLNAME:MASTER%的错哟」
							PRINTFORMW 露娜在%CALLNAME:MASTER%的面前张開了双腿、展示着淅淅沥沥地垂下来透明液体的幼膣。
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「为什么会这么黏糊糊的…」
							PRINTFORML 「我自己都不知道怎么形容…」
							PRINTFORMW 露娜红着脸羞涩地看着自己膣内挤出的爱液滴下来的样子。
					ENDSELECT
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;事後の情緒
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 3
				IF FLAG:時間停止
				ELSEIF CFLAG:睡眠
				ELSEIF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 抱着%CALLNAME:MASTER%的露娜的呼吸终于平稳了下来。
							PRINTFORML 「你知道人能听到的最小的声音、还有最先听到的声音是什么吗？」
							PRINTFORML 「那就是心脏的跳动声啊。总觉得听着会很安心…」
							PRINTFORML 露娜将耳朵贴到了%CALLNAME:MASTER%的胸口。
							PRINTFORMW 听着%CALLNAME:MASTER%心跳声的露娜、%CALLNAME:MASTER%抱住了她保持了一段时间。
					ENDSELECT
				ELSEIF TALENT:思慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「%CALLNAME:MASTER%不痛吧？没问题吗？」
							PRINTFORML 露娜很担心的抚摸着%CALLNAME:MASTER%的身体。
							PRINTFORMW 「没问题那就好哇。毕竟只有一个人開心的话会很无聊呢」
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「这件事绝对要对桑尼和斯塔保密哟！」
							PRINTFORML 「否则被发现会被说什么呢…光是想想就觉得可怕哇…」
					ENDSELECT
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;服を着る
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 4
				IF FLAG:時間停止
				ELSEIF CFLAG:睡眠
				ELSEIF CFLAG:318 == 1
					PRINTFORML
				ELSEIF TALENT:恋慕
					SELECTCASE RAND:3
						CASE 1
							PRINTFORML (…要是穿着更可爱的内裤来就好了）
							PRINTFORMW
						CASE 0
							PRINTFORML 「我要不要也像那两人一样缩短裙子的长度呢…」
							PRINTFORMW 「这样的话会让%CALLNAME:MASTER%高兴吗…？」
						CASEELSE
							PRINTFORML 「%CALLNAME:MASTER%穿着我的衣服也很合适呢」
							PRINTFORML 「我们的身高也差不多…要不要穿穿看？」
							PRINTFORMW 从露娜改变的眼神里感觉到恐怖感的%CALLNAME:MASTER%郑重地拒绝了。
					ENDSELECT
				ELSEIF TALENT:思慕
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						;CASE 0
							;PRINTFORML
							;PRINTFORMW
						CASEELSE
							PRINTFORML 「都做了那样的事但是被看见穿衣服还是会害羞地呢…」
							PRINTFORMW 露娜对%CALLNAME:MASTER%露出白皙的后背開始传起了衣服。
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
						;CASE 1
							;PRINTFORML
							;PRINTFORMW
						CASE 0
							PRINTFORML 「衣服被稍微弄皱了呀…」
							PRINTFORMW
						CASEELSE
							PRINTFORML 「…难道你想连内裤以外的衣服都拿走吗？」
							PRINTFORMW 露娜警戒着%CALLNAME:MASTER%開始穿起了衣服。
					ENDSELECT
				ENDIF
				RETURN 1
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 1
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF FLAG:時間停止
		ELSEIF CFLAG:318 == 1
			PRINTFORMW
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「那个…能再稍微和我待一会儿吗？」
					PRINTFORMW 「因为不和%CALLNAME:MASTER%一起睡的话也太可惜了…」

			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				;CASE 0
					;PRINTFORML
					;PRINTFORMW
				CASEELSE
					PRINTFORML 「恩？已经结束了吗」
					PRINTFORMW 「如果再睡不着的话随时都可以再来哟」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
				;CASE 1
					;PRINTFORML
					;PRINTFORMW
				CASE 0
					PRINTFORMW 「我也是夜猫子类型的偶尔也能陪你的呢」
				CASEELSE
					PRINTFORML 「真是的唔…%CALLNAME:MASTER%的睡相太差了…」
					PRINTFORMW 露娜看着皱巴巴的床单不满地嘟起了嘴唇。
			ENDSELECT
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K6_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「呀啊…！」
		PRINTFORML 周围的声音突然消失了。露娜似乎已经发动了能力。
		PRINTFORML 发动的本人小脸染成得通红仿佛在忍受着迷之快感身体颤抖着。
		PRINTFORML 「――――」摇晃摇晃
		PRINTFORMW 按着小嘴、表示着什么也没有的露娜对你摇了摇头。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「――――嗯%UNICODE(0x2665) *1%%UNICODE(0x2665) *1%%UNICODE(0x2665) *1%」
		PRINTFORML 脚因以腹部为中心倾注而来的快感绊倒、露娜当场摔倒了
		PRINTFORML 「啊…啊…%UNICODE(0x2665) *1%啊呜…%UNICODE(0x2665) *1%」
		PRINTFORML 因为在全身扩散的甘甜刺激身体颤抖着、连站起来都做不到的少女在地上痉挛着。
		PRINTFORML 浸湿大腿的爱液、慌乱的呼吸声、体内高涨的热度。
		PRINTFORMW 在这些停止之前露娜都无法站起来暴露着自己下流的丑态。
	RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「…啊咧？」
		PRINTFORML 「总觉得有点冷来着…」ponpon
		PRINTFORML 「……！？」ponponpon
		PRINTFORML 「内、内裤没有了…！」
		PRINTFORML 「为、为什么？难道是之前摔倒的时候脱下来的吗…？」
		PRINTFORML 「这种事情可能发生吗？但是除此之外想不到任何可能性啊…」
		PRINTFORMW 「要怎么办啊…不管怎样今天无论如何都不能摔倒了…！」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
			PRINTFORML 「嗯！？咳呜咳呜！」
			PRINTFORMW 「发生…什么…咳咕！」
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			PRINTFORML 「嗯咕！？」
			PRINTFORML 露娜藏在附近的阴影处吐出嘴里黏着的白浊液。
			PRINTFORMW 「呜…咳齁…噢欸…有、有什么在我的嘴里…？？」
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORML 「嗯卟！？］
			PRINTFORML 露娜反射性地用手捂着嘴吐出了嘴里喝下的精液。
			PRINTFORML 「噫唉唉…好脏！」
			PRINTFORML 令人毛骨悚然的触感和它确实在口中的事实让露娜流着泪捂着嘴。
			PRINTFORMW 「必须快点用水洗干净啊…呜唉…」
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			PRINTFORML 「…咕噜」
			PRINTFORML 「………！？」
			PRINTFORMW 「刚、刚才好像喝下去了什么已经喝习惯的东西…？」
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			PRINTFORML 「嗯咕！？」
			PRINTFORML 「…呜！咕……噢”唉"呜」
			PRINTFORML 高粘度粘稠的精液阻碍了露娜的呼吸让她陷入缺氧状态。
			PRINTFORML 铁青着脸的露娜按着自己的脖子反复呕吐着。以将胃内全部东西都吐出的气势不断呕吐着
			PRINTFORML 「咳呜咳呜！！咳呜！！」
			PRINTFORML 「哈啊………哈啊………。太好了…。我还没有死……」
			PRINTFORMW 终于能呼吸到新鲜空气的露娜脱离了缺氧状态当场瘫倒在地上。
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			PRINTFORML 「嗯嗯！？嗯…？嗯嗯…」
			PRINTFORML 露娜因为嘴里的异变惊讶了一瞬间、在注意到那是什么后就会像玩一样在嘴里咀嚼着精液。
			PRINTFORML 乍一看是在嚼口香糖但里面其实是用舌头搅动吸取着精液、享受着雄性的味道。
			PRINTFORML 「咕噜……♪」
			PRINTFORMW 「…等一下。为什么嘴里突然有了精液啊？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
			PRINTFORML 「什！？」
			PRINTFORML 「好、好臭…！鸟粪吗？」
			PRINTFORMW 「哈啊…这种东西落下来什么的真是不走运哇…」
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			PRINTFORML
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORML 「噫…！…啊咧？」
			PRINTFORML 「这个难道说…啾…」
			PRINTFORML 「嗯咕、嗯咕、咕噜……舔…」
			PRINTFORMW
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			PRINTFORML 「噫唉唉…到底是什么时候有这个的啊…」
			PRINTFORML 露娜因手上附着的白浊液而后背颤抖着。
			PRINTFORML 贤明地取出了手帕将其擦去、依依不舍地把脏了的手帕扔掉了。
			PRINTFORMW 「那个花纹的手帕、明明是我很喜欢的啊…」
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORML 「嗯…啾…噗哈」
			PRINTFORMW 「…刚才的那个谁也没看见吧」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML ziki――ー
		PRINTFORML 「噫…」
		PRINTFORML 露娜下腹部受到了如同塞入烧铁的疼痛中当场瘫倒在地。
		PRINTFORML 「呜……啊……发生…什么…痛…」
		PRINTFORML 无法治愈的剧痛在每次露娜试图动着都会引发激痛、每次疾走的激痛都让露娜的脸扭曲着。
		PRINTFORML 「哈啊…哈啊…」
		PRINTFORML 露娜只能流着泪等待疼痛的消退。
		PRINTFORMW 就像无法治愈的剧痛在嘲笑一般、从大腿上滴下来的破瓜之血弄脏了露娜的身体。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
				PRINTFORML 「嗯呜…！？」
				PRINTFORML 「啊咧、尿尿…吗？」
				PRINTFORML 「不对…白色的黏糊糊的…呜唉唉、非常的恶心」
				PRINTFORML 「难道是某种病吗？还是说是我吃了奇怪的东西？」
				PRINTFORMW 「还在往下滴…必须得去哪里找个洗手间」
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
				PRINTFORML 「嗯呜…！？」
				PRINTFORML 「啊咧、尿尿…吗？」
				PRINTFORML 「不对…白色的黏糊糊的…呜唉唉、噫」
				PRINTFORML 「难道是某种病吗？还是说是我吃了奇怪的东西？」
				PRINTFORML 「还在往下滴…必须得去哪里找个洗手间」
				PRINTFORMW 「哈啊、心情真是不能再糟了…。为了转换心情之后去吃点那个白色的汽水吧」
		;処女膣内射精
		ELSEIF ARG:1 == 3
				PRINTFORML gopo……
				PRINTFORML 「…唉？」
				PRINTFORML 露娜因从下腹部流出的液体的触感不知所措。
				PRINTFORML 咕噗咕噗的声音从股间漏出泡沫般的白色液体正不断滴下来。
				PRINTFORML 「噫！ 这是…什么…」
				PRINTFORML 刚刚失去了处女的露娜无法忍受如此恐怖事情屏住了呼吸。
				PRINTFORML 流出的粉红色白浊液和止不住的疼痛、露娜已经再也忍不住了。
				PRINTFORML 「讨厌…」
				PRINTFORML 「已经不要了啊啊啊！！讨厌啊啊啊啊！！」
				PRINTFORMW 如同这个年龄的少女一样、露娜悲鸣哭喊着到嗓子干涸为止。
		RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K6_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
	LOCAL:1 = 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K6_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;PRINTFORML 「……我想起来了啊」
		;PRINTFORML 「有谁告诉过我。我是3人中最接近妖怪的」
		;PRINTFORML 「可能是在无意识中注意到了。我的本质可能和那两个人不同」
		;PRINTFORML 「肯定会迎来不能一起玩的时光…」
		;PRINTFORML 「这个搬家是个好机会呢。肯定」
		;PRINTFORML 「……………」
		;PRINTFORML 「……呐%CALLNAME:MASTER%」
		;PRINTFORMW 「今晚的我可能会因寂寞而哭泣、可以一起睡吗…？」
		PRINTFORML 「不知道有什么东西忘拿了呢。有好好的把咸菜和毛绒玩偶带过来了…」
		PRINTFORML 「桑尼和斯塔没问题吗…。房间说不定会被天狗风给卷进来呢…」
		PRINTFORML 「虽然斯塔说过给邻居打招呼是很重要的、礼物的话用洋式布丁没问题吧…」
		PRINTFORML 「啊啊每次思考的时候都会变得很担心…。Kya！」
		PRINTFORML %CALLNAME:MASTER%慌忙地抱起了快要摔倒的露娜、为了让她安心温柔地抱住了她。
		PRINTFORML 「…也是呢。现在有%CALLNAME:MASTER%在我的身边呢」
		PRINTFORML 「没有任何事情需要担心哇。谢谢你%CALLNAME:MASTER%」
		PRINTFORMW 「这之后也要请多指教了呢」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「妖精只能住在符合自己气质的地方、这样或许也好呢」
		PRINTFORMW 「但是、还是想和%CALLNAME:MASTER%住在一起啊…」

		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K6_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;通常帰宅
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			IF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				PRINTFORML 「呐、呐让我们一起、起…起…」
				PRINTFORMW 「青蛙叫了所以该回去了！再、再见啦%CALLNAME:MASTER%！」
			ELSEIF TALENT:思慕
				PRINTFORML 「桑尼她们不知道是不是已经回家了呢」
				PRINTFORMW 「我也要早点回去呢。那么再见了呢%CALLNAME:MASTER%」
			ELSE
				PRINTFORML 「已经是这个时间了…」
				PRINTFORMW 「明天不知道能不能找到有趣的东西呢」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;约会中帰宅
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			IF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				PRINTFORML 「下次要去哪里呢？…唉、已经到这个时间了吗？」
				PRINTFORML 「唔、唔嗯。必须要回去了呢……」
				PRINTFORML 「…呐%CALLNAME:MASTER%。今天真的玩得很開心。和桑尼和斯塔一起那种程度的開心呢」
				PRINTFORML 「所以说还会、再邀请我约会吗…？」
				PRINTFORMW 「…谢谢你。不要忘记约定呢」
			ELSEIF TALENT:思慕
				PRINTFORML 「虽然对我说夜晚才是開始、但是差不多该回去了」
				PRINTFORML 「夜里是妖怪的世界。我不想让%CALLNAME:MASTER%置于危险中呢」
				PRINTFORML 「那么、%CALLNAME:MASTER%也回去吧」
				PRINTFORMW %CALLNAME:MASTER%牵着露娜的手走在了回家的路上。
			ELSE
				PRINTFORML 「啊、差不多到了该回家的时间了呢」
				PRINTFORMW 「唔ー嗯作为转换心情还算不错吧。那么之后再见了呢」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;玄関先でお見送り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		;自分用メモ。MASTERが约会的对象的家に玩耍に来ていて、约会的对象がお見送りしてくれる。
		IF LOCAL:1 && ARG == 3
			IF CFLAG:318 == 1
				PRINTFORML
			ELSEIF TALENT:恋慕
				PRINTFORML 「果、果然回去的话还太早了吧？」
				PRINTFORML 「天还不晚一起去狩猎兔子怎样？肯定会很有趣哟！」
				PRINTFORML 「还有要不要在我们家一起吃饭？会做很多%CALLNAME:MASTER%喜欢吃的东西的！」
				PRINTFORML 「…………」
				PRINTFORML 「抱歉…说了奇怪的事情…」
				PRINTFORMW 「―――那么明天见呢…」
			ELSEIF TALENT:思慕
				PRINTFORML 「我们的家里很吵闹对吧？一直都是这种感觉哟」
				PRINTFORML 「但是%CALLNAME:MASTER%来了真的是很開心哇」
				PRINTFORML 「虽然在外面玩也很好但是像这样在家里玩也很棒呢」
				PRINTFORML 「回去的时候外面很黑要注意不要受伤呢%CALLNAME:MASTER%」
				PRINTFORMW 「那么就、晚安啦…」
			ELSE
				PRINTFORML 「回家的路上要小心别被妖怪绑走了哟」
				PRINTFORML 「尤其是被搭话时千万不要回头」
				PRINTFORML 「如果你回过头的话……咿」
				PRINTFORMW 「这样的话不就是把我吓到了吗…」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K6_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「今天也没有和%CALLNAME:MASTER%出去玩的预定、来悠闲地看新闻吧」
		PRINTFORML 「………」pasa
		PRINTFORML 「这个、很美味呢。给%CALLNAME:MASTER%做这个的话他会很開心吧」
		PRINTFORML 「………」pasa
		PRINTFORML 「幻想乡里竟然有这种地方啊。下次要不要和%CALLNAME:MASTER%一起去看看呢」
		PRINTFORML 「…等、为什么尽是在想着%CALLNAME:MASTER%的事情啊我！」
		PRINTFORML 「哈啊、先洗下脸…」
		PRINTFORML 「………」pasapasa
		PRINTFORML 「头发、变长了呢…。但是%CALLNAME:MASTER%会更喜欢长发吗…？」
		PRINTFORML 「～～～～～！！」
		PRINTFORML 「为什么每件事都会想到%CALLNAME:MASTER%啊…」
		PRINTFORML 「最近一直是这样…睡也好醒也好想的全都是%CALLNAME:MASTER%」
		PRINTFORMW 「…这样简直就像」
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW 「我陷入恋爱了一样不是嘛…」
		SETCOLOR C_AQUA
		PRINTFORML
		IF TALENT:7:恋慕
			PRINTFORMW 「那么我就是%CALLNAME:MASTER%的下半身、露娜就是%CALLNAME:MASTER%的上半身担当呢」yoko
		ELSE
			PRINTFORMW 「小心点哟露娜。月与恋一样有满也有缺哟」yoko
		ENDIF
		PRINTFORML
		SETCOLOR 255,230,250
		IF TALENT:5:恋慕
			PRINTFORMW 「我要白天的%CALLNAME:MASTER%哇！就给露娜晚上的%CALLNAME:MASTER%了！」yoyi
		ELSE
			PRINTFORMW 「因为说恋爱是盲目的所以露娜必须要注意不要再跌倒了呢！」yoyi
		ENDIF
		SETCOLOR C_CREAM
		PRINTFORML
		PRINTFORML 「等下那边的场外选手你们太吵了！」
		PRINTFORMW 「啊啊真是的呜…明天该以一副怎样的表情去见他呢…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「刚開始看到%CALLNAME:MASTER%的时候感觉他并不怎么靠谱哇」
		PRINTFORML 「但是、意外的很坚强呢、即使我跌倒了也会帮我站起来」
		PRINTFORML 「不对虽然桑尼和斯塔偶尔也会帮我站起来…」
		PRINTFORML 「并不是和那两人一般的命运共同体的感觉…没错、举个例子的话就是双胞胎的弟弟吧」
		PRINTFORML 「总觉得和他一起会感到安心呢」
		PRINTFORMW 「好像和桑尼和斯塔也很合得来。…下次要不要邀请他加入我们的探险呢」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「呐、不要在保持这种关系了吧…？」
		PRINTFORML 「已经没办法再瞒着那两个人了。而且我也这样子…嗯嗯%UNICODE(0x2665) *1%」
		PRINTFORML 「…所以说、这种关系不太好、…呀、啊%UNICODE(0x2665) *1%尽是在H…哈%UNICODE(0x2665) *1%」
		PRINTFORML （要怎么办、又顺着他这样来H了…。但是、好舒服…%UNICODE(0x2665) *1%）
		PRINTFORML （…不要沉迷其中就好了吧）
		PRINTFORMW 「呼啊啊…%UNICODE(0x2665) *1%」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K6_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;通常自慰
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			PRINTFORML 「能够让声音消失真的很便利呢」
			PRINTFORML 「…桑尼和斯塔已经听不见了呢。…嗯%UNICODE(0x2665) *1%」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同室時自慰
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;中だし精液自慰
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
			;無知消去イベントあり（表示は一度だけ
			IF LOCAL:1 >= 25
				PRINTFORML 「……灵梦桑」
				PRINTFORML 「稍微有件事想要商谈一下…」
				PRINTFORML 「我…最近、尽是做些奇怪的梦」
				PRINTFORML 「一想到那个撒尿的那个地方就会非常的难受…」
			;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
			ELSEIF LOCAL:1 >= 20
				PRINTFORML 露娜身上的\@ TALENT:恋慕 ? %CALLNAME:MASTER% # 不认识的男孩子 \@正以赤裸的姿态压在上面。
				PRINTFORML 每当他动着腰就会把露娜幼嫩的秘所拨開有什么深入进来了…。
				PRINTFORML 少女感受着下腹部感到无比的幸福感吞下了少年的那个什么。
				PRINTFORML 「……嗯%UNICODE(0x2665) *1%……嗯%UNICODE(0x2665) *1%」
				PRINTFORML 从梦中醒来的露娜、一边回忆梦中发生的事一边用手指刺激着疼痛的秘所寻求着快乐。
			ELSEIF LOCAL:1 >= 15
				PRINTFORML 那天晚上、露娜做了和\@ TALENT:恋慕 ? %CALLNAME:MASTER% # 不认识的男孩子 \@と以一丝不挂的姿态相拥着的梦。
				PRINTFORML 忘我地相互磨蹭着身体无数次地亲吻的行为、而梦中的露娜带着淫秽的表情接受着这个。
				PRINTFORML 「……嗯！？」gaba
				PRINTFORML 「什、什么呀刚才的梦…。为什么那里会那么湿嗒嗒的呀…」
			ELSEIF LOCAL:1 >= 10
				PRINTFORML 那天晚上、露娜做了和\@ TALENT:恋慕 ? %CALLNAME:MASTER% # 不认识的男孩子 \@kiss的梦。
				PRINTFORML 笨拙地接吻时、露娜闭上眼睛陶醉于交换彼此的唾液舌头舔舐纠缠着的感觉。
				PRINTFORML 「…心还在跳个不停」
				PRINTFORML 「我到底是怎样了呢…」
			ELSEIF LOCAL:1 >= 5
				PRINTFORML 那天晚上、露娜做了和\@ TALENT:恋慕 ? %CALLNAME:MASTER% # 不认识的男孩子 \@牵着手玩耍的梦。
				PRINTFORML 「…总觉得是和以往不同的梦呢」
				PRINTFORML 「但是总觉得非常有趣啊…」

			ELSE
			ENDIF
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;陥落素質あり自慰中毒高め
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 5
			;-------------------------------------------------
			;Ｃ敏感orＣ感覚10以上
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 1
				PRINTFORML
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;Ｖ敏感orＶ感覚10以上
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 2
				PRINTFORML
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;Ａ敏感orＡ感覚10以上
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 3
				PRINTFORML
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;Ｂ敏感orＢ感覚10以上
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 4
				PRINTFORML
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;部位指定無し
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 5
				PRINTFORML
				RETURN 1
			ENDIF
			;其他
			;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;自慰中毒高め
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;-------------------------------------------------
			;尻穴膣腔同時
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 1
				PRINTFORML
				RETURN 1
			ENDIF
			;-------------------------------------------------
			;膣腔のみ
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1 && ARG:1 == 2
				PRINTFORML
				RETURN 1
			ENDIF
			;其他
			;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;我慢
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;自分用メモ。露娜を連れてく状態にして風呂に入ろうとすると発生
;==================================================
@M_KOJO_EVENT_K6_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;断られた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			IF CFLAG:318 == 1
				PRINTFORMW
			ELSEIF TALENT:恋慕
				PRINTFORML 「不、不行…那样的话在和%CALLNAME:MASTER%一起进去前这里就会过热了呀…」
				PRINTFORMW 露娜是在想象着%CALLNAME:MASTER%的裸体吗脸開始慢慢的变红了。
			ELSEIF TALENT:思慕
				PRINTFORML 「我已经进去过了所以你先进去吧」
				PRINTFORMW 「想要一起进去？不要、我更喜欢一个人悠闲地泡澡」
			ELSE
				PRINTFORMW 「要洗澡的话就一个人进去啊」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;一緒に入ってくれた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			IF CFLAG:318 == 1
				PRINTFORMW
			ELSEIF TALENT:恋慕
				PRINTFORML 「和%CALLNAME:MASTER%一起洗澡…\/\/\/」
				PRINTFORML 「唔、唔嗯已经做好觉悟了所以没问题……我觉得」
				PRINTFORMW
			ELSEIF TALENT:思慕
				PRINTFORML 「想要在去哪里之前先洗身体吗？要怎么办呢…」
				PRINTFORMW 「一个人等着也有点那个我也一起进去洗个清爽吧」

			ELSE
				PRINTFORML 「%CALLNAME:MASTER%…稍微有点味道啊？有好好的每天洗澡吗？」
				PRINTFORMW 「…我要好好的检查一下哇。我也要一起进去呢」
			ENDIF
			RETURN 1
		ENDIF
		;其他
		PRINTFORML
	ENDIF
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K6_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		;-------------------------------------------------
		;小分岐
		;-------------------------------------------------
		;恋慕
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 1
			PRINTFORML 「和%CALLNAME:MASTER%的、小宝宝…！」
			PRINTFORML 「我的身体里有%CALLNAME:MASTER%的小宝宝什么的…这不是梦吧？」
			PRINTFORML 「唔唔ー…脑袋里充满開心和害羞变得像炖煮一样了哟」
			PRINTFORML 「比起那个！…%CALLNAME:MASTER%和我一起造出来小宝宝、開心吗？」
			PRINTFORML 「『虽然现在開心地想要马上拥抱你、但是担心着露娜能不能承受』？是、是这样啊谢谢你」
			PRINTFORML 「…太好了。%CALLNAME:MASTER%竟然会这么得担心在意」
			PRINTFORMW 「我们、肯定会变得幸福的呢」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;思慕
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 2
			PRINTFORML 「小孩子的小孩子…才没有在開玩笑哟」
			PRINTFORML 「没想到那种事情能怀上小宝宝什么的、要是事先好好学习就好了」
			PRINTFORML 「…唔嗯、变成这样我也已经有觉悟了哇。要生下这个孩子」
			PRINTFORML 「没问题、之前有听魔理沙桑说过哇」
			PRINTFORML 「『一根箭很容易折断但是三根在一起的话、只要用力那也是会被折断的』」
			PRINTFORML 「但是、如果再加一根箭呢？这就不可能被折断了呢」
			PRINTFORML 「这另一根箭就是%CALLNAME:MASTER%。是你哟」
			PRINTFORMW 「绝对会让你来协力的逃跑什么的决不允许呢。…爸、爸爸」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;陥落素質無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 3
			PRINTFORML
			PRINTFORML 「要怎么办啊…要怎么办啊…」
			PRINTFORMW 「这种事情根本没法和桑尼和斯塔谈啊…」
			PRINTFORML 「即使和%CALLNAME:MASTER%说了、也不会有什么变化啊」
			PRINTFORML 「这个身体会产下小宝宝什么的…」
			PRINTFORML
			PRINTFORML 「救救我呀…抽泣」
			PRINTFORMW 「呼唉…谁能…救救我呀…」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;無自覚
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG == 4
			PRINTFORML 最近、食物无法通过喉咙咽下去。
			PRINTFORML 没办法随心所欲地飞行。
			PRINTFORMW 和大家一起出去的话马上就会喘不过气来。
			PRINTFORML
			PRINTFORML 桑尼是吃了不好的蘑菇吧ー？这么说了。感觉并不是那样的。
			PRINTFORML
			PRINTFORML 琪露诺自然地就躲開了。虽然对不起她但是不想让身体着凉。
			PRINTFORML
			PRINTFORML 大妖精在担心我。那孩子一直都是这么小题大做。
			PRINTFORML
			PRINTFORMW 皮丝说我的眼睛里開始寄宿着狂气了。…我什么奇怪的地方都没有。
			PRINTFORML
			PRINTFORML
			PRINTFORMW 野外妖精们说着怀孕了？被这样嘲笑了。…明明不知道怎么造小孩也没理由做得到。
			PRINTFORML
			PRINTFORML
			PRINTFORMW …斯塔不知为何在回避着我。
			PRINTFORML
			PRINTFORMW 我不知道我为什么想要逃避。
			PRINTFORMW 我明明只是、想要消除肚子里不安的种子。
			RETURN 1
		ENDIF
		;其他
		PRINTFORML
	ENDIF
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K6_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の兒童か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「啊、笑了…」
		PRINTFORML 「呼呼、不管看多久都不会看腻呢」
		PRINTFORML 「嗯、我没问题哟。出产中因为有%CALLNAME:MASTER%陪在身边所以没问题」
		PRINTFORML 「…唔嗯。感觉还想要多睡一会儿呢」
		PRINTFORMW 「但是有%CALLNAME:MASTER%和%CALLNAME:MASTER%的小宝宝在我实在是太过幸福、睡觉实在是太浪费了啊」

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「还以为我会死呢…。今天感觉把一辈子的尖叫都给喊完了呀…」
		PRINTFORML 「但是呢…快看呀%CALLNAME:MASTER%。这孩子的脸」
		PRINTFORML 「这孩子非常的可爱。果然是%CALLNAME:MASTER%和我的孩子哇」
		PRINTFORML 「真的、平安的产下来真的是太好了…」
		PRINTFORMW 「但是我绝对不会再生孩子了呢。这样痛苦的事就到此为止吧…」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;PRINTFORML 被窗户外的月光照耀着的少女们。
		;PRINTFORML 为了不吵醒沉睡着的孩子、坐在床上的露娜消除了声音呜咽呻吟着不断地抽泣。
		;PRINTFORML 「――…呜――…呜」
		;PRINTFORML 在可以说是生命的光辉的婴儿面前、少女忍着快要喊出来的声音不断地流着眼泪。
		;PRINTFORML 对平安生下的自己的孩子的爱。
		;PRINTFORML 对为什么自己要承受这种痛苦承受这种不讲理的愤怒。
		;PRINTFORMW 对以不期望的形式生下孩子的悲伤。
		;PRINTFORML
		;PRINTFORML
		;PRINTFORML 尽情地哭泣之后、露娜怜爱地抚摸着自己的孩子。
		PRINTFORML 「…安心吧。我们会把你养育大的」
		PRINTFORML 「虽然我是个靠不住的妈妈…但是还有两只妖精在呢…没问题的」
		PRINTFORML 在帮助出产之后、躺在床上睡着了自己的两位好朋友。
		PRINTFORMW 凝视着她们的睡脸、露娜下定决心要把自己的孩子给抚养长大。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 妖精的小宝宝是怎样生下的、没想到我竟然会亲身体验到。
		PRINTFORML
		PRINTFORML 虽然又疼痛又痛苦地昏厥了好几次、无事产下来了真的是万幸呢。
		PRINTFORML
		PRINTFORML 看书调查的时候说是雄性和雌性交尾的话好像可以造出小宝宝、妖精好像不一样呢。
		PRINTFORML
		PRINTFORML 因为、我完全没和任何人交尾过啊。
		PRINTFORML
		PRINTFORML 妖精肯定是可以一人产下小孩子的哟。
		PRINTFORML
		PRINTFORML ………………
		PRINTFORML
		PRINTFORML 真的是这样吗。
		PRINTFORML
		PRINTFORML 难道说、有谁在我没有注意到的时候……。
		PRINTFORML
		PRINTFORML ………………
		PRINTFORML
		PRINTFORML 总之先停止思考吧。现在如何把这个孩子养大比什么都重要啊。
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW 「说了奇怪的话、抱歉呢%CALLNAME:MASTER%」
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K6_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		SELECTCASE ARG
			;-------------------------------------------------
			CASE 0
			;見られた瞬間
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				IF TALENT:恋慕
					PRINTFORML 「%UNICODE(0x2665) *1%嗯嗯%UNICODE(0x2665) *1%嗯%UNICODE(0x2665) *1%」
					PRINTFORML 露娜连消除声音都忘记了、为了追求着快乐手指激烈地在幼嫩的秘裂上擦动着、粘稠的爱液不断滴落着。
					PRINTFORML 是快感昂扬达到了最高潮了吗、露娜的身体一下子仰了起来的那个时候
					PRINTFORML 「%UNICODE(0x2665) *1%%UNICODE(0x2665) *1%%UNICODE(0x2665) *1%――！？！？」
					PRINTFORMW 和%CALLNAME:MASTER%的视线对上了。
				ELSEIF TALENT:思慕
					PRINTFORML 「唉…哈唉…？房、房间的钥匙…忘记锁门…了吗…？」
					PRINTFORMW 「这、这不是你想的那样的！虽然不知道你想的是怎样的、总之不是那样的！」
				ELSE
					PRINTFORML 「什、什么时候在那里的呀……？」
					PRINTFORMW 露娜颤抖着声音脸涨得通红几乎马上就要爆炸了。
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 1
			;什麼也不做
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				IF TALENT:恋慕
					PRINTFORML （不、不可以…%CALLNAME:MASTER%明明在看着我却还想继续什么的）
					PRINTFORMW （但是明明真正的%CALLNAME:MASTER%就在我的眼前…。这样的实在是太难受了啊…）
				ELSEIF TALENT:思慕
					PRINTFORML 「这、这个是那个呢。稍微有点闷闷不乐来着…」
					PRINTFORMW 「然后摩擦着那里的话就会变得舒服起来…等我在说什么呀！」
				ELSE
					PRINTFORML 「………！！！！！」
					PRINTFORMW 露娜使用了能力把周围的声音都消去了。
				ENDIF
				RETURN 1

			ENDIF
			;-------------------------------------------------
			CASE 2
			;そのまま続行
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				IF TALENT:恋慕
					PRINTFORML （%CALLNAME:MASTER%…%UNICODE(0x2665) *1%%CALLNAME:MASTER%…%UNICODE(0x2665) *1%）
					PRINTFORMW 露娜以荡漾地表情凝视着%CALLNAME:MASTER%開始专心地玩弄着自己的秘缝。
				ELSEIF TALENT:思慕
					PRINTFORML 「明明男孩子就在我的面前…。啊、这种感觉…」
					PRINTFORMW 「嗯%UNICODE(0x2665) *1%呼呜…%UNICODE(0x2665) *1%」
				ELSE
					PRINTFORML 「讨、讨厌…我的手指擅自的动了起来…啊%UNICODE(0x2665) *1%」
					PRINTFORMW 「不可以看呀…嗯嗯%UNICODE(0x2665) *1%我的那里…啊%UNICODE(0x2665) *1%不要看呀…%UNICODE(0x2665) *1%」
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 3
			;逐出
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				IF TALENT:恋慕
					PRINTFORML 「…很、很害羞的啦…求你了…」
					PRINTFORMW 看着泪目着恳求的露娜%CALLNAME:MASTER%老实的退了出去。
				ELSEIF TALENT:思慕
					PRINTFORML 「可以啦快点出去啦！即使是%CALLNAME:MASTER%我也要生气了哟！」
					PRINTFORMW 露娜用床单遮住了自己发热的身体、将%CALLNAME:MASTER%从房间里赶了出去。
				ELSE
					PRINTFORML 「今天的事情全部都忘掉！全部忘掉！」
					PRINTFORMW 露娜胡乱地扔着屋里的东西把%CALLNAME:MASTER%从房间里赶了出去。
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 4
			;やっちゃう
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				IF TALENT:恋慕
					PRINTFORML 「我虽然不知道详细是怎样的…」
					PRINTFORMW 「但是我知道%CALLNAME:MASTER%是会温柔地对待我的……我没问题哟」
				ELSEIF TALENT:思慕
					PRINTFORML 「要、要做什么呀？」
					PRINTFORML 「不是很痛的事情？那样就行了呀…」
					PRINTFORMW 露娜虽然很困惑但还是决定把自己发热的身体交给%CALLNAME:MASTER%。
				ELSE
					PRINTFORML 「唉…为什么要把门关上了呢？…嗯！？」
					PRINTFORMW 将露出呆然表情的露娜娇小的身体推倒、%CALLNAME:MASTER%强行地堵上了她的嘴唇。
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 5
			;事後
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				IF TALENT:恋慕
					PRINTFORML 「我、做地好吗？%CALLNAME:MASTER%有感觉很舒服吗？」
					PRINTFORMW 「是、是吗…？总觉得很害羞哇」
				ELSEIF TALENT:思慕
					PRINTFORML 「没想到还有这种事、我一直以来都不知道啊…%UNICODE(0x2665) *1%」
					PRINTFORMW 「%CALLNAME:MASTER%真是知识渊博啊呢…%UNICODE(0x2665) *1%」
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%个大骗子！果然还是很痛的呀！」
					PRINTFORMW 「……但是最后那一发稍微有点舒服呢」
				ENDIF
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 6
			;事後お泊り
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
		ENDSELECT
	ENDIF
ENDIF

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K6_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行 || CFLAG:6:1001 == 1
		SELECTCASE ARG
			;-------------------------------------------------
			CASE 0
			;誘い文句
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				PRINTFORML 「%CALLNAME:MASTER%今天有空吗？」
				PRINTFORML 「机会难得我想带着你到幻想乡各处去游览呢、怎样？」
				PRINTFORML 「上到月亮下到旧地狱为止…幻想乡可是非常广大的呀」
				PRINTFORMW 「在某种程度上也能知道路程呢」
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 1
			;受けた
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				PRINTFORML 「那么我们马上出发吧。小吃最多可以买300円的哟」
				PRINTFORMW
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 2
			;断った
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				PRINTFORML 「这样啊…那么就等下个机会呢」
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 3
			;部屋に誘われた
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				PRINTFORML 「%CALLNAME:MASTER%应该很熟悉外界的道具对吧？」
				PRINTFORML 「我的房间里放着很多从外界流进来的道具哟」
				PRINTFORMW 「可以的话能稍微去看一看吗？」
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 4
			;部屋に誘われたのを受けた
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				PRINTFORMW 「请多关照。那我去拿茶和咸菜了哇」
				RETURN 1
			ENDIF
			;-------------------------------------------------
			CASE 5
			;部屋に誘われたのを断った
			;記入チェック（=0, 非表示、1, 表示）
			LOCAL:1 = 1
			;-------------------------------------------------
			IF LOCAL:1
				PRINTFORML 「哈啊…真没办法只能去香霖堂的店主那里看看了吧」
				PRINTFORMW
				RETURN 1
			ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K6_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			PRINTFORML 「…不要一直盯着这边呀。很害羞的啦」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORML 「…别笑这样孩子气的打扮哟」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
				PRINTFORML 「为什么半途而废了啊…」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「要怎么样使用我的内裤呀」
					PRINTFORMW 「…是要做什么呢？」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「只、只有这次给你呢」
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 1
				;-------------------------------------------------
				IF LOCAL:1
					PRINTFORML 「谁会把内裤给你呀…」
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

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

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

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

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K6_31(ARG,ARG:1)
;口上主はTARGET
;ARGは会ってない日数
;何日以上会ってなかったら愚痴を言うとかできます
;CFLAG:オナバレで分岐入れてもよさそう
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;今日会っていない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今日会っている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K6_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K6

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K6_ONABARE_2(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K6

IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレ無崩しックスの地の文を默认のものから変更したい場合用。
;その場合は上下のSKIPSTART~SKIPENDを外してください。
;CFLAG等の角色変数を使用場合、角色番号の指定が必要になります。
;-------------------------------------------------
@M_KOJO_EVENT_K6_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K6

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

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

;-------------------------------------------------
;処女・無自覚非処女に挿入する直前の口上
;RETURN 1すると指令を中止します
;RETURN 0なら通します
;CFLAG:破瓜中止口上有がオンになってないと読み込まれないので注意
;-------------------------------------------------
@M_KOJO_EVENT_K6_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（约会帰り接吻など）を見るまで诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K6_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_通常がオンになっている場合のみ有効。
;合意付きで推倒た時、ここでRETURN -1すると推倒を強制的に中止します。
;RETURN 0なら通常街道成功させます。
;合意があっても何らかの理由で诶嘿嘿できないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K6_PERMISSION_2
;-------------------------------------------------
PRINTFORML
RETURN 0
;RETURN -1
;-------------------------------------------------

;部屋描写用関数
;口上角色のOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
@K6_ROOM_DESCRIPTION
	SELECTCASE RAND:6
		CASE 5
			PRINTFORML 有蔷薇装饰的书架里放着少女漫画
		CASE 4
			PRINTFORML 有一个黑猫雕像。额头上刻着月痕…
		CASE 3
			PRINTFORML 到处都用花边装饰着的少女心满溢的房间
		CASE 2
			PRINTFORML 放在房间里的陶俑好像直盯着这边一样…
		CASE 1
			PRINTFORML 摆放着荧光灯和牛奶瓶
		CASE 0
			PRINTFORML 装饰着一面美国国旗…
		CASEELSE
			PRINTFORML 摆放着兔子布娃娃和人形花边娃娃
	ENDSELECT
;-------------------------------------------------

path: ERB/口上・メッセージ関連/個人口上/【6】ルナチャイルド/M_KOJO_K6_イベント.erb