code:
;-------------------------------------------------
;望木灯口上
;製作者　望木爸爸（旧：なにもしらないひと）
;-------------------------------------------------
;【はじめに】
;この口上は構文のことをマジでなにもしらないひとが、他の製作者様のERBを参考にしながらでっちあげたものです。
;こちらの予期せぬミスが潜んでいる可能性が高いので、予めご了承ください。

;【コンセプトなど】
;「真をいじめたいな……」という欲望から始まって、
;「兄貴ならいじめそう」「伪娘でいいか」「不在乎貞操な感じにしよう」「最後は你に純愛雌堕ちさせよう！」「あっついでに本当に雌になってもらおっと！」
;という二転三転を繰り返して生まれた角色クターです。へへっ……ずっと書きたかったんだよね……TS雌落ち……
;PLAYヤーの意思で性転換させられる角色クターとして、乃々君や織君とも差別化を図れてるのではないかなぁ、と思います。
;もちろん伪娘でいる選択も有些です。どこまでその差を充実させられるかはわかりませんが……
;俺口調故に男っぽいが自己的容姿に自信が有、綺麗でいることや相手を虜にすることに注力するプロ意識のようなものを持ち合わせているのが特徴。
;（一応営業的？ に大事なので、女らしい声や口調もバッチリ使える。你相手には基本的に素の態度を見せているようです）
;-------------------------------------------------
;【今回がんばったこと】
;・マージソフトで比較するとアホみたいに差異できてて草（CNAME周りを一斉置換等した）
;・色と衣装変え
;・EMOTION（状態別表情）の設定　この兄貴、顔がいい

;【今後がんばりたいこと】
;・そろそろDAILY口上に表情設定をすべきだと思うきょうこのごろ
;-------------------------------------------------
;呼び名の設定。"_"の右にふりがなを書く。
;-------------------------------------------------
@CNAME_K35, ARGS
#FUNCTIONS

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	LOCALS = 俺_俺
CASE "二人称"
	;相手が主人
	IF PLAYER == MASTER
		LOCALS = 你_你
	;相手が主人ではない
	ELSE
		SELECTCASE CSTR:ASSI:学年
		CASE "３年生", "研究生"
			LOCALS = 你_你
		CASEELSE
			IF COND("教員", ASSI)
				LOCALS = 你_你
			ELSE
				LOCALS = 你_你
			ENDIF
		ENDSELECT
	ENDIF
;"主人"と"助手"は三人称。主に当人と話していない時に使う
CASE "主人"
	IF NAME:PLAYER == "你"
		LOCALS = 部長_部長
	ELSE
		LOCALS = %CALLNAME:PLAYER%_%CSTR:PLAYER:ふりがな%
	ENDIF
CASE "助手"
	IF NO:ASSI == 34
		LOCALS = 真_まこと
	ELSEIF NO:ASSI == 48
		LOCALS = 莉_れい
	ELSE
		SELECTCASE CSTR:ASSI:学年
		CASE "３年生", "研究生"
			LOCALS = %CALLNAME:ASSI%前輩_%CSTR:ASSI:ふりがな%前輩
		CASEELSE
			IF COND("教員", ASSI)
				LOCALS = %CALLNAME:ASSI%老师_%CSTR:ASSI:ふりがな%老师
			ELSE
				IF NO:PLAYER == 1
					LOCALS = フェリ桑_ふぇり桑
				ELSE
					LOCALS = %CALLNAME:ASSI%_%CSTR:ASSI:ふりがな%
				ENDIF
			ENDIF
		ENDSELECT
	ENDIF
ENDSELECT
RETURNF LOCALS

;-------------------------------------------------
;勧誘イベントのセリフや紹介文
;-------------------------------------------------
@EVENT_PROFILE_K35, ARGS
SELECTCASE ARGS
CASE "紹介文"
	STR:1 = 喜欢捉弄人和女装的男学生
	STR:2 = 因为某种契机知道了魔法的実际存在、从而来到了社团活动之中
	STR:3 = 好像对悪魔的交易有興趣、为了实现自己的欲望而接近%CALLNAME:MASTER%
;ここの中に限り、CFLAG,BASE,TALENT,ABL,EXP,CSTRをCSVに書いたものから変更させることが出来ます
;例えばBASE:体力を2000にしたいなら BASE:0:体力 = 2000 、強気にさせたいなら TALENT:0:強気 = 1 として下さい
;また、ABL:信頼を+2させたい場合には ABL:0:信頼 = ABL:信頼 + 2 と書いてください
CASE "勧誘"
	;PRINTFORML - %NAME:TARGET% -
	PRINTFORML
	PRINTFORMW 某日、部室的門響起了陌生的敲門声。
	PRINTFORMW %CALLNAME:MASTER%歪着脑袋、给这位不请自来的客人打開了門、发现門外站着的是一位没见过的美少女。
	PRINTFORMW 「あっ、部長桑ですか？　私、弗理希艾尔小姐の友達なんですけど」
	PRINTFORMW 「有很重要的事情所以来这里了……听说这里可以商量一些事情？」
	PRINTFORMW 在询问是不是有怪癖的时候、少女悩羞地红着脸点了点頭。
	PRINTFORMW 「その……わ、私の体に、変なモノができて……弗理希艾尔小姐は治せるって言ってくれたんですけど……」
	PRINTFORMW 看到她在下腹前不停地扭捏握着双手的样子、%CALLNAME:MASTER%大致猜到了事情的原委。
	PRINTFORMW 总而言之告诉对方先进屋、少女抬起了满是期待的脸。
	PRINTFORMW 「难、难道说、真的可以治好吗！？」
	PRINTFORMW 弗理希艾尔がそう言ったのなら、きっと大丈夫だろう。
	PRINTFORMW 这么回答着、少女的脸上浮现了満足的微笑。
	PRINTFORML
	PRINTFORMW 「嗯——……原来传闻是真的啊」
	PRINTFORML
	PRINTFORMW 一瞬、差点没能明白是誰的声音。
	PRINTFORMW 正打算把少女関在門外的时候、反倒被抓住了机会从%CALLNAME:MASTER%的旁边钻了过去、找了把空的椅子坐了上去。
	PRINTFORMW 对着呆站在原地的%CALLNAME:MASTER%、看上去像是少女的客人露出了愉快的笑容。
	PRINTFORMW 「发什么呆啊。早就变成传闻了？　有可疑的像是魔法使的人的社团什么的」
	PRINTFORMW 流传出了这样的传闻吗。%CALLNAME:MASTER%下意识说出的话、没有逃过客人的耳朵。
	PRINTFORMW 「嘛、虽然是在诈你就是了。不过看様子有类似程度的魔法应该是确有其事啊」
	PRINTFORMW 「あ、勿論弗理希艾尔小姐の友達ってのも嘘な」
	PRINTFORMW 看到因为掉进了简单的陷阱而狼狽不堪的%CALLNAME:MASTER%、客人呵呵的笑了起来。
	PRINTFORMW 「忘了自己介紹了。我、２年的望木灯。连花儿都会为之逊色的伪娘」
	PRINTFORMW 「今后请多指教了、部長桑♪」
	PRINTFORMW 刚才声音还很低沉的他、突然改变了声线、假惺惺地用动听的声音和笑脸撒了个嬌。
;これは別になくても構いません
CASE "勧誘直後"
	;PRINTFORML - %NAME:TARGET% -
	CALL SETFLAG, "身嗜み：腸洗浄", TARGET

;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	;PRINTFORMW %NAME:TARGET%は%CALLNAME:MASTER%の"%CSTR:ARG:関係%"として、(昼)の部室に顔を出してくれます。

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

	ELSE

	ENDIF
;同居後の自分的房間の解説です。これも別に無くて構いません
CASE "自室描写"

ENDSELECT

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

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

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

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
	PRINTFORMW %CALLNAME:TARGET%知道了恶魔的存在以及灵魂的交易这样的事情、毫不犹豫地决定加入迷之社团。
	PRINTFORMW 好像有着想要实现的愿望、想要实现的话需要付出一定灵魂作为代价。
	PRINTFORMW 所以%CALLNAME:TARGET%向%CALLNAME:MASTER%提出了用自己的身体来购买灵魂这样的契约――
	PRINTFORML
	PRINTFORMW 　・　・　・
	PRINTFORML
	PRINTFORMW 「你在看什么呢」
	PRINTFORMW 正舒服地坐在椅子上的%CALLNAME:TARGET%问道。
	PRINTFORMW 大概是察觉到自己对他熟练的样子感到诧异、%CALLNAME:TARGET%从鼻子中发出了一声冷笑。
	PRINTFORMW 「你该不会以为%CNAME("一人称")%没有这方面的経験吧？」
	PRINTFORMW 「倒不如反过来说、%CNAME("二人称")%这边没问题吗？　虽然说不花钱但你是在花魂来买一个男人的春的喔」
	PRINTFORMW %CALLNAME:TARGET%翘着二郎腿，带着讨价还价的眼神观察着%CALLNAME:MASTER%。
	IF TALENT:MASTER:男性 && TALENT:MASTER:童貞
		PRINTFORMW 「不管怎么看都是个童贞嘛。初体验这种事情还是更加珍惜一点比较好哦？」
		PRINTFORMW %CALLNAME:TARGET%轻松的看透了童贞的事实、脸上露出了毫不掩饰的笑容。
		PRINTFORMW 「嘛、如果觉得男生的屁股也可以的话我也没什么多说的。呼呼……」
	ELSEIF TALENT:MASTER:男性 && EXP:MASTER:ＢＬ経験 == 0
		PRINTFORMW 「看起来、和男生做还是第一次？　是突然产生了这种兴趣呢、还是说……」
		PRINTFORMW 嘴角微微上扬、%CALLNAME:TARGET%就这样看着把目光移開不敢与之对视的%CALLNAME:MASTER%。
		PRINTFORMW 「不过%CNAME("一人称")%的长相你应该还是挺喜欢的。就让你体验一下伪娘的无穷魅力吧」
	ELSEIF TALENT:MASTER:女性 || TALENT:MASTER:扶她
		PRINTFORMW 「嗯、我觉得也不是不可以由我来调教%CNAME("二人称")%哦……」
		PRINTFORMW 「嘛、本来你能接受这种交易我就已经很感激了。现在看来也是真没想到你会答应啊」
	ELSEIF TALENT:MASTER:伪娘
		PRINTFORMW 「嘛、%CNAME("一人称")%也不用说什么了、我并不讨厌你这样可爱的人哦」
		PRINTFORMW 「看来我们是一穴之貉呢。那让我们来搞好関系吧、部长老师」
	ELSE
		PRINTFORMW 「……嘛，算了。等到彼此习惯了再这样也就不觉得麻烦了」
	ENDIF
		PRINTFORMW %CALLNAME:TARGET%把翘着的腿放下，并拢在一起摆成漂亮的造型、轻轻拍了拍膝盖開始邀请%CALLNAME:MASTER%……
		PRINTFORMW 「那么准备開始吧？」
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;初めてのご褒美Ｈ
ELSEIF EQUIP:Ｈ的奖励 && CEVENT("調教開始：ご褒美Ｈ") == 0
	PRINTFORMW
	CALL SET_CEVENT, "調教開始：ご褒美Ｈ"
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
	PRINTFORMW 「这样继续称呼我也可以、如果你觉得喜欢就更好了哦？」
	PRINTFORMW %CALLNAME:TARGET%轻轻低靠在%CALLNAME:MASTER%的旁边，脸上露出了笑容。
	PRINTFORMW 「咿呀ー、得救了。虽然也算是临时起意，但这样的交易还是需要双方也都能接受彼此啊」
	PRINTFORMW 「今后也拜托了哦、%CNAME("主人")%哟」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
	PRINTFORMW 「什么嘛、很熟练了嘛。%CNAME("二人称")%」
	PRINTFORMW 在開始之前、%CALLNAME:TARGET%突然间说了那样的话。
	PRINTFORMW 「不不、我是认真的。你大概是%CNAME("一人称")%至今为止遇到的人里面最好的」
	PRINTFORMW 「你是怎么学会这些的。果然是依靠着恶魔的力量吗？」
	PRINTFORMW 毫不顾忌的戳了戳我的脸、%CALLNAME:MASTER%也立马握住了对方的手，将对方推倒了。
	PRINTFORMW 「哦一、又要開始了吗？ 要手下留情哦」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
	PRINTFORMW 「我输了」
	PRINTFORMW %CALLNAME:TARGET%突然间扑倒在了%CALLNAME:MASTER%的怀里、不满地发出了牢骚。
	PRINTFORMW 「我输了我输了。是%CNAME("主人")%大人赢了」
	PRINTFORMW 「啊ー啊。本来是想把这种事情拿出去爆料的、或者用来问你要点什么东西也不错ー」
	PRINTFORMW %CALLNAME:TARGET%仿佛失去了力气一般，紧紧的抱住了%CALLNAME:MASTER%，把頭埋在了%CALLNAME:MASTER%的胸里。
	PRINTFORMW 「……好不甘心啊」
	PRINTFORMW 看着怀中不高兴的%CALLNAME:TARGET%，轻轻地拖着%CALLNAME:TARGET%的下巴把頭抬了起来，缓缓地将自己的脸贴近。
	PRINTFORMW %CALLNAME:TARGET%虽然吓了一跳，但随后便闭上了眼睛、吻上了%CALLNAME:MASTER%的嘴唇……
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;女体化
ELSEIF TALENT:女性 && CEVENT("調教開始：女体化") == 0
	PRINTFORMW 「哦、哦……久等了」
	PRINTFORMW %CALLNAME:TARGET%晚了一会才在%CALLNAME:MASTER%的面前出现、一幅心神不宁的样子。
	PRINTFORMW 「いやぁ……なんだな。やっぱり女の体って違うな」
	PRINTFORMW 「自己触ってみても明らかに柔らかくなってるし」
	PRINTFORMW 「なかなか慣れなくてさ。困ったもんだよ。ははは……」
	PRINTFORMW 乾いた笑いを見せたと思うと、%CALLNAME:TARGET%通过気まずそうな顔をする。
	PRINTFORMW 「それで……する……んだよな」
	PRINTFORMW 「……どこまで？」
	PRINTFORMW %CALLNAME:TARGET%通过躊躇いがちな上目遣いで%CALLNAME:MASTER%の表情を伺っている……
	PRINTFORMW 「ほ、ほら。わかってんだろ。女なんだぞ%CNAME("一人称")%、今」
	PRINTFORMW 「なんつーか、その……いろいろと、はじめてなんだからさ。酱と温柔的しろよ」
	PRINTFORMW %CALLNAME:TARGET%通过乙女のようにもじもじし一边继续、%CALLNAME:MASTER%に迫られるのを待っている……
	CALL SET_CEVENT, "調教開始：女体化"
;妊娠可能
ELSEIF COND("Ａ妊娠可能") && CEVENT("調教開始：妊娠可能") == 0
	PRINTFORMW 「さて、と」
	PRINTFORMW %CALLNAME:TARGET%通过腕組みをしながら%CALLNAME:MASTER%のことをじっと見上げている……
	PRINTFORMW 「わかってるよな？ %CNAME("主人")%殿」
	PRINTFORMW 「今度ばかりは今までの性交とはわけが違うってこと」
	PRINTFORMW 「わかんないはず無いよな。%CNAME("二人称")%がやったことなんだから」
	PRINTFORMW %CALLNAME:TARGET%通过鋭い目で%CALLNAME:MASTER%を見つめる。
	PRINTFORMW 言うまでもなく、%CALLNAME:TARGET%を妊娠する体に仕立て上げたことについてだろう……
	SIF PENIS(MASTER) == 0 && TALENT:MASTER:具現 == 0
		PRINTFORMW 「まー正直、竿も持ってねえ%CNAME("二人称")%がどういうつもりで%CNAME("一人称")%をこんな体にしたかよくわかんねえけども」
	PRINTFORMW 「改めて言うけど、%CNAME("一人称")%が%CNAME("二人称")%のお願いを聞いてやった意味を酱とわかれよ？」
	PRINTFORMW %CALLNAME:TARGET%通过すっと立ち上がり、%CALLNAME:MASTER%に慢慢地迫ってくる……
	PRINTFORMW 然后、%CALLNAME:MASTER%の耳元に突き刺すような言葉を囁いた……
	PRINTFORMW 「ここまで好き放題して逃げやがったら、从后面将刺してやるからな」
	PRINTFORMW 「一、二回くらいは安いもんだよなぁ？ 愛しの%CNAME("主人")%桑？」
	PRINTFORMW ひやりとした言葉を吐いたのも束の間、%CALLNAME:TARGET%通过%CALLNAME:MASTER%の顎を掴むと乱暴に唇を奪った……
	CALL SET_CEVENT, "調教開始：妊娠可能"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 0
	;淫乱を先に獲得したかで分岐させたい場合(別にこの分岐は無くても良いと思います)
	;IF CEVENT("先に淫乱獲得")
		;PRINTFORMW
	;ELSE
		;PRINTFORMW
	;ENDIF
	PRINTFORMW 最近、%CALLNAME:TARGET%的样子有一点奇怪。
	PRINTFORMW 也不知道为什么，每次见面的时候都会把目光移開、即使去搭话也总是不搭理自己。
	PRINTFORMW 保持着这样的状态接受了我的邀请、这个样子很明显和平常完全不一样。
	PRINTFORMW 「……干什么嘛」
	PRINTFORMW 似乎是注意到了自己惊讶的视线、%CALLNAME:TARGET%稍稍抬起了頭。脸上染上了一抹红晕。
	PRINTFORMW 伸出手轻轻地按在頭上，询问是否是发烧的时候、%CALLNAME:TARGET%像是受到了惊吓一样飞快地把%CALLNAME:MASTER%的手推開了。
	PRINTFORMW 「什……什么事也没有哦！　要做什么就赶紧做啦――」
	PRINTFORMW ――就像是失去了支撑一样、%CALLNAME:TARGET%摆出了一个相当崩坏的姿势。
	PRINTFORMW 一看就知道是在忍耐着什么、但感觉不管说什么都说不好的样子，不知道如何问出口。
	PRINTFORMW 「……抱歉。现在的%CNAME("一人称")%、果然感觉很奇怪吧」
	PRINTFORMW 询问是不是这次还是就这样结束比较好、%CALLNAME:TARGET%摇了摇頭。
	PRINTFORMW 「不..不用就这么结束。不要就这样结束啊……」
	PRINTFORMW %CALLNAME:TARGET%十分虚弱地把身体靠在了%CALLNAME:MASTER%的身上，仿佛将一切都托付给了%CALLNAME:MASTER%。
	PRINTFORMW 摆出这样姿态的%CALLNAME:TARGET%、就像一个不折不扣的少女。
	PRINTFORMW 「呐、拜托了哦。全都靠%CNAME("二人称")%了。我不想再这样下去了」
	PRINTFORMW 「求你了..」
	CALL SET_CEVENT, "調教開始：恋慕"
	TALENT:不在乎貞操 = 0
	PRINTFORML
	CALL PRINT_STR, @"イエロー_%CALLNAME:TARGET%失去了[不在乎貞操]。_W_"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：相思相愛") == 0
	PRINTFORMW 「よう、色\@ TALENT:MASTER:男性 ? 狼 # 女 \@」
	PRINTFORMW 两个人紧紧的拥抱在了一起、嘴唇也被轻易的夺去。
	PRINTFORMW %CALLNAME:TARGET%的脸上充满着開心和得意、可以看出是从心底里感到高兴、完全就是一位恋爱中的少女。
	PRINTFORMW 「我喜欢过的这么多人里面、像喜欢%CNAME("二人称")%到这种程度的可还是第一次哟」
	PRINTFORMW 「你到底有什么吸引我的地方呢？　是容貌吗？　又或者是技术？　还・是・说・」
	PRINTFORMW %CALLNAME:TARGET%把腿顶在了%CALLNAME:MASTER%の的双腿之间、用膝盖轻轻地摩擦着。
	PRINTFORMW 「果然还是这里吗？　呼呼……恶魔的主人就是与众不同呢」
	PRINTFORMW 吻上了看起来比任何时候都高兴的%CALLNAME:TARGET%的嘴唇、%CALLNAME:TARGET%就把眼睛闭了起来、放松身心、将一切托付给了你。
	PRINTFORMW 「あぁ～、ヤバい奴と取り引きしちまったなぁ……今さらやめらんないしさ」
	PRINTFORMW 「ほんと魔性の\@ TALENT:MASTER:男性 ? 男 # 女 \@だよ、%CNAME("二人称")%」
	PRINTFORMW 两个人的手紧紧握住、将十指交叉在一起、%CALLNAME:TARGET%抬起頭看着也在看着自己的%CALLNAME:MASTER%、用很小的声音说道。
	PRINTFORMW 「如果%CNAME("一人称")%现在被你抛弃的话、我会真的像一个女孩子一样痛哭流泪的」
	PRINTFORMW 那个姿像一个妖艳的美少女、有一种仿佛是在梦中才会遇到的梦幻般的少女的感觉……
	CALL SET_CEVENT, "調教開始：相思相愛"
;助手の有無を格子（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K35_KOJO2

;-------------------------------------------------
;助手との掛け合い(YYを助手の角色番号に置換、ＸＸを助手の角色番号に対応した名前に変更する)
;掛け合いをする角色を増やす場合は、コピー＆ペーストをして増やす
;-------------------------------------------------
;助手
ELSEIF NO:ASSI == 34
	;初めて
	IF CEVENT("助手会話：真") == 0
		;恋慕＋恋慕時初口上（陥落イベント）が発生済み
		IF CEVENT("調教開始：恋慕")
			PRINTFORMW 「なーなー、どーしてもコイツも一緒なのー？」
			PRINTFORMW %CALLNAME:MASTER%の腕をひっつかんでぐいぐい引っ張る%CALLNAME:TARGET%。
			PRINTFORMW そんな兄の姿を目の当たりにし、妹の%CALLNAME:ASSI%は呆れたように眉間に指をあてていた。
			PRINTFORMW 『こ、兒童……』
			PRINTFORMW 「ねーえー、やっぱり二人っきりでしようよー。ねー」
			PRINTFORMW 『……や、凄いですね。ここまで兄桑を躾けるとは……』
			PRINTFORMW 「あー？ うるせえぞコノヤロー」
			PRINTFORMW 「ね、こんなのほっといて始めよ？ ほらぁ」
			PRINTFORMW %CALLNAME:TARGET%通过%CALLNAME:MASTER%の側に迫り、悄悄的股ぐらに手を差し入れてくる……
			PRINTFORMW 『いや……流石に私も呼ばれてきた立場だから、勝手に返回わけにもいかないんだけど……』
			PRINTFORMW 「ふんっ。言っとくけど邪魔はすんなよなー。あくまで你は第三者だぞ」
			PRINTFORMW 見せつけるように%CALLNAME:MASTER%の胸元に頭を擦り付ける%CALLNAME:TARGET%に、%CALLNAME:ASSI%は溜め息を漏らした……
		;それ以外
		ELSE
			PRINTFORMW 「おいおい、マジでコレも一緒なの？」
			PRINTFORMW %CALLNAME:TARGET%通过怪訝そうな顔で%CALLNAME:ASSI%を親指で指す。
			PRINTFORMW 『コレって言い方やめてよ』
			PRINTFORMW 「まー%CNAME("一人称")%は別にいいけどさ。你は平気なわけ？」
			PRINTFORMW 『別に、私も呼ばれてきただけだし……』
			PRINTFORMW 「ふぅん？」
			PRINTFORMW どこか躊躇いのある%CALLNAME:ASSI%の姿に、%CALLNAME:TARGET%通过含み笑いを見せる。
			PRINTFORMW そして不意に%CALLNAME:MASTER%の首に腕を回してしなだれかかってきた。
			PRINTFORMW 「ま、好きにしたらいいけどさ」
			PRINTFORMW 「そりゃもう%CNAME("一人称")%ら、いろんなエグいPLAYしちゃうかもだから」
			PRINTFORMW 「見てらんなくなったらいつでも帰っていいぞ？」
			PRINTFORMW 『よ、余計なお世話っ』
			PRINTFORMW %CALLNAME:ASSI%は红着脸そっぽを向いてしまった……
			PRINTFORMW 「くっく……今日は楽しくなりそうだな？」
		ENDIF
		CALL SET_CEVENT, "助手会話：真"
	;二回目以降
	;ELSE
		;恋慕
		;IF TALENT:恋慕
			;PRINTFORMW
		;それ以外
		;ELSE
			;PRINTFORMW
		;ENDIF
	ENDIF
ELSEIF NO:ASSI == 48
	;初めて
	IF CEVENT("助手会話：莉") == 0
		;恋慕＋恋慕時初口上（陥落イベント）が発生済み
		IF CEVENT("調教開始：恋慕")
			PRINTFORMW 「……はーあ……」
			PRINTFORMW 三人でエッチを始めようとするなり、%CALLNAME:TARGET%通过いきなり溜め息を漏らした。
			PRINTFORMW 「なーんで%CNAME("助手")%も一緒かねぇ……」
			PRINTFORMW 『なーんか不満そうだね、お哥哥』
			PRINTFORMW 「そりゃなあ」
			PRINTFORMW 取り繕うこともせず、%CALLNAME:TARGET%通过%CALLNAME:MASTER%の肩にもたれかかった。
			PRINTFORMW 「せーっかく愛しの%CNAME("主人")%と二人っきりの時間だったんだぜ？」
			PRINTFORMW 『うわー……やっぱりお哥哥、本気で好きなんだ』
			PRINTFORMW 「そりゃなあ」
			PRINTFORMW 取り繕うこともせず、%CALLNAME:TARGET%通过%CALLNAME:MASTER%の頬にさっと接吻をした。
			PRINTFORMW 「ま、你は聞き分けのいい子だからわかってると思うけど。あんまり邪魔はしないでくれな？」
			PRINTFORMW 『是是……』
			PRINTFORMW %CALLNAME:ASSI%は少し面白くなさそうな顔をしている……
		;それ以外
		ELSE
			PRINTFORMW 「まさか你と一緒になるとはなぁ……」
			PRINTFORMW 感慨深そうな、或いは複雑そうな顔をする%CALLNAME:TARGET%。
			PRINTFORMW 『邪魔だった？』
			PRINTFORMW 「いや？ %CNAME("助手")%ならいいよ、酱と弁えてるし」
			PRINTFORMW 「むしろ当たり前みてーな顔で他人んちの妹つれてくる%CNAME("主人")%のことをどうかと思っただけ」
			PRINTFORMW 『そうだねぇ……』
			PRINTFORMW 兄妹は二人揃ってうんうんと頷いていた……
			PRINTFORMW 「ま、保健体育の授業だと思って見物しててくれや」
			PRINTFORMW 『お哥哥が教材？ くふふ……』
			PRINTFORMW ……ずいぶんと仲が良いみたいだ。
		ENDIF
		CALL SET_CEVENT, "助手会話：莉"
	;二回目以降
	;ELSE
		;恋慕
		;IF TALENT:恋慕
			;PRINTFORMW
		;それ以外
		;ELSE
			;PRINTFORMW
		;ENDIF
	ENDIF
;口上のある助手が居ない場合は、通常の二回目以降の口上へ飛ぶ
ELSE
	CALL K35_KOJO2
ENDIF

RETURN 1

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

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

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

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

;-------------------------------------------------
;愛撫
;-------------------------------------------------
IF SELECTCOM == 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「んっ……ふふ、%CNAME("二人称")%のテクがどんなもんか、お手並み拝見だな」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("要去了")
				IF RAND:2
					CALL PRINT_STRW, "「あ、はっ_UH_ もっと、強く、してっ_UH_ 気持ちいい、からっ_UH_」"
				ELSE
					CALL PRINT_STRW, "「あっ、あっ_UH_ イくっ_UH_ もう、そろそろ、イくから……んっ_UH_」"
				ENDIF
			ELSE
				IF ABL:PLAYER:技巧 >= 3
					IF RAND:2
						CALL PRINT_STRW, @"「んっ_UH_ あっ……_UH_ %CNAME("二人称")%の指靈活、イイよ……_UH_」"
					ELSE
						CALL PRINT_STRW, @"「あぁ……_UH_ いいよ、もっと……続けて……_UH_」"
					ENDIF
				ELSE
					PRINTFORMW 「相変わらずじれったい触り方だぜ……わざとじゃないよな？ ん？」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF COND("要去了")
				CALL PRINT_STRW, "「あ、ふ……_UH_ そろそろ、要去了かも……」"
			ELSE
				IF ABL:PLAYER:技巧 >= 3
					IF RAND:2
						CALL PRINT_STRW, "「ん、ふっ……なかなか……_UH_」"
					ELSE
						PRINTFORMW 「いいね、なかなか……んっ……もっと続けてくれよ……」
					ENDIF
				ELSE
					PRINTFORMW 「おいおい、どうした？ もうちょっと頑張ってみろって……ふふっ」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰　面部騎乗(被逆推ているとき)
;-------------------------------------------------
IF SELECTCOM == 1
	;被逆推ているとき
	IF TEQUIP:推倒
		;初めて
		IF FIRSTCOM_REV(SELECTCOM) == 0
			PRINTFORMW 「そーら、よっと！」
			CALL PRINT_STRW, "「ふっふーん。せっかくのまんこなんだ。ちょっと楽しませてくれよ_UH_」"
			CALL PRINT_STRW, "「んふ……_UH_ なかなか刺激的だねぇ……くっく……」"
		;二回目以降
		ELSE
			;恋慕
			IF TALENT:恋慕
				CALL PRINT_STRW, "「あっは_UH_ 気持ちいい……はぁぁ……_UH_ いい……_UH_」"
				CALL PRINT_STRW, "「もっと音たてて舐めてぇ……_UH_ あはぁ……_UH_」"
			;それ以外
			ELSE
				PRINTFORMW 「ほらほら、もっと酱と舐めてくれよぉ～」
				PRINTFORMW 「それともこうされるのは嫌いか？ くっく……」
			ENDIF
		ENDIF
	ELSE
		;初めて
		IF FIRSTCOM(SELECTCOM) == 0
			PRINTFORMW 「おっ、舐めたいんか？ コ・コ」
			PRINTFORMW 「ま、そうだろうなぁ……せっかくわざわざ%CNAME("一人称")%を女性にまでしたんだ。楽しみたいよなぁ」
			PRINTFORMW 「ほら、おいで……？ 好きなだけ舐めていいぞ……くっく」
		;二回目以降
		;万謝的亲吻（ここで大丈夫かナ？）
		ELSEIF CHECK_COM("万謝的亲吻")
			;恋慕
			IF TALENT:恋慕
				CALL PRINT_STRW, @"「あんっ_UH_ ふふ……今日もよろしくおねがいしますね、%CNAME("二人称")%_UH_」"
			;それ以外
			ELSE
				PRINTFORMW 「ひゃうっ……！ そ、その……よろしくおねがいします……」
			ENDIF
		;清洁舔阴
		ELSEIF COND("清洁舔阴フラグ", PLAYER)
			;恋慕
			IF TALENT:恋慕
				CALL PRINT_STRW, @"「あぁっ_UH_ ダメだってば%CNAME("主人")%_UH_」"
				CALL PRINT_STRW, "「そんなことされたら……んっ_UH_ 感じちゃうだろぉ_UH_」"
			;それ以外
			ELSE
				CALL PRINT_STRW, "「あんっ_UH_ ふふ……嬉しいねえ、キレイにしてくれるなんて……」"
				PRINTFORMW 「それとも%CNAME("二人称")%がただ舐めたいだけかなぁ？ んっ……ふふふ……」
			ENDIF
		;それ以外
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF RAND:2
					CALL PRINT_STRW, @"「あっ_UH_ んっ_UH_ んっ_UH_ もっと舐めて_UH_ %CNAME("一人称")%のこと気持ちよくして_UH_」"
				ELSE
					CALL PRINT_STRW, "「あはっ_UH_ もっとペロペロして_UH_ もっと_UH_ 腰ガクガクになるくらいして_UH_ あぁんっ_UH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「んっ_UH_ ふふっ……ほら、もっと一生懸命舐めてくれよ、ワン酱桑_UH_」"
					PRINTFORMW 「なーんつって……くっく……犬扱いは嫌いかな？」
				ELSE
					PRINTFORMW 「くっく……%CNAME("二人称")%もだいぶ倒錯したやつだぜ」
					PRINTFORMW 「作りモノまんこをうまそうにペロペロするなんてなぁ……ふふ」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門愛撫
;-------------------------------------------------
;灯が自動的にCHECK("Ａ指挿入")分岐に向かうことに気付いたのが書いたあとだった…（;＾ω＾）
IF SELECTCOM == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;気持ちいい
		IF CHECK("Ａ指挿入")
			CALL PRINT_STRW, @"「んっ_UH_ ……ふふ、いきなり指插入るとかやるねぇ、%CNAME("二人称")%」"
			CALL PRINT_STRW, "「ま、いいよ。好きなように楽しんでみな……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「んっ……やっぱり気になるか？ %CNAME("一人称")%のお尻」
			PRINTFORMW 「ふふ……いいぜ、好きなように触っても。……でもあんま乱暴にすんなよ？」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF RAND:2
						CALL PRINT_STRW, "「あっはぁ_UH_ この、バカっ_UH_ まだ振動棒入れてんのni↘_UH_」"
						CALL PRINT_STRW, "「こんなのっ、おかしくなるに、決まって……んあぁッ_UH_」"
					ELSE
						CALL PRINT_STRW, "「やぁん_UH_ もう、こんなに乱暴にされてるのni↘……_UH_」"
						CALL PRINT_STRW, @"「なんで%CNAME("一人称")%……っ_UH_ こんなよがってんだろうな……_UH_」"
					ENDIF
				ELSE
					CALL PRINT_STRW, @"「あ、ばかぁっ_UH_ %CNAME("二人称", "かな")%、チョーシのんなよぉっ_UH_ まだ入ってんのにぃ_UH_」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%のケツおかしくなったら、%CNAME("二人称")%のせいだかんな……んん～っ_UH_」"
				ENDIF
			ELSE
				CALL PRINT_STRW, @"「んんっ_UH_ ふふっ……あぁ_UH_ ほんと、ケツいじり好きだよな、%CNAME("二人称")%……あんっ_UH_」"
				CALL PRINT_STRW, @"「%CNAME("一人称")%も……っ_UH_ %CNAME("二人称")%にケツいじられんの、嫌いじゃないよ……_UH_」"
			ENDIF
		;気持ちいい
		ELSEIF CHECK("Ａ指挿入")
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF TALENT:結腸性感
						IF RAND:2
							CALL PRINT_STRW, "「あ、は……っ_UH_ うそ、だろ……_UH_」"
							CALL PRINT_STRW, @"「なんで……っ、%CNAME("一人称", "かな")%、こんなにぃ……んんっ_UH_」"
						ELSE
							CALL PRINT_STRW, "「は、あぁ……っ_UH_ マジかよ、こんな……っ_UH_」"
							CALL PRINT_STRW, @"（%CNAME("一人称")%、ケツでここまで気持ちよくなったの、初めてだぞ……_UH_）"
						ENDIF
					ELSE
						IF RAND:2
							CALL PRINT_STRW, @"「う、あ……っ_UH_ ちょ、%CNAME("二人称", "かな")%、やりすぎ……っ_UH_」"
							CALL PRINT_STRW, "「も、ちょっと、いたわれって……んぁっ_UH_ はぁ、はぁ……_UH_」"
						ELSE
							CALL PRINT_STRW, "「うぁっ_UH_ ちょ、まてっ_UH_ まてってばっ_UH_」"
							CALL PRINT_STRW, "「やばいって、これ_UH_ おくまで、是ってるからっ_UH_」"
						ENDIF
					ENDIF
				ELSE
					IF RAND:2
						CALL PRINT_STRW, "「んぁっ_UH_ くっ……この、好き放題してくれやがって……_UH_」"
						CALL PRINT_STRW, @"「%CNAME("一人称")%のケツ穴、これでもかってくらいほじってくれるじゃんよ……んっ_UH_」"
					ELSE
						CALL PRINT_STRW, "「はっ_UH_ はっ……んっ_UH_ 楽しそうじゃん……？」"
						CALL PRINT_STRW, "「すっかり他人のケツ穴で、おもちゃ玩耍すんのに夢中になりやがってさぁ……は、ぁ……_UH_」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「んっふ……_UH_ いいぞ、擅長擅長……_UH_」"
					CALL PRINT_STRW, "「就这様もっと……奥までいじってみ……_UH_」"
				ELSE
					CALL PRINT_STRW, "「あ……_UH_ ん……_UH_ いいね、いい感じ……_UH_」"
					CALL PRINT_STRW, "「もうちょっと、強くしてもいいぞ……ふふ……_UH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「ん……ふふ、まだ手付きが遠慮してんねぇ……」
			PRINTFORMW 「もっと好きなようにやってみ？」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;-------------------------------------------------
IF SELECTCOM == 3
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰莖(扶她/男性のみ)
;-------------------------------------------------
IF SELECTCOM == 4
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW 「ちょ……っと失礼しますよ、っと」
			IF TALENT:PLAYER:男性
				IF EXP:PLAYER:口交経験 == 0
					PRINTFORMW 「くっく……%CNAME("二人称")%が未経験なのは承知の上だけど、我慢できなくなっちった」
					PRINTFORMW 「ごめんなぁ、%CNAME("主人")%。男なのに男のチンポしゃぶるなんて嫌かもしんないけど」
					PRINTFORMW 「暴れないで大人しくしててくれよ。噛まれたりしたら痛いからさ」
				ELSE
					PRINTFORMW 「ふふん。%CNAME("二人称")%もしゃぶった経験くらいあるんだろ？」
					PRINTFORMW 「%CNAME("一人称")%のもちょっと試してみてくれよ。くっく」
				ENDIF
			ELSE
				PRINTFORMW 「ごめんな、%CNAME("主人")%。%CNAME("二人称")%の口見てたら我慢できなくなって」
				IF EXP:PLAYER:口交経験 == 0
					PRINTFORMW 「初口交が强行って嫌かもしんないけどさ。ま、大目に見てくれよ」
					PRINTFORMW 「大丈夫だって、そんな乱暴にはしないからさ……ふふ」
				ELSE
					PRINTFORMW 「ちょっとだけ好きなようにさせてくれよ……ふふ」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「んっ……へえ？ 舐めてくれんだ、%CNAME("二人称")%」
			IF TALENT:PLAYER:男性
				PRINTFORMW 「いやね。いくら相手の見た目がどうだっつっても、男が男のチンポ咥えるって抵抗あるんじゃないかってさ」
				IF EXP:PLAYER:口交経験 == 0
					PRINTFORMW 「ほら、初めてだろ？ まだちょっと躊躇ってるのがわかるよ」
					PRINTFORMW 「主动やりに来てくれるのはうれしいけどな……ふふ」
					PRINTFORMW 「いいか、いきなりカリとか鈴口舐めたりとかすんなよ。女の性感帯と一緒で敏感だからな」
					PRINTFORMW 「慌てて歯ぁ立てないようにな。痛かったら突き飛ばすから」
				ELSEIF EXP:PLAYER:口交経験 <= 20
					PRINTFORMW 「ま、%CNAME("二人称")%はちょっとは経験あるみたいだけど……」
					PRINTFORMW 「どこまでやってくれるのかな？ お手並み拝見といこうか……ふふ」
				ELSE
					PRINTFORMW 「まあでも、心配なさそうかな……%CNAME("二人称")%けっこー慣れてるっぽいし」
					PRINTFORMW 「いいよ、好きなようにして。%CNAME("二人称")%に任せる」
					CALL PRINT_STRW, "「ふふ……いっぱい気持ちよくしてくれよな_UH_」"
				ENDIF
			ELSE
				IF EXP:PLAYER:口交経験 == 0
					PRINTFORMW 「大丈夫か？ %CNAME("二人称")%はじめてやるだろ。見りゃわかるよ」
					PRINTFORMW 「……ふふ。進んで初口交してくれるってのは男冥利に尽きるし、嬉しいけどな」
					PRINTFORMW 「慌てなくていいからな。まずはゆっくり、冰舐めるみたいに」
					PRINTFORMW 「いきなり奥まで咥えこもうとしなくていいから。できる範囲で頼むよ」
				ELSEIF EXP:PLAYER:口交経験 <= 20
					PRINTFORMW 「一応経験はあるみたいだけど……大丈夫かな？」
					PRINTFORMW 「無理にがんばんなくていいから、自分なりにやってみ」
				ELSE
					PRINTFORMW 「楽しみだねぇ。%CNAME("主人")%桑もそこそこ経験豊富みたいだし」
					PRINTFORMW 「男の%CNAME("一人称")%とどっちが擅長いかな？ なーんて」
					PRINTFORMW 「ふふっ……勉強させてもらうよ、%CNAME("主人")%桑？」
				ENDIF
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF EXP:PLAYER:口交経験 <= 20
				IF RAND:2
					CALL PRINT_STRW, "「んっふふ……_UH_ こっちはまだまだ初々しいなぁ……_UH_」"
				ELSE
					CALL PRINT_STRW, @"「%CNAME("二人称")%にゃ悪いけど、まだしばらくは楽しめそうだなぁ……_UH_」"
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「あはぁ……_UH_ こうやって好きにできるのもいいなぁ_UH_」"
				ELSE
					CALL PRINT_STRW, @"「わりぃ……もうちょっと続けさせてくれな……ん、ふ……_UH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF EXP:PLAYER:口交経験 <= 20
				IF RAND:2
					PRINTFORMW 「ふふっ……大丈夫か、%CNAME("主人")%？ 苦しくないか？」
				ELSE
					CALL PRINT_STRW, @"「ふふ……%CNAME("二人称")%にゃ悪いけど、イイ顔してんなぁ……_UH_」"
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「あぁ、いいなぁ……_UH_ シゴき甲斐のある口……ふふ……_UH_」"
				ELSE
					CALL PRINT_STRW, @"「あは……_UH_ いいなぁ、%CNAME("二人称")%の口……気持ちいいわぁ……_UH_」"
				ENDIF
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF EXP:PLAYER:口交経験 <= 20
				IF RAND:2
					CALL PRINT_STRW, "「んふ……_UH_ もっと舐めてる顔見せて……そうそう……_UH_」"
				ELSE
					CALL PRINT_STRW, "「ふふ……ゆっくりでいいぞ、精心……まだまだ擅長くなれるからな……_UH_」"
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「あっは_UH_ もっと勢いよくしてくれていいか……？ ん、く……_UH_」"
				ELSE
					CALL PRINT_STRW, "「ふふっ_UH_ すっかり擅長になってきたなぁ……なかなか気持ちいいぞ……_UH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF EXP:PLAYER:口交経験 <= 20
				IF RAND:2
					CALL PRINT_STRW, "「唇、カリに引っ掛けてみ……んっ……_UH_ そうそう、そんな感じ……」"
				ELSE
					CALL PRINT_STRW, "「ん、ふ……_UH_ 周りからなぞるように舌で舐めてみ……うん、いい感じ……」"
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「あ、ふ……_UH_ 慣れてきたな……就这様吸ってみて……あぁ、いい感じ……っ」"
				ELSE
					CALL PRINT_STRW, "「んっふ……_UH_ 就这様、奥まで咥えられるか……？ ふふっ……」"
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;胸愛撫
;-------------------------------------------------
IF SELECTCOM == 5
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;接吻
;-------------------------------------------------
IF SELECTCOM == 6
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW 「むっ……ん……ふぁ……」
			PRINTFORMW 「ふぅん……？ 初接吻がこんな強引なのなんて……なかなかイイ趣味してんな」
		;それ以外
		ELSE
			PRINTFORMW 「ん、ふ……ん……」
			IF TALENT:PLAYER:男性
				PRINTFORMW 「ふふっ……どうだった？ 男同士でしてみる接吻は？」
				SIF TALENT:女性
					PRINTFORMW 「ま、今は違うけどさ……」
			ELSE
				PRINTFORMW 「ふふっ。案外悪くないだろ？ 伪娘と接吻してみるのも」
				SIF TALENT:女性
					PRINTFORMW 「おっと、今は違ったか」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「やん_UH_ ん、%TEXTR("ちゅっ_UH_ ちゅぅ_UH_ ちゅ_UH_/んっ_UH_ ちゅっ_UH_ ちゅっ_UH_/んちゅっ_UH_ ちゅっ_UH_ ちゅく……_UH_")%」"
			CALL PRINT_STRW, "「もう、やめろよ……そんな热情地迫られたら……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「お、おい……%TEXTR("ん……ちゅ……/んふ……ちゅ……んん……/んん……ちゅ……/ぁ……ん……んむ……")%」
			PRINTFORMW 「ぷはっ……ったく、強引なやつめ……」
		ENDIF
	;それ以外
	ELSE
		;テンダー接吻
		IF CHECK_COM("テンダー接吻")
			IF RAND:2
				CALL PRINT_STRW, "「んっふ……今日もよろしくな_UH_」"
			ELSE
				CALL PRINT_STRW, "「んっ……これこれ_UH_ これがなくちゃ」"
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			CALL PRINT_STRW, @"「%TEXTR("ちゅっ_UH_ ちゅぅ_UH_ ちゅ_UH_/んっ_UH_ ちゅっ_UH_ ちゅっ_UH_/んちゅっ_UH_ ちゅっ_UH_ ちゅく……_UH_")%」"
			CALL PRINT_STRW, @"「ふふっ……_UH_ %TEXTR("大好きだ/愛してる")%ぜ、%CNAME("主人")%……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「%TEXTR("ん……ちゅ……/んふ……ちゅ……んん……/んん……ちゅ……/ぁ……ん……んむ……")%」
			PRINTFORMW 「ふふっ……%TEXTR(@"%CNAME("一人称")%の接吻は気に入ってるか/%CNAME("二人称")%も結構スキだね")%、%CNAME("主人")%」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

;-------------------------------------------------
;舐肛　Ａ面部騎乗(被逆推ているとき)
;-------------------------------------------------
;舐肛
IF SELECTCOM == 9
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方手交
;-------------------------------------------------
IF SELECTCOM == 10
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方乳交
;-------------------------------------------------
IF SELECTCOM == 11
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方足交
;-------------------------------------------------
IF SELECTCOM == 12
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開阴道
;-------------------------------------------------
IF SELECTCOM == 13
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「んっ……怎么样？ なんか変なとこないか？」
		PRINTFORMW 「%CNAME("二人称")%で作ったまんこなんだから、酱としっかり見てくれよな」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("Ｖ潤充分")
				IF RAND:4 == 0
					CALL PRINT_STRW, @"「なぁ、いつまでこうしてればいいんだよ……%CNAME("一人称")%もう我慢できないよ……_UH_」"
				ELSEIF RAND:3 == 0
					CALL PRINT_STRW, @"「んっ……_UH_ すっげぇ湿的てる……%CNAME("一人称")%もう完全にメスじゃん……_UH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「なぁ、早く入れてくれよ……_UH_ すっごく寂しいよ、ココ……_UH_」"
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, @"「ほぉら_UH_ 愛しのカレのおまんこですよー_UH_ ……なーんて。ふふっ_UH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「じっくり見ていいんだぞ……%CNAME("二人称")%のためのおまんこなんだからな……_UH_」"
				ELSE
					CALL PRINT_STRW, "「ほら、こっち……_UH_ もっと近づいてこいよ……_UH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF COND("Ｖ潤充分")
				IF RAND:4 == 0
					PRINTFORMW 「やっべ……%CNAME("一人称")%のまんこ、マジでぬるぬるしてんじゃん……」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「マジか、こんなに……%CNAME("一人称")%、興奮してんのかな……？」
				ELSEIF RAND:2
					PRINTFORMW 「んっ……おい、あんま挑逗なよ。やるなら早くしてくれって」
				ELSE
					PRINTFORMW 「なんか自分の事なのに他人事みてーだなぁ……こんなに湿的てるのに」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ほーら、元男性のTSまんこだ。好きなんだろ？ こういうの」
				ELSEIF RAND:2
					PRINTFORMW 「ん……ふふ。しっかり見入ってるな、%CNAME("主人")%桑？」
				ELSE
					PRINTFORMW 「どうよ、%CNAME("主人")%？ このまま舐めてみないか？ ふふっ……」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開菊穴
;-------------------------------------------------
IF SELECTCOM == 14
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「そぉら、これが%CALLNAME:TARGET%酱のケツ穴で～す」
		CALL PRINT_STRW, "「好きなだけ見ていいからな、御主人様_UH_ くっく……」"
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("Ａ潤充分")
				IF RAND:4 == 0
					CALL PRINT_STRW, "「あ、はぁ_UH_ もうすっかり湿的てきちまった……_UH_」"
				ELSEIF RAND:3 == 0
					CALL PRINT_STRW, @"「なぁ、いつまで見てんだよ……早く使ってくれよ……_UH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「おーい、%CNAME("主人")%さーん_UH_ お菊門が呼んでるぞー_UH_ くっく……」"
				ELSE
					CALL PRINT_STRW, "「ねぇ、まだぁ……？ 指でも舌でもいいから、早くしてくれよ……_UH_」"
				ENDIF
			ELSE
				IF RAND:4 == 0
					CALL PRINT_STRW, @"「ふふっ_UH_ 今日もバッチリだろ？ %CNAME("主人")%のお・し・り_UH_」"
				ELSEIF RAND:3 == 0
					CALL PRINT_STRW, @"「ふふ……_UH_ そんなに%CNAME("一人称")%が下品な格好してんのが好きか？」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「ほぉら、酱と見えるか？ 穴の奥まで……くっく……_UH_」"
				ELSE
					CALL PRINT_STRW, @"「ははっ……%CNAME("二人称")%の視線、マジで熱く感じるよ……_UH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF COND("Ａ潤充分")
				IF RAND:4 == 0
					PRINTFORMW 「んっ、ふふ……もう湿的てきちまったなぁ」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「見てるだけでいいのかよ？ こっちは準備できてるぜ？」
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「ふふっ、すごいだろ？ こんなにエッチなんだぜ、\@ TALENT:女性 ? 元 # \@男性の湿的たケツ穴……_UH_」"
				ELSE
					PRINTFORMW 「ほら、早く%CNAME("一人称")%のケツ穴で遊ぼうぜ？ もうできあがってんだからさ」
				ENDIF
			ELSE
				IF RAND:4 == 0
					PRINTFORMW 「おいおい、ガン見じゃねえかよ。そんなに%CNAME("一人称")%のケツ穴が好きか？」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「ほぉら、ケツ穴ひくひくしてんのが見えるか？ ほぉーら」
				ELSEIF RAND:2
					PRINTFORMW 「そんなに興味あるか？ なんなら舐めてみてもいいぜ……くっく」
				ELSE
					CALL PRINT_STRW, "「そぉら、御開帳_UH_ 今日も好きなだけ見ていいぞ～」"
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道指挿入
;-------------------------------------------------
IF SELECTCOM == 15
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;跳蛋
;-------------------------------------------------
IF SELECTCOM == 30
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;振動棒
;-------------------------------------------------
;開始時
IF SELECTCOM == 31
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕有
		IF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ｖ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:振動棒 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛用振動棒
;-------------------------------------------------
;開始時
IF SELECTCOM == 33
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕有
		IF CHECK("Ａ振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ａ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:肛用振動棒 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("Ａ振動棒")
			;Ｓ状結腸まで振動棒が侵入している
			IF CHECK_COM("結腸責め")
				IF TALENT:結腸性感
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飛機杯
;-------------------------------------------------
IF SELECTCOM == 37
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;Ｖ挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 60 && SELECTCOM <= 69 && FIRSTCOMS("Ｖ挿入") == 0
	;処女
	IF TALENT:処女
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「は、あぁ……_UH_ あぁぁ……っ_UH_」"
			PRINTFORMW 「……ははっ……冗談だろ……%CNAME("一人称")%、膜ぶち破られて、こんな喜んでんの……？」
			PRINTFORMW 「も……完全に、メスじゃん……はははっ……」
		;それ以外
		ELSE
			PRINTFORMW 「いッ……つぅ……！」
			PRINTFORMW 「っ、ふぅー……やっぱ痛えんだな……これ」
			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:恋慕)
		CALL PRINT_STRW, "「は、ぐっ……_UH_ うぁ……_UH_ はっ……はっ……」"
		CALL PRINT_STRW, @"「ったく、も……でけーんだよ、%CNAME("二人称")%さ……はは……_UH_」"
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;正常位
		CASE 60
			CALL PRINT_STRW, "「あ、はぁ……_UH_ きたきた……_UH_」"
			CALL PRINT_STRW, "「こうやって、見下されてると……ほんと、女性って感じがしてさ……ふふ……_UH_」"
		;後背位
		CASE 61
			CALL PRINT_STRW, "「あ、ふぅ……っ_UH_ 是って、くる……っ_UH_」"
			CALL PRINT_STRW, @"「%CNAME("主人")%、もっと、腰掴んで……_UH_ 思いっきり激烈地して……_UH_」"
		;屈曲位
		CASE 62
			CALL PRINT_STRW, "「や、あぁ_UH_ そんな、ni↘……思いっきり……_UH_」"
			CALL PRINT_STRW, "「はぁ……はぁ……あぁ_UH_ もっと、ぐいぐいしてぇ……_UH_」"
		;対面座位
		CASE 63
			CALL PRINT_STRW, "「ん、ふ……あは……_UH_ 是ったぁ……_UH_」"
			CALL PRINT_STRW, "「なあ、接吻しようよ……_UH_ もっとギュッとしてさ……いいだろ……？」"
		;背面座位
		CASE 64
			CALL PRINT_STRW, "「やぁ_UH_ こんな、丸見えになっちゃうのやだ_UH_」"
			CALL PRINT_STRW, @"「男性なのに_UH_ %CNAME("一人称")%ほんとは男性なのにぃ_UH_」"
		;騎乗位
		CASE 65
			CALL PRINT_STRW, "「はぁぁ……っ_UH_ 是ったぁ……_UH_」"
			CALL PRINT_STRW, @"「ふふっ_UH_ %CNAME("一人称")%いっぱい腰ふるから_UH_ 女の子してる%CNAME("一人称")%見ててっ_UH_」"
		ENDSELECT
	;それ以外
	ELSE
		IF MARK:屈服刻印 >= 2
			IF RAND:2
				PRINTFORMW 「ん、くっ……ふふ……なんか、結構慣れてきたかもな……」
				PRINTFORMW 「ほら、好きなように動いていいぞ……%CNAME("主人")%」
			ELSE
				PRINTFORMW 「あ、は……っ……やっべ、声でた……」
				PRINTFORMW 「なんか恥ずかしいじゃねえかよ、もう……」
			ENDIF
		ELSE
			PRINTFORMW 「%TEXTR("あ/っ/は/ひ/ふ/や/ん")%、%TEXTR("ぁ/ぅ/ぐ/ん")%……っ」
			PRINTFORMW 「ふ、う……%TEXTR("まだちょっと慣れねえみたいだな/大丈夫……もう動いていいぞ")%……」
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ｖ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:手下留情 && NOWEX:Ｖ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			; IF RAND:5 == 0
			; 	CALL PRINT_STRW, "「やっ_UH_ やだっ_UH_ やぁだぁっ_UH_ はやくっ_UH_ 終わらせろ、よぉっ_UH_」"
			; ELSEIF RAND:4 == 0
			; 	CALL PRINT_STRW, @"「イカせてっ_UH_ %CNAME("主人")%っ、はやくっ_UH_ イカせてってばぁ_UH_」"
			; ELSEIF RAND:3 == 0
			; 	CALL PRINT_STRW, "「もぉ、むりだってっ_UH_ おかしくなるってばぁぁ_UH_」"
			; ELSEIF RAND:2
			; 	CALL PRINT_STRW, "「イカせて_UH_ おねがいだからっ_UH_ はやくしてくれよぉぉっ_UH_」"
			; ELSE
			; 	CALL PRINT_STRW, @"「も、もういいからっ_UH_ %CNAME("一人称", "かな")%もうダメだからぁっ_UH_ もうゆるしてぇぇっ_UH_」"
			; ENDIF
			IF RAND:2
				CALL PRINT_STRW, "「おい、なんだよっ、このイジワルっ_UH_ なんでまた挑逗んだよっ_UH_」"
			ELSE
				CALL PRINT_STRW, "「なぁっ_UH_ もっとっ_UH_ もっと突いてくれよっ_UH_ 我慢できないんだよぉっ_UH_」"
			ENDIF
		ELSE
			IF RAND:2
				CALL PRINT_STRW, "「ふーっ_UH_ ふーっ_UH_ ん、ぐ……ふぅ、んっ_UH_」"
			ELSE
				CALL PRINT_STRW, "「は、ぁっ_UH_ はっ、はっ……う、あっ……_UH_」"
			ENDIF
			IF RAND:2
				PRINTFORMW 「て、め……っ、この、いつまで、挑逗て……！」
			ELSE
				PRINTFORMW 「こ、の……いいかげん、に……く、ぁ……っ！」
			ENDIF
		ENDIF
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ｖ対応指令") && RAND:2
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あっは_UH_ この体位が好きなのバレちまってるっ……_UH_」"
			CALL PRINT_STRW, "「ね……もっと、んっ_UH_ 好きにさせてぇ……_UH_」"
		ELSE
			CALL PRINT_STRW, @"「%TEXTR("あぁ/はぁ/んん/")%……っ_UH_」"
			IF RAND:2
				PRINTFORMW 「……やっべ……声でちった……はは」
			ELSE
				PRINTFORMW 「なんか、ハマってきちまったかも……ははは」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		;前向き
		CASE "正常位", "屈曲位", "騎乗位", "対面座位"
			IF TALENT:恋慕 && RAND:3 == 0
				CALL PRINT_STRW, @"「あはっ_UH_ あぁっ_UH_ %CNAME("主人")%っ_UH_」"
					IF RAND:3 == 0
						CALL PRINT_STRW, "「手ぇ、握ろっ？ な？ もっと気持ちよくなるから_UH_ ほんと_UH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「接吻っ_UH_ 接吻したいっ_UH_ 接吻しようよっ_UH_ な、いいだろっ_UH_」"
					ELSE
						CALL PRINT_STRW, "「このまま、んっ_UH_ だきしめて_UH_ ぎゅってしてくれよぉ_UH_」"
					ENDIF
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				CALL PRINT_STRW, @"「%TEXTR("く、ふぅっ……あぁっ……_UH_/ ふぁ、あ……ん、あ……っ_UH_")%」"
				IF RAND:2
					CALL PRINT_STRW, @"「ふ、ふふ……_UH_ やっぱ、好吃じゃん、%CNAME("二人称")%……けっこー……あはっ_UH_」"
				ELSE
					CALL PRINT_STRW, @"「やっべぇ……_UH_ %CNAME("一人称")%、けっこー喘がされてんじゃん……あは……_UH_」"
				ENDIF
			ELSE
				PRINTFORMW 「%TEXTR("ん、く……あぁ/はっ、はっ……あ、ん")%……っ」
				IF RAND:2
					PRINTFORMW 「ふふっ……なかなか、頑張るじゃん……？」
				ELSE
					PRINTFORMW 「あ、あんま見んなよ……これでも恥ずかしいんだぞ、一応……」
				ENDIF
			ENDIF
		;後ろ向き
		CASEELSE
			IF TALENT:恋慕 && RAND:3 == 0
				CALL PRINT_STRW, @"「あっ_UH_ ふっ_UH_ んっ_UH_ あぁっ_UH_ はっ_UH_」"
					IF RAND:3 == 0
						CALL PRINT_STRW, "「这个、いいようにされてるみたいなのに、興奮しちまうよぉっ_UH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「もっとがっちり、カラダ掴んでっ_UH_ その方が、いいからっ_UH_」"
					ELSE
						CALL PRINT_STRW, "「もっと胖次胖次してっ_UH_ 乱暴にしていいからっ_UH_ あっ_UH_」"
					ENDIF
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				CALL PRINT_STRW, @"「%TEXTR("んっ_UH_ んっ_UH_ ん～っ_UH_/はっ_UH_ はっ_UH_ あっ、んっ_UH_")%」"
				IF RAND:2
					CALL PRINT_STRW, @"（やっべ……_UH_ %CNAME("一人称")%、こんなされるがままの体位で興奮してんの……？）"
				ELSE
					CALL PRINT_STRW, "「あんま、音……たてんなよ……っ_UH_ なんか、アタマおかしくなってくるんだよ……_UH_」"
				ENDIF
			ELSE
				PRINTFORMW 「%TEXTR("ふっ、ふっ、ん……ふっ……んっ/はっ、はっ、はぁ……ん、はっ……")%」
				IF RAND:2
					PRINTFORMW （くっそぉ、がっちり腰掴みやがって……んっ……）
				ELSE
					PRINTFORMW 「ふふっ……だいぶ、楽しそうじゃん……？ んっ……」
				ENDIF
			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 TALENT:恋慕
			CALL PRINT_STRW, "「あ、は……_UH_ きたきた、チンポきたぁ……_UH_」"
			CALL PRINT_STRW, @"「やっと%CNAME("一人称")%のケツ使いやがったなぁ、このヤローめ……_UH_」"
			CALL PRINT_STRW, "「何を今まで躊躇ってたのか知らねえけど……よっ_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过阴茎を咥えた肛門に力を込め、自分の腰と共に%CALLNAME:PLAYER%の見を引き寄せる……
			CALL PRINT_STRW, @"「%CNAME("一人称")%だって長いこと待たされたんだ……好きにさせてもらうぜ……_UH_」"
		;余裕有
		ELSEIF CHECK("Ａ挿入")
			CALL PRINT_STRW, "「ん、ふ……_UH_ 入ったな……ふふ……_UH_」"
			PRINTFORMW 「こうやって誰かのチンポ挿れさせてやるの、%CNAME("二人称")%が初めてなんだよな……」
			CALL PRINT_STRW, @"「ふふ……嬉しいかい、%CNAME("主人")%桑よ_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过肛門に咥えた阴茎をさすりながら%CALLNAME:PLAYER%を看了过来……
		;それ以外
		ELSE
			PRINTFORMW 「っ、く……っつぅ……」
			PRINTFORMW %CALLNAME:PLAYER%の阴茎が肛門に埋められていくと、%CALLNAME:TARGET%通过顔を顰めた……
			PRINTFORMW 「ふー……いや、なんでもねえよ……思ったよりスムーズにいかねえなって、思っただけだから……」
			PRINTFORMW 「動いていいけど……ちょっと労ってくれよ？」
			PRINTFORMW %CALLNAME:TARGET%にしては殊勝な態度だ……
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「ん、ふ……_UH_ %CNAME("一人称")%のケツマンコ初体験だなぁ？」"
			PRINTFORMW %CALLNAME:TARGET%通过一脸陶醉%CALLNAME:PLAYER%を看了过来……
			PRINTFORMW 「今までずーっとチンポ挿れようとはしてこなかったよなぁ、%CNAME("二人称")%」
			CALL PRINT_STRW, "「そんなに愛のない性交が嫌だったのかねぇ……くっく……_UH_」"
			CALL PRINT_STRW, "「ほら、早くヤろうぜ？ 愛情たっぷりの肛門性交_UH_」"
		;余裕有
		ELSEIF CHECK("Ａ挿入")
			CALL PRINT_STRW, @"「ん、ふ……_UH_ 入った入った……どうよ、%CNAME("一人称")%のケツは？」"
			CALL PRINT_STRW, "「ほらほら、好きに動いていいんだぜ……？ 男性のケツマンコでさ……_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过阴茎を咥えた肛門に力を入れたり抜いたりして、%CALLNAME:PLAYER%を挑発している……
		;それ以外
		ELSE
			PRINTFORMW 「あ、っ……つ……ちょ、待った待った……」
			PRINTFORMW %CALLNAME:PLAYER%の阴茎が肛門に埋められていくと、%CALLNAME:TARGET%通过慌てて手を振った……
			PRINTFORMW 「いやコレいてえわ……酱と湿的てないか？ それとも%CNAME("二人称")%のモノのせいか？」
			PRINTFORMW %CALLNAME:TARGET%通过呆れたような、少しショックを受けたような複雑な表情だ……
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ａ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOMS("Ａ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW 「ば……ッ……%CNAME("二人称", "かな")%、のッ……キツすぎ……ッ」
		PRINTFORMW %CALLNAME:TARGET%通过苦悶の表情を和らげるべく息を吸っている……
	;巨根
	ELSEIF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		CALL PRINT_STRW, "「あはぁッ_UH_ これこれ_UH_」"
		CALL PRINT_STRW, "「凶悪的チンポしやがって……ふふっ_UH_」"
		PRINTFORMW %CALLNAME:TARGET%通过埋め込まれた阴茎の温度を感じながら恍惚としている……
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;正常位
		CASE 70
			CALL PRINT_STRW, "「あぁっ……_UH_ ふふ……なんだよ？ 男性がケツ突かれて喘ぐ姿が見たいのか？」"
			CALL PRINT_STRW, @"「いいぜ、随便も……他ならぬ%CNAME("主人")%様の望みだもんな……_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过悄悄的%CALLNAME:PLAYER%に脚を絡めた……
		;後背位
		CASE 71
			CALL PRINT_STRW, @"「んっふ_UH_ やっぱ%CNAME("二人称")%もバックが好きかぁ？」"
			PRINTFORMW 「肛門性交っつったらバックが定番だからなぁ……そう思うだろ？」
			PRINTFORMW %CALLNAME:TARGET%通过阴茎を咥え込んだ尻を緩く揺らしながら笑着いる……
		;屈曲位
		CASE 72
			CALL PRINT_STRW, @"「ぅおっ_UH_ %CNAME("二人称")%、なにすんだ、この……っ」"
			PRINTFORMW 「你、こんなカッコで……無茶したら、いくら%CNAME("二人称")%でも怒るからな……」
			PRINTFORMW 言葉の割に、%CALLNAME:TARGET%の頬は緩んでいる……
		;対面座位
		CASE 73
			CALL PRINT_STRW, "「あ、は……_UH_ 酱と入ったな……_UH_」"
			CALL PRINT_STRW, "「ふふっ……こうやって抱き合ってするの、結構嫌いじゃないんだよね……_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过%CALLNAME:PLAYER%の背に手を回し、じっと瞳を覗き込んでくる……
		;背面座位
		CASE 74
			CALL PRINT_STRW, "「あっ……_UH_ なんだよ、もぉ……こんな从后面将抱えやがって……」"
			CALL PRINT_STRW, @"「めっちゃ%CNAME("一人称")%のこと独占してるみたいじゃんか、なぁ……_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过片腕を%CALLNAME:PLAYER%の首に回して見つめ合ってくる……
		;騎乗位
		CASE 75
			CALL PRINT_STRW, "「ん、ふっ……_UH_ ほら、見えるか？ 酱と入ったぞ……_UH_」"
			CALL PRINT_STRW, @"「就这様じっくり見てろよ_UH_ %CNAME("一人称")%が腰振ってると・こ・ろ_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过身を反り、自己的\@ PENIS(TARGET) ? 阴茎と # \@腰靈活を見せつけてくる……
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW 「%TEXTR("あはっ、きたきた/んっ……入ってきてるな")%……」
		CALL PRINT_STRW, @"「%TEXTR(@"さ、今日も好きなだけ楽しんでいいぜ。/%CNAME("一人称")%のケツは気に入ってるか？")%くっく……_UH_」"
		PRINTFORMW %CALLNAME:TARGET%通过不敵に笑着いる……
	ENDIF
	RETURN 1
;-------------------------------------------------
;Ｓ状結腸を使っての肛門性交
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHECK_COM("結腸責め")
	;初めての結腸責め
	IF EXP:結腸経験 == 0
		PRINTFORMW 「ぉ、っ――？」
		PRINTFORMW %CALLNAME:PLAYER%の阴茎が壁に突き当たる感覚と共に、%CALLNAME:TARGET%通过喉を詰まらせたように息を漏らした。
		PRINTFORMW （なんだ、これ……この、感覚は……）
		PRINTFORMW （まさか……こいつの、結腸まで届いて……？）
		CALL PRINT_STRW, "（――ァ、あッ！ や、ちょ、はぁッ_UH_ まって――あぁーっ_UH_）"
		PRINTFORMW %CALLNAME:PLAYER%の抽送を%CALLNAME:TARGET%通过慌てて止めようとするが、その静止は快楽に流され圆圈で形にならない……
		PRINTFORMW （マジ、かよ……！ %CNAME("一人称")%、ここまではまだだったのに……）
		CALL PRINT_STRW, @"（まさか、初めて%CNAME("一人称")%の結腸突くのが……こいつのチンポになるなんてっ……_UH_）"
	;今回初の結腸責め
	ELSEIF EXP_GAIN("結腸経験") == 0
		IF TALENT:結腸性感
			CALL PRINT_STRW, "「お゛っ_UH_ きたっ_UH_ 奥きたっ_UH_」"
			CALL PRINT_STRW, "「あはぁっ_UH_ もっとっ_UH_ もっと突いてぇっ_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过望んだ快楽の到来に髪を振り乱して悦んでいる……
		ELSE
			CALL PRINT_STRW, "「あ゛っ_UH_ まっ、て……ちょっとまってっ_UH_ 奥きてる_UH_」"
			CALL PRINT_STRW, "「これっ_UH_ おかしくなるっ_UH_ おかしくなるからぁっ_UH_」"
			PRINTFORMW %CALLNAME:TARGET%通过突如訪れた乱暴な快楽に悶えている……
		ENDIF
	ELSE
		IF TALENT:結腸性感
			IF RAND:2
				CALL PRINT_STRW, "「いいっ_UH_ これいいっ_UH_ きもちいいよぉ_UH_ もっとしてぇっ_UH_」"
			ELSE
				CALL PRINT_STRW, "「あはぁ_UH_ これしゅきぃ_UH_ もっとしてぇ_UH_ もっと突いてよぉぉ_UH_」"
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%通过激しい快楽にすっかり我を忘れている……
		ELSE
			IF RAND:2
				CALL PRINT_STRW, "「やぁ_UH_ やばいってっ_UH_ これ、だめだってばぁ_UH_ はあぁぁっ_UH_」"
			ELSE
				CALL PRINT_STRW, "「あぁぁぁぁ_UH_ だめぇ_UH_ まってぇぇぇっ_UH_」"
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%通过激しい快楽に髪を振り乱して悶えている……
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ａ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:PLAYER:手下留情 && NOWEX:Ａ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;余裕が無い
	ELSEIF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ａ対応指令") && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
			IF TALENT:恋慕 && RAND:3 == 0
				PRINTFORMW
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		CASEELSE
			IF RAND:4 == 0
				PRINTFORMW
			ELSEIF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門性交(初めては上のＡ挿入系初選択などで)
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 74
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門騎乗位
;-------------------------------------------------
IF SELECTCOM == 75
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;貝あわせ
;-------------------------------------------------
IF SELECTCOM == 80
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			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:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道騎乗位
;-------------------------------------------------
IF SELECTCOM == 88
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;洗面奶手交
;手淫と洗面奶から派生する
;-------------------------------------------------
IF CHECK_COM("洗面奶手交")
	;恋慕
	IF TALENT:恋慕
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;手淫
;-------------------------------------------------
IF SELECTCOM == 90
	;初めて
	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 == 91
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			CALL PRINT_STRW, "「んっふ、いただき_UH_ は、む……ん、ちゅぷ……」"
			PRINTFORMW 「ちゅぅぅー、じゅるるっ……んふふ……」
		;それ以外
		ELSE
			PRINTFORMW 「さて、それじゃあ%CNAME("主人")%桑のチンポを味わわせてもらおうかなぁ？」
			PRINTFORMW 「は、む……じゅぽ、じゅぼっ、じゅぼっ……んふっ……」
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("阴茎接吻")
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「んーちゅ_UH_ ふふっ_UH_」"
			CALL PRINT_STRW, @"「今日もよろしくな、%CNAME("主人")%様_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW,"「ちゅっ_UH_ ……あ、ちょっとビクってしたろ」"
			PRINTFORMW 「ふふっ、それじゃあ今日も始めますかぁ」
		ENDIF
	;みんな大好き清洁口交
	ELSEIF CHECK_COM("清洁口交")
		;恥垢もお掃除
		IF CHECK_COM("恥垢清洁口交")
			PRINTFORMW 「うっわ、きったね。酱と洗えよー」
			PRINTFORMW 「ま、慣れてるけどさ……ん、じゅるるっ……ちゅぷ……」
		;恋慕
		ELSEIF TALENT:恋慕 && RANDIF(1, ABL:奉仕精神 >= 3)
			CALL PRINT_STRW, "「じゅく_UH_ じゅぷ_UH_ じゅぷっ_UH_くちゅぅ……_UH_ ぷはぁ_UH_」"
			CALL PRINT_STRW, "「ふー、キレイんなった。……もちろん続き、するんだろ？ ふふ_UH_」"
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3 && RAND:2
			PRINTFORMW 「じゅる、じゅるる……ん、ちゅ……ふぅー」
			PRINTFORMW 「そーら、キレイんなったぞ。ほら、ヨダレでテッカテカ……ふふっ」
		ELSE
			PRINTFORMW 「ちゅく……ちゅるる……じゅるぅ……ん、く……」
			PRINTFORMW 「ふぅ……ほら、終わったぞ。満足か？」
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「じゅっぽっ_UH_ じゅっぽっ_UH_ じゅっぽっ_UH_ ぐぽっ_UH_ ぐぽっ_UH_」"
			CALL PRINT_STRW, "（くっく……_UH_ 起きないのかなぁ……？ 起きないんならこのまま吸い尽くしちまおうかなぁ……_UH_）"
		;それ以外
		ELSE
			PRINTFORMW 「じゅく、じゅぷじゅぷっ、くちゅぅ……ん、ちゅぅぅ……」
			PRINTFORMW （まぁだ起きねえでやんの……このままダウンさせてやろうか……）
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「ちゅぅぅ_UH_ れろ、れろ……ぴちゃ_UH_ ちゅぅ_UH_」"
			IF RAND:2
				CALL PRINT_STRW, "「んっふ_UH_ おいし……_UH_ ちゅ、じゅるるぅ～っ_UH_」"
			ELSE
				CALL PRINT_STRW, @"（あぁ、やめらんねぇ……_UH_ やっぱ%CNAME("一人称")%、コイツの虜だ……_UH_）"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「ちゅぅぅ……じゅるる、じゅる……れろ……ん、ふぁ……」
			IF RAND:2
				PRINTFORMW 「ふふ……怎么样？ なかなかだろ、%CNAME("一人称")%の口」
			ELSE
				PRINTFORMW 「くっく……気持ちよさそうな顔してるぜ？ %CNAME("二人称")%」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;乳交
;-------------------------------------------------
IF SELECTCOM == 92
	;初めて
	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 == 93
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「おぉ、素股？ 入れなくていいんだ？」
		PRINTFORMW 「ま、いいよ。好きなだけ腰振ってやるから。ふふっ……」
	;二回目以降
	ELSEIF CHECK_COM("展示肉棒")
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「んっふ_UH_ 相変わらずだなぁ、%CNAME("主人")%桑よ_UH_」"
			CALL PRINT_STRW, "「今日もいっぱいご奉仕してやるからな……ふふふ……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「おっほぉ……でっけえなぁ、相変わらず」
			IF TALENT:PLAYER:阴茎 > TALENT:阴茎
				PRINTFORMW （くっそ、%CNAME("一人称")%よりデケェとこ見せつけやがって……）
			ELSE
				PRINTFORMW 「ふふっ……それじゃあ今日も可愛がってやるか」
			ENDIF
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「んっ、ふっ_UH_ どうだ？ 気持ちよくなってるか？」"
			CALL PRINT_STRW, "「就这様、んっ_UH_ 出してもいいぞ_UH_ ほら_UH_」"
			CALL PRINT_STRW, "「それとも、このまま中に入れたいか？ ふふっ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「ほーれ、ほーれ_UH_ どうだ、気持ちいいか？」"
			PRINTFORMW 「就这様じっとしてていいからな。勝手に気持ちよくなってくれていいぞ……くっく」
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF RAND:2
				CALL PRINT_STRW, "「んっ、ふっ_UH_ どうだ？ 気持ちよくなってるか？ なぁ_UH_」"
			ELSE
				CALL PRINT_STRW, @"「あは……っ_UH_ なんか、%CNAME("一人称")%の方が我慢できなくなってきちまった……_UH_」"
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「くっく……ほんとに擦ってるだけで満足できんのかぁ？」
				PRINTFORMW 「入れたくなったらいつでも入れていいんだぞ、ほれほれ」
			ELSE
				PRINTFORMW 「んふ……だいぶぬるぬるしてきただろ、%CNAME("二人称")%」
				PRINTFORMW 「いやらしい音してきたぜ……興奮するか？ くっく……」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

;-------------------------------------------------
;六九式
;-------------------------------------------------
IF SELECTCOM == 99
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;洗面奶
;-------------------------------------------------
IF SELECTCOM == 104
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「は？ 洗面奶？」
		PRINTFORMW 「……あっはっはっは！ そうかそうか、やってほしいんか%CNAME("一人称")%に」
		PRINTFORMW 「だから%CNAME("二人称")%、%CNAME("一人称")%を女にしたんじゃないだろうな？ くっく……」
		PRINTFORMW 「いいよ。ほら、こっち来な？ たっぷり甘やかしてやるからさ……」
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「うりうり_UH_ どうだ%CNAME("主人")%、楽しんでるか？」"
			CALL PRINT_STRW, @"「なんならこのまま寝ちゃってもいいぞ_UH_ %CNAME("一人称")%の胸部眼罩にしちゃってさ_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「おーい、いいのか？ このまま男の胸部に被逆推たまんまでよ」
			PRINTFORMW 「まったく、情けない奴だぜ……くっく」
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「ふふふ……_UH_ 気持ちいいか、%CNAME("主人")%？」"
			CALL PRINT_STRW, @"「今日も%CNAME("一人称")%の胸部でたっぷり癒やしてやるからな……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「まったく、%CNAME("二人称")%も好き者だよなぁ？ マジで」
			PRINTFORMW 「わざわざ元男の胸部欲しがるんだからなぁ……くっく」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飞机杯冲
;-------------------------------------------------
IF SELECTCOM == 105
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

;-------------------------------------------------
;Ｖ逆挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 120 && SELECTCOM <= 124 && FIRSTCOMS("Ｖ逆挿入") == 0
	;調教者が処女
	IF TALENT:PLAYER:処女
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「ん、ふっ……_UH_ とうとう処女を卒業だな、%CNAME("主人")%？」"
			IF TALENT:PLAYER:性反転
				PRINTFORMW 「ふふっ……とうとう行き着くところまで来たんだなぁ、%CNAME("一人称")%たち……」
				PRINTFORMW 「もう言い訳しようもないくらい立派な女性だよ、%CNAME("二人称")%」
				PRINTFORMW 「これからもずっと一緒に楽しもうぜ……一直陪着我やるからさ……」
			ELSE
				PRINTFORMW 「……なんか、夢みたいな話だよな……好き变成了女の初めてをもらうって」
				PRINTFORMW 「なぁ、痛くないか……？ 酱と気持ちよくしてやるからな……」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「っ、と……脱処女おめでとうかな？ %CNAME("主人")%」
			IF TALENT:PLAYER:性反転
				PRINTFORMW 「嬉しいか？ 嬉しいだろうなぁ。このためにわざわざ女性变成了んだからな、%CNAME("二人称")%」
				PRINTFORMW 「望み街道、好きなだけ女性にしてやるからな……くっく……」
			ELSE
				PRINTFORMW 「どーよ？ わざわざ伪娘相手に処女を散らしてみた感想は？」
				PRINTFORMW 「……ま、それはこれから次第ってとこか」
				PRINTFORMW 「安心しな、失望させる気はねえよ」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;正常位奉仕
;-------------------------------------------------
IF SELECTCOM == 120
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

;-------------------------------------------------
;Ａ逆挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 125 && SELECTCOM <= 127 && FIRSTCOMS("Ａ逆挿入") == 0
	;調教者がＡ処女
	IF TALENT:PLAYER:Ａ処女
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「あ、ふ……_UH_ きっついなぁ、%CNAME("二人称")%のア・ナ・ル_UH_」"
			CALL PRINT_STRW, @"「こうして%CNAME("二人称")%の肛門を貰えるなんて夢みたいだぜ……ふふふ_UH_」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%にもこっちの良さをたっぷり教えてやるからな_UH_ 覚悟しとけよ_UH_」"
		;非恋慕
		ELSE
			PRINTFORMW 「お、ぉ……是った是った……大丈夫か、%CNAME("主人")%？」
			PRINTFORMW 「いいか、力を抜けよー。息止まっちゃうから、声も我慢しないこと。恥ずかしがらなくていいぞ」
			PRINTFORMW 「ゆっくり動くからな。少しずつ慣れていこう」
		ENDIF
	;それ以外
	;恋慕
	ELSEIF TALENT:恋慕
		IF COND("Ａ熟達", MASTER)
			CALL PRINT_STRW, "「おっほっほ……すっぽり入っちまったよ、おい_UH_」"
			CALL PRINT_STRW, @"「だいぶ遊んだんだなぁ、%CNAME("二人称")%……こりゃ遠慮是らねえかな？ くっく_UH_」"
			CALL PRINT_STRW, @"「いっぱい楽しませてもらうぜ、%CNAME("主人")%桑_UH_」"
		ELSE
			CALL PRINT_STRW, "「く、っ……ふふっ……_UH_ こっちはまだまだキツいみたいだな……？」"
			CALL PRINT_STRW, "「こいつはやりがいがあるぜ……気持ちよくしてやるからな_UH_ 期待してろよ_UH_」"
		ENDIF
	;非恋慕
	ELSE
		IF COND("Ａ熟達", MASTER)
			PRINTFORMW 「お、ぉ……？ すんなり入っちまった」
			PRINTFORMW 「なんだよ、%CNAME("主人")%も結構和我一起玩んじゃんか……くっく」
			PRINTFORMW 「それなら%CNAME("一人称")%も遠慮なく遊ばしてもらおうかなぁ」
		ELSE
			PRINTFORMW 「ん、う……っ！ ちっとは……やってるみたいだけど、まだまだだな……」
			PRINTFORMW 「これからもっと慣らしていこうか。くっく……腕が鳴るぜ」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

;-------------------------------------------------
;眼罩
;-------------------------------------------------
IF SELECTCOM == 133
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「おい、なんだよ？ 眼罩PLAYか？」
		PRINTFORMW 「ふふ……いいぜ、乗ってやろうじゃん。どこまでその気にさせてくれるかな？」
	;終了時
	ELSEIF TEQUIP:眼罩 == 0
		;恋慕
		IF TALENT:恋慕
			IF COND("疲労") + COND("前回絶頂")
				CALL PRINT_STRW, "「っ、く……はぁ……ふぅ……あは……_UH_」"
				CALL PRINT_STRW, @"「どうしよう……クセになっちまってんな、%CNAME("一人称")%……_UH_」"
			ELSE
				PRINTFORMW 「おぉい、なんだよ？ もう終わっちゃうのか？」
				PRINTFORMW 「もうちょっと続けてくれたってよかったのに……」
			ENDIF
		;それ以外
		ELSE
			IF COND("疲労") + COND("前回絶頂")
				PRINTFORMW 「はぁ……ふぅ……あぁ……」
				PRINTFORMW 「なかなか……やってくれるじゃん……？」
			ELSE
				PRINTFORMW 「おろ？ もうお終いか。ちょっと手下留情が過ぎるんじゃねえか？」
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「ふふっ……_UH_ また眼罩されちゃうのか、%CNAME("一人称")%」"
			CALL PRINT_STRW, @"「どうしようなぁ……%CNAME("一人称")%もう、カラダが疼いてきちゃってるよ……_UH_」"
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「なんだ、また眼罩すんのか？ 好きだねぇ、%CNAME("二人称")%も」
			ELSE
				PRINTFORMW 「またそれかい。お気に入り道具だなぁ、%CNAME("主人")%桑」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

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

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

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

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

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

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

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

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

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

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

;-------------------------------------------------
;潤滑液使用
;-------------------------------------------------
IF SELECTCOM == 260
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「お、潤滑液使ってくれんの？ えらいねぇ～」
		PRINTFORMW 「やっぱ性交すんならカラダが湿的てるに越したことはないからな」
		PRINTFORMW 「それに、これからおっ始めるんだってスイッチ入るし……ふふ」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「んっふ……_UH_ いいねぇ、奥までたっぷり塗られて……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「んっ……いいね。準備万端って感じ。ふふ」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;媚薬使用
;-------------------------------------------------
IF SELECTCOM == 261
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		CALL PRINT_STRW, "「ん、く……ふぅ……飲んだ、けど……っ_UH_」"
		PRINTFORMW 「はぁ……っ……やっべ、マジで効いてきた……」
		PRINTFORMW 「この野郎、とんでもないモン飲ませやがって……」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「っ、はぁ……_UH_ きたきた、効いてきた……_UH_」"
			CALL PRINT_STRW, "「ほら、早く続きしようぜ_UH_ 我慢できないからっ_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「っ、く……_UH_ クるなぁ、これ……」"
			CALL PRINT_STRW, @"「ったく、キメセク好きとは大したワルだよ、%CNAME("二人称")%……んっ……_UH_」"
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;利尿剤
;-------------------------------------------------
IF SELECTCOM == 262
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;排卵誘発剤
;-------------------------------------------------
IF SELECTCOM == 264
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;筋弛緩剤
;-------------------------------------------------
IF SELECTCOM == 267
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

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

;-------------------------------------------------
;パラメータ変動をトリガーにした口上
;パラメータ変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_PALAMCNG_K35, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0
;-------------------------------------------------
;パラメータ変動時のセリフ
;-------------------------------------------------
SELECTCASE ARGS
;-------------------------------------------------
;初めてＶ潤がLV3超えた
;-------------------------------------------------
CASE "Ｖ潤LV3突破"
	;初めて
	IF FIRST_EV("Ｖ潤LV3突破") == 0
		;潤滑液を使った場合
		IF SELECTCOM == 260
			PRINTFORMW 「ん……うん。これで挿入れても大丈夫、かな」
		;それ以外
		ELSE
			PRINTFORMW （うわ、やべ……%CNAME("一人称")%のまんこ出来上がっちまってる……）
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて欲情がLV3超えた
;-------------------------------------------------
CASE "欲情LV3突破"
	IF FIRST_EV("欲情LV3突破") == 0
		;媚薬を使った場合
		IF SELECTCOM == 261
			CALL PRINT_STRW, "「やっ……べぇ、これ……完全に我慢できなくなってる……っ_UH_」"
			CALL PRINT_STRW, @"「マジ、やってくれたなぁ……%CNAME("二人称")%……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「っ～……_UH_ なかなか……ヤリ手じゃん……？」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%も、スイッチ入っちゃったよ……ふふ……_UH_」"
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて恥情がLV3超えた
;-------------------------------------------------
CASE "恥情LV3突破"
	IF FIRST_EV("恥情LV3突破") == 0
		PRINTFORMW （あぁ……やっべぇ、%CNAME("一人称")%いまぜってー顔真っ赤だ……）
		PRINTFORMW （くっそ、悔しいなぁ……この坏心眼\@ TALENT:PLAYER:男性 ? 野郎 # 女 \@め……）
	ENDIF
;-------------------------------------------------
;初めて恐怖がLV3超えた
;-------------------------------------------------
CASE "恐怖LV3突破"
	IF FIRST_EV("恐怖LV3突破") == 0
		PRINTFORMW 「っ……%CNAME("二人称")%、ちょっとやり過ぎじゃね……？」
		PRINTFORMW 「もう少し手下留情してくれよ……冗談で済むうちにさ……」
	ENDIF
;-------------------------------------------------
;初めてC絶頂
;-------------------------------------------------
CASE "Ｃ絶頂"
	IF FIRST_EV("Ｃ絶頂") == 0
		CALL PRINT_STRW, "「～～っ゛_UH_ はぁっ、はぁ……」"
		CALL PRINT_STRW, @"「あぁ……\@ PENIS(TARGET) ? チンポ # 阴蒂 \@がまだピクピクしてる……_UH_」"
	ENDIF
;-------------------------------------------------
;初めてV絶頂
;-------------------------------------------------
CASE "Ｖ絶頂"
	IF FIRST_EV("Ｖ絶頂") == 0
		CALL PRINT_STRW, "「やっ、ちょっとっ_UH_ まってっ_UH_ なんかクるっ_UH_ きちゃうからっ_UH_」"
		CALL PRINT_STRW, "「やだ、あっ_UH_ あぁーーっ_UH_」"
		PRINTFORMW （うそだろ……これが、女の快感かよ……？ マジで、ケタがちげぇ……）
		PRINTFORMW （やべえなこりゃ……こんなのおかしくならないわけねえだろ……）
	ENDIF
;-------------------------------------------------
;初めてA絶頂
;-------------------------------------------------
CASE "Ａ絶頂"
	IF FIRST_EV("Ａ絶頂") == 0
		CALL PRINT_STRW, "「あ、はっ_UH_ きたっ_UH_ は、あぁっ……_UH_」"
		CALL PRINT_STRW, "「はーっ……はぁっ……ふふっ……_UH_ お尻の責め方はバッチリだな……？」"
	ENDIF
;-------------------------------------------------
;初めてB絶頂
;-------------------------------------------------
CASE "Ｂ絶頂"
	IF FIRST_EV("Ｂ絶頂") == 0
		CALL PRINT_STRW, "「～～っ_UH_ や、ば……乳頭が、ヒリヒリして……止まんねえ……っ_UH_」"
		CALL PRINT_STRW, "「はぁ、はぁ……なんてことしてくれんだよ、この野郎……」"
	ENDIF
;-------------------------------------------------
;C挑逗
;-------------------------------------------------
CASE "Ｃ挑逗"
	;初めて
	IF FIRST_EV("Ｃ挑逗") == 0
		PRINTFORMW 「っ……！ おい止めんなよ、酱と\@ PENIS(TARGET) ? チンポ # 阴蒂 \@弄れって……」
		PRINTFORMW 「もしかして挑逗つもりか？ この野郎め……」
	;２回目以降
	ELSE
		;強絶頂Ｃ挑逗
		IF NOWEX:Ｃ绝顶前骤停 >= 2
			CALL PRINT_STRW, "「っ_UH_ っ_UH_ なぁ、もう、無理だってっ_UH_」"
			CALL PRINT_STRW, @"「はやくっ、\@ PENIS(TARGET) ? チンポ # 阴蒂 \@、シゴいてっ_UH_ もう、限界だからぁっ_UH_」"
		;絶頂Ｃ挑逗
		ELSEIF NOWEX:Ｃ绝顶前骤停
			CALL PRINT_STRW, @"「っ……おい、テメ……また\@ PENIS(TARGET) ? チンポ # 阴蒂 \@挑逗て……んっ_UH_」"
			PRINTFORMW 「ふぅ……っ……満足したら、さっさとしてくれよ……」
		ENDIF
	ENDIF
;-------------------------------------------------
;V挑逗
;-------------------------------------------------
CASE "Ｖ挑逗"
	;初めて
	IF FIRST_EV("Ｖ挑逗") == 0
		PRINTFORMW 「っ……おい、どうした？ もっと突いてもいいんだぞ……あんま焦らさないでくれよ……」
	;２回目以降
	ELSE
		;強絶頂Ｖ挑逗
		IF NOWEX:Ｖ绝顶前骤停 >= 2
			CALL PRINT_STRW, @"（あぁぁ、もぉっ_UH_ %CNAME("一人称")%のまんこ寂しがってるのにぃ……_UH_）"
			CALL PRINT_STRW, "（もぉお、焦れってぇなぁ……早く終わらせてくれよぉ……_UH_）"
		;絶頂Ｖ挑逗
		ELSEIF NOWEX:Ｖ绝顶前骤停
			PRINTFORMW （くっそ、また%CNAME("一人称")%のこと手玉にとってやがる……）
			CALL PRINT_STRW, "（完全に女扱いじゃねえか……くそぉ……_UH_）"
		ENDIF
	ENDIF
;-------------------------------------------------
;A挑逗
;-------------------------------------------------
CASE "Ａ挑逗"
	;初めて
	IF FIRST_EV("Ａ挑逗") == 0
		PRINTFORMW 「おぉい、ケツ挑逗てんだろ？ すぐにわかるぞ」
		PRINTFORMW 「遠慮しないで酱とやってくれよ……」
	;２回目以降
	ELSE
		;強絶頂Ａ挑逗
		IF NOWEX:Ａ绝顶前骤停 >= 2
			CALL PRINT_STRW, "（あぁ～、もうダメだぁ……_UH_ 気が変になりそう……_UH_）"
			CALL PRINT_STRW, "（頼むからケツ挑逗のだけはやめてくれよぉ……_UH_ ちくしょお……_UH_）"
		;絶頂Ａ挑逗
		ELSEIF NOWEX:Ａ绝顶前骤停
			PRINTFORMW （くっそぉ、またケツ挑逗やがって……）
			PRINTFORMW （こちとら桑ざ使ってるからすぐに物足りなくなるっていうのに……）
		ENDIF
	ENDIF
;-------------------------------------------------
;B挑逗
;-------------------------------------------------
CASE "Ｂ挑逗"
	;初めて
	IF FIRST_EV("Ｂ挑逗") == 0
		PRINTFORMW 「っ……おい、男の胸なんか挑逗て和我一起玩んじゃねえよ」
	;２回目以降
	ELSE
		;強絶頂Ｂ挑逗
		IF NOWEX:Ｂ绝顶前骤停 >= 2
			CALL PRINT_STRW, "（あぁ、この野郎……こっち是い加減限界だっていうのに……_UH_）"
			CALL PRINT_STRW, "（いっそ思いっきり胸にしゃぶりついてほしいくらいだっ……_UH_）"
		;絶頂Ｂ挑逗
		ELSEIF NOWEX:Ｂ绝顶前骤停
			CALL PRINT_STRW, "「んっ……_UH_ ったく、いい趣味してらっしゃるこって……」"
			PRINTFORMW 「そんなに野郎の胸部で玩遊戲のが楽しいかよ……？」
		ENDIF
	ENDIF
;-------------------------------------------------
;扶她射精挑逗
;-------------------------------------------------
CASE "射精挑逗"
	;初めて
	IF FIRST_EV("射精挑逗") == 0
		PRINTFORMW 「うぅっ……！ こ、このやろ……止めやがったな……」
		PRINTFORMW 「射精前骤停はカラダに悪いって知らねえのかよ、不死身野郎め……」
	;２回目以降
	ELSE
		;大量射精挑逗
		IF NOWEX:射精前骤停 >= 2
			PRINTFORMW 「っ……なぁ、もうムリだってぇ……頼むよぉ……」
			CALL PRINT_STRW, "「はやく出させてくれよぉ……お願いだからぁ……_UH_」"
		;射精挑逗
		ELSEIF NOWEX:射精前骤停
			PRINTFORMW 「んぅ……っ……おい、また寸止めかよ……坏心眼しやがって……」
		ENDIF
	ENDIF
;-------------------------------------------------
;処女喪失(処女のみ)
;-------------------------------------------------
CASE "処女喪失"
	IF FIRST_EV("処女喪失") == 0
		;恋慕
		IF TALENT:恋慕
			;主人の性交による処女喪失
			IF PLAYER == MASTER && INSERT("Ｖ挿入")
				CALL PRINT_STRW, "「ふふっ……悪くないなぁ、こういうのも_UH_」"
				CALL PRINT_STRW, @"「愛してるぜ、%CNAME("主人")%桑……_UH_」"
			ELSE
				PRINTFORMW 「あーあ、%CNAME("二人称")%ってほんとーに情緒ってモンを知らねえなぁ～」
				PRINTFORMW 「%CNAME("一人称")%が元男だったからか？ ん？ このあんちくしょうめ」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「っつー……ほんとに痛ぇんだなぁ、膜破んのって……」
			PRINTFORMW 「少しは労ってくれよ？ こっちは文字街道初体験なんだからな」
		ENDIF
	ENDIF
;-------------------------------------------------
;射精した(扶她/男性のみ)
;-------------------------------------------------
CASE "射精した"
	;初めて
	IF FIRST_EV("射精した") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「うあぁっ_UH_ はぁっ……あぁ……ふふっ……_UH_」"
			PRINTFORMW 「不思議だなぁ……こうやってエッチで射精すんの、地味に初めてなんじゃねえかな……」
		;それ以外
		ELSE
			PRINTFORMW 「うぅっ……ふっ、ん……あぁ、出たなぁ……」
			PRINTFORMW 「伪娘やってると、普通に男してるより射精が楽しいんだよねぇ」
			SIF TALENT:PLAYER:伪娘
				PRINTFORMW 「わかるだろ？ %CNAME("二人称")%も……ふふっ」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「%TEXTR("あぁぁん/うぅっ/はぁぁーっ")%_UH_ はぁ、はぁ……_UH_」"
			CALL PRINT_STRW, @"「ふふっ……また%TEXTR("いっぱい出ちゃったな/イかされちゃった")%ぁ……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「%TEXTR("うぅ/はぁ")%……っ！ ふー……ふぅ……」
			PRINTFORMW 「ふふ……%TEXTR(@"なかなかテクニシャンだねぇ、%CNAME("主人")%/床擅長だよなぁ、%CNAME("二人称")%って")%」
		ENDIF
	ENDIF
;-------------------------------------------------
;噴乳した(母乳体質のみ)
;-------------------------------------------------
CASE "噴乳した"
	;初めて
	IF FIRST_EV("噴乳した") == 0
		PRINTFORMW 「っ、えっ？ な、なんだこれ……母乳か？ 嘘だろ、%CNAME("一人称")%が……？」
	;二回目以降
	ELSE
		PRINTFORMW 「%TEXTR("わ、ちょ、待ってくれ！ また噴き出してきやがった/っ、おい、また母乳が……くそ、止まんねえ")%……」
	ENDIF
;-------------------------------------------------
;絶頂放尿した
;-------------------------------------------------
CASE "絶頂放尿"
	;初めて
	IF FIRST_EV("絶頂放尿") == 0
		;抵抗无
		IF CHECK_COM("強制放尿") == 0
			PRINTFORMW 「は、はは……とうとうやっちまった……%CNAME("二人称")%に漏尿見せちまった……」
			CALL PRINT_STRW, "「どうしよう……こんなに情けねえのに、すげぇゾクゾクしてる……あはは……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「っ……は？ ちょ、おい、まって……！」
			PRINTFORMW （マジかよ……%CNAME("一人称")%が漏らした？ ここまでされたってか……？）
		ENDIF
	;二回目以降
	ELSE
		;抵抗无
		IF CHECK_COM("強制放尿") == 0
			CALL PRINT_STRW, "「あはぁ……_UH_ ごめんなぁ、また漏らしちまった……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「あ……っ、ちょ、待ってくれよ……！」
			PRINTFORMW （嘘だろ、またやっちまった……！ 完全に緩くなっちまってる……！）
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｃ絶頂20以上
;-------------------------------------------------
CASE "Ｃ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｃ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あ、はは……ははは……_UH_ もぉ、わけわかんねぇ……_UH_」"
			CALL PRINT_STRW, @"「\@ PENIS(TARGET) ? チンポ # 阴蒂 \@ビンビンなまま、お大人んねえよぉ……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「あ、う……ぁ……もう、だめだ……やめてくれ……」
			PRINTFORMW 「もう、\@ PENIS(TARGET) ? チンポ # 阴蒂 \@限界だって……ほんとに……」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「あはぁ_UH_ だめだぁ、\@ PENIS(TARGET) ? チンポ # 阴蒂 \@おかしくなってるぅ_UH_」"
			CALL PRINT_STRW, @"「まだついてるぅ？ %CNAME("一人称")%の\@ PENIS(TARGET) ? チンポぉ # 阴蒂ぃ \@……あははっ_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「うぁ……ギブ、ギブ……もう、\@ PENIS(TARGET) ? チンポ # 阴蒂 \@痛い……」
			PRINTFORMW 「マジ、手下留情してくれよ……ほんと……」
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｖ絶頂20以上
;-------------------------------------------------
CASE "Ｖ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｖ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「あぁ_UH_ もぉ_UH_ だめだって_UH_ %CNAME("一人称")%のまんこ、バカになるからっ_UH_」"
			CALL PRINT_STRW, "「もう、男性に戻りたくなくなっちゃうからぁっ_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「あ、あ……っ……_UH_ やば……まんこ、閉じねえ……%CNAME("二人称")%、やり過ぎだろ……」"
			CALL PRINT_STRW, "「男性のまんこに、なにをそんなに夢中になって……んんっ……_UH_」"
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あぁ_UH_ 腰がガクガクして、とまんねえ_UH_ きもちよすぎるっ_UH_」"
			CALL PRINT_STRW, "「ずっとナカ埋めてほしくてっ_UH_ 寂しがってるよぉっ_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「はっ_UH_ あっ……_UH_ ちょ、タンマ……腰ガクガクしてっから、マジで……」"
		ENDIF
	ENDIF
;-------------------------------------------------
;Ａ絶頂20以上
;-------------------------------------------------
CASE "Ａ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ａ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あはぁ……_UH_ いいよぉ……さいっこう……_UH_」"
			CALL PRINT_STRW, @"「ここまでお尻でイかせてもらえるなんて……しあわせぇ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「んっふ……_UH_ まあ、合格ってところかな……」"
			CALL PRINT_STRW, "「こんなに……あっ_UH_ お尻でイかせてくれるなら、テクは充分だな_UH_」"
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「あっはぁ_UH_ いいよ%CNAME("主人")%、たまんねぇ_UH_」"
			CALL PRINT_STRW, @"「もう%CNAME("一人称")%のお尻のことは知り尽くされちゃったなぁ……ふふっ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「あはっ……擅長擅長……_UH_ やるねえ%CNAME("主人")%桑……_UH_」"
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｂ絶頂20以上
;-------------------------------------------------
CASE "Ｂ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｂ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あはっ_UH_ んっ……_UH_ こんなに胸部でイかされるなんて……ふふ……」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%、完全に%CNAME("一人称")%のこと雌扱いじゃねえかよ……なぁ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「あっ_UH_ はぁ……んっ……もう、いいだろ%CNAME("主人")%……」"
			CALL PRINT_STRW, "「そんなに……んっ_UH_ 男性の胸に夢中になることあるかよ……ったく……」"
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あんっ_UH_ やっ……_UH_ もう、何度も何度も……いい加減にしろよぉ……_UH_」"
			CALL PRINT_STRW, "「もう、胸罩ないと普通の恤も着れなくなっちまうんだよぉ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, @"「はぁ、はぁ……あっ_UH_ %CNAME("二人称")%、また胸ばっかり……っ」"
			PRINTFORMW 「ほんっと……物好きなやつ……」
		ENDIF
	ENDIF
ENDSELECT

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

SELECTCASE ARGS
;-------------------------------------------------
;苦痛刻印Lv3取得
;-------------------------------------------------
CASE "苦痛刻印Lv3取得"
	IF FIRST_EV("苦痛刻印Lv3取得") == 0
		PRINTFORMW （……冗談じゃねえ……）
		PRINTFORMW （%CNAME("主人")%のが手を上げると、体が震えちまう……）
		CALL PRINT_STRW, @"（認めるしかねえ……%CNAME("一人称")%、疼痛で感じるカラダにされちまった……っ……_UH_）"
	ENDIF
;-------------------------------------------------
;快楽刻印Lv3取得
;-------------------------------------------------
CASE "快楽刻印Lv3取得"
	IF FIRST_EV("快楽刻印Lv3取得") == 0
		PRINTFORMW （やっべぇ……%CNAME("一人称")%、完全に%CNAME("主人")%のこと舐めてた……）
		CALL PRINT_STRW, @"（もう%CNAME("一人称")%、%CNAME("主人")%ナシじゃ生きていけねえかも……_UH_）"
	ENDIF
;-------------------------------------------------
;屈服刻印Lv3取得
;-------------------------------------------------
CASE "屈服刻印Lv3取得"
	IF FIRST_EV("屈服刻印Lv3取得") == 0
		PRINTFORMW （……ここまでだな）
		PRINTFORMW （認めよう……思い上がってたのは%CNAME("一人称")%の方だって）
	ENDIF
ENDSELECT

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

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

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

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

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

;-------------------------------------------------
;角色が調教中に調教者を攻める際などの口上
;-------------------------------------------------
@KOJO_COUNTER_K35, ARGS
SELECTCASE ARGS
CASE "绝顶忍耐"
	;partnerに焦らされている
	IF TEQUIP:推倒
		PRINTFORMW 「そんな情けない顔するくらいならもうイっちゃえよ……くっく」
	;PLAYERが绝顶忍耐
	ELSE
		;今回がこらえた初回
		IF EX:PLAYER:绝顶忍耐 == 0
			PRINTFORMW 「おぉ？ 意外に耐えるねぇ……くっく」
			PRINTFORMW 「どこまで我慢できるかなぁ……？」
		ELSE
			PRINTFORMW 「まぁたそんな我慢しちゃってぇ……くっく」
		ENDIF
	ENDIF
CASE "恍惚"
	PRINTFORMW 「おぉ？ ちっとやり過ぎちまったかな……？」
CASE "推倒"
	PRINTFORMW 「くっく……それじゃ、こっからは%CNAME("一人称")%の時間な」
CASE "強制終了"
	IF COND("疲労")
		PRINTFORMW 「っ……はぁ……あぁ、おつかれ……はは……」
	ELSE
		PRINTFORMW 「おい、なんだよ。もうやめちまうのか？ 消化不良だなぁ……」
	ENDIF
CASE "復活"
	PRINTFORMW 「おー、生きてるかー？ くっく……まだまだ楽しめそうだな」
CASE "恍惚から復帰"
	PRINTFORMW 「お、起きた起きた。くっく……勝手に楽しんでるぜ」
CASE "助手が限界"
	PRINTFORMW 「おっと……ここからは二人の時間だな？」
ENDSELECT

RETURN 1

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

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

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

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

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

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

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

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

		ENDIF
	ENDIF
;-------------------------------------------------
;陶酔かつ危険日でない時に、普段は許していない生挿入をさせて给際のセリフ
;-------------------------------------------------
CASE "特別に生挿入許可"
	;初めて
	IF FIRST_EV(ARGS) == 0

	ELSE

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

;-------------------------------------------------
;PLAYERがMASTERとASSI間で交代した際の台詞
;-------------------------------------------------
CASE "調教者交代"
	;PLAYERがASSIに変わった
	IF PLAYER == ASSI
		PRINTFORMW
	;PLAYERが你に戻った
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;partnerがTARGETとASSI間で交代した際の台詞
;-------------------------------------------------
CASE "対象交代"
	;partnerとしてエッチに誘われた
	IF COND("第一対象") == TARGET
		PRINTFORMW
	;指导者としてエッチに誘われた
	ELSE
		PRINTFORMW
	ENDIF

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

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

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

ENDSELECT

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

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

	ELSE

	ENDIF

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

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

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

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

CASE "助手：撮影開始"

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

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

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

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

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

CASE "助手で性処理"

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

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

ENDSELECT

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

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

;ENDを選択する際の表示。下で満たしたEND条件に応じて全角21文字以内で好きに変えて良い
STR:ＥＮＤ标题 = 看个人事件

;魂の量によるEND
;SIF BASE:魂 >= 300
	;ENDの番号_END名 となっている
	;番号は1～60の範囲(でもできれば１から順に詰めて使用)の半角数字で、ＥＮＤ名は喜欢的东西に変更してください
	;STR:エンディング += "1_ＥＮＤ名１/"
;其他の条件(例えば淫乱)によるEND
;SIF TALENT:淫乱
	;STR:エンディング += "2_ＥＮＤ名２/"
;魂の量と其他の条件(例えば相思相愛)によるEND
;SIF BASE:魂 >= 300 && TALENT:相思相愛
	;STR:エンディング += "3_ＥＮＤ名３/"
STR:エンディング += "1_イベント閲覧条件/"
SIF (MARK:屈服刻印 >= 1)
	STR:エンディング += "2_高慢な美少年の憂鬱/"
SIF (MARK:屈服刻印 >= 2)
	STR:エンディング += "3_うわさの恋人/"
SIF (MARK:屈服刻印 == 3)
	STR:エンディング += "4_恋の自覚/"
SIF CEVENT("調教開始：相思相愛")
	STR:エンディング += "5_伪娘の理由/"
SIF (CFLAG:取引回数 >= 3)
	STR:エンディング += "6_性交をするお友達サークル/"
;SIF ABL:欲望 >= 5 && CONFIG("部員間Ｈ") && CNUM("真")
;	STR:エンディング += "7_最後の一線/"
SIF (CFLAG:睡眠 >= 1) + CEVENT("In a dream：俺が最初だったから")
	STR:エンディング += "8_In a dream：俺が最初だったから/"

RETURN 1

;ARGSには@MENU_SINGLE_ENDING_K1で設定したEND名のどれかが入っている
;見たENDはCEVENTで記録される
;例）ＥＮＤ名１を閲覧した場合は CEVENT("ＥＮＤ名１") = 1 となる
@SINGLE_ENDING_K35, ARGS
SELECTCASE ARGS
CASE "イベント閲覧条件"
	PRINTL
	PRINTFORML [高慢な美少年の憂鬱]　屈服刻印LV1を取得
	PRINTL
	PRINTFORML [うわさの恋人]　屈服刻印LV2を取得
	PRINTL
	PRINTFORML [恋の自覚]　屈服刻印LV3を取得
	PRINTL
	PRINTFORML [伪娘の理由]　相思相愛素質を取得し、特定の調教開始時の会話を見る
	PRINTL
	PRINTFORML [性交をするお友達サークル]　望木灯と弗理希艾尔の取引イベントが3回以上
;	PRINTL
;	PRINTFORML [最後の一線]　望木真の“兄妹の言い訳”イベント閲覧済み 望木灯の欲望が5以上
;	PRINTFORML ※Configで你以外とＨする事を誰相手でも許さない設定以外にすることが必要
	PRINTL
	PRINTFORML [In a dream：俺が最初だったから]　睡眠中に発生
	PRINTW
	[IF_DEBUG]
		PRINTFORML デバッグモード限定でイベントを閲覧できます
		CALL PRINT_STRL, "黄色_あくまでデバッグ用のため、特定の角色が未加入の状態等で閲覧するとエラーになる可能性が有ます"
		CALL PRINT_STRL, "黄色_また、閲覧したことによってなんらかの予期せぬ不具合が起きる可能性が有ますので、セーブはお控えください"
		CALL PRINT_SELECT, "高慢な美少年の憂鬱/うわさの恋人/恋の自覚/伪娘の理由/性交をするお友達サークル/In a dream：俺が最初だったから/返回"
		SELECTCASE RESULT
		CASE 0
			CALL K35_LONG_01
		CASE 1
			CALL K35_LONG_02
		CASE 2
			CALL K35_LONG_03
		CASE 3
			CALL K35_LONG_04
		CASE 4
			CALL K35_LONG_05
		CASE 5
			CALL K35_LONG_07
		;CASE 6
		;	CALL PRINT_SELECT, "導入/灯が女性、真と灯が処女/真が処女/灯が女性かつ処女/真と灯が非処女"
		;	SELECTCASE RESULT
		;	CASE 0
		;		CALL K35_LONG_06
		;	CASE 1
		;		CALL K35_LONG_06_1
		;	CASE 2
		;		CALL K35_LONG_06_2
		;	CASE 3
		;		CALL K35_LONG_06_3
		;	CASE 4
		;		CALL K35_LONG_06_4
		;	ENDSELECT
		ENDSELECT
	[ENDIF]
CASE "高慢な美少年の憂鬱"
	CALL K35_LONG_01
CASE "うわさの恋人"
	CALL K35_LONG_02
CASE "恋の自覚"
	CALL K35_LONG_03
CASE "伪娘の理由"
	CALL K35_LONG_04
CASE "性交をするお友達サークル"
	CALL K35_LONG_05
CASE "最後の一線"
	IF CEVENT("最後の一線")
		PRINTFORML どれを閲覧しますか？
		CALL PRINT_SELECT, "導入/兄妹の処女同時喪失/真の処女喪失/灯の処女喪失/処女喪失を含まない性交"
		IF RESULT == 0
			CALL K35_LONG_06
		ELSEIF RESULT == 1
			CALL K35_LONG_06_1
		ELSEIF RESULT == 2
			CALL K35_LONG_06_2
		ELSEIF RESULT == 3
			CALL K35_LONG_06_3
		ELSE
			CALL K35_LONG_06_4
		ENDIF
	ELSE
		CALL K35_LONG_06
		IF TALENT:処女 && TALENT:FINDCHARA(NO, 34):処女
			CALL K35_LONG_06_1
			EXP:FIND_COND("真"):特別経験 += 1
			CSTR:FIND_COND("真"):特別経験 = %CSTR:特別経験%以振动棒喪失処女： ???日目 %CALLNAME:TARGET%の振動棒を処女穴に受け入れ、女にして貰った
			EXP:特別経験 += 1
			CSTR:特別経験 = %CSTR:特別経験%以振动棒喪失処女： ???日目 %CALLNAME:FINDCHARA(NO, 34)%の振動棒を処女穴に受け入れ、女にして貰った
			TALENT:処女 = 0
			TALENT:FINDCHARA(NO, 34):処女 = 0
		ELSEIF TALENT:FINDCHARA(NO, 34):処女
			CALL K35_LONG_06_2
			EXP:FIND_COND("真"):特別経験 += 1
			CSTR:FIND_COND("真"):特別経験 = %CSTR:特別経験%処女喪失： ???日目 %CALLNAME:TARGET%の阴茎に献出了処女
			IF EXP:Ｖ挿入経験 == 0
				EXP:特別経験 += 1
				CSTR:特別経験 = %CSTR:特別経験%童貞喪失： ???日目 %CALLNAME:FINDCHARA(NO, 34)%に脱离童贞して貰った
				EXP:FIND_COND("真"):特別経験 += 1
				CSTR:FIND_COND("真"):特別経験 = %CSTR:特別経験%脱离童贞： ???日目 %CALLNAME:TARGET%の童貞を美味しく頂いた
			ENDIF
			TALENT:FINDCHARA(NO, 34):処女 = 0
		ELSEIF TALENT:処女
			CALL K35_LONG_06_3
			EXP:特別経験 += 1
			CSTR:特別経験 = %CSTR:特別経験%処女喪失： ???日目 %CALLNAME:FINDCHARA(NO, 34)%の阴茎に献出了処女
			IF EXP:FIND_COND("真"):Ｖ挿入経験 == 0
				EXP:FIND_COND("真"):特別経験 += 1
				CSTR:FIND_COND("真"):特別経験 = %CSTR:特別経験%童貞喪失： ???日目 %CALLNAME:TARGET%に脱离童贞して貰った
				EXP:特別経験 += 1
				CSTR:特別経験 = %CSTR:特別経験%脱离童贞： ???日目 %CALLNAME:FINDCHARA(NO, 34)%の童貞を美味しく頂いた
			ENDIF
			TALENT:処女 = 0
		ELSE
			CALL K35_LONG_06_4
			IF EXP:FIND_COND("真"):Ｖ挿入経験 == 0
				EXP:FIND_COND("真"):特別経験 += 1
				CSTR:FIND_COND("真"):特別経験 = %CSTR:特別経験%童貞喪失： ???日目 %CALLNAME:TARGET%に脱离童贞して貰った
				EXP:特別経験 += 1
				CSTR:特別経験 = %CSTR:特別経験%脱离童贞： ???日目 %CALLNAME:FINDCHARA(NO, 34)%の童貞を美味しく頂いた
			ENDIF
			IF EXP:Ｖ挿入経験 == 0
				EXP:特別経験 += 1
				CSTR:特別経験 = %CSTR:特別経験%童貞喪失： ???日目 %CALLNAME:FINDCHARA(NO, 34)%に脱离童贞して貰った
				EXP:FIND_COND("真"):特別経験 += 1
				CSTR:FIND_COND("真"):特別経験 = %CSTR:特別経験%脱离童贞： ???日目 %CALLNAME:TARGET%の童貞を美味しく頂いた
			ENDIF
		ENDIF
		DRAWLINE
		IF TALENT:倒錯的 == 0
			TALENT:倒錯的 = 1
			PRINTL
			CALL PRINT_STR, @"イエロー_%CALLNAME:TARGET%通过[倒錯的]を獲得しました。_W_"
		ENDIF
		PRINTFORML 次回から本イベントを選択した場合、異なる分岐イベントの個別回想が可能です
	ENDIF
CASE "In a dream：俺が最初だったから"
	CALL K35_LONG_07

ENDSELECT
RETURN 1

path: ERB/EVENT_K/35 灯/EVENT_K35.ERB