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

;【コンセプトなど】
; メタっ娘（？）から狂気娘（！？）などの変遷を経て完成した露出娘（？？？）
; を、ver0.06時点で更に無理してリビルドした、慇懃無礼な後輩。
; 外見と学業の成績是いけれど、学校の生活にはあまり馴染めず、そのストレスを露出行為で発散している。
; 人付き合いを嫌っており、積極的に誰かと仲良くしようとしない静かな問題児。
; 欧尼酱とは気が合うけどそこまで好きじゃない。欧内酱は欧内酱ぶって鬱陶しいから好きじゃない。
;-------------------------------------------------
;【今回がんばったこと】
;・新しい爱心マークがめっちゃ良かったので全部それに変えたった
;・なんかやっぱ欧尼酱と欧内酱呼びだよな…とか思ったので戻したった
;・身嗜みを指定していると廁所詮索時の反応が変わるようにしたった
;・撫摸股間口上テンプレが用意されたので埋めたった
;・見抜き系もなんか書いたった

;【今後がんばりたいこと】
;・エロくない個別イベントを適当な別枠に放り込んだ後、機を見てエロい個別イベントをドバーッと追加するつもりだよ　ほんとだよ
;-------------------------------------------------
;呼び名の設定。"_"の右にふりがなを書く。
;-------------------------------------------------
@CNAME_K48, ARGS
#FUNCTIONS

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	LOCALS = 我_我
CASE "二人称"
	;相手が主人
	IF PLAYER == MASTER
		LOCALS = 部长_部长
	;相手が主人ではない
	ELSEIF NO:PLAYER == 34
		LOCALS = 欧内酱_欧内酱
	ELSEIF NO:PLAYER == 35
		LOCALS = 欧尼酱_欧尼酱
	ELSE
		SELECTCASE CSTR:PLAYER:学年
		CASE "初等部", "中等部"
			IF TALENT:男性
				LOCALS = 君_你
			ENDIF
		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:PLAYER == 34
		LOCALS = 欧内酱_欧内酱
	ELSEIF NO:PLAYER == 35
		LOCALS = 欧尼酱_欧尼酱
	ELSE
		SELECTCASE CSTR:PLAYER:学年
		CASE "初等部", "中等部"
			IF TALENT:男性
				LOCALS = %CALLNAME:ASSI%君_%CSTR:ASSI:ふりがな%君
			ELSE
				LOCALS = %CALLNAME:PLAYER%酱_%CALLNAME:PLAYER%酱
			ENDIF
		CASE "１年生", "２年生", "３年生", "研究生"
			LOCALS = %CALLNAME:ASSI%前輩_%CSTR:ASSI:ふりがな%前輩
		CASEELSE
			IF COND("教員", ASSI)
				LOCALS = %CALLNAME:PLAYER%老师_%CALLNAME:PLAYER%老师
			ELSE
				LOCALS = %CALLNAME:PLAYER%桑_%CALLNAME:PLAYER%桑
			ENDIF
		ENDSELECT
	ENDIF
ENDSELECT
RETURNF LOCALS

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

SELECTCASE ARGS
CASE "紹介文"
	STR:1 = 对人冷漠、矜持而且无礼、但背地里其实有着露出兴趣的中等部的少女
	STR:2 = 偶然间被%CALLNAME:MASTER%看到了自己的露出行為、于是作为互相保守秘密的交易加入了社团
	STR:3 = 对魂的交易很感兴趣、于是自愿签订了性処理契約
;ここの中に限り、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% -
	PRINTFORMW ――这是某天深夜的事情。
	PRINTFORMW 偶然和%CALLNAME:FINDCHARA(NO, 1)%一起在外散步的%CALLNAME:MASTER%、突然有了尿意。
	PRINTFORMW 『啊啦、忍不住了吗？』
	PRINTFORMW 『没办法呢……那我就在这里稍微等一会好了』
	PRINTFORMW 正好路过一个公园的%CALLNAME:MASTER%、让%CALLNAME:FINDCHARA(NO, 1)%稍等一会就冲向了公共厕所。
	PRINTL
	PRINTFORMW ------------------------------------------------------------------------------------------------
	PRINTL
	CALL PRINT_CUTIN, "胖次正面", TARGET
	PRINTFORMW ……そんな%CALLNAME:MASTER%の目に飛び込んできたのは、羽織った外套からのぞいた少女の裸体だった。
	PRINTL
	PRINTFORMW 「――啊」
	PRINTFORMW 两个人的目瞪口呆持续了一小会。
	PRINTFORMW 少女拼命地想从%CALLNAME:MASTER%旁边逃出去。
	PRINTFORMW 是纯粹的阻止她在外面露出裸体、还是单纯的不想让她离開呢……
	PRINTFORMW 总之%CALLNAME:MASTER%下意识地抓住了少女的手腕。
	PRINTFORMW 「放、放開我！」
	PRINTFORMW 像是中学生、或者说小学生的少女就像外表一样柔弱、完全挣脱不開%CALLNAME:MASTER%的手。
	PRINTFORMW 没过多久就放弃了抵抗的少女直直地看向%CALLNAME:MASTER%、态度意外得强硬。
	PRINTL
	PRINTFORMW 「……你还是放開我比较好」
	PRINTFORMW 「虽然不知道是哪个学校的，但你应该是个学生对吧。」
	PRINTFORMW 「如果%CNAME("一人称")%现在大声地求救的话、有人听到了就会过来、到时候就不是这么简单解决的事了」
	PRINTFORMW 「最少也是退学、搞不好的话还会被逮捕……总之起码你的将来就会从此毁灭了」
	PRINTFORMW 「那么……明白了的话就快放手」
	PRINTFORMW 『没有人会来的哟』
	PRINTL
	PRINTFORMW 毫无声音地突然出现的%CALLNAME:FINDCHARA(NO, 1)%、从少女的背后像是抱着她一样捂住了她的嘴。
	PRINTFORMW 虽然看上去没有用力气、但少女就像是被蛇盯上了一样整个人都僵住了、完全没法动弹……
	PRINTL
	PRINTFORMW 『至少、就我的探查范围之内、这里没有任何人经过』
	PRINTFORMW 『不过话说回来、这么大半夜的竟然以为自己喊两声就能得救、是不是太没有危机感了呀？』
	PRINTFORMW 『……还有主人様你也是、 突然就把女孩子的手抓住什么的、真是个坏人呢』
	PRINTFORMW 这是被生气了吗……
	PRINTFORMW 『如果可以的话、我虽然想把这个场面圆满解决掉……不过看来有些困难的样子』
	PRINTFORMW 在%CALLNAME:MASTER%和少女之间紧张的空气之中、%CALLNAME:FINDCHARA(NO, 1)%有些困扰似的歪了歪頭……
	PRINTFORMW 『嗯……那么、这样的话如何？ 呼呼♪』
;これは別になくても構いません
CASE "勧誘直後"
	;PRINTFORML - %NAME:TARGET% -
	SIF TALENT:処女
		CALL SET_CEVENT, "素質の操作：処女"
;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	;PRINTFORMW %NAME:TARGET%%CALLNAME:MASTER%的"%CSTR:関係%"、会在中午出现在社团活动室。

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

	ELSE

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

ENDSELECT

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

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

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

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
	PRINTFORMW 「……よろしくおねがいします、%CNAME("二人称")%」
	PRINTFORMW 仏頂面で%CALLNAME:MASTER%を%CNAME("二人称")%と呼ぶ%CALLNAME:TARGET%は、%CALLNAME:MASTER%を前輩とも思わぬ態度だった。
	PRINTL
	PRINTFORM ――あの夜、%CALLNAME:FINDCHARA(NO, 1)%は
	IF CFLAG:FIND_COND("弗理希艾尔"):尾巴を出す == 0
		PRINTFORM 普段%CALLNAME:MASTER%にも見せていない
	ENDIF
	PRINTFORMW 悪魔の尾巴を%CALLNAME:TARGET%の前に晒してみせた。
	PRINTFORMW %CALLNAME:FINDCHARA(NO, 1)%が悪魔であること、%CALLNAME:MASTER%が不死身であること……
	PRINTFORMW にわかには信じ難い事実をまざまざと見せつけることで、%CALLNAME:FINDCHARA(NO, 1)%は一つの事実を認めさせた。
	PRINTFORMW %CALLNAME:TARGET%が%CALLNAME:MASTER%たちに対してイニシアチブを取るのは不可能である、と。
	PRINTFORMW その上で%CALLNAME:FINDCHARA(NO, 1)%は、ある提案を投げかけた。
	PRINTFORMW 魂の取引と、性処理契約である。
	PRINTL
	PRINTFORMW 「……いいですか。確かに比較的%CNAME("二人称")%に有利な契約を選びましたけども」
	PRINTFORMW 「それでもこれはあくまで契約の上での行いですから」
	PRINTFORMW 「……もし無理を迫るようなら、この話はなかったことにしてもらいますからね」
	PRINTFORMW %CALLNAME:TARGET%の表情は険しい……これから長い付き合いになりそうだ。
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;初めてのご褒美Ｈ
ELSEIF EQUIP:Ｈ的奖励 && CEVENT("調教開始：ご褒美Ｈ") == 0
	PRINTFORMW
	CALL SET_CEVENT, "調教開始：ご褒美Ｈ"
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
	PRINTFORMW 「……さすがにヤリサーの長だけだって、そこまで下手くそではないみたいですね」
	SIF EXP:Ｈ回数 >= 3
		PRINTFORM 幾らか回数を重ね、
	PRINTFORMW %CALLNAME:TARGET%は多少警戒心が和らいだように見える。
	PRINTFORMW 「まあ、どのみち体を重ねるなら多少は擅長い方が有がたいですけどね」
	PRINTFORMW 「そういう意味では“当たり”を引けて運が良かったなぁ、%CNAME("一人称")%」
	PRINTFORMW ……しかしそのぶん、ますますふてぶてしくなった気がする……
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
	PRINTFORMW 「さ、今日もやるとしますか」
	PRINTFORMW 未だに態度は良くないが、少なくともエッチに対する嫌悪感はほとんどなくなったように見える。
	PRINTFORMW 「なにボーッとしてるんですか。ほら、早くしてくださいよ」
	PRINTFORMW 「%CNAME("一人称")%たちが会ってる目的は性交なんですから、什麼也不做だけ無駄ですよ」
	PRINTFORMW 乗り気になってくれるのは結構だが、まるで情緒を気にかける様子がない……
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
	PRINTFORMW 「%CNAME("二人称")%って……その」
	PRINTFORMW 「……擅長いですよね」
	PRINTFORMW ――珍しく%CALLNAME:TARGET%から褒められた。
	PRINTFORMW 「や……なんだかんだ言って%CNAME("一人称")%、かなり満足させてもらってるなって思って」
	PRINTFORMW 「そりゃあ、こういうことしてるっていうのは褒められたことじゃないですけども」
	PRINTFORMW 「まあ……一応言っておこうかな、って」
	PRINTFORMW 「たぶん今後も、こういうこと続けるかもですけど……まあ……」
	PRINTFORMW 「……改めて、よろしくおねがいします」
	PRINTL
	PRINTFORMW ……お互いに目を逸らしたまま、僅かな沈黙の時間が流れる……
	PRINTL
	PRINTFORMW 「ほ、ほら。なにボーッとしてるんですか。さっさと始めましょうよ」
	PRINTFORMW ほんのり红了脸的%CALLNAME:TARGET%が、急かすように背中を叩いてきた……
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 0
	;淫乱を先に獲得したかで分岐させたい場合(別にこの分岐は無くても良いと思います)
	;IF CEVENT("先に淫乱獲得")
	;	PRINTFORMW
	;ELSE
	;	PRINTFORMW
	;ENDIF
	PRINTFORMW 「……%CNAME("二人称")%って結局、どういう人が趣味なんですか？」
	PRINTFORMW 突然、%CALLNAME:TARGET%がそんな問いかけをしてきた。
	PRINTFORMW 「だって、ほら……気になるじゃないですか。%CALLNAME:FINDCHARA(NO, 1)%前輩みたいなひとと一緒にいて」
	PRINTFORMW 「その上で%CNAME("一人称")%みたいな小さい子と性交なんかしてるわけじゃないですか」
	PRINTFORMW 「結局どういうひとが好きなのか、よくわからないわけですよ。%CNAME("一人称")%としては」
	PRINTFORMW 「……ま、無理に聞く気はないですけどね」
	PRINTFORMW 聞いてきたわりに、急に目を背けて話を打ち切ってしまった。
	PRINTFORMW 「ほら、早くやりましょうよ」
	CALL SET_CEVENT, "調教開始：恋慕"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：相思相愛") == 0
	PRINTFORMW 「……さて。どうしましょうか」
	PRINTFORMW %CALLNAME:TARGET%は後ろ手を組んで足をぶらぶらさせ的同时、%CALLNAME:MASTER%の顔を覗いている。
	PRINTFORMW 「こう、改めて恋人变成了わけじゃないですか。一応、正式に」
	PRINTFORMW 「改めてどうやって性交すればいいのかなーっていうのが、よくわからなくて」
	PRINTFORMW 「……恥ずかしいんですよ」
	PRINTFORMW %CALLNAME:TARGET%には珍しい、坦率な言葉だった。
	PRINTFORMW 「だからほら、%CNAME("二人称")%が酱と教えてください。どうしたらいいか、どうしてほしいのか」
	PRINTFORMW 「%CNAME("一人称")%、後輩なんですから。酱と指導してくださいよ」
	PRINTFORMW %CALLNAME:TARGET%の声に応え、%CALLNAME:MASTER%は彼女の手を取った……
	CALL SET_CEVENT, "調教開始：相思相愛"
;ストレス解消　現状仮設定としていろいろテキトーです
ELSEIF CFLAG:ストレス >= 6
	PRINTFORMW 「――%CNAME("二人称")%」
	PRINTFORMW 突然%CALLNAME:TARGET%は%CALLNAME:MASTER%に抱きついたかと思うと、力を込めて推倒にかかってきた。
	PRINTFORMW 「今日くらいは、%CNAME("一人称")%の好きにさせてください」
	PRINTFORMW 「ねえ、構わないでしょ……%CNAME("二人称")%」
	PRINTL
	PRINTFORML ……どうしよう？
	CALL PRINT_SELECT, "好きにさせる/ダメだ"
	IF RESULT == 0
		PRINTFORMW 「……ふふ。有がとうございます」
		PRINTFORMW 「%CNAME("一人称")%、勝手に気持ちよくなってますから」
		PRINTFORMW 「%CNAME("二人称")%も勝手に気持ちよくなっててください」
		PRINTFORMW %CALLNAME:MASTER%は就这様%CALLNAME:TARGET%に被逆推た……
		TEQUIP:推倒 = 1
	ELSE
		PRINTFORMW 「……あ、そ。別にいいですけど」
		PRINTFORMW 「それなら酱と%CNAME("一人称")%のこと気持ちよくしてくださいよ」
		PRINTFORMW %CALLNAME:TARGET%は大人しく聞き入れてくれたようだ……
	ENDIF
;野外
ELSEIF PLACE("野外") && CEVENT("調教開始：野外") == 0
	PRINTFORMW 「%CNAME("二人称")%、こっち」
	PRINTFORMW %CALLNAME:TARGET%の手招きに従い、%CALLNAME:MASTER%は人目に付かない場所までやってきた……
	PRINTFORMW 「ここならよっぽど大騒ぎしない限りバレないと思います」
	PRINTFORMW 「もし見られたら大変なことになりますからね……%CNAME("一人称")%みたいに」
	PRINTFORMW %CALLNAME:TARGET%の顔に皮肉混じりのニヒルな笑いが浮かぶ。
	PRINTFORMW 「%CNAME("一人称")%だって、見られたいと思ってやってるんじゃないんですから」
	PRINTFORMW 「これでも怖いものは酱と怖いって感じるんですからね、%CNAME("一人称")%も」
	PRINTFORMW 「……まあ、それでも続けてるんですけど」
	PRINTFORMW 「さ、誰か来ないうちに」
	CALL SET_CEVENT, "調教開始：野外"
;助手の有無をチェック（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K48_KOJO2

;-------------------------------------------------
;助手との掛け合い(YYを助手の角色番号に置換、ＸＸを助手の角色番号に対応した名前に変更する)
;掛け合いをする角色を増やす場合は、コピー＆ペーストをして増やす
;-------------------------------------------------
;助手
ELSEIF NO:ASSI == 34
	;初めて
	IF CEVENT("助手会話：真") == 0
		;恋慕＋恋慕時初口上（陥落イベント）が発生済み
		IF CEVENT("調教開始：恋慕")
			PRINTFORMW 「はぁぁ……%CNAME("二人称")%ってほんっと空気読まないところ有ますよねぇ……」
			PRINTFORMW 「まー、わざとやってるんでしょうけど……ねえ？」
			PRINTFORMW %CALLNAME:TARGET%のリラックスした様子を見て、%CALLNAME:ASSI%は呆気に取られていた。
			PRINTFORMW 『……ず、ずいぶんと仲良し桑だね？』
			PRINTFORMW 「まぁね。そこそこ付き合い長いし」
			PRINTFORMW 『へ、へぇ……そうなんだ……なんか意外だな……』
			PRINTFORMW 「うん。たぶん欧内酱とより仲良いんじゃない？」
			PRINTFORMW 『はうッ』
			PRINTFORMW 妹の鋭利な言葉を浴びせられ、%CALLNAME:ASSI%はショックで固まってしまった……
			PRINTFORMW 『……わ、我とよりも、仲がいい……？ 我、欧内酱なのに……』
			PRINTFORMW 「欧内酱とだから違うんでしょ」
			PRINTFORMW 『ふぐぁッ』
			PRINTFORMW 追撃を食らわされ、%CALLNAME:ASSI%はその場に崩れ落ちてしまった……
			PRINTFORMW 『な、なんで……どうして……』
			PRINTFORMW 「%CNAME("二人称")%、欧内酱なんかほっといて始めましょうよ」
			PRINTFORMW 「これ以上構ってると、どんどん情緒悪くなっちゃいますよ」
		;それ以外
		ELSE
			PRINTFORMW 「……なんで欧内酱と一緒なわけ？」
			PRINTFORMW 『あぅ……私にそんなこと言われても……』
			PRINTFORMW 妹の冷たい視線に、%CALLNAME:ASSI%はたじろぐばかり。
			PRINTFORMW 『私はただ、その、%CNAMET(ASSI, "主人")%に連れてこられただけだから……』
			PRINTFORMW 「嫌なら断ればよかったじゃん」
			PRINTFORMW 『それは、そのぅ……』
			PRINTFORMW 煮え切らない態度の姉に、%CALLNAME:TARGET%は呆れたように溜め息をついた。
			PRINTFORMW 「……始めましょうか、%CNAME("二人称")%」
			PRINTFORMW 傍らの%CALLNAME:ASSI%は子犬のような目で助けを求めていた……
		ENDIF
		CALL SET_CEVENT, "助手会話：真"
	;二回目以降
	;ELSE
		;恋慕
		;IF TALENT:恋慕
			;PRINTFORMW
		;それ以外
		;ELSE
			;PRINTFORMW
		;ENDIF
	ENDIF
ELSEIF NO:ASSI == 35
	;初めて
	IF CEVENT("助手会話：灯") == 0
		;恋慕＋恋慕時初口上（陥落イベント）が発生済み
		IF CEVENT("調教開始：恋慕")
			PRINTFORMW 「……」
			PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:MASTER%の腕に引っ付き、%CALLNAME:ASSI%を威嚇している……
			PRINTFORMW 『おーおー、すっかり警戒されてら……』
			PRINTFORMW 『別に取って食いやしねえって。なあ』
			PRINTFORMW 「ふん。そういって横からかっさらっていくのが欧尼酱でしょ」
			PRINTFORMW 『ほほう？ すっかり%CNAMET(ASSI, "主人")%桑を自分のもの宣言ですか』
			PRINTFORMW 「べ、別にそんなんじゃないけど！」
			PRINTFORMW 『ふぅん……ま、言っとくけど。俺はあくまでその%CNAMET(ASSI, "主人")%の意思で連れてこられたんだからな』
			PRINTFORMW 「……あっそ」
			PRINTFORMW %CALLNAME:TARGET%はますます%CALLNAME:MASTER%に密着しようとしてくる……
			PRINTFORMW 『やれやれ……しばらく見ないうちにすっかり成長したねぇ……』
			PRINTFORMW %CALLNAME:ASSI%はある種、感心するような目で%CALLNAME:MASTER%の方を見た。
		;それ以外
		ELSE
			PRINTFORMW 『まるで授業参観だな』
			PRINTFORMW 開口一番、皮肉を効いた言葉を飛ばす%CALLNAME:ASSI%。
			PRINTFORMW 「……別に、来なくてもよかったけど？」
			PRINTFORMW 『いやぁ、そこの老师が是非ni↘て言うもんだからさ』
			PRINTFORMW 「はぁ……ほんと悪趣味……」
			PRINTFORMW 『まあまあ。別に俺に見られるぐらいは恥ずかしくないだろ？』
			PRINTFORMW 「…………」
			PRINTFORMW %CALLNAME:TARGET%は何も答えなかった。
		ENDIF
		CALL SET_CEVENT, "助手会話：灯"
	;二回目以降
	;ELSE
		;恋慕
		;IF TALENT:恋慕
			;PRINTFORMW
		;それ以外
		;ELSE
			;PRINTFORMW
		;ENDIF
	ENDIF
;口上のある助手が居ない場合は、通常の二回目以降の口上へ飛ぶ
ELSE
	CALL K48_KOJO2
ENDIF

RETURN 1

;-------------------------------------------------
;調教開始時（2回目以降）
;-------------------------------------------------
@K48_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 != 48
	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
CFLAG:ストレス -= RAND:(PALAM:絶頂回数 + 1)
SIF CFLAG:ストレス <= 0
	CFLAG:ストレス = 0
RETURN 1

;-------------------------------------------------
;指令実行時のセリフ
;イベントや台詞の都合上の問題でPLAYERに射精させたい場合は CALL SETFLAG, "強制射精", PLAYER とする事で强行射精させることができる
;-------------------------------------------------
@KOJO_MESSAGE_COM_K48
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0

;-------------------------------------------------
;愛撫
;-------------------------------------------------
IF SELECTCOM == 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「ん、っ……」
		PRINTFORMW 「なんです？ くすぐってるつもりですか？」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("要去了")
				CALL PRINT_STRW, "「～～っ_UH_ っ_UH_ ふ、ぐぅ……っ_UH_」"
				CALL PRINT_STRW, @"「%CNAME("二人称", "かな", "どもり")%……そろそ、ろ……んんっ_UH_」"
			ELSE
				IF ABL:PLAYER:技巧 >= 3
					CALL PRINT_STRW, "「んっ_UH_ ふ……ぁ……_UH_」"
					CALL PRINT_STRW, "「ふ、ふ……_UH_ 相変わらずお擅長……」"
				ELSE
					IF RAND:2
						PRINTFORMW 「んん……%CNAME("二人称")%っていつまで経っても下手くそ……」
						PRINTFORMW 「もしかして、わざと手を抜いてます……？ ねえ……」
					ELSE
						PRINTFORMW 「ほら、%CNAME("二人称")%。もっと頑張って……じれったいんですってば……」
					ENDIF
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF COND("要去了")
				PRINTFORMW 「～～っ！ いい、かげん……しつこい……んっ！」
			ELSE
				IF ABL:PLAYER:技巧 >= 3
					PRINTFORMW 「ん……ふ、くっ……」
					PRINTFORMW 「ふ、ふん……後輩いじめはお得意みたいじゃないですか……」
				ELSE
					PRINTFORMW 「……下手くそ」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰　面部騎乗(被逆推ているとき)
;-------------------------------------------------
IF SELECTCOM == 1
	;被逆推ているとき
	IF TEQUIP:推倒
		;初めて
		IF FIRSTCOM_REV(SELECTCOM) == 0
			PRINTFORMW 「よい、しょ……っと」
			PRINTFORMW 「ほら。%CNAME("二人称")%ばっかりイイ思いしてないで、後輩の面倒も見てやってくださいよ」
			PRINTFORMW 「……やってくれるまで動きませんよ」
		;二回目以降
		ELSE
			;恋慕
			IF TALENT:恋慕
				CALL PRINT_STRW, @"「くふ……_UH_ %CNAME("二人称")%、息してますか？」"
				CALL PRINT_STRW, @"「このまま続けますね……ぶっちゃけ%CNAME("二人称")%、死んでも平気でしょ……？ くふふ……_UH_」"
			;それ以外
			ELSE
				IF RAND:2
					PRINTFORMW 「くふ……ほら、嬉しいでしょう？ 萝莉のまんこが目の前にあって」
					PRINTFORMW 「%CNAME("二人称")%が喜ぶと思ってるからやってるんですよ……殊勝な後輩でしょ？」
				ELSE
					PRINTFORMW 「ほら、もっと舐めてくださいよ……不公平じゃないですか」
					PRINTFORMW 「酱と相手も満足させないと……基本でしょ、そういうの」
				ENDIF
			ENDIF
		ENDIF
	ELSE
		;初めて
		IF FIRSTCOM(SELECTCOM) == 0
			PRINTFORMW 「っ……」
			PRINTFORMW 「……なんでもないです。好きに舐めたらどうですか……変態」
		;二回目以降
		ELSEIF CHECK_COM("万謝的亲吻")
			;恋慕
			IF TALENT:恋慕
				CALL PRINT_STRW, @"「あ、ふ……_UH_ それじゃ、今日もはじめましょうか……？」"
			;それ以外
			ELSE
				PRINTFORMW 「んっ……ちょっと、なんですか。別に嬉しくないですからね」
			ENDIF
		;清洁舔阴
		ELSEIF COND("清洁舔阴フラグ", PLAYER)
			;恋慕
			IF TALENT:恋慕
				CALL PRINT_STRW, @"「くふふ……_UH_ やだなぁ、%CNAME("二人称")%……それおいしいんですかぁ？」"
				CALL PRINT_STRW, "「自己出した精液じゃないですか……あ、んっ……_UH_」"
			;それ以外
			ELSE
				PRINTFORMW 「あ、んっ……ちょ……別に、舐めなくてもいい……んんっ……」
				PRINTFORMW 「掃除くらい、自己できるのに……や、ぁ……」
			ENDIF
		;それ以外
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF RAND:2
					CALL PRINT_STRW, @"「あ、ふ……_UH_ ほんと、犬みたいですよ……%CNAME("二人称")%」"
					CALL PRINT_STRW, "「ほらワンチャン、酱と奥まで舐めてごらん？ くふふ……_UH_」"
				ELSE
					CALL PRINT_STRW, "「あ、は……_UH_ あんっ……ふふ、ほんとに飽きないひと……」"
					CALL PRINT_STRW, "「心底おいしそうに萝莉まんこしゃぶって……ん、あぁっ……_UH_」"
				ENDIF
			;それ以外
			ELSE
				IF TALENT:叛逆
					PRINTFORMW 「んっ……%CNAME("二人称")%、ほんとキモい……」
					PRINTFORMW 「何をそんな嬉しそうな顔して……んぅ……っ」
				ELSE
					PRINTFORMW 「あっ……んっ……ふ、ぅ……はぁ……」
					IF RAND:2
						PRINTFORMW 「……ほんと、楽しそうですよね……」
					ELSE
						PRINTFORMW 「……%CNAME("二人称")%、鼻息荒いですよ……」
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門愛撫
;-------------------------------------------------
IF SELECTCOM == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;気持ちいい
		IF CHECK("Ａ指挿入")
			CALL PRINT_STRW, "「ひゃんっ_UH_」"
			PRINTFORMW 「……な、なに見てるんですか。なんでもないですよ」
			PRINTFORMW （くっそ……なんで声出るかな……）
		;それ以外
		ELSE
			PRINTFORMW 「や、ちょっ……なに堂々とお菊門さわってんですかっ」
			PRINTFORMW 「ったくも……衛生とか倫理とか、そういう常識ないんですね……やっぱり」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF RAND:3 == 0
						CALL PRINT_STRW, "「～～っ_UH_ は、あ゛ぁ……っ……_UH_」"
						CALL PRINT_STRW, "「こ、れ……やば……いぃっ_UH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「ん、ぐぅっ……_UH_ も、ちょっと……てかげん、して、くださいよ……っ、はぁぁっ_UH_」"
					ELSE
						CALL PRINT_STRW, "「う゛ぁぁ……っ_UH_ いま、いじっちゃダメ……っ_UH_」"
					ENDIF
				ELSE
					IF RAND:2
						CALL PRINT_STRW, "「は、ぁ……っ_UH_ またこんな、後輩のお尻でおもちゃ玩耍して……_UH_」"
					ELSE
						CALL PRINT_STRW, @"「う、あぁ……_UH_ はぁ……っ_UH_ %CNAME("一人称")%のお尻、ダメにする気ですか……？」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, @"「や、ん……っ_UH_ %CNAME("二人称")%ったら、懲りずにお尻ばっかり……_UH_」"
				ELSE
					CALL PRINT_STRW, "「あんっ……_UH_ もう、いつまでも飽きないひとですね……_UH_」"
					CALL PRINT_STRW, "「こんな寒酸的兒童のお尻、ずっと弄ってばっかり……_UH_」"
				ENDIF
			ENDIF
		;気持ちいい
		ELSEIF CHECK("Ａ指挿入")
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF TALENT:結腸性感
						CALL PRINT_STRW, @"「%TEXTR("はぁぁ……っ_UH_ ちょっ……まってぇ……_UH_/や、ぁ……_UH_ これ、だめぇ……_UH_")%」"
						PRINTFORMW （%TEXTR("なんで、こんなので気持ちよくなっちゃうの……？/おかしいっ……こんなので気持ちよくなるなんて……！")%）
					ELSE
						PRINTFORMW 「%TEXTR("あ゛、う゛/は、あ゛/う゛、ぁ")%……！」
						PRINTFORMW 「%TEXTR("まっ……て……ふか、すぎ/だめ、です……これ")%……っ……」
					ENDIF
				ELSE
					CALL PRINT_STRW, "「や、っ……_UH_ ちょっと、いま触んないでくださいよ……っ」"
				ENDIF
			ELSE
				IF RAND:2
					CALL PRINT_STRW, "「やぁっ……_UH_ ちょっと、なに指插入てんですか……っ……」"
				ELSE
					CALL PRINT_STRW, "「ひぅっ_UH_ ……っ、ちょっと調子に乗らないでくださいよ……」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「……っ……汚いのに……」
			ELSE
				PRINTFORMW 「ん……っ……お尻なんて、何が楽しいんだか……」
			ENDIF
		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 「ふふ……どうです？ 年下のチビの阴茎を押し込まれるのは」
			PRINTFORMW 「噛まないでくださいよ？ %CNAME("一人称")%、年相応にわんわん泣きますからね」
		;PLAYヤーが男
		ELSEIF TALENT:PLAYER:男性
			PRINTFORMW 「っ、ちょ……なにやってんですか%CNAME("二人称")%……」
			PRINTFORMW 「……はぁ……やっぱり一味違いますね、%CNAME("二人称")%は」
			PRINTFORMW 「相手がチビ女と是え、阴茎を咥えたがる男だったとは……」
			PRINTFORMW 「随便ください。下手だと思ったらすぐ蹴り飛ばしますから」
		;それ以外
		ELSE
			PRINTFORMW 「や、ちょ……%CNAME("二人称")%……っ！」
			PRINTFORMW 「……ったく、やっぱりそういう目的だったんですね……この変態女……」
			PRINTFORMW 「気が済んだら、さっさとやめてくださいよ……んっ……」
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「ほら、休んじゃだめですよ？ %CNAME("二人称")%桑」
				CALL PRINT_STRW, "「大事な恋人の阴茎なんだから、一生懸命ご奉仕しないと……くふふ……_UH_」"
			ELSEIF RAND:2
				CALL PRINT_STRW, "「あぁ……やっぱり気持ちいいなぁ……_UH_ 付き合ってる甲斐が有ますよ……_UH_」"
			ELSE
				CALL PRINT_STRW, @"「ん、ふ……くふふ……_UH_ 擅長擅長……_UH_ さすが%CNAME("二人称")%桑ですね……_UH_」"
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「んっ……暴れたりしないでくださいよ……危ないですから」
			ELSEIF RAND:2
				PRINTFORMW 「ん、ふ……いいですね、こうやって年上を好き放題できるの……くふふ」
			ELSE
				PRINTFORMW 「苦しくないですか？ 平気ですよね、%CNAME("一人称")%みたいなチビの阴茎なんか……ふふ」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF RAND:2
				CALL PRINT_STRW, "「んふ……_UH_ なんですか、そんな愛おしそうに舐めちゃって……」"
				IF TALENT:PLAYER:男性
					CALL PRINT_STRW, @"「自分が男だってこと忘れてませんか、%CNAME("主人")%？ くふふ……_UH_」"
				ELSE
					CALL PRINT_STRW, @"「やっぱり%CNAME("二人称")%って年下趣味なんですねぇ……くふふ……_UH_」"
				ENDIF
			ELSE
				IF ABL:PLAYER:技巧 >= 3
					CALL PRINT_STRW, @"「あ、は……んっ……_UH_ やっぱり、さすが%CNAME("二人称")%桑ですね……っ_UH_」"
					IF TALENT:PLAYER:男性
						CALL PRINT_STRW, "「男なのに、こんなに舐陰莖のが擅長いなんて……んん……っ_UH_」"
					ELSE
						CALL PRINT_STRW, @"「やっぱり%CNAME("二人称")%って年下趣味なんですねぇ……くふふ……_UH_」"
					ENDIF
				ELSE
					PRINTFORMW 「もう、%CNAME("二人称")%ったらいつまで経っても擅長くならないんだから……」
					CALL PRINT_STRW, "「頑張らないと、もう好きじゃなくなっちゃいますよ～……なんて。くふふ……_UH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				IF TALENT:PLAYER:男性
					PRINTFORMW 「っ……まったく、意味わかんないひと……男のくせに阴茎しゃぶって……」
				ELSE
					PRINTFORMW 「ん……っ……ほんとに倒錯したひとですね……そんなに扶她が好きですか……？」
				ENDIF
			ELSE
				IF ABL:PLAYER:技巧 >= 3
					CALL PRINT_STRW, "「っ……ん、う……_UH_ くっ……」"
					IF TALENT:PLAYER:男性
						PRINTFORMW 「なんなんですか、%CNAME("二人称")%……男のクセに、こんなに……っ」
					ELSE
						PRINTFORMW 「な、なんですか%CNAME("二人称")%……こっち見ないでくださいよ……っ」
					ENDIF
				ELSE
					PRINTFORMW 「……もうちょっとマジメにやってもらえません？」
					SIF ABL:舌靈活 > ABL:PLAYER:舌靈活
						PRINTFORMW 「この分だと%CNAME("一人称")%の方が口交擅長いですよ？ 中学生なのに」
				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 「ん、むっ……！ ぷはっ」
			PRINTFORMW 「……満足ですか。%CNAME("一人称")%の唇を奪えて」
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「%TEXTR("ん……ちゅ……はふ……/んちゅ……ぷは、ぁ……ぁむ……/んちゅ……ぷは、ぁ……/……ぅん……ちゅ……はむ……")%」
			PRINTFORMW 「いつまでされるがままなんですか、%CNAME("二人称")%ったら……ふふ……」
		;それ以外
		ELSE
			PRINTFORMW 「%TEXTR("ん……ちゅ……/ん……ぁむ……/……ぅん……ちゅ……/ぁ……ん……んむ……")%」
			PRINTFORMW 「……いつまで寝てんですか。いい身分ですね……」
		ENDIF
	;それ以外
	ELSE
		;テンダー接吻
		IF CHECK_COM("テンダー接吻")
			PRINTFORMW 「……%TEXTR("ん/ちゅ")%……」
			PRINTFORMW 「……じゃ、始めましょうか」
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW 「%TEXTR("ん……ちゅ……はふ……/んちゅ……ぷは、ぁ……ぁむ……/んちゅ……ぷは、ぁ……/……ぅん……ちゅ……はむ……")%ん。ふふ……」
			PRINTFORMW 「まだ続けますか……？」
		;それ以外
		ELSE
			PRINTFORMW 「%TEXTR("ん……ちゅ……/ん……ぁむ……/……ぅん……ちゅ……/ぁ……ん……んむ……")%」
			PRINTFORMW 「……まだやるんですか？」
		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 「……ほら、これでいいですか？」
		PRINTFORMW 「さっさと満足してくださいよ。すぐ閉じちゃいますからね」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("Ｖ潤充分")
				IF RAND:2
					CALL PRINT_STRW, @"「んっ……_UH_ もう、いっつもそうやって挑逗て……ほんっと悪趣味……」"
				ELSE
					PRINTFORMW 「ん……もう……そうやって%CNAME("一人称")%のこと挑逗て、楽しいんですか……？ いやらしい……」
				ENDIF
			ELSE
				IF RAND:2
					PRINTFORMW 「くふふ……相変わらず。ほんとに好きですね、兒童のおまんこ」
				ELSE
					PRINTFORMW 「ほんとに飽きないひと……いっつも見てきたっていうのに……」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF COND("Ｖ潤充分")
				IF RAND:2
					PRINTFORMW 「ん……っ……もう良いでしょう？ 早くやめさせてくださいよ……」
				ELSE
					PRINTFORMW 「っ……そうやって%CNAME("一人称")%が股濡らしてるところ見るの、楽しいですか……？」
				ENDIF
			ELSE
				IF RAND:2
					PRINTFORMW 「っ……またやらせるつもりですか……ほんっと性悪ですね……」
				ELSE
					PRINTFORMW 「……目つきがやらしいですよ。変態」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開菊穴
;-------------------------------------------------
IF SELECTCOM == 14
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「な、お、お尻……！」
		PRINTFORMW 「……わ、我明白了よ……見せればいいんでしょ」
		PRINTFORMW 「別にいまさら、恥ずかしいこともないし……」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF COND("Ａ潤充分")
				IF RAND:2
					CALL PRINT_STRW, @"「ん、ふっ……_UH_ 湿的てる……%CNAME("二人称")%のせいですからね、ほんと……」"
				ELSE
					PRINTFORMW 「あーあ、すっかり湿的るのが当たり前になっちゃったな……恨みますよ？ %CNAME("二人称")%」
				ENDIF
			ELSE
				IF RAND:2
					PRINTFORMW 「まぁたお菊門……そんなに良いものなんです？ %CNAME("一人称")%にはよくわからないなぁ……」
				ELSE
					PRINTFORMW 「是是、いま見せますから……もっと近づいてもいいですよ」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF COND("Ａ潤充分")
				IF RAND:2
					PRINTFORMW 「くっ……なんで%CNAME("一人称")%、こんなとこ濡らして……」
				ELSE
					PRINTFORMW 「ん、やだ……なんか、むずむずする……」
				ENDIF
			ELSE
				IF RAND:2
					PRINTFORMW 「なんでお菊門なんですか……この、ド変態……」
				ELSE
					PRINTFORMW 「も、ほんと……恨みますよ、%CNAME("二人称")%……」
				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:恋慕
			PRINTFORMW 「っ……つ……」
			PRINTFORMW 「……なんですか、その顔。痛いに決まってるじゃないですか……初めてなんだから」
			PRINTFORMW そう言う割には、%CALLNAME:TARGET%の表情に是くらか余裕が見える……
			PRINTFORMW 「ほら、いいから早く動いてくださいよ。%CNAME("一人称")%のことは気にしないでいいですから」
		;それ以外
		ELSE
			PRINTFORMW 「いっ……」
			PRINTFORMW %CALLNAME:TARGET%は一瞬身を強張らせたが、すぐに弛緩していった……
			PRINTFORMW 「……なんです？ 別に平気ですけど」
			PRINTFORMW 「ボーッとしてないで、さっさと動いたらどうですか」
		ENDIF
	;非処女
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「ん、ふっ……く、ふふ……とうとう入れましたね、%CNAME("二人称")%」
			PRINTFORMW 「いままでずっとコレだけはしなくて、変なひとだなぁって思ってたんです」
			PRINTFORMW 「もういいでしょう？ 気の済むまで気持ちよくなってください……くふふ……」
		;それ以外
		ELSE
			PRINTFORMW 「んっ……く……ふぅ……」
			PRINTFORMW 「……なんです、その顔。なんか文句有ますか？」
			PRINTFORMW 「悪かったですね、非処女で……別に%CNAME("二人称")%には関係ないでしょ……」
		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_ うぁ……_UH_ はっ、はっ……_UH_」"
		CALL PRINT_STRW, "「こ、の……鬼畜阴茎が……_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, "「こんな、征服欲丸出しの格好させて……ほんとに、根性わるい……_UH_」"
		;屈曲位
		CASE 62
			CALL PRINT_STRW, "「はぁぁ……っ、が……っ_UH_ きっつ、い……_UH_」"
			CALL PRINT_STRW, "「もっと、労って、ください……よ……この、ばか……_UH_」"
		;対面座位
		CASE 63
			CALL PRINT_STRW, "「あ、ふ……_UH_ 是った……_UH_」"
			CALL PRINT_STRW, "「なんで抱っこしながらなんですか……？ 兒童扱いされてるみたいで、ヤなんですけど……_UH_」"
		;背面座位
		CASE 64
			CALL PRINT_STRW, "「や、ぁ……_UH_ こんな、兒童扱い、みたいな……体位……っ」"
			CALL PRINT_STRW, @"「ほんっと、ばかにして……嫌いです、%CNAME("二人称")%なんか……_UH_」"
		;騎乗位
		CASE 65
			CALL PRINT_STRW, "「ん……っ……ふぅぅ……ん……_UH_」"
			CALL PRINT_STRW, @"「くふふ……_UH_ どうです？ %CNAME("一人称")%のでも酱とココまで入るんですよ……_UH_」"
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW
	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_ あーっ_UH_」"
			; ELSEIF RAND:3 == 0
			; 	CALL PRINT_STRW, "「もぉ、やだぁ_UH_ いいかげんにしてっ、くださいよぉ_UH_ もぉやだぁぁっ_UH_」"
			; ELSEIF RAND:2
			; 	CALL PRINT_STRW, "「やぁ……_UH_ もぉやらぁ……_UH_ あやまりますから……っ……おわらせてよぉ……_UH_」"
			; ELSE
			; 	CALL PRINT_STRW, @"「う、ぅ……っ_UH_ %CNAME("一人称", "どもり")%っ、がっ_UH_ わるかった、ですから……っ_UH_」"
			; 	CALL PRINT_STRW, "「もぉイがぜでぐだざいよぉぉーー_UH_ うあ゛ぁ゛ーー_UH_」"
			; ENDIF
			IF RAND:2
				CALL PRINT_STRW, "「んっ_UH_ んっ_UH_ このっ、性悪っ_UH_ 後輩イジメて、楽しいですかっ_UH_」"
			ELSE
				CALL PRINT_STRW, "「ふっ、んっ……ちょっとっ……本気で、突いてくださいよっ……_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_ もぉ、声でちゃう……」"
			CALL PRINT_STRW, @"「%CNAME("二人称")%のせいですよ……いっつもこればっかりするから……_UH_」"
		ELSE
			PRINTFORMW 「%TEXTR("あぁ/はぁ/んん/")%……っ」
			IF RAND:2
				PRINTFORMW 「……な、なんですか。なんでもないですから……」
			ELSE
				PRINTFORMW 「んっ……見ないでくださいよ、ばか……」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
		;前向き
		CASE "正常位", "屈曲位", "騎乗位", "対面座位"
			IF TALENT:恋慕 && RAND:3 == 0
				CALL PRINT_STRW, @"「ん、ふっ_UH_ ふっ_UH_ あっ_UH_ はっ_UH_」"
					IF RAND:2
						CALL PRINT_STRW, "「そんな、じろじろ見ないでくださいよ……ばかぁ……_UH_」"
					ELSE
						CALL PRINT_STRW, "「もぉ……後輩が恥ずかしがってるのがわかんないんですか……このばか……_UH_」"
					ENDIF
			ELSEIF TALENT:叛逆 == 0 && RAND:2
				CALL PRINT_STRW, @"「%TEXTR("く、ふぅっ……んっ……_UH_/ ふぁ、ん……あ……っ_UH_")%」"
				IF RAND:2
					CALL PRINT_STRW, "「ふっ、ふっ……調子乗ってるんじゃないでしょうね……んっ_UH_」"
				ELSE
					CALL PRINT_STRW, @"「はぁ、はぁ……なに見てんですか、%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:2
						CALL PRINT_STRW, "「こんな、カッコで……んんっ_UH_ もぉ……_UH_」"
					ELSE
						CALL PRINT_STRW, "「そんな、音たてないで、くださいよ……ばかっ_UH_」"
					ENDIF
			ELSEIF TALENT:叛逆 == 0 && RAND:2
				CALL PRINT_STRW, @"「%TEXTR("んっ_UH_ んっ_UH_ ん～っ_UH_/ふっ_UH_ ふっ_UH_ んっ……ふーっ_UH_")%」"
				IF RAND:2
					CALL PRINT_STRW, "（だ、だいじょうぶ……見られてないから……みられてないから……_UH_）"
				ELSE
					CALL PRINT_STRW, "「ちょっと……カラダ、つよく掴みすぎなんじゃないです……？ んっ……_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 CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
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 CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
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 CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
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 CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
;背面座位
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_」"
			PRINTFORMW %CALLNAME:TARGET%は荒い息をつきながら徐々に肩の力を拔出と、くつくつと笑い出した。
			CALL PRINT_STRW, "「くふふ……_UH_ なんですか……ちょっと仲良くなったからって……」"
			CALL PRINT_STRW, "「お尻に挿入れるくらい是いだろう、とか……思ったんです……？ 浅はかなひと……_UH_」"
			CALL PRINT_STRW, "「言っときます、けど……っ……後遺症とか残しやがったらタダじゃおかないですからね……_UH_」"
		;余裕有
		ELSEIF CHECK("Ａ挿入")
			PRINTFORMW 「ん、ぐ……っ……？」
			PRINTFORMW 身構えた表情の%CALLNAME:TARGET%が、意外そうに力が抜けていく……
			PRINTFORMW 「……う、わ。なんで初めてでこんなすんなり挿入っちゃうんですか」
			PRINTFORMW 「もしかしなくても%CNAME("二人称")%のせいですよね……どうしてくれるんです……？」
		;それ以外
		ELSE
			PRINTFORMW 「っ……く……！」
			PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:PLAYER%と目を合わさないようにし、声を抑えている……
			PRINTFORMW 「……ふぅ……早く済ませてくれませんか……？」
			PRINTFORMW 思ったよりは平気そうだ……
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「く、ふ……_UH_ とうとう、挿れちゃいましたね……」"
			PRINTFORMW %CALLNAME:TARGET%は尻の中に%CALLNAME:PLAYER%の阴茎を迎え入れたことを確認すると、妖艶に笑い出す……
			PRINTFORMW 「こうやって新しいことをすると、%CNAME("一人称")%たちの関係も節目が来たんだなって感じですね……」
			CALL PRINT_STRW, "「さ……存分に楽しんでいいんですよ？ くふふ……_UH_」"
		;余裕有
		ELSEIF CHECK("Ａ挿入")
			PRINTFORMW 「んっ……ふぅ……入りました？」
			PRINTFORMW 肛門に阴茎を迎え入れた%CALLNAME:TARGET%は、歳と体躯の割には余裕そうな顔をしている……
			PRINTFORMW 「……なんですか？ 意外そうな顔して」
			PRINTFORMW 「ほら、つまんないこと考えてないで腰でも振ってたらどうです？」
			PRINTFORMW そっぽを向かれてしまった……
		;それ以外
		ELSE
			PRINTFORMW 「っ……ちょっと、キツ……」
			PRINTFORMW %CALLNAME:TARGET%は不意に漏れた言葉を噤んで遮った。
			PRINTFORMW 「……なんでもないです。気にしないで、続けてください」
			PRINTFORMW そういって%CALLNAME:TARGET%は気まずそうにそっぽを向いた。
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ａ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOMS("Ａ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW 「っ……！ ……っ……」
		PRINTFORMW %CALLNAME:TARGET%は無理に平静を装おうとしている……
	;巨根
	ELSEIF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		CALL PRINT_STRW, "「くっ……ふ、ふ……_UH_ こんなに、大きいのが……入ってきて……」"
		PRINTFORMW 肛門に剛直を埋め込まれた%CALLNAME:TARGET%は夢うつつのように呆けている……
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;正常位
		CASE 70
			CALL PRINT_STRW, "「ぅ……ん……っ_UH_ く、ふ……なんですか、じろじろ見て……」"
			PRINTFORMW 「お尻に挿れられた後輩の姿が、そんなに楽しいんです……？」
			PRINTFORMW %CALLNAME:TARGET%は息を吐き出しながらも挑衅的目をしている……
		;後背位
		CASE 71
			CALL PRINT_STRW, "「は、あ……ぁ……_UH_ ん……ふふ……_UH_」"
			PRINTFORMW 剛直を埋め込まれ、腰を掴まれた%CALLNAME:TARGET%は惚けたように笑着いる……
		;屈曲位
		CASE 72
			CALL PRINT_STRW, @"「うぁっ_UH_ ちょっと、このバカ%CNAME("二人称")%っ」"
			CALL PRINT_STRW, "「後輩にこんな乱暴なことして……んっ……労ろうって気はないんですかっ_UH_」"
			PRINTFORMW 言葉の割に、%CALLNAME:TARGET%は愉しんでいるような气息がする……
		;対面座位
		CASE 73
			CALL PRINT_STRW, "「ん、ふ……_UH_ ちょっと、なに見てんですか……」"
			PRINTFORMW 向かい合って繋がる%CALLNAME:PLAYER%の胸を、%CALLNAME:TARGET%はとんと押した。
			PRINTFORMW 「いいから酱とリードしてくださいよ？ ……%CNAME("主人")%なんですから」
		;背面座位
		CASE 74
			CALL PRINT_STRW, @"「っ、あっ_UH_ やだ、このバカ%CNAME("二人称")%っ_UH_ こんな兒童扱いみたいにしてっ」"
			CALL PRINT_STRW, "「お尻に入ってんですよっ_UH_ バカじゃないですか、ほんと……_UH_」"
			PRINTFORMW %CALLNAME:TARGET%の罵倒の声は甘くとけている……
		;騎乗位
		CASE 75
			PRINTFORMW 「あ……っ、ふ……ん……ほら、酱と入りましたよ……」
			PRINTFORMW %CALLNAME:PLAYER%の阴茎を限界まで飲み込んだ後、%CALLNAME:TARGET%は少し腰を浮かして見せつけた。
			CALL PRINT_STRW, "「じゃ、これから動きますから……んっ_UH_ おと无くしてるんですよ……？」"
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW 「%TEXTR("ん、く……ふぅ……/はぁ……っ……")%入りました……？」
		PRINTFORMW 「%TEXTR(@"またお尻なんて……飽きないですよね、/やれやれ……こんな寒酸的お尻がそんなに好きですか？ ")%%CNAME("二人称")%桑」
		PRINTFORMW %CALLNAME:TARGET%は余裕ぶって溜め息をついている……
	ENDIF
	RETURN 1
;-------------------------------------------------
;Ｓ状結腸を使っての肛門性交
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHECK_COM("結腸責め")
	;初めての結腸責め
	IF EXP:結腸経験 == 0
		PRINTFORMW 「っ、ぇ――？」
		PRINTFORMW %CALLNAME:PLAYER%の阴茎が壁に突き当たる感覚と共に、%CALLNAME:TARGET%は喉を詰まらせたように息を漏らした。
		PRINTFORMW （は……？ なに、今の。明らかに変だ……）
		PRINTFORMW 「――ちょ、っと……%CNAME("二人称")%、待って」
		PRINTFORMW %CALLNAME:TARGET%の静止を待たず、%CALLNAME:PLAYER%の抽送が始まった……
		CALL PRINT_STRW, "「っ、あっ_UH_ ちょっとっ_UH_ 待ってって、言ったのni↘_UH_ この、バカっ_UH_」"
		PRINTFORMW （――あぁ、ヤバい。コレほんとにどうしようもない奴だ……）
		PRINTFORMW %CALLNAME:TARGET%は%CALLNAME:PLAYER%を止めるのを諦め、快楽の濁流に飲まれていった……
	;今回初の結腸責め
	ELSEIF EXP_GAIN("結腸経験") == 0
		IF TALENT:結腸性感
			CALL PRINT_STRW, "「あ、はぁっ_UH_ またっ、奥までっ_UH_ 入って、きて……っ_UH_」"
			PRINTFORMW 結腸を突かれた%CALLNAME:TARGET%は頬を綻ばせ、快楽に身を委ねた……
		ELSE
			CALL PRINT_STRW, "「っ_UH_ ちょっと、またっ_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_」"
			ENDIF
			PRINTFORMW %CALLNAME:TARGET%は圧倒的な快楽を受け入れ、歓喜の声を上げている……
		ELSE
			IF RAND:2
				CALL PRINT_STRW, "「っ_UH_ くっ_UH_ ふっ_UH_ ふっ……あっ_UH_ あぁっ_UH_ はっ_UH_ はぁっ_UH_」"
			ELSE
				CALL PRINT_STRW, "「くっ_UH_ こ、れ……やばっ_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:推倒
			PRINTFORMW 「……じっとしててくださいよ。暴れたら噛みちぎりますから」
			PRINTFORMW 「はむっ……ん……ちゅぷ……じゅる……っ」
		;それ以外
		ELSE
			PRINTFORMW 「ん……舐めるんですか、これ……」
			IF TALENT:PLAYER:阴茎 <= 1
				PRINTFORMW 「まあ、これくらいなら……平気ですけど」
			ELSE
				PRINTFORMW 「ちょっとは労ってくださいよ……このサイズ、手に余るんですけど……」
			ENDIF
			PRINTFORMW 「んっ……ちゅぷ……」
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("阴茎接吻")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「ん、ちゅ……くふふ……ビクってしましたね、今」
			PRINTFORMW 「それじゃ、今日も始めましょうか」
		;それ以外
		ELSE
			PRINTFORMW 「ちゅ……ん……」
			PRINTFORMW 「……じゃ、しますか」
			SIF RAND:2
				PRINTFORMW （いちいちこうやって始めさせるって……ほんっと独裁者気取り……）
		ENDIF
	;みんな大好き清洁口交
	ELSEIF CHECK_COM("清洁口交")
		;恥垢もお掃除
		IF CHECK_COM("恥垢清洁口交")
			PRINTFORMW 「うわ、きったな……これ舐めろっていうんですか、後輩に」
			PRINTFORMW 「はーあ……ばっかやろう……んっ……」
			PRINTFORMW 「ちゅ、ぷ……じゅる……れろ……」
		;恋慕
		ELSEIF TALENT:恋慕 && RANDIF(1, ABL:奉仕精神 >= 3)
			PRINTFORMW 「ちゅっ、ちゅっ……ちゅるる……じゅるぅ……」
			PRINTFORMW 「んっ……ふぁ……ほら。できましたよ、%CNAME("二人称")%」
			IF RAND:2 && TALENT:PLAYER:阴茎 <= 2
				PRINTFORMW 「……どうせならもっとでっかい阴茎にしませんか？」
				PRINTFORMW 「その方が自己舐めて掃除しやすくなると思いますよ。……なんて、嫌ですかね」
				PRINTFORMW 「%CNAME("二人称")%くらいの変態なら名案かと思ったんですけどね……くふふ」
			ENDIF
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3 && RAND:2
			PRINTFORMW 「じゅるっ、じゅるっ、ちゅるる……んぐ……ぷはぁ……」
			PRINTFORMW 「ほら、確認してください。満足しました？」
		ELSE
			PRINTFORMW 「ん……ふ……ぐ……じゅる、ちゅ……れろ……」
			PRINTFORMW 「ぷっは……けほっ……はぁ。手のかかるひと……」
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「じゅる、じゅるる……ぷは、ちゅ……ちゅるぅ～っ……」
			IF RAND:2
				CALL PRINT_STRW, @"（くふふ……_UH_ 今は%CNAME("一人称")%がイニシアチブを取ってるんだ……くふふふ……_UH_）"
			ELSE
				PRINTFORMW 「んふ……こら、%CNAME("二人称")%？ いつまで寝てるんですか？
				CALL PRINT_STRW, "「ほんっとに、だらしないんだから……くふふ……_UH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「ん、む……ちゅぅぅ……れろ、れろ……じゅぼ、じゅぼ……」
			IF RAND:2
				PRINTFORMW 「ふぁ……ん、」
			ELSE
				PRINTFORMW （なぁにサボって後輩にやらせてんだか……好きなことしくさって……）
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「%TEXTR("はむっ………ん、ふっ……ちゅ……/あむっ……ん、ちゅ……ちゅっ……/ちゅく、ちゅく……ちゅるる……んちゅ……")%」
			IF RAND:2
				PRINTFORMW （すっかり慣れてきたな……口交）
				PRINTFORMW （この裏の部分を舐めると、反応が……くふふ……）
			ELSE
				PRINTFORMW 「ん、ふ……良さそうな顔してますね、%CNAME("二人称")%」
				PRINTFORMW 「もしかして、ハマってます？ こんな小さい子の口交に……くふふ……」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「%TEXTR("ぁむっ……ちゅ……ちゅ……れろ、れろ……/じゅぶ、じゅるる……ぅん……ちゅ、くちゅ……/")%」
			IF TALENT:叛逆 && RAND:2
				PRINTFORMW （あー、かったるい……噛んじゃおっかな……）
				PRINTFORMW （このひと平気っぽそうだしな……どうしよっかな……ほんとにやっちゃおうかな……）
			ELSE
				PRINTFORMW 「ん、ふ……どうです？ 満足してます？」
				PRINTFORMW 「よさそうなら、このまま続けますけど……」
			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 「今さら遠慮してるんです？ ……違う？」
		PRINTFORMW 「ま、構いませんけど……勝手に動いて入れたりしたら、普通にキレますから」
	;二回目以降
	ELSEIF CHECK_COM("展示肉棒")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「くふふ……もうスイッチ入ってるみたいですね、%CNAME("二人称")%……」
			CALL PRINT_STRW, @"（%CNAME("一人称")%も……スイッチ入っちゃったかも……くふ……_UH_）"
		;それ以外
		ELSE
			PRINTFORMW （う、わ……えっぐ……こんなの……）
			PRINTFORMW 「……ふん。なんです？ 見せつけて勝ち誇りたいんですか？」
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「くふ……くふふ……_UH_ %CNAME("二人称")%、入れたいですか？ %CNAME("一人称")%のナカ入れたいですか？」"
			CALL PRINT_STRW, "「酱とお願いしたら入れてあげますよ……ほら、言ってみてくださいよ……くふふ……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「ん、ふっ……ちょっと……いつまで%CNAME("一人称")%にやらせるんですか……」
			IF RAND:2
				PRINTFORMW 「まったく……後輩に任せて勝手に満足して……ん、しょ……」
			ELSE
				PRINTFORMW 「もうだいぶ湿的てきてるんですけど……んっ……いつまで続ければいいんです……？」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF RAND:2
				CALL PRINT_STRW, @"「あ、ふ……_UH_ %CNAME("二人称")%、いつまで続けるんです……？」"
				CALL PRINT_STRW, "「このまま……んっ……出しちゃうのは、もったいないんじゃないですか……？ くふふ……_UH_」"
			ELSE
				CALL PRINT_STRW, "「ん、ふふ……_UH_ どんどんぬるぬるになっていきますね……」"
				CALL PRINT_STRW, @"「これ、どっちなんでしょうね……%CNAME("一人称")%の愛液か、%CNAME("二人称")%の先走り汁か……くふふ……_UH_」"
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「んっ、んっ……%CNAME("二人称")%……これ、疲れるんですけど……まだ続けるんです……？」
			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 「……あぁ、胸を顔に……ふぅん……」
		SIF TALENT:貧乳
			PRINTFORMW 「……%CNAME("一人称")%のでやって楽しいんですか、それ？」
		PRINTFORMW 「まあ、やりますけど……じっとしててくださいよ？ 変なことしたらすぐやめますから」
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「くっふふ……楽しんでますか？ %CNAME("二人称")%」
			PRINTFORMW 「%CNAME("一人称")%は楽しいですよ……%CNAME("二人称")%をいいようにできて」
		;それ以外
		ELSE
			PRINTFORMW 「ほら、なに休んでるんですか%CNAME("二人称")%」
			IF TALENT:貧乳
				PRINTFORMW 「このまま胸板でごりごりし続けちゃいますよ？ 痛くないんですか？」
			ELSE
				PRINTFORMW 「早くしないと兒童の胸で窒息しちゃいますよ？ いいんですか？」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「くふふ……相変わらず%CNAME("一人称")%みたいなのの胸が好きなんですねぇ」
			PRINTFORMW 「後輩なんかに甘やかしてもらってばっかりで……ほんとに仕方ないひと……」
		;それ以外
		ELSE
			IF TALENT:貧乳
				PRINTFORMW 「わっかんないなぁ……%CNAME("一人称")%みたいな胸板の何が嬉しいんだか……」
			ELSE
				PRINTFORMW 「やれやれ……楽しんでますね、兒童の胸部。だらしない顔してますよ？」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飞机杯冲
;-------------------------------------------------
IF SELECTCOM == 105
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

;-------------------------------------------------
;Ａ逆挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 125 && SELECTCOM <= 127 && FIRSTCOMS("Ａ逆挿入") == 0
	;調教者がＡ処女
	IF TALENT:PLAYER:Ａ処女
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「んっ、く……ふふ……_UH_ あはは……_UH_」"
			CALL PRINT_STRW, @"「見えますか？ %CNAME("二人称")%のお尻、犯されちゃってますよ……_UH_」"
			CALL PRINT_STRW, @"「嬉しいですか？ 嬉しいんですよね？ くふふ……%CNAME("一人称")%も乗り気になってきましたよ……_UH_」"
			CALL PRINT_STRW, @"「よく見せてください……%CNAME("二人称")%が情けなく喘いでるところ……くっふふ……_UH_」"
		;非恋慕
		ELSE
			PRINTFORMW 「っ、く……きっつ……」
			PRINTFORMW 「ふー……こんなのがいいんですか？ 後輩に頼み込んでまで……ほんっと物好きですね、%CNAME("二人称")%……」
			PRINTFORMW 「言っときますけど、加減とかわからないですからね……文句言われても知りませんから」
		ENDIF
	;それ以外
	;恋慕
	ELSEIF TALENT:恋慕
		IF COND("Ａ熟達", MASTER)
			CALL PRINT_STRW, "「くふふ……あはは……_UH_ すんなり入っちゃった……_UH_」"
			PRINTFORMW 「やっぱり%CNAME("二人称")%、どうしようもない変態ですね……こんなにお尻ガバガバにして……」
			CALL PRINT_STRW, "「しかもその穴を、後輩に犯してもらおうだなんて……あっはは……_UH_」"
			CALL PRINT_STRW, "「いいですよ……お望み街道、めちゃくちゃにしてあげますから……くっふふ……_UH_」"
		ELSE
			PRINTFORMW 「っ……あれぇ……？ てっきりスムーズに入るかと思ったのに……」
			PRINTFORMW 「こう言っちゃなんですけど、%CNAME("二人称")%にしては意外ですね……？」
			CALL PRINT_STRW, "「くふふ……まぁいいや。このまま拡げちゃいましょうか……_UH_」"
		ENDIF
	;假阳具
	;非恋慕
	ELSE
		IF COND("Ａ熟達", MASTER)
			PRINTFORMW 「う、わ……すんなり入った……よっぽど使い込んでるんですね……」
			PRINTFORMW 「そんなに楽しいんですか？ お尻で玩遊戲の……」
			PRINTFORMW 「……まぁいいや。このまま動いちゃいますよー」
		ELSE
			PRINTFORMW 「っ、く……なんだ、きついじゃないですか……」
			PRINTFORMW 「てっきりガバガバなのかと思ってましたよ。%CNAME("二人称")%のことだから」
			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 == 132
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;終了時
	ELSEIF TEQUIP:鼻钩 == 0
		;余裕有
		IF CHECK("鼻钩")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("鼻钩")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;眼罩
;-------------------------------------------------
IF SELECTCOM == 133
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「……ちょっと、なんですコレ。なんで眼罩する必要あるんですか」
		PRINTFORMW 「こうしたら%CNAME("一人称")%が怖がるとでも思ってるんですか？ ナメないでくださいよ」
	;終了時
	ELSEIF TEQUIP:眼罩 == 0
		;恋慕
		IF TALENT:恋慕
			IF COND("疲労") + COND("前回絶頂")
				CALL PRINT_STRW, "「はぁ……はぁ……ふふ……_UH_」"
				PRINTFORMW 「%CNAME("一人称")%のこと、好きなようにしてくれましたね……」
			ELSE
				PRINTFORMW 「あら……もうやめちゃうんです？」
			ENDIF
		;それ以外
		ELSE
			IF COND("疲労") + COND("前回絶頂")
				PRINTFORMW 「はぁ……はぁ……ふ、ふん。やっと飽きましたか……？」
			ELSE
				PRINTFORMW 「ふん……特になんともなかったですね」
				PRINTFORMW 「最初から付けなければよかったんじゃないです？」
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「くふ……_UH_ またこんな坏心眼ことするんですか……？」"
			PRINTFORMW 「いいですよ、付き合ってあげます。」
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「っ……またこんなの付けるんですか……」
			ELSE
				PRINTFORMW 「また眼罩……悪趣味ですよ、こんなの……」
			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
			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_BODYS("拘束衣")
			PRINTFORMW
		ELSEIF CHECK_BODYS("兔")
			PRINTFORMW
		;其他
		ELSE
			PRINTFORMW
		ENDIF
	;胸も股間も丸出し状態变成了時
	ELSEIF CHECK_COM("換装：裸体变成了")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;露出癖Lv3
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;胖次を変えたり脱いだり
	ELSEIF CHECK_COM("換装：胖次")
		IF EQUIP:胖次
			PRINTFORMW
		;没穿内褲です
		ELSE
			PRINTFORMW
		ENDIF
	;以下は面倒ならELSE でひとまとめでも良いでしょう
	ELSEIF CHECK_COM("換装：外套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：胸罩")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：手套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：襪子")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：靴")
		PRINTFORMW
	;飾品の付け替えや其他
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;被逆推
;-------------------------------------------------
IF SELECTCOM == 176
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;潤滑液使用
;-------------------------------------------------
IF SELECTCOM == 260
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「ん……酱と使うんですね、潤滑液」
		PRINTFORMW 「いや、湿的てなくても構わず挿入れる領帯プかなって思ってて……」
		PRINTFORMW 「……まあ、助かります」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「ふ、ふ……_UH_ これでいつでも挿入できますね、%CNAME("二人称")%桑……？」"
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「ん……っ……べとべと……」
			ELSE
				PRINTFORMW 「……%CNAME("二人称")%、潤滑液まみれのチビが趣味なんです？」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;媚薬使用
;-------------------------------------------------
IF SELECTCOM == 261
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「ん……こく……」
		PRINTFORMW 「……なんですか。まじまじと見つめて」
		PRINTFORMW 「別に、なんともない、ですけど……っ……」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「ん、く……_UH_ また、兒童にこんなもの飲ませて……」"
			CALL PRINT_STRW, @"「なんか、悪影響とか出たら……%CNAME("二人称")%のせいですからね……っ……_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「ん……っ……また、こんなもの飲ませるんですか……」
			PRINTFORMW 「お金の無駄なんだから……やめたほうが、いいですよ……っ……」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;利尿剤
;-------------------------------------------------
IF SELECTCOM == 262
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;排卵誘発剤
;-------------------------------------------------
IF SELECTCOM == 264
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;筋弛緩剤
;-------------------------------------------------
IF SELECTCOM == 267
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

;-------------------------------------------------
;抱上去
;-------------------------------------------------
IF SELECTCOM == 285
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF

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

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

;-------------------------------------------------
;パラメータ変動をトリガーにした口上
;パラメータ変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_PALAMCNG_K48, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0
;-------------------------------------------------
;パラメータ変動時のセリフ
;-------------------------------------------------
SELECTCASE ARGS
;-------------------------------------------------
;初めてＶ潤がLV3超えた
;-------------------------------------------------
CASE "Ｖ潤LV3突破"
	;初めて
	IF FIRST_EV("Ｖ潤LV3突破") == 0
		;潤滑液を使った場合
		IF SELECTCOM == 260
			PRINTFORMW （……うん。これなら、%CNAME("一人称")%でも大丈夫かな……たぶん）
			PRINTFORMW 「……どうしたんですか？ 使わないんですか、こっちの穴」
		;それ以外
		ELSE
			PRINTFORMW 「……え……あれ……？」
			PRINTFORMW （%CNAME("一人称")%、湿的てる……？ %CNAME("主人")%の手で、ここまで……？）
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて欲情がLV3超えた
;-------------------------------------------------
CASE "欲情LV3突破"
	IF FIRST_EV("欲情LV3突破") == 0
		;媚薬を使った場合
		IF SELECTCOM == 261
			PRINTFORMW （っ、く……ムカつく、ムカつく……！ %CNAME("二人称")%、じっと見てくる……！）
			PRINTFORMW （こんなわけわかんないの飲ませて、まんまと感じてるとか思ってるんだっ……）
			PRINTFORMW （馬鹿に、しやがって……っ……）
		;それ以外
		ELSE
			PRINTFORMW 「はぁ……はぁ……っ、%CNAME("二人称")%……調子、乗ってませんか……？」
			PRINTFORMW 「こんな、チビっ子相手に……息を荒らげさせたくらいで……」
		ENDIF
	ENDIF
;-------------------------------------------------
;初めて恥情がLV3超えた
;-------------------------------------------------
CASE "恥情LV3突破"
	IF FIRST_EV("恥情LV3突破") == 0
		PRINTFORMW 「っ……じろじろ見ないでくださいよ……！ この、馬鹿……！」
	ENDIF
;-------------------------------------------------
;初めて恐怖がLV3超えた
;-------------------------------------------------
CASE "恐怖LV3突破"
	IF FIRST_EV("恐怖LV3突破") == 0
		PRINTFORMW 「……っ……！」
		PRINTFORMW （泣くな、泣くな……！ こんなヤツ相手に……！）
	ENDIF
;-------------------------------------------------
;初めてC絶頂
;-------------------------------------------------
CASE "Ｃ絶頂"
	IF FIRST_EV("Ｃ絶頂") == 0
		CALL PRINT_STRW, "「～～っ_UH_ く……ふぅ……っ」"
		PRINTFORMW （くっそ……イかされた……）
		PRINTFORMW （でも、いっつも自慰で弄ってる場所だし……仕方ないし……）
	ENDIF
;-------------------------------------------------
;初めてV絶頂
;-------------------------------------------------
CASE "Ｖ絶頂"
	IF FIRST_EV("Ｖ絶頂") == 0
		CALL PRINT_STRW, "「ゃ、っ～～_UH_」"
		PRINTFORMW 「……っ……はぁ、はぁ……」
		PRINTFORMW （%CNAME("一人称")%……初めて、ココでまともにイった……？）
	ENDIF
;-------------------------------------------------
;初めてA絶頂
;-------------------------------------------------
CASE "Ａ絶頂"
	IF FIRST_EV("Ａ絶頂") == 0
		CALL PRINT_STRW, "「ちょ、っ……待っ……は、っ～～_UH_」"
		PRINTFORMW （うそ……なんで、お尻で……？）
	ENDIF
;-------------------------------------------------
;初めてB絶頂
;-------------------------------------------------
CASE "Ｂ絶頂"
	IF FIRST_EV("Ｂ絶頂") == 0
		CALL PRINT_STRW, "「っ_UH_く……っ……_UH_」"
		PRINTFORMW （なにこれ……胸、ピリピリする……っ）
	ENDIF
;-------------------------------------------------
;C挑逗
;-------------------------------------------------
CASE "Ｃ挑逗"
	;初めて
	IF FIRST_EV("Ｃ挑逗") == 0
		PRINTFORMW 「っ……！ ……ふん……手ぇ抜いてるんですか？」
		PRINTFORMW （\@ PENIS(TARGET) ? 阴茎 # 阴蒂 \@、わざと挑逗てくる……誰がそんな手に……）
	;２回目以降
	ELSE
		;強絶頂Ｃ挑逗
		IF NOWEX:Ｃ绝顶前骤停 >= 2
			CALL PRINT_STRW, "「～～っ_UH_ う、うぅ……っ！」"
			PRINTFORMW （やだ、もう……\@ PENIS(TARGET) ? 阴茎 # 阴蒂 \@がやたらくらいになってて、辛い……！）
		;絶頂Ｃ挑逗
		ELSEIF NOWEX:Ｃ绝顶前骤停
			CALL PRINT_STRW, "「っ、く……んっ……_UH_」"
			PRINTFORMW （また\@ PENIS(TARGET) ? 阴茎 # 阴蒂 \@挑逗てる……けど、まだ平気……）
		ENDIF
	ENDIF
;-------------------------------------------------
;V挑逗
;-------------------------------------------------
CASE "Ｖ挑逗"
	;初めて
	IF FIRST_EV("Ｖ挑逗") == 0
		PRINTFORMW 「っ……ん……どうしたんですか？ 責めが緩んでますけど……疲れました？」
		PRINTFORMW （……絶対、挑逗に来てる……）
	;２回目以降
	ELSE
		;強絶頂Ｖ挑逗
		IF NOWEX:Ｖ绝顶前骤停 >= 2
			PRINTFORMW （なにこれ、なにこれ……っ！ 腰がビクビクするの、抑えられない……！）
			CALL PRINT_STRW, "（くやしいっ……くやしいよぉ……_UH_）"
		;絶頂Ｖ挑逗
		ELSEIF NOWEX:Ｖ绝顶前骤停
			PRINTFORMW （全然……本気でやってこない……気持ちいいとこ擦ってこない……）
		ENDIF
	ENDIF
;-------------------------------------------------
;A挑逗
;-------------------------------------------------
CASE "Ａ挑逗"
	;初めて
	IF FIRST_EV("Ａ挑逗") == 0
		PRINTFORMW 「ん……っ……どうしたんです？ お尻だからって、柄にもなく気を遣ってます？」
		PRINTFORMW 「お尻弄ってる時点で今更なんですから……っ……遠慮是らないですよ……」
	;２回目以降
	ELSE
		;強絶頂Ａ挑逗
		IF NOWEX:Ａ绝顶前骤停 >= 2
			PRINTFORMW （もう、最悪……最悪……っ……お尻でいいように弄ばれて……）
			CALL PRINT_STRW, "（好きなように、開発されちゃって……っ_UH_）"
		;絶頂Ａ挑逗
		ELSEIF NOWEX:Ａ绝顶前骤停
			PRINTFORMW （これ、もしかしなくても……お尻焦らされてる……）
			PRINTFORMW （最悪……お尻で良くなってるのバレてるんだ……）
		ENDIF
	ENDIF
;-------------------------------------------------
;B挑逗
;-------------------------------------------------
CASE "Ｂ挑逗"
	;初めて
	IF FIRST_EV("Ｂ挑逗") == 0
		PRINTFORMW 「っ……ちょっと、他人の胸で意地汚い真似するのやめてくださいよ」
	;２回目以降
	ELSE
		;強絶頂Ｂ挑逗
		IF NOWEX:Ｂ绝顶前骤停 >= 2
			CALL PRINT_STRW, @"「%TEXTR("ん、ぐ……く/ふ、ぅ……ん")%……っ_UH_」"
			PRINTFORMW （あぁぁ、このド畜生……！ 乳頭がヒリヒリしてんだっつの……！）
		;絶頂Ｂ挑逗
		ELSEIF NOWEX:Ｂ绝顶前骤停
			PRINTFORMW 「っ、く……また女児の胸を玩具扱いして……」
		ENDIF
	ENDIF
;-------------------------------------------------
;扶她射精挑逗
;-------------------------------------------------
CASE "射精挑逗"
	;初めて
	IF FIRST_EV("射精挑逗") == 0
		PRINTFORMW 「っ……！ な、なにやってんですか……」
		PRINTFORMW （あともうちょっとで出るのに……このド畜生……）
	;２回目以降
	ELSE
		;大量射精挑逗
		IF NOWEX:射精前骤停 >= 2
			PRINTFORMW （あぁぁぁっ、もうムリ！ 我慢できないっ……！）
			PRINTFORMW （早く……っ……はやく出させてよぉ……！）
		;射精挑逗
		ELSEIF NOWEX:射精前骤停
			PRINTFORMW （っ……また止められた……！ ムカつく……！）
			PRINTFORMW （%CNAME("一人称")%の阴茎なんだから、%CNAME("一人称")%の好きにさせてよ……！）
		ENDIF
	ENDIF
;-------------------------------------------------
;処女喪失(処女のみ)
;-------------------------------------------------
CASE "処女喪失"
	IF FIRST_EV("処女喪失") == 0
		;恋慕
		IF TALENT:恋慕
			;主人の性交による処女喪失
			IF PLAYER == MASTER && INSERT("Ｖ挿入")
				PRINTFORMW 「……っ……ん……」
				PRINTFORMW 「別に、なんともないから……気にしないでください」
				PRINTFORMW 「ちょっと……痛かっただけですよ」
			ELSE
				PRINTFORMW 「っ……あーあ、相変わらず情緒のないひと……」
				PRINTFORMW 「別に？ なんでもないですから、気にしないで続けてください」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW （……あーあ。初めてはこの人か……）
			PRINTFORMW （別にいいけど……こだわりとかないし……）
		ENDIF
	ENDIF
;-------------------------------------------------
;射精した(扶她/男性のみ)
;-------------------------------------------------
CASE "射精した"
	;初めて
	IF FIRST_EV("射精した") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「～～っ_UH_ く……ふぅ、ふぅ……ん……」"
			PRINTFORMW 「……よくもやってくれましたね、%CNAME("二人称")%？」
			PRINTFORMW 「こんな小小的女の子が射精するところを見るなんて……」
		;それ以外
		ELSE
			PRINTFORMW 「う、あ……っ……！ く……はぁ、はぁ……」
			PRINTFORMW （嘘でしょ……こんな奴に、射精するところなんか見られた……）
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「%TEXTR("う/く")%ぅ……っ……_UH_ ん、ふーっ……ふー……」"
			PRINTFORMW 「また射精させられたぁ……この性悪\@ TALENT:PLAYER:男性 ? 男 # 女 \@……」
		;それ以外
		ELSE
			PRINTFORMW 「～～っ……く……ふぅ……ふぅ……」
			PRINTFORMW （もう%TEXTR("やだ……こんな言うこときかない阴茎……/、めんどくさいなぁ……なんでこんなの生えて……")%）
		ENDIF
	ENDIF
;-------------------------------------------------
;噴乳した(母乳体質のみ)
;-------------------------------------------------
CASE "噴乳した"
	;初めて
	IF FIRST_EV("噴乳した") == 0
		PRINTFORMW 「～～～～っ……！？」
		PRINTFORMW （え……な、なにこれ……？ 母乳ってこんなに噴き出すものなの……？）
	;二回目以降
	ELSE
		PRINTFORMW 「%TEXTR("や、ちょっと……また母乳が/わ、ちょ、待って……また噴き出してきた")%……！」
	ENDIF
;-------------------------------------------------
;絶頂放尿した
;-------------------------------------------------
CASE "絶頂放尿"
	;初めて
	IF FIRST_EV("絶頂放尿") == 0
		;抵抗无
		IF CHECK_COM("強制放尿") == 0
			PRINTFORMW 「っ……ふ、はは、あはは！ 漏らしちゃった……ほんとに、兒童みたいに……ははは……！」
			CALL PRINT_STRW, @"「別に、いいですよね……いまさら……%CNAME("主人")%の前で取り繕うこともないし……ふふ……_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 （あれ……？ %CNAME("一人称")%の\@ PENIS(TARGET) ? 阴茎 # 阴蒂 \@、どうなってる……？）
			PRINTFORMW （よくわかんない……ずっとジンジンしっぱ无で、感覚が……）
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「あぁぁ、もぉ……_UH_ \@ PENIS(TARGET) ? 阴茎 # 阴蒂 \@だめですよぉ%CNAME("主人", "かな", "甘え")%……_UH_」"
			CALL PRINT_STRW, @"「これいじょうやって、こわしたいんですかぁ……？ %CNAME("主人", "かな",)%のばかぁ_UH_」"
		;それ以外
		ELSE
			PRINTFORMW 「っ、う……ぁ……もう、よくないです、か……？ \@ PENIS(TARGET) ? 阴茎 # 阴蒂 \@の、ほうは……」
			PRINTFORMW 「もう……こう桑で、いいですから……やめてほしいんですけど……」
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｖ絶頂20以上
;-------------------------------------------------
CASE "Ｖ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｖ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「はっ_UH_ はっ_UH_ んっ……はぁっ_UH_ この、鬼畜……_UH_」"
			CALL PRINT_STRW, @"「こんな、ni↘_UH_ %CNAME("一人称")%の、股っ_UH_ めちゃくちゃにして……っ_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「んっ……_UH_ く、ふ……_UH_ はぁ、はぁ……」"
			PRINTFORMW （うそでしょ……%CNAME("一人称")%の性器、ここまで絶頂するの……？）
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「やだ、もう……_UH_ %CNAME("一人称")%の股、閉じなくなる……っ_UH_」"
			CALL PRINT_STRW, @"「責任、取ってくれるんですか……？  %CNAME("二人称")%……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「はっ、はっ……_UH_ ちょっと、待って……兒童の穴で、無理しすぎ……！」"
		ENDIF
	ENDIF
;-------------------------------------------------
;Ａ絶頂20以上
;-------------------------------------------------
CASE "Ａ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ａ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あ……はぁ……_UH_ とんでもないこと、してくれましたね……？」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%のお尻、普通じゃなくなっちゃったじゃないですかぁ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「っ_UH_ うぅ……こ、の……！」"
			PRINTFORMW （お尻でここまでイかされるなんて……冗談でしょ……？）
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「はぁ……はぁ……_UH_ ほんと、信じられないひと……_UH_」"
			CALL PRINT_STRW, "「こんな……寒酸的兒童のお尻に、夢中になって……変態……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「っ……_UH_ はぁ、はぁ……」"
			PRINTFORMW （なんで……？ こんなにお尻でイかされるなんて、有えないのに……）
		ENDIF
	ENDIF
;-------------------------------------------------
;Ｂ絶頂20以上
;-------------------------------------------------
CASE "Ｂ絶頂20回以上"
	;初めて
	IF FIRST_EV("Ｂ絶頂20回以上") == 0
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「んんっ……_UH_ この、萝莉コン……変態……_UH_」"
			CALL PRINT_STRW, @"「%CNAME("一人称")%に胸罩、つけさせなくするつもりですか……あっ……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「ん……っ……_UH_ もう、ダメですっ。触んないでくださいっ」"
			PRINTFORMW 「ガキの胸ですよ……何をそんなに入れ込むことがあるんですか……」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, "「あ、あっ……_UH_ なんでそう、何度も胸ばっかり……_UH_」"
			CALL PRINT_STRW, "「胸部がすきなら、身近にもっと良いのが主上ゃないですか……馬鹿……_UH_」"
		;それ以外
		ELSE
			CALL PRINT_STRW, "「っ_UH_ だか……らぁっ。やめてくださいよ、ほんとっ」"
			CALL PRINT_STRW, "「困るんですよ、こんなに……んっ_UH_ 胸ばっかり弄られてたら……」"
		ENDIF
	ENDIF
ENDSELECT

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

SELECTCASE ARGS
;-------------------------------------------------
;苦痛刻印Lv3取得
;-------------------------------------------------
CASE "苦痛刻印Lv3取得"
	IF FIRST_EV("苦痛刻印Lv3取得") == 0
		PRINTFORMW （……くやしい……）
		PRINTFORMW （%CNAME("二人称")%が手を上げるのを見ると、心の底でゾクゾクしてる%CNAME("一人称")%がいる……）
		PRINTFORMW （%CNAME("一人称")%……痛いので、おかしくなっちゃったんだ……）
	ENDIF
;-------------------------------------------------
;快楽刻印Lv3取得
;-------------------------------------------------
CASE "快楽刻印Lv3取得"
	IF FIRST_EV("快楽刻印Lv3取得") == 0
		PRINTFORMW （……このひと、ただの萝莉コンじゃなくて本当に擅長いひとだよね……いまさらだけど……）
		CALL PRINT_STRW, "（ふふ……_UH_ 悪くないよね……気持ちよくしてくれるぶんには……_UH_）"
	ENDIF
;-------------------------------------------------
;屈服刻印Lv3取得
;-------------------------------------------------
CASE "屈服刻印Lv3取得"
	IF FIRST_EV("屈服刻印Lv3取得") == 0
		PRINTFORMW （……もう、いいかな。無理に意地を張らなくても）
		PRINTFORMW （カラダの方ははもうとっくに受け入れてる。あとは、%CNAME("一人称")%が認めるだけ……）
	ENDIF
ENDSELECT

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

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

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

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

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

;-------------------------------------------------
;髪、顔、股間、腹、尻、くぱぁ、Ａくぱぁへのぶっかけ
;-------------------------------------------------
IF SHOOT("ぶっかけ")
	IF SHOOT("自慰")
		PRINTFORMW
	;鼻钩時専用です。人を選びすぎるので基本的には書かなくて良いと思われます
	ELSEIF SHOOT("鼻の穴")
		;初めて
		IF FIRST_EV("絶頂：ぶっかけ鼻の穴") == 0
			PRINTFORMW
		;鼻の穴に出され慣れて平気变成了
		ELSEIF CHECK("鼻射")
			PRINTFORMW
		;鼻钩自体は受け入れているが苦痛
		ELSEIF CHECK("鼻钩")
			PRINTFORMW
		;全面的につらい
		ELSE
			PRINTFORMW
		ENDIF
	;超大量射精
	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_K48, ARGS
SELECTCASE ARGS
CASE "绝顶忍耐"
	;partnerに焦らされている
	IF TEQUIP:推倒
		PRINTFORMW 「ふふ……意外に可爱顔するんだ……くふふ」
	;PLAYERが绝顶忍耐
	ELSE
		;今回がこらえた初回
		IF EX:PLAYER:绝顶忍耐 == 0
			PRINTFORMW 「……あ、%CNAME("二人称")%。いま我慢したでしょ」
			PRINTFORMW 「くふ……出ちゃってるんだぁ、顔に」
		ELSE
			PRINTFORMW 「ふぅん……まだまだ元気そうですね……？ くふふ」
		ENDIF
	ENDIF
CASE "恍惚"
	PRINTFORMW 「うっわ、だらしない顔……それでも前輩ですか……？ くふふ……」
CASE "推倒"
	PRINTFORMW 「くふふ……いいんですか？ こんな小小的後輩に被逆推ちゃって……」
CASE "強制終了"
	IF COND("疲労")
		PRINTFORMW 「はぁ……はぁ……あれ……もうギブアップですか……？ なさけないですね……っ……」
	ELSE
		PRINTFORMW 「あれ……もう終わりにするんですか？ らしくない……」
	ENDIF
CASE "復活"
	PRINTFORMW 「くふ……節目ですね……もう一回ダウンさせてあげましょうか……？」
CASE "恍惚から復帰"
	PRINTFORMW 「あ、やっと起きた……」
CASE "助手が限界"
	PRINTFORMW 「あら……%CNAME("一人称")%より先に……」
ENDSELECT

RETURN 1

;-------------------------------------------------
;イベント口上集
;ARGSの各CASEでの分岐において、ARGSの文字列後半に ：地の文前 を追加する事で地の文前に喋らせることもできる。
;また、そこでTFLAG:地の文スキップ = 1 とすると、本来出て来る地の文を飛ばすこともできる
;CASE "中出し後害羞"の地の文の前に喋らせたりスキップさせたい場合にはCASE "中出し後害羞：地の文前"を用意すればよい
;例）CASE "中出し後害羞：地の文前"
;		PRINTW 試しにスキップ
;		TFLAG:地の文スキップ = 1
;-------------------------------------------------
@KOJO_EVENT_K48, 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 "中出し後挿入解除"
	PRINTFORMW
;-------------------------------------------------
;ビデオ保存
;-------------------------------------------------
CASE "ビデオ保存"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;ビデオ売却
;-------------------------------------------------
CASE "ビデオ売却"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;ビデオ売却失敗
;-------------------------------------------------
CASE "ビデオ売却失敗"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF

;----------------------------------------------------------------
;塞子をしていない状態での液体浣腸口上。BASE:排泄物 が溜まっている物の量
;----------------------------------------------------------------
CASE "无塞浣腸事件"
	;限界値突破時
	IF BASE:排泄欲 >= 10000
		;限界値を超えたが漏らせない場合
		IF INSERT("Ａ挿入") || COND("肛門栓")
			PRINTFORMW
		;漏らす直前
		ELSE
			PRINTFORMW
		ENDIF
	;漏らした
	ELSEIF NOWEX:排泄
		;脱糞した場合。NOWEX:排泄量の値が出たものの量である
		IF NOWEX:排泄量
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;我慢しているときの口上
	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_K48, ARGS
SELECTCASE ARGS
CASE "調教相手に選ばれた"

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

	ELSE

	ENDIF

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

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

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

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

CASE "助手：撮影開始"

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

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

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

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

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

CASE "助手で性処理"

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

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

ENDSELECT

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

SELECTCASE ARGS
;CASE "勧誘"のみ、角色としてはまだ存在していないのに注意
CASE "勧誘"
	;例）卯月佑香の場合の記述
	;SIF TALENT:MASTER:男性 && TRUE_SEX(MASTER) == "男性" && TALENT:MASTER:伪娘 == 0 && ABL:MASTER:技巧 >= 3
	;	RETURN 1
	;STR:実行条件 = ※%CSVNAME(48)%は_黄色_%CALLNAME:MASTER%が男性(not伪娘)＆技巧がLv3以上の時のみ_勧誘できます※
CASE "恋慕"
	;デフォだと信頼5LV＆好感度が2500以上で恋慕
	;SIF TALENT:ACTOR:恋慕 == 0 && ABL:ACTOR:信頼 >= 5 && CFLAG:ACTOR:好感度 >= 2500
	;	RETURN 1
	;STR:実行条件 = 要:信頼5LV、好感度2500
CASE "淫乱"
	;デフォだと欲望が5以上、自慰中毒or精液中毒のどれかが3以上、今回の絶頂数が10以上で淫乱
	;SIF TALENT:ACTOR:淫乱 == 0 && ABL:ACTOR:欲望 >= 5 && MAX(ABL:ACTOR:自慰中毒, ABL:ACTOR:精液中毒) >= 3 && EX:ACTOR:絶頂数合計 >= 10
	;	RETURN 1
	;STR:実行条件 = 要:欲望5LV、自慰中毒か精液中毒のどちらかが3LV、今回の絶頂数10
CASE "相思相愛"
	;例）小早川百合香の場合の記述
	;SIF TALENT:ACTOR:恋慕 && TALENT:MASTER:男性 == 0
	;	RETURN 1
	;STR:実行条件 = イエロー_（※%CALLNAME:MASTER%が[男性]の場合には、%CALLNAME:ACTOR%と[相思相愛]にはなれません）
CASE "淫紋贴纸"
	;デフォだと[欲望LV3]or[屈服刻印LV1]
	;SIF MARK:ACTOR:淫紋 == 0 && (ABL:ACTOR:欲望 >= 3 || MARK:ACTOR:屈服刻印)
	;	RETURN 1
	;STR:実行条件 = イエロー_(※淫紋を受け入れてもらうには、[欲望LV3]or[屈服刻印LV1]の必要が有ます)
CASE "淫紋"
	;デフォだと[淫乱]or[受虐属性LV3]or[屈服刻印LV3]
	;SIF TALENT:ACTOR:淫乱 || ABL:ACTOR:受虐属性 >= 3 || MARK:ACTOR:屈服刻印 >= 3
	;	RETURN 1
	;STR:実行条件 = イエロー_(※刻印を受け入れてもらうには、[淫乱]or[屈服刻印LV3]or[受虐属性LV3]の必要が有ます)
CASE "避妊の護符の解除"
	;例）風花維吹の場合の記述
	;維吹は[相思相愛]まで避妊の護符を解除しない
	;SIF TALENT:ACTOR:相思相愛
	;	RETURN 1
	;STR:実行条件 = イエロー_※維吹は[相思相愛]になるまで避妊の護符を破棄しません
ENDSELECT

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

@MENU_SINGLE_ENDING_K48
;エンディングを書いたら、下の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 (BASE:魂 >= 100)
	STR:エンディング += "3_欲しいものは/"
SIF CEVENT("調教開始：相思相愛")
	STR:エンディング += "4_我たちの値段/"
SIF CEVENT("昔話")
	STR:エンディング += "5_最も奇跡を憎んだ男/"
SIF (MAXBASE:体力 >= 2500)
	STR:エンディング += "6_無自覚な成長/"
SIF (CEVENT("欲しいものは") && CEVENT("無自覚な成長"))
	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_K48, ARGS
SELECTCASE ARGS
CASE "イベント閲覧条件"
	PRINTL
	PRINTFORML [親の居ぬ間に]　屈服刻印LV1を取得
	PRINTL
	PRINTFORML [欲しいものは]　望木莉の收集的魂が1.00以上
	PRINTL
	PRINTFORML [我たちの値段]　相思相愛素質を取得し、特定の調教開始時の会話を見る
	PRINTL
	PRINTFORML [最も奇跡を憎んだ男]　“我たちの値段”イベントにて、特定の分岐を選択する
	PRINTFORML ※勧誘時に処女素質を取得せず、Configで你以外とＨする事を誰相手でも許す設定にすることが必要
	PRINTL
	PRINTFORML [無自覚な成長]　望木莉の体力を増やす
	PRINTL
	PRINTFORML [正当な努力]　“欲しいものは”“無自覚な成長”イベントを閲覧する
	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 K48_LONG_01
		CASE 1
			CALL K48_LONG_02
		CASE 2
			CALL K48_LONG_03
		CASE 3
			CALL K48_LONG_04
		CASE 4
			CALL K48_LONG_05
		CASE 5
			CALL K48_LONG_06
		CASE 6
			CALL K48_LONG_07
		ENDSELECT
	[ENDIF]
CASE "親の居ぬ間に"
	CALL K48_LONG_01
CASE "欲しいものは"
	CALL K48_LONG_02
CASE "我たちの値段"
	CALL K48_LONG_03
CASE "最も奇跡を憎んだ男"
	CALL K48_LONG_04
CASE "無自覚な成長"
	CALL K48_LONG_05
CASE "正当な努力"
	CALL K48_LONG_06
CASE "In a dream：パチパチ弾ける子守唄"
	CALL K48_LONG_07

ENDSELECT
RETURN 1

path: ERB/EVENT_K/48 莉/EVENT_K48_莉.ERB