code:
;-------------------------------------------------
;健康度がどこまで進んでいるかを見るだけの関数
;-------------------------------------------------
@SAKURA_HEALTH_M(ARG)
#FUNCTION

SIF ARG == 0
	ARG = TARGET

RETURNF (CFLAG:ARG:健康度 / 100)

@SAKURA_HEALTH_S(ARG)
#FUNCTION

SIF ARG == 0
	ARG = TARGET

RETURNF (CFLAG:ARG:健康度 % 100)

;-------------------------------------------------
;ネタバレ回避のためイベント部分を分離
;今のところ調教開始前からの呼び出しのみ
;-------------------------------------------------
@CHARAEVENT_K6

;イベント（健康度）
;健康度の仕様
;健康度 / 100 = イベント区分（Main）
;健康度 % 100 = イベント区分（Sub）　上限99個

;段階0
IF SAKURA_HEALTH_M(TARGET) == 0
	;0-0　調教3回目以降かつ魂1以上　M0　S0
	IF SAKURA_HEALTH_S(TARGET) == 0 && EXP:Ｈ回数 >= 2 && BASE:魂 >= 1
		PRINTFORMW 「%CNAME("二人称")%那个……变成这样之后」
		PRINTFORMW 「哎呀、即使去学校也不去保健室就好了」
		PRINTFORMW 「好厉害啊、吓我一跳」
		PRINTFORMW 一脸兴奋样子的%CALLNAME:TARGET%開心地和%CALLNAME:MASTER%说着话。
		CFLAG:健康度 ++

	;0-1　魂5以上　M0　S1
	ELSEIF SAKURA_HEALTH_S(TARGET) == 1 && BASE:魂 >= 5
		PRINTFORMW 「最近身体好多了……」
		PRINTFORMW 「晚上睡觉的时候也容易入睡、不害怕哦」
		PRINTFORMW 「不用担心明天是否也会醒来」
		PRINTFORMW %CALLNAME:TARGET%的脸上带着平静的笑容、眼睛望向远方。
		CFLAG:健康度 ++

	;0-2　魂10以上　M0　S2
	ELSEIF SAKURA_HEALTH_S(TARGET) == 2 && BASE:魂 >= 10
		PRINTFORMW 「上次去医院的时候医生也很惊讶」
		PRINTFORMW 「虽然说是暂且观察病情、但如果只是继续这样的话、药量好象也能用稍微减轻一点」
		PRINTFORMW 「呵呵、大家都说多亏了%CNAME("二人称")%的帮助呢」
		PRINTFORMW %CALLNAME:TARGET%对%CALLNAME:MASTER%展露出了安心的笑容。
		CFLAG:健康度 ++

	;0-3　魂15以上　M0　S3
	ELSEIF SAKURA_HEALTH_S(TARGET) == 3 && BASE:魂 >= 15
		PRINTFORMW 「对了对了、我听说像这样继续好转的话、就可以去上体育课了」
		PRINTFORMW 「嘿嘿、好期待啊」
		PRINTFORMW 「因为几乎没有做过运动、所以我想我大概不太擅长……」
		PRINTFORMW 虽然脸上露出苦笑、%CALLNAME:TARGET%总觉得气氛很愉快。
		CFLAG:健康度 ++

	;0-4-1　恋慕无　M0　S4
	;進行无
	ELSEIF SAKURA_HEALTH_S(TARGET) == 4 && TALENT:恋慕 == 0
		IF RAND:3 == 0
			PRINTFORMW 「请听我说%CNAME("二人称")%、今天呢――」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「\@ TEXTS("曜日") != "日" ? 今日も# \@上课时、发生了这样的事
		ELSE
			PRINTFORMW 「虽然有移动教室、但好容易在学校里迷路了……」
		ENDIF
		PRINTFORMW %CALLNAME:TARGET%は\@ TEXTS("曜日") != "日" ? 今天也 # \@愉快地谈论着在学校发生的事情……

	;0-4-2　恋慕有　M0　S4
	ELSEIF SAKURA_HEALTH_S(TARGET) == 4 && TALENT:恋慕
		PRINTFORMW 「…………」
		PRINTFORMW 之前总是愉快地谈论着在学校发生的事情、但是、%CALLNAME:TARGET%今天安静地沉默着。
		PRINTFORMW 是身体不舒服吗……？
		PRINTFORMW 今天也许得多给点精液比较好。
		CFLAG:健康度 ++

	;0-5　条件无　M0　S5
	ELSEIF SAKURA_HEALTH_S(TARGET) == 5 && TALENT:恋慕
		PRINTFORMW 「哈哈……」
		PRINTFORMW %CALLNAME:TARGET%今天也仍旧很安静。
		PRINTFORMW 仔细一看、她脸色发红、看上去气喘吁吁的……
		PRINTFORMW 如果身体不舒服的话、是不是应该再多分点灵魂呢……？
		CFLAG:健康度 ++

	;0-6-1　魂50未満　M0　S6
	;進行无
	ELSEIF SAKURA_HEALTH_S(TARGET) == 5 && BASE:魂 < 50
		PRINTFORMW 「……唔」
		PRINTFORMW %CALLNAME:TARGET%的情况还是老样子。
		PRINTFORMW 但是通红的脸颊和喘息的样子反而显得十分色气……

	;0-6-2　魂50以上　M0　S6
	;メインイベント　M段階1に進行
	ELSEIF SAKURA_HEALTH_S(TARGET) == 6 && BASE:魂 >= 50
		PRINTFORMW 主人公把樱引诱到床上之前几十分钟
		PRINTFORML
		PRINTFORMW （啊……又、又）
		PRINTFORML
		PRINTFORMW 脸烧得火热、心脏像鹿撞一般跳着。
		PRINTFORMW 咚咚地跳动着仿佛暴风雨一般、让本来就不平静的胸口更加难受。
		PRINTFORMW 我的身体最近总是这样。刚才还好好的、突然一下小腹里就有一股热流。
		PRINTFORML
		PRINTFORMW 午休前后特别严重。
		PRINTFORMW 虽然只是普通的体育课、但依旧让她气喘吁吁、頭晕目眩、脸就像煮熟了一样通红……
		PRINTFORML
		PRINTFORMW 「哈……啊」
		PRINTFORML
		PRINTFORMW 还有一件事。
		PRINTFORMW 不仅是发呆、心情也会变得有些奇怪。像现在这样。
		PRINTFORML
		PRINTFORMW 内心深处痒痒的。每当心脏不断往外输送血液时、热量就会慢慢地集中到乳頭。。
		PRINTFORMW 事到如今就更难受了、越想越敏感。
		PRINTFORML
		PRINTFORMW 简直就像是有虫子叮咬一样。
		PRINTFORMW 在发觉之前应该没什么感觉、可一旦意识到就痒得不得了。
		PRINTFORMW 意识会被感觉集中、变得更加敏感、越敏感就越在意。陷入了这样的恶性循环。
		PRINTFORML
		PRINTFORMW 藏在衣服内的胸罩摩擦着乳頭、小小的尖端浮肿着立了起来、透过胸前柔软的衣服可以看到明显的凸起。从大脑深处传来的快感让整个欧派变得敏感而火热。
		PRINTFORMW 忍不住手指慢慢地伸到胸口揉捏了起来……内心想着现在周围也没有人、也不是在上课、既不用担心被人发现也不用害羞……
		PRINTFORML
		PRINTFORMW 「……嗯」
		PRINTFORMW 等意识到的时候双手已经在衣服里摸着那对小白兔了、拇指和食指紧紧地捏住勃起的乳頭、就像想挤奶一般拉扯揉捏着。
		PRINTFORML
		PRINTFORMW 「哈、嗯、哈、哈……啊」
		PRINTFORMW 胸口的悸动已经到了即使在門口也能听到的程度。脑袋里只有激烈的喘息声。乳頭上的手指停不下来啊、好舒服、好舒服、好舒服啊。但是――
		PRINTFORML
		PRINTFORMW 「\@ TRUE_SEX(MASTER) == "男性" ? にい # ねえ \@、桑……っ」
		PRINTFORMW 在被情欲感染的脑海里、%CONDS("関係", MASTER)%的脸慢慢浮现了上来。
		PRINTFORMW 「还不够、这样的完全不够啊……」
		PRINTFORMW %CNAME("二人称")%不是他来好像就不行。明天一定要告诉他、%CNAME("二人称")%想让他来的心情……
		PRINTFORML
		PRINTFORMW 无论何时何地都在寻找着%CNAME("二人称")%在哪里。
		PRINTFORMW %CNAME("二人称")%只是一段时间不在一起、身体就变得这么火热。
		PRINTFORMW 想要一直看着%CNAME("二人称")%想要一直和%CNAME("二人称")%在一起。想要亲吻%CNAME("二人称")%想和%CNAME("二人称")%做羞羞的事情。
		PRINTFORML
		PRINTFORMW （那种事情,不行啊……）
		PRINTFORMW ……这么下流的女孩是会被讨厌的、给%CNAME("二人称")%添麻烦被讨厌了的话怎么办。
		PRINTFORML
		PRINTFORMW 「要忍耐、不然的话」
		PRINTFORMW 忍住快感放開了手指。
		PRINTFORMW 整理着蓬乱的衣服。把偏离的胸罩系好,扣上了外衣的扣子。
		PRINTFORMW 硬着的乳頭顶在内衣上……好难忍耐啊。
		PRINTFORML
		PRINTFORMW （和平常一样的、作为%CNAME("二人称")%的妹妹的我不回去的话……）
		PRINTFORML
		;段階進行
		CFLAG:健康度 = (CFLAG:健康度 / 100 + 1) * 100
	ENDIF

;段階1
ELSEIF SAKURA_HEALTH_M(TARGET) == 1
	;1-0　肛交允许　M1　S0
	IF SAKURA_HEALTH_S(TARGET) == 0 && TALENT:恋慕 && ABL:Ａ感覚 >= 3
		PRINTFORMW 「那个、%CNAME("二人称")%……」
		PRINTFORMW %CALLNAME:TARGET%通红着脸，双手拽着衣角扭捏，一副很难为情的样子。
		PRINTFORMW 「最近感觉好多了，现在去學校也沒問題。因为每天吃很多%CNAME("二人称")%的精、精液……」
		PRINTFORMW 「谢谢你%CNAME("二人称")% ，从小一直那么照顾我，最喜欢你了！」
		PRINTFORMW %CALLNAME:TARGET%的泪水盈眶欲出，坦率地表达着对%CNAME("二人称")%感激和爱意。
		PRINTFORMW %CALLNAME:MASTER%和%CALLNAME:TARGET%抱在一起，感受着彼此的心意。
		PRINTFORMW ……
		PRINTFORMW 良久，%CALLNAME:TARGET%在怀里抬起頭。
		PRINTFORMW 「因为我们是%NAMES("兄弟")%，亂倫是不允許的。但是，如果%CNAME("二人称")%喜歡的話……」
		PRINTFORMW 「屁、屁股……%CNAME("二人称")%的话、可以喲。」
		PRINTFORMW 「弗莉希艾兒小姐说如果射在里面的话，效果会更好的。」
		PRINTFORMW 「請%CNAME("二人称")%將精液滿滿地射進去吧，這也是為了治療喔……」
		PRINTFORMW （病好的話，就可以和%CNAME("二人称")%一直、一直在一起了）
		PRINTL
		SETCOLOR DEF_COLOR("黄色")
		PRINTFORML - 系统消息 -
		PRINTFORML  獲得了和%CALLNAME:TARGET%肛交的允許。
		PRINTFORML  A插入系统指令可以使用
		PRINTFORMW  (事件為第三方魔改，触发条件将来可能会变更)
		RESETCOLOR
		CFLAG:健康度 ++

	;1-1　魂200以上　M1　S1
	ELSEIF SAKURA_HEALTH_S(TARGET) == 1 && BASE:魂 >= 200
		IF COND("昼")
			PRINTFORMW 在社团活动開始前、躲開其他学生钻进了没有人的空教室。
			PRINTFORMW 如果再慢一点的话、说不定会忍不住在在走廊中央……
			PRINTFORMW 「呜呜……哼、哼哼……嗯、哈……啊」
			PRINTFORMW 从发情的身体里传出刻意压抑的色情喘息。
		ELSE
			PRINTFORMW 「呜呜……哼、哼哼……嗯、哈……啊」
			PRINTFORMW 躲在反锁着的昏暗房间里。要说为什么没有開灯、肯定是因为害羞呀。
			PRINTFORMW 「这样色情的样子、不能给任何人发现」、虽然脑子里这么想着、但是身体却传来阵阵快感。
			PRINTFORMW 嘴里色气的喘息渐渐压抑不住、变得大声起来……。
		ENDIF
		PRINTFORML
		PRINTFORMW 「%CNAME("二人称")%啊、哈……啊、好……那里好、那里、喜欢……啊」
		PRINTFORMW 「好棒……%CNAME("二人称")%喜欢……啊、啊……%CNAME("二人称")%……」
		PRINTFORMW 「んぅっ！　んんっ、んぅぅぅぅぅーーっっ！！」
		PRINTFORMW 脑子被绝顶般的快感冲晕了。就算用手紧紧地捂住艳丽的小嘴、可声音还是堵不住漏了出来。
		PRINTFORMW 全身仿佛电流在游走一般、腰部突然死死地顶起、仿佛瀑布一般潮吹了。
		PRINTFORMW 浑身仿佛在岸上的鱼一般抽搐着。
		PRINTFORML
		PRINTFORMW 「哈……哈、哈……哈哈……」
		PRINTFORMW 直到刚才为止全身都筋疲力尽。身体简直就像断了线的玩偶、每次想动都觉得浑身乏力。。
		PRINTFORMW 「啊……又做了……」
		PRINTFORML
		PRINTFORMW 撑着沉重的身体站起来、拉起漏出整个胸部半脱着的衣服、发出了叹息。
		IF COND("昼")
			PRINTFORMW 「啊、我已经……学校里做这样的事的话不行啊……」
			PRINTFORMW 一边嘟哝着、一边整理着凌乱的衣服。
			PRINTFORMW （唉、但是仔细一想、也不能说我经常在教室做类似的事情……）
			PRINTFORMW 「……不、果然不行」
		ELSE
			PRINTFORMW 「不知不觉就忍不住想做、现在终于好了……」
			PRINTFORMW 一边整理凌乱的衣服、一边自言自语着。
			PRINTFORMW （啊……不被%CNAME("二人称")%知道就好了……）
			PRINTFORMW 「……不对、除了%CNAME("二人称")%以外的人也不行的吧%CNAME("一人称")%」
		ENDIF
		PRINTFORML
		PRINTFORMW \@ COND("昼") ? 从旁边的包里 # 社团的柜子里\@拿出新的内衣、胖次都已经湿透了。
		PRINTFORMW 「哈……但是一想到被%CNAME("二人称")%做这样那样的事情就忍不住……」
		PRINTFORMW 「最近只要%CNAME("二人称")%没有对我做H的事情、身体完全没有办法平息……」
		PRINTFORMW 「呜、恶化了啊、%CNAME("一人称")%……」
		PRINTFORML
		PRINTFORMW 「……不行不行、想着%CNAME("二人称")%的事情又想做了」
		PRINTFORMW 「这次……要不要试着和弗理希艾尔聊一下関于这个身体的事呢……」
		CFLAG:健康度 ++

	;1-2　魂250以上　M1　S2
	ELSEIF SAKURA_HEALTH_S(TARGET) == 2 && BASE:魂 >= 250
		PRINTFORMW 「%CNAME("二人称")%、抱我……嘻嘻……」
		PRINTFORMW 「吸……呼……%CNAME("二人称")%的%TEXTS("气味")%」
		PRINTFORMW 「嘻嘻、%CNAME("二人称")%成分补充完毕！」
		PRINTFORMW 「好幸福啊，再维持这样一下下、%CNAME("二人称")%」
		PRINTFORMW 「呜嗯……胖次湿了……」
		CFLAG:健康度 ++

	;1-3　魂300以上　M1　S3
	ELSEIF SAKURA_HEALTH_S(TARGET) == 3 && BASE:魂 >= 300 && ABL:Ａ感覚 >= 5 && ABL:自慰中毒 >= 3
		PRINTFORMW 一段时间前
		PRINTFORMW %CALLNAME:TARGET%抱着肚子冲入厕所隔间，反手将門関上。
		PRINTFORMW 「呜呜~」%CALLNAME:TARGET%褪下胖次，转身坐在便器上。
		PRINTFORMW 「呜嗯~哇啊……出、出来了~」
		PRINTFORMW %CALLNAME:TARGET%低頭看去，只见胯下一条大便急不可耐地排出来了。
		PRINTFORMW 「不行……有感觉了」随着一条条大便从肠道中挤出，%CALLNAME:TARGET%感到一阵异常的快感。
		PRINTFORMW 「呜呜~都是%CNAME("二人称")%的错，拉屎的那里，屁眼变奇怪了！」%CALLNAME:TARGET%含泪欲出的自语。
		PRINTFORML
		PRINTFORMW 「一想到%CNAME("一人称")%，身体就好热。」
		PRINTFORMW 想象着%CNAME("一人称")%的鸡巴在屁眼里抽插，一手揉着奶子，一手搓着阴蒂。
		PRINTFORMW 「哈……哈啊、%CNAME("一人称")%……哈哈……」
		PRINTFORMW （压抑着呻吟，在厕所的隔间里，拉屎自慰什么的……）
		PRINTFORMW 「咿咿……出、出来了」
		PRINTFORMW 伴随着太过激烈的快感而无法压抑的呻吟，一道阴精从阴道里射出，潮吹了……
		PRINTFORMW 「呜嗯~呜嗯~呜嗯~」全身颤抖着瘫在便器上，淡黄色的小便出尿道里漏出来了。
		PRINTFORMW 随着咻咻地声音的减弱，尿完了的%CALLNAME:TARGET%呼了口气，開始收拾残局……
		CFLAG:健康度 ++

	;1-4　魂400以上　M1　S4
	ELSEIF SAKURA_HEALTH_S(TARGET) == 4 && BASE:魂 >= 400 && ABL:受虐属性 >= 3
		PRINTFORMW 「呜嗯~%CNAME("二人称")%好坏啊，我快忍不住了啦！！」
		PRINTFORMW 今天早上出門前在玄関被满满地射在屁眼里，然后塞上肛塞才允许出門。
		PRINTFORMW 还被人说今天很奇怪，只能回是肚子不舒服。
		PRINTFORMW 一直幸苦地忍到现在，已经快到极限了。
		PRINTFORMW ……
		PRINTFORMW 「%CNAME("二人称")%不要盯着看啊！好害羞……」
		PRINTFORMW 被要求脱掉胖次靠坐在便器上，然后双腿被压在肩膀上用手抱住。维持在这种可耻的M字開腿姿势，最隐秘的下体展漏无疑。
		PRINTFORMW 水蜜桃一样的屁股颤抖着，小豆豆从闭合的小馒頭缝里冒出一个尖，一直兴奋着吧。
		PRINTFORMW 淫液从缝隙中一直流到屁眼周围，被肛塞堵住的雏菊虽然看不见，但一定很红……
		PRINTFORMW 「咿呀……别、别抓着肛塞乱动啊！%CNAME("二人称")%欺负人，呜泣……」
		PRINTFORMW 「%CNAME("二人称")%！求您了！我好难受，好……好想拉屎！！呜~」
		PRINTFORMW 终于，肛塞如愿的被拨出了，然后……
		PRINTFORMW 「啊啊！」噗噗~ 噗噗~
		PRINTFORMW 混着白色精液的稀屎，随着让人羞耻到想死的声音，被解放出来了。
		PRINTFORMW 「呜呜~」
		PRINTFORMW 「%CNAME("二人称")%、别做深呼吸啊！不臭吗？」
		PRINTFORMW 最后、%CALLNAME:MASTER%帮几乎瘫痪的%CALLNAME:TARGET%擦屁股……
		CFLAG:健康度 ++

	;1-5　魂500以上　M1　S5
	ELSEIF SAKURA_HEALTH_S(TARGET) == 5 && BASE:魂 >= 500
		PRINTFORMW 「%CNAME("二人称")%、最喜欢你了！」
		PRINTFORMW 「你知道吗？从小我身体不好，医院是我最常去的地方。」
		PRINTFORMW 「每天，%CNAME("二人称")%都会到医院看我，跟我分享生活中的事情，陪我玩。」
		PRINTFORMW 「从那时起，%CNAME("二人称")%、就是我的全部！」
		PRINTFORMW 「我很開心喔，但是，好羡慕正常的生活。好想跟%CNAME("二人称")%一起做各种各样的事情。」
		PRINTFORMW 「感谢弗莉希艾兒小姐，还有%CNAME("二人称")%一起治好了我的身体，最重要的是我可以跟%CNAME("二人称")%在一起。」
		PRINTFORMW 「虽然身体变奇怪了，没有%CNAME("二人称")%的精液就感觉活不下去了。但是是%CNAME("二人称")%，所以没関系的。」
		PRINTFORMW 「现在，我从身到心都充斥着%CNAME("二人称")%。」
		PRINTFORMW 「%CNAME("一人称")%好幸福哟……」
		PRINTFORML
		CALL PRINT_STR, "イエロー_（※现在向樱告白的话……）_W"
		CFLAG:健康度 = 200
	ENDIF

;段階2
ELSEIF SAKURA_HEALTH_M(TARGET) == 2
	IF SAKURA_HEALTH_S(TARGET) == 0 && TALENT:相思相愛 && TALENT:処女
		PRINTFORMW 「%CNAME("二人称")%、请对%CALLNAME:TARGET%温柔点喔。」
		PRINTFORMW 「因为还是第一次嘛……」
		PRINTFORMW 「%CNAME("二人称")%，啾~」
		PRINTFORMW ……
		PRINTL
		SETCOLOR DEF_COLOR("ショッキング粉紅")
		PRINTFORML - 系统消息 -
		PRINTFORML  獲得了能和%CALLNAME:TARGET%做爱的协议。
		PRINTFORML  V插入系统指令可以使用
		PRINTFORMW  (事件还没有完成，触发条件将来可能会变更)
		RESETCOLOR
		CFLAG:健康度 ++
	ELSEIF SAKURA_HEALTH_S(TARGET) == 0 && TALENT:相思相愛 && !TALENT:処女
		PRINTFORMW 「对不起、不能将第一次给%CNAME("二人称")%……」
		PRINTFORMW 「%CNAME("一人称")%最喜欢%CNAME("二人称")%了，就算粗暴点也没関系，吻我~」
		PRINTFORMW ……
		PRINTL
		SETCOLOR DEF_COLOR("ショッキング粉紅")
		PRINTFORML - 系统消息 -
		PRINTFORML  獲得了能和%CALLNAME:TARGET%做爱的协议。
		PRINTFORML  V插入系统指令可以使用
		PRINTFORMW  (事件还没有完成，触发条件将来可能会变更)
		RESETCOLOR
		CFLAG:健康度 ++
	ENDIF
ENDIF

license: unknown


code:
;-------------------------------------------------
;この角色独自の衣装を設定する。制服、体操服、泳装は既存のものから選ぶのが楽です
;-------------------------------------------------
@CLOTHES_K6, ARGS

SELECTCASE ARGS
;高めの頻度で着用します。設定しなくてもかまいません
CASE "内衣"
	CSTR:胖次 = 褶边の胖次/白/正面蝴蝶結紐/
	CSTR:胸罩 = 褶边の胸罩/白/

;衣装に関わらず常に付けている飾品です。設定しなくてもかまいません
CASE "飾品"
	CALL SET_OTHER, "髮箍"

;学園での便装です。設定必須です
CASE "制服"
	CALL SET_COSTUME, "西装外衣"
;学園の体育の授業で着ます。この格好のまま部室に現れたりもする。設定必須です
CASE "体操服"
	CALL SET_COSTUME, "体操服布鲁马"
;学園の水泳の授業で着ます。この格好のまま部室に現れたりもする。設定必須です
CASE "泳装"
	CALL SET_COSTUME, "死库水"

;自宅など学園外で着ます。設定必須です
CASE "便装"
	SELECTCASE TEXTS("季節")
	CASE "夏"
		CALL SET_SHIRT, "吊帯衫"
		CSTR:裙 = 蕾丝的裙/
		CSTR:襪子 = 膝下襪/
		CSTR:靴 = 小皮靴/直到脚腕/
		CALL SET_OTHER, "前開連帽風衣"
	CASE "冬"
		CSTR:服 = 縦毛衣/
		CSTR:裙 = 長裙/
		CSTR:襪子 = 膝下襪/
		CSTR:靴 = 小皮靴/直到脚腕/
		SIF PLACE("自宅")
			CALL SET_OTHER, "褞袍"
	CASEELSE
		CSTR:服 = 連衣裙/
		CSTR:裙 = 裙/連衣裙/
		CSTR:襪子 = 膝下襪/
		CSTR:靴 = 小皮靴/直到脚腕/
	ENDSELECT

;自分的房間(not主人公的房間)で着ます
CASE "居家服"

;约会以外で家から外出際に着ます。情人旅館呼出とかね
CASE "外出装"

;もちろん约会の際に着ます
CASE "约会衣装"

ENDSELECT

path: ERB/EVENT_K/06 さくら/EVENT_K6_CLOTHES.ERB


code:
;-------------------------------------------------
;各種打招呼
;-------------------------------------------------
@KOJO_GREETING_K6, ARGS
#DIM MEMO_LINECOUNT
MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "朝拘束"
	CALL PRINT_STR, "「……高潮来了_H_」_W_"
	CALL PRINT_STR, "「ふふっ_H_　", CNAME("二人称"), "が悪いんだよ……？　", CNAME("一人称"), "をこんなになるまで放っておくから……_H_」_W_"
CASE "朝袭"

CASE "打招呼"
	SELECTCASE CSTR:朝袭
	CASE "朝口交", "朝六九式"
		IF EXP_GAIN("射精経験", PLAYER)
			PRINTFORMW 「嗯咕、嗯咕――噗哈」
			CALL PRINT_STR, "「おはようございます、", CNAME("二人称"), "。今朝も佳肴大人でした_H_」_W"
		ELSE
			PRINTFORMW 「早安、%CNAME("二人称")%」
		ENDIF
	CASE "朝騎乗位"
		IF EXP_GAIN("射精経験", PLAYER)
			CALL PRINT_STR, "「はぁぁ……_H_　朝からとっても元気がいいですね、", CNAME("二人称"), "……_H_」_W"
		ELSE
			PRINTFORMW 「早安、%CNAME("二人称")%」
		ENDIF
	CASEELSE
		PRINTFORMW 「早安、%CNAME("二人称")%」
	ENDSELECT

	;何か発言してたらここまで
	;SIF LINECOUNT > MEMO_LINECOUNT
	;	RETURN 1

	IF COND("体育")
		PRINTFORML 「嗯、我记得今天%CNAME("二人称")%应该是、要上体育课吧……」
		IF RAND:2
			PRINTFORMW 「替换的内衣和毛巾放在这里、请不要忘记拿喲」
		ELSE
			PRINTFORMW 「%CNAME("一人称")%基本上是在旁边看,不过、因为要换体操服、很在意男孩子的视线……」
		ENDIF
	ELSEIF DAYEV("周日", "游戏内")
		PRINTFORMW 「早上好%CNAME("二人称")%。今天是休息日、但起得好早啊」
		PRINTFORMW 「我马上准备早饭、一起吃吧」
	ELSE
		PRINTFORMW 「%CNAME("二人称")%、早上好。早饭做好了哦」
		PRINTFORMW 「えへへ……♪　こういう普通の%NAMES("兄弟", TARGET, MASTER)%みたいなやりとり、実はあこがれてたんです」
		;普通か？
	ENDIF
CASE "一番乗り"
	IF RAND:2
		PRINTFORMW 「咦、还没有人来吗？」
		IF COND("Ｈ的サプライズ可能") && RAND:3 == 0
			CALL PRINT_STR, "「只有两个人的包场……对吧_H_」_W"
			PRINTFORMW %CALLNAME:TARGET%舔了一下嘴唇、把手伸向胸口、轻轻地脱下了穿戴整齐的制服……
		ENDIF
	ELSE
		PRINTFORMW 「好像还没有人来呢」
		PRINTFORMW 「只有两个人的时候、%CNAME("二人称")%对你撒娇的样子……不错吧♪」
	ENDIF
	;部活の標語
	SELECTCASE SAVESTR:標語
	CASE "部活中は内衣姿で"
		PRINTFORMW 在确认了光明正大地贴出来的標語之后、%CALLNAME:TARGET%脸上飞起红霞%CALLNAME:MASTER%在旁边脱下制服……
		CALL SETFLAG, "变成内衣姿态", TARGET
	CASEELSE
	;	IF COND("Ｈ的サプライズ可能" && RAND:3 == 0
	;		CALL PRINT_STR, "「只有两个人的包场……对吧_H_」_W"
	;		PRINTFORMW %CALLNAME:TARGET%舔了一下嘴唇、把手伸向胸口、轻轻地脱下了穿戴整齐的制服……
	;	ENDIF
	ENDSELECT
CASE "ただいま"
	PRINTFORMW 「我回来了」
	PRINTFORMW 「啊、%CNAME("二人称")%。你先回来了啊」

CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜")
		PRINTFORMW 「%CNAME("二人称")%、今天也辛苦了」

		MEMO_LINECOUNT = LINECOUNT
		IF COND("Ｈ的サプライズ可能") && RAND:3 == 0
			PRINTFORMW 「啊、但是%CNAME("二人称")%的夜晚、从现在才刚刚開始吗……？」
			CALL PRINT_STR, "「実はちょっと、お腹がすいてるんです。できれば", CNAME("一人称"), "のこと、お部屋に呼んでくれると嬉しいなぁって_H_」_W"
		ENDIF

		;何か発言してたらここまで
		SIF LINECOUNT > MEMO_LINECOUNT
			RETURN 1

		IF RAND:3 == 0
			PRINTFORMW 「晚饭还要准备一段时间、请先在房间换衣服吧」
			PRINTFORMW 穿着居家服装、围着围裙的%CALLNAME:TARGET%这样说着、就回到厨房去了。
		ELSEIF RAND:2
			PRINTFORMW 「%CNAME("二人称")%喝咖啡可以吗？还是红茶？也有绿茶和麦茶喲」
			PRINTFORMW 「茶点的话煎饼和曲奇哪个好呢……」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%咖啡加糖……你几岁了？还喝牛奶的吗……」
			PRINTFORMW %CALLNAME:TARGET%一边嘟囔着一边泡咖啡。
		ENDIF
		CALL SETFLAG_DAILY, "请喝茶"

	;部室で出迎えてくれる時
	ELSE
		IF COND("同伴中", MASTER) && RAND:2
			PRINTFORMW 「%CNAME("二人称")%、%CNAME("partner")%と一緒だったんですね」
			SIF TALENT:恋慕
				PRINTFORMW 表面上看起来和平时没什么变化、但感觉到微微的异样、难道是心理作用吗……
		ELSE
			PRINTFORMW 「啊、%CNAME("二人称")%、我先告辞了」
		ENDIF
	ENDIF
CASE "入室打招呼"
	SELECTCASE CFLAG:MASTER:PREV_DAILYCATE
	;Talk
	CASE 1
		SELECTCASE CSTR:MASTER:PREV_DAILYCOM
		CASE "甜言蜜语"
			PRINTFORMW （真好啊……）
			PRINTFORMW %CALLNAME:TARGET%羡慕地望着被说着情话的%CALLNAME:TARGET%。
		CASE "打招呼舐陰", "打招呼口交"
			IF RAND:2
				PRINTFORMW 「%CNAME("二人称", "どもり")%…………な、なに、してるの？」
				PRINTFORMW 看着%CALLNAME:MASTER%跪在岔開大腿的%CALLNAME:TARGET%面前的姿态、%CALLNAME:TARGET%惊得目瞪口呆……
			ELSE
				PRINTFORMW （呜哇……碰到了意想不到的地方）
				PRINTFORMW （但是、%CNAME("一人称")%心里还是有点期待她那样做的）
				PRINTFORMW 内衣慢慢湿透的同时、%CALLNAME:TARGET%被热气笼罩的眼睛看着%CALLNAME:MASTER%……
				CALL SETFLAG, "調教外潤滑追加", 500, TARGET
			ENDIF
		ENDSELECT
	;互动
	CASE 2
	;卖个破绽
	CASE 3
	;胖次
	CASE 4
		IF RAND:2
			PRINTFORMW 「%CNAME("二人称", "どもり")%…………な、なに、してるの？」
			PRINTFORMW %CNAME("partner")%の股間を満足げに眺める%CALLNAME:MASTER%の姿に、%CALLNAME:TARGET%は目を白黒させている……。
		ELSE
			PRINTFORMW 「哎、哎……你在干什么%CNAME("二人称")%……」
			PRINTFORMW 「%CNAME("二人称")%真的是很H呢」
		ENDIF
	;性処理
	CASE 6
		PRINTFORMW 「哎、哎……你在干什么%CNAME("二人称")%……」
	ENDSELECT

	;何か発言してたらここまで
	SIF LINECOUNT > MEMO_LINECOUNT
		RETURN 1

	IF CFLAG:MASTER:茶 == 0
		PRINTFORMW 「啊、%CNAME("二人称")%已经来了吧。请稍等、我马上泡茶」
		CALL SETFLAG_DAILY, "请喝茶"
	ELSE
		PRINTFORMW 「打扰您了……」
	ENDIF

CASE "抜け出された"
	IF RAND:2
		PRINTFORMW 「咦？　%CNAME("二人称")%去哪儿了呢……回去了吗？」
		PRINTFORMW 悄悄溜出去的%CALLNAME:MASTER%、似乎没有被%CALLNAME:TARGET%注意到……
	ELSE
		PRINTFORMW 「あ、%CNAME("二人称")%……と、%CNAME("partner")%」
		IF TALENT:恋慕
			PRINTFORMW 「……唔~」
			PRINTFORMW %CALLNAME:TARGET%挺着无论让人来评判都是毫无疑问的雄伟的胸部、目送着一句话都不说%CALLNAME:MASTER%。
		ELSE
			PRINTFORMW 「那个……请慢慢看」
			PRINTFORMW %CALLNAME:MASTER%看着%CALLNAME:TARGET%、脸通红地从%CALLNAME:MASTER%面前跑掉了。
		ENDIF
	ENDIF
CASE "便当"
	IF ABL:精液中毒 >= 4 && RAND:3 == 0
		IF RAND:3 == 0
			PRINTFORMW %CALLNAME:TARGET%最近做的便当、有种怪异的苦涩味道……
			PRINTFORMW 「诶？　最近便当的味道变了……是吗？」
			PRINTFORMW 「本来以为今天做的很好吃……有不喜欢的东西的话请告诉我哦」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「是啊、说起来生蔬菜可能很多……」
			PRINTFORMW 「嗯、最近有点凝固。本来我不太擅长吃蔬菜」
			CALL PRINT_STR, "「我也不太在意……嗯、很好吃_H_」_W_"
		ELSE
			PRINTFORMW 今天的菜是糖汁浇油炸红薯、鸡蛋卷、还有照烧鸡肉。每一种都带有甜味。
			PRINTFORMW 「%CNAME("二人称")%喜欢甜食吗？因为也有人不太喜欢、所以姑且问一下……怎么样？」
			PRINTFORMW 「话说回来、偶然听到过、听说精液的味道和吃的东西有関联」
			PRINTFORMW 在谈话中混杂的炸弹发言让%CALLNAME:MASTER%把吃了一半的便当喷了出来……
		ENDIF
	ELSEIF ABL:Ｍ感覚 >= 5 && RAND:2 == 0
		IF RAND:3 == 0
			CALL PRINT_STR, "「嗯……_H_」_W"
			PRINTFORMW 张開嘴大口含着整根香肠的%CALLNAME:TARGET%、从鼻腔里发出了色气的声音。
			CALL PRINT_STR, @"「呵呵……_ H_真好吃啊、%CNAME("二人称")%_H_」_W"
			PRINTFORMW 与此同时、干脆地一口咬断了香肠……
			PRINTFORMW 希望在各种意义上不要做那种事——这样想的同时、%CALLNAME:MASTER%和%CALLNAME:TARGET%的午休时间过去了。
		ELSEIF RAND:2 == 0
			PRINTFORMW 今日%CALLNAME:TARGET%的便当、仔细一看、每种食材都特别大。有些好奇的%CALLNAME:MASTER%问着原因。
			CALL PRINT_STR, @"「なんだか%CNAME("一人称", "かな")%最近、これくらいの尺寸のほうが美味しく感じられるよう变成了みたいで……_H_」_W"
			PRINTFORMW 「啊……但是不要盯着我看啊、张大嘴的样子好难看的」
			PRINTFORMW %CALLNAME:MASTER%有些尴尬的同时、%CALLNAME:TARGET%的便当吃完了。
		ELSE
			PRINTFORMW 「今日的甜点是香蕉哦、%CNAME("二人称")%要吃吗？」
			PRINTFORMW 「咧啰（张嘴）……嗯、啾……嗯库、嗯……」
			CALL PRINT_STR, "「呼……真好吃。_H_」_W"
			PRINTFORMW 发出不像是在吃东西的水声的同时、%CALLNAME:MASTER%把香蕉吃掉了。
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「来、“啊”~%CNAME("二人称")%」
			CALL PRINT_STR, @"「憧れてたんです、こういうの。仲の良い%NAMES("兄弟", TARGET, MASTER)%ならこれくらい普通ですよね_H_」_W"
			;そうか？
		ELSEIF RAND:2
			PRINTFORMW 「很多人一起吃饭很開心吧」
			PRINTFORMW 「%CNAME("一人称")%一般都是一个人在房间里……」
			PRINTFORMW 「啊、%CNAME("二人称")%、这个的话因为要由%CNAME("一人称")%来处分掉所以你不能吃」
			PRINTFORMW 虽然口里充满苦涩的味道、但阴霾的空气好像被吹跑了。
		ELSE
			PRINTFORMW 「诶嘿嘿♪　今天什么都没有失败就完成了」
			PRINTFORMW 「这个汉堡肉怎么样？还有炸鸡肉和维也纳章鱼香肠哦」
			PRINTFORMW 无论哪个都很好吃、但看起来便当盒的内容偏向于儿童、可能是心理作用吧……
			;实际上是因为孩提时代没吃过
		ENDIF
	ENDIF

ENDSELECT

;-------------------------------------------------
;メイン画面での台詞。いわゆる一言イベント強化版
;ちなみに画面随机属性しても同じセリフを喋ります
;選択肢に挟まれた場所で出力するのでWAITの使用は禁止
;-------------------------------------------------
@KOJO_DAILY_K6, ARGS
#DIM MEMO_LINECOUNT
MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML 「嗯、嗯……那个……」
	PRINTFORML 「虽、虽然不太清楚！请多関照！」
	PRINTFORML 咬住了関键地方的%CALLNAME:TARGET%、一边流着眼泪一边在\@ COND("夜") ? %CALLNAME:MASTER% # 部室 \@的床上非常僵硬地僵住了……。
CASE "浑身是汗"
	PRINTFORML 「因为今天运动了一下所以出汗了……」
	PRINTFORML 「……那边的%CNAME("二人称")%、不要因为说到了这个话题就过来闻%TEXTS("气味")%啊」
CASE "刚睡醒"
	PRINTFORML 「……呃、啊……哈……」
	PRINTFORML 「嗯……睡着了……现在几点……？」
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K6
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
ENDSELECT

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	;PRINTFORML
CASE "契約成立"
	;PRINTFORML
CASE "買東西"
	;買ってきた道具などで分岐
	IF COND("巨大振動棒購入") && DEVENT("巨大振動棒感想") == 0
		IF COND("買上品数") >= 3

		ELSE

		ENDIF

;		CALL SET_DEVENT, "巨大振動棒感想"
	ELSE
		SELECTCASE COND("買上品数")
		CASE IS >= 4

		CASEELSE

		ENDSELECT
	ENDIF
CASE "摆脱"
	PRINTFORML
CASE "主人公的房間に連れ込まれた"
	;PRINTFORML
CASE "自室に招待"
	;PRINTFORML
CASE "自室に訪問された"
	;PRINTFORML
CASE "指导者部屋訪問"
	;PRINTFORML

;自宅移動の後に你に連れられて居間に回来了場合など。優先度は低いです
CASE "帰還"
	;PRINTFORML

CASE "露脐装超短裙胖次チラ"
	;PRINTFORML
CASE "低腰臀圍"
	;PRINTFORML
CASE "掀起裙子"
	;PRINTFORML
ENDSELECT

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;標語の反応。書いたらコメントアウトを外してください
IF CFLAG:標語実践
	SELECTCASE SAVESTR:標語
	CASE "注意口渴"
		;IF DEVENT("標語茶") == 0
		;	PRINTFORML
		;	CALL SET_DEVENT, "標語茶"
		;ENDIF
	CASE "体操服はやっぱり布鲁马"
		;IF DEVENT("標語布鲁马") == 0
		;	PRINTFORML
		;	CALL SET_DEVENT, "標語布鲁马"
		;ENDIF
	CASE "学生服は露脐装超短裙に限る"
		;IF DEVENT("標語露脐装超短裙") == 0
		;	PRINTFORML
		;	CALL SET_DEVENT, "標語露脐装超短裙"
		;ENDIF
	CASE "欧尼酱と呼んで欲しい"
		;IF DEVENT("標語") == 0
		;	;你が性転換している場合
		;	IF TALENT:MASTER:性反転
		;		PRINTFORML 「那个、对%CNAME("一人称")%来说就算%CNAME("二人称")%变成\@ TALENT:MASTER:男性 ? 男孩子 # 女孩子 \@也还是%CNAME("二人称")%不是吗……」
		;		PRINTFORML 「但是……如果%CNAME("二人称")%想被这么称呼的话……可以喲」
		;		PRINTFORML 「欧……欧\@ TALENT:MASTER:男性 ? 尼 # 内 \@酱」
		;	ELSE
		;		PRINTFORML 「……哼——嗯」
		;		PRINTFORML 「%CNAME("二人称")%光是被%CNAME("一人称")%称呼为%CNAME("二人称")%、还不够满足呢」
		;		PRINTFORML 「叫到你满足为止就好了吧？　欧・\@ TALENT:MASTER:男性 ? 尼 # 内 \@・酱？」
		;	ENDIF
		;	CALL SET_DEVENT, "標語"
		;ENDIF
	;内容同上
	CASE "欧内酱と呼んで欲しい"

	ENDSELECT
ENDIF

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;イベント台詞。CFLAG:日常事件回数が10増えるたびに一つ叫醒ぐらいで良いでしょう
IF CFLAG:日常事件回数 >= 5 && DEVENT("質問１") == 0
	PRINTFORML 「嗯、有什么想问的吗？%CNAME("二人称")%……喜欢的东西是什么？」
	PRINTFORML 「呜、那就是那个、那个……」
	PRINTFORML 「%CNAME("二人称", "どもり")%啦……」
	PRINTFORML 「——诶、没听清问题吗？不是说人、而是喜欢的东西？」
	PRINTFORML 「哇、请忘掉刚才我说的……」
	CALL SET_DEVENT, "質問１"
ENDIF
IF CFLAG:日常事件回数 >= 15 && DEVENT("質問２") == 0
	PRINTFORML 「……为什么喜欢上%CNAME("二人称")%？」
	PRINTFORML 「呜、明明说过请忘了的……」
	PRINTFORML 「总而言之、是小时候和%CNAME("二人称")%一起说过的话相関的事情啦…………」
	CALL SET_DEVENT, "質問２"
ENDIF

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
;	PRINTFORML
ENDIF

;何か発言してたらここまで
SIF LINECOUNT > MEMO_LINECOUNT
	RETURN 1

;以下は随机台詞など

;時間帯と場所と関係で変化有些
IF COND("夜")
	IF RAND:3 == 0
		PRINTFORML 忽然察觉到目光、发现是%CALLNAME:TARGET%笑嘻嘻地看着这边……。
		PRINTFORML 「……啊、对不起%CNAME("二人称")%。会介意吗？」
	ELSEIF RAND:2 == 0
		PRINTFORML %CALLNAME:TARGET%坐在沙发上看书。
		PRINTFORML 发现看的是%TEXTR("文库本/新书/杂志/漫画/参考书")%的样子……
	ELSE
		PRINTFORML %CALLNAME:TARGET%戴着頭戴式耳机、好像在玩手机游戏。
		PRINTFORML 与平时的%CALLNAME:TARGET%意想不到的敏捷手指在高速移动着……。
	ENDIF
ELSE
	IF RAND:3 == 0
		PRINTFORML %CALLNAME:MASTER%的视线随便飘来飘去的时候、正好对上了正看着天空不知道在想些什么的%CALLNAME:TARGET%。
		PRINTFORML 感觉到视线的%CALLNAME:TARGET%笑着朝这边招手。
	ELSEIF RAND:2 == 0
		PRINTFORML 坐在窗边%CALLNAME:TARGET%一边眺望着外面、一边满足地微笑着。
	ELSE
		PRINTFORML %CALLNAME:TARGET%好像正坐在沙发上看书。
		PRINTFORM 封面上写着『
		;まじめ
		IF TALENT:妊娠
			PRINTFORML %TEXTR("初次的妈妈/不要过于夸张了　小孩起名的基本法/母乳哺育第一次的哺乳按摩/心理学的世界/孩子健康成长/三岁前小孩的教育/妈妈的美容入門　从妊娠线护理到产后")%』这个标题。
			PRINTFORML 翻着书页的%CALLNAME:TARGET%表情非常严肃认真……
		;楽しい
		ELSEIF RAND:5 == 0
			PRINTFORML %TEXTR("蝠鲼的夏天/纤弱的公主殿下/弗鲁南戦記/トルク歩き/幻視砲塔/南島的異乡人/龍虎傳")%』这个标题。
			PRINTFORML %CALLNAME:TARGET%一边脸上挂起了開心的表情、一边翻着文库本……
		ELSEIF RAND:4 == 0
			PRINTFORML %TEXTR("金之海与银之狼/我家的妹妹可爱过頭了/砂糖与香料与超级炸弹/勇者大人时薪1千円！/幸福王子不会笑/精灵的主人/追忆之空")%』这个标题。
			PRINTFORML %CALLNAME:TARGET%一边脸上挂起了開心的表情、一边翻着文库本……
		ELSEIF RAND:3 == 0
			PRINTFORML %TEXTR("奇怪世界的交换者/骗子们的破碎世界/我的男友/图书馆司书与机関枪/梅加斯・菲尔德/白陽天動乱/零碎梦魇")%』这个标题。
			PRINTFORML %CALLNAME:TARGET%一边脸上挂起了開心的表情、一边翻着文库本……
		;まじめ
		ELSEIF RAND:2 == 0
			PRINTFORML %TEXTR("猴子也能看懂的人际関系入門/从明天開始瞬间变成可爱大人的秘诀/抓住他的胃　能干女性的家庭料理/请注意男孩子的这里　女子力UP大作战/变得擅长恋愛的七大秘密/为了心仪的他的服装选择/招待少女的爱情手工料理")%』这个标题。
			PRINTFORML 翻着书页的%CALLNAME:TARGET%表情非常严肃认真……
		;適当
		ELSE
			PRINTFORML %TEXTR("古典/数学/英語/物理/化学/世界史/日本史")%』这样的标题。好像是教科書的样子。
			PRINTFORML 与其说是认真学习、倒不如说是当小说一般看着。
		ENDIF
		;ラノベ風标题は全部元ネタ有
	ENDIF
ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K6
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF RAND:3
	IF RAND:3 == 0
		PRINTFORML 「zzz…………」
	ELSEIF RAND:2 == 0
		PRINTFORML 「嘶唿zzz……嘶唿zzZ……」
	ELSE
		PRINTFORML 「嗯……那里……不可以哦……」
	ENDIF
ELSEIF RAND:2
	IF RAND:3 == 0
		PRINTFORML 「%CNAME("二人称", "かな")%……那边是、悬崖喲……zzz」
	ELSEIF RAND:2 == 0
		PRINTFORML 「真是没办法呢……%CNAME("二人称", "かな")%……呼呼……」
	ELSE
		PRINTFORML 「%CNAME("二人称", "かな")%……真的是……好色呃……」
	ENDIF
ELSE
	IF RAND:5 == 0
		PRINTFORML 「大致……再来一发……」
	ELSEIF RAND:4 == 0
		PRINTFORML 「6月24日是……全国性的……UFO日……」
	ELSEIF RAND:3 == 0
		PRINTFORML 「犯人是……女仆的……門铃……」
	ELSEIF RAND:2 == 0
		PRINTFORML 「迟到了……呜……」
	ELSE
		PRINTFORML 「再……就一回合……」
	ENDIF
ENDIF

;-------------------------------------------------
;メイン画面で選択肢として独立している日常イベントでのセリフ。WAIT使って大丈夫です
;こっちはあくまで選択肢で選ばれた場合に限るのに注意。
;-------------------------------------------------
@KOJO_DAILYCOM_K6, ARGS
;打招呼
#DIMS GREETING
#DIM MEMO_LINECOUNT
MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "归途"
	;SAVESTR:現在位置 と SAVESTR:归途の行動 を決定する
	CALL SETFLAG, "遭遇地点"

	;地の文の前の台詞がある場合はここに書く
	SELECTCASE SAVESTR:現在位置
	CASE "阵雨"
		IF RAND:2
			PRINTFORML 「可以让我也进来吗？谢谢%CNAME("二人称")%」
			PRINTFORMW （其实我有带折叠伞……心里默默地想着）
		ELSE
			PRINTFORML 「あ、%CNAME("二人称")%……」
			PRINTFORML 「我今天忘了带折叠伞。真糟糕呢」
			PRINTFORMW 「……？　可以进来吗？　太好了。」
		ENDIF
	CASE "超市", "内衣店", "泳装屋"
		;PRINTFORML
	ENDSELECT

	;地の文を出す
	CALL DAILY_MESSAGE, "归途"

	SELECTCASE SAVESTR:归途の行動
	CASE "採購"
		SELECTCASE SAVESTR:現在位置
		CASE "超市"
			IF RAND:3 == 0
				PRINTFORML 「因为看超级多的菜谱、所以我会做的菜非常多哦」
				PRINTFORMW 「……虽然实际烹饪经验一次都没有……」
			ELSEIF RAND:2
				PRINTFORML 「点心的制作在料理里面跟其他菜不太一样、非常有难度……」
				PRINTFORMW 「这次买什么好呢。%CNAME("二人称")%有什么特别想吃的吗？」
			ELSE
				PRINTFORMW 「%CNAME("二人称")%是喜欢的东西每天都吃也没関系的类型？还是会觉得腻呢？」
				PRINTFORMW 「%CNAME("一人称")%吗？　%CNAME("一人称")%是哪一种呢？」
			ENDIF
;		CASE ""
;			IF RAND:3 == 0
;				PRINTFORMW
;			ELSEIF RAND:2
;				PRINTFORML
;				PRINTFORMW
;			ELSE
;				PRINTFORML
;				PRINTFORMW
;			ENDIF
		ENDSELECT
	CASE "内衣選び", "泳装選び"
;	;新規CFLAG:内衣罩杯＆泳装罩杯

;		;罩杯が一致していない場合追加セリフ。
;		IF CEVENT("小さい内衣を買った")
;			PRINTFORML 「以前买的胸罩、果然太紧了、想要新的……」
;			PRINTFORMW 「……不行吗？？」
;		ELSEIF BASE:罩杯 != CFLAG:内衣罩杯
;			;内衣が小さくなった
;			IF BASE:罩杯 >= CFLAG:内衣罩杯
;				PRINTFORML 「最近胸罩紧了所以想换新的喲」
;				PRINTFORMW 「哥哥喜欢哪一种、可以帮我选一下吗……？」
;			;内衣が大きくなった（現状だと縮小できないので有えない）
;			ELSE
;				PRINTFORMW
;			ENDIF
;		ENDIF
;		;ぴったりのものを選ぶ
;			「」
;		;小さいのを選ぶ
;
;		;大きいのを選ぶ（買わずに返回）
;			「这个……这个太大了啦……嗯？怎么了？看见了？」
;			「――っ！？」
;			「这、这样穿着走在街上不是跟痴女一样！不行、绝ー对ー不ー行！」
;泳装
;	;小さいのを選ぶ+爆乳以上
;		「什、什么！怎么选这么小的、会被看到不可以看到的地方」
;		「……这、这不就是小号比基尼吗？不、就算你这么说……」
;		「没办法不是吗、比普通人大太多了……这样只能遮住乳頭……」
;	;小さいのを選ぶ+巨根
;		「那个、%CNAME("二人称")%……不再重新考虑一下吗？」
;		「だ、だってっ、こんな小小的泳装だと……わ、私のアレ、はみ出ちゃいます……」
;		「えっ、勃ってなければぎりぎり隠せるから大丈夫？　うぅ、そんなぁ……」
	CASEELSE
		IF RAND:30

		ELSE

		ENDIF
	ENDSELECT

;NOWEXを分岐に用いることが出来る。また、TFLAG:地の文スキップで地の文を飛ばせる
CASE "性処理：前"

CASE "性処理：後"

CASE "休憩"
	IF PLACE("自宅")
		IF COND("夜")
			;欲求不満の限界
			IF BASE:欲求不満 >= 100
;				PRINTFORMW
;				CALL PRINT_SELECT, "推倒在床上！/晚安"
;				IF RESULT == 0
;					PRINTFORMW
;					TFLAG:床イン = 1
;				ELSE
;					PRINTFORMW
;				ENDIF
			ELSE
				IF TEXTS("季節") == "冬"
					IF RAND:3 == 0
						PRINTFORMW 「冬天果然就该在被炉里悠闲地吃橘子啊……」
						PRINTFORMW 「是、剥橘子喲%CNAME("二人称")%」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「嗯、不想从被炉里出来」
						PRINTFORMW 「呵呵……变得困了,不过、在这里睡着了感冒喲……」
						PRINTFORMW 「……%CNAME("二人称")%可以送我到房间里去吗。」
					ELSE
						PRINTFORMW 「……哎呀、%CNAME("二人称")%睡着了？」
						PRINTFORMW 「这也许是在旁边一起睡的机会……？但是在这种地方睡的话、两个人可能都会感冒……」
						PRINTFORMW 「呜、%CNAME("一人称", "かな")%怎么办呢……」
					ENDIF
				ELSEIF TEXTS("季節") == "夏"
					IF RAND:3 == 0
						PRINTFORMW 「哈哈……」
						PRINTFORMW 「空调開着、怎么还这么闷热啊……？」
						PRINTFORMW 「嗯、我去冰箱里拿冰淇淋……%CNAME("二人称")%要哪个？」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「……最近地球是对人类有什么怨恨吗？」
						PRINTFORMW 「这种炎热让人感到杀意……呜呜、呜呜、要熔化了……」
					ELSE
						PRINTFORMW 「夏季就算不活动也请好好补充水分」
						PRINTFORMW 「因为出汗盐分也出来了、也不要忘记补给哦」
						PRINTFORMW 「……所以我带了冰镇的麦茶和咸糖。请」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「……呼呼」
						PRINTFORMW 「啊、不好意思、突然笑出来了」
						PRINTFORMW 「和%CNAME("二人称")%这样悠闲度过的时间、能一直持续下去就好了」
					ELSEIF RAND:2 == 0
						PRINTFORMW 「这段时间可真舒服呀……」
						PRINTFORMW 「稍微大意一点的话\@TEXTS("季節") == "春" ? 就会睡过頭 # 就会吃得太多 \@的、所以不多注意可不行」
					ELSE
						IF TEXTS("季節") == "春"
							PRINTFORMW 「已经完全暖和起来了呢」
							PRINTFORMW 「难得来一次、这次假期一起去赏花吧？」
						ELSE
							PRINTFORMW 「夏天也结束了、总算凉快起来了」
							PRINTFORMW 「之前因为%TEXTR("葡萄/苹果/橘子/梨/柿")%很便宜所以买了不少、要一起吃吗？」
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		;周日昼
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「……嗯、哥哥、现在要睡吗？」
				IF CFLAG:前回Ｈ日 == DAY - 1 || FIND_COND("夜袭相手") == 0
					PRINTFORMW 「哇、我也有点困了……一起睡午觉可以吗？」
				ELSE
					PRINTFORMW 「累了啊……熬夜还是不要熬太久比较好哦」
				ENDIF
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%CNAME("二人称")%真是的、因为是休息日所以白天就懒洋洋的」
				PRINTFORMW 「嗯……啊哈……%CNAME("一人称")%一起睡午觉吧……」
			ELSE
				PRINTFORMW 「在白天就能这样悠闲自在、只有周日才有机会吧……」
				PRINTFORMW 「哈哈……特意拿了茶和点心带过来哦」
			ENDIF
		ENDIF
	;ここは実質昼のみ
	ELSEIF PLACE("部室")
		IF RAND:3 == 0
			;前日の夜に樱と床インしていた、または樱が夜袭にきた場合
			IF CFLAG:前回Ｈ日 == DAY - 1 || FIND_COND("夜袭相手") == 0
				PRINTFORMW 「啊、好累哦%CNAME("二人称")%……」
				PRINTFORMW 「……昨天晚上、怎么说呢……因为到很晚了」
			ELSE
				PRINTFORMW 「あら%CNAME("二人称")%、觉得累吗？」
				PRINTFORMW 「%CNAME("二人称")%昨天晚上做到那么晚……啊！」
				PRINTFORMW 樱说了一半就红着脸低頭了。
			ENDIF
		ELSEIF RAND:2
			IF TEXTS("季節") == "夏"
				PRINTFORMW 「虽说很热、但是光吹冷气也不好。」
				PRINTFORMW 「%CNAME("二人称")%、到这里用电风扇给你凉快一点吧？啪嗒啪嗒」
				PRINTFORMW 虽说是“电风扇”、但樱只是用扇子扇着……
			ELSEIF TEXTS("季節") == "冬"
				PRINTFORMW 「啊、今年的冬天也很冷呢」
				PRINTFORMW 「和%CNAME("二人称")%紧贴在一起……好暖和啊」
				PRINTFORMW 「这样不错呢、很安心」
			ELSE
				PRINTFORMW 「%CNAME("二人称", "ー")%、在那种地方睡觉会感冒的哦。%CNAME("二人称", "ー")%？」
				PRINTFORMW 「真没办法、我给你拿点盖的东西吧」
			ENDIF
		ELSE
			PRINTFORMW 「一直以来辛苦了你了%CNAME("二人称")%」
			PRINTFORMW 「……那个、如果可以的话、我把膝盖借给你吧……？」
		ENDIF
	;場所移動後
	ELSE
		PRINTFORMW 「……嗯、那个、%CNAME("二人称")%？来这里只是睡觉吗？」
		PRINTFORMW 「哎……这种无处可去的心情该怎么办呢……」
	ENDIF

;ここには特殊な条件での角色独自のイベントを書く。別に無くても構わない
;発生領帯ミングは日常イベント選択後の好感度を得た直後
CASE "特殊事件"
	;眠ってる時でも来るので書くことないならRETURN 0してください
	SIF CFLAG:睡眠
		RETURN 0
;これは昼か夜
CASE "打招呼"
	IF COND("夜")
		GREETING = 晚上好
	ELSEIF COND("昼")
		GREETING = 你好
	ELSE
		GREETING = 早上好ございます
	ENDIF
	SELECTCASE STR:日常イベント名
	CASE "打招呼ハグ"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「啊%CNAME("二人称")%……咦、咦？」
			PRINTFORMW 「那个……我们的打招呼是什麽时候变成了欧美式？」
			PRINTFORMW 「嘛、那个、虽然不讨厌。……%GREETING%、%CNAME("二人称")%」
		ELSEIF COND("易出汗", MASTER)
			IF COND("易出汗")
				PRINTFORMW 「哎呀、%CNAME("二人称")%流了好多汗呢」
				PRINTFORMW 「%CNAME("一人称")%、到现在为止没有做过这样的运动……」
				PRINTFORMW 「……嘿嘿、都运动到了呢」
				PRINTFORMW %CALLNAME:TARGET%在有些偏离常人的点上感到高兴。
			ELSE
				IF TALENT:气味弱点
					PRINTFORMW 「已经……被汗水湿透了、抱这么紧、不就把你也弄湿了吗？」
					IF COND("昼")
						CALL PRINT_STR, "「啊、下午的课还能集中精神吗……_H_」_W_"
					ELSEIF COND("夜")
						CALL PRINT_STR, "「不过也许可以睡得更好呢……_H_」_W_"
					;朝に易出汗であることはないはず
					;ELSE
					ENDIF
					PRINTFORMW 以主人公听不见的程度的声音、%CALLNAME:TARGET%小声嘟哝着。
				ELSE
					PRINTFORMW 「哎呀！？哎呀、好像被弄湿了——」
					PRINTFORMW 「明明知道会这样的吧……」
					PRINTFORMW 「哎呀、真是没办法啊%CNAME("二人称")%」
				ENDIF
			ENDIF
		;二回目以降で易出汗でない
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				PRINTFORMW 「嘿嘿、%GREETING%」
				PRINTFORMW 「%CNAME("二人称")%喜欢被人紧紧地抱着喲」
			ELSE
				PRINTFORMW 「%GREETING%、%CNAME("二人称")%」
				PRINTFORMW 「哼哼……这是回礼呦。」
				CALL PRINT_STR, @"%CALLNAME:TARGET%紧紧地被抱住、\@ TALENT:巨乳 ? 柔软的丰满 # 直接压了上来 \@、品味着胸部的柔软感触。_W_"
			ENDIF
		ENDIF
	CASE "打招呼接吻"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			;初接吻分岐を用意する予定
			PRINTFORMW 「嗯！？……嗯、我……啊,哼,呜……！」
			PRINTFORMW 「――突然就亲过来、怎么了嘛？」
			CALL PRINT_STR, @"翻着白眼%CALLNAME:TARGET%、\@ (COND("昼") || COND("夜") ) ? %GREETING% # 早上好 \@这么打着招呼。_W_"
			PRINTFORMW 「诶……？　啊、是、%GREETING%」
			PRINTFORMW 「……打招呼的接吻一般都是在脸颊上亲的啊、那个……虽然这样也可以、不过……」
			PRINTFORMW 掌握了情况的%CALLNAME:TARGET%脸变红了的同时、还小声嘟哝着。
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				PRINTFORMW 「……哼、啾……啾嚅、嗯……噗哈」
				PRINTFORMW 「%GREETING%。真是的、%CNAME("二人称")%真是个淘气鬼呢……」
			ELSE
				PRINTFORMW 「%CNAME("二人称")%、请稍微往这边一点」
				CALL PRINT_STR, "「……啾_H_」_W_"
				PRINTFORMW 「嘿嘿、%GREETING%。今天比%CNAME("一人称")%要早呢」
			ENDIF
		ENDIF
	CASE "打招呼口交", "打招呼舐陰"

	CASEELSE
		;你に先に打招呼をされた
		IF CFLAG:打招呼した == 0
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDSELECT
CASE "叫醒"
	PRINTFORMW
CASE "Talk"
	SELECTCASE STR:日常イベント名
	CASE "夸奖"
		;便当分岐
		IF CHOSE_DEVENT("便当") && CHOSE_DEVENT("夸奖") == 0
			PRINTFORMW 「嘿嘿、就算你那么夸我、我可没有什么能给你哦」
			PRINTFORMW 「啊、对了。有饭后甜点、要吃吗？」
			;出るじゃないか
		ELSE
			;前回イベントが
			SELECTCASE CONDS("直前行動")
			;食べ物・飲み物
			CASE "沏茶"
				IF RAND:3 == 0
					PRINTFORMW 「啊、已经吃饱了♪」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「不不、只要合%CNAME("二人称")%胃口的话就行了」
				ELSE
					PRINTFORMW 「嘿嘿、就算你那么夸我、我可没有什么能给你哦」
					PRINTFORMW 「啊、对了。有茶点、要吃吗？」
				ENDIF
			;エロ无～薄めの身体接觸
			CASE "抚摸", "膝枕", "抱住", "亲脸頬", "接吻"
				IF RAND:3 == 0
					PRINTFORMW 「你喜欢这样的吗？呵呵、%CNAME("一人称")%也是」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「……哎嘿嘿。幸福的感觉」
				ELSE
					PRINTFORMW 「嗯、这样面对面被表扬、好害羞的……」
				ENDIF
			;身体接触された
			CASE "擦身体", "按摩"
				IF RAND:3 == 0
					PRINTFORMW 「诶？皮肤很好……是吗？那个、那个、谢谢」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「哎呀、真是的……一直盯着看呢。%CNAME("二人称")%真H……」
				ELSE
					PRINTFORMW 「明明是受表扬的人却觉得很奇怪……」
				ENDIF
			;奉仕された
			CASE "口淫", "手淫"
				IF RAND:3 == 0
					CALL PRINT_STR, "「呼呼_H_　我做的好吗？」_W_"
				ELSEIF RAND:2 == 0
					CALL PRINT_STR, @"「该怎么办啊。%CNAME("二人称")%和平常一样\@ SIZE("阴茎", MASTER) >= 2 ? 又大又厉害 # 非常可爱 \@呦_H_」_W_"
				ELSE
					PRINTFORMW 「够、够了吧、好难为情啊……」
				ENDIF
			;奉仕した
			CASE "打招呼舐陰", "打招呼口交", "舐陰奉仕する", "口交奉仕する"
				IF RAND:3 == 0
					CALL PRINT_STR, @"%CALLNAME:MASTER%一对着%CALLNAME:TARGET%的\@ PENIS(TARGET) ? 阴茎 # 阴部 \@夸奖、%CALLNAME:TARGET%的脸变得像着火一样红……_W"
				ELSEIF RAND:2 == 0
					PRINTFORMW 「呜、呜、呜呜……%CNAME("二人称")%是H的化身……」
				ELSE
					PRINTFORMW 「姑且当是被表扬了……但是该怎么回复比较好啊、真是的……」
				ENDIF
			;性騷擾：股間
			CASE "胖次を見せて要", "掀起裙子", "检查阴部", "检查内褲", "检查布鲁马", "股間観察", "露脐装超短裙胖次チラ"
				IF RAND:3 == 0
					PRINTFORMW 「喂、说这种话性骚扰、被告的话肯定会输哦」
					;そもそも前イベントの時点でアウトです
				ELSEIF RAND:2 == 0
					PRINTFORMW 「平时看不到的地方也要注意、这样才算时尚……」
				ELSE
					PRINTFORMW 「明明是受到表扬、心情却很复杂……」
				ENDIF
			;性騷擾：胸
			CASE "托一托胸部"
				IF RAND:4 == 0 && BASE:罩杯成長 >= 3
					PRINTFORMW 「唉、%CNAME("二人称")%还真是喜欢揉胸部呢……托你的福都长这么大了」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「%CNAME("二人称")%……这种尺寸的喜欢吗？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「就算你这样夸我……但是你这种还是属于性骚扰哦。啊、啊、那样的话要站不住了……」
				ELSE
					PRINTFORMW 「像是高兴又害羞的样子……%CNAME("二人称")%真H呢」
				ENDIF
			;被性騷擾
			CASE "展示内褲", "把胸部压了上去", "摩擦股間"
				IF RAND:3 == 0
					PRINTFORMW 「嘿嘿、%CNAME("二人称")%这种样子、我想应该会喜欢的吧」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「继续……做比较好吗？？」
				ELSE
					PRINTFORMW 「真难为情……这样子好H」
				ENDIF
			;それ以外
			CASEELSE
				IF RAND:3 == 0
					PRINTFORMW 「嗯、总觉得不太明白,不过、谢谢？」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「什么事啊……？但是没有恶意。诶嘿嘿」
				ELSE
					PRINTFORMW 「『附加的奖励』真是个好词呢」
				ENDIF
			ENDSELECT
		ENDIF
	CASE "甜言蜜语"
		IF TALENT:恋慕
			PRINTFORMW 「什、什么啊、突然……」
			PRINTFORMW 「我也是最喜欢%CNAME("二人称")%了」
		ELSEIF CALCF("甜言蜜语成功")
			PRINTFORMW 「真是的%CNAME("二人称")%、这样的话不应该是对妹妹说的哦、不过……」
			PRINTFORMW 「但是……我觉得这样也不坏。谢谢、%CNAME("二人称")%」
		ELSE
			PRINTFORMW 「真是的%CNAME("二人称")%、这样的话不应该是对妹妹说的哦、不过……」
			PRINTFORMW 「这种话、还请说给未来的女朋友听吧」
		ENDIF
	CASEELSE
		IF RAND:6 == 0
			PRINTFORMW 「书和%CNAME("二人称")%你比较喜欢哪个？」
			PRINTFORMW 「嗯、这个问题挺难呢……」
			PRINTFORMW 「開玩笑的。最喜欢%CNAME("二人称")%了」
		ELSEIF RAND:5 == 0
			PRINTFORMW 「呼……好累啊……」
			PRINTFORMW 「啊……读了点外国古典文学」
			PRINTFORMW 「一方面很难掌握到外国文学真正想表达的那个点、但是觉得精彩这种事情、全世界都是共通的」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「游戏吗？好啊、要玩什么呢？」
			IF RAND:3 == 0
				PRINTFORMW 「%TEXTR("益智游戏/音乐游戏/竞速游戏/解密游戏/战略游戏")%是吗、这个我很擅长哦」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「%TEXTR("格斗游戏/动作游戏/第一人称射击游戏")%吗？　姆姆（鼓嘴）、%CNAME("一人称")%选了我不擅长的呢……」
			ELSE
				PRINTFORMW 「诶、%TEXTR("RPG/STG/模拟游戏/冒险游戏/Roguelike")%吗？这种不是一个人玩的吗……」
			ENDIF
		ELSEIF RAND:3 == 0
			PRINTFORMW 「啊、不好意思、我现在正玩到関键地方、10分钟、啊不、再给我5分钟」
			PRINTFORMW 「犯人……咦、管家的保尔夫？但是他留下了完美的不在场证明和双重密室之谜……」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「%CNAME("二人称")%对于静下心来是擅长呢？　还是不擅长？」
			PRINTFORMW 「%CNAME("一人称")%呢……或许是比较擅长的那类吧」
		ELSE
			PRINTFORMW 「唔嗯？　怎么了%CNAME("二人称")%？　――只是试着叫我？」
			PRINTFORMW 「是这样吗……嘿嘿、%CNAME("一人称")%今天也很精神哦」
		ENDIF
		;他の角色について言及　やりこんでない子がいるので今のところは一律コメントアウト
		;弗理希艾尔
;		IF
;			PRINTFORMW 「弗理希艾尔真是个好人啊」
;			PRINTFORMW 「你看、如果只是想要魂的话就不会帮%CNAME("一人称")%了。」
;			PRINTFORMW 「就算一開始能拿到足够的魂、多了一个也需要魂的……对她来说其实是损失呢」

	ENDSELECT

CASE "拭汗"
	PRINTFORMW 「以前感冒的时候、也有过这样的情况吧」
	PRINTFORMW 「但是%CNAME("二人称")%这边……和小时候完全不一样呢」
	PRINTFORMW %CALLNAME:MASTER%慢慢凸起的股间、被%CALLNAME:TARGET%发现了。
;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K6
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "托一托胸部"
		IF RAND:10 == 0
			;低確率でながらPLAY
			IF RAND:2 == 0
				PRINTFORMW 「…………」
				PRINTFORMW 看着书的%CALLNAME:TARGET%好象什么事也没注意到一样继续翻着书页。
				PRINTFORMW 揉胸和捏乳頭也没反应。
				PRINTFORMW 「玩够了就请放開我」
				PRINTFORMW 看来只是不太在意而已……
			;または本気で怒られる
			ELSE
				PRINTFORMW 「嗯、%CNAME("二人称")%」
				PRINTFORMW 「现在%CNAME("一人称", "かな")%在努力学习中、但是手里拿着自动铅笔喲……」
				PRINTFORMW 「像你一样淘气的孩子会被怎么样呢、想知道吗？」
				PRINTFORMW 脸上明明是在笑、却一点都不像在開玩笑的样子……
			ENDIF
		ELSEIF RAND:3 == 0 && BASE:罩杯成長 >= 3
			IF TALENT:巨乳 >= 3
				IF RAND:2 == 0
					PRINTFORMW 「嗯……啊、已经、%CNAME("二人称")%不要啦」
					PRINTFORMW 「%CNAME("二人称")%一直这样地揉着、制服的纽扣已经绷坏了好多个了……明明不胖的说」
					PRINTFORMW 「内衣也是店里买不到的尺码……哎」
				ELSE
					PRINTFORMW 「已经、%CNAME("二人称")%真是的……哎呀……请不要再揉了啊」
					PRINTFORMW 「现在这种大小我平时已经很辛苦了的说……」
					SIF TALENT:MASTER:女性
						PRINTFORMW 「如果喜欢大的、就揉自己的\@ (BASE:MASTER:罩杯 + BASE:MASTER:罩杯成長) > 6 ? 胸部 # 胸部让它变大 \@不就行了吗」
				ENDIF
			ELSE
				PRINTFORMW 「最近、胸口的扣子越来越紧了」
				PRINTFORMW 「即使走在外面、总觉得被周围的人盯着看……」
				PRINTFORMW 「……明明不想给%CNAME("二人称")%以外的人看的说」
				PRINTFORMW 樱小声地嘟哝着、但是没有传到你的耳朵里。
			ENDIF
		ELSEIF RAND:2 == 0
			;背後から
			IF RAND:6 == 0
				PRINTFORMW 「――诶诶诶、谁啊、%CNAME("二人称")%？」
			ELSEIF RAND:5 == 0
				PRINTFORMW 「哎呀、突然干嘛啊？」
			ELSEIF RAND:4 == 0
				PRINTFORMW 「那个……%CNAME("二人称")%是吗？突然做什么呢」
			;正面突破
			ELSEIF RAND:3 == 0
				PRINTFORMW 「那个……突然想干嘛……？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「堂堂正正的话给你摸摸胸部也没関系哦」
			ELSE
				PRINTFORMW 「那个、啊、怎么了吗……？」
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%虽然有点不知所措、
			PRINTFORMW 但发现我不打算继续下去后、就放松了下来。
			IF TALENT:巨乳
				PRINTFORMW 两手沉甸甸的柔软重量让人心情舒畅……
			ELSE
				PRINTFORMW 把五指压回去,软绵绵的弹力很舒服……。
			ENDIF
		ELSE
			;爆乳以上
			IF RAND:2 == 0 && TALENT:巨乳 >= 2
				PRINTFORMW 「哇！%CNAME("二人称")%、真是的。你还是这么淘气」
				PRINTFORMW 「呼呼……但是、这样被托着我感觉也轻松不少」
				PRINTFORMW 「你看、手腕是不是越来越累了？」
			ELSE
				PRINTFORMW 「突然想要做什么啊、真是的」
				PRINTFORMW 「%CNAME("二人称")%现在想做H的事情吗……」
				PRINTFORMW 「……要是%CNAME("一人称", "かな")%对别人这样做可不行哦。我会生气的」
				PRINTFORMW 小声嘟哝着的%CALLNAME:TARGET%放松身体任%CALLNAME:MASTER%摆布。
			ENDIF
		ENDIF
	CASE "按摩"
		PRINTFORMW 「嗯……啊、因为不怎么运动、所以我觉得肩膀不怎么舒服」
		;肩をもむ
		IF RAND:3 == 0
			PRINTFORMW 「可是为什么老是肩膀……？」
			PRINTL
			IF TALENT:巨乳
				PRINTFORMW 「确实肩膀容易酸痛……。嗯、谢谢%CNAME("二人称")%」
			ELSE
				PRINTFORMW 「是一直长时间看书所以肩膀不舒服吗……」
			ENDIF
		;腰をもむ
		ELSEIF RAND:2 == 0
			IF RAND:2 == 0 && (EXP:Ｖ性交経験 || EXP:Ａ性交経験 || EXP:尿道性交経験)
				PRINTFORMW 「都是%CNAME("二人称")%做得太激烈啦、腰有时会不舒服呢……」
			ELSE
				PRINTFORMW 「腰疼的情况一直不太好呢……在怎么说也」
			ENDIF
			PRINTL
			;腰圍太め
			IF COND("豐腴")
				PRINTFORMW 「诶？　肚子粗……？」
				PRINTL
				IF TALENT:妊娠
					PRINTFORMW 「没、没有！　没有那样的事！」
					PRINTFORMW 「那是因为有宝宝在、才不是赘肉啦！」
				ELSE
					PRINTFORMW 「多、多多多管闲事！　%CNAME("二人称")%大笨蛋！」
					PRINTFORMW 「呜呜呜、真的是真的是、拿你没办法啦……」
					PRINTFORMW %CALLNAME:TARGET%双手捂着煮得通红的脸……。
				ENDIF
			ELSE
				PRINTFORMW 「嗯、怎么了吗%CNAME("二人称")%。诶、腰好细？」
				PRINTFORMW 「嘿嘿、那谢谢了。非常感谢喲♪」
			ENDIF
		;尻をもむ
		ELSE
			PRINTFORMW 「……那个……%CNAME("二人称")%。我觉得屁股大概是不会觉得僵硬的吧」
			PRINTFORMW 「咦、没那种事？腰痛的原因是这个？真的吗……？」
			;本当です
		ENDIF
	CASE "接吻"
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW 「啾……嗯、咧啰（张嘴）……」
			PRINTFORMW 「还不可以这样子、这次就由%CNAME("一人称")%来……」
			PRINTFORMW %CALLNAME:MASTER%和%CALLNAME:TARGET%热烈地亲吻着……。
		ELSE
			PRINTFORMW 「嗯……」
			PRINTFORMW 「怎么了？突然就这样……想我了？」
			PRINTFORMW 「真是拿%CNAME("二人称")%没办法啊」、嘴上虽然这么说着、%CALLNAME:TARGET%并没有太介意的样子。
		ENDIF
	CASE "膝枕"
		PRINTFORMW 「诶、啊咧、%CNAME("一人称")%总是被膝枕的那方？」
		PRINTFORMW 「嗯……。总觉得想起了小时候呢」
		PRINTFORMW %CALLNAME:TARGET%合上眼眸，仿佛沉浸在遥远的回忆中。
	CASE "泡茶"
		PRINTFORMW 「啊、多谢款待、那我就不客气了」
		PRINTFORMW 「……好吃。%CNAME("二人称")%意外地很擅长这个呢」
		PRINTFORMW “意外”是多余的、%CALLNAME:MASTER%这么吐槽着
	CASE "舐陰奉仕する"

	CASE "口交奉仕する"

	CASEELSE
		PRINTFORMW 「啊啦。谢谢你%CNAME("二人称")%」
	ENDSELECT
CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K6
	WAIT
CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		PRINTFORMW
	CASE "Ｈ的邀请", "展示内褲"
		PRINTFORMW 「%CNAME("二人称")%、那个……不做吗？？」
		PRINTFORMW 「总被拜托这样的事情、好害羞啊……」
	CASE "推倒"
		PRINTFORMW 「%CNAME("一人称")%就是这样H的身体、%CNAME("二人称")%是吧……？」
		PRINTFORMW 「嗯、要负责哦……」
	CASE "口淫"
		PRINTFORMW
	CASE "亲脸頬", "接吻"
		PRINTFORMW
	CASE "膝枕", "抱住", "把胸部压了上去", "摩擦股間"
		PRINTFORMW
	CASE "抚摸", "手淫"
		IF RAND:3 == 0
			PRINTFORMW 「呼呼……乖孩子乖孩子」
			PRINTFORMW 「如果乖乖的话、我就继续帮你摸哦」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「……嘶哩嘶哩」
			PRINTFORMW 「仅仅是被摸到心情就会平静下来」
		ELSE
			PRINTFORMW 「满足了、这次%CNAME("一人称")%也要照顾好自己哦」
		ENDIF
	CASE "膝枕"
		IF RAND:3 == 0
			PRINTFORMW 「昔は%CNAME("一人称")%が%CNAME("二人称")%にしてもらう方でしたよね」
			PRINTFORMW 「怎么也没有想到会有这么一天」
			PRINTFORMW 「……谢谢、%CNAME("二人称", "かな")%」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「怎么样……？舒服吗？」
			PRINTFORMW 「这样的幸福、如果能一直持续下去就好了、%CNAME("二人称")%……」
		ELSE
			PRINTFORMW 「正好、耳朵也清理一下吧」
			PRINTFORMW 「……好、这边好了、翻个身吧」
			PRINTFORMW 「真是的、请不要把脸朝着肚子的方向」
			PRINTFORMW 这样好害羞啊……嘴上虽然这么说、%CALLNAME:TARGET%还是就这样继续清洁着耳朵。
		ENDIF
	CASE "沏茶"
		IF RAND:3 == 0
			PRINTFORMW 「%CNAME("二人称")%、请喝茶」
			PRINTFORMW 「想凉一点再喝吗……啊啦、真没办法」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「我准备泡茶啦、%CNAME("二人称")%绿茶、红茶和咖啡、要喝哪个？」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%、茶来了」
			PRINTFORMW 「……什么？喝太多茶的话、会想上厕所的哦」
			PRINTFORMW 「话虽这么说……但是茶也很好喝……」
		ENDIF
	;それ以外
	CASEELSE
		IF RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDSELECT
CASE "廁所"
	;廁所で用を済ませた後の台詞
	IF BASE:尿意 == 0
		;主人も廁所で済ませてきた
		IF BASE:MASTER:尿意 == 0
			PRINTFORMW 「诶？%CNAME("二人称")%现在也……没什么、没什么」
		ELSE
			PRINTFORMW 「我回来了。嗯、咦、我之前想说什么来着%CNAME("二人称")%」
		ENDIF
	;廁所に行く際の台詞
	ELSE
		PRINTFORMW 「……啊、对不起%CNAME("二人称")%」
	ENDIF
CASE "廁所詮索"
	IF RAND:3 == 0
		PRINTFORMW 「哎呀、已经……即使发现了、也不要说出来」
	ELSEIF RAND:2 == 0
		PRINTFORMW 「呜ー……。%CNAME("二人称")%、再怎么说这也太不注意了……」
	ELSE
		PRINTFORMW 「哪怕再亲密、最基本的礼貌也要懂哦」
		PRINTFORMW 虽然表情是笑脸、但却能感觉到背后静静燃烧着的愤怒……
	ENDIF
CASE "廁所を覗く"
;地の文がわからないので仮置き
	;尿道感覚S以上
	IF ABL:尿道感覚 >= 11
		IF RAND:2 == 0
			PRINTFORMW 「哈……唔、唔……啊、出来了……」
			CALL PRINT_STR, "「要去了、真是啊啊啊啊啊啊啊、尿尿要高潮了唔……_H_」_W_"
		ELSE
			PRINTFORMW 「每次上厕所都这样、嗯呜、好困扰啊……」
			CALL PRINT_STR, "「恩呜呜呜_H_　哼、呼呜、哈啊……」_W_"
		ENDIF
		PRINTFORMW 在同時小便与高潮的瞬间、%CALLNAME:TARGET%厕所的門在眼前開了。
		PRINTL
		IF RAND:2 == 0
			PRINTFORMW 「啊啊啊啊啊啊！？」
		ELSE
			PRINTFORMW 「……抽泣」
			PRINTFORMW 「讨厌啊啊……%CNAME("二人称", "かな")%看到尿尿的地方了」
			PRINTFORMW 「呜哇啊啊啊~」
		ENDIF
	;それ以外
	ELSE
		;驚愕
		IF RAND:2
			IF RAND:3 == 0
				PRINTFORMW 「啊啊啊啊啊啊！？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「哎、讨厌！？　这不是真的、%CNAME("二人称")%！？」
			ELSE
				PRINTFORMW 「哇！？」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「……你、在那里……干什么？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「…………诶？啊？这是什么？会变成怎样呢？」
			ELSE
				PRINTFORMW 「……出去！快点、立刻出去！」
			ENDIF
		ENDIF
	ENDIF
CASE "检查阴部"
	;拒否された
	IF COND("合意：检查阴部") == 0
		;拒否されたのに連続実行
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW 「唔……讨厌、不管你要求多少次我都讨厌……」
			;部室内or家に他の角色がいる
			SIF CHARA_NUM("室内の邪魔者") >= 1
				PRINTFORMW 「不知道会不会有其他人经过这里？」
			PRINTFORMW 「如果……只是两个人在一起的时候……呐？」
		ELSE
			PRINTFORMW 「什……你突然在说什么啊」
			PRINTFORMW 「你之前不是有看过吗。非得要现在看？」
			PRINTFORMW 「如果实在无法忍住想看的心情……呜、但是好害羞啊……」
			PRINTFORMW 「果然还是不行……忍耐一下等晚上只有两个人的时候吧」
		ENDIF
	ELSE
		;連続実行
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			;常時Ｖ振動棒orＡ塞子orブジー
			IF COND("身嗜み：Ｖ拡張") || COND("身嗜み：Ａ拡張") || COND("身嗜み：尿道拡張")
				PRINTFORMW 「呀、啊……嗯、请不要塞进去……呀！」
				PRINTFORMW 「不要动啊！！」
			;ノーマル
			ELSE
				;PまたはVの身嗜みを禁止されている場合
				IF COND("身嗜み：Ｐ準備") || COND("身嗜み：Ｖ準備")
					PRINTFORMW 「那么、差不多可以停下来了吧……？」
					PRINTFORMW 「呀！真是的、深呼吸什么的也停下！」
				ELSE
					PRINTFORMW 「虽说有用心打扮得很漂亮、但是毕竟是害羞的地方、还是觉得好难为情啊、差不多该……」
					PRINTFORMW 「呜、呜……请不要把腰抓的这么紧、稍微放開一点啦」
				ENDIF
			ENDIF
		ELSE
			;常時Ｖ振動棒orＡ塞子orブジー
			IF COND("身嗜み：Ｖ拡張") || COND("身嗜み：Ａ拡張") || COND("身嗜み：尿道拡張")
				PRINTFORMW 「嗯……怎么样、能看清楚了吗？」
				PRINTFORMW 「我有好好听%CNAME("二人称")%的话、在街上和睡觉的时候都有放进去哦」
				PRINTFORMW 「总被放在里面、身体忍耐的好辛苦哦、真是的……」
			;ノーマル
			ELSE
				IF RAND:2 == 0
					;PまたはVの身嗜みを禁止されている場合
					IF COND("身嗜み：Ｐ準備") || COND("身嗜み：Ｖ準備")
						PRINTFORMW 「有听%CNAME("二人称")%的话剪成好看的样子……唔」
						PRINTFORMW 「额……脸慢慢靠近了。请不要这样闻%TEXTS("气味")%啦」
						PRINTFORMW 「嗯……好讨厌啊、真是的……」
					ELSE
						PRINTFORMW 「姑且、有剪成好看的样子……」
						PRINTFORMW 「唔……如何？没有什么奇怪的%TEXTS("气味")%吧……？」
					ENDIF
				ELSE
					PRINTFORMW 「……那个、%CNAME("二人称")%、稍微靠过来一点、过来这边」
					PRINTFORMW 「这里的话没関系吗……？　啊、是、没関系。虽然稍微有点窄」
					PRINTFORMW %CALLNAME:TARGET%好像是因为在隐藏起来的位置很集中的缘故、尽管股間没有暴露出来、但还是非常在意%CALLNAME:MASTER%的脸碰到的地方……
				ENDIF
			ENDIF
		ENDIF
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K6
		WAIT
	;連続実行
	ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名
		IF RAND:3 == 0
			PRINTFORMW 「为什么%CNAME("二人称")%就这么喜欢胖次啊？」
			PRINTFORMW 「%CNAME("一人称")%对%CNAME("二人称")%的胖次就没什么兴趣」
			PRINTFORMW 「……没有。是的、没有就是没有。」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「真是的、别弄脏了啊」
			CALL PRINT_STR, @"「替え\@ COND("昼") ? は用意して # もあまり残って \@ないですし……」_W_"
		ELSE
			PRINTFORMW 「想看看张開小穴的样子？」
			IF CHECK_PANTIES("ＶＡ露出") || CHECK_PANTIES("Ａ露出") || CHECK_PANTIES("Ｖ露出") || CHECK_PANTIES("带拉链的")
				PRINTFORMW 「……不、嘛、虽然给你看一下也没什么呢……」
			ELSE
				PRINTFORMW 「小穴给你看的话、%CNAME("二人称")%就陪我一起去买东西、可以吗？嘿嘿」
			ENDIF
		ENDIF
	ELSE
		IF RAND:3
			PRINTFORMW 「哎呀、真有那么開心吗……」
		ELSEIF RAND:2
			PRINTFORMW 「嘛、那个、%CNAME("二人称")%满足了就好」
			PRINTFORMW 「……总感觉做了错事。不太好呦」
		ELSE
			PRINTFORMW 「请适可而止哦……」
		ENDIF
	ENDIF
CASE "撫摸股間"
	PRINTFORMW
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K6
		WAIT
	ELSEIF CFLAG:股間確認済 && RAND:2
		PRINTFORMW
	;心情好
	ELSEIF CFLAG:夸奖
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
CASE "掀起裙子"
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			PRINTFORMW
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K6
			WAIT
		;初めて
		ELSEIF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW
		ELSE
			IF COND("打招呼前")
				PRINTFORMW
			ELSE
				;胖次沒穿
				IF EQUIP:胖次 == 0
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT
ENDSELECT

path: ERB/EVENT_K/06 さくら/EVENT_K6_DAILY.ERB


code:
;-------------------------------------------------
;取引画面と、购物の際の台詞を記述します
;-------------------------------------------------
;取引画面での台詞。悪魔以外は大部分が不要です
;-------------------------------------------------
@KOJO_WISH_K6, ARGS

SELECTCASE ARGS
CASE "取引開始"
	IF COND("種族：悪魔")
		PRINTFORMW 「今天是『哪个%CNAME("一人称")%』的请求吗、%CNAME("二人称")%？」
	ELSE
		PRINTFORMW 「%CNAME("一人称")%如果能帮到忙就好啦、%CONDS("関係", MASTER)%打算怎么做？」
	ENDIF

CASE "愛の告白"
	;接受　古い部分なのでそのうち書き直します
	;この書き方面倒だし呼び名パターン増やそうかな…
	IF TALENT:相思相愛
		PRINTFORMW %CALLNAME:MASTER%的爱意传达给了%CALLNAME:TARGET%、%CALLNAME:TARGET%大颗的泪珠从脸颊上扑簌而出。
		PRINTFORMW 「%CNAME("一人称", "かな")%也……从很久以前開始就喜欢%CONDS("関係", MASTER)%了」
		PRINTFORMW 「但是%CNAME("一人称", "かな")%们是%NAMES("兄弟")%、只有%CONDS("関係", MASTER)%一个人在不幸什么的、不能不继续坚持忍耐下去――」
		PRINTFORMW 「讨、讨厌……明明很高兴、真的、真的很高兴、却流下了眼泪……停不下来啊」
		PRINTFORMW \@ FIRSTCOM(6) == 0 ? 第一次尝到的味道 # 脸上哭着漏出了笑容 \@%CALLNAME:TARGET%的嘴唇、有一点咸咸的味道。
	;断る
	ELSE
		PRINTFORMW 「哎、哎！？　%CNAME("一人称", "かな")%是%NAMES("兄弟")%哦？」
		PRINTFORMW 「%CNAME("二人称")%当然是喜欢的」
		PRINTFORMW 「但是这样会被周围人反对的、后面只能私奔也会十分辛苦的哦……」
		PRINTFORML
		PRINTFORMW 「而且、那个……我还没有想好……」
	ENDIF

;胖次のお願いした時に相手が没穿内褲だった
CASE "没穿内褲"
	IF COND("合意：胖次交易")
		PRINTFORMW 「那个....对不起啊%CNAME("二人称")%、今天有点不方便……」
	ELSE
		PRINTFORMW 「胖、胖——！？那、那怎么可能！%CNAME("二人称")%」
		PRINTFORMW 也许是真的生气了、脸蛋通红地拒绝了……
	ENDIF
CASE "胖次交易"

;胖次を要前の会話。
CASE "胖次"

;TFLAG:値上げ交渉 に数字を入れておくと、断られた際もその値上乗せで服を脱掉展開に出来る
;TFLAG:取引拒否 = 1 とすると本来取引できるかに関わらず、取引しなくなる
CASE "全裸交易"
	;ＯＫ！
	IF TFLAG:取引承諾

	;断られる
	ELSE
		;これを指定しておくと、実行値が足りない際にこの額上乗せで応じてくれるようになる
		;TFLAG:値上げ交渉 = 2000
	ENDIF
CASE "全裸"
	;値上げ交渉した("全裸交易"で設定した場合のみ)
	IF TFLAG:値上げ交渉

	;取引初成功
	ELSEIF COND("合意：全裸化") == 0

	ELSE

	ENDIF
	CALL EVENT_DATUI, "裸体"

CASE "同居拒否"

CASE "同居希望"

CASE "同居頻度的相談"

CASE "便当拒否"
	PRINTFORMW 「那个啊、准备便当的话、稍微有点……现在还不行哦」
	PRINTFORMW 「咦、理由呢？那个、那个」
	PRINTFORMW 「还在练习中……」

CASE "做便当"
	;便当のお願い２回目以降
	IF COND("合意：便当")

	;以下は初めて作ってもらうよう变成了とき
	ELSE
		IF COND("同居中")

		ELSE

		ENDIF
	ENDIF
CASE "淫紋拒否"

;"淫紋贴纸直前"or"淫紋贴纸"の片方を書けば十分だと思います
CASE "淫紋贴纸直前"
	;初回
	IF DEVENT(ARGS) == 0
		PRINTFORMW 「那个、这个是%CNAME("二人称")%的要求吗？」
		PRINTFORMW %CALLNAME:TARGET%看着眼前的贴纸默默地观察着。
		PRINTFORMW 「好神奇啊、用手直接触摸的话会稍微变色……总觉得像生物一样」
		PRINTFORMW 「戴上这个的话、就很容易变得H……」
		PRINTFORMW 有点紧张地咽下了口水、%CALLNAME:TARGET%的喉咙动了一下。
		PRINTFORMW 「真的要贴吗？」
		PRINTFORMW 「……算了、%CNAME("二人称")%就按你说的做吧……」
		PRINTFORMW %CALLNAME:TARGET%湿润着眼睛回答道。
	ELSE

	ENDIF

CASE "淫紋贴纸"
	;初回
	IF DEVENT(ARGS) == 0

	ELSE
		;段階0
			PRINTFORMW 「又要加上新的纹路吗……」
			PRINTFORMW 「光是让%CNAME("二人称")%看看的话也不是不可以……」
			PRINTFORMW 「缠人的那一方可是相当不容易的……呦」
			PRINTFORML
			PRINTFORMW %CALLNAME:TARGET%还没说完、手就開始摸着有着淫紋的腹部。%CALLNAME:MASTER%的手慢慢向下移动。
			PRINTFORMW 从腰部、盆骨一直抚摸着、手指向着耻丘慢慢摸去。
			;没穿内褲orV露出
			IF CHECK_CLO("Ｖ露出", TARGET)
				PRINTFORMW 「嗯？哎呀、手指插进去了、哼、呜……」
			;ノーマル胖次
			ELSE
				PRINTFORMW 「诶、感觉有些微妙、%CNAME("二人称")%？啊不要脱……手指……」
			ENDIF
			PRINTFORML
			PRINTFORMW 发出一阵下流水声的同时、手指毫无抵抗地被小穴吞噬。
			PRINTFORMW 仿佛在热水中一般、爱液的热度、就像在吮吸手指一般、一边品味着柔软的阴道内壁的触感、一边轻轻地触摸着子宫口。
			PRINTFORMW 随着手指的活动、%CALLNAME:TARGET%也一蹿一蹿地挺着腰。
			PRINTFORMW 仿佛是为了向你献上自己一样、在下腹部、刚刚贴上的淫纹像脉搏一样散发着淡淡的光芒。
			PRINTFORML
			PRINTFORMW 小穴好像舍不得手指离開一般、从里面发出粘稠的水声、爱液随着手指的抽出、发出少女酸甜的%TEXTS("气味")%。
			PRINTFORMW 「嗯……啊、好了吗……？」
			PRINTFORMW %CALLNAME:MASTER%确认淫纹附好后、%CALLNAME:TARGET%散发着热烈的呼吸对此满足地点了点頭。
	ENDIF
;"淫紋直前"or"淫紋"の片方を書けば十分だと思います
CASE "淫紋直前"
	SELECTCASE MARK:淫紋
	CASE 2

	CASE 3

	CASE 4

	ENDSELECT
CASE "淫紋"
	SELECTCASE MARK:淫紋
	CASE 2

	CASE 3

	CASE 4

	ENDSELECT

;其他汎用
CASEELSE
	;汎用拒否
	IF STRCOUNT(ARGS, "拒否")
		PRINTFORMW
	;汎用取引（特に記述することがないならスキップ）
	ELSEIF STRCOUNT(ARGS, "取引")

	ELSE
		PRINTFORMW
	ENDIF
ENDSELECT

;-------------------------------------------------
;购物での台詞
;-------------------------------------------------
@KOJO_SHOP_K6, ARGS

SELECTCASE ARGS
CASE "一緒に出発"
	;着替えてもらう
	IF CHECK_CLO("裸体") || CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿") || CHECK_CLO("内衣姿")
		;初回
		IF SEVENT(ARGS) == 0
			PRINTFORML 「……%CNAME("二人称")%一起去购物吗？」
			PRINTFORML 「哇、当然要去啊、好久没一起出門了」
			PRINTFORMW 「那么、稍微换一下衣服吧」
		ELSE
			PRINTFORML 「一起去购物吗？」
			PRINTFORMW 「我明白了、稍等一下」
		ENDIF
	ELSE
		;初回
		IF SEVENT(ARGS) == 0
			PRINTFORML 「什么啊%CNAME("二人称")%。诶、买东西？和我吗？？」
			PRINTFORMW 「当然要去了、现在马上准备哦」
		ELSE
			PRINTFORML 「啊……%CNAME("二人称")%。去买东西吗？」
			PRINTFORMW 「好、今天去哪里？」
		ENDIF
	ENDIF
CASE "目送"
	PRINTFORMW 「要出門吗？请慢走」
CASE "没収胖次出発"
	;没穿内褲
	IF EQUIP:胖次 == 0
		PRINTFORMW 「那个、那个、呜」
		PRINTFORMW 「不穿吗……但是……」
	ELSE
		;初回
		IF SEVENT(ARGS) == 0
			PRINTFORMW 「…………」
			PRINTFORMW 「%CNAME("二人称")%、真、真的要这样吗……」
			PRINTFORMW 「我明白了……给、给你」
		ELSEIF ABL:露出癖 > 5
			PRINTFORMW 「……确实觉得挺麻烦的、那就脱了吧」
			PRINTFORMW %CALLNAME:TARGET%的手递过来已经湿透了的胖次。
		ELSE
			PRINTFORMW 「那个……你一直看着的话很难脱掉诶」
			PRINTFORMW 「唔……脱下来了、给……」
		ENDIF
	ENDIF
CASE "保持现在的装扮出発"
	IF CHECK_CLO("泳装姿")
		PRINTFORMW 「诶？就这样……？」
		PRINTFORMW 「呀、我说%CNAME("二人称")%、不行的啊、『没関系！』才怪啊！不行不行！」
		PRINTFORMW 「啊！那么用力拉的话衣服要掉下来了……」
	ELSEIF CHECK_CLO("体操服姿")
		PRINTFORMW 「咦、穿这身打扮去吗？？」
		PRINTFORMW 「不要紧的吧……大概」
	ELSEIF CHECK_CLO("内衣姿") || CHECK_CLO("裸体")
		;条件がどうなるかわからないけどここに入れる時点で露出癖十分だろうし分岐不要？
		IF SEVENT("ＳＨＯＰ露出") == 0
			PRINTFORMW 「就这样去吗……？」
			CALL PRINT_STR, "「……嗯_H_」_W"
			PRINTFORMW 「这样去的话会被好多人看的……」
			CALL SET_SEVENT, "ＳＨＯＰ露出"
		ELSE
			CALL PRINT_STR, "「嗯……真是的、走吧……_H_」_W"
		ENDIF
	ENDIF
CASE "会計交代"
	;初回
	IF SEVENT(ARGS) == 0 || SEVENT("商品購入") == 0
		PRINTFORMW 「咦？我来买吗？？」
		PRINTFORMW 「可以……为什么要藏起来呢？哎呀、买了什么请让我稍微看一下吧」
	ELSE
		PRINTFORMW 「……嘛、我做好觉悟了」
		PRINTFORMW 「%CNAME("二人称")%总是看起来很開心很棒呢……哈哈……」
	ENDIF
CASE "商品購入"
	;今買った物
	SELECTCASE STR:購入道具
	;ギリギリ通常商品の範疇or你用
	CASE "撮影機材", "潤滑液", "避孕套", "媚薬", "飞机杯"
		PRINTFORML 「那个、请给我这个」
		PRINTFORMW 「啊、印章卡？呜、呜、我看看%CNAME("二人称")%的钱包、是哪一张？……」
	;えっちな商品
	CASEELSE
		PRINTFORMW （呜、呜……这应该是打算给我用的吧……）
		PRINTFORMW 「那、那个、用纸袋包起来、拜托了……」
	ENDSELECT
CASE "店内待機"
	;とりあえず何か一個買った時or33％で喋る
	SIF COND("買上品数") != 1 && RAND:3
		RETURN 0
	;胖次没収中
	IF COND("買い物胖次没収中")
		PRINTFORML 「还需要别的吗……？」
		PRINTFORMW 每当周围有响动、%CALLNAME:TARGET%就紧张地看向那边……。
	ELSE
		PRINTFORML %TEXTR("「……」/「用这个做什么……？」/「哇、好厉害……比我的胳膊还粗……」/（这是什么啊、上面写着家畜用的……）/（哎……这是准备给谁用的……？）")%
		IF RAND:3 == 0
			PRINTFORMW 从旁人看来、每当看到架子上的商品、樱的脸上就会变得更红。感觉就像放点盐就已经可以吃了……
		ELSEIF RAND:2 == 0
			PRINTFORMW 虽然%CALLNAME:TARGET%刻意地不去看货架、但还是很在意那些映入眼帘的商品……
		ELSE
			PRINTFORMW 看着排列在一起的各种道具的%CALLNAME:TARGET%、一瞬间颤抖着身体、大概是想象到被用在自己身上的样子了吧……
		ENDIF
	ENDIF
CASE "购物終了"
	;胖次没収中
	IF COND("買い物胖次没収中")
		PRINTFORMW 「哈啊……太难为情了……我差点要晕过去了……」
		PRINTFORMW %CALLNAME:TARGET%感觉着空荡荡的股间、发出了叹息……
	;なにも買わなかった
	ELSEIF COND("買上品数") == 0
		PRINTFORMW 「咦、没有想买的东西吗？？」
	ELSEIF CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿")
		PRINTFORMW 「哈、平安无事地回来了……」
		PRINTFORMW 「擦肩而过的人们、都在看我吧……」
	ELSE
		PRINTFORMW 「呼、这就结束了」
		PRINTFORMW 「那么……稍微绕点路回去吧？」
	ENDIF
ENDSELECT

path: ERB/EVENT_K/06 さくら/EVENT_K6_SHOP.ERB