code:
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K158
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。

;なんか一週目と状況が違うけど気にしないでね
IF GETBIT(CFLAG:31, 0) || GETBIT(CFLAG:31, 1)
    PRINTFORML 「――啊啦、早上好」
	PRINTFORML 先代对着扎成束的青竹进行贯手练习，然后看向%CALLNAME:MASTER%说道。
	PRINTFORMW 鲜血缓缓从先代的双手上滴落、%CALLNAME:MASTER%沉默了……
	PRINTFORMW 悲伤就像决堤的洪水、怎么也止不住。
	PRINTFORMW 所以这就是%CALLNAME:MASTER%决定了倒流时间的原因。
	PRINTFORML 「……怎么了？　%CALLNAME:MASTER%？」
	PRINTFORML 见你呆愣地站着、先代这样说道。
	PRINTFORML 啊、啊啊……早上好、先代。
	PRINTFORML 「……早上好」
	PRINTFORML ……发生了什么事吗？
	PRINTFORML 「……什么事也没有啊」
	PRINTFORML ……？
	PRINTFORMW %CALLNAME:MASTER%终于控制不住自己的情感、扑进先代的怀里……
	PRINTFORML 能再看到你、真好啊。
	PRINTFORML 「什么？」
	PRINTFORMW 先代没有反抗、而是静静地看着%CALLNAME:MASTER%。
	PRINTFORML 不……没什么。
	PRINTFORML %CALLNAME:MASTER%松开了先代。
	PRINTFORML ………………。
	PRINTFORML 「……嘛、好吧。」
	PRINTFORMW %CALLNAME:MASTER%在挣扎着、是否要继续这一段注定不会善终的爱恋。
	PRINTFORMW 「那么、有何贵干呢？」
	PRINTFORMW
	PRINTFORMW （幸好我还能绷得住、这些突如其来的记忆……呜……）
	PRINTFORMW （不惜逆转时间也要来再见到我……该说你什么好呢……）
	PRINTFORMW （%CALLNAME:MASTER%啊……你不应该一直沉迷于过去的……）
	PRINTFORMW （你应该……与我一同打碎命运的枷锁……）
	CFLAG:158:信賴度 += 200
	CFLAG:158:好感度 += 650
	ABL:16:親密 += 2
ELSE
    IF MAIN_MAP == 1				;若自宅位置在神社
	PRINTL
	PRINTFORML 「嗯……你好。」
	PRINTFORMW 那个个子很高的红白巫女看向%CALLNAME:MASTER%这么说道。
	PRINTFORMW 「……外来人？那么……你好、请多关照。」
	PRINTFORMW 这么说着，看起来很平和的巫女向你伸出了手。
	PRINTFORML %CALLNAME:MASTER%看着巫女、那与匀称的身体极其不相符的极致肌肉、以及那在全身上下包括脸上都清晰可见的伤疤。
	PRINTFORML %CALLNAME:MASTER%随后看向了这位巫女的手、那双手有着无数地裂开、缝合的印记。
	PRINTFORML 甚至手指都不知道经历了多少次骨折、都有些歪了。
	PRINTFORML 就像是被撕得四分五裂然后再一块一块拼接回来的布偶
	PRINTFORML 那种丑陋的东西被刻印这如此魅力四溢的身体上、对于正常人来说、看到这样的景象心生怜悯才是最正常的反应吧。
	PRINTFORML 但%CALLNAME:MASTER%感到的是一种「绮丽」
	PRINTFORML 就像能灼烧心灵的太阳。
	PRINTFORMW %CALLNAME:MASTER%握住了那只手。
	PRINTFORMW 「我是博麗神社的先代巫女。你是？」
	PRINTFORMW %CALLNAME:MASTER%向先代报上了自己的名字
	PRINTFORMW 「……%CALLNAME:MASTER%是吗……、我明白了」
	PRINTFORMW 「说起来我们现在已经同住一个屋檐下了……不过……」
	PRINTFORMW 先代理了理自己的发梢、说道。
	PRINTFORMW 「嘛，总之……算了、我也是过去的“亡灵”、没资格说这话」
	PRINTFORMW 「要是万一、你敢乱来的话……」
	PRINTFORML 先代一边加大握手的力量、一边露出渗人的微笑地对着%CALLNAME:MASTER%说道。
	PRINTFORMW 「――已经有和搏杀巫女一决高下的觉悟了吧？」
	PRINTFORMW 先代突然松开了手，仿佛没有说过刚刚那些话
	PRINTFORMW 「言已至此……欢迎来到幻想乡、%CALLNAME:MASTER%。」
	PRINTFORMW 不过%CALLNAME:MASTER%还是紧张了起来
	PRINTFORML 因为%CALLNAME:MASTER%闻到了先代身上那一点点……
	PRINTFORMW 血腥味。
	PRINTFORML
ELSE
    IF 	GET_MAPID(CFLAG:MASTER:現在位置) == 1			;若自宅不在神社 在神社撞上
    PRINTL
	PRINTFORML 「嗯……你好。」
	PRINTFORMW 那个个子很高的红白巫女看向%CALLNAME:MASTER%这么说道。
	PRINTFORMW 「%CALLNAME:MASTER%……你好、请多关照。」
	PRINTFORMW 这么说着，看起来很平和的巫女向你伸出了手。
	PRINTFORML %CALLNAME:MASTER%看着巫女、那与匀称的身体极其不相符的极致肌肉、以及那在全身上下包括脸上都清晰可见的伤疤。
	PRINTFORML %CALLNAME:MASTER%随后看向了这位巫女的手、那双手有着无数地裂开、缝合的印记。
	PRINTFORML 甚至手指都不知道经历了多少次骨折、都有些歪了。
	PRINTFORML 就像是被撕得四分五裂然后再一块一块拼接回来的布偶
	PRINTFORML 那种丑陋的东西被刻印这如此魅力四溢的身体上、对于正常人来说、看到这样的景象心生怜悯才是最正常的反应吧。
	PRINTFORML 但%CALLNAME:MASTER%感到的是一种「绮丽」
	PRINTFORML 就像能灼烧心灵的太阳。
	PRINTFORMW %CALLNAME:MASTER%握住了那只手。
	PRINTFORMW 「我是博麗神社的先代巫女。」
	PRINTFORMW %CALLNAME:MASTER%问先代是怎么得知自己的名字的。
	PRINTFORMW 「你的名字传得意外地快呢。」
	PRINTFORMW 「这倒是略有耳闻了、不过现在见到真人还是有点意外呢。」
	PRINTFORMW 先代理了理自己的发梢、说道。
	PRINTFORMW 「嘛，总之……算了、我也是过去的“亡灵”、没资格说这话」
	PRINTFORMW 「要是万一、你敢乱来的话……」
	PRINTFORML 先代一边加大握手的力量、一边露出渗人的微笑地对着%CALLNAME:MASTER%说道。
	PRINTFORMW 「――已经有和搏杀巫女一决高下的觉悟了吧？」
	PRINTFORMW 先代突然松开了手，仿佛没有说过刚刚那些话
	PRINTFORMW 「言已至此……欢迎来到幻想乡、%CALLNAME:MASTER%。」
	PRINTFORMW 不过%CALLNAME:MASTER%还是紧张了起来
	PRINTFORML 因为%CALLNAME:MASTER%闻到了先代身上那一点点……
	PRINTFORMW 血腥味。
	PRINTFORML
ELSE				;若自宅不住神社 且不在神社撞上
    PRINTL
	PRINTFORML 「嗯……你好。」
	PRINTFORMW 那个个子很高的红白巫女看向%CALLNAME:MASTER%这么说道。
	PRINTFORMW 「%CALLNAME:MASTER%……你好、请多关照。」
	PRINTFORMW 这么说着，看起来很平和的巫女向你伸出了手。
	PRINTFORML %CALLNAME:MASTER%看着巫女、那与匀称的身体极其不相符的极致肌肉、以及那在全身上下包括脸上都清晰可见的伤疤。
	PRINTFORML %CALLNAME:MASTER%随后看向了这位巫女的手、那双手有着无数地裂开、缝合的印记。
	PRINTFORML 甚至手指都不知道经历了多少次骨折、都有些歪了。
	PRINTFORML 就像是被撕得四分五裂然后再一块一块拼接回来的布偶
	PRINTFORML 那种丑陋的东西被刻印这如此魅力四溢的身体上、对于正常人来说、看到这样的景象心生怜悯才是最正常的反应吧。
	PRINTFORML 但%CALLNAME:MASTER%感到的是一种「绮丽」
	PRINTFORML 就像能灼烧心灵的太阳。
	PRINTFORMW %CALLNAME:MASTER%握住了那只手。
	PRINTFORMW 「我是博麗神社的先代巫女。」
	PRINTFORMW %CALLNAME:MASTER%问先代是怎么得知自己的名字的。
	PRINTFORMW 「你一来这里就听见有人在说了呢。」
	PRINTFORMW 「然后看了一下四周、最特殊的就是你。」
	PRINTFORMW 先代理了理自己的发梢、说道。
	PRINTFORMW 「嘛，总之……算了、我也是过去的“亡灵”、没资格说这话」
	PRINTFORMW 「要是万一、你敢乱来的话……」
	PRINTFORML 先代一边加大握手的力量、一边露出渗人的微笑地对着%CALLNAME:MASTER%说道。
	PRINTFORMW 「――已经有和搏杀巫女一决高下的觉悟了吧？」
	PRINTFORMW 先代突然松开了手，仿佛没有说过刚刚那些话
	PRINTFORMW 「言已至此……欢迎来到幻想乡、%CALLNAME:MASTER%。」
	PRINTFORMW 不过%CALLNAME:MASTER%还是紧张了起来
	PRINTFORML 因为%CALLNAME:MASTER%闻到了先代身上那一点点……
	PRINTFORMW 血腥味。
	PRINTFORML
	ENDIF
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;デート帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K158_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORMW 「%CALLNAME:MASTER%。」
	PRINTFORMW 先代站在前方、叫住你。
	PRINTFORMW %CALLNAME:MASTER%看着先代、疑惑了一下。
	PRINTFORMW 先代像是「瞬移」到自己的面前。
	PRINTFORMW 嘴唇传来了柔软的触感
	PRINTFORMW 牙齿被先代的舌头撬开、然后和%CALLNAME:MASTER%的舌头交缠在一起。
	PRINTFORMW 在刚开始还没反应过来发生了什么的%CALLNAME:MASTER%也很快理解了现在的状况。
	PRINTFORMW 先代正在和自己接吻
	PRINTFORMW 口齿间传来一股茶叶的清香、而且先代的技术很好、让%CALLNAME:MASTER%感觉十分地舒服
	PRINTFORMW 微风轻轻抚过二人的面颊、阳光懒懒地照在二人身上。
	PRINTFORMW 良久、先代才离开了%CALLNAME:MASTER%。
	PRINTFORMW %CALLNAME:MASTER%想要说些什么的时候，先代猛地跃起、消失在%CALLNAME:MASTER%的视线中
	PRINTFORMW 「太冲动了……不应该啊……」
	PRINTFORMW 先代在树林间穿行着、脸上稍稍染上了一点绯红、但很快、面容变成了不易察觉的苦涩。
	PRINTFORMW 「希望……你不要恨我……」
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 0

;==================================================
;デート帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K158_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
    IF LOCAL:1 && ARG == 0
		;初回
		IF FIRSTTIME(1026)
		PRINTFORMW 走在回神社的路上。
		PRINTFORMW 与你勾肩搭背的先代突然停下了脚步。
		PRINTFORMW 「啊……%CALLNAME:MASTER%？」
		PRINTFORMW 怎么了、突然停下来？%CALLNAME:MASTER%这样问道。
		PRINTFORMW 「……%CALLNAME:MASTER%、能听我的一个请求吗？」
		PRINTFORMW 先代靠近了%CALLNAME:MASTER%，在耳边小声地说着。
		PRINTFORMW 什么请求我都可以答应哦。%CALLNAME:MASTER%感受着耳边的酥麻、轻声回应。
		PRINTFORMW 「……那个……」
		PRINTFORMW %CALLNAME:MASTER%感觉先代的呼吸变得有些急促。
		PRINTFORMW 啊啊、所以是怎么一回事呢？%CALLNAME:MASTER%隐隐约约地感觉到了。
		PRINTFORMW 「呼……虽然有些直接了。」
		PRINTFORMW 先代顿了一下。
		PRINTFORMW 「%CALLNAME:MASTER%、请和我交往吧。」
		PRINTFORMW 一开口就是重量级。
		PRINTFORMW %CALLNAME:MASTER%惊了一下。
		PRINTFORMW 「我喜欢你啊、%CALLNAME:MASTER%。」
		PRINTFORMW 喜欢我哪一点呢？%CALLNAME:MASTER%疑惑地问道。
		PRINTFORMW 「如果我说……是因为你有钱呢？」
		PRINTFORMW 随后、两人都噗呲一声笑了出来、先代很快停了下来、一脸认真地看向%CALLNAME:MASTER%。
		PRINTFORMW 「那么、你的答案是」
		;二回目の告白
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%……」
			PRINTFORMW  %CALLNAME:MASTER%回头看了一眼先代。
			PRINTFORMW  「你说……我算不算失败呢。」
			PRINTFORMW  「战斗终生、把身体打坏了、人们也不肯接受我、甚至现在都没有我存在过的痕迹……但是……」
			PRINTFORMW 先代低着、%CALLNAME:MASTER%看不到她的眼睛。
			PRINTFORMW 「我这样失败的人，也是爱着『你』的啊、『你』能接受吗……这份爱。」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白成功（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTW
		PRINTW
		PRINTFORMW 「呼……」
		PRINTFORMW 先代像是放下了心中的一块巨石
		PRINTFORMW 「这样啊……」
		PRINTFORMW 先代靠在%CALLNAME:MASTER%的身上、虽然看不到表情、但还是能清楚地感受到先代的快乐。
		PRINTFORMW 「那就要一直这样、」
		PRINTFORMW 当然啦。
		PRINTFORMW 「一言为定哦。」
		PRINTFORMW %CALLNAME:MASTER%和先代保持了一会这样的姿态。
		PRINTFORMW
		PRINTFORMW  「我可是都知道了哦、『你』的存在。」
		PRINTFORMW  什么？
		PRINTFORMW  「不、没什么、我已经很满足了。」
		PRINTFORMW  先代的声音不易察觉地颤抖了一下。
		PRINTFORMW  「%CALLNAME:MASTER%、让我们一起拥抱这个美好又操蛋的世界吧。」
		PRINTFORMW  先代的身体随着呼吸变得越来越温暖、这个阳光一样的东西从先代的身体里转入%CALLNAME:MASTER%的身体里。
		PRINTFORMW  「收下吧……我的礼物。」
		MAXBASE:MASTER:0 += 350	;最大气力+500
		MAXBASE:MASTER:1 += 350	;最大气力+250
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTW
		PRINTW
		PRINTFORMW 「……我明白了」
		PRINTFORMW 「没什么、这又不算什么事……」
		PRINTFORMW 先代虽然语气上没有表达出什么、但%CALLNAME:MASTER%还是感觉到了她的失落。
		PRINTFORMW 不过这样的失落也仅仅存在了一小会。
		PRINTFORMW 「如果遇到这样一个小小的挫折就放弃了、我还当什么巫女啊。」
		PRINTFORMW  但是先代突然沉默了、%CALLNAME:MASTER%担忧地看着先代。
		PRINTFORMW  然后先代突然干笑了两下。
		PRINTFORMW  她将手放在背后、随意的前行着。
		PRINTFORMW
		PRINTFORMW （哈哈、我果然是被时代抛弃的小丑啊。）
		PRINTFORMW （无论是人和妖怪都在惧怕……你也是这样啊……）
		PRINTW
		RETURN 0
	ENDIF

ENDIF
RETURN 0

;==================================================
;デート帰り
;==================================================
@M_KOJO_SPEVENT_K158_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 TALENT:恋人
			PRINTW
			PRINTFORML 「嗯……很开心呢……」
			PRINTFORML 「下次出来玩的时候记得带上我哦」
			PRINTFORML 先代轻轻按摩着%CALLNAME:MASTER%的后腰、手法好到差点让%CALLNAME:MASTER%叫出了声。
			PRINTFORML 先代想去哪就去哪吧，%CALLNAME:MASTER%说着、享受着先代的按摩
			PRINTFORML 「如果是%CALLNAME:MASTER%的话，到哪里都挺好的。」
			PRINTFORMW 先代微笑着、抚摸着%CALLNAME:MASTER%的头发。
			RETURN 0
		ELSEIF TALENT:恋慕
			PRINTW
			PRINTFORML 「很不错呢。」
			PRINTFORML 先代微笑着、和%CALLNAME:MASTER%勾肩搭背。
			PRINTFORML 下次有时间的话我们再一起出去玩吧。%CALLNAME:MASTER%回答着。
			PRINTFORML 「我很期待呢」
			PRINTFORMW 先代笑着说道、轻轻抚摸着%CALLNAME:MASTER%的头发。
		ELSEIF TALENT:思慕
			PRINTW
			PRINTFORML 「呼……偶尔这样也不错呢」
			PRINTFORML 「果然出来玩是正确的选择呢」
			PRINTFORML 那下次还出来玩吗？%CALLNAME:MASTER%这样问道。
			PRINTFORML 「不知道呢……」
			PRINTFORML 这样，先代笑了笑、便没了下文。
			PRINTW
		ELSE
			PRINTW
			PRINTFORML 「虽然都已经锻炼到这个地步了……」
			PRINTFORML 「果然还是当个家里蹲比较好啊」
			PRINTFORML 偶尔出门也不错吧。%CALLNAME:MASTER%说道、
			PRINTFORML 「出门运动的话……或者在家里练拳会更好哦。」
			PRINTFORMW 先代笑了笑……
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORML 「……」
			PRINTFORMW 先代沉默着、%CALLNAME:MASTER%小心翼翼地看着她。
			PRINTFORML 「这次就原谅你吧」
			PRINTFORML 「但是——」
			PRINTFORMW %CALLNAME:MASTER%虎躯一震。
			PRINTFORMW 「再这样的话……」
			PRINTFORMW 先代阴测测地笑着这样说道。
			RETURN 0
		ELSE
			PRINTFORML 「好吧，原谅你吧」
			PRINTFORML 「仅此一次哦。」
			PRINTFORML 先代拍了拍%CALLNAME:MASTER%的肩膀、这样说道。
			PRINTW
		RETURN 0
		ENDIF
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF TALENT:恋人
			PRINTFORML 「……」
			PRINTFORMW 先代依然面无表情……
			PRINTFORMW 但看起来稍微柔和了一点……
			RETURN 0
		ELSE
			PRINTFORML 「稍微就原谅你一下吧……」
			PRINTFORML 「……再胡作非为的话……」
			PRINTFORML 先代面无表情、看不出来她在想什么。
			PRINTW
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		IF TALENT:恋人
			PRINTFORML 「我还以为你就这么无药可救了呢……」
			PRINTFORMW  你看不到先代的面部表情、但那一定是很伤心的表情吧。
			PRINTFORML 「这样的话……也不是不可原谅……」
			PRINTFORML 「给我注意一点。」
			PRINTFORMW 先代抛下了%CALLNAME:MASTER%、孤独地坐着。
			RETURN 0
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%、我还真想给你来一拳呢……」
			PRINTFORML 「不过停止那些行为……可算给了我一个对你改观的理由呢……」
			PRINTFORML 「行、稍微原谅你」
			PRINTFORML 「但是、%CALLNAME:MASTER%、不要再把自己的脑子给丢出去了。」
			PRINTW
		ENDIF
		RETURN 0
	ENDIF
	PRINTFORML
ENDIF
RETURN 0

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K158_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K158
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「……呼……要心平气和……要冷静……」
				PRINTFORMW  但是先代那攥的死死的拳头看起来不冷静……
			ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
				PRINTFORMW 「哎呀？%CALLNAME:MASTER%」
				PRINTFORMW  先代看起来心情不错的样子。
				PRINTFORMW 「你来干什么？」
				PRINTFORMW  先代疑惑地看了一眼%CALLNAME:MASTER%、不过很快收回了视线、看着月亮。
				PRINTFORMW 「今晚的月色不是很美吗？」
				PRINTFORMW  是啊、月色真美。
		IF TALENT:恋人
    IF RAND:2 == 0
			PRINTFORML
			PRINTFORML 「%CALLNAME:MASTER%、还好吗？」
			PRINTFORML 先代一看到你就打了招呼。
			PRINTFORML 「所以、接下来要做什么呢？」
			PRINTFORMW 先代靠在了你的身上。
	ELSEIF RAND:1 == 0
	        PRINTFORMW  先代温柔地看着%CALLNAME:MASTER%。
	        PRINTFORMW  「要不要来我怀里坐一会儿。」
	        PRINTFORMW  %CALLNAME:MASTER%看着先代修长而紧致的美腿后、稍微咽了一下口水。
	ENDIF
		ELSEIF TALENT:恋慕
	IF RAND:2 == 0
			PRINTFORML
			PRINTFORML 「哟、%CALLNAME:MASTER%。」
			PRINTFORML 先代看到了%CALLNAME:MASTER%。
			PRINTFORML 「多坐一会吧……」
			PRINTFORMW 先代微笑着说道。
	ELSEIF RAND:1 == 0
	        PRINTFORMW  「%CALLNAME:MASTER%？ 请坐。」
	        PRINTFORMW  先代微笑着朝%CALLNAME:MASTER%指了指旁边一个空位。
	ENDIF
		ELSEIF TALENT:思慕
	IF RAND:2 == 0
			PRINTFORML
			PRINTFORML 「哟、这不是%CALLNAME:MASTER%吗」
			PRINTFORML 先代看见了进入房间的%CALLNAME:MASTER%。
			PRINTFORML 「是我的错觉吗……」
			PRINTFORMW 先代低声说着、看向了你。
	ELSEIF RAND:1 == 0
	        PRINTFORMW
	        PRINTFORMW  「嗯？」
	        PRINTFORMW  先代发现了%CALLNAME:MASTER%、迅速地把衣服身上的皱纹理平。
	        PRINTFORMW  「你好、%CALLNAME:MASTER%。」
	ENDIF
		ELSE
	IF RAND:2 == 0
			PRINTFORML
			PRINTFORML 「%CALLNAME:MASTER%？」
			PRINTFORML 先代发现了%CALLNAME:MASTER%。
			PRINTFORML 「有什么事呢？」
			PRINTFORMW 先代拍了拍身上的灰尘、很随意地说道。
	ELSEIF RAND:1 == 0
	        PRINTFORMW
	        PRINTFORMW  「是%CALLNAME:MASTER%啊。」
	        PRINTFORMW  先代看了你一眼便继续做自己的事。
	ENDIF
		ENDIF
	ENDIF
	ENDIF
		RETURN 0

	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
    IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K158
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「……呼……要心平气和……要冷静……」
				PRINTFORMW  但是先代那攥的死死的拳头看起来不冷静……
			ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
				PRINTFORMW 「哎呀？%CALLNAME:MASTER%」
				PRINTFORMW  先代看起来心情不错的样子。
				PRINTFORMW 「你来干什么？」
				PRINTFORMW  先代疑惑地看了一眼%CALLNAME:MASTER%、不过很快收回了视线、看着月亮。
				PRINTFORMW 「今晚的月色不是很美吗？」
				PRINTFORMW  是啊、月色真美。
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORML 「是%CALLNAME:MASTER%啊」
			PRINTFORMW 先代微笑着进入了房间。
		ELSEIF TALENT:恋慕
			PRINTFORML 「我要进来了哦、%CALLNAME:MASTER%」
			PRINTFORMW 先代从容地进入了房间。
		ELSEIF TALENT:思慕
			PRINTFORML 「%CALLNAME:MASTER%？」
			PRINTFORML 这么说着，先代进入了房间。
			PRINTFORML 「……呼」
			PRINTFORMW 目光稍微重合，先代脸上就染上了一抹绯红。
		ELSE
			PRINTFORML 「我进来了」
			PRINTFORMW 先代这么说着，进入了房间。
		ENDIF
	ENDIF
	ENDIF
		RETURN 0

	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			PRINTFORML 「%CALLNAME:MASTER%。我进来了」
			PRINTFORML 先代把门打开，进入了浴室。
			PRINTFORML 「我也一起洗、可以吗」
			PRINTFORML 「那就这样哦。」
			PRINTFORMW 先代从容地坐在了你的旁边……
			PRINTFORMW %CALLNAME:MASTER%看着遍布先代身体的伤疤、沉默了……
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%？」
			PRINTFORML 「先进去了呢」
			PRINTFORML 「那我也一起洗吧」
			PRINTFORMW 先代在%CALLNAME:MASTER%的对面坐着……
			PRINTFORMW %CALLNAME:MASTER%看着遍布先代身体的伤疤、沉默了……
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「……时间不合适呢。」
		PRINTFORMW 先代看到%CALLNAME:MASTER%在浴室，就出去了。
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「……？」
		PRINTFORML 先代一看到你走进浴室就愣了一下。
		PRINTFORML 「……在我生气之前请你还是先出去吧。」
		PRINTFORMW 先代很快把%CALLNAME:MASTER%撵出去了。
		RETURN 0
	ENDIF
RETURN 0
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
		IF LOCAL:1 && ARG == 6
			;正月、バレンタイン、萬聖節、聖誕節の場合
			IF (DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1) || (DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000) || (DAY:2 == 3 && DAY:3 == 30) || (DAY:2 == 4 && DAY:3 == 25)
				CALL SPECIALDAY_EVENT_K158
			ELSEIF CFLAG:318 == 1
				PRINTFORMW 「……呼……要心平气和……要冷静……」
				PRINTFORMW  但是先代那攥的死死的拳头看起来不冷静……
			;屋外かつ満月
			ELSEIF NAME_MOON(DAY:3) == "十五夜 -中秋的名月- " && OPENPLACE(CFLAG:MASTER:現在位置) >= 2
				PRINTFORMW 「哎呀？%CALLNAME:MASTER%」
				PRINTFORMW  先代看起来心情不错的样子。
				PRINTFORMW 「你来干什么？」
				PRINTFORMW  先代疑惑地看了一眼%CALLNAME:MASTER%、不过很快收回了视线、看着月亮。
				PRINTFORMW 「今晚的月色不是很美吗？」
				PRINTFORMW  是啊、月色真美。
			ELSEIF TALENT:恋人
				IF RAND:3 == 0
					PRINTFORMW 「%CALLNAME:MASTER%？  今天要去哪里呢?」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、要不来坐坐？」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，你好啊。」
					PRINTFORMW 先代向%CALLNAME:MASTER%打招呼、目光里的柔情不加掩饰。
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、在做什么呢？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%、很高兴又见到你了」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%，还好吗？」
					PRINTFORMW 先代看见%CALLNAME:MASTER%、打了个招呼
					PRINTFORMW 「要做什么呢？需要我帮忙吗？」
				ENDIF
			ELSEIF TALENT:思慕
				IF RAND:3 == 0
					PRINTFORMW 「你好、%CALLNAME:MASTER%。」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「%CALLNAME:MASTER%，在这种地方干什么呢？」
				ELSE
					PRINTFORMW 先代向%CALLNAME:MASTER%微笑着。
					PRINTFORMW 「今天有什么有趣的听闻呢？」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「%CALLNAME:MASTER%，你好啊。」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「是%CALLNAME:MASTER%啊。」
				ELSE
					PRINTFORMW 「%CALLNAME:MASTER%、巧遇呢。」
					PRINTFORMW  先代微笑着看着%CALLNAME:MASTER%。
					PRINTFORMW 「或许……还有？」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF

	;-------------------------------------------------
	;和其他角色约会的时候遇到了
	;ARG:1にデート相手
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
		IF LOCAL:1 && ARG == 7
			;憤怒
			IF CFLAG:318 == 1
				PRINTFORMW 「…………」
				PRINTFORMW  先代面无表情地看着这边。
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 1
			;憤怒 恋慕時 约会的对象が霊夢
				PRINTFORMW  先代靠在灵梦身边、说着悄悄话。
				PRINTFORMW  『真的吗？』
				PRINTFORMW  灵梦露出吃惊的表情、不动声色地撒开了牵着%CALLNAME:MASTER%的手……
				CALL CHANGE_CFLAG(2, 1, -200)
				CALL CHANGE_CFLAG(4, 1, -100)
				PRINTFORMW  先代用眼神警告着%CALLNAME:MASTER%……
				;憤怒 恋慕時 约会的对象が魔理沙
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 11
				PRINTFORMW 「……你这样的话、灵梦看了可是会很伤心的哦？」
				PRINTFORMW  魔理沙说着不是那样的、然后甩开了%CALLNAME:MASTER%的手。
				CALL CHANGE_CFLAG(2, 11, -100)
				CALL CHANGE_CFLAG(4, 11, -50)
				;憤怒 恋慕時 约会的对象が露米娅
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 12
				PRINTFORMW  先代轻轻揉搓着露米娅稚嫩的脸庞、然后悄悄在旁边耳语着。
				PRINTFORMW  露米娅似懂非懂地点了点头、离%CALLNAME:MASTER%远了一些……
				CALL CHANGE_CFLAG(2, 12, -200)
				CALL CHANGE_CFLAG(4, 12, -100)
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 14
			;憤怒 恋慕時 约会的对象が琪露诺
				PRINTFORMW  「话说、最强的妖精不应该是训练自己使其更强吗？」
				PRINTFORMW  「为什么会这么无所事事呢？ 别的妖精迟早会超过你的。」
				PRINTFORMW  『没人能夺走我最强的名号！』
				PRINTFORMW  琪露诺听了、想撒开%CALLNAME:MASTER%的手跑去进行战斗训练了……
				CALL CHANGE_CFLAG(4, 14, -50)
				ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 15
			;憤怒 恋慕時 约会的对象が咲夜
				PRINTFORMW  「嗯嗯……」
				PRINTFORMW  「我听说那个小吸血鬼好像很伤心哦、最亲近的女仆跑到别人的身边了呢。」
				PRINTFORMW  咲夜一惊、不动声色地撒开了牵着%CALLNAME:MASTER%的手……
				CALL CHANGE_CFLAG(2, 15, -100)
				CALL CHANGE_CFLAG(4, 15, -50)
            ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 16
			;憤怒 恋慕時 约会的对象が蕾米莉亚
				PRINTFORMW  「嗯……果然是变态啊……」
				PRINTFORMW  「和这么一个幼女约会、这样的你、不愧是萝莉控。」
				PRINTFORMW  『可恶！ 我才不是幼女！ 我都已经五百岁了！』
				PRINTFORMW  蕾米莉亚一边反驳一边想要甩开%CALLNAME:MASTER%的手……
				CALL CHANGE_CFLAG(2, 16, -100)
				CALL CHANGE_CFLAG(4, 16, -50)
			;憤怒 恋慕時 约会的对象が妖夢
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 23
				PRINTFORMW 「……这样的话、幽幽子可就没人照顾了啊。」
				PRINTFORMW  妖梦看起来很平静。
				PRINTFORMW  但是手在颤抖。
				CALL CHANGE_CFLAG(2, 23, -100)
				CALL CHANGE_CFLAG(4, 23, -50)
			;憤怒 恋慕時 约会的对象が橙
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 24
				PRINTFORMW 「%CALLNAME:MASTER%……萝莉控。」
				PRINTFORMW  橙看了一眼%CALLNAME:MASTER%。
				PRINTFORMW  『好像蓝大人说过……不能和变态这一起玩……而萝莉控……好像也是变态。』
				PRINTFORMW  于是橙甩开了%CALLNAME:MASTER%的手、离%CALLNAME:MASTER%远了一些。
				CALL CHANGE_CFLAG(2, 24, -100)
				CALL CHANGE_CFLAG(4, 24, -50)
			;憤怒 恋慕時 约会的对象が藍
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 25
				PRINTFORMW 「……作为紫的式神……这样背叛自己的主子真的好吗？」
				PRINTFORMW  蓝虽然没有太大反应、但表情变得有些苦闷起来。
                CALL CHANGE_CFLAG(2, 25, -50)
				CALL CHANGE_CFLAG(4, 25, -25)
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 26
			;憤怒 恋慕時 约会的对象が紫
				PRINTFORMW  「……果然就算是妖怪贤者也会有看走眼的时候吗？」
				PRINTFORMW  『呼呼、这个就不劳你费心了、先代。』
				PRINTFORMW  紫微笑着、眼睛里闪着奇异的光
				PRINTFORMW  先代深深地看了一眼紫之后就继续做自己的事了。
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 31
			;憤怒 恋慕時 约会的对象が早苗
				PRINTFORMW  「虽然有点竞争关系……」
				PRINTFORMW  「但是看见巫女被蒙骗果然还是心里不舒服啊。」
				PRINTFORMW  早苗狐疑地看着%CALLNAME:MASTER%……
				CALL CHANGE_CFLAG(2, 31, -100)
				CALL CHANGE_CFLAG(4, 31, -50)
			;憤怒 恋慕時 约会的对象が幽幽子
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 66
				PRINTFORMW 「……虽然但是……能做出这种事的人真的值得托付吗？」
				PRINTFORMW  幽幽子表面上没有什么反应、但内心却开始怀疑起来了……
			;憤怒 恋慕時 约会的对象が隠岐奈
			ELSEIF CFLAG:318 == 1 && TALENT:恋慕 && ARG:1 == 124
				PRINTFORMW 「不怕被开后门吗？」
			ELSEIF TALENT:恋人 && ARG:1 == 1
			;恋人時 约会的对象が霊夢
				PRINTFORMW  「你小子、玩得挺花啊……」
				PRINTFORMW  「但是、只要不做对不起我和灵梦的事情、我就很高兴哦。」
				PRINTFORMW  灵梦发现另一个人是先代之后低下了头、整个人好像都散发了白色的雾气……
				PRINTFORMW  先代和%CALLNAME:MASTER%交谈着、用温柔的目光看着灵梦……
			ELSEIF TALENT:恋人 && ARG:1 == 12
			;恋人時 约会的对象が露米娅
			    PRINTFORMW  「你找谁不好偏偏要找她……」
			    PRINTFORMW  先代眼神复杂地看着%CALLNAME:MASTER%和露米娅……
			ELSEIF TALENT:恋慕 && ARG:1 == 1
			;恋慕時 约会的对象が霊夢
				PRINTFORMW  「什么啊、看起来灵梦更受欢迎啊。」
				PRINTFORMW  「但是不要辜负她哦？」
				PRINTFORMW  先代一边说着、一边踩碎了一个小石块。
			;恋慕時 约会的对象が露米娅
			ELSEIF TALENT:恋慕 && ARG:1 == 12
				PRINTFORMW 「露米娅、要不和我一起玩？ 我请你去吃大餐。」
			;恋慕時 约会的对象が橙
			ELSEIF TALENT:恋慕 && ARG:1 == 24
				PRINTFORMW 「啊……？ 这……真的没问题吗？」
			;恋慕時 约会的对象が藍
			ELSEIF TALENT:恋慕 && ARG:1 == 25
				PRINTFORMW 「听说狐妖怪的技术都很好……%CALLNAME:MASTER%、你果然是冲着这点来的吧？」
			;恋慕時 约会的对象が紫
			ELSEIF TALENT:恋慕 && ARG:1 == 25
				PRINTFORMW 「哇、就这么忘了我、我太伤心了。」
			;恋慕時 约会的对象が華扇
			ELSEIF TALENT:恋慕 && ARG:1 == 43
				PRINTFORMW 「就算是仙人也能感受到色欲吗？」
			;恋慕時 约会的对象が幽幽子
			ELSEIF TALENT:恋慕 && ARG:1 == 66
				PRINTFORMW 「人鬼情未了吗？」
			;恋慕時 约会的对象が隠岐奈
			ELSEIF TALENT:恋慕 && ARG:1 == 124
				PRINTFORMW 「彼此都有好兴趣呢……」
			ELSEIF TALENT:恋人
				PRINTFORMW 「我可以认为你这算是出轨吗？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「？ 嗯……没什么、祝你玩的愉快。」
			ELSEIF TALENT:思慕
				PRINTFORMW 「%CALLNAME:MASTER%？ 那么想必这位是……」
			ELSE
				PRINTFORMW 「看起来%CALLNAME:MASTER%也找到了啊。」
			ENDIF
			RETURN 1
		ENDIF
RETURN 1

	;-------------------------------------------------
	;MAIN_MAP上で一日最初の挨拶
	;注、このあと通常の遭遇口上、ARG==1 OR ARG==2に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で一日最初の挨拶
	;ARG:1にデート相手、ARG:1が0の場合は非デート
	;注、このあと通常の外出先で遭遇した口上、ARG==6 OR ARG==7に接続します
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;ARG:1とデート中
		IF ARG:1
		;一人で外出
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K158_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		;共通
		IF TALENT:恋人
			PRINTFORML 「你醒啦」
			PRINTFORML %CALLNAME:MASTER%睁开眼，眼前是先代的面庞。
			PRINTFORML 「梦见什么好事了？」
			PRINTFORML 先代一边说，一边把%CALLNAME:MASTER%抱在了怀里、用手指轻轻按压着%CALLNAME:MASTER%的穴位。
			PRINTFORML 「舒服吗？」
			PRINTFORMW %CALLNAME:MASTER%躺在先代的怀里稍微享受了一会先代的按摩。
		ELSEIF TALENT:恋慕
			PRINTFORML 「……」
			PRINTFORML %CALLNAME:MASTER%睁開眼，眼前是先代的面庞。
			PRINTFORML 「呼……」
			PRINTFORML 先代沉默着。
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
		PRINTFORML 「你醒啦」
			PRINTFORML %CALLNAME:MASTER%睁开眼，眼前是先代的面庞。
			PRINTFORML 「梦见什么好事了？」
			PRINTFORML 先代一边说，一边把%CALLNAME:MASTER%抱在了怀里。
			PRINTFORML 「舒服吗？」
			PRINTFORMW %CALLNAME:MASTER%和先代稍微抱了一会。
		ELSEIF TALENT:恋慕
			PRINTFORML 「……」
			PRINTFORML %CALLNAME:MASTER%睁開眼，眼前是先代的面庞。
			PRINTFORML 「呼……」
			PRINTFORML 先代沉默着。
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		;共通
		IF TALENT:恋人
			PRINTFORML 「早上好、%CALLNAME:MASTER%」
			PRINTFORML 先代很有精神地说道。
			PRINTFORML 「呼……今天也要做什么呢？」
			PRINTFORMW 先代一边伸懒腰一边问道。
		ELSEIF TALENT:恋慕
			PRINTFORML 「……早上好。」
			PRINTFORML 先代一边理头发一边看着你。
			PRINTFORML 「嗯……」
			PRINTFORML 先代站了起来、去洗脸了。
			PRINTFORMW
		ELSEIF TALENT:思慕
			PRINTFORML 「嗯……%CALLNAME:MASTER%……」
			PRINTFORML 先代看着你。
			PRINTFORML 「嗯……早上好。」
			PRINTFORML 先代从被子里扭得像条蛆、扭了一会后出来了。
			PRINTFORMW
		ELSE
			PRINTFORML 「嗯……已经早晨了……」
			PRINTFORML 先代长呼一口气……
			PRINTFORMW
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人
			PRINTFORML 「呼……已经这么晚了啊……」
			PRINTFORML 「……？还要一起睡？」
			PRINTFORML 「现在还不是时候哦、晚安」
			PRINTFORMW 这么说着，先代脚步平稳地回了神社。
		ELSEIF TALENT:恋慕
			PRINTFORML 「嗯……我该回房间了……」
			PRINTFORML 先代揉了揉太阳穴。
			PRINTFORML 一起睡怎样、这样问道。
			PRINTFORML 「还是算了吧……那么，明天再见吧。晚安」
			PRINTFORMW 这么说，先代打着哈欠，回到了神社。
		ELSEIF TALENT:思慕
			PRINTFORML 已经要回去了吗、%CALLNAME:MASTER%问先代。
			PRINTFORML 「？」
			PRINTFORML 再一次，%CALLNAME:MASTER%这么问道。
			PRINTFORML 「这么晚了啊……不得不回去了呢。」
			PRINTFORML 「和%CALLNAME:MASTER%在一起感觉时间都快了不少啊……那么、明天见。」
			PRINTFORMW 留下这句话，先代回到了神社。
		ELSE
			PRINTFORML 「那么，我该回去了。」
			PRINTFORML 「%CALLNAME:MASTER%、明天见……」
			PRINTFORMW 这么说着，先代回了神社。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORML 「……？……抱歉……没听清啊……」
			PRINTFORML 先代看起来很困。
			PRINTFORML 「没关系……等会就去睡觉……」
			PRINTFORMW 一边这么说，一边犯困的先代有一种别样的魅力。
		ELSEIF TALENT:恋慕
			PRINTFORML 「…………」
			PRINTFORML 先代低着头……看不清她的表情。
			PRINTFORML %CALLNAME:MASTER%问她要睡了吗、
			PRINTFORML 「…………」
			PRINTFORMW 先代没有回应。
		ELSE
			PRINTFORML 「呼……就这样吧」
			PRINTFORMW 先代有点犯困的说道。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋人
			SELECTCASE RAND:2
				CASE 1
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	                PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		            PRINTFORMW  仿佛一松开先代就会消失一样。
		            PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	    ENDIF
					PRINTFORML 「…………」
					PRINTFORML 先代睡得很安稳、或许是作为武者、紧绷的肌肉和平稳的呼吸才能共存……
					PRINTFORML 「呼……呼……」
					PRINTFORMW 不知为何很开心的样子……
				CASE 0
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	                PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		            PRINTFORMW  仿佛一松开先代就会消失一样。
		            PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	            ENDIF
					PRINTFORML 「…………」
					PRINTFORML 虽然先代看起来睡得很死、但%CALLNAME:MASTER%相信一旦有妖怪在附近作乱她能瞬间翻起来暴揍那些妖怪。
					PRINTFORML 「……嗯……」
					PRINTFORMW ……%CALLNAME:MASTER%很好奇、在这样状态下的先代、做着怎样的梦呢……
			ENDSELECT
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:2
				CASE 1
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	                PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		            PRINTFORMW  仿佛一松开先代就会消失一样。
		            PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	            ENDIF
					PRINTFORML 「呼…………」
					PRINTFORML 「…………」
					PRINTFORML 先代平躺着，发丝散乱在榻榻米上。
					PRINTFORMW 眉头紧皱着……是噩梦吗？
				CASE 0
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	    PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		PRINTFORMW  仿佛一松开先代就会消失一样。
		PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	ENDIF
					PRINTFORML 「嗯……」
					PRINTFORML 「呼……正面攻过来吧……」
					PRINTFORML 先代难得的说着梦话。
					PRINTFORMW 梦话听起来一点香艳、应该是错觉吧。
			ENDSELECT
		ELSEIF TALENT:思慕
			SELECTCASE RAND:3
				CASE 2
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	    PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		PRINTFORMW  仿佛一松开先代就会消失一样。
		PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	ENDIF
					PRINTFORML 「……」
					PRINTFORML 先代静静地睡着。
					PRINTFORML 「……嗯……」
					PRINTFORML 先代睡觉一直都是这么安静的吗？
				CASE 1
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	    PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		PRINTFORMW  仿佛一松开先代就会消失一样。
		PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	ENDIF
					PRINTFORML 「……」
					PRINTFORMW 先代静静地睡着。
					PRINTFORMW 攥紧的拳头表示着什么。
				CASE 0
				IF CFLAG:158:300 == CFLAG:1:300 && CFLAG:158:313 == CFLAG:1:313
	                PRINTFORMW  灵梦像一条八爪鱼一样紧紧抱着先代、不愿松开。
		            PRINTFORMW  仿佛一松开先代就会消失一样。
		            PRINTFORMW  但闻着先代身上的香味、灵梦就像一只小猫一样呼噜呼噜地睡着。
	            ENDIF
					PRINTFORML 「呼……呼……」
					PRINTFORMW 先代安稳地发出鼾声。
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 1
					PRINTFORML 「……」
					PRINTFORML 先代安稳地睡着。
					PRINTFORML 「……呼……」
					PRINTFORML 先代的脸同时具有妩媚和刚强、有一种别样的魅力……
					PRINTFORMW %CALLNAME:MASTER%出神地望着先代。
					PRINTFORMW  然后%CALLNAME:MASTER%伸出了手、想要触碰先代的脸。
					PRINTFORMW  紧接着手被紧紧地抓住、力道之大让骨骼发出了悲鸣。
					PRINTFORMW  是先代、在接触到脸前的一瞬间、身体的本能自动应激反应。
					PRINTFORMW  先代用着充满血丝的眼前死死盯着%CALLNAME:MASTER%、过了几秒反应过来后才讪讪地松开手。
					PRINTFORMW  「别在睡觉的时候摸我啊……」
				CASE 0
					PRINTFORML 「……」
					PRINTFORML 要不是能感觉到心脏的跳动……
					PRINTFORML 「呼……」
					PRINTFORMW 先代面无表情的睡着……
			ENDSELECT
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF TALENT:恋人
			SELECTCASE RAND:3
				CASE 2
					PRINTFORMW 「……嗯……」
				CASE 1
					PRINTFORMW 「哈……」
				CASE 0
					PRINTFORMW 「……嘁……」
			ENDSELECT
		ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 2
					PRINTFORMW 「嗯……啊……」
				CASE 1
					PRINTFORMW 「呼……嗯……」
				CASE 0
					PRINTFORMW 「啊……哈啊……」
			ENDSELECT
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;衰弱中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		IF TALENT:恋人
			PRINTFORMW 「……好困……没关系哟……」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「嗯……呼……呼……」
		ELSE
			PRINTFORMW 「…………」
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
	;因酒而倒下
		IF BASE:MASTER:酒気 >= MAXBASE:MASTER:酒気
			IF ARG:1
				;在自己的房间里倒地，（～把【MASTER】搬到了床上（被褥）…）
				PRINTFORML 「喝过头了……吗？」
				PRINTFORML	「哈……这样来说也很麻烦啊。」
				PRINTFORMW	「不过还是看不下去你躺地板啊。」
			ELSE
				;被送回房间，（～把【MASTER】搬到了自己的房间…）
				PRINTFORML 「喝过头了……吗？」
				PRINTFORML	「呼……那就把你抱回去吧。」
				PRINTFORMW	「再怎么说躺地板也不健康。」
			ENDIF
		;体力用尽
		IF TALENT:恋人
			PRINTFORMW 「哇浪，没事吧？」
			PRINTFORMW %CALLNAME:MASTER%硬撑着说这点倦意没什么大不了。
			PRINTFORMW 「你跟我说没问题？」
			PRINTFORMW 这么说着、先代把%CALLNAME:MASTER%抱了起来
			PRINTFORMW 「我把你送到房间吧」
			PRINTFORMW 一边说着，先代把%CALLNAME:MASTER%用公主抱的姿势送回了房间……
			PRINTFORMW 「可别这么勉强自己哦。」
			PRINTFORMW 先代给%CALLNAME:MASTER%盖好了被子、然后轻轻亲吻了一下%CALLNAME:MASTER%的额头。
			PRINTFORMW 「那么……晚安。」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……太困了就是这样的……」
			PRINTFORMW 倒在地上的你，听到了先代冷静的声音。
			PRINTFORMW 「在这里睡下也不是什么事啊、万一感冒了怎么办。」
			PRINTFORMW 先代把你抱了起来、送回了房间、然后轻轻地给%CALLNAME:MASTER%盖上了被子。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（恋慕のみ,そのまま一日が終了）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGET为了睡觉回到了自己的房间。
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た（【TARGET】が部屋に戻ってきた→寝間着へと着替え、寝床に潜った）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			PRINTFORMW  「晚安、%CALLNAME:MASTER%。」
			PRINTFORMW  「不睡的话对身体有害哦。」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出して寝た（眠そうな【TARGET】に追い出された…）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
		;-------------------------------------------------
		;他キャラとのＨを止めさせて寝た（【TARGET】が部屋に戻ってきた→唇をとがらせる【TARGET】に、【MASTER】は渋々【Ｈの相手】から離れた）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;来訪キャラが拠点で休憩（～は疲れ切っている→ちょっと休んでいきなよ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝室に居る状態でその場で寝る（～は眠気に負け、眠りについた…）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
			PRINTFORMW
		ELSE
			PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;拠点外で自宅前に居るキャラが自室に帰って寝る（眠くなった～は自室に帰って行きました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
ENDIF
;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K158_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORM 先代
			IF TALENT:恋人
				PRINTFORM 带着温柔的笑容
			ELSEIF TALENT:恋慕
				PRINTFORM 微笑地
			ELSEIF GETBIT(CFLAG:158,0)
				PRINTFORM 静静地
			ENDIF
				PRINTFORMW 看着%CALLNAME:MASTER%。
				PRINTFORMW 「请坐、%CALLNAME:MASTER%。」
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;轻轻点头就过去了。
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人
			PRINTFORML 「哟、这不%CALLNAME:MASTER%吗？准备去哪？」
			PRINTFORML %CALLNAME:MASTER%告诉了先代自己的目的地。
			PRINTFORML 「嗯……那么祝『你』能得到想要的东西吧。」
			PRINTFORML 先代微笑着这么说道。
			PRINTFORMW 很不错的祝福呢。
		ELSEIF TALENT:恋慕
			PRINTFORML 「『你』好、%CALLNAME:MASTER%」
			PRINTFORML 和先代擦肩而过。
			PRINTFORML 「走稳一点哦。」
			PRINTFORMW 这么说着，先代脚步平稳地离开了这个地方。
		ELSEIF TALENT:思慕
			PRINTFORML 「……啊、%CALLNAME:MASTER%」
			PRINTFORML 和先代擦肩而过。
			PRINTFORML 「嗯……要去哪里呢？」
			PRINTFORML %CALLNAME:MASTER%交待了自己的目的地。
			PRINTFORML 「这样啊，那么一路顺风」
			PRINTFORMW 这么说着，先代脚步平稳地离开了这个地方。
		ELSE
			PRINTFORML 你和先代点头致意。
			PRINTFORMW 先代同样点点头致意就走过去了。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORM 先代
			IF TALENT:恋人
				PRINTFORM 带着温柔的笑容
			ELSEIF TALENT:恋慕
				PRINTFORM 微笑地
			ELSEIF GETBIT(CFLAG:158,0)
				PRINTFORM 静静地
			ENDIF
				PRINTFORMW 看着%CALLNAME:MASTER%。
				PRINTFORMW 「有事的话就赶快去做吧。」
		RETURN 0
	ENDIF
ENDIF
;==================================================
;他者介入でムード変化
;==================================================
@M_KOJO_EVENT_K158_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきたキャラ（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;-------------------------------------------------
	;灵梦が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
IF LOCAL:1 && ARG == 1
		IF TALENT:1:恋人 && TALENT:恋慕
			PRINTFORML
			PRINTFORML 『啊、阿妈……』
			PRINTFORMW 灵梦看起来很紧张的样子。
			PRINTFORML 「灵梦？还好吗」
			PRINTFORML 『嗯、嗯、还好啦。』
			PRINTFORMW 过于紧张的灵梦好像完全忽略了%CALLNAME:MASTER%……
		ELSEIF TALENT:恋慕 && TALENT:1:恋慕
			PRINTFORML
			PRINTFORML 「灵梦、玩得开心吗？」
			PRINTFORML 『嗯……』
			PRINTFORMW 灵梦低着头、似乎能看见一丝雾气……
			PRINTFORML 先代微笑着抚摸灵梦的头……
			PRINTFORML 『我、我现在可不是小孩子了……』
			PRINTFORMW 虽然嘴上有点抗拒、但身体还是诚实地享受着先代的抚摸……
		ELSEIF TALENT:恋人 && TALENT:1:恋慕
			PRINTFORML
			PRINTFORML 「……灵梦……你也来闲逛？」
			PRINTFORML 『…啊…阿妈……那个……』
			PRINTFORML 「我不是很在意哦～不如说、灵梦要不要一起来？」
			PRINTFORMW 『不不不、和妈妈还有%CALLNAME:MASTER%在一起什么的……好害羞……』
			PRINTFORMW 灵梦看起来脸很红的样子……
		ELSEIF TALENT:1:恋人
			PRINTFORML
			PRINTFORML 『……啊……是阿妈。』
			PRINTFORML 「嗯……这不是灵梦吗、要和%CALLNAME:MASTER%一起啊？」
			PRINTFORML 『嗯……是这样啦……不过我还有事要做。』
			PRINTFORML 「那我和%CALLNAME:MASTER%一起等你哦～」
			PRINTFORMW 先代靠在%CALLNAME:MASTER%身边和灵梦说着话……
		ELSEIF TALENT:1:恋慕
			PRINTFORML
			PRINTFORML 『妈妈……』
			PRINTFORML 「灵梦？那次的……」
			PRINTFORML 『才会没有这回事吧……是吧？　%CALLNAME:MASTER%』
			PRINTFORML 「……嗯、说的是呢」
			PRINTFORMW 灵梦好像领悟了什么似的、%CALLNAME:MASTER%好奇地看着两人
		ELSEIF TALENT:恋人
			PRINTFORML
			PRINTFORML 『…………阿妈……』
			PRINTFORML 「灵梦酱……有事吗？」
			PRINTFORML 『不、也没什么特别的事情……』
			PRINTFORML 「哦……是因为%CALLNAME:MASTER%吧……」
			PRINTFORMW  「果然是因为有爸爸了吧～」
			PRINTFORMW 灵梦望着先代和%CALLNAME:MASTER%拉近距离、紧张地盯着%CALLNAME:MASTER%……
			PRINTFORMW  「才不是呢……有妈妈你在就足够了……」
		ELSEIF TALENT:恋慕
			PRINTFORML
			PRINTFORML 「是灵梦酱啊。」
			PRINTFORML 『啊……妈妈……』
			PRINTFORML 「……那么、你在这做什么呢？」
			PRINTFORMW  『当然是来见妈妈啊。』
			PRINTFORMW 灵梦悄悄靠近先代、一边像猫一样在先代的怀里蹭来蹭去、一边仔细地打量着%CALLNAME:MASTER%……
		ELSE
			PRINTFORML
			PRINTFORML 「……你好、灵梦酱」
			PRINTFORML 『……嗯？啊、是阿妈……』
			PRINTFORMW 先代和灵梦轻轻打了招呼。
		ENDIF
		ELSEIF ARG == 12
		IF TALENT:12:恋人 && TALENT:恋慕
			PRINTFORML
			PRINTFORML 『是先代呀……』
			PRINTFORML 「露米娅……」
			PRINTFORMW 先代看上去神情有些复杂。
			PRINTFORML 『你好啊、还有%CALLNAME:MASTER%？』
			PRINTFORML 「露米娅……要不要来我这边坐坐？」
			PRINTFORMW 得到拒绝的回答后、先代的气势莫名其妙矮了一截……
		ELSEIF TALENT:恋慕 && TALENT:12:恋慕
			PRINTFORML
			PRINTFORML 「露米娅、安啊」
			PRINTFORML 『是先代耶、我可以尝尝你吗？』
			PRINTFORML 「……不可以。」
			PRINTFORML 『是这样啊……』
			PRINTFORMW 露米娅的身形萎靡了一些……
			PRINTFORML 「但我可以请你去夜雀食堂吃饭哦」
			PRINTFORML 『好耶！』
			PRINTFORMW 你很好奇先代为什么会对露米娅这个妖怪态度如此之好……
		ELSEIF TALENT:恋人 && TALENT:12:恋慕
			PRINTFORML
			PRINTFORML 「露米娅……你是出来觅食的吗？」
			PRINTFORML 『是这样的哦～』
			PRINTFORML 「那等会我去夜雀食堂请你吃饭怎样？」
			PRINTFORMW 『是这样吗？』
			PRINTFORML 「是这样的哦。」
			PRINTFORMW 先代把露米娅抱在怀里、轻轻抚摸着……
			PRINTFORMW 露米娅眯着眼睛、似乎很享受先代的抚摸……
		ELSEIF TALENT:12:恋人
			PRINTFORML
			PRINTFORML 『是先代呢。』
			PRINTFORML 「嗯……这不是露米娅吗、还和%CALLNAME:MASTER%在一起啊？」
			PRINTFORML 『和%CALLNAME:MASTER%在一起很舒服哦～』
			PRINTFORML 先代的身形肉眼可见地萎靡起来……
		ELSEIF TALENT:12:恋慕
			PRINTFORML
			PRINTFORML 『是先代呀』
			PRINTFORML 「露米娅？嗯……玩得开心吗？」
			PRINTFORML 『很开心哦～』
			PRINTFORML 「嗯嗯……」
			PRINTFORMW 先代找不到话题、看起来有点尴尬……
		ELSEIF TALENT:恋人
			PRINTFORML
			PRINTFORML 『啊、是先代呢』
			PRINTFORML 「露米娅……有事吗？」
			PRINTFORML 『我能尝尝你吗？』
			PRINTFORML 「当然……不行。」
			PRINTFORMW 先代苦笑着、抱着露米娅
		ELSEIF TALENT:恋慕
			PRINTFORML
			PRINTFORML 「是露米娅酱呢。」
			PRINTFORML 『你好呀、先代。』
			PRINTFORML 「……那么、你在这做什么呢？」
			PRINTFORMW 先代稍稍靠近露米娅身边。
		ELSE
			PRINTFORML
			PRINTFORML 「……你好、露米娅酱」
			PRINTFORML 『嗯？啊、是先代呢……』
			PRINTFORMW 先代和露米娅轻轻打了招呼。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;其他
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1
		IF CFLAG:诶嘿嘿
			PRINTFORML
			PRINTFORML 「有客人来了……」
			PRINTFORMW 先代和%CALLNAME:MASTER%缠绵在一起的时候，察觉到有人过来了。
		ELSEIF TALENT:恋人
			PRINTFORML 「……呼……」
			PRINTFORMW 先代稍稍远离了%CALLNAME:MASTER%、然后理了理衣服。
		ELSEIF TALENT:恋慕
			PRINTFORML 「有客人来了呢……」
			PRINTFORMW 这么说着，先代正坐了一点。
		ELSEIF TALENT:思慕
			PRINTFORML 「客人是谁呢……」
			PRINTFORMW 先代站起来了。
		ELSE
			PRINTFORML 「……哦呀，有谁来了？」
			PRINTFORMW 先代看向了脚步声的来源。
		ENDIF
		RETURN 0
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 0

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORML 「哟、在亲热呢……」
			PRINTFORML 先代微笑着凝视着你。
			PRINTFORML 「没关系哦、%CALLNAME:MASTER%。请继续吧、让我观摩一下」
			PRINTFORMW 听见先代略带阴阳怪气的声音、%CALLNAME:MASTER%从%CALLNAME:ARG%身边离开。
		ELSEIF TALENT:恋慕
			PRINTFORML 「……？」
			PRINTFORML 先代蚌埠住了。
			PRINTFORML 「在这种地方……？」
			PRINTFORMW 先代尴尬笑着这样说道，快步离去了。
		ELSE
			PRINTFORML 「…………」
			PRINTFORML 先代静静地看着你、但那样的眼神让你不寒而栗。
			PRINTFORML 这个视线感觉和针一样啊、%CALLNAME:MASTER%和%CALLNAME:ARG%分开了。
			PRINTFORMW 然后先代转过头、就像什么都没发生一样离开了。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORML 「诶？」
			PRINTFORML 先代向这边注视着。
			PRINTFORML 「……总觉得有点想做了呢」
			PRINTFORMW 小声说着，先代向你走过来了。
		ELSEIF TALENT:恋慕
			PRINTFORML 「哟、很热闹嘛」
			PRINTFORML 先代微笑着看着你。
			PRINTFORML 「……我也可以加入impart吗」
			PRINTFORMW 这么说着、先代向%CALLNAME:MASTER%靠了过来。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORMW 「……？」
			PRINTFORML 先代有些惊讶。
			PRINTFORML 「……喂，适可而止啊？」
			PRINTFORML 先代坐了过来。
			PRINTFORML 「付出同等的爱才行哦」
			PRINTFORML 在耳边吹了一口气、小声地说。
			PRINTFORML 「那么、再见了。」
			PRINTFORMW 先代离开了。
		ELSEIF TALENT:恋慕
			PRINTFORML 「……？」
			PRINTFORML 先代愣了一下、然后用一种奇异的目光看着你。
			PRINTFORML 「……打扰了、再见。」
			PRINTFORMW 这么说着，先代匆匆离去了。
		ELSE
			PRINTFORML 「……」
			PRINTFORML 先代沉默着。
			PRINTFORML 「那好、我不打扰、走了。」
			PRINTFORMW 先代一边微笑着一边离开了。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORML 「诶？impart？」
			PRINTFORML 「嗯……也行……」
			PRINTFORML 先代向%CALLNAME:MASTER%靠过来。
			PRINTFORML 「你不介意吧？」
			PRINTFORMW 当然不会介意的啦，%CALLNAME:MASTER%这样想着。
		ELSEIF TALENT:恋慕
			PRINTFORML 「蛤？」
			PRINTFORML 先代蚌埠住了。
			PRINTFORML 「一起？开impart？」
			PRINTFORMW 最后还是靠了过来、但看上去很不满的样子。
		ELSE
			PRINTFORML 「…………」
			PRINTFORMW 先代有点蚌埠住了、看着%CALLNAME:ARG%，一边向你靠过来。
		ENDIF
		RETURN 0
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 0

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORML 「……？」
			PRINTFORML %CALLNAME:ARG%红着脸注视着你。
			PRINTFORML 「……在这样的地方……」
			PRINTFORMW %CALLNAME:ARG%红着脸点了点头。
		ELSEIF TALENT:恋慕
			PRINTFORML 「……？」
			PRINTFORML %CALLNAME:ARG%脸红了、先代看起来很冷静。
			PRINTFORMW 先代立即离开了%CALLNAME:MASTER%的身体。
		ELSE
			PRINTFORML 「嗯……」
			PRINTFORML %CALLNAME:ARG%满脸通红。
			PRINTFORMW 然后先代也一时间啥也说不出来。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORML 「哟、这不%CALLNAME:ARG%吗」
			PRINTFORMW 「嗯……加入也不介意吗？」
			PRINTFORML 听到先代的话、%CALLNAME:ARG%红着脸靠了过来。
			PRINTFORMW 「……？」
			PRINTFORMW 先代蚌埠住了
		ELSEIF TALENT:恋慕
			PRINTFORML 「呼……」
			PRINTFORML 先代呼出了一口气、然后看着%CALLNAME:ARG%。
			PRINTFORML %CALLNAME:ARG%在先代的注视下满脸通红。
			PRINTFORML 很快%CALLNAME:ARG%向你走了过来。
			PRINTFORML 「……嗯……很有勇气嘛……」
			PRINTFORML 「……要一起吗？」
			PRINTFORML %CALLNAME:ARG%点了点头、湿润的眼睛饱含欲情的地注视着%CALLNAME:MASTER%。
			PRINTFORMW
		ELSE
			PRINTFORML
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋人
			PRINTFORML 「什么、你也要加入？」
			PRINTFORML 先代这么说着、%CALLNAME:ARG%慌慌张张地跑了。
			PRINTFORML 「……哦呀、跑掉了呢……」
			PRINTFORML 被邀请了那样的事、逃跑也是很正常的吧、
			PRINTFORML 「嗯……继续吧？」
			PRINTFORML 先代像什么都没发生过似的、继续做爱做的事。
		ELSEIF TALENT:恋慕
			PRINTFORML
			PRINTFORML 「……？」
			PRINTFORML 先代还没开口、%CALLNAME:ARG%和什么都没发生一样的走了。
			PRINTFORML 「……」
			PRINTFORML 在先代开口前，你再次紧紧地拥抱住%CALLNAME:ARG%。
			PRINTFORML 「嗯……继续吧。」
			PRINTFORMW 先代稍微有点脸红的说道。
		ELSE
			PRINTFORML
			PRINTFORML 「呃……」
			PRINTFORML 在先代还没说话的时候、%CALLNAME:ARG%离开了。
			PRINTFORMW 有点尴尬、先代和%CALLNAME:MASTER%就这么分开了。
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;MASTERに誘われて目撃者も参加
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		IF TALENT:恋人
			PRINTFORML 「一起……做？」
			PRINTFORML 先代投来疑惑的目光。
			PRINTFORML 「这样啊……」
			PRINTFORML 先代长呼一口气、对%CALLNAME:MASTER%说、
			PRINTFORML 「对我还是对%CALLNAME:ARG%、要一视同仁啊。」
			PRINTFORMW 先代拍了拍%CALLNAME:ARG%的肩膀、这么说着。
		ELSEIF TALENT:恋慕
			PRINTFORML 「蛤？」
			PRINTFORML 「开impart什么的……」
			PRINTFORML 先代稍微思考了一下。
			PRINTFORML 「……嗯、那就来吧」
			PRINTFORMW 先代好像又没思考。
		ELSE
			PRINTFORML 「………………」
			PRINTFORMW 先代什么也不说，用一种嘲弄的眼神看着你。
		ENDIF
		RETURN 0
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 0

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERだけ問い詰め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF TALENT:恋人
			PRINTFORMW 「……？」
			PRINTFORML %CALLNAME:MASTER%慌慌张张地解释着。
			PRINTFORMW 「虽然但是、我有眼睛。」
			PRINTFORML 「嗯……这是准备另找枝头？」
			PRINTFORMW 才没那回事。
			PRINTFORML 「答的很快啊……」
			PRINTFORML 先代把脸靠近了%CALLNAME:MASTER%、
			PRINTFORMW 「……外遇的话，我会哭的哦？」
			PRINTFORMW 虽然说着要哭、但是从先代那渗人的笑容上你感觉不寒而栗。
		ELSE
			PRINTFORML 「………………」
			PRINTFORML 先代什么也没有说。
			PRINTFORML 「……嗯……这也算不了多大事。」
			PRINTFORML 先代拍了拍自己的衣袖。
			PRINTFORMW 「别在这人多眼杂的地方秀就行了。」
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;二人とも説教
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORML 「……所以？当众开impart很开心？」
			PRINTFORML 「也不知道会有多少人笑话你们……」
			PRINTFORML 「所以、能不能找个荒无人烟的地方？」
			PRINTFORML 「还有，下次要叫上我、我不介意开impart的。」
			PRINTFORMW 两个人被先代严肃地说教了。
		ELSE
			PRINTFORML 「……该说是胆大呢还是有那种特殊的癖好……」
			PRINTFORML 「至少、请不要像这样正大光明地在一堆人面前秀。」
			PRINTFORML 「不是说不准涩涩……起码也得……」
			PRINTFORMW 两个人正坐并接受着先代的说教。
		ENDIF
		RETURN 0
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 0

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;同じ場所に居て胖次を回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「……还有这种癖好？」
			PRINTFORML 先代无语地看着%CALLNAME:MASTER%手里拿着的胖次
			PRINTFORML 「%CALLNAME:MASTER%、你的兴趣还真是广泛啊……」
			PRINTFORML 不是的……%CALLNAME:MASTER%开始狡辩。
			PRINTFORML 「……胖次……我也不知道该说你什么了……
			PRINTFORMW 得找个机会给人家还回去。」
			PRINTFORMW 先代拿走了%CALLNAME:MASTER%宝贵的胖次、然后收进怀里。
			PRINTFORMW 「再给逮住了可不就这么简单了哦。」
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;遠距離移動中に胖次を回収された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML 「……%CALLNAME:MASTER%」
		PRINTFORMW 先代叫住了%CALLNAME:MASTER%。
		PRINTFORML %CALLNAME:MASTER%猛地停了下来。
		PRINTFORMW 「……嗯……」
		PRINTFORML 先代用视线扫便%CALLNAME:MASTER%身体的各个部位。
		PRINTFORMW 「哟——」
		PRINTFORML 先代一把从%CALLNAME:MASTER%的怀中，扯出一条胖次
		PRINTFORML 「……？」
		PRINTFORMW %CALLNAME:MASTER%飞速地从先代身边逃走了。
		PRINTFORMW 「逃……？这次放你一马。」
		RETURN 0
	ENDIF
	PRINTFORML
ENDIF
RETURN 0

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;うふふ==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを押し倒した（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
        PRINTFORMW  「%CALLNAME:MASTER%、你可真是甜蜜的毒药呢。」
        PRINTFORMW  「我现在已经有些迫不及待了呢。」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW  「是有些不舒服吗……」
			PRINTFORMW  「那么下次再做也是可以的哦～」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW  「呼……大满足啊……」
			PRINTFORMW  「谢谢你、%CALLNAME:MASTER%。」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		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
			PRINTFORMW  「你不能走。」
			PRINTFORMW  「至少、得先满足我～」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORMW  「你不能走。」
			PRINTFORMW  「至少、得先满足我～」
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;誘ってきた（人目につかない場所に行きたがるやつ）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;ARG:1=TARGETの欲求不満度（最高1000）
		;必要ならばこれで分岐を作ってください
		PRINTFORMW  「为什么会感到一股奇怪的感觉呢～」
		PRINTFORMW  「%CALLNAME:MASTER%要不我们一起去墙角研究一下？」
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（怒り）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW  「如果想被当成妖怪退治掉的话、
		PRINTFORMW  那就尽管来吧。」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORMW  「……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORMW  「呼……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORMW  「再继续下去就很不礼貌了。」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;仕事開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML	「去工作了。.」

		IF TALENT:恋慕 || TALENT:恋人
		PRINTFORMW	「哈哈、其实是扫地啦、
		PRINTFORMW  想做什么等会再说哦～」
		ELSEIF TALENT:思慕
		PRINTFORMW	「如果你想来的话、那就来吧。」
		ELSE
		PRINTFORMW	「等会有空了再说吧。」
	ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML	「好多树叶……」
		PRINTFORML	「%CALLNAME:MASTER%？」
		IF TALENT:恋慕 || TALENT:恋人
		PRINTFORMW	「来搭把手可以吗？把这铲子拿一下。」
		ELSEIF TALENT:思慕
		PRINTFORMW	「稍等一下可以吗？」
		ELSE
		PRINTFORMW	「你也来了、是巧合吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;仕事終了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML	「终于扫完了。」
		PRINTFORML	「这下有空了。」
		IF TALENT:恋慕 || TALENT:恋人
		PRINTFORMW	「所以、你是先吃饭、还是……」
		ELSEIF TALENT:思慕
		PRINTFORMW	「灵梦！帮忙把碗洗一下、我马上就过来！」
		PRINTFORMW  『好的、阿妈！』
		ELSE
		PRINTFORMW	「那么、你有什么事吗？」
	ENDIF
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;TCVAR:盗み食い抑制で持っていた食物を食われるのを回避できる
	;仕様例（薬が入ってたら食わない）
	;IF DISH_DRG
	;	TCVAR:盗み食い抑制 = 1
	;ENDIF

	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORMW	「%CALLNAME:MASTER%？自己做的？」
		PRINTFORMW	「看起来还挺好吃的。」
		PRINTFORMW	先代好奇地看了过来。
		PRINTFORMW	「这样、我可以买下来吗？」
		PRINTFORMW	「我肯定不会低价购买的～」
		PRINTFORMW	于是%CALLNAME:MASTER%就把手中的食物交给了先代。
		PRINTFORMW	「味道……还不错～」
		PRINTFORMW	「我也要给灵梦拿一份过去～」
		PRINTFORMW	「但是我这份就先吃掉吧。」
		PRINTFORMW	先代细细品尝着。
		PRINTFORMW  「唔姆、感觉好多了、刚刚快饿死了。」
		IF TALENT:恋慕 || TALENT:恋人
		PRINTFORMW	「嗯、这是说好的价钱。」
		PRINTFORMW  先代从腰包里掏了好一阵、扣出几张大钱、递给%CALLNAME:MASTER%。
		MONEY += 2500
		PRINTFORMW  2500元GET
		PRINTFORMW	「还有、这是额外的奖励～」
		PRINTFORMDL	先代用手抚着%CALLNAME:MASTER%的脸庞、轻轻地吻了上来。
		PRINTFORML	「下次还有这种好事别忘了叫上我哦～」
		ENDIF
		PRINTFORMW	「嗯、这是说好的价钱。」
		PRINTFORMW  先代从腰包里掏了好一阵、扣出几张大钱、递给%CALLNAME:MASTER%。
		MONEY += 2000
		PRINTFORMW  2000元GET
		PRINTFORMW	「下次还有这种好事别忘了叫上我哦～」
		ENDIF
		RETURN 1
	;その他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（押し倒しコマンドに統合？
	;MASTERが押し倒した（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW	「啊？」
		PRINTFORMW	「就这么结束了？」
		PRINTFORMW	「你别跑啊！」
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後のムード
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;添い寝する
;==================================================
@M_KOJO_EVENT_K158_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;パンツ紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚アナル射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精ピルなし
		IF ARG:1 == 1
		;非処女膣内射精ピルあり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K158_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K158_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;あなたの私室変更により同居
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K158_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF CFLAG:318 == 1
			PRINTFORMW 「……那么再见。」
			PRINTFORMW 先代一跃而起、从%CALLNAME:MASTER%身旁迅速离开
		ELSEIF TALENT:恋人
			PRINTFORMW 「嗯……就在这里分开吧。」
			PRINTFORMW 「明天再见吧，『你』。」
			PRINTFORMW 先代悠闲地离开了。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「那我就先回去了。」
			PRINTFORMW 先代背着手离开了、看起来很悠闲的样子。
		ELSEIF TALENT:思慕
			PRINTFORMW 「真晚啊、我先回去了。」
			PRINTFORMW 先代悠闲地离开了
		ELSE
		    PRINTFORMW  「果然还是有点不会用亚空穴啊……」
			PRINTFORMW  先代不知什么时候消失了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318 == 1
			PRINTFORMW 「………呼」
			PRINTFORMW 先代不知不觉地离开了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「那今天和『你』在一起玩得很开心呢。」
			PRINTFORMW 「下次再继续吧，我期待着『你』呢。」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「下次也这么做吧。」
			PRINTFORMW  先代看起来很悠闲地离开了。
		ELSEIF TALENT:思慕
			PRINTFORMW 「太晚了会被灵梦说教的，对不起。」
			PRINTFORMW 先代就那么背着手离开了、看不出来一点急迫的样子。
		ELSE
		    PRINTFORMW  「再不回去的话会让灵梦担心的。」
			PRINTFORMW 先代不知什么时候离开了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF CFLAG:318 == 1
			PRINTFORMW 「……」
			PRINTFORMW 先代不知不觉地离开了。
		ELSEIF TALENT:恋人
			PRINTFORMW 「被『你』特地送行什么的，很开心呢。」
			PRINTFORMW 「在这里就可以了哦～」
		ELSEIF TALENT:恋慕
			PRINTFORMW 「还特地送到这里了呢」
			PRINTFORMW 先代悠闲地离开了……
		ELSEIF TALENT:思慕
			PRINTFORMW 「就这附近吧，明天见吧。」
		ELSE
			PRINTFORMW 「在这里就行了、明天见。」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;-------------------------------------------------
	;デート終了時に部屋に来ないかと誘う（～から部屋に来ないかと誘われた）
	;（来訪キャラのみ,自宅が無いキャラでも発生します）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「行く」を選択（～に誘われるまま、【MASTER】は【TARGET】の部屋へと向かった……）
	;（これが発生すると十中八九押し倒されます）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;部屋に来ないか→「やめとく」を選択（～は心なしか寂しそうだ……）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくないと言い出す（～は今夜は帰りたくないと言い出した…）
	;（来訪キャラの帰宅時に欲求不満と欲望が高いと発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊める」を選択（～は【MASTERの自室】に泊まっていくことになりました）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;今夜は帰りたくない→「泊めない」を選択、または家主が居る（【MASTER】は丁重に断った）
	;（家主が居る＝MASTERの私室に他のキャラの私室を設定している）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;疲れて帰宅（疲れきった～は帰って行きました）
	;（～は疲れ切っている→（入り口）まで送るよ でも発生）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 10
			PRINTFORMW
		ELSE
			PRINTFORMW

		RETURN 1
	ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K158_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	    PRINTFORMW  先代躺在床上、却始终不能睡着。
	    PRINTFORMW  旁边传来灵梦平稳而又细微的呼吸声。
	    PRINTFORMW  ………………
	    PRINTFORMW  …………
	    PRINTFORMW  ……
	    PRINTFORMW  『哈？你是博丽巫女？那我是什么？』
	    PRINTFORMW  『前任博丽巫女？前任不是失踪了吗？』
	    PRINTFORMW  ………………
	    PRINTFORMW  …………
	    PRINTFORMW  ……
	    PRINTFORMW  虽然不记得我了、但我能一眼认得出来。
	    PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
	    PRINTFORMW  『先代、谢谢你了。』
	    PRINTFORMW  『%CALLNAME:MASTER%都不知道跑去哪里了……也不来帮一下忙……』
	    PRINTFORMW  ………………
	    PRINTFORMW  …………
	    PRINTFORMW  ……
	    PRINTFORMW  『阿妈、我想起来了、我全部想起来了……』
	    PRINTFORMW  『能不能不要再离开我了……』
	    PRINTFORMW  ………………
	    PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  头好疼、胸口堵得慌……内心已经被某种情绪填满了。
		PRINTFORMW  我完全不清楚我是怎么失踪的……也不清楚我为什么要失踪……
		PRINTFORMW  但是这么多年……你也受苦了吧……
		PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  『好久都没有和阿妈一起逛祭典了呢♪』
		PRINTFORMW  『什么嘛、我这次抓金鱼可没有小时候那么冒失了啊、
		PRINTFORMW  看我现在给你抓上来！』
		PRINTFORMW  噗通。
		PRINTFORMW  『好丢人、浑身还湿漉漉的……』
		PRINTFORMW  『果然还是阿妈身上最温暖了呢♪』
		PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  「%CALLNAME:MASTER%、今天也辛苦你扫除了呢。」
		PRINTFORMW  『咳咳、那个、%CALLNAME:MASTER%、要不要坐下来一起喝茶。』
		PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  『阿妈、我还能和露米娅还有你像以前那样继续生活下去吗？』
		PRINTFORMW  『阿妈、你说句话啊……』
		PRINTFORMW  『你不要走啊……我好害怕……』
		PRINTFORMW  「……」
		PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  恶心感从胃里翻涌上来了、原来我这么虚伪的吗……
		PRINTFORMW  我的心正在拿着尖刀把我的身体戳得千疮百孔……
		PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  『阿妈、让我多抱一会吧、就一会……』
		PRINTFORMW  『好害怕、好害怕你就像多年之前那样突然消失……』
		PRINTFORMW  ………………
		PRINTFORMW  …………
		PRINTFORMW  ……
		PRINTFORMW  果然还是睡不着……
		PRINTFORMW
		PRINTFORMW  少女移动中……
		PRINTFORMW
		PRINTFORMW 在神社的后面上、清冷的月光照在了先代的脸上。
		PRINTFORMW  月边浓厚的云预示着什么。
		PRINTFORMW 「终究……被这种情感缠绕上了……」
		PRINTFORMW 先代看着眼前的无字墓碑、表情复杂……
		PRINTFORMW 「……我很明白啊……我很清楚啊……还是好疼啊好疼啊好疼啊……」
		PRINTFORMW 先代低声说着，右手不自觉地掩盖了心上、心脏的抽痛不是得知了“自己会死”的消息、而是因为会再也见不到%CALLNAME:MASTER%和灵梦……
		PRINTFORMW 「……%CALLNAME:MASTER%…灵梦……我……对不起……」
		PRINTFORMW 一行清泪从先代脸庞滑落。
		PRINTFORMW  「对不起……对不起、对不起、对不起对不起对不起……」
		PRINTFORMW 这个时代对她的排斥越来越强了。
		PRINTFORMW 「……我果然还是很自私啊……」
		PRINTFORMW 心脏的抽痛越来越强烈了。
		PRINTFORMW 她终究不是属于这个时代的人、她也知道自己的归宿。
		PRINTFORMW 雨水淅淅沥沥地打在先代身上。
		PRINTFORMW 「……%CALLNAME:MASTER%……灵梦……真想一直看着你们呢……」
		PRINTFORMW 那一抹悸动、似乎在宣示着什么。
		PRINTFORMW 无论是在妖怪群中厮杀到身体完全不能动弹为止还是在与各个外面的入侵者的拼死搏斗中、先代都不曾承认痛过……
		PRINTFORMW 「……%CALLNAME:MASTER%……灵梦……」
		PRINTFORMW 泪珠滴落在墓碑前。
		PRINTFORMW 「……我知道的……我知道的……」
		PRINTFORMW 先代的肩膀抽动着。
		PRINTFORMW 「……天下没有不散的宴席……」
		PRINTFORMW 月光洒在先代的身上、先代向前伸出手、想要抓住什么。
		PRINTFORMW 「但我好想把『你』一直抱在怀里啊、%CALLNAME:MASTER%……」
		PRINTFORMW 但是先代又坚决地收回了手。
		PRINTFORMW  「我怎会如此贪心啊……我明明已经有了最珍贵的东西……」
		PRINTFORMW  「灵梦、紫、露米娅、%CALLNAME:MASTER%……」
		PRINTFORMW  「和你们在一起的记忆……我很喜欢哦。」
		PRINTFORMW  「而且、我也能看到灵梦长大后的样子……」
		PRINTFORMW  「好想一直看着啊……」
		PRINTFORMW 「……但过去还需要我……即便那是我的宿命……」
		PRINTFORMW 伤痕累累的手攥成了拳。
		PRINTFORMW 「灵梦、%CALLNAME:MASTER%、我会回去的……为你们开辟未来……这样我也会留在『你』的心底吧……%CALLNAME:MASTER%……」
		PRINTFORMW 先代挤出很勉强的笑容……
		PRINTFORMW 「%CALLNAME:MASTER%……我会在过去……永远释放着对『你』的爱……直到我的血流干、我的骨成灰……」
		PRINTFORMW 先代孤独地坐在无字墓碑前、在月光相伴下宣告着自己的爱的誓言……
		PRINTFORMW 雨越来越大、先代依然沉默地站在那里……
		PRINTFORMW 雨滴突然不再掉落在头上了。
		PRINTFORMW 是灵梦、灵梦穿着洁白的睡衣打着一把雨伞站在先代背后。
		PRINTFORMW 『阿妈、不要这么勉强自己了……』
		PRINTFORMW 灵梦柔软的胸脯紧紧贴在先代的背后、似乎这样就能用自己的体温驱走先代身上的寒冷。
		PRINTFORMW 「可是……我……」
		PRINTFORMW 『另一个我还有露米娅还在过去等着你呢……我……我也不能这么自私不是？』
		PRINTFORMW 灵梦把下巴托在先代的肩膀上。
		PRINTFORMW 『阿妈、你的努力我可是一直都看着的哦……』
		PRINTFORMW 『而且、而且你在十年前丢下我的时候一定是遇上什么大麻烦了……』
		PRINTFORMW 『所以……我也从来没有怨恨过你、也没有讨厌你……』
		PRINTFORMW 不知不觉间、泪水沾在了先代的胸前……
		PRINTFORMW 『阿妈……答应我……答应我好吗？』
		PRINTFORMW 『要活着解决这个大麻烦……一定要哦……』
		PRINTFORMW 灵梦已经完全压抑不住情感、泪水像是决了洪的堤。
		PRINTFORMW 「好…为了你、为了露米娅、为了%CALLNAME:MASTER%……」
		PRINTFORMW 「我会拼尽全力活下来的。」
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW 「所以、不要哭出来哦？你这个样子被%CALLNAME:MASTER%看到的话是会被笑话的。」
		CFLAG:1158 += 10
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		PRINTFORMW 「……就这么停下吧……」
		PRINTFORMW 先代自言自语着。
		PRINTFORMW 「……%CALLNAME:MASTER%……抱歉……」
		PRINTFORMW 多久了呢、从只有鲜血和杀害的日子里解脱。
		PRINTFORMW 这样一成不变的、平和的日子、一直持续着。
		PRINTFORMW
		PRINTFORMW 「……真想一直待下去啊……」
		PRINTFORMW 不知怎的、她又想到了%CALLNAME:MASTER%。
		PRINTFORMW 心底深处的悸动在告诉她、那家伙已经在她的心底扎根了……
		PRINTFORMW 「……真是……不愉快啊……」
		PRINTFORMW 先代闭着眼睛让自己冷静下来。
		PRINTFORMW 「……到底从什么时候开始的……」
		PRINTFORMW 思考那种事也没有意义了。
		PRINTFORMW 「……这种感觉……这种感觉……」
		PRINTFORMW 先代脸上露出了一丝不易察觉的厌恶。
		PRINTFORMW 「……呼……只能走一步看一步了……」
		PRINTFORMW 她闭上了眼、
		PRINTFORMW 但在完全睡着之前、先代的脑海里一直浮现着%CALLNAME:MASTER%……
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		PRINTFORMW 「……%CALLNAME:MASTER%……呼……」
		PRINTFORMW 先代看着自己的双手……
		PRINTFORMW 「……不管身体再迟钝……也会有感觉啊……」
		PRINTFORMW 先代露出了甜甜的笑容。
		PRINTFORMW 「这样的感觉……真的很舒服啊……」
	    PRINTFORMW 先代眼前莫名浮现了与%CALLNAME:MASTER%生活的点点滴滴。
		PRINTFORMW 头发上感觉到的呼吸、
		PRINTFORMW 耳朵被牙齿轻轻夹着、
		PRINTFORMW 互相用舌头品尝对方、
		PRINTFORMW 交换唾液、闻着对方的鼻息。
		PRINTFORMW 埋头深深用舌头品尝侧颈。
		PRINTFORMW 腋下、也被不厌其烦地舔舐着。
		PRINTFORMW 然后把头埋进胸部
		PRINTFORMW 慢慢的享受体香。
		PRINTFORMW 轻柔地揉着胸部。
		PRINTFORMW 手指轻轻拨弄乳头。
		PRINTFORMW 用舌头吸吮着乳头。
		PRINTFORMW 闻着近在咫尺的奶香。
		PRINTFORMW 手指在肌肤划过。
		PRINTFORMW 慢慢的在阴核摩挲。
		PRINTFORMW 轻轻的用手指探入蜜穴
		PRINTFORMW 然后用舌头品尝着。
		PRINTFORMW 把舌头伸进所能到达最深的地方。
		PRINTFORMW 肩膀、侧乳、肚子、大腿内侧……
		PRINTFORMW 身体的每个角落，都被充分品尝。
		PRINTFORMW 在令人失去理智的诱惑后。
		PRINTFORMW 昂然挺起的阴茎插进了蜜穴。
		PRINTFORMW 无数次激烈地抽插。
		PRINTFORMW 即使达到了高潮也无法停止。
		PRINTFORMW 射精、射精、射精。
		PRINTFORMW 大量的精液冲撞着子宫。
		PRINTFORMW 不怀孕不罢休一样。
		PRINTFORMW 很舒服。
		PRINTFORMW 至少、这几十年的孤独有了一瞬间的发泄。
		PRINTFORMW
		PRINTFORMW 「哈、嗯、啊啊啊、嗯」
		PRINTFORMW 房间里，充满诱惑的娇喘响起。
		PRINTFORMW 先代一边想着、一边向蜜穴伸出手。
		PRINTFORMW 「果然……」
		PRINTFORMW 「被破坏到这种程度的身体……」
		PRINTFORMW 用另一只手，玩弄着乳头……
		PRINTFORMW 「嗯……嗯……」
		PRINTFORMW  先代的手速越来越快。
		PRINTFORMW  但被破坏了无数次、新生了无数次的身体、哪还会有少女的快感。
		PRINTFORMW  无论怎么激烈地摆弄身体。
		PRINTFORMW  无论怎么激烈地爱着自己。
		PRINTFORMW  这强烈的肉体渴求，无法抑制不了。
		PRINTFORMW 「%CALLNAME:MASTER%、%CALLNAME:MASTER%……」
		PRINTFORMW  身体想被%CALLNAME:MASTER%触摸
		PRINTFORMW  身体想被%CALLNAME:MASTER%吸吮。
		PRINTFORMW  身体想被%CALLNAME:MASTER%插入。
		PRINTFORMW  嗯呀—— 湿的一塌糊涂了——
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW
		PRINTFORMW  并没有、看着一点湿润都没有的蜜穴、先代的脸色有了一丝落寞。
		PRINTFORMW  然后、先代静悄悄地钻入了被窝。
		PRINTFORMW  将不知足的饥渴隐藏在身体里，先代闭上了眼睛……
		PRINTFORMW
	    PRINTFORMW
	    PRINTFORMW
	    PRINTFORMW  「%CALLNAME:MASTER%……你可真是甜蜜的毒药呢。」
		EXP:自慰経験 += 1
		EXP:Ｃ経験 += 1
		EXP:Ｂ経験 += 1
		EXP:Ｃ絶頂経験 += 1
		EXP:Ｂ絶頂経験 += 1
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		IF !TALENT:恋慕
			PRINTFORML
			PRINTFORMW 「……呼……」
			PRINTFORMW 先代长呼了一口气……
			PRINTFORMW 「……真想拥抱『你』啊……」
			PRINTFORMW 先代想着那时的欢愉……
			PRINTFORMW 「……嗯……得稍稍节制一下了……」
			PRINTFORMW 这么说着，先代坐在床上。
			PRINTFORMW 不知怎的、先代的脑海一直浮现着%CALLNAME:MASTER%的容貌……
			RETURN 0
		ELSE
			PRINTFORML
			PRINTFORMW 「……哦呀……」
			PRINTFORMW 先代在自己的房间里，满足地微笑着。
			PRINTFORMW 「……那么激烈的%CALLNAME:MASTER%……终于……」
			PRINTFORMW 先代的脸颊染上了一抹绯红。
			PRINTFORMW 「……嗯……不应该啊……」
			PRINTFORMW 先代脸色微变。
			PRINTFORMW 「……为什么……」
			PRINTFORMW 「……为什么你会在我内心占有一席之地……」
			PRINTFORMW 先代露出阴沉的表情自言自语道。
			PRINTFORMW 「……%CALLNAME:MASTER%……」
			PRINTFORMW 先代沉默了一下、躺在床上。
			PRINTFORMW 「我们不合适的……」
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		PRINTFORMW 「……稍微有点舒服呢……」
		PRINTFORMW 先代把手枕在脑后如此想着。
		PRINTFORMW 「%CALLNAME:MASTER%的手段还真是激进啊……」
		PRINTFORMW 想着那种事，原本钝感的身体也出现了一点异样。
		PRINTFORMW 「……嗯……那么……」
		PRINTFORMW 先代看着天花板自言自语道。
		PRINTFORMW 「……这样太直接了吧……」
		PRINTFORMW 身体深处的在渴望着。
		PRINTFORMW 「……但是……」
		PRINTFORMW 先代压制住了对蜜穴出手的想法
		PRINTFORMW 「……明天只做一次……嗯……」
		PRINTFORMW 先代清楚地明白自己想要什么、于是就安稳地睡着了
		RETURN 0
	ENDIF
ENDIF
RETURN 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;キス魔取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰狂い取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;ポルチオ性感取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;おもらし癖取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORML
		RETURN 1
	ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K158_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;その他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;その他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K158_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K158_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K158_25(ARG,ARG:1)
;口上主はLOCAL
;ARG:1	何人目の子供か
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;その他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;特別な日イベント用関数
;==================================================
;-------------------------------------------------
@SPECIALDAY_EVENT_K158
;-------------------------------------------------
	;謹賀新年
	IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
		IF TALENT:恋人
			PRINTFORMW 「新年快乐，%CALLNAME:MASTER%」
			PRINTFORMW 先代微笑着说了新年的寒暄。
			PRINTFORMW 「又是一年，请多关照哦。」
			PRINTFORMW  语毕、先代便轻轻地吻了%CALLNAME:MASTER%的脸颊。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「新年快乐，%CALLNAME:MASTER%」
			PRINTFORMW 先代微笑着说了新年的寒暄。
			PRINTFORMW 「祝『你』度过愉快的一年呢。」
		ELSEIF TALENT:思慕
			PRINTFORMW 「新年快乐！」
			PRINTFORMW 先代微笑着说了新年的寒暄。
			PRINTFORMW 「%CALLNAME:MASTER%、今年的理想是什么？」
			PRINTFORMW  %CALLNAME:MASTER%向先代诉说了新年的理想。
			PRINTFORMW  先代突然靠近、吻了一下%CALLNAME:MASTER%。
			PRINTFORMW  「希望这个胜利之吻能助「你」完成自己的理想呢。」
		ELSE
			PRINTFORMW 「新年快乐！今年也请多多指教」
		ENDIF
	;情人節
	ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
		IF TALENT:恋人
			PRINTFORMW 「喂、%CALLNAME:MASTER%、」
			PRINTFORMW 先代轻轻地拉了一下%CALLNAME:MASTER%的衣袖。
		ELSEIF TALENT:恋慕
			PRINTFORMW 「呼、%CALLNAME:MASTER%，这个给你」
		    PRINTFORMW  先代从后面拍了拍%CALLNAME:MASTER%的肩膀。
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%，记得今天是什么日子吗？」
			PRINTFORMW  先代高兴地站在%CALLNAME:MASTER%的面前。
		ELSEIF CFLAG:2 >= 1000
			PRINTFORMW 「%CALLNAME:MASTER%，把手伸出来、闭眼、我有东西要给你。」
		ENDIF
		SELECTCASE CFLAG:好感度
		CASE 1000 TO 3000
			PRINTFORMW 「是巧克力哦。」
			PRINTFORMW 先代给了巧克力。
			PRINTFORMW 「嗯……这巧克力应该合你的口味吧。」
			PRINTFORMW  %CALLNAME:MASTER%看了一眼手上的巧克力。
			PRINTFORMW  看起来做工精美、但是、
			PRINTFORMW  %CALLNAME:MASTER%在巧克力的背面发现了人里某家甜品店的商标。
			PRINTFORMW  「啊啊、那个、那个是我买的最好的类型哦。」
			PRINTFORMW  %CALLNAME:MASTER%回想了一下、
			PRINTFORMW  这种巧克力……好像是因为保质期的问题正在特价出售……
			PRINTFORMW  %CALLNAME:MASTER%抬起头看着目光期待的先代、没有说出口……
		CASE 3001 TO 5000
			PRINTFORMW 先代把巧克力交给了%CALLNAME:MASTER%。
			PRINTFORMW 「呼……亏你还记得今天是什么日子。」
			PRINTFORMW 然后先代急匆匆地走远了。
			PRINTFORMW  %CALLNAME:MASTER%看了一眼手上的巧克力。
			PRINTFORMW  好像是人里某家甜品店的最高档的巧克力、价格还不低的样子。
		CASE IS > 5000
			IF EXP:愛情経験 >= 100
				PRINTFORMW 「呼……这是我手工制作的。」
				PRINTFORMW 先代慎重地把巧克力交给了%CALLNAME:MASTER%。
				PRINTFORMW 「绝对……或许……大概会很好吃？」
				PRINTFORMW  %CALLNAME:MASTER%看了一眼手上的巧克力。
				PRINTFORMW  大约有巴掌大、上面有一个%CALLNAME:MASTER%肖像的雕花、看起来很精细。
				PRINTFORMW  先代看起来用了很大的精力去雕花吧。
				PRINTFORMW  %CALLNAME:MASTER%尝了一下。
				PRINTFORMW  嘴里回荡着巧克力、牛奶的味道、巧克力本身的口感也很顺滑、
				PRINTFORMW  细细品尝一下、%CALLNAME:MASTER%感觉到了一股淡淡的清酒味。
				PRINTFORMW  这巧克力太好吃了。
				PRINTFORMW  看着赞不绝口的%CALLNAME:MASTER%、紧张着的先代终于放松下来、脸上浮现了一抹红晕……
			ELSE
				PRINTFORMW 「嗯……是巧克力哦。」
				PRINTFORMW 先代慎重地把巧克力交给了%CALLNAME:MASTER%。
				PRINTFORMW 「我拜托紫从外界带来的东西，尽情享受吧。」
				PRINTFORMW  %CALLNAME:MASTER%看着手上的巧克力。
				PRINTFORMW  是外界的一个名牌巧克力、因为主打的是奢侈感、所以在做工精美的同时也特别贵、就算是%CALLNAME:MASTER%要买这巧克力也要精打细算好一阵日子。
				PRINTFORMW  %CALLNAME:MASTER%尝了一下、味道很一般。
			ENDIF
		ENDSELECT
	;萬聖節
	ELSEIF DAY:2 == 3 && DAY:3 == 30
		IF TALENT:恋人
			PRINTFORMW 「万圣节好……%CALLNAME:MASTER%。」
			PRINTFORMW 先代挠着后脑勺向%CALLNAME:MASTER%说话。
			PRINTFORMW 「这是你的礼物～」
			PRINTFORMW  先代好像理解错了万圣节的意思……
			PRINTFORMW  然后先代突然上前和%CALLNAME:MASTER%吻在了一起、舌尖在互相碰撞。
			PRINTFORMW  先代悄悄将一样东西塞到了%CALLNAME:MASTER%的手里。
			PRINTFORMW  再然后就快速地走开了。
		SELECTCASE RAND:5
	CASE 0
	    PRINTFORMW  %CALLNAME:MASTER%张开了手、里面是一些糖、上面还残留着先代的体温……
	    CALL GET_ITEM("糖", 10, 1)
	CASE 1
	    PRINTFORMW  %CALLNAME:MASTER%看向手、里面是一瓶運動飲料……
	    CALL GET_ITEM("運動飲料", 1, 1)
	CASE 2
	    PRINTFORMW  %CALLNAME:MASTER%张开了手、里面是一些恢复元気的薬……
	    CALL GET_ITEM("恢复元気的薬", 2, 1)
	CASE 3
	    PRINTFORMW  %CALLNAME:MASTER%看向手、里面是一瓶神酒……
	    CALL GET_ITEM("神酒", 1, 1)
	CASE 4
	    PRINTFORMW  %CALLNAME:MASTER%看向手、里面是一瓶精力剤『天元凸破』……
	    CALL GET_ITEM("精力剤『天元凸破』", 1, 1)
	    ENDSELECT
		ELSEIF TALENT:恋慕
						PRINTFORMW 「万圣节好……%CALLNAME:MASTER%。」
			PRINTFORMW 先代挠着后脑勺向%CALLNAME:MASTER%说话。
			PRINTFORMW 「我不太了解万圣节……不过好像是先辈要给后辈礼物？」
			PRINTFORMW  先代上前轻轻吻了%CALLNAME:MASTER%一下。
			PRINTFORMW  然后悄悄将一样东西塞到了%CALLNAME:MASTER%的手里。
			PRINTFORMW  再然后就快速地走开了。
	    SELECTCASE RAND:3
	CASE 0
	    PRINTFORMW  %CALLNAME:MASTER%张开了手、里面是一些糖、上面还残留着先代的体温……
	    CALL GET_ITEM("糖", 10, 1)
	CASE 1
	    PRINTFORMW  %CALLNAME:MASTER%看向手、里面是一瓶運動飲料……
	    CALL GET_ITEM("運動飲料", 1, 1)
	CASE 2
	    PRINTFORMW  %CALLNAME:MASTER%张开了手、里面是一个恢复元気的薬……
	    CALL GET_ITEM("恢复元気的薬", 1, 1)
        ENDSELECT
		ELSEIF TALENT:思慕
			PRINTFORMW 「万圣节好……？」
			PRINTFORMW 先代迷惑地看向%CALLNAME:MASTER%。
			PRINTFORMW 「%CALLNAME:MASTER%、要恶作剧吗？」
		ELSE
			PRINTFORMW 「万圣节？」
			PRINTFORMW 先代茫然地看着%CALLNAME:MASTER%
			PRINTFORMW 「那是什么？」
		ENDIF
	;聖誕節
	ELSEIF DAY:2 == 4 && DAY:3 == 25
		IF TALENT:恋人
			PRINTFORMW 「%CALLNAME:MASTER%、圣诞节快乐」
			PRINTFORMW 先代开心地向%CALLNAME:MASTER%搭话。
			PRINTFORMW 「想要礼物吗？」
			PRINTFORMW  先代贴近了%CALLNAME:MASTER%、不知道为什么、先代的衣领拉得特别开、里面的美乳若隐若现……
			PRINTFORMW  「你的礼物……就是我哦～」
			CALL GET_ITEM("圣诞节禮物", 1, 1)
		ELSEIF TALENT:恋慕
			PRINTFORMW 「圣诞快乐～%CALLNAME:MASTER%。」
			PRINTFORMW 先代高兴地看着%CALLNAME:MASTER%。
			PRINTFORMW 「方便的话约会吗？来幻想乡这么久了我还是第一次正式过圣诞节呢。」
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%、圣诞节快乐」
			PRINTFORMW 先代向%CALLNAME:MASTER%打了招呼。
			PRINTFORMW 「%CALLNAME:MASTER%有什么特别的安排吗？」
		ELSE
			PRINTFORMW 「圣诞节快乐，%CALLNAME:MASTER%」
			PRINTFORMW 先代向%CALLNAME:MASTER%打了招呼。
			PRINTFORMW 「……给灵梦准备什么礼物呢……」
			PRINTFORMW  先代自言自语道。
		ENDIF
	ENDIF
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K158_26(ARG,ARG:1)

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

;オナバレックス判定用関数
;RETURN -1で強制失敗、RETURN 1で強制成功
@M_KOJO_EVENT_K158_26_1(ARGS)
#DIM 補正値
IF ARGS == "どうぞそのまま"

ELSEIF ARGS == "二人で"

ENDIF

;使用例
;IF !TALENT:XX:恋慕
;	PRINTFORMW %CALLNAME:XX%はガードが堅いぞ！
;	RETURN -1
;ENDIF
;IF TALENT:MASTER:濃厚精液
;	PRINTFORMW %CALLNAME:XX%はちんぽに弱いぞ！
;	RETURN 1
;ENDIF
;==================================================
;对方的约会邀请
;==================================================
@M_KOJO_EVENT_K158_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

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

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

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

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

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

;==================================================
;自由行動中
;ARG:1      0=行動中,1=完了時
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_EVENT_K158_32(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 0
		;▼考え事,（～は考えに耽っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 1
		;▼遊ぶ,（～は走り回っている。）
		;※[幼稚]持ちのみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 2
		;▼食事,（～は食事を摂っている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 3
		;▼つまみ食い（～はこっそりつまみ食いをしている。）
		;※[妖精]持ちとルーミア、こいし、幽々子、紫苑のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 4
		;▼掃除,（～はテキパキと部屋の掃除をしている。）
		;※[掃除係]持ちまたは汚臭耐性-1以下のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 5
		;▼運動,（～は張り切って運動している。）
		;※[音楽知識]持ちは除く（演奏になる）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 6
		;▼読書,（～は黙々と本を読んでいる。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 7
		;▼料理,
		IF !ARG:1
			;行動中
			IF Activity_Duration:TARGET > 30
				;料理中（～は軽快に料理をしている。）
				PRINTFORML
			ELSE
				;食事中（～は作った料理を食べている。）
				PRINTFORML
			ENDIF
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 8
		;▼演奏
		;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
		;1,～は小気味よく演奏している。
		;2,～は気ままに歌っている。
		;3,～は華麗に踊っている。
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 9
		;▼採集,（～使える素材を探している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 10
		;▼釣り,（～はのんびり釣りをしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 11
		;▼実験,（～は怪しい実験をしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 12
		;▼のんびり,（～はのんびりしている。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 13
		;▼晩酌,（～はまったりとお酒を飲んでいる。）
		;※酒耐性0以上のみ
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 14
		;▼買い物,（～は気ままに買い物している。）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 15
		;▼説教,（～はじっと聞いている…）
		;※神霊・蓬莱人は除く
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 16
		;▼落とし穴,（～は落とし穴を増やしている）
		;※三月精・チルノ・クラウンピースのみ
		;それ以外は落ちる側
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時,
			;（仕掛け人（失敗時）,誰も引っかからないので～は飽きてしまったようだ…）
			;（落ちた側（戦闘能力2～4）,～はすぐに穴から飛び出して周りをキョロキョロ見回している…）
			PRINTFORML
		ENDIF
	CASE 17
		;▼雪だるま作り（～は雪を集めている）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	CASE 18
		;▼炬燵でのんびり（～は炬燵に入って温まっている）
		IF !ARG:1
			;行動中
			PRINTFORML
		ELSE
			;完了時
			PRINTFORML
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;ハッピーニューイヤー
;年越しの瞬間に同じ部屋に居ると発生
;==================================================
@M_KOJO_EVENT_K158_33(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;技能レベルアップ
;各ABL値はレベルアップ後の値になってます
;==================================================
@M_KOJO_EVENT_K158_34(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
	CASE 1
		;戦闘技能
		PRINTFORMW
	CASE 2
		;話術技能
		PRINTFORMW
	CASE 3
		;清掃技能
		PRINTFORMW
	CASE 4
		;教養
		PRINTFORMW
	CASE 5
		;料理技能
		PRINTFORMW
	CASE 6
		;採集Lv
		PRINTFORMW
	CASE 7
		IF ARG:1 == 0
			;音楽技能
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【音楽知識】取得
			PRINTFORMW
		ELSEIF ARG:1 == 2
			;【相対音感】取得
			PRINTFORMW
		ENDIF
	CASE 8
		;釣りLv
		PRINTFORMW
	CASE 9
		IF ARG:1 == 0
			;調合Lv
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【調合知識】取得
			PRINTFORMW
		ENDIF
	CASE 10
		;伐採Lv
		PRINTFORMW
	CASE 11
		IF ARG:1 == 0
			;指
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【器用な指】取得
			PRINTFORMW
		ENDIF
	CASE 12
		IF ARG:1 == 0
			;舌
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【舌使い】取得
			PRINTFORMW
		ENDIF
	CASE 13
		IF ARG:1 == 0
			;胸
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【淫乳】取得
			PRINTFORMW
		ENDIF
	CASE 14
		;腰
		PRINTFORMW
	CASE 15
		IF ARG:1 == 0
			;膣
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【淫壺】取得
			PRINTFORMW
		ENDIF
	CASE 16
		IF ARG:1 == 0
			;アナル
			PRINTFORMW
		ELSEIF ARG:1 == 1
			;【尻穴狂い】取得
			PRINTFORMW
		ENDIF
	ENDSELECT
	PRINTL
ENDIF
RETURN 1

;==================================================
;デイリーイベント2,夢精
;親密5以上で発生（来訪キャラのみ）
;▼地の文--------------------------------------------------
;【MASTER】が夢精で汚した下着を洗っていると【TARGET】が飛んできた！
;【TARGET】はそんなもの他の洗濯物と一緒に洗わないでと抗議すると、【MASTER】の手に収まった下着をふんだくり戻っていった…
;【TARGET】　欲情の珠＋1000
;==================================================
@M_KOJO_DAILY_EVENT_K158_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;※コメントアウトすると欲情の珠＋1000（JUEL:11 += 1000）もカットされるので注意
CALL DAILY_MESSAGE_2(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント4,物思い
;濃厚精液状態で発生
;▼地の文--------------------------------------------------
;とりとめもない思考に耽っていた【TARGET】は、いつの間にか【MASTER】のことを考えていたことに気づいた
;【TARGET】は明日【MASTER】に会いに行くことにしたようだ
;==================================================
@M_KOJO_DAILY_EVENT_K158_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
CALL DAILY_MESSAGE_4(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1

;==================================================
;デイリーイベント12,特訓
;信頼100以上で発生（拠点キャラのみ）
;==================================================
@M_KOJO_DAILY_EVENT_K158_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;地の文を変えたければコメントアウト
;コメントアウトできるのはARG:1=1,2のみです
CALL DAILY_MESSAGE_12(ARG, ARG:1, ARG:2, ARG:3, ARG:4, ARGS:1, ARGS:2)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG:1
	CASE 1
		;特訓を頼まれる
		;～から新技の訓練に付き合って欲しいと言われた
		PRINTFORML
	CASE 2
		;断る
		;～は残念そうだ
		PRINTFORML
	CASE 3
		;～の攻撃！
		;※ここはWAITしないでください
		PRINTFORML
	CASE 4
		IF ARG:2
			;時間停止して回避
			PRINTFORML
		ELSE
			;回避成功
			PRINTFORML
		ENDIF
	CASE 5
		;回避失敗
		PRINTFORML
	ENDSELECT
ENDIF
RETURN 1

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

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

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

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

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

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

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_K158_LOST_VIRGIN_STOP
;-------------------------------------------------
PRINTFORML
RETURN 1

;-------------------------------------------------
;CFLAG:口上内抱き寄せ判定_初回がオンになっている場合のみ有効。
;初めて押し倒した時、ここでRETURN -1すると押し倒しを強制的にキャンセルします。
;RETURN 0なら通常の判定を行い、RETURN 1すると無条件に成功させます。
;特定のイベント（デート帰りキスなど）を見るまでうふふできないようにしたいときなどにどうぞ。
;-------------------------------------------------
@M_KOJO_EVENT_K158_PERMISSION_1
;-------------------------------------------------
PRINTFORML
;RETURN -1
RETURN 0
;RETURN 1
;-------------------------------------------------

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

;-------------------------------------------------
;部屋描写用関数
;口上キャラのOMANEKIBEYAか拠点の描写に使います
;記入する際はコメントアウトを外してください
;-------------------------------------------------
;@K158_ROOM_DESCRIPTION
;PRINTFORML 例）生活感のない殺風景な部屋だ
;-------------------------------------------------

;==================================================
;贈り物イベント
;==================================================
@M_KOJO_EVENT_K158_GIFT(ARG, GIFT_ID, 評価点, GIFT_NAME, SENSE)
#DIM GIFT_ID
#DIM 評価点
#DIMS GIFT_NAME
#DIMS SENSE
;---------------------------------------------------------------------------------------------------
;評価点       贈り物の評価点（1～999）,口上主があげた場合でも口上主の評価点
;GIFT_NAME    贈り物の名称
;SENSE        贈り物に設定された属性。STRCOUNT(DISH_TASTE, "ほげほげ/")を使うと特定の属性を判定できます。
;GIFT_ID      これ単体では使いません。以下の式内関数を使うとデータを抽出できます（こだわりたい人用）
;　GET_GIFTDATA(GIFT_ID, "回数")    貰った（あげた）回数
;　GET_GIFTDATA(GIFT_ID, "得点")    得点（1～999）,口上テンプレ内では用意されてます。
;　GET_GIFTDATA(GIFT_ID, "日付")    貰った（あげた）日付（1～9999）
;　GET_GIFTDATA(GIFT_ID, "場所")    買った場所（デートの行き先）
;　GET_GIFTDATA(GIFT_ID, "形容詞")  形容詞番号（贈り物_形容詞.erb参照）
;　GET_GIFTDATA(GIFT_ID, "本体")    本体番号（贈り物_本体.erb参照）
;--------------------------------------------------------------------------------------------------
;デート帰りに口上主があなたに贈り物を渡す（陥落や好感度に関わらず親密5以上から発生）
;評価点は701～999（渡すキャラ本人の評価）
;--------------------------------------------------------------------------------------------------
IF ARG == 1
	;PRINTFORMW 「%GIFT_NAME%をあげるから大事に使って」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物を大事にする（700点以上）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 2
	;IF STRCOUNT(SENSE, "かわいい/")
	;	PRINTFORMW 「かわいいプレゼントを貰っちゃった」
	;ELSEIF 評価点 >= 800
	;	PRINTFORMW 「とっても素敵なプレゼントを貰っちゃった」
	;ELSE
	;	PRINTFORMW 「素敵なプレゼントを貰っちゃった」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をお気に入りにする（↑の大事にするから続き）（700点以上かつ最高得点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 3
	;IF STRCOUNT(SENSE, "身につける/")
	;	PRINTFORMW 「明日からこれを付けて行こうっと」
	;ELSE
	;	PRINTFORMW 「明日からこれを持って行こうっと」
	;ENDIF
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をとりあえず保管する（400～699点）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 4
	;PRINTFORMW 「とりあえず飾っておこう」
	RETURN 1
;--------------------------------------------------------------------------------------------------
;一日の終わりに今日貰った贈り物をこっそり質に入れる（400点未満）
;--------------------------------------------------------------------------------------------------
ELSEIF ARG == 5
	;PRINTFORMW 「私これ嫌いなのよね～」
	RETURN 1
ENDIF
RETURN 1

;==================================================
;ムシバトル
;ムシバトルの口上は少し特殊で、PRINTを使うのではなく、
;台詞一行のみをRESULTSに入れてください
;ムシの名前は %MUSHI_NAME% で表示できます
;ムシの名前の最長はアレキサンドラトリバネアゲハの全角14文字です
;文字数制限があります。はみ出ないように気をつけてください
;ARGは残りムシ数か順位です
;==================================================
@M_KOJO_MESSAGE_COM_K158_MUSHI_BATTLE(ARGS, ARG)
#DIM 残りムシ数
#DIM 順位
SELECTCASE ARGS
CASE "試合前"
	;-------------------------------------------------
	;キャラセレクト時,ARGは使えません
	;全角50文字くらいまで
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばしてさしあげますわ！」
	ENDIF
CASE "戦場に出した"
	;-------------------------------------------------
	;"【（キャラ）】は《（ムシ）》を戦場に出した！」"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%MUSHI_NAME%！キミにきめた！」
	ENDIF
CASE "攻撃時"
	;-------------------------------------------------
	;"【（キャラ）】《（ムシ）》の『（攻撃名）』！」"の直前
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ぶっとばせ！%MUSHI_NAME%！」
	ENDIF
CASE "倒れた時"
	;-------------------------------------------------
	;"【（キャラ）】《（ムシ）》は倒れた！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「ああっ！私の%MUSHI_NAME%がっ！」
	ENDIF
CASE "敗退時"
	;-------------------------------------------------
	;"【（キャラ）】敗退！！"の直後
	;全角40文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	残りムシ数 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のムシが全滅めつめつ……」
	ENDIF
CASE "タイマン：勝ち"
	;-------------------------------------------------
	;順位は1位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%よわーい！」
	ENDIF
CASE "タイマン：負け"
	;-------------------------------------------------
	;順位は2位
	;全角20文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「%CALLNAME:MASTER%つよーい！」
	ENDIF
CASE "バトルロイヤル：優勝"
	;-------------------------------------------------
	;順位は1位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「やったー！」
	ENDIF
CASE "バトルロイヤル：２位以下"
	;-------------------------------------------------
	;順位は2～4位
	;全角30文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「くやし～！」
	ENDIF
CASE "チーム戦：勝ち"
	;-------------------------------------------------
	;順位は1位（やられていても）
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「私のおかげね！」
	ENDIF
CASE "チーム戦：負け"
	;-------------------------------------------------
	;順位は2位
	;全角32文字まで（カギカッコ含む）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	順位 = ARG
	;-------------------------------------------------
	IF LOCAL:1
;		RESULTS = 「味方が弱い！！」
	ENDIF
ENDSELECT
SIF RESULTS != ""
	RETURN 1

;==================================================
;引力操作
;TCVAR:引力点に場所IDを入れるとその地点に引っ張られていきます
;場所IDと同じ拠点マップでしか効果はありません（博麗神社の境内なら拠点が博麗神社のときだけ）
;条件を付けないと永久に引っ張られ続けるので注意
;RANDは基本的に使えません。CFLAG:今日の運勢にその日のランダム数値（0～999）が入っているのでこれを使うと良いです
;==================================================
@M_KOJO_EVENT_K158_GRAVITY(ARG)

SIF 0
	TCVAR:引力点 = 0

;▼共通設定で使われているサンプル
[SKIPSTART]
	;平日の昼間はランダムで遊びに行く
	IF YOUBI_MATCH(DAY, "月火水木金") && INRANGE(TIME, 600, 960)
		SELECTCASE CFLAG:今日の運勢 % 5
		CASE 1
			TCVAR:引力点 = P2境内
		CASE 2
			TCVAR:引力点 = P10縁側
		CASE 3
			TCVAR:引力点 = P11庭
		CASE 4
			TCVAR:引力点 = P25鎮守の森
		CASEELSE
			TCVAR:引力点 = 0
		ENDSELECT
	ENDIF
	;水木曜日に2分の1の確率で遊びに行く
	SIF YOUBI_MATCH(DAY, "水木") && INRANGE(TIME, 720, 1020) && CFLAG:今日の運勢 % 2 == 0
		TCVAR:引力点 = P213鈴奈庵
	;特定の人物が特定の場所にいるとそこへ引っ張られる
		SIF CFLAG:[[白蓮]]:現在位置 == P103本堂 && !CFLAG:[[白蓮]]:うふふ && SHIRAHU([[白蓮]])
			TCVAR:引力点 = P103本堂
	;土日に10分の1の確率で特定の人物にくっついてまわる
	SIF YOUBI_MATCH(DAY, "土日") && CFLAG:今日の運勢 % 10 == 0 && !CFLAG:[[さとり]]:うふふ && SHIRAHU([[さとり]])
		TCVAR:引力点 = CFLAG:[[さとり]]:現在位置
[SKIPEND]

;==================================================
;スイカ割り
;スイカ割りの口上はムシバトル同様、PRINTを使うのではなく、
;台詞一行のみをRESULTSに入れてください
;カギ括弧は自動で付きます
;"衝突","結果"のみ、口上色が自動で付きます
;"衝突","結果"以外は半角26文字（全角13文字）までの文字数制限があります。はみ出ないように気をつけてください
;数パターンあると雰囲気が出ます（%TEXTR( / )%を使うと良い）
;==================================================
@M_KOJO_MESSAGE_COM_K158_SUIKA(ARGS, ARG)
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL:1 = 0
;-------------------------------------------------
IF LOCAL:1
	SELECTCASE ARGS
	CASE "衝突"
		;-------------------------------------------------
		;場外に出てあなたがキャラと衝突した際の台詞
		;文字数制限はありません,汎用台詞もありません
		;-------------------------------------------------
		RESULTS = いたっ！ ちょっと、危ないじゃないのよ！
	CASE "そこだ！"
		RESULTS = %TEXTR("そこ！/今！")%
	CASE "近い"
		RESULTS = %TEXTR("近い！近いよ！/近づいてるよ！/あとちょっと！")%
	CASE "遠い"
		RESULTS = %TEXTR("まだ遠いよ/まだまだ～")%
	CASE "かなり遠い"
		RESULTS = %TEXTR("全然遠いよー/まだまだずっと遠いー")%
	CASE "前"
		RESULTS = %TEXTR("前にあるよ/そのまま、そのまま/そっちそっち")%
	CASE "少し前"
		RESULTS = %TEXTR("ちょっとだけ前！/すこーし前/あと一歩！")%
	CASE "後ろ"
		RESULTS = %TEXTR("後ろ向いてる！/逆、逆！/そっちじゃないよー")%
	CASE "少し後ろ"
		RESULTS = %TEXTR("すぐ後ろだよ！/すこーし後ろ/一歩後ろ！")%
	CASE "右"
		RESULTS = %TEXTR("右だよ/右、右/もっと右")%
	CASE "少し右"
		RESULTS = %TEXTR("ちょっとだけ右/まだ右かな")%
	CASE "左"
		RESULTS = %TEXTR("左だよ/左、左/もっと左")%
	CASE "少し左"
		RESULTS = %TEXTR("ちょっとだけ左/まだ左かな")%
	CASE "結果"
		;-------------------------------------------------
		;終了後の一言
		;文字数制限はありません,汎用台詞もありません
		;TFLAG:193,
		;   -1=失敗
		;    0=成功
		;    1=大成功
		;    2=木刀で大成功（ボーナス点）
		;ARG
		;    0=正直者
		;    1=ウソつき
		;-------------------------------------------------
		SELECTCASE TFLAG:193
		CASE -1
			RESULTS = ざんね～ん
		CASE 0
			RESULTS = やったね！
		CASE 1
			RESULTS = すごーい！
		CASE 2
			RESULTS = すごい綺麗に割れた！
		ENDSELECT
	ENDSELECT
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【158】先代/M_KOJO_K158_イベント.ERB