code:
;-------------------------------------------------
;赫卡提亚口上に使用関数
;-------------------------------------------------
;
;-------------------------------------------------
;@HEARTCB_K113(ARG:1, ARG, ARGS)
;ARG:1は表示するハートマークの色、ARGは表示する数、ARGSはフォント
;触手宮のぱにめーしょんから一部お借りしました
;なんでわざわざ関数作ったの？→単語登録してあったから
;例：
;    PRINTFORM 「……嗯、嗯！？　咕、嗯……唔哈
;	 CALL HEARTCB_K113(0xD02830)
;	 PRINTFORML 」
;-------------------------------------------------
;
@HEARTCB_K113(ARG:1 = 0xC07070, ARG = 1, ARGS = "Verdana")
#LOCALSIZE 2
#LOCALSSIZE 1
	LOCAL = GETCOLOR()
	LOCALS = %GETFONT()%

	SETCOLOR ARG:1
	SETFONT CHKFONT(ARGS) ? ARGS # LOCALS

	IF GETFONT() == "Symbol"
		FOR LOCAL:1, 0, ARG
			PRINTS UNICODE(0xA9)
		NEXT
	ELSE
		FOR LOCAL:1, 0, ARG
			PRINTS UNICODE(0x2665)
		NEXT
	ENDIF

	SETFONT LOCALS
	SETCOLOR LOCAL
RETURN 1

;-------------------------------------------------
;@FORM_K113()
;赫卡提亚形态（0异界、1地球、2月球）から随机に選ぶ関数
;且可以在每个大地图中保留形态（双方案、可自选）
;-------------------------------------------------
;
@FORM_K113()
#FUNCTION

;每到另一个大地图尝试变换一次形态（默认方案）
IF GET_MAPID(CFLAG:113:現在位置) == CFLAG:113:1010
;只要不回冥界或月面，就不更换形态（降低变化频次、可替代方案）
;IF INRANGE(CFLAG:113:1010, 0, 9) && INRANGE(GET_MAPID(CFLAG:113:現在位置), 0, 9) && GET_MAPID(CFLAG:113:現在位置) != 6

    RETURNF CFLAG:113:1009
ELSE
    CFLAG:113:1010 = GET_MAPID(CFLAG:113:現在位置)
    SELECTCASE CFLAG:113:1010
        CASE 0 TO 9
		    CFLAG:113:1009 = RAND:2
	    CASE 10
		    SELECTCASE RAND:2
			    CASE 0
			        CFLAG:113:1009 = 0
			    CASE 1
			        CFLAG:113:1009 = 2
					TALENT:113:12 = 1
					TALENT:113:23 = 1
					TALENT:113:10 = 1
					TALENT:113:小悪魔 = 1
					TALENT:113:傲嬌 = 1
					TALENT:113:羞恥心 = 0
					TALENT:113:服従 = 0
		    ENDSELECT
	ENDSELECT
	IF CFLAG:113:1009 == 1
	    TALENT:113:12 = -1
		TALENT:113:23 = -1
		TALENT:113:10 = -1
		TALENT:113:小悪魔 = 0
		TALENT:113:傲嬌 = 0
		TALENT:113:羞恥心 = 1
		TALENT:113:服従 = 1
	ELSEIF CFLAG:113:1009 == 0
	    TALENT:113:12 = 1
		TALENT:113:23 = 1
		TALENT:113:10 = 1
		TALENT:113:小悪魔 = 0
		TALENT:113:傲嬌 = 0
		TALENT:113:羞恥心 = 0
		TALENT:113:服従 = 0
	ENDIF
    RETURNF CFLAG:113:1009
ENDIF

;-------------------------------------------------
;@SPECIALDAY_K113()
;赫卡提亚节日对话与数值处理
;使用例 SIF (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)
;-------------------------------------------------
;
@SPECIALDAY_K113(ARG)
SELECTCASE ARG
CASE 0
    IF  CFLAG:113:1009 == 1
    PRINTFORMW 「今天可是特殊的节日呢、%CALLNAME:MASTER%君如果想的话……就算是过分的事……也可以的」
	ELSE
	PRINTFORMW 「今天可是特殊的日子呢！想要做点什么……都可以的哦～」
	ENDIF
	CFLAG:113:15 = 1
	BASE:113:情緒 += 200
	BASE:113:理性 -= 100
CASE 1
    IF  CFLAG:113:1009 == 1
    PRINTFORMW 「今天可是特殊的节日呢、%CALLNAME:MASTER%君如果想的话……稍微过分一点的事……也可以考虑的」
	ELSE
	PRINTFORMW 「今天可是特殊的日子呢！\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@有想好……要做些什么吗？」
	ENDIF
	CFLAG:113:15 = 1
	BASE:113:情緒 += 100
	BASE:113:理性 -= 100
CASE 2
    IF  CFLAG:113:1009 == 1
    PRINTFORMW 「今天是特殊的节日呢、%CALLNAME:MASTER%君……你有行程了吗？」
	ELSE
	PRINTFORMW 「今天可是特殊的日子呢！\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@在做些什么？」
	ENDIF
	CFLAG:113:15 = 1
	BASE:113:情緒 += 50
ENDSELECT

;-------------------------------------------------
@SPECIALDAY_EVENT_k113
;赫卡提亚节日事件处理
;-------------------------------------------------
;
;謹賀新年
IF DAY:2 == 1 && DAY:3 == 1 && DAY:0 != 1
	SELECTCASE FORM_K113()
	CASE 0 || 2
		IF TALENT:恋人 || TALENT:恋慕
			PRINTFORML 「新年快乐呀%CALLNAME:MASTER%～」
			PRINTFORMW 「新的一年到来咯～」
		ELSEIF TALENT:思慕 || TALENT:愛欲
			PRINTFORML 「%CALLNAME:MASTER%君、新年快乐～」
			PRINTFORML	赫卡提亚正热情地庆祝着新年的到来
			PRINTFORMW 「又是新的一年呢～」
		ELSE
			PRINTFORML 「～新年快乐～」
			PRINTFORMW	赫卡提亚微笑着送上了新年的祝福
		ENDIF
	CASE 1
	    IF TALENT:恋人 || TALENT:恋慕
			PRINTFORML 「新年快乐、%CALLNAME:MASTER%～」
			PRINTFORMW 「新的一年……我们会有什么新的故事呢？」
		ELSEIF TALENT:思慕 || TALENT:愛欲
			PRINTFORML 「%CALLNAME:MASTER%君、新年快乐～」
			PRINTFORML	赫卡提亚想要庆祝新年的到来、却因为害羞而不敢大声庆贺
			PRINTFORMW 「又是新的一年呢……」
		ELSE
			PRINTFORML 「～新年快乐～」
			PRINTFORMW	赫卡提亚微笑着送上了新年的祝福
		ENDIF
	ENDSELECT
;情人節
ELSEIF DAY:2 == 4 && DAY:3 == 14 && CFLAG:2 >= 1000
	SELECTCASE FORM_K113()
	CASE 0 || 2
		IF TALENT:恋人 || TALENT:恋慕
			PRINTFORML 「锵锵～%CALLNAME:MASTER%君、\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@知道今天是什么日子吗？」
			PRINTFORMW 「是情人节哦～这个巧克力、我可是跟纯狐她们尝试了好久的料理制作、才做出来的呢～里面还掺了一些……」
			PRINTFORML 「掺了什么？嘿嘿～%CALLNAME:MASTER%你吃了就知道啦！」
			PRINTFORMDL	望着赫卡提亚递过来的爱心礼盒，%CALLNAME:MASTER%宠爱地接过了恋人的心意
			PRINTFORML 「赶快打开看看嘛～我超——级想要知道%CALLNAME:MASTER%君\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@的评价的！」
			CALL GET_ITEM("跳蛋巧克力",1,2)
			PRINTFORMDW	看着因为出人意料的材料而懵逼的%CALLNAME:MASTER%、赫卡提亚脸色微红地露出了坏笑
		ELSEIF TALENT:思慕 || TALENT:愛欲
			PRINTFORML 「嗯？\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@今天是什么日子？赫卡不知道哦～」
			PRINTFORML 「哎呀别走啊？我知道了啦～是情人节！情人节快乐～」
			PRINTFORMDL 恶作剧没有得逞的赫卡提亚、叫住了假装要走的%CALLNAME:MASTER%，噘着嘴把礼物塞给了%CALLNAME:MASTER%
			PRINTFORMW 「昨晚熬夜做的巧克力……你爱要不要吧、哼！」
			CALL GET_ITEM("黑雷神巧克力",2,2)
		ENDIF
	CASE 1
	    IF TALENT:恋人 || TALENT:恋慕
			PRINTFORML 「%CALLNAME:MASTER%君……这、这是我的情人节礼物……」
			PRINTFORML 「我跟纯狐她们尝试了好久才做出来的……请\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@务必收下！」
			PRINTFORMDL	望着羞红着脸的赫卡提亚、%CALLNAME:MASTER%宠爱地接过了恋人递来的礼盒
			PRINTFORML 「%CALLNAME:MASTER%君、请……请不要在这打开……好吗？」
			CALL COLORMESSAGE("「没事的赫卡提亚、只要是你做的我都喜欢……」",0xE0404A,2,0)
			CALL GET_ITEM("跳蛋巧克力",1,2)
			PRINTFORMDW	看着因为出人意料的材料而懵逼的%CALLNAME:MASTER%、赫卡提亚捂住了羞红的脸
		ELSEIF TALENT:思慕 || TALENT:愛欲
			PRINTFORMW 「%CALLNAME:MASTER%君……\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@知道、今天是什么日子吗？」
			PRINTFORMW	赫卡提亚从背后突然拉住了%CALLNAME:MASTER%的手，红着脸将礼物塞给了%CALLNAME:MASTER%
			PRINTFORMW 「……是情人节哦～」
			CALL GET_ITEM("黑雷神巧克力",2,2)
		ENDIF
	ENDSELECT
;萬聖節
ELSEIF DAY:2 == 3 && DAY:3 == 30
    SELECTCASE FORM_K113()
	CASE 0 || 2
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲
			PRINTFORML 「芜↗↘↗↘↗↘」
			PRINTFORMDL 赫卡提亚披散着红色秀发，在她的三个球上套上了万圣节的南瓜、朝%CALLNAME:MASTER%诡异地飘来
			PRINTFORMW 「地狱的女神、要来夺走你的性命啦！」
			PRINTFORMDL 赫卡提亚一把抱住了%CALLNAME:MASTER%，让发光的南瓜靠着%CALLNAME:MASTER%的侧脸，让\@ TALENT:MASTER:性別 == 2 ? 他 # 她 \@能够好好看着自己的脸
			PRINTFORMW 「要是……把你变成亡灵…或者别的什么、我们就能永远在一起了❤」
			CALL GET_ITEM("南瓜",1,2)
		ELSEIF CFLAG:2 >= 500
			PRINTFORML 「万圣节快乐～RERORERORERO……」
			PRINTFORMW	赫卡提亚从阴暗处张牙舞爪地跳了出来，但是头顶着发光南瓜的她只能让%CALLNAME:MASTER%感到喜庆
		ENDIF
	CASE 1
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲
			PRINTFORMDL 赫卡提亚穿戴着奇怪的万圣节服装，在她的三个球上套上了南瓜、朝%CALLNAME:MASTER%慢慢地飘来
			PRINTFORML 「我……是地狱的女神、%CALLNAME:MASTER%君不想变成亡灵的话……就赶紧跑吧！」
			PRINTFORMDW 赫卡提亚在%CALLNAME:MASTER%面前蹦跶了一下、好像想吓唬吓唬%CALLNAME:MASTER%、但是完全没有起到效果呢……
			PRINTFORMDW 她那被发光的南瓜照亮的脸，让%CALLNAME:MASTER%感觉心跳都漏了一拍
			CALL GET_ITEM("南瓜",1,2)
		ELSEIF CFLAG:2 >= 500
			PRINTFORML 「万圣节快乐……%CALLNAME:MASTER%君～」
			PRINTFORMW	赫卡提亚从阴暗处探出脑袋来，但是头顶着发光南瓜的她只能让%CALLNAME:MASTER%感到喜庆与可爱
		ENDIF
	ENDSELECT
;聖誕節
ELSEIF DAY:2 == 4 && DAY:3 == 25
    SELECTCASE FORM_K113()
	CASE 0 || 2
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲
			PRINTFORML 「圣诞到了哦？一起过圣诞吧！」
			PRINTFORMDL 赫卡提亚对%CALLNAME:MASTER%发出了邀请、紧紧攥着%CALLNAME:MASTER%的双手、目不转睛地看着\@ TALENT:MASTER:性別 == 2 ? 他 # 她 \@
			PRINTFORML 「地上的人们在圣诞节会怎么做呢？好像是要出门约会哦～那、我就邀请\@ TALENT:MASTER:性別 == 2 ? 你 # 妳 \@、去约会吧！」
			PRINTFORMW 「为了表示我的诚意、这个！就送给你了……」
			CALL GET_ITEM("圣诞节禮物",1,2)
		ELSEIF CFLAG:2 >= 500
			PRINTFORML 「今天是圣诞节呢～是不是要做地狱烤火鸡啊？」
			PRINTFORMDW 赫卡提亚似乎很馋火鸡的味道呢……还是说、地狱风的味道？
			PRINTFORMW 「嘿嘿～%CALLNAME:MASTER%做给我吃吧～～」
		ENDIF
    CASE 1
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲
			PRINTFORML 「%CALLNAME:MASTER%君、圣诞到了哦～一起过圣诞吗？」
			PRINTFORMDL 赫卡提亚对%CALLNAME:MASTER%发出了邀请、紧紧攥着%CALLNAME:MASTER%的双手、目不转睛地看着\@ TALENT:MASTER:性別 == 2 ? 他 # 她 \@
			PRINTFORML 「地上的人们、好像会在这一天出门约会哦～那……%CALLNAME:MASTER%君、可以去约会吗？」
			PRINTFORMW 「我……有特地带上礼物哦～」
			CALL GET_ITEM("圣诞节禮物",1,2)
		ELSEIF CFLAG:2 >= 500
			PRINTFORML 「地狱烤火鸡……地狱烤火鸡……」
			PRINTFORMDW 赫卡提亚似乎很馋火鸡的味道呢……一直在念叨着
			PRINTFORMW 「嘿嘿～%CALLNAME:MASTER%做给我吃吧～～」
		ENDIF
	ENDSELECT
ENDIF

;-------------------------------------------------
;@SEXWORDS_k113
;赫卡提亚SEX事件描述随机化函数
;用例 %SEXWORDS_k113("JY")%
;-------------------------------------------------
;
@SEXWORDS_k113(ARGS)
#FUNCTIONS
VARSET LOCALS

IF ARGS == "JY"
	LOCALS = %TEXTR("白濁/精液/精华/子種汁/妊娠汁/肉棒牛奶/小蝌蚪")%
ELSEIF ARGS == "XX"
	LOCALS = %TEXTR("小穴/淫穴/蜜穴/嫩穴/秘処/秘裂/女陰/粉鲍")%
ELSEIF ARGS == "YD"
	LOCALS = %TEXTR("阴道/陰道/膣/蜜罐/秘道")%
ELSEIF ARGS == "ZGK"
	LOCALS = %TEXTR("子宫口/子宫颈/宫颈口/花心/花蕊")%
ELSEIF ARGS == "ASS"
	LOCALS = %TEXTR("尻穴/屁穴/菊門/菊穴/后門/菊花")%
ELSEIF ARGS == "PP"
	LOCALS = %TEXTR("屁屁/屁股/股间/美臀/翘臀")%
ELSEIF ARGS == "JJ"
	LOCALS = %TEXTR("阴茎/陰茎/肉棒/阳具/大象/鸡巴/大屌/生殖器/男根")%
ELSEIF ARGS == "ZG"
	LOCALS = %TEXTR("子宫/子宫/胞宫/女子胞")%
ELSEIF ARGS == "AY"
	LOCALS = %TEXTR("爱液/妹汁/蜜汁")%
ELSEIF ARGS == "GC"
	LOCALS = %TEXTR("高潮/绝顶/高潮/绝顶/潮吹")%

ELSE
    LOCALS = ARGS
ENDIF
RETURNF LOCALS

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【113】赫卡提亚口上/M_KOJO_K113_追加函数.ERB

license: unknown


code:
Readme
-----------------------------------------------------
  赫卡提亚·拉碧斯拉祖利 口上

  作者：AvavaAVA（贴吧ID：少女幻葬）

  Version： Alpha_20230121_除夕版
-----------------------------------------------------
特性：

※根据赫卡提亚当前所在地点，有可能更换形态，同时造成性格、素质、对白的全部变化
（如果覆盖了 \キャラデータ\Chara_data_113_ヘカーティア.ERB 的话，还可以同时变化立绘）

※部分状态下、时停玩弄后当面解除时停的话，赫卡提亚的心情会变得不愉快

※特殊节日有特殊的口上，还会收到意想不到的礼物哦？

-----------------------------------------------------
Changelog：

Alpha_20230121_除夕版：イベント.ERB 接近完成，在新年之际作为给大家的过年礼物了

-----------------------------------------------------
特别鸣谢：

口上模版/代码逆练对象：幽香口上——作者：Crapena

口上制作教程/代码帮助：纸蛇冰沙（帮大忙了！）

path: ERB/口上・メッセージ関連/個人口上/【113】赫卡提亚口上/Readme_20230119.txt


code:
@CHARAMOVE_DATA_113(ARG, ARG:2)
LOCAL = 113
SELECTCASE ARG
	;連動設定（RETURN=依存する角色, RESULT:1～3=対等に連動する角色）
	CASE 1
	;特殊生活時間設定（CFLAG:LOCAL:生活時間補正を設定する）
	CASE 3
	;移動傾向（±～10=容易去/难去，-100=不去）
	CASE 4
		SELECTCASE ARG:2
			;綿月亭には行かない
			CASE P1020綿月亭・門 TO P1044會客廳
				RETURN -100
			;寧靜海は渡らない
			CASE P1001槐安通路 TO P1015砂浜
				RETURN -100
		ENDSELECT
	;出現場所
	CASE 7
		SELECTCASE ARG:2
			CASE 中有之道, 三途之川, 彼岸, 地獄
				RETURN 1
			CASE 広場, 商家町, 呑屋小道
				RETURN 1
			CASE 寧靜海
				RETURN 1
		ENDSELECT
	;引力設定（CFLAG:LOCAL:引力点を設定する）
	CASE 8
ENDSELECT

@EXIST_角色データ113
#LOCALSIZE 1
#LOCALSSIZE 1

@角色データ113(ARG, O_DATA, V_NAME)
#FUNCTION
#LOCALSIZE 1
#LOCALSSIZE 1
#DIMS O_DATA
#DIMS V_NAME
SELECTCASE O_DATA
CASE "稱呼"
	CALLF MAKE_STR(V_NAME, "赫喀提亞")
;こっから衣装設定
CASE "今天的睡衣"
	CALLF MAKE_STR(V_NAME, "睡衣（裤子）套")

CASE "便装：飾品"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("飾品", "鎖"))
CASE "便装：帽子"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("帽子", "帽子"))
CASE "便装：裙子"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("裙子", "三色裙子"))
CASE "便装：上身衣服２"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("上身衣服２", "地獄Ｔ恤衬衫"))
CASE "便装：其他１"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("其他１", "项圈"))
CASE "便装：其他２"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("其他２", "吊帯"))
CASE "便装：其他３"
	CALLF MAKE_INT(V_NAME, CLOTHES_ID("其他３", "惑星"))

CASE "固有内衣形容詞"
	CALLF MAKE_STR(V_NAME, "光看就可能掉进地狱")
CASE "固有下半身内衣名"
	CALLF MAKE_STR(V_NAME, "『GoToHell』胖次")
CASE "固有上半身内衣"
	CALLF MAKE_INT(V_NAME, 1)
CASE "固有上半身内衣名"
	CALLF MAKE_STR(V_NAME, "抹胸胸罩")
CASE "固有内衣着用条件"
	SIF !RAND:3
		CALLF MAKE_INT(V_NAME, 1)
CASE "固有内衣半透明(前)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "固有内衣半透明(後)"
	CALLF MAKE_INT(V_NAME, 1)
CASE "固有内衣布料厚度"
	CALLF MAKE_INT(V_NAME, 2)

;料理関連
CASE "料理：喜欢的味道"
	CALLF MAKE_STR(V_NAME, "面包/香料/麺類/派/丰盛/垃圾/濃厚/豪華/新鲜/松脆/地獄風/外界風/" + "洋食/辣/咸/" * 2 + "怪诞/" * 3)
CASE "料理：讨厌的味道"
	CALLF MAKE_STR(V_NAME, "中華/简易/健康/淡白/野趣/酸/酸/質素/質素/月都風/月都風/月都風/月都風/月都風/")
CASE "料理：助手効果"
	CALLF MAKE_STR(V_NAME, "地獄風/魔力/")
;贈り物関連
CASE "感性：好き"
	CALLF MAKE_STR(V_NAME, "赤/青/黄/高級/混沌/可怕的/奇妙/誇張/充滿力量/威厳/壮大/狂熱/" + "闇/宝石/妖術/冥王の/月の/地上の/異界の/" * 3 + "万魔殿な/紺珠の/女神の/地獄の/" * 5)
CASE "感性：嫌い"
	CALLF MAKE_STR(V_NAME, "樸素/懷舊/別緻/繊細/" + "安物/" * 3)
ENDSELECT

;-------------------------------------------------
;固有料理設定
;DISH_NAME          料理名
;RESULTS            料理の種類（軽食/主食/甜点）
;CALL 材料設定("")  材料の指定。"汎用"を入れると自動で汎用食材になる
;DISH_TASTE         味の設定
;DISH_COMMENT       （任意）一行コメント
;DISH_TIME          （任意）調理にかかる時間
;DISH_MAXLIMIT      （任意）料理の持続時間
;-------------------------------------------------
@SPECIAL_MENU_113
DISH_NAME = 三色地狱肉松盖饭
RESULTS = 主食
CALL 材料設定("鳥肉")
DISH_TASTE = 和食/米/野菜/卵/辣/丰盛/濃厚/温暖/芸術的/家庭的/新鲜/怪诞/怪诞/地獄風/
DISH_COMMENT = 红得像血一样的鸡肉、非常青的青菜、煎鸡蛋共同组成的三色盖饭。
RETURN 1

;IMAGE_I113_特殊服装(CHARA)-------------------------------------------------------------------
;角色特有の服装表示条件
;エフェクトを共有する服装差分はこちらで指定する
;使用時注意点:
;	RESULTSに特殊服装を格納すること
;	書式は %服装%%特殊服装% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊服装(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF CHECK_NUDE(CHARA)
		;裸
		IF FLAG:立絵種類
			;顔絵
		ELSE
			;立絵
		ENDIF
	ELSE
		;服
		IF FLAG:立絵種類
			;顔絵
		ELSE
			;立絵
		ENDIF
	ENDIF
ELSE
	;通常画像
	IF CHECK_NUDE(CHARA)
		;裸
		IF FLAG:立絵種類
			;顔絵
		ELSE
			;立絵
		ENDIF
	ELSE
		;服
		IF CFLAG:CHARA:衣装一時変更 == 55 || CFLAG:CHARA:基本服装セット == 55
			IF FLAG:立絵種類
				;顔絵
				RESULTS = _バニー
			ELSE
				;立絵
				RESULTS = _バニー
			ENDIF
		ENDIF
	ENDIF
ENDIF

;IMAGE_I113_体形(CHARA)-----------------------------------------------------------------------
;角色特有の体形表示条件
;エフェクトを共有する体形差分はこちら
;服装を指定しても自動で表示されるので注意
;使用時注意点:
;	RESULTSに体形を格納すること
;	書式は %体形%%服装% 適宜"_"等入れること
;	"巨乳"は本編で実装済み %体形%巨乳%服装% で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I113_体形(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

;IMAGE_I113_特殊表情(CHARA)--------------------------------------------------------------------
;角色特有の表情表示条件
;時間停止中でも維持する表情はこちら
;使用時注意点:
;	RESULTS:0に表情を格納
;	RESULTS:1にマウスオーバー時の表情を格納すること
;	"通常","笑顔","憤怒","発情","睡眠"は本編で実装済み
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊表情(CHARA)
#DIM CHARA

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

;IMAGE_I113_特殊表情COM(CHARA, 指令)-------------------------------------------------------
;直前の指令で変化する角色特有の表情表示条件
;時間停止中は変化しない表情はこちら
;使用時注意点:
;	RESULTS:0に表情を格納
;	RESULTS:1にマウスオーバー時の表情を格納すること
;	"自慰","愛撫","性交"は本編で実装済み
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊表情COM(CHARA, 指令)
#DIM CHARA
#DIM 指令

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

;IMAGE_I113_差分(CHARA)-----------------------------------------------------------------------
;角色特有の差分表示条件
;裸やエフェクトを共有しない画像はこちら
;使用時注意点:
;	RESULTSに差分を格納すること
;	書式は {CHARA}%差分% 適宜"_"等入れること
;-------------------------------------------------------------------------------------------
@IMAGE_I113_差分(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
		;黄,月にいるとき（夢之世界および自室は赤）
		IF CFLAG:113:1009 == 2
			RESULTS = _黄
		;青,人間之里にいるとき
		ELSEIF CFLAG:113:1009 == 1
			RESULTS = _青
		;残りは赤
		ENDIF
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	;黄,月にいるとき（夢之世界および自室は赤）
	IF CFLAG:113:1009 == 2
		RESULTS = _黄
	;青,人間之里にいるとき
	ELSEIF CFLAG:113:1009 == 1
		RESULTS = _青
	;残りは赤
	ENDIF
ENDIF

;IMAGE_I113_特殊照れ(CHARA)--------------------------------------------------------------------
;角色特有の照れエフェクト表示条件
;使用時注意点:
;	RESULTSに特殊照れを格納すること
;	書式は %特殊照れ%照れ
;	"裸"は本編で実装済み %特殊照れ%裸照れ で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊照れ(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

;IMAGE_I113_特殊吐息(CHARA)--------------------------------------------------------------------
;角色特有の吐息エフェクト表示条件
;使用時注意点:
;	RESULTSに特殊吐息を格納すること
;	書式は %特殊吐息%吐息
;	"裸"は本編で実装済み %特殊吐息%裸吐息 で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊吐息(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

;IMAGE_I113_特殊汗(CHARA)--------------------------------------------------------------------
;角色特有の汗エフェクト表示条件
;使用時注意点:
;	RESULTSに特殊汗を格納すること
;	書式は %特殊汗%汗
;	"裸"は本編で実装済み %特殊汗%裸汗 で追記可能
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊汗(CHARA)
#DIM CHARA
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

;IMAGE_I113_特殊エフェクトチェック(CHAR, エフェクト)--------------------------------------------
;角色特有のエフェクト判定  特殊エフェクトを直接指定したい場合に参照
;引数 "エフェクト" に固有のエフェクトが含まれるかを判定する
;例の街道、STRFINDを使用してください
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊エフェクトチェック(CHARA, エフェクト)
#DIM CHARA
#DIMS エフェクト

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	SIF STRFIND(エフェクト, "精液") != -1
		RETURN 1
ELSE
	;通常画像
	;SIF STRFIND(エフェクト, "母乳") != -1
	;	RETURN 1
ENDIF

RETURN 0

;IMAGE_I113_特殊エフェクト(CHARA)--------------------------------------------------------------------
;角色特有のエフェクト表示条件
;使用時注意点:
;	RESULTS配列に特殊エフェクトを格納
;	RETURNで追加するエフェクト数を返却すること
;-------------------------------------------------------------------------------------------
@IMAGE_I113_特殊エフェクト(CHARA)
#DIM CHARA
#DIM DYNAMIC エフェクト数 = 0
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
		IF GETBIT(STAIN:CHARA:5, 2)
			RESULTS:エフェクト数 = 精液
			エフェクト数 += 1
		ENDIF
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

RETURN エフェクト数

;IMAGE_I113_自慰エフェクト(CHARA)--------------------------------------------------------------------
;角色特有の自慰エフェクト表示条件
@IMAGE_I113_自慰エフェクト(CHARA)
#DIM CHARA
#DIM DYNAMIC エフェクト数 = 0
VARSET RESULTS

IF CFLAG:CHARA:差し替え適用
	;替换用画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ELSE
	;通常画像
	IF FLAG:立絵種類
		;顔絵
	ELSE
		;立絵
	ENDIF
ENDIF

RETURN エフェクト数
;********************************************************************************************

path: ERB/口上・メッセージ関連/個人口上/【113】赫卡提亚口上/キャラデータ/Chara_data_113_ヘカーティア.ERB


code:
;-------------------------------------------------
; eraTheWorld 4.576用 幻月口上（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;-------------------------------------------------
;※コンセプト
;人类より圧倒的に強い力を持つ悪魔の少女
;最初は興味なさげに対応してくるけど、少しづつデレてくれる。
;そんな王道な展開がきっと似合う。
;
;どう考えても人类より強いわけだし、被逆推るよりかは推倒方が好き。
;でもそういう子に限って相手からぐいぐい来られるとしおらしくなるものだと思う。
;
;きっと照れた時が可愛的。ということで身体接觸とか充実させたい
;
;個人的に時姦が好きなので少しづつ増やして行きたいと思っています。
;
;参考にした口上
;	隠岐奈口上、諏訪子口上、紫口上などなど

;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

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

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;CFLAG:117:1001	UPDATAを見たフラグ
;
;
;******************************************************************************

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

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

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

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

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

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

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

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

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

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

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

;輝夜口上を参考に作りました
IF !CFLAG:117:1001
	;PRINTFORML 口上との齟齬を押さえるため幻月の能力を変更することができます。
	PRINTFORML 为了防止和口上的不一致，可以变更幻月的能力。
	PRINTFORML （戦闘能力A→S 料理技能C→E）
	;PRINTFORML この変更はこのタイミングしかできません。ご注意ください。
	PRINTFORML 这个变更只能在此时进行。请注意。
	PRINTFORML
	;CALL ASK_M("する",1 , "しない" ,1)
	CALL ASK_M("是",1 , "否" ,1)
	SELECTCASE RESULT
		CASE 0
			ABL:117:料理技能 = 0
			ABL:117:戦闘能力 = 5
			EXP:117:料理経験 = 0
			;PRINTFORMW 幻月の能力を変更しました。
			PRINTFORMW 幻月的能力变更了。
		CASE 1
			;PRINTFORMW 幻月の能力を変更しませんでした。
			PRINTFORMW 幻月的能力没有变更。
	ENDSELECT
	CFLAG:117:1001 = 1
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K117
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
PRINTFORML
PRINTFORML 在漫无目的地晃荡着时、视野的边缘出现了白色的翅膀。
PRINTFORMW 被明显不是鸟类的翅膀吸引了视线、看向了那边和金发的少女对上了视线。
PRINTFORML 「很在意这对翅膀么？」
PRINTFORMW 翅膀主人的少女稍稍歪了歪头。
PRINTFORMW 看来完全的暴露了呢。
PRINTFORML 「感受到了无法忽视的视线呢」
PRINTFORMW そんなにしっかり見ていた気はないのだが……
PRINTFORML
PRINTFORML 「你看你又在盯着看了」
PRINTFORMW 因为她的翅膀就是那样值得盯着看的美丽啊。
PRINTFORML 「那么在意的话要不要摸摸看呢？」
PRINTFORMW 感到略微吃惊的少女如此说了、
PRINTFORML
PRINTFORML 「Hi呀！！！」
PRINTFORMW
PRINTFORMW 是摸法弄错了吗、她发出了超级可爱的声音。
PRINTFORML 「没想到你真的会去摸啊」
PRINTFORML 「真是的、连玩笑话都分不出来吗……？」
PRINTFORMW 真是令人吃惊啊ー她如此不满地嘟囔着。
PRINTFORML
PRINTFORMW 「嘛行吧」
PRINTFORML 「我是幻月。住在梦幻馆里呢」
PRINTFORML 「嘛、请多关照呢」
PRINTFORMW 简单地自我介绍后名为幻月的女孩子就不知道去哪里了。
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K117_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
;地の文
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
IF LOCAL
	PRINTFORML  「%CALLNAME:MASTER%、可以闭上眼睛吗？」
	PRINTFORMW	幻月の頼みに坦率に目を瞑る。
	PRINTFORML
	PRINTFORMW	………………
	PRINTFORML
	PRINTFORMW	…………
	PRINTFORML
	PRINTFORML	……ちゅっ
	PRINTFORML
	PRINTFORMW	しばらくの間があって、%CALLNAME:MASTER%の唇に悄悄的幻月の唇が触れる。
	PRINTFORML
	PRINTFORML	「もう、いいわよ」
	PRINTFORMW	你が目を開くと幻月の後ろ姿と真っ赤な耳が見える。
	PRINTFORMW	「その、初めて、だったんだけど、どう、だった……？」
	PRINTFORML	你が口を開こうとすると、
	PRINTFORML	「……あぁぁ、ダメ！　やっぱ止めて！　何も言わないで！！！」
	PRINTFORML	羽をパタパタさせた幻月の静止が入る。
	PRINTFORMW	真っ赤になった彼女を愛おしく思い的同时、你は接吻の感想を話すことにした。
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K117_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		PRINTFORML 「呐、%CALLNAME:MASTER%」
		PRINTFORMW 走在约会回来的路上。在前面走着的幻月停下了脚步、回望着你。
		PRINTFORML 「可以稍微、听我说下么？」
		PRINTFORMW %CALLNAME:MASTER%点了点头后、她带着比以往都要认真的表情向这边靠近了1步。
		PRINTFORML
		PRINTFORML 「自从初次会面以来真的是经过了很长时间呢」
		PRINTFORMW 「那个时候的事情、还记得吗？」
		PRINTFORML 「我可是记得很清楚哇。毕竟还是第一次见到见面就摸羽毛的家伙呢」
		PRINTFORML 真的是令人吃惊啊、看着如此呢喃着的她你回想起了第一次见面时候的事情。
		PRINTFORMW %CALLNAME:MASTER%的苦笑声回响着、最后二人都沉寂了下来。
		PRINTFORML
		PRINTFORML 「…………」
		PRINTFORMW 在令耳朵都開始疼痛的沉寂中、只有幻月的呼吸声在诉说着时间的流逝。
		PRINTFORMW 在感觉十分漫长的时间里、终于你听到了深呼吸的声音、
		PRINTFORML
		PRINTFORML
		PRINTFORML 「我喜欢你」
		PRINTFORML
		PRINTFORMW
		PRINTFORMW 收到了如此直接受且极其可爱的告白。
		PRINTFORML
		PRINTFORMW 「我喜欢和%CALLNAME:MASTER%一起看到的景色」
		PRINTFORMW 「我喜欢和%CALLNAME:MASTER%一起去过的地方」
		PRINTFORMW 「我喜欢和%CALLNAME:MASTER%一起度过的时间」
		PRINTFORML
		PRINTFORMW 「所以说、呐」
		PRINTFORMW 「这之后能继续待在我的身边吗？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		PRINTFORML %CALLNAME:MASTER%拥抱了幻月作为回应。
		PRINTFORML 「谢谢你……%CALLNAME:MASTER%……」
		PRINTFORML 伴随着夹杂泪水的声音、你感受到了少女的双臂环抱在背上。
		PRINTFORMW 「这之后我也会、一直喜欢哟。%CALLNAME:MASTER%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		PRINTFORML 「这样啊……」
		PRINTFORML 听到了%CALLNAME:MASTER%的回答后、幻月地垂着头。
		PRINTFORML 「不用担心我的。没问题的」
		PRINTFORML 「那么就、再见」
		PRINTFORMW 说完了话后幻月很快就离開了。
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K117_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:恋慕
			PRINTFORML 「和你一起的话不管去哪里都很開心哇」
			PRINTFORMW 「下次也请多多关照呢」
		ELSEIF TALENT:思慕
			PRINTFORML 「今天也玩的很開心哇」
			PRINTFORML 「下次也请多多关照呢」
		ELSE
			PRINTFORMW 「还是挺開心的哇」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「这次就特别地原谅你了哇」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW （稍微原谅一点也可以吧）
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW （还不能完全忘记他的所作所为哇）
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K117_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;増やしたいかも
		IF (DAY:2 == 1 && DAY:3 == 1) || (DAY:2 == 2 && DAY:3 == 7) || (DAY:2 == 4 && DAY:3 == 14)
			CALL SPECIALDAY_EVENT_K117
		ELSEIF TALENT:恋慕 || TALENT:思慕
			PRINTFORML 「啊啦、%CALLNAME:MASTER%。难道说是来见我的吗？」
		ELSE
			PRINTFORML 「找我有什么事吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;増やしたいかも
		IF (DAY:2 == 1 && DAY:3 == 1) || (DAY:2 == 2 && DAY:3 == 7) || (DAY:2 == 4 && DAY:3 == 14)
			CALL SPECIALDAY_EVENT_K117
		ELSEIF TALENT:恋慕 || TALENT:思慕
			PRINTFORML 「啊啦、%CALLNAME:MASTER%。见到你很開心呀」
		ELSE
			PRINTFORML 「你好呀、%CALLNAME:MASTER%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「那个、%CALLNAME:MASTER%」
		PRINTFORMW 「我可以一起进去吗……？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		PRINTFORML 「…………」
		PRINTFORMW 「非、非常抱歉！」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
	;口上ノートを見る限りMASTERは把柄を握られているそうなので
		PRINTFORML 「啊啦、这不是%CALLNAME:MASTER%嘛」
		PRINTFORMW 「我也想要洗澡呢」
		PRINTFORMW 「所以可以请你出去吗？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		IF (DAY:2 == 1 && DAY:3 == 1) || (DAY:2 == 2 && DAY:3 == 7) || (DAY:2 == 4 && DAY:3 == 14)
			CALL SPECIALDAY_EVENT_K117
		ELSE
			PRINTFORMW 「你好、%CALLNAME:MASTER%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		IF TALENT:恋慕
			PRINTFORML 「真嫉妒呢……」
			PRINTFORML 感觉听到了幻月的自言自语。
			PRINTFORMW 「什么也没有说噢」
		ELSE
			PRINTFORML 「啊啦、%CALLNAME:MASTER%」
			PRINTFORMW 「……看起来你很開心呢」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;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
ENDIF
RETURN 1

;==================================================
;特別な日の遭遇時
;==================================================
@SPECIALDAY_EVENT_K117
;--------------------------------------------------
IF DAY:2 == 1
	;謹賀新年
	SELECTCASE DAY:3
		CASE 1
			PRINTFORML 「あけましておめでとう、%CALLNAME:MASTER%」
			PRINTFORMW 「今年も一年よろしくね」
	ENDSELECT
ELSEIF DAY:2 == 2
	;七夕
	SELECTCASE DAY:3
		CASE 7
    		PRINTFORML 「今日は織姫と彦星が年に一度だけ会える日だそうね」
			SELECTCASE CFLAG:好感度
				CASE 0 TO 1000
					PRINTFORML 「ロマンティックでいいと思うわ」
    				PRINTFORMW 幻月はあまり興味がなさそうだ。
				CASE 1000 TO 2000
				    PRINTFORMW 「人を愛するのは悪いことではないけど、仕事をさぼるのは、ねぇ」
				CASE IS > 2000
					PRINTFORML 「そういえば、%CALLNAME:MASTER%はもう短冊にお願い事は書いたかしら？」
					IF RAND:2 == 0
    					PRINTFORMW 「私？　世界平和を願っておいたわ」
					ELSE
						PRINTFORML 「え？　もうそうな年じゃない？　私から見たらまだまだ兒童よ」
    					PRINTFORMW 思わぬところで人と悪魔の価値観の違いを感じてしまった。
					ENDIF
			ENDSELECT
	ENDSELECT
ELSEIF DAY:2 == 4
	;バレンタイン
	SELECTCASE DAY:3
		CASE 14
			;黑雷神巧克力以外は地の文追加
			IF CFLAG:好感度 > 3000
				PRINTFORMW 少しそわそわした様子の幻月が%CALLNAME:MASTER%の前に一歩踏み出して来た……。
				PRINTFORML
			ENDIF
			SELECTCASE CFLAG:好感度
				;黑雷神巧克力
				CASE 1000 TO 3000
					IF TALENT:思慕 || TALENT:恋慕 || TALENT:愛欲
						PRINTFORML 「%CALLNAME:MASTER%、これあげるわ」
						PRINTFORMW 無造作に幻月は%CALLNAME:MASTER%に黑雷神巧克力を渡してきた。
						PRINTFORMW これだけ？　と視線で問いかけてみる。
						PRINTFORMW 「来年はもっといいものが貰えるよう頑張りなさい」
					ELSE
						PRINTFORML 「是%CALLNAME:MASTER%、キャッチして」
						PRINTFORML 無造作に投げられたものを両手で包むように受け止める。
						PRINTFORMW ……何を渡されたのだろう？
						PRINTFORMW 悄悄的手を開くとそこにはザクザクととした食感と手ごろな価格で約束された満足感を与えてくれる黒き闪电の姿が……
						PRINTFORML 「ほら、今日情人節じゃない？　だから日頃の感謝にと思ってね」
						PRINTFORMW ……もらえないよりましと思うことにした。
					ENDIF

				;巧克力
				CASE 3001 TO 5000
					PRINTFORML 「%CALLNAME:MASTER%、これあげるわ」
					PRINTFORML 少し頬を赤らめながら幻月は巧克力を%CALLNAME:MASTER%に手渡してきた。
					PRINTFORML 「外の食べ物を取り寄せるのも簡単じゃないわね」
					PRINTFORMW いろいろ苦労があったようだ。

				CASE IS > 5000
					IF EXP:愛情経験 >= 100
					;手作り
						PRINTFORML 「%CALLNAME:MASTER%、これあげるわ」
						PRINTFORMW 幻月は少し緊張したような面持ちで巧克力を手渡してきた。
						PRINTFORML 「その、これ手作り、なのよ」
						PRINTFORML 「一応味見してるから大丈夫だとは思うけど……」
						PRINTFORMW しっかり味わって食べよう。
					ELSE
					;高級巧克力
						PRINTFORML 「%CALLNAME:MASTER%、これあげるわ」
						PRINTFORML 少し頬を赤らめながら幻月は精心包装された巧克力を手渡してきた。
						PRINTFORML 「割と高かったから味わって食べてね」
						PRINTFORMW そう言われると少し緊張する。
					ENDIF
			ENDSELECT
	ENDSELECT
ENDIF

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K117_2(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 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW 「早上好%CALLNAME:MASTER%。睡得好吗？」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF TALENT:恋慕
				PRINTFORMW 「早上好%CALLNAME:MASTER%。很可爱的睡脸哟」
			ELSE
				PRINTFORMW 「早上好%CALLNAME:MASTER%」
			ENDIF
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		SELECTCASE RAND:3
			CASE 2
				PRINTFORMW 「早上好%CALLNAME:MASTER%。今天也来度过愉快的一天吧」
			CASE 1
				PRINTFORML 「早上好%CALLNAME:MASTER%。很可爱的睡脸哟」
			CASE 0
				PRINTFORMW 「早上好%CALLNAME:MASTER%。看起来睡得很好呢」
		ENDSELECT
		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 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 2
						PRINTFORMW 「因为在你身边所以睡得很香呢」
					CASE 1
						PRINTFORMW 「我有说什么、奇怪的梦话吗？」
					CASE 0
						PRINTFORMW 「看起来、睡觉时头发没有被弄乱呢？」
				ENDSELECT
			ELSE
				PRINTFORMW 「早上好%CALLNAME:MASTER%」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			SELECTCASE RAND:3
				CASE 2
					PRINTFORMW 「因为在你身边所以睡得很香呢」
				CASE 1
					PRINTFORMW 「我有说什么、奇怪的梦话吗？」
				CASE 0
					PRINTFORMW 「看起来、睡觉时头发没有被弄乱呢？」
			ENDSELECT
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K117_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 「我就先回去了呢」
			PRINTFORMW 「明天再见呢。%CALLNAME:MASTER%」
		ELSE
			PRINTFORMW 「差不多该回去了。晚安、%CALLNAME:MASTER%」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「呼啊啊……」
		PRINTFORMW 「总觉得很困啊……」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			PRINTFORML 「%CALLNAME:MASTER%……」
			PRINTFORMW %CALLNAME:MASTER%似乎出现在了幻月的梦里呢。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW 「等、没问题吧！?　%CALLNAME:MASTER%！」
		PRINTFORMW …………
		PRINTFORMW 「真是的……为什么要乱来直到倒下啊」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			;同棲中
			IF CFLAG:MASTER:初期位置 == CFLAG:117:初期位置
				PRINTFORML 「我就先去睡了呢」
			ENDIF
			PRINTFORMW 「晚安、%CALLNAME:MASTER%」
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「想要一个人悠闲地睡觉呢」
			IF TALENT:恋慕 || TALENT:思慕
				PRINTFORMW 「抱歉呢、%CALLNAME:MASTER%」
			ELSE
				PRINTFORMW 「可以请你出去吗？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			;同棲中
			IF CFLAG:MASTER:初期位置 == CFLAG:117:初期位置
				PRINTFORMW 「呐……」
				PRINTFORMW 「想要做这种事情的话还有更多合适的场所哟」
				PRINTFORMW 「总之我现在很想睡能否停下来呢？」
			ELSE
				PRINTFORML 「在别人的房间里做什么的……」
				PRINTFORMW 「这到底是什么心理啊……」
				PRINTFORMW 「总之可以先停下吗？」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			PRINTFORML 「……」
			PRINTFORMW 刚一见面幻月就露出了開心的微笑。
		ELSEIF TALENT:思慕
			PRINTFORML 「……」
			PRINTFORMW 和一直盯着这边的幻月对上了视线。
		ELSE
			;思い浮かばない
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORML 「啊啦%CALLNAME:MASTER%」
			PRINTFORMW 幻月微笑着也向这边点了点头。
		ELSEIF TALENT:思慕
			PRINTFORML 「啊啦？　这不是%CALLNAME:MASTER%嘛」
			PRINTFORMW 幻月也朝着这边点了点头。
		ELSE
			PRINTFORML 「已经做好心理准备了呢」
			PRINTFORMW 幻月留下这句话就过去了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			PRINTFORML （是很着急吗）
			PRINTFORMW 月稍微有些不满地目送着%CALLNAME:MASTER%。
		ELSEIF TALENT:思慕
			PRINTFORML 「姆……」
			PRINTFORMW 幻月稍微有些不满。
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;そのうち角色ごとのもいくつか……
	IF ARG == 116
	;夢月
		IF TALENT:恋慕 || TALENT:思慕
			PRINTFORML 「啊啦、这不是梦月嘛。有什么事吗？」
    	 	PRINTFORMW 「……特にない？　もう少し空気読みなさいよ……」
		ELSE
			PRINTFORML 「あら夢月。どうしたの？」
			PRINTFORMW 幻月悄悄地从%CALLNAME:MASTER%的身边离開了。
		ENDIF
		RETURN 1
	ENDIF
	;其他（角色指定無
	IF TALENT:恋慕
		PRINTFORML 「真是的……真希望能够看下气氛啊」
		PRINTFORMW 幻月抱怨着从%CALLNAME:MASTER%的身边离開了。
	ELSEIF TALENT:思慕
		PRINTFORML 「明明正做到高潮时刻啊」
		PRINTFORMW 幻月很遗憾的从%CALLNAME:MASTER%的身边离開了。
	ELSE
		PRINTFORML 「啊啦、好像有谁来了呢」
		PRINTFORMW 幻月悄悄地从%CALLNAME:MASTER%的身边离開了。
	ENDIF
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K117_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 「……%CALLNAME:MASTER%、あとでお話しましょ」
			PRINTFORMW そう言う幻月の微笑みが可怕的。
		ELSEIF TALENT:恋慕
			PRINTFORML 「我、我也……」
			PRINTFORMW 「……やっぱりなんでもないわ！」
		ELSEIF TALENT:愛欲
			PRINTFORML 「あら、お楽しみ中だったみたいね」
			PRINTFORMW 「今度はわたしも頼むわね」
		ELSE
			PRINTFORML 「ふーん」
			PRINTFORMW 幻月は面白いものを見たと言いたげだ。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML 「一人だけずるいわ」
		PRINTFORML 幻月は服をはだけさせ的同时、こちらに寄ってくる。
		PRINTFORMW 「ねぇ%CALLNAME:MASTER%、私も可愛がって？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋慕
			PRINTFORML 「我、我也……」
			PRINTFORMW なんだか声が聞こえた気がする。
			PRINTFORMW 「やっぱりなんでもないわ！　ごめんなさい！」
		ELSE
			PRINTFORMW 「啊啦？　我打扰到你们了吗？　很抱歉呢」
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K117_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 「えぇと、これは……」
			PRINTFORMW 幻月は%CALLNAME:MASTER%に目くばせをして助けを求めてきた。
		;ELSEIF TALENT:思慕
			;思いつかない
		ELSE
			PRINTFORML 「えぇと、これは……」
			PRINTFORMW 突然のことに幻月は慌てている。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
	;幻月はたぶん自分だけ愛してほしいとおもってるよ
		PRINTFORMW 「唉、一緒に……」
		PRINTFORML 「まぁ%CALLNAME:MASTER%がいいならいいけど……」
		PRINTFORMW 幻月は少し不満そうだ。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF TALENT:恋慕 || TALENT:愛欲
			PRINTFORML 「続き、しないの？」
			PRINTFORMW 幻月は物足りなそうに%CALLNAME:MASTER%を見ている。
		;ELSEIF TALENT:思慕
			;思いつかない
		ELSE
			PRINTFORMW 「唉……」
			PRINTFORML 「まって、これは違うの……！」
			PRINTFORMW しかしながらすでに目撃は去ってしまった。
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML 「ふーん」
		IF TALENT:恋慕
			PRINTFORMW 「%CALLNAME:MASTER%はこういうのが好きなのね……」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%、こういう趣味あるのね……」
		ENDIF
		PRINTFORMW 「ま、これは私が預かっておくわ」
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
		;もっと書けそうかも
			IF TALENT:恋慕
				SELECTCASE RAND:3
					CASE 2
						PRINTFORML 「%CALLNAME:MASTER%」
						PRINTFORML 「ねぇ、私、今結構溜まってるのよ」
						PRINTFORMW 幻月はそんなことを不意に言ってくる。
						PRINTFORML 「誰の責任だと思う？」
						PRINTFORMW 怪しく目を光らせ的同时、慢慢地幻月が%CALLNAME:MASTER%に覆いかぶさってくる。
						PRINTFORMW この流れから察するに、きっと%CALLNAME:MASTER%自己的責任なのだろう。
						PRINTFORMW 「ふふ、よくわかってるじゃない」
					CASE 1
						PRINTFORMW 「そこよ！」
						PRINTFORMW そんな声が聞こえたと思ったら、視界が回る。
						PRINTFORML 「ふふ、こんなに隙だらけで……推倒て欲しかったの？」
						PRINTFORMW 日常生活の中で常に気を張っている方がおかしいだろう。
						PRINTFORML 「ま、それはそうかもしれないけど……」
						PRINTFORMW 「そんなことより……ね、シましょ？」
					CASE 0
						PRINTFORML 「呐、%CALLNAME:MASTER%」
						PRINTFORML 「ふふ、今からシてもいいわよね？」
						PRINTFORMW 止めてもどうせするのだろう？　と聞いてみる。
						PRINTFORML 「ま、それはそうだけどね」
						PRINTFORMW 幻月は悄悄的唇を重ねると、%CALLNAME:MASTER%を推倒た。
					ENDSELECT
			ELSEIF TALENT:思慕 || TALENT:愛欲 || TALENT:炮友
				PRINTFORML 「%CALLNAME:MASTER%」
				PRINTFORMW 幻月に呼ばれて振り向くと、抵抗間もなく被逆推てしまった。
				PRINTFORML 「今から你を\@ RAND:2 ? 犯す # 襲う\@わ」
				PRINTFORML 「もちろん拒否権はないから」
				PRINTFORMW そう言うと幻月は悄悄的唇を重ねてきた。
			ELSE
				PRINTFORML 「%CALLNAME:MASTER%」
				PRINTFORMW 幻月に呼ばれて振り向くと、抵抗間もなく被逆推てしまった。
				PRINTFORML 「ごめんなさい……その、火照って抑えられなくて」
				PRINTFORMW 彼女は謝りながら%CALLNAME:MASTER%の服を脱がしてきた。
				PRINTFORMW どうやら本当に%CALLNAME:MASTER%と行為に及ぶようだ。
			ENDIF
			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
			IF CFLAG:积攒度 >= 40
				PRINTFORML 「もう終わり？」
				PRINTFORMW 不満そうな幻月は「むー」と唸っている。
			ELSE
				PRINTFORML 「わかったわ」
				PRINTFORML 終わりにしたい旨を伝えると幻月は意外にも簡単に開放してくれた。
				PRINTFORMW どうやら満足してもらえたようだ。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML 「だめよ」
			SELECTCASE RAND:3
				CASE 2
					PRINTFORML 「%CALLNAME:MASTER%もまだいけるでしょ」
				CASE 1
					PRINTFORML 「まだまだお楽しみはこれからよ」
				CASE 0
					PRINTFORML 「まだ逃がしてあげないわ」
			ENDSELECT
			PRINTFORMW 幻月は%CALLNAME:MASTER%を逃がすまいとぎゅっと抱きしめてきた。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF TALENT:恋慕 || TALENT:愛欲
				PRINTFORML 「だめよ」
				PRINTFORML 「私まだ満足してないもの」
				PRINTFORMW 幻月の目が怪しく光ったような気がする……。
				PRINTFORML 「もっと気持ちよくしてくれるわよね？　%CALLNAME:MASTER%」
				PRINTFORMW 幻月さんはまだまだ満足してないようです。
			ELSEIF TALENT:思慕
				PRINTFORML 「だめよ」
				PRINTFORML 「私まだ満足してないもの」
				PRINTFORMW 幻月の目が怪しく光ったような気がする……。
			ELSE
				PRINTFORML 「え、私まだ満足してないんだけど……」
				PRINTFORMW 「まだいけるでしょ、%CALLNAME:MASTER%」
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「へ…………」
		PRINTFORMW 予想外の乱入者に幻月が固まる。
		PRINTFORMW 数秒の間があって、幻月が動き出す。
		PRINTFORML 「ちょっ、何見てるのよ！」
		PRINTFORML 「早く出てきなさい！」
		PRINTFORMW 手桶の代わりに弾幕が展開される前に%CALLNAME:MASTER%は風呂場から出て行った。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORML 「ん、いいわ。入って」
			PRINTFORML %CALLNAME:MASTER%が風呂に入ると幻月は悄悄的体を寄せてきた。
			PRINTFORML 「こうすればもっと温まれるでしょ？」
			PRINTFORML そう言う幻月の顔はほんのりと赤くなっていた。
			PRINTFORMW %CALLNAME:MASTER%はそんな幻月をのぼせているのかとからかうことにした……。
		ELSEIF TALENT:思慕
			PRINTFORML 「あら、%CALLNAME:MASTER%もお風呂？」
			PRINTFORML 「ゆっくり休んでいくといいわ」
			PRINTFORMW そう言う幻月の顔はほんのりと赤くなっていた。
		ELSE
			PRINTFORMW 幻月は一瞬こちらを見ると、悄悄的端によりスペースを空けた。
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「通報するわよ？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORMW 「なんだ、%CALLNAME:MASTER%か……」
        PRINTFORML 「まったく……こんな遅い時間に来るなら事前に連絡して欲しいわ」
        PRINTFORMW 文句を言いつつも幻月は開心地している。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORMW 「なんだ、%CALLNAME:MASTER%か……」
        PRINTFORML 「警戒して損したわ」
        PRINTFORML ふぁぁ、とあくびをしながら被窝に戻った幻月は、すぐに寝息を立て始めた。
        PRINTFORMW どうやら会話するだけの元気もないようだ。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML 「寝てる少女的房間に入ってくるだなんて……」
        PRINTFORML 「%CALLNAME:MASTER%、何考えてるのよ」
        PRINTFORMW 幻月はじとーっとした目でこちらを見てきた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML 「私は今眠いの。早く出ってて」
        PRINTFORMW 幻月はあくびをしながら%CALLNAME:MASTER%を部屋から押し出した……。
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

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

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

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

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML 「なんだかいい匂いがするわね」
		PRINTFORMW %CALLNAME:MASTER%は悄悄的持っている食べ物を隠した。
		PRINTFORML 「隠しても無駄よ。わかってるんだから」
		PRINTFORMW しかし抵抗も空しく幻月に没収されてしまう。
		PRINTFORML 「あら思ったよりおいしそうじゃない」
		PRINTFORML 「じゃ、いただくわね」
		PRINTFORMW 一言も上げるとは言ってないのだが……。
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K117_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
		;体力700以下は疲惫分岐を作る
		IF BASE:体力 <= 700
			IF TALENT:恋慕 || TALENT:愛欲
				PRINTFORML 「はぁ……はぁ……」
				PRINTFORMW 幻月は余韻で全身を小さく震わせ的同时、呼吸を整えている。
				PRINTFORMW 少しやりすぎてしまったかもしれない。
				PRINTFORML 「もう少し手加減してくれてもいいのよ……？」
				PRINTFORMW %CALLNAME:MASTER%の視線に気づいた幻月は、微笑みを浮かべながら小さく抗議の声を上げる。
				PRINTFORMW 「でも、まぁ気持ち良かったわ%CALLNAME:MASTER%」
			ELSE
				PRINTFORML 「はぁ……はぁ……」
				PRINTFORMW 「もう少し……手加減とかしてくれてもいいのよ……？」
				PRINTFORMW 荒い息をつく幻月は確かに少し疲れているようだ。
			ENDIF
		;もっとーしてー
		ELSEIF CFLAG:积攒度 >= 500
			IF TALENT:恋慕 || TALENT:愛欲
				PRINTFORML 「え、もう終わりにするの……？」
				PRINTFORML 「私まだ満足出来てないんだけど……」
				PRINTFORMW 不満そうにむくれる幻月。
				PRINTFORMW 「誰のせいでこんな溜め込んでるのか分かってるのかしら？」
			ELSE
				PRINTFORML 「あら、もう終わり？」
				PRINTFORML 「そ、你が満足できたならいいわ」
				PRINTFORMW そう言う幻月は少し不満そうにも見える。
			ENDIF
		ELSE
			;通常
			IF TALENT:恋慕
				PRINTFORML 「ふふ、気持ちよかったわよ、%CALLNAME:MASTER%」
				PRINTFORMW 幻月は幸せそうな顔で你に体を寄せている。
				PRINTFORML 「どうしたの？」
				PRINTFORMW なんでもない。そう答えながら彼女の頭を撫でてあげた。
			ELSEIF TALENT:愛欲
				PRINTFORML
				PRINTFORML 「……」
				PRINTFORML 幻月は少し頬を赤らめながら%CALLNAME:MASTER%に体を預けている。
				PRINTFORML 「また今度……よろしくね」
				PRINTFORMW 悄悄的彼女は囁いた。
			ELSEIF TALENT:思慕
				PRINTFORML 「ん、終わり、ね」
				PRINTFORMW そう言うと幻月はさっそく服を着ていく。
				PRINTFORMW なんだか反応が冷。満足していたただけなかったのだろうか？
				PRINTFORML 「まぁ、その……よかったわよ」
				PRINTFORMW どうやら%CALLNAME:MASTER%の考え違いだったようだ。
			ELSE
			;恋慕系陥落素質ないんだし炮友でしょ（暴論）
				PRINTFORML 「終わり、ね」
				PRINTFORMW そう言うと幻月は你に背を向けて服を着始めた……。
			ENDIF
		ENDIF
		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_K117_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_K117_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「んっ！」
		PRINTFORMW （なに、なにが起こったの？）
		PRINTFORMW 幻月は突然の快感に戸惑っているようだ。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「いっッ――――！」
		PRINTFORMW 止まった時の中で弄られ続けた幻月の体は、時が動き出すのと同時に絶頂を迎える。
		PRINTFORML （誰が、こんな）
		PRINTFORML 崩れ落ちそうになる体を気力だけで立たせて、中奖了をうかがう。
		PRINTFORMW その目には明らかな殺気が浮かんでいた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「え、嘘」
		PRINTFORML （間違いなく履いてたのに、なんで？！）
		PRINTFORMW 幻月は突然涼しくなった下半身を隠すように裙子を抑えている。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
			PRINTFORML 「っ！　うぇ……」
			PRINTFORML （気持ち悪い……でも、吐き出せる状況じゃないし……）
			PRINTFORMW 幻月は不快そうな顔で突然口内に現れた精液をゆっくり飲みこんだ。
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
			PRINTFORMW 「っ！　けほ、けほっ…………」
			PRINTFORML （突然なんなのよ……気持ち悪い）
			PRINTFORMW 幻月は突然現れた精液を%CALLNAME:MASTER%に見えないように吐き出した。
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
			PRINTFORML 「うぇ……」
			PRINTFORML 幻月は突然精液が現れた口を反射的に抑えた。
			PRINTFORMW 慣れない感覚に幻月は不快そうにしている。
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
			PRINTFORML 「嗯……」
			PRINTFORMW 幻月は突如口内に現れた精液を躊躇なく飲み下した。
			PRINTFORML 「なんで突然」
			PRINTFORMW 口の中を空にしてから改めて考え始めた。
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
			PRINTFORML 「んっ！　げほ、げほっ！」
			PRINTFORML 幻月は突然口内に現れた精液を吐き出そうとせき込んでいる。
			PRINTFORMW が、喉にへばりつくそれに、彼女はだいぶ苦戦しているようだ。
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
			PRINTFORML 「嗯……」
			PRINTFORMW 幻月は突如口内に現れた精液を躊躇なく飲み下した。
			PRINTFORML 「……おいしい」
			PRINTFORMW 無意識にだろうか。ぽつりと呟く感想が聞こえた。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;無知持ち＆精液経験100未満
		;無知ないので
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
			PRINTFORML 「？　……え、なにこれ？！」
			PRINTFORML いつの間にか顔に付着していた精液を幻月は慌てて拭いていく。
			PRINTFORMW （なんなのよ……手帕汚れちゃったじゃない）
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
			PRINTFORML 「？　……え、なんで？！」
			PRINTFORML （突然で気持ち悪いわ）
			PRINTFORMW 幻月は不快そうな顔をしながら手で拭った精液を舐めとっていく。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
			PRINTFORML 「？！　なんでこんなのが」
			PRINTFORMW 幻月は突然現れた精液を誰にも見られぬよう拭いとった。
		;舐めとり
		ELSEIF ARG:1 == 2
			PRINTFORML 「なんで突然」
			PRINTFORML 幻月は突然現れた精液を不快そうな顔をしながら舐めとっていく。
		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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORML 「いっッ……！」
		PRINTFORMW 突如として下腹部を襲う鈍痛に幻月はおなかを押さえる。
		PRINTFORML （なに、なにが起こったの……？）
		PRINTFORMW 感じたことのない痛みに幻月は助けを求めるように冷や汗を浮かべながら周囲を見渡している。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
			PRINTFORML 「ん……?」
			PRINTFORML 「この感覚……もしかして……」
			PRINTFORMW 自分の体に起こったことに思い当たり、幻月の顔が青白くなっていく。
			PRINTFORML 「いや……だわ」
			PRINTFORMW 幻月の額を冷や汗が伝っていった。
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
			PRINTFORML 「ん……?」
			PRINTFORML 「この感覚……もしかして……」
			PRINTFORML 「……口服避孕薬飲んでるし、大丈夫、よ」
			PRINTFORMW 幻月は自分に言い聞かせるように悄悄的呟いた。
		;処女膣内射精
		ELSEIF ARG:1 == 3
			PRINTFORML 「やだ、なによこの感覚……」
			PRINTFORMW 未知の体験に幻月はおなかを押さえている。
			PRINTFORMW 「うぅ、気持ち悪い……」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K117_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			PRINTFORML 「え、ナマ……？」
			PRINTFORMW 「いくら%CALLNAME:MASTER%とでもそれはまだ……」
		ELSE
			PRINTFORML 「ナマでやりたい？」
			PRINTFORMW 「私たちってまだそんな関係ではないと思うのよ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕 || TALENT:思慕
			PRINTFORML 「…………」
			PRINTFORML 幻月はしばらく考えたあと、
			PRINTFORMW 「ごめんなさい。まだ私たちには早いと思うのよ」
		ELSE
			PRINTFORML 「……いやよ」
			PRINTFORMW むげもなく断られてしまった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
		;切れるというより、分かってもらえなくて悲しいみたいなイメージ
			PRINTFORML 「だから、いやだって言ってるじゃない！」
			PRINTFORMW 「なんで分かってくれないのよ……」
		ELSE
		;静かに切れるタイプだと思う
			PRINTFORML 「だから、だめだと言ってるじゃない」
			PRINTFORMW 「覚えておきなさい。%CALLNAME:MASTER%にそこまで許す気はないわ」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML 「%CALLNAME:MASTER%がそこまで言うなら……」
		PRINTFORMW 「あ、でも危ない日はダメよ」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW 「%CALLNAME:MASTER%……私との兒童、欲しいのね？」
		PRINTFORMW 「…………分かったわ」
		PRINTFORMW 「私も、%CALLNAME:MASTER%との兒童なら欲しいと思えるわ」
		PRINTFORMW 幻月は覚悟を決めたように静かに微笑み、
		PRINTFORMW 「子作り、しましょ」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K117_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K117_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;憤怒
		IF CFLAG:318
			PRINTFORMW 幻月はこちらを見もせずに飛び去ってしまった。
		ELSEIF TALENT:恋慕
			PRINTFORML 「じゃあね、%CALLNAME:MASTER%。また明日」
			PRINTFORMW 幻月はこちらに手を振って帰っていった。
		ELSEIF TALENT:思慕
			PRINTFORML 「私はそろそろ返回わ。%CALLNAME:MASTER%」
			PRINTFORMW 幻月はそう言うと飛び去って行った。
		ELSE
			PRINTFORML 「我就先回去了呢」
			PRINTFORMW 幻月はそう言うと飛び去ってしまった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF CFLAG:318
			PRINTFORML 「まぁ悪くはなかったわ」
			PRINTFORMW 幻月は%CALLNAME:MASTER%の方を見ずに帰っていった。
		ELSEIF TALENT:恋慕 || TALENT:思慕
			PRINTFORML 「今日はここでお開きかしら？」
			IF RAND:2 == 0
				PRINTFORML 「ふふ、楽しかったわよ」
			ELSE
				PRINTFORML 「また、お願いね」
			ENDIF
			PRINTFORMW 幻月はこちらに手を振って帰っていった。
		ELSEIF TALENT:思慕
			PRINTFORML 「楽しかったわ。また誘ってね」
			PRINTFORMW 幻月は控えめに手を振って帰っていった。
		ELSE
			PRINTFORML 「なかなか楽しめたわ」
			PRINTFORMW 回头见、と短く別れの挨拶をすると幻月は帰っていった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF TALENT:恋慕
			PRINTFORML 「今日もありがとね」
			PRINTFORMW 幸せそうな笑顔を浮かべながら幻月はドアの向こうへ消えていった。
		ELSEIF TALENT:思慕
			PRINTFORML 「紳士的ね」
			PRINTFORMW 開心地微笑着并幻月はドアの向こうへ消えていった。
		ELSE
			PRINTFORML 「あら、ご精心どうも」
			PRINTFORMW 幻月は少し意外そうだ。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K117_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 深夜、幻月再次进入了不眠之夜。
		PRINTFORML 「%CALLNAME:MASTER%……现在你在做什么呢」
		PRINTFORMW 这样的自言自语在这几天里不断地重复着。
		PRINTFORMW 无数次的在思考%CALLNAME:MASTER%的事情。
		PRINTFORMW 然后、每次思考着胸口就会疼痛着。
		PRINTFORML
		PRINTFORML 今天也、和平时一样。胸口很痛。
		PRINTFORML 「真的、到底是什么啊这种感觉」
		PRINTFORMW 反复考虑同样的事情、反复的用嘴诉说着。但还是、不清楚。
		PRINTFORML
		PRINTFORMW ――――然而这是谎言。
		PRINTFORMW 其实我是知道的。已经意识到答案是什么了。
		PRINTFORMW 但是、无法从嘴里说出来。
		PRINTFORMW 如果说出来的话、如果承认了的话、感觉自己就会变得不是自己了。
		PRINTFORML
		PRINTFORMW 「不行、呢」
		PRINTFORML
		PRINTFORML 会悲伤的只有我自己。
		PRINTFORML 无论做什么也只是先一步被拒绝罢了。
		PRINTFORMW 人与恶魔之间有着无法填补的沟壑。
		PRINTFORML
		PRINTFORMW 即使如此、这份心中的感情也无法抑制。
		PRINTFORML
		PRINTFORMW 「我、陷入恋爱了呢」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 深夜、幻月度过了这个不眠之夜。
		PRINTFORMW 也没什么要做的事、所以就在床上咕噜咕噜地滚来滚去。
		PRINTFORML
		PRINTFORML 「%CALLNAME:MASTER%现在是在做什么呢」
		PRINTFORMW 突然间漏出了这样的自言自语、她自己都被吓了一跳将手捂在了嘴边。
		PRINTFORML 不知不觉间就再考虑%CALLNAME:MASTER%的事情了。
		PRINTFORMW 「到底是什么呢、这种感觉」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「……嗯、嗯！」
		PRINTFORMW 幻月躺在床上埋头于自慰中。
		PRINTFORML 「呐、%CALLNAME:MASTER%。即使模仿着%CALLNAME:MASTER%的动作也完全无法满足啊……」
		PRINTFORMW 执拗地玩弄自己弱点的手指渐渐变得激烈起来。
		PRINTFORML 「呐、%CALLNAME:MASTER%。都是因为%CALLNAME:MASTER%的错才变成了这种身体呀……」
		PRINTFORMW 迎来了绝顶、幻月猛地仰起了背潮吹了。
		PRINTFORML
		PRINTFORML 然而、欲望完全没有消退的迹象。
		PRINTFORML
		PRINTFORMW 「更多的……让我舒服起来呀……%CALLNAME:MASTER%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;少しヤンデレっぽいね
		PRINTFORML 「……嗯、嗯！」
		PRINTFORML 幻月躺在床上沉迷于自慰中。
		PRINTFORMW 虽说已经迎来了数次绝顶但完全没有结束的迹象。
		PRINTFORML
		PRINTFORML 「不行、完全不够……」
		PRINTFORMW 玩弄着身体的手变得越来越激烈。
		PRINTFORML 「更多、更多…………」
		PRINTFORMW 混杂在喘息声中如同说梦话一般自言自语着、
		PRINTFORML 「%CALLNAME:MASTER%…………！」
		PRINTFORMW 绝顶了。
		PRINTFORML
		PRINTFORMW 「请爱着我啊……%CALLNAME:MASTER%」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML 「哈啊、哈啊……身体、好热」
		PRINTFORML 身体炽热的不得了。
		PRINTFORMW 即使自己抚慰着也完全治不好。
		PRINTFORML
		PRINTFORMW 「%CALLNAME:MASTER%……」
		PRINTFORMW 想要见%CALLNAME:MASTER%。
		PRINTFORMW 想要被%CALLNAME:MASTER%玩弄着。
		PRINTFORMW %CALLNAME:MASTER%、完全不够。
		PRINTFORML
		PRINTFORMW 「还要…………」
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K117_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
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 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML 「はぁ……」
		PRINTFORML 「結構、溜め込んじゃってるわね……」
		PRINTFORMW 「責任取ってもらおうかしら」
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	IF TALENT:恋慕 || TALENT:思慕 || TALENT:愛欲 || TALENT:炮友
		PRINTFORML 「んっ、%CALLNAME:MASTER%……」
	ELSE
		PRINTFORML 「んっ……」
	ENDIF
	PRINTFORML 寝付けぬ夜。幻月は声を殺して自身を慰める。
	PRINTFORML 「…………ッくぅう」
	PRINTFORMW 絶頂に達し、あふれそうになる声を手で押さえて体を震わせる。
	PRINTFORML
	PRINTFORML 「はぁ……早く寝よ」
	IF TALENT:恋慕 || TALENT:思慕 || TALENT:愛欲 || TALENT:炮友
		PRINTFORMW %CALLNAME:MASTER%への思いを押し殺すように幻月は睡眠に落ちていった。
	ELSE
		PRINTFORMW 一街道の事を終え、幻月は何の感慨もなく寝支度を始めた。
	ENDIF
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K117_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋慕
			PRINTFORML 「一緒にお風呂？　ごめんなさい、一人でゆっくり入りたいのよ」
			PRINTFORMW 幻月はなんだか申し訳なさそうに断った。
		ELSEIF TALENT:思慕
			PRINTFORML 「一緒にお風呂？　……ダメよ」
			PRINTFORMW 幻月は少し悩むようなそぶりを見せたが、%CALLNAME:MASTER%の頼みをはっきり断った。
		ELSE
			PRINTFORML 「一緒にお風呂？　ダメに決まってるじゃない」
			PRINTFORMW あっけなく断られてしまった。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋慕
			PRINTFORML 「いいわ。一緒に入りましょう」
			PRINTFORMW 幻月は少し開心的言った。
		ELSE
			PRINTFORML 「一緒にお風呂？　まぁいいけど……」
			PRINTFORMW 幻月は頬を赤らめながら許可してくれた。
		ENDIF
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K117_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_K117_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
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K117_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「哈啊……嗯、啊嗯…………唉？」
			PRINTFORMW 由于予想外时间到来的访问者而完全僵住了。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「等、真是的、到底是怎样啦！」
			PRINTFORMW %CALLNAME:MASTER%用背部感受着幻月的弾幕从房间里出去了……。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「就这样继续下去什么的……真是糟糕的兴趣啊……」
			PRINTFORMW %CALLNAME:MASTER%的请求令幻月明显的露出了一副不情愿的表情。
			PRINTFORMW 但是、叹了一口气后再次动起了之前从秘所上拿開的手。
			PRINTFORML 「这样子的……真的是变态哟……」
			PRINTFORMW 你就这样视奸也许是在意视线无法埋头于快乐中的幻月。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「――――！」
			PRINTFORMW 幻月发出了无声的悲鸣把%CALLNAME:MASTER%赶了出去。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			PRINTFORML 「等、什么……嗯」
			PRINTFORMW 你用嘴堵上了思维无法跟上状况的幻月的嘴唇。
			IF TALENT:恋慕 || TALENT:愛欲
				PRINTFORML 「嗯……呸咯」
				PRINTFORMW 大概是察觉到了%CALLNAME:MASTER%想要做的事情幻月的舌头从侧面缠绕了上来。
				PRINTFORMW しばらくの後、唇を離すと%CALLNAME:MASTER%は幻月の蕩けた瞳で見つめられる。
				PRINTFORMW 「……我也是……一个人很寂寞的啊……」
				PRINTFORML 如同诱惑%CALLNAME:MASTER%般、幻月自己掰開了自己濡湿的秘所。
				PRINTFORMW 「好啦、快插进来吧。%CALLNAME:MASTER%」
			ELSE
				PRINTFORML 「嗯、呼……」
				PRINTFORMW 虽然像是拒绝舌头进入口内一样嘴巴瞬间就闭上了、但不久就会像放弃了一般产生了缝隙。
				PRINTFORMW しばらくたって唇を離してやる。
				PRINTFORML 「%CALLNAME:MASTER%……」
				PRINTFORMW 满脸通红的看着这边的幻月、已经没有叛逆意思了。
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕 || TALENT:愛欲
				PRINTFORMW 「虽说被%CALLNAME:MASTER%渴求着很開心啦……」
				PRINTFORMW 「那个、下次请再普通点来做……」
			ELSE
				PRINTFORMW 「突然就闯了进来……做了这种事情……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K117_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORMW 「%CALLNAME:MASTER%。约会、行きましょ？」
			ELSE
				PRINTFORMW 「%CALLNAME:MASTER%、少し付き合ってくれない？」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「そう言ってくれると思ったわ。さ、行きましょ」
			ELSE
				PRINTFORML 「じゃあ、さっそく行きましょ」
			ENDIF
			PRINTFORMW 幻月は羽をパタパタさせ的同时、%CALLNAME:MASTER%の手を取った。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1
			IF TALENT:恋慕
				PRINTFORML 「そう……また今度、よろしくね」
			ELSE
				PRINTFORML 「まぁ、%CALLNAME:MASTER%にも予定とかあるわよね」
			ENDIF
			PRINTFORMW 幻月は羽をしょんぼりと落としている。
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		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_K117_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_K117_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORMW 「私、悪魔なのよ？」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
	;疲惫
		PRINTFORML 「さすがに……疲惫わ……」
		IF BASE:MASTER:体力 < 700
			PRINTFORMW 「ふふ、%CALLNAME:MASTER%もお疲れみたいね」
		ELSE
			PRINTFORMW 「%CALLNAME:MASTER%は……まだ余裕ありそうね」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
	;満足して解放
		PRINTFORML 「ふぅ、よかったわよ、%CALLNAME:MASTER%」
		PRINTFORMW 幻月はどこかスッキリしたような顔で%CALLNAME:MASTER%の上から降りた。
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
	;満足したところを被逆推た
		PRINTFORMW 「きゃっ！」
		PRINTFORML 「ふふ、%CALLNAME:MASTER%はまだ満足できてなかったのね……」
		PRINTFORMW 「いいわ。私の体で気持ちよくなって」
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
	;壊れるまでしてあげる
		PRINTFORML 「ふふ、%CALLNAME:MASTER%がそんなに欲しがるなら……」
		PRINTFORMW 「いいわ。お望み街道限界までイかせてあげる……」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;一日の終了時(AFTERTRAニーの前)、面識がなければ呼び出されない
;==================================================
@M_KOJO_EVENT_K117_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

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

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

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

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

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

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

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

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

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

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

path: ERB/口上・メッセージ関連/個人口上/【117】幻月/M_KOJO_K117_イベント.ERB


path: ERB/口上・メッセージ関連/個人口上/【117】幻月/M_KOJO_K117_カウンター.ERB