code:
;-------------------------------------------------
; [美術室の市松人形] 小菊口上
; 	製作者　k
;-------------------------------------------------

;-------------------------------------------------
;ver0.01 2018/04/20 初公開バージョン
;ver0.02 2018/04/23 バグ修正・口上追加バージョン
;ver0.03 2018/05/03 イベント小変更・口上追加バージョン
;-------------------------------------------------

;-------------------------------------------------
;○你に染まる市松人形
;	最近学校に溢れだした魔力により魂らしき物を得た幼い妖怪
;	你が彼女に与えた経験により、彼女の意識が変わっていく……予定

;-------------------------------------------------
;呼び名の設定。"_"の右にふりがなを書く。
;-------------------------------------------------
@CNAME_K17, ARGS
#FUNCTIONS

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	LOCALS = 我_我
CASE "二人称"
	;相手が主人
	IF PLAYER == MASTER
		SELECTCASE CEVENTS("立場")
		CASE "主人様"
			LOCALS = 主人様_主人大人
		CASE "父亲"
			LOCALS = 父亲_父亲
		CASE "お母桑"
			LOCALS = 母亲_母亲
		CASE "爸爸"
			LOCALS = 爸爸_爸爸
		CASE "妈妈"
			LOCALS = 妈妈_まま
		CASE "欧尼酱"
			LOCALS = 欧尼酱_欧尼酱
		CASE "欧内酱"
			LOCALS = 欧内酱_欧内酱
		CASEELSE
			LOCALS = YOU_YOU
		ENDSELECT
	;相手が主人ではない
	ELSE
		LOCALS = 你_你
	ENDIF
CASE "主人"
	LOCALS = 主人様_主人大人
CASE "助手"
	LOCALS = %CALLNAME:ASSI%_%CSTR:ASSI:ふりがな%
ENDSELECT
RETURNF LOCALS

;-------------------------------------------------
;勧誘イベントのセリフや紹介文
;-------------------------------------------------
@EVENT_PROFILE_K17, ARGS

SELECTCASE ARGS
CASE "紹介文"
	STR:1 = 放在美术准备室的人偶。
	STR:2 = 因为汇聚了魔力不时以人的姿态行动、而成为学校的怪谈。由于%NAME:MASTER%的灵力、得以完全妖怪化。

CASE "勧誘"
	;弗理希艾尔が水先案内人
	IF FINDCHARA(NO, 1) > 0
		PRINTW 大概是一周前、听说了「学校夜晚会有妖怪」的传闻。
		PRINTL
		PRINTL 「对对、好像是美术准备室里面那个穿着和服的人偶吧？」
		PRINTFORMW 在社团里闲谈时聊到这个话题、%NAME:FINDCHARA(NO, 1)%听到后随意地点了点頭。
		PRINTW 「准确来说……应该是人偶依靠汇聚的魔力而诞生的魔法生物吧」
		PRINTW 「不是什么付丧神、不过总的来说算是友好的家伙」
		PRINTW 「如今只是漫无目地在学校里徘徊、如果魔力消散就会变回人偶的不稳定存在」
		PRINTL
		PRINTFORMW 「如果有兴趣的话、去看一次怎么样？如果中意的话、%CNAMET(FINDCHARA(NO, 1), "二人称")%可以分享灵魂来固定她的形态」
		PRINTW ……如果将形态固定化的话、「那个」会怎么样呢？
		PRINTFORMW 「想怎么处理都可以、契约后大概就是%CNAMET(FINDCHARA(NO, 1), "二人称")%的式神、或者是使魔的形式」
	ENDIF

CASE "勧誘直後"
	PRINTL
	SIF COND("昼")
		PRINTFORMW %CALLNAME:MASTER%大致回忆了一下昨晚发生的事情。
	PRINTW 夜晚的学校变得非常安静。
	PRINTFORMW 当月光照在身上时、回頭看见了与学校走廊不相称的华丽和服。
	PRINTW 齐肩的黑发在不停飘动。
	PRINT ――
		IF STRCOUNT(CSTR:属性,"萝莉")
			PRINT 很年轻……不如说是幼小、
		ELSEIF STRCOUNT(CSTR:属性,"大人")
			PRINT 看起来很成熟、
		ELSE
			PRINT 很年轻、
		ENDIF
		PRINT 身材
		SIF TALENT:娇小
			PRINT 瘦小的
		SIF TALENT:高大
			PRINT 高挑的
	PRINTW 女性
	PRINTW 肌肤在月光的照耀下显得异常光滑、让人联想到日本的高级人偶。
	PRINTW 只不过、不管怎么看都像是1:1的比例。
	PRINTW 美术准备室真的有这么大的人偶吗？
	PRINTFORMW 一直盯着%CALLNAME:MASTER%的眼睛里面完全看不到正常女性的感情。
	PRINTL
	PRINTL 看起来似乎无害……
	PRINTFORMW 撇開对非正常生物有免疫力的%CALLNAME:MASTER%不谈、一般人遇到这种事情会吓尿吧。
	PRINTL
	PRINTW 问了一下她的名字、她歪着脑袋愣住了。
	PRINTW 语言不通吗？
	PRINTFORMW 在%CALLNAME:MASTER%这么思考的时候、她仿佛突然想起来一样、拿出放在和服里的木牌。
	PRINTFORMW 像是人偶附赠的标牌、上面有类似儿童手写般的幼拙字迹――「%NAME:TARGET%」
	PRINTW 她好像认为那就是自己的名字。
	PRINTW 仅从反应来看、虽然自我意识薄弱、但似乎具备一定程度的知识和语言能力。
	PRINTL
	PRINTFORMW 话虽如此、虽然%NAME:FINDCHARA(NO, 1)%说把%NAME:TARGET%怎么样都好、但是这样放任不管的话会引起很大的骚动吧？
	PRINTL
	PRINTFORMW %CALLNAME:MASTER%想先带她回去――
	PRINTFORML [0] 告诉她你是她的主人
	PRINTFORML [1] 告诉她你是她的\@ TALENT:MASTER:男性 ? 父亲 # 母亲 \@
	PRINTFORML [2] 告诉她你是她的\@ TALENT:MASTER:男性 ? 爸爸 # 妈妈 \@
	PRINTFORML [3] 告诉她你是她的\@ TALENT:MASTER:男性 ? 哥哥 # 姐姐 \@

	$INPUT_LOOP
	INPUT
	SELECTCASE RESULT
		CASE 0
			CALL SET_CEVENT,"立場：主人様"
		CASE 1
			LOCALS = 立場：\@ TALENT:MASTER:男性 ? 父亲 # お母桑 \@
			CALL SET_CEVENT,LOCALS
		CASE 2
			LOCALS = 立場：\@ TALENT:MASTER:男性 ? 爸爸 # 妈妈 \@
			CALL SET_CEVENT,LOCALS
		CASE 3
			LOCALS = 立場：\@ TALENT:MASTER:男性 ? 欧尼酱 # 欧内酱 \@
			CALL SET_CEVENT,LOCALS
		CASEELSE
			GOTO INPUT_LOOP
	ENDSELECT
	CALL SET_CEVENT, @"初期選択：%CEVENTS("立場")%"

	PRINTFORMW 「%CNAME("二人称","かな")%……」
	PRINTFORMW 「……%CNAME("二人称")%」
	PRINTFORMW %NAME:TARGET%点了点頭，很快便接受了这件事。
	PRINTL
	PRINTFORML ※与%CALLNAME:TARGET%的関系在日常中的「Talk」→「雑談」里有低几率可以重新选择。
	PRINTW 　另外、口上中出现「教导(教える)」这个词语时、可以使用「雑談」来教导。

;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	PRINTFORMW 被带走的%CALLNAME:TARGET%将作为%CALLNAME:MASTER%的所有物而变为"同居中"的状态。
	PRINTFORMW 但是因为学校领导（？）不会认可、所以不能来部室。

ENDSELECT

;-------------------------------------------------
;この角色が拒否している指令のフラグ立てや其他色々なフラグを開始前に設定できる
;partnerは勿論、指导者の時でも読み込む
;-------------------------------------------------
@SETFLAG_BEFORE_TRAIN_K17

;-------------------------------------------------
;調教開始時のセリフ
;-------------------------------------------------
@EVENTTRAIN
SIF NO:TARGET != 17
	RETURN 1

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
	PRINTFORMW %CALLNAME%坐在地上，抬頭安静地看着%CALLNAME:MASTER%
	PRINTFORMW 「……%CNAME("二人称")%？」
	PRINTW 从那个表情中什么感情也读不出来。
	PRINTFORMW 今后要怎么做呢、%CALLNAME%应该还什么都不懂吧……
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
	PRINTW 「稍微、有点明白了……」
	PRINTW 「……人类、和人类在一起的……情绪」
	PRINTFORMW 小声诉述着的%CALLNAME%的眼中、看起来有比以前更明确的意志了……
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
	PRINTFORMW 「%CNAME("二人称")%、做这个……会開心吗……？」
	PRINTFORMW 「这样的话……%CNAME("二人称")%如果会開心……做更多也没関系哦」
	PRINTFORMW %CALLNAME%似乎接受%CALLNAME:MASTER%了。
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
	PRINTFORMW 「……呐、%CNAME("二人称")%……更多、教我更多吧……？」
	PRINTFORMW 「%CNAME("一人称")%也……想要为%CNAME("二人称")%做更多的事情……」
	PRINTFORMW %CALLNAME%一边说一边\@ !TALENT:MASTER:娇小 && !TALENT:高大 ? 抬頭仰望 # 凝视着 \@%CALLNAME:MASTER%……
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 0
	PRINTFORMW 「……！？」
	PRINTFORMW 「呐、%CNAME("二人称")%……%CNAME("二人称")%不太对劲……为什么……？」
	PRINTFORMW 「……%CNAME("一人称")%……变得奇怪了……！？」
	PRINTFORMW 被%CALLNAME:MASTER%抱住的%CALLNAME%、身体发烫还在颤抖……
	CALL SET_CEVENT, "調教開始：恋慕"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：相思相愛") == 0
	PRINTFORMW 「那个、%CNAME("二人称")%……%CNAME("二人称")%没有注意到吧……？」
	PRINTFORMW  %CALLNAME%轻轻地拥抱了过来……
	PRINTFORMW 「每次%CNAME("二人称")%把心分给我的时候……%CNAME("一人称")%的里面、都会越来越温暖……」
	PRINTFORMW 「现在的%CNAME("一人称")%、全部被%CNAME("二人称")%的心……填满了」
	PRINTFORMW 「%CNAME("二人称")%能成为%CNAME("二人称")%真是太好了……」
	PRINTL
	PRINTFORMW 「谢谢你……最喜欢了、%CNAME("二人称","かな")%……」
	PRINTFORMW 混杂着泪水的细语中、%CALLNAME%\@ !TALENT:MASTER:娇小 && !TALENT:高大 ? 抬起頭 # 靠过来 \@、将热情又温柔的吻送到%CALLNAME:MASTER%的脸颊……
	CALL SET_CEVENT, "調教開始：相思相愛"
;助手の有無をチェック（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K17_KOJO2

;-------------------------------------------------
;助手との掛け合い(YYを助手の角色番号に置換、ＸＸを助手の角色番号に対応した名前に変更する)
;掛け合いをする角色を増やす場合は、コピー＆ペーストをして増やす
;-------------------------------------------------
;助手
;ELSEIF NO:ASSI == YY
	;初めて
;	IF CEVENT("助手会話：ＸＸ") == 0
		;恋慕＋恋慕時初口上（陥落イベント）が発生済み
;		IF CEVENT("調教開始：恋慕")
;			PRINTFORMW
		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		CALL SET_CEVENT, "助手会話：ＸＸ"
	;二回目以降
;	ELSE
		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;	ENDIF
;口上のある助手が居ない場合は、通常の二回目以降の口上へ飛ぶ
ELSE
	CALL K17_KOJO2
ENDIF

RETURN 1

;-------------------------------------------------
;調教開始時（2回目以降）
;-------------------------------------------------
@K17_KOJO2
;恋慕
IF TALENT:相思相愛
	SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「%CNAME("一人称")%……可以来吗」
			PRINTFORMW %CALLNAME%脸上浮现出温和的微笑、轻声说道。
			PRINTFORMW 「……让我们的心一起跳动吧……%CNAME("二人称")%」

		CASE 1
			PRINTFORMW %CALLNAME%像是要窥探内心一样、两手重叠在胸前……
			PRINTFORMW 「今天%CNAME("二人称")%的心……」
			PRINTFORMW 「……呼呼……稍微%TEXTR("想征服别人/想撒娇/想被温柔对待")%……是吧？」

		CASE 2
			PRINTFORM 「%CEVENTS("立場")%与
			SELECTCASE CEVENTS("立場")
				CASE "父亲", "お母桑", "爸爸", "妈妈"
					PRINT 女儿

				CASE "欧尼酱", "欧内酱"
					PRINT 妹妹

				CASEELSE
					PRINTFORM %CNAME("一人称")%

			ENDSELECT
			PRINTFORMW 的话、这样也不错吧……？」
			PRINTFORMW %CALLNAME%坐在%CALLNAME:MASTER%的腿上撒娇了一会……

		CASEELSE

	ENDSELECT

ELSEIF TALENT:恋慕
	SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 握起%CALLNAME:MASTER%的手、%CALLNAME%稍稍踌躇之后引到了自己的胸口。
			PRINTFORMW 「%CNAME("二人称")%……摸摸这里……」
			PRINTFORMW 「……有%TEXTR("心跳/咚咚一声")%……对吧？　%CNAME("二人称")%……」
			PRINTFORMW %CALLNAME%像在挑战似的\@ !TALENT:MASTER:娇小 && !TALENT:高大 ? 仰视 # 凝视 \@着%CALLNAME:MASTER%……

		CASE 1
			PRINTFORMW 「……%CNAME("二人称")%的手好大……」
			PRINTFORMW %CALLNAME%不停地揉着、确认%CALLNAME:MASTER%的手的触感……

		CASE 2
			PRINTFORMW 「呐、%CNAME("二人称")%……%CNAME("一人称")%会加油的、摸頭……？」
			IF RAND:2 == 0
				PRINTFORMW %CALLNAME%在一段时间内、都在向%CALLNAME:MASTER%撒娇……
			ELSE
				PRINTFORMW %CALLNAME%露出了曾经相遇时所不能想象的撒娇模样……
			ENDIF

		CASEELSE

	ENDSELECT

;屈服刻印Lv0
ELSEIF MARK:屈服刻印 == 0
		PRINTFORMW 「%CNAME("二人称")%……%TEXTR("？/在、干什么……？")%」
		PRINTFORMW %CALLNAME%静静地看向%CALLNAME:MASTER%……

;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1
	IF RAND:2
		PRINTFORMW 「%CNAME("二人称")%……告诉我吧？」
		PRINTFORMW 「%CNAME("一人称")%人与人的接触……」
		PRINTFORMW %CALLNAME%轻轻地%TEXTR("触摸%CALLNAME:MASTER%的脸颊/把手放在%CALLNAME:MASTER%胸前/抚摸着%CALLNAME:MASTER%的手")%……

	ELSE
		PRINTFORMW 「……%CNAME("二人称")%的手臂……%CNAME("二人称")%的肩膀……%CNAME("二人称")%的……脸……」
		PRINTFORMW %CALLNAME%像是要确认%CALLNAME:MASTER%的身体似的摸了过来……

	ENDIF
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2
	IF RAND:2
		PRINTFORMW 「%CNAME("二人称")%……这次、要做什么呢……？」
		PRINTFORMW %CALLNAME%的眼中、隐约散发着好奇的光芒……
	ELSE
		PRINTFORMW 「呐……快教我人类的事情、%CNAME("二人称")%……」
		PRINTFORMW %CALLNAME%很期待与%CALLNAME:MASTER%的事情……

	ENDIF

;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3
	PRINTFORMW 「今天、%CNAME("一人称")%想要做什么呢？」
	PRINTFORMW 「希望%CNAME("一人称")%……变成什么样子……？」
	PRINTFORMW 感觉%CALLNAME%的姿势越来越往前倾。

ENDIF
RETURN 1

;-------------------------------------------------
;調教終了時のセリフ
;-------------------------------------------------
@EVENTEND
SIF NO:TARGET != 17
	RETURN 1

DRAWLINE

;なにもせずに終了
IF PREVCOM == -1
	IF TALENT:恋慕
		PRINTFORMW 「%CNAME("二人称","かな")%……什么也不做吗……？」
		PRINTFORMW %CALLNAME%寂寞地垂下肩膀……
	ELSE
		PRINTFORMW 「……？」
		PRINTFORMW %CALLNAME%歪着小脑袋……
	ENDIF

;恋慕で処女喪失時の口上
ELSEIF EX:処女喪失 && TALENT:恋慕
		PRINTFORMW 「呼呼……心也好、身体也好……%CNAME("二人称","かな")%都收下了……」
		PRINTFORMW 「不只是作为人偶……作为女孩子、也是%CNAME("二人称","かな")%的东西……」
		IF STATE("撃沈", MASTER)
			PRINTFORMW 「不行……！　%CNAME("一人称","かな")%、太幸福了……！」
			PRINTFORMW 听着%CALLNAME%的声音、%CALLNAME:MASTER%也慢慢睡去……

		ELSEIF BASE:精力 <= 0 || BASE:体力 <= 1
			PRINTFORMW 「啊呜……%CNAME("一人称","かな")%……太幸福了……」
			PRINTFORMW 如同梦呓般、%CALLNAME%慢慢闭上了眼睛……

		ELSE
			PRINTFORMW 「不行……！　%CNAME("一人称","かな")%、太幸福了……！」
			PRINTFORMW 从下方滴落处女血的时候、%CALLNAME%双手捂住脸……
		ENDIF

;笨蛋消去イベント
ELSEIF TALENT:恋慕 && COND("性欲大満足") && TALENT:笨蛋
		PRINTFORMW 「哈……幸福……%CNAME("二人称","かな")%、也很幸福……？」
		PRINTFORMW 如果%CALLNAME:MASTER%幸福的话、自己也会幸福、%CALLNAME%迅速睁開了眼睛。
		PRINTFORMW 「如果变得幸福的话、幸福……没错、为什么……」
		PRINTFORM 「……%CNAME("一人称","かな")%、加油……为了能让大家觉得%CNAME("二人称","かな")%更幸福……
		IF STATE("撃沈", MASTER)
			PRINTFORMW ！」
			PRINTFORMW 在失去意识之前看到的%CALLNAME%的脸、充满了至今为止从未见过的干劲……

		ELSEIF BASE:精力 <= 0 || BASE:体力 <= 1
			PRINTFORMW 」
			PRINTFORMW 将话语刻在心里、%CALLNAME%慢慢闭上了眼睛……

		ELSE
			PRINTFORMW ！」
			PRINTFORMW 紧握双手的%CALLNAME%充满了从未见过的干劲……

		ENDIF
		PRINTW ・
		PRINTW ・
		PRINTW ・
		PRINTFORMW %CALLNAME%似乎改变了一些东西……
		PRINTFORMW %CALLNAME%失去了[笨蛋]
		TALENT:笨蛋 = 0

;你撃沈時の口上
ELSEIF STATE("撃沈", MASTER)
	;相思相愛
	IF TALENT:相思相愛
		IF RAND:2
			PRINTFORMW 「让你勉强了、对不起……%CNAME("二人称")%」
			PRINTFORMW 「%CNAME("一人称")%会照顾你的、所以要好好休息哦……」
			PRINTFORMW 额頭感觉到%CALLNAME%手心温度的同时、%CALLNAME:MASTER%的意识渐渐沉没……
		ELSE
			PRINTFORMW 「……谢谢、%CNAME("二人称")%……」
			PRINTFORMW 「%CNAME("二人称")%为我加油、%CNAME("一人称","かな")%很高兴……」
			PRINTFORMW 感觉就像被%CALLNAME%温柔拥抱着、%CALLNAME:MASTER%陷入了睡眠中……

		ENDIF

	;恋慕
	ELSEIF TALENT:恋慕
		IF RAND:2
			PRINTFORMW 「呐、%CNAME("二人称","かな")%满足了吗……？」
			PRINTFORMW 「如果能%TEXTR("幸福/舒服")%的话、会很開心……」
			PRINTFORMW 与%CALLNAME%兴奋的声音相反、%CALLNAME:MASTER%的意识迅速被黑暗吞噬……

		ELSE
			PRINTFORMW 「……啊！？　%CNAME("二人称","かな")%、不要紧吗……！？」
			PRINTFORMW 「呐%CNAME("二人称","かな")%、振作些、%CNAME("二人称","かな")%！？」
			PRINTFORMW 在惊慌的%CALLNAME%的声音中、%CALLNAME:MASTER%的意识中断了……

		ENDIF

	;其他
	ELSE
		PRINTFORMW 「……？」
		PRINTFORMW 在失去意识之前看到的最后的情景是、不可思议地歪着小脑袋的%CALLNAME%的脸……

	ENDIF

;小菊撃沈時の口上
ELSEIF BASE:精力 <= 0 || BASE:体力 <= 1
	;相思相愛
	IF TALENT:相思相愛
		IF RAND:2
			PRINTFORMW 「呼呼……内心和身体都满满的……」
			PRINTFORMW 「%CNAME("一人称","かな")%很幸福……%CNAME("二人称","かな","甘え")%……」
			PRINTFORMW 精疲力尽的%CALLNAME%露出了满足的微笑……

		ELSE
			PRINTFORMW 「……对不起、%CNAME("二人称","かな")%……」
			PRINTFORMW 「更多……本来想为你做更多的……」
			PRINTFORMW 肢体无力的%CALLNAME%慢慢地闭上眼睛沉入微睡中……

		ENDIF

	;恋慕
	ELSEIF TALENT:恋慕
		IF RAND:2
			PRINTFORMW 「还……还没関系……所以……」
			PRINTFORMW 「不用停止……%CNAME("二人称","かな","甘え")%……！」
			PRINTFORMW 看着想要超越身体极限的%CALLNAME%、%CALLNAME:MASTER%温柔地陪她入睡……

		ELSE
			PRINTFORMW 「……我有让……%CNAME("二人称","かな")%舒服吗……？」
			PRINTFORMW 「%CNAME("一人称","かな")%的……更加喜欢……你……」
			PRINTFORMW 当抚摸着像胡言乱语般嘟哝着的%CALLNAME%的頭时、%CALLNAME%瞬间坠入了睡梦中……

		ENDIF

	;其他
	ELSE
		PRINTFORMW 「…………」
		PRINTFORMW 疲惫不堪的%CALLNAME%像被扔掉的人偶一样、弯曲着肢体躺着……

	ENDIF

;相思相愛＋満足
ELSEIF TALENT:相思相愛 && COND("満足")
	;中出しされた
	IF RAND:3 == 1 && ( CHECK_STAIN(STAIN:Ｖ, "精液") || CHECK_STAIN(STAIN:Ａ, "精液") )
		PRINTFORMW 「%TEXTR("好厉害/呐/啊呜")%……%CNAME("一人称","かな")%的里面、都是%CNAME("二人称","かな")%的那个……」
		PRINTFORM %CALLNAME%的股间涌出精液
		;中出し精液が多い
		IF ( EX:Ｖ中出し + EX:Ａ中出し ) >= 5
			PRINTFORM %TEXTR("到处都是/乱七八糟的")%

		ELSE
			PRINTFORM %TEXTR("黏糊糊的/粘粘的/粘糊糊的/稠稠的")%

		ENDIF
		PRINTFORMW 一边玩弄一边发出感叹的声音…

	ELSEIF RAND:2
		PRINTFORMW 结束后、%CALLNAME%\@ ( TALENT:巨乳 && !TALENT:小尻 ) || ( TALENT:巨尻 && !TALENT:貧乳 ) ? 肉感的身体 # 的身体 \@仿佛在品味着余韵一般紧贴着……
		PRINTFORMW 「%CNAME("二人称","かな","甘え")%……%TEXTR("幸福/最喜欢了/高兴/喜欢")%……」
		PRINTFORMW 「呼呼……%CNAME("一人称","かな")%……是为了和%CNAME("二人称","かな")%%TEXTR("在一起/变成这样/连在一起")%而生……」

	ELSE
		PRINTFORMW 「%CNAME("二人称","かな")%、足够了吗……？」
		PRINTFORMW 「……%CNAME("二人称","かな")%、也和%CNAME("一人称","かな")%一样%TEXTR("幸福/舒服/高兴/被填满心")%、開心……」
		PRINTFORMW 将%CALLNAME:MASTER%的頭抱在\@ TALENT:巨乳 ? 豊満的胸 # 胸 \@前、%CALLNAME%温柔的心跳传了出来……

	ENDIF
;恋慕＋満足
ELSEIF TALENT:恋慕 && COND("満足")
	;中出しされた
	IF RAND:3 == 1 && ( CHECK_STAIN(STAIN:Ｖ, "精液") || CHECK_STAIN(STAIN:Ａ, "精液") )
		PRINTFORMW 「%TEXTR("好厉害/呐/啊呜")%……%CNAME("一人称","かな")%的里面、都是%CNAME("二人称","かな")%的那个……」
		PRINTFORM %CALLNAME%的股间涌出精液
		IF EX:Ｖ中出し >= 5 || EX:Ａ中出し >= 5 ;中出し精液が多い
			PRINTFORM %TEXTR("到处都是/乱七八糟的")%

		ELSE
			PRINTFORM %TEXTR("黏糊糊的/粘粘的/粘糊糊的/稠稠的")%

		ENDIF
		PRINTFORMW 一边玩弄一边发出感叹的声音…

	ELSEIF RAND:2 && !TALENT:笨蛋
		PRINTFORMW 「呐、怎么样……？　%CNAME("二人称","かな")%、舒服吗……？」
		PRINTFORMW 「%CNAME("一人称","かな")%、会变得更舒服的……！」
		PRINTFORMW %CALLNAME%提前充满了下次的干劲……

	ELSE
		PRINTFORMW 「%TEXTR("呼呼/嗯/唔")%……%TEXTR("好幸福/好厉害/好開心")%……」
		PRINTFORMW 「呼呼……呐、%CNAME("二人称","かな")%……什么时候继续做呢？」
		PRINTFORMW %CALLNAME%抑制不住幸福感、露出笑容催促着……

	ENDIF

;恋慕
ELSEIF TALENT:恋慕
	IF RAND:2
		PRINTFORMW 「%CNAME("二人称","かな")%、已经累了吗……？」
		PRINTFORMW 「……可以哦、不管多少次都可以的吧？」
		PRINTFORMW %CALLNAME%脸上露出了笑容、但总觉得有些欠缺……

	ELSE
		PRINTFORMW 「%TEXTR("嗯/呼/嗯嗯")%……为什么……？」
		PRINTFORMW 「如果是%CNAME("一人称","かな")%的话、不要紧哦……？」
		PRINTFORMW %CALLNAME:MASTER%总算安慰了伤心地扭转身体的%CALLNAME%……

	ENDIF

;屈服刻印无
ELSEIF MARK:屈服刻印 == 0
	PRINTFORMW 「……？」
	PRINTFORMW %CALLNAME%始终带着怀疑的表情……

;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1
	PRINTFORMW 「%CNAME("二人称","かな")%……」
	PRINTFORMW 结束后、%CALLNAME%轻轻地叫了%CALLNAME:MASTER%……

;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2
	PRINTFORMW 「%CNAME("二人称","かな")%……很開心……？」
	PRINTFORMW %CALLNAME%微微地笑了……

;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3
	PRINTFORMW 「%CNAME("二人称","かな")%……已经足够了吗……？」
	PRINTFORMW %CALLNAME%觉得不满意地用大腿摩擦着……

ENDIF
RETURN 1

;-------------------------------------------------
;指令実行時のセリフ
;-------------------------------------------------
@KOJO_MESSAGE_COM_K17
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0

;-------------------------------------------------
;愛撫
;-------------------------------------------------
IF SELECTCOM == 0

	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕 || ABL:欲望 >= 3
			PRINTFORMW 「再碰一下……%CNAME("二人称","かな","甘え")%」
		ELSEIF !TALENT:不知羞恥 || CEVENT("レッスン：はじらい")
			PRINTFORMW 「……%CNAME("二人称","かな","どもり")%……」
			PRINTFORMW %CALLNAME%困惑地移開了视线……
		ELSE
			PRINTFORMW 「嗯嗯……？」
			PRINTFORMW %CALLNAME%一边凝视着%CALLNAME:PLAYER%一边接受着爱抚……
		ENDIF

	;二回目以降
	ELSE
		CALL EVENT_K17_GEN, "愛撫", "愛撫"

	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰　面部騎乗(被逆推ているとき)
;-------------------------------------------------
IF SELECTCOM == 1
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ているとき
		IF TEQUIP:推倒
			IF TALENT:恋慕 || ABL:欲望 >= 5
				PRINTFORMW 「%CNAME("二人称","かな","甘え")%……%CNAME("一人称","かな")%、開心吗……？」
			ELSEIF !TALENT:不知羞恥
				PRINTFORMW 「%CNAME("二人称","かな")%……对不起……%CNAME("二人称","かな","甘え")%……！」
				PRINTFORMW 「明明这么害羞……怎么办才好、%CNAME("二人称","かな","甘え")%……！」
			ELSE
				PRINTFORMW 「……？？」
				PRINTFORMW %CALLNAME%很不可思议地摇着腰……
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕 || !TALENT:不知羞恥  || ABL:欲望 >= 5
				PRINTFORMW 「啊……%CNAME("二人称","かな","甘え")%……」
				PRINTFORMW %CALLNAME%一边呼唤着%CALLNAME:PLAYER%一边颤抖着身体。
			ELSE
				PRINTFORMW 「嗯……唔……？」
				PRINTFORMW 突然脱力的%CALLNAME%身体颤抖着。
			ENDIF
		ENDIF
	;二回目以降
	;清洁舔阴
	ELSEIF COND("清洁舔阴フラグ", PLAYER)
		CALL EVENT_K17_GEN, "お掃除"
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕or欲望5以上
		IF TALENT:恋慕 || ABL:欲望 >= 5
			PRINTFORM 「%TEXTR("啊/呼呼/哇/好喜欢")%\@ RAND:2 == 0 ? ！　 # …… \@%CNAME("二人称","かな")%\@ RAND:2 == 0 ? ！　 # …… \@
			SIF RAND:3 == 0
				PRINTFORM %CNAME("二人称","かな","甘え")%\@ RAND:2 == 0 ? ！　 # …… \@
			PRINTFORMW %TEXTR("更加/用力/好厉害/好喜欢")%\@ RAND:2 == 0 ? ！　 # …… \@」
		ELSEIF !TALENT:不知羞恥
			PRINTFORMW 「%CNAME("二人称","かな")%……对不起……%CNAME("二人称","かな","甘え")%……！」
		;それ以外
		ELSE
			CALL EVENT_K17_GEN, "愛撫", "阴蒂"
		ENDIF
	;それ以外
	ELSE
		CALL EVENT_K17_GEN, "愛撫", "阴蒂"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門愛撫
;-------------------------------------------------
IF SELECTCOM == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF ( TALENT:相思相愛 || !TALENT:不知羞恥 ) && EXP:Ａ経験 == 0
			PRINTFORMW 「%CNAME("二人称","かな")%……那里是……！？」
			PRINTFORMW %CALLNAME%一下子缩成一团。
			PRINTFORMW 但是又慢慢深呼吸放松了身体。
			PRINTFORMW 「……是%CNAME("二人称","かな")%为我做的事情……所以……」
		ELSEIF EXP:Ａ経験 == 0
			PRINTFORMW 「嗯……？？」
			PRINTFORMW 因为是第一次的原因、%CALLNAME%犹豫不决地摇动着腰……

		ELSEIF CHECK("Ａ指挿入") || TEQUIP:肛用振動棒
			PRINTFORMW 「啊……咕……」
			PRINTFORMW 漏出声音的同时、%CALLNAME%也接受了肛門里摩擦的感觉……

		;それ以外
		ELSE
			PRINTFORMW 「啊……嗯嗯……」
			PRINTFORMW %CALLNAME%老实地接受了肛門里摩擦的感觉……
		ENDIF
	;二回目以降
	ELSE
		IF TEQUIP:肛用振動棒
		ELSE
			CALL EVENT_K17_GEN, "愛撫", "肛門"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;-------------------------------------------------
IF SELECTCOM == 3
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		IF !TALENT:不知羞恥 && CEVENT("レッスン：はじらい")
			IF ABL:自慰中毒 >= 3 && RAND:3 == 0
				PRINTFORMW 「やぁぁぁ……ごめんなさい、ごめんなさいぃ…」
				PRINTFORMW 「こんな、はずかしいことなのに……酱と、教えてもらったのにぃ…」
			ELSEIF RAND:2
				PRINTFORMW 「…みてぇ……%CNAME("二人称","かな")%……」
				PRINTFORMW 「%CNAME("一人称")%、こんなにいっぱい、はずかしくなってるよ…」
			ELSE
				PRINTFORMW 「見てる…%CNAME("二人称")%が見てるぅ……」
				PRINTFORMW 「えっちな顔で…みてるよぅっ…」
			ENDIF
		ELSEIF ABL:欲望 >= 3
			IF RAND:2
				PRINTFORMW 「う……ぅっ……んぅ……！」
				PRINTFORMW 「……？」
				PRINTFORMW 「%CNAME("二人称")%…はぁはぁって、してる……どうしたの？くるしいの？」
			ELSE
				PRINTFORMW 「ん、くぅぅっ……うぅんっ…」
				PRINTFORMW 「これ、きもちぃ……もっと…したいよぉ…」
				PRINTFORMW 小菊はうっとりしながら快感に浸っている…
			ENDIF
		ELSE
			IF RAND:2
				PRINTFORMW 「んんっ…？んっ…？」
				PRINTFORMW 「ここ、こうすると…さっきよりも…すごい……」
			ELSE
				PRINTFORMW 「ん、わかった……さわって、みる……」
				PRINTFORMW 「……………ぁっ」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰莖(扶她/男性のみ)
;-------------------------------------------------
IF SELECTCOM == 4
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;胸愛撫
;-------------------------------------------------
IF SELECTCOM == 5
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「嗯……」
		PRINTFORMW %CALLNAME%一直看着胸前%CALLNAME:PLAYER%的手……
	;二回目以降
	ELSE
		CALL EVENT_K17_GEN, "愛撫", "胸圍"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;接吻
;-------------------------------------------------
IF SELECTCOM == 6
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF TALENT:恋慕 || ABL:欲望 >= 5
				PRINTFORMW 「%CNAME("二人称","かな","甘え")%……%CNAME("一人称","かな")%、已经无法忍耐了……！」
				PRINTFORMW 「%TEXTR("啾/啾啾")%……%TEXTR("嗯/嗯嗯")%……！」
				PRINTFORMW %CALLNAME%饥渴地重叠嘴唇……

			ELSEIF !TALENT:不知羞恥
				PRINTFORMW 「……%CNAME("二人称","かな")%……%TEXTR("啾/啾啾")%……%TEXTR("嗯/嗯嗯")%……」
				PRINTFORMW 「……搞砸了……」
				PRINTFORMW %CALLNAME%一边害羞着一边用手指描画着自己的嘴唇……

			ELSE
				PRINTFORMW 「%TEXTR("嗯/嗯姆")%……%TEXTR("嗯/嗯唔")%……？」
				PRINTFORMW 「……？？」
				PRINTFORMW 刚刚分開嘴唇的%CALLNAME%不能理解自己做了什么、很困惑……

			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				PRINTFORMW 「啊……%CNAME("二人称","かな","甘え")%……嗯嗯……」
				PRINTFORMW 「……第一次接吻、献给了%CNAME("二人称","かな")%……」
				PRINTFORMW 「呼呼……咦？　总觉得、笑出来了……呼呼呼……为什么呢……？」
				PRINTFORMW %CALLNAME%微微地笑着……

			ELSEIF !TALENT:不知羞恥
				PRINTFORMW 「啊……%CNAME("二人称","かな")%……！？　嗯哼……！」
				PRINTFORMW 「……第一次接吻……所以……？」
				PRINTFORMW %CALLNAME%一脸闹别扭地移開了视线……

			ELSE
				PRINTFORMW 「%TEXTR("嗯/嗯姆")%……%TEXTR("嗯/嗯唔")%……？」
				PRINTFORMW %CALLNAME%睁着眼睛送出了初吻……

			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;テンダー接吻で特殊な反応を示すのは恋慕か害羞があるときだけ
		IF CHECK_COM("テンダー接吻") && ( TALENT:恋慕 || !TALENT:不知羞恥 )
			IF TALENT:恋慕
				PRINTFORMW 「%CNAME("二人称","かな","甘え")%……%TEXTR("最喜欢/喜欢")%……嗯……」
				PRINTFORMW %CALLNAME%一脸安心地放松了身体……
				PRINTFORMW 「……今天也请、努力的%TEXTR("幸福/舒服/教我怎么幸福")%呢……」

			ELSE
				PRINTFORMW 「……%CNAME("二人称","かな")%……嗯哼……」
				PRINTFORMW %CALLNAME%的脸、连耳朵都染红了……

			ENDIF
		ELSEIF TALENT:恋慕 || ABL:Ｍ感覚 >= 5
			PRINT 「
			SIF RAND:3 == 0
				PRINTFORM %CNAME("二人称","かな")%……
			PRINTFORM %TEXTR("啾/啾啵/啾啾/啾卜")%……%TEXTR("啾/啾啵/啾啾/啾卜")%……
			SIF RAND:3 == 0
				PRINTFORM %CNAME("二人称","かな","甘え")%……
			PRINTFORMW %TEXTR("更多/继续/舒服/開心")%……」
		ELSEIF !TALENT:不知羞恥
			PRINT 「
			SIF RAND:3 == 0
				PRINTFORM %CNAME("二人称","かな")%……
			PRINTFORMW %TEXTR("啾/库啾")%……%TEXTR("嗯/嗯嗯")%……」
		ELSE
			PRINTFORMW 「%TEXTR("嗯/嗯姆")%……%TEXTR("嗯/嗯姆/嗯嗯/嗯唔")%…\@ RAND:2 == 0 ? …？ # … \@」
			PRINTFORMW %CALLNAME%呆呆地和%CALLNAME:PLAYER%接吻……
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;阴部愛撫
;阴蒂の場合にはCHECK_COM("陰核愛撫"), 阴部の場合にはCHECK_COM("阴部愛撫"), 恥丘ならCHECK_COM("恥丘愛撫")がONになる
;-------------------------------------------------
IF SELECTCOM == 7
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕 || !TALENT:不知羞恥 || ABL:欲望 >= 5
			PRINTFORMW 「%TEXTR("啊/唔/嗯")%……%CNAME("二人称","かな")%……」
			PRINTFORMW %CALLNAME%\@ TALENT:恋慕 ? 慢慢放松着身体 # 颤抖着 \接受@%CALLNAME:PLAYER%的爱抚……\@
		ELSE
			PRINTFORMW 「嗯嗯……？」
			PRINTFORMW %CALLNAME%扭了扭腰……

		ENDIF
	;二回目以降
	;中出し後にお掃除
	ELSEIF CHECK_COM("擦拭")
		CALL EVENT_K17_GEN, "お掃除"

	;それ以外
	ELSE
		CALL EVENT_K17_GEN, "愛撫"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;指挿入
;CHECK_COM("玩弄Ｇ点")とTEQUIP:振動棒で大きく分岐する
;-------------------------------------------------
IF SELECTCOM == 8
		CALL EVENT_K17_GEN, "愛撫", "ヴァギナ"
	RETURN 1
ENDIF

;-------------------------------------------------
;舐肛　Ａ面部騎乗(被逆推ているとき)
;-------------------------------------------------
;舐肛
IF SELECTCOM == 9
	CALL EVENT_K17_GEN, "愛撫", "肛門"
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方手交
;-------------------------------------------------
IF SELECTCOM == 10
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方乳交
;-------------------------------------------------
IF SELECTCOM == 11
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方足交
;-------------------------------------------------
IF SELECTCOM == 12
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開阴道
;-------------------------------------------------
IF SELECTCOM == 13
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開菊穴
;-------------------------------------------------
IF SELECTCOM == 14
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道指挿入
;-------------------------------------------------
IF SELECTCOM == 15
	CALL EVENT_K17_GEN, "愛撫", "尿道"
	RETURN 1
ENDIF
;-------------------------------------------------
;跳蛋
;-------------------------------------------------
IF SELECTCOM == 30
	CALL EVENT_K17_GEN, "愛撫", "阴蒂"
	RETURN 1
ENDIF

;-------------------------------------------------
;振動棒
;-------------------------------------------------
;開始時
IF SELECTCOM == 31
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕有
		IF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ｖ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:振動棒 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛用振動棒
;-------------------------------------------------
;開始時
IF SELECTCOM == 33
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕有
		IF CHECK("Ａ振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ａ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:肛用振動棒 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("Ａ振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飛機杯
;-------------------------------------------------
IF SELECTCOM == 37
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;Ｖ挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 60 && SELECTCOM <= 69 && FIRSTCOMS("Ｖ挿入") == 0
	;処女
	IF TALENT:処女
		;（一応恋慕と）推倒中
		IF TALENT:恋慕 && TEQUIP:推倒
			PRINTFORMW 「%CNAME("二人称","かな")%っ……%CNAME("一人称","かな")%、已经无法忍耐了……！」
			PRINTFORMW 「啊……嗯……啊！」
			PRINTFORMW 「不……%CNAME("二人称","かな")%、我的第一次献给你了……」
			PRINTFORMW 「不要生气……想要、好好的变成%CNAME("二人称","かな")%的东西……！」
			PRINTFORMW %CALLNAME%一边流泪一边紧紧抱住%CALLNAME:PLAYER%……

		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW 「可、可以哦……来吧……%CNAME("二人称","かな")%」
			PRINTFORMW 「啊……！　嗯哼……哈……全部……进、来吧……」
			IF PALAM:Ｖ潤 >= 3000
				PRINTFORMW 「嗯、没関系……一点也不像想的那样疼……」
				PRINTFORMW 「因为是%CNAME("二人称","かな")%……是吧？」
				;後背位と背面座位だと顔が見えない
				IF SELECTCOM == 61 || SELECTCOM == 64
					PRINTFORMW %CALLNAME:PLAYER%按着%CALLNAME%在颤抖的背部……

				ELSE
					PRINTFORMW %CALLNAME%高涨着脸露出微笑……

				ENDIF

			ELSE
				PRINTFORMW 「稍微、有点紧……比想象中还要好……」
				PRINTFORMW 「但是……总觉得、有点紧张……」
				PRINTFORMW %CALLNAME%感到不舒服、身体缩成一团、阴道被用力地勒紧了……

			ENDIF

		;それ以外
		ELSE
			PRINTFORMW 「嗯……%CNAME("二人称","かな")%……？」
			IF PALAM:Ｖ潤 >= 3000
				PRINTFORMW 「啊……啊……！？」
				PRINTFORMW 「这个、是什么……%CNAME("二人称","かな")%……？」
				PRINTFORMW 惊讶地询问的%CALLNAME%、没有任何抵抗就接受了%CALLNAME:PLAYER%的插入……

			ELSE
				PRINTFORMW 「呼……啊……！？」
				PRINTFORMW 「%CNAME("二人称","かな")%……总觉得、有点难受……唔！」
				PRINTFORMW 强行插入%CALLNAME%未湿润的穴内、发出了类似压到肺部而发出的声音……

			ENDIF

		ENDIF
	;非処女
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「%CNAME("一人称","かな")%的、第一次想献给%CNAME("二人称","かな")%……」
			PRINTFORMW 「……但是……？」
			PRINTFORMW 「嗯……哼……！　和%CNAME("二人称","かな")%……做了、是吧……？」
			PRINTFORMW 第一次和%CALLNAME:PLAYER%交合的%CALLNAME%、含泪微笑着……

		;それ以外
		ELSE
			PRINTFORMW 「嗯……唔……？」
			PRINTFORM 已经失去了处女的阴道、
			SIF PALAM:Ｖ潤 < 3000
				PRINTFORM 尽管缺乏湿润
			PRINTFORMW 还是好好地接受了%CALLNAME:PLAYER%的插入……

		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ｖ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOMS("Ｖ挿入") == 0 && FIRSTCOM(SELECTCOM) ;&& RAND:3 == 0
	;巨根 恋慕でなければ感想无
	IF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1,TALENT:恋慕)
		PRINTFORMW 「%TEXTR("嗯/嗯库/呜/库")%っ……！　%CNAME("二人称","かな")%的、好大……！」
		PRINTFORMW 「但是、%CNAME("一人称","かな")%……就是为此而生的……%TEXTR("继续做吧/不用停下/让我感受更多/填满我吧")%……！」

	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 65
			PRINTFORMW 「%TEXTR("啊/呀/嗯")%\@ RAND:2 == 0 ? ！　 # …… \@%TEXTR("哈/啊/库姆/库")%\@ RAND:2 == 0 ? っ……！ # …… \@」
			PRINTFORMW 「呼呼……糟糕」
			SIF ABL:奉仕精神 >= 3
				PRINTFORMW 「呐、%CNAME("二人称","かな")%……今天想自己动吗？　还是想让我动……？」

		;対面座位
		CASE 63
			PRINTFORMW 「呼呼……总、总觉得……脸上很热、%TEXTR("害羞/心跳不已/难为情/好紧张")%……是吗？」
			PRINTFORMW 「%CNAME("二人称","かな","甘え")%……一起、%TEXTR("变得舒服/变得高兴/心跳加速")%吧……」

		;後背位と屈曲位
		CASE 61, 62
			PRINTFORMW 「%CNAME("二人称","かな")%从……这、这里……这样……」
			SIF !TALENT:不知羞恥 || CEVENT("レッスン：はじらい")
				PRINTFORMW 「好、好羞耻、%CNAME("二人称","かな","甘え")%……！」
			PRINTFORM 「%TEXTR("啊/呀/嗯/库姆")%\@ RAND:2 == 0 ? ！　 # …… \@%CNAME("二人称","かな","どもり")%の
			;小菊桑は正直者
			IF SIZE("阴茎", PLAYER) == 0
				PRINTFORMW 那个……！」
			ELSE
				PRINTFORMW %TEXTR("填满了/好深/那个")%……！」
			ENDIF

		;それ以外
		CASEELSE
			PRINTFORMW 「%TEXTR("嗯/嗯呐/啊/啊嗯/呀")%……%CNAME("二人称","かな","甘え")%……」
			PRINTFORMW 「%CNAME("二人称","かな")%……%TEXTR("很高兴/很舒服/好厉害")%……」

		ENDSELECT
	;不知羞恥でないか、レッスン：はじらい済みか、屈服刻印がついている
	ELSEIF !TALENT:不知羞恥 || CEVENT("レッスン：はじらい") || MARK:屈服刻印 >= 1
		;後背位と屈曲位
		IF SELECTCOM == 61 || SELECTCOM == 62
			IF !TALENT:不知羞恥 || CEVENT("レッスン：はじらい")
				PRINTFORMW 「%CNAME("二人称","かな")%……不好意思……%TEXTR("啊/嗯哼/库")%……」

			ELSE
				PRINTFORMW 「%CNAME("二人称","かな")%的那个……%TEXTR("啊/嗯哼/库")%……」

			ENDIF

		;それ以外
		ELSE
				PRINTFORMW 「%CNAME("二人称","かな")%的那个……%TEXTR("啊/嗯哼/库")%……」

		ENDIF

	;それ以外は反応に乏しい
	ELSE
		PRINTFORMW 「%TEXTR("哈/啊/嗯")%……%TEXTR("啊/嗯哼/库")%…\@ RAND:2 == 0 ? … # …？ \@」
		PRINTFORMW 每次突进、就会发出从%CALLNAME%肺部挤出的声音……

	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ｖ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:手下留情 && NOWEX:Ｖ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ｖ対応指令") && RAND:2
		IF TALENT:恋慕
					PRINT 「
			SIF RAND:3 == 0
				PRINTFORM %CNAME("二人称","かな")%\@ RAND:2 == 0 ? ！　 # …… \@
			SIF RAND:3 == 0
				PRINTFORM %CNAME("二人称","かな","甘え")%\@ RAND:2 == 0 ? っ！　 # っ……！ \@

			PRINTFORM %TEXTR("舒服/喜欢/喜欢这个/呀/不行了")%\@ RAND:2 == 0 ? ！　 # …… \@
			;欲望3以上で淫語
			IF ABL:欲望 >= 3 && RAND:3 == 0
				PRINTFORM %TEXTR("咕噜咕噜地混在一起/好深/好厉害/要变得奇怪了/要奇怪了/要被弄坏了/要坏掉了/要不行了")%

			ELSE
				PRINTFORM %TEXTR("那个位置/那里是/不行了")%

			ENDIF
			PRINTFORM \@ RAND:2 == 0 ? っ！　 # …… \@
			PRINTFORM %TEXTR("嗯嗯/喜欢/好舒服/感觉要/去了")%
			SIF RAND:3 == 0
				PRINTFORM \@ RAND:2 == 0 ? っ！　 # …… \@%CNAME("二人称","かな","甘え")%
			PRINTFORMW \@ RAND:2 == 0 ? っ！ # ……！ \@」

		ELSE
			PRINTFORM 「%TEXTR("啊/嗯/呀")%\@ RAND:2 ? ！　 # …… \@%TEXTR("呀/嗯库/嗯哼/库/啊")%
			SIF RAND:3 == 0
				PRINTFORM \@ RAND:2 ? ！　 # …… \@%CNAME("二人称","かな","甘え")%
			PRINTFORM \@ RAND:2 ? ！ # ……！ \@　%TEXTR("啊/啊嗯/啊姆/库姆/好奇怪")%
			PRINTFORMW \@ RAND:2 ? っ！ # ……！ \@」
		ENDIF
	;それ以外
	ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
	ENDIF
	RETURN 1
;-------------------------------------------------
;二穴挿入(書く場合には;を消してください)
;-------------------------------------------------
;ELSEIF SELECTCOM >= 60 && SELECTCOM <= 79 && COND("３Ｐ")
;	IF CHECK_COM("两根挿入Ｖ中")
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;余裕有
;		ELSEIF CHECK("两根挿入Ｖ中")
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		RETURN 1
;	ELSEIF CHECK_COM("两根挿入Ａ中")
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;余裕有
;		ELSEIF CHECK("两根挿入Ａ中")
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		RETURN 1
;	ELSEIF CHECK_COM("二穴挿入")
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;余裕有
;		ELSEIF CHECK("二穴挿入")
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		RETURN 1
;	ENDIF
ENDIF

;-------------------------------------------------
;正常位
;-------------------------------------------------
IF SELECTCOM == 60
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「呼呼……总觉得、好像被%CNAME("二人称","かな")%守护着……」
			PRINTFORMW 「啊……哈……%CNAME("二人称","かな")%的……！」

		ELSEIF !TALENT:不知羞恥 || CEVENT("レッスン：はじらい")
			PRINTFORMW 「啊……哈……%CNAME("二人称","かな")%的……！」
			PRINTFORMW 「呀……%CNAME("二人称","かな","甘え")%、不要看……一定、变成了奇怪的表情……！」

		;それ以外
		ELSE
			PRINTFORMW 「啊……嗯……」
			PRINTFORMW %CALLNAME%闭上眼被%CALLNAME:PLAYER%插入……

		ENDIF
	;二回目以降
	ELSE
		IF TALENT:恋慕 && RAND:4 == 0
			PRINTFORMW 「%TEXTR("啊/啊姆/嗯/嗯姆/呀")%、%TEXTR("嗯/嗯嗯/嗯木/嗯库/啊/啊姆")%……%CNAME("二人称","かな")%……稍微、等一下……？」
			PRINTFORMW 轻声制止%CALLNAME:PLAYER%后、%CALLNAME%は%TEXTR("悄悄抱上来/悄悄亲了一下脸/悄悄用手抚摸着胸")%……
			PRINTFORMW 「唉嘿嘿……可以了、%CNAME("二人称","かな")%……继续、填满吧……？」

		ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"

		ENDIF

	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;後背位
;-------------------------------------------------
IF SELECTCOM == 61
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「%CNAME("二人称","かな","甘え")%……看不见、有点害怕……」
			PRINTFORMW 「嗯……！　%CNAME("二人称","かな")%、这个、感觉、好厉害……啊！？」

		ELSEIF !TALENT:不知羞恥 || CEVENT("レッスン：はじらい")
			PRINTFORMW 「%CNAME("二人称","かな")%、%CNAME("二人称","かな","甘え")%……这个、不行……！」
			PRINTFORMW 「全部都被看见了……不要看、%CNAME("二人称","かな","甘え")%！　啊、嗯……！」

		;それ以外
		ELSE
			PRINTFORMW 「嗯……呜……」
			PRINTFORMW %CALLNAME%顺从地撅起屁股、接受%CALLNAME:PLAYER%的插入……
		ENDIF
	;二回目以降
	ELSE
		IF TALENT:恋慕 && RAND:4 == 0
			PRINTFORMW 「%TEXTR("啊/啊姆/嗯/嗯呼/呀")%……%CNAME("二人称","かな")%、碰到奇怪的地方了……%TEXTR("嗯/嗯嗯/嗯库/啊/啊姆")%っ！」
			PRINTFORMW 「%TEXTR("呀/哈啊/嗯库/啊/呼姆")%……%TEXTR("不要再动了/腰在动/不要用力了/停下来")%\@ RAND:2 == 0 ? ！　 # …… \@%CNAME("二人称","かな","甘え")%\@ RAND:2 == 0 ? っ！ # ……！ \@」

		ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"

		ENDIF

	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;屈曲位
;-------------------------------------------------
IF SELECTCOM == 62
	;初めて
;	IF FIRSTCOM(SELECTCOM) == 0
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;	;二回目以降
;	ELSE
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;屈服刻印Lv2以上
;		ELSEIF MARK:屈服刻印 >= 2
;			PRINTFORMW
;		;それ以外
;		ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
;		ENDIF
;	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;対面座位
;-------------------------------------------------
IF SELECTCOM == 63
	;初めて
;	IF FIRSTCOM(SELECTCOM) == 0
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;	;二回目以降
;	ELSE
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;屈服刻印Lv2以上
;		ELSEIF MARK:屈服刻印 >= 2
;			PRINTFORMW
;		;それ以外
;		ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
;		ENDIF
;	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;背面座位
;-------------------------------------------------
;背面座位
IF SELECTCOM == 64
	;初めて
;	IF FIRSTCOM(SELECTCOM) == 0
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;	;二回目以降
;	ELSE
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;屈服刻印Lv2以上
;		ELSEIF MARK:屈服刻印 >= 2
;			PRINTFORMW
;		;それ以外
;		ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
;		ENDIF
;	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;騎乗位
;-------------------------------------------------
IF SELECTCOM == 65
		;恋慕
		IF TALENT:恋慕
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
		;それ以外
		ELSE
			CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
		ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;挿入刺激Ｇ点
;-------------------------------------------------
IF SELECTCOM == 66
	CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
	RETURN 1
ENDIF

;-------------------------------------------------
;挿入子宮口玩弄
;-------------------------------------------------
IF SELECTCOM == 67
	CALL EVENT_K17_GEN, "挿入", "ヴァギナ"
	RETURN 1
ENDIF

;-------------------------------------------------
;子宮挿入
;-------------------------------------------------
IF SELECTCOM == 68
	CALL EVENT_K17_GEN, "挿入", "子宮"
	RETURN 1
ENDIF

;-------------------------------------------------
;Ａ挿入系初選択
;疼痛が少なく楽しめているかはCHECK("Ａ挿入")で判定
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 79 && FIRSTCOMS("Ａ挿入") == 0
	CALL EVENT_K17_GEN, "挿入", "肛門"
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ａ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOMS("Ａ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	CALL EVENT_K17_GEN, "挿入", "肛門"
	RETURN 1
;-------------------------------------------------
;全Ａ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	CALL EVENT_K17_GEN, "挿入", "肛門"
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門性交(初めては上のＡ挿入系初選択などで)
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 74

	CALL EVENT_K17_GEN,"挿入", "肛門"

	RETURN 1
ENDIF
;-------------------------------------------------
;肛門騎乗位
;-------------------------------------------------
IF SELECTCOM == 75
	CALL EVENT_K17_GEN, "挿入", "肛門"
	RETURN 1
ENDIF
;-------------------------------------------------
;貝あわせ
;-------------------------------------------------
IF SELECTCOM == 80
	CALL EVENT_K17_GEN, "愛撫", "愛撫"
	RETURN 1
ENDIF

;-------------------------------------------------
;雙乳間抽插
;-------------------------------------------------
IF SELECTCOM == 81
	CALL EVENT_K17_GEN, "愛撫", "胸圍"
	RETURN 1
ENDIF
;-------------------------------------------------
;乳頭奸
;-------------------------------------------------
IF SELECTCOM == 82
	CALL EVENT_K17_GEN, "挿入", "ニプル"
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道挿入
;-------------------------------------------------
IF SELECTCOM >= 83 && SELECTCOM <= 88
	CALL EVENT_K17_GEN, "挿入", "尿道"
	RETURN 1
ENDIF
;-------------------------------------------------
;洗面奶手交
;手淫と洗面奶から派生する
;-------------------------------------------------
IF CHECK_COM("洗面奶手交")
	;恋慕
	IF TALENT:恋慕
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;手淫
;-------------------------------------------------
IF SELECTCOM == 90
	CALL EVENT_K17_GEN, "奉仕", "手淫"
	RETURN 1
ENDIF

;-------------------------------------------------
;口交
;-------------------------------------------------
IF SELECTCOM == 91
	CALL EVENT_K17_GEN, "奉仕", "乳交"
	RETURN 1
ENDIF

;-------------------------------------------------
;乳交
;-------------------------------------------------
IF SELECTCOM == 92
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「……こう？」
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF RAND:3 == 0
			;恋慕
			IF TALENT:恋慕
				PRINTFORMW 「%CNAME("二人称","かな","甘え")%……きもちいい……？」
				IF TALENT:巨乳
					PRINTFORM 豐腴飽滿的胸で包み込みながら
				ELSEIF TALENT:貧乳
					PRINTFORM なだらかな胸を当てながら
				ELSE
					PRINTFORM 胸でやわやわと楽しませながら
				ENDIF
				PRINTFORMW うっとりとした視線で%CALLNAME:MASTER%を看了过来……
			;それ以外
			ELSE
				PRINTFORMW 「……%CNAME("二人称","かな")%……たのしい……？」
			ENDIF
		ELSE
			CALL EVENT_K17_GEN, "奉仕", "乳交"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;素股
;-------------------------------------------------
IF SELECTCOM == 93
	CALL EVENT_K17_GEN, "愛撫", "阴蒂"
	RETURN 1
ENDIF

;-------------------------------------------------
;泡泡浴
;-------------------------------------------------
IF SELECTCOM == 94
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;足交(PENIS(PLAYER)で調教者のチンコの有無が確認できます)
;-------------------------------------------------
IF SELECTCOM == 95
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門奉仕
;-------------------------------------------------
IF SELECTCOM == 96
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;内褲冲
;-------------------------------------------------
IF SELECTCOM == 97
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;奉仕舐陰
;-------------------------------------------------
IF SELECTCOM == 98
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;六九式
;-------------------------------------------------
IF SELECTCOM == 99
	CALL EVENT_K17_GEN, "愛撫",
	RETURN 1
ENDIF
;-------------------------------------------------
;洗面奶
;-------------------------------------------------
IF SELECTCOM == 104
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飞机杯冲
;-------------------------------------------------
IF SELECTCOM == 105
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;逆振動棒
;-------------------------------------------------
IF SELECTCOM == 106
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;逆Ａ振動棒
;-------------------------------------------------
IF SELECTCOM == 107
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;Ｖ逆挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 120 && SELECTCOM <= 124 && FIRSTCOMS("Ｖ逆挿入") == 0
	;調教者が処女
	IF TALENT:PLAYER:処女
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;正常位奉仕
;-------------------------------------------------
IF SELECTCOM == 120
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;後背位奉仕
;-------------------------------------------------
IF SELECTCOM == 121
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;騎乗位侵犯
;-------------------------------------------------
IF SELECTCOM == 122
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;Ａ正常位奉仕
;-------------------------------------------------
IF SELECTCOM == 125
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;Ａ後背位奉仕
;-------------------------------------------------
IF SELECTCOM == 126
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;Ａ騎乗位侵犯
;-------------------------------------------------
IF SELECTCOM == 127
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;打屁股
;あんまり痛くしません。ぴしゃぴしゃ
;-------------------------------------------------
IF SELECTCOM == 130
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;眼罩
;-------------------------------------------------
IF SELECTCOM == 133
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:眼罩 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;拘束
;-------------------------------------------------
IF SELECTCOM == 134
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:拘束 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;口枷
;何を付けたかはCOND("口球")、COND("開口口枷")で判定できる
;付ける前のセリフは@KOJO_MESSAGE_BEFORE_COMに書くのも良いでしょう
;-------------------------------------------------
IF SELECTCOM == 135
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:口枷 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;浣腸
;大量的液体を注いだかはCOND("大量浣腸")で判定できます
;-------------------------------------------------
IF SELECTCOM == 136
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;排泄
	ELSEIF TEQUIP:浣腸 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;让对方浴尿
;と是えまだ浴尿は出来ません
;直前に口交系指令なら口内放尿、性交系なら膣内放尿、Ａ性交系なら温泉浣腸となる
;別の指令が複数つまっているようなものなので正直な所、分岐が多くて煩雑です
;-------------------------------------------------
IF SELECTCOM == 138
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	IF CHECK_COM("口内放尿")
		;初めて
		IF EXP:飲尿経験 == 0
			;PLAYを受け入れていない
			IF CHECK("口内放尿") == 0
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;二回目以降
		ELSE
			;PLAYを受け入れていない
			IF CHECK("口内放尿") == 0
				PRINTFORMW
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSEIF CHECK_COM("子宮内放尿")
		;初めて
		IF EXP:子宮浴尿経験 == 0
			;PLAYを受け入れていない
			IF CHECK("子宮内放尿") == 0
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;二回目以降
		ELSE
			;PLAYを受け入れていない
			IF CHECK("子宮内放尿") == 0
				PRINTFORMW
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSEIF CHECK_COM("膣内放尿")
		;初めて
		IF EXP:膣内浴尿経験 == 0
			;PLAYを受け入れていない
			IF CHECK("膣内放尿") == 0
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;二回目以降
		ELSE
			;PLAYを受け入れていない
			IF CHECK("膣内放尿") == 0
				PRINTFORMW
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSEIF CHECK_COM("温泉浣腸")
		;初めて
		IF EXP:温泉浣腸経験 == 0
			;PLAYを受け入れていない
			IF CHECK("温泉浣腸") == 0
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;二回目以降
		ELSE
			;PLAYを受け入れていない
			IF CHECK("温泉浣腸") == 0
				PRINTFORMW
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSEIF CHECK_COM("乳内放尿")
		;初めて
		IF EXP:乳内浴尿経験 == 0
			;PLAYを受け入れていない
			IF CHECK("乳内放尿") == 0
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;二回目以降
		ELSE
			;PLAYを受け入れていない
			IF CHECK("乳内放尿") == 0
				PRINTFORMW
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSEIF CHECK_COM("膀胱内放尿")
		;初めて
		IF EXP:輸尿経験 == 0
			;PLAYを受け入れていない
			IF CHECK("膀胱内放尿") == 0
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;二回目以降
		ELSE
			;PLAYを受け入れていない
			IF CHECK("膀胱内放尿") == 0
				PRINTFORMW
			;恋慕
			ELSEIF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;什麼也不做
;-------------------------------------------------
IF SELECTCOM == 139
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;強制口交
;-------------------------------------------------
IF SELECTCOM == 140
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;フィスト系指令
;-------------------------------------------------
IF SELECTCOM == 141 || SELECTCOM == 142 || SELECTCOM == 143
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;楽しめる余裕が無い
		IF CHECK("フィスト") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;楽しめる余裕が無い
		IF CHECK("フィスト") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;放尿　聖水PLAY(推倒ている時)
;-------------------------------------------------
IF SELECTCOM == 144
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;聖水PLAY
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;聖水PLAY
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;剃毛
;-------------------------------------------------
IF SELECTCOM == 145
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;行為に抵抗有
		IF CHECK("陰毛管理") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;行為に抵抗有
		IF CHECK("陰毛管理") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;それ以外
		ELSE
			SELECTCASE CONDS("陰毛")
			;脱毛した
			CASE "脱毛処理"
				PRINTFORMW
			;光滑无毛に剃り上げた
			CASE "光滑无毛"
				PRINTFORMW
			;綺麗に剃り整えた
			CASEELSE
				PRINTFORMW
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;身嗜管理
;-------------------------------------------------
IF SELECTCOM == 146
	;陰毛の状態を指示
	IF CHECK_COM("身嗜み：陰毛")
		SELECTCASE COND("身嗜み：陰毛")
		;光滑无毛
		CASE 3
			PRINTFORMW
		;剃り整える
		CASE 5
			PRINTFORMW
		;从不剃
		CASE 7
			PRINTFORMW
		ENDSELECT
	;腋毛の状態を指示
	ELSEIF CHECK_COM("身嗜み：腋毛")
		SELECTCASE COND("身嗜み：腋毛")
		;光滑无毛
		CASE 3
			PRINTFORMW
		;从不剃
		CASE 7
			PRINTFORMW
		ENDSELECT
	;常に膣を拡張しておくように指示
	ELSEIF CHECK_COM("身嗜み：Ｖ拡張")
		;尺寸で分岐
		SELECTCASE COND("身嗜み：Ｖ拡張")
		;指示解除
		CASE 0
			PRINTFORMW
		CASEELSE
			PRINTFORMW
		ENDSELECT
	;常に肛門を拡張しておくように指示
	ELSEIF CHECK_COM("身嗜み：Ａ拡張")
		;尺寸で分岐
		SELECTCASE COND("身嗜み：Ａ拡張")
		;指示解除
		CASE 0
			PRINTFORMW
		CASEELSE
			PRINTFORMW
		ENDSELECT
	;いつでもお尻でエロいことできるように指示
	ELSEIF CHECK_COM("身嗜み：Ａ準備")
		;呼ばれたら腸内を綺麗にしておくように指示
		IF COND("身嗜み：腸洗浄")
			PRINTFORMW
		;潤滑液を用意するように指示
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	;CHECK_COM("身嗜み：Ｐ準備"), CHECK_COM("身嗜み：Ｖ準備"), CHECK_COM("身嗜み：服装")
	;CHECK_COM("身嗜み：尿道拡張"), CHECK_COM("身嗜み：性行為の制限"), CHECK_COM("身嗜み：性欲の管理")
	;などでも分岐可能。
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;穿环
;-------------------------------------------------
IF SELECTCOM == 148
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			PRINTFORMW
		;それ以外
		ELSE
			;ＯＮフラグが付けた際のセリフです
			IF COND("陰蒂環フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("陰唇環フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("乳环フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("肚脐环フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;导管
;-------------------------------------------------
IF SELECTCOM == 149
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛い！
		IF CHECK("尿道PLAY") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;抜いた
	ELSEIF TEQUIP:导管 == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;痛い！
		IF CHECK("尿道PLAY") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;深喉
;-------------------------------------------------
IF SELECTCOM == 150
	;口上を書く際には RETURN 0 を削除してください(もともと地の文が長めなので書かなくても問題ないかもしれません)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道探针
;-------------------------------------------------
IF SELECTCOM == 151
	CALL EVENT_K17_GEN, "愛撫", "尿道"
	RETURN 1
ENDIF

;-------------------------------------------------
;攝像機使用
;-------------------------------------------------
IF SELECTCOM == 170
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:攝像機 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;野外PLAY
;まだ仕様が決まってない
;-------------------------------------------------
IF SELECTCOM == 171
	RETURN 1
ENDIF

;-------------------------------------------------
;浴室PLAY
;-------------------------------------------------
IF SELECTCOM == 172
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:浴室PLAY == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;新妻PLAY
;-------------------------------------------------
IF SELECTCOM == 173
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;終了時
	ELSEIF TEQUIP:新妻PLAY == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;室内露出PLAY
;まだ仕様が決まってない
;-------------------------------------------------
IF SELECTCOM == 174
	RETURN 1
ENDIF
;-------------------------------------------------
;換装
;-------------------------------------------------
IF SELECTCOM == 175
	;服、贴身制服、泳装に着替えた時
	IF CHECK_COM("換装：服を着替えた")
		IF CHECK_CLO("自分の服")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("衬衫")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("女教師")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("和服")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("女仆装")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("体操服")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("看護婦")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("旗袍")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("水手服")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("巫女")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("情趣内衣")
			PRINTFORMW
		ELSEIF CHECK_CLO("比基尼姿")
			PRINTFORMW
		ELSEIF CHECK_BODYS("拘束衣")
			PRINTFORMW
		ELSEIF CHECK_BODYS("兔")
			PRINTFORMW
		;其他
		ELSE
			PRINTFORMW
		ENDIF
	;胸も股間も丸出し状態变成了時
	ELSEIF CHECK_COM("換装：裸体变成了")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;露出癖Lv3
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;胖次を変えたり脱いだり
	ELSEIF CHECK_COM("換装：胖次")
		IF EQUIP:胖次
			PRINTFORMW
		;没穿内褲です
		ELSE
			PRINTFORMW
		ENDIF
	;以下は面倒ならELSE でひとまとめでも良いでしょう
	ELSEIF CHECK_COM("換装：外套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：胸罩")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：手套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：襪子")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：靴")
		PRINTFORMW
	;飾品の付け替えや其他
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;被逆推
;-------------------------------------------------
IF SELECTCOM == 176
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;潤滑液使用
;-------------------------------------------------
IF SELECTCOM == 260
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;媚薬使用
;-------------------------------------------------
IF SELECTCOM == 261
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;利尿剤
;-------------------------------------------------
IF SELECTCOM == 262
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;排卵誘発剤
;-------------------------------------------------
IF SELECTCOM == 264
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;筋弛緩剤
;-------------------------------------------------
IF SELECTCOM == 267
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;挣扎
;-------------------------------------------------
IF SELECTCOM == 280
	;成功
	IF TEQUIP:推倒 == 0
		PRINTFORMW
	;失敗
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;自慰の種類についてはTEQUIP:PLAYER:自慰の値で分岐可能
;==1舐陰, ==4舐陰莖, ==9舐肛, ==13くぱぁ, ==14Ａくぱぁ など
;-------------------------------------------------
IF SELECTCOM == 282
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;甜言蜜语
;-------------------------------------------------
IF SELECTCOM == 283
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;成功
	IF TEQUIP:甜言蜜语
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;失敗
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;--------------------------------------------------
;調教指令の地の文の前に喋る台詞はここに書く
;--------------------------------------------------
@KOJO_MESSAGE_BEFORE_COM_K17
;口枷着用時には口上をスキップする？
SIF TEQUIP:口枷 && SELECTCOM != 135
	RETURN 0

;-------------------------------------------------
;調教指令終了時に行う共通処理。特になくともよい
;-------------------------------------------------
@KOJO_ENDCOM_K17

;-------------------------------------------------
;パラメータ変動をトリガーにした口上
;パラメータ変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_PALAMCNG_K17, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0
;-------------------------------------------------
;パラメータ変動時のセリフ
;-------------------------------------------------
SELECTCASE ARGS
;-------------------------------------------------
;初めてＶ潤がLV3超えた
;-------------------------------------------------
CASE "Ｖ潤LV3突破"
	;初めて
	IF FIRST_EV("Ｖ潤LV3突破") == 0
		;潤滑液を使った場合
		IF SELECTCOM == 260
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて欲情がLV3超えた
;-------------------------------------------------
CASE "欲情LV3突破"
	IF FIRST_EV("欲情LV3突破") == 0
		;媚薬を使った場合
		IF SELECTCOM == 261
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて恥情がLV3超えた
;-------------------------------------------------
CASE "恥情LV3突破"
	IF FIRST_EV("恥情LV3突破") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めて恐怖がLV3超えた
;-------------------------------------------------
CASE "恐怖LV3突破"
	IF FIRST_EV("恐怖LV3突破") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めてC絶頂
;-------------------------------------------------
CASE "Ｃ絶頂"
	IF FIRST_EV("Ｃ絶頂") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めてV絶頂
;-------------------------------------------------
CASE "Ｖ絶頂"
	IF FIRST_EV("Ｖ絶頂") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めてA絶頂
;-------------------------------------------------
CASE "Ａ絶頂"
	IF FIRST_EV("Ａ絶頂") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めてB絶頂
;-------------------------------------------------
CASE "Ｂ絶頂"
	IF FIRST_EV("Ｂ絶頂") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;C挑逗
;-------------------------------------------------
CASE "Ｃ挑逗"
	;初めて
	IF FIRST_EV("Ｃ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ｃ挑逗
		IF NOWEX:Ｃ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ｃ挑逗
		ELSEIF NOWEX:Ｃ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;V挑逗
;-------------------------------------------------
CASE "Ｖ挑逗"
	;初めて
	IF FIRST_EV("Ｖ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ｖ挑逗
		IF NOWEX:Ｖ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ｖ挑逗
		ELSEIF NOWEX:Ｖ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;A挑逗
;-------------------------------------------------
CASE "Ａ挑逗"
	;初めて
	IF FIRST_EV("Ａ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ａ挑逗
		IF NOWEX:Ａ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ａ挑逗
		ELSEIF NOWEX:Ａ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;B挑逗
;-------------------------------------------------
CASE "Ｂ挑逗"
	;初めて
	IF FIRST_EV("Ｂ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ｂ挑逗
		IF NOWEX:Ｂ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ｂ挑逗
		ELSEIF NOWEX:Ｂ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;扶她射精挑逗
;-------------------------------------------------
CASE "射精挑逗"
	;初めて
	IF FIRST_EV("射精挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;大量射精挑逗
		IF NOWEX:射精前骤停 >= 2
			PRINTFORMW
		;射精挑逗
		ELSEIF NOWEX:射精前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;処女喪失(処女のみ)
;-------------------------------------------------
CASE "処女喪失"
	IF FIRST_EV("処女喪失") == 0
		;恋慕
		IF TALENT:恋慕
			;主人の性交による処女喪失
			IF PLAYER == MASTER && INSERT("Ｖ挿入")
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;射精した(扶她/男性のみ)
;-------------------------------------------------
CASE "射精した"
	;初めて
	IF FIRST_EV("射精した") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;噴乳した(母乳体質のみ)
;-------------------------------------------------
CASE "噴乳した"
	;初めて
	IF FIRST_EV("噴乳した") == 0
		PRINTFORMW
	;二回目以降
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;絶頂放尿した
;-------------------------------------------------
CASE "絶頂放尿"
	;初めて
	IF FIRST_EV("絶頂放尿") == 0
		;抵抗无
		IF CHECK_COM("強制放尿") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;抵抗无
		IF CHECK_COM("強制放尿") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｃ絶頂20以上
;-------------------------------------------------
CASE "Ｃ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｃ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｖ絶頂20以上
;-------------------------------------------------
CASE "Ｖ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｖ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;Ａ絶頂20以上
;-------------------------------------------------
CASE "Ａ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ａ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｂ絶頂20以上
;-------------------------------------------------
CASE "Ｂ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｂ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ENDSELECT

;-------------------------------------------------
;刻印変動をトリガーにした口上
;刻印変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_MARKCNG_K17, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0

SELECTCASE ARGS
;-------------------------------------------------
;苦痛刻印Lv3取得
;-------------------------------------------------
CASE "苦痛刻印Lv3取得"
	IF FIRST_EV("苦痛刻印Lv3取得") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;快楽刻印Lv3取得
;-------------------------------------------------
CASE "快楽刻印Lv3取得"
	IF FIRST_EV("快楽刻印Lv3取得") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;屈服刻印Lv3取得
;-------------------------------------------------
CASE "屈服刻印Lv3取得"
	IF FIRST_EV("屈服刻印Lv3取得") == 0
		PRINTFORMW
	ENDIF
ENDSELECT

;-------------------------------------------------
;射精先選択時に表示する口上
;頻繁に表示されるため随机や表示条件の設定推奨です
;-------------------------------------------------
@KOJO_MESSAGE_SHOOT_K17
;初期は表示されないようにしてあるため、書いた後はRETURN 0を消す
RETURN 0

;恋慕
IF TALENT:恋慕
	PRINTFORMW
;それ以外
ELSE
	PRINTFORMW
ENDIF

;-------------------------------------------------
;PLAYERの射精＆絶頂をトリガーにした口上
;それぞれの射精分岐内での初めてかどうかの判定は、FIRST_EV(ARGS)で行う
;例）ELSEIF SHOOT("脚")において初めてかどうかは、FIRST_EV("絶頂：脚")で判定する
;-------------------------------------------------
@KOJO_MESSAGE_SAMEN_AND_EXTACY_K17
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0

;-------------------------------------------------
;髪、顔、股間、腹、尻、くぱぁ、Ａくぱぁへのぶっかけ
;-------------------------------------------------
IF SHOOT("ぶっかけ")
	IF SHOOT("自慰")
		PRINTFORMW
	;超大量射精
	ELSEIF COND("絶頂", PLAYER) >= 3
		PRINTFORMW
	;大量射精
	ELSEIF COND("絶頂", PLAYER) == 2
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;自慰で射精された(ぶっかけではなく床などに射精した)
;-------------------------------------------------
ELSEIF SHOOT("自慰")
	PRINTFORMW

;以下は通常の射精区分。
;-------------------------------------------------
;素股、足交や身体で射精させた
;-------------------------------------------------
ELSEIF SHOOT("脚")
	;初めて
	IF FIRST_EV("絶頂：脚") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ELSEIF SHOOT("素股")
	PRINTFORMW
;-------------------------------------------------
;口で射精させた
;-------------------------------------------------
ELSEIF SHOOT("口")
	;初めて
;	IF FIRST_EV("絶頂：口") == 0
;		PRINTFORMW
	;精液中毒Lv5
;	ELSEIF ABL:精液中毒 >= 5
;		PRINTFORMW
	;精液中毒Lv3
;	ELSEIF ABL:精液中毒 >= 3
;		PRINTFORMW
	;奉仕精神Lv3以上
;	ELSEIF ABL:奉仕精神 >= 3
;		PRINTFORMW
	;それ以外
;	ELSE
;		PRINTFORMW
;	ENDIF
	CALL EVENT_K17_GEN, "射精", "口"
;-------------------------------------------------
;胸で射精させた
;-------------------------------------------------
ELSEIF SHOOT("胸")
	;初めて
;	IF FIRST_EV("絶頂：胸") == 0
;		PRINTFORMW
	;奉仕精神Lv5
;	ELSEIF ABL:奉仕精神 >= 5
;		PRINTFORMW
	;奉仕精神Lv3以上
;	ELSEIF ABL:奉仕精神 >= 3
;		PRINTFORMW
	;それ以外
;	ELSE
;		PRINTFORMW
;	ENDIF
	CALL EVENT_K17_GEN, "射精", "胸圍"
;-------------------------------------------------
;手で射精させた
;-------------------------------------------------
ELSEIF SHOOT("手")
	;初めて
;	IF FIRST_EV("絶頂：手") == 0
;		PRINTFORMW
	;奉仕精神Lv5
;	ELSEIF ABL:奉仕精神 >= 5
;		PRINTFORMW
	;奉仕精神Lv3
;	ELSEIF ABL:奉仕精神 >= 3
;		PRINTFORMW
	;それ以外
;	ELSE
;		PRINTFORMW
;	ENDIF
	CALL EVENT_K17_GEN, "射精", "手"
;-------------------------------------------------
;性交で射精させた
;-------------------------------------------------
ELSEIF SHOOT("Ｖ中出し")
	;初めて
;	IF FIRST_EV("絶頂：Ｖ中出し") == 0
;		PRINTFORMW
	;恋慕
;	ELSEIF TALENT:恋慕
;		PRINTFORMW
	;屈服刻印Lv3
;	ELSEIF MARK:屈服刻印 == 3
;		PRINTFORMW
	;それ以外
;	ELSE
;		PRINTFORMW
;	ENDIF
	CALL EVENT_K17_GEN, "射精", "ヴァギナ"
ELSEIF SHOOT("Ａ中出し")
	;初めて
;	IF FIRST_EV("絶頂：Ａ中出し") == 0
;		PRINTFORMW
	;恋慕
;	ELSEIF TALENT:恋慕
;		PRINTFORMW
	;屈服刻印Lv3
;	ELSEIF MARK:屈服刻印 == 3
;		PRINTFORMW
	;それ以外
;	ELSE
;		PRINTFORMW
;	ENDIF
	CALL EVENT_K17_GEN, "射精", "肛門"
ELSEIF SHOOT("乳内中出し")
	CALL EVENT_K17_GEN, "射精", "ニプル"
ELSEIF SHOOT("尿道中出し")
	CALL EVENT_K17_GEN, "射精", "尿道"
;-------------------------------------------------
;接吻で射精
;-------------------------------------------------
ELSEIF SHOOT("接吻")
	PRINTFORMW
;-------------------------------------------------
;面部騎乗で射精
;-------------------------------------------------
ELSEIF SHOOT("面部騎乗")
	PRINTFORMW
;-------------------------------------------------
;洗面奶で射精
;-------------------------------------------------
ELSEIF SHOOT("洗面奶")
	PRINTFORMW
;-------------------------------------------------
;逆舐陰で射精
;-------------------------------------------------
ELSEIF SHOOT("逆舐陰")
	PRINTFORMW
;-------------------------------------------------
;逆肛交、逆強姦で射精
;-------------------------------------------------
ELSEIF SHOOT("逆強姦") || SHOOT("逆肛交") || SHOOT("肛門奉仕")
	PRINTFORMW
;-------------------------------------------------
;PLAYERが女で、イってしまった…
;-------------------------------------------------
ELSEIF SHOOT("調教者が女性")
	;強絶頂
	IF COND("絶頂", PLAYER) >= 2
		PRINTFORMW
	;絶頂
	ELSEIF COND("絶頂", PLAYER) == 1
		PRINTFORMW
	ENDIF
ENDIF

;-------------------------------------------------
;角色が調教中に調教者を攻める際などの口上
;-------------------------------------------------
@KOJO_COUNTER_K17, ARGS
SELECTCASE ARGS
CASE "恍惚"
	PRINTFORMW
CASE "推倒"
	PRINTFORMW
CASE "強制終了"
	PRINTFORMW
CASE "復活"
	PRINTFORMW
CASE "恍惚から復帰"
	PRINTFORMW
CASE "助手が限界"
	PRINTFORMW
ENDSELECT

RETURN 1

;-------------------------------------------------
;イベント口上集
;-------------------------------------------------
@KOJO_EVENT_K17, ARGS
SELECTCASE ARGS
;-------------------------------------------------
;調教終了不可能
;-------------------------------------------------
CASE "調教終了不可能"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;避孕套装着
;-------------------------------------------------
CASE "Ｖ避孕套装着"
	;挿入指令
	IF TRAIN_GENRE("挿入", SELECTCOM)
		;PLAYヤーは着ける気満々
		IF TEQUIP:PLAYER:避孕套

		;避孕套が無い
		ELSEIF ITEM:避孕套 == 0

		;安全日に生希望
		ELSEIF COND("安全日")

		;安全日じゃないけど避孕套没有を希望
		ELSE

		ENDIF
	;PLAYヤーへの挿入指令
	ELSEIF TRAIN_GENRE("逆挿入", SELECTCOM)
		;PLAYヤーは着けてもらうの希望
		IF TEQUIP:避孕套

		;避孕套が無い
		ELSEIF ITEM:避孕套 == 0

		;安全日に生希望
		ELSEIF COND("安全日", PLAYER)

		;安全日じゃないけど避孕套没有を希望
		ELSE

		ENDIF
	ENDIF

;-------------------------------------------------
;調教後自慰
;-------------------------------------------------
CASE "調教後自慰"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;自慰中毒Lv3以上
	ELSEIF ABL:自慰中毒 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;レズPLAY
;-------------------------------------------------
CASE "調教後レズPLAY"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;調教後性交
;-------------------------------------------------
CASE "調教後性交"
	;V感覚Lv4以上
	IF ABL:Ｖ感覚 >= 4
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;夜袭騎乗位
;-------------------------------------------------
CASE "夜袭騎乗位"
	;V感覚Lv5以上
	IF ABL:Ｖ感覚 >= 5
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;夜袭Ａ騎乗位
;-------------------------------------------------
CASE "夜袭Ａ騎乗位"
	;Ａ感覚Lv5以上
	IF ABL:Ａ感覚 >= 5
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-----------------------------
;夜袭接吻
;----------------------------
CASE "夜袭接吻"
	;M感覚Lv3以上
	IF ABL:Ｍ感覚 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;添い寝
;-------------------------------------------------
CASE "添い寝"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF

;-------------------------------------------------
;清洁口交
;-------------------------------------------------
CASE "清洁口交"
	SELECTCASE TFLAG:口上分岐
	;お掃除前
	CASE 0
		PRINTFORMW
	;お掃除中
	CASE 1
		PRINTFORMW
	;お掃除で射精しなかった
	CASE 2
		PRINTFORMW
	;お掃除で射精しそう？
	CASE 3
		PRINTFORMW
	;射精した
	CASE 4
		PRINTFORMW
	;お掃除で射精後
	CASE 5
		PRINTFORMW
	ENDSELECT
;-------------------------------------------------
;脱衣
;-------------------------------------------------
CASE "自発脱ぎ"
	;裸体变成了
	IF CHECK_CLO("裸体")
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;阴部剥きだし
	ELSEIF CHECK_CLO("Ｖ露出")
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;部分脱ぎ
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;妊娠した
;----------------------------------------------------------------
CASE "妊娠発覚"
	;出産経験
	IF TALENT:出産経験
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;出産した
;----------------------------------------------------------------
CASE "出産"
	;出産経験
	IF TALENT:出産経験
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;兒童が大きくなった
;----------------------------------------------------------------
CASE "子出口"
	;出産経験
	IF TALENT:出産経験
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;性交後に抜いた時
;----------------------------------------------------------------
;恥ずかしいところを見せてくれる
;----------------------------------------------------------------
CASE "中出し後くぱぁ"
	;恋慕
	IF TALENT:恋慕
		;避孕套有些
		IF TEQUIP:PLAYER:避孕套
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		;避孕套有些
		IF TEQUIP:PLAYER:避孕套
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;----------------------------------------------------------------
;恥ずかしいところを見せてくれない
;好感度が高いと起きないので、恋慕で分岐させる意味はない。
;また、不知羞恥ならば発生しない
;----------------------------------------------------------------
CASE "中出し後害羞"
	PRINTFORMW
;----------------------------------------------------------------
;精液を味わう
;----------------------------------------------------------------
CASE "中出し後精液掻き出し"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;気持ちよくてぐったり
;----------------------------------------------------------------
CASE "中出し後恍惚"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;ビデオ保存
;-------------------------------------------------
CASE "ビデオ保存"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;ビデオ売却
;-------------------------------------------------
CASE "ビデオ売却"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;ビデオ売却失敗
;-------------------------------------------------
CASE "ビデオ売却失敗"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF

;----------------------------------------------------------------
;塞子をしていない状態での液体浣腸口上
;----------------------------------------------------------------
CASE "无塞浣腸事件"
	;限界値突破時
	IF BASE:排泄欲 >= 10000
		;限界値を超えたが漏らせない場合
		IF INSERT("Ａ挿入") || COND("肛門栓")
			PRINTFORMW
		;漏らす直前
		ELSE
			PRINTFORMW
		ENDIF
	;漏らした
	ELSEIF NOWEX:排泄
		PRINTFORMW
	;我慢しているときの口上
	ELSEIF TEQUIP:浣腸
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;吸能
;----------------------------------------------------------------
CASE "吸能"
	;初めて
	IF FIRST_EV(ARGS) == 0
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;調教者がちんこを挿入する前に射精してしまった！
;----------------------------------------------------------------
CASE "挿入前暴発"
	;初めて
	IF FIRST_EV(ARGS) == 0
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;特殊な道具を使った際の台詞
;----------------------------------------------------------------
CASE "避妊の護符"
	;初めて
	IF FIRST_EV(ARGS) == 0
		PRINTFORMW
	ELSEIF TALENT:恋慕
		;装着
		IF TALENT:避妊の護符
			PRINTFORMW
		;取り外し
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		IF TALENT:避妊の護符
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF

CASE "扶她薬"
	;扶她变成了
	IF TALENT:扶她
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
CASE "黑色ドロップ"
	;男性变成了
	IF TALENT:男性
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
CASE "巨根薬"
	;薬を使用した後の状態で分岐
	SELECTCASE SIZE("阴茎")
	;並
	CASE 1
		PRINTFORMW
	;巨根
	CASE 2
		PRINTFORMW
	;馬根
	CASE 3
		PRINTFORMW
	CASE 4
		PRINTFORMW
	CASE 5
		PRINTFORMW
	;CASEELSE
	;	PRINTFORMW
	ENDSELECT
CASE "縮根薬"
	;薬を使用した後の状態で分岐
	SELECTCASE SIZE("阴茎")
	;小
	CASE 0
		PRINTFORMW
	;並
	CASE 1
		PRINTFORMW
	;巨根
	CASE 2
		PRINTFORMW
	ENDSELECT
CASE "剥皮薬"
	;薬を使用した後の状態で分岐
	IF COND("假性包茎")
		PRINTFORMW
	;ずる剥け
	ELSE
		PRINTFORMW
	ENDIF
CASE "伸皮薬"
	;薬を使用した後の状態で分岐
	IF COND("真性包茎")
		PRINTFORMW
	ELSEIF COND("假性包茎")
		PRINTFORMW
	ENDIF
CASE "豊胸薬"
	;薬を使用した後の状態で分岐
	SELECTCASE TALENT:巨乳
	;並乳
	CASE 0
		PRINTFORMW
	;巨乳
	CASE 1
		PRINTFORMW
	;爆乳
	CASE 2
		PRINTFORMW
	;超乳
	CASE IS >= 3
		PRINTFORMW
	ENDSELECT
CASE "貧乳薬"
	;薬を使用した後の状態で分岐
	SELECTCASE TALENT:巨乳
	;並乳以下
	CASE 0
		IF TALENT:貧乳
			PRINTFORMW
		;並乳
		ELSE
			PRINTFORMW
		ENDIF
	;巨乳
	CASE 1
		PRINTFORMW
	;爆乳
	CASE 2
		PRINTFORMW
	ENDSELECT
CASE "巨人の薬"
	;薬を使用した後の状態で分岐
	IF TALENT:高大
		PRINTFORMW
	;普通身高
	ELSE
		PRINTFORMW
	ENDIF
CASE "小人の薬"
	;薬を使用した後の状態で分岐
	IF TALENT:娇小
		PRINTFORMW
	;普通身高
	ELSE
		PRINTFORMW
	ENDIF
CASE "虹の薬"
	;薬を使用した後の状態で分岐
	SELECTCASE CONDS("肤色")
	CASE "褐色肌"
		PRINTFORMW
	CASE "色白"
		PRINTFORMW
	CASE "青肌"
		PRINTFORMW
	;普通
	CASEELSE
		PRINTFORMW
	ENDSELECT
CASE "桃尻薬"
	;薬を使用した後の状態で分岐
	IF TALENT:巨尻 >= 2
		PRINTFORMW
	ELSEIF TALENT:巨尻
		PRINTFORMW
	;普通の尺寸
	ELSE
		PRINTFORMW
	ENDIF
CASE "小尻薬"
	;薬を使用した後の状態で分岐
	IF TALENT:巨尻
		PRINTFORMW
	ELSEIF TALENT:小尻
		PRINTFORMW
	;普通の尺寸
	ELSE
		PRINTFORMW
	ENDIF

ENDSELECT

;-------------------------------------------------
;TARGET以外の立場で呼ばれた時の台詞全般
;-------------------------------------------------
@KOJO_GUEST_K17, ARGS
SELECTCASE ARGS
CASE "調教相手に選ばれた"

CASE "助手に抜擢"
	;初めて
	IF EXP:助手経験 == 0

	ELSE

	ENDIF

CASE "助手：主人に清洁口交"

CASE "助手：partnerに清洁舔阴"

CASE "助手：partnerに清洁舔A"

CASE "助手：主人にＰ恥垢清洁口交"

CASE "助手：撮影開始"

CASE "助手：調教開始前の準備後台詞"

CASE "室内調教：登場台詞"

CASE "室内調教：ギャラリー増加台詞"

CASE "室内調教：感想台詞"

CASE "助手で性処理：おあずけ"

CASE "助手で性処理"

CASE "助手で性処理：事後"

;COND("精液の優勢")で誰の兒童を孕んでしまったかを判定できます
;名前を出したい時には%COND("精液の優勢")%を用いてください
CASE "受精確認"

ENDSELECT

;-------------------------------------------------
;@単体エンディング関係(X1を角色番号に置換)
;通常のエンディングチェックの前に個別エンディングを判定
;-------------------------------------------------
;
;
;
;
;
;
;
;
;
;
;★ここから先にはエンディングが記述されています★
;ネタバレを避けたい方は閲覧不会うにご注意下さい。
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
;
@IS_SINGLE_ENDING_K17
;エンディングを書いたら、下のRETURN 1のコメントアウト;を消してください
;RETURN 1

path: ERB/EVENT_K/17 小菊/EVENT_K17_小菊.ERB