code:
For EraToho The World, Sakuya Izayoi by some /hgg/ anon

About this
	The dialog is mainly intended for a butler living in the SDM, but other plays should be supported

	I tried to go for a Sakuya who is portrayed as a kuudere ojousama/mature maid character who sometimes makes cheeky remarks.
	She acts coldly towards the player at first and tries to correct the player's inappropriate behaviour, especially if you live in the mansion.
	She genuinely cares about her role as a head maid for Remilia and takes it very seriously.
	She becomes more loving and teasing as she begins to loves you and uses her timestop to tease the player sometimes.
	(Toggleable) On hate mark 3 or angry + mad she becomes very distant to the player and will make cutting remarks and throw knives at you.

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【15】咲夜英文版/Readme.txt

license: unknown


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;Sakuya reverse time stop
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

;==================================================
;Try
;ARG = chance
;arg:1 = ignore conditions
;==================================================
@K15_SAKUYAWORLD_TRY(ARG, ARG:1)
#DIM iBlackmail
	;will never do without lewd mark 3
	SIF MARK:15:不埒刻印  < 3
		RETURN 1

		 ;needs blackmail   or   lustful
	IF CFLAG:15:掌握把柄 > 0 || K15_LUST(750) || ARG:1
			  ;chance
		IF ARG > RAND:100
				;store blackmail flag
			iBlackmail = CFLAG:15:掌握把柄

			;choose action
			VARSET LOCAL
			LOCAL = 1

			WHILE LOCAL
				LOCAL:1 = RAND:30
				RESULT = 1

				TRYCALLFORM K15_SAKUYAWORLD_{LOCAL:1}(ARG:1)

				LOCAL = RESULT
			WEND
			WAIT

			;Sakuya had some blackmail and forgives you
			SIF CFLAG:15:掌握把柄 == 0 && iBlackmail > 0
				CALL K15_SAKUYAWORLD_MESSAGE_FORGIVEN()
		ELSE
			CALL K15_SAKUYAWORLD_MESSAGE_NOACTION()
		ENDIF
	ENDIF

RETURN 1

;==================================================
;sakuya world no action message
;==================================================
@K15_SAKUYAWORLD_MESSAGE_NOACTION(ARG)
	;PRINTFORMDW %CALLNAME:15% has a mischievous look on her face.
RETURN 1

;==================================================
;sakuya world forgiven blackmail message
;==================================================
@K15_SAKUYAWORLD_MESSAGE_FORGIVEN(ARG)
	;PRINTFORML You somehow have a feeling %CALLNAME:15% has forgiven you...
	PRINTFORML 你總覺得%CALLNAME:15%像是已經原諒你了…
RETURN 1

;==================================================
;increase XP
;==================================================
@K15_SAKUYAWORLD_GAIN_XP(ARG)
	CFLAG:K15C_TIMESTOP_TEASING_XP += ARG

	;xp limit
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP > 1000
		CFLAG:K15C_TIMESTOP_TEASING_XP = 1000
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;ACTIONS - Skinships and lovey dovey stuff
;require no time stop xp
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

;==================================================
;light touching
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_0(ARG)
	CALL K15_SAKUYAWORLD_GAIN_XP(1)
	CALL K15_SAKUYAWORLD_MESSAGE_0(ARG)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_0(ARG)
	PRINTFORMDL

	IF K15_HATE_ANGER()
		;PRINTFORMDW You suddenly feel a pinch on your cheek.
		PRINTFORMDW 你突然覺得自己的臉頰被捏了一下。
	ELSEIF TALENT:15:恋慕
		;PRINTFORMDW You suddenly feel a pleasant sensation as if someone touched your face and hair very gently, making you feel warm.
		PRINTFORMDW 一陣舒適感向你突然襲來，臉頰和頭髮像是被柔柔輕撫，讓你暖意洋洋。
	ELSE
		;PRINTFORMDW You suddenly feel a poke on your cheek.
		PRINTFORMDW 你突然覺得自己的臉頰被戳了一下。
	ENDIF

	PRINTFORMDL
RETURN 1

;==================================================
;long touch
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_1(ARG)
	CALL K15_SAKUYAWORLD_GAIN_XP(3)
	CALL K15_SAKUYAWORLD_MESSAGE_1(ARG)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_1(ARG)
	PRINTFORMDL

	IF K15_HATE_ANGER()
		;PRINTFORMDW You suddenly feel a pinch on your sides.
		PRINTFORMDW 你突然覺得自己的肋部被捏了一下。
	ELSEIF TALENT:15:恋慕
		;PRINTFORMDW You suddenly feel a pleasant warmth, as if someone was hugging very tightly you for a while.
		PRINTFORMDW 你突然感到一陣舒坦的暖意，感覺像是被誰緊緊擁抱了一會。
	ELSE
		;PRINTFORMDW You suddenly feel a pleasant warmth, as if someone was hugging you for a while.
		PRINTFORMDW 你突然感到一陣舒坦的暖意，感覺像是被誰抱了抱一樣。
	ENDIF

	PRINTFORMDL
RETURN 1

;==================================================
;kiss
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_2(ARG)
	;will only do if she loves you and already given a kiss
	SIF !TALENT:15:恋慕
		RETURN 1

	SIF !EXP:TARGET:接吻経験
		RETURN 1

	;xp gain
	EXP:接吻経験 +=3
	CALL K15_SAKUYAWORLD_GAIN_XP(3)
	CALL K15_SAKUYAWORLD_MESSAGE_2(ARG)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_2(ARG)
	;PRINTFORMDL
	;PRINTFORMDW You suddenly feel a pleasant warm feeling, as if someone was kissing and embracing you for a while.
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDW 你突然感到一陣舒坦的暖意，像是有人對你又親又摟一樣。
	PRINTFORMDL
RETURN 1

;==================================================
;erotic touch
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_3(ARG)
	CALL K15_SAKUYAWORLD_GAIN_XP(5)

	;get boner
	SIF TALENT:PLAYER:性別 != 1
		BASE:MASTER:勃起 = 1500

	CALL K15_SAKUYAWORLD_MESSAGE_3(ARG)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_3(ARG)
	PRINTFORMDL

	IF K15_HATE_ANGER()
		;PRINTFORMDW You suddenly feel the sensation of someone touching you roughly in various places.
		PRINTFORMDW 突然，你覺得自己身上像是被人粗暴地在各處蹭了幾回。
	ELSEIF TALENT:15:恋慕
		;PRINTFORMDW You suddenly feel the sensation of someone touching you gently in various places.
		PRINTFORMDW 突然，你覺得自己身上像是被人溫柔地在各處蹭了幾回。
	ELSE
		;PRINTFORMDW You suddenly feel the sensation of someone touching you in various places.
		PRINTFORMDW 突然，你覺得自己身上像是被人在各處蹭了幾回。
	ENDIF

	PRINTFORMDL
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;ACTIONS - Punishments and toys
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

;==================================================
;rotor
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_10(ARG)
		; player is female
	SIF !(TALENT:PLAYER:性別 & 1)
		RETURN 1

			   ;needs 750 xp to do without blackmail
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 750 && CFLAG:掌握把柄 == 0
		RETURN 1

	;will not repeat for a while
	SIF CFLAG:PLAYER:跳蛋挿入 > 30
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_10(ARG)

	;set rotor
	CFLAG:PLAYER:跳蛋挿入 = 240

	;considers punishment
	CFLAG:掌握把柄 -= 1

	;set blackmail flag to zero
	SIF CFLAG:掌握把柄 < 0
		CFLAG:掌握把柄 = 0

	;xp gain
	EXP:嗜虐快楽経験 += 5
	CALL K15_SAKUYAWORLD_GAIN_XP(10)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_10(ARG)
	;PRINTFORMDL
	;PRINTFORMDW You suddenly feel a discomfortable pleasure as you feel something vibrating in your pussy.
	;PRINTFORMDW When did someone put a rotor in there?!
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDW 突然，你的陰部傳來一陣陣令人不適的快感，像是有什麼東西在裏面震動。
	PRINTFORMDW 誰在什麼時候塞了個跳蛋進來？！
	PRINTFORMDL
RETURN 1

;==================================================
;anal rotor
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_11(ARG)
					;needs 900 xp to do without blackmail
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 900 && CFLAG:掌握把柄 == 0
		RETURN 1

	;will not repeat for a while
	SIF CFLAG:PLAYER:跳蛋A挿入 > 30
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_11(ARG)

	;set rotor
	CFLAG:PLAYER:跳蛋A挿入 = 240
	;considers punishment
	CFLAG:掌握把柄 -= 2

	;set blackmail flag to zero
	SIF CFLAG:掌握把柄 < 0
		CFLAG:掌握把柄 = 0

	;xp gain
	EXP:嗜虐快楽経験 += 10
	CALL K15_SAKUYAWORLD_GAIN_XP(15)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_11(ARG)
	;PRINTFORMDL
	;PRINTFORMDW You suddenly feel a discomfortable pleasure as you feel something vibrating in your butt.
	;PRINTFORMDW When did someone put a rotor in there?!
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDW 突然，你的屁股內傳來一陣陣令人不適的快感，像是有什麼東西在裏面震動。
	PRINTFORMDW 誰在什麼時候塞了個跳蛋進來？！
	PRINTFORMDL
RETURN 1

;==================================================
;panty theft
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_12(ARG)
				   ;needs 800 xp to do without blackmail
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 800 && CFLAG:掌握把柄 == 0 && !ARG
		RETURN 1

		 ;needs the player to have underwear
	SIF !CFLAG:PLAYER:206
		RETURN 1

	CFLAG:PLAYER:206 = 0
	CALL K15_SAKUYAWORLD_MESSAGE_12(ARG)

	;considers punishment
	CFLAG:掌握把柄 -= 1

	;set blackmail flag to zero
	SIF CFLAG:掌握把柄 < 0
		CFLAG:掌握把柄 = 0

	;xp gain
	EXP:嗜虐快楽経験 += 1
	CALL K15_SAKUYAWORLD_GAIN_XP(10)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_12(ARG)
	;PRINTFORMDL
	;PRINTFORMDW You feel suddenly your genitals rub against your clothing in an uncomfortable way.
	;PRINTFORMDW Did someone just steal your underwear in an instant!?
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDW 突然，你察覺自己股間的布料觸感怪異。
	PRINTFORMDW 有人在一瞬間把你的內褲幹走了？
	PRINTFORMDL
RETURN 1

;==================================================
;kiss mark
;arg = ignore condition
;==================================================
@K15_SAKUYAWORLD_13(ARG)
		;needs blackmail
	SIF CFLAG:掌握把柄 == 0 && !ARG
		RETURN 1

		 ;needs love
	SIF !TALENT:恋慕 && !ARG
		RETURN 1
		;no kiss mark
	SIF TFLAG:接吻マーク
		RETURN 1

	;set kiss mark
	TFLAG:接吻マーク = 15

	CALL K15_SAKUYAWORLD_MESSAGE_13(ARG)

	;considers punishment
	CFLAG:掌握把柄 -= 2

	;set blackmail flag to zero
	SIF CFLAG:掌握把柄 < 0
		CFLAG:掌握把柄 = 0

	;xp gain
	EXP:嗜虐快楽経験 += 2
	CALL K15_SAKUYAWORLD_GAIN_XP(10)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_13(ARG)
	;PRINTFORMDL
	;PRINTFORMDW You suddenly feel a painful pinch on your neck.
	;PRINTFORMDW As you find a reflective surface, you see a kissmark.
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDW 突然，你的頸上傳來一陣劇痛，像是被人狠狠地捏了一把。
	PRINTFORMDW 你站到了鏡子面前一看，頸上是一道吻痕。
	PRINTFORMDL
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;ACTIONS - Teasing
;actions with the player being denied orgasming
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;nipple tease
;==================================================
@K15_SAKUYAWORLD_20(ARG)
					;needs 50 xp
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 50
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_20(ARG)

	SIF TALENT:PLAYER:性別 != 1
		BASE:MASTER:勃起 = 1500

	EXP:MASTER:Ｂ経験 += 10

	EXP:手淫経験 +=5
	EXP:口淫経験 +=2

	EXP:嗜虐快楽経験 += 1

	CALL K15_SAKUYAWORLD_GAIN_XP(5)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_20(ARG)
	;PRINTFORMDL
	;PRINTFORMDW You suddenly feel an intense pleasure in your nipples, as if someone was teasing them for a while.
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDW 突然，你的乳頭傳來一陣陣激烈的快感，像是被人狠狠地玩弄了一下。
	PRINTFORMDL
RETURN 1

;==================================================
;handjob tease
;==================================================
@K15_SAKUYAWORLD_21(ARG)
		;needs a penis
	SIF TALENT:MASTER:性別 == 1
		RETURN 1

				;needs 100 xp
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 100
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_21(ARG)

	BASE:MASTER:勃起 = 1500
	EXP:MASTER:Ｃ経験 += 10

	;stat gain
	EXP:手淫経験 +=10
	EXP:嗜虐快楽経験 += 1

	CALL K15_SAKUYAWORLD_GAIN_XP(5)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_21(ARG)
	;PRINTFORMDL
	;PRINTFORMDL You suddenly feel an intense pleasure from your crotch, as if someone was rubbing it for a while.
	;PRINTFORMDW That someone was obviously only teasing you and stopped when you were about to orgasm.
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDL 突然，你的胯下傳來一陣激烈的快感，像是被人狠狠地擼動過一樣。
	PRINTFORMDW 那感覺像是有人特地想要挑起你的情慾，但在高潮來臨前的一刻戛然止息。
	PRINTFORMDL
RETURN 1

;==================================================
;paizuri tease
;==================================================
@K15_SAKUYAWORLD_22(ARG)
			;needs a penis
	SIF TALENT:MASTER:性別 == 1
		RETURN 1

			;needs 150 xp
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 150
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_22(ARG)

	;master stat gain
	BASE:MASTER:勃起 = 1500
	EXP:MASTER:Ｃ経験 += 10

	;stat gain
	EXP:乳交経験 +=5
	EXP:奉仕快楽経験 +=5
	EXP:嗜虐快楽経験 += 1

	CALL K15_SAKUYAWORLD_GAIN_XP(5)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_22(ARG)
	;PRINTFORMDL
	;PRINTFORMDL You suddenly feel an intense pleasure from your crotch in instant, as if someone was rubbing it between two soft objects.
	;PRINTFORMDW That someone was obviously only teasing you and stopped when you were about to ejaculate.
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDL 突然，你的胯下傳來一陣激烈的快感，像是被兩團極柔之物蹂躪套弄過後一樣。
	PRINTFORMDW 那感覺像是有人特地想要挑起你的情慾，但在高潮來臨前的一刻戛然止息。
	PRINTFORMDL
RETURN 1

;==================================================
;blowjob tease
;==================================================
@K15_SAKUYAWORLD_23(ARG)
			;needs a penis
	SIF TALENT:MASTER:性別 == 1
		RETURN 1

				;needs 200 xp
	SIF CFLAG:K15C_TIMESTOP_TEASING_XP < 200 && !ARG
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_23(ARG)

	;master stat gain
	BASE:MASTER:勃起 = 1500
	EXP:MASTER:Ｃ経験 += 10

	;stat gain
	EXP:手淫経験 +=10
	EXP:奉仕快楽経験 +=10
	EXP:嗜虐快楽経験 += 1

	CALL K15_SAKUYAWORLD_GAIN_XP(5)
RETURN 0

;-------------------------------------------------
@K15_SAKUYAWORLD_MESSAGE_23(ARG)
	;PRINTFORMDL
	;PRINTFORMDL You suddenly feel an intense pleasure from your crotch in instant, as if someone was licking it for a while.
	;PRINTFORMDW That someone was obviously only teasing you and stopped when you when about to ejaculate.
	;PRINTFORMDL
	PRINTFORMDL
	PRINTFORMDL 突然，你的胯下傳來一陣激烈的快感，像是被甚麼溫暖柔物舔弄過後一樣。
	PRINTFORMDW 那感覺像是有人特地想要挑起你的情慾，但在高潮來臨前的一刻戛然止息。
	PRINTFORMDL
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;ACTIONS - REVERSE TIME SERVICE
;actions with the player orgasming
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※

;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;ACTIONS - SPECIAL EVENTS
;※※※※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;timerape
;arg  1 = ignore conditions
;==================================================
@K15_SAKUYAWORLD_CHECK_SP1(ARG)
#FUNCTION
	   ;not a virgin
	SIF TALENT:処女
		RETURNF 0
		;ignore condition
	SIF ARG
		RETURNF 1
		;lust is 90%     likes the player       lewd mark 3
RETURNF K15_LUST(900) && K15_LIKES_PLAYER() && MARK:不埒刻印 == 3

;-------------------------------------------------
@K15_SAKUYAWORLD_SP1(ARG)
	SIF K15_SAKUYAWORLD_CHECK_SP1()
		RETURN 1

	CALL K15_SAKUYAWORLD_MESSAGE_SP1

	BASE:MASTER:体力 = -500
	BASE:MASTER:気力 = -500
	BASE:MASTER:精力 = 0

	;forgives punishment
	CFLAG:积攒度 = 0

	;xp gain
	EXP:接吻経験 +=25
	EXP:手淫経験 +=25
	EXP:奉仕快楽経験 +=25
	EXP:乳交経験 +=25
	EXP:Ｖ経験 +=25

	EXP:嗜虐快楽経験 += 25

	CALL K15_SAKUYAWORLD_GAIN_XP(100)
RETURN 0

;-------------------------------------------------
;TODO: I can't write smut stories
@K15_SAKUYAWORLD_MESSAGE_SP1
	PRINTFORMDL

	;Sakuya timestop ;all text is colored
	DRAWLINE
	;PRINTFORML
	;PRINTFORMW 「Watashi no sekai♪」
	;PRINTFORML
	;PRINTFORMW 「Ufufu♪ %CALLNAME:MASTER%%UNICODE(0x2665)%」
	;PRINTFORMW .........
	;PRINTFORMW ......
	;PRINTFORMW ...
	;PRINTFORML
	PRINTFORML
	PRINTFORMW 「私の世界♪」
		;差點翻成Za warudo
	PRINTFORML
	PRINTFORMW 「呵呵呵♪ %CALLNAME:MASTER%%UNICODE(0x2665)%」
	PRINTFORMW .........
	PRINTFORMW ......
	PRINTFORMW ...
	PRINTFORML
	DRAWLINE
	;end of timestop

	;PRINTFORMDL
	;PRINTFORMDW As %CALLNAME:15% continues the flow of time, you are overcome by the ecstasy of feeling multiple ejaculations all at once.
	;PRINTFORMDW	You see %CALLNAME:15% lying atop of you, hugging you while being exhausted.
	PRINTFORMDL
	PRINTFORMDW 在%CALLNAME:15%讓時間重新開始流動那一刻，多次射精帶來的極樂快感重疊在一起向你湧來。
	PRINTFORMDW	%CALLNAME:15%伏在你身上，力盡筋疲地摟抱著你。
	IF TALENT:恋慕
		;PRINTFORMW 「I love you%UNICODE(0x2665)%...」
		PRINTFORMW 「愛你唷，%UNICODE(0x2665)%…」
	ELSE
		;PRINTFORMW 「Ufufu%UNICODE(0x2665)%...」
		PRINTFORMW 「呵呵%UNICODE(0x2665)%…」
	ENDIF
	;PRINTFORMDW She must have raped you in stopped time for a while, utterly exhausting you both.
	;PRINTFORMDL
	PRINTFORMDW 兩人身心都極為勞累，她肯定是在時停中對你上下其手了。
	PRINTFORMDL
RETURN 1


code:
EraTohoTW用咲夜逆輸入版　れどめ
翻訳：JPTR1、翻訳者連絡先：eratoho総合スレ
この口上は英語版TWの咲夜さんの口上を拙いながらも翻訳させて頂いたものとなっております
なるべく文化の差などを感じさせない様に、文単体の訳よりも口上全体の流れを意識しながら翻訳するように努めました。
翻訳するにあたり、再現性及び検証可能性のために原文はコメントアウトする形で残し、その下に訳文を記入しました。
また、訳文の下に翻訳時の考えなどを字下げ処理をして記したものがあります。
そのため、データ量が内容量の倍に近くなっています。
歓迎追加翻訳者

気になる事があった場合、era板+のeratoho総合スレまで書き込んで頂けると幸いです。
参考：2023年01月08日現在のeratoho総合スレURL
http://jbbs.shitaraba.net/bbs/read.cgi/otaku/16783/1672380113/
作成者たちに敬意を込めて。
+=＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝=+
For English speaker
Sakuya For EraTohoTW ver.Reimport	translator：JPTR1
This dialogue is a translated version of Sakuya's dialogue from the English version TW.
I tried to translate while being conscious of the overall flow rather than translating individual sentences
- so as not to make people feel cultural differences as much as possible.
For reproducibility and verifiability, I left the original text in a commented-out form
and filled in the translation below it.
In addition, there are some indented notes below the translated text,
- such as thoughts at the time of translation.
Therefore, the amount of data is nearly double the content.
P.S. Other EN→JP translators are always welcomed

If you have any concerns, I would appreciate it if you could write to the "eratoho総合スレ" in "era板+"
Reference:"eratoho総合スレ"URL as of 08/01/2023;(DD/MM/YYYY)
http://jbbs.shitaraba.net/bbs/read.cgi/otaku/16783/1672380113/
With a great respect for all eraTW and eraTW-eng members, some /hgg/ anon
JPTR1.
+=＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝=+

CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
注意書き-Cautions

訳者の判断により
Sheを咲夜と固有名詞で訳している箇所が多くあります
～を……などの別記号に置き換えた個所があります。
HE/SHEを意図的にボカした翻訳をしています。
元から存在したコメントアウトには必要に応じて訳文を載せてありますが、十分に簡単な物は訳しておりません
セリフ幅などの諸事情などもあり...と……が統一されていません。
本口上は「暫定的な」「英和翻訳」であり、システム的互換性のない部分が含まれ、
また更新によって翻訳部分の変更などが行われます。

互換性がない事を確認した物（2023/01/09）
・口上存在判定：なんとかしようと頑張って見ましたけどダメでした。なので他に互換性がないものを確認できてません。
・恐らく天候関連の口上も風速を取りいれた日本語版と英語版では互換性がなさそうですが見てないのでなんとも。

At the translator's discretion
There are many places where "She" is translated as "Sakuya" as a proper noun.
There are places where "～" has been replaced with another symbolic character such as "……".
The translation of "HE/SHE" is intentionally blurred.
Originally existing commentouts are translated as needed, but enough simple ones are not translated
There are two types characters "..." "……" for some reasons like the length of the lines.
This version is a "provisional" "English-Japanese translation"
and it could be changed by updating, include parts that are not compatible with the EN-JP systems.

NOT compatible parts (09/01/2023)
・Judge for reading this erb.files
・Maybe dialogs about weather
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC

進捗-progress ;09/01/2023
file:SakuyaWorld
	SakuyaWorld 未訳 -not yet
SAKUYADIM 未訳-not yet
ecchi 既訳-already
functions 未訳、たぶん分岐条件くらいしか訳すとこないんご -not yet
knives 既訳-already
specialevents 途中まで-still
イベント　途中まで-still
セクハラコマンド 未訳-not yet
愛撫系コマンド -not yet
刻印取得 未訳-not yet
日常系コマンド 途中まで-still
奉仕系コマンド 途中まで-not yet
Readme.txt 弄って良いのかわからないんで下記のZZZ線で囲まれた部分に記す。 -Wrote in "ZZZ"zone under this line.
ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ
EraToho The World用十六夜咲夜 by some /hgg/ anon

この口上について
	この口上は主に紅魔館に住む執事としてプレイすることを想定しています。
	しかし、他のプレイでも使用可能です。

	クーデレなお嬢様へ偶にイタズラをする成熟したメイドのキャラクターとして描写するように試みました
	初期はプレイヤーに対して冷たく振舞い、特に紅魔館に住んでいる時にプレイヤーの粗相を正そうとします
	メイド長としての職務を全うしようとしており、真摯に取り組んでいます。
	プレイヤーに好意を寄せる様になるとTW能力を用いたイタズラなどをしはじめ、より愛情をもって接してくるようになります。
	(任意設定可能なもの) 反発刻印3か怒っている時にはプレイヤーを傷つけたりナイフを投げて追い払おうとしてきます。
ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ

path: ERB/口上・メッセージ関連/個人口上/【15】咲夜英文版/れどめ.txt


code:
譯者: dk
感謝群內輝夜控睡覺王:夜雨佬不辭勞苦日夜校對
感謝群內碼佬:recorder空白不辭勞苦日夜找bug修bug
平時會在 eratoho TheWorld 這Discord伺服器裏活躍, 也有在/egg/裏待著, 有甚麼翻譯之類的問題直接@我就可以了
一開始拿來翻譯的是日版翻譯了一部的版本, 所以會有日文的註譯部分
翻譯主要以原意為主, 但對小部分我覺得不合咲夜說話風格的對話有作出改動, 主要是變拘謹了
有極少量的加筆, 主要是翻譯上的需要和觀感問題, 真正無闗的加筆只有乳交的部分

Changelog

1.1 03/16/2023
M_KOJO_K15_functions 	[Bug fix: Variable not translated]

2.0 03/21/2023
M_KOJO_K15_イベント 		[Minor correction]
M_KOJO_K15_日常系コマンド	[Minor correction]

Added and translated content written by JetEnduro#6140 from the /egg/ version:
M_KOJO_K15_日常系コマンド 	[Minor addition]
M_KOJO_K15_性交系コマンド 	[譯者為:Eri, 感謝Eri佬鼎力相助不辭勞苦火速翻譯]

2.1 03/21/2023
M_KOJO_K15_日常系コマンド 	[Minor bugfix]

2.2 03/21/2023
M_KOJO_K15_日常系コマンド 	[Minor bugfix]

path: ERB/口上・メッセージ関連/個人口上/【15】咲夜英文版/讀我.txt


path: ERB/口上・メッセージ関連/個人口上/【15】少女長咲夜/M_KOJO_K15_1_その他コマンド.ERB


code:
;-------------------------------------------------
; eraTheWorld 4.740用 別人版年齢相応少女長咲夜さん口上（角色の名前を入れる、下にコンセプトなど一言那个ば入れる）
;時姦されると本気で喜ぶ、かわりに、時姦返ししてる、ある条件で年齢相応な少女になっちゃう咲夜さん
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
[SKIPSTART]
基礎分岐
;少女恋人モード（強制ため口モード
IF 陥落状態() == 5
;女僕恋人モード（強制敬語モード
ELSEIF 陥落状態() == 4
;恋慕or時姦バレ思慕
ELSEIF 陥落状態() == 3
;思慕or時姦バレ
ELSEIF 陥落状態() == 1
;無陥落
ELSE
ENDIF
CFLAG:1150 BIT,0(咲夜さん非敬語判定、紅魔館住宿かつおぜうパチェ芙兰の誰とも恋人でなく、咲夜さんと時姦あり恋人でもない場合は非敬語（雇われ扱い、引っ越ししても同じ）)
CFLAG:1151 BIT,0(時姦初回判定)、BIT,1（時姦バレ初回判定）
CFLAG:1152 時姦された際のＡソース記録
CFLAG:1153 時姦された際のＢソース記録
CFLAG:1154 時姦された際のＣソース記録
CFLAG:1155 時姦された際のＶソース記録
CFLAG:1156 時姦された際のＭソース記録

%MASTERNAME:15%
\@ GETBIT(CFLAG:1150,0) ?  #  \@
[SKIPEND]
;
;
;
;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K15_1(ARG)
;別人口上判定ですX2を同角色口上の通し番号に置き換えてください（一つ目の別人口上なら1、二つ目の別人口上なら2
;複数の同角色口上が同時表示されないために必要です、必ずXXXを変更してください
RESULTS = _少女長
;初期口上とは違う事を明示するため、口上選択時に表示されます、必ずＸＸＸを変更してください
RESULTS:1 = 年齢相応少女長

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

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

;初期位置が紅魔館初期私室かつ、おぜうパチェ芙兰が恋人でない場合、非敬語モード
IF CFLAG:MASTER:初期位置 == 304 && !GROUPMATCH(TALENT:MASTER:恋人,16,50,54)
	SETBIT CFLAG:15:1150,0
;おぜうパチェ芙兰のうち誰かがが恋人になった場合、敬語モード
ELSEIF GROUPMATCH(TALENT:MASTER:恋人,16,50,54)
	CLEARBIT CFLAG:15:1150,0
ENDIF

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
CFLAG:15:時間停止口上有 = 1
;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_K15
SETCOLOR 0xa0d8ef

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

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_少女長_UPDATE_K15
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等の角色変数を使用場合、角色番号の指定が必要になります
IF FIRSTTIME("UPDATE0",0, 15)
	;呼び名が汎用でない場合
	IF !TALENT:15:恋人
		IF CALLNAME:MASTER != "你"
			MASTERNAME:15 = %NAME:MASTER%
			SIF !GETBIT(CFLAG:15:1150,0)
				MASTERNAME:15 += "様"
		ELSE
			;名前が汎用でない場合
			IF NAME:MASTER != "你"
				MASTERNAME:15 = %NAME:MASTER%
				SIF GETBIT(CFLAG:15:1150,0)
					MASTERNAME:15 += "様"
			;名前が汎用の場合
			ELSEIF GETBIT(CFLAG:15:1150,0)
				MASTERNAME:15 = 无名氏
			ELSE
				MASTERNAME:15 = 无名様
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_少女長_ENCOUNTER_K15
IF CALLNAME:MASTER != "你"
	IF GETBIT(CFLAG:1150,0)
		MASTERNAME:15 = %CALLNAME:MASTER%様
	ELSEIF !GETBIT(CFLAG:1150,0)
		MASTERNAME:15 = %CALLNAME:MASTER%
	ENDIF
ELSE
	;名前が汎用でない場合
	IF NAME:MASTER != "你"
		MASTERNAME:15 = %NAME:MASTER%
	;名前が汎用の場合
	ELSEIF !GETBIT(CFLAG:1150,0)
		MASTERNAME:15 = 无名氏
	ELSE
		MASTERNAME:15 = 无名様
	ENDIF
ENDIF
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します
IF FLAG:周回数
	PRINTFORML 「啊啦、%MASTERNAME:15%？　好久不见\@ GETBIT(CFLAG:15:1150,0) ?  # 您 \@了呢」
	PRINTFORMDL 突如其来的搭话、使%CALLNAME:MASTER%停下了
	PRINTFORML 「……哎呀，我和\@ GETBIT(CFLAG:15:1150,0) ? 你 # 您 \@是初次见面吧？」
	PRINTFORMDL 感觉到了咲夜的疑惑、怀疑咲夜还保留记忆的%CALLNAME:MASTER%提起的心放下了
	PRINTFORMDL %CALLNAME:MASTER%说可能是前几天博丽神社的宴会上见到过、咲夜歪着头表示怀疑
	PRINTFORML 「总之、今后也请\@ GETBIT(CFLAG:15:1150,0) ?  # 您 \@多多关照」
	PRINTFORMDL 真的不记得了吗、%CALLNAME:MASTER%一边感到不安一边跟着低下头
;紅魔館で咲夜と出会った場合
ELSEIF GET_MAPID(CFLAG:MASTER:現在位置) == 3
	;紅魔館住まいで咲夜と出会った場合（立ち位置的に使用人
	IF GET_MAPID(CFLAG:MASTER:現在位置) == MAIN_MAP && CFLAG:MASTER:初期位置 == 304
		;システム的に咲夜さんは紅魔館以外でのENCOUNTERはないはず
		IF CFLAG:MASTER:現在位置 >= 301 && CFLAG:MASTER:現在位置 <= 333
			IF TIME:2 <= 2
				PRINTFORML 「啊啦，意外的起得很早呢」
			ELSEIF TIME:2 <= 4
				PRINTFORML 「该说是'起得真早'呢，还是说'居然现在才起'呢，真是不好判断啊」
			ELSE
				PRINTFORML 「你现在才来是打算去找大小姐吗？」
			ENDIF
			PRINTFORMDL 听到背后的声音，%CALLNAME:MASTER%不禁挺直腰来向后看
			PRINTFORMDL 感觉到背后的冒汗的同时、向眼前的少女打了招呼
			PRINTFORMW 「你是大小姐说的新人吗、名字是？」
			IF CALLNAME:MASTER != "你" || NAME:MASTER != "你"
				PRINTFORMDL 冷ややかな表情に、%CALLNAME:MASTER%は坦率に名前を答えた
				PRINTFORML 「%MASTERNAME:15%对吧」
				PRINTFORMDW 咲夜点了点头、盯着这边
			ELSE
				PRINTFORMDL %CALLNAME:MASTER%表示拒绝说出自己的名字
				PRINTFORML 「那么、就叫你%MASTERNAME:15%了」
				PRINTFORMDW 冷漠的瞳孔中没有反驳的余地
			ENDIF
			PRINTFORML 「虽然增加新的佣人没关系」
			PRINTFORMDL 在听清这句话前、眼前出现了一把小刀
			PRINTFORMDL 立刻停止了时间的%CALLNAME:MASTER%、看见咲夜还抓着小刀柄部松了一口气
			PRINTFORMDW 所以就这样保持之前的状态解除了时间暂停
			PRINTFORML 「不要太懒散了。起码也得跟哥布林一样有用」
			PRINTFORMDL %CALLNAME:MASTER%冒着冷汗点头
			PRINTFORMDL 如果咲夜出手的话、马上就会死掉的吧
			PRINTFORMDW 正因为理解了这一点、才用不停冒冷汗
			PRINTFORML 「是心理作用吗？」
			PRINTFORMDW 在碎碎念里杂糅的迷之词语、姑且先认为是心理作用吧
			SETBIT CFLAG:1150 ,0
		ENDIF
	;散步Map
	ELSE
		PRINTFORML 「あら、欢迎光临。紅魔館になにか御用ですか？」
		PRINTFORMDL 随意紅魔館内をうろついていた%CALLNAME:MASTER%は、イヤな予感を覚えながら振り返る
		PRINTFORMDL 站在那边、潇洒的女仆的身姿、让人不自觉后背開始冷汗直冒
		PRINTFORMDW 十六夜咲夜、是知道的人里最危险的对手
		PRINTFORML 「真是的、看门人完全没用、真让人头疼」
		PRINTFORMDL 话音未落、眼前咲夜的身影已经消失了、
		PRINTFORMDL 锋利的东西抵在喉咙上
		PRINTFORMW 「首先请问一下你的名字？」
		PRINTFORMD 背后传来的提问、
		IF CALLNAME:MASTER != "你" || NAME:MASTER != "你"
			PRINTFORMDL %CALLNAME:MASTER%は坦率に名前を答えた
			PRINTFORML 「%MASTERNAME:15%是吧」
			PRINTFORMDW 咲夜的耳朵贴在%CALLNAME:MASTER%身旁确认了名字
		ELSE
			PRINTFORMDL %CALLNAME:MASTER%表示拒绝说出自己的名字
			PRINTFORML 「那么、请让我称呼你为%MASTERNAME:15%吧」
			PRINTFORMDW 经如此断言、%CALLNAME:MASTER%微微点了一下头
		ENDIF
		PRINTFORML 「我的名字是十六夜咲夜、在这个馆内里担任女仆长」
		PRINTFORMDL 看着一晃神又再次出现在眼前的咲夜、%CALLNAME:MASTER%回答已经知道了
		PRINTFORML 「是这様吗、どこでどういうことを聞いたかはさておき」
		PRINTFORMDW 片刻后言葉を止めて、無遠慮な視線を向けてくる
		PRINTFORML 「但如果在馆内做了什么不该做的事、我是不会放过你的」
		PRINTFORMDW 完全坦然的态度，让人冷汗直冒
	ENDIF
;紅魔館以外で出会った
ELSE
	;紅魔館住まいの場合（立ち位置的に使用人（というか、紅魔館住まいで初対面が散步Mapなんてそうそう無いと思うけど
	IF CFLAG:MASTER:初期位置 == 304
		PRINTFORML 「请等一下」
		PRINTFORMDL 突然被从背后叫住的%CALLNAME:MASTER%、看见眼前突然出现的少女不禁出了一身冷汗
		PRINTFORML 「貴方、うちの使用人になったくせに、私に挨拶もせず外出とか良い胆量ね」
		PRINTFORMDW 看着站在那里的十六夜咲夜、却找不到反驳的话说
		PRINTFORML 「如果你想当一个寄生虫的话也好」
		PRINTFORMDL 冰凉的触感从喉咙上传来
		PRINTFORMDL 同时停止时间的%CALLNAME:MASTER%看向那边
		PRINTFORMDW 不用说、咲夜手里的小刀已经压在颈动脉上
		PRINTFORMDL 解除时间停止之后
		PRINTFORML 「哪怕如此、至少也要向全部人打过招呼后再出去」
		PRINTFORMDL 咲夜用冷淡的眼神说着
		PRINTFORMDW ただ、その表情に、かすかな戸惑いが浮かんだのをみて、%CALLNAME:MASTER%は冷や带着汗水
		SETBIT CFLAG:1150 ,0
	;紅魔館以外
	ELSE
		PRINTFORML 「啊啦、有东西掉了」
		PRINTFORMDL 从背后被搭话了、%CALLNAME:MASTER%转过头去
		PRINTFORML 「好、请拿回去」
		PRINTFORMDW 一边道谢一边接过递来的毛巾、并望向对方
		PRINTFORMDL 是一位穿着女朋友的银短发少女
		PRINTFORMDL 这是对自己来说最麻烦的对手——十六夜咲夜
		PRINTFORMDL 腋下開始冒出讨厌的汗
		PRINTFORMW 「……哈…………、你看起来像是知道我的、对吧」
		PRINTFORML 「我的名字是十六夜咲夜、在红魔馆担任女仆长」
		PRINTFORMDL 咲夜浮现出了柔和的笑容、但是冰冷的眼神却完全没有变化
		PRINTFORML 「顺便、可以告诉我你的名字吗？」
		PRINTFORMD 这样的话、
		IF CALLNAME:MASTER != "你" || NAME:MASTER != "你"
			PRINTFORMDW %CALLNAME:MASTER%坦率的回答了自己的名字
			PRINTFORML 「%MASTERNAME:15%是吧」
			PRINTFORMDW 咲夜确认了%CALLNAME:MASTER%的名字
		ELSE
			PRINTFORMDW %CALLNAME:MASTER%表示拒绝说出自己的名字
			PRINTFORML 「那么、请让我称呼你为%MASTERNAME:15%吧」
			PRINTFORMDW 经如此断言、%CALLNAME:MASTER%微微点了一下头
		ENDIF
		PRINTFORML 「那么今后也请多多关照」
		PRINTFORMDW 看着平静的咲夜、%CALLNAME:MASTER%点了点头
	ENDIF
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_少女長_SPEVENT_K15_1(ARG,ARG:1)
;口上主はTARGET
IF MARK:反発刻印
	TCVAR:中止接吻 = 1
	RETURN 1
ENDIF
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	PRINTFORMDL 突然、眼前出现了咲夜的脸
	PRINTFORMDL 在反应过来准备停止时间时、咲夜将唇吻了上来
	IF GETBIT(CFLAG:1151,0)
		PRINTFORMDL 舌头就这样挤開嘴唇舌头咕咚地进来了
	ELSE
		PRINTFORMDL 只是轻轻碰了一下、仿佛是感受到了那份触感
	ENDIF
	PRINTL
	;恋慕or時姦バレ思慕
	IF 陥落状態() == 3
		IF GETBIT(CFLAG:1151,0)
			PRINTFORML 「我吃饱了。呼呼、很美味呢」
			PRINTFORMDL 轻声细语的咲夜、就这样紧紧地抱住我
			PRINTFORML 「与其在时间停止的时候做、不觉得这样更好吗？」
			PRINTFORMDW %CALLNAME:MASTER%说没想到这句话会从咲夜这里听到、被狠狠瞪了一眼
		ELSE
			PRINTFORML 「……嗯、只是心血来潮而已、嗯嗯、这是免费服务\@ GETBIT(CFLAG:15:1150,0) ? 哟 # 呢 \@」
			PRINTFORMDL 总觉得有些慌张的咲夜、缓缓露出苦笑
			PRINTFORML 「……有什么想说的吗？」
			PRINTFORMDW 总觉得别扭的样子、%CALLNAME:MASTER%慌慌张张的回答说什么都没有
		ENDIF
	;思慕or時姦バレ
	ELSEIF 陥落状態() == 1
		PRINTFORML 「这样感觉也\@ GETBIT(CFLAG:15:1150,0) ? 不错 # 很好 \@呢」
		PRINTFORMDW 在低语的咲夜脸上、浮现出了难得的微笑
	ELSE
		PRINTFORML 「只是一时心血来潮、还请不要在意」
	ENDIF
	PRINTFORML
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_少女長_SPEVENT_K15_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("SPEV2")
			PRINTFORML 「稍微、可以听我说一下吗？」
			PRINTFORMDL 突然被叫住、%CALLNAME:MASTER%惊讶的回头看去
			PRINTFORMDL 表情认真的盯着这边的咲夜、開始轻轻地说话
			PRINTFORMW 「我……从被大小姐捡到以前、只是一个无法控制自己能力的妖怪」
			PRINTFORML 「在人类之中、有很多妖怪」
			PRINTFORML 「虽然这样想、但是还是无法离開人类的世界」
			PRINTFORMDL 这样低语着的咲夜、眺望着某个遥远的地方
			PRINTFORMW 「所以、我狩猎这些妖怪、从那些憎恨妖怪的人手里拿钱生活下去」
			PRINTFORML 「……但是、就算时间停止了、也有可以毁掉世界的强大妖怪」
			PRINTFORML 「一个红月的夜晚、我遇到了大小姐」
			PRINTFORMDL 咲夜突然闭上眼睛
			PRINTFORMW 「那天晚上、我和足以颠覆我力量的怪物对峙、以为就此结束」
			PRINTFORML 「拼尽全力、也不过是夺走了她的一条手臂」
			PRINTFORML 「大小姐她、是这样问我的。'要和我一起生活吗？'」
			PRINTFORMDL 咲夜睁開眼睛、向%CALLNAME:MASTER%微笑
			PRINTFORMW 「真是讽刺啊、在和人类一起的时候、明明只把自己当成一个妖怪」
			PRINTFORML 「被大小姐、……被妖怪饲养的时候、才第一次发现自己是个人类」
			PRINTFORML 「所以、对我来说、大小姐是应该献上性命所侍奉的人」
			PRINTFORMDL %CALLNAME:MASTER%看着这个笑容出神
			PRINTFORMDW 一拍おいて、今はそう言う場合ではないと頭を振った
			PRINTFORML 「但是、我遇见了\@ GETBIT(CFLAG:1150,0) ? 你 # 您 \@」
			PRINTFORML 「然后我注意到了、我对大小姐的思念是出于忠心」
			PRINTFORML 「现在对你的这份思念才是爱慕之情」
			PRINTFORML 「我、想和你在一起。哪怕是与大小姐争夺、我还是想呆在你的身边」
			PRINTFORMW 「……\@ GETBIT(CFLAG:1150,0) ? 你 # 您 \@会接受我的这份思念吗？」
		ELSE
			PRINTFORML 「我的心意已经传达过了。\@ GETBIT(CFLAG:1150,0) ? 你 # 您 \@愿意接受我的这份思念吗？」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF GETBIT(CFLAG:1151,0)
			PRINTFORMW 「真的、非常感谢」
			IF GETBIT(CFLAG:1150,0)
				PRINTFORML 对与平时不同的咲夜、%CALLNAME:MASTER%感到困惑
				PRINTFORML 「奇怪吗？既然想为心爱的人服务、这种事也很普通吧」
				PRINTFORML 「如果您坚持、像往常一样也没关系……」
				PRINTFORMW 对于这个问题、%CALLNAME:MASTER%回答说像现在这样也不错
				PRINTFORML 这时、咲夜带着松了一口气的表情看着这边
				PRINTFORM 「太好了……、
			ELSE
				PRINTFORML 咲夜脸上浮现出与以往有所不同、让人感受到亲切感的笑容
				PRINTFORML 「我已经做好了不被接受的觉悟」
				PRINTFORML 咲夜很高兴的把身体靠了过来
				PRINTFORMW 「我爱你、%MASTERNAME:15%様」
				PRINTFORM 「
			ENDIF
			PRINTFORML 既然我们想法一致、我想问一下」
			PRINTFORML 「今后如何呼吁您呢？」
			PRINTFORML 「像以前一样的话、感觉会有些不太好」
			PRINTFORMW 希望让咲夜今后称呼%CALLNAME:MASTER%为
			PRINTL [0] 『老爷』
			PRINTL [1] 『主人大人』
			PRINTL [2] 『您』
			IF GETBIT(TALENT:MASTER:性別,1)
				PRINTFORML [3] 『哥哥大人』
				PRINTFORML [4] 『%MASTERNAME:15%\@ !GETBIT(CFLAG:1150,0) ?  # 様 \@』
			ELSE
				PRINTFORML [3] 『姐姐大人』
				PRINTFORML [4] 『大小姐』
				PRINTFORML [5] 『%MASTERNAME:15%\@ !GETBIT(CFLAG:1150,0) ?  # 様 \@』
			ENDIF
			PRINTFORML 就可以了
			$INPUT_咲夜_NAMELOOP
			INPUT
			SELECTCASE RESULT
				CASE 0
					MASTERNAME:15 = 老爷
				CASE 1
					MASTERNAME:15 = 主人大人
				CASE 2
					MASTERNAME:15 = 您
				CASE 3
					IF GETBIT(TALENT:MASTER:性別,1)
						MASTERNAME:15 = 哥哥大人
					ELSE
						MASTERNAME:15 = 姐姐大人
					ENDIF
				CASE 4
					IF GETBIT(TALENT:MASTER:性別,1)
						SIF GETBIT(CFLAG:15:1150,0)
							MASTERNAME:15 = %MASTERNAME:15%様
					ELSE
						MASTERNAME:15 = 大小姐
					ENDIF
				CASE 5
					SIF GETBIT(CFLAG:15:1150,0)
						MASTERNAME:15 = %MASTERNAME:15%様
				CASEELSE
					GOTO INPUT_咲夜_NAMELOOP
			ENDSELECT
			PRINTFORML 「%MASTERNAME:15%是吗、我明白了」
			PRINTFORML 「我是个不懂事的人、今后也请多关照」
			PRINTFORML %CALLNAME:MASTER%对浮现出温柔微笑的咲夜点了点头
			PRINTFORMW
			RETURN 1
		ELSE
			PRINTFORML 被告知接受的瞬間、绽放出灿烂笑容的咲夜正准备開口说什么
			PRINTFORML ソレを制して、%CALLNAME:MASTER%も咲夜に言いたいことがあると口にした
			PRINTFORMW 「\@ GETBIT(CFLAG:1150,0) ?  # 您 \@想要说什么？」
			PRINTFORML 在告诉咲夜自己也能停止时间的瞬间、%CALLNAME:MASTER%右侧的脸遭受了猛烈的打击、整个人摔在了地上
			PRINTFORML 「…………」
			PRINTFORML 咲夜用混合着愤怒和悲伤的眼神盯着这边
			PRINTFORMW 就这样被拉着衣领站起来的时候、左侧的脸也被狠狠打了一次
			PRINTFORML 「很有趣吗？」
			PRINTFORML 「……看着被同样力量限制的我很有趣吗？」
			PRINTFORML 「看不起自己、好不容易以为自己是特别的我有趣吗！？」
			PRINTFORMW 正怒目而视的咲夜眼角突然流下眼泪
			PRINTFORML 「事到如今、为什么要这样呢！干脆、继续时间停止玩弄我不好吗！」
			PRINTFORML 「明明已经放弃了、还是喜欢上了别人、喜欢上了你！明明已经传达了思念」
			PRINTFORML 「……为什么、为什么、事到如今……」
			PRINTFORMW 将脸埋在胸口的咲夜、声音里夹杂着呜咽
			PRINTFORML 从胸口传来的呜咽、让本以为不存在的罪恶感隐隐刺痛了心脏
			PRINTFORML %CALLNAME:MASTER%就这样抱住咲夜的头、轻轻抚慰她的伤痛
			PRINTFORML …………
			PRINTFORMW ……
			PRINTFORML 「……吸」
			PRINTFORML 终于停止哭泣的咲夜，用领口擤了下鼻子
			PRINTFORML 「…………怎么、有什么不满吗？」
			PRINTFORMW %CALLNAME:MASTER%口齿不清的说自己的领口沾满了鼻涕
			PRINTFORML 「这都是你的错、自作自受」
			PRINTFORMW 对于这种措辞歪了下头
			PRINTFORML 「……因为是同类、是恋人嘛。和对待大小姐、美玲她们不一样也是理所当然」
			PRINTFORML 「なんなら、お嬢様に向けるように敬語で話しかけましょうか？」
			PRINTFORML 「それとも美鈴に対するように上司として接して欲しいかしら？」
			PRINTFORMW 看着%CALLNAME:MASTER%客客气气的答话、咲夜浮现出至今为止从未见过的天真笑容
			PRINTFORML 「呼呼、就是这样。在大小姐和美玲她们面前那种潇洒的态度、说到底也只不过是装出来的」
			PRINTFORML 「现在的我就是最纯粹的自己而已。呐、对恋人说这样的话会不会不太好呢？」
			PRINTFORMW 看着在暗自開心地笑着的咲夜、%CALLNAME:MASTER%回答说像以前一样就可以了
			IF CALLNAME:MASTER != "你"
				MASTERNAME:15 = %CALLNAME:MASTER%
			ELSE
				;名前が汎用でない場合
				IF NAME:MASTER != "你"
					MASTERNAME:15 = %NAME:MASTER%
				ELSE
					MASTERNAME:15 = 无名様
				ENDIF
			ENDIF
			PRINTFORML 「那么、以后请多多关照了、%MASTERNAME:15%」
			PRINTFORML 「啊、对了对了、虽然没说不准在时间停止的时候玩弄人家、但是我会之后好好'回报'你的」
			PRINTFORML 「做好觉悟吧」
			PRINTFORMW 看着说完后满脸笑容的咲夜、%CALLNAME:MASTER%点了点头
			CFLAG:時間停止バレ = 1
			SETBIT CFLAG:1151,1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「……是吗？」
		PRINTFORML 「没办法啊」
		PRINTFORML 对于深叹一口气的咲夜冷淡的态度、心中莫名地骚动起来
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_少女長_SPEVENT_K15_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 陥落状態() == 5
			PRINTFORML 「嗯、今天也很不错。呵呵、要是一直这样就好了」
		;女僕恋人モード
		ELSEIF 陥落状態() == 4
			PRINTFORML 「%MASTERNAME:15%、今天玩得開心吗？我玩得很尽兴」
		;恋慕or時姦バレ思慕
		ELSEIF 陥落状態() == 3
			PRINTFORML 「呜呼呼、今天也很開心啊」
		;思慕or時姦バレ
		ELSEIF 陥落状態() == 1
			PRINTFORML 「嘛，也不是很无聊吧」
		ELSE
			PRINTFORML 「……開心吗？」
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML 「……真是对你没办法」
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML 「哈……、我的愤怒难道不可怕吗」
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML 「………………真是的」
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_少女長_EVENT_K15_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;時姦バレファーストイベント
		IF GETBIT (CFLAG:1151,0) && !GETBIT (CFLAG:1151,1) && !TALENT:恋人
			CALL 咲夜時姦バレ()
		;少女恋人モード
		ELSEIF 陥落状態() == 5
			PRINTFORML 「啊啦%MASTERNAME:15%？你有什么事吗？」
			PRINTFORMDL 咲夜一边冷笑一边靠近
			PRINTFORMW 「哼嗯~一看到我的背影就这么屁颠屁颠的追过来了吗？」
			IF !RAND:6
				PRINTFORMDL 在回答是的一瞬间、咲夜的脸已经染成了红色
				PRINTFORML 「……啊，输了输了，我已经输了」
				PRINTFORMDW 轻轻举起双手、表明了投降之意的咲夜顺势抱了过来
			ELSE
				PRINTFORMDL 对于觉得是偶然的%CALLNAME:MASTER%、咲夜的笑意更浓厚了
				PRINTFORML 「偶、然、哟～～～～～～」
				PRINTFORMDW 努力避開揶揄的气氛、托身在咲夜身边
			ENDIF
		;女僕恋人モード
		ELSEIF 陥落状態() == 4
			PRINTFORML 「啊、%MASTERNAME:15%。在这个地方有什么事吗？」
			PRINTFORMD 看着静静陪在身边的咲夜、%CALLNAME:MASTER%回答说没什么事
			PRINTFORMW 「是吗、你都没有找我帮过忙呢」
			PRINTFORMDL 总觉得有些寂寞的嘟囔着的咲夜、一直盯着这边看
			PRINTFORML 「虽然工作也很重要、但是我想和%MASTERNAME:15%一起呢」
			PRINTFORMDW 对着说不想打扰工作的%CALLNAME:MASTER%，咲夜说了这样的话
		;恋慕or時姦バレ思慕
		ELSEIF 陥落状態() == 3
			PRINTFORML 「啊、%MASTERNAME:15%。\@ GETBIT(CFLAG:1150,0) ? 你 # 您 \@有什么事吗」
			PRINTFORMDL 在浮现出温柔笑容的咲夜面前、%CALLNAME:MASTER%回答说没什么目的
			PRINTFORML 「那么，暂时陪我说说话吧？」
			PRINTFORMDW 对于咲夜的邀请、%CALLNAME:MASTER%觉得偶尔这样也不错
		;思慕or時姦バレ
		ELSEIF 陥落状態() == 1
			PRINTFORML 「%MASTERNAME:15%？有什么事？」
			PRINTFORMDW 一边回答没什么特别的，一边走到了咲夜的旁边
		ELSE
			PRINTFORMW 「…………什么事？」
		ENDIF
		;CALL 時姦返し
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;時姦バレファーストイベント
		IF GETBIT (CFLAG:1151,0) && !GETBIT (CFLAG:1151,1) && !TALENT:恋人
			CALL 咲夜時姦バレ()
		;少女恋人モード
		ELSEIF 陥落状態() == 5
			PRINTFORML 「原来你在这种地方啊」
			PRINTFORMDL 被从背后抱住、%CALLNAME:MASTER%深深吸了一口气
			PRINTFORMW 「啊啦、您真是太客气了」
			IF !RAND:6
				PRINTFORMDL %CALLNAME:MASTER%挣開咲夜的拥抱、转身抱住咲夜
				PRINTFORML 「啊！　……%MASTERNAME:15%、突然要做什么啊」
				PRINTFORMDW 咲夜很開心一边蹭着脸颊一边埋怨%CALLNAME:MASTER%
			ELSE
				PRINTFORMDL %CALLNAME:MASTER%说突然被抱住对心脏很不好
				PRINTFORML 「停止时间去对别人做色情的事情、对心脏也太不好吧」
				PRINTFORMDW 一边应和着一边从咲夜的怀里逃了出去
			ENDIF
		;女僕恋人モード
		ELSEIF 陥落状態() == 4
			PRINTFORML 「%MASTERNAME:15%、是来这样的地方的人吗」
			PRINTFORMDL 很開心的笑着的咲夜、歪了下头慢慢走到旁边
			PRINTFORMW 「呼呼、和%MASTERNAME:15%在一起的时候，我是不会使用时停的」
			PRINTFORMDL 这么说着、缠上了手臂
			PRINTFORML 「这样我就放心了」
			PRINTFORMDW 露出含羞笑容的咲夜面前、%CALLNAME:MASTER%的嘴角也浮现出了笑容
		;恋慕or時姦バレ思慕
		ELSEIF 陥落状態() == 3
			PRINTFORML 「啊、%MASTERNAME:15%。\@ GETBIT(CFLAG:1150,0) ? 你 # 您 \@怎么在这里」
			PRINTFORMDL 对着不知怎么回答的%CALLNAME:MASTER%，咲夜露出苦笑
			PRINTFORML 「那么，暂时陪我说说话吧？」
			PRINTFORMDW 对于咲夜的邀请、%CALLNAME:MASTER%觉得偶尔这样也不错
		;思慕or時姦バレ
		ELSEIF 陥落状態() == 1
			PRINTFORML 「%MASTERNAME:15%？呼呼、正好」
			PRINTFORMDW 感觉咲夜很開心的走到了身边
		ELSE
			PRINTFORMW 「……%MASTERNAME:15%？」
		ENDIF
		;CALL 時姦返し
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;時姦バレファーストイベント
		IF GETBIT (CFLAG:1151,0) && !GETBIT (CFLAG:1151,1) && !TALENT:恋人
			CALL 咲夜時姦バレ()
			PRINTFORMDW 一瞬间消失的咲夜赤裸着身子出现在了旁边、手上还握着小刀
		;少女恋人モード
		ELSEIF 陥落状態() == 5
			PRINTFORML 「%MASTERNAME:15%也喜欢泡澡吧」
			PRINTFORMDL 咲夜喃喃着凝视这边
			PRINTFORML 「那么、想对相爱的恋人说什么呢？」
			IF !RAND:6
				PRINTFORMDL 咲夜一边红着脸、一边张開腿露出色情的部位
				PRINTFORML 「这么色情都是%MASTERNAME:15%害的」
				PRINTFORMDL 被啪嗒啪嗒地轻轻敲了一下头、%CALLNAME:MASTER%露出苦笑
			ELSE
				PRINTFORMDL 对夸赞着身体如此美丽的%CALLNAME:MASTER%、咲夜的嘴唇嘟了起来
				PRINTFORML 「只有身体？」
				PRINTFORMDL %CALLNAME:MASTER%回答脸也是身体的一部分、看到咲夜露出了笑容
			ENDIF
		;女僕恋人モード
		ELSEIF 陥落状態() == 4
			PRINTFORML 「%MASTERNAME:15%、那个、可以一起洗吗」
			PRINTFORMDL 咲夜怯生生的询问、被用手招呼了过来
			PRINTFORML 「非常感谢。呼呼、那么、请让我来帮忙洗%MASTERNAME:15%的身体吧」
			PRINTFORMDL 说着再等一会、强行抱着咲夜的肩膀
			PRINTFORML 「呼呼、这样接触到肌肤的话、会很安心」
			PRINTFORMDL 咲夜带着出神的表情看着这边
		;恋慕or時姦バレ思慕（恋慕のみだと思う
		ELSEIF 陥落状態() == 3
			PRINTFORML 「啊啦、里面有人了吗? 失礼了」
			PRINTFORMDL 毫不在意自己裸露的咲夜、就这样走了进来
			PRINTFORML 「呼呼、这样如何呢？」
			PRINTFORMDL 咲夜開心的笑着、不知道该如何回话
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;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

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

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

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

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

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

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

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_少女長_EVENT_K15_5(ARG,ARG:1)
;口上主はTARGET
;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
	;其他（角色指定無
	PRINTFORML
ENDIF
RETURN 1

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

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

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

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

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=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
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_少女長_EVENT_K15_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_K15_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

;==================================================
;お仕事中
;==================================================
@M_KOJO_少女長_EVENT_K15_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_K15_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

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

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

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
	;-------------------------------------------------
	;事後描写
	;記入チェック（=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_K15_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_K15_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_K15_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_K15_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_K15_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_少女長_EVENT_K15_21(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
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_少女長_EVENT_K15_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_K15_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_K15_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_K15_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_K15_26(ARG,ARG:1)

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

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_少女長_EVENT_K15_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_K15_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_K15_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_K15_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_K15_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_K15_ONABARE_1(ARG)
;-------------------------------------------------
:口上色を付けるならコメントアウトを外しXを角色番号に
;CALL M_KOJO_COLOR_K15

IF ARG
	PRINTFORML 玩弄A的场合
ELSE
	PRINTFORML 玩弄V的场合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

IF ARG
	PRINTFORML 玩弄A的场合
ELSE
	PRINTFORML 玩弄V的场合
ENDIF
;-------------------------------------------------
[SKIPEND]

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

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

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

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

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

;時姦バレファーストイベント
@咲夜時姦バレ()
PRINTFORML 「给你一次辩解的机会」
PRINTFORMDL 与此同时、%CALLNAME:MASTER%的脖子被划伤、无法动弹
PRINTFORML 「我知道是%MASTERNAME:15%在停止时间玩弄我的身体」
PRINTFORMDW 时间停止结束前逃走的瞬间、眼前出现了咲夜的脸
PRINTFORMDL 咲夜将唇压了上来
PRINTFORMDL %CALLNAME:MASTER%因为咲夜意外的行为感到困惑
PRINTFORMDL 滋溜溜、舌头用力从嘴唇钻了进去
PRINTFORMDW 耳朵到口腔之间都回荡着声音、表情出神的注视着咲夜
PRINTFORMDL 那种舒适感让人无法逃避
PRINTFORML 「噗哈……、呼呼、\@ GETBIT(CFLAG:1150,0) ? 你 # 您 \@觉得会被杀掉吗？」
PRINTFORML 「好不容易找到的同类，怎么可能会做那种事呢」
PRINTFORML 「今后请多多关照」
PRINTFORMDW 这样说笑着的咲夜使%CALLNAME:MASTER%看得入迷
IF !GETBIT(CFLAG:既成事實 , 1)
	IF !GETBIT(CFLAG:既成事實 , 0)
		CALL SET_FIRSTKISS(15)
		;最後が奪われたになるのを抑制するのに、わざわざ書き直してみる
		CSTR:初吻喪失履歴 = %PRINT_DATE_F(DAY)%、%CALLNAME:MASTER%在%CSTR:初吻位置%被发现时奸的同时、被同类强吻了
	ENDIF
	SETBIT CFLAG:既成事實 , 1
	CALL COLORMESSAGE("咲夜の合意を得た",C_YELLOW,2)
ENDIF
SETBIT CFLAG:1151,1
RETURN 1

@時姦返し()
;時姦された際のＡソースのお返し
SIF CFLAG:1152
	SOURCE:MASTER:快Ａ += CFLAG:1152
;時姦された際のＢソースお返し（MASTERが♂ならＣに振り分け
IF CFLAG:1153
	IF GETBIT(TALENT:MASTER:性別,1)
		SOURCE:MASTER:快Ｂ += CFLAG:1153
	ELSE
		SOURCE:MASTER:快Ｃ += CFLAG:1153
	ENDIF
ENDIF
;時姦された際のＣソースお返し
SIF CFLAG:1154
	SOURCE:MASTER:快Ｃ += CFLAG:1154
;時姦された際のＶソースお返し（MASTERが♂ならＡに振り分け
IF CFLAG:1155
	IF GETBIT(TALENT:MASTER:性別,1)
		SOURCE:MASTER:快Ｖ += CFLAG:1154
	ELSE
		SOURCE:MASTER:快Ａ += CFLAG:1154
	ENDIF
ENDIF
;時姦された際のＭソースお返し
SIF CFLAG:1156
	SOURCE:MASTER:快Ｍ += CFLAG:1156

FOR LOCAL,1152,1157
	CFLAG:LOCAL = 0
NEXT
RETURN 1

@時姦反応()
;咲夜さんに時姦した場合の那个これ
;ただし手加減する模様
SIF !GETBIT (CFLAG:1151,0)
	SETBIT CFLAG:1151,0
SIF !CFLAG:時間停止バレ
	CFLAG:時間停止バレ = 1
SIF SOURCE:快Ａ
	CFLAG:1152 += SOURCE:快Ａ / 5
SIF SOURCE:快Ｂ
	CFLAG:1153 += SOURCE:快Ｂ / 5
SIF SOURCE:快Ｃ
	CFLAG:1154 += SOURCE:快Ｃ / 5
SIF SOURCE:快Ｖ
	CFLAG:1155 += SOURCE:快Ｖ / 5
SIF SOURCE:快Ｍ
	CFLAG:1156 += SOURCE:快Ｍ / 5

SIF !GETBIT(CFLAG:1151,0)
	SETBIT CFLAG:1151,0
SIF GROUPMATCH(SELECTCOM,21,50,51,104)
	RETURN 1
IF GROUPMATCH(SELECTCOM,312,313,314,315,316)
	PRINTFORML 在停止的时间中、%CALLNAME:MASTER%尽情享用了咲夜的身体
ELSEIF !GETBIT(CFLAG:1151,1)
	PRINTFORML 时间停止的时候、偶尔感觉到咲夜的身体在快感中颤抖
	PRINTFORML 觉得是心理作用、%CALLNAME:MASTER%继续贪恋着咲夜的身体
ELSE
	PRINTFORML 咲夜的身体微微颤动着
	PRINTFORML 这是咲夜的界限吧、在时停中、%CALLNAME:MASTER%对咲夜的细微反应浮现出笑容
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【15】少女長咲夜/M_KOJO_K15_1_イベント.ERB


path: ERB/口上・メッセージ関連/個人口上/【15】少女長咲夜/M_KOJO_K15_1_カウンター.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;性騷擾系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;310,摸屁股
;TFLAG:193(1=不快(TALENT:膽怯なら涙目) 2&&3=恥ずかしがる(TALENT:討厭男人兼MASTERが男なら、身をすくめる) 4=されるがまま)
;CFLAG:诶嘿嘿==2&&TCVAR:20(胖次無し顔面騎乗(70=強制舐陰 71=口交強制 72=肛門奉仕) 35=裙子内見せつけ 52=素股)
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_少女長_SUCCESS_COM_K15_310
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
IF CFLAG:時間停止バレ == 1
	TFLAG:192 = 1
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_少女長_MESSAGE_COM_K15_310
CALL TRAIN_MESSAGE
CALL M_KOJO_少女長_MESSAGE_COM_K15_310_1
RETURN RESULT

@M_KOJO_少女長_MESSAGE_COM_K15_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:睡眠
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,擁抱
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 60=ディープ接吻 73=ぱふぱふ 74=乳合わせ 77=乳を吸わせる ＶＡ性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_少女長_SUCCESS_COM_K15_311
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
IF CFLAG:時間停止バレ == 1
	TFLAG:192 = 1
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_少女長_MESSAGE_COM_K15_311
CALL TRAIN_MESSAGE
CALL M_KOJO_少女長_MESSAGE_COM_K15_311_1
RETURN RESULT

@M_KOJO_少女長_MESSAGE_COM_K15_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CHK_DATENOW(CFLAG:LOCAL:约会中)
	ELSEIF CFLAG:睡眠
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;312,接吻
;TFLAG:193(99=拒絶(接吻不可) 1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 50=手淫 60=接吻 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_少女長_SUCCESS_COM_K15_312
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
IF CFLAG:時間停止バレ == 1
	TFLAG:192 = 1
ELSE
	TFLAG:192 = 0
ENDIF

@M_KOJO_少女長_MESSAGE_COM_K15_312
CALL TRAIN_MESSAGE
IF FLAG:70
	CALL 時姦反応()
ELSE
	CALL M_KOJO_少女長_MESSAGE_COM_K15_312_1
ENDIF
RETURN RESULT

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

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

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

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

@M_KOJO_少女長_MESSAGE_COM_K15_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

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

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

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

@M_KOJO_少女長_MESSAGE_COM_K15_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;317,動起腰身
;ABL:Ｖ感覚(2未満=まだ気持ち良くない 5未満=稍微気持ちいい 5以上=カイカン
;==================================================
@M_KOJO_少女長_MESSAGE_COM_K15_317
CALL TRAIN_MESSAGE
CALL M_KOJO_少女長_MESSAGE_COM_K15_317_1
RETURN RESULT

@M_KOJO_少女長_MESSAGE_COM_K15_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;318,動起腰身（Ａ）
;==================================================
@M_KOJO_少女長_MESSAGE_COM_K15_318
CALL TRAIN_MESSAGE
CALL M_KOJO_少女長_MESSAGE_COM_K15_318_1
RETURN RESULT

@M_KOJO_少女長_MESSAGE_COM_K15_318_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;====================================================================================================
;320,对方主導正常位
;====================================================================================================
@M_KOJO_少女長_MESSAGE_COM_K15_320
CALL TRAIN_MESSAGE
CALL M_KOJO_少女長_MESSAGE_COM_K15_320_1
RETURN RESULT

@M_KOJO_少女長_MESSAGE_COM_K15_320_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	PRINTFORMW
ENDIF
RETURN 1
;====================================================================================================
;322,对方主導後背位
;====================================================================================================
@M_KOJO_少女長_MESSAGE_COM_K15_322
CALL TRAIN_MESSAGE
CALL M_KOJO_少女長_MESSAGE_COM_K15_322_1
RETURN RESULT

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

@M_KOJO_少女長_MESSAGE_COM_K15_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【15】少女長咲夜/M_KOJO_K15_1_セクハラコマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【15】少女長咲夜/M_KOJO_K15_1_ハードなコマンド.ERB


code:
@M_KOJO_少女長_IRAIEXIST_K15(IRAI_NO)
#DIM  IRAI_NO   ;抑制させる一般依頼ナンバー
;動きを抑制させたい場合は、”RETURN 0”に変更すること
SELECTCASE IRAI_NO
	;幫忙做掃除（発生条件：TARGETがメインMap在住）
	CASE 1
		RETURN 1
	;給花澆水（発生条件：TARGETがMASTER侵入可能の自宅住まいかつ、メインMap在住かつ、親密２以上）
	CASE 2
		RETURN 1
	;一起玩吧（発生条件：TARGETがTALENT:幼稚持ち）
	CASE 3
		RETURN 1
	;想要学習料理（発生条件：TARGETの料理技能がMASTER未満かつ、MASTERの料理技能が２以上かつ、親密が３以上）
	CASE 4
		RETURN 1
	;関于特訓（発生条件：TARGETの戦闘能力がMASTER以下かつ、親密が２以上かつ人里以外）
	CASE 5
		RETURN 1
	;誰来告訴我！（発生条件：TARGETの教養がMASTER以下）
	CASE 6
		RETURN 1
	;大掃除還沒結束（発生条件：TARGETがメインMap在住かつ、冬の15日から31日までかつ、親密が３以上）
	CASE 7
		RETURN 1
	;送信（発生条件：TARGETの信賴度が30以上かつ、TARGETに文通相手が設定されている（FUNC_IRAI.ERBの965目以降に存在）
	CASE 8
		RETURN 1
	;誰的遺失物（発生条件：TARGETの信賴度が30以上）
	CASE 9
		RETURN 1
	;怎麼也找不到(そのまま落ちてる)（発生条件：TARGETの信賴度が30以上）
	CASE 10
		RETURN 1
	;怎麼也找不到(誰かが拾ってる)（発生条件：TARGETの信賴度が30以上）
	CASE 11
		RETURN 1
	;懲らしめて！（発生条件：TARGETのCSVに戦闘能力が１以上ある場合）
	CASE 12
		RETURN 1
	;好吃的魚が食べたいなぁ（発生条件：若鷺姫以外）
	CASE 13
		RETURN 1
	;現状無し
	CASEELSE
		RETURN 1
ENDSELECT

@M_KOJO_少女長_IRAI_K15(ROLE, SCENE, IRAI_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  IRAI_ID  ;依頼自体のID
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
#DIM  CHK_ID   ;依頼IDだけ抜き出したもの
CHK_ID    = IRAI_ID % 1000
CLIENT_ID = IRAI_ID_TO_CLIENT(IRAI_ID)
SELECTCASE ROLE
CASE "CLIENT"
	;一般依頼
	IF IS_COMMON_IRAI(IRAI_ID)
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)
		CASE "一般依頼名"
			SELECTCASE SCENE
			CASE "依頼提示時"
			;依頼を持ち礦物碎片れる時
			CASE "依頼非受託時"
			;内容だけ見て受託しなかった時
			CASE "依頼受託時"
			;依頼を受託した時
			CASE "依頼確認時"
			;[366]で依頼内容を依頼人に確認した時
			CASE "依頼破棄時"
			;受託した依頼を破棄する時
			CASE "依頼実行直前"
			;[367]で依頼を実行する時、実行処理の前に呼び出される
			CASE "依頼実行直後"
			;[367]で依頼を実行する時、実行処理の後に呼び出される
			CASE "成功報告時"
			;報告時（成功）
			CASE "失敗報告時"
			;報告時（失敗）
			;この他、報告忘れや期限切れで失敗扱いになり後日依頼人に遭遇した際にも表示
			ENDSELECT
		ENDSELECT
		RETURN
	ENDIF

	;固有依頼
	SELECTCASE STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)
	;個々の依頼名で分岐
	;SCENEのWAITに関する仕様
	;WAIT無しでよい　　　　："依頼提示時", "依頼非受託時", "依頼確認時", "依頼破棄時", "成功報告時", "失敗報告時"
	;
	;以下の2つは実際にはCARRYOUTでの地の文処理との比較検討が必要
	;WAITを入れたほうが適切："依頼実行直前", "依頼実行直後"
	CASE "固有依頼名"
		SELECTCASE SCENE
		CASE "依頼提示時"
		;依頼を持ち礦物碎片れる時
		CASE "依頼非受託時"
		;内容だけ見て受託しなかった時
		CASE "依頼受託時"
		;依頼を受託した時
		CASE "依頼確認時"
		;[366]で依頼内容を依頼人に確認した時
		CASE "依頼破棄時"
		;受託した依頼を破棄する時
		CASE "依頼実行直前"
		;[367]で依頼を実行する時、実行処理の前に呼び出される
		CASE "依頼実行直後"
		;[367]で依頼を実行する時、実行処理の後に呼び出される
		CASE "成功報告時"
		;報告時（成功）
		CASE "失敗報告時"
		;報告時（失敗）
		;この他、報告忘れや期限切れで失敗扱いになり後日依頼人に遭遇した際にも表示
		ENDSELECT
	ENDSELECT
CASE "TARGET"
	;ここで表示されるSCENEは"依頼実行直前", "依頼実行直後"だけです
	;一般依頼
	IF IS_COMMON_IRAI(IRAI_ID)
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)
		;個々の依頼名で分岐してください
		CASE "一般依頼名"
		;人物が鍵になっていた・もしくは場所にたまたま居合わせた
			SELECTCASE SCENE
			;TARGETが呼ばれるのはこのタイミングだけ
			CASE "依頼実行直前"
			CASE "依頼実行直後"
			ENDSELECT
		ENDSELECT
		RETURN
	ENDIF
	SELECTCASE CSVCALLNAME(CLIENT_ID)
	;依頼者のCALLNAMEによる分岐（CSV準拠）
	CASE "依頼者"
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)
		CASE "固有依頼名"
			SELECTCASE SCENE
			CASE "依頼実行直前"
			CASE "依頼実行直後"
			ENDSELECT
		ENDSELECT
	ENDSELECT
CASE "NO_REPORT"
	;日数経過時、報告不要依頼を達成していた場合に呼ばれる口上
	;ここで表示されるSCENEは"依頼報告不要"だけです
	;SCENEが一つしか無いので分岐は不要
	;また、必ず依頼主の口上が呼ばれます
	;一般依頼
	IF IS_COMMON_IRAI(IRAI_ID)
		SELECTCASE STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)
		;個々の依頼名で分岐してください
		CASE "一般依頼名"
		CASE "給花澆水"
		CASE "誰的遺失物"
		ENDSELECT
		RETURN
	ENDIF
	SELECTCASE STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)
	CASE "固有依頼名"
	ENDSELECT
ENDSELECT

path: ERB/口上・メッセージ関連/個人口上/【15】少女長咲夜/M_KOJO_K15_1_依頼.ERB