code:
;-------------------------------------------------
;乃々口上
;-------------------------------------------------
;-------------------------------------------------
;你の後輩である真面目な伪娘
;実は堕天使と人类のハーフで有、普段はそのことを隠して生活している
;しかしそれが你に知られてしまい、周りにばらされないようにするため、監視という名目で勧誘を受ける
;
;真面目な一方で、実はとてつもなく性欲が強く、倒錯的な行為や羞恥心を煽られるような行為が好き
;主人公の勧誘を受けたときも、内心どう侮辱られるのか妄想してひどく興奮していた
;屈服刻印や欲望の数値次第で隠せなくなっていくような口上にしていきたい

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

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	LOCALS = 我_仆
CASE "二人称"
	LOCALS = %C_DETAIL(PLAYER)%
;"主人"と"助手"は三人称。主に当人と話していない時に使う
CASE "主人"
	LOCALS = 前辈_学长
CASE "助手"
	LOCALS = %C_DETAIL(ASSI)%
CASE "阴蒂"
	IF MARK:屈服刻印 >= 2 && RAND:2
		LOCALS = 阴蒂お豆_くりおまめ
	ELSEIF MARK:屈服刻印 >= 1
		LOCALS = 阴蒂_くり
	ELSE
		LOCALS = 陰蒂_くりとりす
	ENDIF
CASE "尿道"
	IF RAND:2
		LOCALS = おしっこの穴_おしっこのあな
	ELSE
		LOCALS = 尿道_にょうどう
	ENDIF
CASE "肛門"
	IF YOKUBO() && RAND:3 == 0
		LOCALS = 尻部まんこ_おしりまんこ
	ELSEIF MARK:屈服刻印 >= 2 && RAND:2
		LOCALS = 肛門_あなる
	ELSE
		LOCALS = 尻部_おしり
	ENDIF
CASE "胸"
	IF YOKUBO() && RAND:2
		LOCALS = 胸部_胸部
	ELSEIF MARK:屈服刻印 >= 1
		LOCALS = 乳頭_ちくび
	ELSE
		LOCALS = 胸_むね
	ENDIF
CASE "精液"
	IF YOKUBO() && RAND:4 == 0
		LOCALS = おちんぽミルク_おちんぽみるく
	ELSEIF MARK:屈服刻印 >= 2 && RAND:3 == 0
		LOCALS = スペルマ_すぺるま
	ELSEIF MARK:屈服刻印 >= 1 && RAND:2
		LOCALS = 精液_ざーめん
	ELSE
		LOCALS = 精液_せいえき
	ENDIF
CASE "男性器"
	IF CEVENTS("男性器呼") == ""
		SELECTCASE MARK:屈服刻印
		CASE 3
			IF TALENT:淫乱 && RAND:2 && PALAM:欲情 >= PALAMLV:3
				LOCALS = マラ_まら
			ELSE
				LOCALS = おちんぽ_おちんぽ
			ENDIF
		CASE 2
			LOCALS = ちんぽ_ちんぽ
		CASE 1
			LOCALS = おちんちん_おちんちん
		CASEELSE
			LOCALS = 男性器_だんせいき
		ENDSELECT
	ELSE
		LOCALS = %CEVENTS("男性器呼")%
	ENDIF
CASE "女性器"
	IF CEVENTS("女性器呼") == ""
		IF MARK:屈服刻印 >= 2
			LOCALS = おまんこ_おまんこ
		ELSE
			LOCALS = 膣_ちつ
		ENDIF
	ELSE
		LOCALS = %CEVENTS("女性器呼")%
	ENDIF
CASEELSE
;	ARGSだけで判別はできないので、TaiTaを参考にFIND_CONDを使って番号を見つけ、それを使って性別などを確認する
;	わざわざ宣言するのも面倒なのでACTORに代入
;	フェリ桑のをパクって你が通ってもなんとかなるよう改善
	ACTOR = FIND_NO(ARGS)

	LOCALS = %C_DETAIL(ACTOR)%
ENDSELECT
RETURNF LOCALS

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

SELECTCASE ARGS
CASE "紹介文"
	STR:1 = \@TALENT:MASTER:伪娘 ? 和%CALLNAME:MASTER%一样 # \@以和女性相比不相上下的容貌而闻名的男学生。作为学生会的总务工作着
	STR:2 = 在学生们中也备受好评，昵称是“学生会的天使”

;ここの中に限り、CFLAG,BASE,TALENT,ABL,EXP,CSTRをCSVに書いたものから変更させることが出来ます
;例えばBASE:体力を2000にしたいなら BASE:0:体力 = 2000 、強気にさせたいなら TALENT:0:強気 = 1 として下さい
;また、ABL:信頼を+2させたい場合には ABL:0:信頼 = ABL:信頼 + 2 と書いてください
CASE "勧誘"
	IF COND("春")
		PRINTFORM 暖阳和煦的春日的某
	ELSEIF COND("夏")
		PRINTFORM 为蒸腾暑气所裹挟的夏日的
	ELSEIF COND("秋")
		PRINTFORM 万树尽染红叶色的秋日的
	ELSEIF COND("冬")
		PRINTFORM 大雪纷飞的冬日的
	ENDIF
	PRINTFORMW 一天放学后，%CALLNAME:MASTER%带着做好觉悟的神情静静伫立着
	PRINTFORMW 因为今天是学生会来视察的日子
	;ここ冷静に考えるとめっちゃガバガバなシステムだけど、エロゲに都合のいいシステムだと考えておけば
	PRINTFORMW 在学生众多、相对的部門与同学会也为数众多的这所学校里，为了确认有无进行适当的活动，老师和学生会执行部会联合起来，实行突击视察
	PRINTFORMW ……虽说如此，这项工作却已近乎虚有其表，大部分的学生都掌握着其日程。据说也有很多时候会稍微松懈一下、或者人数稍微不够也会放过。
	PRINTFORMW 以及，也有不去视察，代之以固定的学生会成员作为监视者入部的情况
	PRINTFORMW 不过，这个社团还没有监视者，考虑到这里变成了几乎只为性行为而设的场所的实际情况，很难想象会被放过
	;一週間以上経ったときと、それ以外で若干分岐する
	IF DAY <= 7
		IF CHARANUM <= 4
			PRINTFORMW 那就不仅仅是以「达不到规定人数」这个理由被废部能解决的了吧
		ELSE
			PRINTFORMW 也许会因为与不固定对象的行为被千夫所指，受到什么必死无疑的惩罚
		ENDIF
		PRINTFORMW 即使是这样，如果只是一般老师的话说不定还能蒙混过関，但是今天的对手可不好对付
	ELSE
		PRINTFORMW 纵使如此，虽说迄今为止都靠着\@ TALENT:MASTER:禁断的知識 >= 3 ? 自己的 # 其他部員的\@認識阻害之術之类的蒙混过関、但今天的负责人是个问题
	ENDIF
	PRINTFORMW 初等部、中等部、高等部、研究部……
	PRINTFORMW 在这所学生众多、部門分类细致的学校里，为了适当地回应学生们的要求，每个部門里都会设有学生会执行部
	PRINTFORMW 这其中有在高等部学生会的总务%NAME:TARGET%
	PRINTFORMW 虽说还是1年生，但凭借中性的容貌风姿和柔和的言谈举止成为了学生们\@ DAY <= 14 ? 之间传闻 # 中人气很高\@的男学生
	PRINTFORMW 『他好像是天使。或者说不定是堕天使呢。虽然力量不太强的样子，因为多少有些魔法的心得，还是警戒为妙吧。』
	PRINTFORMW 从弗里希艾尔处听到这些，是决定视察那一天的事情
	PRINTFORMW 但是%CALLNAME:MASTER%的心里无比平静
	PRINTFORMW 如果无法蒙混过関，那么拉拢到这一边就行了
	PRINTFORMW 对自己能力的自信，让冷静地应对这种事态成为了可能
	PRINTFORMW ――咚咚、听到了敲門的声响
	PRINTFORMW 与之相对的，%CALLNAME:MASTER%应了一声拉開拉門，让%NAME:TARGET%走进了房间
	PRINTFORMW 「初次见面。我是担任学生会总务的%NAME:TARGET%」
	PRINTFORMW 「这一次，请允许我参观%CNAME("二人称")%的部門活动，可以吗？」
	PRINTFORMW 阻止了这么说着想要開始调查的%NAME:TARGET%，%CALLNAME:MASTER%告知了他自己知道他的真实身份，也就是天使的事情
	PRINTFORMW 「……为什么%CNAME("二人称")%会知道？」
	PRINTFORMW %NAME:TARGET%惊诧不已
	PRINTFORMW 不过、被素不相识的前辈知道了也没什么好奇怪的
	PRINTFORMW 「……暴露了也没办法」
	PRINTFORMW 「是的。%CNAME("一人称")%确实是天使。严格来说，由于是堕天使和人类的混血儿，而变成了堕天使」
	PRINTFORMW 「但是为什么%CNAME("二人称")%会…………诶！？　为、为什么魂会……！？」
	PRINTFORMW 好像是感觉到了%CALLNAME:MASTER%持有复活能力的样子，原本就很大的眼睛睁得更大，身体凝固在了原地
	PRINTFORMW ……大概需要一些时间才能反应过来到底发生什么事
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORMW ――这里聚集着各种各样的人外
	PRINTFORMW 作为协助隐藏%NAME:TARGET%的真实身份的交换，能否竞选这里的部門活动的监视者，好好地隐藏活动内容
	PRINTFORMW %CALLNAME:MASTER%和恢复了理智的%NAME:TARGET%决定达成大致如上的交易
	PRINTFORMW 「……就这样就可以了吗？老实说，我还以为会提出更加不得了的要求呢，实在是松了一口气……只是……」
	PRINTFORMW 一在这里中断了话语，%NAME:TARGET%就羞赧地涨红了脸
	PRINTFORMW 「那……那个、有传闻说能在这里听到色、色、色色、色情的声音……」
	PRINTFORMW ……总而言之%CALLNAME:MASTER%的部門活动似乎\@DAY <= 7 ? 早早地成为了传言 # 学校八卦的牺牲品 \@的样子
	PRINTFORMW 因为在这里说谎也毫无意义，%CALLNAME:MASTER%对这个问题给出了肯定的答复
	PRINTFORMW 「真、真的在做那种事吗……」
	PRINTFORMW %NAME:TARGET%扭捏地喃喃自语起来
	PRINTFORMW 与看上去相反，他似乎对这种事情兴趣盎然的样子
	PRINTFORMW 这对犹豫不决的%NAME:TARGET%而言，展现了相当大的诱惑力
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORMW 「……我、我明白了，我加入」
	PRINTFORMW 「但这是为了监视！H的事情绝对不行！绝对不行！」
	PRINTFORMW 「………………不过只是稍微做一点的话没関系」
;これは別になくても構いません
CASE "勧誘直後"
	;PRINTFORML - %NAME:TARGET% -

;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	PRINTFORMW %NAME:TARGET%作为%CALLNAME:MASTER%的"%CSTR:関係%"，会在(昼)的部室里露面了。

;同居後の自分的房間の解説です。これも別に無くて構いません
CASE "自室描写"
	PRINTFORML 放着整理学生会事务等情形时使用的笔记本电脑的书桌书柜里，分門别类地摆着各个学科的教科书
	PRINTFORML 在左边深处的书柜里，摆放着人气少女漫画和收集来的古今东西、从有名摄影大家到无名照相小卒的写真集之类的
ENDSELECT

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

;-------------------------------------------------
;一日の終わりでフラグなどを変化させたい時にはここで弄ることが出来る
;-------------------------------------------------
@TIMEEVENT_K25

;玛丽桑の口上を参考にさせていただきました。有がとうございます
SELECTCASE COND("欲求不満")
CASE 3
	CSTR:出現場所 = 内衣店/内衣店/内衣店/内衣屋/内衣屋/レンタルショップ/レンタルショップ/二手商店
CASE 2
	CSTR:出現場所 = 便利店/洋点心店/游戏中心/书店/レンタルショップ/茶叶批发店/二手商店/内衣店
CASEELSE
	CSTR:出現場所 = 便利店/甜甜圈店/洋点心店/漢堡店/游戏中心/书店/レンタルショップ/茶叶批发店
ENDSELECT

;弁当の日数が増えると料理擅長が付くように
;点心実装にともない、点心の種類も増えるように設定
IF CFLAG:弁当日数 >= 25 && !TALENT:料理擅長
	CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%变得擅长料理了！"
	TALENT:料理擅長 += 1
	CSTR:点心 += "ガトーショコラ_亲手自制/香蕉蛋糕_亲手自制/曲奇_亲手自制/ごま団子_亲手自制"
ELSEIF CFLAG:弁当日数 >= 70 && TALENT:料理擅長 < 2
	CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%变得更加擅长料理了！"
	TALENT:料理擅長 += 1
	CSTR:点心 += "アップル餡餅_亲手自制/圆形奶酪乳酪のカナッペ_亲手自制/胸罩ックベリータルト_亲手自制/蜂蜜蛋糕_亲手自制"
ENDIF

IF ABL:精液中毒 >= 5 && CEVENT("乃々：喜欢的东西") == 0
	CSTR:喜欢的东西 += "/精液"
	CALL SET_CEVENT, "乃々：喜欢的东西"
ENDIF

;YOKUBOがオンになると居家服が増える
SIF YOKUBO() && CEVENT("乃々：服追加") == 0
	CALL SET_CEVENT, "乃々：服追加"

;槞彁酱とのTaiTaでフラグを間違えていたので、それの修正
IF CEVENT("乃々槞彁初会話")
	CALL DEL_CEVENT, "乃々槞彁初会話"
	CALL SET_CEVENT, "槞彁初会話"
ENDIF

;生徒会のイベントは一週間に一回が限度なので、それを越えたらフラグを重置する
SIF DAY - CFLAG:生徒会イベ発生日 > 7
	CFLAG:生徒会イベ発生日 = 0
;一日フラグを常に重置する
CFLAG:一日フラグ = 0

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

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
	PRINTFORMW 「等、等一下！　不是说了不行吗！」
	PRINTFORMW %CALLNAME:MASTER%阻止了想要从房间里出去的%CALLNAME:TARGET%
	PRINTFORMW 虽然%CALLNAME:TARGET%千方百计地想要把%CALLNAME:MASTER%的手从自己身边拉開，但是力量实在是弱不能当
	PRINTFORMW 「……我知道了。我会陪你」
	PRINTFORMW %CALLNAME:TARGET%一从%CALLNAME:MASTER%手腕中挣脱出来，就開始慢慢地褪下自己的衣服
	PRINTFORM 这具身躯的外观与举手投足的样态毫无疑问是男性，但同时也散发出了女性的氛围，%CALLNAME:MASTER%
	IF TALENT:MASTER:男性 == 1 && TALENT:MASTER:兩面通吃 != 1
		PRINTFORMW 即使是同性，也燃起了欲情
	ELSEIF TALENT:MASTER:扶她
		PRINTFORMW 望着那身姿的同时，股间已然怒挺
	ELSE
		PRINTFORMW 陶醉于既是同性又是异性的独特氛围中
	ENDIF
	PRINTFORMW
	PRINTFORMW
	PRINTFORMW 「让您久等了……在、在这之后您想要做什么？」
	PRINTFORMW %CALLNAME:TARGET%的脸颊染上了一层薄红，眼眸里闪烁着期待的神彩
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
	CALL PRINT_STRW, "「啊……_H_」"
	PRINTFORMW 「其实……那个……」
	PRINTFORMW 「嘛……和%CNAME("二人称")%在一起的心情……也不能说很差」
	PRINTFORMW 「……如果不做过分的事情的话，我会和你交往」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
	PRINTFORMW 「实际上、那个……」
	PRINTFORMW 在床前，%CALLNAME:TARGET%嘴唇翕动，似乎有话在心而口难開
	PRINTFORMW 「%CNAME("一人称")%啊，喜欢被人注视而感到羞耻，喜欢得不得了」
	PRINTFORMW 「从记事起就是这样……父母说，难道不是因为继承了堕天使的血脉吗」
	PRINTFORMW 「但是，随着年龄一年年增长，我认为不能再这样下去了……」
	PRINTFORMW 「……所以，%CNAME("二人称")%，拜托了。请不要再做这样的事情了」
	PRINTFORMW 「和%CNAME("二人称")%一起做色色的事很舒服、也很開心……已经变得不想放弃这样的事情了」
	PRINTFORMW 「虽然%CNAME("一人称")%想让%CNAME("二人称")%一直变得舒服下去，但是这样下去一定会变得淫乱的」
	PRINTFORMW 「那样是不行的……所以拜托了……」
	PRINTFORMW 「……但是，如果允许我任性一回的话」
	PRINTFORMW 「只限今天的话，请满满地和%CNAME("一人称")%来一发吧」
	PRINTFORMW 「希望你一生都舒服，如临至福到不想再做这样的事了」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF YOKUBO() && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
	PRINTFORMW 「已经不行了」
	;你は受虐属性のある豚野郎である場合　意図せずにABL:施虐属性をつけるのは難しいのでＣ感覚＝ちんこを沢山使っている場合にした
	IF ABL:Ｃ感覚 >= 3 && ABL:MASTER:受虐属性 >= 1 && ( (EXP:MASTER:Ａ経験 >= 150 && EXP:MASTER:Ａ性交経験 >= 50) || (TALENT:MASTER:男性 == 0 && EXP:MASTER:Ｖ経験 >= 150 && EXP:MASTER:Ｖ性交経験 >= 50) )
		PRINTFORMW 「都是这样诱惑着%CNAME("一人称")%的%CNAME("二人称")%的不好呢」
		PRINTFORMW 「因为%CNAME("一人称")%是男孩子啊」
		PRINTFORMW 「如%CNAME("二人称")%所愿，就赏赐你进行性処理……之类的吧」
		PRINTFORMW 「首先跪下来，亲吻%CNAME("一人称")%的%ADANA("阴茎")%吧」
		CALL PRINT_STRW, @"「做得很出色呢，%CNAME("二人称")%_H_」"
		PRINTFORMW 「这样以后%CNAME("二人称")%一生都是%CNAME("一人称")%的炮友了。还是说做性処理代替手淫的宠物比较好呢？」
		CALL PRINT_STRW, @"「因为今天直到玩够了为止都会在\@VAGINA(MASTER) == 1 ? 那里 # 屁股里\@播种呢。哪一边比较好，请好好的考虑一下哦_H_」"
		;以降Ｓっ気のある発言をできるようになる
		CFLAG:Ｓっ気フラグ = 1
		;PRINTFORMW やりすぎてしまったと乃々君酱が自己嫌悪して反省するイベントのフラグをここに立てる
	ELSE
		CALL PRINT_STRW, "「已经抑制不住了……_H_」"
		CALL PRINT_STRW, "「好的哦_H_、如果只用这里的话就一直这样舒服下去吧_H_」"
		CALL PRINT_STRW, @"「啊哈_H_、都是%CNAME("二人称")%的错_H_」 "
		PRINTFORMW 「无论%CNAME("一人称")%说了多少次这样不行，但是还是继续这样做下去」
		CALL PRINT_STRW, "「那样的话不是一定会勃起的吗_H_」"
		CALL PRINT_STRW, @"「呐_H_、这是我一生的愿望_H_、所以作为交换，让我成为炮友也好，代替手淫的宠物也好，\@VAGINA(MASTER) == 1 ? 肉震动棒 # 肉飞机杯\@也好、无论成为什么样都好_H_」"
		SIF TALENT:相思相愛
			CALL PRINT_STRW, "「然后像这样偶尔疼爱我就行了_H_」"
		CALL PRINT_STRW, @"「请更多地看着%CNAME("一人称")%变态的地方吧_H_」 "
	ENDIF
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 0
	PRINTFORMW 和往常一样，%CALLNAME:PLAYER%一碰到%CALLNAME:TARGET%，脸霎时就红了起来，低下了頭
	PRINTFORMW 「对、对不起……这样的事情还是第一次做……」
	PRINTFORMW 「不、也不能说这样的事情就是第一次……该怎么说才好呢……」
	PRINTFORMW 「……本来不打算变成这样的呢」
	CALL SET_CEVENT, "調教開始：恋慕"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：相思相愛") == 0
	CALL PRINT_STRW, @"「唔呼呼、%CNAME("二人称")%_H_」"
	PRINTFORMW %CALLNAME:TARGET%满脸带着笑容，握着%CALLNAME:MASTER%的手
	IF MARK:屈服刻印 >= 2
		PRINTFORMW 「因为我有着这样的一副身体……所以，我一直在想，不可能会有愿意与我一生一世白頭偕老的人」
	ELSE
		PRINTFORMW 「那个……%CNAME("一人称")%的身体出了一点微妙的状况……所以，我一直在想，不可能会有愿意和我一生一世白頭偕老的人」
	ENDIF
	PRINTFORMW 「而且……我也害怕，即使与人类相爱，也一定会被人所抛弃……」
	PRINTFORMW 「纵使如此，我依然想和%CNAME("二人称")%在一起」
	PRINTFORMW 「即使%CNAME("二人称")%的魂回到了普通的状态，也没関系」
	PRINTFORMW 「即使对方是%CNAME("二人称")%，我也不会说出想要永远在一起这种任性的话」
	PRINTFORMW 「但是，只有这一瞬，希望这一瞬，能成为只有%CNAME("一人称")%和%CNAME("二人称")%二人共同度过的时光」
	CALL SET_CEVENT, "調教開始：相思相愛"
ELSEIF CFLAG:Ｓっ気フラグ && PENIS(PLAYER) && RAND:5 == 0 && CEVENT("射精管理初回") == 0
;この開始口上を引くと手下留情された状態で調教するハメになる
;ノリ的には完全に射精管理
	PRINTFORMW 「%CNAME("二人称")%、稍微打扰一下可以吗？」
	PRINTFORMW 回应着%CALLNAME:TARGET%而接近他的下个瞬间，%CALLNAME:PLAYER%的裤子像扯裂開一般被一口气拽了下来
	PRINTFORMW 尽管%CALLNAME:PLAYER%感到不知所措，%CALLNAME:TARGET%却熟视无睹，继续手脚麻利地做着什么。
	PRINTFORMW 注意到的时候，%CALLNAME:PLAYER%的阴茎根部已经被装上了金光闪闪的圆环。
	PRINTFORMW 「好的，结束了哟」
	PRINTFORMW 「……装上了什么、吗？」
	CALL PRINT_STRW, @"「呼呼_H_那个是为了让你不能射精而用的器具哦_H_」"
	;魔術を便利に扱いすぎでは？
	CALL PRINT_STRW, @"「这上面被施了魔法，只要被装上去，%CNAME("二人称")%就会变得射不出精子来_H_」"
	IF TALENT:PLAYER:扶她
		CALL PRINT_STRW, @"「今天就只用女孩子的快感来享受其中吧_H_%CNAME("二人称")%」"
	ELSEIF TALENT:PLAYER:伪娘
		CALL PRINT_STRW, @"「用这个让你变成真正的女孩子吧_H_%CNAME("二人称")%_H_」"
	ELSE
		CALL PRINT_STRW, @"「用这个让你变得像女孩子一样舒服吧_H_%CNAME("二人称")%_H_」"
	ENDIF
	TEQUIP:PLAYER:手下留情 = 1
	TEQUIP:推倒 = 1
	CALL SET_CEVENT, "射精管理初回"
;助手の有無をチェック（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K25_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 K25_KOJO2
ENDIF

RETURN 1

;-------------------------------------------------
;調教開始時（2回目以降）
;-------------------------------------------------
@K25_KOJO2
;新年
IF DAYEV("新年")
	PRINTFORMW 「%CNAME("二人称")%，祝您新年快乐」
	PRINTFORMW 「新年新气象，今后也要带着焕然一新的心情，更加努力地在校园生活哦」
	PRINTFORMW 「……那么，拘谨的事情就到此为止吧」
	IF YOKUBO()
		CALL PRINT_STRW, "「就这样一起来做新年的第一次爱吧_H_」"
		IF COND("夜")
			PRINTFORMW 「确实、%CNAME("二人称")%总是能让我很舒服……」
			PRINTFORMW 「果然，在这种特別的日子里，会突然兴奋起来吧？」
		ELSE
			PRINTFORMW 「就算，你问了为什么……」
			PRINTFORMW 「因为，新年初次的、而且是这样充满希望的时候做爱什么的，难道不会让人兴奋吗？」
		ENDIF
		CALL PRINT_STRW, @"「……所以，请%CNAME("二人称")%多多侵犯%CNAME("一人称")%直到涨满的程度吧_H_」"
	ELSE
		PRINTFORMW 「从这里開始就是不用拘谨礼节的部分了，和%CNAME("一人称")%一起……这、为、为什么要把我带去床上！？」
		PRINTFORMW 「……那个、%CNAME("二人称")%就那么想和%CNAME("一人称")%那、那个……做吗？」
		PRINTFORMW 「……请温柔一些噢」
	ENDIF
;情人節
ELSEIF DAYEV("情人節")
	IF YOKUBO() || TALENT:恋慕
		PRINTFORMW 「今年的情人节礼物是%CNAME("一人称")%呢……開玩笑的哦」
		CALL PRINT_STRW, @"「呼呼_H_请将我全部吃干抹净哦？」"
	ELSE
		PRINTFORMW 「……？ 有什么事吗？」
		PRINTFORMW 「诶？ 因为是情人节所以想和%CNAME("一人称")%做吗？」
		PRINTFORMW 「这是在说什么奇怪的话呢…………拜托了，请手下留情」
	ENDIF
;女仆の日
ELSEIF DAYEV("女仆の日")
	IF YOKUBO() || TALENT:恋慕
		CALL PRINT_STRW, @"「呼呼_H_您回来了呢，主人大人_H_」"
		CALL PRINT_STRW, @"「今天要享用什么样的服务呀？ ……開玩笑的哦_H_」"
	ELSE
		PRINTFORMW 「那、那个……」
		CALL PRINT_STRW, @"「请、请允许我全身全心为您服务……_H_」"
	ENDIF
ELSEIF DAYEV("万圣节")
	PRINTFORMW 「%CNAME("二人称")%，不给糖就捣蛋哦」
	IF YOKUBO() || TALENT:恋慕
		CALL PRINT_STRW, @"「呼呼_H_因为是%CNAME("二人称")%的事、我觉得一定给我准备了许许多多的『小点心』哦」"
		PRINTFORMW 「但是这一次可是特别的。就由%CNAME("二人称")%来选择吧」
		PRINTFORMW 「你会选择哪一边呢？　是biubiu地射出满满当当的%ADANA("精液")%来呢……」
		CALL PRINT_STRW, @"「……还是让%CNAME("一人称")%充分地进行色色的惩罚呢、请选一个吧_H_」"
	ELSE
		PRINTFORMW 「開玩笑的哦……那个、怎么样呢？」
		PRINTFORMW 「……啊、啊嘞？　为什么这就要開始做色色的事了……？」
		PRINTFORMW 「呜、那、那个……」
		CALL PRINT_STRW, @"「请、请温柔些惩罚我……_H_」"
	ENDIF
;圣诞节
ELSEIF DAYEV("圣诞节")
	IF YOKUBO() || TALENT:恋慕
		PRINTFORMW 「圣诞快乐、%CNAME("二人称")%」
		CALL PRINT_STRW, @"「……那么、我们来一起度过愉快的圣诞节吧」"
	ELSE
		PRINTFORMW 「今、今天也要做吗……？」
		PRINTFORMW 「如、如果说大家都在做的话说不定是这样……」
	ENDIF
ELSEIF CEVENT("射精管理初回") && PENIS(PLAYER) && RAND:5 == 0
	CALL PRINT_STRW, @"「呼呼_H_今天来好好享受无法射精的快乐吧，%CNAME("二人称")%_H_」"
	CALL PRINT_STRW, @"「\@TALENT:PLAYER:扶她 || TALENT:PLAYER:伪娘 ? 作为女孩子 # 像女孩子一样\@舒服起来吧_H_」"
	TEQUIP:PLAYER:手下留情 = 1
	TEQUIP:推倒 = 1
ELSEIF YOKUBO() >= 2 && COND("妊娠可能")
	CALL PRINT_STRW, @"「最近，无法抑制住自己了……总是只考虑色色的事情……_H_」"
	CALL PRINT_STRW, @"「……所以、请和我满满地做到真的会怀孕的程度吧_HH_」"
ELSEIF SHIRT(TARGET) == "女仆装" && YOKUBO()
	CALL PRINT_STRW, @"「フフ_H_一生懸命ご奉仕させてもらいます_H_」"
	CALL PRINT_STRW, @"「……だから、その分たく桑ご褒美をくださいね？　主人様_H_」"
ELSEIF PLACE("情人旅館") || PLACE("做爱房")
	IF YOKUBO() || TALENT:恋慕
		CALL PRINT_STRW, "「……呼呼_H_在这里就能不在意他人的目光来做爱了呢……_H_」"
		CALL PRINT_STRW, @"「……直到把肚子填满为止都要做很多很多哦、%CNAME("二人称")%_H_」"
	ELSE
		PRINTFORMW 「确、确实，在这里的话就没问题了……」
		CALL PRINT_STRW, "「请、请手下留情……_H_」"
	ENDIF
ELSEIF PLACE("公園")
	IF YOKUBO()
		IF ABL:露出癖 >= 4 && RAND:3 == 0
			IF COND("夜")
				CALL PRINT_STRW, "「呼呼_H_虽然说是晚上，但是在被谁看到都不奇怪的地方做爱什么的……_H_」"
				IF RAND:2
					CALL PRINT_STRW, @"「%CNAME("二人称")%真是变态_H_」"
				ELSE
					CALL PRINT_STRW, @"「不愧是%CNAME("二人称")%呢_H_」"
				ENDIF
			ELSE
				CALL PRINT_STRW, @"「在这样被谁看见都无法抱怨什么的地方%TEXTR("青姦/打野战/做爱")%什么的……_H_」"
				CALL PRINT_STRW, @"「呼呼_H_已经兴奋到起鸡皮疙瘩了……_H_」"
			ENDIF
		ELSE
			PRINTFORMW 「……在、在这里做吗？」
			IF COND("夜")
				PRINTFORMW 「虽然说已经很晚了、在公园做什么的……」
			ELSE
				PRINTFORMW 「在这种被谁看到都不奇怪的地方……」
			ENDIF
			PRINTFORMW 「……真是的、因为是%CNAME("二人称")%的请求呢，没办法」
			CALL PRINT_STRW, "「……取而代之的，请满满地做到不用在意周围的事情也可以的程度吧_H_」"
		ENDIF
	ELSE
		PRINTFORMW 「……！　在、在公园……吗……！？」
		CALL PRINT_STRW, @"「这、这样的事情…………%CNAME("二人称")%如果非要做的话那也没办法……_H_」"
	ENDIF
;恋慕
ELSEIF TALENT:恋慕 && RAND:10 >= 7
	IF MARK:屈服刻印 >= 3 && RAND:2
		CALL PRINT_STR, "「今天是充满爱与缠绵的色色气氛_H_、"
		IF TALENT:PLAYER:男性 || TALENT:PLAYER:扶她
			CALL PRINT_STRW, "为了让我怀上请侵犯我吧_H_」"
		ELSE
			CALL PRINT_STRW, "请让我中出到怀上的程度吧_H_」"
		ENDIF
	ELSE
		PRINTFORMW 「今天可以好好地撒娇了吧？」
	ENDIF
ELSE
	IF TALENT:气味弱点 && RAND:7 == 0
		CALL PRINT_STRW, @"「嘶ー…………_H_%CNAME("二人称")%的%TEXTS("气味")%啊……_H_」"
		CALL PRINT_STRW, @"「……请做许许多多色色的事情，让%CNAME("一人称")%的身体里染上%CNAME("二人称")%的%TEXTS("气味")%吧_H_」"
	ELSEIF GETBIT(TALENT:精液弱点, 0) && RAND:6 == 0
		PRINTFORMW 「最近、喉咙干得不得了呢」
		PRINTFORMW 「已经变成%TEXTR("不喝下/不咕噜咕噜地喝下")%%CNAME("二人称")%的%ADANA("精液", TARGET, PLAYER)%的话就无法満足的身体了……」
		CALL PRINT_STRW, @"「……请负起责任来，让我满满的喝上一发濃厚的%ADANA("精液")%吧。%CNAME("二人称")%_H_」"
	ELSEIF GETBIT(TALENT:精液弱点, 2) && RAND:5 == 0
		PRINTFORMW 「……%CNAME("二人称")%。最近%CNAME("一人称")%感觉有点奇怪」
		CALL PRINT_STRW, @"「%ADANA("肛門")%因为欲求不满而发痒……因为想要被%ADANA("精液")%满满地淋洒浇灌而无法集中精神了……_H_」"
		CALL PRINT_STRW, @"「无论怎样都是%CNAME("二人称")%不好。如果觉得抱歉的话，就请用%ADANA("精液", TARGET, PLAYER)%填满、玷污%CNAME("一人称")%的%ADANA("肛門")%吧……_H_」"
	ELSEIF GETBIT(TALENT:精液弱点, 3) && RAND:4 == 0
		PRINTFORMW 「最近、我的%ADANA("胸")%一阵阵地发疼」
		CALL PRINT_STRW, @"「已经变得一直这样发痒、无法抑制地想要碰了又碰，但是如果被%CNAME("二人称")%的%ADANA("精液")%一浇，下面就会開始蠢动不已……_H_」"
		CALL PRINT_STRW, @"「本应没有的子宮却在蠢蠢欲动，一直呼喊渴求着孕育%CNAME("二人称")%的孩子……_H_」"
		CALL PRINT_STRW, @"「已经无法忍耐了……请在%ADANA("胸")%里满满地射出%ADANA("精液")%吧_H_」"
	ELSEIF GETBIT(TALENT:精液弱点, 4) && RAND:3 == 0
		CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("尿道")%变得好奇怪……_H_」"
		CALL PRINT_STRW, @"「本来是用来尿尿的地方，却已经变成了只要灌进%CNAME("二人称")%的%ADANA("精液")%就会变得很舒服的身体_H_」"
		CALL PRINT_STRW, @"「……因为都是%CNAME("二人称")%不好，请好好地在%ADANA("尿道")%里满满地侵犯、让%ADANA("精液")%咕噜咕噜地射出吧_H_」"
	ELSEIF RAND:2
		SELECTCASE RAND:5
		CASE 0
			;Ｃ感覚
			IF TALENT:淫核
				CALL PRINT_STRW, @"「已经变成一直不触碰欧金金就会忍受不了的身体了……_H_」"
				CALL PRINT_STRW, @"「请负起责任来，用%CNAME("二人称")%的手段更多地%TEXTR(@"让我射出精子/让我噗噗地射出%ADANA("精液")%/欺负我")%吧_H_」"
			ELSE
				SELECTCASE ABL:Ｃ感覚
				CASE IS >= 5
					IF YOKUBO()
						CALL PRINT_STRW, @"「呼呼_H_最近%ADANA("阴茎")%一直勃起着平息不下的样子呢_H_」"
						CALL PRINT_STRW, @"「%CNAME("二人称")%，拜托了，可以帮我平息一下吗_H_」"
					ELSE
						CALL PRINT_STRW, @"「那、那个……最近、%ADANA("阴茎")%平息不了……_H_」"
						CALL PRINT_STRW, @"「那个、可以帮我平息一下吗……%CNAME("二人称")%……_H_」"
					ENDIF
				CASE IS >= 3
					CALL PRINT_STRW, @"「最近%ADANA("阴茎")%很敏感\@YOKUBO() ? ，只是稍微触碰就要去了 # 呢……\@_H_」"
					IF YOKUBO()
						CALL PRINT_STRW, @"「拜托了，能充分地责备%CNAME("一人称")%的%TEXTR("下流/淫乱/敏感")%%ADANA("阴茎")%吗_H_」"
					ELSE
						CALL PRINT_STRW, @"「那个……如果可以的话，想要%CNAME("二人称")%让%ADANA("阴茎")%、那个、平静下来……_H_」"
					ENDIF
				CASEELSE
					IF YOKUBO()
						CALL PRINT_STRW, "「呼呼_H_今天也来满满地做上一发吧_H_」"
					ELSE
						CALL PRINT_STRW, "「今、今天也请多関照……_H_」"
					ENDIF
				ENDSELECT
			ENDIF
		CASE 1
			;Ｂ感覚
			IF TALENT:淫乳
				CALL PRINT_STRW, "「啊……_H_最近、乳頭敏感过頭了……_H_」"
				CALL PRINT_STRW, "「在学生会工作的时候每次乳頭擦到衣服，全身都会震颤着蠢蠢欲动呢_H_」"
				CALL PRINT_STRW, @"「……已经无法忍耐了。请多多地虐待我的%ADANA("胸")%吧……_H_」"
			ELSE
				SELECTCASE ABL:Ｂ感覚
				CASE IS >= 5
					CALL PRINT_STRW, "「已经不用触碰也会变得兴奋起来了……哈啊……_H_」"
					CALL PRINT_STRW, "「请更多、更多地触碰我……_H_」"
				CASE IS >= 3
					IF YOKUBO()
						CALL PRINT_STRW, "「呼呼_H_最近变得只要被衣服擦到就会很舒服了……_H_」"
					ELSE
						CALL PRINT_STRW, "「那、那个、最近只要被衣服擦到就会很舒服……_H_」"
					ENDIF
					CALL PRINT_STRW, @"「\@YOKUBO() == 0 ? 那、那个、 # \@请多多地摸摸我让我变得更舒服吧\@YOKUBO() ? _H_ # ……_H_\@」"
				CASE IS >= 1
					CALL PRINT_STRW, @"「嗯……_H_最近、只要一碰到%ADANA("胸")%就会变得很舒服……_H_」"
					IF YOKUBO()
						CALL PRINT_STRW, @"「今天也请多多地開发我，让我变得更加更——加地舒服哦_H_%CNAME("二人称")%」"
					ELSE
						CALL PRINT_STRW, @"「那、那个、今天也不来让%ADANA("胸")%舒服起来吗……_H_」"
					ENDIF
				CASEELSE
					IF YOKUBO()
						CALL PRINT_STRW, "「呼呼_H_今天也来满满地做上一发吧_H_」"
					ELSE
						CALL PRINT_STRW, "「今、今天也请多関照……_H_」"
					ENDIF
				ENDSELECT
			ENDIF
		CASE 2
			;Ａ感覚
			IF TALENT:尻穴狂い
				CALL PRINT_STRW, @"「%CNAME("二人称")%、%CNAME("一人称")%的%ADANA("肛門")%已经不行了……_H_」"
				IF TALENT:Ａ処女
					CALL PRINT_STRW, @"「已经变成不被%CNAME("二人称")%责备就没法满足的\@TALENT:縦深菊穴 && RAND:2 ? 小穴 # 色情的穴\@了……_H_」"
				ELSE
					CALL PRINT_STRW, @"「已经变成总是\@CHECK("Ａ完美契合") ? 不被%CNAME("二人称")%的%ADANA("阴茎")%挿进去 # 不被什么东西挿进去\@就无法満足的\@TALENT:縦深菊穴 && RAND:2 ? 小穴 # 色情的穴\@了……_H_」"
				ENDIF
				CALL PRINT_STRW, @"「……负起责任来、\@PENIS(MASTER) ? 用%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%来 # 震动棒来\@滋啵滋啵地填满%ADANA("肛門")%吧_H_」"
			ELSE
				SELECTCASE ABL:Ａ感覚
				CASE IS >= 5
					IF YOKUBO()
						CALL PRINT_STRW, @"「啊哈_H_%CNAME("二人称")%_H_」"
						IF TALENT:Ａ処女
							CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("肛門")%、已经变得想要%CNAME("二人称")%多多調教到发痒了_H_」"
						ELSE
							CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("肛門")%，已经变得想被%CNAME("二人称")%的\@PENIS(MASTER) ? %ADANA("阴茎")% # 震动棒\@挿入而痒得不得了了_H_」"
						ENDIF
						CALL PRINT_STRW, @"「%CNAME("二人称")%、拜托了，请把%CNAME("一人称")%的%ADANA("肛門")%搞得乱七八糟吧_H_」"
					ELSE
						PRINTFORMW 「%CNAME("二人称")%，那个……」
						IF TALENT:Ａ処女
							CALL PRINT_STRW, @"「最近%CNAME("一人称")%的%ADANA("肛門")%，变得一不被%CNAME("二人称")%欺负的话就会開始痒痒的样子……_H_」"
						ELSE
							CALL PRINT_STRW, @"「最近%CNAME("一人称")%的%ADANA("肛門")%，只要不被\@PENIS(MASTER) ? %CNAME("二人称")%的%ADANA("阴茎")% # %CNAME("二人称")%用震动棒\@挿入的话就会痒起来……_H_」"
						ENDIF
						CALL PRINT_STRW, @"「……那个，为了让%CNAME("一人称")%冷静下来，不来多多虐待%ADANA("肛門")%吗……_H_」"
					ENDIF
				CASE IS >= 3
					CALL PRINT_STRW, @"「最近，%ADANA("肛門")%好像很有感觉的样子……_H_」"
					IF YOKUBO()
						CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%_H_作为赔罪，能不能開发我，让我更加更加地敏感呢_H_」"
					ELSE
						CALL PRINT_STRW, @"「那、那个、不来多多虐待%ADANA("肛門")%，来平息一下吗……_H_」"
					ENDIF
				CASE IS >= 1
					CALL PRINT_STRW, @"「\@YOKUBO() ? 呼呼_H_ # 那个……\@今天不来虐待一下我的%ADANA("肛門")%吗……_H_」"
					IF YOKUBO()
						CALL PRINT_STRW, "「最近变得有感觉了呢……_H_」"
						CALL PRINT_STRW, @"「……要好好地负起责任来哦_H_%CNAME("二人称")%」"
					ELSE
						PRINTFORMW 「那个……最近，应、应该说是已经习惯了吧……」
						PRINTFORMW 「！！ 请、请忘掉我刚刚说的话！」
					ENDIF
				CASEELSE
					IF YOKUBO()
						CALL PRINT_STRW, "「呼呼_H_今天也来满满地做上一发吧_H_」"
					ELSE
						CALL PRINT_STRW, "「今、今天也请多関照……_H_」"
					ENDIF
				ENDSELECT
			ENDIF
		CASE 3
			;Ｍ感覚
			IF TALENT:蕩唇
				CALL PRINT_STRW, "「嗯……_H_」"
				CALL PRINT_STRW, "「最近变成这副光是这么亲吻就要去了的样子了呢……_H_」"
				CALL PRINT_STRW, "「更多……请更多地亲吻我……_H_好舒服……_H_」"
			ELSE
				SELECTCASE ABL:Ｍ感覚
				CASE IS >= 5
					IF YOKUBO()
						CALL PRINT_STRW, "「呼呼_H_嘴唇变得非常敏感了呢_H_」"
						CALL PRINT_STRW, "「大概变成了只是像这样说着话好像也能去的程度呢で_H_」"
					ELSE
						CALL PRINT_STRW, "「那、那个，嘴唇变得非常敏感了……_H_」"
						CALL PRINT_STRW, "「变成只是像这样说着话就要稍微去了的样子了……_H_」"
					ENDIF
					CALL PRINT_STRW, "「不来更多地虐待我的嘴唇吗……_H_」"
				CASE IS >= 3
					CALL PRINT_STRW, "「最近，即使是亲吻也会变得很舒服的样子……_H_」"
					CALL PRINT_STRW, @"「\@YOKUBO() == 0 ? 那、那个、 # \@不做更多让嘴巴更舒服的事情吗……_H_」"
				CASE IS >= 1
					PRINTFORMW 「最近，感觉嘴唇好像变得很敏感的样子……」
					IF YOKUBO()
						CALL PRINT_STRW, @"「真的变得敏感了吗、还是我搞错了呢，不来一起确认一下吗，%CNAME("二人称")%_H_」"
					ELSE
						PRINTFORMW 「那个，已经到这种程度的话……不行吗」
					ENDIF
				CASEELSE
					IF YOKUBO()
						CALL PRINT_STRW, "「呼呼_H_今天也来满满地做上一发吧_H_」"
					ELSE
						CALL PRINT_STRW, "「今、今天也请多関照……_H_」"
					ENDIF
				ENDSELECT
			ENDIF
		CASE 4
			;尿道感覚
			IF TALENT:尿道狂
				CALL PRINT_STRW, @"「最近，变成这副光是尿尿就要去了的样子了呢……_H_」"
				CALL PRINT_STRW, @"「而且尿尿的穴，不停地想要\@CHECK("尿道完美契合") ? %CNAME("二人称")%的%ADANA("阴茎")% # 震动棒和%ADANA("阴茎")%\@想要得不得了……_H_」"
				CALL PRINT_STRW, @"「……因为都是%CNAME("二人称")%的不好，请满满地侵犯%ADANA("尿道")%哦_H_」"
			ELSE
				SELECTCASE ABL:尿道感覚
				CASE IS >= 5
					IF YOKUBO()
						CALL PRINT_STRW, @"「啊哈_H_%CNAME("一人称")%的%ADANA("尿道")%、完完全全变成性器了_H_」"
						CALL PRINT_STRW, @"「%CNAME("二人称")%_H_都是因为你弄成这个样子的、要负起责任更多地在%ADANA("尿道")%里啾啵啾啵地做哦_H_」"
					ELSE
						CALL PRINT_STRW, @"「呜呜……%CNAME("一人称")%变得，用%ADANA("尿道")%就能去的样子了……_H_」"
						CALL PRINT_STRW, "「……那个，因为已经变成这幅样子了，不来帮我平息下吗……_H_」"
					ENDIF
				CASE IS >= 3
					CALL PRINT_STRW, @"「最近，变得用%ADANA("尿道")%就可以很舒服了呢……_H_」"
					IF YOKUBO()
						CALL PRINT_STRW, "「如果再稍微開发一下，就会变得轻轻松松就会去了呢_H_」"
					ELSE
						CALL PRINT_STRW, "「呜呜……差、差不多收手了可以吗……_H_」"
					ENDIF
				CASE IS >= 1
					CALL PRINT_STRW, @"「最近，%ADANA("尿道")%的违和感不见了呢……\@YOKUBO() ? _H_ # \@」"
					IF YOKUBO()
						CALL PRINT_STRW, @"「……请满满地责备%ADANA("尿道")%吧，做更多让我更舒服的事情哦_H_」"
					ELSE
						PRINTFORMW 「……这样下去好像会发生奇怪的事情……」
					ENDIF
				CASEELSE
					IF YOKUBO()
						CALL PRINT_STRW, @"「フフ_H_今日もいっぱい性交しましょうね_H_」"
					ELSE
						CALL PRINT_STRW, @"「きょ、今日もよろしくお願いします……_H_」"
					ENDIF
				ENDSELECT
			ENDIF
		ENDSELECT
	;屈服刻印Lv0
	ELSEIF MARK:屈服刻印 == 0
		PRINTFORMW 「……真是色情」
	;屈服刻印Lv1
	ELSEIF MARK:屈服刻印 == 1
		PRINTFORML 「今天要做些什么呢？」
		PRINTFORMW 「我、我并没有说特别期待……」
	;屈服刻印Lv2
	ELSEIF MARK:屈服刻印 == 2
		IF TALENT:恋慕
			PRINTFORMW 「如果再和%CNAME("二人称")%做色色的事的话，大概就会控制不住……」
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「请饶了我吧……」
			CASE 1
				PRINTFORMW 「如果只是再来一次的话，一定没问题的……」
			CASEELSE
				PRINTFORMW 「……请、请多関照……」
				PRINTFORMW 「……呜、呜呜……」
				IF EXP:助手経験 >= 20 && RAND:2
					PRINTFORMW 「……虽、虽然我确实看见过很多次别人做这种事！」
				ELSEIF EXP:Ｈ回数 >= 120
					PRINTFORMW 「……虽、虽然我确实做过很多次这种事！」
				ELSE
					PRINTFORMW 「……虽、虽然话是这么说……」
				ENDIF
				PRINTFORMW 「不好意就是不好意思啦……」
			ENDSELECT
		ENDIF
	;屈服刻印Lv3
	ELSEIF YOKUBO()
		SELECTCASE RAND:3
		CASE 0
			CALL PRINT_STRW, "「今天要做什么样的事情呢_H_」"
		CASE 1
			CALL PRINT_STRW, @"「呼呼_H_来一起变得欲仙欲死吧_H_」"
		CASEELSE
			CALL PRINT_STRW, @"「呼呼_H_来一起做爽得欲罢不能的事情吧_H_」"
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

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

DRAWLINE
;-------------------------------------------------
;※精力限界値を超えた場合の終了口上
;-------------------------------------------------
;射精管理時の口上
IF TEQUIP:PLAYER:手下留情
	PRINTFORMW 「啊，%CNAME("二人称")%，因为要把器具取下来，所以可以让我坐在那里吗？」
	PRINTFORMW 「……好的，结束了哟」
	CALL PRINT_STRW, @"「下一次也要一起变得欲仙欲死呢_H_%CNAME("二人称")%_H_」"
	TEQUIP:PLAYER:手下留情 = 0
	CALL DEL_CEVENT, "射精管理"
;調教強制終了時の口上
ELSEIF STATE("撃沈", MASTER)
	PRINTFORMW 「……这样的东西吗？」
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「真是的、拿你没办法呢」
		SIF YOKUBO()
			CALL PRINT_STRW, "「……作为补偿，下次请充分地做下去哦_H_」"
	;其他
	ELSE
		IF YOKUBO()
			PRINTFORMW 「敷衍了事我也会很为难的，今天就饶了你吧」
		ELSEIF MARK:屈服刻印 == 2
			PRINTFORMW 「……太好了」
		ELSE
			PRINTFORMW 「……再稍微做一点的话……」
			PRINTFORMW 「不、不是的！　什么也没有！」
		ENDIF
	ENDIF
;partnerが体力or精力尽きた場合
ELSEIF STATE("撃沈")
	PRINTFORMW 「哈啊……哈啊……」
	;相思相愛
	IF TALENT:相思相愛 && RAND:3 == 0
		SELECTCASE RAND:3
		CASE 0
			CALL PRINT_STRW, @"「好幸胡呢……_H_」"
		CASE 1
			CALL PRINT_STRW, @"被%CNAME("二人称")%满满地宠爱过了呢……_H_」"
		CASE 2
			CALL PRINT_STRW, @"「お腹いっぱい……_H_」"
		ENDSELECT
	;恋慕
	ELSEIF TALENT:恋慕 && RAND:2
		IF YOKUBO()
			CALL PRINT_STRW, @"「已经……太、棒了……_H_」"
		ELSE
			CALL PRINT_STRW, @"「这样下去……不行……_H_」"
		ENDIF
	;其他
	ELSE
		IF YOKUBO()
			CALL PRINT_STRW, "「啊哈……_H_被咕啾咕啾地弄得一身都是了……_H_」"
		ELSE
			CALL PRINT_STRW, "「这样……_H_不行……_H_」"
		ENDIF
	ENDIF
;恋慕＋満足
ELSEIF TALENT:恋慕 && COND("満足")
	CALL PRINT_STRW, "「已经……肚子里涨满了……_H_」"
ELSEIF COND("満足")
	CALL PRINT_STRW, "「…………真、真的很厉害呢…………_H_」"
ELSEIF TALENT:恋慕 && RAND:2
	IF RAND:2
		CALL PRINT_STRW, "「…………呼呼_H_」"
		PRINTFORMW 「不、我觉得能像这样和%CNAME("二人称")%在一起真是如临至福」
	ELSE
		CALL PRINT_STRW, @"「%CNAME("二人称")%、刚刚那下非常舒服呢……_H_」"
	ENDIF
;屈服刻印Lv1以下
ELSEIF MARK:屈服刻印 <= 1
	PRINTFORMW 「您辛苦了」
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2
	PRINTFORMW 「诶……已经结束了吗……」
	PRINTFORMW 「不、什么也没有……那么下次再说吧」
;屈服刻印Lv3 OR 恋慕
ELSEIF YOKUBO() || TALENT:恋慕
	PRINTFORMW 「就只有这种程度吗？　真是的……拿你没办法呢」
	;恋慕がついているとき
	IF TALENT:恋慕
		PRINTFORMW 「……嘛啊，因为一直以来好好地爱着我呢……」
		PRINTFORMW 「今天就请好好地休息一下吧」
	ELSE
		CALL PRINT_STRW, "「下次请充分地做吧……_H_」"
	ENDIF
ENDIF
RETURN 1

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

;-------------------------------------------------
;愛撫
;-------------------------------------------------
IF SELECTCOM == 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕 || YOKUBO()
			PRINTFORMW 「嗯……这么说来我还从来没被这么碰过呢……哈呜……」
		ELSE
			PRINTFORMW 「稍微……有点痒痒的……」
		ENDIF
	;二回目以降
	ELSE
		IF TEQUIP:接吻 && RAND:13 == 0
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%%CNAME("二人称")%っ_H_%AEGI(TARGET, "要", "接吻", 2)%」"
			CALL PRINT_STRW, @"「一边亲吻……_H_%AEGI(TARGET, "要", "接吻")%一边被这么触碰着_H_%MIX_AEGI(1, TARGET, "要")%这样被触碰着，是不是会变成禁忌的气氛呢……_H_%AEGI(TARGET, "要", "接吻")%」"
		ELSEIF PREVCOM == TNUM("胸愛撫") && RAND:12 == 0
			CALL PRINT_STRW, @"「%MIX_AEGI(5+RAND:2, TARGET, "要")%」"
			CALL PRINT_STRW, @"「しゅごいっ_H_胸部さわられながら他のところもいやらしくさわられてっ_H_%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「全身ビクビクって感じちゃうぅっ_H_」"
		ELSEIF PREVCOM == TNUM("肛門愛撫") && RAND:11 == 0
			CALL PRINT_STRW, @"「なかもっ_H_そともっ_H_%AEGI(TARGET, "要", "通常", 3)%」"
			CALL PRINT_STRW, @"「とてもっ_H_とても気持ちいいっ_H_」"
		ELSEIF RAND:10 == 0 && TALENT:蕩唇
			CALL PRINT_STRW, @"「あ……んむぁ……_H_」"
			CALL PRINT_STRW, @"「唇が敏感になって……触られるだけでいやらしい気分になっちゃう……_H_」"
		ELSEIF RAND:9 == 0 && TALENT:淫乳
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			CALL PRINT_STRW, @"「あぁ……_H_乳頭がピンって勃っちゃってるぅ……_H_」"
		ELSEIF RAND:8 == 0 && TALENT:尻穴狂い
			CALL PRINT_STRW, @"「そのさわりかたっ_H_だめっ_H_」"
			CALL PRINT_STRW, @"「%ADANA("肛門")%に欲しくなってヒクヒクってしちゃうからっ_H_」"
		ELSEIF RAND:7 == 0 && TALENT:淫核
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3)%」"
			CALL PRINT_STRW, @"「%ADANA("阴茎")%そんな風にいやらしくさわられたらっ_H_」"
			CALL PRINT_STRW, @"「ただでさえビンカンになっちゃった%ADANA("阴茎")%がもっとビンカンになっちゃうよぉっ_H_」"
		ELSEIF RAND:6 == 0
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%好舒服呜呜_H_」"
			PRINTFORM 「被%CNAME("二人称")%
			IF TALENT:淫核 && RAND:4 == 0
				PRINTFORM %ADANA("阴茎")%
			ELSEIF TALENT:尻穴狂い && RAND:3 == 0
				PRINTFORM %ADANA("肛門")%
			ELSEIF TALENT:淫乳 && RAND:2
				PRINTFORM %ADANA("胸")%
			ELSEIF TALENT:蕩唇
				PRINTFORM %TEXTR("お口/唇")%
			ENDIF
			CALL PRINT_STRW, @"触碰着的感觉好舒服……%MIX_AEGI(1, TARGET, "要")%」"
		ELSEIF INSERT("挿入") && RAND:5 == 0
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%%CNAME("二人称")%っ_H_%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「一边在里面挿_H_一边这么碰着的话_H_%AEGI(TARGET, "要", "通常")%」"
		;恋慕
		ELSEIF TALENT:恋慕 && RAND:4 == 0
			CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%」"
			IF RAND:2
				PRINTFORMW 「嗯……%CNAME("二人称")%的手，好温暖……」
			ELSE
				CALL PRINT_STRW, @"「那个……不更多摸摸我吗……_H_」"
			ENDIF
		;屈服刻印が3以上
		ELSEIF YOKUBO() && RAND:3 == 0
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%」"
			IF RAND:2
				CALL PRINT_STRW, @"「那样焦急……%CNAME("二人称")%很擅长让%CNAME("一人称")%兴奋起来呢_H_」"
			ELSE
				CALL PRINT_STRW, @"「……もっと激烈地まさぐったっていいんですよ……_H_」"
			ENDIF
		ELSEIF RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%」"
			IF YOKUBO() || TALENT:恋慕
				SELECTCASE RAND:5
				CASE 0
					CALL PRINT_STRW, "「就那样喜欢羽毛吗_H_」"
				CASE 1
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%好舒服……请再摸摸我吧……_H_%AEGI(TARGET, "要", "通常")%」"
				CASE 2
					CALL PRINT_STRW, @"「……呼呼_H_这不是稍微有些痒了吗」"
				CASE 3
					CALL PRINT_STRW, @"「更多……请更多地摸一下吧……_H_」"
				CASE 4
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%那么地……请不要用指尖那么地温柔地摸我……_H_」"
				ENDSELECT
			ELSE
				PRINTFORMW 「……请不要只触摸羽毛……」
			ENDIF
		;それ以外
		ELSE
			;随机で爱心がつくときとつかないときがある
			IF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:3, TARGET, "要")%」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:3, TARGET, "不要")%」"
			ENDIF
			IF RAND:3 == 0
				IF YOKUBO()
					SELECTCASE RAND:3
					CASE 0
						CALL PRINT_STRW, @"「フフ_H_そんな風にエッチに触られちゃうと期待しちゃうじゃないですか_H_」"
					CASE 1
						CALL PRINT_STRW, @"「もう、いやらしい触り方をしちゃって……_H_」"
					CASE 2
						CALL PRINT_STRW, @"「……フフ_H_こんな触られ方されちゃったせいでしょうか」"
						CALL PRINT_STRW, @"「全身がゾワゾワって、これ以上のことを期待しちゃってます_H_」"
					ENDSELECT
				ELSE
					SELECTCASE RAND:3
					CASE 0
						CALL PRINT_STRW, @"「さ、触り方がいやらしいですよぉ……_H_」"
					CASE 1
						PRINTFORMW 「ちょ、ちょっとそれ以上は……」
						CALL PRINT_STRW, @"「……だ、ダメとまで是いませんけど……_H_」"
					CASE 2
						CALL PRINT_STRW, @"「ヘ、ヘンな触り方しないでください……_H_」"
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰　面部騎乗(被逆推ているとき)
;-------------------------------------------------
IF SELECTCOM == 1
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ているとき
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;清洁舔阴
	ELSEIF COND("清洁舔阴フラグ", PLAYER)
		;恋慕
		IF TALENT:恋慕
			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 == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;気持ちいい
		IF CHECK("Ａ指挿入")
			PRINTFORMW 「那、那种、地方、」
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
		;それ以外
		ELSE
			PRINTFORMW 「想、想对那种地方做什么！」
			PRINTFORMW 「诶？　因为这里可以变很舒服？」
			PRINTFORMW 「做、做那样的事情……」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:2
			IF INSERT("Ａ挿入")
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%拔出来就不要马上再插进去了哦_H_」"
				CALL PRINT_STRW, @"「直到%ADANA("肛門")%的深处为止_H_%AEGI(TARGET, "要", "通常")%都不要啾啵啾啵地出来哦_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			ELSEIF PREVEX("Ａ中出し") && RAND:6 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
				IF RAND:2
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要只中出%ADANA("肛門")%来惩罚啦_H_」"
					CALL PRINT_STRW, @"「咕啾咕啾地在里面射出%ADANA("精液")%吧_H_变得想被%ADANA("精液")%给侵犯了_H_」"
				ELSE
					CALL PRINT_STRW, @"「%ADANA("肛門")%的里面_H_手指在蠕动着_H_」"
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要用%ADANA("精液")%搅来搅去啦_H_」"
				ENDIF
			ELSEIF PREVCOM == 14 && RAND:5 == 0
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%ちょ、急に挿れないでっ_H_」"
				CALL PRINT_STRW, @"「さっき%ADANA("肛門")%広げてたせいでっ_H_そこ敏感になってるっ_H_からぁっ_H_%AEGI(TARGET, "要", "通常", 2)%」"
				CALL PRINT_STRW, @"「それされたらっ_H_入り口から奥まで全部気持ちよくなっちゃうっ_H_」"
			ELSEIF PREVCOM == 10 && RAND:4 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
				CALL PRINT_STRW, @"「不要一边_H_摸着欧金金_H_一边责备%ADANA("肛門")%呀っ_H_」"
				CALL PRINT_STRW, @"「前面和后面_H_都好舒服_H_要变得_H_%AEGI(TARGET, "要", "通常")%奇怪了呜呜呜_H_」"
			ELSEIF TALENT:縦深菊穴 && RAND:3 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%更多_H_更多地用力抽插我的%ADANA("肛門")%吧_H_」"
				IF TALENT:PLAYER:扶她 && RAND:2
					CALL PRINT_STRW, @"「请更多惩罚用被%CNAME("二人称")%的扶她%ADANA("阴茎")%教导过的%CNAME("一人称")%的%ADANA("肛門")%吧_H_」"
				ELSE
					CALL PRINT_STRW, @"「再多好好惩罚%CNAME("一人称")%已经变成性器的%ADANA("肛門")%吧_H_%MIX_AEGI(1, TARGET, "要")%」"
				ENDIF
			ELSEIF TALENT:尻穴狂い && RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%ADANA("肛門")%_H_好厉害_H_」"
				CALL PRINT_STRW, @"「要去了_H_%ADANA("肛門")%已经变成%TEXTR("雌穴/性器/小穴")%被抽插穿刺着去了呜呜_H_」"
			ELSEIF ABL:Ａ感覚 >= 3
				IF PALAM:快Ａ >= PALAMLV:3
					SELECTCASE RAND:3
					CASE 0
						CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
						CALL PRINT_STRW, @"「我是雌性_H_、%CNAME("一人称")%变成%CNAME("二人称")%\@PLAYER == MASTER ? 専属 # \@的雌性了_H_」"
					CASE 1
						CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%もっとっ_H_もっとそこほじほじってしてっ_H_」"
						CALL PRINT_STRW, @"「もっと%CNAME("二人称")%に%ADANA("肛門")%責められることしかできなくなるくらいいっぱいしてぇっ_H_」"
					CASE 2
						CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
						CALL PRINT_STRW, @"「これダメっ_H_こんなことされたら%ADANA("肛門")%のことしか考えられなくなるっ_H_」"
					ENDSELECT
				ELSE
					CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_更多_H_更多地教导%CNAME("一人称")%的%ADANA("肛門")%吧咿咿_H_」"
				ENDIF
			ELSE
				CALL PRINT_STRW, @"「\@(TALENT:PLAYER:男性 && TALENT:PLAYER:伪娘) || ((TALENT:PLAYER:扶她 || TALENT:PLAYER:伪娘) && RAND:2) ? 像被%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%插入一样 # 为了能和%CNAME("二人称")%一样\@请满满地责备我吧_H_」"
			ENDIF
		;気持ちいい
		ELSEIF CHECK("Ａ指挿入")
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			IF TALENT:尻穴狂い && RAND:2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%もっとっ_H_もっといっぱいほじほじしてっ_H_」"
				CALL PRINT_STRW, @"「おまんこになっちゃった%ADANA("肛門")%たく桑気持ちよくしてぇっ_H_」"
			ELSEIF ABL:Ａ感覚 >= 5
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%ADANA("肛門")%っ_H_とっても気持ちいいっ_H_」"
				CALL PRINT_STRW, @"「こんなっ_H_ほじほじされたらおかしくなるぅっ_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "不要")%」"
			IF ABL:Ａ感覚 >= 3
				CALL PRINT_STRW, @"「も、もうちょっと慣らしてからにしてくださいよぉ……\@ ABL:受虐属性 >= 5 ? %AEGI(TARGET, "要", "通常")% # %AEGI(TARGET, "不要", "通常")%\@」"
			ELSE
				PRINTFORMW 「も、もうこれ以上しなくても良くないですか……？」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;-------------------------------------------------
IF SELECTCOM == 3
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO() || ABL:露出癖 >= 3
			CALL PRINT_STRW, @"「……%CNAME("二人称")%很擅长把别人喜欢的地方弄得痒痒的呢_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%_H_请好好看着哟。"
			IF TALENT:淫乱
				PRINTFORM 已经变成只是和以前一样做着就会变得很舒服的大変態了
			ELSEIF MARK:淫紋
				PRINTFORM 被%CNAME("二人称")%刻上了淫紋的
			ENDIF
			PRINTFORML %CNAME("一人称")%只要、
			PRINTFORM %CNAME("二人称")%の前で
			SELECTCASE FAV_ONANIE(SELECTCOM, "一番")
			CASE "Ｃ"
				SIF TALENT:淫核
					PRINTFORM 被稍微触碰就要去了的
				PRINTFORM %ADANA("阴茎")%
			CASE "Ｂ"
				SIF TALENT:淫乳
					PRINTFORM 被当成雌性使用的
				PRINTFORM %ADANA("胸")%
			CASE "Ａ"
				SIF TALENT:尻穴狂い
					PRINTFORM 被当成%ADANA("ヴァギナ")%的
				PRINTFORM 屁股的穴
			CASE "尿"
				SIF TALENT:尿道狂
					PRINTFORM 已经变成做色色的事情用的地方的
				PRINTFORM %ADANA("尿道")%
			ENDSELECT
			CALL PRINT_STRW,  "を使って気持ちよくなっちゃっている所を……_H_」"
		ELSE
			PRINTFORMW 「……在%CNAME("二人称")%的面前……吗……？」
			IF MARK:屈服刻印 == 2
				PRINTFORMW 「……那个，是知道%CNAME("一人称")%无法拒绝才这么说的吧……？」
			ELSE
				PRINTFORMW 「……呜呜……」
			ENDIF
			PRINTFORMW 「……明白了。……稍、稍等一下……」
		ENDIF
	;二回目以降
	ELSE
		SELECTCASE RAND:3
		CASE 0
			;恋慕
			IF TALENT:恋慕 || YOKUBO() || ABL:露出癖 >= 3
				IF INSERT("挿入") && RAND:3
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%一边做爱_H_一边被看着自慰_H_」"
					CALL PRINT_STRW, @"「被看着的同时肚子里被滋啵滋啵地做着_H_」"
				ELSE
					CALL PRINT_STRW, @"「啊_H_、被%CNAME("二人称")%看到了_H_」"
				ENDIF
				CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			;それ以外
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊_H_、请、请不要看_H_」"
			ENDIF
		CASE 1
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STR, @"「%AEGI(TARGET, "要", "通常", 1+RAND:2)%"
			SELECTCASE FAV_ONANIE(SELECTCOM, "一番")
			CASE "Ｃ"
				IF PREVCOM == 4 || PREVCOM == 10
					CALL PRINT_STRW, @"刚刚_H_都是因为被%CNAME("二人称")%惩罚了%ADANA("阴茎")%一抖一抖的_H_」"
					PRINTFORM 「
				ENDIF
				CALL PRINT_STRW, @"欧金金好舒服_H_」"
			CASE "Ｂ"
				IF PREVCOM == 5
					CALL PRINT_STRW, @"一被%CNAME("二人称")%碰到%ADANA("胸")%_H_就会变得敏感_H_」"
					PRINTFORM 「
				ENDIF
				CALL PRINT_STRW, @"%ADANA("胸")%要有感觉了_H_要变成女孩子了_H_」"
			CASE "Ａ"
				CALL PRINT_STRW, @"%ADANA("肛門")%好厉害_H_屁股的穴被贯穿插入好舒服_H_」"
			CASE "尿道"
				CALL PRINT_STRW, @"一在%ADANA("尿道")%嘎吱嘎吱地做着_H_%AEGI(TARGET, "要", "通常", 1+RAND:2)%」"
			ENDSELECT
		CASE 2
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%在%CNAME("二人称")%的面前上上下下地弄着_H_」"
			IF YOKUBO() || ABL:露出癖 >= 3
				CALL PRINT_STRW, @"「阿哈_H_更多更多_H_%AEGI(TARGET, "要", "通常")%直到%CNAME("一人称")%%TEXTR(@"射出精子/biubiu地射出%ADANA("精液")%/去")%之前都请看着吧_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%明明这么_H_羞耻_H_」"
			ENDIF
			SIF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰莖(扶她/男性のみ)
;-------------------------------------------------
;2019/09/30　玛丽酱加筆　★加筆部分
IF SELECTCOM == 4
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			IF TRUE_SEX(TARGET) == "男性" && TALENT:MASTER:男性
				CALL PRINT_STRW, @"「%CNAME("一人称")%和%CNAME("二人称")%明明是%TEXTR("男孩子/同性")%来着……要为我服务吗_H_」"
			ELSE
				CALL PRINT_STRW, @"「%CNAME("二人称")%吸吮着%CNAME("一人称")%的欧金金什么的_H_」"
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称", "どもり")%っ_H_」"
			CALL PRINT_STRW, @"「突、突然之间要做什么啊……_H_」"
		ENDIF
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;屈服刻印lv3
		IF YOKUBO() && RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%TEXTR(@"%CNAME("二人称")%っ_H_那里/啊哈_H_%CNAME("二人称")%っ_H_很擅长呢_H_")%」"
			CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%%CNAME("二人称")%_H_就这样把%CNAME("一人称")%的%ADANA("精液")%%TEXTR("喝下去吧/咕噜咕噜地吞下去吧")%_H_」"
		;恋慕
		ELSEIF TALENT:恋慕
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_好舒服_H_舒服得不行了_H_%MIX_AEGI(1, TARGET, "要")%」"
		;それ以外
		ELSE
			IF PREVCOM == 9 && CEVENT("Ｓっ気フラグ")
				CALL PRINT_STR, @"「呼呼_H_用%CNAME("二人称")%的"
				IF TALENT:PLAYER:男性
					IF TALENT:PLAYER:伪娘
						PRINTFORM 意外健壮的
					ELSE
						PRINTFORM 为了挿入各种各样的地方而生的
					ENDIF
				ELSE
					PRINTFORM 柔柔软软带着好闻香味的
				ENDIF
				CALL PRINT_STRW, @"舌頭，把%CNAME("一人称")%的%ADANA("肛門")%和%ADANA("阴茎")%，两边都打扫干净吧_H_」"
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		ENDIF
	;それ以外
	ELSE
		IF CEVENT("Ｓっ気フラグ")
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「呼呼_H_一边吃着%ADANA("阴茎")%一边露出这样的表情什么的_H_%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%、简直像小婴儿一样呢_H_」"
			CALL PRINT_STRW, @"「……不、把这么下流地吃着%ADANA("阴茎")%的%CNAME("二人称")%比做小婴儿是不是对小婴儿太失礼了_H_」"
		;屈服刻印lv3
		ELSEIF YOKUBO() && RAND:3
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「啊_H_这样下去要在%CNAME("二人称")%的嘴里射出%ADANA("精液")%来了_H_」"
		ELSEIF RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			IF YOKUBO() && TRUE_SEX(TARGET) == "男性" && TALENT:MASTER:男性 && RAND:2 == 0
				CALL PRINT_STRW, @"「啊_H_被%TEXTR(@"身为男人的%CNAME("二人称")%/同性/%CNAME("二人称")%")%这样%TEXTR("做着/吸吮着/服务着")%，一想到这里就比平时更兴奋了_H_」"
			ELSE
				CALL PRINT_STRW, @"「啊啊_H_%CNAME("二人称")%的嘴巴舒服过了頭，%ADANA("精液")%要出来了_H_」"
			ENDIF
		ELSE
			IF PREVCOM == 7 || PREVCOM == 9
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%一边责备着%ADANA("肛門")%一边舔着%ADANA("阴茎")%的话_H_会变得奇怪的呀_H_」"
			ELSEIF PREVCOM == 91
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要在舔着%CNAME("二人称")%的%ADANA("阴茎")%的时候吃肉棒啦_H_」"
			ELSEIF YOKUBO() && RAND:2
				IF RAND:2
					IF CONDS("本来の性別") == "男性" && TALENT:MASTER:男性 && RAND:2 == 0
						CALL PRINT_STRW, @"「明明是被%TEXTR(@"男孩子/同性")%给%TEXTR("服务/舔着")%%TEXTR("心脏却要砰砰直跳了/这样的糟糕事却兴奋起来了")%_H_」"
					ELSE
						CALL PRINT_STRW, @"「%TEXTR("＿/非常")%舒服呢、%CNAME("二人称")%的嘴里_H_」"
					ENDIF
				ELSE
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%被舔着那样的地方的话马上就会去了喔……_H_」"
				ENDIF
			ELSE
				CALL PRINT_STRW, @"「被%CNAME("二人称")%%TEXTR("含着/欺负着/舔着/取悦")%%ADANA("阴茎")%……_H_」"
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;胸愛撫
;-------------------------------------------------
IF SELECTCOM == 5
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「呼呼_H_%CNAME("一人称")%的胸部要被当做雌胸对待了吗_H_」"
			CALL PRINT_STRW, @"「好的哟_H_请满满地调教欺负%CNAME("一人称")%到只用乳頭就能去的程度_H_」"
		ELSE
			PRINTFORMW 「诶……！？　为、为什么对胸……？」
		ENDIF
	;二回目以降
	ELSE
		SIF ABL:Ｂ感覚 >= 1 || PALAM:快Ｂ >= PALAMLV:2
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		;恋慕
		IF COND("乳环フラグ") && ABL:受虐属性 >= 5 && RAND:7 == 0
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要那样拉着穿环啦_H_」"
			CALL PRINT_STRW, @"「被那样拉着_H_要被扯裂開了_H_」"
		ELSEIF PREVCOM == 10 && RAND:6 == 0
			CALL PRINT_STRW, @"「请不要欺负%ADANA("阴茎")%和%ADANA("胸")%_H_」"
			CALL PRINT_STRW, @"「只是被做了那样的事_H_只是欺负%ADANA("胸")%%ADANA("阴茎", TARGET, TARGET)%就要一跳一跳的了_H_」"
			CALL PRINT_STRW, @"「只是擦到%ADANA("胸")%就要变成想做色色的事的变态了哦哦_H_」"
		ELSEIF PREVCOM == 2 && RAND:5 == 0
			CALL PRINT_STRW, @"「不要一起欺负%ADANA("肛門")%和%ADANA("胸")%啦_H_」"
			CALL PRINT_STRW, @"「如果被做了这样的事的话，无论是%ADANA("胸")%还是%ADANA("肛門")%都要变得好舒服了_H_」"
		ELSEIF INSERT("Ａ挿入") && RAND:4 == 0
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%好腻害_H_」"
			CALL PRINT_STRW, @"「%ADANA("肛門")%一边被搞得乱七八糟%ADANA("胸")%一边被欺负着好舒服啊_H_」"
		ELSEIF TEQUIP:接吻 && RAND:3 == 0
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻", 3)%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻")%请不要一边亲吻_H_一边摸着%ADANA("胸")%_HH_」"
		ELSEIF TALENT:恋慕 && RAND:2
			SELECTCASE RAND:4
			CASE 0
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_那样_H_光是欺负着胸部的话_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%真是坏心眼_H_」"
			CASE 1
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要这样揉胸部_H_」"
				CALL PRINT_STRW, @"「頭のなかっ_H_フワフワしてっ_H_	」"
			CASE 2
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%这样_H_%ADANA("胸")%这样地被欺负着的话_H_」"
				CALL PRINT_STRW, @"「要变成雌性了_H_要变得只用%ADANA("胸")%就能去了_H_」"
			CASE 3
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%请不要欺负%ADANA("胸")%_H_」"
				CALL PRINT_STRW, @"「如果被这么做了_H_胸部就要变大了呜呜_H_」"
			CASEELSE
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_……%MIX_AEGI(2+RAND:4, TARGET, "要")%」"
			ENDSELECT
		ELSEIF COND("喝母乳フラグ", PLAYER)
			IF YOKUBO() || TALENT:恋慕
				CALL PRINT_STRW, @"「啊哈_H_被%CNAME("二人称")%吸吮着胸部_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%%CNAME("一人称")%的胸部_H_要变成女孩子了啊_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%っ_H_请不要吸胸部_H_」"
				CALL PRINT_STRW, @"「这样下去的话_H_要变成雌性了呜呜_HH_」"
			ENDIF
		ELSEIF CHECK_COM("舔乳頭") && PREVCOM == 5
			SELECTCASE RAND:5
			CASE 0
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%请不要这样_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_请不要这样舔乳頭_H_」"
				CALL PRINT_STRW, @"「请不要发出声音来_H_%AEGI(TARGET, "要", "通常")%」"
			CASE 1
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%妈妈じゃっ_H_ないのni↘_H_」"
				CALL PRINT_STRW, @"「胸部なんかっ_H_出ないのni↘_H_」"
				CALL PRINT_STRW, @"「そんなっ_H_ジュルジュルって舐めないでぇっ_H_%AEGI(TARGET, "要", "通常")%」"
			CASE 2
				CALL PRINT_STRW, @"「あっ_H_そんなにレロレロってしないでぇ_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 5)%」"
			CASE 3
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%だめっ_H_それイっちゃうっ_H_」"
				CALL PRINT_STRW, @"「ちくびコリコリって噛まれてイっちゃうぅっ_H_」"
			CASE 4
				CALL PRINT_STRW, @"「あっ_H_それすごいっ_H_」"
				CALL PRINT_STRW, @"「それされたらっ_H_%AEGI(TARGET, "要", "通常")%胸部だけでイっちゃうぅっ_H_」"
			ENDSELECT
		;それ以外
		ELSE
			IF YOKUBO() && RAND:2
				IF RAND:2 && TALENT:PLAYER:男性
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3)%」"
					CALL PRINT_STRW, @"「……フフ_H_%CNAME("一人称")%男ですよ？　それなのにそんなに舐めたがるなんて……%AEGI(TARGET, "要", "通常")%」"
				ELSE
					CALL PRINT_STRW, @"「啊哈_H_%CNAME("二人称")%再做更多_H_」"
					CALL PRINT_STRW, @"「更多地\@CHECK_COM("舔乳頭") ? 舔舔 # 欺负乳頭\@吧%CNAME("一人称")%要用不是%ADANA("阴茎")%的地方去了，要成为男孩子失格的雌性了_H_」"
				ENDIF
			ELSEIF ABL:Ｂ感覚 >= 5 || (ABL:Ｂ感覚 >= 3 && PALAM:快Ｂ >= PALAMLV:3) && MARK:屈服刻印 >= 2
				CALL PRINT_STRW, "「啊_H_乳頭被欺负了_H_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%的女孩子乳頭被%CNAME("二人称")%毫不留情地\@CHECK_COM("舔乳頭") ? 舔 # 欺负\@着_H_」"
				CALL PRINT_STRW, "「这么做要去了呀_H_」"
				CALL PRINT_STRW, "「要暴露了_H_我是明明是男孩子却能够只用乳頭就去了的変態_H_」"
			ELSE
				PRINTFORMW 「稍、稍微……有点害羞呢」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;接吻
;-------------------------------------------------
IF SELECTCOM == 6
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF MARK:屈服刻印 != 0 || TALENT:恋慕
				CALL PRINT_STRW, @"「已经再也忍耐不了了……%MIX_AEGI(2, TARGET, "要")%」"
			ELSE
				PRINTFORMW 「虽、虽然真的不行……」
				CALL PRINT_STRW, @"「特、特別地给你一个吻……%MIX_AEGI(2, TARGET, "要")%」"
			ENDIF
		;それ以外
		ELSE
			IF CHECK_COM("深吻")
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻", 2+RAND:3)%」"
				CALL PRINT_STRW, @"「……明明这样的事情是不行的，但是只要被这样温柔地吻着，就会变得好喜欢……_H_」"
			ELSEIF YOKUBO() || TALENT:恋慕
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%」"
				PRINTFORMW 「……除此以外、%CNAME("一人称")%们迄今为止都没有接过吻吧」
				CALL PRINT_STRW, @"「……%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			ELSEIF MARK:屈服刻印 == 0
				CALL PRINT_STRW, @"「说了到此为止就可以了……！……%MIX_AEGI(2, TARGET, "要")%」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "不要")% 还不够……」"
			CASE 1
				CALL PRINT_STRW, @"「……%CNAME("二人称")%、能再更多地亲吻我吗……_H_」"
			CASE 2
				CALL PRINT_STRW, @"「……%CNAME("二人称")%、我想要更多地亲吻……_H_」"
			ENDSELECT
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			SIF YOKUBO()
				CALL PRINT_STRW, @"「……呼呼_H_彼此都是一副色色的表情呢_H_」"
		ENDIF
	;それ以外
	ELSE
		;テンダー接吻
		IF CHECK_COM("テンダー接吻")
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%」"
			IF TALENT:相思相愛 && RAND:2
				IF RAND:2
					PRINTFORM 「呼呼……%CNAME("二人称")%……我爱你……
				ELSE
					CALL PRINT_STR, @"「%AEGI(TARGET, "要", "接吻")%%CNAME("二人称")%の感触……クセになっちゃいそう……_H_"
				ENDIF
			ELSEIF YOKUBO() || TALENT:恋慕
				CALL PRINT_STRW, @"「嗯……%CNAME("二人称")%有着相当能察觉到人心情的地方呢……_H_」"
				CALL PRINT_STR, "「这样的地方、很喜欢哟_H_"
			ELSE
				PRINTFORM 「虽然我觉得这样的事情是和恋人才能做的……
			ENDIF
			CALL PRINT_STRW, @"%MIX_AEGI(2, TARGET, "要")%」"
		ELSEIF CHECK("挿入")
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			SELECTCASE RAND:4
			CASE 0
				CALL PRINT_STRW, @"「%ADANA("肛門")%也是_H_嘴巴也是，都被%CNAME("二人称")%给咕啾咕啾黏黏糊糊地侵犯着_H_%AEGI(TARGET, "要", "通常")%」"
			CASE 1
				CALL PRINT_STRW, @"「上面也好下面也好都被弄得一塌糊涂_H_被弄得好舒服_H_脑袋_H_%AEGI(TARGET, "要", "通常")%要变奇怪了呜呜_H_」"
			CASE 2
				CALL PRINT_STRW, @"「%ADANA("肛門")%也好_H_嘴巴也好，都被%CNAME("二人称")%欺负着_H_%AEGI(TARGET, "要", "通常")%好舒服_H_」"
				CALL PRINT_STRW, @"「这样地_H_被这样欺负的话_H_要变得没有%CNAME("二人称")%就活不下去了呜呜_H_%AEGI(TARGET, "要", "通常")%」"
			CASEELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要一边在%ADANA("肛門")%进进出出_H_一边亲我呀_H_」"
			ENDSELECT
		;連続実行
		ELSEIF PREVCOM == SELECTCOM
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻")%%CNAME("一人称")%的嘴、被%CNAME("二人称")%的舌頭舔着呢……%AEGI(TARGET, "要", "接吻")%」"
		;恋慕
		ELSEIF TALENT:恋慕
			IF RAND:2
				CALL PRINT_STRW, @"「其实，我一直都想和%CNAME("二人称")%这样做来着……%MIX_AEGI(3, TARGET, "要")%」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻", 3)%」"
				CALL PRINT_STRW, @"「……%CNAME("二人称")%的嘴唇、比想象中的还要柔软呢……%AEGI(TARGET, "要", "接吻")%」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		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:推倒
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%_H_」"
				CALL PRINT_STRW, @"「%ADANA("肛門")%实在是空虚寂寞到没办法了……_H_」"
				PRINTFORMW 「……呐、%CNAME("二人称")%」
				CALL PRINT_STRW, @"「%ADANA("肛門")%、不来好好地舔一下吗_H_」"
			ELSEIF TALENT:恋慕 || YOKUBO()
				CALL PRINT_STRW, @"「%CNAME("二人称")%，有件事想要拜托你……_H_」"
				CALL PRINT_STRW, @"「……那个、不来凌虐一下我的%ADANA("肛門")%吗……_H_」"
				CALL PRINT_STRW, @"「%ADANA("肛門")%蠢蠢欲动饥渴难耐到没办法了_H_」"
				CALL PRINT_STRW, @"「……%MIX_AEGI(1, TARGET, "要")%要来了_H_」"
			ELSE
				PRINTFORMW 「……那、那个……」
				CALL PRINT_STRW, @"「如果可以的话……那个……我、我的屁股……这个……不来舔一舔吗……_H_」"
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕 || YOKUBO()
				PRINTFORMW 「……是%CNAME("二人称")%的话，就算不特意去舔这种地方也是可以的哦」
				PRINTFORMW 「因为……那个、即使是%CNAME("二人称")%做这种事也不会高兴的吧……」
				CALL PRINT_STRW, @"「……而且、如果被那样做的话，我就没法忍耐欲望了_H_」"
			ELSE
				PRINTFORMW 「诶！？ 对、对这种地方做什么……！？」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				IF RAND:2
					CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%……呼呼_H_怎么样呢？　%CNAME("一人称")%的%ADANA("肛門")%的味道_H_」"
				ELSE
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%啊哈っ_H_%ADANA("肛門")%里面_H_%CNAME("二人称")%的舌頭在转动着_H_」"
					CALL PRINT_STRW, @"「被这样热烈地舔舐着、%CNAME("二人称")%果然是非常无可救药的变态呢_H_」"
				ENDIF
			ELSEIF SELECTCOM == PREVCOM
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ａ異物", 3)%そんなに何回も舐めないでっ_H_」"
				CALL PRINT_STRW, @"「%ADANA("肛門")%っ_H_ふやけちゃうっ_H_」"
			ELSE
				SELECTCASE ABL:Ａ感覚
				CASE IS >= 5
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%的舌頭钻进%ADANA("肛門")%来了_H_」"
				CASE IS < 2
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "不要")%……%CNAME("二人称")%、请再舔一舔吧……_H_」"
					CALL PRINT_STRW, @"「请更多侵犯我的屁股，直到让我变成用%ADANA("肛門")%就能变得很舒服的变态吧……_H_」"
				CASEELSE
					CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
				ENDSELECT
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%对不起_H_%MIX_AEGI(1, TARGET, "要")%请给我更多_H_更多地在%ADANA("肛門")%啾噜啾噜地侵犯吧_H_」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 && RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称")%っ_H_不要这样啾噜啾噜地做啦_H_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方手交
;-------------------------------------------------
IF SELECTCOM == 10
;2019/09/30　玛丽酱加筆　★加筆部分
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「用%CNAME("二人称")%的手给%CNAME("一人称")%的欧金金搓硬是吗_HH_」"
			CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+3, TARGET, "要")%」"
		ELSE
			CALL PRINT_STRW, @"「诶？ %CNAME("一人称")%的%ADANA("阴茎")%吗……？ 没、没问ti……%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「这样的_H_突然就_H_%MIX_AEGI(4, TARGET, "要")%」"
		ENDIF
	;二回目以降
	ELSE
		IF CHECK_COM("手交しあう")
			CALL PRINT_STRW, @"「咿呀_H_」"
			CALL PRINT_STRW, @"「等、等下、不要这么快就摸上来……%AEGI(TARGET, "要", "通常")%」"
		ELSEIF RAND:2
			IF INSERT("Ａ挿入", TARGET) && PREVEX("Ａ絶頂")
				CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%是雌穴_H_要变成雌性惹_H_」"
				CALL PRINT_STRW, @"「要变成一边用%ADANA("肛門")%像雌性一样高潮一边被搓着大号的%ADANA("阴蒂")%的雌性了呜呜呜_H_」"
			ELSEIF PREVCOM == 5 && RAND:3 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
				CALL PRINT_STRW, @"「这样地_H_狡猾_H_%AEGI(TARGET, "要", "通常")%」"
				CALL PRINT_STRW, @"「这样一边被捏着%ADANA("胸")%一边被搓动着%ADANA("阴茎")%的话_H_要变得奇怪了_H_」"
			ELSEIF YOKUBO() && RAND:2
				IF RAND:2
					CALL PRINT_STRW, @"「%TEXTR(@"%CNAME("二人称")%的手，好温暖/比起自己做舒服多了呢")%_H_」"
				ELSE
					CALL PRINT_STRW, @"「呼呼呼_H_%CNAME("二人称")%，很擅长这样的事呢_H_」"
					CALL PRINT_STRW, @"「这样下去大概马上就会去了……_H_」"
				ENDIF
			;恋慕
			ELSEIF TALENT:恋慕
				CALL PRINT_STRW, @"「如果这边焦急起来的话%CNAME("一人称")%也会变得兴奋起来啊_H_」"
			;それ以外.
			ENDIF
		ENDIF
		CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+3, TARGET, "要")%」"
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方乳交
;-------------------------------------------------
IF SELECTCOM == 11
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「这就是胸部的感触啊_H_」"
		ELSE
			CALL PRINT_STRW, @"「%CNAME("二人称", "どもり")%、不、不做那样的事也……%AEGI(TARGET, "要", "通常")%」"
		ENDIF
		CALL PRINT_STRW, @"「%MIX_AEGI(RAND:4+1, TARGET, "要")%」"
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+3, TARGET, "要")%」"
			IF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称")%的胸部_H_%TEXTR("好柔软/好舒服/好厉害")%っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「%CNAME("二人称")%的胸被%CNAME("一人称")%吸住了_H_%AEGI(TARGET, "要", "通常")%」"
			ENDIF
		;それ以外
		ELSE
			SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, @"「%MIX_AEGI(RAND:2+3, TARGET, "要")%%CNAME("一人称")%被%CNAME("二人称")%的%TEXTR("乳房/胸部")%给%TEXTR("包裹起来了/用力夹住了/紧紧地包住了")%っ_H_」"
			CASE 1
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%的乳房_H_%TEXTR("好柔软/好舒服/好厉害")%っ_H_」"
			CASE 2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%胸部がふにふni↘てしてるっ_H_」"
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方足交
;-------------------------------------------------
IF SELECTCOM == 12
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO() || ABL:受虐属性 >= 3
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_%CNAME("二人称")%っ_H_」"
			SIF ABL:PLAYER:施虐属性 >= 3
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%这样下去的话%ADANA("阴茎")%要被玩坏掉啦_H_」"
		ELSE
			CALL PRINT_STRW, @"「等、等一下！　用脚来什么的……%MIX_AEGI(1, TARGET, "要")%」"
		ENDIF
	;二回目以降
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+3, TARGET, "要")%」"
		IF RAND:2
			;受虐属性lv3以上or屈服刻印3
			IF (ABL:受虐属性 >= 3 || YOKUBO()) && RAND:2
				CALL PRINT_STRW, @"「%CNAME("二人称")%_H_更多更多地欺负这里吧_H_」"
				IF ABL:PLAYER:施虐属性 >= 3
					IF RAND:2 == 0
						CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%、更多玩弄%CNAME("一人称")%的%ADANA("阴茎")%吧_H_」"
					ELSE
						CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%。请更多更多地疼爱%CNAME("一人称")%的%ADANA("阴茎")%吧_H_」"
					ENDIF
				ENDIF
			;恋慕
			ELSEIF TALENT:恋慕
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_喜欢你っ_H_最喜欢了_H_」"
			;それ以外
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			ENDIF
		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
		IF YOKUBO()
			CALL PRINT_STRW, @"「好的哦_H_」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%给其他人看着%ADANA("肛門")%的地方，请仔仔细细看着，一分一毫也不放过喔_H_」"
		ELSE
			PRINTFORMW 「我、我明白了……」
			CALL PRINT_STRW, @"「很、很羞耻呢……\@ RAND:10 == 0 ? _H_ # \@」"
		ENDIF
	;二回目以降
	ELSE
		;屈服刻印Lv3
		IF YOKUBO() && RAND:2
			CALL PRINT_STR, @"「请看吧，%CNAME("二人称")%_H_"
			IF COND("妊娠中：各イベント進行度") >= 5 && RAND:2
				CALL PRINT_STRW, @"没错_H_就是那里……_H_」"
				CALL PRINT_STRW, @"「呼呼_H_就是从这里生出来了%CNAME("一人称")%的小宝宝喔……_H_」"
				IF COND("精液の優勢") == PLAYER
					CALL PRINT_STRW, @"「都是因为怀上了%CNAME("二人称")%的孩子的缘故，屁股的穴要被当成生小宝宝的地方了哦_H_」"
				ELSE
					CALL PRINT_STRW, @"「明明%CNAME("一人称")%是男孩子来着，却怀上了别人的种，那样就不得不用屁股的穴来生出小宝宝了呢……_H_」"
				ENDIF
			ELSE
				IF PREVEX("Ａ中出し") && RAND:2
					CALL PRINT_STRW, @"因为%CNAME("二人称")%的%TEXTR("努力/责任")%，变成了滴滴答答往下淌着射在里面的%ADANA("精液")%的讨厌的小穴呢……_H_」"
				ELSEIF INSERT("Ａ挿入")
					CALL PRINT_STRW, @"都是因为被%CNAME("二人称")%在%ADANA("肛門")%做了许许多多色色的事情的缘故、已经变成和%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%一样的形状了_H_」"
				ELSE
					SELECTCASE ABL:Ａ感覚
					CASE IS >= 5
						CALL PRINT_STRW, @"都是因为%CNAME("二人称")%的%TEXTR("努力/责任")%%CNAME("一人称")%的%ADANA("肛門")%、才会变得这么色气的_H_」"
					CASE IS >= 3
						CALL PRINT_STRW, @"托%CNAME("二人称")%的福，顺利地把那里变成了%TEXTR("性器/女孩子的穴")%哟_H_」"
					CASEELSE
						CALL PRINT_STRW, @"从这一刻起要怎样被%CNAME("二人称")%開发，很期待呢_H_」"
					ENDSELECT
				ENDIF
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			IF RAND:2
				PRINTFORMW 「……%CNAME("二人称")%、那个、很羞耻的……」
				SIF ABL:露出癖 >= 5
					CALL PRINT_STRW, "「……嘛、虽然那里很舒服就是了_H_」"
			ELSE
				PRINTFORMW 「既然%CNAME("二人称")%这么想看的话……」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「%CNAME("二人称", "どもり")%……那样盯我着看很有趣吗……？」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道指挿入
;-------------------------------------------------
IF SELECTCOM == 15
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛くない
		IF CHECK("尿道PLAY")
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%好舒服_H_明明是っ_H_尿尿的穴っ_H_%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「被指頭插着要变得舒服绝顶了っ_H_」"
			IF YOKUBO()
				CALL PRINT_STRW, @"「更多_H_请再来更多_H_」"
			ELSE
				CALL PRINT_STRW, @"「停_H_%AEGI(TARGET, "要", "通常")%快停下_H_」"
			ENDIF
			CALL PRINT_STRW, @"「继续被做着这种事情的话っ_H_就要变成每次尿尿都会舒服起来的体质了_H_%AEGI(TARGET, "要", "通常")%」"
		;それ以外
		ELSE
			PRINTFORMW 「っ！」
			PRINTFORMW 「ちょ、ちょっと、痛いですよ……」
			IF YOKUBO()
				CALL PRINT_STRW, @"「……でも、ちょっとゾクゾクっときちゃいました_H_」"
				CALL PRINT_STRW, @"「……%CNAME("二人称")%、もっと%CNAME("一人称")%に新しい快感を教えてくれませんか……_H_」"
			ELSE
				CALL PRINT_STRW, @"「……でも、なんでだろう。もう少しやってほしいような……_H_」"
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;痛くない
		IF CHECK("尿道PLAY")
			IF YOKUBO() && RAND:2
				SELECTCASE RAND:4
				CASE 0
					CALL PRINT_STRW, @"「啊_H_好厉害_H_」"
					SIF ABL:尿道感覚 >= 3
						CALL PRINT_STRW, @"「再被这样做下去的话就要没法正常生活下去了_H_」"
				CASE 1
					CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%ADANA("尿道")%被っ_H_」"
					CALL PRINT_STRW, @"「这样下去っ_H_就要变成只是尿尿这种程度就会变舒服的变态了っ_H_」"
				CASE 2
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%那里不行っ_H_」"
					CALL PRINT_STRW, @"「明明是尿尿的地方っ_H_要被指頭在里頭玩弄着去了_H_」"
				CASEELSE
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
					CALL PRINT_STRW, "「明明是っ_H_肉棒っ_H_是出来的地方っ_H_」"
					CALL PRINT_STRW, @"「被%CNAME("二人称")%的手指_H_咕啾咕啾的搅弄着，里面变得好舒服_H_」"
					SIF ABL:Ａ感覚 >= 3
						CALL PRINT_STRW, "「无论是前面还是后面っ_H_明明是排泄的地方却要变成被插入就会有感觉的身体了_H_」"
				ENDSELECT
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「那样不行_H_明明是尿尿用的地方っ_H_」"
			ENDIF
		;それ以外
		ELSE
			IF YOKUBO()
				CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "通常", 3+RAND:3)%\@ABL:受虐属性 >= 5 ? ……_H_ # ……\@」"
				IF ABL:PLAYER:施虐属性 >= 5
					CALL PRINT_STRW, @"「啊っ……%CNAME("二人称")%明明还没习惯……%AEGI(TARGET, "要", "通常")%」"
					CALL PRINT_STRW, @"「那么っ_H_突然的话っ_H_%MIX_AEGI(4+RAND:3, TARGET, "要")%」"
				ELSE
					CALL PRINT_STRW, @"「……呼呼呼_H_不用考虑那么多也没问题的_H_」"
					CALL PRINT_STRW, @"「虽然现在确实很难受……但为了更加舒服，有时候还是需要更加努力的呢_H_」"
				ENDIF
			ELSE
				PRINTFORMW 「本当にここで気持ちよくなれるんですか……？」
				PRINTFORMW 「……まあ、ここまで%CNAME("二人称")%がこだわるのなら、気持ちよくなれるまで頑張りますけど……」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;跳蛋
;-------------------------------------------------
IF SELECTCOM == 30
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕 || YOKUBO()
			PRINTFORMW 「……确实、迄今为止还没有用过震动棒呢」
			PRINTFORMW 「因为迄今为止、已经用过各式各样的道具了，还以为已经玩过了」
			CALL PRINT_STRW, @"「……呼呼_H_由%CNAME("一人称")%的初体验而变舒服的地方、请好好看着哦、%CNAME("二人称")%_H_」"
		ELSE
			PRINTFORMW 「……那、那个……%CNAME("二人称")%……」
			PRINTFORMW 「虽、虽然我知道这是什么……但难道说……」
			PRINTFORMW 「…………是这样啊ー…………」
		ENDIF
	;二回目以降
	ELSE
		IF COND("絶頂")
			CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%明明才刚要去呢っ_H_」"
			CALL PRINT_STRW, @"「不要这样玩弄%ADANA("阴茎")%啦っ_H_%MIX_AEGI(3, TARGET, "要")%」"
		ELSEIF YOKUBO() || RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%被震动棒在%ADANA("阴茎")%里咕啾咕啾地插着要射出%ADANA("精液")%来了_H_」"
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		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 YOKUBO()
			CALL PRINT_STRW, "「是肛用震动棒吗，没问题喔」"
		ELSE
			PRINTFORMW 「要、要用这个在屁股里……？」
		ENDIF
		;余裕有
		IF CHECK("Ａ振動棒")
			IF YOKUBO()
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%震动棒っ_H_进到%ADANA("肛門")%里来了っ_H_」"
				CALL PRINT_STRW, @"「\@ SIZE("Ａ振動棒") >= 3 ? 要被巨大无比的# \@振動棒在%ADANA("肛門")%里搞得乱七八糟的了_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%ADANA("肛門")%っ_H_有感觉了什么的っ_H_」"
				CALL PRINT_STRW, @"「\@ SIZE("Ａ振動棒") >= 3 ? 好大っ # 明明是这种地方っ\@_H_%MIX_AEGI(3, TARGET, "要")%」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「ん……ちょ、ちょっとキツいですね……」"
			IF YOKUBO()
				CALL PRINT_STRW, @"「……フフ、ここから気持ちよくなれるくらい、頑張って育ててくださいね_H_」"
			ELSE
				CALL PRINT_STRW, @"「その……ほ、本当にこれで気持ちよくなっちゃうんですか……_H_」"
			ENDIF
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ａ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:肛用振動棒 == 0
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
		SIF CHECK("Ａ最新受け入れサイズ") >= 4
			CALL PRINT_STRW, @"「总觉得……屁股里还插着振动棒的样子……_H_」"
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("Ａ振動棒")
			IF TALENT:恋慕 && PALAM:欲情 >= PALAMLV:4 && RAND:3 == 0
				IF RAND:2
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%……明明用%CNAME("二人称")%的%ADANA("阴茎")%也可以……%MIX_AEGI(3, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%但是我确实也好喜欢这个っ_H_」"
				ELSE
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%振动棒插进来了っ_H_」"
					IF PENIS(PLAYER)
						CALL PRINT_STRW, @"「振动棒拔出来的话っ_H_%AEGI(TARGET, "要", "通常")%之后要好好地用%ADANA("阴茎", TARGET, PLAYER)%来在我的里面滋啵滋啵地乱做一通哦っ_H_%MIX_AEGI(2, TARGET, "要")%」"
					ELSE
						CALL PRINT_STRW, @"「%ADANA("肛門")%里面抽动着振动棒っ_H_这么激烈地做的话会忍耐不住的っ_H_%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
					ENDIF
				ENDIF
			ELSEIF (YOKUBO() || ABL:露出癖 >= 4) && RAND:2
				CALL PRINT_STRW, @"「%CNAME("二人称")%……快点……_H_快用这个振动棒把%CNAME("一人称")%的%ADANA("肛門")%搅弄得乱七八糟的吧……_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%啊っ_H_振动棒进到%ADANA("肛門")%里面去了っ_H_」"
				SELECTCASE SIZE("Ａ振動棒")
				CASE IS >= 4
					CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%好腻害っ_H_嘎吱嘎吱地っ_H_在扩张っ_H_」"
					CALL PRINT_STRW, @"「被振动っ_H_满满地插到深处来了っ_H_%AEGI(TARGET, "要")%要舒服到顶了っ_H_」"
				CASE 3
					CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%AEGI(TARGET, "要")%好厉害っ_H_好大っ_H_」"
					CALL PRINT_STRW, @"「\@ SIZE("阴茎", PLAYER)　>= 3 ? 像%CNAME("二人称")%一样大的# \@大大的振动棒っ_H_在%ADANA("肛門")%里振动得脑子要麻了っ_H_」"
				CASE 2
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%啊哈っ_H_好粗っ_H_」"
					IF ABL:施虐属性 >= 3 && SIZE("阴茎", PLAYER) < 2
						CALL PRINT_STRW, @"「在%CNAME("二人称")%的面前っ_H_因为一根比%CNAME("二人称")%的%ADANA("阴茎")%还要大的振动棒发出喘声っ_H_」"
						CALL PRINT_STRW, @"「这样下去%CNAME("一人称")%、就要喜欢上和振动棒做爱了……_H_」"
					ELSEIF ABL:Ａ拡張 >= 3
						CALL PRINT_STRW, @"「啊っ_H_振动棒在%ADANA("肛門")%里咕啾咕啾地转动着_H_」"
						CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("肛門")%_H_被振动棒搞得乱七八糟了っ_H_」"
					ELSE
						CALL PRINT_STRW, @"「大大的振动棒っ_H_在%ADANA("肛門")%里扩张着乱动っ_H_」"
					ENDIF
				CASEELSE
					CALL PRINT_STRW, @"「要在%CNAME("二人称")%的面前被看光像女孩子一样娇喘的样子了っ_H_」"
				ENDSELECT
			ELSE
				IF COND("長振動棒") && (MARK:屈服刻印 == 2 || PALAM:欲情 >= PALAMLV:5)
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%AEGI(TARGET, "要")%一直插到深处了_H_」"
					CALL PRINT_STRW, @"「被振动棒一直插到深处变舒服起来的地方要被%CNAME("二人称")%看光了っ_H_」"
				ELSE
					CALL PRINT_STRW, @"「等、等一下……再怎么说这种样子还是好害羞……%AEGI(TARGET, "要", "通常")%」"
				ENDIF
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "通常")%……」"
			PRINTFORMW 「我、我没事的，%CNAME("二人称")%……」
			PRINTFORMW 「……虽然是有些辛苦啦」
			IF COND("長振動棒")
				PRINTFORMW 「不过……虽然说插进去很辛苦、不过居然能插入那么长的东西呢」
				PRINTFORMW 「我也为自己的身体素质而吃惊哦……」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飛機杯
;-------------------------------------------------
IF SELECTCOM == 37
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			IF YOKUBO()
				PRINTFORMW 「え、それって飛機杯ですか？」
				PRINTFORMW 「……うーん、名前は聞いたことあるんですけど、使ったことはないんですよねー。どうも恥ずかしくて……」
				CALL PRINT_STRW, @"「……え、ここでですか？　ダメじゃないですけど、せっかくですし大人のおもちゃより%CNAME("二人称")%のほうが……っ_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3)%そんなっ_H_いきなりっ_H_%AEGI(TARGET, "要", "通常")%」"
			ELSE
				PRINTFORMW 「え……そ、それって、も、もしかして……」
				PRINTFORMW 「……い、いえ、名前は知ってるんですが使ったことは……」
				CALL PRINT_STRW, @"「って、ちょ、ちょっと！　そんな急に……っ_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%そんなっ_H_動かさないでぇっ_H_」"
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF VAGINA(PLAYER)
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%啊哈っ_H_在把我当成%CNAME("二人称")%的撸管菜的人的面前打飞机高潮了_H_」"
				SELECTCASE ABL:施虐属性
				CASE IS >= 3
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称", "甘え")%_H_在你面前用假%ADANA("ヴァギナ")%做爱的感想如何呢_H_」"
				CASEELSE
					CALL PRINT_STRW, @"「快点っ_H_快点让我插进%CNAME("二人称")%的%ADANA("ヴァギナ")%里来っ_H_」"
				ENDSELECT
			ELSE
				IF RAND:2
					CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:2, TARGET, "要")%%CNAME("二人称")%っ_H_見てっ_H_」"
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%飛機杯にこんなni↘_H_%AEGI(TARGET, "要", "通常")%めちゃくちゃにされてるとこぉっ_H_」"
				ELSE
					CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:2, TARGET, "要")%%CNAME("二人称")%っ_H_」"
					CALL PRINT_STRW, @"「要在%CNAME("二人称")%的眼前%ADANA("阴茎")%被飞机杯给搞得咕啾咕啾的了っ_H_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「当着%CNAME("二人称")%的面っ_H_腰自己就開始献媚一般动起来了っ_H_」"
			CALL PRINT_STRW, @"「要让%CNAME("二人称")%看到自己用飞机杯撸管的样子了っ_H_%MIX_AEGI(2, TARGET, "要")%」"
		ENDIF
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%飞机杯好厉害っ_H_」"
		CALL PRINT_STRW, @"「来做许多啾啵啾啵的事吧っ_H_%AEGI(TARGET, "要", "通常")%」"
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;Ｖ挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 60 && SELECTCOM <= 69 && FIRSTCOMS("Ｖ挿入") == 0
	;処女
	IF TALENT:処女
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		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:手下留情 && NOWEX:Ｖ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		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
		;それ以外
		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 YOKUBO()
				CALL PRINT_STRW, @"「……%CNAME("二人称")%的%ADANA("阴茎")%，看起来很好吃呢_H_」"
			ELSE
				PRINTFORMW 「那っ………………那个………………」
			ENDIF
		ELSE
			;余裕有かつ屈服刻印lV3
			IF CHECK("Ａ挿入") && YOKUBO()
				CALL PRINT_STRW, @"「尽管这么開发了身体，却没有用%ADANA("阴茎")%插进去过什么的、%CNAME("二人称")%真是有不得了的嗜好呢_H_」"
			;それ以外
			ELSEIF TALENT:恋慕
				PRINTFORMW 「……如果是%CNAME("二人称")%的话什么时候都大欢迎喔？」
				PRINTFORMW 「但是……那个……」
				CALL PRINT_STRW, "「因为这种事是第一次做、可以的话请尽量温柔一些做……_H_」"
			ENDIF
		ENDIF
		CALL PRINT_STRW, @"「……啊っ……%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%进来了……\@ABL:Ａ感覚 >= 3 ? _H_ # \@」"
		IF CHECK("Ａ挿入")
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "不要")%」"
		ENDIF
	;それ以外
	ELSE
		;余裕有
		IF CHECK("Ａ挿入")
			IF YOKUBO()
				IF RAND:2
					CALL PRINT_STRW, @"「今天要用这个体位来做呢_H_」"
				ELSE
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%ADANA("阴茎")%进到%ADANA("肛門")%里面来了……%AEGI(TARGET, "要", "通常")%」"
				ENDIF
			ELSE
				PRINTFORMW 「这、这样做可以吗……？」
			ENDIF
		;それ以外
		ELSE
			IF YOKUBO()
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%肚子要被%CNAME("二人称")%的东西在%ADANA("肛門")%里填得满满的了っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%好大っ_H_」"
				CALL PRINT_STRW, "「这样的っ_H_根本没法忍耐っ_H_」"
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ａ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOMS("Ａ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		IF PALAM:Ａ潤 <= PALAMLV:3 && RAND:2
			CALL PRINT_STRW, @"「啊っ！　等一下！　还没好好……っ\@ABL:受虐属性 >= 3 || ABL:Ａ感覚 >= 5 ? _H_ # ！\@」"
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "不要")%%CNAME("二人称")%……\@ MARK:屈服刻印 == 0 ? 实在是太乱来了# 准备不是还有些没做充足吗\@……%MIX_AEGI(1, TARGET, "不要")%」"
		ENDIF
	;巨根
	ELSEIF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%%CNAME("一人称")%的っ_H_%ADANA("肛門")%_H_」"
		CALL PRINT_STRW, @"「被%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%でいっぱいいっぱいにされちゃってるぅ_H_」"
	;恋慕
	ELSEIF TALENT:恋慕 || YOKUBO()
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 75
			SELECTCASE RAND:5
			CASE 0
				CALL PRINT_STRW, @"「要用%CNAME("一人称")%的%ADANA("肛門")%吞下%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%了哦_H_」"
			CASE 1
				CALL PRINT_STRW, @"「あはっ_H_%CNAME("二人称")%の%ADANA("阴茎")%が挿ってきてるぅ……_H_」"
			CASE 2
				CALL PRINT_STRW, @"「フフ_H_見えてますか？　%ADANA("肛門")%で%ADANA("阴茎")%食べられちゃってるところ_H_」"
			CASE 3
				CALL PRINT_STRW, @"「ん……_H_フフ、今日は%CNAME("一人称")%が%CNAME("二人称")%を気持ちよくしてあげます_H_」"
			CASE 4
				CALL PRINT_STRW, @"「あぁ……っ_H_腰を降ろす度に%ADANA("阴茎", TARGET, PLAYER)%がゴリゴリってぇ_H_」"
			ENDSELECT
		;対面座位
		CASE 73
			CALL PRINT_STRW, @"「%CNAME("二人称")%_H_%CNAME("二人称")%_H_」"
		;それ以外
		CASEELSE
			CALL PRINT_STRW, "「好哦、请用吧_H_」"
			PRINTFORM 「请让%CNAME("一人称")%
			IF CHECK("Ａ完美契合") && RAND:4 == 0
				PRINTFORM %CNAME("二人称")%専用
			ELSEIF PALAM:Ａ潤 >= PALAMLV:4 && RAND:3 == 0
				PRINTFORM 湿哒哒黏糊糊的
			ELSEIF ABL:Ａ拡張 >= 5 && RAND:2
				PRINTFORM 能塞下一只手腕的
			ELSEIF ABL:Ａ感覚 >= 5
				PRINTFORM 下流的
			ENDIF
			CALL PRINT_STRW, @"%ADANA("肛門")%里面舒服起来吧_H_」"
		ENDSELECT
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_好厉害っ_H_」"
		CALL PRINT_STRW, @"「只是做着这样的事情就要变成女孩子了呜呜っ_H_%MIX_AEGI(2, TARGET, "要")%」"
	ENDIF
	RETURN 1

;-------------------------------------------------
;全Ａ挿入共通の３Ｐ奉仕
;ここに力を入れると毎回乃々君が滅茶苦茶になるのでおすすめ
;-------------------------------------------------
ELSEIF CHECK_COM("３Ｐ奉仕")
	CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 2+RAND:2)%%AEGI(TARGET, "要", "Ａ異物", 1+RAND:3)%」"
	CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3+RAND:2)%%AEGI(TARGET, "要", "通常", 3+RAND:2)%……\@ABL:Ａ感覚 >= 3 ? _H_ # \@」"
	CALL PRINT_STR, @"（……%CNAME("一人称")%的%ADANA("肛門")%和%TEXTR("嘴巴/口穴/嘴里")%都被\@ABL:Ａ感覚 >= 3 ? _H_ # \@……"
	IF TALENT:PLAYER:男性 && TALENT:(PLAYER:1):男性
		PRINTFORM %CNAME("主人")%和%CNAME("助手")%的%ADANA("阴茎")%
	ELSEIF PENIS(PLAYER)
		PRINTFORM %CNAME("主人")%的%ADANA("阴茎", TARGET, PLAYER)%和%CNAME("助手")%的
		SELECTCASE PREVCOM:2
		CASE 90 TO 92, 97
			PRINTFORM 假阳具
		CASE 96
			PRINTFORM %ADANA("肛門")%
		CASE 98
			PRINTFORM %ADANA("ヴァギナ", TARGET, ASSI)%
		ENDSELECT
	ELSEIF PENIS(PLAYER:1)
		PRINTFORM %CNAME("主人")%的假阳具和%CNAME("助手")%的
		SELECTCASE PREVCOM:2
		CASE 90 TO 92, 97
			PRINTFORM %ADANA("阴茎")%
		CASE 96
			PRINTFORM %ADANA("肛門")%
		CASE 98
			PRINTFORM %ADANA("ヴァギナ")%
		ENDSELECT
	ELSE
		SELECTCASE PREVCOM:2
		CASE 90 TO 92, 97
			PRINTFORM %CNAME("主人")%和%CNAME("助手")%的假阳具
		CASE 96
			PRINTFORM %CNAME("主人")%的假阳具和%CNAME("助手")%的%ADANA("肛門")%
		CASE 98
			PRINTFORM %CNAME("主人")%的假阳具和%CNAME("助手")%的%ADANA("ヴァギナ")%
		ENDSELECT
	ENDIF
	CALL PRINT_STRW, @"……%TEXTR("＿/满满当当地塞进去了")%\@ABL:Ａ感覚 >= 3 ? _H_ # \@）"
	IF NO:ASSI == 23
		IF INSERT("Ａ挿入", ASSI)
			PRINTFORML
			IF ABL:ASSI:施虐属性 >= 3
				IF PENIS(ASSI)
					CALL PRINT_STRW, @"『%TEXTR("呼呼っ/唔呼呼っ")%_HH_　乃乃君、%TEXTR("完全像个女孩子一样在娇喘呢。就这么喜欢我的肉棒吗？/真是个不够帅气的孩子呀。比起主人大人的肉棒，我的更能让你兴奋起来吗？")%_HH_』"
				ELSE
					CALL PRINT_STRW, @"「%TEXTR("怎么了呢/怎么了")%、乃乃君？_HH_　被%CNAME("一人称")%的%TEXTR("穿戴式假陰茎/假阳具/双頭振動棒")%在这%TEXTR("不浄的穴/不干净的屁股穴/污秽的屁穴")%里%TEXTR("挖掘着会有感觉吗……乃乃君真是个无可救药的变态呢/侵犯着……就这么舒服吗？　乃乃君真是个即使不需要主人大人的肉棒也能感受到快乐的坏孩子呢")%」"
				ENDIF
			ELSE
				IF PENIS(ASSI)
					CALL PRINT_STRW, @"「%TEXTR("对不起……/请原谅我……")%乃乃君……」"
					CALL PRINT_STRW, @"「%TEXTR("咕っ/咕唔")%……你的%TEXTR("菊穴/不浄的穴/屁股")%が……%TEXTR("里舒服过頭腰停也停不下来/里面实在是太舒服了っ、我的腰也忍不住開始动起来了")%_HH_」"
				ELSE
					CALL PRINT_STRW, @"「%TEXTR("喘息着的乃乃君……看起来和女孩子没什么两样呢……/这样喘息着的话，我也……想更多欺负乃乃君了……")%」"
					CALL PRINT_STRW, @"「%TEXTR("这是主人大人和我……哪一方先被弄至高潮的竞争/比起主人大人、我会让你感到更舒服哦")%_HH_」"
				ENDIF
			ENDIF
		ELSE
			PRINTFORML
			IF ABL:ASSI:施虐属性 >= 3
				CALL PRINT_STRW, @"「%TEXTR("呼呼っ/唔呼呼っ")%_HH_　赌上性命一般%TEXTR("侍奉着的/吮吸着肉棒的")%乃乃君真可爱呢」"
				CALL PRINT_STRW, @"「%TEXTR("请乃乃君做好嘴巴小穴被充分地_HH_　侵犯直到我满足为止的觉悟吧/来吧来吧_HH_　可不会给你休息的时间呢")%_HH_」"
			ELSE
				CALL PRINT_STRW, @"「乃乃君……%TEXTR("被这么吸弄着的话、我也……有感觉了、嗯唔/不行っ、被这样竭尽全力含着的话我也会……变得很舒服、啊啊っ")%_HH_」"
				CALL PRINT_STRW, @"「%TEXTR("被男孩子这样子对待什么的……我、圣职者失格了、啊啊っ、明明不可以做这种事……却来了感觉/被可爱的伪娘……含着吸什么的……我、要有感觉了。有感觉了什么的、不行")%_HH_」"
			ENDIF
		ENDIF
	ENDIF

;-------------------------------------------------
;全Ａ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:PLAYER:手下留情 && NOWEX:Ａ绝顶前骤停 && RAND:2
		CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
		IF TALENT:恋慕 && RAND:2
			CALL PRINT_STRW, @"「%CNAME("二人称")%的っ_H_真是坏心眼_H_」"
		ELSE
			SELECTCASE RAND:5
			CASE 0
				CALL PRINT_STRW, @"「被这么っ_H_一直做舒服的事情的话っ_H_要变得奇怪了っ_H_」"
			CASE 1
				CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+2, TARGET, "要")%%ADANA("肛門")%っ_H_好舒服っ_H_」"
			CASE 2
				CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+2, TARGET, "要")%更加っ_H_激烈些吧っ_H_」"
				CALL PRINT_STRW, @"「更多っ_H_再做更激烈些让%CNAME("一人称")%像雌性一样去吧_H_%MIX_AEGI(RAND:2+1, TARGET, "要")%」"
			CASE 3
				CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+2, TARGET, "要")%让我去吧っ_H_让我去吧っ_H_」"
				CALL PRINT_STRW, @"「这样下去的话っ_H_要变成离開%ADANA("阴茎")%就去不了的身体了っ_H_」"
			CASEELSE
				CALL PRINT_STRW, @"「好厉害っ_H_好舒服っ_H_%MIX_AEGI(RAND:3+2, TARGET, "要")%」"
			ENDSELECT
		ENDIF
	ELSEIF PREVEX("Ａ中出し")
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		CALL PRINT_STRW, @"「不要っ_H_在里面搅来搅去っ_H_%AEGI(TARGET, "要", "通常")%」"
		CALL PRINT_STRW, @"「被射精了っ_H_%ADANA("精液")%在っ_H_%AEGI(TARGET, "要", "通常")%里面咕啾咕啾的要变奇怪了呜呜っ_H_」"
	ELSEIF PREVCOM == 91 && RAND:2
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%挿进来了っ_H_」"
		CALL PRINT_STRW, @"「无论是嘴巴还是%ADANA("肛門")%都要被%CNAME("二人称")%的%ADANA("阴茎")%侵犯了っ_H_」"
	;余裕が無い
	ELSEIF CHECK("Ａ挿入") == 0
		IF ABL:受虐属性 >= 5 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%啊っ_H_被欺负着っ_H_%CNAME("一人称")%的%ADANA("肛門")%在被欺负着っ_H_」"
			CALL PRINT_STRW, "「肚子里要被咕啾咕啾地搅和得乱七八糟了っ_H_」"
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:4, TARGET, "不要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "通常", 2)%……%CNAME("二人称")%、稍微做慢一点啦！！」"
			IF ABL:Ａ感覚 >= 3
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "不要")%」"
			ENDIF
		ENDIF
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ａ対応指令") && RAND:2
		CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+5, TARGET, "要")%」"
		IF TALENT:恋慕 && RAND:2
			IF RAND:2
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_最喜欢%CNAME("二人称")%了_H_」"
				CALL PRINT_STRW, "「再来_H_接着把我侵犯到乱七八糟下不了床的程度吧っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%里面被摩擦来摩擦去的っ_H_」"
				CALL PRINT_STRW, @"「做得っ_H_这么激烈的话っ_H_%ADANA("肛門")%就要变成小穴了呜呜呜っ_H_%AEGI(TARGET, "要", "通常", 2+RAND:2)%」"
			ENDIF
		ELSE
			CALL PRINT_STRW, "「啊_H_好喜欢被这么做_H_」"
			IF CONDS("体位") == "騎乗位"
				CALL PRINT_STRW, "「这样地っ_H_这样的话就回不去了っ_H_」"
				CALL PRINT_STRW, @"「像这样被%ADANA("阴茎")%插进去的话不用屁穴就要饥渴难耐了っ_H_」"
			ELSE
				CALL PRINT_STRW, "「更多_H_在里面继续摩擦摩擦_H_」"
			ENDIF
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			IF TALENT:恋慕 && RAND:3 == 0
				IF TEQUIP:接吻
					CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_」"
				ELSEIF TEQUIP:深喉 || TEQUIP:六九式
					CALL PRINT_STRW, @"「好深っ_H_%MIX_AEGI(3, TARGET, "要")%」"
				ELSE
					IF RAND:2
						CALL PRINT_STRW, @"「啊っ_H_啾ーッ_H_啾ー来亲吻吧っ_H_」"
					ELSE
						CALL PRINT_STRW, @"「%MIX_AEGI(4+RAND:2, TARGET, "要")%」"
						CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_再っ_H_再做更激烈些吧っ_H_」"
					ENDIF
				ENDIF
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("肛門")%、正被活塞运动摩擦着っ_H_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%明明是男孩子、却被当成雌性对待_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			ELSEIF AGE(PLAYER) == 1
				CALL PRINT_STRW, @"「被%CNAME("二人称")%っ_H_在里面侵犯着っ_H_」"
				CALL PRINT_STRW, @"「要被看上去像%TEXTR("小孩子/正太")%的%CNAME("二人称")%给搞得舒服到不知所措了っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「这种事っ_H_明明是禁止事项っ_H_」"
			ENDIF
		CASEELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門性交(初めては上のＡ挿入系初選択などで)
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 74
	;★
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「啊哈啊っ_H_%ADANA("肛門")%扩张開来了っ_H_」"
			CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%更多往里突刺吧_H_快些让%ADANA("肛門")%调教成性器っ_H_」"
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "不要")%」"
			PRINTFORMW 「还……还很紧……」
		ENDIF
	ELSEIF SHOOT("Ａ中出し")
		IF CFLAG:Ｓっ気フラグ
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%の%ADANA("精液")%が中でビューってしてる_H_」"
			CALL PRINT_STRW, @"「フフ_H_%CNAME("二人称")%って男性ノコのお尻でこんなにいっぱい射精しちゃうんですね_H_」"
			CALL PRINT_STRW, @"「……もっともっと、いっぱい射精させてあげます……_H_」"
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%ADANA("精液")%っ_H_不要在%ADANA("肛門")%里搅来搅去的っ_H_」"
			CALL PRINT_STRW, @"「被做了这样的事的话っ_H_就要变得不在%ADANA("肛門")%里搅和就按捺不住想做了っ_H_」"
		ENDIF
	ELSEIF PREVCOM == 10
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		CALL PRINT_STRW, @"「不要边碰%ADANA("阴茎")%边插着%ADANA("肛門")%啊っ_H_」"
		CALL PRINT_STRW, @"「像这样っ_H_把属于男孩子的舒服和っ_H_%AEGI(TARGET, "要", "通常")%属于女孩子的舒服混在一起的话っ_H_」"
		CALL PRINT_STRW, @"「%CNAME("一人称")%っ_H_%CNAME("一人称")%要变得奇怪了っ_H_%AEGI(TARGET, "要", "通常")%」"
	ELSEIF CHECK_COM("結腸責め")
		IF TALENT:結腸性感 && RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_もっとっ_H_もっとズボズボってしてっ_H_」"
			CALL PRINT_STRW, @"「%("一人称")%のお尻の子宮ni↘_H_%CNAME("二人称")%の%ADANA("精液")%いっぱい蔷薇まいてぇっ_H_」"
		ELSE
			SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%好厉害っ_H_」"
				CALL PRINT_STRW, @"「在%ADANA("肛門")%的里面っ_H_猛力撞着っ_H_%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			CASE 1
				CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
				CALL PRINT_STRW, @"「里面っ_H_被疯狂突刺着っ_H_要变成子宮了\@RAND:3 == 0 ? ぅ # \@っ_H_」"
			CASEELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%%ADANA("肛門")%要被っ_H_从最深处一直開发出来了っ_H_」"
				CALL PRINT_STRW, @"「这样下去的话%CNAME("一人称")%的%ADANA("肛門")%要变成%CNAME("二人称")%的专用肉棒收容套了っ_H_」"
			ENDSELECT
		ENDIF
	;完美契合
	ELSEIF CHECK_COM("Ａ完美契合")
		IF RAND:3 == 0
			CALL PRINT_STRW, "「啊_H_进来了_H_」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%的っ_H_就用%CNAME("一人称")%的%CNAME("二人称")%専用%ADANA("肛門")%_H_」"
			CALL PRINT_STRW, @"「请射给我黏糊糊到装不下的满满%ADANA("精液", TARGET, PLAYER)%吧_H_」"
		;★　二種追加
		;別人加筆分。有がとうございます
		ELSEIF RAND:2 == 0
			CALL PRINT_STRW, @"「啊っ_H_一直进到最深处了っ_H_」"
			CALL PRINT_STRW, @"「请把%CNAME("一人称")%っ_H_当成%CNAME("二人称")%的専用%ADANA("肛門")%吧_H_」"
			CALL PRINT_STRW, @"「%ADANA("肛門")%的里面%ADANA("精液", TARGET, PLAYER)%咕嘟咕嘟流出来了っ_H_」"
		ELSE
			CALL PRINT_STRW, @"「这样地っ_H_%CNAME("一人称")%的%ADANA("肛門")%在紧紧吸着%ADANA("阴茎")%_H_」"
			CALL PRINT_STRW, @"「请、请把%CNAME("一人称")%_H_当成%CNAME("二人称")%的専用%ADANA("肛門")%来使用吧っ_H_」"
		ENDIF
		;ここまで別人加筆分
	;恋慕
	ELSEIF TALENT:恋慕 && RAND:2
		CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:2, TARGET, "要")%%CNAME("二人称")%っ_H_喜欢っ_H_最喜欢了っ_H_」"
		SELECTCASE RAND:5
		CASE 0
			CALL PRINT_STRW, @"「更多地让%CNAME("一人称")%变得更舒服起来吧っ_H_」"
		CASE 1
			CALL PRINT_STRW, @"「满满地在%ADANA("肛門")%里射出%ADANA("精液")%吧_H_biubiu地射出来っ_H_」"
		CASE 2
			CALL PRINT_STRW, @"「请把我侵犯到除了%CNAME("二人称")%以外什么都思考不了的地步吧_H_」"
		CASE 3
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%好舒服っ_H_%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%っ_H_%AEGI(TARGET, "要", "通常")%在里面摩擦摩擦着好舒服っ_H_」"
		CASEELSE
			CALL PRINT_STRW, @"「请用%CNAME("二人称")%的%ADANA("阴茎")%把我搞得一塌糊涂っ_H_再把我当成个飞机杯一样地侵犯我っ_H_」"
		ENDSELECT
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+2, TARGET, "要")%」"
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門騎乗位
;-------------------------------------------------
IF SELECTCOM == 75
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	;RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「フフ_H_%CNAME("二人称")%の%ADANA("阴茎")%、%CNAME("一人称")%の%ADANA("肛門")%にズッポリ挿入いっちゃってます_H_」"
				IF TALENT:PLAYER:男性
					CALL PRINT_STRW, @"「同性に被逆推て犯されて、それでも興奮しちゃうんですね_H_」"
				ELSE
					CALL PRINT_STRW, @"「胸部もあって、ココ以外は女の子なのに、%ADANA("阴茎")%イジイジされて男性みたいに感じちゃうんですね_H_」"
				ENDIF
				CALL PRINT_STR, @"「%MIX_AEGI(1, TARGET, "要")%……いいですよ_H_"
				IF TALENT:PLAYER:男性
					PRINTFORM 同性同士の性交に夢中になりながら
				ELSE
					PRINTFORM 男性ノコの快楽に堕ちながら
				ENDIF
				CALL PRINT_STR, @"いっぱい%ADANA("肛門")%に射精してください……_H_」_W_"
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:3, TARGET, "要")%这样如何呢っ_H_%ADANA("阴茎")%被%ADANA("肛門")%给吃干抹净的感觉如何呢っ_H_」"
				CALL PRINT_STRW, @"「啊哈ッ_H_%CNAME("二人称")%的%ADANA("阴茎")%涨大了呢_H_」"
				CALL PRINT_STRW, @"「被%ADANA("肛門")%侵犯就兴奋起来了什么的_H_%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%真是个抖M呢っ_H_」"
			ELSEIF YOKUBO() || TALENT:恋慕
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_%CNAME("二人称", "甘え")%_H_」"
				CALL PRINT_STRW, @"「啊哈っ_H_要吞下%CNAME("二人称")%的%ADANA("阴茎")%了哦っ_H_」"
				CALL PRINT_STRW, @"「在%CNAME("二人称")%的面前\@ABL:Ａ感覚 >= 3 ? 舒服# 兴奋\@起来了っ_H_」"
			ELSE
				IF ABL:Ａ感覚 >= 3
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要")%这样的っ_H_明明是屁股的穴啊っ_H_」"
				ELSE
					PRINTFORMW 「……嗯、这、这么做可以吗……？」
					PRINTFORMW 「那、那样的事、我才没有兴奋起来呢……」
					PRINTFORMW 尽管%CALLNAME:TARGET%这样装作自己若无其事的样子，他的面颊上却染上了薄薄的一层赤红……
				ENDIF
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒 && RAND:2
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:2
			IF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊哈っ_H_%CNAME("二人称")%的%ADANA("阴茎")%好坚挺っ_H_」"
				CALL PRINT_STRW, @"「更多っ_H_更多っ%ADANA("阴茎")%要好好加油\@ABL:施虐属性 >= 3 ? 被我虐待# \@然后从里面biubiu地喷射出大量的%ADANA("精液")%来_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%的%ADANA("阴茎")%在里面咕叽咕叽地转着っ_H_」"
				CALL PRINT_STRW, @"「……呼呼_H_要让你变得更舒服哦_H_……%MIX_AEGI(2+RAND:2, TARGET, "要")%」"
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(RAND:4+1, TARGET, "要")%」"
			CALL PRINT_STRW, "「啊_H_更多っ_H_还要更多_H_」"
			CALL PRINT_STRW, @"「快用%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%更多地让%ADANA("肛門")%里%TEXTR("舒服起来吧っ_H_/摩擦摩擦着舒服起来っ_H_/里面有感觉吧っ")%」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:2
			CALL PRINT_STRW, @"「啊っ_H_%CNAME("二人称")%っ_H_」"
			SELECTCASE RAND:4
			CASE 0
				IF CHECK("Ａ完美契合")
					SELECTCASE RAND:3
					CASE 0
						CALL PRINT_STRW, @"「%CNAME("二人称")%专用的肉棒收容套里被%ADANA("阴茎")%滋啵滋啵地做了好多っ_H_」"
					CASE 1
						CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("肛門")%_H_要变成%CNAME("二人称")%的%ADANA("阴茎")%的形状了っ_H_」"
						CALL PRINT_STRW, @"「%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%っ_H_身体要完全沉迷在这上面了っ_H_%MIX_AEGI(3, TARGET, "要")%」"
					CASEELSE
						CALL PRINT_STRW, @"「%ADANA("肛門")%被っ_H_%CNAME("二人称")%的\@ SIZE("阴茎", PLAYER) >= 3 ? 极恶 # 气派的\@%ADANA("阴茎")%给搞得乱七八糟了っ_H_」"
						CALL PRINT_STRW, @"「要用已经变成如果不是%CNAME("二人称")%的东西就不会堕落的，屁股穴失格的%ADANA("ヴァギナ")%去吃干抹净%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%了哟っ_H_」"
					ENDSELECT
				ELSE
					CALL PRINT_STRW, @"「被%CNAME("二人称")%的%ADANA("阴茎")%给っ_H_開发%ADANA("肛門")%了っ_H_」"
				ENDIF
			CASE 1
				IF ABL:Ａ拡張 >= 5 && RAND:2
					CALL PRINT_STRW, @"「%CNAME("二人称")%の%ADANA("阴茎")%がっ_H_%ADANA("肛門")%をゴシゴシしてるっ_H_」"
					SELECTCASE SIZE("阴茎", PLAYER)
					CASE IS >= 3
						CALL PRINT_STRW, @"「用%CNAME("二人称")%的極悪%ADANA("阴茎")%捣烂%CNAME("一人称")%的%TEXTR("结实的/手腕也能放进去的/什么都能放进去的")%%ADANA("肛門")%吧_H_」"
					CASE 1, 2
						CALL PRINT_STRW, @"「要把%CNAME("二人称")%的\@EXP:PLAYER:Ｖ挿入経験 + EXP:PLAYER:Ａ挿入経験 >= 50 ? 行家 # \@%ADANA("阴茎")%给っ_H_%AEGI(TARGET, "要", "通常")%吃进去っ_H_了っ_H_」"
					CASEELSE
						CALL PRINT_STRW, @"「%CNAME("二人称")%的小孩子%ADANA("阴茎")%快进来吧っ_H_%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
					ENDSELECT
				ELSE
					IF SIZE("阴茎", PLAYER) == 0
						CALL PRINT_STRW, @"「%CNAME("二人称")%的小孩子%ADANA("阴茎")%好舒服っ_H_」"
						CALL PRINT_STRW, @"「%ADANA("肛門")%里满满来回地穿刺好舒服哟っ_H_%MIX_AEGI(3, TARGET, "要")%」"
					ELSE
						CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_%CNAME("二人称")%的%ADANA("阴茎")%っ_H_好厉害っ_H_」"
						CALL PRINT_STRW, @"「%ADANA("肛門")%里被摩擦到敏感点了っ_H_好舒服っ_HH_」"
					ENDIF
				ENDIF
			CASE 2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 4)%%ADANA("肛門")%被っ_H_用力摩擦着っ_H_」"
				CALL PRINT_STRW, @"「腰要软到起不来了……%AEGI(TARGET, "要", "通常")%%ADANA("肛門")%被……_H_%AEGI(TARGET, "要", "通常", 3+RAND:3)%」"
			CASE 3
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%腰っ_H_动不了了っ_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要这样子っ_H_动腰っ_H_%MIX_AEGI(2, TARGET, "要")%」"
			ENDSELECT
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(RAND:3+3, TARGET, "要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;貝あわせ
;-------------------------------------------------
IF SELECTCOM == 80
	;初めて
	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 == 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:恋慕 || YOKUBO()
			SELECTCASE RAND:4
			CASE 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊っ_H_%CNAME("二人称")%的っ_H_和%CNAME("一人称")%的っ_H_彼此的%ADANA("阴茎")%在互相亲吻着っ_H_」"
			CASE 1
				CALL PRINT_STRW, @"［%CNAME("二人称")%っ_H_%MIX_AEGI(1, TARGET, "要")%%CNAME("二人称")%っ_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%在っ_H_%ADANA("尿道")%里转动着っ_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%好厉害っ_H_这样的っ_H_%MIX_AEGI(2+RAND:5, TARGET, "要")%」"
			CASE 2
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_%MIX_AEGI(2, TARGET, "要")%更激烈一点吧_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%明明是尿尿的穴っ_H_好舒服っ_HH_」"
			CASEELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%っ_H_要进到%ADANA("尿道")%里来了っ_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%更多_H_再做更多っ_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%的%ADANA("精液")%在%ADANA("尿道")%里满满灌注着_HH_」"
			ENDSELECT
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:2, TARGET, "要")%明明是%ADANA("尿道")%っ_H_」"
			CALL PRINT_STRW, @"「好舒服っ_H_%AEGI(TARGET, "要", "通常")%明明是%ADANA("尿道")%却这么舒服っ_H_」"
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道騎乗位
;-------------------------------------------------
IF SELECTCOM == 88
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:2
			IF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊哈っ_H_%CNAME("二人称")%的%ADANA("阴茎")%在颤抖着っ_H_」"
				CALL PRINT_STRW, @"「要用%ADANA("尿道")%好好品尝%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%了哦っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%%CNAME("二人称")%っ_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_怎么样呢_H_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("尿道")%被%ADANA("阴茎")%啾噗啾噗地做着っ_H_」"
				CALL PRINT_STRW, @"「%ADANA("精液")%被%ADANA("尿道")%榨取出来的感想如何呢っ_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%ADANA("尿道")%好舒服っ_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%的\@SIZE("基本阴茎尺寸", PLAYER) >= 3 ? 巨大的 # 坚硬\@%ADANA("阴茎")%要进到里面了っ_H_」"
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%好厉害_H_」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%的%ADANA("阴茎")%っ_H_在被%CNAME("一人称")%的%ADANA("阴茎")%侵犯着っ_H_」"
			CALL PRINT_STRW, @"「因此要更多地\@ PREVEX("尿道内射精") ? 射出%ADANA("精液", TARGET, PLAYER)% # 把%ADANA("阴茎")%搞得乱七八糟\@哦っ_H_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%这个っ_H_好厉害っ_H_」"
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%继续这样做下去的话っ_H_就要变成只是尿尿就要去的体质了_H_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;洗面奶手交
;手淫と洗面奶から派生する
;-------------------------------------------------
IF CHECK_COM("洗面奶手交")
	;恋慕
	IF TALENT:恋慕
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;手淫
;-------------------------------------------------
IF SELECTCOM == 90
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「那个……是、是这样吗？」
		PRINTFORMW 「啊……一颤一颤的……」
	;射精管理時
	ELSEIF TEQUIP:PLAYER:手下留情 && RAND:3 == 0
		CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%，露出了一副这么享受的表情呢……_H_」"
		CALL PRINT_STRW, @"「但是射精什么的可不行哟_H_」"
		CALL PRINT_STRW, @"「如果这样的话……就这样子做个一周左右吧_H_」"
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		IF CFLAG:Ｓっ気フラグ && RAND:2
			CALL PRINT_STRW, @"「……%CNAME("二人称")%、怎么样？　……什么话也不说、竟然舒服到这种程度呢……_H_」"
			CALL PRINT_STRW, @"「你看、所以不是像这样让肉棒啪啪地上下动着吗_H_」"
			PRINTFORMW 「忍耐汁滴滴答答地流下、血管一颤一颤的……」
			CALL PRINT_STRW, @"「就这么用色色的眼神打量着我吗？　……%CNAME("二人称")%这个变态_H_」"
		;恋慕
		ELSEIF TALENT:恋慕 || YOKUBO()
			IF ITEM:潤滑液 >= 1 && RAND:3 == 0
				PRINTFORMW 「……这么说来、还剩着一些润滑液吧」
				PRINTFORMW 「把这个像这样倒下来……看、这样如何？」
				CALL PRINT_STRW, @"「……哦呀、明明是做按摩却像这样硬了起来什么的……_H_」"
				CALL PRINT_STRW, @"「都是%CNAME("一人称")%的责任呢。这是诚心诚意的侍奉、直到%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%软下来之前都要接着按摩_H_」"
			ELSEIF RAND:2
				CALL PRINT_STRW, @"「%CNAME("二人称")%、舒服吗？　真好呢_H_」"
				CALL PRINT_STRW, "「想藏起来也是没用的哟_H_」"
				PRINTFORMW 「因为%CNAME("一人称")%也是男孩子嘛。哪里要怎么对待才能舒服起来、舒服的时候%ADANA("阴茎")%会变成什么样这类的事情可是一目了然的」
				CALL PRINT_STRW, @"「因为会就这样\@ABL:施虐属性 >= 4 ? 射精管理并 # 服务着%ADANA("阴茎")%\@并且为你做出来、所以请不要顾虑地把%ADANA("精液")%biubiu地射出来哦_H_」"
			ELSE
				CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%变舒服起来了呢……_H_」"
				CALL PRINT_STRW, @"「不藏起来也没问题哦、%ADANA("阴茎")%都这样一颤一颤地兴奋起来了嘛……_H_」"
				CALL PRINT_STRW, @"「你看_H_忍耐汁滴滴答答地落下来了、鈴口也像这样一张一合地动起来了哦_H_」"
				CALL PRINT_STRW, @"「而且%TEXTR("睾丸/精液袋")%也在啪啪啪作响什么的……_H_继续加油做更多让我舒服的事情吧_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「那个……%CNAME("二人称")%、非常舒服的样子呢……_H_」"
		ENDIF
	;それ以外
	ELSE
		IF CHECK_COM("手交しあう")
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3+RAND:3)%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%因为碰到了%CNAME("二人称")%的っ_H_%ADANA("阴茎")%嘛っ_H_不要那样欺负啦っ_H_」"
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		;恋慕
		ELSEIF TALENT:恋慕 || YOKUBO()
			SELECTCASE RAND:3
			CASE 0
				CALL PRINT_STRW, "「这里这么做的话……呼呼ッ_H_」"
				CALL PRINT_STRW, @"「难道说%CNAME("二人称")%也喜欢被这么对待吗_H_」"
			CASE 1
				CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%的%TEXTR("睾丸/精液袋")%、啪啪作响起来了呢_H_」"
				CALL PRINT_STRW, @"「%ADANA("阴茎")%也像这样怒挺起来了呢……想要怎么做呢_H_请告诉我_H_」"
			CASEELSE
				CALL PRINT_STRW, @"「喔、比起平常的反应要来得好呢……_H_」"
				CALL PRINT_STRW, @"「……呼呼_H_为了射出满满的%ADANA("精液")%、一起加油吧_H_」"
			ENDSELECT
		;それ以外
		ELSE
			PRINTFORMW 「……做这种事情很得心应手、吗？」
			IF (MARK:屈服刻印 == 2 || ABL:自慰中毒 >= 3) && RAND:2
				PRINTFORMW 「……是这样、我一直以来都以自己为对象这么做来的」
			ELSEIF ABL:奉仕精神 >= 3
				CALL PRINT_STRW, @"「……那、那样的话我会更加努力让%CNAME("二人称")%感受到更多的悦乐……_H_」"
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;口交
;-------------------------------------------------
IF SELECTCOM == 91
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「フフ_H_これなら逃げられませんね_H_」"
				CALL PRINT_STRW, @"「こんな状況なのに%ADANA("阴茎")%はこんなに元気だなんて、%CNAME("二人称")%ってホントにエッチなんですから……_H_」"
				SELECTCASE CONDS("阴茎尺寸", PLAYER)
				CASE "短小"
					CALL PRINT_STRW, @"「……フフ_H_ちっちゃくて光滑无毛してて可爱%ADANA("阴茎")%……_H_」"
					IF EXP:PLAYER:Ｖ挿入経験 >= 50
						CALL PRINT_STRW, @"「この小さくてぷるぷるな%ADANA("阴茎")%で、いったいどれだけの女の人を騙してきたんでしょうね_H_」"
					ELSE
						CALL PRINT_STRW, @"「それでも一人前に勃起てて、%CNAME("二人称")%の身体の一部だけあって、やっぱり%CNAME("二人称")%ソッ阴蒂ですね_H_」"
					ENDIF
					CALL PRINT_STRW, @"「安心してください、%CNAME("二人称")%のこのかわいくて暴れん坊な%ADANA("阴茎")%を口の中でモグモグするだけですから_H_」"
				CASE "普通"
					CALL PRINT_STRW, @"「……フフ_H_ちょうど良い尺寸で、でもカリがしっかりとしていて……_H_」"
					IF EXP:PLAYER:Ｖ挿入経験 >= 50
						CALL PRINT_STRW, @"「やっぱりこういうのが一番女の人にウケるんですかね……正直、ちょぴり嫉妬しちゃいます_H_」"
						CALL PRINT_STRW, @"「せっかくですし、八つ当たりに男性の口の中でいっぱい射精させちゃいましょうか_H_」"
					ELSE
						CALL PRINT_STRW, @"「このままだといろんな女の人を泣かせるひどい%ADANA("阴茎")%になっちゃいそうです_H_」"
						CALL PRINT_STRW, @"「そうならないためにも、生徒会庶務であるこの%CNAME("一人称")%が、正しいエッチの仕方を教えて不给と……_H_」"
					ENDIF
				CASE "巨根"
					CALL PRINT_STRW, @"「……フフ_H_大きくてしっかりしていて、とっても凶悪的%ADANA("阴茎")%ですね_H_」"
					IF EXP:PLAYER:Ｖ挿入経験 >= 50
						PRINTFORMW 「一体何人の人がこの%ADANA("阴茎")%に手籠めにされてきたのでしょうか……」
						CALL PRINT_STRW, @"「……フフ_H_そんな悪い%ADANA("阴茎")%にはお仕置きです_H_いっぱいいっぱい気持ちよくして、情けない声で道歉くらいまで気持ちよくしちゃいますから_H_」"
					ELSE
						PRINTFORMW 「こんな危ない%ADANA("阴茎")%は放っておけません」
						CALL PRINT_STRW, @"「いっぱい射精させて、無害になるまで指導してさしあげます_H_」"
					ENDIF
				CASE "馬根"
					CALL PRINT_STRW, @"「……うわ、大きい……_H_」"
					CALL PRINT_STRW, @"「こんなの挿入れられたら、何も考えられなくなりそうです……_H_フフ、安心してください、精一杯がんばりますから_H_」"
				CASEELSE
					CALL PRINT_STRW, @"「……！　す、すごい大きい…………_H_」"
					CALL PRINT_STRW, @"「……フフ、アハハッ_H_%CNAME("二人称")%の%ADANA("阴茎")%ってとっても大きいんですねぇ、ビッ阴蒂しちゃいました_H_」"
					CALL PRINT_STRW, @"「でも残念、こんなに大きい大きい%ADANA("阴茎")%を持っている%CNAME("二人称")%は、これから情けなく喘ぐことが決定してるんです_H_」"
				ENDSELECT
				CALL PRINT_STRW, @"「フフ_H_覚悟してくださいね？　……では、いただきます…………%AEGI(TARGET, "要", "Ｍ異物", 1+RAND:3)%_H_」"
			ELSEIF YOKUBO()
				CALL PRINT_STRW, @"「フフ_H_これなら逃げられませんね_H_」"
				PRINTFORMW 「%CNAME("二人称")%の%ADANA("阴茎")%、どんな味がするんだろう、どんな風になっちゃうんだろうって、ずっと気になってたんです」
				CALL PRINT_STRW, @"「考えるたびに躁动难忍して、たまにガマンしきれなくなっちゃって……_H_」"
				CALL PRINT_STR, @"「……フフ_H_"
				SELECTCASE CONDS("潜在的含む阴茎尺寸", PLAYER)
				CASE "短小"
					IF AGE(PLAYER) == 1
						CALL PRINT_STR, @"想像街道やわらかそうで小さい、かわいらしい%ADANA("阴茎")%ですね_H_」_W_"
					ELSE
						CALL PRINT_STR, @"思っていたのとは少し違いますが、かわいらしくて魅力的な%ADANA("阴茎")%ですね_H_」_W_"
					ENDIF
					CALL PRINT_STRW, @"「舌先でキャンデイみたいにコロコロ_H_って舐めたらどうなっちゃうんでしょう_H_」"
				CASE "普通"
					IF AGE(PLAYER) == 1
						CALL PRINT_STR, @"想像とは違いますが、大人っぽくて立派な%ADANA("阴茎")%ですね_H_」_W_"
					ELSE
						CALL PRINT_STR, @"想像街道の%TEXTR("立派な/健壮的")%%ADANA("阴茎")%ですね_H_」_W_"
					ENDIF
					CALL PRINT_STRW, @"「これを口の中に挿入れるのかと思うと、それだけでゾクゾクしちゃいます_H_」"
				CASE "巨根"
					IF AGE(PLAYER) == 1
						CALL PRINT_STR, @"太くて大きくてギャップのある%ADANA("阴茎")%ですね_H_」_W_"
					ELSE
						CALL PRINT_STR, @"大きくて堂々とした、まさにオスの%ADANA("阴茎")%ですね_H_」_W_"
					ENDIF
					CALL PRINT_STRW, @"「こんなモノを口の中に挿入れたら絶対胖次胖次になっちゃいます_H_」"
				CASE "馬根"
					CALL PRINT_STR, @"とっても長くて……まるでみんなをメスにするために産まれてきたような%ADANA("阴茎")%ですね_H_」_W_"
					CALL PRINT_STRW, @"「口の中に挿入りきるのか心配だなぁ……_H_」"
				CASEELSE
					CALL PRINT_STR, @"ほら見てください、%CNAME("一人称")%の手だと掴み切れない……_H_」_W_"
					CALL PRINT_STRW, @"「どうしよう……いつもだったら絶対引いてるのに、ドキドキしすぎなせいで欲しくて欲しくてたまらない……_H_」"
				ENDSELECT
				CALL PRINT_STRW, @"「フフ_H_では、いただきます…………%AEGI(TARGET, "要", "Ｍ異物", 1+RAND:3)%_H_」"
			ELSE
				PRINTFORM 「うわっ……こ、これが%CNAME("二人称")%の%ADANA("阴茎")%……
				SELECTCASE CONDS("潜在的含む阴茎尺寸", PLAYER)
				CASE "短小"
					CALL PRINT_STR, @"ちっちゃくて……なんだか可爱……_H_」_W_"
				CASE "普通"
					CALL PRINT_STR, @"ガチガチで……でもなんだかドキドキしちゃう……_H_」_W_"
				CASE "巨根"
					CALL PRINT_STR, @"大きい……口いっぱい開けないと……_H_」_W_"
				CASE "馬根"
					CALL PRINT_STR, @"ものすごく大きい……口の中胖次胖次になっちゃいそう……_H_」_W_"
				CASEELSE
					CALL PRINT_STR, @"信じられないくらい大きくて……口に挿入るかな……_H_」_W_"
				ENDSELECT
				PRINTFORMW 「……%CNAME("一人称", "どもり")%は別にこういうのしてもいいって思ったわけじゃ有ません」
				PRINTFORMW 「けど、その……そう、%CNAME("二人称")%に何のメリットもないのも良くないと思ったので」
				CALL PRINT_STRW, @"「だから、その……い、いただきます……_H_」"
			ENDIF
		ELSEIF CHECK_COM("阴茎接吻")
			PRINTFORMW 「……え、%CNAME("阴茎", "どもり")%に接吻をしてほしい……！？」
			PRINTFORMW 「……ど、どうしてもというのなら……」
			CALL PRINT_STRW, @"「……そ、それでは……_H_」"
		;それ以外
		ELSE
			IF YOKUBO()
				CALL PRINT_STRW, @"「呼呼_H_想在%CNAME("一人称")%的口中让%ADANA("阴茎")%被%TEXTR("舔着/吸着")%吗_H_」"
				CALL PRINT_STRW, @"「好的哦_H_要让你在嘴里biubiu地射出满满的%ADANA("精液")%来_H_」"
				CALL PRINT_STRW, @"「呼呼ッ_H_啊ー嗯…………_H_」"
			ELSE
				PRINTFORMW 「那、那个、这个、想要我舔%ADANA("阴茎")%吗……？」
				PRINTFORMW 「唔、那个、倒也不是说不可以啦…………」
				PRINTFORMW 「那么、失、失礼了」
			ENDIF
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 5)%」"
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("阴茎接吻")
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:2
			SELECTCASE RAND:10
			CASE 0
				CALL PRINT_STRW, @"「呼唔啊っ……_H_因为一直都被这根%ADANA("阴茎")%给狠狠地\@TALENT:恋慕 ? 疼爱着 # 欺负着\@的缘故、所以这是回礼哦_H_」"
			CASE 1
				CALL PRINT_STRW, @"「啾……_H_啾……_H_……呼呼_H_明明只是刚刚開始就一颤一颤的了……这样下去的话、马上就会射出%ADANA("精液")%来了哟_H_」"
			CASE 2
				CALL PRINT_STRW, @"「フフ……_H_ただ接吻しただけなのにこんなにガチガチにしちゃって……_H_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%のこと欲しそうにビクビクって脈打って……こんなの、興奮しちゃうじゃないですか_H_」"
			CASE 3
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻", 5)%……フフ_H_もう先走り汁なんて出しちゃって……_H_」"
				CALL PRINT_STRW, @"「エッチはここからが本番なんだから、そう急がないでください……_H_」"
			CASE 4
				CALL PRINT_STRW, @"「哈唔っ……_H_吸溜……_H_%CNAME("二人称")%的%ADANA("阴茎")%……_H_啊哈っ……_H_好厉害的%TEXTS("气味")%_H_……嘶ー……啾啵……_H_」"
				CALL PRINT_STRW, @"「亀頭の辺りからこんなエッチな%TEXTS("气味")%出しちゃって……_H_」"
				CALL PRINT_STRW, @"「全然良い气味って訳じゃなくて、むしろ体臭みたいに生々しい气味なのに、%ADANA("阴茎")%が欲しくてキュンキュンッってなっちゃう……_H_」"
			CASE 5
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻", 3)%フフ_H_%CNAME("二人称")%の%ADANA("阴茎")%気持ちいい……_H_」"
				CALL PRINT_STRW, @"「亀頭の辺りは光滑无毛してて、その下のほうはコリコリってしてて……_H_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%だって同じモノを持ってる筈なのに……_H_」"
			CASE 6
				CALL PRINT_STRW, @"「……フフ_H_気持ちいいですか_H_」"
				CALL PRINT_STRW, @"「この辺りをこうやって轻轻地擦られるともどかしくてたまらないですよね_H_%CNAME("一人称")%も同じだからわかります_H_」"
				CALL PRINT_STRW, @"「フフフ_H_もっともっとしてあげましょうか_H_」"
			CASE 7
				CALL PRINT_STRW, @"「ほら%CNAME("二人称")%、見てください_H_お口と%ADANA("阴茎")%との間で糸が出来ちゃってます_H_」"
				CALL PRINT_STRW, @"「まだ始まったばかりなのにこんなにベトベトにしちゃって……そんなに楽しみだったんですね_H_」"
			CASE 8
				CALL PRINT_STRW, @"「%CNAME("二人称")%の%ADANA("阴茎")%、しょっぱくて、触るとトロって汁が出て、なんだかふわふわする……_H_」"
			CASE 9
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "接吻", 5)%……このまま奥まで咥えたくなっちゃいそうです_H_」"
			ENDSELECT
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「哈唔っ……_H_吸溜……_H_%CNAME("二人称")%的%ADANA("阴茎")%……_H_啊哈っ……_H_好厉害的%TEXTS("气味")%_H_……嘶ー……啾啵……_H_」"
			SIF TALENT:恋慕 == 0 || MARK:屈服刻印 <= 2
				PRINTFORMW 「……哈っ！　%CNAME("一人称", "どもり")%这是怎么了……」
		ENDIF
	;みんな大好き清洁口交
	ELSEIF CHECK_COM("清洁口交")
		;恥垢もお掃除
		IF CHECK_COM("恥垢清洁口交")
			IF YOKUBO() && RAND:3 == 0
				SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%啾……_H_」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%_H_明明是重要的%ADANA("阴茎")%却就这样脏脏的放着不管不是不行的吗_H_」"
					CALL PRINT_STRW, @"「为了其他人着想，所以%CNAME("一人称")%要负起责任好好打扫呢_H_」"
				CASE 1
					CALL PRINT_STRW, @"「フフ_H_大事な%ADANA("阴茎")%なのに、すっかり汚くしちゃって……」"
					CALL PRINT_STRW, @"「こんなに汚くしちゃってたら、ヘンな道に目覚めた人类ばかり吸い寄せちゃうじゃないですか……_H_」"
					CALL PRINT_STRW, @"「……フフ_H_そんなの見過ごしていられません」"
					CALL PRINT_STRW, @"「この%CNAME("一人称")%が、しっかりと%CNAME("二人称")%のだらしない%ADANA("阴茎")%をシャキっとさせてあげます_H_」"
				CASE 2
					PRINTFORMW 「うわぁ……恥垢で真っ白……」
					PRINTFORMW 「こんな%ADANA("阴茎")%、到底他の人には見せられませんね」
					CALL PRINT_STRW, @"「……フフ_H_まったく、仕方ないですね_H_」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%がしっかり、精心キレイにしてさしあげます_H_」"
				ENDSELECT
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:2
					PRINTFORMW 「哈啊……太脏的话可不好哦」
					PRINTFORMW 「虽说%CNAME("一人称")%会打扫得很干净、不过可不要太依赖我哦？」
				ELSE
					PRINTFORMW 「……まったくもう、こんなに汚くしちゃダメじゃないですか」
					PRINTFORMW 「別に誰にも見せないというならともかく、こうやって人前に出しているのならなおさらですよ」
					PRINTFORMW 「……もう、仕方ないなぁ」
					PRINTFORMW 「お口で就这様キレイにします。……だからってこれからもサボったりしないでくださいね？」
				ENDIF
			ELSEIF PALAM:欲情 >= PALAMLV:5
				IF RAND:2
					CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%啾噜_H_」"
				ELSE
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%の%ADANA("阴茎")%……ひどい%TEXTS("气味")%なのに躁动难忍してしょうがない……_H_」"
				ENDIF
			ELSE
				PRINTFORMW 「……我、我明白了」
				PRINTFORMW 「……%MIX_AEGI(RAND:3+3, TARGET, "不要")%」
			ENDIF
		;恋慕
		ELSEIF (TALENT:恋慕 || YOKUBO()) && RANDIF(1, ABL:奉仕精神 >= 3)
			;中だしされたとき
			IF PREVEX("Ａ中出し")
				SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「%CNAME("二人称")%的%ADANA("阴茎")%、在%CNAME("一人称")%的%ADANA("肛門")%里明明射了那么多却还如此精力充沛呢_H_」"
					CALL PRINT_STRW, @"「这样被挿下去的话虽然会非常舒服……好不容易做一趟、%CNAME("一人称")%就把里里外外都清理干净了呢_H_」"
				CASE 1
					CALL PRINT_STRW, @"「……直到刚才为止这个东西都插在%CNAME("一人称")%的%ADANA("肛門")%的里面呢_H_」"
					CALL PRINT_STRW, @"「这样的话这一次就请插进上面的嘴吧_H_让%CNAME("一人称")%的嘴变成仅仅是说着话就会去了的淫乱的小穴_H_」"
				CASE 2
					CALL PRINT_STRW, @"「うわぁ……%ADANA("精液")%でベットベトだぁ……_H_」"
					CALL PRINT_STRW, @"「フフ_H_これから精心精心、元のキレイな%ADANA("阴茎", PLAYER)%に戻してあげますからね_H_」"
				ENDSELECT
			ELSEIF RAND:3 == 0
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3+RAND:2)%」"
				CALL PRINT_STRW, @"「……アハッ_H_%CNAME("二人称")%の%ADANA("阴茎", PLAYER)%、熱くて硬いですね……_H_」"
			ELSEIF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物")%%CNAME("二人称")%的%ADANA("阴茎")%、好好吃……_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%……请看_H_%CNAME("二人称")%的%ADANA("阴茎")%、变得这样颤个不停了哟_H_」"
				IF TALENT:PLAYER:扶她
					CALL PRINT_STRW, @"「从%ADANA("ヴァギナ", TARGET, PLAYER)%里也流出了非常多H的汁液呢……_H_」"
				ELSE
					CALL PRINT_STRW, "「呼呼……看起来非常舒服的样子呢_H_」"
				ENDIF
				IF ABL:Ａ感覚 >= 5 && RAND:3
					CALL PRINT_STRW, @"「……虽然就这样射出来也可以、不过可以的话能在%CNAME("一人称")%的%ADANA("肛門")%里面灌满精子吗_H_」"
				ELSEIF TALENT:PLAYER:扶她 && ABL:PLAYER:Ｖ感覚 >= 5 && RAND:3
					CALL PRINT_STRW, @"「……%ADANA("ヴァギナ")%里也要就这样被挿入的话、就会更加更加舒服了吗_H_」"
				ELSE
					CALL PRINT_STRW, @"「……要变得更舒服、要在%CNAME("一人称")%的嘴里射出多多的%ADANA("精液", TARGET, PLAYER)%来哦_H_」"
				ENDIF
			ENDIF
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3 && RAND:2
			IF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
			ELSE
				CALL PRINT_STRW, @"「アハッ_H_口いっぱいに%CNAME("二人称")%の%ADANA("精液")%の%TEXTS("气味")%が広がっちゃってるぅ……_H_」"
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%热心地侍奉着%CALLNAME:PLAYER%的肉棒……
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "不要")%」"
			PRINTFORMW 「……%CNAME("二人称")%、如何呢？」
			PRINTFORMW %CALLNAME:TARGET%\@YOKUBO() || ABL:欲望 >= 5 ? 像是把美味佳肴狼吞虎咽吃进去一般 # 提心吊胆地\@舔舐着%CALLNAME:PLAYER%的肉棒……
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		IF CFLAG:Ｓっ気フラグ
			CALL PRINT_STRW, @"「……呼呼_H_仅仅是舔了%ADANA("阴茎")%的这个地方，就会变得这样舒服什么的真是变态呢_H_」"
			IF RAND:2
				CALL PRINT_STRW, @"「如何呢？　被推倒后%ADANA("阴茎")%被这样做舒服的事情的感想如何？_H_」"
			ELSE
				CALL PRINT_STRW, @"「看、%CNAME("二人称")%的%ADANA("阴茎")%、已经变得这——么硬邦邦了哦_H_」"
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕 || YOKUBO()
			SELECTCASE RAND:10
			CASE 0
				CALL PRINT_STRW, @"「%CNAME("二人称")%_H_如何呢？舒服吗_H_」"
			CASE 1
				CALL PRINT_STRW, @"「……呼呼_H_真是硬得不得了呢……_H_」"
			CASE 2
				CALL PRINT_STRW, @"「フフ……_H_%CNAME("二人称")%の%ADANA("阴茎")%、ヘンな味がして……興奮しちゃう……_H_」"
			CASE 3
				CALL PRINT_STRW, @"「アハ……_H_先走りがどんどん出てきて……%AEGI(TARGET, "要", "Ｍ異物", 2)%」"
			CASE 4
				CALL PRINT_STRW, @"「口の中いっぱいに%CNAME("二人称")%の%TEXTS("气味")%が広がって……_H_」"
			CASE 5
				CALL PRINT_STRW, @"「あ_H_すごい……_H_%TEXTS("气味")%だけでイっちゃいそう……_H_」"
			CASE 6
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%」"
				CALL PRINT_STRW, @"「……フフ_H_%CNAME("二人称")%の%ADANA("阴茎")%舐めるのクセになっちゃいそう……_H_」"
			CASE 7
				CALL PRINT_STRW, @"「フフ_H_弾力があって、ふにふにしてて、暖かくて……_H_」"
				CALL PRINT_STRW, @"「……あれ、喋られて興奮したんですか？　……なら、%CNAME("二人称")%の%ADANA("阴茎")%をマイクみたいにして、もっともーっと喋っちゃいましょうか_H_」"
			CASE 8
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%」"
				CALL PRINT_STRW, @"「あ……%ADANA("阴茎")%舐めてる時の音が頭に響いて……_H_」"
			CASE 9
				CALL PRINT_STRW, @"「あは……こんなの夢中になっちゃうに決まってるじゃん……_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 5+RAND:3)%」"
			ENDSELECT
		ELSE
			CALL PRINT_STRW, @"「あ……こ、こんなのイヤに、イヤに決まってるじゃないですか……_H_」"
		ENDIF
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		IF TEQUIP:PLAYER:手下留情
			SELECTCASE RAND:5
			CASE 0
				CALL PRINT_STRW, @"「呼呼_H_想去了吗？ %CNAME("二人称")%_H_」"
				CALL PRINT_STRW, @"「但是还不行哦_H_因为现在的%CNAME("二人称")%只是%CNAME("一人称")%的人形震动棒嘛_H_」"
				PRINTFORMW 「如果震动棒会\@ RAND:2 ? 射精什么的 # 喷出%ADANA("精液")%什么的\@话、那样的话肯定就会坏掉了吧？」
				CALL PRINT_STRW, @"「所以说%CNAME("二人称")%、为了让%CNAME("一人称")%更加舒服地一颤_H_一颤_H_地坏掉，就请让%ADANA("阴茎")%噗噜噗噜地在里面出来吧_H_」"
			CASE 1
				CALL PRINT_STRW, @"「もう、良いって言ってないのに勝手に%ADANA("阴茎")%大きくしちゃって……_H_」"
				CALL PRINT_STRW, @"「そんなに射精したいんですか？　フフ_H_ダメです_H_」"
				CALL PRINT_STRW, @"「腰は動かしてもいいですから、ここから射精したい、射精したいってヘコヘコしておいてくださいね_H_」"
			CASE 2
				CALL PRINT_STRW, @"「アハッ_H_汁がどんどん出て来る……_H_」"
				CALL PRINT_STRW, @"「もう、それなら大丈夫ですけど、%ADANA("精液")%は絶対にダメですからね_H_」"
			CASE 3
				CALL PRINT_STRW, @"「フフッ_H_もう胖次胖次じゃないですか……_H_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%にこんなにされたちゃって……まったく、後輩にここまでされて恥ずかしくないんですか_H_」"
			CASE 4
				CALL PRINT_STRW, @"「フフ_H_咥えながら喋るとものすごくビクンッ_H_って跳ねてる……_H_」"
				CALL PRINT_STRW, @"「そんなに気持ちいいなら、もっとしゃべってあげましょうか_H_」"
			ENDSELECT
		ELSEIF YOKUBO() && RAND:2
			SELECTCASE RAND:10
			CASE 0
				CALL PRINT_STRW, @"「%CNAME("二人称")%の%TEXTS("气味")%……クラクラする……_H_」"
			CASE 1
				CALL PRINT_STRW, @"「うわぁ……すごいビクビクってしてる……_H_」"
			CASE 2
				CALL PRINT_STRW, @"「とってもヘンな味……でも興奮しちゃう……_H_」"
			CASE 3
				CALL PRINT_STRW, @"「しょっぱくて、ネトネトしてて……%AEGI(TARGET, "要", "Ｍ異物", 2)%」"
			CASE 4
				CALL PRINT_STRW, @"「%CNAME("二人称")%の%ADANA("阴茎")%舐めていると、頭がクラクラしちゃう……_H_」"
			CASE 5
				CALL PRINT_STRW, @"「なんだかお腹がキュンキュンしちゃう……_H_」"
			CASE 6
				PRINTFORM 「%CNAME("二人称")%の%ADANA("阴茎")%、
				SELECTCASE CONDS("阴茎尺寸", PLAYER)
				CASE "短小"
					CALL PRINT_STR, @"口を少し開けるだけで全部味わえちゃう……_H_」_W_"
				CASE "普通"
					CALL PRINT_STR, @"また大きくなってる……_H_」_W_"
				CASE "巨根"
					CALL PRINT_STR, @"大きすぎて、口を大きく開けないと入りきりません……_H_」_W_"
				CASE "馬根"
					CALL PRINT_STR, @"うまく入らなくて、ベトベトになってる……_H_」_W_"
				CASEELSE
					CALL PRINT_STR, @"大きすぎて口に入りきりません……_H_」_W_"
				ENDSELECT
			CASE 7
				CALL PRINT_STRW, @"「口の中で%CNAME("二人称")%の熱さを感じちゃってる……_H_」"
				CALL PRINT_STRW, @"「ものすごく熱くて、くすぐったくて……%ADANA("阴茎")%と口が混ざってひとつになっちゃいそう……_H_」"
			CASE 8
				CALL PRINT_STRW, @"「フフ_H_%ADANA("阴茎")%の口の辺りがヒクヒクってしてます_H_」"
				CALL PRINT_STRW, @"「とても気持ちよさそうで……それじゃあ、舌でもっと気持ちよくしてあげますね_H_」"
			CASE 9
				CALL PRINT_STRW, @"「フフ……_H_ヘンな味なのに、また舐めたくなってる……_H_」"
				CALL PRINT_STRW, @"「……もう、すっかり中毒になっちゃったじゃないですか_H_」"
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;乳交
;-------------------------------------------------
IF SELECTCOM == 92
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「……是、是这么做吗……？」
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF CFLAG:Ｓっ気フラグ && RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊哈ッ_H_被男孩子的胸部这么摩擦还会变得这么舒服的样子……_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%真是个无可救药的变态呢_H_」"
				CALL PRINT_STRW, @"「……没问题哦。因为啊，%CNAME("一人称")%最喜欢这样的、又凄惨、又羞耻、又难过的%CNAME("二人称")%了_H_」"
			ELSE
				IF RAND:2
					IF COND("乳环フラグ") && RAND:2
						CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%的%ADANA("阴茎")%近旁，环扣在叮叮当当地作响呢……_H_」"
						CALL PRINT_STRW, @"「这么一颤一颤的……难道说是很舒服吗_H_」"
					ELSE
						CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%、看起来非常舒服的样子呢……_H_」"
						CALL PRINT_STRW, @"「为了让你变得更加舒服，%CNAME("一人称")%会更加努力地把胸这样擦来擦去的哦……_H_」"
					ENDIF
				ELSE
					CALL PRINT_STRW, @"「啊哈ッ_H_%CNAME("二人称")%的%ADANA("阴茎")%、一跳一跳的呢_H_」"
					CALL PRINT_STRW, @"「即使是用%CNAME("一人称")%的男孩子胸部也能变得这么舒服呢……真開心呢_H_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「……うわ、%CNAME("二人称")%の%ADANA("阴茎")%、熱い……」
			CALL PRINT_STRW, @"「……もしかして、気持ち良くなってくれてるんですか……_H_」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF RAND:2
				CALL PRINT_STRW, @"「……嗯、%CNAME("二人称")%、看起来很舒服呢……_H_」"
				CALL PRINT_STRW, @"「虽然我自己是觉得这和女孩子的胸部不一样，有些硬邦邦的……不过%CNAME("二人称")%还真是稍微有点Ｍ的感觉呢_H_」"
			ELSE
				CALL PRINT_STRW, @"「……呼呼ッ_H_%CNAME("二人称")%的%ADANA("阴茎")%的颤动、透过%ADANA("胸")%传达过来了……_H_」"
				CALL PRINT_STRW, @"「慢慢地%CNAME("二人称")%的忍耐汁就会把这边弄得黏糊糊的……%AEGI(TARGET, "要", "通常")%%ADANA("阴茎", TARGET, PLAYER)%被乳頭擦着就会变成这样呢……_H_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;素股
;-------------------------------------------------
IF SELECTCOM == 93
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称")%的\@SIZE("基本阴茎尺寸", PLAYER) >= 3 ? 巨大 # 坚硬的\@%ADANA("阴茎")%在摩擦着_H_」"
			IF ABL:Ａ感覚 >= 3
				CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%就这样插进来_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%在%ADANA("肛門")%里咕啾咕啾地做着_H_」"
			ENDIF
		ELSE
			PRINTFORMW 「想在%CNAME("一人称", "どもり")%的体内套弄一下%CNAME("二人称")%的……那个、欧金金吗……？」
			IF TALENT:恋慕
				PRINTFORMW 「……嘛、嘛啊、因为不是别人而是%CNAME("二人称")%拜托的事所以才……」
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			ELSE
				PRINTFORMW 「……%CNAME("二人称")%真是变态」
			ENDIF
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("展示肉棒")
		IF YOKUBO()
			IF RAND:2
				CALL PRINT_STRW, @"「フフッ_H_大きい%ADANA("阴茎")%ですねぇ……_H_」"
				CALL PRINT_STRW, @"「これから%CNAME("一人称")%、この立派は%ADANA("阴茎", TARGET, PLAYER)%にメスにされちゃうんだ……_H_」"
			ELSE
				CALL PRINT_STRW, @"「啊哈啊……_H_%CNAME("二人称")%的%ADANA("阴茎")%、很厉害呢……_H_」"
				IF TALENT:恋慕 && RAND:3 == 0
					CALL PRINT_STRW, @"「之后要不断努力一起变！得舒服哦、%CNAME("二人称")%_H_」"
				ELSEIF (ABL:Ａ感覚 >= 3 || ABL:精液中毒 >= 3) && RAND:2
					CALL PRINT_STRW, @"「被这样气派的%ADANA("阴茎")%在%ADANA("肛門")%里滋啵滋啵地进出着的话、%CNAME("一人称")%要变奇怪了……_H_」"
				ELSE
					CALL PRINT_STRW, @"「被这样气派的%ADANA("阴茎")%欺负的话、%CNAME("一人称")%、马上就要堕落成女孩子了……_H_」"
				ENDIF
			ENDIF
			;淫乱+完美契合で欲求不満な時、一定確率で強制絶頂
			IF TALENT:淫乱 && (CHECK("Ａ完美契合") || CHECK("尿道完美契合")) && YOKUBO() >= 2 && RAND:10 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%一见到%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%，我就……_HH_」"
				BASE:絶頂 += MAXBASE:快感許容値男性 * 3
				PRINTFORMW %CALLNAME:TARGET%剧烈地震颤着，身体大幅度地反弓弹起，带着恍惚的表情，从肉棒中不受控制地流出了精液
				PRINTFORMW 看上去仅仅是想象着从%CALLNAME:PLAYER%处被给予的快感就絶頂了……
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……再、再仔细看一眼果然还是很惊人的大小呢……」
			CALL PRINT_STRW, @"「……那、那个。因为%CNAME("一人称")%很努力地做着让%CNAME("二人称")%舒服的事情、所以也请%CNAME("二人称")%更多地让%CNAME("一人称")%舒服起来吧……_H_」"
		;それ以外
		ELSE
			PRINTFORMW 「诶！？　%CNAME("二人称", "どもり")%突然之间做什么……！？」
			CALL PRINT_STRW, @"「不、不要这样看着我……%CNAME("二人称")%…………_H_」"
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%的%ADANA("阴茎")%变得相当有精神了呢っ_H_」"
			CALL PRINT_STRW, @"「就那么喜欢被%CNAME("一人称")%推倒吗_H_%MIX_AEGI(2, TARGET, "要")%」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ELSEIF TEQUIP:PLAYER:手下留情
		CALL PRINT_STRW, @"「呼呼ッ_H_想要射精了吗、%CNAME("二人称")%」"
		CALL PRINT_STRW, @"「就算藏起来也是没有用的哦_H_因为%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%、看起来很舒服地一抖_H_一抖_H_地立着呢_H_」"
		CALL PRINT_STRW, @"「……那样的话、就要更多更多地继续欺负%CNAME("二人称")%的%ADANA("阴茎")%了哦_H_」"
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%_H_」"
				CALL PRINT_STRW, @"「%ADANA("阴茎")%只是被大腿磨蹭着就像这样变得硬邦邦了什么的_H_完全像是童贞处男呢_H_」"
				SIF TALENT:PLAYER:童貞
					CALL PRINT_STRW, "「啊、居然真的是童贞啊_H_对不起_H_」"
			ELSE
				SELECTCASE RAND:10
				CASE 0
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%的%ADANA("阴茎")%黏糊糊的_H_」"
				CASE 1
					CALL PRINT_STRW, @"「あ……%CNAME("二人称")%の%ADANA("阴茎")%、暖かくて……_H_」"
					CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
				CASE 2
					CALL PRINT_STRW, @"「フフ_H_%CNAME("二人称")%の%ADANA("阴茎")%が逞しくって……_H_」"
					CALL PRINT_STRW, @"「……あっ_H_太ももなのに感じちゃうっ_H_」"
				CASE 3
					IF SIZE("阴茎") == 0 && SIZE("阴茎", PLAYER) >= 3
						CALL PRINT_STRW, @"「あは……_H_見て下さい……%CNAME("二人称")%の%ADANA("阴茎")%、%CNAME("一人称")%のより二倍以上もある……」"
						CALL PRINT_STRW, @"「……ねえ%CNAME("二人称")%、雄としての格差を見せつけて、これから%CNAME("一人称")%をどうするつもりなんですか……_H_」"
					ELSE
						CALL PRINT_STRW, @"「あは……_H_%CNAME("二人称")%の%ADANA("阴茎")%、お肚臍より上まである……_H_」"
						CALL PRINT_STRW, @"「こんなので容赦なく犯されちゃったら、一体どうなっちゃうんだろう……_H_」"
					ENDIF
				CASE 4
					CALL PRINT_STRW, @"「フフ_H_容赦なく先走り出しちゃって……」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%の太もも、すっかりヌルヌルになっちゃったじゃないですか_H_」"
				CASE 5
					CALL PRINT_STRW, @"「あはっ、すごい……_H_」"
					CALL PRINT_STRW, @"「挿れても挿れられてもいないのに犯されてる気になっちゃう……_H_」"
				CASE 6
					CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
					CALL PRINT_STRW, @"「全身っ_H_%CNAME("二人称")%を悦ばせるための大人のおもちゃになっちゃってるっ_H_」"
				CASE 7
					CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
					CALL PRINT_STRW, @"「お尻の奥がっ_H_キュンキュンってなってるっ_H_」"
				CASE 8
					CALL PRINT_STRW, @"「……あは_H_これから歩くだけでも気持ちよくなっちゃいそう……%AEGI(TARGET, "要", "通常")%」"
				CASE 9
					CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
					CALL PRINT_STRW, @"「あっ_H_そこっ_H_弱いとこっ_H_」"
				ENDSELECT
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		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 TEQUIP:PLAYER:手下留情
			CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%、明明被后辈给推倒了踩在脚下了，为什么会一副这么開心的样子啊_H_」"
			CALL PRINT_STRW, @"「只不过%ADANA("阴茎")%都变得这么大了……不好好说出来的话、%CNAME("一人称")%就不知道该怎么做才好了_H_」"
			PRINTFORMW 「……呐，所以说，%CNAME("二人称")%、告诉我吧」
			CALL PRINT_STRW, @"「是想要现在就停手，还是说即使如此也想保持被踩着的现状……_H_」"
		;恋慕
		ELSEIF MARK:屈服刻印 >= 2 || TALENT:恋慕
			IF CFLAG:Ｓっ気フラグ && RAND:2
				CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%的%ADANA("阴茎")%、明明是被脚踩着，却勃起了呢_H_」"
				CALL PRINT_STRW, @"「痛楚与快乐之间的区别都分不清楚了吗？　呼呼ッ_H_真是个变态呢_H_」"
			ELSEIF ABL:施虐属性 >= 5
				CALL PRINT_STRW, @"「啊哈っ_H_%CNAME("二人称")%的话好像很舒服呢_H_」"
				CALL PRINT_STRW, @"「就这么喜欢被%CNAME("一人称")%的脚在肉棒上使劲玩弄吗_H_」"
				SIF ABL:受虐属性 >= 5
					CALL PRINT_STRW, "「我明白了_H_被这样做的话全身就会颤抖个不停呢_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%射出%ADANA("精液")%的地方都能被好好看到，所以请不要忍耐，一口气射出来哦_H_」"
			ELSE
				PRINTFORMW 「えっと……こんな感じですかね？」
				PRINTFORMW 「……もう、%CNAME("二人称")%なんでこんなにヌルヌルさせているんですか」
				CALL PRINT_STRW, @"「%CNAME("一人称")%までちょっと乗り気になっちゃうじゃないですか……_H_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF CFLAG:Ｓっ気フラグ
			CALL PRINT_STRW, @"「呼呼ッ_H_就那么想被脚踩着%ADANA("阴茎")%吗_H_%CNAME("二人称")%_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%居然如此抖M什么的，还真是吓了一跳呢_H_」"
			CALL PRINT_STRW, @"「……就给这样的%CNAME("二人称")%用合适的踩法来做吧_H_」"
		;屈服刻印3以上か恋慕かつ施虐属性lv5以上
		ELSEIF YOKUBO() || (TALENT:恋慕 && ABL:施虐属性 >= 5)
			CALL PRINT_STRW, @"「甚至要请求我做这种事情、%CNAME("二人称")%就那么想被踩着%ADANA("阴茎")%吗_H_」"
			CALL PRINT_STRW, @"「呼呼_H_这样的话相对地也要让我舒服起来哦_H_」"
		;それ以外
		ELSE
			PRINTFORMW 「那个……这个、不痛吗……？」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門奉仕
;-------------------------------------------------
IF SELECTCOM == 96
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			IF ABL:Ａ感覚 >= 5
				CALL PRINT_STRW, @"「%CNAME("二人称")%也对%ADANA("肛門")%被欺负開始感兴趣了呢_H_」"
				CALL PRINT_STRW, @"「没问题哦……毕竟哪里要怎么做才会变得舒服、%CNAME("一人称")%全都知道哦……_H_」"
			ELSE
				PRINTFORMW 「……%CNAME("二人称")%对%ADANA("肛門")%感兴趣呢。真是意外呢」
				CALL PRINT_STRW, @"「……不、没什么。为了让%CNAME("二人称")%变成%ADANA("肛門")%不被欺负就饥渴难耐的体质、%CNAME("一人称")%会加油的_H_」"
			ENDIF
		ELSE
			PRINTFORMW 「诶……？　舔菊花吗……！？」
			PRINTFORMW 「……嘛、也行就是了……我不太擅长这个，请不要生气哦？」
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%……_H_」"
			CALL PRINT_STRW, @"「……呼呼呼ッ_H_%CNAME("二人称")%的话会兴奋地颤抖吧_H_」"
			SIF ABL:技巧 >= 3
				CALL PRINT_STRW, @"「我会让你獲得更多更多如排山倒海的快乐的、请做好觉悟哦_H_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物")%……呼呼_H_要把%CNAME("二人称")%的%ADANA("肛門")%、打扫得更加漂亮呢_H_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "不要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;内褲冲
;-------------------------------------------------
IF SELECTCOM == 97
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「え、パ、胖次で……！？」
		PRINTFORMW 「いえ、その、急に言われてビッ阴蒂してしまって……」
		IF YOKUBO()
			PRINTFORMW 「……なるほど、確かに考えてみると中々良さそうですね」
			CALL PRINT_STRW, @"「……フフ_H_それじゃあ%CNAME("二人称")%、はやく%ADANA("阴茎", TARGET, PLAYER)%を出してください_H_」"
			CALL PRINT_STRW, @"「フフフ_H_%CNAME("二人称")%の%ADANA("精液", TARGET)%で胖次汚されちゃったら、どんな気持ちになるんだろう……_H_」"
		ELSE
			PRINTFORMW 「……その、どうしても、ですか？」
			PRINTFORMW 「……わ、我明白了、それじゃあ、その、失礼します……」
			CALL PRINT_STRW, @"「……うう、そんなに見ないでください……_H_」"
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「呼呼_H_被%CNAME("一人称")%的胖次那样摩擦着舒服吗_H_」"
			CALL PRINT_STRW, @"「……看、%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%、都变得这么大了……_H_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「呜哇啊……用%CNAME("一人称")%的胖次、变、变得这么大……_H_」"
			PRINTFORMW 「不、不是、什么也没有……」
			PRINTFORMW 「只是、那个、知道了%CNAME("二人称")%是这样的感觉以后很開心……不、稍微有点被惊吓到……」
			CALL PRINT_STRW, @"「……那个、再稍微做一些吧……_H_」"
		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:推倒
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%CNAME("二人称")%_H_看起来很舒服的样子呢_H_」"
			IF PALAM:PLAYER:欲情 >= PALAMLV:3
				CALL PRINT_STRW, @"「%CNAME("二人称")%的%TEXTR(@"\@ TALENT:PLAYER:扶她 ? %ADANA("阴茎")% # %ADANA("阴蒂")%\@/这里")% 、%TEXTR("看上去很舒服地/色情地/不知廉耻地")%勃起起来了哟_H_」"
			ELSE
				CALL PRINT_STRW, "「我会让你舒服到要变得更加奇怪的、请做好觉悟吧_H_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF PREVCOM == 4 || PREVCOM == 10
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3+RAND:3)%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%做了这么坏心眼的事情_H_这就是回礼っ_H_」"
			CALL PRINT_STRW, @"「呼呼ッ_H_舒服吗？　%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		;恋慕
		ELSEIF TALENT:恋慕 || YOKUBO()
			IF RAND:2
				PRINTFORMW 「%AEGI(TARGET, "不要", "Ｍ異物")%……%CNAME("二人称")%、舒服吗？」
				CALL PRINT_STRW, @"「呼呼ッ、看起来很舒服的样子呢……好高兴_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%%CNAME("二人称")%很舒服的样子呢……_H_」"
				CALL PRINT_STRW, @"「%ADANA("ヴァギナ")%里湿漉漉的……好開心_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;六九式
;-------------------------------------------------
IF SELECTCOM == 99
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「呼呼_H_想要一起舔啊_H_」"
			CALL PRINT_STRW, @"「好的哦_H_我会加油对%CNAME("二人称")%的\@PENIS(PLAYER) ? %ADANA("阴茎")% # %ADANA("ヴァギナ")%\@%TEXTR("欺负/舔/吸")%一番的、%CNAME("二人称")%也要一直舔着%CNAME("一人称")%的%ADANA("阴茎")%哦_H_」"
			CALL PRINT_STRW, @"「……啊、但是不要做过頭哦？　因为还想让%CNAME("二人称")%变得更舒服嘛_H_」"
		ELSE
			PRINTFORMW 「……诶？　想要我来舔\@PENIS(PLAYER) ? %ADANA("阴茎")% # %ADANA("ヴァギナ")%\@吗……？」
			PRINTFORMW 「虽、虽然也不是说不行……诶？　是想互相舔吗？」
			CALL PRINT_STRW, @"「……我、我知道了。但是、做得太过火了可不行呢…………_H_」"
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF RAND:2
				CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%、正拼上性命一般地吸吮着%CNAME("一人称")%的%ADANA("阴茎")%呢……_H_」"
				CALL PRINT_STRW, @"「那样的话%CNAME("一人称")%也要好好地舔一舔%CNAME("二人称")%的\@PENIS(PLAYER) ? %ADANA("阴茎")% # %ADANA("ヴァギナ")%\@呢_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:2, TARGET, "要")%%AEGI(TARGET, "要", "Ｍ異物")%%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%っ_H_再来っ_H_再激烈些っ_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 5)%」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3 , TARGET, "要")%%CNAME("二人称")%っ_H_」"
			CALL PRINT_STRW, @"「对不起_H_我还要_H_还要舔更多_H_」"
			CALL PRINT_STRW, @"「一直舔着%CNAME("一人称")%的%ADANA("阴茎")%到化掉吧っ_H_%MIX_AEGI(3, TARGET, "要")%」"
		ENDIF
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && RAND:3 == 0
			IF RAND:2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%……%CNAME("二人称")%、非常\@ABL:PLAYER:技巧 >= 3 ? 擅长 # 热情\@呢_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3+RAND:3)%……_H_呼呼ッ_H_这是回礼哦_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%……呼呼ッ_H_%CNAME("二人称")%的\@VAGINA(PLAYER) ? %ADANA("ヴァギナ", TARGET, PLAYER)%、已经咕啾咕啾地淌着水 # %ADANA("阴茎")%、完全变得硬邦邦了\@不是吗_H_」"
			ENDIF
		ELSEIF YOKUBO() && TALENT:PLAYER:伪娘 && RAND:2
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%……」"
			CALL PRINT_STRW, @"「……呼呼ッ_H_像女孩子一样娇喘着呢……%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要这样玩弄啦っ_H_%MIX_AEGI(3, TARGET, "要")%」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3+RAND:3)%%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「%TEXTR(@"%ADANA("阴茎")%好舒服っ/被这么舔着的话根本忍耐不住っ/すごいっ/不要这样吸着%ADANA("阴茎")%啦っ")%_H_」"
		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 「……%CNAME("二人称")%、看、看上去非常舒服的样子啊……」
		PRINTFORMW 「那个、之后接着来可以吗……」
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF CFLAG:Ｓっ気フラグ && RAND:2
				CALL PRINT_STRW, @"「听吧，%CNAME("二人称")%、能听到吗_H_」"
				CALL PRINT_STRW, @"「咕啾……咕啾……的、是%CNAME("二人称")%的%ADANA("阴茎", TARGET, PLAYER)%和飞机杯摩擦的声音哦_H_」"
				CALL PRINT_STRW, @"「呼呼_H_看起来很舒服地轻轻颤抖着呢、%CNAME("二人称")%一副羞耻的姿态呢_H_」"
			ELSE
				CALL PRINT_STRW, @"「啊哈……_H_感觉到了%CNAME("二人称")%的%ADANA("阴茎")%、在飞机杯里摩擦的颤抖……_H_」"
				IF FIRSTCOM(37)
					CALL PRINT_STRW, "「呼呼っ_H_很舒服呢、飞机杯_H_」"
					CALL PRINT_STRW, "「里面泥泞不堪、只要像这样用力的话……啊哈_H_又颤抖起来了呢_H_」"
				ELSE
					CALL PRINT_STRW, "「呜哇啊……看起来非常舒服的样子呢……_H_」"
					CALL PRINT_STRW, @"「……这一次、能允许%CNAME("一人称")%也来做一次吗、飞机杯_H_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%CNAME("二人称")%、好像很舒服的样子呢……_H_」"
			CALL PRINT_STRW, @"「看、%CNAME("二人称")%的%ADANA("阴茎")%、仿佛感到欢欣地颤抖着哦_H_」"
			CALL PRINT_STRW, @"「呼呼呼、为了让%CNAME("二人称")%能收獲更多的快乐、会继续用这个飞机杯给你做上无数回的哦_H_」"
		;それ以外
		ELSE
			PRINTFORMW 「……就这么舒服吗？　那个……用这个……」
			CALL PRINT_STRW, @"「……因为%CNAME("一人称")%很诱人？　……这、这种事可不要对其他人说哦……_H_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;逆振動棒
;-------------------------------------------------
IF SELECTCOM == 106
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF (TALENT:恋慕 || YOKUBO()) && ABL:施虐属性 >= 3
			CALL PRINT_STRW, @"「……看、已经把震动棒、全都塞进去了哦_H_」"
			CALL PRINT_STRW, @"「呼呼呼_H_\@ SIZE("振動棒", PLAYER) >= 3 ? 明明是这么大的震动棒却 # 用震动棒 \@变得很舒服呢_H_」"
			CALL PRINT_STRW, @"「%ADANA("ヴァギナ")%也完全兴奋起来了，一张一合地渴求着呢……难得的景致、不来拍一张照片吗？　開玩笑的哦_H_」"
		;それ以外
		ELSE
			PRINTFORMW 「……%CNAME("どもり", "二人称")%、有、有这么舒服吗……？」
			PRINTFORMW 「那个、好像露出了一副非常舒服的表情……」
			CALL PRINT_STRW, @"「不、不是、这种表情很不错、那个、我……是这么想的…………_H_」"
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「唔呼呼_H_%CNAME("二人称")%、露出了一副非常享受的表情呢……_H_」"
			IF CFLAG:Ｓっ気フラグ && RAND:5 == 0
				PRINTFORMW 「とても気持ちよさそうですし、このままにしちゃいましょうか」
				PRINTFORMW 「……だってほら、%CNAME("二人称")%は振動棒でこれだけヨガれるんでしょう？」
				CALL PRINT_STRW, @"「就这様機械に犯され続けていっぱいイっちゃってもいいんですよ_H_」"
			ELSEIF TALENT:PLAYER:扶她 && RAND:4 == 0
				CALL PRINT_STRW, @"「你看、不仅仅是%ADANA("ヴァギナ")%、这里的%ADANA("阴茎")%看起来也很有精神地直打颤呢_H_」"
				CALL PRINT_STRW, @"「……不过、现在的%CNAME("二人称")%已经沉迷于小穴的快乐中了、肉棒什么的已经完全抛在脑后了呢……_H_」"
				CALL PRINT_STRW, @"「因为、明明都没有碰到却一震_H_一震_H_的……这样下去就不是%ADANA("阴茎")%而是大一号的阴核了吧_H_」"
			ELSEIF TALENT:PLAYER:性反転 && RAND:3 == 0
				CALL PRINT_STRW, "「明明原本是男孩子，却完全沉浸在女孩子的快乐中了呢_H_」"
				CALL PRINT_STRW, @"「现在的%CNAME("二人称")%、%ADANA("ヴァギナ")%被震动棒插入的时候就会露出一副忍耐不了的表情呢……_H_」"
			ELSEIF TALENT:童貞 && RAND:2
				PRINTFORMW 「明明被震动棒插入会变得这么舒服、但是%CNAME("二人称")%还没有真刀真枪做过呢」
				CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%心眼真坏_H_」"
			ELSE
				CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%、明白了吗？　现在、你露出了一副完全不能让别人看到的糟糕表情哦_H_」"
				CALL PRINT_STRW, @"「分明是假的%ADANA("阴茎")%%CNAME("二人称")%却能被弄得这么厉害，虽然是被震动棒插入的对象，我却稍微有点嫉妒了呢_H_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;逆Ａ振動棒
;-------------------------------------------------
IF SELECTCOM == 107
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		IF CFLAG:Ｓっ気フラグ
			CALL PRINT_STRW, @"「呼呼_H_是%CNAME("二人称")%久等的肛門震动棒哦_H_」"
			CALL PRINT_STRW, @"「……屁股小穴被震动棒插入会变得这么舒服什么的，%CNAME("二人称")%真是个抖M啊_H_」"
			CALL PRINT_STRW, @"「而且\@PENIS(PLAYER) ? %ADANA("阴茎")%也变得这么大了 # %ADANA("ヴァギナ")%也变得这么泥泞不堪了\@……_H_」"
		;恋慕
		ELSEIF TALENT:恋慕 || YOKUBO()
			PRINTFORMW 「那个……如何呢？ 舒服吗？」
			PRINTFORMW 「这样啊……太好了」
			CALL PRINT_STRW, @"「呼呼_H_会让%ADANA("肛門")%变得更加舒服的哦……_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;Ｖ逆挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 120 && SELECTCOM <= 124 && FIRSTCOMS("Ｖ逆挿入") == 0
	IF SELECTCOM == 122
		;調教者が処女
		IF TALENT:PLAYER:処女
			PRINTFORMW 「做、做什么……！」
		ENDIF
	ELSE
		;調教者が処女
		IF TALENT:PLAYER:処女
			PRINTFORMW 「……诶？　%CNAME("二人称")%\@YOKUBO() ? 是处女 # 的初体验对象是%CNAME("一人称")%\@吗？」
			IF TALENT:童貞
				PRINTFORMW 「……就是说、无论是%CNAME("一人称")%还是%CNAME("二人称")%都没有这种经验……」
				IF ABL:腰靈活 >= 3
					PRINTFORMW 「……大概、也不是做不到的事」
				ELSE
					PRINTFORMW 「……那个、为了让%CNAME("二人称")%舒服起来我会诚心诚意努力的」
				ENDIF
			ELSEIF TALENT:恋慕 || YOKUBO()
				IF ABL:腰靈活 >= 3
					PRINTFORMW 「没问题的、这种事%CNAME("一人称")%很擅长」
					CALL PRINT_STRW, @"「会開发%CNAME("二人称")%到轻轻一碰就会想要去的程度哦_H_」"
				ELSE
					PRINTFORMW 「……虽然还不习惯这种程度的事情、但为了%CNAME("二人称")%我会努力的」
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「……我、我明白了」
				PRINTFORMW 「为了让%CNAME("二人称")%变舒服……那个……我会努力」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;正常位奉仕
;-------------------------------------------------
IF SELECTCOM == 120 || SELECTCOM == 125
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			CALL PRINT_STRW, @"「%MIX_AEGI(2+RAND:2, TARGET, "要")%」"
			CALL PRINT_STR, @"「%AEGI(TARGET, "要", "通常", 3)%"
			IF SELECTCOM == 120
				IF TALENT:PLAYER:Ｖ名器 > 0
					CALL PRINT_STRW, @"%CNAME("二人称")%的%ADANA("ヴァギナ")%……_H_紧紧地贴着好舒服……_H_」"
				ELSEIF TALENT:恋慕 || YOKUBO()
					CALL PRINT_STRW, @"啊哈……_H_进到%CNAME("二人称")%的%ADANA("ヴァギナ")%里了……_H_」"
				ELSE
					CALL PRINT_STRW, @"%CNAME("二人称")%的%ADANA("ヴァギナ")%太舒服了根本把持不住……_H_」"
				ENDIF
			ELSEIF SELECTCOM == 125
				IF TALENT:PLAYER:Ａ名器 > 0
					CALL PRINT_STRW, @"%CNAME("二人称")%的%ADANA("肛門")%好紧好紧……好厉害……_H_」"
				ELSEIF TALENT:恋慕 || YOKUBO()
					CALL PRINT_STRW, @"%CNAME("二人称")%的%ADANA("肛門")%里太舒服了……_H_」"
					IF ABL:施虐属性 >= 1 && ABL:PLAYER:Ａ感覚 >= 5
						CALL PRINT_STRW, @"「%CNAME("二人称")%也露出了一副相当舒服的表情呢……_H_」"
						CALL PRINT_STRW, @"「%CNAME("二人称")%明明有着\@TALENT:PLAYER:男性 ? 漂亮的%ADANA("阴茎")% # %ADANA("ヴァギナ")%\@却喜欢被插进%ADANA("肛門")%玩弄呢……_H_」"
					ENDIF
				ENDIF
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF (TALENT:恋慕 || YOKUBO() || PALAM:欲情 >= PALAMLV:4) && RAND:2
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			IF CFLAG:Ｓっ気フラグ && TALENT:PLAYER:性反転
				CALL PRINT_STRW, @"「啊哈っ_H_%CNAME("二人称")%、露出了这样一副惊人的享受表情呢_H_」"
				PRINTFORM 「%CNAME("二人称")%明明原本是男孩子的、%CNAME("一人称")%
				SELECTCASE CONDS("阴茎尺寸")
				CASE "短小"
					PRINTFORM 「%CNAME("二人称")%原先明明是男人、却因为%CNAME("一人称")%的
				CASE "馬根"
					PRINTFORM %TEXTR("和马一样/極粗")%
				CASE "腕粗", "規格外"
					PRINTFORM 扩张专用
				ENDSELECT
				CALL PRINT_STRW, @"的%ADANA("阴茎")%搞到娇喘什么的っ_H_」"
				CALL PRINT_STRW, @"「呼呼ッ_H_完全变成雌性了呢っ_H_%AEGI(TARGET, "要", "通常")%」"
			ELSE
				CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_%CNAME("二人称")%っ_H_%MIX_AEGI(1, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%的\@SELECTCOM == 125 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@、紧绷绷的好厉害っ_H_」"
				CALL PRINT_STRW, @"「%ADANA("精液")%出来了_H_要出来了_H_要在%CNAME("二人称")%的里面biubiu地出来了_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_好舒服_H_%CNAME("二人称")%っ_H_」"
			CALL PRINT_STRW, @"「这样下去的话_H_%ADANA("精液")%要出来了_H_」"
		ENDIF
	ELSEIF TEQUIP:PLAYER:手下留情 && RAND:3 == 0
		CALL PRINT_STRW, @"「呼呼ッ_H_露出了很舒服的表情呢_H_%CNAME("二人称")%」"
		PRINTFORMW 「……但是、有一件事可别忘了哦？」
		CALL PRINT_STRW, @"「今天是、禁止%CNAME("二人称")%高潮日哦_H_」"
		CALL PRINT_STRW, @"「%CNAME("二人称")%那副因为想去又去不了而变奇怪的表情、让我继续多看看吧_H_」"
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO() || PALAM:欲情 >= PALAMLV:4
			IF (PREVCOM == 120 && SELECTCOM == 125) || (PREVCOM == 125 && SELECTCOM == 120)
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%的っ_H_%ADANA("肛門")%和%ADANA("ヴァギナ")%都好舒服_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%被里面包裹着、要被吸走了_H_」"
			ELSE
				CALL PRINT_STRW, @"「啊っ_H_%CNAME("二人称")%的\@SELECTCOM == 125 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@好厉害っ_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%这样的っ_H_马上就要射精了っ_H_」"
				CALL PRINT_STRW, @"「要在%CNAME("二人称")%的里面把%ADANA("精液")%丢人地biubiu射出来了っ_H_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「这、这样做就行了吗……？」
			CALL PRINT_STRW, @"「%AEGI(TARGET,  "要", "通常")%%CNAME("二人称")%的\@SELECTCOM == 125 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@、好舒服……っ_H_」"
		ENDIF
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;後背位奉仕
;-------------------------------------------------
IF SELECTCOM == 121 || SELECTCOM == 126
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF TALENT:恋慕 || YOKUBO()
				CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊哈っ_H_%CNAME("二人称", "甘え")%、这样做的话不知为何就变得像动物一样了呢_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 2)%……两个人来进行更多激烈的动物交配吧_H_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		CALL PRINT_STRW, @"「%MIX_AEGI(4+RAND:2, TARGET, "要")%」"
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%、看起来很舒服呢……_H_」"
				IF SELECTCOM == 126
					CALL PRINT_STRW, @"「%CNAME("二人称")%的%ADANA("肛門")%、完全变成了一被%ADANA("阴茎")%插进去就会变舒服的羞耻地方呢_H_」"
				ELSE
					CALL PRINT_STRW, @"「看、只要让直到被满足为止都在一张一合的%ADANA("ヴァギナ")%像这样滴滴答答地流出汁来……现在的%CNAME("二人称")%、只能被看成是渴求着%ADANA("阴茎")%把腰扭动不止的H的动物了吧_H_」"
					CALL PRINT_STRW, "「还是说真的就是这样的本性呢……呼呼呼ッ_H_」"
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_%AEGI(TARGET, "要", "通常", 1+RAND:2)%%CNAME("二人称")%的\@SELECTCOM == 126 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@好厉害っ_H_」"
					CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%腰不自觉地就软下来了っ_H_」"
				ELSE
					CALL PRINT_STRW, @"「%MIX_AEGI(4, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%的\@SELECTCOM == 126 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@%TEXTR(@"里面软软的/紧紧地包裹着/缠绕着%ADANA("阴茎")%")%不放っ_H_」"
					CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%腰停不下来っ_H_%CNAME("二人称")%的\@SELECTCOM == 126 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@好舒服っ_H_」"
		ENDIF
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:2, TARGET, "要")%」"
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			IF RAND:2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%好舒服っ_H_和%CNAME("二人称")%像野兽一样交配好舒服_H_」"
			ELSE
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%这样的っ_H_这样的一直动腰发出啪啪的声音_H_」"
				CALL PRINT_STRW, @"「要像动物一样侵犯%CNAME("二人称")%的\@SELECTCOM == 126 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@了哦っ_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「啊_H_%CNAME("二人称")%っ_H_好厉害_H_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;騎乗位侵犯
;-------------------------------------------------
IF SELECTCOM == 122 || SELECTCOM == 127
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_%MIX_AEGI(2, TARGET, "要")%」"
		SELECTCASE RAND:4
		CASE 0
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("一人称")%的%ADANA("阴茎")%被吃进去了っ_H_」"
			CALL PRINT_STRW, @"「被%CNAME("二人称")%的\@ SELECTCOM == 127 ? %ADANA("肛門")% # %ADANA("ヴァギナ", TARGET, PLAYER)%\@吞进去了_H_」"
		CASE 1
			CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称")%的\@ SELECTCOM == 127 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@っ_H_实在是太舒服了_H_」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%不要缠绕得这么紧っ_H_」"
		CASE 2
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%的\@SELECTCOM == 127 ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@っ_H_紧紧地包裹缠绕着%ADANA("阴茎")%_H_%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「腰っ_H_腰要动起来了_H_」"
		CASEELSE
			CALL PRINT_STRW, @"「啊っ_H_%CNAME("二人称")%っ_H_不要这么动腰啦っ_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%的里面紧紧地包裹着っ_H_这样下去的话っ_H_」"
		ENDSELECT
		SIF PALAM:快Ｃ >= PALAMLV:3
			CALL PRINT_STRW, @"「这样下去的话%ADANA("精液")%就要出来了呜呜っ_H_」"
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

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

;-------------------------------------------------
;拘束
;-------------------------------------------------
IF SELECTCOM == 134
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:拘束 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF YOKUBO()
			CALL PRINT_STRW, @"「把%CNAME("一人称")%像这样绑起来、到底打算要做什么……_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

;-------------------------------------------------
;フィスト系指令
;-------------------------------------------------
IF SELECTCOM == 141 || SELECTCOM == 142 || SELECTCOM == 143
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;楽しめる余裕が無い
		IF CHECK("フィスト") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;それ以外
		ELSE
			IF TALENT:恋慕 || YOKUBO()
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%AEGI(TARGET, "要", "通常")%……_H_」"
				CALL PRINT_STRW, @"「……能感觉到%CNAME("二人称")%的手腕伸到了最深处……_H_」"
				PRINTFORMW 「…………因为实在是忍耐不住想被这么做了，请务必就这样把%CNAME("一人称")%的%ADANA("肛門")%搞得乱七八糟哦？」
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「……%AEGI(TARGET, "要", "通常")%手腕插进%ADANA("肛門")%来了……_H_」"
				CALL PRINT_STRW, @"「明明是……这么奇怪的……_H_事、情っ_H_%MIX_AEGI(3+RAND:3, TARGET, "要")%」"
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;楽しめる余裕が無い
		IF CHECK("フィスト") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;恋慕or屈服刻印lv3以上
		ELSEIF (TALENT:恋慕 || YOKUBO()) && RAND:2
			IF PREVEX("Ａ中出し")
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%ADANA("肛門")%里っ_H_进去了手腕っ_H_」"
				CALL PRINT_STRW, @"「沾满了%ADANA("精液")%的゛_H_%AEGI(TARGET, "要", "通常", 2)%%ADANA("肛門")%里?直到手臂伸进来之前都要这样泥泞不堪了呜呜゛_H_」"
			ELSEIF ABL:受虐属性 >= 5
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%手腕一直插进了最深处_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%继续更多对%CNAME("一人称")%的%ADANA("肛門")%%TEXTR("激烈地捣弄吧/咕啾咕啾地做吧/狠狠撞击吧")%ぇ_H_」"
				CALL PRINT_STRW, @"「%CNAME("二人称")%的\@SIZE("阴茎", PLAYER) >= 4 ? %ADANA("阴茎", TARGET, PLAYER)%和 # \@手臂才能插进去的地方坏掉了っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%的手臂っ_H_」"
				CALL PRINT_STRW, @"「在%ADANA("肛門")%的里面%TEXTR("咕啾咕啾/滋啵滋啵/乱七八糟")%地做着_H_%AEGI(TARGET, "要",　"通常")%」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%ADANA("肛門")%里的手腕在っ_H_」"
			CALL PRINT_STRW, @"「明明一般来讲根本进不去っ_H_%MIX_AEGI(2, TARGET, "要")%」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;放尿　聖水PLAY(推倒ている時)
;-------------------------------------------------
IF SELECTCOM == 144
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;聖水PLAY
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;聖水PLAY
	ELSEIF TEQUIP:推倒
		IF CFLAG:Ｓっ気フラグ
			CALL PRINT_STRW, @"「呼呼ッ_H_为了%CNAME("二人称")%要做多多色色的事情来奖励哦_H_」"
			CALL PRINT_STRW, @"「好喔_H_%CNAME("一人称")%的尿尿、来充分沐浴吧_H_」"
			CALL PRINT_STRW, @"「呼呼ッ_H_有什么可讨厌的？ 明明都露出了这么舒服的一副表情……_H_」"
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF YOKUBO()
			CALL PRINT_STRW, "「啊っ_H_漏出来了_H_」"
			CALL PRINT_STRW, @"「要在%CNAME("二人称")%的面前漏出小便来了_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称", "甘え")%_H_因为%CNAME("二人称")%是能把人变成在别人面前漏出小便的变态什么的_H_」"
			CALL PRINT_STRW, @"「要好好负起责任教导%CNAME("一人称")%哦_H_」"
		;それ以外
		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 「之后就会剃得光溜溜的了」
			IF YOKUBO()
				IF RAND:2
					CALL PRINT_STRW, @"「呼呼_H_被剃得光光的话%CNAME("一人称")%的%ADANA("阴茎")%就要完全被看光了呢_H_」"
				ELSE
					CALL PRINT_STRW, @"「気持ちいいのも興奮しちゃってるのも丸見えになるように精心剃っておくので、%CNAME("二人称")%も楽しみにしててくださいね_H_」"
				ENDIF
			ENDIF
		;剃り整える
		CASE 5
			PRINTFORMW 「想要好好修整一下是吗」
			PRINTFORMW 「我明白了。之后会好好打理的」
		;从不剃
		CASE 7
			IF YOKUBO()
				PRINTFORMW 「想要我之后都不要剃毛呢」
				CALL PRINT_STRW, @"「想看到长着茂密草丛的%ADANA("阴茎")%什么的、%CNAME("二人称")%真是个变态呢……_H_」"
			ELSE
				PRINTFORMW 「那个、之后都不希望看到打理得太过分的地方……？」
				PRINTFORMW 「不、那个、倒也没有说不可以这样的话……」
			ENDIF
		ENDSELECT
	;腋毛の状態を指示
	ELSEIF CHECK_COM("身嗜み：腋毛")
		SELECTCASE COND("身嗜み：腋毛")
		;光滑无毛
		CASE 3
			PRINTFORMW 「光滑无毛にしてほしいんですね」
			PRINTFORMW 「我明白了、これから光滑无毛になるようにしておきますね」
		;从不剃
		CASE 7
			PRINTFORMW 「え、从不剃でほしいんですか？」
			PRINTFORMW 「%CNAME("二人称")%がやってほしいならダメではないんですけど、色々考えないとなぁ……」
		ENDSELECT
	;常に膣を拡張しておくように指示
	ELSEIF CHECK_COM("身嗜み：Ｖ拡張")
		;尺寸で分岐
		SELECTCASE COND("身嗜み：Ｖ拡張")
		;指示解除
		CASE 0
			PRINTFORMW
		CASEELSE
			PRINTFORMW
		ENDSELECT
	;常に肛門を拡張しておくように指示
	ELSEIF CHECK_COM("身嗜み：Ａ拡張")
		;尺寸で分岐
		SELECTCASE COND("身嗜み：Ａ拡張")
		;指示解除
		CASE 0
			IF TALENT:恋慕 || YOKUBO()
				PRINTFORMW 「这样啊、虽然太大了也会很困扰……」
				PRINTFORMW 「我明白了。之后就不再插着震动棒了」
			ELSE
				PRINTFORMW 「……诶？　已、已经可以了吗……？」
				PRINTFORMW 「不、不是的！　完全没有感到很可惜来的！」
			ENDIF
		CASEELSE
			IF TALENT:恋慕 || YOKUBO()
				PRINTFORMW 「好的，明白了」
			ELSE
				PRINTFORMW 「……那个、我知道了」
			ENDIF
			SELECTCASE COND("身嗜み：Ａ拡張")
			CASE 1
				IF YOKUBO()
				ELSE
					CALL PRINT_STRW, @"「……那、那个、虽然稍微有点羞耻……_H_」"
				ENDIF
			CASE 2
				IF YOKUBO()
					PRINTFORMW 「……不过一看实物还是很大呢……」
					CALL PRINT_STRW, @"「从明天開始就不得不插着这个去学校了吗……_H_」"
				ELSE
					PRINTFORMW 「……不过、是不是稍微有点太大了……？」
				ENDIF
			CASE 3
				IF YOKUBO() && ABL:Ａ拡張 >= 3
					CALL PRINT_STRW, @"「……非常地大呢……_H_」"
					CALL PRINT_STRW, @"「把这个插进去的话、就回不到普通的生活了……_H_」"
				ELSE
					PRINTFORMW 「……那个、我会加油的」
				ENDIF
			CASEELSE
				IF YOKUBO() && ABL:Ａ拡張 >= 5
					CALL PRINT_STRW, @"「呼呼ッ_H_如果插进这么大的%ADANA("肛門")%大概就回不到以前的样子了……_H_」"
				ELSE
					PRINTFORMW 「不过、稍微有点太大了吧……」
				ENDIF
			ENDSELECT
		ENDSELECT
	;いつでもお尻でエロいことできるように指示
	ELSEIF CHECK_COM("身嗜み：Ａ準備")
		;呼ばれたら腸内を綺麗にしておくように指示
		IF COND("身嗜み：腸洗浄")
			IF TALENT:恋慕 || YOKUBO()
				CALL PRINT_STRW, @"「好喔_H_为了变成%CNAME("二人称")%可以随意使用的%ADANA("ヴァギナ")%、我会提前好好清理的_H_」"
			ELSE
				PRINTFORMW 「我、我知道了……之后就会好好清理肠道……」
			ENDIF
		;潤滑液を用意するように指示
		ELSE
			IF TALENT:恋慕 || YOKUBO()
				CALL PRINT_STRW, @"「呼呼_H_我明白了_H_」"
				CALL PRINT_STRW, @"「为了让%CNAME("二人称")%马上就能做H的事情、我会抹上非常多的润滑液的_H_」"
			ELSE
				PRINTFORMW 「好、好的……我明白了……」
				CALL PRINT_STRW, @"「之后就要事先把润滑液涂满全身了呢……_H_」"
			ENDIF
		ENDIF
	ELSEIF CHECK_COM("身嗜み：性欲の管理")
		IF COND("身嗜み：自慰禁止")
			;実際にそういうイベントを書く予定は有ません
			IF YOKUBO() >= 2
				PRINTFORMW 「……那个、不能撸管了吗……？」
				PRINTFORMW 「嘛、虽然可以…………不过作为交换、要做许多色色的事情哦？」
				PRINTFORM 「不这么做的话……
				IF CONFIG("路人Ｈ")
					PRINTFORM 和%TEXTR(@"不认识的\@RAND:2 ? 男 # 女\@人/同級生/网络炮友/%CNAME("二人称")%的朋友/其他的部员")%做爱
				ELSEIF CONFIG("部員間Ｈ")
					PRINTFORM \@CHARANUM == 3 ? 弗里希艾尔 #　其他部员\@H
				ELSE
					PRINTFORM %CNAME("二人称")%搞突然袭击
				ENDIF
				PRINTFORMW 也说不定哦？」
			ELSEIF YOKUBO() || TALENT:恋慕
				CALL PRINT_STRW, @"「好的、明白啦_H_」"
				CALL PRINT_STRW, @"「为了能和%CNAME("二人称")%做更多舒服的H的事情、会不%TEXTR("打飞机/一人H")%等着你哦_H_」"
			ELSE
				PRINTFORMW 「……诶、不是、那个、就算说了那样的事……」
				CALL PRINT_STRW, @"「……说不定会变得更舒服、吗？　……那、那样的话果然试一试比较好吧……_H_」"
			ENDIF
		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 YOKUBO()
			PRINTFORMW 「%CNAME("二人称")%、就这么想看%CNAME("一人称")%喝下%ADANA("精液")%的瞬间吗？」
			CALL PRINT_STRW, "「……真拿你没办法_H_」"
			CALL PRINT_STRW, @"「我明白了、%CNAME("二人称")%\@COND("絶頂", PLAYER) >= 2 ? 大量喷出的 # 的特浓\@%ADANA("精液")%%TEXTR("都会全数喝下/都会咕嘟咕嘟地喝下")%_H_」"
			CALL PRINT_STRW, @"「所以%CNAME("二人称")%也要目不转睛地看着、%CNAME("一人称")%喝下精液的瞬间哦_H_」"
			CALL PRINT_STRW, @"「……%AEGI(TARGET, "要", "Ｍ異物", 5)%」"
		ELSEIF ABL:精液中毒 >= 3
			CALL PRINT_STRW, @"「……%AEGI(TARGET, "要", "Ｍ異物", 5)%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物")%%CNAME("二人称")%的%ADANA("精液")%……好像要上瘾了……_H_」"
		ELSEIF TALENT:恋慕
			PRINTFORMW 「诶……%CNAME("二人称")%、想要我喝这个吗？」
			PRINTFORMW 「……我会努力试试看的」
			CALL PRINT_STRW, @"「……%AEGI(TARGET, "不要", "Ｍ異物", 5)%」"
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "Ｍ異物", 3)%……」"
			PRINTFORMW 「……呜呜……%CNAME("二人称")%、为什么要让我喝这种东西呢……」
		ENDIF
	;二回目以降
	ELSE
		IF ABL:精液中毒 >= 3 || YOKUBO()
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%」"
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "Ｍ異物", 3)%」"
		ENDIF

		IF YOKUBO() && RAND:3 == 0
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 2)%%CNAME("二人称")%的精子、很有活力呢_H_」"
			CALL PRINT_STRW, "「虽然很小但能感受到在口中啪嗒啪嗒的跃动呢……_H_」"
		ELSEIF ABL:精液中毒 >= 5 && RAND:2
			CALL PRINT_STRW, @"「……已经没有%CNAME("二人称")%的%ADANA("精液")%就活不下去了……_H_」"
		ELSEIF TALENT:恋慕
			CALL PRINT_STRW, @"「……一想到%CNAME("二人称")%的精液就觉得不可思议地好吃……_H_」"
		ELSEIF ABL:精液中毒 >= 3
			CALL PRINT_STRW, @"「……这样下去的话，没有%CNAME("二人称")%的%ADANA("精液")%就要活不下去了……_H_」"
		ELSE
			PRINTFORMW 「……让我喝这样的东西也毫无意义哦……」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;穿环
;-------------------------------------------------
IF SELECTCOM == 148
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「这是……穿环吗？」
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			IF YOKUBO()
				PRINTFORMW 「虽然我讨厌疼痛……但我会忍耐的」
				PRINTFORMW 「不就是%CNAME("二人称")%的请求、而且……」
				CALL PRINT_STRW, "「……如果忍受住其中的疼痛的话好像会变得更舒服来的_H_」"
			ELSE
				PRINTFORMW 「……那个、这样的东西我从来没有戴过……」
				PRINTFORMW 「而且因为很痛实在是不擅长应对……」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「这样啊……」
			PRINTFORMW 「……说实话，还是稍微有点兴趣的」
			SIF YOKUBO()
				CALL PRINT_STRW, @"「不知为何就有种被当做%CNAME("二人称")%的所有物来对待的感觉了_H_」"
		ENDIF
	;二回目以降
	ELSE
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			IF YOKUBO()
				PRINTFORMW 「我明白了……」
				PRINTFORMW 「……比起被吓到发抖果然还是意外比较多吧？」
				PRINTFORMW 「……虽然明白之后会变得更舒服但是还是不擅长应对疼痛啊」
			ELSE
				PRINTFORMW 「又、又要做吗……？」
			ENDIF
		;それ以外
		ELSE
			;ＯＮフラグが付けた際のセリフです
			IF COND("陰蒂環フラグ")
				IF COND("穿環ＯＮフラグ")
					IF YOKUBO()
						CALL PRINT_STRW, @"「……原来如此。%CNAME("二人称")%想在%ADANA("阴茎")%上穿环呢_H_」"
						CALL PRINT_STRW, @"「好的哦_H_请做成让%CNAME("二人称")%满足的色色的%ADANA("阴茎")%吧_H_」"
					ELSE
						PRINTFORMW 「诶、诶诶！？　要在小、小鸡鸡上穿环吗！？」
						PRINTFORMW 「虽、虽然确实听说过有这样的事情……」
					ENDIF
				ELSE
					IF YOKUBO()
						PRINTFORMW 「已经要取下来了吗？」
						IF RAND:2
							PRINTFORMW 「虽然%CNAME("一人称")%还是觉得戴着也很好」
						ELSE
							PRINTFORMW 「嘛、一直戴着的话也渐渐习惯起来了呢」
						ENDIF
					ELSE
						PRINTFORMW 「………………」
						PRINTFORMW 「……哈！？　就、就是这样！　一直戴着这样的东西终究不太好！」
					ENDIF
				ENDIF
			ELSEIF COND("陰唇環フラグ")
				;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
				RETURN 0
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("乳环フラグ")
				IF COND("穿環ＯＮフラグ")
					IF YOKUBO()
						CALL PRINT_STRW, @"「……呼呼呼ッ_H_%CNAME("二人称")%想在乳頭上穿上环吗？」"
						CALL PRINT_STRW, @"「因为相当色嘛_H_」"
					ELSE
						;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
						RETURN 0
					ENDIF
				ELSE
					PRINTFORMW 「已经取下来了吗？」
					IF YOKUBO()
						PRINTFORMW 「……最近、開始习惯擦着这些环了」
						CALL PRINT_STRW, @"「因为这些环已经被取下来了、取而代之的要多多虐待%CNAME("乳頭")%哦_H_」"
					ELSE
						PRINTFORMW 「……这、这样啊、那就取下来吧……」
						CALL PRINT_STRW, "「……才、才没有！　觉得、很遗憾什么的…………_H_」"
					ENDIF
				ENDIF
			ELSEIF COND("肚脐环フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW 「在肚脐上穿环是吗？」
					IF RAND:2
						PRINTFORMW 「说不定这是时尚单品的精髓所在呢」
					ELSE
						PRINTFORMW 「%CNAME("二人称")%喜欢这种风格吗？」
						PRINTFORMW 「不、我觉得很好哦」
					ENDIF
				ELSE
					PRINTFORMW 「要取下来呢」
					PRINTFORMW 「确实、一直戴着的话在卫生方面也有不利影响的样子呢」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;导管
;-------------------------------------------------
IF SELECTCOM == 149
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「……这是、导管吗？」
		PRINTFORMW 「虽然知道……不过为什么要用这个？」
		PRINTFORMW 「诶？　用这个对%CNAME("一人称")%的%ADANA("尿道")%……？」
		;痛い！
		IF CHECK("尿道PLAY") == 0
			PRINTFORMW
		;それ以外
		ELSEIF YOKUBO()
			CALL PRINT_STRW, @"「……呼呼_H_%CNAME("二人称")%在想很了不得的事情呢……_H_」"
			PRINTFORMW 「确实、这种程度的话%CNAME("一人称")%的%ADANA("尿道")%也能毫无负担地进入、试试看比较好吧」
			CALL PRINT_STRW, @"「那么、请多指教啦_H_」"
		ELSE
			PRINTFORMW 「嘛、嘛啊、虽然一定要做的话也可以就是……」
		ENDIF
	;抜いた
	ELSEIF TEQUIP:导管 == 0
		CALL PRINT_STRW, @"「啊゛……呜゛……呜呜……_H_」"
		IF YOKUBO()
			CALL PRINT_STRW, @"「这、这是……好像要上瘾了……_H_」"
		ELSE
			CALL PRINT_STRW, @"「这、这是……绝、绝对不是说感觉很舒服什么的……！」"
		ENDIF
	;二回目以降
	ELSE
		;痛い！
		IF CHECK("尿道PLAY") == 0
			PRINTFORMW
		;それ以外
		ELSE
			IF TALENT:恋慕 && RAND:3 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称", "かな")%っ_H_%MIX_AEGI(1, TARGET, "要")%%CNAME("二人称", "甘え")%_H_」"
				IF ABL:尿道拡張 >= 3
					CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_还要_H_」"
					CALL PRINT_STRW, @"「用不是像导管那么细的东西而是巨大的%CNAME("二人称")%的%ADANA("阴茎")%在%CNAME("一人称")%的%ADANA("尿道")%乱七八糟地做着吧っ_H_」"
					CALL PRINT_STRW, @"「被当成在尿尿的地方注入%CNAME("二人称")%的%ADANA("精液")%就会有感觉的变态了_H_」"
				ENDIF
			ELSEIF YOKUBO() && RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				IF ABL:尿道感覚 >= 3
					CALL PRINT_STRW, @"「%ADANA("尿道")%里被滋啵滋啵地做着っ_H_」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("尿道")%、要变成那种东西突刺进去就会去的淫乱小穴了_H_」"
				ENDIF
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%这里_H_明明是%ADANA("尿道")%っ_H_」"
				CALL PRINT_STRW, @"「被导管插入就会变得好舒服っ_H_」"
				CALL PRINT_STRW, @"「这样下去的话っ_H_%AEGI(TARGET, "要", "通常")%要对%ADANA("尿道")%被插入上瘾了っ_H_」"
			ENDIF
		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
			IF YOKUBO() || ABL:受虐属性 >= 3
				CALL PRINT_STRW, @"「啊゛……%AEGI(TARGET, "要", "通常", 3)%」"
				CALL PRINT_STRW, @"「要进到%ADANA("尿道")%里了……_H_」"
				CALL PRINT_STRW, @"「明明很痛却又很舒服……_H_」"
			ELSE
				PRINTFORMW 「好痛！　为、为什么要做这样的事情……」
				PRINTFORMW 「……为了让这里变得很舒服？　你脑子还好吗？」
			ENDIF
		;それ以外
		ELSE
			IF YOKUBO() || ABL:受虐属性 >= 3
				CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%」"
				CALL PRINT_STRW, @"「啊っ_H_%ADANA("尿道")%要被開发了っ_H_」"
				CALL PRINT_STRW, @"「这样下去%CNAME("一人称")%、就没法正常地尿尿了_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "不要")%、请、请住手吧……」"
				CALL PRINT_STRW, @"「这种事情绝对不正常……%MIX_AEGI(1, TARGET, "要")%」"
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;痛い！
		IF CHECK("尿道PLAY") == 0
			IF YOKUBO() || ABL:受虐属性 >= 3
				CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
				CALL PRINT_STRW, @"「好痛……可是好舒服゛……っ_H_」"
			ELSE
				PRINTFORMW 「……ッ！！　好痛!　好疼好疼！」
				PRINTFORMW 「……这样的状态下、真的能变舒服吗……？」
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%明明是用来小便的地方っ_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「往最深处去了っ_H_这样下去的话膀胱被摩擦着就会变得好舒服っ_HH_」"
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;写真撮影
;-------------------------------------------------
IF SELECTCOM == 158
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		CALL PRINT_STRW, @"「%MIX_AEGI(4+RAND:3, TARGET, "要")%」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%这么羞耻的地方被拍照片什么的……_H_」"
		CALL PRINT_STRW, @"「……%CNAME("二人称")%、要拍得非常色气才可以哦_H_」"
	ELSE
		IF TALENT:恋慕 || YOKUBO()
			IF PREVPLAY("清洁口交")
				CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "Ｍ異物", 3+RAND:3)%……_H_」"
				CALL PRINT_STRW, @"「%AEGI(TARGET, "不要", "Ｍ異物", 2)%……拍下含着%ADANA("阴茎")%的姿态什么的、%CNAME("二人称")%真是个变态呢_H_」"
			ELSEIF SHOOT("Ａ中出し") && RAND:2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3)%」"
				CALL PRINT_STRW, @"「啊哈ッ……_H_%CNAME("一人称")%的%ADANA("精液")%滴落下来的姿态、要被拍下来了哦……_H_」"
			ELSE
				SELECTCASE RAND:3
				CASE 0
					CALL PRINT_STRW, @"「%MIX_AEGI(5+RAND:2, TARGET, "要")%」"
					CALL PRINT_STRW, @"「啊哈……_H_要被%CNAME("二人称")%拍下照片了……_H_」"
				CASE 1
					CALL PRINT_STRW, @"「%MIX_AEGI(4+RAND:2, TARGET, "要")%」"
					CALL PRINT_STRW, @"「这样的っ_H_一边让我变得这么舒服_H_一边被拍下照片的话っ_H_%MIX_AEGI(1, TARGET, "要")%」"
					CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%脑袋不是就要变得很奇怪了吗っ_H_」"
				CASEELSE
					CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%%CNAME("二人称")%っ_H_」"
					CALL PRINT_STRW, @"「要好好地_H_请把我拍得%TEXTR("色气/下流/可爱")%些吧っ_H_%MIX_AEGI(3, TARGET, "要")%」"
				ENDSELECT
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「%MIX_AEGI(5+RAND:2, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%CNAME("二人称", "どもり")%……为什么要拍这种照片啊……_H_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;攝像機使用
;-------------------------------------------------
IF SELECTCOM == 170
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO() || ABL:露出癖 >= 5
			IF INSERT("Ａ挿入")
				CALL PRINT_STRW, "「啊哈ッ_H_要開始性爱摄影吗_H_」"
			ELSE
				CALL PRINT_STRW, @"「%CNAME("一人称")%变态的地方、请多多拍下来吧_H_」"
			ENDIF
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW 「用、用这个拍下来吗……？　拍%CNAME("一人称")%……？」
			PRINTFORMW 「……好、好不容易拍一次一定要好好拍哦」
		ELSE
			PRINTFORMW 「诶……那是……什么！　在拍什么呢！」
		ENDIF
	;終了時
	ELSEIF TEQUIP:攝像機 == 0
		;屈服刻印3or露出癖5以上
		IF (YOKUBO() || ABL:露出癖 >= 5) && RAND:2
			IF RAND:2
				CALL PRINT_STRW, "「啊哈……羞耻的地方要被拍下好多张了……_H_」"
			ELSE
				CALL PRINT_STRW, @"「拍得怎么样呢、之后一定要让我看看哦_H_」"
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕 || ABL:露出癖 >= 3
			PRINTFORMW 「拍得好看吗？」
		;それ以外
		ELSE
			PRINTFORMW 「为什么要拍这种……」
			PRINTFORMW 「虽……虽然也不是说不能拍……」
		ENDIF
	;二回目以降
	ELSE
		;屈服刻印3or露出癖5以上
		IF (YOKUBO() || ABL:露出癖 >= 5) && RAND:2
			IF RAND:2
				IF EXP:ＡＶ出演経験 && RAND:3
					CALL PRINT_STRW, @"「呼呼_H_请看哦、%CNAME("二人称")%……_H_」"
					CALL PRINT_STRW, @"「从%CNAME("二人称")%的录影机里收到了H的信号、%CNAME("一人称")%的这里、已经变成了这幅样子……_H_」"
					CALL PRINT_STRW, @"「请负起责任来、直到恢复原样之前都请一直发送信号吧、对着%CNAME("一人称")%因为H而迷乱的地方_H_」"
				ELSE
					CALL PRINT_STRW, "「啊……_H_」"
					CALL PRINT_STRW, @"「……呼呼、请多拍些%CNAME("一人称")%羞耻到不得了的照片吧_H_」"
					CALL PRINT_STRW, "「那个……结束了以后请给我看看_H_」"
				ENDIF
			ELSE
				CALL PRINT_STRW, @"「好哦_H_」"
				CALL PRINT_STRW, @"「为了能够看到非常H的部分、要好好拍下来哦_H_」"
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW 「真是的、%CNAME("二人称")%啊……」
			CALL PRINT_STRW, @"「……为了让%CNAME("二人称")%能够兴奋难耐请好好地拍下来哦_H_」"
		;露出癖lv3以上
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW 「这次也拍吗……？」
			PRINTFORMW 「不……那个……」
			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 「……诶？ 那个、想、想让我穿这条裸体围裙吗？」
			PRINTFORMW 「…………那个……虽然很開心、可是也稍微有点羞耻……」
		;それ以外
		ELSE
			PRINTFORMW 「诶、这、那个、这条围裙是……」
			PRINTFORMW 「……我、我明白了……」
		ENDIF
		PRINTFORMW 「……那、那个……」
		PRINTFORMW 「欢、欢迎回家、亲爱的…………」
		HTML_PRINT @"<p align= 'left'><font color= '#303030'>「…………好、好羞耻……」</font></p>"
	;終了時
	ELSEIF TEQUIP:新妻PLAY == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「あ、もう良いんですか？」
			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("換装：服を着替えた")
		PRINTFORMW 「要穿这个吗？」
		IF CHECK_CLO("自分の服")
			PRINTFORMW 「果然穿着平时穿的衣服能让人放下心来啊」
		ELSEIF CHECK_SHIRT("衬衫")
			IF TALENT:恋慕 || ABL:露出癖 >= 3 || YOKUBO()
				PRINTFORMW 「只穿一件衬衫、吗……」
				PRINTFORMW 「……不、虽说确实有点羞耻……」
				PRINTFORMW 「……实际上、因为我很憧憬这样的装扮所以稍微有点高兴」
			ELSE
				PRINTFORMW 「……那个、裤子和裙子在哪里……？」
				PRINTFORMW 「没有吗？　……我觉得应该是这样的」
			ENDIF
		ELSEIF CHECK_SHIRT("女教師")
			IF YOKUBO()
				CALL PRINT_STRW, @"「%CALLNAME:PLAYER%桑、今天的课程是保健体育哦_H_開玩笑的_H_」"
			ELSE
				PRINTFORMW 「是不是稍微有点紧绷过頭了……？」
			ENDIF
		ELSEIF CHECK_SHIRT("和服")
			PRINTFORMW 「带子相当难系……」
			SIF YOKUBO() || TALENT:恋慕
				PRINTFORMW 「反正马上就能解開，不过也不能说没有问题……」
		ELSEIF CHECK_SHIRT("女仆装")
			PRINTFORMW 「……您久等了」
			PRINTFORMW 「如何呢？　主人大人……開玩笑的」
		ELSEIF CHECK_SHIRT("体操服")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("看護婦")
			IF YOKUBO()
				CALL PRINT_STRW, @"「患者的患部、就是这个\@SIZE("阴茎", PLAYER) == 0 ? 可爱的 # 气派的\@肉棒吗？　開玩笑的哦_H_」"
			ELSE
				PRINTFORMW 「那个……这就是女装……」
				PRINTFORMW 「一直以来不都是这么干的吗？　这、这种事情和平时不一样の……！」
			ENDIF
		ELSEIF CHECK_SHIRT("旗袍")
			IF YOKUBO() && RAND:2
				CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%」"
				PRINTFORMW 「……不好意思。裙子碰到屁股了……」
			ELSE
				PRINTFORMW 「诶……弄得光溜溜的了……」
			ENDIF
		ELSEIF CHECK_SHIRT("水手服")
			IF CEVENT("乃々：男装")
				PRINTFORMW 「和在家里的衣服不太一样呢……不过把这个这样子……」
			ELSE
				PRINTFORMW 「和平常穿的衣服稍微有些不一样……如何？」
			ENDIF
		ELSEIF CHECK_SHIRT("巫女")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("情趣内衣")
			PRINTFORMW
		ELSEIF CHECK_CLO("比基尼姿")
			PRINTFORMW
		ELSEIF CHECK_BODYS("拘束衣")
			IF CFLAG:Ｓっ気フラグ
				CALL PRINT_STRW, @"「让%CNAME("一人称")%穿这样的衣服……%CNAME("二人称")%想要做什么呢_H_」"
				CALL PRINT_STRW, @"「穿成这样来做色色的事情吗？　还是说……想让我感受疼痛吗_H_」"
			ELSE
				PRINTFORMW
			ENDIF
		ELSEIF CHECK_BODYS("兔")
			IF YOKUBO()
				CALL PRINT_STRW, @"「呼呼ッ_H_如何呢？ 合适吗？」"
				PRINTFORMW 「……说起来、兔子是相当性欲旺盛的生物哦」
				CALL PRINT_STRW, @"「加油让%CNAME("一人称")%被满足吧、%CNAME("二人称")%_H_」"
			ELSE
				PRINTFORMW 「%CNAME("二人称")%……你、你觉得如何……？」
				CALL PRINT_STRW, @"「那个……请好好地疼爱我……_H_」"
			ENDIF
		;其他
		ELSE
			PRINTFORMW 「……好了。%CNAME("二人称")%、怎么样？」
		ENDIF
	;胸も股間も丸出し状態变成了時
	ELSEIF CHECK_COM("換装：裸体变成了")
		;恋慕
		IF TALENT:恋慕
			IF YOKUBO() && RAND:2
				PRINTFORMW 「……一想到这是为了%CNAME("二人称")%才穿上的、反而觉得有点不好意思呢」
			ELSE
				PRINTFORMW 「……真是的、毕竟%CNAME("二人称")%就是这么没品嘛」
			ENDIF
			PRINTFORM %CALLNAME:TARGET%将
			IF YOKUBO() && RAND:2
				PRINTFORM %TEXTR(@"用抑制不住兴奋的样子/一边煽动情欲地扭动着身体/一边用满载着欲望的眼睛望向%CALLNAME:PLAYER%")%
			ELSE
				PRINTFORM %TEXTR(@"%CALLNAME:PLAYER%をちらちらと見ながら/有点害臊的/红了脸并/%CALLNAME:PLAYER%を愛おしそうに見つめながら")%
			ENDIF
		;屈服刻印lv3
		ELSEIF YOKUBO()
			CALL PRINT_STRW, @"「好哦、来吧_H_请%CNAME("二人称")%随意看看吧_H_」"
			PRINTFORMW 「……当然了、要充分地欺负我也是可以的哦？」
			PRINTFORM %CALLNAME:TARGET%%TEXTR(@"抑制不住兴奋的样子/一边煽动情欲地扭动着身体/一边用满载着欲望的眼睛望向%CALLNAME:PLAYER%")%
		;露出癖Lv3
		ELSEIF ABL:露出癖 >= 3
			CALL PRINT_STRW, @"「请、请不要看……_H_」"
			PRINTFORM %CALLNAME:TARGET%%TEXTR("有些扭扭捏捏/脸上飞起了红晕/的气息稍微有些凌乱")%
		ELSE
			PRINTFORMW 「这、这怎么样……？」
			PRINTFORM %CALLNAME:TARGET%%TEXTR("看上去有些不好意思/脸颊羞红/用小小的手遮住了重要的部位")%
		ENDIF
		PRINTFORMW 那中性的肢体就这样暴露在外……
	;胖次を変えたり脱いだり
	ELSEIF CHECK_COM("換装：胖次")
		IF EQUIP:胖次
			PRINTFORMW
		;没穿内褲です
		ELSE
			IF YOKUBO()
				CALL PRINT_STRW, @"「……胖次、脱下去了……_H_」"
			ELSE
				PRINTFORMW 「好、好羞耻……」
			ENDIF
		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 CFLAG:Ｓっ気フラグ
			CALL PRINT_STRW, @"「呼呼_H_被%CNAME("二人称")%满满地责备了……_H_」"
			CALL PRINT_STRW, @"「……所以从现在開始轮到%CNAME("一人称")%来做了哦_H_」"
		;恋慕
		ELSEIF TALENT:恋慕
			CALL PRINT_STRW, @"「呼呼_H_被做了很多舒服的事情呢……_H_」"
			CALL PRINT_STRW, @"「……作为回礼、这次就让%CNAME("一人称")%给你做些舒服的事吧_H_」"
		;それ以外
		ELSE
			PRINTFORMW 「…………」
			PRINTFORMW 「ご、ごめんなさい！」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;潤滑液使用
;-------------------------------------------------
IF SELECTCOM == 260
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:YOKUBO()
			CALL PRINT_STRW, @"「呼呼、黏糊糊的呢……_H_」"
			CALL PRINT_STRW, @"「……%CNAME("二人称")%、不只是润滑液、来把各种各样的液体全都滴在身上吧_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;媚薬使用
;-------------------------------------------------
IF SELECTCOM == 261
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「这是什么？」
		PRINTFORMW 「……诶、这、这是……媚薬……吗……？」
		PRINTFORMW 「……我、我知道了……呜呜……」
	;二回目以降
	ELSE
		IF YOKUBO() && RAND:2
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%っ_H_からだがっ_H_うずくからぁっ_H_」"
			CALL PRINT_STR, @"「はやくさわってっ_H_%CNAME("一人称")%の"
			IF TALENT:淫核 && RAND:4 == 0
				PRINTFORM %ADANA("阴茎")%
			ELSEIF TALENT:尻穴狂い && RAND:3 == 0
				PRINTFORM %ADANA("肛門")%
			ELSEIF TALENT:淫乳 && RAND:2
				PRINTFORM %ADANA("胸")%
			ELSEIF TALENT:蕩唇
				PRINTFORM %TEXTR("お口/唇")%
			ELSE
				PRINTFORM からだ
			ENDIF
			CALL PRINT_STRW, @"めちゃくちゃにしてぇっ_H_」"
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3)%」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%……身体……好热……_H_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;利尿剤
;-------------------------------------------------
IF SELECTCOM == 262
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;排卵誘発剤
;-------------------------------------------------
IF SELECTCOM == 264
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;筋弛緩剤
;-------------------------------------------------
IF SELECTCOM == 267
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;挣扎
;-------------------------------------------------
IF SELECTCOM == 280
	;成功
	IF TEQUIP:推倒 == 0
		PRINTFORMW 「哇！」
		IF YOKUBO()
			CALL PRINT_STRW, @"「……呼呼_H_就这么想虐待%CNAME("一人称")%吗？」"
			CALL PRINT_STRW, @"「明白啦_H_请更多、更多地欺负我吧_H_」"
		ELSE
			PRINTFORMW 「啊、对、对不起、つい……」
			CALL PRINT_STRW, @"「那、那个……这之后要怎么做呢……_H_」"
		ENDIF
	;失敗
	ELSE
		PRINTFORMW 「不用像这样挣扎也没问题哦」
		CALL PRINT_STRW, @"「因为我只是要让%CNAME("二人称")%感受到更多的快乐嘛……_H_」"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;自慰の種類についてはTEQUIP:PLAYER:自慰の値で分岐可能
;==1舐陰, ==4舐陰莖, ==9舐肛, ==13くぱぁ, ==14Ａくぱぁ など
;-------------------------------------------------
;2019/09/29　玛丽酱加筆　★加筆部分
IF SELECTCOM == 282
	IF FIRSTCOM(SELECTCOM) == 0
		IF YOKUBO() || TALENT:恋慕

		ELSE
			PRINTFORMW 「……诶、诶诶！？　那个、这个、%CNAME("二人称")%、为什么突然就開始自慰了……」
		ENDIF
	ELSEIF YOKUBO() || TALENT:恋慕
		SELECTCASE TEQUIP:PLAYER:自慰
		CASE 1
			PRINTFORMW
		CASE 4
			PRINTFORM 「这样吮吸着%CNAME("一人称")%的欧金金、
			IF PENIS(PLAYER)
				CALL PRINT_STRW, @"%TEXTR(@"舒服地上下撸动着什么的/%CNAME("二人称")%也想用手撸一撸自己的欧金金了/用欧金金撸动的地方被我看到了呢")%_H_」"
			ELSE
				CALL PRINT_STRW, @"%TEXTR("一起来做非常舒服的事情吧/自己抚慰什么的/让我看到自慰什么的")%_H_」"
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_」"
		CASE 9
			PRINTFORM 「一边%TEXTR("舔着/用舌頭舔")%%CNAME("一人称")%的%ADANA("肛門")%、一边
			IF PENIS(PLAYER)
				CALL PRINT_STRW, @"%TEXTR("上下撸动着什么的/用手撸着让人舒服绝顶什么的/让人兴奋难耐什么的")%_H_」"
			ELSE
				CALL PRINT_STRW, @"%TEXTR("一起来撸管吧/让我也加入什么的/变得舒服起来了吗")%_H_」"
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_」"
		CASE 13
			PRINTFORMW
		CASE 14
			PRINTFORM 「%TEXTR("看着/オカズにして/使用着")%%CNAME("一人称")%的%ADANA("肛門")%、
			IF PENIS(PLAYER)
				CALL PRINT_STRW, @"%TEXTR("一边撸着就变得很舒服了呢/就要撸了吗/就要变硬了呢")%_H_」"
			ELSE
				CALL PRINT_STRW, @"%TEXTR("要湿透了不是吗/有感觉了吗/请让我舒服起来吧")%_H_」"
			ENDIF
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%%CNAME("二人称")%っ_H_」"
		ENDSELECT
	ELSE
		PRINTFORM 「呜、呜呜……为什么要
		SELECTCASE TEQUIP:PLAYER:自慰
		CASE 4
			PRINTFORM %TEXTR("一边吃着/一边舔着")%欧金金
		CASE 9
			PRINTFORM 一边舔着屁股的穴
		CASE 14
			PRINTFORM 一边要%CNAME("一人称")%把屁股给你看
		ENDSELECT
		CALL PRINT_STRW, @"%TEXTR("撸着管/变得舒服")%吗……_H_」"
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;甜言蜜语
;-------------------------------------------------
IF SELECTCOM == 283
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	;RETURN 0
	;成功
	IF TEQUIP:甜言蜜语
		;恋慕
		IF TALENT:恋慕 && RAND:2
			IF RAND:2
				CALL PRINT_STRW, "「真是的、因为这就是浪漫主义者吧……_H_」"
			ELSE
				CALL PRINT_STRW, @"「够、够啦、%CNAME("二人称")%的话……_H_」"
			ENDIF
		;それ以外
		ELSE
			CALL PRINT_STRW, "「那个……虽然……很高兴、但也很不好意思……_H_」"
			SIF YOKUBO()
				CALL PRINT_STRW, "「明明应该做些比平时羞耻的事……_H_」"
		ENDIF
	;失敗
	ELSE
		;恋慕
		IF YOKUBO()
			CALL PRINT_STRW, @"「……现在全身所渴求的却不是这么温柔的话语、而是更加激烈的事情哦……_H_」"
		;それ以外
		ELSE
			PRINTFORMW 「……啊，对不起。没有听到」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;抱上去
;-------------------------------------------------
IF SELECTCOM == 285
	;恋慕
	IF TALENT:恋慕
		SELECTCASE RAND:3
		CASE 0
			IF TALENT:PLAYER:高大
				PRINTFORMW 「……%CNAME("二人称")%、果然很大……」
			ELSEIF TALENT:PLAYER:娇小
				PRINTFORMW 「呼呼、被这样抱着的话、能确实地看清%CNAME("二人称")%的脸真是太好了」
			ELSE
				CALL PRINT_STRW, @"「……呼呼_H_%CNAME("二人称")%……_H_」"
			ENDIF
		CASE 1
			IF TALENT:PLAYER:男性 || TALENT:PLAYER:筋肉
				PRINTFORMW 「……%CNAME("二人称")%的臂弯、好强壮……」
			ELSE
				PRINTFORMW 「……被%CNAME("二人称")%这样紧紧抱着的话、不知为何就安心下来了……」
			ENDIF
		CASEELSE
			PRINTFORMW 「……%CNAME("二人称")%的体温、比想象中的要温暖呢」
		ENDSELECT
	;それ以外
	ELSE
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「%CNAME("二人称")%、等一下……」
			CALL PRINT_STRW, @"「靠、靠得太近了哦……_H_」"
		CASE 1
			PRINTFORMW 「%CNAME("二人称")%、那个……」
			CALL PRINT_STRW, @"「被这样依偎在身旁的话、那个、有些心跳不止……_H_」"
		CASE 2
			PRINTFORMW 「%CNAME("二人称", "どもり")%……？」
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF

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

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

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

IF YOKUBO()
	SELECTCASE RAND:8
	CASE 0
		CALL PRINT_STRW, @"「呼呼ッ_H_%ADANA("精液")%要biubiu地出来了呢_H_」"
		CALL PRINT_STRW, @"「好喔_H_把%CNAME("一人称")%用%ADANA("精液")%涂成纯白色的吧_H_」"
	CASE 1
		CALL PRINT_STRW, @"「啊哈_H_%ADANA("阴茎")%里要涨起来了呢_H_」"
		CALL PRINT_STRW, @"「马上就要射精的样子了呢_H_没问题哦_H_请多多地biubiu射出来吧_H_」"
	CASE 2
		CALL PRINT_STRW, @"「发出了下流的咕啾咕啾的音色呢……_H_」"
		CALL PRINT_STRW, @"「呼呼ッ_H_不仅仅是忍耐汁、也要射出满满的%ADANA("精液")%了不是吗射精……_H_」"
	CASE 3
		CALL PRINT_STRW, @"「啊……_H_%ADANA("阴茎")%变得好炽热……_H_」"
		CALL PRINT_STRW, @"「就这样射精、把%ADANA("精液")%喷得到处都是吧_H_」"
	CASE 4
		CALL PRINT_STRW, @"「呼呼ッ_H_一副快要射精的样子呢_H_想藏起来也没用哦_H_」"
		CALL PRINT_STRW, @"「你看……不仅是%ADANA("阴茎")%膨胀起来了……呐、大概是舒服起来了吧_H_」"
	CASE 5
		CALL PRINT_STRW, @"「啊哈_H_%ADANA("阴茎")%的血管也怒张起来了呢_H_」"
		CALL PRINT_STRW, @"「不只是就这样强烈地脉动着、大概就要射出满满的%ADANA("精液")%了吧_H_」"
	CASE 6
		CALL PRINT_STRW, @"「%CNAME("二人称")%、就要射出%ADANA("精液")%了吗_H_」"
		CALL PRINT_STRW, @"「脸上的表情像在说『想要biubiu地射出%ADANA("精液")%_H_』哦_H_」"
	CASE 7
		CALL PRINT_STRW, @"「看啊……这里、已经膨胀到极限了哦_H_」"
		CALL PRINT_STRW, @"「想要这样子射出去呢_H_没问题哦_H_发射出浓厚的%ADANA("精液")%吧_H_」"
	ENDSELECT
ENDIF

;-------------------------------------------------
;パラメータ変動をトリガーにした口上
;パラメータ変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_PALAMCNG_K25, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0
;-------------------------------------------------
;パラメータ変動時のセリフ
;-------------------------------------------------
SELECTCASE ARGS
;-------------------------------------------------
;初めてＶ潤がLV3超えた
;-------------------------------------------------
CASE "Ｖ潤LV3突破"
	;初めて
	IF FIRST_EV("Ｖ潤LV3突破") == 0
		;潤滑液を使った場合
		IF SELECTCOM == 260
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて欲情がLV3超えた
;-------------------------------------------------
CASE "欲情LV3突破"
	IF FIRST_EV("欲情LV3突破") == 0
		;媚薬を使った場合
		IF SELECTCOM == 261
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて恥情がLV3超えた
;-------------------------------------------------
CASE "恥情LV3突破"
	IF FIRST_EV("恥情LV3突破") == 0
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		CALL PRINT_STRW, "「请、请不要看……_H_」"
	ENDIF
;-------------------------------------------------
;初めて恐怖がLV3超えた
;-------------------------------------------------
CASE "恐怖LV3突破"
	IF FIRST_EV("恐怖LV3突破") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めてC絶頂
;-------------------------------------------------
CASE "Ｃ絶頂"
	IF FIRST_EV("Ｃ絶頂") == 0
		CALL PRINT_STRW, @"「%MIX_AEGI(2, TARGET, "要")%要这样_H_要这样被其他人看着去了_H_」"
	ENDIF
;-------------------------------------------------
;初めてV絶頂
;-------------------------------------------------
CASE "Ｖ絶頂"
	IF FIRST_EV("Ｖ絶頂") == 0
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;初めてA絶頂
;-------------------------------------------------
CASE "Ａ絶頂"
	IF FIRST_EV("Ａ絶頂") == 0
		CALL PRINT_STRW, @"「%ADANA("肛門")%っ……！　里面在抽动着っ……！　啊啊_H_」"
	ENDIF
;-------------------------------------------------
;初めてB絶頂
;-------------------------------------------------
CASE "Ｂ絶頂"
	IF FIRST_EV("Ｂ絶頂") == 0
		CALL PRINT_STRW, "「乳頭_H_要用乳頭去了_H_」"
	ENDIF
;-------------------------------------------------
;C挑逗
;-------------------------------------------------
CASE "Ｃ挑逗"
	;初めて
	IF FIRST_EV("Ｃ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ｃ挑逗
		IF NOWEX:Ｃ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ｃ挑逗
		ELSEIF NOWEX:Ｃ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;V挑逗
;-------------------------------------------------
CASE "Ｖ挑逗"
	;初めて
	IF FIRST_EV("Ｖ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ｖ挑逗
		IF NOWEX:Ｖ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ｖ挑逗
		ELSEIF NOWEX:Ｖ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;A挑逗
;-------------------------------------------------
CASE "Ａ挑逗"
	;初めて
	IF FIRST_EV("Ａ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ａ挑逗
		IF NOWEX:Ａ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ａ挑逗
		ELSEIF NOWEX:Ａ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;B挑逗
;-------------------------------------------------
CASE "Ｂ挑逗"
	;初めて
	IF FIRST_EV("Ｂ挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;強絶頂Ｂ挑逗
		IF NOWEX:Ｂ绝顶前骤停 >= 2
			PRINTFORMW
		;絶頂Ｂ挑逗
		ELSEIF NOWEX:Ｂ绝顶前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;扶她射精挑逗
;-------------------------------------------------
CASE "射精挑逗"
	;初めて
	IF FIRST_EV("射精挑逗") == 0
		PRINTFORMW
	;２回目以降
	ELSE
		;大量射精挑逗
		IF NOWEX:射精前骤停 >= 2
			PRINTFORMW
		;射精挑逗
		ELSEIF NOWEX:射精前骤停
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;処女喪失(処女のみ)
;-------------------------------------------------
CASE "処女喪失"
	IF FIRST_EV("処女喪失") == 0
		;恋慕
		IF TALENT:恋慕
			;主人の性交による処女喪失
			IF PLAYER == MASTER && INSERT("Ｖ挿入")
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;射精した(扶她/男性のみ)
;-------------------------------------------------
CASE "射精した"
	;初めて
	IF FIRST_EV("射精した") == 0
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「啊哈っ_H_要在%CNAME("二人称")%的面前射出%ADANA("精液")%来了_H_」"
			SIF YOKUBO()
				CALL PRINT_STRW, @"「……直到今天为止都在妄想着在%CNAME("二人称")%的面前难看地射精撸出来哦_H_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「啊_H_啊啊啊啊_H_」"
			;2019/09/30　玛丽酱加筆　★加筆部分
			;舐陰莖　给对方乳交
			IF GROUPMATCH(SELECTCOM, 4, 11)
				PRINTFORMW 「在%CNAME("二人称")%的嘴里出来了什么的……对不起……」
			ELSE
				PRINTFORMW 「在、在别人面前射出来什么的……好、好羞耻……」
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF (YOKUBO() || ABL:露出癖 >= 3) && RAND:2
				CALL PRINT_STR, "「啊哈……_H_"
				IF INSERT("Ａ挿入") || TEQUIP:肛用振動棒 || GROUPMATCH(SELECTCOM, 2, 9, 14, 33, 70, 71, 72, 73, 74, 75, 136, 142, 143)
					PRINTFORM 一边被责备着%ADANA("肛門")%
				ELSEIF INSERT("尿道挿入") || GROUPMATCH(SELECTCOM, 15, 83, 74, 85, 86, 87, 88, 149, 151)
					PRINTFORM 一边被挖掘着%ADANA("尿道")%
				ELSEIF SELECTCOM == 5
					PRINTFORM 一边被欺负着乳頭
				ELSEIF SELECTCOM == 37
					PRINTFORM 一边被玩具玩弄着
				ELSE
					PRINTFORM 一边被%CNAME("二人称")%看着
				ENDIF
				CALL PRINT_STRW, @"%ADANA("精液")%就要biubiu地出来了_H_」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「……被%CNAME("二人称")%这样爱着好幸福……_H_」"
			ENDIF
		;それ以外
		ELSE
			;2019/09/30　玛丽酱加筆　★加筆部分
			;舐陰莖　给对方乳交
			IF GROUPMATCH(SELECTCOM, 4, 11) && RAND:2 == 0
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「在%CNAME("二人称")%的%TEXTR("小嘴/嘴")%里_H_%ADANA("精液")%%TEXTR("要出来了/射出来了/biubiu地出来了/biubiu地射出来了")%_H_」"
			;给对方足交
			ELSEIF SELECTCOM == 12
				CALL PRINT_STRW, @"「%TEXTR("＿/用脚")%%TEXTR("被踩/被上下搓动")%%TEXTR("的同时/着")%%TEXTR("要biubiu地出来了/去了/射了")%哦_H_」"
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
			ELSE
				CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
				CALL PRINT_STRW, @"「被%CNAME("二人称")%看到的同时……%ADANA("精液")%%TEXTR("biubiu地出来了/射了出来/喷出来了/喷薄而出了")%_H_」"
			ENDIF
		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:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 5)%」"
			CALL PRINT_STRW, @"「好厉害っ_H_又要去了っ_H_」"
			CALL PRINT_STRW, @"「就好像要把%ADANA("阴茎")%的里面射空一样地去了_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(5+RAND:3, TARGET, "要")%」"
			CALL PRINT_STRW, @"「又要_H_又要去了_H_」"
			IF CHECK("挿入", PLAYER, TARGET)
				PRINTFORM 「%CNAME("二人称")%的\@CHECK("Ａ挿入", PLAYER, TARGET) ? %ADANA("肛門")% # %ADANA("ヴァギナ")%\@太舒服了
			ELSEIF TEQUIP:自慰
				SELECTCASE FAV_ONANIE(SELECTCOM, "一番")
				CASE "Ｃ"
					PRINTFORM 「把%ADANA("阴茎", TARGET, TARGET)%上下搓动
				CASE "Ａ"
					PRINTFORM 「%ADANA("肛門")%%TEXTR("咕啾咕啾/里挤压/")%着
				CASE "Ｂ"
					PRINTFORM 「%ADANA("胸")%被欺负着
				CASE "尿"
					PRINTFORM 「%ADANA("尿道")%%TEXTR("咕啾咕啾/里挤压/")%着
				ENDSELECT
				PRINTFORM 实在是过于舒服
			ELSEIF SELECTCOM == 4
				PRINTFORM 「%CNAME("二人称")%的%TEXTR("嘴巴太舒服了/口交太绝妙了")%
			ELSEIF SELECTCOM == 0 || SELECTCOM == 10
				PRINTFORM 「%CNAME("二人称")%的手太舒服了
			ELSEIF SELECTCOM == 37
				PRINTFORM 「飞机杯里面太棒了
			ELSE
				PRINTFORM 「舒服过頭了
			ENDIF
			CALL PRINT_STRW, @"害得现在又要把%ADANA("精液")%\@COND("絶頂", TARGET) >= 2 ? %TEXTR("biubiu地射了好多/biubiu/满满地射")% # 射\@出来了_H_」"
		;それ以外
		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:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
			CALL PRINT_STRW, @"「%ADANA("肛門")%被_H_要去了_H_又要去了っ_H_」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%的%ADANA("肛門")%っ_H_要变得和%ADANA("ヴァギナ")%一样了_H_」"
			CALL PRINT_STRW, @"「要变成\@ CHECK("Ａ完美契合") ? 被%CNAME("二人称")%的 # \@%ADANA("阴茎")%插进来就会变得舒服的地方了_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕 || YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
			CALL PRINT_STRW, "「又要_H_又要去了_H_」"
			CALL PRINT_STRW, @"「%ADANA("肛門")%被这样挖掘着_H_要变成雌性了_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｂ絶頂20以上
;-------------------------------------------------
CASE "Ｂ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｂ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕 && YOKUBO()
			CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
			CALL PRINT_STRW, @"「ちくびっ_H_またイっちゃうっ_H_」"
			CALL PRINT_STRW, @"「胸部だけで全身ビクッって跳ねさせながらイっちゃうぅっ_H_」"
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ENDSELECT

;-------------------------------------------------
;刻印変動をトリガーにした口上
;刻印変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_MARKCNG_K25, 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
		CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%好舒服_H_」"
		IF ABL:Ｃ感覚 >= 3 && ABL:Ｂ感覚 >= 3 && ABL:Ａ感覚 >= 3 && ABL:Ｍ感覚 >= 3
			CALL PRINT_STRW, @"「%ADANA("阴茎")%也好%ADANA("胸")%也好%ADANA("肛門")%也好嘴巴也好全都好舒服咿咿咿_HHH_」"
		ELSEIF ABL:Ａ感覚 >= 3
			CALL PRINT_STRW, @"「%ADANA("肛門")%舒服过頭了要变得不正常了_H_」"
		ELSEIF ABL:Ｂ感覚 >= 3
			CALL PRINT_STRW, @"「%ADANA("胸")%好厉害_H_只是被摩擦来摩擦去就要去了呜呜_H_」"
		ELSEIF ABL:Ｍ感覚 >= 3
			CALL PRINT_STRW, @"「只是被舔着嘴唇_H_就会这么舒服_H_」"
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%舒服过頭了要变奇怪了_H_」"
		ENDIF
	ENDIF
;-------------------------------------------------
;屈服刻印Lv3取得
;-------------------------------------------------
CASE "屈服刻印Lv3取得"
	IF FIRST_EV("屈服刻印Lv3取得") == 0
		PRINTFORMW 「……啊」
		PRINTFORMW 「啊哈哈……已经不行了……」
	ENDIF
ENDSELECT

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

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

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

;-------------------------------------------------
;髪、顔、股間、腹、尻、くぱぁ、Ａくぱぁへのぶっかけ
;-------------------------------------------------
IF SHOOT("ぶっかけ")
	IF SHOOT("自慰")
		IF YOKUBO() || ABL:精液中毒 >= 3
			IF RAND:2
				CALL PRINT_STRW, @"「啊哈……_H_被%CNAME("二人称")%的%ADANA("精液")%、浇上了呢……_H_」"
			ELSE
				CALL PRINT_STR, @"「……呼呼_H_%CNAME("一人称")%"
				SELECTCASE TEQUIP:PLAYER:自慰
				CASE 4
					PRINTFORM 的%ADANA("阴茎")%被这样舔着
				CASE 9
					PRINTFORM 的%ADANA("肛門")%被这样舔着
				CASE 14
					PRINTFORM 的
					SIF TEQUIP:肛用振動棒
						PRINTFORM %TEXTR("被插入了/吃下了")%震动棒
					PRINTFORM \@ TALENT:縦深菊穴 && RAND:4 == 0 ? 縦深菊穴 # %ADANA("肛門")%\@被当做飞机杯
				CASEELSE
					PRINTFORM 被%TEXTR("当做撸管菜/看着撸管")%
				ENDSELECT
				CALL PRINT_STRW, @"只是被这么做了就要射出满满的%ADANA("精液")%来了呢……_H_」"
			ENDIF
			SIF COND("絶頂", PLAYER) >= 2
				CALL PRINT_STRW, @"「如何呢_H_%CNAME("一人称")%的身体被%CNAME("二人称")%的%ADANA("精液")%涂抹上的样子_H_」"
		ELSE
			PRINTFORMW 「诶、诶！？　为什么要往这里喷射出来……！」
			CALL PRINT_STRW, @"「呜呜…………_H_才、才没有兴奋什么的呢！」"
		ENDIF
	;大量射精以上
	ELSEIF COND("絶頂", PLAYER) >= 2
		PRINTFORMW 「哇！」
		IF YOKUBO() || ABL:精液中毒 >= 5
			CALL PRINT_STRW, @"「……呼呼呼_H_%CNAME("二人称")%的%ADANA("精液")%、黏糊糊的……_H_」"
			CALL PRINT_STRW, @"「……还想更多、一直射到全身都被染成白色也可以哦……_H_」"
		ENDIF
	ELSE
		IF FIRST_EV("絶頂：ぶっかけ")
			IF CFLAG:Ｓっ気フラグ
				IF EXP:PLAYER:射精経験 == 1
					IF TRUE_SEX(PLAYER) == "女性"
						CALL PRINT_STRW, "「呼呼_H_怎么样呢？　第一次的射精_H_」"
					ELSE
						SELECTCASE CSTR:PLAYER:学年
						CASE "初等部", "中等部"
							CALL PRINT_STRW, "「呼呼_H_恭喜变成大人_H_」"
							CALL PRINT_STRW, @"「『白色的尿』出来的感想如何？　%CNAME("二人称")%」"
						CASEELSE
							CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%直到这个年龄为止还保存着第一次的%ADANA("精液")%呢……_H_」"
							CALL PRINT_STRW, @"「怎么样呢？　把这么重要的%ADANA("精液")%不遗余力地消费掉的感觉_H_」"
						ENDSELECT
					ENDIF
				ELSE
					CALL PRINT_STR, @"「呼呼_H_在人的身体里热乎乎地浇上%ADANA("精液")%什么的、%CNAME("二人称")%可以说是"
						IF SHOOT("自慰")
							PRINTFORM 不懂规矩的人
						ELSE
							PRINTFORM 没有忍耐性的人
						ENDIF
					CALL PRINT_STRW, @"了呢……_H_」"
				ENDIF
				PRINTFORMW %CALLNAME:TARGET%、带着欣然的神情如此说着，贴近了%CALLNAME:MASTER%的嘴唇
				PRINTFORMW 「看、%CNAME("二人称")%」
				CALL PRINT_STRW, @"「因为是自己产出的东西、所以就请好好地来个扫除吧_H_」"
			ELSE
				IF EXP:PLAYER:射精経験 == 1
					IF YOKUBO()
						CALL PRINT_STRW, @"「呼呼_H_恭喜变成大人_H_」"
						CALL PRINT_STRW, @"「闻到了非常H的%TEXTS("气味")%啊……_H_」"
						CALL PRINT_STRW, @"「被这样射在身上的话\@TALENT:气味弱点 ? 大概马上就要去了 # 好像要因为%TEXTS("气味")%去了\@……_H_」"
					ELSE
						PRINTFORMW 「呜、呜哇……！」
						PRINTFORMW 「……诶？　这是第一次的射精吗……？」
						CALL PRINT_STRW, @"「%CNAME("二人称")%的童贞毕业%ADANA("精液")%……_H_」"
					ENDIF
				ELSE
					IF YOKUBO()
						CALL PRINT_STRW, @"「啊哈……_H_被%CNAME("二人称")%的%ADANA("精液")%浇灌了……_H_」"
						CALL PRINT_STRW, @"「好浓厚的%TEXTS("气味")%……被这样浓厚的精子浇在身上的话大概马上就会变奇怪……_H_」"
					ELSE
						PRINTFORMW 「呜、呜哇……！」
						PRINTFORMW 「……真是的、突然就喷在人家身上什么的……」
						CALL PRINT_STRW, @"「这么……%TEXTR(@"浓厚的/厉害的%TEXTS("气味")%的")%……_H_」"
					ENDIF
				ENDIF
			ENDIF
		ELSE
			IF YOKUBO() || ABL:精液中毒 >= 5
				CALL PRINT_STRW, @"「……呼呼_H_被%CNAME("二人称")%播撒了这么浓厚的种子什么的……_H_」"
				CALL PRINT_STRW, @"「要被%ADANA("精液")%H的%TEXTS("气味")%弄得晕乎乎的了……_H_」"
			ELSE
				PRINTFORMW 「……突、突然这样射出来什么的……」
				CALL PRINT_STRW, @"「……好浓烈的%TEXTS("气味")%……_H_」"
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;自慰で射精された(ぶっかけではなく床などに射精した)
;-------------------------------------------------
ELSEIF SHOOT("自慰")
	IF TALENT:恋慕 && RAND:2
		IF YOKUBO()
			CALL PRINT_STRW, @"「呜哇啊……出来了\@ COND("絶頂", PLAYER) >= 2 ? 好多的 # 好浓的\@量呢_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%、下次也要在%CNAME("一人称")%身上多多地喷发出来哦_H_」"
			CALL PRINT_STRW, @"「当然了，无论是嘴巴还是%ADANA("肛門")%都可以尽情使用，不用介意哦_H_」"
		ELSE
			PRINTFORMW 「……不是撸管而是用%CNAME("一人称")%射出来也没问题哦？」
			SIF RAND:4 == 0
				PRINTFORMW 「好像没有被理睬，总觉得有点寂寞……」
		ENDIF
	ELSEIF YOKUBO()
		CALL PRINT_STRW, "「在别人的眼前射精了什么的……_H_」"
		CALL PRINT_STRW, @"「真好啊……_H_%CNAME("一人称")%也想做做看……_H_」"
	ELSE

	ENDIF

;以下は通常の射精区分。
;-------------------------------------------------
;素股、足交や身体で射精させた
;-------------------------------------------------
ELSEIF SHOOT("脚")
	;初めて
	IF FIRST_EV("絶頂：脚") == 0
		PRINTFORMW 「……就这么舒服吗？」
		;施虐属性lv3以上
		IF ABL:施虐属性 >= 3
			CALL PRINT_STRW, @"「真是的、所以说%CNAME("二人称")%就是抖M啊_H_」"
		;屈服刻印lv3
		ELSEIF YOKUBO()
			CALL PRINT_STRW, "「那样的话、今后我也来给你做吧_H_」"
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……%CNAME("二人称")%如果那么喜欢的话、我会考虑的」
		ENDIF
	;二回目以降
	ELSE
		;施虐属性5以上かつ屈服刻印lv3
		IF ABL:施虐属性 >= 5 && YOKUBO() && RAND:3 == 0
			CALL PRINT_STRW, @"「啊哈_H_都是因为%CNAME("二人称")%不好，脚都变得黏糊糊的不是吗_H_」"
			CALL PRINT_STRW, "「不来负起责任舔一舔吗_H_」"
		;屈服刻印lv3
		ELSEIF YOKUBO() && RAND:2
			CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%的%ADANA("精液")%把脚弄得黏黏糊糊的不是吗_H_」"
			CALL PRINT_STRW, @"「虽然没有特别清理干净的必要……不过取而代之的、要把%CNAME("一人称")%的全身都射满白浊哦_H_」"
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……真是的、%CNAME("二人称")%真是个变态呢」
			PRINTFORMW 「嘛、虽说喜欢这种人的%CNAME("一人称")%也没有资格说这种话就对了」
		;施虐属性lv3以上
		ELSEIF ABL:施虐属性 >= 3
			CALL PRINT_STRW, @"「……%CNAME("二人称")%って足交されてイっちゃうような人だったんですね……_H_」"
			PRINTFORMW 「这就是调教的牺牲品吗……%CNAME("一人称")%在说什么呢……」
		;それ以外
		ELSE
			PRINTFORMW 「……%CNAME("二人称")%……」
			PRINTFORMW %CALLNAME:TARGET%向投去了怜悯的视线%CALLNAME:PLAYER%……
		ENDIF
	ENDIF
ELSEIF SHOOT("素股")
	PRINTFORMW
;-------------------------------------------------
;口で射精させた
;-------------------------------------------------
ELSEIF SHOOT("口")
	;初めて
	IF FIRST_EV("絶頂：口") == 0
		PRINTFORMW 「嗯……呼唔……啾噗……啾噜……」
		IF ABL:精液中毒 >= 3 || YOKUBO() || ABL:奉仕精神 >= 3 || TALENT:恋慕
			CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%……%CNAME("二人称")%的%ADANA("精液")%味道很浓厚呢_H_」"
			CALL PRINT_STRW, "「要是一直喝这个的话……_H_」"
		ELSE
			PRINTFORMW 「呜呃……感觉味道好奇怪……」
		ENDIF
	;精液中毒Lv5
	ELSEIF (ABL:精液中毒 >= 5 || YOKUBO()) && RAND:3
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「咕……嗯咕……呼啊……啊嗯……
		CASE 1
			PRINTFORMW 「啾噜……啾噗……嗯……嗯唔……
		CASEELSE
			CALL PRINT_STR, @"「%AEGI(TARGET, "要", "Ｍ異物", 4)%"
		ENDSELECT
		;大量射精時に低確率でゲップをだす
		SIF COND("絶頂", PLAYER) >= 2 && RAND:10 == 0
			CALL PRINT_STRW, @"…………咳噗_H_"
		PRINTFORMW 」
		CALL PRINT_STRW, @"「啊哈_H_%CNAME("二人称")%的%ADANA("精液")%无论什么时候都是那么浓厚呢_H_」"
		CALL PRINT_STRW, @"「因为喝了这样的特浓牛奶，现在已经变成了一次不喝这个就满足不了的体质哦……_H_」"
	;精液中毒Lv3
	ELSEIF ABL:精液中毒 >= 3 && RAND:2
		SELECTCASE RAND:3
		CASE 0
			PRINTFORMW 「咕……嗯咕……呼啊……啊嗯……」
		CASE 1
			PRINTFORMW 「啾噜……啾噗……嗯……啾……」
		CASEELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 4)%」"
		ENDSELECT
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		CALL PRINT_STRW, @"「啊嗯……_H_%CNAME("二人称")%的精子在嘴里侵犯着……_H_」"
	;奉仕精神Lv3以上
	ELSEIF ABL:奉仕精神 >= 3 || TALENT:恋慕
		SIF COND("絶頂", PLAYER) >= 2
			CALL PRINT_STRW, @"「呜哇啊……出来了好多呢_H_」"
		CALL PRINT_STRW, @"「就这么舒服吗……\@ MARK:屈服刻印 == 0 ? 稍微 # \@有些開心来着_H_」"
	;それ以外
	ELSE
		PRINTFORMW 「うげぇ……」
	ENDIF
;-------------------------------------------------
;胸で射精させた
;-------------------------------------------------
ELSEIF SHOOT("胸")
	;初めて
	IF FIRST_EV("絶頂：胸") == 0
		PRINTFORMW 「哇哇！　……明明是这种男人的胸部居然会觉得舒服吗」
	;奉仕精神Lv5
	ELSEIF ABL:奉仕精神 >= 5 && RAND:4 == 0
		CALL PRINT_STRW, @"「呼呼_H_%CNAME("二人称")%喜欢这里被这么做呢_H_」"
		CALL PRINT_STRW, @"「我明白了呢。因为%CNAME("二人称")%的%ADANA("阴茎")%舒服地颤动着的脉动已经传达到%CNAME("一人称")%的胸口了嘛_H_」"
	;奉仕精神Lv3以上
	ELSEIF ABL:奉仕精神 >= 3 && RAND:3 == 0
		PRINTFORMW 「%CNAME("二人称")%、舒服吗？」
		IF YOKUBO() || TALENT:恋慕
			CALL PRINT_STRW, @"「……为了让%CNAME("二人称")%獲得更多的幸福我会努力的_H_」"
		ELSE
			PRINTFORMW 「……虽然有些不好意思、不过既然%CNAME("二人称")%这么舒服的话我会再努力一下的」
		ENDIF
	;屈服刻印Lv3
	ELSEIF YOKUBO() && RAND:2
		CALL PRINT_STRW, "「把这里和乳頭用力摩擦的话……_H_啊哈……_H_」"
	;恋慕
	ELSEIF TALENT:恋慕
		CALL PRINT_STRW, @"「呼呼……%CNAME("二人称")%的%ADANA("精液")%……_H_」"
		CALL PRINT_STRW, @"「……那个、我会为了让%CNAME("二人称")%感到更加舒服的、如果可以的话请射更多的%ADANA("精液")%出来吧_H_」"
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;手で射精させた
;-------------------------------------------------
ELSEIF SHOOT("手")
	;初めて
	IF FIRST_EV("絶頂：手") == 0
		IF YOKUBO()
			CALL PRINT_STRW, "「啊、先走汁溢出来了……马上就要出来了呢_H_」"
			CALL PRINT_STRW, "「啊哈ッ_H_出来了很大的量哦……_H_」"
			CALL PRINT_STRW, @"「……这种程度还远远不够呢、%CNAME("二人称")%_H_」"
		ELSE
			PRINTFORMW 「诶……有什么在颤抖……呜哇啊！」
		ENDIF
	;奉仕精神Lv5
	ELSEIF ABL:奉仕精神 >= 5 && ABL:施虐属性 >= 2
		PRINTFORMW 「……这些%ADANA("精液")%从%CNAME("二人称")%的%ADANA("阴茎")%里……」
		CALL PRINT_STRW, "「呼呼……很舒服吗_H_」"
		CALL PRINT_STRW, @"「还不行哦_H_%CNAME("二人称")%的%ADANA("阴茎")%还要用%CNAME("二人称")%的%ADANA("精液")%来侵犯、请好好看着吧_H_」"
	;奉仕精神Lv3
	ELSEIF ABL:奉仕精神 >= 3
		PRINTFORMW 「那个、这里这样做的话……呼呼，看起来很享受呢」
	;それ以外
	ELSE
		PRINTFORMW 「呜呜……没有什么用来擦拭的东西吗……」
		SIF MARK:屈服刻印 == 2
			PRINTFORMW 「不快点擦干净的话就受不了了，好可怕……」
	ENDIF
;-------------------------------------------------
;性交で射精させた
;-------------------------------------------------
ELSEIF SHOOT("Ｖ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ｖ中出し") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;屈服刻印Lv3
	ELSEIF YOKUBO()
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
ELSEIF SHOOT("Ａ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ａ中出し") == 0
		IF YOKUBO() || ABL:精液中毒 >= 3
			CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%%CNAME("二人称")%的%ADANA("精液")%……_H_」"
		ELSEIF TALENT:恋慕
			PRINTFORMW 「……呼呼ッ」
			CALL PRINT_STRW, @"「啊、对不起……一想到里面有%CNAME("二人称")%的%ADANA("精液")%就好開心……_H_」"
		ELSE
			PRINTFORMW 「这、这样的事情！　中出什么的！」
			PRINTFORMW 「呜呜……感觉里面黏糊糊的……」
		ENDIF
	;避孕套着けていた場合
	ELSEIF TEQUIP:PLAYER:避孕套
		CALL PRINT_STRW, @"「%MIX_AEGI(5, TARGET, "要")%」"
		CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%明明是隔着避孕套_H_」"
		CALL PRINT_STRW, @" 「被%CNAME("二人称")%的_H_%ADANA("精液")%侵犯了_H_」"
	ELSEIF EXP_GAIN("肛内精液経験") >= 9
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%肚子_H_满满的_H_」"
		CALL PRINT_STRW, @"「肚子里变得鼓鼓的_H_涨起来了_H_」"
		CALL PRINT_STRW, @"「%CNAME("一人称")%、因为%CNAME("二人称")%的%ADANA("精液")%好像要妊娠了不是吗……%AEGI(TARGET, "要", "通常")%」"
	;Ａ絶頂時
	ELSEIF NOWEX:Ａ絶頂
		CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%」"
		IF RAND:2
			CALL PRINT_STRW, @"「要被%CNAME("二人称")%的%ADANA("精液")%在%ADANA("肛門")%里侵犯着去了呜呜呜呜呜_H_」"
		ELSE
			CALL PRINT_STRW, @"「啊_H_要变成雌性了_H_被%CNAME("二人称")%中出到变成雌性了呜呜呜_H_」"
		ENDIF
	;精液中毒5以上
	ELSEIF ABL:精液中毒 >= 5 && RAND:3 == 0
		IF RAND:2
			CALL PRINT_STRW, "「更多_H_中出更多_H_」"
			CALL PRINT_STRW, @"「已经没有%CNAME("二人称")%的%ADANA("精液", TARGET, PLAYER)%就已经活不下去了_H_」"
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%啊哈っ_H_%CNAME("二人称")%的%ADANA("精液")%_H_」"
			CALL PRINT_STRW, @"「还要_H_在%CNAME("一人称")%身上满满地继续射出%ADANA("精液")%来吧_H_」"
		ENDIF
	;屈服刻印Lv3
	ELSEIF (YOKUBO() || ABL:精液中毒 >= 3) && RAND:2
		CALL PRINT_STRW, @"「啊っ_H_最喜欢%CNAME("二人称")%喷出来的%ADANA("精液")%了_H_」"
		CALL PRINT_STRW, "「更多_H_想要更多_H_」"
	;恋慕
	ELSEIF TALENT:恋慕
		CALL PRINT_STRW, "「啊哈ッ_H_」"
		CALL PRINT_STRW, @"「是%CNAME("二人称")%的礼物呢……_H_」"
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「在、在这种地方出来可不舒服哦……\@ MARK:屈服刻印 >= 2 ? _H_ # \@」"
	ENDIF
;-------------------------------------------------
;接吻で射精
;-------------------------------------------------
ELSEIF SHOOT("接吻")
	PRINTFORMW 「诶……靠接吻\@YOKUBO() ? 就要射出%ADANA("精液")% # 射精\@了吗？」
	IF YOKUBO() && RAND:3 == 0
		CALL PRINT_STRW, @"「那么来和%CNAME("一人称")%一起让其他的地方也去了怎么样呢_H_」"
	ELSEIF ABL:Ｍ感覚 >= 5  && RAND:2
		CALL PRINT_STRW, @"「明明只用了嘴巴却变得如此舒服什么的……要和%CNAME("一人称")%一起融为一体了_H_」"
	ELSEIF TALENT:恋慕
		CALL PRINT_STRW, @"「总觉得好開心……为了让%CNAME("二人称")%变得更加更加地舒服，会更多更多地啾——上去的哦_H_」"
	ELSE
		PRINTFORMW 「老实说、吃了一惊……」
	ENDIF
;-------------------------------------------------
;面部騎乗で射精
;-------------------------------------------------
ELSEIF SHOOT("面部騎乗")
	PRINTFORMW
;-------------------------------------------------
;洗面奶で射精
;-------------------------------------------------
ELSEIF SHOOT("洗面奶")
	PRINTFORMW
;-------------------------------------------------
;逆舐陰で射精
;-------------------------------------------------
ELSEIF SHOOT("逆舐陰")
	PRINTFORMW 「……明明刺激的是%ADANA("阴蒂")%、也要射精了呢」
	IF YOKUBO()
		IF RAND:2
			CALL PRINT_STRW, "「……这样的话就要更多地開发到用男孩子的部分和女孩子的部分就能一起去的程度哦H_」"
		ELSE
			CALL PRINT_STRW, "「フフッ_H_それならどっちでどっちのイキ方も出来るようにして、男の子なのか女の子なのかわからなくなっちゃいましょうか_H_」"
		ENDIF
	ELSEIF TALENT:恋慕
		CALL PRINT_STRW, @"「……因为最喜欢哪一边都具备的%CNAME("二人称")%了、哪一边都会好好疼爱的呢_H_」"
	ENDIF
;-------------------------------------------------
;逆肛交、逆強姦で射精
;-------------------------------------------------
ELSEIF SHOOT("逆強姦") || SHOOT("逆肛交") || SHOOT("肛門奉仕")
	IF ABL:施虐属性 >= 3 || YOKUBO()
		CALL PRINT_STRW, @"「%CNAME("二人称")%_H_感觉就这么好吗_H_」"
		IF (ABL:Ａ感覚 >= 5 || TALENT:尻穴狂い) && RAND:2
			CALL PRINT_STRW, @"「这样的话，就要变成和%CNAME("一人称")%一样不被插入就不满足的身体了吧_H_」"
		ELSE
			CALL PRINT_STRW, "「这样的话就要更多更多地摩擦让你舒服了呢_H_」"
		ENDIF
	ENDIF
;-------------------------------------------------
;PLAYERが女で、イってしまった…
;-------------------------------------------------
ELSEIF SHOOT("調教者が女性")
	;強絶頂
	IF COND("絶頂", PLAYER) >= 2
		IF YOKUBO()
			PRINTFORMW 「呜哇……去的样子好厉害……」
			CALL PRINT_STRW, @"「呼呼呼……能舒服起来比什么都好_H_」"
		ENDIF
	;絶頂
	ELSEIF COND("絶頂", PLAYER) == 1
		PRINTFORMW
	ENDIF
ENDIF

;-------------------------------------------------
;角色が調教中に調教者を攻める際などの口上
;-------------------------------------------------
@KOJO_COUNTER_K25, ARGS
SELECTCASE ARGS
CASE "恍惚"
	IF TALENT:恋慕 || MARK:屈服刻印 != 0
		CALL PRINT_STRW, @"「%CNAME("二人称")%的表情……看上去好像很舒服……_H_」"
		PRINTFORMW 「会让你更舒服的呢♪」
	ELSE
		PRINTFORMW 「%CNAME("二人称", "どもり")%的脸……」
		PRINTFORMW 「……根本把持不住！」
	ENDIF
CASE "推倒"
	IF CFLAG:Ｓっ気フラグ
		CALL PRINT_STRW, @"「啊哈_H_%CNAME("二人称")%_H_」"
		CALL PRINT_STRW, "「摆出这么下流的姿态的话、不是让人很有虐待的想法吗_H_」"
	ELSEIF YOKUBO()
		CALL PRINT_STRW, @"「因为平时都是被给予快乐的一方、今天就让%CNAME("一人称")%来让你感受到快乐吧_H_」"
	ELSE
		CALL PRINT_STRW, @"「呜呜……今、今天可以让%CNAME("一人称")%来做吗……_H_」"
	ENDIF
CASE "強制終了"
	PRINTFORMW
CASE "復活"
	SIF YOKUBO()
		CALL PRINT_STRW, @"「呼呼_H_还有许许多多能做的事呢_H_」"
CASE "恍惚から復帰"
	SIF YOKUBO()
		PRINTFORMW 「唔……再多像刚刚那样就好了……」
CASE "助手が限界"
	IF (YOKUBO() || TALENT:恋慕) && INSERT("挿入") == 0
		PRINTFORMW 「もう%CNAME("助手")%は限界そうですね」
		PRINTFORMW 「我会带去休息的地方的，请稍微等一下哦」
	ENDIF
ENDSELECT

RETURN 1

;-------------------------------------------------
;イベント口上集
;-------------------------------------------------
@KOJO_EVENT_K25, ARGS
SELECTCASE ARGS
;-------------------------------------------------
;調教終了不可能
;-------------------------------------------------
CASE "調教終了不可能"
	;恋慕
	IF YOKUBO() || TALENT:恋慕
		CALL PRINT_STRW, @"「不可以哦_H_」"
		CALL PRINT_STRW, @"「更多更多、做到%CNAME("一人称")%满足为止吧_H_」"
	;それ以外
	ELSE
		PRINTFORMW 「诶……那个……」
		CALL PRINT_STRW, @"「……能再稍微、做一会儿吗……_H_」"
	ENDIF
;-------------------------------------------------
;避孕套装着
;-------------------------------------------------
CASE "Ｖ避孕套装着"
	;挿入指令
	IF TRAIN_GENRE("挿入", SELECTCOM)
		;PLAYヤーは着ける気満々
		IF TEQUIP:PLAYER:避孕套

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

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

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

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

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

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

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

		ENDIF
	ENDIF

;-------------------------------------------------
;調教後自慰
;-------------------------------------------------
CASE "調教後自慰"
	;恋慕
	IF TALENT:恋慕
		SELECTCASE RAND:3
		CASE 0
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3 + RAND:3)%」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%っ_H_もっともっといっぱい気持ちよくしてぇ……%AEGI(TARGET, "要", "通常")%」"
		CASE 1
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 5)%」"
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%%CNAME("二人称")%大好きぃ……_H_」"
		CASE 2
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3)%」"
			;ここから自慰の派閥とかなんやらで分岐する
			;……が、これこんな感じで良いのか？
			SELECTCASE TALENT_NAME(GETNUM(TALENT, "喜欢的自慰方式"))
			CASE "撸竿派"
				IF TALENT:童貞
					CALL PRINT_STRW, @"「%CNAME("二人称")%が%CNAME("一人称")%の%ADANA("阴茎")%をグチュグチュって擦って……_H_」"
				ELSE
					;再生処女なら問題ないのでは？　と判断
					IF TALENT:PLAYER:処女 != 0 && VAGINA(PLAYER)
						CALL PRINT_STRW, @"「%CNAME("二人称")%のおまんこで%ADANA("阴茎")%を搾り取られて……_H_」"
					ELSEIF EXP:ＢＬ経験 >= 100 && EXP:Ａ挿入経験 && EXP:MASTER:Ａ性交経験
						CALL PRINT_STRW, @"「%CNAME("二人称")%のお尻で%ADANA("阴茎")%をめちゃくちゃにされて……_H_」"
					ELSE
						CALL PRINT_STRW, @"「%CNAME("二人称")%が%CNAME("一人称")%の%ADANA("阴茎")%をグチュグチュって擦って……_H_」"
					ENDIF
				ENDIF
			CASE "插尻派"
				IF TALENT:Ａ処女
					CALL PRINT_STRW, @"「%CNAME("二人称")%に\@ PENIS(MASTER) ? %ADANA("阴茎")% # 假阳具\@で思いっきりメスにされちゃって……_H_」"
				ELSE
					CALL PRINT_STRW, @"「%CNAME("二人称")%に%ADANA("肛門")%を穿られちゃって……_H_」"
				ENDIF
			CASE "揉胸派"
				CALL PRINT_STRW, @"「%CNAME("二人称")%に%ADANA("胸")%ギュって摘ままれて……_H_」"
			CASE "尿道自慰派"
				IF TALENT:尿道処女
					CALL PRINT_STRW, @"「思いっきり拡がった尿道に\@PENIS(MASTER) ? %ADANA("阴茎")% # 假阳具\@を突っ込まれちゃって……_H_」"
				ELSE
					CALL PRINT_STRW, @"「%CNAME("二人称")%に尿道を気持ちよくしてもらっちゃって……_H_」"
				ENDIF
			ENDSELECT
		ENDSELECT
	;自慰中毒Lv3以上
	ELSEIF ABL:自慰中毒 >= 3
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 5)%」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%手が止まらないよぉ……_H_」"
	;それ以外
	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
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3+RAND:5)%」"
		CALL PRINT_STRW, @"「%CNAME("二人称")%……_H_%AEGI(TARGET, "要", "通常")%%CNAME("二人称", "かな")%っ_H_%AEGI(TARGET, "要", "通常", 2+RAND:4)%」"
	;それ以外
	ELSE
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 3+RAND:2)%对不起っ_H_」"
		CALL PRINT_STRW, @"「但是_H_身体好炙热_H_好想做_H_脑子里变得好奇怪_H_%AEGI(TARGET, "要", "通常", 3)%」"
	ENDIF
;-----------------------------
;夜袭接吻
;----------------------------
CASE "夜袭接吻"
	;M感覚Lv3以上
	IF ABL:Ｍ感覚 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;添い寝
;-------------------------------------------------
CASE "添い寝"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「嗯……？」
		PRINTFORMW 「呼呼，早上好喔」
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF

;-------------------------------------------------
;PLAYERがMASTERとASSI間で交代した際の台詞
;-------------------------------------------------
CASE "調教者交代"
	;PLAYERがASSIに変わった
	IF PLAYER == ASSI
		IF YOKUBO()
			IF RAND:2
				CALL PRINT_STRW, @"「让%CNAME("二人称")%来做吗？　明白了哦_H_」"
			ELSE
				CALL PRINT_STRW, @"「要把人家做到舒服到说不出话哦、%CNAME("二人称")%_H_」"
				CALL PRINT_STRW, @"「当然，能做%CNAME("主人")%的助手也很高兴哦_H_」"
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「%CNAME("主人", "どもり")%、这次是%CNAME("二人称")%来做吗…………_H_」"
		ENDIF
	;PLAYERが你に戻った
	ELSE
		IF YOKUBO()
			PRINTFORMW 「啊、难道说%CNAME("二人称")%、很想做吗？」
			CALL PRINT_STRW, @"「呼呼_H_那么就一起享受吧、%CNAME("二人称")%_H_」"
		ELSE
			PRINTFORMW 「要交换了吗？」
			CALL PRINT_STRW, @"「我明白了、那么就……那个……请多指教……_H_」"
		ENDIF
	ENDIF
;-------------------------------------------------
;partnerがTARGETとASSI間で交代した際の台詞
;-------------------------------------------------
CASE "対象交代"
	;partnerとしてエッチに誘われた
	IF COND("第一対象") == TARGET
		IF YOKUBO()
			IF PLAYER == MASTER
				CALL PRINT_STRW, @"「呼呼_H_看上去得让%CNAME("助手")%给弄得乱七八糟了呢_H_%CNAME("二人称")%」"
			ELSE
				CALL PRINT_STRW, @"「%CNAME("助手")%、请让我变得舒服透顶吧_H_」"
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「呜呜……这次%CNAME("一人称")%又要被调教了呢…………_H_」"
		ENDIF
	;指导者としてエッチに誘われた
	ELSE
		PRINTFORMW 「这次要对%CNAME("一人称")%%TEXTR("做什么/怎么做")%呢？」
		IF YOKUBO()
			CALL PRINT_STRW, @"「不仅仅是和一个人而是和两个人同时做吗、%CNAME("二人称")%真是精力旺盛_H_」"
		ELSE
			CALL PRINT_STRW, @"「那、那个……%CNAME("一人称")%也忍耐不住了……请、请多指教……_H_」"
		ENDIF
	ENDIF

;-------------------------------------------------
;清洁口交
;-------------------------------------------------
CASE "清洁口交"
	SELECTCASE TFLAG:口上分岐
	;お掃除前
	CASE 0
		IF YOKUBO()
			CALL PRINT_STRW, @"「呼呼ッ_H_%CNAME("二人称")%的%ADANA("阴茎")%、变得黏糊糊的呢_H_」"
			CALL PRINT_STRW, @"「请稍等一下……马上就为你清理干净_H_」"
		ELSE
			CALL PRINT_STRW, @"「唔、呜哇啊……变成了不得了的样子呢……_H_」"
			PRINTFORMW 「……那、那么、失礼了……」
		ENDIF
	;お掃除中
	CASE 1
		CALL PRINT_STRW, @"「%MIX_AEGI(3+RAND:4, TARGET, "要")%」"
	;お掃除で射精しなかった
	CASE 2
		IF YOKUBO() || TALENT:恋慕
			CALL PRINT_STRW, @"「……好了_H_已经变得干干净净了哦_H_」"
		ELSE
			PRINTFORMW 「……这、这样就好了吗……？」
		ENDIF
	;お掃除で射精しそう？
	CASE 3
		IF YOKUBO() || TALENT:恋慕
			CALL PRINT_STRW, @"「%MIX_AEGI(3, TARGET, "要")%……%CNAME("二人称")%、难道说是又要射精了吗_H_」"
			CALL PRINT_STRW, @"「没问题哦_H_继续接着射更多更多出来哦_H_」"
			CALL PRINT_STRW, @"「请就这样把%CNAME("一人称")%的嘴巴当成%CNAME("二人称")%的精液便所出来吧_H_」"
		ELSE
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%……诶、又、又要射精了吗！？」"
			PRINTFORMW 「……我、我明白了」
		ENDIF
	;射精した
	CASE 4
		PRINTFORMW 「嗯……？　！　嗯唔！」
		IF YOKUBO() || TALENT:恋慕
			IF RAND:2
				CALL PRINT_STRW, @"「……呼呼呼_H_在扫除的时候又弄脏了什么的、%CNAME("二人称")%真坏_H_」"
			ELSE
				CALL PRINT_STRW, @"「……呼呼_H_因为%CNAME("二人称")%、就是个急性子嘛_H_」"
			ENDIF
		ENDIF
	;お掃除で射精後
	CASE 5
		PRINTFORMW
	ENDSELECT
;-------------------------------------------------
;脱衣
;-------------------------------------------------
CASE "自発脱ぎ"
	;裸体变成了
	IF CHECK_CLO("裸体")
		IF YOKUBO() || TALENT:恋慕
			CALL PRINT_STRW, @"「呼呼_H_变得想和%CNAME("二人称")%做更多更多激烈的H了哦……_H_」"
			CALL PRINT_STRW, @"「不来做即使不裸着身体也会变得乱七八糟的、激烈的事情吗_H_」"
		ELSE
			PRINTFORMW 「这、这样下去的话衣服会弄脏的……」
			CALL PRINT_STRW, @"「！　绝、绝对不是！　想做更多H的事！　不是、这种意思…………_H_」"
		ENDIF
	;阴部剥きだし
	ELSEIF CHECK_CLO("Ｖ露出")
		IF YOKUBO()
			CALL PRINT_STRW, @"「呼呼_H_%ADANA("阴茎")%、完全露出来了呢……_H_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%、怎么样呢_H_%CNAME("一人称")%的%ADANA("阴茎")%变得硬邦邦的了……_H_」"
		ELSE
			PRINTFORMW
		ENDIF
	;部分脱ぎ
	ELSE
		IF YOKUBO() || TALENT:恋慕
			CALL PRINT_STRW, @"「呼呼_H_都是因为和%CNAME("二人称")%做了H的事情的缘故、要兴奋起来了……_H_」"
			CALL PRINT_STRW, @"「来做更多更多舒服透顶的事情吧……_H_」"
		ELSE
			CALL PRINT_STRW, @"「那、那个、天气越来越热了呢…………_H_」"
		ENDIF
	ENDIF
;----------------------------------------------------------------
;妊娠した
;----------------------------------------------------------------
CASE "妊娠発覚"
	;出産経験
	IF TALENT:出産経験 && RAND:3
		PRINTFORMW 「啊、%CNAME("二人称")%、%CNAME("一人称")%似乎是妊娠了」
		CALL PRINT_STRW, @"「这是第{TALENT:出産経験 + 1}个孩子了呢_H_」"
	;恋慕
	ELSEIF TALENT:恋慕
		CALL PRINT_STRW, @"「……呼呼呼、真的怀孕了呢……_H_」"
		PRINTFORMW 「不知为何感到很不可思议……」
	;ELSE
	;	PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;出産した
;----------------------------------------------------------------
CASE "出産"
	PRINTFORMW 「哈啊……哈啊……」
	;出産経験
	IF TALENT:出産経験
		SELECTCASE TALENT:出産経験
		CASE IS >= 5
			CALL PRINT_STRW, @"「呼呼呼……_H_又生了个可爱的宝宝呢……_H_」"
			CALL PRINT_STRW, @"「……已经习惯于这一瞬间的喜悦了也说不定……_H_」"
		CASEELSE
			PRINTFORMW 「这种辛苦无论经历多少次都习惯不了……」
			PRINTFORMW 「……不过、看到宝宝像这样健康生产出来的瞬间，就觉得那种苦难已经烟消云散了呢」
		ENDSELECT
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW 「生孩子这件事、原来这么辛苦啊……」
	;ELSE
	;	PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;兒童が大きくなった
;----------------------------------------------------------------
CASE "子出口"
	;出産経験
	IF TALENT:出産経験
		PRINTFORMW 「……无论生了多少次，还是不习惯这种时候啊」
		PRINTFORMW 「回頭想想，那孩子像是昨天才生下来的一样小呢……」
	;恋慕
	ELSEIF TALENT:恋慕
		;孕ませ経験有
		IF EXP:孕ませ経験
			PRINTFORMW 「……直到现在我都自认为、我知道孩子长大时的心情」
			PRINTFORMW 「但是、一旦像这样变成生孩子的一方、感受的思维方式也会改变呢……」
		ELSE
			PRINTFORMW 「……明明最初还是那么小的孩子、现在已经长得这么大了呢……」
			PRINTFORMW 「虽然很開心、但也感到有些寂寞……真是不可思议的感觉」
		ENDIF
	;ELSE
	;	PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;性交後に抜いた時
;----------------------------------------------------------------
;恥ずかしいところを見せてくれる
;----------------------------------------------------------------
CASE "中出し後くぱぁ"
	CALL PRINT_STRW, "「哈啊……_H_哈啊……_H_」"
	;屈服刻印lv3
	IF YOKUBO() && RAND:2
		CALL PRINT_STRW, @"「%MIX_AEGI(1, TARGET, "要")%%CNAME("二人称")%……_H_请好好看着_H_」"
		;避孕套有些
		IF TEQUIP:PLAYER:避孕套
			CALL PRINT_STRW, @"「托%CNAME("二人称")%的福……_H_%CNAME("一人称")%的%ADANA("肛門")%变得这么的H……_H_」"
		ELSE
			CALL PRINT_STRW, @"「\@COND("絶頂", PLAYER) >= 2 ? 好多 # 浓厚的\@%ADANA("精液")%……要在%ADANA("肛門")%里出来了……_H_%AEGI(TARGET, "要", "通常")%」"
		ENDIF
		CALL PRINT_STRW, "「更多……来做更多把我弄得乱七八糟的事情吧……_H_」"
	;恋慕
	ELSEIF TALENT:恋慕
		;避孕套有些
		IF TEQUIP:PLAYER:避孕套
			CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常")%」"
			CALL PRINT_STRW, @"「……%CNAME("二人称")%……下次请在里面射出来吧……_H_」"
		ELSE
			CALL PRINT_STRW, @"「要被%CNAME("二人称")%的%ADANA("精液")%填满了……_H_%AEGI(TARGET, "要", "通常")%」"
		ENDIF
	ELSE
		CALL PRINT_STRW, @"「%CNAME("二人称")%……_H_来做更多吧……_H_」"
	ENDIF
;----------------------------------------------------------------
;恥ずかしいところを見せてくれない
;好感度が高いと起きないので、恋慕で分岐させる意味はない。
;また、不知羞恥ならば発生しない
;----------------------------------------------------------------
CASE "中出し後害羞"
	PRINTFORMW 「请、请不要看……」
;----------------------------------------------------------------
;精液を味わう
;----------------------------------------------------------------
CASE "中出し後精液掻き出し"
	CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "通常", 4)%%CNAME("二人称")%的%ADANA("精液")%\@ COND("絶頂") >= 2 ? 份量好惊人……这实在是 # \@太浓厚了……_H_」"
	CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3)%\@ABL:精液中毒 >= 5 ? %ADANA("精液")%好好吃 # 味道好奇怪\@……_H_」"
;----------------------------------------------------------------
;気持ちよくてぐったり
;----------------------------------------------------------------
CASE "中出し後恍惚"
	;恋慕
	IF (TALENT:恋慕 || YOKUBO()) && TEQUIP:PLAYER:避孕套 == 0
		CALL PRINT_STRW, @"「啊嗯……_H_肚子里的%CNAME("二人称")%的%ADANA("精液")%\@COND("絶頂", PLAYER) >= 3 ? 要把里面撑得鼓鼓的了 # 满满的\@……_H_」"
	ELSE
		CALL PRINT_STRW, @"「……%TEXTR("嗯嗯……/呼啊……/啊……/啊哈……")%_H_」"
	ENDIF
;-------------------------------------------------
;ビデオ保存
;-------------------------------------------------
CASE "ビデオ保存"
	;恋慕
	IF YOKUBO() || ABL:露出癖 >= 5
		CALL PRINT_STRW, "「呼呼_H_要保存这盘录像带呢_H_」"
		CALL PRINT_STRW, @"「……之后也给%CNAME("一人称")%看看吧、%CNAME("二人称")%_H_」"
	ELSE
		PRINTFORMW 「诶、这、这个，要保存下来吗……！？」
		CALL PRINT_STRW, "「呜……都、都说到这份上了就没办法了…………_H_」"
	ENDIF
;-------------------------------------------------
;ビデオ売却
;-------------------------------------------------
CASE "ビデオ売却"
	;恋慕
	;IF TALENT:恋慕
	;	PRINTFORMW
	;ELSE
	;	PRINTFORMW
	;ENDIF
	PRINTFORMW 「啊、要卖出这盘录像带呢」
	CALL PRINT_STRW, "「会被怎样的人拿去用呢……_H_」"
;-------------------------------------------------
;ビデオ売却失敗
;-------------------------------------------------
CASE "ビデオ売却失敗"
	PRINTFORMW 「ハァ……そりゃあいくらなんでもマニアックすぎますもん。当然ですよ……」
	PRINTFORMW 不良在庫の山を前に頭を抱える%CALLNAME:MASTER%を、%CALLNAME:TARGET%は呆れた表情で見つめていた…
;----------------------------------------------------------------
;塞子をしていない状態での液体浣腸口上
;----------------------------------------------------------------
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 「……啊」
		IF ABL:施虐属性 >= 3 && (YOKUBO() || TALENT:恋慕)
			CALL PRINT_STRW, @"「……呼呼呼_H_在插进屁股之前%ADANA("精液")%就出来了呢_H_」"
			CALL PRINT_STRW, @"「你看_H_%ADANA("精液")%%TEXTR("玷污的/染白")%的%ADANA("肛門")%已经在渴求着%CNAME("二人称")%的%ADANA("阴茎")%一颤一颤了哦_H_」"
		ELSE
			PRINTFORMW 「……没、没问题哦。毕竟这样的事也不罕见……」
			CALL PRINT_STRW, @"「那、那个……如果现在、那个、还能挽回的话……_H_」"
		ENDIF
	ELSEIF YOKUBO()
		CALL PRINT_STRW, @"「フフ_H_%CNAME("一人称")%の姿、そんなにエッチでしたか_H_」"
	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_K25, ARGS
#DIM ACTOR
#DIMS ACTNAME
SELECTCASE ARGS
CASE "調教相手に選ばれた"
	IF YOKUBO()
		CALL PRINT_STRW, @"「呼呼_H_直到%CNAME("partner")%恢复过来为止就由%CNAME("一人称")%来做调教对象吧_H_」"
		CALL PRINT_STRW, @"「好哦_H_要让我舒服到不得了哦_H_」"
	ELSE
		PRINTFORMW 「那、那个、之后、之后是%CNAME("一人称")%吗……？」
		CALL PRINT_STRW, @"「请、请手下留情……_H_」"
	ENDIF
CASE "助手に抜擢"
	;初めて
	IF EXP:助手経験 == 0
		IF YOKUBO()
			PRINTFORMW 「能帮上%CNAME("二人称")%的H的话就太好了……」
			CALL PRINT_STRW, @"「可以啊_H_会加油喔_H_」"
		ELSE
			PRINTFORMW 「那、那个、帮助%CNAME("二人称")%就行了吗……？」
			PRINTFORMW 「那、那个……我、我会加油的」
		ENDIF
	ELSE
		IF YOKUBO()
			CALL PRINT_STRW, @"「呼呼_H_我会加油帮助%CNAME("二人称")%的_H_」"
		ELSE
			PRINTFORMW 「好、好的、会加油的……」
		ENDIF
	ENDIF

CASE "助手：主人に清洁口交"
	IF YOKUBO() || TALENT:恋慕
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 3+RAND:3)%」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物")%是_H_キレイ成为了よ_H_」"
	ELSE
		CALL PRINT_STRW, @"「……そ、その、%CNAME("二人称")%の%ADANA("阴茎")%、汚くなってしまってるので…………キ、キレイにしてあげます……_H_」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物", 5+RAND:2)%」"
	ENDIF
CASE "助手：partnerに清洁舔阴"
	IF YOKUBO()
		CALL PRINT_STRW, @"「呼呼ッ_H_被满满地射上了一发呢_H_」"
		CALL PRINT_STRW, @"「让我诚心诚意地、把%CNAME("partner")%的%ADANA("ヴァギナ")%清理干净吧_H_」"
	ELSE
		CALL PRINT_STRW, @"「そ、それでは……%AEGI(TARGET, "要", "Ｍ異物", 2+RAND:2)%」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物")%%CNAME("二人称")%の%ADANA("精液")%の味がする……_H_」"
	ENDIF
CASE "助手：partnerに清洁舔A"
	IF YOKUBO()
		CALL PRINT_STRW, @"「フフ_H_%CNAME("二人称")%の味がする……_H_」"
		CALL PRINT_STRW, @"「%ADANA("肛門")%が%ADANA("精液")%を洩らさないようにとヒクヒクしていて……なんだか%CNAME("一人称")%までドキドキしちゃいます_H_」"
	ELSE
		CALL PRINT_STRW, @"「そ、それでは……%AEGI(TARGET, "要", "Ｍ異物", 2+RAND:2)%」"
		CALL PRINT_STRW, @"「%AEGI(TARGET, "要", "Ｍ異物")%%CNAME("二人称")%の%ADANA("精液")%の味がする……_H_」"
	ENDIF
CASE "助手：主人にＰ恥垢清洁口交"
	IF YOKUBO()
		CALL PRINT_STRW, @"「呼呼_H_想要我吃下包皮垢什么的、%CNAME("二人称")%真是个不得了的人啊_H_」"
		CALL PRINT_STRW, @"「好的哦_H_让我帮你打扫得、干干净净的_H_」"
	ELSE
		PRINTFORMW 「诶、想、想要给欧金金来一次扫除吗……！？」
		CALL PRINT_STRW, @"「呜、呜呜……我知道了…………_H_」"
		CALL PRINT_STRW, @"「本、本来是不可以的！」"
	ENDIF
CASE "助手：撮影開始"
	SELECTCASE EXP:撮影経験
	CASE IS >= 15
		IF YOKUBO() && RAND:2
			PRINTFORM 「%CNAME("partner")%，因为是在%TEXTR("录像/摄影")%，可以
			IF INSERT("挿入")
				PRINTFORM 让结合部位看得更清楚地动起来
			ELSEIF ORAL_PLAY()
				PRINTFORM 以摄像机视角来拍
			ELSE
				PRINTFORM 让画面看起来更清晰地动起来
			ENDIF
			PRINTFORMW 吗？」
		ELSE
			PRINTFORMW 「……做了这么多以后就平静下来了」
			PRINTFORMW 「虽然这很复杂……」
		ENDIF
	CASE IS >= 5
		PRINTFORMW 「今天也请让我来拍吧」
	CASE 0
		IF YOKUBO()
			PRINTFORMW 「那、那个……%CNAME("一人称")%要拍%CNAME("partner")%……？」
			PRINTFORMW 「那个……虽然没有\@ COND("自撮り送信済み") ? 录像方面的 # 这样的 \@摄影经验……但我会试试看的」
		ELSE
			PRINTFORMW 「诶、要、要拍这个状态的%CNAME("partner")%吗……？」
			PRINTFORMW 「……我、我知道了……」
		ENDIF
	CASEELSE
		PRINTFORMW 「那、那么、那个，今天也请多関照……」
	ENDSELECT
CASE "助手：調教開始前の準備後台詞"

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

CASE "室内調教：ギャラリー増加台詞"
	IF YOKUBO()
		CALL PRINT_STRW, @"「…………啊哈_H_」"
	ELSE
		CALL PRINT_STRW, @"「要、要要要要、要做什么……っ_H_」"
	ENDIF
CASE "室内調教：感想台詞"
	CALL PRINT_STRW, @"「呜哇啊……好棒的样子………………_H_」"
CASE "助手で性処理：おあずけ"

CASE "助手で性処理"
	IF YOKUBO() || TALENT:恋慕
		CALL PRINT_STRW, @"「……呼呼_H_明白了_H_」"
		CALL PRINT_STRW, @"「为了让%CNAME("二人称")%感到更舒服，我会竭尽全力侍奉您的_H_」"
	ELSE
		PRINTFORMW 「……诶、性、性処理吗……」
		CALL PRINT_STRW, @"「虽、虽然也不是不可以啦…………_H_」"
	ENDIF
CASE "助手で性処理：事後"

;COND("精液の優勢")で誰の兒童を孕んでしまったかを判定できます
;名前を出したい時には%COND("精液の優勢")%を用いてください
CASE "受精確認"
	ACTOR = COND("精液の優勢")
	ACTNAME = %CALLNAME:ACTOR%
	PRINTFORMW 「……那个、%CNAME("一人称")%、大概是怀孕了吧」
	PRINTFORM 「试着调查了一下谁是孩子的父亲、\@ TALENT:出産経験 ? 这一次 # \@
	IF ACTOR == MASTER
		PRINTFORMW %CNAME("二人称")%要做%TEXTR("父親/父亲/爸爸")%的样子呢」
		CALL PRINT_STRW, @"「呼呼_H_可不要变成像%CNAME("二人称")%一样喜欢色色的事情的孩子哦_H_」"
	ELSE
		PRINTFORMW %CNAME(ACTNAME)%が%TEXTR("父親/父亲/爸爸")%みたいですね」
		SELECTCASE ACTNAME
		CASE "弗理希艾尔"
			PRINTFORMW 「%CNAME(ACTNAME)%の子なんですから、きっと優秀な子なんでしょうね」
			SIF RAND:3 == 0
				PRINTFORMW 「……不、说不定意外地粗神经吧」
		CASE "濡烏の君"
			PRINTFORMW 「%CNAME(ACTNAME)%と%CNAME("一人称")%との間の子ですか……ものすごくモフモフしてそうですね……」
			PRINTFORMW 「……不努力的话」
		CASE "西西莉亚"
			PRINTFORMW 「会长成才智过人的孩子吧」
			PRINTFORMW 「%CNAME("一人称")%也不能落后，为此不努力的话就……」
		CASE "阿丽努"
			PRINTFORMW 「……那个、大概会长成非常擅长保健体育的孩子呢……」
		CASE "六華"
			PRINTFORMW 「%CNAME(ACTNAME)%との子ですか……」
			PRINTFORMW 「该怎么说呢、大概会长成很厉害的孩子吧」
		CASE "樱"
			PRINTFORMW 「……不管怎么样，这孩子的身体大概是没问题呢」
			PRINTFORMW 「请放心吧、%CNAME("二人称")%」
		CASE "哈娜"
			;SELECTCASE RAND:2
			;CASE 0
			;別に尿道に夢中变成了っていいだろ！
			;	PRINTFORMW 「希望你可不能和家长一样沉溺于尿道的感觉中呢……」
			;CASEELSE
				PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、元気いっぱいで可爱子に育ってくれそうです」
				PRINTFORMW 「……大概也会长出狼耳朵来吧」
			;ENDSELECT
		CASE "優里"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、きっと明るくて很强子に育ってくれるでしょうね」
		CASE "帕拉奇娜"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、きっと真面目な良い子に育ちますね」
			SIF RAND:3 == 0
				PRINTFORMW 「……不不、万一养出个不良系……」
		CASE "麦莉爱娜"
			PRINTFORMW 「……就是说，对于%CNAME("二人称")%来说、是年龄差得比较大的弟弟妹妹、这个意思对吧」
			PRINTFORMW 「呼呼、请期待吧、%CALLNAME:MASTER%哥哥♪」
		CASE "莉雅拉"
			PRINTFORMW 「……好像会成长为惊人地色气的孩子呢」
		CASE "成美"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、きっと文武両道な子に育つんでしょうね……」
			PRINTFORMW 「……当然、就算不是那样也没関系哦？　因为他不是任何人、就只是%CNAME("一人称")%可爱的孩子嘛」
		CASE "アイリ"
			PRINTFORMW 「……为了到了发情期也没问题、不加油可不行呢」
		CASE "織"
			PRINTFORMW 「吸血鬼用的婴儿床该放在哪里呢……」
			PRINTFORMW 「再不济也要用%CNAME("一人称")%的羽毛……」
		CASE "槞彁"
			PRINTFORMW 「%CNAME(ACTNAME)%の子……」
			PRINTFORMW 「……想要什么时候带这孩子去她的故乡看一看呢」
		CASE "杏珠"
			PRINTFORMW 「%CNAME(ACTNAME)%の子……」
			PRINTFORMW 「呼呼。一定会很有精神哟」
		CASE "小菊"
			PRINTFORMW 「这孩子……似乎会活蹦乱跳地被生下来呢」
			SIF TALENT:ACTOR:相思相愛
				PRINTFORMW 「きっと%CNAME(ACTNAME)%みたいに笑顔の似合う子に育ちますよ」
		CASE "焰"
			;SELECTCASE RAND:2
			;CASE 0
			;言って是けない
			;	PRINTFORMW 「……親権はどうなるのでしょうか」
			;CASEELSE
				PRINTFORMW 「この子も%CNAME(ACTNAME)%みたいに、一緒にいたいって思える人と出会ってほしいですね」
			;ENDSELECT
		CASE "万音"
			IF CEVENT("淫魔覚醒：万音", ACTOR)
				PRINTFORMW 「……やっぱり%CNAME(ACTNAME)%みたいに育てるべきなんでしょうか……？」
			ELSE
				PRINTFORMW 「因为淫魔的必要品似乎是精子、果然应该培养得H一些吗……？」
			ENDIF
		CASE "卡莉斯塔"
			PRINTFORMW 「天使和堕天使之间的孩子……这孩子会度过怎样的一生呢……」
		CASE "祥子"
			PRINTFORMW 「这孩子看上去像是普通的人类呢。会长成冷静温柔的孩子吧」
			PRINTFORMW 「……不过、不知道为何似乎很喜欢乳制品之类的……」
		CASE "琉娜"
			PRINTFORMW 「呼呼、果然是龙的子嗣啊……肚子里暖呼呼的」
		CASE "玛丽"
			PRINTFORMW 「虽然这孩子说不定会历经诸多辛劳、但还是希望他能幸福……」
		CASE "千穂"
			PRINTFORMW 「这孩子……感到了他的魂有一种不可思议的感觉呢……」
			PRINTFORMW 「转生……？　还是说……」
		CASE "恭子"
			PRINTFORMW 「魔法少女和堕天使的孩子吗……」
			PRINTFORMW 「虽然会经受苦劳、但还是希望他能幸福地成长呢」
		CASE "維吹"
			PRINTFORMW 「%CNAME(ACTNAME)%との子か……」
			PRINTFORMW 「为了不被骂、不好好培养可不行啊」
		CASE "西露芙"
			PRINTFORMW 「%CNAME(ACTNAME)%、子どもを授かったって言ったら嬉しそうだったんですよ」
			PRINTFORMW 「是因为有些不好意思吗、都不怎么表现在脸上呢」
		CASE "玲子"
			PRINTFORMW 「%CNAME(ACTNAME)%との子ですし、きっと綺麗な子に育つでしょうね」
			;難しい問題じゃよね
			;SIF TALENT:ACTOR:出産経験
			;	PRINTFORMW 「%CNAMET(ACTNAME)%より先に子どもを産んでよいものでしょうか……」
		CASE "碧"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですし、きっと頼りがいのある子に育ってくれるでしょうね」
		CASE "奥丝卡"
			PRINTFORMW 「……%CNAME(ACTNAME)%との子ですから、守り抜きますよ。絶対に」
		CASE "寧子"
			PRINTFORMW 「这孩子……看上去像是普通的人类吧」
			PRINTFORMW 「希望这孩子能茁壮成长」
		CASE "鈴"
			PRINTFORMW 「%CNAME(ACTNAME)%みたいな体質ではなさそうですね」
			PRINTFORMW 「但是不知道为什么呢、这种要成长为色色的孩子的感觉……」
		CASE "真"
			PRINTFORMW 「呼呼、一定会成长为坚强的孩子吧」
		CASE "灯"
			PRINTFORMW 「果然会长成中性的孩子吧……」
		CASE "佑香"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですし、運動神経が良い子に育つかもしれませんね」
		;CASE "玛塞璐"
		;	PRINTFORMW 「……为了不抚养出坏孩子，必须努力了呢」
		CASE "格蕾丝"
			PRINTFORMW 「嘛……那个……」
			PRINTFORMW 「……一定会成长为强壮的孩子吧……」
		CASE "安娜"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですし、きっとおしとやかな子に育つでしょうね」
			SIF CEVENT("名没有の呼び出し", ACTOR)
				PRINTFORMW 「……什么？ 虽说%CNAME("二人称")%、长着那样不得了一张脸……」
		CASE "百合香"
			PRINTFORMW 「%CNAME(ACTNAME)%との子かぁ……」
			PRINTFORMW 「稍微、有些不可思议的感觉呢」
		CASE "綾乃"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、きっと温柔子に育ってくれるでしょうね」
			PRINTFORMW 「……虽说也可能会温柔过了頭吧」
		CASE "栞"
			PRINTFORMW 「実はですね、%CNAME("二人称")%より先に%CNAME(ACTNAME)%にこのことを話したんですよ」
			PRINTFORMW 「然后、那个人说，这孩子生活在一个可以幸福生活的星球上呢」
			PRINTFORMW 「……真的、希望变成那样呢」
		CASE "南実"
			PRINTFORMW 「……就是说、对%CNAME("二人称")%来说是侄子或者侄女呢」
			PRINTFORMW 「呼呼、从今天起这孩子就要请多指教了、%CALLNAME:MASTER%叔叔♪」
		;CASE "贰壹伍"
		;	PRINTFORMW 「%CNAME(ACTNAME)%の子なんですから、きっと素晴らしい子に育ってくれますね」
		;	PRINTFORMW 「……？　なんでそんな顔をしてるんですか？」
		CASE "千紗"
			PRINTFORMW 「フフッ、%CNAME(ACTNAME)%の子ですから、きっと元気いっぱいな子に育ちますね」
			;ここは事情に感づいてると考えても良いし、知らずにただかわいそうな女の子のためを思っての発言と捉えても良い
			PRINTFORMW 「……想让这孩子幸福起来呢」
		CASE "小夜"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですし、きっと頑張り屋桑になるでしょうね」
		CASE "诺伊"
			IF CEVENT("家族関係") == 0
				;もし诺伊側的家族関係が１ならおかしな命令になってるので、ここで消しておく
				SIF CEVENT("家族関係", ACTOR)
					CALL DEL_CEVENT, "家族関係", ACTOR
				PRINTFORMW 「……実は、%CNAME(ACTNAME)%って%CNAME("一人称")%の伯父桑なんですよね……」
				CALL SET_CEVENT, "家族関係"
				CALL SET_CEVENT, "家族関係", ACTOR
			ELSE
				PRINTFORMW 「%CNAME("一人称")%と%CNAME(ACTNAME)%って親戚のはずなんですよね……」
			ENDIF
			PRINTFORMW 「虽说本人说了没问题，但冷静下来一看真的没问题吗……」
		;こちらは旧莉酱
		;CASE "莉"
		;	PRINTFORMW 「とっても聰慧子に育ってくれそうですね」
		;	PRINTFORMW 「……けど、小さいころから酱と教育しないと大変なことになりそう……」
		CASE "莉"
			PRINTFORMW 「……%CNAME(ACTNAME)%に話したら、『是这様吗』って返ってきたんですよ」
			PRINTFORMW 「但是、声音听起来似乎有些高兴哦」
		CASE "白色死神", "アーリャ"
			PRINTFORMW 「……变成什么样都没问题、只希望这孩子的人生中不要留下「后悔」这个词语」
		CASE "莉迪亚"
			PRINTFORMW 「查了各种资料以后、发现体质上并没有问题呢」
			PRINTFORMW 「希望能快快长大呢……」
		CASE "休托莉"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、元気いっぱいでのびのびとした子に育ちそうですね」
			PRINTFORMW 「之后……对了、得告诉他怎么改变眼睛的颜色……」
		CASE "棗"
			PRINTFORMW 「……%CNAME(ACTNAME)%との子ってことは、%CNAME("二人称")%の子も同然ですからね」
			PRINTFORMW 「所以%CNAME("二人称")%也要帮忙哦？」
		CASE "静奈"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですから、きっと温柔子に育つでしょうね」
		;CASE "リナ"
		;	PRINTFORMW 「……%CNAME(ACTNAME)%に妊娠したって言ったら、彼女、とっても喜んでました」
		;	PRINTFORMW 「当场就迅速地画好了素描……而且画得还很棒、果然很厉害啊……」
		CASE "紬希"
			PRINTFORMW 「……実は、ちょっとだけ心配だったんですよね。%CNAME(ACTNAME)%の子どもを妊娠したって言って喜んでくれるか」
			PRINTFORMW 「でもとりこし苦労だったみたいで、とっても喜んでくれました。……この子も、%CNAME(ACTNAME)%みたいに温柔子に育ってくれるでしょうね」
		CASE "遥"
			PRINTFORMW 「……本人は喜んでくれたんですが、ちょっと罪悪感がわきますね……」
			PRINTFORMW 「……あ、子どもは%CNAME(ACTNAME)%の親御桑が育ててくれるそうです」
		CASE "梅普尔"
			PRINTFORMW 「きっと頭の良い子に育つとは思いますが、ぶっとび具合はどうなるのかなぁ……」
		CASE "米娅"
			PRINTFORMW 「先に%CNAME(ACTNAME)%に報告をしたんですけど、なんとも複雑そうな顔をされていたんですよね」
			PRINTFORMW 「だからと言って安易に妊娠を勧めるのも問題ですし……」
		CASE "魔華"
			PRINTFORMW 「%CNAME(ACTNAME)%との子かぁ……」
			PRINTFORMW 「なんというか、ものすごくエッチな子に育ちそうですね……%CNAME("二人称")%くらい」
		CASE "帕图拉"
			PRINTFORMW 「%CNAME(ACTNAME)%の子ですし、落ち着いていて温柔子になりそうですね」
			PRINTFORMW 「……%CNAME(ACTNAME)%、喜んでくれるといいなぁ……」
		CASEELSE
			PRINTFORMW 「想让他快快长大呢」
		ENDSELECT
	ENDIF
ENDSELECT

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

@MENU_SINGLE_ENDING_K25
#DIM ACTOR
;詩燈寧子酱の口上を参考にさせていただきました。有がとうございます
;エンディングを書いたら、下のRETURN 0を消してください

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

;乃々が妊娠可能になるイベント。条件として「相思相愛+屈服刻印が3になっている+淫紋が最大まで彫られていること+腸液分泌体質+Ａ拡張が3以上かつ縦深菊穴であるあるいはＡ拡張が4以上」であることが必要
;それに加え、「MASTERに孕ませ経験アリで阴茎がある」場合に起きる
;また、妊娠可能を消せるようにした関係上、妊娠中や受精中は起こさないようにした
IF TALENT:相思相愛 && MARK:淫紋 >= 4 && YOKUBO() && TALENT:腸液分泌体質 && PENIS(PLAYER) && EXP:PLAYER:孕ませ経験 && (ABL:Ａ拡張 >= 4 || (ABL:Ａ拡張 >= 3 && TALENT:縦深菊穴))
	SIF COND("妊娠可能") == 0 || (!COND("避妊不要", TARGET) && !COND("受精確認", TARGET))
		STR:エンディング += "1_乃々：妊娠可/"
ENDIF

SIF CEVENT("乃々：初散歩")
	STR:エンディング += "2_乃々：初散歩/"

;你が男性かつ伪娘ではない、かつ謎之魅大力士の場合、伪娘になれるイベントが起きるようにする
SIF TALENT:MASTER:男性 && TALENT:MASTER:伪娘 == 0 && TALENT:MASTER:謎之魅力 >= 1
	STR:エンディング += "3_伪娘講座/"

;灯君が女の子の状態かつ乃々君と相性：◎の時、一緒に女物の服を買いに行くイベント
;百合香酱のイベントに触発されて作った二番煎じ
;イベントの処理も百合香酱イベントを参考にさせていただきました
ACTOR = FIND_COND("灯")
SIF CEVENT("灯君といっしょ！") || (ACTOR && CEVENT("伪娘の理由", ACTOR) && TALENT:ACTOR:女性 && COND("相性◎", ACTOR) )
	STR:エンディング += "4_灯君といっしょ！/"

;魂の量によるEND
;SIF BASE:魂 >= 300
	;ENDの番号_END名 となっている
	;番号は1～60の範囲(でもできれば１から順に詰めて使用)の半角数字で、ＥＮＤ名は喜欢的东西に変更してください
;	STR:エンディング += "1_ＥＮＤ名１/"
;其他の条件(例えば淫乱)によるEND
;魂の量と其他の条件(例えば相思相愛)によるEND
;SIF BASE:魂 >= 300 && TALENT:相思相愛
;	STR:エンディング += "3_ＥＮＤ名３/"

RETURN 1

;ARGSには@MENU_SINGLE_ENDING_K1で設定したEND名のどれかが入っている
;見たENDはCEVENTで記録される
;例）ＥＮＤ名１を閲覧した場合は CEVENT("ＥＮＤ名１") = 1 となる
@SINGLE_ENDING_K25, ARGS
#DIMS ジャンプ判定
SELECTCASE ARGS
CASE "乃々：妊娠可"
	;一度見た後は、選択肢まで飛べるようにする
	IF CEVENT("乃々：妊娠可")
		PRINTFORML 要跳转到选项部分吗？
		PRINTFORML [0] 是
		PRINTFORML [1] 否
		CALL INPUT_SELECT, 2
		IF RESULT == 0
			ジャンプ判定 = ジャンプする
		ELSE
			ジャンプ判定 = ジャンプしない
		ENDIF
	ENDIF

	IF ジャンプ判定 == "ジャンプしない" || CEVENT("乃々：妊娠可") == 0
		PRINTFORMW 某一天、%CALLNAME:PLAYER%被%CALLNAME:TARGET%\@ COND("同居中") ? 从自己的房间 # \@叫了出来
		IF COND("同居中")
			PRINTFORMW 怀着可能发生了什么的奇异想法，打開了他房间的門
			PRINTFORMW 把%CALLNAME:PLAYER%叫到这里来的%CALLNAME:TARGET%，紧绷着肩膀，端正地坐在对面右侧的床上
		ELSE
			PRINTFORMW 因为被叫出去而感到不可思议，想着发生了什么事，向着那房间走去的时候、发现%CALLNAME:TARGET%紧张不安地站在那里
		ENDIF
		PRINTFORML
		PRINTFORMW 平时温润而泽、时而闪着淫猥光彩的琥珀色眼眸一反常态地映着他紧张的神色、那样的姿态让%CALLNAME:PLAYER%想起了接受告白前的他
		PRINTFORMW ――「在被告白之前，就已经喜欢上你了」
		PRINTFORMW 从他那里听到这件事、实际上是在几天前
		IF COND("同居中")
			PRINTFORMW 「那个、请坐在这张椅子上」
			PRINTFORMW 被他这样催促着、%CALLNAME:PLAYER%把背后的重量交给了一张背向书桌的椅子
		ENDIF
		PRINTFORML
		PRINTFORMW ……良久的沉默后
		PRINTFORMW 「实际上、%CNAME("一人称")%会使用魔法……虽然仅限于简单的种类、但是」
		PRINTFORMW 尽管%CALLNAME:TARGET%把视线投向了地面，一副犹豫不决的样子，但半晌后，他便用做好觉悟的眼神望向%CALLNAME:PLAYER%，而后開口道
		PRINTFORMW 不过，他会使用魔法，这是早已知晓的事实
		PRINTFORMW そこまで重々しく話すような内容にも思えなかったため因为直至现在都没有提及什么严肃的内容，「就为了这个被叫出来吗」，%CALLNAME:PLAYER%抱着这样的疑问
		PRINTFORMW 然而%CALLNAME:TARGET%的话语并未在这里结束、而是继续说了下去
		PRINTFORMW 「……然后、在魔法之中、也有不论性别让人怀孕的种类」
		PRINTFORMW 「虽说是条件相当严苛的魔法……幸运的是、在迄今为止和%CNAME("二人称")%的生活中全部满足了」
		;ここは乃々君加入前に孕ませていると矛盾するが、さすがにそこまで判定するのは面倒なので諦めておく
		PRINTFORMW 「……那个、%CNAME("二人称")%也让其他人怀孕过吧？　虽然迄今为止都没有考虑过这种事、但现在我确实考虑着『想要怀孕』这样的事。……如果可以的话、我想怀上%CNAME("二人称")%的孩子」
		PRINTFORMW 「当然了，也从双亲那里取得了同意。……但是这样的话可不是一个人说说就能做的、所以我想找%CNAME("二人称")%好好地聊一聊」
		PRINTFORMW %CALLNAME:TARGET%深深地呼气、吐气，再次鼓起勇气与%CALLNAME:PLAYER%对上了视线
		PRINTFORMW 「所以、我想问%CNAME("二人称")%，你想怎么做？」
		PRINTFORMW 「当然，如果%CNAME("二人称")%没兴趣的话我就没有实行的打算了」
		PRINTFORMW 看样子，%CALLNAME:TARGET%打算为自己施加让男人也能怀孕的魔法……
		PRINTFORMW 只不过如果%CALLNAME:PLAYER%拒绝的话、就不做这种事
		PRINTFORMW %CALLNAME:PLAYER%要……
	ENDIF

	CALL PRINT_STRW, @"黄色_如果选择了「想让你怀孕」、%CALLNAME:TARGET%似乎就能保持伪娘的样貌怀孕了！"
	SIF CEVENT("乃々：妊娠可") && COND("妊娠可能")
		CALL PRINT_STRW, @"黄色_以及，如果选择了「没有这个打算」，似乎就不会怀孕！"

	PRINTFORML [0] 想让你怀孕（以后%CALLNAME:TARGET%就能怀孕了）
	PRINTFORML [1] 没有这个打算（以后%CALLNAME:TARGET%就不会怀孕）
	CALL INPUT_SELECT, 2

	IF RESULT == 0
		PRINTFORMW 「真、真的吗！」
		PRINTFORMW %CALLNAME:TARGET%的眼中闪烁着光辉、令人怜爱地欢呼雀跃着
		PRINTFORMW 仿佛下一刻就要手舞足蹈起来一般……
		PRINTFORMW 「现在马上使用法术的话、明天大概就能妊娠了！」
		PRINTFORMW 「%CNAME("二人称")%！　今天真是太感谢了！」
		PRINTFORMW %CALLNAME:TARGET%兴奋地鞠躬着表达感谢、%CALLNAME:PLAYER%回答道不用谢后便回到了\@ COND("同居中") ? 起居室 # 学校\@……
		PRINTFORML
		PRINTFORMW 次日、\@ COND("同居中") ? 正走向起居室时 # 正在上学途中时\@心情大好的%CALLNAME:TARGET%向着%CALLNAME:PLAYER%的方向走来
		PRINTFORMW 「呼呼呼、%CNAME("二人称")%、昨天的法术成功了喔！」
		PRINTFORMW 「不、虽说我觉得几乎会百分百成功、果然说不准……还是会有不安的地方」
		PRINTFORMW 目不转睛地观察着他蹦蹦跳跳地走着的矮小身姿
		PRINTFORMW 虽说一眼看上去，并没有什么值得注意的地方……
		PRINTFORMW 嘛，既然是本人说的那就应该是这样吧，%CALLNAME:PLAYER%这样改变了想法，与%CALLNAME:TARGET%一起走向学校……
		CALL PRINT_STRW, @"黄色_%CALLNAME:TARGET%变得可以怀孕了"

		CALL SETFLAG, "妊娠可能にする", TARGET
	ELSE
		PRINTFORMW 「……确实是这样呢」
		PRINTFORMW %CALLNAME:TARGET%听到了%CALLNAME:PLAYER%的答复后认真地思考了一下后、以理解的样子回答道
		PRINTFORMW 「抱歉，我似乎是有些不冷静了。道歉是什么意思，这样可以吗？」
		PRINTFORM %CALLNAME:PLAYER%享受了%CALLNAME:TARGET%作为道歉礼的
		SIF CEVENT("弁当：第三回")
			PRINTFORM %CALLNAME:TARGET%谨制
		PRINTFORMW %TEXTR("马卡龙/舒芙蕾蛋糕/棉花糖")%……

		CALL SETFLAG, "妊娠不能にする", TARGET
	ENDIF
CASE "乃々：初散歩"
	CALL K25_LONG_WALK("初散歩")
CASE "伪娘講座"
	IF COND("同居中")
		PRINTFORMW 「……那个、也就是说」
		PRINTFORMW 「%CNAME("二人称")%，想要打扮得与女孩子相称，这样的话可以吗？」
	ELSE
		PRINTFORMW 『……那个、也就是说』
		PRINTFORMW 『%CNAME("二人称")%，想要打扮得与女孩子相称，这样的话可以吗？』
	ENDIF
	PRINTFORMW 对于困惑不已的%CALLNAME:TARGET%的询问、%CALLNAME:MASTER%作出了理所当然的肯定回答
	PRINTFORML
	PRINTFORML
	PRINTFORML
	PRINTFORMW 话要从几小时前说起
	PRINTFORMW 以自己的魂为代价、取得了不问男女老少均能魅惑的谜之魅力的%CALLNAME:MASTER%正月下独酌着
	PRINTFORMW 闇夜に浮かぶ月をぼんやりと眺めながら 悠闲地远眺着浮上如水夜色的明月时，一个念頭似一瞬的电光、又如刹那的花火般，放出俄然光辉后，眨眼间便消散无踪地在思索的海洋中戏耍着
	SELECTCASE RAND:3
	CASE 0
		PRINTFORM 今天的课程相当地困难、
	CASE 1
		PRINTFORM 今天课程的提前预习没有白费功夫，轻轻松松就理解了、
	CASE 2
		PRINTFORM 今天的体育课比平常状态还要好、
	ENDSELECT
	PRINTFORM 虽说从下周就是考试周、但该怎么做呢、
	PRINTFORM 明天应该确实是一直在看的动画片的放映日――
	PRINTFORMW %CALLNAME:MASTER%漫无边际的思想中、那个奇怪的念頭再次放出火花
	PRINTFORMW ――现在的自己的话、很适合女装也说不定
	SELECTCASE AGE(MASTER)
	CASE 1
		PRINTFORMW 虽说平常也常被认做小孩子、也有被评价「可爱」之类的经验、但还没有经历过女装
	CASE 2
		PRINTFORMW 虽说容貌比起实际年龄看上去要年少、但毕竟是男性的外表，所以从没想过适合穿女装的事情
	CASE 3
		PRINTFORMW 与年龄相称的容貌怎么样都像是男性的样子，所以迄今为止都没想过适合穿女装的事情
	CASE 4
		PRINTFORMW 虽说过去也有过一次穿女装的经验、不过那也只是给一些人徒增笑柄
	ENDSELECT
	PRINTFORMW 不过、现在的自己，用文字描述就是「向恶魔出卖灵魂，变得有魅力了」
	IF FIND_COND("卡莉斯塔")
		PRINTFORMW ……当然了、灵魂也可以向天使出卖
		PRINTFORM 不论如何、
	ENDIF
	PRINTFORMW 现在的话、说不定很适合女装吧――
	PRINTFORMW 迫不及待地从为部员准备的制服中，选了一套符合自身体格的衣服，站在穿衣镜前
	PRINTFORMW 会是怎么样呢，仔细地观察着自己的身姿……
	PRINTFORMW ……绝望至极地发现一点也不合适
	SELECTCASE AGE(MASTER)
	CASE 1
		PRINTFORMW 披着女性用制服的幼小身姿、给人一种被姐姐逼迫着穿外衣服的弟弟的感觉
	CASE 2, 3
		PRINTFORMW 镜子中映出的自己的身姿，只能说是这附近的男人就这样穿着女性用的衣服的样子
	CASE 4
		PRINTFORMW 被说成是老气横秋的自己的容姿和可爱衣服的对比，奏出了令人不禁哑然失笑的不和谐音
	ENDSELECT
	PRINTFORMW 感到了说不出的挫败感，%CALLNAME:MASTER%脑中、浮现出了一个人的脸
	PRINTFORMW ――虽说%CALLNAME:TARGET%平时都穿着女装、但他契合女装到了说那是女性全员都会相信的程度
	PRINTFORMW 向%CALLNAME:TARGET%打听的话、自己说不定也会变适合的――
	IF COND("同居中")
		PRINTFORMW 带着半分冲动从房间里飞奔出来的%CALLNAME:MASTER%，就这样向着%CALLNAME:TARGET%的房间跑过去――
	ELSE
		PRINTFORMW %CALLNAME:MASTER%带着半分冲动把手机拿在手上，就这样给%CALLNAME:TARGET%打了电话――
	ENDIF
	PRINTFORML
	PRINTFORML
	PRINTFORML
	IF COND("同居中")
		PRINTFORMW 「……原来如此」
	ELSE
		PRINTFORMW 『……原来如此』
	ENDIF
	IF AGE(MASTER) > 2
		IF COND("同居中")
			PRINTFORMW 「嗯——……老实说、以%CNAME("二人称")%的外表很难做到……」
		ELSE
			PRINTFORMW 『嗯——……老实说、以%CNAME("二人称")%的外表很难做到……』
		ENDIF
		PRINTFORMW 果然如此
		PRINTFORMW 是察觉到%CALLNAME:MASTER%明显失落下来的样子了吗、他慌张地继续说着
		IF COND("同居中")
			PRINTFORMW 「啊、但、但是呢、也不是说完全没有办法」
			PRINTFORMW 「魔法中也有让容貌姿态变化的种类，我想，使用那个改变外表的年龄就可以了」
			PRINTFORMW 「之后再加上化妆的话，不就能解决了吗」
		ELSE
			PRINTFORMW 『啊、但、但是呢、也不是说完全没有办法』
			PRINTFORMW 『魔法中也有让容貌姿态变化的种类，我想，使用那个改变外表的年龄就可以了』
			PRINTFORMW 『之后再加上化妆的话，不就能解决了吗』
		ENDIF
	ELSE
		IF COND("同居中")
			PRINTFORMW 「嗯——……只要努力化妆，也没什么做不到的吧……」
		ELSE
			PRINTFORMW 『うーん……お化粧も含めて頑張れば、どうにかできないこともないですかね……』
		ENDIF
	ENDIF
	PRINTFORMW 本来兴奋的%CALLNAME:MASTER%被%CALLNAME:TARGET%说着不能现在马上做好浇了一盆冷水
	IF COND("同居中")
		PRINTFORMW 「总而言之，我会从明天開始准备，如果有兴趣再来聊聊吧」
		PRINTFORMW 「因为我也想努力让%CNAME("二人称")%变得适合女孩子的装扮嘛」
	ELSE
		PRINTFORMW 『总而言之，我会从明天開始准备，如果有兴趣再来聊聊吧』
		PRINTFORMW 『因为我也想努力让%CNAME("二人称")%变得适合女孩子的装扮嘛』
	ENDIF
	PRINTFORMW %CALLNAME:MASTER%道谢着挂了电话、迫不及待得等待着明日的到来……
	PRINTFORMW
	CALL PRINT_STRW, @"黄色_在拜托了%CALLNAME:TARGET%后变成了伪娘！"
CASE "灯君といっしょ！"
	IF CEVENT("灯服買った") == 0
		CALL PRINT_STRW, @"_黄色_观看这个结局后、将追加%CALLNAME:FIND_COND("灯")%的居家服"
		CALL PRINT_STRW, @"_黄色_这样可以吗？"
		CALL PRINT_SELECT, "是/否"
	ENDIF
	SIF RESULT == 0 || CEVENT("灯服買った")
		CALL RELATION_EVENT_K25, FIND_COND("灯")
ENDSELECT
RETURN 1

path: ERB/EVENT_K/25 ノノ/EVENT_K25_ノノ.ERB