code:
;-------------------------------------------------
;口上テンプレート
;都築紬希口上_2020_11_xx（角色クターの名前を入れる、下にコンセプトなど一言あれば入れる）
;製作者　8の686
;-------------------------------------------------
;-------------------------------------------------
;-------------------------------------------------
;呼び名の設定。"_"の右にふりがなを書く。
;-------------------------------------------------
@CNAME_K55, ARGS
#FUNCTIONS
#DIM ACTOR

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	IF TALENT:相思相愛
		LOCALS = 我_我
	ELSE
		LOCALS = 我_我
	ENDIF
CASE "二人称"
	;相手が主人
	;相手が主人ではない時の特殊二人称もここ(ナンバー指定有)
	IF PLAYER == MASTER
		LOCALS = 部长_部长
	ELSEIF NO:PLAYER == 10 && TALENT:相思相愛
		LOCALS = 義母桑_おかあ桑
	ELSEIF NO:PLAYER == 10
		LOCALS = 麦莉爱娜桑_麦莉爱娜桑

	;相手が主人ではない時の汎用口上
	;学生限定。
	;中等部以下…君酱付け
	;高等部以上…前輩
	;教師…老师
	ELSE
		SELECTCASE CSTR:PLAYER:学年
		CASE "初等部", "中等部", "１年生", "２年生"
			IF TALENT:PLAYER:男性
				LOCALS = %CALLNAME:PLAYER%君_%CALLNAME:PLAYER%君
			ELSE
				LOCALS = %CALLNAME:PLAYER%酱_%CALLNAME:PLAYER%酱
			ENDIF
		CASE "３年生", "研究生"
			LOCALS = %CALLNAME:PLAYER%前辈_%CALLNAME:PLAYER%前辈
		CASEELSE
			IF COND("教員", PLAYER)
				LOCALS = %CALLNAME:PLAYER%老师_%CALLNAME:PLAYER%老师
			ELSE
				LOCALS = %CALLNAME:PLAYER%桑_%CALLNAME:PLAYER%桑
			ENDIF
		ENDSELECT
	ENDIF
;"主人"と"助手"は三人称。主に当人と話していない時に使う
CASE "主人"
	LOCALS = 部长_部长
CASE "助手"
	IF COND("麦莉爱娜", ASSI) && TALENT:相思相愛
		LOCALS = 義母桑_おかあ桑
	ELSEIF COND("麦莉爱娜", ASSI)
		LOCALS = 麦莉爱娜桑_麦莉爱娜桑
	ELSEIF COND("森賀棗", ASSI)
		LOCALS = 棗桑_なつめ桑
	ELSEIF COND("小鳥遊静菜", ASSI)
		LOCALS = 静菜桑_静菜桑
	ELSE
		SELECTCASE CSTR:PLAYER:学年
		CASE "初等部", "中等部", "１年生", "２年生"
			IF TALENT:PLAYER:男性
				LOCALS = %CALLNAME:ASSI%君_%CALLNAME:ASSI%君
			ELSE
				LOCALS = %CALLNAME:ASSI%酱_%CALLNAME:ASSI%酱
			ENDIF
		CASE "３年生", "研究生"
			LOCALS = %CALLNAME:ASSI%前辈_%CALLNAME:ASSI%前辈
		CASE "教師"
			LOCALS = %CALLNAME:ASSI%老师_%CALLNAME:ASSI%老师
		CASEELSE
	    	LOCALS = %CALLNAME:ASSI%桑_%CALLNAME:ASSI%桑
		ENDSELECT
   ENDIF
CASEELSE
	;ARGSに角色名が入れられてる場合には角色への呼び方なのでチェック
	IF FIND_NO(ARGS) > 0
		ACTOR = FIND_NO(ARGS)

		IF NO:ACTOR == 10 && TALENT:相思相愛
			LOCALS = 義母桑_おかあ桑
		ELSEIF NO:ACTOR == 51
			LOCALS = 棗桑_なつめ桑
		ELSEIF NO:ACTOR == 52
			LOCALS = 静菜桑_静菜桑
		ELSE
			SELECTCASE CSTR:ACTOR:学年
			CASE "初等部", "中等部", "１年生", "２年生"
				IF TALENT:ACTOR:男性
					LOCALS = %CALLNAME:ACTOR%君_%CALLNAME:ACTOR%君
				ELSE
					LOCALS = %CALLNAME:ACTOR%酱_%CALLNAME:ACTOR%酱
				ENDIF
		CASE "３年生", "研究生"
				LOCALS = %CALLNAME:ACTOR%前輩_%CALLNAME:ACTOR%前辈
		CASEELSE
				IF COND("教員", ACTOR)
					LOCALS = %CALLNAME:ACTOR%老师_%CALLNAME:ACTOR%老师
				ELSE
					LOCALS = %CALLNAME:ACTOR%桑_%CALLNAME:ACTOR%桑
				ENDIF
			ENDSELECT
		ENDIF
	ENDIF
ENDSELECT
RETURNF LOCALS

;-------------------------------------------------
;勧誘イベントのセリフや紹介文
;ここの中に限り、CFLAG,BASE,TALENT,ABL,EXP,CSTRをCSVに書いたものから変更させることが出来ます
;例えばBASE:体力を2000にしたいなら BASE:0:体力 = 2000 、強気にさせたいなら TALENT:0:強気 = 1 として下さい
;また、ABL:信頼を+2させたい場合には ABL:0:信頼 = ABL:信頼 + 2 と書いてください
;-------------------------------------------------
@EVENT_PROFILE_K55, ARGS

SELECTCASE ARGS
CASE "紹介文"
	STR:1 = - 都築 紬希(つづき つむぎ) -
	STR:2 = %CALLNAME:MASTER%的青梅竹马。
	STR:3 = 讨厌被当成男生、可爱的伪娘。
	STR:4 = 与%CALLNAME:MASTER%过去、有着関于未来的约定。
CASE "勧誘"
	PRINTFORMW 「……好久不见。……听说你建立了社团……所以就来看看。」
	PRINTFORMW 「……是什么样的社团、虽然、那个……我还不知道」
	PRINTFORMW 「……呜呜……如果可以的话、能让我也加入社团吗？」
	PRINTFORMW
	PRINTFORML
	PRINTFORMW - ！注意！ -
	PRINTFORMW 1.本口上含有「男性(含伪娘)」「女性」「扶她」的剧情。
	PRINTFORMW 2.并且会出现【玩家并不完全对于你】的情况 。
	PRINTFORMW 剧情事件中也会出现玩家的对话剧情，不喜欢的请避免选择。
CASE "勧誘直後"
	PRINTFORML - ！系统消息！ -
	PRINTFORMW %CALLNAME:TARGET%对%CALLNAME:MASTER%的第二人称设定。
	PRINTFORMW 本口上会用固定名称识别、设置二人称(最好是人名)的话会有更好的带入体验。
	PRINTFORMW 现在的第二人称是『%CNAME("二人称")%』。要改变吗？
	PRINTFORMW (之后可以通过交易里的请求来变更。)
	CALL PRINT_SELECT, "变更/不变更"
	IF RESULT == 0
		CALL NAME_CONVERT_SP, TARGET
	ELSEIF RESULT == 1
		PRINTFORMW  第二人称不更变。
	ENDIF

;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	PRINTFORMW %NAME:TARGET%%CALLNAME:MASTER%的"%CSTR:関係%"、会在中午出现在社团活动室。

;初めて部室に顔を出した際のイベントや打招呼です。これも別に無くて構いません。
CASE "初訪問"
	;昼などの、勧誘して即現れた場合です。別にここで分岐させなくても良いと思いますが違和感が出る場合にはどうぞ
	IF IS_TARGET()

	ELSE

	ENDIF
;同居後の自分的房間の解説です。これも別に無くて構いません
CASE "自室描写"
	PRINTFORML 和外表相似、与普通少女的房间有稍许违和感的房间。
	PRINTFORML 不过也很符合%NAME:TARGET%的性格。
ENDSELECT

;-------------------------------------------------
;この角色が拒否している指令のフラグ立てや其他色々なフラグを開始前に設定できる
;partnerは勿論、指导者の時でも読み込む
;-------------------------------------------------
@SETFLAG_BEFORE_TRAIN_K55
;口上書きやすさ優先で……
IF TALENT:相思相愛 == 0  && CEVENT("エンディング閲覧済み") == 0
	DITEMTYPE:TARGET:60 = 1
	DITEMTYPE:TARGET:61 = 1
	DITEMTYPE:TARGET:62 = 1
	DITEMTYPE:TARGET:63 = 1
	DITEMTYPE:TARGET:64 = 1
	DITEMTYPE:TARGET:65 = 1
	DITEMTYPE:TARGET:70 = 1
	DITEMTYPE:TARGET:71 = 1
	DITEMTYPE:TARGET:72 = 1
	DITEMTYPE:TARGET:73 = 1
	DITEMTYPE:TARGET:74 = 1
	DITEMTYPE:TARGET:75 = 1
ELSEIF TALENT:恋慕 == 0 && CEVENT("調教開始：恋慕") == 0
	DITEMTYPE:TARGET:80 = 1
	DITEMTYPE:TARGET:81 = 1
	DITEMTYPE:TARGET:82 = 1
	DITEMTYPE:TARGET:83 = 1
	DITEMTYPE:TARGET:84 = 1
	DITEMTYPE:TARGET:85 = 1
	DITEMTYPE:TARGET:86 = 1
	DITEMTYPE:TARGET:87 = 1
	DITEMTYPE:TARGET:120 = 1
	DITEMTYPE:TARGET:121 = 1
	DITEMTYPE:TARGET:122 = 1
	DITEMTYPE:TARGET:123 = 1
	DITEMTYPE:TARGET:124 = 1
	DITEMTYPE:TARGET:125 = 1
	DITEMTYPE:TARGET:126 = 1
	DITEMTYPE:TARGET:127 = 1
ENDIF
;-------------------------------------------------
;一日の終わりでフラグなどを変化させたい時にはここで弄ることが出来る
;-------------------------------------------------
@TIMEEVENT_K55

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

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
		PRINTFORMW 「到了真正做的时候果然还是会紧张啊」
		PRINTFORMW 「……和%CNAME("二人称")%做……那个、以前都没做过吧」
		PRINTFORMW 「温柔一点……做哦」
		PRINTFORMW 要温柔对待吗？
		CALL PRINT_SELECT, "是/否"
		IF RESULT == 0
				CALL PRINT_STRW, @"粉紅_「唔啊、好開心……_HH_」"
				CFLAG:想イノ行方 += 1
			ELSE
				CALL PRINT_STRW, @"「笨蛋……_BH_」"
				CALL PRINT_STRW, @"黄色_「……不要让我太痛了哦」"
		ENDIF
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
		PRINTFORMW 「我有成长为和%CNAME("二人称")%口味的孩子吗？」
		PRINTFORMW 「…这样的台词、早就想说一次了」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 1 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
		PRINTFORMW 「已经习惯做这种事情了呢」
		PRINTFORMW 「……虽然很憧憬这种、果然很害羞啊」
		PRINTFORMW 「一天不见到%CNAME("二人称")%整天就一个人闷闷不乐……」
		CALL PRINT_SELECT, "……在想谁的事情呢？/果然积累太多就会想释放一下?"
			IF RESULT == 0
				CALL PRINT_STRW, @"黄色_「……那是、当然……%CNAME("二人称")%但是……_HH_」"
				CFLAG:想イノ行方 ++
			ELSE
				CALL PRINT_STRW, @"「一点不体贴……_BH_」"
				CALL PRINT_STRW, @"粉紅_「……但是、有点……開心、啊」"
				CFLAG:想イノ行方 += 2
		ENDIF
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3 && CEVENT("調教開始：屈服刻印ＬＶ２") == 1 && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
		PRINTFORMW 「%CNAME("二人称")%啊我最近躁动不安、很痛苦」
		PRINTFORMW 「…总是躁动不安……总觉得、有些不对劲」
		PRINTFORMW 「以前约定的事情……%CNAME("二人称")%可能已经不记得了」
		PRINTFORMW 「说不定%CNAME("一人称")%、再次爱上%CNAME("二人称")%了」
		PRINTFORMW 「什么的……想太多也不好？」
		PRINTFORMW 「总之……我们、今天都要变得舒服哦」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("My wish is...") == 1 && CFLAG:想イノ行方 >= 6 && CEVENT("調教開始：恋慕") == 0
		PRINTFORMW 「……那个、再见」
		PRINTFORMW 「……记得我们小学时候的约定吗？……哪怕忘记内容、记得约定本身也可以」
		PRINTFORMW 「不论如果、只能现在问了」
		PRINTFORML
		CALL PRINT_STRW, @"粉紅_「……总有一天、等我长大了。……和%CNAME("二人称")%、结婚就好了、什么的」"
		PRINTFORMW 「……这种时候、这样说太过分了吧」
		PRINTFORMW 「但是现在的话、%CNAME("二人称")%也、可以同意吧…」
		PRINTFORMW 「……『太唐突了』吗？」
		PRINTFORMW 「那、接下来、你懂的对吧」
		PRINTFORML
		PRINTFORMW 「希望你能够……从新喜欢%CNAME("一人称")%啊」
		CFLAG:想イノ行方 += 5
		PRINTFORML
		PRINTFORMW - 系统消息 -
		CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%由于心境发生了变化、%CALLNAME:TARGET%习得了[小悪魔]属性。"
		TALENT:小悪魔 = 1
	CALL SET_CEVENT, "調教開始：恋慕"
ELSEIF TALENT:恋慕 && CEVENT("My wish is...") == 1 && CFLAG:想イノ行方 <= 5 && CEVENT("調教開始：恋慕") == 0
		PRINTFORMW 「……那个、再见」
		PRINTFORMW 「……小学的时候……先不说内容、还记得我们做过约定这件事吗？」
		PRINTFORML
		PRINTFORMW %CALLNAME:TARGET%%CNAME("二人称")%强调当初定下约定的事实。
		CALL PRINT_STRW, @"黄色 先不说约定的内容、和%CALLNAME:TARGET%顶下约定的事情、%CALLNAME:MASTER%还记得吗？"
		CALL PRINT_SELECT, "好像有些印象……/或许有过约定……/没印象……/真的有什么约定、吗？"
		IF RESULT >= 1
				CALL PRINT_STRW, @"「你还记得啊……_HH_」"
				CALL PRINT_STRW, @"粉紅_「……总有一天、等我长大了。……和%CNAME("二人称")%、结婚就好了、什么的」"
				CFLAG:想イノ行方 += 5
			ELSE
				CALL PRINT_STRW, @"赤_「是吗……」"
				CALL PRINT_STRW, @"赤_「……不记得了啊」"
				CFLAG:想イノ行方 -= 5
		ENDIF
		PRINTFORMW 「……是不是太唐突了、这种时候说这样的话」
		PRINTFORMW 「但是现在的话、%CNAME("二人称")%也、可以同意吧…」
		PRINTFORMW 「……什么叫『实在太突然了』？」
		PRINTFORMW 「那、接下来、你懂的对吧」
		PRINTFORML
		PRINTFORMW 「希望你能够……从新喜欢%CNAME("一人称")%啊」
		PRINTFORML
		PRINTFORMW - 系统消息 -
		CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%由于心境发生了变化、%CALLNAME:TARGET%习得了[小悪魔]属性。"
		TALENT:小悪魔 = 1
	CALL SET_CEVENT, "調教開始：恋慕"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：恋慕") == 1 && CEVENT("調教開始：相思相愛") == 0
		PRINTFORMW 「……欸欸」
		PRINTFORMW 「以前都是用嘴什么的呢」
		PRINTFORMW 「……呜呜、我要忍不住了」
		CALL PRINT_STRW, @"粉紅_「……%CNAME("一人称")%的第一次……可以收下吗」"
		PRINTFORMW 「……哈啊……高潮了」
		PRINTFORMW 「原来和喜欢的人身体交融在一起、是那么幸福的事情……」
		PRINTFORMW 「……爱你哦、%CNAME("二人称")%」
	CALL SET_CEVENT, "調教開始：相思相愛"
;助手の有無をチェック（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K55_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 K55_KOJO2
ENDIF

RETURN 1

;-------------------------------------------------
;調教開始時（2回目以降）
;-------------------------------------------------
@K55_KOJO2
;恋慕
IF TALENT:恋慕
	PRINTFORMW
;屈服刻印Lv0
ELSEIF MARK:屈服刻印 == 0
	PRINTFORMW
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1
	PRINTFORMW
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2
	PRINTFORMW
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3
	PRINTFORMW
ENDIF
RETURN 1

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

DRAWLINE
;-------------------------------------------------
;※精力限界値を超えた場合の終了口上
;-------------------------------------------------
;調教強制終了時の口上
IF STATE("撃沈", MASTER)
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;其他
	ELSE
		PRINTFORMW
	ENDIF
;partnerが体力or精力尽きた場合
ELSEIF STATE("撃沈")
	PRINTFORMW
;恋慕＋満足
ELSEIF TALENT:恋慕 && COND("満足")
	PRINTFORMW
;恋慕
ELSEIF TALENT:恋慕
	PRINTFORMW
;屈服刻印Lv1以下
ELSEIF MARK:屈服刻印 <= 1
	PRINTFORMW
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2
	PRINTFORMW
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3
	PRINTFORMW
ENDIF
RETURN 1

;-------------------------------------------------
;指令実行時のセリフ
;-------------------------------------------------
@KOJO_MESSAGE_COM_K55
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0
;-------------------------------------------------
;指令実行時のセリフ(コピペ用)
;HHすると爱心マークがでるやつ
;-------------------------------------------------
;
;CALL PRINT_STRW, @"「」"
;
;-------------------------------------------------
;愛撫
;-------------------------------------------------
IF SELECTCOM == 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰　面部騎乗(被逆推ているとき)
;-------------------------------------------------
IF SELECTCOM == 1
	;被逆推ているとき
	IF TEQUIP:推倒
		;初めて
		IF FIRSTCOM_REV(SELECTCOM) == 0
			PRINTFORMW
		;二回目以降
		ELSE
			;恋慕
			IF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSE
		;初めて
		IF FIRSTCOM(SELECTCOM) == 0
			PRINTFORMW
		;二回目以降
		;清洁舔阴
		ELSEIF COND("清洁舔阴フラグ", PLAYER)
			;恋慕
			IF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			;恋慕
			IF TALENT:恋慕
				PRINTFORMW
			;それ以外
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門愛撫
;-------------------------------------------------
IF SELECTCOM == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;気持ちいい
		IF CHECK("Ａ指挿入")
			PRINTFORMW 「咿哦！？」
			CALL PRINT_STRW, @"「不要、后面、很脏的……_WH_」"
		;それ以外
		ELSE
			PRINTFORMW 「呀啊！？」
			CALL PRINT_STRW, @"「不行、后面的小穴、很脏的不行……_WH_」"
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					CALL PRINT_STRW, @"「哇啊啊啊……_WH__WH_」"
					CALL PRINT_STRW, @"「后面、震动_WH_ 啊_WH_唔、这个震动棒……_WH_」"
					CALL PRINT_STRW, @"「舒服的地方、被玩弄着……_WH_」"
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW
			ENDIF
		;気持ちいい
		ELSEIF CHECK("Ａ指挿入")
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF TALENT:結腸性感
						CALL PRINT_STRW, @"「咿啊啊……_WH_ 不、不行啊阿_WH_」"
						CALL PRINT_STRW, @"「后面、被震动棒……啊阿哇阿_WH_」"
						CALL PRINT_STRW, @"「咕哩_WH_ 咕哩的_WH_ 啊阿、舒服的地方被摩擦啊……_WH_」"
					ELSE
						PRINTFORMW
					ENDIF
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;-------------------------------------------------
IF SELECTCOM == 3
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「……%CNAME("一人称")%自慰的样子……想看……？」
		PRINTFORMW %CALLNAME:TARGET%開始自己抚摸自己的股间。
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		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
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;接吻
;-------------------------------------------------
IF SELECTCOM == 6
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF MARK:屈服刻印 != 0 || TALENT:恋慕
				CALL PRINT_STRW, @"「已经忍不住了……呼」"
			ELSE
				CALL PRINT_STRW, @"「迟钝老师不这样做……不明白吗……_HH_」"
			ENDIF
		;それ以外
		ELSE
			IF CHECK_COM("深吻")
				CALL PRINT_STRW, @"「……被这么温柔的亲吻、好像更喜欢了……_HH_」"
			ELSEIF MARK:屈服刻印 >= 3 || TALENT:恋慕
				PRINTFORMW 「……虽然很意外、%CNAME("一人称")%到现在从来没有接吻过啊」
			ELSEIF MARK:屈服刻印 == 0
				CALL PRINT_STRW, @"「到这就可以了不要进来……！……嗯啊、啊、啊啊啊！！」"
			ELSE
				CALL PRINT_STRW, @"「啊阿_HH_ 这么突然、被亲的话_HH_」"
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「啊阿_HH_ 嗯啾_HH_ 啊阿_HH_ 哈啊阿_HH_ 呐、亲_HH_ 还要……」"
			SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, @"「%CNAME("二人称")%在来些想要更多亲吻……_HH_」"
			CASE 1
				CALL PRINT_STRW, @"「……%CNAME("二人称")%、还想要可以吗……_HH_ 」"
			CASE 2
				CALL PRINT_STRW, @"「……%CNAME("二人称")%、还想要更多亲吻……_HH_ 」"
			ENDSELECT
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「不要_HH_ 嗯嗯_HH_ 啾啾_HH_ 咕唔_HH_ 哈啊阿……_HH_」"
		ENDIF
	;それ以外
	ELSE
		;テンダー接吻
		IF CHECK_COM("テンダー接吻")
			CALL PRINT_STRW, @"「哈啊阿_HH_ 噗哈_HH_」"
			IF TALENT:相思相愛 && RAND:2
				PRINTFORM 「欸额欸……%CNAME("二人称")%……我爱你……」
			ELSEIF MARK:屈服刻印 >= 3 || TALENT:恋慕
				CALL PRINT_STRW, @"「哈……%CNAME("二人称")%挺在意氛围的嘛……_HH_ 」"
				CALL PRINT_STRW, @"「这样、喜欢_HH_ 」"
			ELSE
				CALL PRINT_STRW, @"「呼啊_HH_ 啊阿_HH_ 哈啊_HH_」"
			ENDIF
		ELSEIF CHECK("挿入")
			CALL PRINT_STRW, @"「哈啊阿_HH_ 啊_HH_ 咿呀_HH_ 啊阿……_HH_」"
			SELECTCASE RAND:4
			CASE 0
				CALL PRINT_STRW, @"「%ADANA55("肛門")%也_HH_ 嘴也都被%CNAME("二人称")%狠狠欺负了_HH_ 」"
			CASE 1
				CALL PRINT_STRW, @"「上面下面都被弄得这样狼狈_HH_ 变得那么舒服_HH_ 」"
				CALL PRINT_STRW, @"「脑子_HH_ 啊阿……_HH_变得奇怪了_HH_ 」"
			CASE 2
				CALL PRINT_STRW, @"「后面也_HH_ 嘴也都被%CNAME("二人称")%欺负_HH_ 唔~不要_HH_好舒服_HH_ 」"
				CALL PRINT_STRW, @"「啊阿_HH_ 在这样下去的话没有%CNAME("二人称")%就活不下去了_HH_」"
			CASEELSE
				CALL PRINT_STRW, @"「呼啊……_HH_ 后面、不要发出这种声音_HH_ 不要亲啊_HH_ 」"
			ENDSELECT
		;恋慕
		ELSEIF TALENT:恋慕
			CALL PRINT_STRW, @"「其实也想和%CNAME("二人称")%这样做啊……_HH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「欸_HH_ 啊阿_HH_ 啊啊啊……_HH_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;阴部愛撫
;阴蒂の場合にはCHECK_COM("陰核愛撫"), 阴部の場合にはCHECK_COM("阴部愛撫"), 恥丘ならCHECK_COM("恥丘愛撫")がONになる
;-------------------------------------------------
IF SELECTCOM == 7
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;中出し後にお掃除
	ELSEIF CHECK_COM("擦拭")
		;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
		RETURN 0
		PRINTFORMW
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;指挿入
;CHECK_COM("玩弄Ｇ点")とTEQUIP:振動棒で大きく分岐する
;-------------------------------------------------
IF SELECTCOM == 8
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;振動棒挿入中
		IF TEQUIP:振動棒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;Gスポット刺激
	ELSEIF CHECK_COM("玩弄Ｇ点")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;気持ちいい
		ELSEIF CHECK("指挿入")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;振動棒挿入中
	ELSEIF TEQUIP:振動棒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;気持ちいい
		ELSEIF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐肛　Ａ面部騎乗(被逆推ているとき)
;-------------------------------------------------
;舐肛
IF SELECTCOM == 9
	;初めて
	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 == 10
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;ELSEIF YURI_COND
		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
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;跳蛋
;-------------------------------------------------
IF SELECTCOM == 30
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	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("Ａ振動棒")
			;Ｓ状結腸まで振動棒が侵入している
			IF CHECK_COM("結腸責め")
				IF TALENT:結腸性感
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飛機杯
;-------------------------------------------------
IF SELECTCOM == 37
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW 「欸、飞机杯……？」
			PRINTFORMW 「嗯嗯、%CNAME("一人称")%虽然不讨厌用着」
			PRINTFORMW 「那个……%CNAME("一人称")%、做的话用手习惯一点啊……」
		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:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			IF COND("双頭振動棒")
				PRINTFORMW 「比想象中的更大呢……」
				PRINTFORMW 「嗯嗯、做好觉悟了……要、温柔一点哦……」
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	;非処女
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ｖ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOMS("Ｖ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;巨根
	IF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 65
			PRINTFORMW
		;対面座位
		CASE 63
			PRINTFORMW
		;それ以外
		CASEELSE
			PRINTFORMW
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ｖ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:PLAYER:手下留情 && NOWEX:Ｖ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			CALL PRINT_STR, " 「啊唔、请让我去吧……_HH__HH_」_W"
		ELSE
			PRINTFORMW 「(想去、让我去……吧)」
		ENDIF
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ｖ対応指令") && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
			IF TALENT:恋慕 && RAND:3 == 0
				PRINTFORMW
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		CASEELSE
			IF RAND:4 == 0
				PRINTFORMW
			ELSEIF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDSELECT
	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
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;屈服刻印Lv2以上
		ELSEIF MARK:屈服刻印 >= 2
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;後背位
;-------------------------------------------------
IF SELECTCOM == 61
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;屈服刻印Lv2以上
		ELSEIF MARK:屈服刻印 >= 2
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;屈曲位
;-------------------------------------------------
IF SELECTCOM == 62
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「呀、啊…… 进到里面了吗……」
			PRINTFORMW 「比普通姿势更色啊……」
			CALL PRINT_STRW, @"「%CNAME("一人称")%的那里、是只属于%CNAME("二人称")%的哦……_HH_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;屈服刻印Lv2以上
		ELSEIF MARK:屈服刻印 >= 2
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		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
			PRINTFORMW
		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
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;騎乗位
;-------------------------------------------------
IF SELECTCOM == 65
	;初めて
	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 == 66
	;初めて
	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 == 67
	;初めて
	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 == 68
	;初めて
	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

;-------------------------------------------------
;Ａ挿入系初選択
;疼痛が少なく楽しめているかはCHECK("Ａ挿入")で判定
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 79 && FIRSTCOMS("Ａ挿入") == 0
	;Ａ処女
	IF TALENT:Ａ処女
		;推倒時
		IF TEQUIP:推倒
			;恋慕
			IF TALENT:恋慕
				PRINTFORMW 「……对不起。已经到忍耐的极限了」
			;屈服刻印lv3
			ELSEIF MARK:屈服刻印 >= 3
				CALL PRINT_STRW, @"「……%CNAME("二人称")%的%ADANA55("阴茎")%、好像很好吃_HH_」"
			ELSE
				PRINTFORMW 「那………………那个………………」
			ENDIF
		ELSE
			;余裕有かつ屈服刻印lV3
			IF CHECK("Ａ挿入") && MARK:屈服刻印 >= 3
				CALL PRINT_STRW, @"「再怎么開发%ADANA55("阴茎")%也进不来的、%CNAME("二人称")%在听吗……_HH_」"
			;それ以外
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……%CNAME("二人称")%的话随时都欢迎哦？」
				PRINTFORMW 「但是……那个……」
				CALL PRINT_STRW, "「这种事情是第一次、可以的的话最好温柔一点、等……_HH_」"
			ENDIF
		ENDIF
		CALL PRINT_STRW, @"「……唔阿……%CNAME("二人称")%的%ADANA55("阴茎")%要来了……\@ABL:Ａ感覚 >= 3 ? _HH_ # \@」"
		IF CHECK("Ａ挿入")
			CALL PRINT_STRW, @"「呼啊阿_HH_啊阿_HH_ 后面、后面被_HH_」"
		ELSE
			PRINTFORMW 「咿呀、啊啊啊、啊啊啊！？」
		ENDIF
	;それ以外
	ELSE
		;余裕有
		IF CHECK("Ａ挿入")
			IF MARK:屈服刻印 >= 3
				IF RAND:2
					CALL PRINT_STRW, @"「今天用这种体位呢_HH_」"
				ELSE
					CALL PRINT_STRW, @"「呼啊啊_HH_ 啊啊啊_HH_ 啊阿呼_HH_ 欧金金进到后面……在里面啊啊_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「这、这样就行了吗……？」
			ENDIF
		;それ以外
		ELSE
			IF MARK:屈服刻印 >= 3
				CALL PRINT_STRW, @"「呼啊阿_HH_ 啊啊阿_HH_ 不用_HH_ 后面被%CNAME("二人称")%塞得满满的_HH_」"
			ELSE
				CALL PRINT_STRW, "「这样的_HH_ 无法忍耐啊_HH_」"
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ａ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOMS("Ａ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORML 「还有一点……」
		PRINTFORMW 「用后面很%TEXTR("可怕/痛")%的……温柔一点哦」
	;巨根
	ELSEIF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		CALL PRINT_STRL, @"「%TEXTR("啊/啊阿")%_HH_%CNAME("二人称")%的好大……」"
		CALL PRINT_STRW, @"「そんな%TEXTR("大きい/立派な")%ので%TEXTR("お尻/肛門")%犯されたら_HH_%CNAME("一人称")%、%TEXTR("壊れちゃいそう/おかしくなっちゃいそう")%_HH_」"
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 75
			IF PENIS(PLAYER)
				CALL PRINT_STRL, @"「%CNAME("二人称")%%TEXTR("要骑上来了/要全部射出来")%哦_HH_」"
			ELSEIF TALENT:MASTER:扶她 && TALENT:女性
				CALL PRINT_STRW, @"「明明%TEXTR("都是女孩子/是同性")%用后面H什么的……」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%是%TEXTR("变态/有点奇怪呢")%_HH_」"
			ELSE
				CALL PRINT_STRL, @"「%CNAME("二人称")%很喜欢%TEXTR("骑着/被骑着")%然后榨出来吧_HH_」"
			ENDIF
			CALL PRINT_STRW, @"（%TEXTR("能做好吗……啊、进去了/虽然很含羞……必须加油才行。啊阿、只是放进去就……好舒服い")%_HH_）"
		;対面座位
		CASE 73
			PRINTFORMW
		;それ以外
		CASEELSE
			IF PENIS(PLAYER)
				IF TEQUIP:PLAYER:避孕套
					CALL PRINT_STRL, @"「%TEXTR("有好好带套子很高兴……/用后面也要带套子什么的……")%_HH_」"
					CALL PRINT_STRW, @"「%TEXTR("后穴/肛?")%被%TEXTR("被中出的瞬间/射精的感觉")%虽然不讨厌_HH_……%TEXTR("从里面一点点溢出来很羞耻啊_HH_/溢出来的话会弄脏的……")%」"
				ELSEIF TALENT:女性
				CALL PRINT_STRL, @"「?然%TEXTR("都是女孩子/是同性")%……%TEXTR("小穴sex/后穴H")%%TEXTR("要做吗/要做呀")%_HH_」"
				CALL PRINT_STRW, @"「当然、%CNAME("二人称")%的话%CNAME("一人称")%%TEXTR("很放心……要温柔一点哦/可以接受……")%_HH_」"
				ELSE
					CALL PRINT_STRL, @"「%CNAME("二人称")%、%TEXTR("后穴/肛?")%なら%TEXTR("再怎么射也不会妊娠的/不会妊娠的所以再多射些吧")%_HH_」"
					CALL PRINT_STRW, @"（%TEXTR(@"%CNAME("一人称")%の的那里要被灌得满满的吗……好激动啊/虽然不会妊娠……但是被射入太多怎么办……_HH_ 稍微想象了一下")%_HH_」"

				ENDIF
			ELSE

			ENDIF
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
;-------------------------------------------------
;Ｓ状結腸を使っての肛門性交
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHECK_COM("結腸責め")
	;初めての結腸責め
	IF EXP:結腸経験 == 0
		PRINTFORMW
	;今回初の結腸責め
	ELSEIF EXP_GAIN("結腸経験") == 0
		IF TALENT:結腸性感
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		IF TALENT:結腸性感
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ａ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:PLAYER:手下留情 && NOWEX:Ａ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;余裕が無い
	ELSEIF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ａ対応指令") && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
			IF TALENT:恋慕 && RAND:3 == 0
				PRINTFORMW
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		CASEELSE
			IF RAND:4 == 0
				PRINTFORMW
			ELSEIF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門性交(初めては上のＡ挿入系初選択などで)
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 74
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門騎乗位
;-------------------------------------------------
IF SELECTCOM == 75
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	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 == 80
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORML 「加油……」
			PRINTFORMW 「那个、有什么想要的尽管说」
		;それ以外
		ELSE
			;レズ强奸　想定：双頭振動棒
			IF TALENT:処女 && COND("双頭振動棒", PLAYER)
				PRINTFORML 「你应该知道的、……%CNAME("一人称")%是第一次……」
				PRINTFORMW 「温柔一点哦……」
			ELSE
				PRINTFORML 「虽然在强调一边很羞耻……」
				PRINTFORMW 「和女孩子在一起做、还是第一次……温柔一点哦……」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF COND("双頭振動棒", TARGET)
				CALL PRINT_STRL, @"「%TEXTR(@"%CNAME("一人称")%被弄得乱七八糟感觉/同是女孩子缺被玩弄的心情")%怎么样啊、%CNAME("主人")%_HH_」"
				CALL PRINT_STRW, @"「%TEXTR(@"你看……%CNAME("主人")%的里面、已经射来了哦/已经变得舒服了？　再来再来、%CNAME("主人")%很喜欢那里被欺负呢")%_HH_」"
			ELSE
				CALL PRINT_STRL, @"「%CNAME("主人")%と%CNAME("一人称")%摩擦着%TEXTR("那里/小穴/舒服的地方")%、%TEXTR("发出激烈的水音/发出了下流的声音了哦")%_HH_」"
				CALL PRINT_STRW, @"「%TEXTR(@"可爱的声音、%CNAME("一人称")%看着%CNAME("主人")%的眼神想再多看一些/那里蜜汁流出很多了哦。变得那么坦率%CNAME("一人称")%很高兴哦")%_HH_」"
			ENDIF
		;それ以外
		ELSE
			IF COND("双頭振動棒", TARGET)
				CALL PRINT_STRL, @"「%CNAME("助手")%%TEXTR(@"会好好疼爱你的_HH_/和%CNAME("一人称")%再做感受到了吗？")%_HH_」"
				CALL PRINT_STRW, @"「%TEXTR(@"看上去已经很舒服了吧、在多欺负%CNAME("助手")%敏感的地方/相互一起变得更加舒服吧")%_HH_」"
			ELSE
				CALL PRINT_STRL, @"「%CNAME("助手")%%TEXTR(@"的那里和%CNAME("一人称")%的那里像在亲吻一样……_WH_/骑在%CNAME("一人称")%身上、想着加下来的事情忍不住兴奋起来")%_HH_」"
				CALL PRINT_STRW, @"「%TEXTR("嗯/嗯嗯")%_HH_　两个人的%TEXTR("小豆豆/阴核/敏感的地方")%在被摩擦哦?……感觉到了吗？　要变得更舒服哦_HH_」"
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("双頭振動棒", PLAYER)
				CALL PRINT_STRL, @"「%CNAME("主人")%、%TEXTR("饶了我吧……_WH_ 唔阿、不要！？ 不行！！/这么激烈、哈啊_HH_　哈、很舒服哦、啊阿")%_HH_」"
				CALL PRINT_STRW, @"「%TEXTR("不行/不……/不……要")%_HH_　%TEXTR(@"那里很敏感、哈阿啊/%CNAME("一人称")%的敏感地方、不要、啊阿、不要啊、要去了")%_HH_」"
			ELSE
				CALL PRINT_STRW, @"「就算%CNAME("一人称")%和%CNAME("主人")%%TEXTR("都是女孩子/是同性")%……%CNAME("一人称")%也真的爱着%CNAME("二人称")%哦_HH_」"
				CALL PRINT_STRW, @"「所以、%TEXTR(@"尽情疼爱%CNAME("一人称")%吧/不用顾虑……一起淫乱吧")%_HH_」"
			ENDIF
		;それ以外
		ELSE
			IF COND("双頭振動棒", PLAYER)
				CALL PRINT_STRL, @"「%TEXTR(@"%CNAME("二人称")%怎么样才会舒服、该怎么做、知道的吧……/最初还是希望……%CNAME("一人称")%来主导啊")%_HH_」"
				CALL PRINT_STRW, @"「哈啊啊_HH_……%TEXTR("好厉害/好舒服")%_HH_　就……就这样动、嗯嗯_HH_」"
			ELSE
				PRINTFORML 「%TEXTR("稍微/有一点")%%TEXTR("不安/害怕")%……但是%CNAME("二人称")%的话%TEXTR("没関系/很放心")%」
				PRINTFORMW 「%TEXTR("呼/哈")%……%TEXTR("没関系/只是有点吃惊而已……")%」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;雙乳間抽插
;-------------------------------------------------
IF SELECTCOM == 81
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;乳頭奸
;-------------------------------------------------
IF SELECTCOM == 82
	;初めて
	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
;-------------------------------------------------
;尿道挿入…細かく体位で分ける場合には以下の様になっている
;83,尿道正常位
;84,尿道後背位
;85,尿道屈曲位
;86,尿道対面座位
;87,尿道背面座位
;-------------------------------------------------
IF SELECTCOM >= 83 && SELECTCOM <= 87
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕が無い
		IF CHECK("尿道挿入") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕が無い
		IF CHECK("尿道挿入") == 0
			PRINTFORMW
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道騎乗位
;-------------------------------------------------
IF SELECTCOM == 88
	;初めて
	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 CHECK_COM("洗面奶手交")
	;恋慕
	IF TALENT:恋慕
		IF COND("喝母乳フラグ", PLAYER)
		CALL PRINT_STRW, @"「%CNAME("一人称")%的乳汁_WH_ 被吮吸着还要被_WH_ 啊_WH_」"
		CALL PRINT_STRW, @"「%CNAME("二人称")%的"
			IF TALENT:MASTER:阴茎 >= 3
				PRINTFORM 好大
			ELSEIF TALENT:MASTER:阴茎 == 1
				PRINTFORM 可爱
			ENDIF
		CALL PRINT_STRW, @"欧金金、嘿咻嘿咻……_WH_」"
		CALL PRINT_STRW, @"「真是不可思议……_WH_ 总觉得心跳不止……_WH_」"
		ELSE
		CALL PRINT_STRW, @"「%CNAME("一人称")%的胸部_WH_一边被亲一边被……」"
		CALL PRINT_STR, @"「%CNAME("二人称")%的"
			IF TALENT:MASTER:阴茎 >= 3
				PRINTFORM 好大
			ELSEIF TALENT:MASTER:阴茎 == 1
				PRINTFORM 可爱
			ENDIF
		CALL PRINT_STRW, @"欧金金、被这样弄舒服吗……_WH_」"
		ENDIF
	;この下たぶん死に分岐(でも貫通されたら出るは出るから残しとく)
	ELSE
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;手淫
;-------------------------------------------------
IF SELECTCOM == 90
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		CALL PRINT_STR, @"「%CNAME("二人称")%的"
			IF TALENT:MASTER:阴茎 >= 3
				PRINTFORM 好大
			ELSEIF TALENT:MASTER:阴茎 == 1
				PRINTFORM 可爱
			ENDIF
		CALL PRINT_STRW, @"欧金金、这样弄就行了吗……_WH_」"
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「怎么样、被这样也不坏吧～？」
			CALL PRINT_STRW, @"「欧金金里面……白色的汁液_WH_ 啾、啾的_WH_ 射出来吧_WH_」"
		;それ以外
		ELSE
			PRINTFORMW 「让你射出很多来哦～♪」
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 && RAND:3 == 0
				CALL PRINT_STR, @"「%CNAME("二人称")%的欧金金?……_WH_ 总觉得心里小鹿乱跳?……_WH_」_W"
				CALL PRINT_STR, @"「全身……唔啊_WH_ 好热……_WH_ 视线都变得模糊了……_WH_」_W"
		;それ以外
		ELSEIF FINDCHARA(NO, 40) && RAND:2 == 0
			CALL PRINT_STRW, @"「%CNAME("二人称")%、織笠前备……也想要变得舒服吗_WH_」"
			CALL PRINT_STRW, @"「織笠前辈已经……%CNAME("二人称")%的欧金金_WH_ 想变得舒服啊_WH_」"
		ELSE
			CALL PRINT_STR, @"「%CNAME("二人称")%的"
			IF TALENT:MASTER:阴茎 >= 3
				PRINTFORM 好大
			ELSEIF TALENT:MASTER:阴茎 == 1
				PRINTFORM 可爱
			ENDIF
			CALL PRINT_STRW, @"欧金金快点_WH_ 啾_WH_ 啾_WH_ 射出精液吧_WH_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;口交
;-------------------------------------------------
IF SELECTCOM == 91
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			CALL PRINT_STR, @"「哈呼……_WH_ %CNAME("二人称")%的"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎 == 1
					PRINTFORM 可爱
				ENDIF
			CALL PRINT_STRW, @"欧金金、好好品尝咯……_WH_」"
		ELSE
			CALL PRINT_STR, @"「……_WH_ %CNAME("二人称")%的"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎== 1
					PRINTFORM 可爱
				ENDIF
			CALL PRINT_STRW, @"欧金金、这样舔弄就行了吗？」"
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("阴茎接吻")
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「%CNAME("二人称")%最喜欢欧金金被亲吻了吧～_WH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「亲吻欧金金吗？」"
			CALL PRINT_STRW, @"「……更加有少女心一点_WH_ 做得到吗……」"
		ENDIF
	;みんな大好き清洁口交
	ELSEIF CHECK_COM("清洁口交")
		;恥垢もお掃除
		IF CHECK_COM("恥垢清洁口交")
			CALL PRINT_STRW, @"「唔啊……_HH_」"
			CALL PRINT_STRW, @"「清理欧金金就可以了吗_HH_」"
		;恋慕
		ELSEIF TALENT:恋慕 && RANDIF(1, ABL:奉仕精神 >= 3)
			CALL PRINT_STRW, @"「欸呜呜……_HH_」"
			CALL PRINT_STRW, @"「清扫恋人的欧金金啊呜、什么的_WH_ 好開心啊_HH_」"
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3 && RAND:2 == 0
			CALL PRINT_STRW, @"「啊哇……_HH_」"
			CALL PRINT_STRW, @"「舔干净欧金金、就可以了吗_HH_」"
			CALL PRINT_STRW, @"「唔姆……_HH_ 啾、啾啾……_WH_」"
		ELSE
			CALL PRINT_STRW, @"「欸、成为恋人这些也很重要？谁说的啊？」"
			CALL PRINT_STRW, @"「总觉得……哪里不对……但%CNAME("二人称")%这样说可能是这样吧_WH_」"
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STR, @"「欸唔……_WH_ 要被推到了吗"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎 == 1
					PRINTFORM 可爱
				ENDIF
			CALL PRINT_STRW, @"欧金金_HH_ 被为所欲为的感觉如何？_WH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「……_WH_ 身体动不了欧金金任人宰割的感觉如何？_WH_」"
			CALL PRINT_STRW, @"「害羞？ 还是開心……呢_WH_」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STR, @"「哈呼……_WH_ %CNAME("二人称")%的"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎 == 1
					PRINTFORM 可爱
				ENDIF
			CALL PRINT_STRW, @"恋人的欧金金、快变的硬邦邦的吧……_WH_」"
			;それ以外
		ELSE
			CALL PRINT_STRW, @"「啊哇……_HH_」"
			CALL PRINT_STRW, @"「口交什么的、蛮喜欢的啊_HH_」"
			CALL PRINT_STRW, @"「唔姆……_HH_ 啾、啾啾……_WH_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;乳交
;エンディング後想定なので基本恋慕が条件
;-------------------------------------------------
IF SELECTCOM == 92
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		CALL PRINT_STR, @"「用胸部、%CNAME("二人称")%的"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎 == 1
					PRINTFORM 可爱
				ENDIF
			CALL PRINT_STRW, @"欧金金、这样_WH_ 这样_WH_ 很舒服吧_WH_」"
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒 && TALENT:恋慕 && RAND:4 == 0
		CALL PRINT_STRW, @"「身体动不了、欧金金射出浓厚的白色牛奶_WH_ 啾_WH_ 啾的_WH_ 啊阿_WH_」"
		CALL PRINT_STRW, @"「狠狠使用%CNAME("一人称")%的胸部吧_WH_」"
	ELSEIF TALENT:恋慕 && RAND:3 == 0
			CALL PRINT_STRW, @"「欧金金射出白色的牛奶_WH_ 啾_WH_啾的_WH_ 射出来吧_WH_」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%向你的恋人胸部发泄吧_WH_」"
	ELSEIF TALENT:恋慕 && RAND:2 == 0
				CALL PRINT_STR, @"「哈呼……_WH_ %CNAME("二人称")%的"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎 == 1
					PRINTFORM 可爱
				ENDIF
		CALL PRINT_STRW, @"欧金金、用胸部来_WH_ 嘿嘿_WH_」"
	ELSE
			CALL PRINT_STR, @"「%CNAME("二人称")%的"
				IF TALENT:MASTER:阴茎 >= 3
					PRINTFORM 好大
				ELSEIF TALENT:MASTER:阴茎 == 1
					PRINTFORM 可爱
				ENDIF
			CALL PRINT_STRW, @"欧金金、用胸部来做吧_WH_ 嘿嘿……_WH_」"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;素股
;-------------------------------------------------
IF SELECTCOM == 93
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSEIF CHECK_COM("展示肉棒")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF RAND:3 == 0 && TALENT:恋慕
			PRINTFORMW 「脚在用力一点会舒服吗……？」
			CALL PRINT_STR, "「加油_HH_加油_HH_」_W"
		ELSEIF RAND:2 == 0
			PRINTFORMW 「%CNAME("二人称")%的……突起的地方、磨蹭一下……嗯」
			PRINTFORMW 「好舒服……啊、啊、啊嗯」
		ELSE
			PRINTFORMW 「脚在用力一点会舒服吗？」
			CALL PRINT_STRW, @"「啊唔、股间好热……_HH_」"
		ENDIF
	ENDIF
	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 「用胖次来摩擦吗？我觉得胖次本身不怎么好看……」
		PRINTFORMW 「……就算是%CNAME("二人称")%的请求、也好羞耻啊」
	;二回目以降
	;被逆推ているとき
	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
	;初めて
	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 == 100
	;初めて
	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 == 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 「欸、飞机杯吗……？」
			PRINTFORMW 「啊不是、不是讨厌用这个」
			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 「%CNAME("二人称")%的第一次、我来？」
			PRINTFORMW 「好高兴……」
		;それ以外
		ELSE
			PRINTFORMW 「%CNAME("二人称")%的第一次、我来？」
			PRINTFORMW 「不是恋人哦、可以吗……？」
		ENDIF
	ENDIF
	PRINTFORMW 「……%CNAME("一人称")%、会让%CNAME("二人称")%、变得幸福的……！」
	RETURN 1
ENDIF
;-------------------------------------------------
;正常位奉仕
;-------------------------------------------------
IF SELECTCOM == 120
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:PLAYER:処女
			;被逆推ている時
			IF TEQUIP:推倒
				PRINTFORMW 「……对不起」
				PRINTFORMW 「虽然知道%CNAME("二人称")%是第一次」
				PRINTFORMW 「%CNAME("一人称")%、已经……忍耐不了了……」
			;それ以外
			ELSE
				PRINTFORMW 「……欸」
				PRINTFORMW 「第一次哦……%CNAME("一人称")%……？」
			ENDIF
		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
		;それ以外
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……欸？现在？」
			PRINTFORMW 「没听清楚再说一遍？」
			PRINTFORMW
			PRINTFORMW 「%CNAME("二人称")%像被挖后面吗？」
			PRINTFORMW 「不要開玩笑了、就算是関系好的青梅竹马也不能挖后面那个地方啊……」
			PRINTFORMW
			PRINTFORMW 「……无论如何都想要吗？」
			PRINTFORMW 「那样的话会做的、但是……因为%CNAME("二人称")%才会……这样的」
		ELSE
			PRINTFORMW 「唔嗯……喜欢这样的啊」
			PRINTFORMW 「%CNAME("二人称")%虽然已经就色色的、没想到是这样的变态」
			PRINTFORMW
			PRINTFORMW 「你看、好好进去了哦」
			PRINTFORMW 「%CNAME("一人称")%会对%CNAME("二人称")%还以为会更喜欢主动……」
			PRINTFORMW 「这里也变成%CNAME("一人称")%专用的就好了」
		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
		;それ以外
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……欸？现在？」
			PRINTFORMW 「没听清楚再说一遍？」
			PRINTFORMW
			PRINTFORMW 「%CNAME("二人称")%像被挖后面吗？」
			PRINTFORMW 「而且还是从后面？」
			PRINTFORMW 「不要開玩笑了、就算是関系好的青梅竹马也不能挖后面那个地方啊……」
			PRINTFORMW
			PRINTFORMW 「……无论如何都想要吗？」
			PRINTFORMW 「那样的话会做的、但是……因为%CNAME("二人称")%才会……这样的」
		ELSE
			PRINTFORMW 「%CNAME("二人称")%虽然已经就色色的、没想到是这样的变态」
			PRINTFORMW 「而且还是用后面撒娇乞求欧金金的抖m什么的……」
			PRINTFORMW
			PRINTFORMW 「你看、好好进去了哦」
			PRINTFORMW 「%CNAME("一人称")%会对%CNAME("二人称")%还以为会更喜欢主动……」
			PRINTFORMW 「这里也变成%CNAME("一人称")%专用的就好了」
		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
		PRINTFORML 「要……要做什么啊……」
		PRINTFORMW 「不要、不、不要、住手啊啊！！ 咿呀啊啊啊！！」
	;排泄
	ELSEIF TEQUIP:浣腸 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW 「求你了、饶了我吧……我什么都会做的」
			PRINTFORMW 『刚刚……你说什么都会做吧？』
			PRINTFORMW %CALLNAME:TARGET%的后穴、虽然已经到了极限但努力颤抖着忍住不漏出来。
			PRINTFORMW 白皙的肌肤被汗水打湿、可怜的面容因为苦闷和羞耻扭曲着。
			PRINTFORMW 「%TEXTR("已经……不行了/对不起……对不起……")%」
			PRINTFORMW （%TEXTR(@"%CNAME("二人称")%的眼前漏出来……/不要啊……/……这样太过分了")%)
			PRINTFORMW 「%TEXTR("哈啊啊啊啊啊啊啊啊/咿啊啊啊啊啊啊啊")%！！」
			IF COND("精液浣腸")
				SETCOLOR DEF_COLOR("白")
			ELSEIF BASE:排泄物
				SETCOLOR DEF_COLOR("暗黄色")
			ELSE
				SETCOLOR DEF_COLOR("灰色")
			ENDIF
			;排泄音を汎用乱数で組み立ててもいいのでは？
			SELECTCASE RAND:3
			CASE 2
				PRINTFORMW （噗哩、噗哩哩、卟哩、卟哩哩、卟、卟哩哩哩唔）
			CASE 1
				PRINTFORMW （噗、噗卟、噗噗、卟啾……、噗啾、卟啾、卟啾哩、咕啾、咕啾啾、咕啾哩、咕咕·、噗呜呜）
			CASEELSE
				PRINTFORMW （噗哩、噗噗、卟哩、噗哩卟、噗哩哩、噗哩噗哩、噗哩、哩、噗呜呜）
			ENDSELECT
			RESETCOLOR
			PRINTFORML
			PRINTFORM 仿佛为了掩盖排泄声%CALLNAME:TARGET%大叫着、发出了%TEXTR("很厉害的/十分凄惨")%的声音
			IF BASE:排泄物
				IF COND("精液浣腸")
					PRINTFORMW 没能忍住精液和污物混合的灌肠液……
				ELSE
					PRINTFORMW 腹中积攒的污物溅射四散在床上、平常面对任何事情都沉着冷静的%CALLNAME:TARGET%露出了羞耻却悲伤的表情。
					PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%に一边乞求着饶恕、脸上流下眼泪但身体缺不受控制的从%CALLNAME:TARGET%の%TEXTR("肛門/尻穴/后穴")%流出污物的残渣……
				ENDIF
			ELSEIF COND("精液浣腸")
				PRINTFORMW 混合着精液的灌肠液从%CALLNAME:TARGET%的%TEXTR("后面/后穴/尻穴")%断断续续的喷涌而出……
			ELSE
				PRINTFORMW 如同喷泉一般涌出灌肠液%CALLNAME:TARGET%的%TEXTR("后面/后穴/尻穴")%随后啾噗啾噗的喷出残留的灌肠液……
			ENDIF
		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 CHECK_COM("結腸責め")
			IF TALENT:結腸性感
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		;恋慕
		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 == 147
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF ABL:精液中毒 >= 3
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		IF ABL:精液中毒 >= 3
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;穿环
;-------------------------------------------------
IF SELECTCOM == 148
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			PRINTFORMW 「那个……%CNAME("一人称")%、很讨厌穿孔什么的……但是不弄不行、对吧」
			PRINTFORMW CALLNAME:TARGET对自己身体穿孔感到为难、很勉强地同意了。
		;それ以外
		ELSE
			PRINTFORMW 「那个……%CNAME("一人称")%、很讨厌穿孔什么的……但是不弄不行、对吧」
			PRINTFORMW CALLNAME:TARGET对自己身体穿孔感到为难、一直说着拒绝的话、但还是同意了。
		ENDIF
	;二回目以降
	ELSE
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			PRINTFORMW 「……还有在加吗？」
			PRINTFORMW CALLNAME:TARGET对穿孔有厌恶感、十分不情愿的同意了。
		;それ以外
		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
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛い！
		IF CHECK("尿道PLAY") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;痛い！
		IF CHECK("尿道PLAY") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;攝像機使用
;-------------------------------------------------
IF SELECTCOM == 170
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:攝像機 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「要好好记录%CNAME("一人称")%我们做的事情哦」
		;それ以外
		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 == 390
	;成功
	IF TEQUIP:推倒 == 0
		PRINTFORMW
	;失敗
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF

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

;-------------------------------------------------
;甜言蜜语
;-------------------------------------------------
IF SELECTCOM == 393
	;口上を書く際には 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_K55
;口枷着用時には口上をスキップする？
SIF TEQUIP:口枷 && SELECTCOM != 135
	RETURN 0

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

;-------------------------------------------------
;パラメータ変動をトリガーにした口上
;パラメータ変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_PALAMCNG_K55, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0
;-------------------------------------------------
;パラメータ変動時のセリフ
;-------------------------------------------------
SELECTCASE ARGS
;-------------------------------------------------
;初めてＶ潤がLV3超えた
;-------------------------------------------------
CASE "Ｖ潤LV3突破"
	;初めて
	IF FIRST_EV("Ｖ潤LV3突破") == 0
		;潤滑液を使った場合
		IF SELECTCOM == 260
			PRINTFORMW 「哈啊……唔、黏糊糊的……」
			PRINTFORMW 「但是、准备也很重要……」
		;それ以外
		ELSE
			PRINTFORMW 「什么、这是……女孩子的身体、这么舒服吗……？」
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて欲情がLV3超えた
;-------------------------------------------------
CASE "欲情LV3突破"
	IF FIRST_EV("欲情LV3突破") == 0
		;媚薬を使った場合
		IF SELECTCOM == 261
			PRINTFORMW 「不、不要……啊、这个、抑制不住、啊……这样、哈阿、啊……啊！！」
		;それ以外
		ELSE
			PRINTFORMW 「不行、已经不行了、哈啊……」
			PRINTFORMW 「就算是%CNAME("二人称")%、我也忍耐不了了……」
		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 「呼唔、啊、啊阿……」
		PRINTFORMW 「求你了、饶了我吧、让我射精出来吧……」
	;２回目以降
	ELSE
		;大量射精挑逗
		IF NOWEX:射精前骤停 >= 2
			PRINTFORMW
		;射精挑逗
		ELSEIF NOWEX:射精前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;処女喪失(処女のみ)
;-------------------------------------------------
CASE "処女喪失"
	IF FIRST_EV("処女喪失") == 0
		;恋慕
		IF TALENT:恋慕
			;主人の性交による処女喪失
			IF PLAYER == MASTER && INSERT("Ｖ挿入")
				CALL PRINT_STRW, @" 「%CNAME("二人称")%拿走第一次、真的……太好了……_HH_」_"
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			IF COND("双頭振動棒") && INSERT("Ｖ挿入")
				IF TEQUIP:攝像機
					PRINTFORML 「%CNAME("一人称")%地第一次献给%CNAME("二人称")%了……」
					PRINTFORMW 「献上第一次的样子、全部……都要拍摄下来啊」
				ELSE
					PRINTFORML 「咕……嗯」
					PRINTFORMW 「虽然很痛……这样%CNAME("一人称")%就已经变成女人了吧」
				ENDIF
			ELSEIF TEQUIP:振動棒
				IF SIZE("振動棒", TARGET) >= ABL:Ｖ拡張
					PRINTFORML 「呜呜……」
					PRINTFORMW 「求你了、拔出来吧……」
					PRINTFORML
					PRINTFORMW %CALLNAME:TARGET%原本可爱的脸蛋痛苦的扭曲、好像立刻就要哭出来似的向%CALLNAME:MASTER%请求着。
				ELSEIF ABL:Ｖ拡張 >= SIZE("振動棒", TARGET)
					IF TEQUIP:攝像機
						PRINTFORML 「哈啊……哈啊……」
						PRINTFORML 「……%CNAME("一人称")%的第一次、被震动棒」
						PRINTFORMW 「……其实用%CNAME("二人称")%的比较好……第一次给了这种」
						PRINTFORMW 「这样就、可以了吧……」
					ELSEIF TALENT:MASTER:処女
						PRINTFORML 「哈啊……哈啊……」
						PRINTFORML 「下次轮到%CNAME("主人")%……做好觉悟随都可以来」
						PRINTFORMW 「%CNAME("主人")%要收下%CNAME("一人称")%的处女对吧？」
					ELSE
						PRINTFORML 「哈啊……哈啊……」
						PRINTFORML 「……但是、和%CNAME("主人")%一样的话……」
						PRINTFORMW 「对不起……稍微、让我静一静……？」
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;射精した(扶她/男性のみ)
;-------------------------------------------------
CASE "射精した"
	;初めて
	IF FIRST_EV("射精した") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「ひにゃっ！？」
			PRINTFORMW 「啊啊啊、等等、有什么要来了、来了啊阿！！」
			PRINTFORMW 「哇啊阿啊啊哇啊啊啊啊！？！？！」
			CALL PRINT_STRW, @"灰色_(抽搐！啾啾啾啾！！啾啾ッ！)"
		;それ以外
		ELSE
			PRINTFORMW 「啊等等、来了、不要啊、啊啊！！」
			CALL PRINT_STRW, @"粉紅_「啊阿、啊啊啊～～～啊！！」"
			CALL PRINT_STRW, @"灰色_(抽搐！啾啾啾啾！！啾啾ッ！)"
		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_K55, 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_K55
;初期は表示されないようにしてあるため、書いた後はRETURN 0を消す
RETURN 0

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

;-------------------------------------------------
;PLAYERの射精＆絶頂をトリガーにした口上
;それぞれの射精分岐内での初めてかどうかの判定は、FIRST_EV(ARGS)で行う
;例）ELSEIF SHOOT("脚")において初めてかどうかは、FIRST_EV("絶頂：脚")で判定する
;-------------------------------------------------
@KOJO_MESSAGE_SAMEN_AND_EXTACY_K55
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;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
;-------------------------------------------------
;胸で射精させた
;-------------------------------------------------
ELSEIF SHOOT("胸")
	;初めて
	IF FIRST_EV("絶頂：胸") == 0
		PRINTFORMW
	;奉仕精神Lv5
	ELSEIF ABL:奉仕精神 >= 5
		PRINTFORMW
	;奉仕精神Lv3以上
	ELSEIF ABL:奉仕精神 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;手で射精させた
;-------------------------------------------------
ELSEIF SHOOT("手")
	;初めて
	IF FIRST_EV("絶頂：手") == 0
		PRINTFORMW
	;奉仕精神Lv5
	ELSEIF ABL:奉仕精神 >= 5
		PRINTFORMW
	;奉仕精神Lv3
	ELSEIF ABL:奉仕精神 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;性交で射精させた
;-------------------------------------------------
ELSEIF SHOOT("Ｖ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ｖ中出し") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;屈服刻印Lv3
	ELSEIF MARK:屈服刻印 == 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
ELSEIF SHOOT("Ａ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ａ中出し") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;屈服刻印Lv3
	ELSEIF MARK:屈服刻印 == 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;接吻で射精
;-------------------------------------------------
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_K55, ARGS
SELECTCASE ARGS
CASE "恍惚"
	PRINTFORMW
CASE "推倒"
	PRINTFORMW
CASE "強制終了"
	PRINTFORMW
CASE "復活"
	PRINTFORMW
CASE "恍惚から復帰"
	PRINTFORMW
CASE "助手が限界"
	PRINTFORMW
ENDSELECT

RETURN 1

;-------------------------------------------------
;イベント口上集
;-------------------------------------------------
@KOJO_EVENT_K55, 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 FIRST_EV(ARGS) == 0

	ELSE

	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

;-------------------------------------------------
;PLAYERがMASTERとASSI間で交代した際の台詞
;-------------------------------------------------
CASE "調教者交代"
	;PLAYERがASSIに変わった
	IF PLAYER == ASSI
		PRINTFORMW
	;PLAYERが你に戻った
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;partnerがTARGETとASSI間で交代した際の台詞
;-------------------------------------------------
CASE "対象交代"
	;partnerとしてエッチに誘われた
	IF COND("第一対象") == TARGET
		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 「那个、希望你听了不要吃惊」
		PRINTFORMW 「%CNAME("一人称")%说实话很吃惊……」
		PRINTFORML
		PRINTFORMW 「……%CNAME("二人称")%的小孩、怀上……了」
		PRINTFORMW 「对不起、不应该開玩笑的……」
		PRINTFORMW 「不管什么形式、这都是%CNAME("二人称")%的孩子」
		PRINTFORMW 「想对%CNAME("二人称")%好好报告……」
		PRINTFORML
		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_K55, 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

;-------------------------------------------------
;この角色に特殊なイベントを叫醒際の追加条件設定
;STR:実行条件 に文字列が入っている場合は、それをPRINT_STRWで表示しつつイベント発生不可能とします
;条件を満たしている際にはSTR:実行条件 に何も入れないようにして下さい
;-------------------------------------------------
@ADDCOND_K55(ARGS)
#DIM ACTOR
ACTOR = FINDCHARA(NO, 55)

SELECTCASE ARGS
CASE "勧誘"
CASE "恋慕"
CASE "淫乱"
CASE "相思相愛"
	;特定のシナリオを見てないと相思相愛になれない
	;まあこの時点でやることって言ったら１つしかないのでわかりやすくはあるはず
	SIF TALENT:ACTOR:恋慕 && CEVENT("調教開始：恋慕", ACTOR) && FLAG:二人きり
		RETURN 1
	STR:実行条件 = ※%CSVNAME(55)%とは_黄色_[恋慕]＆二人きり＆特定のイベントを閲覧した後のみ_[相思相愛]になれます※
CASE "淫紋"
ENDSELECT

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

@MENU_SINGLE_ENDING_K55
#DIM ACTOR
;エンディングを書いたら、下のRETURN 0を消してください

;ENDを選択する際の表示。下で満たしたEND条件に応じて全角21文字以内で好きに変えて良い
STR:ＥＮＤ标题 = シナリオイベント：紬希

;閲覧済みの場合は見返せる
SIF CEVENT("My wish is...") && CEVENT("エンディング閲覧済み") == 1 || CFLAG:6501 == 1
	STR:エンディング += "1_紬希：My wish is.../"
SIF CEVENT("I love you, my dear.") || CEVENT("エンディング閲覧済み") == 1 || CFLAG:6501 == 1
	STR:エンディング += "2_紬希：I love you, my dear./"
SIF CEVENT("Farewell to Love") || CEVENT("エンディング閲覧済み") == 1 || CFLAG:6501 == 1
	STR:エンディング += "3_紬希：Farewell to Love/"
SIF CEVENT("Eternal bond") || CEVENT("エンディング閲覧済み") == 1 || CFLAG:6501 == 1
	STR:エンディング += "4_紬希：Eternal bond/"

RETURN 1

;ARGSには@MENU_SINGLE_ENDING_K1で設定したEND名のどれかが入っている
;見たENDはCEVENTで記録される
;例）ＥＮＤ名１を閲覧した場合は CEVENT("ＥＮＤ名１") = 1 となる
@SINGLE_ENDING_K55, ARGS
SELECTCASE ARGS
CASE "紬希：My wish is..."
	CALL K55_LONG, "My wish is..."
CASE "紬希：I love you, my dear."
	CALL K55_LONG, "I love you, my dear."
CASE "紬希：Farewell to Love"
	CALL K55_LONG, "Farewell to Love"
CASE "紬希：Eternal bond"
	CALL K55_LONG, "Eternal bond"

ENDSELECT
RETURN 1

path: ERB/EVENT_K/55 紬希/EVENT_K55_紬希.ERB


code:
このファイルはネタバレが入ってます。取扱注意です。

1.調教初回
温柔的接しますか？
1.是＞フラグ+1 = 1
2.否＞フラグ変化无 F0

2.屈服刻印2イベント
誰をおかずに自慰してる？/やっぱり溜圆圈と～
1.誰をおかずに～ フラグ+1
2.やっぱり溜圆圈と～ フラグ+2

3.信頼度1750イベント
1.TS願望があることを接受 > フラグ +5
2.TS願望があることは知らなかったが、側にいたい > フラグ+2
3.TS願望があることを認めない > フラグ -3

4.恋慕イベント
1.フラグが6以上の場合Aルート フラグ+5
2.フラグが5以下の場合Bルート 4択だけど実質2択
2-A.約束があったことを覚えている フラグ +5
2-B.約束があったことを覚えてなかった フラグ -5

5.告白イベント

フラグが10以上 > 自動的にハッピーエンド フラグ+20
フラグが9以下
男として愛している > フラグ+5 (ノーマル～バッドエンド)
紬希は紬希として愛してる > フラグ+15(ハッピーエンド)
女として愛してる > フラグ+10(ノーマルエンド)
性交の相性が良ければそれでいい > フラグ -10000 (強制バッドエンド)

エンディング
ハッピーエンドの場合
TS可、しかも具現拒否されない
ノーマルエンドの場合
TS可になるが、具現が拒否される
裏垢エンド
TS可にならない。

path: ERB/EVENT_K/55 紬希/見たな(紬希).txt

license: unknown