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

SELECTCASE ARGS
;高めの頻度で着用します。設定しなくてもかまいません
CASE "内衣"
	CSTR:胖次 = 低腰胖次/薄桃色/
	CSTR:胸罩 = 褶边の胸罩/薄桃色/

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

;学園での便装です。設定必須です
CASE "制服"
	CALL SET_COSTUME, "水手服"
	CALL SET_OTHER, "魔女の帽子"

	SELECTCASE TEXTS("季節")
	CASE "冬"
		CALL SET_OUTER, "连褲襪"
		CALL SET_GLOVE, "絲綢手套"
	CASEELSE
		CALL SET_SOCKS, "简约短襪"
	ENDSELECT

;学園の体育の授業で着ます。この格好のまま部室に現れたりもする。設定必須です
CASE "体操服"
	CALL SET_COSTUME, "体操服五分褲"
;学園の水泳の授業で着ます。この格好のまま部室に現れたりもする。設定必須です
CASE "泳装"
	CALL SET_COSTUME, "白比基尼"

;自宅など学園外で着ます。設定必須です
CASE "便装", "居家服"
	IF TALENT:恋慕 && COND("周六") + COND("周日")
		SELECTCASE TEXTS("季節")
		CASE "春", "夏"
			CALL SET_SHIRT, "哥特連衣裙"
			CALL SET_SOCKS, "褶边襪"
			CALL SET_SHOES, "平底鞋"
			CALL SET_OTHER, "褶边領帯"
		CASEELSE
			CALL SET_SHIRT, "褶边女式衬衫"
			CALL SET_SKIRT, "帯裙撑的蓬蓬裙"
			CALL SET_SOCKS, "吊帯長筒襪"
			CALL SET_SHOES, "短靴"
			CALL SET_GLOVE, "礼服手套"
			CALL SET_OTHER, "半遮帽/披风"
		ENDSELECT
	ELSE
		CALL CLOTHES_K3, "制服"
	ENDIF

	IF ARGS == "居家服"
		IF TALENT:恋慕 && COND("欲求不満") >= 2
			CALL SET_PANTIES, "Ｈ的内衣"
			CALL SET_BRA, "Ｈ的胸罩"
		ENDIF
	ENDIF
;约会以外で家から外出際に着ます。情人旅館呼出とかね
CASE "外出装"

;もちろん约会の際に着ます
CASE "约会衣装"
	SELECTCASE TEXTS("季節")
	CASE "春", "夏"
		CALL SET_SHIRT, "露脐吊帯背心"
		CALL SET_OUTER, "迷你短褲/青"
		CALL SET_SHOES, "凉鞋"
		CALL SET_PANTIES, "Ｈ的内衣"
		CALL SET_BRA, "Ｈ的胸罩"
	CASEELSE
		CALL SET_SHIRT, "短外套"
		CALL SET_SKIRT, "紧身迷你裙"
		CALL SET_SHOES, "長靴"
		CALL SET_OTHER, "围巾"
		CALL SET_PANTIES, "Ｈ的内衣"
		CALL SET_BRA, "Ｈ的胸罩"
	ENDSELECT

;朝Ｈの際に着ます
CASE "朝袭衣装"
	IF COND("同居中")

	ELSE

	ENDIF
;夜袭Ｈの際に着ます
CASE "夜袭衣装"
	CALL SET_SHIRT, "情趣内衣"

ENDSELECT

license: unknown


code:
;-------------------------------------------------
;各種打招呼
;-------------------------------------------------
@KOJO_GREETING_K3, ARGS
#DIM MEMO_LINECOUNT
;イベント発生中の角色
#DIM ACTOR
;イベント発生中の角色の默认のCALLNAME
#DIMS CALLNAME_ACTOR

MEMO_LINECOUNT = LINECOUNT

;日期対応イベントはここに書く
SELECTCASE ARGS
CASE "一番乗り", "既に入室", "入室打招呼"
	CALL KOJO_DAYEV_K3, TEXTS("日期対応イベント"), TARGET
	;何か発言してたらここまで
	SIF LINECOUNT > MEMO_LINECOUNT
		RETURN 1
ENDSELECT

SELECTCASE ARGS
CASE "朝拘束"

;朝のＨイベントでのセリフ。下の"打招呼"だけ書いてあれば十分だと思います
;ここでCALL SETFLAG, "地の文スキップ"すると地の文や経験表示を全てすっ飛ばせます(上級者向け)
;導入時の地の文を生かしつつ、その後を好きに書きたい場合には最後にTFLAG:地の文スキップ = 1とする手も有ます
CASE "朝袭"
	SELECTCASE CSTR:朝袭
	CASE "朝騎乗位"
		;恋慕
		IF TALENT:恋慕 && RANDIF(1, ABL:奉仕精神 >= 3)
			PRINTFORMW %CALLNAME:TARGET%跨坐在%CALLNAME:MASTER%的腰上俯下身子、口中呼出阵阵热气、两人近距离地互相对视、%CALLNAME:TARGET%两脚和腹部的肌肉激烈地摇摆着腰部想要精液能滋润饥渴的肉体、%CALLNAME:MASTER%的睾丸现在也快要释放出精液了

			CALL SIMULATE_SHOW_NEWDAY
			CALL AFTERTEXT_NEWDAY
			PRINTL
			CALL EMOTION_PLUS, "甜言蜜语", TARGET

			CALL PRINT_STR, "「早上好_HH_」_W"
			CALL PRINT_STR, @"「梦中的%CNAME("一人称")%和真正的%CNAME("一人称")%哪个更棒呢？_H_」_W"
			CALL PRINT_STR, "「在梦里和现实中同时做爱、就算是真正的魅魔也很难做得到吧_H_」_W"
			CALL PRINT_STR, "「而且在梦中无论注入多少精液、也没办法达成毕生夙愿呢_H_」_W"
			CALL PRINT_STR, @"「%CNAME("二人称")%的话、看来不论是被多坏的魅魔侵入梦境、都能轻松反击呢_H_」_W"
			CALL PRINT_STR, "「那个暂且不论、现在就先来一个早安之吻吧_H_」_W"
			CALL PRINT_STR, "「这是退治邪恶魔法使的方法哦_HH_」_W"
			TFLAG:地の文スキップ = 1
		ENDIF
	CASE "朝接吻"
		;恋慕
		IF TALENT:恋慕 && RAND:2
			PRINTFORMW %CALLNAME:TARGET%像在做爱的时候一样、紧紧纠缠着%CALLNAME:MASTER%的舌頭、蹂躏了好一阵

			CALL SIMULATE_SHOW_NEWDAY
			CALL AFTERTEXT_NEWDAY
			PRINTL
			CALL EMOTION_PLUS, "甜言蜜语", TARGET

			CALL PRINT_STR, "「早上好_HH_」_W"
			CALL PRINT_STR, @"「呐、今天要不要和%CNAME("一人称")%一直这样做？_H_」_W"
			PRINTFORMW 「忘记彼此之外的一切、只是一味地亲吻、享受着彼此的身体」
			PRINTFORMW 「…不、实际上并不能那么做呢。有一半是真心想这么做就是了」
			PRINTFORMW 「只是一个早安之吻就让身体变得这么躁动、真是的、连我都好像因为%CNAME("二人称")%而变得奇怪起来了」
			TFLAG:地の文スキップ = 1
		ENDIF
	CASE "朝口交", "朝六九式"
		;恋慕
		IF TALENT:恋慕 && EXP_GAIN("射精経験", MASTER) && RANDIF(1, ABL:奉仕精神 >= 3)
			WAIT
			CALL SIMULATE_SHOW_NEWDAY
			PRINTFORMW 为了响应因为热情地侍奉而射精的%CALLNAME:MASTER%、%CALLNAME:TARGET%用喉咙将精液全部接下
			PRINTL
			CALL EMOTION_PLUS, "甜言蜜语", TARGET

			PRINTFORMW 「早上好。把早安之吻用在这种地方、请原谅%CNAME("一人称")%的无礼」
			PRINTFORMW 「但是%CNAME("二人称")%也有错哦？居然那么坚挺地勃起着」
			PRINTFORMW 「侍奉的时候稍微模仿了下魅魔、梦中的%CNAME("一人称")%和真实的%CNAME("一人称")%、哪边的嘴更舒服呢？」
			TFLAG:地の文スキップ = 1
		ENDIF
	ENDSELECT
CASE "打招呼"
	SELECTCASE CSTR:朝袭
	CASE "朝乳交"
		;恋慕
		IF TALENT:恋慕 && RANDIF(1, ABL:奉仕精神 >= 3)
			CALL PRINT_STR, "「早上好_HH_」_W"
			CALL PRINT_STR, @"「怎么样？在和%CNAME("二人称")%做爱之后乳房就逐渐变成取悦男人的工具了、被它叫醒的感觉如何_H_」_W"
			PRINTFORMW 「当然、已经像这样喷出这么多精液、已经没有问的必要了呢」
			PRINTFORMW 「机会难得、要不要体验下其他的享受方式之后再起床呢？」
		ELSE
			PRINTFORMW 「早安」
			PRINTFORMW 「一起床就能感受到乳房带来的愉悦、一般来说这是只有婴幼儿才能拥有的奢侈体验呢」
			PRINTFORMW 「当然、孩子只是吮吸乳房来让自己冷静下来、而不是这样来使用呢・・・」
			PRINTFORMW 「这样做也没関系的。当然、请控制在不会迟到的程度下哦」
		ENDIF
	CASE "朝騎乗位"
		;奉仕精神Lv3以上
		IF ABL:奉仕精神 >= 3
			PRINTFORMW 「早上好。没什么、%CNAME("二人称")%好像有被魅魔袭击过的迹象呢」
			PRINTFORMW 「因为怕你有什么万一、所以我试了一下魔法使流传下来的退治魅魔的技巧」
			PRINTFORMW 「開玩笑的啦、如果真的被魅魔袭击了、是有别的办法来应对的」
			PRINTFORMW 「如果%CNAME("二人称")%想要的话…每天早上都可以来「退治魅魔」哦」
		ELSE
			PRINTFORMW %CALLNAME:TARGET%满脸通红地微笑着、明明是她正在上面侵犯着%CALLNAME:MASTER%
			PRINTFORMW 「早上好。不、我知道你想说什么。这样简直就像魅魔一样」
			PRINTFORMW 「现在、现在能什么都不说就这么接受我吗？来接吻吧」
		ENDIF
	CASE "朝接吻"
		PRINTFORMW 「早安」
		PRINTFORMW 「%CNAME("一人称")%果然还是喜欢和%CNAME("二人称")%接吻」
		PRINTFORMW 「虽然说得很俗套、但就像被某种药物侵蚀大脑一样、有依赖性了」
		PRINTFORMW 「下次%CNAME("二人称")%能给我一个早安吻吗？」
		PRINTFORMW 「到时候就像佩罗童话里那样、在野蔷薇的床上等%CNAME("二人称")%吧」
		PRINTFORMW 「当然、蔷薇的枝条是布满荆棘的障碍物、那种程度还请你跨越过去」

	CASE "朝口交", "朝六九式"
		;奉仕精神Lv3以上
		IF ABL:奉仕精神 >= 3
			PRINTFORMW 「早上好。真是的、%CNAME("二人称")%教给我太多榨出精液的方法了」
			PRINTFORMW 「看到你睡着的时候也在坚硬地勃起、就忍不住用手直接去感受它的热度、然后就这样用嘴来侍奉…」
			PRINTFORMW 「简直就像魅魔一样。把%CNAME("一人称")%变得这么淫乱到底想怎样啊？」
		ELSE
			PRINTFORMW 「早上好。不、说实话%CNAME("一人称")%也很困惑」
			PRINTFORMW 「居然用嘴让睡着的%CNAME("二人称")%射出精液・・・」
			PRINTFORMW 「什么嘛、那个、我只是在拯救被魅魔袭击的%CNAME("二人称")%而已、感觉怎样？」
		ENDIF
	ENDSELECT

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

	IF COND("水泳")
		PRINTFORMW 「今天有游泳课、实话说我不怎么想去上呢」
		PRINTFORMW 「本来换衣服什么的就好麻烦。这种事我可是不会和别人说的哦」
	ELSEIF COND("体育")
		PRINTFORMW 「体育什么的就算不学也可以当魔法使。和%CNAME("二人称")%一起偷懒的话好像也不赖呢」
		PRINTFORMW 「所谓魔法使、是一种比起马尔斯、更喜欢称赞密涅瓦的生物啊」
	ELSE
		PRINTFORMW 「早上好、今天也很精神嘛」
		PRINTFORMW 「今天也是美好的早晨、看来能度过美好的一天呢」
	ENDIF
CASE "一番乗り"
	PRINTFORMW 「%CNAME("一人称")%是第一个呢、原来如此感觉不赖」
	PRINTFORMW 「在这段时间里、如果你有什么想知道的、我会尽可能地回应你」
	;部活の標語
	IF CFLAG:標語実践
		SELECTCASE SAVESTR:標語
		CASE "注意口渴"
			PRINTFORMW %CALLNAME:TARGET%瞟了一眼标语、拿出了水壶
			PRINTFORMW 「都写在标语上了、要喝点什么吗？」
			PRINTFORMW 「今天正好有放玫瑰果进去、可以补充维生素哦」
			PRINTFORMW 「当然、如果只是单纯地摄取营养、水、营养品、和盐就足够了…」
			PRINTFORMW 「不过、尽可能地去追求美味才是人类吧？」
		CASE "学生服は超短迷你に限る"
			PRINTFORMW %CALLNAME:TARGET%瞟了一眼标语、脸上露出一幅认真的表情
			PRINTFORMW 「如果你认为自己拥有的权利是万能的、那我可以理解」
			PRINTFORMW 「如果是自己的命令、即使是这样的美少女也不得不露出这幅见不得人的姿态」
		CASEELSE
		ENDSELECT
	ENDIF

CASE "ただいま"
	IF RAND:2
		PRINTFORMW 「呀、怎么样了？有做好充分的预习吗？毕竟巩固基础可是很重要的」
	ELSE
		PRINTFORMW 「我回来了。如果我说我是看着%CNAME("二人称")%的背影回来的、你会惊讶吗？当然是開玩笑啦、只是碰巧回家的时间一样而已」
	ENDIF
CASE "既に入室"
	;家で出迎えてくれる時
	IF COND("夜")
		MEMO_LINECOUNT = LINECOUNT
		IF COND("Ｈ的サプライズ可能") && RAND:3 == 0
			IF TEXTS("曜日") == "土" && ABL:露出癖 >= 3 && CHECK_PANTIES("Ｈ的内衣")
				CALL SETFLAG, "变成内衣姿态", TARGET
				CALL EMOTION_PLUS, "交流中", TARGET
				PRINTFORMW 「欢迎回来。我等了%CNAME("二人称")%好一会儿呢。在此之前、我还在想到底要怎么打发时间呢」
				PRINTFORMW ……不知为何她只穿着内衣
				PRINTFORMW 「合身吗？这对男人进行性诱惑的内衣」
				PRINTFORMW 「买来的时候也相当害羞啊、店员一看就知道我想买来穿着和谁做爱」
				PRINTFORMW 「如果你在性方面多少有了一点兴趣的话、今晚就来我的床上吧♪」
			ELSEIF PENIS(MASTER) && CFLAG:MASTER:汗 && TALENT:气味弱点
				PRINTFORMW 「欢迎回来。我等了%CNAME("二人称")%好一会儿呢。在此之前、我还在想到底要怎么打发时间呢」
				PRINTFORMW 「真是的、我做梦也没想到自己会做这种事情啊」
				PRINTFORMW %CALLNAME:TARGET%献媚一样地紧盯着%CALLNAME:MASTER%这边、将脸凑近了%CALLNAME:MASTER%的股间。
				PRINTFORMW 「都是因为被%CNAME("二人称")%这样调教的错」
				PRINTFORMW 「总是像野兽主张自己的主权一样、在雌性的身上刻下自己的%TEXTR("气味")%…」
				PRINTFORMW 「都是因为每次都这么淫荡地玩弄%CNAME("一人称")%…」
				PRINTFORMW %CALLNAME:TARGET%完全不顾别人的眼光、想要把肉棒从衣服中取出来
			ENDIF
		ENDIF

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

		PRINTFORMW 「欢迎回来。我等了%CNAME("二人称")%好一会儿呢。在此之前、我还在想到底要怎么打发时间呢」
		PRINTFORMW 「等回过神来、就发现自己在等着%CNAME("二人称")%回家了」
		PRINTFORMW 「有时间我们再聊聊吧」
	ELSE
		PRINTFORMW 「今天有时间吗？」
		PRINTFORMW 「上课的时候也一直在想着要和%CNAME("二人称")%聊些什么呢」
	ENDIF

;CASE "入室打招呼"

CASE "簡易入室打招呼", "入室打招呼"
	;既に部員の３分の２が集合済
	IF CHARA_NUM("入室打招呼時の室内人数") >= CHARANUM*2/3 && RAND:3 == 0
		PRINTFORMW 「已经有这么多人到了吗？」
	ELSE
		PRINTFORMW （%CALLNAME:TARGET%轻手轻脚地走进了房间）
	ENDIF
;簡易入室打招呼に対する返し。ここでは括弧に『』を使う事。WAITの使用は一回が望ましい
;誰が入室してきた人はCOND("入室打招呼中")がONなのでFIND_COND("入室打招呼中")で検索可能
;また、入ってきた人数はCHARA_NUM("入室打招呼中")で調べられる
CASE "打招呼返し"
	;打招呼してきた人の中から一人選ぶ
	ACTOR = FIND_COND("入室打招呼中")
	;選ばれた角色の默认のCALLNAME。この角色への呼びかけはCNAME(CALLNAME_ACTOR) で出来る
	CALLNAME_ACTOR = %CSVCALLNAME(NO:ACTOR)%

	;ここでは括弧に『』を使う
	;打招呼してきた人に老师が混じっている
	IF FIND_COND("教員", "入室打招呼中")
		ACTOR = FIND_COND("教員", "入室打招呼中")
		PRINTFORMW （%CALLNAME:TARGET%轻轻抬手以表回应）
	ELSEIF PLACE("自宅")

	ELSE
		PRINTFORMW 『早上好』
	ENDIF

CASE "全裸化への反応"
	PRINTFORML 「这次是要抱\@ TALENT:PARTNER():男性 ? 彼 # 彼女 \@吗？」
	IF TALENT:恋慕
		PRINTFORMW %CALLNAME:TARGET%有些羡慕地看着%CALLNAME:PARTNER()%的脱衣表演
	ELSE
		PRINTFORMW %CALLNAME:TARGET%兴趣索然地将视线转回书本上
	ENDIF

CASE "便当"
	IF RAND:4 == 0
		PRINTFORMW 「威尔凡娜的香味很浓呢、虽然是廉价的香草茶但也不赖嘛」
		PRINTFORMW %CALLNAME:TARGET%只顾着喝水壶里的饮料。
	ELSEIF RAND:3 == 0
		PRINTFORML 「是放入了水果干来提香的香味茶哦」
		PRINTFORMW 「喜欢红茶的人中、也有很多人不喜欢这种往红茶中加东西的做法、不过%CNAME("一人称")%还是挺喜欢的」
	ELSEIF RAND:2
		PRINTFORMW 「我是按照食谱来做的、味道没问题吧？」
	ELSE
		PRINTFORMW 「对肉食的排斥感在很多文化圈里都是或大或小的现象。当然、这是因为和剥夺生命的行为有関呢～」
		PRINTFORMW %CALLNAME:TARGET%撇開了吃饭这件事、唐突地開始了话题
	ENDIF

CASE "抜け出された"
	PRINTFORMW 「再见了。在家里也不要忘记好好复习哦？」
ENDSELECT

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

SELECTCASE ARGS
;初回のセリフ
CASE "初回台詞"
	PRINTFORML 「%CNAME("二人称")%会加入%CNAME("一人称")%的旅途吗？」
CASE "浑身是汗"
	PRINTFORML 「%CNAME("一人称")%是不怎么流汗的体质、变成现在这样还真难受」
	PRINTFORML 「真的是不怎么舒服呢」
CASE "刚睡醒"
	IF RAND:3 == 0
		FONTSTYLE 3
		CHKFONT "Andalus"
		PRINTFORML 「Ateh, Malkuth, Ve Geburah, Ve Gedulah, Le Olam, amen」
		FONTREGULAR
		SETFONT
		PRINTFORML 睡眼惺忪地在半空中描画着五芒星
	ELSEIF RAND:2 == 0
		FONTSTYLE 3
		CHKFONT "Andalus"
		PRINTFORML 「Zazas, zazas, nasatanada zazas」
		FONTREGULAR
		SETFONT
		PRINTFORML 睡眼惺忪地好像在进行黑魔法的吟唱
	ELSE
		FONTSTYLE 3
		CHKFONT "Andalus"
		PRINTFORML 「Fæder ure þu þe eart on heofonum... Si þin nama gehalgod ....」
		FONTREGULAR
		SETFONT
		PRINTFORML 睡眼惺忪地在半空中描绘着十字架
	ENDIF
;沉眠著
CASE "睡眠"
	;梦话
	CALL KOJO_SLEEP_K3
	;梦话用の汎用地の文呼出
	CALL DAILY_MESSAGE, "梦话"
CASE "Cosplay中"
	PRINTFORML 「上次你送给我的衣服、我又穿上了哦」
ENDSELECT

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

;前回指令対応台詞
SELECTCASE CONDS("直前行動")
CASE "愛の告白"
	PRINTFORML 「话虽如此、在学习的时候我们还是师徒関系哦。张弛有度是很重要的吧？」
CASE "契約成立"
	PRINTFORML
CASE "摆脱"
	SELECTCASE SAVESTR:現在位置
		CASE "做爱房"
			PRINTFORML 「那个女仆还真是有献身精神」
			PRINTFORML 「因为在学校这种场合、硬是建造了一间做爱专用的房间呢」
			PRINTFORML 「说白了、要模仿她做成这样是很困难的」
			PRINTFORML 「在这个房间里究竟有多少个学生落入%CNAME("二人称")%手呢？」
		CASE "体育倉庫", "更衣室", "保健室"
			PRINTFORML 「明明让女仆特意在学校里建造了用来做爱的房间」
			PRINTFORML 「却还是想在普通的地方做、你不觉得这样很奢侈吗？」
			PRINTFORML 「明明在我们做爱之后、这里就会被其他人使用呢」
		CASE "情人旅館"
			PRINTFORML 「对%CNAME("二人称")%来说、这种地方有让你花钱的价值吗？」
			PRINTFORML 「不管怎么说、即使是在学校里、也能把像%CNAME("一人称")%这样的美少女叫出来处理性欲」
			PRINTFORML 「而且还有人会在%CNAME("二人称")%性交完之后、为你清理现场」
			PRINTFORML 「你难道是想炫耀一下你做完之后数量多到吓人的避孕套吗？」
		CASEELSE
			PRINTFORML 「实地考察吗？要做什么？啥？难道不是想让我教你魔法吗…」
			PRINTFORML 「嘛、不过也是、有时候改变场合也是很重要的。你要去哪里？」
	ENDSELECT
CASE "主人公的房間に連れ込まれた"
	IF CHECK_CLO("裸体")
		PRINTFORML 「特意在别的地方被剥光衣服、再被带到%CNAME("二人称")%的房间、这不是很没有效率吗」
		PRINTFORML 「和赤裸着身体的%CNAME("一人称")%走在一起、是在向别人宣告自己马上要和这个女人做爱了吗」
		PRINTFORML 「实在是不可能在外面这么做、但只是在家里的话、那我就满足一下%CNAME("二人称")%的征服欲吧」
	ELSEIF RAND:2
		PRINTFORML 「呼呼、今天要教你些什么呢、%CNAME("二人称")%在教室里的时候就很期待了」
		PRINTFORML 「有时候难免会涉及到一些形而上学的知识、那个时候又该说些什么话题来勾起你的兴趣、在做教学之前这些都要做好准备呢」
		PRINTFORML 「……还是说、你想要的不是话语、而是%CNAME("一人称")%的肉体吗？」
	ELSE
		PRINTFORML %CALLNAME:TARGET%仰面躺在%CALLNAME:MASTER%的床上、眼睛直直地盯着这边
		PRINTFORML 「在与%CNAME("二人称")%相遇之前、我可从来都没有想象过」
		PRINTFORML 「像这样闯进男人的房间、而且、还像在渴求着做爱一样毫无防备地暴露身体」
		PRINTFORML 「不用说、我是不会轻易和任何人发生这种関系的、说不定%CNAME("二人称")%就是%CNAME("一人称")%第一个也是最后一个男人」
	ENDIF
CASE "自室に招待"
	IF CHECK_CLO("裸体")
		PRINTFORML 「特意在别的地方被剥光衣服、再被带到%CNAME("一人称")%自己的房间、这不是很没有效率吗」
		PRINTFORML 「和赤裸着身体的%CNAME("一人称")%走在一起、是在向别人宣告自己马上要和这个女人做爱了吗」
		PRINTFORML 「实在是不可能在外面这么做、但只是在家里的话、那我就满足一下%CNAME("二人称")%的征服欲吧」
	ELSEIF RAND:2
		PRINTFORML %CALLNAME:TARGET%从快要倒塌的书山中、灵巧地保持了奇妙的平衡、只拿出一本书来
		PRINTFORML 「这回我想要用这本书。上次的是有些难懂的部分、比起那个、%CNAME("二人称")%应该会觉得这本更有趣呢」
		PRINTFORML 怀着能和%CALLNAME:MASTER%尽情交谈的期待、她欢欣雀跃地開始了前言
	ELSE
		PRINTFORML 「如你所见我是个不怎么会整理整顿的类型呢、书本和资料已经堆积如山了」
		PRINTFORML 「之前床上也是差不多的感觉……这里是专門为了%CNAME("二人称")%而清理好的哦」
		PRINTFORML 「从某种意义上来说、为了和%CNAME("二人称")%做爱、我的一部分生活习惯也发生改变了呢」
		PRINTFORML %CALLNAME:TARGET%正试图引诱%CALLNAME:MASTER%来到床上
	ENDIF

CASE "自室に訪問された"
	;指导者を伴っている場合
	IF FIND_COND("現在存在", "助手")
		PRINTFORML 「阿啦、%CNAME("二人称")%和%CNAME(CSVCALLNAME(NO:ASSI) )%？」
		PRINTFORML 「你们两个有什么事吗？」
	ELSE
		PRINTFORML 「需要%CNAME("一人称")%的帮助吗？」
		PRINTFORML 「是对上回的谈话有什么疑问吧。我会尽力帮你的」
	ENDIF
CASE "オナバレ"
	PRINTFORML オナバレ
CASE "露脐装超短裙胖次チラ"
	PRINTFORML 「窥伺深渊是魔术的目的之一、而%CNAME("二人称")%又在窥伺什么呢？」
	PRINTFORML 「嘛、算了、看%CNAME("二人称")%这么有探求心、我就原谅你了。尽量不要惹别人生气哦」
CASE "低腰臀圍"
	PRINTFORML 低腰臀圍
CASE "掀起裙子"
	PRINTFORML 「什么嘛、%CNAME("二人称")%看起来性欲旺盛呢」
	PRINTFORML 「不、或许性欲的由来是因为%CNAME("二人称")%的体质吗？也许值得考虑一下…」
	PRINTFORML 毫不在意胖次被人凝视着、開始了思考
CASE "隐秘摄影失敗"
	PRINTFORML 「哦呀、你是想拍照吗？」
	PRINTFORML 「我能理解、你想拍摄的是没有注意到视线的样子」
	PRINTFORML 「下次拍摄的时候尽量不要引起注意吧」
CASE "变成裸体"
	PRINTFORML 「%CNAME("二人称")%也许正在期待着%CNAME("一人称")%害羞的样子」
	PRINTFORML 「我们已经做过好几次了吧、事到如今还想什么呢」
	PRINTFORML 「当然、在不知道多少双眼睛看着的地方、很难办的啊」
	;他に人がいる
	IF CHARA_NUM("室内の邪魔者")
		PRINTFORML 「在这里的大家都和%CNAME("二人称")%有着身体上的交流吧？」
		PRINTFORML 「既然这样、那么大家都彼此彼此嘛」
	;まさかの野外
	ELSEIF PLACE("野外")
		PRINTFORML 「反正就算是在室外也不会被别人看见、是因为提前做好什么准备了吧？」
	;不在個室
	ELSEIF PLACE("個室") == 0
		PRINTFORML 「就这样两人独处」
	;個室で二人きり
	ELSE
		PRINTFORML 「房间里只有我们两个人呢」
	ENDIF
CASE "检查阴部"
	IF COND("合意：检查阴部")
		IF RAND:3 == 0 && CHARA_NUM("室内の邪魔者") >= 2
			PRINTFORML 「在其他的女性面前做这种事、该不会还打算也把她们带到床上吧？」
			PRINTFORML 「还是说、你想就这样把抱%CNAME("一人称")%的时候的样子展示出来吗？」
		ELSEIF RAND:2 == 0
			PRINTFORML 「请不要把%CNAME("一人称")%当成一个寡廉鲜耻的女人」
			PRINTFORML 「毕竟%CNAME("二人称")%才是造成这种状况的罪魁祸首」
		ELSE
			PRINTFORML 「在遇到%CNAME("二人称")%之前、%CNAME("一人称")%也从没想过会做这种事」
			PRINTFORML 「更不用说、居然会对这种行为感到兴奋」
		ENDIF
	ENDIF
CASE "检查内褲"
	IF COND("合意：检查内褲")
		IF RAND:3 == 0 && CHARA_NUM("室内の邪魔者") >= 2
			PRINTFORML 「%CNAME("一人称")%倒是不太在意别人的目光」
			PRINTFORML 「不过在满是漂亮女性的房间里做这种事情、总觉得有点反常」
		ELSEIF RAND:2 == 0
			PRINTFORML 「如果是对内衣有什么要求的话、还是等到床上的时候再说・・・有必要这样做吗？」
		ELSE
			PRINTFORML 「因为%CNAME("二人称")%总是专注于内衣、我的内衣数量也越变越多了」
			PRINTFORML 「为了收纳这些为%CNAME("二人称")%准备的内衣、看来想要一个专門的收纳架子了」
		ENDIF
	ENDIF
CASE "股間観察"
	IF COND("合意：检查内褲")
		IF RAND:3 == 0
			PRINTFORML 「当然、并不讨厌被%CNAME("二人称")%看到」
			PRINTFORML 「%CNAME("一人称")%只是在想那里有什么吸引人的」
		ELSEIF RAND:2 == 0
			PRINTFORML 「那里有那么吸引人的魅力吗？」
		ELSE
			PRINTFORML 「%CNAME("二人称")%的视线总是让%CNAME("一人称")%觉得很舒服」
			PRINTFORML 「即使、你的视线那么露骨还充满性意味」
		ENDIF
	ENDIF
CASE "拜托処理性欲"
	IF RAND:2 == 0 && CHARA_NUM("室内の邪魔者") >= 2
		PRINTFORML 「那么、在其他女性的面前用%CNAME("一人称")%来进行性欲处理、满足了吗？」
		PRINTFORML 「如果马上就和%CNAME("一人称")%以外的女人上床、大家都会吃惊于你是个多么没有节操的男人哦？」
		PRINTFORML 「不过、即使变成这样、你也不许讨厌%CNAME("一人称")%哦」
	ELSE
		PRINTFORML 「一旦接受了%CNAME("二人称")%的精液、身体就会强烈地追求性快感」
		PRINTFORML 「不是单方面地为%CNAME("二人称")%处理性欲、而是想要进行互相追求的性爱」
		PRINTFORML 「即使对%CNAME("二人称")%来说这只是单纯的性欲处理而已」
	ENDIF
CASE "清洁口交"
	PRINTFORML 「肉棒竟然还这么硬、还不够吗？」
	PRINTFORML 「这样的话、马上就又要回复原状了」
	PRINTFORML 「下次粘在上面的是%CNAME("二人称")%的体液、还是别的什么人的体液就不一定了」
CASE "阴部の見せつけ撮影"
	PRINTFORML 「你知道为了给%CNAME("二人称")%的肉棒提供性快感而分泌出来的体液为什么会漏出来吗？」
	PRINTFORML 「好好拍吧、这是%CNAME("二人称")%的肉棒到底有多受欢迎的证明哦」
CASE "阴部のチラ見せ撮影", "POSE撮影", "股間撮影", "内褲摄影", "阴部摄影"
	IF RAND:3 == 0 && CHARA_NUM("室内の邪魔者") >= 2
		PRINTFORML 「对这么多容姿端丽的女性为所欲为呢」
		PRINTFORML 「难道说、在今天和谁做了什么都有拍下照片写成日记吗？」
		PRINTFORML 「可以想象到、%CNAME("二人称")%的「邀约手段」一天比一天高明呢」
	ELSEIF RAND:2 == 0
		PRINTFORML 「如果是对内衣有什么要求的话、还是等到床上的时候再说・・・有必要这样做吗？」
	ELSE
		PRINTFORML 「因为%CNAME("二人称")%总是专注于内衣、我的内衣数量也越变越多了」
		PRINTFORML 「为了收纳这些为%CNAME("二人称")%准备的内衣、看来想要一个专門的收纳架子了」
	ENDIF
CASE "摩擦股間"
	PRINTFORML 「%CNAME("二人称")%能就这样来吻我吗」
	PRINTFORML 「比起用手来爱抚、先用嘴来传达爱意才是理所当然的哦」
	PRINTFORML 「明明是自己正在被做这种事还提要求、好像是有点奇怪」
CASE "接吻", "接吻"
	IF RAND:3 == 0 &&  COND("欲求不満")
		PRINTFORML 「果然在这种状态下和%CNAME("二人称")%接吻、会想要做到心满意足为止呢」
		PRINTFORML 「在性欲和%CNAME("二人称")%的亲吻驱使下、会变得想要和你做爱」
		PRINTFORML %CALLNAME:TARGET%欲求不满地将亢奋的身体紧贴过来
	ELSEIF RAND:2 == 0
		PRINTFORML 「接吻很少能解决问题、但经常被说能让人暂时忘记问题」
		PRINTFORML 「就像鸦片虽然能让人忘记痛苦、却不能阻止流血一样呢」
	ELSE
		PRINTFORML 「在%CNAME("二人称")%吻我之前、逐渐靠近的你的眼睛看起来很美」
		PRINTFORML 「一看到%CNAME("二人称")%的眼睛、就会突然想起那个情景」
		PRINTFORML 「这样的话、下次就让%CNAME("一人称")%来贴近%CNAME("二人称")%的脸来好好看看这双光彩熠熠的眼睛」
	ENDIF
CASE "亲脸頬"
	PRINTFORML 「我喜欢委身情欲的热吻、但也喜欢这种充满爱意的轻吻哦」
	PRINTFORML %CALLNAME:TARGET%将手指点在嘴唇上露出微笑
CASE "邀请一起入浴", "Ｈ的邀请", "推倒"
	PRINTFORML 「被像%CNAME("一人称")%这样的美少女渴求身体居然还拒绝、%CNAME("二人称")%真是个奢侈的男人」
	PRINTFORML 「就算是能大大咧咧地自称美少女的%CNAME("一人称")%、也多少失去了一些信心了」
	PRINTFORML 「还是说更想要听我讲课吗？如果是那样的话、%CNAME("一人称")%也很乐意哦」
CASE "口淫"
	PRINTFORML %CALLNAME:TARGET%并没有急着榨取精液、而是像撒娇一样吞吐着肉棒、让唾液涂满肉棒
CASE "手淫"
	PRINTFORML 「这样触摸着%CNAME("二人称")%的肉棒、就会想要变得舒服起来」
	PRINTFORML 「让女性变成这样也是%CNAME("二人称")%的能力吧？」
CASE "膝枕"
	PRINTFORML 「暂时这样行吗」
	PRINTFORML 「委身于性欲固然很舒服、但是这样也不赖」
	PRINTFORML 「就这样像往常一样聊天吧？」
CASE "展示内褲"
	PRINTFORML 「光是看着就满足了吗？」
	PRINTFORML 「如果有什么其他要求的话、尽管说吧」
CASE "撩起裙子"
	PRINTFORML 「你想要看到什么样的呢？」
	PRINTFORML %CALLNAME:TARGET%握着裙子的下摆上下挪动给你展示不一样的角度
CASE "抱住"
	PRINTFORML 「被%CNAME("二人称")%紧紧抱住的感觉、总觉得很不一样」
	PRINTFORML 「简直想要就这么一直被%CNAME("二人称")%抱在怀里生活下去」
	PRINTFORML %CALLNAME:TARGET%像是要把身体再贴的更紧一些、手臂也在用力收紧
CASE "摸頭"
	PRINTFORML %CALLNAME:TARGET%被摸了摸頭、好像很高兴的样子
ENDSELECT

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

;イベント台詞。CFLAG:日常事件回数が10増えるたびに一つ叫醒ぐらいで良いでしょう
IF CFLAG:日常事件回数 >= 5 && DEVENT("質問１") == 0
	PRINTFORML 「父母是什么样的人？两个人都是魔法使哦。因为种种原因才移居到这个国家」
	PRINTFORML 「因为两个人算不上門当户对呢、好像是私奔过来的。啊啊、是落难才对」
	CALL SET_DEVENT, "質問１"
ENDIF
IF CFLAG:日常事件回数 >= 30 && DEVENT("質問２") == 0
	PRINTFORML 你和为了取回忘记的东西的西西莉娅一起前往了她父母的家中
	PRINTFORML 一起走到玄関的时候、一个高个子身着女仆服的女人已经出来迎接了
	PRINTFORML 从她的嘴里好像说出了欢迎回来之类的问候语
	PRINTFORML 虽然外表看起来凛然利落但声音却意外的可爱
	PRINTFORML 那个暂且不论、她口中的好像是不那么常用的语言
	PRINTFORML 西西莉娅也相对应的、用你听不懂的话语来应答
	PRINTFORML 从持续了一段时间的对话来看、似乎是得到了回家的许可
	PRINTFORML 女仆瞥了你一眼、马上就往走廊深处带路
	PRINTFORML 「对不起、她是我们家的负责全部工作的女仆・・・
	PRINTFORML 只愿意用古希腊语来进行交流
	PRINTFORML 大概是拒绝与圈子以外的人交流吧
	PRINTFORML 在一个极其封闭的世界里生活、从这个意义上来说、我也有着这样的志向
	PRINTFORML 不、那个暂且不论、我感觉她的语气比平时要尖锐
	PRINTFORML 一定是还没有承认你是可以成为我新的家人的存在吧。
	PRINTFORML 怎么样？为了得到认可、从现在開始学习一門新的语言、那我可以帮你哦・・・」
	CALL SET_DEVENT, "質問２"
ENDIF

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

;他の人といちゃついた後にpartner変更
IF COND("いちゃいちゃ") == 0 && FIND_COND("Ｈ的いちゃつき中")
	PRINTFORML 「你想让那种感觉的女人怀孕吗？」
	PRINTFORML 「如果%CNAME("二人称")%真的这么想的话、我可以协助你」
	PRINTFORML 「呼呼呼、你觉得这是在開玩笑吗？」
ENDIF

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

;以下は随机台詞など

;時間帯と場所と関係で変化有些
;IF COND("夜")
;	PRINTFORML
;ELSE
	IF CFLAG:茶 && RAND:3 == 0
		PRINTFORM %CALLNAME:TARGET%%TEXTR("有时会一边摆弄着自己的金发/偶尔会一边自言自语/一边喝着瓶装的茶饮")%
		PRINTFORML 一边%TEXTR("读魔法书/读外语书/读不知道什么语言的书/玩着手机/读料理书/读教科书/写为你准备的讲义")%
	ELSEIF CHECK_SHIRT("女仆装")
		PRINTFORML 「主人、我应该这么说吗？当然不会这么说了」
		PRINTFORML 「本来应该是工作服的女仆装被赋予了各种各样的意义、很有意思」
		PRINTFORML 「制服本来的作用、也许是服装作为一种「形式」来掩盖意义的结果」
		PRINTFORML 「好好学习过的%CNAME("二人称")%应该知道、这也是某种魔法的一种形态」
	ELSEIF CHECK_SHIRT("褶边女式衬衫")
		IF RAND:3 == 0
		;あえての確率減少
			PRINTFORML %CALLNAME:TARGET%穿着一身用褶边装饰的洋娃娃一样的服装
			PRINTFORML 「这件衣服吗？是父亲硬要买给我穿的」
			PRINTFORML 「因为有了喜欢的男人、所以要尽量买能够吸引到他的衣服」
		;せっかく書いてもらったけど、しっくりこなかったので改変して調教口上に移動
		;★　>>917　張り切っておしゃれしたのに你にCosplay扱いされてちょっとむくれるツェツィ桑
		;	CALL PRINT_SELECT, "『很适合你』/『好像cosplay』"
		;	IF RESULT == 0
		;		PRINTFORML 「そうか、様々な返答の予想を立てて是たのだが直髪に褒められるのは存外にむず痒いものだな」
		;	ELSE
		;		IF RAND:114514 == 0
		;			PRINTFORML 「私は許そう……」
		;			IF RAND:2 == 0
		;				PRINTFORML 「Alright, I believe you… but my Tommy gun don't!（私は信じよう。だがこいつは信じるかな！）」
		;			ELSE
		;				PRINTFORML 「だが、こいつ（自動小銃）が許すかな！」
		;			ENDIF
		;			PRINTFORMW 「ふむ……存外に当たらないものだな。今日はこの辺で勘弁してやろうじゃないか」
		;		ELSE
		;			IF RAND:2 == 0
		;				PRINTFORML 「Cosplayか、それは予想の範疇にない返答だな」
		;				PRINTFORML 「まだこの姿を見慣れないと言う意味だと、受け取っておこう」
		;			ELSE
		;				PRINTFORML 「%TEXTR("Cosplayのつもりはないのだがね/Cosplayではないよ")%」
		;				PRINTFORML 「%TEXTR("気に入らないならそう言いたまえ/%CNAME("二人称")%はお気に召さないかな？")%」
		;				PRINTFORML %CALLNAME:TARGET%有点生气地盯着%CALLNAME:MASTER%
		;			ENDIF
		;		ENDIF
		;	ENDIF
		ELSE
			PRINTFORM %CALLNAME:TARGET%%TEXTR("好像还不习惯似的/好像正在意着你的视线/一幅动弹不得的样子/看着自己的身体/露出一幅不太适应的表情")%
			PRINTFORML %TEXTR("伫立在那里/展示着自己的身姿/看起来有些不安/摆着姿势")%
		ENDIF
	ELSEIF COND("欲求不満") && COND("ご無沙汰")
		PRINTFORM %CALLNAME:TARGET%好像正在为暂时没有和%CALLNAME:MASTER%进行性方面的接触而感到不安
		PRINTFORM %TEXTR("露出一幅认真的表情/做着笔记/露出一幅不太适应的表情/沉默不语的")%
		PRINTFORML %TEXTR("读着官能小说/读着色情手册/读着爱抚技巧集/读着诱惑指南")%
	ELSE
		PRINTFORM %CALLNAME:TARGET%%TEXTR("没頭と形容をすべき様子で/どこか気怠げな様子で/難しい顔をして/温柔地微笑みつつ/どこかしっくり来ないという表情で/無言で")%
		PRINTFORML 一边%TEXTR("读魔法书/读外语书/读不知道什么语言的书/玩着手机/读料理书/读教科书/写为你准备的讲义")%
	ENDIF
;ENDIF

;-------------------------------------------------
;梦话。随意むにゃむにゃ言わせてください
;-------------------------------------------------
@KOJO_SLEEP_K3
;上から順に発言頻度が高いようにする(== 0の付け忘れではない)
IF RAND:3
	PRINTFORML 「ｽー……ｽー……」
	PRINTFORML 睡着时的鼻息很有规律
ELSEIF RAND:2
	PRINTFORML 好像在睡着的时候、魔法使的呼吸法也没有停下
ELSE
	PRINTFORML 「ﾊｧﾊｧﾊｧ……」
	PRINTFORML 呼吸非常紊乱
ENDIF

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

SELECTCASE ARGS
CASE "归途"
	;SAVESTR:現在位置 と SAVESTR:归途の行動 を決定する
	CALL SETFLAG, "遭遇地点"
	;地の文を出す
	CALL DAILY_MESSAGE, "归途"
;NOWEXを分岐に用いることが出来る。また、TFLAG:地の文スキップで地の文を飛ばせる
CASE "性処理：前"
	;場所で分岐させる？
	SELECTCASE SAVESTR:現在位置
	;MASTERの性別に対応した廁所に呼び出される
	CASE "男子廁所"
		;この場所は初めて
		IF DEVENT(SAVESTR:現在位置) == 0
			PRINTFORMW 「真是的、一个人连排泄行为都做不到呢」
			PRINTFORMW 「难道不是吗？和%CNAME("二人称")%同龄的人大多都可以自己排泄积存的精液」
			PRINTFORMW 「可是%CNAME("二人称")%、却在这种地方把我当成便器来对待呢」
			PRINTFORMW 「并不是用自慰、而是用我这样的美少女来处理性欲、心情一定很好吧」
		ELSEIF COND("授業直前")
			PRINTFORMW 「离上课没有多少时间了、得抓紧了」
			PRINTFORMW 「如果迟到的话…大家的目光就会集中在迟到的我身上」
			PRINTFORMW 「也许只有一瞬、但所有人都能看到我刚刚接受%CNAME("二人称")%的性欲而流露出的痴态」
			PRINTFORMW 「当然、他们也不可能知道那种事就是了」
		ELSE
			PRINTFORMW 「果然在厕所里还是缺乏气氛呢」
			PRINTFORMW 「这样简直就是%CNAME("二人称")%专用的精液便器」
			PRINTFORMW 「如果性欲积攒起来的话、就能叫女人来处理干净」
			PRINTFORMW 「如果有人进了厕所、你打算怎么办？」
			PRINTFORMW 「其他的男人在小便池里排泄尿液、而你在我的身体里排泄精液吗？」
		ENDIF
	CASE "女子廁所"
	;体育のある日限定
	CASE "体育倉庫"
		IF DEVENT(SAVESTR:現在位置) == 0
			PRINTFORMW 「我个人并不是很喜欢这个有很多体育用品的房间」
			PRINTFORMW 「而且对现在的%CNAME("二人称")%来说、连我都是性欲处理的备用品」
			PRINTFORMW 「就像上课前去厕所一样轻描淡写的性欲处理机」
			PRINTFORMW 「小心使用、不要把我弄坏了」
		ELSEIF COND("授業直前")
			PRINTFORMW 「居然在马上就要上体育课之前要求性欲处理」
			PRINTFORMW 「在接受了%CNAME("二人称")%那火热的欲望之后、没有时间来让发情的身体冷静下来」
			PRINTFORMW 「要把发情后火热的身体展示在众人面前、開始运动哦？」
			PRINTFORMW 「我总觉得%CNAME("二人称")%很像把我们之间的関系展示给别人看」
		ELSE
			PRINTFORMW 「也许会有人来取上体育课需要的备用品」
			PRINTFORMW 「到时候要怎么辩解呢？要躲在跳箱里面吗？」
			PRINTFORMW 「嘛、到了真的会被看到的时候、你就能见识到「实用性」魔法了」
			PRINTFORMW 「所以安心地痛痛快快的发泄性欲吧」
		ENDIF
	;体育か水泳のある日限定
	CASE "更衣室"
		IF DEVENT(SAVESTR:現在位置) == 0
			PRINTFORMW 「在男子更衣室处理性欲什么的、」
			PRINTFORMW 「即使是在布满雄性汗臭味的地方、%CNAME("二人称")%的香味还是很明显」
			PRINTFORMW 「我也不知道别的男人是什么样的、没法作比较…大概是%CNAME("二人称")%的性臭最能让我发情」
			PRINTFORMW 「是因为%CNAME("二人称")%的性欲旺盛到只能叫女孩子来性欲处理的原因吗？」
		ELSEIF COND("授業直前")
			PRINTFORMW 「明明快要上课了、却要在男子更衣室进行性欲处理」
			PRINTFORMW 「就这么想让其他男人看到%CNAME("一人称")%的身体是属于谁的东西吗？」
			PRINTFORMW 「…和%CNAME("二人称")%做这种事甚至让人感觉不赖」
		ELSE
		ENDIF
	;房顶or人迹罕至的教学楼后侧or部室
	CASEELSE
	ENDSELECT

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

	;PLAYで分岐させる？
	SELECTCASE NAMES("性処理")
	CASE "手淫"
	CASE "口交"
	CASE "乳交"
	CASE "Ｖ性交"
	CASE "Ａ性交"
	CASE "尿道挿入"
	CASE "乳頭奸"
	ENDSELECT

	;何か発言してたらここまで
	;SIF LINECOUNT > MEMO_LINECOUNT
		;RETURN 1
	SIF COND("自撮り送信済み")
		PRINTFORMW 「怎么样？这是为了能让%CNAME("二人称")%来「使用」而被性欲驱使拍下来的照片？」
	PRINTFORMW 「尽量让我努力榨干%CNAME("二人称")%的性欲吧」
CASE "性処理：後"
	IF COND("予鈴")
		PRINTFORMW 「%CNAME("二人称")%那旺盛过頭的性欲也多少平复一些了吧？」
		PRINTFORMW 「虽然时间已经很紧迫了……」
		PRINTFORMW 「要是被骂了、我就说是因为给%CNAME("二人称")%做性欲处理才迟到的吧」
		PRINTFORMW 「当然是在開玩笑啦」
	ELSEIF SAVESTR:現在位置 == "男子廁所"
		PRINTFORMW 「那么、厕所的使用感觉如何？」
	ELSEIF COND("授業直前") && NOWEX:Ｖ中出し + NOWEX:Ａ中出し + NOWEX:尿道内射精
		IF COND("体育")
			PRINTFORMW 「被%CNAME("二人称")%那浓稠的精液注入深处…」
			PRINTFORMW 「这具发情的身体只能穿着单薄的运动服做着运动」
			PRINTFORMW 「说不定会有看到我而产生性欲的男生」
			PRINTFORMW 「一边妄想着这具专属于%CNAME("二人称")%的身体、一边自慰呢」
		ELSE
			PRINTFORMW 「你明知道下堂课是游泳课还要射进去的吗？」
			PRINTFORMW 「%CNAME("二人称")%那满满注入进来的浓厚精液、只有一层单薄的布片阻挡着」
			PRINTFORMW 「即使用水稀释过之后也能清楚看出是精液的浓稠东西」
			PRINTFORMW 「从我这样的美少女的胯下流出的姿态…男生们可能都要勃起到没法上课了」
			PRINTFORMW 「如果被问到和谁做了、我会老实的说是%CNAME("二人称")%哦」
		ENDIF
	ENDIF
	;何か発言してたらここまで
	;SIF LINECOUNT > MEMO_LINECOUNT
		;RETURN 1

	IF TEQUIP:PLAYER:避孕套
		PRINTFORMW 「那么、就把被%CNAME("二人称")%的精液装满的避孕套缠在胖次上继续听课吧」
	ELSE
		PRINTFORMW 「那么、就带着接受了%CNAME("二人称")%积攒的精液的余韵去听课吧」
	ENDIF

;お浴室に一緒に入ろうと誘われた場合
CASE "一緒にお浴室"
	PRINTFORMW %CALLNAME:TARGET%用涂在身上的沐浴露清洗着%CALLNAME:MASTER%的身体
	IF COND("夜")
		PRINTFORMW 「这之后马上就要上床了吗？」
	ELSE
	ENDIF
;[999]選択後の台詞。TFLAG:床イン = 1とすることで強制的にエロにも行ける
CASE "休憩"
	IF PLACE("自宅")
		IF COND("夜")

		ELSE

		ENDIF
	;ここは実質昼のみ
	ELSEIF PLACE("部室")

	;場所移動後
	ELSE

	ENDIF
CASE "清洁口交：お誘い"
	IF COND("Ｐ汚れの相手", MASTER) != TARGET
		PRINTFORMW 「真是的、%CNAME("二人称")%在性方面这么奔放真让人困扰」
		PRINTFORMW 「其他学生在准备下一堂课的休息时间里、你还在蹂躏女性的身体」
		PRINTFORMW 「而且、自己提出要用嘴来清理被其他女人的体液弄脏的肉棒的%CNAME("一人称")%也是一样呢」
	ELSE
		PRINTFORMW 「%CNAME("二人称")%、刚刚的性欲处理还不够吧？」
		PRINTFORMW 「假如之后还要抱其他的女人、现在这种状态可不行呢」
		PRINTFORMW 「让%CNAME("一人称")%用自己的嘴来处理%CNAME("一人称")%自己的体液吧」
	ENDIF
CASE "清洁口交：射精後"
	PRINTFORML %CALLNAME:TARGET%非常认真地榨干了%CALLNAME:MASTER%的最后一滴精液、以至于她可爱的嘴唇都碰到了肉棒根部的睾丸
	PRINTFORMW 用嘴唇将自己的唾液也全部清理干净、从根部一直到肉棒的尖端
CASE "清洁口交：断った"
	PRINTFORMW 「不要紧的吧？就是这种状态了、眼尖的人或许能够发现吧？」
	PRINTFORMW 「如果%CNAME("二人称")%不想向周围的人炫耀自己的性生活、之后最好还是自己清理干净吧」
;ここには特殊な条件での角色独自のイベントを書く。別に無くても構わない
;発生領帯ミングは日常イベント選択後の好感度を得た直後
CASE "特殊事件"
	;眠ってる時でも来るので書くことないならRETURN 0してください
	SIF CFLAG:睡眠
		RETURN 0

	;打招呼で発生させない事情があった際にはここ
	CALL KOJO_DAYEV_K3, TEXTS("日期対応イベント"), TARGET

;これは昼か夜
CASE "打招呼"
	IF COND("夜")
		GREETING = 晚上好
	ELSEIF COND("昼")
		GREETING = 你好
	ELSE
		GREETING = 早上好
	ENDIF
	SELECTCASE STR:日常イベント名
	CASE "打招呼ハグ"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「哦呀、除了父母以外、%CNAME("二人称")%还是第一个这么和我打招呼的」
			PRINTFORMW 「……不过、我觉得你还是稍微注意一下别人的目光比较好」
		ELSEIF COND("易出汗", MASTER)
			PRINTFORMW 「不、那个、我希望你注意一下流汗的事…」
			IF COND("易出汗")
				PRINTFORMW 「话虽如此、我也是差不多的状态、所以也没什么嘛」
			ELSE
				PRINTFORMW 「来、这有毛巾你擦擦汗」
				PRINTFORMW 「还是说、想要让我的身体沾满%CNAME("二人称")%的体液这么生活下去吗？」
				PRINTFORMW %CALLNAME:TARGET%故弄玄虚地整理好粘上汗的衣服、露出了微笑
			ENDIF
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				PRINTFORMW 「%GREETING%」
				PRINTFORMW 「……今天也请多関照哦」
			ELSE
				PRINTFORMW 「%GREETING%」
				PRINTFORMW %CALLNAME:TARGET%微笑着轻轻地回应着拥抱。
			ENDIF
		ENDIF
	CASE "打招呼接吻"
		;初めて
		IF DEVENT(STR:日常イベント名) == 0
			PRINTFORMW 「嗯、嗯唔…………%GREETING%」
			PRINTFORMW 「一般来说、寒暄的吻是在脸颊上的。亲吻根据位置而产生不同的含义、可是很有名的」
			IF TALENT:恋慕
				PRINTFORMW 「难得%CNAME("二人称")%都这么积极了、我也要有所表示呢」
				PRINTFORMW %CALLNAME:TARGET%脸颊泛红、向%CALLNAME:MASTER%回敬了充满爱意的深情一吻。
			ELSE
				PRINTFORMW 「当然、根据时代和文化圈的不同、行为的意义也会有很大不同」
				PRINTFORMW %CALLNAME:TARGET%脸颊泛红、恶作剧似的用食指轻轻按在%CALLNAME:MASTER%的嘴唇上
			ENDIF
		ELSE
			;你に先に打招呼をされた
			IF CFLAG:打招呼した == 0
				IF TALENT:恋慕
					PRINTFORMW %CALLNAME:TARGET%为了更加深入地贪求着%CALLNAME:MASTER%嘴唇、将手臂紧紧搂住
					PRINTFORMW 「…………嗯……%GREETING%」
					PRINTFORMW 「被%CNAME("二人称")%吻了之后…这是为什么、会变得想做啊」
				ELSE
					PRINTFORMW 「%GREETING%」
					PRINTFORMW 「就算说这是在打招呼、实话说还是觉得好害羞」
					PRINTFORMW 「……那个、并不讨厌哦」
				ENDIF
			ELSE
				IF TALENT:恋慕
					PRINTFORMW %CALLNAME:TARGET%为了更加深入地贪求着%CALLNAME:MASTER%嘴唇、将手臂紧紧搂住
					PRINTFORMW 「…………嗯……%GREETING%」
					PRINTFORMW 「被%CNAME("二人称")%吻了之后…这是为什么、会变得想做啊」
				ELSE
					PRINTFORMW 「%GREETING%」
					PRINTFORMW 「就算说这是在打招呼、实话说还是觉得好害羞」
					PRINTFORMW 「……那个、并不讨厌哦」
				ENDIF
			ENDIF
		ENDIF
	CASE "打招呼口交", "打招呼舐陰"
		IF TALENT:淫核 || TALENT:淫乱 || TALENT:恋慕
			;初めて
			IF DEVENT(STR:日常イベント名) == 0
				PRINTFORMW 「%CNAME("二人称")%真是个让人没办法的男人」
				PRINTFORMW 「就算你说这是在打招呼、%CNAME("一人称")%也只会困扰啊」
				PRINTFORMW %CALLNAME:TARGET%皱着眉、却又顺从地将身体展示给%CALLNAME:MASTER%
			ELSE
				PRINTFORMW 「%CNAME("二人称")%真是个让人没办法的男人」
				PRINTFORMW 「离昨晚洗浴过后已经有一段时间了、你不在乎气味的吗？」
				PRINTFORMW %CALLNAME:TARGET%皱着眉、却又顺从地将身体展示给%CALLNAME:MASTER%
			ENDIF
		ELSE
			PRINTFORMW 「即便%CNAME("二人称")%是不肖的弟子、我也没想到你会这么做」
			PRINTFORMW 「即使%CNAME("一人称")%是理论派、也不要忘记我是伟大又可怕的魔法使啊」
			PRINTFORMW %CALLNAME:TARGET%严厉的目光好像让气氛都扭曲了
		ENDIF
	CASEELSE
		;你に先に打招呼をされた
		IF CFLAG:打招呼した == 0
			PRINTFORMW 「%GREETING%」
			PRINTFORMW 「今天也请多関照」
		ELSE
			PRINTFORMW 「%GREETING%」
			PRINTFORMW %CALLNAME:TARGET%一脸轻松地回了一句。
		ENDIF
	ENDSELECT
CASE "叫醒"
	PRINTFORMW
CASE "薄着变成了"
	PRINTFORMW 「夏天的酷热还真是让人没办法」
	PRINTFORMW 「虽然我是不怎么出汗的体质但也是有极限的」
CASE "Talk"
	SELECTCASE STR:日常イベント名
	CASE "夸奖"
		PRINTFORMW
	CASE "甜言蜜语"
		IF TALENT:恋慕
			PRINTFORMW %CALLNAME:TARGET%调皮地笑了笑、用手揽住脖子就亲吻起来
			PRINTFORMW 「%CNAME("二人称")%的话语好像有魔力一样、把悲伤和痛苦都抹去了」
			PRINTFORMW 「如果是这样、我希望用%CNAME("二人称")%的嘴唇给我带来愉悦、这可不是%CNAME("一人称")%任性哦」
		ELSEIF CALCF("甜言蜜语成功")
			PRINTFORMW 「也有一派认为语言才是魔法的本质、原来如此、看来%CNAME("二人称")%也已经可以使用魔法了」
			PRINTFORMW 「再继续磨练下去、说不定就能让%CNAME("一人称")%也堕落了」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%是什么时候成为这样的修辞学达人的？」
			PRINTFORMW 「修辞学、总之就是要打动听众的心、能够在审判场之类的场合獲得优势」
			PRINTFORMW 「但是如果我们用柏拉图来比喻的话、魔法使的语言应该是辩证法」
		ENDIF
	CASEELSE
		IF RAND:8 == 0 && CFLAG:内衣確認済 == 0
			PRINTFORMW 「传统的颜色具有象征意义。比如说黄色、特别是没有什么光泽的黄色就是黄金的象征」
			PRINTFORMW 「那么、你想确认什么的颜色？胖次？%CNAME("二人称")%这家伙真的是…」
			IF EQUIP:胖次 && RAND:2
				PRINTFORMW 「现在穿的是%CLOCOLOR(CSTR:胖次, "形容詞")%的、听到后满足了吗？」
				CALL SETFLAG_DAILY, "胖次色確認"
			ELSE
				PRINTFORMW 「…………你不觉得、有的时候正是因为不知道所以才具有意义吗？」
			ENDIF
		ELSEIF RAND:7 == 0
			PRINTFORMW 「妖精是负责带来命运的。这从语源上来看就很清楚了」
			PRINTFORMW 「英语的Fairy、法语的Fee、意大利语中的Fata、全都是拉丁语中的命运女神Fate」
			PRINTFORMW 「从实用角度来说、一般用以代指不切实际的美丽、对、就是我这样的」
		ELSEIF RAND:6 == 0
			PRINTFORMW 「虽然在现代、玫瑰从颜色的热情性和灼热的爱联系在一起的意思占主流、但也从带刺的荆棘中延伸出防御和障碍的意思」
			PRINTFORMW 「另外还有英语中的惯用语 under the rose 的由来、就是在罗马时代、人们把装饰有玫瑰的房间用于秘密聚会」
			PRINTFORMW 「魔术的基本就是像这样、通过将一个事物的意义连接起来、推导出多种多样的结果、说是牵强附会也差不多」
		ELSEIF RAND:5 == 0
			PRINTFORMW 「頭发是女人的生命、对魔法使来说尤其如此。因为有说法称…頭发中蕴含着诅咒的力量」
			PRINTFORMW 「有一种说法是在成长之后还会成长、这就是传承的由来…这么说来、%CNAME("二人称")%的頭发好像长得很快」
			PRINTFORMW 「不、那只是開玩笑啦、%CNAME("二人称")%想要留多长的頭发呢？」
		ELSEIF RAND:4 == 0
			PRINTFORMW 「%CNAME("二人称")%最好趁现在就给书架留一些空间了」
			PRINTFORMW 「不管怎么说、房间有被书本淹没的可能。特别是对%CNAME("一人称")%这种重理论不重实践的魔法使来说」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「魔法的诀窍是用主观来覆盖客观…不、虽然事实并非如此、但对初学者差不多就是这样吧」
			PRINTFORMW 「把主观和客观作为相对概念的框架本身就是后世才有的想法」
			PRINTFORMW 「要认真解说的话，就必须先从实体是什么谈起」
			PRINTFORMW 「首先，在希腊时代，亚里士多德…不、在此之前还是先把基本书交给你吧…」
		ELSEIF RAND:2
			PRINTFORMW 「%CNAME("二人称")%正在无意识地呼吸着吧？但是%CNAME("二人称")%又没有像医生和生物学家那样理解呼吸吧？」
			PRINTFORMW 「恶魔可以像呼吸一样使用魔法。但是魔法使并不比它们差」
			PRINTFORMW 「要说为何、因为懂得道理才是魔法师存在的目的和意义。至少%CNAME("一人称")%是这么认为的」
		ELSE
			PRINTFORMW 「好好睡一觉吧?因为如果睡眠不足、再聪明的大脑也无法高效地工作」
			PRINTFORMW 「即使是处在能在晚上把精力随意发泄到充满魅力的女性身上的立场也是一样的」
		ENDIF
	ENDSELECT
CASE "拭汗"
	IF TALENT:恋慕
		IF RAND:2 == 0
			PRINTFORMW 「与其说是擦汗、不如说是爱抚来的更贴切」
			PRINTFORMW 「不要对我做的那么认真哦？会被汗水以外的体液弄脏的」
			PRINTFORMW %CALLNAME:TARGET%像是在诱惑%CALLNAME:MASTER%似的、目送秋波的同时将身体贴了过来
		ELSE
			PRINTFORMW 「腋下要不就算了？那个、奇怪的味道要是沾到%CNAME("二人称")%的手上、会不好意思」
			PRINTFORMW 「当然、对腋下的气味进行魔法性的解释是很简单的、但问题不是这个」
			PRINTFORMW %CALLNAME:TARGET%红着脸乖乖地任凭%CALLNAME:MASTER%来摆布
		ENDIF
	ELSE
		IF RAND:2 == 0
			PRINTFORMW 「与其说是为了%CNAME("一人称")%、倒不如说是出于%CNAME("二人称")%自身的兴趣吧」
			PRINTFORMW 「当然、这对%CNAME("一人称")%来说也不是没有好处、所以我接受」
		ELSE
			PRINTFORMW 「这么热的话擦汗也很麻烦、所以也不是说不感谢…」
			PRINTFORMW %CALLNAME:TARGET%在炎热的天气里让%CALLNAME:MASTER%为所欲为
		ENDIF
	ENDIF

CASE "淋浴"
	PRINTFORMW 「原来是%CNAME("二人称")%吗。和我想的一样」
	PRINTFORMW 沐浴之后、包裹住%CALLNAME:TARGET%娇嫩肌肤的浴巾吸饱了水分、紧贴在身上、隐约能透过浴巾看到她白嫩的肌肤
	PRINTFORMW 「再早一些、我们就可以一起洗澡了」
	IF COND("淋浴：内衣漁りバレ")
		PRINTFORMW 「明明不用这样去找脱下来的内衣・・・」
		PRINTFORMW 「从一開始就可以用%CNAME("二人称")%自己的手一件件脱下来吧」
		PRINTFORMW 「还是说、自己脱掉的和去找脱下来的是两回事？」
	ELSE
		PRINTFORMW %CALLNAME:TARGET%调皮地微笑着、堂而皇之地擦拭着自己的金发
		PRINTFORMW 确实裹着的毛巾遮住了身体、但是女性化的部分反而被强调了、不知道她本人有没有注意到…
	ENDIF

;睡眠中の悪戯
CASE "趁睡袭击"
	;梦话
	CALL KOJO_SLEEP_K3
	WAIT
CASE "互动"
	SELECTCASE STR:日常イベント名
	CASE "舐陰奉仕する", "口交奉仕する"
		PRINTFORMW 「真是的、比起亲吻那种地方、更希望亲吻的是嘴唇啊」
		PRINTFORMW 「要是%CNAME("二人称")%開心的话倒也没什么関系…嗯、别那么露骨地闻气味啊」
		PRINTFORMW %CALLNAME:TARGET%虽然这么说、但还是乖乖地承受着
	CASE "托一托胸部"
		PRINTFORMW
	CASE "按摩"
		IF RAND:3 == 0
			PRINTFORMW 「啊呜、放松脖颈肌肉的这个手法、感觉不赖」
			PRINTFORMW %CALLNAME:TARGET%舒适地委身于%CALLNAME:MASTER%
		ELSEIF RAND:2
			PRINTFORMW 「按摩这种行为能够产生肉体上的舒畅和開放感」
			PRINTFORMW 「总而言之、就是具有「易于理解」的效果。所以才成为原始的医疗行为」
			PRINTFORMW %CALLNAME:TARGET%委身于%CALLNAME:MASTER%
		ELSE
			PRINTFORML 「别的女人也是这么好搞定的吗？」
			PRINTFORMW %CALLNAME:TARGET%放松身体、好像很享受背部的按摩……
			PRINTFORMW 「为了表示感谢、我以后也为你做些什么吧」
		ENDIF
	CASE "接吻"
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW 经过长时间和%CALLNAME:MASTER%的深吻、%CALLNAME:TARGET%已经完全露出一幅女人的面孔
			PRINTFORMW 「呐、要在这里做吗？还是说换一个像样的地方继续？」
		ELSEIF CSTR:PREV_DAILYCOM == "摩擦股間"
			PRINTFORML 「嗯……♪」
			PRINTFORMW 能够感受到摩擦到的%CALLNAME:TARGET%的身体里灼热的爱液正一点点滴落
		ELSEIF RAND:3 == 0
			PRINTFORMW 「呀……」
			PRINTFORMW 「可以随意亲吻吗？%CNAME("一人称")%是那种被亲吻之后就会忘乎所以的类型呢」
			PRINTFORMW %CALLNAME:TARGET%像是在诱惑%CALLNAME:MASTER%一样眯着眼睛、双颊绯红
		ELSEIF RAND:2
			PRINTFORMW 「嗯………」
			PRINTFORMW 「我喜欢和%CNAME("二人称")%接吻、这次可以让%CNAME("一人称")%主动吗？」
			PRINTFORMW %CALLNAME:TARGET%紧紧地抱住%CALLNAME:MASTER%、在床上继续进行着热吻
		ELSE
			PRINTFORML 「嗯……♪」
			PRINTFORMW %CALLNAME:TARGET%眯着眼睛接受了%CALLNAME:MASTER%の接吻
		ENDIF
	CASE "膝枕"
		PRINTFORMW 「是吗、那帮我拿一下眼罩吧、应该就放在包里」
		PRINTFORML 「因为让眼睛休息是很重要的行为呢…还是说你更喜欢戴眼镜的女孩子？」
	CASE "泡茶"
		IF RAND:3 == 0
			PRINTFORMW 「茶、tea本来是茶树叶的提取液、其他植物的提取液也叫香草茶吧？」
			PRINTFORMW 「在狭义的tea传到西方之前、tisana一直是广义上的香草茶的称呼」
			PRINTFORMW 「不知从何时起、茶树叶提取液tea就代表了更广泛的类别」
			PRINTFORMW 咕嘟、咕嘟、咕嘟
			PRINTFORMW 「其他的比如把早上吃的食物称为早饭、用下位概念代指上位概念的这就是提喻（synecdoche）呢」
		ELSEIF RAND:2
			PRINTFORMW 「这个香味、是柠檬草吗？很容易入口、我很喜欢」
			PRINTFORMW %CALLNAME:TARGET%很高兴地接过了香草茶
		ELSE
			PRINTFORMW 「这种香草是大马士革蔷薇（rosa damascena）吧？」
			PRINTFORMW 「这种「蔷薇的香气」实在是太棒了。甚至被特别称为大马士革香哦」
			PRINTFORMW %CALLNAME:TARGET%闭上眼睛享受着香气
		ENDIF
	CASE "摸頭"
		SELECTCASE CSTR:PREV_DAILYCOM
		CASE "接吻", "接吻"
			PRINTFORMW 「明明还沉浸在你亲吻带来的幸福感里、再被做这种事的话」
			PRINTFORMW 「会想对%CNAME("二人称")%撒更多的娇啊」
			PRINTFORMW
		CASE "手淫"
			PRINTFORMW 「得到这样的感谢的话、侍奉的充实感也会增加呢」
			PRINTFORMW %CALLNAME:TARGET%高兴地继续着甜蜜可爱的手淫
		CASE "口淫"
			PRINTFORMW 被摸了頭的%CALLNAME:TARGET%很高兴地将肉棒连根吞入直抵喉咙
		CASE "清洁口交"
			PRINTFORMW 「清扫做的不错、是这个意思吗？」
			PRINTFORMW %CALLNAME:TARGET%在刚刚清理干净的肉棒上轻轻的吻了一下
		CASE "进行性処理", "拜托処理性欲"
			PRINTFORMW 「简直就像是在爱抚宠物一样」
			PRINTFORMW 「而且、想要的时候就会拿来随意地进行性欲处理呢」
;		CASE "POSE撮影"
;		CASE "自撮り送信"
;		CASE "撩起裙子"
		CASE "摩擦股間"
			PRINTFORMW 「%CNAME("二人称")%正在体验抚摸坐在膝盖上的美少女的頭这种「画」一样的情景呢」
			PRINTFORMW 「不过、成为什么样的「画」要看你把焦点放在哪里了」
		CASEELSE
			PRINTFORMW 「被%CNAME("二人称")%抚摸着感觉很舒服」
			PRINTFORMW 「我喜欢爱抚带给我的快感、但是这种被抚摸的舒适感也很喜欢」
		ENDSELECT
	CASEELSE
		PRINTFORMW 「谢谢。虽然不需要那么细致的照顾」
	ENDSELECT
CASE "整理睡姿"
	;梦话
	CALL KOJO_SLEEP_K3
	WAIT
CASE "卖个破绽"
	SELECTCASE STR:日常イベント名
	CASE "邀请一起入浴"
		IF COND("夜")
			PRINTFORMW 「我想着差不多该去洗澡了」
		ELSE
			PRINTFORMW 「出了很多汗、所以想去洗个澡呢」
		ENDIF
		PRINTFORMW 「可以的话、%CNAME("二人称")%也一起去吗？」
	CASE "Ｈ的邀请"
;		PRINTFORMW 「现在非常想要%CNAME("二人称")%的亲吻」
		SELECTCASE CONDS("直前行動")
			CASE "检查阴部"
				PRINTFORMW 「这个黏膜上的每一个细胞都因为想要向你%CNAME("二人称")%撒娇而蠢蠢欲动呢」
				PRINTFORMW 「这都是为了让%CNAME("二人称")%的肉棒尽可能多地感受到快感」
				PRINTFORMW 「实在是太想让精液注入子宫而做起准备运动了呢」
				PRINTFORMW 「我可要告诉你、这里只会为了%CNAME("二人称")%才变成这样哦」
			CASE "检查内褲", "股間観察", "展示内褲"
			;後で開放型開洞分岐を作る
				PRINTFORMW 「能明白吗？这层薄布的下面正渴求着%CNAME("二人称")%呢」
				PRINTFORMW 「满心期待地想要被%CNAME("二人称")%的手剥去、被%CNAME("二人称")%玩弄」
				PRINTFORMW 「都是因为%CNAME("二人称")%这样看着这里、才会因为期待做爱而做好准备了啊」
			CASE "拜托処理性欲"
				PRINTFORMW 「也许%CNAME("二人称")%会因为痛快地射出精液而感到满足」
				PRINTFORMW 「%CNAME("一人称")%的身体单方面做好了性交的准备、可是很辛苦的哦？」
				PRINTFORMW 「这或许也一种本能吧。因为精液原本的用途就是生孩子嘛」
			CASE "阴部のチラ見せ撮影", "阴部の見せつけ撮影", "POSE撮影", "股間撮影", "内褲摄影", "阴部摄影"
				PRINTFORMW 「机会难得、接下来要不要拍些更夸张的照片？」
				PRINTFORMW 「这里正在留着眼泪欢迎%CNAME("二人称")%的肉棒前来蹂躏呢」
			CASE "接吻"
			;	PRINTFORMW test
			CASE "口淫", "手淫"
			;	PRINTFORMW test
			CASEELSE
				PRINTFORMW 「现在无论如何都想要%CNAME("二人称")%的亲吻」
				PRINTFORMW 「想要那种舌頭相互爱抚、交换彼此唾液的吻」
				PRINTFORMW 「所以、那个、现在不抱我吗？」
		ENDSELECT
	CASE "推倒"
		PRINTFORMW 「和%CNAME("二人称")%在一起、我的身体有时会激动地不得了」
		PRINTFORMW 「你看、都变得这么热了。要怎样让它冷静下来、你知道怎么做吧？」
		PRINTFORMW %CALLNAME:TARGET%紧贴着%CALLNAME:MASTER%身体、还做出涩情动作……
	CASE "口淫"
		PRINTFORMW 「我也喜欢这边的亲吻哦。不要忍耐地射出来吧」
	CASE "亲脸頬", "接吻"
		IF RAND:3 == 0
			PRINTFORMW 「无论是在%CNAME("二人称")%的身体上的哪一个地方亲吻、都很棒哦」
			PRINTFORMW %CALLNAME:TARGET%调皮地从双唇间吐出舌尖
		ELSEIF RAND:2
			PRINTFORMW 「嗯……不喜欢突然被吻吗？」
			PRINTFORMW 「虽然%CNAME("一人称")%是不讨厌被突然亲吻呢」
		ELSE
			PRINTFORMW 「你知道%CNAME("一人称")%只要一有机会就会亲你吧？」
			PRINTFORML 「还是说、你是在故意引诱我吗？」
			PRINTFORMW %CALLNAME:TARGET%不停地反复亲吻着%CALLNAME:MASTER%的脸颊和脖颈
		ENDIF
	CASE "膝枕", "抱住", "把胸部压了上去"
		PRINTFORMW 「我喜欢这样和%CNAME("二人称")%相互触碰」
		PRINTFORMW 「这样一直撒娇的话、就会想要继续这种轻柔的触碰」
		PRINTFORMW 「同样的、我也想让自己置身于更加激烈的情欲中」
	CASE "抚摸"
		PRINTFORMW 「像这样被当成宠物一样抚摸的感觉、好像也不赖」
	CASE "手淫"
		PRINTFORMW 「我自己也觉得突然做这种事到底是怎么了…」
		PRINTFORMW 「想要让%CNAME("二人称")%舒服起来、这种感觉仿佛要从心里溢出来了」
	CASE "膝枕"
		PRINTFORMW 「枕頭对人体骨骼结构很重要、所以自古以来就被使用」
		PRINTFORMW 「它发展成现在这样的形状、是经历过很多个时代的」
		PRINTFORMW 「从某种意义上来说，枕膝是一种自古流传下来的形式呢」
	CASE "沏茶"
		PRINTFORMW 「请喝洋甘菊提取液。它是西方最古老的草药之一、从美索不达米亚開始就被用作药物」
		PRINTFORMW 「据说那个希波克拉底也把煮出来的液体当作药来使用。就是现代所说的香草茶吧、对、就是这种感觉」
	CASE "摩擦股間"
		PRINTFORMW 「你明白吗？想要和%CNAME("二人称")%连接在一起、想要被%CNAME("二人称")%蹂躏、我的身体已经做好准备了」
		PRINTFORMW 「要说我居然会做这种事、以前的%CNAME("一人称")%肯定是不会相信的吧」
		PRINTFORMW 「坐在男人的膝盖上摆动腰肢、像个引诱男人的妓女一样」
	CASE "展示内褲"
		IF FLAG:対複数
			PRINTFORMW 「真是的、吃着碗里瞧着锅里呢」
			PRINTFORMW 「同时受到复数女性的诱惑、和自己同时诱惑复数的女性」
			PRINTFORMW 「%CNAME("二人称")%对哪个更兴奋呢？」
		ELSE
			PRINTFORMW 「怎么样？这是为了搞清%CNAME("二人称")%到底喜欢什么样的内衣而特意挑选的」
			PRINTFORMW 「%CNAME("二人称")%当然很重视我、但%CNAME("一人称")%我也想为你做更多的事」
			PRINTFORMW 「比如让年长的美少女自己做出这种"下流"的行为什么的」
		ENDIF
	;それ以外
	CASEELSE
		IF RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDSELECT
CASE "廁所"
	;廁所で用を済ませた後の台詞
	IF BASE:尿意 == 0
		;主人も廁所で済ませてきた
		IF BASE:MASTER:尿意 == 0
			PRINTFORMW 「好了、让你久等了。啊嘞、？%CNAME("二人称")%也一样吗？」
		ELSE
			PRINTFORMW 「好了、让你久等了」
			IF RAND:2
				PRINTFORMW 「顺便买茶回来了哦。你要哪个？」
				CALL SETFLAG_DAILY, "茶を用意"
			ENDIF
		ENDIF
	;廁所に行く際の台詞
	ELSE
		IF RAND:2
			PRINTFORMW 「我稍微离席一下」
		ELSE
			PRINTFORMW 「啊、能稍等一下吗？我马上回来」
		ENDIF
	ENDIF
CASE "廁所詮索"
	PRINTFORMW 「啊、我去了一趟厕所。仅此而已哦」
	PRINTFORMW %CALLNAME:TARGET%无所谓地回应着
CASE "廁所を覗く"
	;驚愕
	IF RAND:2
		IF RAND:3 == 0
			PRINTFORMW 「呀啊！难不成%CNAME("二人称")%是笨蛋吗？」
		ELSEIF RAND:2
			PRINTFORMW %CALLNAME:TARGET%无语地看着这边
		ELSE
			PRINTFORMW 「！？」
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「……难不成%CNAME("二人称")%是笨蛋吗？」
		ELSEIF RAND:2
			PRINTFORMW 「…………那么想看的话、那就给你看吧」
			PRINTFORMW %CALLNAME:TARGET%脸颊绯红、十分害羞地展示着自己小便时的样子
		ELSE
			PRINTFORMW 「……我知道了。你想看日常生活中单纯的排泄行为吧？」
		ENDIF
	ENDIF
CASE "检查阴部"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K3
		WAIT
	ELSEIF COND("合意：检查阴部") == 0
		IF CSTR:PREV_DAILYCOM == STR:日常イベント名
			PRINTFORMW 「什么啊、不是随时都能满足%CNAME("二人称")%的要求的哦」
			PRINTFORMW %CALLNAME:TARGET%注视%CALLNAME:MASTER%的目光中满是困扰
			PRINTFORMW 看来说再多也没用……
		ELSEIF RAND:2
			PRINTFORMW 「抱歉、能再说一次吗？」
			PRINTFORMW %CALLNAME:TARGET%好像不相信自己听到了什么
		ELSE
			PRINTFORMW 「如果是在床上的话倒还可以原谅、在这里？」
			PRINTFORMW %CALLNAME:TARGET%投来困惑的视线
		ENDIF
	;中出し直後
	ELSEIF COND("性処理：挿入直後") && CFLAG:性処理済
		PRINTFORMW 「%CNAME("二人称")%是想看看你使用过的专用自慰穴吗？」
		IF COND("性処理：生挿入直後")
			PRINTFORMW 「明明把我的子宫当成处理不需要的精液的垃圾桶」
		ELSE
			PRINTFORMW 「明明是生孩子的器官、却被用来帮助把精液排泄到避孕套里」
		ENDIF
		PRINTFORMW 「却被%CNAME("二人称")%的肉棒调教成了随时都能用于发泄欲望的道具」
	ELSE
		IF RAND:3 == 0 && CHARA_NUM("室内の邪魔者") >= 2
			PRINTFORMW 「如果是%CNAME("二人称")%的情况、无论什么情况下都会照办」
			PRINTFORMW 「这个房间里的女性或多或少都是这样・・・」
			PRINTFORMW 「当然、互相比较谁做到了什么程度这种事现在已经没有意义了」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「%CNAME("二人称")%看起来支配欲很强♪」
			PRINTFORMW 「来、看看对自己言听计从的女性的可悲模样吧♪」
			PRINTFORMW %CALLNAME:TARGET%露出刻薄的笑容
		ELSE
			PRINTFORMW 「看得清楚吗？这里正欢迎着%CNAME("二人称")%的到来、无意识地引诱着你呢」
			PRINTFORMW 「对谁都不会这么淫荡啊」
			PRINTFORMW 「这里只为%CNAME("二人称")%存在哦」
		ENDIF
	ENDIF
CASE "检查内褲"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K3
		WAIT
	ELSEIF CSTR:PREV_DAILYCOM == STR:日常イベント名
		IF RAND:3 == 0
			PRINTFORMW 「被%CNAME("二人称")%这样闻气味的话」
			PRINTFORMW 「怎么说呢、那个、%PANTIES(TARGET, "胖次")%都要弄湿了」
		ELSEIF RAND:2
			PRINTFORMW 「只是闻气味就可以了吗？」
			PRINTFORMW %CALLNAME:TARGET%把視線投向旁边的床
		ELSE
			PRINTFORMW 「%CNAME("二人称")%热热的呼吸吹在敏感的地方…」
			PRINTFORMW 「连%CNAME("一人称")%都要变得奇怪了」
		ENDIF
	ELSEIF RAND:4 == 0
		PRINTFORMW 「怎么样、合适吗？」
	ELSEIF RAND:3 == 0
		PRINTFORMW 「你看、反正是除了%CNAME("二人称")%以外也不会被别人看的衣服」
	ELSEIF RAND:2
		PRINTFORMW 「被别人闻气味、那个、果然还是会害羞啊」
	ELSE
		PRINTFORMW 「这是满足男性支配欲的行为呢」
		PRINTFORMW 「也就是说、这样代表着自己有让女性暴露羞耻部位的力量呢」
	ENDIF
CASE "撫摸股間"
	PRINTFORMW
CASE "检查布鲁马", "股間観察"
	;睡眠中の悪戯
	IF CFLAG:睡眠
		;梦话
		CALL KOJO_SLEEP_K3
		WAIT
	ELSEIF CFLAG:股間確認済 && RAND:2
		IF CHECK_BODYS("勒紧的") && COND("陰毛") >= 5 && RAND:2
			SELECTCASE COND("陰毛")
			;自然以上
			CASE IS >= 6
				PRINTFORMW 「那个、怎么说、这是那个吧？」
				PRINTFORMW 「%CNAME("二人称")%是说剃掉会更開心吗？」
				PRINTFORMW %CALLNAME:TARGET%、看着正在玩弄%CLO("股間")%的阴毛的%CALLNAME:MASTER%露出了抽搐着的笑容
			;剃り整えている
			CASE 5
				PRINTFORMW 「你看、有好好剃干净哦。这是为了%CNAME("二人称")%准备的」
				PRINTFORMW %CALLNAME:MASTER%用舔舐代替言语指出%CLO("股間")%的哪里还有没剃干净的阴毛
				PRINTFORMW 「那么下次就交给%CNAME("二人称")%来剃、要好好剃干净哦？」
			ENDSELECT
		ELSE
			PRINTFORMW 「被这么热的呼吸吹着、感觉很痒啊」
			PRINTFORMW 「%CNAME("二人称")%直接用舌頭来爱抚也没有関系哦」
			PRINTFORMW %CALLNAME:MASTER%の呼吸刺激着%CALLNAME:TARGET%の大腿、看上去有点痒痒的……
		ENDIF
	ELSEIF CFLAG:夸奖
		PRINTFORMW 「你看的那么入迷、我也感觉有点高兴」
		PRINTFORMW %CALLNAME:TARGET%自己张開双腿、让%CALLNAME:MASTER%能看得更仔细些
		PRINTFORMW 「看吧、想怎么做都可以哦」
	;Ｈ回数を条件にしてみる
	ELSEIF RAND:2 && EXP:Ｈ回数 >= 5
		PRINTFORMW 「……你不是一直在床上想看就看吗？」
		PRINTFORMW 「算了、%CNAME("一人称")%这样的美少女已经习惯充满性意味的视线了」
		PRINTFORMW %CALLNAME:TARGET%は微笑着并%CALLNAME:MASTER%の視姦を許している
	ELSE
		PRINTFORMW 「看你看得那么入迷、我心情也不错」
		PRINTFORMW 「当然、这都因为是%CNAME("二人称")%的视线呢」
		PRINTFORMW %CALLNAME:TARGET%抬起腰迎接着%CALLNAME:MASTER%的视奸……
	ENDIF

CASE "掀起裙子"
	SELECTCASE STR:日常イベント名
	CASE "撩起裙子"
		;胖次チラ直後
		IF COND("胖次チラ直後")
			PRINTFORMW 「你不是很想看吗？」
			PRINTFORMW 「其他的男人如果幸运的话或许能够窥伺片刻、而%CNAME("二人称")%的话、%CNAME("一人称")%会亲自给你看」
		ELSEIF RAND:2
			PRINTFORMW 「怎么样？女性自觉将%PANTIES(TARGET, "胖次")%露给你看的感觉如何？」
			PRINTFORMW 「能让我这样的美少女露给你看、%CNAME("二人称")%真是个幸运的男人呢」
		ELSE
			PRINTFORMW 「真是的、从%CNAME("二人称")%的眼神中、我已经看出你想要什么了」
			PRINTFORMW 「而且、居然还能够得到回应。来、尽情地看就好了」
		ENDIF
	;掀起裙子
	CASEELSE
		;刚睡醒の胡乱な状態を襲う
		IF CFLAG:刚睡醒
			PRINTFORMW 「…真是厉害的叫醒服务呢」
			PRINTFORMW 「机会难得、想让你用亲吻叫醒我啊……」
		;睡眠中の悪戯
		ELSEIF CFLAG:睡眠
			;梦话
			CALL KOJO_SLEEP_K3
			WAIT
		;胖次チラ直後
		ELSEIF COND("胖次チラ直後")
			PRINTFORMW 「%CNAME("二人称")%这家伙真是……」
			PRINTFORMW 「唉、对%CNAME("二人称")%怎么也生不起气的我也没资格这么说呢」
		ELSE
			IF COND("打招呼前")
				IF RAND:2
					PRINTFORMW 「就那么想看%CNAME("一人称")%的胖次吗？」
				ELSE
					PRINTFORMW 「用视奸胖次来代替寒暄……这还真是挺少见的风俗呢」
				ENDIF
			ELSE
				IF EQUIP:胖次 == 0
					PRINTFORMW 「真是的、要是被别人看到了会怎么想？」
					PRINTFORMW 「当然、两个人都只会被当成是变态吧」
				ELSE
					PRINTFORMW 「最近为了%CNAME("二人称")%、我都開始注意起胖次的外观了」
					PRINTFORMW 「那么、怎么样？我想你应该是喜欢这种%PANTIES(TARGET, "胖次")%才选的」
				ENDIF
			ENDIF
		ENDIF
	ENDSELECT

CASE "胖次ドーピング"
	;初回
	IF DEVENT(ARGS) == 0
		;自分の胖次
		IF COND("胖次ドーピング")
			PRINTFORMW 「看着别人闻自己内衣的味道、或许也是一种珍贵的体验吧」
			PRINTFORMW 「就算是穿在身上的时候来做这种事…不是这样的吗？真有意思啊」
			PRINTFORMW 看着自己的内裤在自己眼前被使用着、%CALLNAME:TARGET%露出了有些无奈的苦笑
		ELSE
			PRINTFORMW 「……真不可思议、%CNAME("一人称")%居然会有点希望你会对我的内裤做那种事」
			PRINTFORMW %CALLNAME:TARGET%看着%CALLNAME:MASTER%的行动露出了复杂的表情
		ENDIF
	ELSE
		PRINTFORMW 「……还真不知道你对着内裤就能兴奋起来啊」
		PRINTFORMW 「为了防止%CNAME("二人称")%变成变态、%CNAME("一人称")%就允许你直接闻我的气味吧」
	ENDIF
CASE "裙下撮影"
	;撮影させてもらえた
	IF STR:日常イベント名 != "撮影失敗"
		PRINTFORMW 「想必心情一定很好吧、能够随时要求和自己的女人做爱」
		PRINTFORMW 「而且还能把这么多美少女用写真记录下来整理成册」
		PRINTFORMW 「话虽如此、你可不要把那个存储用具弄丢了哦、毕竟那种样子只能让%CNAME("二人称")%看到嘛」
	ENDIF
CASE "内褲摄影", "阴部摄影"
	;撮影させてもらえた
	IF STR:日常イベント名 != "撮影失敗"
		PRINTFORMW 「与其贴的这么近拍、还不如把脸也拍出来、让人更容易分辨出是怎样的美少女怎么样?」
		PRINTFORMW 「当然、如果这些照片泄露出去、那就麻烦了。」
		PRINTFORMW 「%CNAME("二人称")%以外的男人可能会拿这些照片来当自慰的配菜呢」
	ENDIF
CASE "性処理を頼んだ際の反応"
	;干劲がある場合
	IF COND("干劲性処理")
		SELECTCASE STR:PLAY内容
		CASE "口交"
			PRINTFORMW 「%CNAME("二人称")%觉得我是个为了品尝你的精液、什么都会做的女人吗？」
			PRINTFORMW 「不过、即使被这么想也没办法、我还是个热心侍奉的女人。」
		CASE "乳交"
		CASE "Ｖ性交"
			PRINTFORMW 「在学校里也只有%CNAME("二人称")%是这样的吧」
			PRINTFORMW 「欲求不满了就把我的小穴当成自慰穴来使用」
			PRINTFORMW 「而且还有一个美少女心甘情愿地接受了呢」
		CASE "Ａ性交"
		CASE "尿道性交"
		CASE "乳頭奸"
		ENDSELECT
		SIF COND("Ｐ汚れの相手", MASTER) != TARGET
			PRINTFORMW 「话说回来、还真是个过分的男人啊、明明还沾着别的女人的体液还提出这种要求」
	;何かしながらで良いならして给よって場合。何をしながらなのかは SAVESTR:夢中 で参照できる。
	ELSEIF COND("进行性処理")
		SELECTCASE STR:PLAY内容
		CASE "手淫"
			PRINTFORMW 「%CNAME("二人称")%难道是笨蛋吗？」
			PRINTFORMW 「听你的口气就好像谁都可以来处理性欲一样」
		CASE "Ｖ性交", "Ａ性交"
			PRINTFORMW 「既然囤积了那么多性欲、手淫一下不就行了吗?」
			PRINTFORMW 「・・・那么就为%CNAME("二人称")%提供配菜和自慰穴吧」
			PRINTFORMW 「把%CNAME("二人称")%囤积的性欲全部释放出来、简直就是榨精机器」
		CASE "尿道性交"
		ENDSELECT
	ENDIF
CASE "拜托処理性欲"
	SELECTCASE NAMES("性処理")
	CASE "口交"
			PRINTFORMW %CALLNAME:TARGET%将尿道内残留的精液全部吸出之后、还在用舌頭温柔地爱抚着肉棒
	CASE "乳交"
			PRINTFORMW 「居然把精液洒在这么显眼的地方」
			PRINTFORMW 「机会难得、就这幅样子出去走走的想法居然在脑袋里浮现」
	CASE "Ｖ性交"
			PRINTFORMW 「无论以何种形式、只要和%CNAME("二人称")%有身体上的联系、我就会感到幸福」
			PRINTFORMW 「即使这对%CNAME("二人称")%来说这是性欲处理也一样呢」
			PRINTFORMW 「就不想多回报一下我这样具有献身精神的美少女吗？」
	CASE "Ａ性交"
	CASE "尿道性交"
	CASE "乳頭奸"
	ENDSELECT
CASE "进行性処理"
	SELECTCASE NAMES("性処理")
	CASE "手淫"
			PRINTFORMW 「用这样草率的处理方式吐出这么浓厚的精液」
			PRINTFORMW 「%CNAME("一人称")%的手有那么舒服吗？？」
			PRINTFORMW 「即使手法就像奶农采集家畜的精液一样、你也满足了吗？」
	CASE "Ｖ性交", "Ａ性交"
			PRINTFORMW 「・・・没想到真的被当成飞机杯来使用了」
			PRINTFORMW 「的确，一般是不会有人在手淫工具身上编织爱的语言的」
			PRINTFORMW 「下次请抱有爱意的来「使用」我吧」
	CASE "尿道性交"
	ENDSELECT
	PRINTFORMW 「如果不是单纯的性欲处理、而是想做爱的话、那我会好好回应的」
ENDSELECT

;-------------------------------------------------
;情人節台詞を出す場所が打招呼が良さそうだったので、季節イベント台詞を関数化しました
;-------------------------------------------------
@KOJO_DAYEV_K3, ARGS, ARG
#DIM MEMO_LINECOUNT

;既に今回のイベントで話している場合
SIF CDAYEV(ARGS, ARG)
	RETURN 0

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "情人節"
	IF DAYEV("情人節", "リアル日時")
		PRINTFORMW 「早上好。今天是2月14日情人节…在这国家被认为是应该送情人节巧克力的日子呢」
	ELSE
		PRINTFORMW 「早上好。今天是情人节…在这国家被认为是应该送情人节巧克力的日子呢」
	ENDIF
	PRINTFORMW 「众所周知，这不是情人节本来的样子…」
	PRINTFORMW 「这是企业为了销售点心而制定的营销战略的结果」
	PRINTFORMW 「话虽如此，我也不打算说原本的形状是怎么样的…现在这个样子也可以说是一种魔法呢」
	PRINTFORMW 「你想想看？食品本来的意义是为了摄取营养吧？其次是味道吧？」
	PRINTFORMW 「但是、赋予食品其他意义的所谓「饮食魔术」却经常被使用」
	PRINTFORMW 「比较容易理解的是「富氢水」吧。从化学角度来说、这只是水吧？」
	PRINTFORMW 「喝那个除了补充水分以外、不会产生「营养学层面上的意义」」
	PRINTFORMW 「但是。爱喝那玩意儿的人、却常常追求非科学的意义。」
	PRINTFORMW 「那是因为企业为了利益对水赋予了「魔术的意义」」
	PRINTFORMW 「看看那些销售「魔术商品」的企业的非科学性广告。可以说和科学毫无関系」
	PRINTFORMW 「没错、换言之、市场战略的负责人在某种意义上就是「魔法使」」
	PRINTFORMW 「因为他给多数人强加了任意的、有利的、魔术般的认识啊。」
	PRINTFORMW 「情人节巧克力就是结果之一」
	PRINTFORMW 「还请不要误会、%CNAMET(ARG, "一人称")%并不是想指出情人节巧克力的无根据性」
	PRINTFORMW 「说起来、如果巧克力没有根据的话、原本的情人节就不能说毫无根据性」
	PRINTFORMW 「的确，庆祝情人节的历史比巧克力要长久得多」
	PRINTFORMW 「但从历史学的角度来看、「圣瓦伦丁」这个人的实际存在就很可疑」
	PRINTFORMW 「当然、这种事情对于庆祝情人节的人来说都是无所谓的」
	PRINTFORMW 「历史正确性和他们可以庆祝和享受的实用性相比简直微不足道」
	PRINTFORMW 「扩大范围吧。所谓过去具体存在于空间上吗？」
	PRINTFORMW 「在物质世界的某个地方、不存在过去至今仍在进行的地方吧？」
	PRINTFORMW 「那么过去存在于哪里呢、那是在记录中。而且在人们的认识中。」
	PRINTFORMW 「结我论者也会这么说。说到底、现实本身只存在于人的认识中」
	PRINTFORMW 「话虽如此、这么说有些过分、但你不认为缸中之脑确实是真实的一面吗？」
	PRINTFORMW 「说得太宽泛了、总之、只要人们都有今天是交换巧克力的日子这一共识、那就是正确的」
	PRINTFORMW 「并且即使没有那样的认知、也能利用那个共同认知」
	PRINTFORMW 「因为认识的有无在外形上没有任何差异」
	PRINTFORMW 「但是%CNAMET(ARG, "一人称")%不是那种能做出美味的手工巧克力的人」
	PRINTFORMW 「为了做出无论多少都吃得下的巧克力、我用了一些其他东西来替代」
	PRINTFORMW 「总而言之我做了一些难吃的巧克力」
	PRINTFORMW 「像咖啡一样将可可豆烤碎磨碎的粉末与肉桂和辣椒粉末混合，为了提高粘性，将其混入玉米粉溶解的热水中，像抹茶一样起泡，这就是原始的『可可』」
	PRINTFORMW 「味道很苦口感很粉、再加上满是可可脂，非常油腻…味道不是问题吧？」
	PRINTFORMW 「还有一种说法是、阿兹特克国王在拥抱后宫女子之前喝过这种东西」
	PRINTL
	CALL PRINT_STRW, @"黄色_%CALLNAME:ARG%から巧克力を貰いました！"
	CALL PRINT_STRW, @"黄色_%CALLNAME:MASTER%の精力が全快しました！"
	BASE:MASTER:精力 = MAXBASE:MASTER:精力
ENDSELECT

;何か発言してたらフラグON
SIF LINECOUNT > MEMO_LINECOUNT
	CALL SET_CDAYEV, ARGS, ARG

;-------------------------------------------------
;约会の際のセリフ
;-------------------------------------------------
@KOJO_DATE_K3, ARGS
#DIM MEMO_LINECOUNT

MEMO_LINECOUNT = LINECOUNT

SELECTCASE ARGS
CASE "约会のお誘い"
	PRINTFORMW 「周日有什么安排吗？」
	PRINTFORMW 「要是没什么特别的、就陪%CNAME("一人称")%出去吧」
	PRINTFORMW %CALLNAME:TARGET%理所当然地单方面传达了计划。

CASE "邀请去约会"
	PRINTFORMW 「为了%CNAME("二人称")%而规划一下周日好像也不错」
	IF TALENT:恋慕
		PRINTFORMW 「不过、自从遇见%CNAME("二人称")%之后、%CNAME("一人称")%的时间基本都花在%CNAME("二人称")%的身上就是了…」
	ELSE
		PRINTFORMW 「好不容易花了一天、尽可能让我度过有意义的时间吧？」
	ENDIF
	PRINTFORMW 「具体的行动就交给%CNAME("二人称")%了。毕竟我缺乏相関的经验嘛」
CASE "待ち合わせ"
	IF COND("同居中") == 0
		PRINTFORMW 「很准时啊。那就出发吧。那么、要去哪里呢？」
	ELSE
		IF RAND:2
			PRINTFORMW %CALLNAME:TARGET%好像提前到了约定的地点
			PRINTFORMW 一看到%CALLNAME:MASTER%就举手示意、走了过来
		ELSE
			PRINTFORMW 在指定地点等待约会的%CALLNAME:TARGET%好像被谁搭讪了、但却被她完全无视了
			PRINTFORMW 一看到%CALLNAME:MASTER%、就好像什么都没发生一样跑了过去
		ENDIF
		PRINTFORMW 「很准时啊。那就出发吧。那么、要去哪里呢？」
		TFLAG:地の文スキップ = 1
	ENDIF

CASE "约会本番"
	SELECTCASE SAVESTR:约会
	CASE "去买泳衣"
		PRINTFORMW 「%CNAME("二人称")%是想让我穿你喜欢的衣服吧」
		PRINTFORMW 「反正%CNAME("一人称")%不会游泳、泳衣完全是为了取悦%CNAME("二人称")%而穿的衣服」
	CASE "散歩"
		PRINTFORMW
	CASE "尋訪美食"
		PRINTFORMW
	CASE "逛街"
		PRINTFORMW
	CASE "去水族馆"
		PRINTFORMW
	CASE "去游乐园"
		PRINTFORMW
	CASE "去图书馆"
		PRINTFORMW
	CASE "赏花"
		PRINTFORMW
	CASE "去游泳"
		PRINTFORMW
	CASE "爬山"
		PRINTFORMW
	CASE "赏红叶"
		PRINTFORMW
	CASE "滑雪"
		PRINTFORMW
	CASEELSE
		PRINTFORMW
	ENDSELECT

	;地の文を自己書きたい場合にはコメントアウトを外してください
	;TFLAG:地の文スキップ = 1

CASE "手をつなぐ"
	PRINTFORMW
CASE "手をつながない"
	PRINTFORMW
;泳装を買いに行った時です
CASE "泳装選び開始"
	;Micro比基尼とかもＯＫ
	IF COND("Ｈ的泳装選択可能")
		PRINTFORMW 「%CNAME("二人称")%想让我穿什么样的泳衣都可以哦。我不会抱怨泳衣的样式的。」
		PRINTFORMW 「%CNAME("一人称")%完全不在意%CNAME("二人称")%以外的视线哦」
	ELSE
		PRINTFORMW 「话说回来、为了慎重起见、你为我选的是能在外面穿的类型吧？」
	ENDIF

CASE "泳装決定"
	;どの泳装に着替えたか？
	SELECTCASE SWIM(STR:選んだ泳装, "種類")
	CASE "比基尼"
		PRINTFORMW 「怎么样？要是%CNAME("二人称")%看到觉得開心就好了・・・」
	CASE "Micro比基尼"
		PRINTFORMW 「明明布料比内衣还要少、却因为是泳衣就能被允许穿着外出、很有趣吧？」
	CASE "連体泳装"
		PRINTFORMW 「和学校的泳衣很像呢。你喜欢这种东西吗？那你一定很享受游泳课吧」
	CASE "競泳泳装"
		PRINTFORMW 「好像是很实用的泳衣呢。因为我不会游泳、所以和实用与否没有太大関系」
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW 「虽然我有说过随便你选、但%CNAME("二人称")%还真是对欲望很诚实的男人呢」
		PRINTFORMW 「穿着这种泳衣和%CNAME("二人称")%牵手走在一起、我们之间有肉体関系这件事就一目了然了呢」
		PRINTFORMW 「难道说那样也不错嘛？那什么时候穿着这个一起走吧。要搂着我的腰吗？」
	ENDSELECT

CASE "请求偷偷口交"
	PRINTFORMW 「反正在选泳衣的时候、都在想着那一套泳衣最适合做爱的时候穿吧？」
	PRINTFORMW 「%CNAME("二人称")%那深不见底的性欲又不是一天两天的事了」
	PRINTFORMW 「已经变成了只要有要求就会随时随地接受的女人了、这也是没办法的事」

;泳池などで泳装姿に着替え、待ち合わせ場所に集合した時です
CASE "泳装に着替えた"
	SELECTCASE SWIM(CSTR:今年の泳装, "種類")
	CASE "比基尼"
		PRINTFORMW 「那么、虽然并没有游泳、但我穿着泳衣来了」
	CASE "連体泳装"
		PRINTFORMW 「虽然对%CNAME("二人称")%这样的美少女是常有的事、但果然还是很引人注目啊」
		PRINTFORMW 「・・・・・・玩笑很难理解吗？%CNAME("一人称")%也是会開玩笑的哦」
	CASE "競泳泳装"
		PRINTFORMW 「和身体的贴合感相当强、很奇妙的感觉」
	;其他はだいたいエロ泳装です
	CASEELSE
		PRINTFORMW 「正如你所看到的那样、%CNAME("二人称")%选的泳衣我已经换上了・・・」
		PRINTFORMW 「在更衣室换衣服的那一瞬间、就吸引了周围的视线、真是没办法啊」
		PRINTFORMW 「我倒是不在乎%CNAME("二人称")%以外的视线呢」
	ENDSELECT

CASE "到暗处去……"
	PRINTFORML 「你的眼神、似乎不是在约会时希望亲吻心爱女孩的气氛呢」
	PRINTFORMW 「我当然知道。是想被恋爱中的女孩的嘴榨取精液变得舒服起来吧？」

CASE "接吻"
	IF RAND:2
		PRINTFORML 「约会的时候这种程度的吻刚刚好」
		PRINTFORMW 「太过浓厚的吻会让人想要做到「后续」啊」
	ELSE
		PRINTFORML 「%CNAME("二人称")%的亲吻在约会的时候也会变得更棒呢」
		PRINTFORMW 「好到这场约会只有这个吻都足够了」
	ENDIF

CASE "摸屁股"
	IF RAND:2
		PRINTFORML %CALLNAME:TARGET%为了让%CALLNAME:MASTER%更容易揉搓到、将腰贴了过来
		PRINTFORMW 「在公众面前这么大胆。这屁股就那么有魅力吗？」
	ELSE
		PRINTFORML 「明明只是和这样的美少女约会就足够引人注目了」
		PRINTFORMW 「就那么想要炫耀吗？」
	ENDIF

;你が草丛口交や接吻や性騷擾をしない紳士な場合はここに来ます
CASE "下次去哪里呢？询问"

CASE "帰り際"
	PRINTFORMW 「和%CNAME("二人称")%两个人独处的话感觉很舒服、有点不舍啊。」

CASE "约会終了"
	;エッチをする場合
	IF TFLAG:床イン
		PRINTFORMW 「…%CNAME("一人称")%也觉得和%CNAME("二人称")%相处很舒服…想要更深入的联系、说白了就是想做爱。要去最近的地方吗？」
	ELSE
		PRINTFORMW 「今天很開心哦。在和%CNAME("二人称")%相遇之前从来都没有过这样的体验…一切都要被和%CNAME("二人称")%的经验填满了」
	ENDIF
ENDSELECT


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

SELECTCASE ARGS
CASE "取引開始"
	PRINTFORMW 「有什么事吗？」
CASE "愛の告白"

;胖次のお願いした時に相手が没穿内褲だった
CASE "没穿内褲"
	IF COND("合意：胖次交易")

	ELSE

	ENDIF
CASE "胖次交易"
	;お金では応じない
	TFLAG:取引価格 = 0
CASE "胖次", "胖次拒否"
	;まだ取引が一度も成功していない
	IF COND("合意：胖次交易") == 0
		PRINTFORMW 「真是的、太反常了吧」
		PRINTFORMW 「例如、有的人喜欢内衣本身、而不是它的穿着者」
		PRINTFORMW 「也有人会对内衣上的汗水、尿液或阴道分泌液感到兴奋」
		PRINTFORMW 「当然、都是对内衣的穿着者没什么兴趣吧？这太反常了吧？」
		PRINTFORMW 「如果你能更强烈地感受到内衣的穿着者、那么相对来说就不那么反常了」
		PRINTFORMW 「或者说能让这个女人脱掉内衣…可能会为这种関系性而兴奋吧」
		PRINTFORMW 「或者也有人只是想看到脱下来的样子吧」
		PRINTFORMW 「比起内衣的要求这种外在的表现、関键的内在更重要、你不这么觉得吗？」
		PRINTFORMW 「嘛、那就算了・・・」
	ENDIF

	SELECTCASE ARGS
	CASE "胖次"
		;取引が初めて成功した
		IF COND("合意：胖次交易") == 0
			PRINTFORMW 「我自己也觉得不可思议…真是的、我怎么就无法违抗%CNAME("二人称")%的蛮横呢」
			PRINTFORMW %CALLNAME:TARGET%羞答答地递过来一条温热的内裤
		;２回目以降
		ELSE
			IF RAND:2 && CFLAG:汗
				;胖次を脱いで渡してくる汎用地の文
				CALL DAILY_MESSAGE, "脱下胖次交了出去"
				PRINTFORMW 「就连%CNAME("一人称")%也不好意思把这种状态的东西交给你…」
				PRINTFORMW %CALLNAME:TARGET%因为吸收了体液所以稍微变重了一些…
			ELSEIF TALENT:恋慕 || TALENT:淫乱
				PRINTFORMW %CALLNAME:TARGET%慢慢地将内裤拉到膝盖处
				PRINTFORMW 把裤子固定在那个位置、抬起脚開始脱下来
				PRINTFORMW 那个动作会导致裙子被她的大腿掀起、私处处于随时都可能暴露出来的危险状态
				PRINTFORMW 「这样脱掉比较好吧？」
				PRINTFORMW 「那么、接下来%CNAME("一人称")%就暂时不穿内裤了」
				PRINTFORMW 「如果被发现了…也许会坦率地说出来。内裤正在%CNAME("二人称")%的手里」
				PRINTFORMW %CALLNAME:TARGET%恶作剧地一笑、将脱下的内裤递了过来
			ELSE
				;胖次を脱いで渡してくる汎用地の文
				CALL DAILY_MESSAGE, "脱下胖次交了出去"
				PRINTFORMW 「%CNAME("一人称")%会不穿内裤度过一天的…」
				PRINTFORMW 「同学们做梦也想不到%CNAME("一人称")%会做这样的事吧」
			ENDIF
		ENDIF
		CALL COLLECT_PANTU, PANTIES(TARGET)
	;断られる
	CASE "胖次拒否"
		;初回
		IF DEVENT(ARGS) == 0
			PRINTFORMW 「果然这个还是不想接受啊」
			PRINTFORMW 「虽然居心不良、但%CNAME("二人称")%能把这种事情说出口的行动力还是值得称赞的」
		;周りに人がいる状態では嫌
		ELSEIF CHARA_NUM("室内の邪魔者") && COND("合意：胖次交易")
			PRINTFORMW 「什么啊、那个、%CNAME("二人称")%是想炫耀自己处在能让%CNAME("一人称")%这么做的立场上吗？」
			PRINTFORMW 「呼呼、让周围的人知道这件事确实能满足%CNAME("二人称")%的独占欲、但你不觉得会影响生活吗？」
			PRINTFORMW %CALLNAME:TARGET%对于有其他人在这里的事十分在意……
		ELSE
			PRINTFORMW 「%CNAME("二人称")%最好客观地想一想自己说了什么」
		ENDIF
	ENDSELECT
CASE "做便当"
	;便当のお願い２回目以降
	IF COND("合意：便当")
		PRINTFORMW 「下次想要喝什么呢？」
		PRINTFORMW 「顺便一提、今天的美女樱味道很棒哦」
		PRINTFORMW %CALLNAME:TARGET%把水壶拿了出来
	;以下は初めて作ってもらうよう变成了とき
	ELSE
		PRINTFORMW 「虽说是便当、但料理只会做饮料、没関系吗？」
		PRINTFORMW 「硬要说的话就是茶、并不是狭义上的茶、总之所有的香草茶我都精通。再加上咖啡的话就是我能做的全部料理了」
		PRINTFORMW 「你的生活中很常见的麦茶也是香草茶的一种哦」
		PRINTFORMW 「普通的香草店里就有卖很多可以饮用的植物」
		PRINTFORMW 「如果真的有需要的话、即使是在这个国家很难买到的古柯茶和死藤茶、大麻茶也能够入手…但是不怎么推荐呢」
		PRINTFORMW 「还有、饮料以外的东西、就请你自己准备或者交给你的女仆吧」
		PRINTFORMW 「因为分工可是人类得以发展到今天的原因之一呢」
	ENDIF
CASE "同居拒否"

CASE "同居希望"
	;初回
	IF DEVENT(ARGS) == 0
		PRINTFORMW 在向她提出同居的要求之后、她一脸惊讶地嘟囔起来
		PRINTFORMW 「原来如此。突然想到什么、不知道是预知还是推理…」
		PRINTFORMW 「那个、今天早上妈妈说如果要搬到谁家住的话、今天就可以去了」
		PRINTFORMW 「作为交换、需要我把这封信交给对方」
		PRINTFORMW 你从她的手中结果纸条、读了这篇被写在便条纸上乱七八糟的令人害怕的文章
		FONTSTYLE 3
		CHKFONT "Andalus"
		PRINTFORML ------------------------------------------------------------------------------------
		PRINTFORML 即使你很愚蠢也没関系、但我相信你有最起码的理解能力、直截了当地告诉你
		PRINTFORML 我的主要研究课题是永生、这是人类的终极目标之一
		PRINTFORML 尽管如此、我总是不像真正的我一样果断、一次又一次错过机会、这都是为了我的女儿
		PRINTFORML 请你意识到、她是能束缚我行为的唯一枷锁　以上
		PRINTFORML ------------------------------------------------------------------------------------
		FONTREGULAR
		SETFONT
		PRINTFORMW 站在身旁一起读信的西西莉娅一脸不耐烦地嘟囔道
		PRINTFORMW 「…平时放任自流、偏偏又在奇怪的地方干涉我、真是个让人頭疼的母亲」
		PRINTFORMW 「这大概是如果让我的女儿哭泣、就让你痛苦地连求死都做不到的意思吧」
		PRINTFORMW 「该说母亲是爱操心呢、还是过度保护呢…」
		PRINTFORMW 「嘛、这样一来我就可以在父母的许可下同居了」
		PRINTFORMW 「尽管喜极而泣吧。要是做的不好可是有难办的家伙打过来哦…」
		PRINTFORMW 「嘛、如果是你的话大概没问题吧」
		PRINTFORMW 「妈妈是专注研究的、在战斗方面没有那么可怕啦」
		PRINTFORMW 「没问题」是用来形容战斗的、这让你有点不安
	ELSE
		PRINTFORMW
	ENDIF
CASE "同居頻度的相談"

;"淫紋贴纸直前"or"淫紋贴纸"の片方を書けば十分だと思います
CASE "淫紋贴纸直前"
	;初回
	IF DEVENT(ARGS) == 0

	ELSE

	ENDIF

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

	ELSE

	ENDIF
;"淫紋直前"or"淫紋"の片方を書けば十分だと思います
CASE "淫紋直前"
	SELECTCASE MARK:淫紋
	CASE 2

	CASE 3

	CASE 4

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

	CASE 3

	CASE 4

	ENDSELECT

;COND("口服避孕薬派")かどうかで初回が"口服避孕薬を飲んで欲しい"or"口服避孕薬を止めて欲しい"に分かれます
CASE "口服避孕薬"
	IF COND("口服避孕薬派")
	ELSE
		;口服避孕薬を服用してもらう
		IF CFLAG:口服避孕薬
			;初回
			IF DEVENT(ARGS) == 0
				PRINTFORMW 「让我吃口服避孕药？」
				PRINTFORMW 「也就是说、你不想用避孕套了吗？」
				PRINTFORMW 「那个女佣买的避孕套、我看了一下、是相当高级精巧的东西」
				PRINTFORMW 「带着那种品质的避孕套、肯定在物理层面上的触感和没戴的时候是没有什么差别的吧？」
				PRINTFORMW 「尽管如此、还是想要让我用药来避孕」
				PRINTFORMW 「也就是说、想要做一些带着避孕套就没法做的事
				PRINTFORMW 「想要把精液直接注入到少女的子宫里」
				PRINTFORMW 「虽然没有拒绝的理由、但请注意一点」
				PRINTFORMW 「如果我并没有像说的那样吃药的话、就会变成真的进行生孩子性交的窘况了哦」
			ELSE

			ENDIF
		;口服避孕薬の服用を止めてもらう
		ELSE
				PRINTFORMW 「你開始想念避孕套了吗？」
				PRINTFORMW 「比如说让我自己握住装满精液的避孕套」
				PRINTFORMW 「然后给我这个一天不知道要被使用多少次的泄欲工具的淫猥姿态拍下来、记录下来」
				PRINTFORMW 「然后让它在学校里秘密流通、让别人都知道我和你是什么样的関系・・・」
				PRINTFORMW 「…也许是因为为了你在猥亵的书上学习过頭了、连我自己都受到了很大的影响」
				PRINTFORMW 「还是说……希望我能排出健康的卵子…」
				PRINTFORMW 「也、也就是…那个……对吧、」
				PRINTFORMW 「是想要达到做爱的本来目的吗？」
				PRINTFORMW 「如果你是那么希望的话・・・来做吧」
		ENDIF
	ENDIF

CASE "拜托処理性欲"
	PRINTFORMW 「真的有必要吗？」
	PRINTFORMW 「你每天都会至少两次在活生生的对象身上发泄性欲的吧」
	PRINTFORMW 「在此以上还想要在休息时间发泄性欲什么的」
	PRINTFORMW 「要是说连休息都不休息的话…那也没办法了」
	PRINTFORMW 「但是%CNAME("一人称")%的同学们肯定也不会想到、刚才还在一个房间里上课的同学」
	PRINTFORMW 「在仅仅十分钟左右的休息时间里要被用来发泄性欲、被注入精液之后再回来听课呢」
CASE "性処理の一時中断"
CASE "性処理拒否"

;其他汎用
CASEELSE

ENDSELECT

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

SELECTCASE ARGS
CASE "一緒に出発"
	;着替えてもらう
	IF CHECK_CLO("裸体") || CHECK_CLO("泳装姿") || CHECK_CLO("体操服姿") || CHECK_CLO("内衣姿")
		PRINTFORML 「嚯、要一起去买东西吗」
		PRINTFORMW 「总不能穿着身就出門呢、还是换衣服吧」
	ELSE
		PRINTFORMW 「这也算是一种约会吧？」
		PRINTFORMW 「如果时间足够的话、之后能陪我去买东西的话、我会很高兴哦」
	ENDIF
CASE "目送"
	PRINTFORMW 「要去买东西吗？需要我说一路顺风吗」
CASE "没収胖次出発"
	;没穿内褲
	IF EQUIP:胖次 == 0
		PRINTFORMW 「……」
		PRINTFORMW %CALLNAME:TARGET%眼神飘忽似乎有点害臊、%SKIRT(TARGET, "略")%を%TEXTR("怯生生地/很快")%举起たくし上げた。
	ELSE
		;初回
		IF SEVENT(ARGS) == 0
			PRINTFORMW 「原来如此、%CNAME("二人称")%想带着不穿内裤的%CNAME("一人称")%到处走呢」
			PRINTFORMW 「%CNAME("二人称")%是那种一有机会、就想要炫耀和%CNAME("一人称")%在性方面的関系的类型吧？」
			PRINTFORMW 「明明想到处炫耀这样的美少女是自己的、但那太难了、所以就用这样的事来代替」
			IF COND("妊娠中")
				PRINTFORMW 「但就算不这么做、这隆起的肚子不也在悠然地说明是被「配种」的吗？」
			ELSE
				PRINTFORMW 「或者说你让她怀孕的话、就算她不愿意、这隆起的肚子也会向周围宣示彼此的関系呢」
			ENDIF
		ELSE
			PRINTFORMW 「如果%CNAME("二人称")%为这样的事感到高兴、那我也会回应你」
			PRINTFORMW 「%CNAME("二人称")%可能会说没有羞耻心这种事就完全没意义了、但%CNAME("一人称")%也不是完全没有害羞哦？」
			PRINTFORMW %CALLNAME:TARGET%把刚脱下的还残留着体温的内裤递了过来、不过好像紧张地脸色发白
		ENDIF
	ENDIF
CASE "保持现在的装扮出発"
	IF CHECK_CLO("泳装姿")
		PRINTFORML 「穿泳装怎么想都是个怪人、不过也不能算是犯罪吧」
	ELSEIF CHECK_CLO("体操服姿")
		PRINTFORML 「老实说、我不是很喜欢穿运动服呢」
	ELSEIF CHECK_CLO("内衣姿") || CHECK_CLO("裸体")
		IF SEVENT("ＳＨＯＰ露出") == 0
			PRINTFORMW 「你是想让我裸体去买东西吗？」
			PRINTFORMW 「好像需要proopagnosia的魔法吧？希腊语中意味着脸的prosopon和意味着无知的agnosia组合起来就是prosopagnosia」
			PRINTFORMW 「那样的话、即使被熟人看到、也只会得出「脸完全不认识的裸女」这种结果」
			PRINTFORMW 「即便如此、也没办法确保他们不会报警就是了」
			CALL SET_SEVENT, "ＳＨＯＰ露出"
		ELSE
			CALL PRINT_STR, @"「就用%CNAME("二人称")%的缰绳拉住我吧_BH_」_W"
		ENDIF
	ENDIF
CASE "会計交代"
	;初回
	IF SEVENT(ARGS) == 0 || SEVENT("商品購入") == 0
		PRINTFORML 「这也算是老师要做的吗？这样都不知道谁是弟子了…」
		PRINTFORMW 「我并没有说不愿意哦」
	ELSE
		PRINTFORMW 「那么、买什么好呢？」
	ENDIF
CASE "商品購入"
	;今買った物
	SELECTCASE STR:購入道具
	CASE "避孕套"
		PRINTFORML 「啊、马上就要用了、不用包装地那么严实、简单地装进袋子里就可以了」
		PRINTFORMW 店员一边偷瞄着站在%CALLNAME:TARGET%身边的%CALLNAME:MASTER%一边记着账
	;えっちな商品
	CASEELSE
		PRINTFORML 「我想买这个」
		PRINTFORMW %CALLNAME:TARGET%故意挽着%CALLNAME:MASTER%的手结账
	ENDSELECT
CASE "店内待機"
	;とりあえず何か一個買った時or33％で喋る
	SIF COND("買上品数") != 1 && RAND:3
		RETURN 0
	;胖次没収中
	IF COND("買い物胖次没収中")
		PRINTFORML 「虽然不会被当作实际问题看待、但如果说不在意的话那就是谎言了」
		PRINTFORMW %CALLNAME:TARGET%说话的时候一幅无所谓的样子、手却在压住裙子、像是在保护没穿内裤的私密部位
	ELSE
		PRINTFORML %TEXTR("「……」/「是香草呢、这是什么叶的呢」/「各种各样的避孕套摆在一起・・・果然还是薄一点的好吗？」/「好多有趣的商品陈列在一起、打发时间也不错嘛」/「不愧是展示用的商品呢」")%
		PRINTFORMW %CALLNAME:TARGET%%TEXTR("拿起并看看货架上的货物/有兴趣地观察货架上的货物/轻轻地掃着货架上的货物的尘埃/阅读货架上的货物的说明书")%,消磨时间……
	ENDIF
CASE "购物終了"
	;胖次没収中
	IF COND("買い物胖次没収中")
		PRINTFORMW 「怎么样？让年龄相近的女性不穿内裤和你走在一起的感觉」
	;なにも買わなかった
	ELSEIF COND("買上品数") == 0
		PRINTFORMW 「如果没有什么想买的话、也没有什么行李要拿、要不要陪我去买东西？」
	ENDIF
ENDSELECT