code:
;-------------------------------------------------
;口上テンプレート
;生実千裕口上_2022_02_15（角色クターの名前を入れる、下にコンセプトなど一言あれば入れる）
;製作者
;-------------------------------------------------
;-------------------------------------------------
;角色追加の手順（必読！）
;１：EVENT_K60_名前.ERBとEVENT_K60_SHOP.ERBとEVENT_K60_DAILY.ERBとCHARA60.csvのファイル名と内部の60を角色番号に変更し、名前部分を角色名にする

;２：変更後のERBファイルをEVENT_Kフォルダに、CHARA60.csvをCSVフォルダに入れる

;３：他の角色を参考にCHARA60.csv内部の初期設定を記述する
;番号,名前,呼び名,基礎は必ず全部埋めましょう。CSTRも可能な限り埋めた方が良いです
;CSTR,胖次～飾品は初期衣装なので書かないと初期が全裸です

;４：このファイル内にある、@EVENT_PROFILE_K60を記述する
;CASE "勧誘直後"は別に無くても構いません
;CASE "勧誘前"と"紹介文"は有った方が良いです

;５：CALL_NAME.ERB内の
;CASE 60
;	STR:基本呼び名 = %CNAME_K60(ARGS)%
;の２行先頭の ; を削除する。

;６：以上で角色追加の準備が整います
;本編の日替わり領帯ミングでこんな人が居ますよ～って紹介するイベントが有些ますが、それを見ないでもメイン画面[301]で勧誘できます

;７：あとはERBファイルに書けば書くだけ喋るようになります

;-------------------------------------------------
;呼び名の設定。"_"の右にふりがなを書く。
;-------------------------------------------------
@CNAME_K60, ARGS
#FUNCTIONS
;名前を呼ぶ相手の角色番号の代入に使う
#DIM ACTOR

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	LOCALS = 我_我
CASE "二人称"
	;相手が主人
	IF PLAYER == MASTER
		LOCALS = 君_你
	;相手が主人ではない
	ELSE
		LOCALS = 你_你
	ENDIF
;この下は三人称。
CASE "主人"
	IF MARK:屈服刻印 >= 3 || TALENT:恋慕 && CEVENT("恋慕：ささくれ") == 0
		LOCALS = 您_您
	ELSEIF FLAG:二人きり
		LOCALS = 飼い主桑_かいぬし桑
	ELSE
		LOCALS = 部長桑_部長桑
	ENDIF
CASEELSE
	;名前を呼ぶ相手の角色番号をACTORに代入する
	SELECTCASE ARGS
	;相手が助手
	CASE "助手"
		ACTOR = ASSI
	;ここにはARGSに角色のCALLNAMEが入ったりしている場合(ARGS == "弗理希艾尔" など)に来る
	CASEELSE
		ACTOR = FIND_NO(ARGS)
	ENDSELECT

	;相手が教員
	IF COND("教員", ACTOR)
		LOCALS = %CALLNAME:ACTOR%老师_%CSTR:ACTOR:ふりがな%老师

	;自分も相手も学生なら学年比較
	ELSEIF COND("学生") && COND("学生", ACTOR)
		;相手が同学年
		IF COND("学年") == COND("学年", ACTOR)
			LOCALS = %CALLNAME:ACTOR%_%CSTR:ACTOR:ふりがな%
		;相手が下の学年
		ELSEIF COND("学年") > COND("学年", ACTOR)
			IF TALENT:ACTOR:男性
				LOCALS = %CALLNAME:ACTOR%_%CSTR:ACTOR:ふりがな%
			ELSE
				LOCALS = %CALLNAME:ACTOR%酱_%CSTR:ACTOR:ふりがな%酱
			ENDIF
		;相手が上級生
		ELSE
			LOCALS = %CALLNAME:ACTOR%前輩_%CSTR:ACTOR:ふりがな%前輩
		ENDIF

	;それ以外
	ELSE
		LOCALS = %CALLNAME:ACTOR%桑_%CSTR:ACTOR:ふりがな%桑
	ENDIF
ENDSELECT
RETURNF LOCALS

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

SELECTCASE ARGS
CASE "紹介文"
		;注意！ここに限り、STR:1～STR:15を用いて記述します。他の角色の同じ場所を参考にして下さい
		STR:1 = 总是戏称自己吃过人的食人族
		STR:3 = 自称为"懂得克制自己的生物"
		IF CFLAG:食欲 >= 150
			STR:5 = 現在空腹度　_赤_【極高】_
		ELSEIF CFLAG:食欲 >= 100
			STR:5 = 現在空腹度　_赤_【高】_
		ELSEIF CFLAG:食欲 >= 50
			STR:5 = 現在空腹度　_黄色_【中】_
		ELSEIF CFLAG:食欲 >= 10
			STR:5 = 現在空腹度【低】
		ELSE
			STR:5 = 現在空腹度【満腹】
		ENDIF
;ここの中に限り、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% -
	PRINTL
	PRINTFORMW 「嘘だろう――そりゃあ反則だ」
	PRINTFORMW 「%CNAME("二人称")%さー半分以上食べたんだよ。もうお腹いっぱいなの。なんで生きてんの」
	PRINTL
	PRINTL
	PRINTFORMW 「話が飲み込めてないって顔だ～ええ、自供しますよ、是是、我生実千裕(いくみ ちひろ)が犯人でーす」
	PRINTFORMW 「老师から頼まれたおも～い荷物背負って、優等生角色振る舞って、%CNAME("二人称")%に手伝ってもらったわけですよ」
	PRINTFORMW 「わあ～有がとうございます～%CNAME("二人称")%は温柔んですね～スゴイナ～カッコイイナ～ってネ」
	PRINTFORMW 「それでね、我これでも主食が人类なのサ。そうそう、人类、ひゅーまーん」
	PRINTFORMW 「これが最近食べて無くって、%CNAME("二人称")%があまりにも美味しそうだったからネ」
	PRINTFORMW 「この空き教室にゴホウビって触れ込みでシッポリと、ぺろりとネ、頂いちゃったって流れサ。思い出したかナ？」
	PRINTL
	PRINTFORMW 「でもここからが聞くも涙語るも涙の今しがたなのよサ」
	PRINTFORMW 「ちょーっと食べ残しちゃって、後始末と保存のために目を離したらもうすっかり五体満足だなんてサー」
	PRINTFORMW 「不死者の類なら早くそう言って欲しかったよ。まったく人畜無害そうな顔をして、ひどい罠だ」
	PRINTFORMW 「食べられたら坦率にお腹の中に収まっておくれよ。えぇ？そうだろう？」
	PRINTL
	PRINTFORMW 「はぁ――ちっちっちっちっ――どう、始末をつけたものかなー」
	PRINTL
	PRINTFORMW 「あー、にひひっ、そうだそうだ。イイコト考えた♪」
	PRINTFORMW 「%CNAME("二人称")%、手伝って貰ってる途中で聞いたけど部活の部長をしているんだったよね」
	PRINTFORMW 「にひっ――%CNAME("一人称")%もその部活の仲間にい～れ～て♪」
	PRINTL
	PRINTFORMW 「わお芳しくない反応。ああ、他の子が心配だったりする？ 安心して、手を出したりはしないからネ」
	PRINTFORMW 「%CNAME("一人称")%は%CNAME("二人称")%を食べられればそれで良いんだもの」
	CALL PRINT_STRW, @"「正直勿体ないナとは思っていたんだ。%CNAME("二人称")%、とても美味しかったから_BH_」"
	PRINTL
	PRINTFORMW 「それに%CNAME("二人称")%も不安だろ？ %CNAME("一人称")%みたいなのが居るのは」
	PRINTFORMW 「取引だ。%CNAME("二人称")%が%CNAME("一人称")%を部活に入れてくれれば、%CNAME("一人称")%は%CNAME("二人称")%を食べさせてくれる間は……誰も食べない」
	PRINTFORMW 「%CNAME("二人称")%は%CNAME("一人称")%を監視するんだ。その部活っていうのはもってこいだろう」
	PRINTL
	PRINTFORMW 「おや、黙っちゃって。はぁ――わからないヤツだねー、%CNAME("二人称")%は」
	PRINTL
	PRINTFORMW 「%CNAME("一人称")%を飼ってみる気はない？」
	PRINTL
	CALL PRINT_STRW, "「なーんでもシてイイよってことだよ。エサをくれるならネ――ワンワン_BH_」"
	PRINTL
	PRINTFORMW 「さ――どーするのかナァ♪」
	PRINTL

;これは別になくても構いません
CASE "勧誘直後"
	;PRINTFORML - %NAME:TARGET% -
	PRINTL
	PRINTFORMW 「にひっ、じゃあ決まりだ。よろしく頼むよ、%CNAME("主人")%♪」
	PRINTL
	PRINTFORMW 「ん？ 素っ頓狂な顔だね――ああそうだったそうだった。後始末の途中だったんだっけ」
	PRINTFORMW 「とっ散らかった血の海じゃそりゃあそんな顔にもなるもんだね」
	PRINTL
	PRINTFORMW 「にひひっ――まあまあ、そんな顔しな桑な。これからながーい付き合いになるんだぜ」
	PRINTFORMW 「こちらとら人を喰うだけで、サクッと殺したらぱたりと死んじゃうんだ。%CNAME("二人称")%に比べれば途方もなく慎ましい生き物サ」
	CALL PRINT_STRW, @"「これくらいは軽ゥく飼い慣らしてみせてね、%CNAME("主人")%_BH_」"
	PRINTL
	CALL SET_CEVENT, "今日の吃飯"
;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	;PRINTFORMW %NAME:TARGET%%CALLNAME:MASTER%的"%CSTR:関係%"、会在中午出现在社团活动室。

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

	ELSE

	ENDIF
;同居後の自分的房間の解説です。これも別に無くて構いません
CASE "自室描写"
	PRINTFORMW 大した小物も無い質素な部屋だが、壁にはこの周辺が記された大号的地図が貼られている…
ENDSELECT

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

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

SIF CEVENT("恋慕：ささくれ") && CSTR:嘴形 == "微笑"
	CSTR:嘴形 = 無口系２

IF COND("夜")
	IF CFLAG:食欲 >= 100 && RAND:5 == 0 && (MARK:屈服刻印 <= 2 || TALENT:恋慕 == 0)
		PRINTFORMW
		PRINTFORMW 「%TEXTR("あー、満腹満腹。さ、お片付けしないと/けぷっ――ふぅ、これ朝までに始末終わるかナー")%」
		PRINTFORMW
		PRINTFORMW %CALLNAME:TARGET%は満腹成为了。
		CFLAG:食欲 = 0
		CALL SET_CEVENT, "今日の吃飯"
	ENDIF

	SIF CEVENT("今日の吃飯") == 0
		CFLAG:食欲 += RAND:6 + 10
	CALL DEL_CEVENT, "今日の吃飯"
	CALL DEL_DEVENT, "今日の新聞"
	CALL DEL_CEVENT, "归途イベント禁止"
	CALL DEL_DEVENT, "幽体姉：本日訪問"
ENDIF
CFLAG:部室行動 = 0
CFLAG:夜行動 = 0
CALL DEL_CEVENT, "今回はもう食べない"

;-------------------------------------------------
;Ｈに入る前のセリフ
;TFLAG:指令中止 = 1 とすることで口上側からＨの開始自体を中止できる
;この時間帯にＨを断った回数自体は CFLAG:Ｈ断った で参照可能
;特に書かなくても問題有ません
;-------------------------------------------------
@PRE_EVENTTRAIN_K60

;IF COND("夜")
;	IF TALENT:恋慕 && CEVENT("恋慕：ささくれ") == 0 && FIND_COND("現在存在") && RAND:3 == 0
;		TFLAG:指令中止 = 1
;		CFLAG:不在 = 1
;		CALL SETFLAG, "対象指定", FIND_COND("現在存在")
;	ENDIF
;ENDIF

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

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
	PRINTFORMW 「え、なに、そういう部活？ そういう打算も込みで入部OKしたってオチ？」
	PRINTFORMW 「ひぃえ～、それは想定してなかったナー」
	PRINTFORMW 「ちっちっちっ――ま、いっか！」
	CALL PRINT_STRW, "「せいぜい、シツケて御覧なさいな。ワンワンってね_BH_」"
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;初めてのご褒美Ｈ
ELSEIF EQUIP:Ｈ的奖励 && CEVENT("調教開始：ご褒美Ｈ") == 0
	PRINTFORMW
	CALL SET_CEVENT, "調教開始：ご褒美Ｈ"
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
	PRINTFORMW 「%CNAME("二人称")%のクラスのコに手を出してないかって？」
	PRINTFORMW 「他所での粗相の確認かー、飼い主精神が身に付いて来たネ――にひっ、冗談だよ♪」
	PRINTL
	PRINTFORMW 「%CNAME("二人称")%の周辺には手を出さない、約束だからね」
	PRINTFORMW 「そう疑いな桑なよ、結構気を使っているんだぜ？ %CNAME("主人")%に迷惑掛けないようni↘てね」
	PRINTL
	PRINTFORMW 「――あ、でも一年のコは食べたっけ。 ま、%CNAME("二人称")%には関係無いしノーカンノーカン♪」
	PRINTFORMW 「そーんなどうでも良いコトより、躾の時間でしょう？」
	PRINTL
	CALL PRINT_STRW, "「ちゃーんとお世話してくれなきゃ、野に還っちゃうゾ_BH_ ワンワン_BH_」"
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
	PRINTFORMW 「ちっちっちっちっちっちっ――なんだい、躾の時間かな？」
	PRINTL
	PRINTFORMW 「思っていたより%CNAME("主人")%が、良い飼い主桑でねー。あ、褒めてるんだよ？」
	PRINTFORMW 「少しばかり、自分自身を見詰め直していたトコ。%CNAME("一人称")%は反省出来るペットなのサ♪」
	PRINTL
	PRINTFORMW 「――いや、本当に、良い飼い主なのも困りものだ」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
	PRINTFORMW 「あーあ、もうしっかり躾られちゃって。ワンコも板に付いてきたと思わない？」
	PRINTFORMW 「この辺でいっそ芸でも仕込んでみる？ お手！とか、お座り！とかチンチン！いや、マンマンとか！」
	PRINTL
	PRINTFORMW 「――%CNAME("二人称")%になら良いんだよ。芸を仕込まれるくらいなら幾らでも」
	PRINTFORMW 「%CNAME("一人称")%は%CNAME("二人称")%に感謝しているんだ。どうしてかは、言えないのだけれど」
	PRINTFORMW 「冗談だと思う？ くすっ、そうだよね、%CNAME("一人称")%は冗談ばっかりだから」
	PRINTL
	PRINTFORMW 「でも、この感謝だけは本物なんだよ――有がとう」
	PRINTFORMW 「飼い主桑――いいや、%CNAME("主人")%。これからも酱と、%CNAME("一人称")%を飼い慣らしてね？」
	PRINTL
	PRINTFORMW 「――なーんて、しんみり真面目ぶっちゃう%CALLNAME:TARGET%酱なのでしたっと！」
	PRINTFORMW 「ほーら、躾でしょう？ きちっと躾けて、立派な忠犬にしちゃおう！目指せドーベルマン！」
	PRINTL
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 0
	;淫乱を先に獲得したかで分岐させたい場合(別にこの分岐は無くても良いと思います)
	IF CEVENT("先に淫乱獲得")
		PRINTFORMW 「%CNAME("二人称")%サ、実は物凄く性格悪いだろ」
		PRINTFORMW 「食欲と性欲天秤に掛けて、今じゃどっちにしようかなーなんて迷っちゃうんだ」
		PRINTFORMW 「%CNAME("一人称")%としては異常事態も甚だしいんだぜ？ それだっていうのにさー」
		PRINTFORMW 「はーあ、流石は%CNAME("一人称")%の主人様だネ、強欲で貪欲で、際限のないこと」
		PRINTFORMW 「ホント、%CNAME("二人称")%を見ていると自分が慎ましく思えちゃうな――」
		PRINTFORMW 「なーんてなぁ、なんでもないですヨーだバーカ！ アーホ！ 精力超群！ 不死身！ 美味しいお肉！」
		PRINTFORMW 「あとはぁー、えーっとぉおおおお――うん！」
		PRINTFORMW 「よーしボキャ胸罩リも尽きてきたトコロで、大姐姐エッチなことしちゃうゾォ！」
		PRINTFORMW 「勢いで押し通すな？ ほっとけ！！」
	ELSE
		PRINTFORMW 「始める前に、最近困ってることがあるんだけどサー、聞いてくれないかい？」
		PRINTFORMW 「ほんの些細なことなんだけどね、%CNAME("二人称")%も無関係じゃないんだぜこれが」
		PRINTFORMW 「%CNAME("二人称")%の視線が気になってしょうがないのサ」
		PRINTFORMW 「まったく、いくら%CNAME("一人称")%が絶世とは言わないまでも可愛いからってそうジロジロ見るもんじゃ無いだろう？」
		PRINTFORMW 「――あ？ %CNAME("一人称")%の方が、%CNAME("二人称")%を見てる？」
		PRINTFORMW 「そんな事は――ちっちっちっ――あ、あー、いや、待ってよ。ちょっと待て」
		PRINTFORMW 「うわぁ、本当だ、クソ、なんてこった。本当に%CNAME("一人称")%の方から%CNAME("二人称")%を見てる事の方が多いな」
		PRINTFORMW 「――はー、ああ、そうかい。ようやく分かった」
		PRINTFORMW 「%CNAME("一人称")%は、%CNAME("二人称")%が――嫌い、なんだな。そうだそうだ。そうに違いない」
		PRINTFORMW 「だってだって、%CNAME("二人称")%を見てるとこんなにも胸が――うん、ちくちくする。ささくれだってる。酷い気持ちだ」
		PRINTFORMW 「これはきっと心の底から%CNAME("二人称")%が嫌いに違いない」
		PRINTFORMW 「――にひひっ♪ 解ったら、すっきりした」
		PRINTFORMW 「スッキリしたところで、始めよう。%CNAME("一人称")%が嫌いなことと躾を受けないことには何の因果関係も無い」
		PRINTFORMW 「いいから、始めてくれヨ。そしてとっとと終わらせてくれ。お願いだから」
		TALENT:保守的 = 1
		TALENT:接受快感 = 0
		TALENT:否定快感 = 1
		CSTR:嘴形 = 無口系２
		CALL SET_CEVENT, "朝袭禁止"
		PRINTFORML
		PRINTFORML
		PRINTFORMW %CALLNAME:TARGET%は[接受快感]を失い、[否定快感]・[保守的]成为了。
		CALL SET_CEVENT, "恋慕：ささくれ"
	ENDIF
	CALL SET_CEVENT, "調教開始：恋慕"
ELSEIF CEVENT("恋慕：きっかけ") && CEVENT("恋慕：地固圆圈") == 0
	PRINTFORMW 床に腰掛けた%CALLNAME:TARGET%はぶらぶらと足をばたつかせながら天井を仰いだ。
	PRINTFORMW 「%CNAME("二人称")%さ、とんでもない倒錯者だよね」
	PRINTFORMW かと思えば、そんな失礼なことをどうでも良さげに宣う。
	PRINTFORMW 「だって、%CNAME("一人称")%は%CNAME("二人称")%が嫌いだって言ってるだろ？」
	PRINTFORMW そんなことを言われても、という他は%CALLNAME:MASTER%にはないだろう。
	PRINTFORMW 飼ってみないかと持ち掛けてきたのはそもそも彼女だ。そしてその関係は解消されていない。
	PRINTFORMW 「解消するのも自由だろうに。こっちは人食いの化け物だぜ。しかも愛想まで悪くなった」
	PRINTFORMW それを言うならその飼主である%CALLNAME:MASTER%は死んでも復活する化け物だ。
	PRINTFORMW 「へぇ、なるほど。確かに釣り合いは取れてるね、化け物同士さ」
	PRINTFORMW 「いいや、やっぱり%CNAME("一人称")%の方が幾らか慎ましいな」
	PRINTFORMW からからと笑う彼女は、はぁと深い溜め息を吐く。
	PRINTFORMW 「本当に、%CNAME("一人称")%は%CNAME("二人称")%が嫌いなのかな」
	PRINTFORMW それは彼女から言い始めたことだ。本当に嫌いなのかと言われても困ってしまう。
	PRINTFORMW 「约会がね、楽しかったんだよ」
	PRINTFORMW にひひと笑う彼女の顔は本当に楽しい思い出を振り返る表情のそれで、
	PRINTFORMW 「%CNAME("二人称")%に酷いことを言う度に、どんどん自分が嫌いになってい君だ」
	PRINTFORMW どんどんと、その色が濁っていく。
	PRINTFORMW 「%CNAME("二人称")%の顔を見る度に、じくじくと胸の奥が痛くなってい君だ」
	PRINTFORMW 笑った口の端が震えているのが解る。
	PRINTFORMW 「%CNAME("二人称")%の气味を嗅ぐだけで、%CNAME("二人称")%の隣に居るだけで」
	PRINTFORMW ついに伏せた瞳が、行き場を無くして。
	PRINTFORMW 「%CNAME("二人称")%が%CNAME("一人称")%を見てくれるだけで、こんなにも苦しいんだ」
	PRINTFORMW 彼女は、圆圈でただの少女のように膝を抱えてしまった。
	PRINTFORMW 「これは」
	PRINTFORMW その口から漏れる言葉、その全て、
	PRINTFORMW 「嫌いってことだろう」
	PRINTFORMW 圆圈でただのよくある恋煩いそのものだ。
	PRINTFORMW 「――は？」
	PRINTFORMW 真正面からそう伝えると、彼女は目を丸くした。
	PRINTFORMW 「いや、待ってくれよ。はははっ、なんだ、なんだい、それ」
	PRINTFORMW 酷い冗談を言われたように違う違うと彼女は頭を振る。
	PRINTFORMW 「それじゃあ圆圈で%CNAME("一人称")%が%CNAME("二人称")%を、す、すす、す――」
	PRINTFORMW 好きということになる。
	PRINTFORMW 「%CNAME("二人称")%が言うなよ！！そこはさー、そこは、言わせろよ！！」
	PRINTFORMW 「あぁー、ああ、クソ。こんな屈辱初めてだ！！」
	PRINTFORMW 「屈辱も何も、誰かをこんなに、食欲抜きに好き变成了ことなんて無いのに！」
	PRINTFORMW 「なんだこれ、こんなのが%CNAME("一人称")%の初めてかよ」
	PRINTFORMW 「あー！あー！ああー！！どうしてくれる、どうしてくれるんだ%CNAME("主人")%！」
	IF COND("処女")
		PRINTFORM 「乙女の純情台没有だぞ！
	ELSE
		PRINTFORM 「処女どうのこうの話の比じゃないぞ！
	ENDIF
	PRINTFORMW こんな初めてあんまりじゃないか！えぇ！？」
	PRINTFORMW 元々くしゃくしゃの髪の毛をかきむしって奇声を発しながらゴロゴロとのたうち回る%CALLNAME:TARGET%はひとしきり暴れると床に大の字になって寝転がった。
	PRINTFORMW 「はぁ――はぁ――あー、チクショウ、すっきりしたのが更に腹が立つ」
	PRINTFORMW 「そうですよ、そうです。そうなんですよ。可愛い可愛い%CALLNAME:TARGET%酱は実は%CNAME("主人")%が大好きなワンコなんですヨ！」
	PRINTFORMW 「好きっていうのが解かんなくてー？ 好きって言い辛くてー、じゃあ嫌いかーって思ったらその瞬間楽になって！！」
	PRINTFORMW 「嫌いだ嫌いだって言ってたらもっと苦しくなって、でも後に引けなくなって！！ くるくるピエロしてたのが%CNAME("一人称")%でございます～！」
	PRINTFORMW 「はははー今更戯けてもかっこわるー。やっ吐舌、どうしよう、なんだ今までの%CNAME("一人称")%超カッコ悪いな！！」
	PRINTFORMW そうしてようやく落ち着いたのか、天井を見つめて一つ小さく息を吐いた。
	PRINTFORMW 「%CNAME("一人称")%は%CNAME("二人称")%が好き」
	PRINTFORMW 「%CNAME("主人")%が好き」
	PRINTFORMW 「好き、好き、好き。大好き」
	PRINTFORMW うわ言のように呟いて、その度に口の端がどんどんつり上がっていく。
	PRINTFORMW 「にひひっ♪――あ、やべ、これ重症だ。なんか泣けてきた」
	PRINTFORMW 急に起き上がった彼女は、幾分スッキリした表情で%CALLNAME:MASTER%に視線を投げる。
	PRINTFORMW 「――%CNAME("主人")%は、サ。まだ、%CNAME("一人称")%を飼ってくれる？」
	PRINTFORMW その質問の答えは口で言うには野暮なのかも知れない。%CALLNAME:MASTER%は彼女の肩を抱到身边。
	PRINTFORMW 「に、ひひっ♪ これからサ、目一杯甘えてやるから」
	PRINTFORMW 「だから――んっ」
	PRINTFORMW 次の言葉を紡ぐ唇を塞いで、彼女の指に、自分の指を絡める。
	CALL DEL_CEVENT, "恋慕：ささくれ"
	PRINTFORMW 「――これからも、ヨロシクネ、%CNAME("主人")%」
	PRINTFORMW 体重を掛けると、ろくな抵抗もなく彼女の体は床シーツに横たわった…
	TALENT:保守的 = 0
	TALENT:難以越過的底線 = 0
	TALENT:否定快感 = 0
	TALENT:接受快感 = 1
	TALENT:献身 = 1
	CSTR:嘴形 = 微笑
	PRINTFORML
	PRINTFORML
	PRINTFORML %CALLNAME:TARGET%は[否定快感]・[保守的]・[難以越過的底線]を失いました。
	PRINTFORMW %CALLNAME:TARGET%は[接受快感]・[献身]成为了。
	CALL DEL_CEVENT, "朝袭禁止"
	CALL SET_CEVENT, "恋慕：地固圆圈"

	PRINTFORML
	CALL PRINT_STRW, @"%CALLNAME:MASTER%は%CALLNAME:TARGET%から_イエロー_[危険日生性交]_の合意を得た。"
	CALL SET_GOUI, "危険日生性交"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：相思相愛") == 0
	PRINTFORMW
	CALL SET_CEVENT, "調教開始：相思相愛"
;助手の有無を格子（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K60_KOJO2

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

RETURN 1

;-------------------------------------------------
;調教開始時（2回目以降）
;-------------------------------------------------
@K60_KOJO2
;恋慕
IF TALENT:恋慕
	IF CEVENT("恋慕：ささくれ")
		IF RAND:4 == 0
			PRINTFORMW 「こうやって触れてやれば好きになってくれるかもなんて考えてる？」
			PRINTFORMW 「お馬鹿桑。それで靡くのは官能小説くらいだよ。そんなにインスタントだと思われてるんだ」
			PRINTFORMW 「――ああ、本当に、お馬鹿桑。食べないでいてやるから終わったらあっちいけよ」
		ELSEIF RAND:3 == 0
			PRINTFORMW 「ああ、躾、か。%CNAME("一人称")%は嫌いだって言ってるのにするんだね」
			PRINTFORMW 「そんなに従順にさせたいの？ははっ――良いよ、やれよ。そうして自分が異常者だって証明し続けると良い」
		ELSEIF RAND:2
			PRINTFORMW 「嫌いだ。大嫌い。死なないのが腹立たしい。嫌いだって言っているだろう、寄るなよ」
			PRINTFORMW 「触ったら食べちゃうよ。親が見たって判別付かない位酷い食い散らかし方を―――」
			PRINTFORMW 「―――馬鹿だな。好きにしろよ」
		ELSE
			PRINTFORMW 「お腹？ 関係無いでしょ。いや、あるのか。%CNAME("主人")%なワケだし」
			PRINTFORMW 「こんなオ妈妈ゴトまだ続けるんだ。ふぅん、殊勝なコトだね。ばっかみたい」
		ENDIF
	ELSEIF CFLAG:食欲 >= 50
		IF RAND:3 == 0
			PRINTFORMW 「お腹？ ――空腹って良い香料なんだぜ？」
			PRINTFORMW 「だから、いっぱい%CNAME("一人称")%のお腹を空かせてよ」
		ELSEIF RAND:2
			PRINTFORMW 「そーんなにがっついてくれるな♪」
			CALL PRINT_STRW, "「据え膳は逃げないよ。モチロン、逃がす気も無いけどサ…_BH_」"
		ELSE
			PRINTFORMW 「うーん――いやね、お腹に今日の具合を聞いてた」
			PRINTFORMW 「いつでも美味しく頂く準備は出来てるってサ！ じゃ、美味しく頂かれる準備はOK？」
		ENDIF
	ELSEIF RAND:3 == 0
		PRINTFORMW 「自分に呆れちゃうよねー。そういうことって無いかな、%CNAME("主人")%は」
		PRINTFORMW 「――ま、いっか。考えて解決なんてしないことだしサ♪」
	ELSEIF RAND:2
		PRINTFORMW 「ホント罪作りなお人だことで、なんだか一周回って安心しちゃうよ」
		PRINTFORMW 「ふふ♪ なんのことかは自分の胸に手を当てて考えてみて？」
	ELSE
		PRINTFORMW 「ほーら服従のポーズ。わんわんわん♪」
		PRINTFORMW 「もっとわんこらしく鳴かせてくれるんだろ？ 期待してるぜ♪」
	ENDIF
ELSEIF PLACE("情人旅館")
		PRINTFORMW 「まーったく、こんなトコにシケこんでにゃんにゃん、いや、わんわんしようなんて、大した不良モンだ」
		PRINTFORMW 「――ま、雰囲気があるのは大いに認めるけどネ♪」
		PRINTFORMW 「さ、トクベツな躾を始めようか」
ELSEIF PLACE("做爱房")
		PRINTFORMW 「――良いのかな、こんなトコロでヤっちゃって。ナニをやってもバレなさそうじゃないか」
		PRINTFORMW 「にひっ――♪ 今更怖じ気付くのはナシだぜ？ 」
ELSEIF MARK:屈服刻印 >= 2
	IF CFLAG:食欲 >= 50 && RAND:2
		IF RAND:3 == 0
			PRINTFORMW 「ああ、良かった。躾を忘れられてるモノだと思ってた」
			PRINTFORMW 「モチロン、歓迎するサ――だから動くなよ」
			PRINTFORMW 「ハハッ、呆けた顔だ。被逆推とは思わなかったかい？」
			PRINTFORMW 「甜甜、駅前の有名菓子店のシュー阴蒂ームより甜。食べたこと無いケド、きっと甜だろうネ」
			PRINTFORMW 「お腹がサァ――空いてるんだよ。わかってくれるよね、%CNAME("主人")%」
		ELSEIF RAND:2
			PRINTFORMW 行為へ邀请声を掛けた瞬間、彼女は%CALLNAME:MASTER%を軽々と組み伏せた。
			PRINTFORMW 「腹、減ったナァ」
			PRINTFORMW 普段とは違う乱暴で雑な言葉でそれだけを零すと、%CALLNAME:MASTER%の首筋へとぺろりと舌を這わせる。
			CALL PRINT_STRW, @"「くふっ――良いニオイ_BH_ ﾊｧ――ああ、いや、まだ待て、待てだぞ、%CNAME("一人称")%――_BH_」"
			PRINTFORMW 獣じみた荒い呼吸を呑み込んだ彼女は、就这様行為を始めるのだった――
		ELSE
			PRINTFORMW 「バタバタ動かないで欲しいなァ、%CNAME("主人")%ヨ」
			PRINTFORMW 「駄目だぜ、%CNAME("二人称")%。空きっ腹にその文句はマズい」
			PRINTFORMW 「ここまでお預け喰らって、そんなにインスタントに扱われたら――」
			PRINTFORMW 「ちょっと、行儀が悪くなっちゃうのも仕方ないなって思っちゃうだろう？」
		ENDIF
		TEQUIP:推倒 = 1
	ELSE
		IF RAND:3 == 0
			PRINTFORMW 「ちっちっちっ――あー、いいや、考え事サ」
			PRINTFORMW 「気になるかしらん？ にひっ――そんなコトより、躾にしない？」
		ELSEIF RAND:2 == 0
			PRINTFORMW 「ん、するの？ じゃちょっと待ってネ、ん、んんっ」
			CALL PRINT_STRW, "「ｺﾎﾝ――わんわーん_BH_♪ よし、じゃ始めよっか」"
		ELSE
			CALL PRINT_STRW, "「ﾊｯﾊｯﾊｯﾊｯ_BH_――おっと振る尾巴が無ぇや」"
			PRINTFORMW 「%CNAME("主人")%、準備ヨロシク」
		ENDIF
	ENDIF
ELSE
	IF RAND:3 == 0
		PRINTFORMW 「お、躾する？ しちゃう？ んっふっふ、かも～ん♪」
	ELSEIF RAND:2
		PRINTFORMW 「関心しちゃうねー、うんうん」
		PRINTFORMW 「いやいや、躾を忘れない飼い主の鑑だと思っただけサ♪」
	ELSE
		PRINTFORMW 「そうそう、こうやって構ってる間はオイタもしないってネ」
		PRINTFORML 「解っているじゃないか♪」
	ENDIF
ENDIF
RETURN 1

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

DRAWLINE
;-------------------------------------------------
;※精力限界値を超えた場合の終了口上
;-------------------------------------------------
;調教強制終了時の口上
IF STATE("撃沈", MASTER)
	;恋慕
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW 「ざまぁない。こんな苦労までして、何がしたいの？」
				SIF RAND:3 == 0
					PRINTFORMW 「――まだ、起き上がっちゃ駄目だよ。後始末くらい、しとくから」
			ELSEIF RAND:2
				PRINTFORMW 「――馬鹿だな。こんなになるまでしたってなんにもならないのに」
				SIF RAND:3 == 0
					PRINTFORMW 「水があるから飲みなさい。少しはマシな顔になるだろう」
			ELSE
				PRINTFORMW 「おはよう――口を開かないで、その振動すらやかましいんだ」
				PRINTFORMW 「起きたのならさっさとどいてくれ。膝が痛い」
			ENDIF
		ELSE
			PRINTFORMW 「%TEXTR("生き返るって解っててもちょっとは心配するんだぜ？ちょっとだけネ、ちょっとだけ/膝の使い心地はどうだい？ 单薄的？ はーん、ほっとけ馬鹿")%」
		ENDIF
	ELSEIF MARK:屈服刻印 >= 2
		PRINTFORMW 「%TEXTR(@"おいおい頑張り過ぎだ、%CNAME("主人")%よ/仕方のない人だなー、膝位は貸してやるからサ、養生しろよ")%」
	ELSE
		PRINTFORMW 「%TEXTR("有ゃ、倒れちゃった、おーい生きてるかー？/こりゃどうしようかな。勝手に食べちゃ――駄目だよねーはー")%」
	ENDIF
	RETURN 1
;partnerが体力or精力尽きた場合
ELSEIF STATE("撃沈")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW 「ふー、ふーっ――ははっ、やっぱり、嫌いだ」
			ELSEIF RAND:2
				PRINTFORMW 「こんなに%CNAME("一人称")%を食い散らかして」
				PRINTFORMW 「ははは――やっぱり、%CNAME("一人称")%は%CNAME("二人称")%が大嫌いだ」
			ELSE
				PRINTFORMW 「終わった、だろ。見てないでさっさと、あっちいけよ」
				PRINTFORMW 「それとも、擅長いこと動けない女の子を視線で嬲る趣味でも？」
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「%TEXTR("あっははーお皿まで食べ尽くされちゃった_BH_/ni↘ひっひ_BH_　満足、した？")%」"
			CALL PRINT_STRW, @"「%TEXTR("食べるのは――ま、いっか～ひと睡眠ひと睡眠だ～おいでおいで、抱きつかせろ～/ni↘ひっひじゃあご馳走を――なんて冗談_BH_ 余韻に浸りたいからサ、今は、良いや")%」"
		ENDIF
	ELSEIF MARK:屈服刻印 >= 2
		PRINTFORMW 「%TEXTR(@"なーもう、そんなに%CNAME("一人称")%をイジメて楽しいのかしら？ 反乱しちゃうぞー反乱/ぶーぶー、こんなのあんまりだー断固抗議するー！ もっと%CNAME("一人称")%にも色々させろー！")%」
		PRINTFORMW 「%TEXTR(@"っちぇ――これじゃ食べるに食べられないじゃんかーもー/はー、もう、食い気以前に疲れちゃったよ、%CNAME("主人")%の馬鹿～")%」
	ELSE
		PRINTFORMW 「%TEXTR(@"ぐぅ……おのれ%CNAME("主人")%め、こっちはイ領帯ケで慎ましい生き物だぞー抗議するうーぅあー/もーだめだーげんかーい！ はーもう、厳しい躾だコト")%」
		PRINTFORMW 「%TEXTR("うぅ～食べたいのに～わんわんぅ/う、動けないぃ――た、食べさせては、駄目かぁ～クソォ～")%」
	ENDIF
	RETURN 1
;満足
ELSEIF COND("満足")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW 「――なんだよ、満足したよ」
				PRINTFORMW 「そう言えば%CNAME("二人称")%も満足だろう他に何かあるかな？」
			ELSEIF RAND:2 == 0
				PRINTFORMW 「――最悪だ。最悪だよ。何がって――良いじゃないか、そんなことは」
			ELSE
				PRINTFORMW 「んぁっ、は、ぁ――終わり、かい？ そう、か――清々する」
				PRINTFORMW 「なんだよ――そうやって%CNAME("一人称")%を見透かしたその目、嫌いだ。刳りたくなる」
			ENDIF
		ELSE
			CALL PRINT_STRW, @"「%TEXTR(@"くぅ～んこりゃ本当に服従のポーズしなきゃ_BH_/――なんだいその目は。ああそうさ！良かったさ！もうメロメロだね！")%」"
		ENDIF
	ELSEIF MARK:屈服刻印 >= 2
		PRINTFORMW 「%TEXTR(@"%CNAME("主人")%にはもうイロイロ知られちゃってるから敵わないな～くぅ～ん/う～んさっすが%CNAME("主人")%♪ %CNAME("一人称")%のことをよく分かってらっしゃる♪")%」
	ELSE
		PRINTFORMW 「%TEXTR(@"ふぅー中々やるじゃないのサ、%CNAME("主人")%♪/わお一級品！ もう大満足ですヨ！さっすが！よっ！日本一ぃ！")%」
	ENDIF
;恋慕
ELSEIF TALENT:恋慕
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW 「%TEXTR("ふ、ぅ――終わったのならあっちいけよ/こんな慎ましい生き物に構ってる闲、無いだろう/これ以上触れる意味はないだろ、終わりだよ、終わり")%」
	ELSE
		PRINTFORMW 「%TEXTR("むー、もう終わり？ ちょーっと愛犬に対する愛情が足りないんじゃない？/ネグレクトだネグレクト、合ってるかわ知らんけどまー良いや。要するにもっと構えよー/これから予定でもあるのかい？ っちぇー不完全燃焼だ！")%」
	ENDIF
ELSEIF MARK:屈服刻印 >= 2
	PRINTFORMW 「%TEXTR("わんわん♪ 躾ご苦労大人だわん♪/おや、終わりかい？ 随分と慎ましいね/なんだいなんだい遠慮しぃは駄目だぞ？")%」
ELSE
	PRINTFORMW 「%TEXTR(@"満足したかい？ それは結構結構♪/躾はお終い？ へぇ/んふ♪ %CNAME("一人称")%のお楽しみの時間だ♪")%」
ENDIF
SIF CEVENT("今日の吃飯") == 0 && CFLAG:食欲 >= 10
	CALL PREDATION_T("調教後")
RETURN 1

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

;-------------------------------------------------
;愛撫
;-------------------------------------------------
IF SELECTCOM == 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「今更温柔的してやろうって？」
			PRINTFORMW 「とんでもなく安直で愚鈍だね、%CNAME("二人称")%」
		ELSE
			PRINTFORMW 「んふ♪ 基本のキってことかい？ 良いともサ」
			PRINTFORMW 「好きに触っておくれよ――あ、でも痛いのはイヤだよ？」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「%TEXTR("他の子を当たってよ/嫌いだ/大嫌いだ/ちくちくする/苦しい/やめてよ/気持ち悪い/気持ち良くない/机の角の方がマシ/手汗が酷い")%」
			ELSE
				IF RAND:6 == 0
					CALL PRINT_STRW, "「ゆーびひょーらーい_HH_ あーん――ぱくっ_HH_」"
					CALL PRINT_STRW, "「ちゅぅ_HH_ちゅぅ_HH_ んっ_HH_ はまないよ、あいひょーふ_HH_」"
					CALL PRINT_STRW, "「んっ_HH_ んー_HH_　っ_HH_　ぷぁ――もう一回、ほしいなー_HH_」"
				ELSEIF RAND:5 == 0
					CALL PRINT_STRW, @"「ほぉら、手を握って_HH_ %CNAME("主人")%なら片手でも出来るだろう？」"
					CALL PRINT_STRW, "「ぁはっ_HH_ に、ひひっ_HH_ お擅長お擅長♪」"
				ELSEIF RAND:4 == 0
					CALL PRINT_STRW, "「んっ_HH_ ぁは、にひっ_HH_ 遠慮、するなよ？」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%は%CNAME("二人称")%のペットだ――全部、%CNAME("主人")%のモノなんだから_HH_」"
				ELSEIF RAND:3 == 0
					PRINTFORMW 「%CNAME("主人")%は今までこうして%CNAME("一人称")%に触れた回数を覚えているかい？」
					PRINTFORMW 「%CNAME("一人称")%？ 覚えてるけないだろ。というか数えるヤツいるの？知らないけどさ」
					CALL PRINT_STRW, "「ま、何が言いたいかっていうと――数え切れないくらい構って貰ってペットは大満足ってことさ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「%TEXTR("ぁっ/んふっ/はぁ")%_HH_ %TEXTR("くひっ/んは――/んんっ")%_HH_　%TEXTR("わっ、/んぁっくぁ！？/ひぁ！？")% ふっふふっ！」"
					PRINTFORMW 「こっ、こらぁ、気持ちいいにくすぐったいを混ぜてくるのは条約違反だぞ！？」
				ELSE
					CALL PRINT_STRW, @"「%TEXTR("んふー/にひー")%_BH_ そうそう顎の辺りー_BH_ %TEXTR("ふぉー/うぉおー/んぉー/ひょあー")%_BH_　%TEXTR("ンきもちー/さいこー/あふぅー")%_BH_　%TEXTR("ﾌｧｰ/ﾓｯﾄﾓｯﾄｰ/ﾅﾃﾞﾅﾃﾞｼﾃｰ")%_BH_」"
					CALL PRINT_STRW, "「――ってこれ違うだろう。おい、普通にエッチな触り方を――ぁぅ_HH_」"
					PRINTFORMW 「ふっ雰囲気ぃ！ 大事にしてやれよぉ～！」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF MARK:屈服刻印 >= 2
				IF RAND:3 == 0
					PRINTFORMW 「ンふっ♪――%TEXTR("ピリピリする/指が冷たい/ふわふわする/手懐ける為の手だ/食べちゃうぞ/小手調べ？/むかむかする/垂らし桑/その内爆発しちゃうかも")%」
				ELSEIF RAND:2
					PRINTFORMW 「ふぁ――ああ、気持ち良いサ」
					PRINTFORMW 「少し腹が立つくらいには、ネ」
				ELSE
					PRINTFORM 「%TEXTR(@"慣れた時程雑になりやすいもの。こういう前戯も精心――/もう%CNAME("二人称")%の愛撫にも慣れてしまったからネ、そう簡単には")%
					CALL PRINT_STRL, @"%TEXTR("んひゅっ/んっ/んぁっ/しりゅっ")%_HH_」"
					CALL PRINT_STRW, @"「%TEXTR("や、ははは、/や、ややや！")%%TEXTR(@"さっ流石は%CNAME("一人称")%の%CNAME("主人")%！ これはもうお腹を見せるしかないネ！脱帽！/弱点はお開阔处ってワケだ、流石は%CNAME("主人")%！")%」"
					PRINTFORMW 「――%TEXTR("なんだよ、笑うなよ。ちょっと変な声が出ただけだろう/あのね、今のは反則。ノーカウント。そうだろう？")%」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「艶のあるお肌だろ？ 吃飯にまで気を使ってるからネ！」
					PRINTFORMW 「おいどうした手が止まったネ。ほら、触れよ、ほら」
				ELSEIF RAND:2
					PRINTFORMW 「お気に召すまま触れて、喘がせてみせてヨ♪」
				ELSE
					PRINTFORMW 「あっちをこちょこちょこっちをさわさわ♪」
					CALL PRINT_STRW, "「んっふ_BH_ 癪に障った？ そりゃ失礼♪」"
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;舐陰　面部騎乗(被逆推ているとき)
;-------------------------------------------------
IF SELECTCOM == 1
	;被逆推ているとき
	IF TEQUIP:推倒
		;初めて
		IF FIRSTCOM_REV(SELECTCOM) == 0
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「こういうこと、期待していたんだろう」
				PRINTFORMW 「やってやるから黙っていてよ。%CNAME("二人称")%の声、癇に障るんだ」
			ELSE
				PRINTFORMW 「んっふっふ、ペットの逆襲領帯ムだ♪」
			ENDIF
		;二回目以降
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「黙ってくれ。そんなにおっ勃てて何言ったって馬鹿みたいだ」
					ELSEIF RAND:2
						PRINTFORMW 「自慰道具が口を零すなよ。黙れ」
					ELSE
						PRINTFORMW 「黙って。声を、聞かせないで。癇に障る」
					ENDIF
				ELSE
					IF RAND:6 == 0
						PRINTFORMW 「そーそー、精心ー精心ー――にひひっ♪」
					ELSEIF RAND:5 == 0
						CALL PRINT_STRW, "「ちょっと、いや、凄く興奮するねコレ_HH_」"
						CALL PRINT_STRW, "「いーい征服感だ_HH_」"
					ELSEIF RAND:4 == 0
						CALL PRINT_STRW, "「表面だけじゃだ～め_HH_ んっ――ふふ♪」"
						CALL PRINT_STRW, "「お擅長お擅長_HH_」"
					ELSEIF RAND:3 == 0
						CALL PRINT_STRW, "「はぁ――_HH_ ずっとコレしてたいな」"
						CALL PRINT_STRW, "「結構気に入っちゃった_HH_」"
					ELSEIF RAND:2 == 0
						PRINTFORMW 「重い？ 今重いって言ったか%CNAME("主人")%！！」
						PRINTFORMW 「よ～しならばもっとギシギシしてやるから重力を体感するが良い」
						PRINTFORMW 「重力だヨ、体重じゃないヨ！！」
					ELSE
						PRINTFORMW 「へ～いカウボーイ！ いやカウガール！ いぇ～い！」
						CALL PRINT_STRW, "「んっ_HH_ ちょ、待って！ 今遊んでるんだからそんなエッチな、あぁっ_HH_」"
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF MARK:屈服刻印 >= 2
					IF RAND:3 == 0
						PRINTFORMW 「んふ♪ おーにさーんこーちら、おーそそはこーこよってね♪」
					ELSEIF RAND:2
						PRINTFORMW 「食べる前に頂きますは言ったかい？ ま、言って無くても食べさせるんだけどネ♪」
					ELSE
						PRINTFORMW 「息継ぎ？ したい？ 是、吸ってー――どーん！ にひひっ♪」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「どうしてこんなことするかって――そりゃあ気分ですヨ♪」
					ELSEIF RAND:2
						PRINTFORMW 「ほーら餌だぞー%TEXTR("ポチ/タマ/ジョン")%ー」
					ELSE
						PRINTFORMW 「いやー、体は正直だね。こんなでも勃起するんだからサー」
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ELSE
		;初めて
		IF FIRSTCOM(SELECTCOM) == 0
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「舐めるって？ ――ははっ、どっちが犬だか」
			ELSE
				PRINTFORMW 「お？ にひっ♪ コッチに興味津々？ 良いとも良いとも」
				PRINTFORMW 「デリケートなトコロだ、綺麗にしておくれよ♪」
			ENDIF
		;二回目以降
		;清洁舔阴
		ELSEIF COND("清洁舔阴フラグ", PLAYER)
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「引くよ正直。気持ち悪い」
					ELSEIF RAND:2
						PRINTFORMW 「弄脏的のが好きならゴミでも舐めてれば？」
					ELSE
						PRINTFORMW 「――不快だ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「ん？ ――に、ひひっ♪ 綺麗にしてくれるの？」
					ELSEIF RAND:2
						PRINTFORMW 「あのね、多少は恥ずかしいから舐める音はミュートにして――」
						PRINTFORMW 「くれないんだもんなー！ むしろいつもより大音量なんだもんなー！！」
					ELSE
						PRINTFORMW 「良いね～倒錯的だ。そういうとこ好きだぜ♪」
						PRINTFORMW 「いつも以上に精心――%CNAME("二人称")%で汚してヨ♪」
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「そうそう、ペットの処理は%CNAME("主人")%の義務ですヨ♪」
				ELSEIF RAND:2
					PRINTFORMW 「美味しい？ ねー、美味しい？ にひひっ♪」
				ELSE
					PRINTFORMW 「倒錯してるネ、良いね良いね♪」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「――っ_HH_ %TEXTR("くっ/はぁ/あぁ")%、%TEXTR("気持ち悪い/ざらつく/嘔吐感がする/最悪だ/床でも、舐めていたら？/やめてよ/下手くそ/馬鹿犬")%」"
					ELSEIF RAND:2
						PRINTFORMW 「どっちがペットなんだか。馬鹿らしい。%TEXTR("正直に言って気持ち悪いよ/反吐が出る")%」
					ELSE
						PRINTFORMW 「もうやめちゃえよ。こういうことは別のもっと可愛的反応をする子とやってくれ」
					ENDIF
				ELSE
					IF RAND:6 == 0
						CALL PRINT_STRW, "「に、ひひっ♪ つっかまーえた――_HH_」"
						PRINTFORMW 「もっと、もっと頂戴？ %CNAME("主人")%のペロペロ、もっと、欲しいナ♪」
						CALL PRINT_STRW, "「はぁ――いっ_HH_ ん――んぅ_HH_ ――い、いよっ_HH_ んっ_HH_」"
					ELSEIF RAND:5 == 0
						CALL PRINT_STRW, "「んふー♪ そーんなに美味しいのかーい？ ――い、いや、あの_HH_」"
						PRINTFORMW 「んなっ、真顔で頷かれると、て、照れるだろう！？」
					ELSEIF RAND:4 == 0
						CALL PRINT_STRW, "「だ、ダメだ、馬鹿_HH_ お豆ばっかりを――っ_HH_」"
					ELSEIF RAND:3 == 0
						CALL PRINT_STRW, @"「はっ、ぁ_HH_ 足、締めるなって言ったって、ネ」"
						CALL PRINT_STRW, @"「%CNAME("主人")%、%CNAME("二人称")%の、舌が、悪いんだよ_HH_」"
					ELSEIF RAND:2
						PRINTFORMW 「にひひっ♪ いや、本当にワンコみたいだナー♪」
						CALL PRINT_STRW, "「ほれ、お手、お手。ぎゅーって――ひゃぅ__HH_」"
						PRINTFORMW 「よ、弱い所を急に刺激するのは、勘弁しろい！」
					ELSE
						PRINTFORMW 「んっ――♪ む、なんだいなんだい、ちょっと気持ちよかっただけだろう！」
						PRINTFORMW 「変な声くらい大目に――え、嘘つくなって？」
						PRINTFORMW 「――あーそうさ！めっちゃくちゃ気持ちよかったさ！もっとやっておくれ！！」
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF MARK:屈服刻印 >= 2
					IF RAND:3 == 0
						PRINTFORMW 「躾けてるのか躾けられてるのか解らないネ～♪」
						CALL PRINT_STRW, "「っぁ_HH_ ――いや、こりゃあキチンと躾けられてるナ♪」"
					ELSEIF RAND:2
						PRINTFORMW 「ん？ んふ♪ %TEXTR("ほらほら、おそそはこちらよ～♪/かも～ん♪/舐めたい？舐めたいんだ？ にひっ♪ どうぞどうぞ♪")%」
					ELSE
						PRINTFORMW 「ni↘ひ！？――ちょ、待った、余裕ない、余裕がっ、舌っ、舌を、はなっ、やめっ！」
						CALL PRINT_STRW, @"「%TEXTR("んひゃっ/きゅっ/んはぁっ")%_HH_ そ、それ以上は%TEXTR("なんかも、漏れそうだからやめよう/やめないか/ギブ、ギブだってばっ")%！？」"
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「ペットのお股舐めるのってどんな気分かナ♪」
					ELSEIF RAND:2
						PRINTFORMW 「ほーらこっちだよーワンコー――おっと、ワンコは%CNAME("一人称")%だ、わんわん♪」
					ELSE
						PRINTFORMW 「%TEXTR("くすぐった気持ちいいな/んんっ、ピリッときた/鼻息とかすぐ解るね、このスケベ桑！")%」
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;肛門愛撫
;-------------------------------------------------
IF SELECTCOM == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;気持ちいい
		IF CHECK("Ａ指挿入")
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					CALL PRINT_STRW, "「――んひゃっ_HH_ っ、最悪、最悪っ！」"
					PRINTFORMW 「本当に、何を、何を考えてるんだよ、%CNAME("二人称")%は」
				ELSE
					CALL PRINT_STRW, "「おぉっ_HH_ お、お？ こ、コレ意外とイイね_HH_」"
					PRINTFORMW 「%CNAME("一人称")%にその素質があったのか、はたまた%CNAME("二人称")%の指が凄いのか――どっちかナ？」
				ENDIF
			ELSE
				PRINTFORMW 「んんっ！ ちょっと待った！ んふっ！ くぅっ、ま、待ってってば～！」
				PRINTFORMW 「いや、気持ち良いは気持ち良いけどっ、んっ、うぅ――！！」
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「そこも触るんだ？ 良いけど、悪辣な趣味だね。怖気がする」
				ELSE
					PRINTFORMW 「んひゃ！？ こ、こらそこは違う穴だぞ！」
					PRINTFORMW 「え、間違ってない？ ――ほっほー、ナルホドね。ここでも気持ち良くして頂けると！」
				ENDIF
			ELSE
				PRINTFORMW 「はっはっは、穴を間違っているよ、茶目だなー%CNAME("主人")%！」
				PRINTFORMW 「なに、間違ってない？ ――マジかよ」
			ENDIF
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF CEVENT("恋慕：ささくれ")
						IF RAND:3 == 0
							PRINTFORMW 「ふー、ふー、奥まで犯して、満足かい？」
							PRINTFORMW 「満足したならさっさとコレ抜けよ、%TEXTR("気持ち悪くて/呼吸し辛くて")%しょうがない」
						ELSEIF RAND:2 == 0
							CALL PRINT_STRW, "「――ぉ゛っ_HH_ ――ぐぅっ！あぁっ！」"
							PRINTFORMW 「はぁ、はぁ、%TEXTR("最悪/ああ/本当に")%――%TEXTR("良い趣味だ/抜けよ/やめろよ")%、%TEXTR("気持ち悪い/嘔吐感がする/不快だから")%」
						ELSE
							PRINTFORMW 「は、ぁ――こんなモノで、奥まで滅茶苦茶にして満足？それは良かった」
							PRINTFORMW 「じゃあさっさと終わりにしてくれよ、不快でしょうがない」
						ENDIF
					ELSE
						IF RAND:3 == 0
							CALL PRINT_STRW, "「ぐふっ_HH_ くふふふ_HH_　あーあ、そんなっ_HH_ 奥までしちゃって_HH_」"
							CALL PRINT_STRW, @"「%CNAME("一人称")%のお腹もう全部ぐちゃぐちゃじゃないか――_HH_」"
						ELSEIF RAND:2
							CALL PRINT_STRW, "「あ゛ー_HH_ あ゛ぁ゛_HH_ もっと、もっとだ、もっと_HH_」"
							CALL PRINT_STRW, @"「もっとオクまで_HH_ %CNAME("主人")%に、コワしてほしいんだ_HH_」"
						ELSE
							CALL PRINT_STRW, "「ぎっひっ_HH_そうっ_HH_ ゴリゴリ_HH_　呼吸、止まっちゃいそう_HH_」"
						ENDIF
					ENDIF
				ELSE
					IF CEVENT("恋慕：ささくれ")
						IF RAND:3 == 0
							PRINTFORMW 「自分の手でする気概も無いんだね」
							PRINTFORMW 「ああ、でも、%CNAME("一人称")%はホッとしているよ。%CNAME("二人称")%に触られたくなんてない」
						ELSEIF RAND:2
							PRINTFORMW 「ぐっぅう――乱れる姿でも、見たかったのかい？ こんな玩具で？ それもお尻で？」
							PRINTFORMW 「空想はメモにでもしたためてお蔵入りにでもしておいてよ。%TEXTR("くだらない/気持ち悪い/馬鹿らしい")%」
						ELSE
							PRINTFORMW 「な、ん、だい――お尻から振動棒、生やしてる姿が、笑えるかい？」
							PRINTFORMW 「%CNAME("一人称")%も笑えるよ。触りもせずこんなもので喜ぶ%CNAME("二人称")%がいっそ哀れだ」
						ENDIF
					ELSE
						IF RAND:3 == 0
							CALL PRINT_STRW, "「あひっ_HH_ んっもう！ 振動棒動かすならきちんと許可を――んっ_HH_」"
							CALL PRINT_STRW, "「わかった、許可する、許可するから！ もっとゆっく――ぁ゛あっ_HH_」"
						ELSEIF RAND:2
							CALL PRINT_STRW, "「ち、力入らないんだから、そんなっ_HH_ ひっ_HH_ おぉっ_HH_」"
							CALL PRINT_STRW, "「く、くぅ～ん_HH_ ぅうおっ_HH_ ふ、ふざけるのも難しいなこれ！！」"
						ELSE
							CALL PRINT_STRW, "「にひひっ_HH_ 尾巴、いじってくれるんだ_HH_」"
							CALL PRINT_STRW, "「ほ～らふりふり_HH_ 可爱ワンコの尾巴い～っぱい弄って――んぉお゛っ_HH_」"
							CALL PRINT_STRW, @"「んぉ゛っ_HH_ ぉ゛_HH_ %TEXTR("お尻っ/尾巴でっ/いっぱいっ")%_HH_ 躾けられちゃう_HH_」"
						ENDIF
					ENDIF
				ENDIF
			ELSE
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「気持ちよくする気があるのかい、下手くそ」
					ELSEIF RAND:2
						PRINTFORMW 「%TEXTR(@"どんとたっちみー/触らないで/気持ち悪い/イカれた倒錯者め/%CNAME("二人称")%の親は可哀想だ")%」
					ELSE
						PRINTFORMW 「屈服させようっていうのが透けて見えるよ。明け透け過ぎてむしろ笑えるね、笑わないけど」
					ENDIF
				ELSE
					IF CHECK("Ａ指挿入")
						IF RAND:6 == 0
							CALL PRINT_STRW, @"「指先でツンツンするだけー？ %TEXTR("ぉ゛っ/あひっ/んぐっ")%_HH_ じゃ、ないよネ――にひひ♪」"
						ELSEIF RAND:5 == 0
							CALL PRINT_STRW, "「ほーら、わんこのふりふりお尻、躾けちゃってヨ_HH_」"
						ELSEIF RAND:4 == 0
							CALL PRINT_STRW, @"「%TEXTR("あっひ/ぉ゛ぐっ")%_HH_ おくぅ♪ 指で、ゴリゴリして_HH_」"
							CALL PRINT_STRW, "「お尻であんあんする変態わんこをもっと躾けちゃって_HH_」"
						ELSEIF RAND:3 == 0
							CALL PRINT_STRW, "「んふっ_HH_ お腹の中から撫でるなんて、変態的でよろしい♪」"
						ELSEIF RAND:2
							CALL PRINT_STRW, "「んっ_HH_ ぉ゛お゛――_HH_ ぬ、抜き差しと、ぐりぐり同時はっ_HH_」"
							CALL PRINT_STRW, "「き、効くなぁ――くふっ_HH_ はー、はは、こりゃあ、白旗だ_HH_」"
						ELSE
							CALL PRINT_STRW, "「おっ_HH_ ふぐっ_HH_ おふざけが、たりてないってー？ ふぎゅっ_HH_」"
							CALL PRINT_STRW, "「そんなっ_HH_ 余裕が、無いんだよ_HH_ 力も、是らな――ぉおぅ゛っ_HH_」"
						ENDIF
					ELSE
						IF RAND:3 == 0
							PRINTFORMW 「いった！ 色々準備足りてないぞー！キャンキャン！」
						ELSEIF RAND:2
							PRINTFORMW 「へいもーん！へいもーん！ 開けるにはもう少し準備しろー！」
						ELSE
							PRINTFORMW 「痛いってばーもう――虐待で訴えてやろうか！」
						ENDIF
					ENDIF
				ENDIF
			ENDIF
		;気持ちいい
		ELSEIF CHECK("Ａ指挿入")
			;Ａ振動棒使用中
			IF TEQUIP:肛用振動棒
				;Ｓ状結腸まで振動棒が侵入している
				IF CHECK_COM("結腸責め")
					IF TALENT:結腸性感
						IF RAND:3 == 0
							CALL PRINT_STRW, "「ごぉ゛_HH_ ぉ、ぉ゛お゛_HH_ ひ、は、あはは_HH_」"
							CALL PRINT_STRW, @"「やっば、本当に壊れちゃったかも、%CNAME("一人称")%_HH_」"
						ELSEIF RAND:2
							CALL PRINT_STRW, "「に、ひひっ_HH_ まだ奥まで行けるんじゃない？」"
							CALL PRINT_STRW, "「壊すなら徹底的にやっておくれよ_HH_ 壊れて给からサ_HH_」"
						ELSE
							CALL PRINT_STRW, "「こんなもんじゃないだろ_HH_ もっと気持ち良くてブッ飛んだの、出来るだろ、ナァ_HH_」"
						ENDIF
					ELSE
						IF RAND:3 == 0
							PRINTFORMW 「ひぃ、ひぃ、ふぅ――いや、ほんと、行くところまで届いちゃったネ」
						ELSEIF RAND:2
							PRINTFORMW 「もうコレ以上奥は無理だってば――んっ、ぉっ！？」
							PRINTFORMW 「ま、まだ奥まであるのかー、スッゴいな人体」
						ELSE
							PRINTFORMW 「トンネル工事もこれでお仕舞い！ だよね？ ね？」
							PRINTFORMW 「さ、流石にこれ以上奥までになると慎ましいとは言えないナ」
						ENDIF
					ENDIF
				ELSE
					IF MARK:屈服刻印 >= 2
						IF RAND:3 == 0
							PRINTFORMW 「くっ、ふふ♪ 尾巴にお触り？ 良いよ良いよ♪」
							PRINTFORMW 「――んっ、ぉ、おお、あ、やっぱダメ！ ダメだって！ なんか出る！！」
							PRINTFORMW 「気持ち良くて声だけじゃなくて何か出しちゃいけないものも出る！！」
						ELSEIF RAND:2
							PRINTFORMW 「ずぽずぽはダメだってばっ、き、気持ち良いけれども！」
							PRINTFORMW 「ぉ、っ、おっ、ごっ♪ けっふっ♪ やっば、下品な声、ぉお゛っ♪」
						ELSE
							PRINTFORMW 「%CNAME("主人")%もさ♪ これ入れてぐぽぐぽされてみると良いよ♪」
							CALL PRINT_STRW, "「気持ち良いぜ_HH_ 胃が裏返りそうになるくらいサ♪」"
						ENDIF
					ELSE
						IF RAND:3 == 0
							PRINTFORMW 「ん、ぉ、ぉお――あ、あまり動かさないでおくれよ？」
							PRINTFORMW 「いいや、動かしても良いけど――出ちゃうよ、乙女の尊厳」
						ELSEIF RAND:2
							PRINTFORMW 「んぎっ――ぐ、ぅ、ふぅ――いいや、気持ち良いかの前にこれは」
							PRINTFORMW 「うん、%CNAME("主人")%も入れてみよう。気持ちが解るはずだ」
						ELSE
							PRINTFORMW 「は、ぁー――すっかりぐちゃぐちゃだ、どうしてくれる%CNAME("一人称")%のお尻」
						ENDIF
					ENDIF
				ENDIF
			ELSE
				IF MARK:屈服刻印 >= 2
					IF RAND:3 == 0
						PRINTFORMW 「%TEXTR("んぉっ/んぁっ/ふぁっ")%――んっ、ごほんっ！ 敏感なトコロだからね、そりゃあ奇妙な声も出るサ！」
					ELSEIF RAND:2
						PRINTFORMW 「あー、%TEXTR("お腹のナカひっくり返りそー/口からなんか出そうー")%」
						PRINTFORMW 「%CNAME("主人")%、なんか出たら受け止めてネ！」
					ELSE
						PRINTFORMW 「こんな幼気な慎ましい生き物のお尻を好きにするなんて！」
						CALL PRINT_STRW, @"「いや～ん%CNAME("主人")%の助平！破廉恥！ スケッチ！ わんた――んふっ_HH_」"
						PRINTFORMW 「ふざけてる途中なんだからちょっとくらいやめても良いじゃないか！？」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「んっ――あー、うーん、これやっぱり力入んないな」
					ELSEIF RAND:2
						PRINTFORMW 「んふっ ごふっごふっ！ いや、急に変な感じになってむせちゃった」
					ELSE
						PRINTFORMW 「お、おぉ――いやー、これでも乙女ですから？」
						PRINTFORMW 「お菊門に指ごそごそされるのは思うところがあるワケですヨ」
					ENDIF
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF MARK:屈服刻印 >= 2
				IF RAND:3 == 0
					PRINTFORMW 「へーいなんか忘れてなーい？濡らすとか慣らすとかサー」
				ELSEIF RAND:2
					PRINTFORMW 「慌てる羊飼いは貰いが少ないぜ、%CNAME("主人")%」
					PRINTFORMW 「準備が出来てないぞってコト、是やり直し！」
				ELSE
					PRINTFORMW 「んっ！？ いったいな」
					PRINTFORMW 「せっかち桑め。女の子に嫌われちゃうぜ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「んっいった！？ いえいえどうぞお構いなく、このお代は後でもらうからサ♪」
				ELSEIF RAND:2
					PRINTFORMW 「っ、ちょっと強引過ぎるな」
				ELSE
					PRINTFORMW 「あまりに痛いと噛み付くよ？」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;自慰
;-------------------------------------------------
IF SELECTCOM == 3
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「わざわざ見せて欲しいなんて言うほどのこと？」
			PRINTFORMW 「覗きの願望もあったんだね、まったく理解できないや」
		ELSE
			PRINTFORMW 「ほっほー？ ほーう、なるほどなるほど」
			PRINTFORMW 「覗きがご趣味ですか！ 良いご趣味ですネ！！ではこの縁談は破局ということで！！」
			PRINTFORMW 「冗談だよーそんなに残念そうな顔するなよーちゃーんと見せて给からサ、目を離すなよ！！」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「うん、%CNAME("二人称")%に触られるより何倍もマシだ」
				ELSEIF RAND:2
					PRINTFORMW 「良かった。これなら随分と気持ちが楽だから」
				ELSE
					PRINTFORMW 「見るなよ、視線が気持ち悪いんだ。集中できないだろ」
				ENDIF
			ELSE
				IF RAND:6 == 0
					CALL PRINT_STRW, @"「%TEXTR("くふっ/にひっ/んふっ")%_HH_ 今、%CNAME("二人称")%が何をオナネタにしてるか解るかい？」"
					CALL PRINT_STRW, @"「%TEXTR(@"%CNAME("主人")%/%CNAME("二人称")%")%の目さ_HH_ ああ、良い、%TEXTR("とても興奮するんだ/凄く良い")%_HH_」"
					CALL PRINT_STRW, @"「%TEXTR(@"%CNAME("二人称")%が見てる/釘付けだ、%CNAME("主人")%が、%CNAME("一人称")%に")%_HH_ どうしよう、また湿的てきちゃった――_HH_」"
				ELSEIF RAND:5 == 0
					CALL PRINT_STRW, "「ダ～メ、今はお手つき厳禁_HH_」"
					CALL PRINT_STRW, "「しっかりと網膜に焼き付けてくれよ_HH_」"
				ELSEIF RAND:4 == 0
					CALL PRINT_STRW, @"「音が聞こえるだろ_HH_ %TEXTR("じゅぷじゅぷ/くちゅくちゅ/ぬちゅぬちゅ")%_HH_ %TEXTR("じゅぷじゅぷ/くちゅくちゅ/ぬちゅぬちゅ")%_HH_」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%のせいだ_HH_ %CNAME("一人称")%がこんなに興奮してるのは、%CNAME("二人称")%のせいだぞ_HH_」"
				ELSEIF RAND:3 == 0
					CALL PRINT_STRW, "「さわるなよ～_HH_ ぜ～ったいさわるなよ_HH_」"
					CALL PRINT_STRW, "「さわっちゃったら――襲っちゃうゾ_HH_」"
				ELSEIF RAND:2
					PRINTFORMW 「自慰のマンネリを解消してみようのコーナー！！」
					PRINTFORMW 「なに、余計なことすんなって？ っちぇー」
				ELSE
					PRINTFORMW 「人前でこんなコトするなんてどうかと思ってたけどサー」
					PRINTFORMW 「いやぁ、これが結構味わい深くて感動しちゃうね！ 露出狂の気でもあるのかもナ、%CNAME("一人称")%」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「目が血走ってるぜ、%CNAME("主人")%♪」
				PRINTFORMW 「%TEXTR("興奮しちゃうじゃないか/そういう必死な姿はとても痛快だネ")%♪」
			ELSEIF RAND:2
				PRINTFORMW 「我ながら良いカラダしてるよネ」
				PRINTFORMW 「%TEXTR(@"この胸部なんかもっちもちだぜ/ボン！キュッ！ボーン！！ってサ/そんな%CNAME("一人称")%の自慰が見れるなんて役得だなー%CNAME("主人")%")%」
			ELSE
				PRINTFORMW 「素朴な疑問なんだけどサ、%CNAME("主人")%はペットのオイタで興奮するタチなの？」
				PRINTFORMW 「ま、ペットはペットでもこ～んな可愛いペットなら致し方ないネ！ はっはっは、笑えよ」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

;-------------------------------------------------
;胸愛撫
;-------------------------------------------------
IF SELECTCOM == 5
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「餌に食い付くペットみたいだね」
			PRINTFORMW 「好きにされるのも癪だけど仕方がない」
		ELSE
			PRINTFORMW 「にひっ♪ そーんなに胸部が好きかい？」
			PRINTFORMW 「弄りたい？弄りたいのかーい？」
			PRINTFORMW 「ni↘ひっひっひ♪ さぁその衝動を声に出すんだ！胸部が好きかー！！」
			PRINTFORMW 「もっと大声で！ そ～ぐ～っど！！」
			PRINTFORMW 「よ～し好きに弄ると良い！この%CALLNAME:TARGET%酱の魅惑の果実を！！」
		ENDIF
	;二回目以降
	ELSE
		IF CHECK_COM("舔乳頭")
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「赤ん坊の真似かな？」
					ELSEIF RAND:2
						PRINTFORMW 「ああ、凄くお似合いだネ」
					ELSE
						CALL PRINT_STRW, "「んっ_HH_ ふ、ぅ、もう、満足しただろう、口を離してよ」"
					ENDIF
				ELSE
					IF RAND:6 == 0
						PRINTFORMW 「舌先でカリカリひっかくのをや～め～ろ～！」
						PRINTFORMW 「戯ける闲が無いとか死活問題だゾ！解ってるのかナ！？」
					ELSEIF RAND:5 == 0
						PRINTFORMW 「にひひっ♪ 夢中になっちゃってサ、いい眺めだコト♪」
					ELSEIF RAND:4 == 0
						CALL PRINT_STRW, "「んぅっ_HH_ こらこらー」"
						PRINTFORMW 「必死にちゅうちゅう吸ったってお乳は出ませんよって、解ってる？ネ？」
						SIF TALENT:母乳体質
							PRINTFORMW 「いやそうだった今は出るんだっけ！ この母乳泥棒～！！」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「ハハハ、おい%CNAME("二人称")%、舔乳頭る度に浮く腰の反応見てるだろう、バレてるぞ」
						CALL PRINT_STRW, "「――っ_HH_ バレてるからなんだって話だよネ！デスヨネ！！」"
					ELSEIF RAND:2
						PRINTFORMW 「へい、へいへい、赤ん坊%CNAME("主人")%ヨ！！」
						PRINTFORMW 「舐め方がネ、ちょ～っとイヤらしくないかナってサ！！」
					ELSE
						CALL PRINT_STRW, "「うひゃっ_HH_ ――いやいや今のはビリってキタだけだから！」"
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「よ～しよし、可愛いあかんぼだコト♪」
					PRINTFORMW 「撒娇鬼検定があったら上位狙えるネこれは！」
				ELSEIF RAND:2
					PRINTFORMW 「んっふ――♪ 撫でて欲しいかい？」
					PRINTFORMW 「有料で、いや、一口で承ろうじゃないか！」
				ELSE
					PRINTFORMW 「乳頭に%TEXTR("唐辛子/タバスコ/カラシ/わさび")%でも塗っとこうと思ってやめた%CNAME("一人称")%を褒めてくれ！」
					SIF RAND:10 == 0
						PRINTFORMW 「いや、塗ったんだよ。塗ったんだけどね、滅茶苦茶痛かった」
				ENDIF
			ENDIF
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「痛いよ」
					ELSEIF RAND:2
						PRINTFORMW 「ぐにゃぐにゃ毬みたいで面白色かい？」
						PRINTFORMW 「あはは、そうかい。不愉快だ」
					ELSE
						PRINTFORMW 「色っぽい反応でも期待したの？ 残念だったね」
					ENDIF
				ELSE
					IF RAND:6 == 0
						PRINTFORMW 「纠缠着触るネ～なんだい、そんなに恋しかったかい？」
						PRINTFORMW 「――にひひっ♪ %CNAME("一人称")%の胸部も%CNAME("主人")%が恋しかったってサ！」
					ELSEIF RAND:5 == 0
						PRINTFORMW 「もっと堂々と触りなさい、堂々と！」
						PRINTFORMW 「そうそう、ぐ～っど！ ――え、心音が伝わって煩いって？知るか馬鹿！！」
					ELSEIF RAND:4 == 0
						PRINTFORMW 「いや～ここまで喜んで触って貰えるとペット冥利に尽きるってモンさ♪」
					ELSEIF RAND:3 == 0
						PRINTFORMW 「スケベな手付きだ～♪ 良いネ良いネ♪」
						PRINTFORMW 「%CNAME("主人")%の大好きな胸部、しっかりとクセ付けてヨ♪」
					ELSEIF RAND:2
						PRINTFORMW 「クラスの男子の視線を一杯詰めて大きくなった胸部だぜ」
						PRINTFORMW 「収穫しちゃう？ しちゃいますか！ 是ど～ぞ♪」
					ELSE
						PRINTFORMW 「にひひっ♪ なーんだよー改まってサ♪」
						PRINTFORMW 「お好きにどうぞ、%CNAME("主人")%ヨ♪ 遠慮するだけ損だぜ！」
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「おっかな惊嚇触ってくれるなよ？」
					PRINTFORMW 「んっ――そうそう、形変わるくらい大雑把で良いのサ♪」
				ELSEIF RAND:2
					PRINTFORMW 「にひっ♪ 自慢の一品だもの、触らなきゃ損ってモンだろう？」
				ELSE
					PRINTFORMW 「胸部が好きだー！って声にお答えして自ら差し出す」
					PRINTFORMW 「う～んなんてデキたペットなんでしょうネ%CNAME("一人称")%は！」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;接吻
;-------------------------------------------------
IF SELECTCOM == 6
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「――接吻は初めてだったんだ」
			PRINTFORMW 「ただ、それだけなんだけどね」
		ELSEIF TEQUIP:推倒
			IF TALENT:恋慕
				PRINTFORMW 「にひひっ♪ ここまで接吻もしてくれなかった%CNAME("主人")%にお仕置きで～す！」
				PRINTFORMW 「怒ってないよ～怒ってないですよ～ま～ったく、ｵｺｯﾃﾅｲﾖｰ」
				PRINTFORMW 「神妙にしろ。大姐姐の初吻を喰らえ」
			ELSE
				PRINTFORMW 「にひっ♪ 食べやしないサ、大丈夫大丈夫」
				PRINTFORMW 「巷では接吻には味があるらしいじゃない。だもんで、味見をネ、しとこうかと」
				PRINTFORMW 「動くなよ～手が、あいや、口が滑るかも知れないからサ♪」
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				PRINTFORMW 「今の今まで接吻もしてないことに物申したいんですが！！！！」
				PRINTFORMW 「ペットとの接吻はNGな領帯プなのかナ！ えぇ！？ そこんトコどうよ！！」
				PRINTFORMW 「なになに、食われそうで怖かった？ 食わないよ！ いやゴメン勢い余って食べちゃうわ多分！！」
				PRINTFORMW 「はーっ！！でもそこは%CNAME("主人")%の度量ってヤツでサ！ してくれよ！」
				PRINTFORMW 「あーあー！期待が膨らんじゃうナ～！どんな罗曼蒂克な接吻してくれるのかナ～！」
				PRINTFORMW 「あー！楽しみだなーって――んっ――ちゅぅ――んぁっ――まっ―――くちゅっ」
				CALL PRINT_STRW, "「――っ_HH_ 今のが初吻なんですけど！！」"
			ELSE
				PRINTFORMW 「――にひっ、やわらか～い唇だこと」
				PRINTFORMW 「――じゅるり」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF INSERT("Ｖ挿入")
					IF RAND:2
						PRINTFORMW 「%TEXTR("強請ってるつもり？ 馬鹿らしい。雛鳥だってもっと慎ましいよ/こうするのが普通、なんだろう/……別に、良いさ、接吻くらい")%」
						IF RAND:5
							PRINTFORMW 怒ったような口調のまま尖らせた唇で%CALLNAME:TARGET%は口付ける。
							PRINTFORMW 余りにもスムーズで、睨むような彼女の視線だけが本意ではないと言い張っていた。
						ELSE
							PRINTFORMW 下腹部のジリジリと炙られるような熱で口以外は取り繕う闲も無かった。
							PRINTFORMW 胸が痛い。張り裂けそうでムカムカする。せめて視線だけはキッと睨んで見せる。
							PRINTFORMW ごめんね。ごめんなさい。
						ENDIF
					ELSE
						PRINTFORMW 努めて無機質に腰を振る度に呼吸が荒くなっているのが解った。
						PRINTFORMW 失っていく酸素を補填する何かが欲しくなって、目の前には丁度、同じように酸素を浪費する存在があった。
						PRINTFORMW そうだ、奪うんだ。そうすればきっと楽になる。考えてから実行は早くて。
						PRINTFORMW 奪った酸素はより甘く、いくらでも欲しくなり、気がつけば%CNAME("一人称")%は\@ TALENT:PLAYER:男性 ? 彼 # 彼女 \@の息で呼吸していた。
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「こうされるのがお望みなんだろう？」
					ELSEIF RAND:2
						PRINTFORMW 「っぷぁ……嫌い」
					ELSE
						PRINTFORMW 「ほら、喜んだらどうだい？」
					ENDIF
				ENDIF
			ELSE
				IF INSERT("Ｖ挿入")
					IF RAND:3 == 0
						CALL PRINT_STRW, "「にひっ――ひひっ_HH_ このまま上でも下でも食べちゃうっていうのは大分オツだと思いませんか_HH_」"
						CALL PRINT_STRW, "「是ざ～んねーん_HH_ 今更慌てたって遅いんですヨ_HH_ そんじゃいっただっきまー――――ちゅっ_HH_」"
						CALL PRINT_STRW, "「んっ_HH_ んちゅ―_HH_ は、ふっ――――_HH_ んぁっ_HH_ んふっ_HH_ やーい引っかかったネ_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「んっふっ――_HH_口、近いの怖い？ にひひっ_HH_ そっかーじゃあ仕方無いネ！」"
						CALL PRINT_STRW, "「接吻したら怖くなくなったりしないかナ_HH_ え？ したいだけだろって？ ごめーとーですネ_HH_」"
					ELSE
						CALL PRINT_STRW, "「ちゅっ――_HH_ あ、やべ、軽いの一回じゃ足りねえやこれ」"
						CALL PRINT_STRW, "「おせっせしてる最中は本当にヤバいですネ、深呼吸しろよー_HH_」"
						CALL PRINT_STRW, "「窒息しても知らないぜ_HH_」"
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「ほーらこわーいお口が接近してるぞー？」
						CALL PRINT_STRW, "「食べられちゃうかな～どうかナ～_HH_」"
						CALL PRINT_STRW, "「正解はー――ちゅっ_HH_」"
					ELSEIF RAND:2
						PRINTFORMW 「にひひっ♪ こういう接吻って実は好きなんだよネ」
						PRINTFORMW 「%CNAME("二人称")%の息を奪って、%CNAME("二人称")%の息で呼吸して、さ」
						CALL PRINT_STRW, "「――興奮してきた_HH_」"
					ELSE
						PRINTFORMW 「あーあーもう、だらしのない」
						CALL PRINT_STRW, "「そんなんじゃ、唇を食べられちゃってもしょうがないよネ_HH_」"
					ENDIF
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「にひっ、食べないよ、大丈夫、大丈夫」
				PRINTFORMW 「%TEXTR("忍耐から、味見だけ、ネ/パクパクはしないからサ、ペロペロだけ、ネ")%♪」
			ELSEIF RAND:2
				PRINTFORMW 「啄むような接吻をバード接吻って言うんだろ？」
				PRINTFORMW 「なに？オチが読めた？ ご無体な」
			ELSE
				PRINTFORMW 「あーあ、食べたいナ～♪食べたいナ～♪」
				PRINTFORMW 「このままカプリと、やわらか～い唇を――冗談だから身構えるなよ、雰囲気台没有だ」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;テンダー接吻
		IF CHECK_COM("テンダー接吻")
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW %CALLNAME:TARGET%は口を拭わないまま諦めたように体を横たえた…
			ELSEIF TALENT:恋慕
				PRINTFORMW 「っぷぅ――にひっ♪ にひひっ♪」
				CALL PRINT_STRW, @"「%TEXTR("こういうのが、好きってヤツなのかナ/最初にそういうコトされるとサ、緩んじゃうな")%_HH_」"
			ELSE
				IF RAND:2
					PRINTFORMW 「あっぶね、反射的に噛んじゃうとこだった。セーフセーフ」
				ELSE
					PRINTFORMW 「駆け付け一杯！ ってトコかな？」
				ENDIF
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF INSERT("Ｖ挿入")
					IF RAND:3 == 0
						PRINTFORMW 「ん……っ！！」
						IF RAND:3
							PRINTFORMW 反射的に強張った身体を抱き寄せて何かを言おうとした口をもう一度塞ぐ。
							PRINTFORMW 抗議するようにして何度か手を握り返されたがその力もか弱いものだった。
							PRINTFORMW やがて力が抜けきった様子の%CALLNAME:TARGET%は不機厌恶地%CALLNAME:MASTER%に鋭い睨みを投げた…
						ELSE
							PRINTFORMW 交合の合間の接吻。圆圈で情事のような甘ったるい行為には面食らった。
							PRINTFORMW それだけで胸が締め付けられて、精一杯もがこうとした。
							PRINTFORMW だっていうのに、身体は言うことを聞かずに徐々に力を拔出ザマ。酷い、全く酷い話だ。
						ENDIF
					ELSEIF RAND:2
						PRINTFORMW 「……っ……こんな風に犯して、唇まで奪うんだね」
						PRINTFORMW %CALLNAME:TARGET%は、不快そうに唇を拭うと目を細めて挑衅的笑みを浮かべた。
					ELSE
						PRINTFORMW 「んぅっ――くっ、ふふ――あ、はは」
						PRINTFORMW それまで不機厌恶地交わりを受け入れていた%CALLNAME:TARGET%が軽い口付けに急に笑い始める。
						PRINTFORMW 「%CNAME("二人称")%の満足そうな顔がね。気付いてるかい？ とても、滑稽だ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「――ああ、不快だよ」
					ELSEIF RAND:2
						PRINTFORMW 「やめてくれ。こういうことは、もっと他の子にしてくれ」
					ELSE
						PRINTFORMW 「――褒められた趣味じゃないよ」
					ENDIF
				ENDIF
			ELSE
				IF INSERT("Ｖ挿入")
					IF CEVENT("雌とかペットとか") == 0
						CALL PRINT_STRW, "「ぁ……ぅっ_HH_ あ、あぉんっ！ おぉん！！ 是！ 是カット！ カーット！！」"
						PRINTFORMW 「カット！ これ以上の%CNAME("主人")%からの接吻禁止！ ダメですヨ！ ペットじゃなくて雌になりますヨ！」
						PRINTFORMW 「わんわんわ～ん！ くぅ～んくぅ～ん！ ケーンケーン！！ ――今ペットの顔出来てる？ 雌じゃない？」
						PRINTFORMW 「にひっ♪ よ～しよし、これに懲りたらおせっせの最中に接吻とか止めろよばーか！」
						CALL SET_CEVENT,"雌とかペットとか"
					ELSE
						IF RAND:3 == 0
							PRINTFORMW 「いやーあの、ですネ。おせっせしてる時に%CNAME("主人")%からそういうキッスはですネ？」
							PRINTFORMW 「こほん……本気にしちゃうから、やめてくれないかな。幸せ過ぎて凄く胸が痛い」
							CALL PRINT_STRW, "「んっ……_HH_ ちょ、っと_HH_ 何で、大きく……ぁっ_HH_」"
						ELSEIF RAND:2
							PRINTFORMW 「%CNAME("主人")%ってサ、ホント坏心眼っていうかーガキンチョでございますネ？」
							PRINTFORMW 「いーやーだー！ もっとフザケたいんですヨ～こっちは～！ お性交の最中に接吻とかマジじゃねぇか馬鹿！！」
							CALL PRINT_STRW, "「え、何、マジ？ ――――ああクッソ頬緩んできやがった_HH_ はぁんもう代わりにまんこ締めてやろ！！」"
						ELSE
							PRINTFORMW 「ほんっとーにおバカ桑ですよネ、%CNAME("主人")%ってサ？駄目って言ってるだろ」
							PRINTFORMW 「っちぇーべっつに？ 怒ってませんヨ？ 接吻は？ されたいですシ？」
							PRINTFORMW 「恥ずかしいから駄目って言っただけで？ おせっせ中もずっと接吻してたいですし？」
							PRINTFORMW 「それはそれとして恥ずかしいからアマ噛みして茶ー濁しちゃ駄目ですかネ？ 駄目？ くぅーん」
						ENDIF
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「甘くは無いし、そもそも味なんて無いけれどサ」
						PRINTFORMW 「――にひっ♪ 満たされちゃうな、お腹いっぱいだ」
						PRINTFORMW 「でも、もっと欲しいな。もっと、ちょうだい？」
					ELSEIF RAND:2
						PRINTFORMW 「もう息継ぎしちゃう？ にひひっ肺活には自信があってネ♪」
						PRINTFORMW 「%CNAME("一人称")%をハァハァ言わせたいならもっと頑張りたまえヨ♪」
					ELSE
						PRINTFORMW 「あー、頭、ボーッとしてきた。酸欠、じゃないね、これ」
						PRINTFORMW 「――幸せだ♪」
					ENDIF
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「っぷぁ――酸欠になるかと思った。濃厚だネー」
			ELSEIF RAND:2
				PRINTFORMW 「ミントの香りがするだろ。口臭には気を使ってるからネ！」
			ELSE
				PRINTFORMW 「ついでに一口食べてもいーい？ 駄目？ っちぇー、イケず」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;阴部愛撫
;阴蒂の場合にはCHECK_COM("陰核愛撫"), 阴部の場合にはCHECK_COM("阴部愛撫"), 恥丘ならCHECK_COM("恥丘愛撫")がONになる
;-------------------------------------------------
IF SELECTCOM == 7
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「ん、ふっ……なんだい、今更。そこが気になるの？」
			PRINTFORMW 「好きにすれば良い、抵抗は不会。恭順もしてやらないけれど」
		ELSE
			PRINTFORMW 「にひひっ♪ デリケートなトコロだからネ、やさしーくしておくれよ？」
			PRINTFORMW 「あんまり痛いとキャンキャン鳴いちゃうぜ、キャンキャン」
		ENDIF
	;二回目以降
	;中出し後にお掃除
	ELSEIF CHECK_COM("擦拭")
		;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「厚かましいな。すごく不快だ」
				ELSEIF RAND:2
					PRINTFORMW 「温柔的してるつもり？ だとしたら見当違いだよ」
				ELSE
					PRINTFORMW 「なんのつもりか知らないけれど好きにすれば良いよ」
					PRINTFORMW 「もう落ちることも無いだろうしね」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「い、いや～別に、態々拭いてもらわなくても良いんですヨ？」
					PRINTFORMW 「%CNAME("主人")%の手を煩わせるまでも無いと言いますかネ――恥ずかしいんですネ、是」
					PRINTFORMW 「おい何で干劲变成了、近づくな！ 待て！ 待って！！ あぁん滅茶苦茶丁寧！！」
				ELSEIF RAND:2
					PRINTFORMW 「害羞というのも%CNAME("一人称")%にはあるのですヨ、ええ、ええ」
					PRINTFORMW 「自己やりますがよろしいですか！！ 駄目ですか！ 是服従のポーズ！」
				ELSE
					PRINTFORMW 「エロいっていうか単純に恥ずかしいんだよネ、これ」
					PRINTFORMW 「ん、拭いても別のヌルヌルが出てくるって？ ――そういうことですヨ！！」
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「汚したら拭く、%CNAME("主人")%は偉いネ～♪」
			ELSEIF RAND:2
				PRINTFORMW 「おいおい、吹き残しがあるぜ。ちょっとティッシュ貸してごらんよまったく」
			ELSE
				PRINTFORMW 「お、態々有がたいネ、結構気持ち悪いんだなこれが」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					CALL PRINT_STRW, "「ひぅっ_HH_ こほん――違う、痛かっただけだ」"
					PRINTFORMW 「い、痛い上に不快だなんて、非道い仕打ちをしてると思わない？」
				ELSEIF RAND:2
					PRINTFORMW 「別に、何も感じないな」
					PRINTFORMW 「%TEXTR("――ふふっ、苛立ってる？ 少し雑变成了ね、好い気味だ/感じないって、言ってるだろ。その手付きやめろよ")%」
				ELSE
					PRINTFORMW 「湿的てきた？ そう、正常な反応だろう」
					PRINTFORMW 「なんとも%CNAME("一人称")%らしくて慎ましいじゃないか、%CNAME("二人称")%と違って」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「はふっ_HH_ ひぁ――_HH_ ちょ、ちょっと刺激が強くないかい？」"
					PRINTFORMW 「え、特に触り方変えてない？ ――あ、なるほど、%CNAME("一人称")%の方が媚てんのか」
				ELSEIF RAND:2
					PRINTFORMW 「そーれ服従のポーズ♪ 良いんだぜ、好きに嬲っちゃってサ！！」
					CALL PRINT_STRW, "「――っ_HH_ あ、こら、温柔的するのはナシだ！ 甘える！ 体が勝手に甘える！！」"
				ELSE
					PRINTFORMW 「んふっ♪ ソコ、触りたいのかい？」
					CALL PRINT_STRW, "「しょ～がないな～_HH_ 求められたとあっちゃあ忠犬的にはワンワンですヨ♪」"
				ENDIF
			ENDIF
		ELSE
			IF MARK:屈服刻印 >= 2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「あぁ～ん、うふ～ん、いや～も～やめて～！ つって――んひゃっ_HH_」"
					PRINTFORMW 「――い、良い演技だったろ、こりゃ主演女優賞ねらえるネ！」
				ELSEIF RAND:2
					PRINTFORMW 「ちょっとタンマだ%CNAME("主人")%ヨ！」
					PRINTFORMW 「OKOK、落ち着こう。このままだと%CNAME("一人称")%は変な声を出す、手を引こう。イイネ？」
					CALL PRINT_STRW, "「ヨシ――ってこんなこと言ったらやめないですよねきゃぁンっ_HH_」"
				ELSE
					PRINTFORMW 「そうそうお擅長お擅長♪ ん？ 余裕そうだ？」
					PRINTFORMW 「あぁん！！ うふ～ん！！ ヨシ、これでどうだ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「下手くそは激烈地イジりゃ良いと思ってるんだから困っちゃうよネ」
					PRINTFORMW 「そもそも他とヤった経験無いんだけどサ！！」
				ELSEIF RAND:2
					PRINTFORMW 「んー？ 何見てるってそりゃあネ、忙しなく動いてる%CNAME("二人称")%の指ですヨ」
					PRINTFORMW 「いや～%TEXTR("お腹空いた/美味しそうだ/今日のごはん決まった")%ナー」
				ELSE
					CALL PRINT_STRW, "「んっ――_HH_ っふふ、ああ、今のは良かったネ♪」"
					PRINTFORMW 「その調子だぜ%CNAME("主人")%ヨ♪ 頑張れ頑張れ♪」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;指挿入
;CHECK_COM("玩弄Ｇ点")とTEQUIP:振動棒で大きく分岐する
;-------------------------------------------------
IF SELECTCOM == 8
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;振動棒挿入中
		IF TEQUIP:振動棒
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「ははっ、突っ込まれるだけならマシだったのに」
				PRINTFORMW 「わざわざ掻き回すだなんて良い趣味をしているよね」
			ELSEIF TALENT:恋慕
				CALL PRINT_STRW, "「にひっ_HH_ 前シッポ動かす？ 動かしちゃう？」"
				CALL PRINT_STRW, "「あんまり痛くしちゃ駄目だぜ。あ、ごめん嘘ついた。痛い位が好きだ_HH_」"
			ELSE
				PRINTFORMW 「へいへい、%CNAME("主人")%ヨ。もしかしてコレ動かそうっていうのかナ？」
				PRINTFORMW 「マジかよ%CALLNAME:TARGET%酱壊れちゃーう！」
			ENDIF
		;それ以外
		ELSE
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「抵抗は不会、今更指挿入る位好きにすれば良いだろう？」
			ELSEIF TALENT:恋慕
				PRINTFORMW 「お、なんだい食べさせてくれるの？ その指温柔的食べてあげよう♪」
				CALL PRINT_STRW, @"「うーん違う、こうじゃないな――食べさせて、%CNAME("主人")%_HH_」"
			ELSE
				PRINTFORMW 「っちぇー、どうせなら上のお口で食べたいんだけどナ。ま、良うござんしょ。」
				PRINTFORMW 「上も下もグルメってトコ見せてあげますヨ！下のグルメがなんなのかは知らんけど！！」
			ENDIF
		ENDIF
	;二回目以降
	;Gスポット刺激
	ELSEIF CHECK_COM("玩弄Ｇ点")
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				CALL PRINT_STRW, @"「%TEXTR("ぐっぅぅ/はひっ/んはぅっ")%――_HH_ はぁ、はぁ――%TEXTR("なんだよ、そういうつもりで弄ったんだろう/その目、やめろよ/ああ、感じた、感じたさ")%」"
				IF RAND:3 == 0
					PRINTFORMW 「おめでとう、%CNAME("一人称")%は最悪の気分だけどね」
				ELSEIF RAND:2
					PRINTFORMW 「無抵抗な弱いところばっかり弄んで、悦に浸るのは楽しいかい？」
				ELSE
					PRINTFORMW 「おめでたいな、%CNAME("二人称")%は」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, @"「%TEXTR("あひ/はひ/んん/んぁ゛/あ゛ぁ")%_HH_ ま、待っただ%CNAME("主人")%ヨ！ んっ、で、出る！ なんか出る！！」"
					PRINTFORMW 「おしっこ的な何かが出る！ ん、自分が掃除から良い？ そ、そっかーならヨシ！ じゃない！ 止めて！！」
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「%TEXTR("はひゃひゃひゃ/あ゛っ、ひははっ/んぶっぷっん゛っふふっ")%_HH_ ひひっ、ひぃ――やっべ、き、気持ち良すぎて笑えてきた_HH_」"
				ELSE
					CALL PRINT_STRW, @"「はっ、ぁっ、あのネ、%CNAME("主人")%ヨ。ソコばっかり弄られるとあんまりふざけられなくてこまっ_HH_」"
					CALL PRINT_STRW, "「は、ひぃ_HH_ だ、だから_HH_ ――困るって言ってるんだけどなァン_HH_」"
				ENDIF
			ENDIF
		;気持ちいい
		ELSEIF CHECK("指挿入")
			IF RAND:3 == 0
				CALL PRINT_STRW, "「あー困ります！ 困りますお客様！ 弱いところばかりイジるのはこまっ――ひっ_HH_」"
				PRINTFORMW 「あのネ！まともにふざけられなくて本当に困るんだけどナ！？」
			ELSEIF RAND:2
				PRINTFORMW 「しっ、刺激很强ナ。あんまり強くやらないでくれよ？」
				CALL PRINT_STRW, "「んっふっっ_HH_ 話聞いてましたかネ！？」"
			ELSE
				PRINTFORMW 「んっ――あっ、うっ――他人の喘ぎ声を笑うな！！」
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「お、おぉ？ おぉーん――気持ち良いっていうか違和感、だネ？」
				PRINTFORMW 「もう少し慣れたらマシになるのかナー、続けたまえよ」
			ELSEIF RAND:2
				PRINTFORMW 「ん、もう少しゆっくりやってもらっていいかナ、ちょっと苦しい」
			ELSE
				CALL PRINT_STRW, "「話じゃもっとこうあぁ～ん_BH_ ってなるはずなんだけどナ」"
				PRINTFORMW 「実際は――うん、ぶっちゃけ違和感強くてそれどころじゃない」
			ENDIF
		ENDIF
	;振動棒挿入中
	ELSEIF TEQUIP:振動棒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「突っ込んで、掻き回して、忙しいね。やめたら？」
				ELSEIF RAND:2
					PRINTFORMW 「ははっ、玩具で犯して満足？滑稽だなぁ」
				ELSE
					PRINTFORMW 「もしかして征服感なんてものを感じてたりするのかな。だとしたら笨蛋だね」
					PRINTFORMW 「これは玩具で%CNAME("二人称")%じゃない。幾らも気が楽だよ、自慰と変わらないんだから」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「どうせならぐっちゃぐっちゃに動かしておくれよ。玩具でも%CNAME("二人称")%の手なら悪くない♪」
				ELSEIF RAND:2
					CALL PRINT_STRW, "「んふっ_HH_ こーんな玩具にゴリゴリされてナいちゃいそうだぜ」"
					PRINTFORMW 「折角解してるんだからサ、モチロンこの後もあるんだよネ？」
				ELSE
					CALL PRINT_STRW, "「ぁ――_HH_ に、ひひっ_HH_ どうしようかな、笑けてきた」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%の前シッポ、どうしてくれるのかナ_HH_」"
				ENDIF
			ENDIF
		;気持ちいい
		ELSEIF CHECK("振動棒")
			IF RAND:3 == 0
				CALL PRINT_STRW, "「どうぞお好きに_BH_ せっかく生えた玩具の前シッポだもんネ、使わなきゃ損だものサ」"
			ELSEIF RAND:2
				PRINTFORMW 「んっ――作りモノでも大したモンだ。そりゃあ愛用さるよネー」
			ELSE
				PRINTFORMW 「へいへいかもーん！ 今なら%CALLNAME:TARGET%の前シッポ弄り放題だぜ！」
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「へいへい%CNAME("主人")%ヨ、このままこの前シッポを無遠慮に動かすなら%CNAME("一人称")%は遠慮無く噛むぜ」
			ELSEIF RAND:2
				PRINTFORMW 「んっ、いったいなぁ！！ 慣れてないんだからそんなに動かしてくれるなヨ」
			ELSE
				PRINTFORMW 「キャンキャン！！ くぅ～ん！ ワンワン！！ ――犬語の抗議じゃわかんねぇか。痛いぜ畜生ってことサ」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「痛いよ、下手くそ」
				ELSEIF RAND:2
					PRINTFORMW 「怖気がする。抜いてくれ」
				ELSE
					PRINTFORMW 「異物感が很强んだ。出来ればさっさと満足して欲しい」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「ni↘ひひ_HH_ いやぁ、ネ。この入って来る感覚好きなんだよネ」"
					PRINTFORMW 「あ、うーん、ちょっと違うナ――%CNAME("二人称")%が入ってくる感覚が好きなんだ♪」
				ELSEIF RAND:2
					PRINTFORMW 「指一本だけ？ もう一声、もっといっぱい食べさせてくれない？」
					CALL PRINT_STRW, "「ん――にひひっ_HH_ 駄目だ二本でも、全然足りないな_HH_」"
				ELSE
					PRINTFORMW 「あー、もうぐっちょぐっちょ音鳴らして、身体が媚びてるのモロバレだナー♪」
					CALL PRINT_STRW, "「にひっ勿論心も媚びてますとも_HH_ ワンワン_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSEIF CHECK("指挿入")
			IF RAND:3 == 0
				PRINTFORMW 「にひひっ、おまんこから出るエロい音聞いてその気になっちゃうかナ」
				PRINTFORMW 「隠しても無駄だぜ？ 何しろ%CALLNAME:TARGET%のエッチな身体だからネ！！」
			ELSEIF RAND:2
				PRINTFORMW 「結構なお点前じゃないか。もうこの街道身体が反応しちゃって困っちゃうナ」
				PRINTFORMW 「こりゃあ気合を入れて喘ぎ声を出さなきゃネ！ あっは～ん！ いや～ん！ え、うるさい？ すいませーん」
			ELSE
				PRINTFORMW 「ほらほら、どうだ%CALLNAME:TARGET%酱のナカはヨ！」
				PRINTFORMW 「あぁ～%CALLNAME:TARGET%のナカ温かいナリ～とかサ、そういう感想を求めます！」
				PRINTFORMW 「いや、本当に言われても困るけど！！思ったよりキモいな！！」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「こらこら、一応人类なんだぜ%CNAME("一人称")%も」
				PRINTFORMW 「慣れてなきゃ痛いは痛いってことサ。普通の子にやったら嫌われるぜこういうの」
			ELSEIF RAND:2
				PRINTFORMW 「流石%CNAME("主人")%！ テクニシャン！ 全然痛いので一回抜いてもらって良いですか！！」
			ELSE
				PRINTFORMW 「うっふ～ん！ いや～ん！ あぁ！ だめぇ！！」
				PRINTFORMW 「喘いでりゃ痛くないと思ったけどそうでもないナ」
			ENDIF
		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
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開菊穴
;-------------------------------------------------
IF SELECTCOM == 14
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道指挿入
;-------------------------------------------------
IF SELECTCOM == 15
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;跳蛋
;-------------------------------------------------
IF SELECTCOM == 30
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「その小小的玩具で今度はどう弄ぼうってハラだい？」
			PRINTFORMW 「ははっ、まぁ想像はつくけれど――どうでも良いか」
		ELSE
			PRINTFORMW 「話には聞いてるけれど実物を見るのは初めてだナ」
			PRINTFORMW 「ほー、ほうほう、ここがスイッチ？ うぉお！？ めっちゃ震えてる！！ お、お～！ なんか感動するネ」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「触られないのは良いけれど、音も相まって鬱陶しいな」
				ELSEIF RAND:2
					PRINTFORMW 「感じないよ。感じない。何を期待しているの？」
				ELSE
					PRINTFORMW 「ぁっ――何か？」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「えー、ペット的には減点ですヨ%CNAME("主人")%」
					PRINTFORMW 「何でって顔は禁止です。可愛いペットはお触りを希望です。ツーンです」
					CALL PRINT_STRW, "「だからそんなもの使われても――ぁふっ_HH_ ままならんネ！！」"
				ELSEIF RAND:2
					PRINTFORMW 「気に入らないナー！ そんなもんでペットを満足させられるっていうんですか、えぇ！？」
					CALL PRINT_STRW, "「憤怒ました！ 可愛いペットはそんな玩具に負けまひっ_HH_ ちょ、いきなり最強はやめてくださいヨっ_HH_」"
				ELSE
					PRINTFORMW 「もー、ソレでされるの好みじゃないって言ってるのにナー」
					PRINTFORMW 「どうせ気持ちよくなるだろうって？ ぶーぶー！ そういう問題じゃないんだヨ」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF ABL:Ｃ感覚 >= 3
				IF RAND:3 == 0
					PRINTFORMW 「んっ、んんぅ、浮く！ 腰が浮く！ 容赦ないな！！」
				ELSEIF RAND:2
					PRINTFORMW 「へい、へい、%CNAME("主人")%ヨ、気持ち良いよ、気持ち良いんだけどサ」
					PRINTFORMW 「もう少し加減して当てて貰って良いですか！ クッソ汚く喘ぐぞ！」
				ELSE
					PRINTFORMW 「んっふっ、ぁっ――わ、ワンワン！ きゃん！ くぅ～ん！」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「くふふっ――いやごめんよ」
					PRINTFORMW 「真剣な顔で当ててる%CNAME("主人")%があんまりにおかしくてサ」
				ELSEIF RAND:2
					PRINTFORMW 「う゛う゛う゛う゛う゛う゛う゛う゛う゛う゛う゛ー」
					PRINTFORMW 「なんか癖になってきた」
				ELSE
					PRINTFORMW 「はっはっは、すっげえくすぐったい。本当に使い方合ってるのかい？」
				ENDIF
			ENDIF
		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 SELECTCOM == 65 && TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					TRYCALLFORM TRAIN_MESSAGE_COM{SELECTCOM}
					PRINTL
					PRINTFORMW 「っ――ああ、痛いな」
					PRINTFORMW 「どうしたんだい？ いつ何処で捨てたって良いだろう」
					PRINTFORMW 「%CNAME("一人称")%の勝手サ」
					CALL SET_CEVENT, "ささくれ処女喪失"
				ELSE
					PRINTFORMW 「さて、%CNAME("主人")%。%CNAME("一人称")%は怒ってマス。何故でしょーか！！」
					PRINTFORMW 「是シンキングターイム5秒！！ちゃらららら～ん終わり！不正解！！」
					PRINTFORMW 「なーんで%CNAME("二人称")%のペットである%CNAME("一人称")%が！まだ！処女！！ヴァージン！！なのかな！？」
					PRINTFORMW 「ど～せ他の女性ノコや男性ノコにはヨロシクくれてやってんだろぉ～あぁ～ん？」
					PRINTFORMW 「そのお情けをサ～何でいつまで経っても%CNAME("一人称")%にくれないのかな？えぇ？ 言ってみろヨ！」
					PRINTFORMW 「魅力がないか！？ 胸部は嫌いか！？ ペットとエッチはNGな領帯プか！？ いやそもそもヘタレか！！」
					PRINTFORMW 「ってナわけでですネ、そんなヘタレな%CNAME("主人")%のためにペットが一肌脱掉羽目になってるのよサ」
					PRINTFORMW 「何か言いたいこと有ますかー有ませんねー受け付けませーん可愛いペットは大変お憤怒でーす」
					PRINTFORMW 「っちぇー、どうせなら%CNAME("主人")%から情緒たっぷりに誘われたかったのにナー」
					CALL PRINT_STRW, "「ま、いっか――にひひっ♪ お預けされた分、美味しく頂いちゃいますヨ_HH_」"
					PRINTFORMW 「差し当たっては痛いらしいからキチンと手を握ってて頂いても？」
					PRINTL
					TRYCALLFORM TRAIN_MESSAGE_COM{SELECTCOM}
					CALL TEXT, "追加地の文：Ｖ挿入後"
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「えーっと、おちんちんの位置はっと―――よぉーしそれではこれより姦通式を始める！！」
				PRINTFORMW 「ぼーっとするなよー%CNAME("主人")%、貴重な乙女の処女喪失の瞬間だぜ？」
				PRINTFORMW 「%CNAME("一人称")%もね、色々考えたんですヨ。エッチなコトするってなった辺りからサ」
				PRINTFORMW 「%CNAME("主人")%のペットとしちゃあここは処女位スパっと捨てなきゃお話にならないナ～ってネ」
				PRINTFORMW 「というコトでネ、ここらでスパっとちゃちゃっと捨てちまおうかと」
				PRINTFORMW 「いや～なんて主人思いなペットなんでしょ！あ、ここ感動に泣くトコロだぜ」
				PRINTFORMW 「それじゃあ、さらばヴァージン！こんにちはビッチ！！ せ～のっ――いっ゛っ゛っ゛っ゛！！」
				PRINTFORMW 「――ふ、ふふ。入ったケド、気持ち良いかい。それは良いんだけど、動くのは待ってくれよ」
				PRINTFORMW 「思ったより痛くて、腰が動かねぇや」
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「――ああ、そうかい。良いさ処女くらい、勝手にしてくれ」
					PRINTFORMW 「もしかして甜言蜜语だったり嫌がる言葉でも期待してたのかな？」
					PRINTFORMW 「それは残念だネ。嫌いなのにそんな反応見せてやる必要もないだろ」
					PRINTFORMW 「やれよ、%CNAME("二人称")%のソレで貫いて、征服した気にでもなると良いサ」
					PRINTL
					TRYCALLFORM TRAIN_MESSAGE_COM{SELECTCOM}
					CALL TEXT, "追加地の文：Ｖ挿入後"
					CALL SET_CEVENT, "ささくれ処女喪失"
				ELSE
					PRINTFORMW 「ほっほーようやくお気づき成为了か、%CNAME("主人")%」
					PRINTFORMW 「そう、何を隠そう%CNAME("二人称")%の忠実なペット%CALLNAME:TARGET%は処女！！なのですヨ」
					PRINTFORMW 「なんで今の今まで奪ってないんだ？ とかサ、もしかしてヘタレか？とかサ」
					PRINTFORMW 「もういっそこっちから襲ってブチ破ってやろうかナなんて考えたことも有ましたとも」
					PRINTFORMW 「いやー良かった良かった、無事%CNAME("主人")%に捧げられそうで安心してますヨ」
					PRINTFORMW 「ん？ そんなにこだわりが無いかと思われてたかい？」
					PRINTFORMW 「にひひっ♪ 人は変わるもんだろ、%CNAME("一人称")%みたいな化物だって変わるのサ」
					PRINTFORMW 「あ、でも%CNAME("一人称")%は慎ましい生き物だからナー」
					PRINTFORMW 「%CNAME("二人称")%が%CNAME("一人称")%の初めてになってくれるのなら、贅沢過ぎて死んじゃうかも」
					PRINTFORMW 「だから死んじゃわないように手を握っておくれよ」
					PRINTFORMW 「そうしたら、きっと%CNAME("一人称")%は――死んでられない位に、幸せだからサ♪」
					PRINTL
					TRYCALLFORM TRAIN_MESSAGE_COM{SELECTCOM}
					CALL TEXT, "追加地の文：Ｖ挿入後"
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「お、なんだいなんだい、もしかして姦通式？」
				PRINTFORMW 「なるほど、いや、構いやしないのだけれどサ。伝えなきゃいけない事があるんだけど」
				PRINTFORMW 「処女――なんだよ。そう、ヴァージン。オボコ。好きなように呼んでくれ」
				PRINTFORMW 「女性ノコ的にはこれ大事にしなきゃいけないだろう？」
				PRINTFORMW 「そう、大事なのは素敵な処女喪失！情緒ある散華！荒ぶるハネムーン！ひと夏のアヴァンチュール！！」
				PRINTFORMW 「%CNAME("二人称")%にそれが出来るというのかい！？ 出来る！？ よし、じゃあ一発ヤッてみよう！！」
				PRINTFORMW 「いや、色々言ったけどぶっちゃけどうでも良いなってサ、ちょちょいのぱっぱと散らしちゃおう」
				PRINTFORMW 「はーいおいで～おちんち～ん♪入り口はこっちだよ～♪ さぁさ、ズンっと一発ズッポリ！いや尾巴り！！」
				PRINTL
				TRYCALLFORM TRAIN_MESSAGE_COM{SELECTCOM}
				IF CUP:苦痛 >= 300
					PRINTL
					PRINTFORMW 「ン――？ そう言えば処女喪失って確か―――痛っいなぁああ！！！！」
					PRINTL
				ENDIF
				CALL TEXT, "追加地の文：Ｖ挿入後"
			ENDIF
		ENDIF
	;非処女
	ELSE
		IF SELECTCOM == 65 && TEQUIP:推倒
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「どうせ随意奪われたんだ、初めてなんてそんなモノなんだろう？」
					PRINTFORMW 「だからコレも適当さ。情も何も無い、作業的にヤってやるよ」
				ELSE
					PRINTFORMW 「はっはっはー%CNAME("主人")%ヨ、色々言いたいことが詰まってるコトはご承知かナ？」
					PRINTFORMW 「な、ん、で！！なんでその槍で城門突破しなかったんだよォ！！ヘタレか！？ヘタレなのかい！？」
					;PRINTFORMW 「你の钻頭で%CNAME("一人称")%を突けよ！処女膜という天元を突破しろよ！！天元ってなんだよぉ！！」
					PRINTFORMW 「下準備が必要かと思ったのかい！？ そこは見ろよ！！ 夢を！！ 処女でもアヘアヘするかも知れないだろ！？」
					PRINTFORMW 「というコトでペットは大変お憤怒です。そのヘタレた槍を鍛え直してやる」
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「にひっ♪ 丁度処女も無いことだしネ」
				PRINTFORMW 「ここらでパッ阴蒂下のお口でも食べてあげようかなってサ♪」
				PRINTFORMW 「ほーら入っちゃうぞ～良いのかナ～食べちゃうぞ～♪」
				CALL PRINT_STRW, "「んっ――_HH_ にひひっ、食ーべちゃった_HH_」"
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「随意奪っておいて、今度は気持ち良くなろうって？」
					PRINTFORMW 「ふーん――やると良いサ、喘ぐなんて夢物語だけどネ」
				ELSE
					PRINTFORMW 「性交するって言われてむすーっとしてます、ペットです、どうぞヨロシク」
					PRINTFORMW 「何をむすーっとしてるかは聞かないでおくれよ。いや、聞いてくれ」
					PRINTFORMW 「こんなに、こんなにだよ？こんなに%CNAME("主人")%に忠実なペットの%CNAME("一人称")%のサ」
					PRINTFORMW 「こーんなに可愛いペットの処女膜をそのおちんちんで破らなかったっていうのはどういうことだい？」
					PRINTFORMW 「はー、やり直し！やり直しを要求する！今が処女喪失だ！よっしゃバッチ来い！！」
					PRINTFORMW 「あ、甜言蜜语忘れるなよ！ 手も握ってくれ！ そして接吻だ！」
					PRINTFORMW 「んっ――にひひっ♪ よぉ～し来い！！」
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「およ、ついに姦通？ いや、膜破れてるから姦通でも無いのか」
				PRINTFORMW 「慣らし運転は終わってるからネ、これからはハロービッチ！ですヨ」
				PRINTFORMW 「ほーれ来い来いおちんちん♪ こっちの水はあーまいぞっと♪」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ｖ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOMS("Ｖ挿入") == 0 && FIRSTCOM(SELECTCOM)
	;巨根
	IF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「尺寸も相まって醜悪だね。それをナカに入れると思うとゾッとする」
			PRINTFORMW 「やるなら一思いにやってくれヨ、悲鳴の一つも上げてやらないから」
		ELSE
			PRINTFORMW 「ほっほー、ホント、おっきなおちんちんだコトで」
			PRINTFORMW 「にひひっ♪ 遠慮是らないぜ？ サイズが合わなきゃ合うまで付き合うからサ♪」
			PRINTFORMW 「%CNAME("一人称")%を、しっかり%CNAME("主人")%のサイズに躾けておくれよ♪」
		ENDIF
	;恋慕
	ELSEIF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			SELECTCASE SELECTCOM
			;騎乗位
			CASE 65
				PRINTFORMW 「言われた街道にはするよ、ペット――だからネ」
				PRINTFORMW 「でもあまり期待しない方がいいな」
			;対面座位
			CASE 63
				PRINTFORMW 「あまり、うん。あまり好きじゃないな、この体位」
				PRINTFORMW 「顔が近い――近過ぎる。健全じゃないよ」
			;後背位
			CASE 61
				PRINTFORMW 「へぇ、从后面将？ 好きにすれば良いよ」
				PRINTFORMW 「%CNAME("一人称")%も%CNAME("二人称")%の顔を見なくて済むからせいせいする」
			;それ以外
			CASEELSE
				PRINTFORMW 「%CNAME("二人称")%を嫌ってる女相手でも関係無いんだね」
				PRINTFORMW 「他意は無いよ。そういう人类なんだなぁって思っただけサ」
			ENDSELECT
		ELSE
			IF CEVENT("ささくれ処女喪失") && RAND:3 == 0
				IF CEVENT("黒歴史処女") == 0
					PRINTFORMW 「う、ちょっと古傷が疼いたというかネ」
					PRINTFORMW 「初めての時に――うん、控えめに言ってツンツンしてただろう？」
					PRINTFORMW 「たま～に思い出してのたうち回ると言いますかネ、うわぁあああってなるうわぁあああ」
					PRINTFORMW 「ほ～らうわぁあああってして来たぞうわぁああああ！！是、是！！この話終わり！！」
					PRINTFORMW 「%CNAME("主人")%！！ 早くそのおちんちんを挿入れるんだ！！ 恥ずか死してしまうから！！ 早く！！」
					CALL SET_CEVENT, "黒歴史処女"
				ELSEIF RAND:2
					PRINTFORMW 「過去の過ちによって傷心の可愛いペットこと%CALLNAME:TARGET%酱は%CNAME("主人")%のおちんちんを求める！」
					PRINTFORMW 「果たして想い人からの淫らな快楽によって過ちを塗り替えることは出来るのか！乞うご期待！！」
					PRINTFORMW 「――よし、ひとしきりふざけたら落ち着いた。さぁバッチ来い！！」
				ELSE
					PRINTFORMW 「古傷が～古傷が疼く～助けておくれ%CNAME("主人")%～」
					PRINTFORMW 「おちんち～んおーちんち～ん！ おちんちんをブチ込むんだよ～早く～！」
					PRINTFORMW 「え、情緒が台没有？煩いよ！！こうでもしないと死んじゃうんだよ！恥ずかしさで！！」
				ENDIF
			ELSE
				SELECTCASE SELECTCOM
				;騎乗位
				CASE 65
					CALL PRINT_STRW, @"「ni↘ひひ_HH_ 食べられるのがお好きかナ、%CNAME("主人")%ヨ_HH_」"
					CALL PRINT_STRW, @"「奇遇だネ、%CNAME("一人称")%も%CNAME("二人称")%を食べるのが大好きなんだ_HH_」"
				;対面座位
				CASE 63
					CALL PRINT_STRW, @"「おいおい良いのかい%CNAME("主人")%ヨ_HH_」"
					CALL PRINT_STRW, @"「ちょーっとした動きで%CNAME("二人称")%を食べちゃえる体位じゃないか_HH_」"
					CALL PRINT_STRW, "「――でも今はお肉よりお熱いのが欲しいナ_HH_ 可愛いペットのお腹、一杯にしてよ_HH_」"
				;後背位
				CASE 61
					PRINTFORMW 「ほっほー！ わんわんス領帯ルスタート！流石%CNAME("主人")%お目が高い！」
					PRINTFORMW 「わんわんス領帯ルは全%CALLNAME:TARGET%の間でも絶賛されてる体位なのサ！」
					CALL PRINT_STRW, @"「%TEXTR("わんわんっ/わふわふっ/くぅ～ん")%_HH_ ほ～ら、尾巴振って待ってるんだからは～や～く～_HH_」"
				;それ以外
				CASEELSE
					CALL PRINT_STRW, @"「にひひっ_HH_ ヨロシクね、%CNAME("主人")%_HH_」"
					PRINTFORMW 「ちょっとくらい改まったって良いだろ？ この辺で慎ましさアピールしたいし」
					CALL PRINT_STRW, @"「それに%CNAME("二人称")%との性交は、何回ヤったってトクベツなんだ_HH_」"
				ENDSELECT
			ENDIF
		ENDIF
	;それ以外
	ELSE
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 65
			PRINTFORMW 「お、%CNAME("一人称")%が上が先なんだネ」
			PRINTFORMW 「ふぅ～ん、へ～♪ い～い眺めだコト♪ やっぱり美味しそうない～いカラダしてるよネ～♪」
			PRINTFORMW 「――じゅるり、おっと危ねえ忠犬忠犬、わんわん♪」
		;対面座位
		CASE 63
			PRINTFORMW 「迂闊だネ、%CNAME("主人")%はサ」
			PRINTFORMW 「もしかしてこんな距離で什麼也不做と思ってる？ ざーんねん」
			CALL PREDATION_T("調教中つまみ食い")
		;後背位
		CASE 61
			PRINTFORMW 「っちぇー扱いを良く解ってらっしゃるなーこれじゃつまみ食いも出来やしない」
			PRINTFORMW 「わんわんっ！抗議するぞ抗議！」
		;それ以外
		CASEELSE
			PRINTFORMW 「お性交？ にひっ、%CNAME("一人称")%を食べたいのかい？」
			CALL PRINT_STRW, "「良いとも～！だ～け～ど――食べられないように気をつけろよ_BH_」"
		ENDSELECT
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ｖ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:手下留情 && NOWEX:Ｖ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				CALL PRINT_STRW, @"「――%TEXTR("は、ぅ/う、く/ぁ")%っ_HH_」"
				PRINTFORMW 「く、ぅ――いっちょ前に挑逗てる、つもり、かい？」
				PRINTFORMW 「――はぁ、はぁ――はは、滑稽で、大変結構だ」
			ELSE
				CALL PRINT_STRW, @"「%TEXTR("わふ、わふぅ/くぅ～んくぅ～んっ/あふっ、わ、ふっ")%_HH_ %CNAME("主人","かな")%～_HH_」"
				CALL PRINT_STRW, "「いつでもイけるよ_HH_ おまんこきゅうきゅうして絶対気持ち良いよ_HH_」"
				CALL PRINT_STRW, "「だからー_HH_ だからね_HH_ おアズケやめようよ～_HH_」"
			ENDIF
		ELSE
			PRINTFORMW 「%TEXTR("んふっ/え～/あらら？")%イけそうだったのに、%TEXTR("お預け/オアズケ/待て")%なのかい？」
			PRINTFORMW 「そりゃあご無体じゃあ有ませんかネ、ほら～グリグリ押し付けて给からサ～」
			CALL PRINT_STRW, "「ム・カ・エ・ゴ・シ_BH_ キャンキャン鳴かせて御覧なさいナ_BH_」"
		ENDIF
	;喜欢的体位
	;ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ｖ対応指令") && RAND:2
	;	IF TALENT:恋慕
	;		PRINTFORMW
	;	ELSE
	;		PRINTFORMW
	;	ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位"
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「この体位は嫌いだ、%CNAME("二人称")%の顔がよく見える」
					ELSEIF RAND:2
						PRINTFORMW 「恋人でも作ってその子とヤれば良い。いい思い出になるだろう」
					ELSE
						PRINTFORMW 「抵抗しないからって受け入れられてると思ってる？ 安直だね」
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「お～いおい、睦言とか甜言蜜语とか足りてないぜ～%CNAME("主人")%ヨ～_HH_」"
						PRINTFORMW 「ほら、耳元で！ 大好きとか！ 愛してるとか！クッソ月並みな言葉で良いから！！」
						CALL PRINT_STRW, "「――ni↘ひっ_HH_ いひひっ_HH_ やっべ今心が排卵した_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, @"「%TEXTR("んっ/んふっ/にひひっ")%_HH_ この体勢は%CNAME("一人称")%の為に必死に腰を振る%CNAME("二人称")%が見れて大変気分がイイな♪」"
						CALL PRINT_STRW, @"「%TEXTR("ぎゅふっ/わふぅっ/きゃぁんっ/あふんっ")%_HH_ こ、こら～急にイイトコロに当てるのは条約違反だろう！？」"
					ELSE
						CALL PRINT_STRW, @"「ni↘ひっひ_HH_ ね～え、%CNAME("主人")%_HH_」"
						CALL PRINT_STRW, @"「%CNAME("一人称")%は%CNAME("二人称")%が好き_HH_ %TEXTR("愛してる/好き/大好き")%_HH_ %TEXTR("愛してる/好き/大好き")%_HH_」"
						CALL PRINT_STRW, "「シてる間ずぅっと言って给。ずっと、伝えさせて_HH_――そういう体位だろ_HH_」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「およ？ 手を繋ぐかい？ 良いとも良いとも♪」
					PRINTFORMW 「いや～恋人みたいだネ♪ 彼氏居たことないけどサ！！」
				ELSEIF RAND:2
					PRINTFORMW 「んっ、ふぅっ、んんっ、これ、結構奥まで届君だネ？」
				ELSE
					PRINTFORMW 「圆圈でお皿に乗っかった料理の気分だ、新鮮新鮮♪」
					PRINTFORMW 「んっふ♪ 美味しく頂かれちゃうのもオツなものだネ～」
				ENDIF
			ENDIF
		CASE "対面座位"
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「これ、一番嫌いだよ。鼻息が掛かる距離だもの」
					ELSEIF RAND:2
						PRINTFORMW 「体温がウザったいな。ひっつくなよ」
					ELSE
						PRINTFORMW 「睦言でも期待してるのかな。だとしたら酷い冗談だ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「食べちゃうぞ～♪食～べちゃうぞ～♪ あ、勿論食糧的な意味で！！」
						CALL PRINT_STRW, "「ni↘ひひ_HH_ でも今はおちんちん食べちゃってるからな～_HH_」"
						CALL PRINT_STRW, "「見逃してあげまショウ！！ えら～いワンコを気持ち良くしてネ_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, @"「%TEXTR("ﾍｯﾍｯﾍｯﾍｯ/ﾊｯﾊｯﾊｯﾊｯ/ﾌｰ_HH_ﾌｰ_HH_ﾌｰ")%_HH_ えぇ、息が荒い～？」"
						CALL PRINT_STRW, "「仕方ないだろー？ こんなに近いんだぜ、ドキドキしっぱ无で――言わせんなエッチ_HH_」"
					ELSE
						CALL PRINT_STRW, @"「%TEXTR("んっ/あふっ/ひゃんっ/かひっ")%――_HH_ た、たーいむ！！」"
						CALL PRINT_STRW, @"「抱っこしながら%TEXTR("お腹/脇腹/耳たぶ/うなじ")%触るの禁止！！ %TEXTR("これ以上発情/排卵/受精")%したらどうしてくれるっ_HH_」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「%CNAME("主人")%もコリないネ～？ こりゃ頂いても良いってことかナ♪」
					CALL PREDATION_T("調教中つまみ食い")
				ELSEIF RAND:2
					PRINTFORMW 「んふふ♪ さーズップシした所でどこから食べてやろうか――にゃふっ」
					PRINTFORMW 「ちょ、揺らすな揺らすな！ ちょっと良いトコに当たって力が入らないだろ！？」
				ELSE
					PRINTFORMW 「あ！ 待てを先に言うのは反則だろう！ くっそー付け込みやがってー」
					PRINTFORMW 「っちぇー、もちろんしばらくは待ちますとも、わんわーん」
				ENDIF
			ENDIF
		CASE "騎乗位"
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「気分はどうだい？ 王様気分かな、大分滑稽だけれど」
					ELSEIF RAND:2
						PRINTFORMW 「仕返しをする気にもならないな。さっさと射精して終わらせよう」
					ELSE
						CALL PRINT_STRW, "「んっ――_HH_ 良いトコに当たることだってある、生理現象は仕方が無いだろう」"
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, "「ほ～ら、拔出時最高だろ_HH_ きゅうきゅう頑張って締めてるんだ、褒めろよ～_HH_」"
						CALL PRINT_STRW, "「ぜ～んぶ抜けちゃっても何度でも挿入して给_HH_ 外で出さないように気を付けろよ_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「良いのかい本気で動いてサ_HH_ ぜ～ったい射精するなよ？」"
						CALL PRINT_STRW, @"「%TEXTR("は/ひ/にひぃ")%っ_HH_%TEXTR("ん/んは/ひひ")%っ_HH_%TEXTR("あは/んん/んひ")%っ_HH_ ――ちょ、たんまたんま！！」"
						CALL PRINT_STRW, @"「%CNAME("一人称")%の方が先にイっちゃいそうだからきゅうけ――%TEXTR("ひゃんっ/きゃんっ/わふっ")%_HH_ たは～、駄目、ですよネ～っ_HH_」"
					ELSE
						CALL PRINT_STRW, @"「いや～何度でも言うけどい～い身体してるよネ、%CNAME("主人")%_HH_」"
						CALL PRINT_STRW, @"「でも%CNAME("一人称")%も敗けてないぜ？ 胖次胖次しながら見せつけてやるヨ_HH_」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「%CNAME("一人称")%を上に据えといて良いのかナ？ にひひっ」
					CALL PREDATION_T("調教中つまみ食い")
				ELSEIF RAND:2
					PRINTFORMW 「んっふ♪ 中でお肉が大きくなったネ？」
					PRINTFORMW 「絶景だろう、%CNAME("一人称")%のカラダはサ♪」
				ELSE
					PRINTFORMW 「ン？ 何か気になるトコロでもあったのかナ？」
					PRINTFORMW 「血痕は気にしないでくれヨ、洗い残しだからサ」
				ENDIF
			ENDIF
		CASE "後背位"
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「落ち着くよ。%CNAME("二人称")%の顔を見なくて済む」
					ELSEIF RAND:2
						PRINTFORMW 「さっさと犬みたいに腰を振って吐き出してくれ」
					ELSE
						PRINTFORMW 「何も言うことはないよ。一番不満の無い体位だ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「%TEXTR("いや～ん/も～/こ～ら")%_HH_ %CNAME("主人")%ったら発情し過ぎ！ ケダモノ！ %TEXTR("エロワンコ/スケベ犬/種馬")%！ よっ%TEXTR("大統領/総理大臣/大英雄")%！！」"
						CALL PRINT_STRW, @"「えーっとそれから――%TEXTR("きゃんっ/んほぁっ/ひゃっ")%_HH_ ちょ、今！今ふざけてるトコだから～！」"
					ELSEIF RAND:2
						CALL PRINT_STRW, @"「ちゃ～んと腰を掴んでてくれよ？ %CNAME("二人称")%にこんな体位でヤられたらブッ飛んじゃうぜ、多分_HH_」"
						PRINTFORMW 「なに、物理的にぶっ飛ぶのかって？ それは試してみてのオタノシミ♪」
					ELSE
						CALL PRINT_STRW, @"「%TEXTR("はぁ/あぁ/あぁん/ひん")%っ_HH_%TEXTR("はぁ/きゃん/わふ/ひん")%っ_HH_ もっと、もっとちょうだい_HH_」"
						CALL PRINT_STRW, @"「%CNAME("主人")%の胖次胖次で媚び媚び%TEXTR("わんこ/ペット")%を躾けてっ_HH_」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「わんわ～ん♪ 飛びつきも出来ないわんこに胖次胖次は楽しいかにゃ～♪」
					CALL PRINT_STRW, "「んふっ_BH_ 元気でよろしいっ！！」"
				ELSEIF RAND:2
					PRINTFORMW 「くぅ～んくぅ～ん、こんなに従順なワンコになんてことを！」
					PRINTFORMW 「え、じゃあ食べないかって？ 食べるけど？」
				ELSE
					PRINTFORMW 「んっ、ん、ふふっ♪ 从后面将こわ～い息遣いが聞こえるネ～♪」
					PRINTFORMW 「どっちがワンコが解ったもんじゃない♪」
				ENDIF
			ENDIF
		CASEELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「%TEXTR("ひゃんっ/あぁっ/く、ぅっ/は、ぁ")%_HH_」"
						PRINTFORMW 「――今の声は、違う。生理現象だよ。調子に乗らないで」
					ELSEIF RAND:2
						PRINTFORMW 「ヘコヘコ腰振って、馬鹿みたいと言うよりも馬鹿そのものだね」
					ELSE
						PRINTFORMW 「%CNAME("二人称")%が嫌いだ。大嫌いだ。だから、もう――こんなこと止めてくれ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, "「きゃ～おーかーさーれーるー_HH_」"
						PRINTFORMW 「ぐぇっへっへっへ、もう逃げ場は無いぜお嬢酱」
						CALL PRINT_STRW, @"「た～す～け～%TEXTR("にゃっ/きゃんっ/わふっ/あにゃっ")%_HH_ 寸劇も許されないか！！」"
					ELSEIF RAND:2
						CALL PRINT_STRW, @"「イけない子だなー%CNAME("二人称")%は_HH_ こーの床擅長のタラシ擅長め_HH_」"
					ELSE
						CALL PRINT_STRW, @"「しっかり奥まで頼むよ？ どうせなら%CNAME("二人称")%を全部感じたい_HH_ 」"
					ENDIF
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「いやいや酱と気持ち良いですヨ？ あっは～んってネ♪」
				ELSEIF RAND:2
					PRINTFORMW 「こういう運動が良い香料になるんだよネ」
					PRINTFORMW 「ほらほら、も～っと良い汗流そうじゃないか♪」
				ELSE
					PRINTFORMW 「んふっ♪ 食べたりはしませんヨ♪」
					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:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「”正常”位でも正常ではないね」
				PRINTFORMW 「そうだろう？ こっちは圆圈で情なんて無いんだから」
			ELSE
				PRINTFORMW 「に、にひひっ――なんか緊張してら。なんでだろ」
				PRINTFORMW 「緊張解すついでに何かエロいこと囁いて貰っても？ いや、爆発しそうだしやっぱ良いや！」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「食べる準備是つでも良いですヨ？ あ、%CNAME("一人称")%が食べられる側か」
		ENDIF
	;二回目以降
	ELSE
		IF CHECK_COM("立位")
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「鼻息が荒いな、鬱陶しいから顔だけでも離してくれない？」
				ELSE
					PRINTFORMW 「もっと密着していいぜ？ というかしようじゃないか」
					PRINTFORMW 「折角立ちながらヤってるんだからサ、ペットの重み感じなヨ」
					PRINTFORMW 「――いや、重くないよ！ 重くないって言えよ！！」
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「そうやって無防備な肩を見せるのはNGだ。腹が減って仕方がない」
			ENDIF
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「手を握ろうとしないで、気持ち悪い」
				ELSE
					CALL PRINT_STRW, "「はぁ、はぁ――_HH_ 腰靈活は良いけど手がお留守だぜ_HH_」"
					PRINTFORMW 「――にひっ♪ これでヨシ！」
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「にひっ――良い眺めだぜ、かぶりつきたいくらいだ♪」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;後背位。IF CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
IF SELECTCOM == 61
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「下卑た思惑が透けて見えるね、お誂え向きってやつだ」
			ELSE
				CALL PRINT_STRW, "「にひひっ_HH_ ペットっぽくて好きだぜ_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「お尻を向ければ良いのかい？ このまま挿入れる、と」
			PRINTFORMW 「ほー、これはまたワンワンし易そうな――あっ！ これつまみ食い出来ないな！？」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「お尻でも振って媚びろって？」
				PRINTFORMW 「形だけで良いなら幾らでも。それで満足する%CNAME("二人称")%を嘲られるのは悪くないね」
			ELSE
				CALL PRINT_STRW, "「わんわーん_BH_ くぅ～ん_BH_ くぅっん_HH_ んっ_HH_ ひぁ_HH_」"
				CALL PRINT_STRW, "「ぉ゛っ_HH_ ぁ゛あ゛っ_HH_ つ、強くするのはぁっ_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「頑張れーそーれいっちにー！いっちにー！」
			PRINTFORMW 「ん、うるさい？ いやぁ、気持ち良いは気持ち良いんだけど闲なもんでネ？」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;屈曲位
;-------------------------------------------------
IF SELECTCOM == 62
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「屈服してるみたいな格好も、%CNAME("二人称")%に見下されるのも、どれも最悪だ」
			ELSE
				PRINTFORMW 「これはこれは♪ にひひっ、最後までぜーんぶ受け止めてあげようじゃないか♪」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「これはまた凄い体勢だナ。う～ん結構辛いかも」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「ぐっ――う、っ――早く、終わらせてくれない？」
			ELSE
				CALL PRINT_STRW, "「はっぁっ_HH_ ひぐっ_HH_ うっ、ふふ_HH_ 奥、すっごい_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「おっふ！ ちょっ、ちょっとはペットを労ってくれてもいいんだぜっ！」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;対面座位。IF CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
IF SELECTCOM == 63
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「――嫌いだな、これ」
			ELSE
				PRINTFORMW 「ああ、これ凄いな、凄いドキドキする」
				PRINTFORMW 「こっから、動君だろ？ にひっ♪ どうなっちゃっても知らないぜ」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「お、この体位は召し上がれってことかナ？ 違う？」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「何も言わないで」
			ELSE
				CALL PRINT_STRW, "「んぁっ――ひっ_HH_ にひっ_HH_ 駄目だな、取り繕うのも難しい_HH_」"
				CALL PRINT_STRW, "「頬が緩んじゃってサ、好きだぜ、この体位―――っ_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「お預けにしても酷いと思いますがー！ んっ、誤魔化すみたいに腰揺するのはどうかと思うぜ」
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;背面座位。IF CHECK_COM("立位")で立位の場合の台詞も書ける
;-------------------------------------------------
;背面座位
IF SELECTCOM == 64
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「とんでもない体勢でさせるね、これ気に入るとでも思ったの？」
			ELSE
				PRINTFORMW 「顔も見えないんだからしっかり身体支えておくれよ？」
				PRINTFORMW 「んっ――ついでとばかりに胸部をイジる位は許容しようじゃないか！」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「なんてこった、かぶりつけないどころか見て想像も出来やしねぇ」
			PRINTFORMW 「無体にも程があるな！ 抗議する抗議！！」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「文字街道背筋が凍るよ、なんたって嫌いな人に背中を預けるんだから」
			ELSE
				CALL PRINT_STRW, @"「んっ_HH_ ふふ、後ろの%CNAME("二人称")%が見えない分、意識しちゃうネ」"
				PRINTFORMW 「今どんな顔してるんだい？ どこを触るんだい？ 聞かせてくれよ」
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「むー、この体勢%CNAME("一人称")%にトクが少なくてネ。不平の一つや二つ出てくるさ」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;騎乗位
;-------------------------------------------------
IF SELECTCOM == 65
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「逆襲だよ、逆襲。じっとしていてくれ」
				ELSE
					PRINTFORMW 「にひひっ、どうせ据え膳なら頂かなきゃ損でしょう？」
					PRINTFORMW 「大丈夫大丈夫、酱と温柔的しますとも――是ごめんなさい嘘吐きました温柔的は不行っ！」
				ENDIF
			ELSE
				PRINTFORMW 「上のお口のお預けされちゃってるからネ、下のお口で食べるしかないじゃない？」
				PRINTFORMW 「と、いうわーけーで――頂きます♪」
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「主动腰を振れと？ それでこそ”飼い主サマ”だ、感服するよ」
				ELSE
					PRINTFORMW 「にひひっ♪ %CALLNAME:TARGET%の晃动的胸部！お尻！ 全部堪能するが良いさ！」
				ENDIF
			ELSE
				PRINTFORMW 「上に乗っけて良いのかにゃ～？ にひひっ、胆量に免じて食わないけどネ。今は」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF FIND_COND("相思相愛") && TALENT:相思相愛 == 0 && RAND:2
					IF RAND:3 == 0
						PRINTFORMW 「意中の相手に少しは申し訳無いとか思わないの？ へぇ、最低だね」
					ELSEIF RAND:2
						PRINTFORMW 「犯されてる自覚は？ そうかい、恋人が可愛そうだ」
					ELSE
						PRINTFORMW 「%CNAME("二人称")%は誰でも良いんだね。ああ、気がすく思いだよ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「いつも%CNAME("二人称")%はこんな気持ちなんだね。そりゃあ気分も良いワケだ」
					ELSEIF RAND:2
						PRINTFORMW 「はは、ちょっと締めてやっただけで――気持ち悪い顔だな」
					ELSE
						PRINTFORMW 「もう少し抵抗してみせろよ。情けない」
					ENDIF
				ENDIF
			ELSE
				IF FIND_COND("相思相愛") && TALENT:相思相愛 == 0
					IF CEVENT("めすがきぺっと") == 0
						PRINTFORMW 「%CNAME("主人")%ヨ！%CNAME("主人")%ヨ～！」
						PRINTFORMW 「もしかしてサ、このまま%CALLNAME:TARGET%酱のおまんこで絞られて気持ちよ～く射精出来るとか考えてる？」
						CALL PRINT_STRW, @"「ククッ_HH_ それも吝かでは無いぜ_HH_ %CNAME("一人称")%は、ネ_HH_」"
						CALL PRINT_STRW, @"「でもサでもサ%CNAME("主人")%はサ_HH_ こ・い・び・と_HH_ 居るよネ_HH_」"
						CALL PRINT_STRW, @"「これサ、浮気性交ってヤツなんじゃないかなー_HH_ ねえ%CNAME("主人")%ヨ_HH_」"
						CALL PRINT_STRW, @"「%CALLNAME:TARGET%は確かにペットだぜ？ でもサ、雌なんだな～これが_HH_ 別の雌をアンアン_HH_ なんてサ、こりゃ浮気だろ_HH_」"
						CALL PRINT_STRW, @"「にひっ_HH_ にひひっ_HH_ 安心しろよ%CNAME("主人")%ヨ！ ナカダシしなけりゃまだ浮気じゃないらしいぜ_HH_」"
						CALL PRINT_STRW, "「だ～か～ら～_HH_ おまんこに中出して、浮気しちゃや～よ_HH_」"
						CALL SET_CEVENT, "めすがきぺっと"
					ELSE
						IF COND("要去了", PLAYER)
							IF RAND:3 == 0
								CALL PRINT_STRW, "「おらおら～頑張れヨ_HH_ 射精すんな_HH_ 悪いペットまんこに負けんな_HH_」"
								CALL PRINT_STRW, "「気張れ_HH_ 可愛いケツの穴締めろ_HH_ もっとカッコいい顔しろっ_HH_」"
								CALL PRINT_STRW, "「ひひっ_HH_　そっからなっさけないイき顔見せろ_HH_ 負けろっ_HH_ さっさと負けちまえっ_HH_」"
								CALL PRINT_STRW, "「浮気精子無責任に子宮にどぷどぷして可愛い恋人じゃなくて悪いペットを孕ませろっっっ_HH__HH_」"
							ELSEIF RAND:2
								CALL PRINT_STRW, "「だ～め_HH_ だ～めだぞ～_HH_ 射精したら浮気だぞ～っと_HH_」"
								CALL PRINT_STRW, "「ni↘ひひひ_HH_ ちょっと本気でぺっとまんこシメたくらいで切なそうな顔しな桑なヨ～」"
								CALL PRINT_STRW, "「も～っとイジメたくなっちまうだろう_HH_ おら、さっさと浮気射精してセキニン取れっ！_HH_」"
							ELSE
								CALL PRINT_STRW, "「もうびゅ～ってしたくなって来たんじゃないかナ？」"
								CALL PRINT_STRW, @"「お、まだ我慢できちゃう？ ひゅ～カッコいいぞ～_HH_ 口先だけならなんとでも言えちゃうよネ_HH_」"
								PRINTFORMW 「ちょ～っと本気出したらサ、クソザコ浮気%CNAME("主人")%チンポなんてひとたまりも無いって知ってんだぜ？」
								CALL PRINT_STRW, "「ほら、秒読みだ_HH_ 本気出すまでごー、よ～ん、さ～ん、にー、い～ち……くふっ_HH_」"
								CALL PRINT_STRW, "「おいおい、冗談だぜ？ マジで浮気する気かよ_HH_ 残念そうな顔、少しは隠したらどうだい_HH_」"
							ENDIF
						ELSE
							IF RAND:3 == 0
								CALL PRINT_STRW, "「おやおや_HH_ 鏡見せてやりたいナ_HH_」"
								CALL PRINT_STRW, "「ペットまんこに屈服します～_HH_ 僕このまんこのお嫁桑になる～_HH_って顔してるぜ？ 恋人桑のこと忘れちゃったのかナ」"
								PRINTL
								CALL PRINT_STRL, @"「くふっ_HH_ 嘘だよ、真に受けるなヨ_HH_」"
								CALL PRINT_STRW, @"「%CNAME("一人称")%はちゃ～んと%CNAME("主人")%が愛しい恋人桑の為に頑張れるカッコいい人だって信じてるんだぜ_HH_」"
							ELSEIF RAND:2
								CALL PRINT_STRW, "「あんっ_HH_ あぁっ…だめぇっ_HH_ ウワキになっちゃうぅ_HH_ あひぃっ_HH_ ひひっ_HH_ にひひひっ_HH_」"
								CALL PRINT_STRW, @"「ノリが悪いなぁ%CNAME("主人")%ヨ_HH_ 背徳感ってヤツは燃えるだろ？ もっと雰囲気アゲていこうぜ～？」"
								CALL PRINT_STRW, @"「ま、今ウワキしてるのは%CNAME("一人称")%じゃなくて%CNAME("主人")%なんですけどネ_HH_」"
								SIF EXP_GAIN("膣内精液経験")
									CALL PRINT_STRW, "「おっと失礼、まだ今日はウワキしてなかったネ、射精してないからネ？ まだ、まだネ_HH_」"
							ELSE
								CALL PRINT_STRW, @"「もっと抵抗を覚えた方が良いんじゃないかい%CNAME("主人")%ヨ_HH_ これじゃあその辺の低学年にだって浮気性交されちゃうぜ？」"
								CALL PRINT_STRW, @"「想像してみろよ。その辺の小小的子がさぁ、%CNAME("二人称")%を推倒て腰を振りながら言うんだ」"
								PRINTL
								CALL PRINT_STRW, "「別の女のコト考えながら射精しろ_HH_ 変態_HH_」"
							ENDIF
						ENDIF
					ENDIF
				ELSE
					CALL PRINT_STRW, @"「良いトロ顔になってきたじゃないか_HH_ まだまだこれからだろう、しゃきっとしろよ_HH_」"
					CALL PRINT_STRW, @"「にひっ_HH_ そうそう、ペットに負けちゃ%CNAME("主人")%の名折れですヨ_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「あ～我慢我慢！ は～思いっきり腰打ち付けてやろ！」
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				CALL PRINT_STRW, "「――っ_HH_ ああ、うるさいな」"
				PRINTFORMW 「今、動起腰身よ。言う街道に、ね」
			ELSE
				CALL PRINT_STRW, "「はぁ――_HH_ はぁ――_HH_ 結構、辛いネ_HH_」"
				CALL PRINT_STRW, "「なにが辛いって――んっ_HH_ 腰止まらないのが本当に辛い_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「おっ、んっ！？ ――これ意外と逃げ場が無いな？」
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;挿入刺激Ｇ点
;-------------------------------------------------
IF SELECTCOM == 66
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					CALL PRINT_STRW, "「くふっ_HH_ ぅ、くぅっ_HH_ ああ、良い、ここ良いじゃないか」"
					PRINTFORMW 「――なに？ 今自慰に浸ってるんだから邪魔しないで」
				ELSE
					CALL PRINT_STRW, "「ぉ゛っ゛―――_HH_ お、お、おお？ 何だ今の」"
					CALL PRINT_STRW, "「確かこの位の角度で――ぉ゛ほぁっ゛っ゛_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「お゛ぐっ！？――おっ、おー、身体跳ねちゃったよ」
				PRINTFORMW 「な～る～ほ～ど～ネ。ここがスイートスポット、いや、Ｇスポットってヤツか」
				PRINTFORMW 「えーっとここは――ちょっと違うな？ %CNAME("主人")%もう少し腰を―――んぁ゛っ」
				PRINTFORMW 「んーヨシ、そうそう、その位置。ちょっと姿勢の維持頑張ってネ！」
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					CALL PRINT_STRW, "「ちょっと抉り込み過ぎだよ、キツい。もう少し手下留情を――ぁ゛ぐっ_HH__HH_」"
					CALL PRINT_STRW, "「ぁ、か、は――いま、の―― ゃ゛っ゛_HH_ 待っ――ん゛っっ、ぁっ～～～ぃ゛っ_HH_」"
				ELSE
					CALL PRINT_STRW, "「あ゛ぶっ_HH_ ぐ、え、ああ？ 何だ今の。いや、声じゃなくてですネ」"
					CALL PRINT_STRW, "「うるせえよ声の話は良いんだよ！置いとけよ！悄悄的しておけ――ぶぅ゛っ_HH_」"
					PRINTFORMW 「――へいへい、%CNAME("主人")%ヨ。こういう良くない思い出を増やすのはどうかと思うぜペットとしては」
					CALL PRINT_STRW, "「要するにですよ奥のイイところ重点的にツンツンするのはやめませんかネってことでえ゛ぅっ_HH__HH_」"
					PRINTFORMW 「この鬼畜！悪魔！%CNAME("主人")%！！」
				ENDIF
			ELSE
				PRINTFORMW 「ふわっ！？ あ、あ、あのですネ、ここで一服タンマと言いますか」
				PRINTFORMW 「いえいえ下手くそだとか痛いだとかだなんてトンデモナイ！」
				PRINTFORMW 「むしろイイトコロに当たって不要この%CNAME("主人")%テクニシャ～ンって思った次第でしてネ！」
				PRINTFORMW 「んっぁ゛っ――ちょっとは手下留情して欲しいナって話なんですが聞きませんよね知ってた！」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					CALL PRINT_STRW, @"「嫌いだ、%CNAME("二人称")%なんて嫌いだ。 ぐ、ぅっ_HH_ こんなの、自慰と変わらないんだ」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%がどう気持ちよくなたってっ_HH_ 嫌い――っ、きらい、だっ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「は、あ――_HH_ あぁっ_HH_ ぐっ――_HH_ ――なん、だよ」"
					PRINTFORMW 「辛いとか、聞かないよ。%CNAME("二人称")%は黙って、道具になっていれば良い」
				ELSE
					CALL PRINT_STRW, "「くふっ――くふふっ_HH_ ああ、気にしないでよ」"
					CALL PRINT_STRW, @"「ただ――んっ_HH_ 良いトコロに当たって気持ち良いだけだ、%CNAME("二人称")%は関係ない」"
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「んぉっ_HH_ ひっひひっ_HH_ あ～_HH_ヤバいネ、これはアブナイ_HH_」"
					CALL PRINT_STRW, "「癖になりそうだ_HH_ こんな玩耍ペットに仕込むなんて、どう責任取ってくれるんだ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「はぁ～_HH_ あぁ、ここ、ここ_HH_」"
					CALL PRINT_STRW, "「ここ擦るとお腹キュンキュンするんだ_HH_ 解るかナ、ここだよ、ココ_HH_」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%のが、%CNAME("二人称")%が好きすぎて、うるさいんだ_HH_」"
				ELSE
					CALL PRINT_STRW, @"「にひひっ_HH_ 解るかナ？ 今良い感じにキュンキュン%CNAME("二人称")%のモノ締めてるだろ？」"
					CALL PRINT_STRW, "「これネ、甘イキしてんだぜ_HH_ 大して動いてないのにね、笑えてくるよホント」"
					CALL PRINT_STRW, "「だからどうしたって顔するなよ、それくらい相性良いんだなって良い気分なんだから_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				CALL PRINT_STRW, "「あ、やっべ、ちょっとたんま――は、ぅっ_HH__HH__HH_」"
				CALL PRINT_STRW, "「―――ぐっ、う_HH_ ふー、ふー、あ、急な甘イキにぶち当たっただけですヨ！次行ってみよう！」"
			ELSEIF RAND:2
				CALL PRINT_STRW, "「ふーっ_HH_ ふーっ_HH_ いや、良すぎるのも問題だネ」"
				CALL PRINT_STRW, @"「でも、もう少し付き合って要ぜ、%CNAME("主人")%ヨ_HH_」"
			ELSE
				CALL PRINT_STRW, "「お゛っ_HH_ くっ、ふ、にひひっ――_HH_」"
				CALL PRINT_STRW, @"「萎えさせないでおくれよ%CNAME("主人")%、折角良いトコ当たるんだ_HH_」"
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					CALL PRINT_STRW, "「はぁ_HH_ はぁ_HH_ ひ、ぐっ_HH__HH__HH_ また、身体跳ねっっ――_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「や、やめて――これ頭おかしく――な゛ぐっ_HH_」"
					PRINTFORMW 「やめて、よ。%CNAME("一人称")%が、%CNAME("一人称")%じゃなくなっちゃう――」
				ELSE
					CALL PRINT_STRW, "「ちがっうっ_HH_ こんなので感じてない_HH_ 手なんて握りたくないっ_HH_」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%が、%CNAME("二人称")%が握ってるんだ、仕方なく、だから、%CNAME("二人称")%のことなんか、だいっきらいっ_HH_」"
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, @"「ぐひぁっ_HH_ こ、コホン。%CNAME("主人")%よ、今の声は聞かなかった事にしない？」"
				ELSEIF RAND:2
					PRINTFORMW 「はは～ん？また%TEXTR("イイトコ突っつこう/変な声出させよう/ペットに艷声出させよう")%ってハラだね、このドＳめ」
					PRINTFORMW 「良いぜ、いつまでも%CNAME("二人称")%が良いようにされて変な声を出すと思うなよ」
					CALL PRINT_STRW, "「さぁ来い――っ、ん――っっ～～～は、っはぁ、ぁあっ――_HH_」"
					CALL PRINT_STRW, @"「%TEXTR("――んっ_HH_ ふぅっ_HH_ ぁふぶっ_HH_っとぉ！！ 今のはセーフ！ セーフだろう！？/はぐっ_HH_ っん、ぉ゛っ_HH_ ぉばぁっっ_HH_ ――ああチクショウめ！！/あ――ひっ――あ゛っ_HH_ 待ったそんなまだ良くなるなんてきいてなっ――はひぃっ_HH__HH__HH_")%」"
				ELSE
					PRINTFORMW 「ちょっとちょっと～こっちは妙ちきりんな声出さないように集中してるんですヨ！？」
					CALL PRINT_STRW, @"「なんて健気なペットなんでしょうネ！ %CNAME("主人")%が萎えないようni↘、ぅっ、こっ、こんなにがんばっ――_HH_」"
					PRINTFORMW 「頑張ってるんだから執拗にソコを責めるのやめてっ！！こっちは一杯一杯なんですヨ！？」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「こっ困りますぅ～そんなにガツガツそこをやられるとペットはこまっ――困りますっ！！！」
			ELSEIF RAND:2
				PRINTFORMW 「――っ、あ、ヤバ、ちょっと一瞬意識トんだ」
			ELSE
				PRINTFORMW 「っ――ぐっ――%CNAME("主人")%ヨ、ソコを責め続けるのなら%CNAME("一人称")%はこのまま頑張ってふざけ始めるぜ！」
				PRINTFORMW 「んっ！んぐ、んっ！ %TEXTR("効きますネ！！ これは健康に良さそうだ！ でもお高いんでしょう！？/あーなるほど！ なるほどネ！！ 是是！！/ここがね！ 是！ 良いんですネ！")%」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;挿入子宮口玩弄
;-------------------------------------------------
IF SELECTCOM == 67
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「んっ――ぐ、ぅ――少し、奥過ぎたな」
				ELSE
					CALL PRINT_STRW, "「おっ_HH_ にひっ、突き当たっちまったネ_HH_」"
					PRINTFORMW 「いや困ったな～、このまま出されるとスナイプされちゃうかも」
					CALL PRINT_STRW, "「いやいやー困ったナァ_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「んぐっ！？ お、お、ごめんよ、思ったより奥に突っかかってネ」
				PRINTFORMW 「なんだいその顔は。慎ましい生き物だぜ、そりゃあ呻きの一つも给さ」
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「っ――行き止まりだよ。それとも何かな、奥まで犯したいだとか、そういう征服欲？」
					PRINTFORMW 「ははっ、いや、好きにすれば良いよ。この程度で悦に浸れるなんて羨ましいな」
				ELSE
					PRINTFORMW 「おぁっ――にひっ♪ なんだよ～滅茶苦茶奥まで来るじゃない」
					PRINTFORMW 「そんなことされたらイ領帯ケな%CALLNAME:TARGET%酱は壊れちゃうぜ？」
					PRINTFORMW 「じゃあやめるかって？――むぅ、言わせるなよ」
					PRINTFORMW 「ぶっ壊されても良いよ、%CNAME("二人称")%になら――ワンワン♪」
				ENDIF
			ELSE
				PRINTFORMW 「んぉあ！？ へいへい、%CNAME("主人")%ヨ、そこから先は行き止まりだぜ？」
				PRINTFORMW 「何、わかってる？ ははーんさては通行止めを突き進もうとする輩だな%CNAME("二人称")%は」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「くっ――はっ、ふっ――少し腰を引いてもらえるかな」
					PRINTFORMW 「どうせ勝手に気持ち良くして貰ってるんだ、それくらい協力してもらっても罰は当たらない筈だろう」
				ELSEIF RAND:2
					PRINTFORMW 「はぁ――はぁ――あぁ、深いな。こんな、奥まで」
					PRINTFORMW 「これは、出されたら――何でもないよ。何でもないったら。黙ってて」
				ELSE
					PRINTFORMW 「うっ、また、奥――下手くそだな、%CNAME("一人称")%」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, @"「可愛いペット的には深いトコロに精液をご所望ですヨ、%CNAME("主人")%_HH_」"
					CALL PRINT_STRW, "「腰おもいっきり振って给からサ、濃い～の早く欲しいナ～_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「ん～_HH_ んっふ_HH_ くふっ、これ当たる度に頭ぱーんってなりそ_HH_」"
					CALL PRINT_STRW, "「まったくなんて悪いおちんちんだ_HH_ これは相当に絞って不给と_HH_」"
				ELSE
					CALL PRINT_STRW, @"「まーだ、まーだ_HH_ もっと%CALLNAME:TARGET%酱の奥を堪能してくれヨ_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ぐっ！！――と、勢い余ってまた奥までイっちまった」
			ELSEIF RAND:2
				PRINTFORMW 「んふっ――このガツンって来る感じ、癖になるかも？」
			ELSE
				PRINTFORMW 「おっ、奥まで食べちゃったナ」
				PRINTFORMW 「どうせならこのまま上のお口でもごきゅっと――駄目ですよネー！」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「はぐっ―く、ふふ――奥まで犯されて、怖気が走って動悸がするよ」
					PRINTFORMW 「やっぱり、%CNAME("一人称")%は%CNAME("二人称")%が、嫌いだ」
				ELSEIF RAND:2
					PRINTFORMW 「そうやって、うっ――悦に、浸ってると良いさ」
				ELSE
					PRINTFORMW 「はぁ、はぁ――苦しい、だけだ、こんなの」
					PRINTFORMW 「奥まで%CNAME("二人称")%を受け入れたからって、なんだっていうんだ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「くふ――_HH_ コツンコツンって、音はしないけど感じるぜ」"
					CALL PRINT_STRW, "「そんなに奥に出したいんだ_HH_ へ～_HH_ にひっ_HH_ にひひっ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「可愛いワンコのコミヤ桑_HH_ しっかり躾けて屈服させておくれよ_HH_」"
				ELSE
					CALL PRINT_STRW, "「あはは――_HH_ いや、ヤバいネ_HH_」"
					CALL PRINT_STRW, "「何がヤバいってさ、降りてきているの解るんだ、子宮が_HH_」"
					CALL PRINT_STRW, @"「%CNAME("二人称")%が好きで好きで堪らなくて、降りてきてるんだ_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ぐぉっ――はーい通行禁止でーす！ %CALLNAME:TARGET%酱のおまんこ交通法守ってくださーい！」
			ELSEIF RAND:2
				PRINTFORMW 「だーかーらー、これ以上は入りませんってばー」
				PRINTFORMW 「强行しちゃうとぐぇっと何か色々吐いちゃうますヨ、勿体ない」
			ELSE
				PRINTFORMW 「むぅっ！？ 懲りないなー%CNAME("主人")%は」
				PRINTFORMW 「もう少しペットを労ってくれても良いんですヨ？」
			ENDIF
		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:恋慕
			PRINTFORMW
		;余裕有
		ELSEIF CHECK("Ａ挿入")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;余裕有
		ELSEIF CHECK("Ａ挿入")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ａ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOMS("Ａ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;巨根
	ELSEIF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 75
			PRINTFORMW
		;対面座位
		CASE 73
			PRINTFORMW
		;それ以外
		CASEELSE
			PRINTFORMW
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
;-------------------------------------------------
;Ｓ状結腸を使っての肛門性交
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHECK_COM("結腸責め")
	;初めての結腸責め
	IF EXP:結腸経験 == 0
		PRINTFORMW
	;今回初の結腸責め
	ELSEIF EXP_GAIN("結腸経験") == 0
		IF TALENT:結腸性感
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		IF TALENT:結腸性感
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ａ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 70 && SELECTCOM <= 79 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:PLAYER:手下留情 && NOWEX:Ａ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;余裕が無い
	ELSEIF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ａ対応指令") && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
			IF TALENT:恋慕 && RAND:3 == 0
				PRINTFORMW
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		CASEELSE
			IF RAND:4 == 0
				PRINTFORMW
			ELSEIF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門性交(初めては上のＡ挿入系初選択などで)
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 74
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門騎乗位
;-------------------------------------------------
IF SELECTCOM == 75
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;貝あわせ
;-------------------------------------------------
IF SELECTCOM == 80
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			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:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「強引な上に乱暴――控えめに言えば最悪だ」
			ELSE
				CALL PRINT_STRW, "「んっ_HH_ ふっ、ふふっ_HH_　やっべどうしよう_HH_」"
				CALL PRINT_STRW, "「使われるのって結構興奮するなおい_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「あらやだ強引♪ ま、仕方がないネ」
			PRINTFORMW 「この極上胸部を前に理性を保てるハズもナシ！！」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:4 == 0
					PRINTFORMW 「ケダモノらしくてお似合いだ」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「さっさとその間抜けな腰振りを終わらせないか？」
					PRINTFORMW 「たかだか胸だけれど、それでも使われるのは癪に障る」
				ELSEIF RAND:2 == 0
					PRINTFORMW 「本当に物扱いされている気分だ。している側の気分はどうかな」
				ELSE
					PRINTFORMW 「この行為、まったく意味を感じないな」
				ENDIF
			ELSE
				IF RAND:4 == 0
					CALL PRINT_STRW, @"「あ～あ、良いのかい%CNAME("二人称")%_HH_ それ、性交のときの腰靈活だろ？」"
					CALL PRINT_STRW, "「もしかしてサ、孕ませる気だったりするのかい？ ペットの胸部をさ_HH_」"
					CALL PRINT_STRW, "「良いぜ、たっぷり種付けしてくれよ_HH_ もう体中媚びてるからワンチャンあるかもだぜ_HH_ 」"
				ELSEIF RAND:3 == 0
					CALL PRINT_STRW, "「もっと手荒く扱ってくれても良いんだぜ_HH_ ぜ～んぶ受け止めてやるからサ_HH_」"
				ELSEIF RAND:2 == 0
					CALL PRINT_STRW, "「にひひっ_HH_ 使わせて欲しい、なんて言うなよ」"
					CALL PRINT_STRW, "「勝手に、乱暴に、遠慮なく使って、濃いヤツを射精して欲しいナ_HH_」"
				ELSE
					CALL PRINT_STRW, @"「くふっ_HH_ すっげ、%CNAME("一人称")%の胸部メチャクチャ形変わってる_HH_」"
					CALL PRINT_STRW, @"「こんなに雑に使われてるのに%CNAME("主人")%のおちんちん気持ちよくするためにぐにゃぐにゃぐにゃぐにゃ_HH_」"
					CALL PRINT_STRW, "「ああ_HH_ こりゃあ胸部も立派に媚びてら_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:4 == 0
				PRINTFORMW 「ああ！ やだ！ ケダモノォ！ %CALLNAME:TARGET%っぱいを强奸するだなんて非道いワ！」
			ELSEIF RAND:3 == 0
				PRINTFORMW 「胸部相手にそんなにがっついて腰振りしちゃってサー」
				PRINTFORMW 「んふふ――♪ どっちがケダモノか分からなくなっちゃうネ♪」
			ELSEIF RAND:2
				PRINTFORMW 「ペットの胸部の使い心地はどうだい？」
				PRINTFORMW 「まー悪いはずは無いですよネ、何せ一級品の胸部ですから！」
			ELSE
				PRINTFORMW 「%CNAME("主人")%、今野獣みたいな顔してるぜ？」
				CALL PRINT_STRW, "「にひひっ――良い顔だって褒めてんのサ_HH_」"
			ENDIF
		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
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「手で？ しごけってこと？」
				PRINTFORMW 「はぁ――手套でもあれば良いのに」
			ELSE
				PRINTFORMW 「にひっ♪ 慣れないけどそれでよければ喜んで♪」
				PRINTFORMW 「というかネ、不公平だと思ってたんだヨ。だって%CNAME("二人称")%今まで触らせてくれなかったろう？」
				PRINTFORMW 「まったく酷いと思わないかナ。%CNAME("一人称")%だって%CNAME("二人称")%のおちんちん弄りたいのにサ！！」
				PRINTFORMW 「ん？ 食べられると思って任せられなかった？ ――納得！！」
			ENDIF
		ELSE
			PRINTFORMW 「ほー、手で？ ふむ、手取り足取り教えて貰えれば喜んでやらせて頂きますとも」
			PRINTFORMW 「聰慧ペットにお任せくださいヨ♪ ちなみにつまみ食いは――デスヨネー」
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「仕方ない、両手を使おう。効率よくね」
				ELSEIF RAND:2
					PRINTFORMW 「まさか好みに合わせてシてもらえるとは思ってないよね」
				ELSE
					PRINTFORMW 「%CNAME("二人称")%を嫌悪してる女の手はそんなに気持ち良い？」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「我慢は身体に毒だけど我慢した方が気持ち良いだろう？」
					CALL PRINT_STRW, "「いっそぶっ壊れるまでシゴいてみちゃおうかナ――なんて、ネ_HH_」"
					PRINTFORMW 「可愛い反応しないでくれ、本当にシたくなっちゃうだろう♪」
				ELSEIF RAND:2
					PRINTFORMW 「いやいや、目の毒だ。触り方ちょっと変えるだけで良い表情しやがって」
					PRINTFORMW 「%CNAME("主人")%はアレかい？ 嗜虐心を煽る天才でいらっしゃる？」
				ELSE
					PRINTFORMW 「気持ち良いなら声出しちゃっても良いんだぜ、その方が気持ち良いだろう？」
					PRINTFORMW 「そうやって煽りたいだけだろうって？ にひひっ、バレちゃった♪」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「こーいう触るか触らないかってのもキくだろ」
				PRINTFORMW 「にひひっ♪ %CNAME("二人称")%が教えてくれた技術だぜ？」
			ELSEIF RAND:2
				PRINTFORMW 「ni↘ひっひ、正にまな板の上の鯉――いや、まな板の上のおちんちん！」
				PRINTFORMW 「おい、萎えるなよ。勃てーシコシコしてやるからー頑張れー」
			ELSE
				PRINTFORMW 「ほーら%CNAME("二人称")%のおちんちんの气味が带污迹的付いたお手々だ」
				PRINTFORMW 「病みつきになる气味してるだろ――ふぅ――マジでハラ減ってきたな」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「早く射精して欲しいな。疲れるんだよ、手が」
				ELSEIF RAND:2
					PRINTFORMW 「手だけで満足して貰えたら楽なものだけれどね」
				ELSE
					PRINTFORMW 「良い気分に見えるかい？ 不快だよ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ご注文をお聞きしましょうかお客桑！」
					PRINTFORMW 「%TEXTR("カリナシ/カリ/カリマシ/カリマシマシ")%%TEXTR("タマモミ/タマモミモミ/")%%TEXTR("ヨワメ/ヨワヨワ/キツメ/キツキツ")%いっちょう！！」
				ELSEIF RAND:2
					PRINTFORMW 「にひひっ♪ 擦る度に涎垂らしちゃってサ～」
					PRINTFORMW 「%CNAME("一人称")%よりよっぽど食いしん坊じゃないか♪」
				ELSE
					CALL PRINT_STRW, "「はぁ――_HH_ 坊主憎けりゃ袈裟まで憎いとは言うけどサ」"
					PRINTFORMW 「好きなら逆にナニもかも好きになっちゃうもんだネ。 何の話かって？ ナニの話ですヨ♪」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「へいらっしゃい！ 何握りやすか！ ちんちん！ ちんちんだネ！」
				PRINTFORMW 「おーおー、ビンビンお元気ですこと！ これはイきの良いおちんちんだ！」
			ELSEIF RAND:2
				PRINTFORMW 「いやー実に良い形、手触り、流石は%CNAME("主人")%！！ 他のおちんちん触ったことないんですけどネ」
				PRINTFORMW 「いや、本当に美味しそうで――じゅるり――おっと忠犬忠犬」
			ELSE
				PRINTFORMW 「にひっ――腰が引けてきたネ%CNAME("主人")%ヨ」
				PRINTFORMW 「そんなんじゃペットのお手々に負けちゃうぜ？ 頑張れ♪頑張れ♪」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;口交
;-------------------------------------------------
IF SELECTCOM == 91
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「んっ―――ぷぁ――ちゅ――ん、くっ」
					PRINTFORMW 「――この方が射精しやすいんだろう？」
					PRINTFORMW 「好悪じゃない、効率の問題だよ」
				ELSE
					CALL PRINT_STRW, "「おいしそーうな气味するナ～_HH_どっ蔻卡なー？こっ蔻卡な_HH_」"
					CALL PRINT_STRW, "「にひっ_HH_ おいおい、なんだこのクソスケベなおちんちんは_HH_」"
					CALL PRINT_STRW, "「しゃぶって欲しいよ～って言ってるとしか思えないぜ_HH_」"
					CALL PRINT_STRW, "「仕方がないにゃ～_HH_ お望み街道――いただきま～す_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「にひひっ、ここらでいっちょ口交ってやつをやってみようか？」
				PRINTFORMW 「食べられるか心配？ 大丈夫大丈夫、食べないからサ♪ 多分」
			ENDIF
		;それ以外
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「食い千切られたいの？ お望みならそうするよ」
					PRINTFORMW 「――いや、やめておこう。お腹を壊しそうだからネ」
					PRINTFORMW 「舐めれば良いんだろう？やるよ、ペットらしいじゃない」
				ELSE
					CALL PRINT_STRW, "「にひひっ_HH_ やったネ、一度しゃぶってみたいと思ってたんだ_HH_」"
					CALL PRINT_STRW, @"「まったく、%CNAME("二人称")%、どんだけイイ气味させてるのか解ってるのかい？このこの～_HH_」"
					CALL PRINT_STRW, "「もちろん食べたりはシませんヨ_HH_ こんなにオス臭いおちんちん食べるなんて勿体ない_HH_」"
					CALL PRINT_STRW, "「それじゃ――いっただきま～す_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「マジかよ。勇気あるね%CNAME("二人称")%！」
				PRINTFORMW 「それじゃあ張り切っていっただっき――え、食べるなよって？ マジかよご無体な」
			ENDIF
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("阴茎接吻")
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「ちゅ――満足したかい？」
				PRINTFORMW 「そうかい、安上がりなことだ」
			ELSE
				CALL PRINT_STRW, "「ｽﾝｽﾝ_HH_ あー_HH_ にひっ_HH_」"
				CALL PRINT_STRW, "「舐めちゃ駄目かナー_HH_ しゃぶっちゃ、駄目かナー_HH_」"
				CALL PRINT_STRW, "「接吻だけ？ っちぇ――っちゅ_HH_ にひひっ_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「よろしくおねがいしまーす！！ っちゅ」
			PRINTFORMW 「お、少し大きくなった？ 結構面白色ナ」
		ENDIF
	;みんな大好き清洁口交
	ELSEIF CHECK_COM("清洁口交")
		;恥垢もお掃除
		IF CHECK_COM("恥垢清洁口交")
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「最低――あぁ、本当に、忌憚なく最悪だネ」
					PRINTFORMW 「逆に安心するよ――んっ、ちゅぷ――うぇっ」
				ELSE
					CALL PRINT_STRW, "「ｽﾝｽﾝ_HH_ ｽﾝｽﾝｽﾝ_HH_」"
					CALL PRINT_STRW, "「ああ待って待って_HH_ もう少し嗅がせて_HH_」"
					CALL PRINT_STRW, "「すぅ――はぁ_HH_ あー_HH_ いただきます_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「えぇー流石にそれはどうかと思うぜ？」
				PRINTFORMW 「やれと言われりゃペット的に拒否権は無いけどサー」
			ENDIF
		;恋慕
		ELSEIF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「後始末までさせる辺り本当に何様かナ？」
				PRINTFORMW 「ああ、飼い主サマだったね。ははは、笑えない」
			ELSE
				CALL PRINT_STRW, "「舐め取る側から大きくなってるじゃないか_HH_」"
				CALL PRINT_STRW, "「これはまだまだヤれるってことで良いんだよネ_HH_」"
			ENDIF
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3 && RAND:2
			PRINTFORMW 「後始末もペットの仕事ー♪ キレイキレイしましょうね～♪」
		ELSE
			PRINTFORMW 「いやいや、精液も中々味わい深いものだよ？一緒に舐めてみる？」
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「絞り尽くせば終わるだろ？」
				ELSEIF RAND:2
					PRINTFORMW 「さっさと射精しちゃえよ」
				ELSE
					PRINTFORMW 「くふっ♪ ――ぷぁ。なんだい、その顔は」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「さーあ逃げられんぞー悪のおちんちんめ！」
					CALL PRINT_STRW, @"「この正義の%TEXTR("ペット/ワンコ")%が成敗してくれる！！ %TEXTR("あーんっ/んちゅっ/ぐぼっ")%――_HH_」"
					CALL PRINT_STRW, @"「%TEXTR("じゅぼ/じゅる/じゅるる")%――_HH_ じゅぷっ_HH_ れろ_HH_ こう桑しろー_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「いーけないんだいけないんだー_HH_」"
					CALL PRINT_STRW, @"「%CNAME("主人")%ヨ、このおちんちんは犯罪だぜ_HH_ もうおちんちんっていうよりおちんぽじゃないか_HH_」"
					CALL PRINT_STRW, @"「こんなもの衆目に晒せないネ！_HH_ しっかり、%CNAME("一人称")%のお口に仕舞っとかなきゃ_HH_」"
				ELSE
					CALL PRINT_STRW, "「駄目だぁー_HH_ 臭い嗅いだだけで頭クラクラしてきちゃった_HH_」"
					CALL PRINT_STRW, "「これはもうしゃぶるしか、ない！というわけでいただきま～す_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「被逆推ながらしゃぶられるのもオツだろう？」
				PRINTFORMW 「よそ見するんじゃないぜ、いつパックンゴックンしちゃうか解らないからネ♪」
			ELSEIF RAND:2
				PRINTFORMW 「出来たてウィンナーいただきま～す♪」
				PRINTFORMW 「いやいや、食べませんヨ、ほんとですヨ」
			ELSE
				PRINTFORMW 「じゅぷっじゅる、むも？ むむむーももむ」
				PRINTFORMW 「ももももーむ、むもむも～！」
				PRINTFORMW 「ぷぁ――いや、別に意味のあることは言ってないけどネ？」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「ぷぁ――臭い」
				ELSEIF RAND:2
					PRINTFORMW 「どうしたって良い気分はしないな」
				ELSE
					CALL PRINT_STRW, "「――ぷぁ_HH_ はぁ、ほんと、最悪だ」"
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「ねーねー、ヨシまだ～？ は～や～く～_HH_」"
					CALL PRINT_STRW, @"「%TEXTR("くぅ～ん/きゅ～ん/わふぅ～")%_HH_%TEXTR("う～/わんわ～ん/きゃい～ん")%_HH_」"
					CALL PRINT_STRW, "「にひっ_HH_ ヨ織タ！！ あーん――ぱくっ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「ｽﾝｽﾝ_HH_ ぱくっ_HH_ じゅるっ_HH_ ちゅぅううう_HH_」"
					CALL PRINT_STRW, "「んっ_HH_ んんっ_HH_ もっほおふまへくわへへやう_HH_」"
				ELSE
					CALL PRINT_STRW, "「っぷぁ_HH_ あ～_HH_ これは幸せ物質出てますヨ_HH_」"
					CALL PRINT_STRW, "「麻薬だネ麻薬_HH_ ハッピーナントカの粉と一緒だ、食べたことないけど！」"
					CALL PRINT_STRW, "「どれもう一口_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「大丈夫だって、こういう時は食べないからサ。%CNAME("一人称")%は聞き分けのあるペットですヨ♪」
				SIF RAND:3 == 0
					PRINTFORMW 「――やっぱ齧っちゃ駄目？ 一口！一口で良いから！！」
			ELSEIF RAND:2
				PRINTFORMW 「%TEXTR("わふっ/わんっ/にゃん！間違えた！わん！！")% 待てが出来るペットだぜ、偉いだろ」
				PRINTFORMW 「ヨシの号令と共に飛びつくぞ～マダカナ～マダカナ～♪」
			ELSE
				PRINTFORMW 「うーんちょっと甘くない？ 大丈夫？ %CNAME("一人称")%の味覚がおかしいだけかナ？」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;乳交
;-------------------------------------------------
IF SELECTCOM == 92
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「"こういう"身体で"こういう"手管を使った方が興奮するんだろう？」
					PRINTFORMW 「要するにそれだけ早く終わる。合理的だ」
				ELSE
					PRINTFORMW 「にひひっ♪ ここら真打ちの登場ですヨ♪ ほ～ら、%CALLNAME:TARGET%酱のたぷたぷ胸部だ！」
					CALL PRINT_STRW, "「ようこそ天国_HH_ ガッチガチでお熱いの、温柔的包んでやろうじゃないか♪」"
				ENDIF
			ELSE
				PRINTFORMW 「いやいや～折角大きくあるんだからやってみないと損だろう？」
				PRINTFORMW 「天然由来の胸部三明治、ご賞味の程よろしくネ！」
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「は――？ 胸で、そんな事をしろって？」
					PRINTFORMW 「――ちっちっちっちっ。 はぁ、良いとも。嫌でも何でも、%CNAME("一人称")%はペットだもの」
					PRINTFORMW 「ただ、そうだね。気持ち良くなくても怒らないで欲しいな。馬鹿なことをお願いしたと諦めてくれよ」
				ELSE
					PRINTFORMW 「おいおい、この魅惑の%CALLNAME:TARGET%っぱいでおちんちんイジイジして欲しいって？」
					PRINTFORMW 「%CNAME("一人称")%の胸部はそんなに安くないんだぜ？ 何せこんなにたわわに実ってるんだからサ！お高いに決まってるよネ！」
					PRINTFORMW 「ほーら――解るよネ？ お高い胸部の対価に何が欲しいか解るよネ？」
					PRINTFORMW 「――お肉！ 違う！言葉が欲しい！ ――可愛い！ 惜しいもう一声！」
					CALL PRINT_STRW, "「――好き。好き、かぁ――仕方ないにゃあ_HH_」"
					CALL PRINT_STRW, @"「ペットに懸想しちゃう%CNAME("主人")%の為にひと肌――いや、ひと胸部脱いでやりますか_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「ほっほー？ 胸部でシゴく？ あいや、皆まで言うなよ%CNAME("主人")%ヨ」
				PRINTFORMW 「何せこの魅惑の果実だ、使わなきゃ損だもんネ！ ワンコとしては異存は有ませんとも！」
				PRINTFORMW 「それじゃ失礼しましてっと――挟んで――こうかい？ で、シゴく、と――じゅる。 おっと失礼、涎が出た」
			ENDIF
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「どうしたって興奮するんだろう？ なら効率的にやることに是非はないよ」
				ELSEIF RAND:2
					PRINTFORMW 「さっさと射精して欲しいな。胸まで使って、疲れてきたから」
					PRINTFORMW 「まだかい？ %CNAME("二人称")%は射精と生命力が取り柄じゃないか、ねえ？」
				ELSE
					PRINTFORMW 「ほら、好きなんだろう。胸部。 さっさと射精せよ」
					PRINTFORMW 「射精しないと終わらないんだろう。全部搾り取ったらこの茶番も終わりだ」
					PRINTFORMW 「だから、早く、射精せ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「おちんちんポリスの胸部警部だ！ 手を上げろ！ いやおちんちん勃たせろ！」
					PRINTFORMW 「これがワンコをアンアン言わせる悪いおちんちんだな！ 熱くてガチガチで気持ちよさそうな形しやがって神妙にしろ！」
					PRINTFORMW 「正義の胸部が白旗ならぬ白液上げさせてやる！覚悟しろ！！」
				ELSEIF RAND:2
					PRINTFORMW 「ところでサ、%CNAME("主人")%桑ヨ？ 今胸部の間でガチガチになってるこのおちんちんあるだろう？」
					PRINTFORMW 「これは胸部が好きでガチガチにしてるのかナ？ それとも、%CNAME("一人称")%だからガチガチにしてるのかナ？」
					CALL PRINT_STRW, "「ねーねー、どっちだよー。おいこら腰ごと逃げてんぞ_HH_ 逃げんな_HH_ 胸部を受け入れて質問に答えろ_HH_」"
				ELSE
					CALL PRINT_STRW, "「にひっ_HH_ 谷間の間から亀桑コンニチワ_HH_」"
					CALL PRINT_STRW, "「ぎゅ～_HH_ にゅっ_HH_ ぎゅ～_HH_ にゅっ_HH_」"
					CALL PRINT_STRW, "「――おいおい、遊んでるだけだぜ？ 切なそうな顔しな桑なヨ_HH_」"
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「当方の胸部に自信アリ！」
				CALL PRINT_STRW, "「ってワケでですネ、無意味な抵抗をやめて昇天しちゃってくださいナ_BH_」"
			ELSEIF RAND:2
				PRINTFORMW 「%CNAME("主人")%ヨ、ちょっとずつ腰逃げてるのバレてないと思ってらっしゃる？」
				PRINTFORMW 「そいつは悪手だぜ、ワンコは逃げたらおっかけるのサ♪ ワンワン！ってネ！」
			ELSE
				PRINTFORMW 「くふっ♪ 解るぜ、気持ちいいんだろう？」
				PRINTFORMW 「何せ自己触っても、おおスッゲ柔い！柔い！ ってなる業物だからネ！」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「はぁ――憂鬱にもなるよ。客観的に見て間抜けだ」
					PRINTFORMW 「そういう事をさせて満足感を得るんだろう？ 誇ればいい、良い趣味だ」
				ELSEIF RAND:2
					PRINTFORMW 「――何か？ 従って是るけれど、結構な屈辱なんだ」
					PRINTFORMW 「気の利いた言葉の一つでも求めているならそういう音声でも聞いていれば良い」
				ELSE
					PRINTFORMW 「なんだか安心するよ。こうやって胸まで使って奉仕しているけれど心臓が痛い」
					PRINTFORMW 「要するに不快なんだ。%CNAME("一人称")%は酱と%CNAME("二人称")%が嫌いなんだね」
				ENDIF
			ELSE
				IF RAND:3 == 0
					IF CEVENT("撫で乳交") == 0
						PRINTFORMW 「一乳交ごとに１０秒の撫で撫でで手を打とうじゃないか！いいネ！よしっ！」
						CALL PRINT_STRW, "「ni↘ひっひっ――それじゃあ失礼して――ん、うん―――んっ_HH_ ぁ――っ_HH_」"
						PRINTFORMW 「――なっ、撫で撫でヤメ！ 力抜けて乳交どころじゃねえやこれ！」
						CALL SET_CEVENT, "撫で乳交"
					ELSE
						PRINTFORMW 「そう何度も%CNAME("主人")%の撫で撫でで%CALLNAME:TARGET%酱の乳交力が落ちると思うなよ？」
						CALL PRINT_STRW, "「行くぞォ！！ ――んっ――んふっ_HH_ むぁっ――_HH_ はぁぁぁああ_HH_」"
						CALL PRINT_STRW, "「ふー_HH_ ふー_HH_ ――手下留情を希望します！！」"
					ENDIF
				ELSEIF RAND:2
					CALL PRINT_STRW, "「はぁ――_HH_ 胸部の間から先っちょ顔出す度に、濃い气味が鼻の先に迫ってきちゃって困っちゃうネ～_HH_」"
					CALL PRINT_STRW, "「は～発情するっ_HH_ これは麻薬ですヨ！ 取り締まらなきゃいけませんネェ？」"
				ELSE
					CALL PRINT_STRW, @"「くふふ_HH_ なんだよぉ%CNAME("主人")%、情けない顔してるぜ？」"
					CALL PRINT_STRW, @"「ほら、酱と何が好きか言えよ_HH_ %CALLNAME:TARGET%酱の胸部が好き！ 是リピートアフターミー！」"
					CALL PRINT_STRW, @"「もっちもちの%CALLNAME:TARGET%っぱいが好き！_HH_ 是！ %CALLNAME:TARGET%酱が好き！ 是！」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「んふふ、気持ちいいかい？ そりゃあ当然、天然物の%CALLNAME:TARGET%っぱいですからネ♪」
			ELSEIF RAND:2
				PRINTFORMW 「は～い胸部一丁！ 精一杯ご奉仕致しますヨ♪ だからご褒美も、ネ？」
			ELSE
				PRINTFORMW 「にひっ、気持ち良いかい？ これでも飲み込みは早いんだ。優等生だからネ！」
				PRINTFORMW 「モチロン、そんな優秀なペットへの習熟した分の技能手当は期待してるぜ♪」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;素股
;マスト
;-------------------------------------------------
IF SELECTCOM == 93
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSEIF CHECK_COM("展示肉棒")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

;-------------------------------------------------
;洗面奶
;マスト
;-------------------------------------------------
IF SELECTCOM == 104
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飞机杯冲
;マスト
;-------------------------------------------------
IF SELECTCOM == 105
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

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

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

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

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

;-------------------------------------------------
;鼻钩
;-------------------------------------------------
IF SELECTCOM == 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
	;終了時
	ELSEIF TEQUIP:眼罩 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

;-------------------------------------------------
;什麼也不做
;-------------------------------------------------
IF SELECTCOM == 139
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「休憩？ へぇ、必要だったんだネ」
				PRINTFORMW 「荒淫で食い散らかすだけの性交モンスターの類だと思っていたよ」
			ELSE
				PRINTFORMW 「えー、なんだよーもっと触れよーワンワンもといアンアンさせろよ！」
			ENDIF
		ELSEIF MARK:屈服刻印 >= 2
			PRINTFORMW 「優秀な%CNAME("主人")%のお達しとあれば聞きますとも」
			PRINTFORMW 「で、待て、と来たら次はヨシ、だろ？ え、違う？」
		ELSE
			PRINTFORMW 「おや、休憩かい？」
			PRINTFORMW 「にひひっ、休憩ついでに一口――駄目か、はぁ」
		ENDIF
	;二回目以降
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「什麼也不做のならもう終わりで良いだろう？」
				ELSEIF RAND:2
					PRINTFORML 背を向けていた%CALLNAME:TARGET%の視線に気付いて見返すと、
					PRINTFORMW 彼女は弾かれたように%CALLNAME:MASTER%から視線を逸らして小さく溜息を吐いた。
				ELSE
					PRINTFORMW 「少しの間でも%CNAME("二人称")%の相手をしなくて済むのならせいせいするネ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「殺生なもんだネ%CNAME("主人")%ったらサ！」
					PRINTFORMW 「こっちはとっくに暖まってるっていうのにオアズケだぜ？」
					PRINTFORMW 「忠犬かつ愛犬の%CALLNAME:TARGET%酱としては遺憾の意を表明するね！」
				ELSEIF RAND:2
					PRINTFORMW 「うーわんわん！ %TEXTR("わん！/くぅ～ん/ぐるるるる")%――わん！！」
					PRINTFORMW 「おっと失礼。休憩とは名ばかりのオアズケなんてあまりの仕打ちに犬語になっちまった」
				ELSE
					PRINTFORMW 「休憩？ 休憩――休憩かー」
					CALL PRINT_STRW, "「――えいっ！ にひひっ_HH_ 休憩中だからって引っ付いちゃ駄目ってコトは無いだろ？」"
				ENDIF
			ENDIF
		ELSEIF MARK:屈服刻印 >= 2
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW 「もしかして疲れが溜まってるんじゃないのかい。無理はよくないぜ？」
				PRINTFORMW 「おや、体調を気にするのが不思議かナ？」
				PRINTFORMW 「にひひっ、そりゃあお肉の管理は大事――おっと、ワンワン♪」
			ELSE
				PRINTFORMW 「ワン！！待ての姿勢！」
				PRINTFORMW 「――」
				PRINTFORMW 「――」
				PRINTFORMW 「――止めて良い？」
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ワンワン！ 休憩ついでに一口良いかナ！」
				PRINTFORMW 「駄目？ あ、はーい――っちぇー」
			ELSEIF RAND:2
				PRINTFORMW 「いくら%CNAME("一人称")%が頑丈だって言っても限度があるからネ」
				PRINTFORMW 「ま、%CNAME("主人")%がそんなコトしないと信じてますとも！」
			ELSE
				PRINTFORMW 「おいおいそんな体たらくて大丈夫かナ」
				PRINTFORMW 「躾の道は厳しいぜ、ウーワウワウ！ってね」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;強制口交
;-------------------------------------------------
IF SELECTCOM == 140
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 傲慢な視線を向けるペットに口に欲望のまま剛直を突き立てる。
				PRINTFORMW 「ぐっ――！」
				PRINTFORMW くぐもった声と相変わらずの冷めた視線。
				PRINTFORMW 「ぐぶっ――んん゛っ――かっぁ゛っ――あっぁ゛っ」
				PRINTFORMW それら全てを無視して%CALLNAME:MASTER%は暴力的に口淫を強制させ続けた…
			ELSE
				PRINTFORMW 「にひひっ♪ 乱暴にペットのお口を使いたいだなんて、%CNAME("主人")%は悪い人だネ～」
				PRINTFORMW 「もっちろんイヤだなんて言いませんとも！ 可愛いペットにお任せあれ♪」
				PRINTFORMW 突然の申し出にも彼女は笑着口を大きく開ける。
				PRINTFORMW 「よーひ♪」
				PRINTFORMW 涎にぬかるんだ口内を差し出した彼女は、
				CALL PRINT_STRW, "「は～やく_HH_ は～や～く～_HH_」"
				PRINTFORMW 待ちきれないという風に身体を揺らしながら%CALLNAME:MASTER%の阴茎を誘った…
			ENDIF
		ELSE
			PRINTFORMW 「ぐぉ！？」
			PRINTFORMW 頭を固定し、なんの準備も出来ていない口腔へと無遠慮に欲望を突き入れる。
			PRINTFORMW すると、余裕ぶっていた彼女の表情が一瞬くしゃりと歪んだ。
			PRINTFORMW 「ぐぷっ――ん゛っ――んぐふっ♪」
			PRINTFORML 一瞬抵抗ような様子を見せた%CALLNAME:TARGET%は、
			PRINTFORMW こちらの意図を了解したのか歪めた顔を綻ばせるとだらりと身体を弛緩させるのだった…
		ENDIF
	;二回目以降
	ELSE
		IF COND("想吐")
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「ぉ゛あ゛っ――！」
					PRINTFORMW 一層のひしゃげた声。
					PRINTFORMW 吐気からか、堅強に叛逆だった彼女の目に陰りが見えたのを%CALLNAME:MASTER%は見逃さない。
					PRINTFORMW 「ん゛ぉ゛っ、ぉ゛っ、ぁ゛あ゛あ゛っ」
					PRINTFORMW 珍しく抵抗を始めた彼女の頭を%CALLNAME:MASTER%は嗜虐心のまま、物のように扱った…
				ELSE
					CALL PRINT_STRW, "「お゛ぇ゛っ_HH_」"
					PRINTFORMW 嘔吐いた彼女に構わず%CALLNAME:MASTER%は腰を更に突き込んだ。
					CALL PRINT_STRW, "「ん゛っ！？ んっ――っ_HH_」"
					PRINTFORML 目を見開いた%CALLNAME:TARGET%だったが、
					PRINTFORMW %CALLNAME:MASTER%の意図を了解したのかこのままより%CALLNAME:MASTER%を接受姿勢を取る。
					CALL PRINT_STRW, "「ぉ゛っ_HH_ ごぉ゛っ゛_HH_ ぉ゛っお゛ぁ゛っ゛_HH_」"
					PRINTFORMW 大きくなっていく自己的口から漏れる濁音に、%CALLNAME:TARGET%の表情は恍惚の樓梯を登っていく…
				ENDIF
			;それ以外
			ELSE
				PRINTFORMW 「ぉ゛う゛ぇ゛っ！？」
				PRINTFORMW 一際大きく嘔吐いた%CALLNAME:TARGET%は余裕ぶっていた瞳色を変えた。
				PRINTFORMW 「――ん゛っー！ うっ！ ん゛ー！！ ぉ゛っん゛ん゛っん゛ん゛ん゛っ！！」
				PRINTFORMW %CALLNAME:TARGET%の手が何度も%CALLNAME:MASTER%をタップする。
				PRINTFORMW そんな彼女の焦りとヒクヒクと痙攣する彼女の腹部が、限界が近いことを伝えていた…
			ENDIF
		;連続実行
		ELSEIF PREVCOM == SELECTCOM
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW %TEXTR("汚らしい/情けない/くぐもった")%%TEXTR("声/濁声/鳴き声")%を上げながらも、%TEXTR(@"彼女の/%CALLNAME:TARGET%の")%%TEXTR("瞳/目/眼")%から%TEXTR("挑発的/叛逆/怜悧")%な色は消えていない…
			ELSE
				PRINTFORM 「%TEXTR("むぐっ/むぅっ/んごぉっ/ごふっ/ぃ゛んっ")%
				IF TALENT:恋慕
					CALL PRINT_STR, "_HH_"
					SIF FLAG:情緒 >= 120 || RAND:3 == 0
						CALL PRINT_STR, "_HH_"
					SIF FLAG:情緒 >= 90 || RAND:3 == 0
						CALL PRINT_STR, "_HH_"
				ENDIF
				PRINTFORM %TEXTR("――ぐぶ、ふぐっ/ぶぇっ/ほ、ごぉ、ぉお゛っ/ぃ゛ぉお゛っ/ぁ゛ぃ゛っんぶっ/ぶぁっ――んぉっ")%――%TEXTR("は、んぁっ/はぁっ――ぷ、んぐっ/ん゛んっ/ぷはっ、じゅぅっ")%
				SIF TALENT:恋慕
					CALL PRINT_STR, "_HH_"
				PRINTFORMW 」
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「んぶっ――ぶぐっ――ぅ゛おっ――」
						PRINTFORMW モノのように扱われ、口の端から涎を垂らしながらも%CALLNAME:TARGET%の目には抗議の色が宿っている。
					ELSEIF RAND:2
						PRINTFORMW 「うっ――ぷ、ぁぁ――はぁ――はぁ――くふっ、ふふふ」
						PRINTFORMW 「笑うな、なんて無理な話さ。有がとう、これでもっと%CNAME("二人称")%を嫌いになれる」
					ELSE
						PRINTFORMW 「はぁ゛――はぁ゛――はん、もう終わり？」
						PRINTFORMW 「参った様子が無くて残念かな。絶対そんな顔してやらないよ」
					ENDIF
				ELSE
					IF TEQUIP:拘束 == 0 && RAND:4 == 0
						CALL PRINT_STRW, "「にぃっ♪ あーん_HH_」"
						PRINTFORMW 邀请ように口の端を引っ張って開ける%CALLNAME:TARGET%。
						CALL PRINT_STRW, "「んくっ_HH_ ぶじゅっ_HH_ はっあ゛っ_HH_ んじゅっ_HH_」"
						PRINTFORMW その誘いに乗って阴茎を彼女の眼の前に晒すと主动喉奥へと咥え込み始めた…
					ELSEIF RAND:3 == 0
						CALL PRINT_STRW, "「にひっ――_HH_ そんな顔されたら言われなくてもワカっちゃうナ♪」"
						CALL PRINT_STRW, "「ペットのカワイイお口に思いっきりブチ込みたいって顔だ_HH_ にひっ、にひひっ_HH_」"
						CALL PRINT_STRW, "「ちょっと待ってくれよー？ んー、ぐちゅ、ぐちゅ――ほい、あーん_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「ん゛ぶっ_HH_ ぐぶっ_HH_ ん゛っ_HH_ んごぼっ_HH_ げぶっ゛_HH_」"
						CALL PRINT_STRW, "「ぶぁあ゛っ――ふー_HH_ ふー_HH_ ――もうおわり？ そんなワケないよネ_HH_」"
					ELSE
						CALL PRINT_STRW, "「はぁ゛っ_HH_ はぁ゛っ_HH_ あ゛ー、頭、ぼーっとするー_HH_」"
						CALL PRINT_STRW, "「見てよこれ、ねっとりした涎、溢れちゃって滅茶苦茶糸引いてら_HH_」"
						CALL PRINT_STRW, "「――くふっ_HH_ もう一回シたい？ そうこなくっちゃ_HH_」"
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 逃げられないようにがっしりと彼女の頭を掴み、脅すようにして口腔の前に阴茎を晒す。
					CALL PRINT_STRW, "「にひひっ――_BH_ あーん♪」"
					PRINTFORMW %CALLNAME:TARGET%は顔を逸らすでも顰めるでもなく挑衅的笑みを浮かべ、口を開けて見せた。
				ELSEIF RAND:2
					PRINTFORMW 「%TEXTR("ぶぐっ/んぐっ/はっぶ")%――んっ、%TEXTR("あぶっ/うっ/じゅぼっ")%、んん゛っ」
					PRINTFORMW 濁声を混じらせながら"使われる"%CALLNAME:TARGET%はそれでも余裕の笑みを崩していない。
					PRINTFORMW 「んっ？ ――んっふふ♪ 」
					PRINTFORMW それどころかこちらの腰が少しでも引けると見るや目を細めて挑発してくる有様だ…
				ELSE
					PRINTFORMW 「余裕そう？ いえいえそんな、もう辛くて一杯一杯ですヨ♪」
					PRINTFORMW 「慎ましい生き物なものですからネ。喉突かれた拍子に噛まないように一杯一杯でしてネ♪」
					PRINTFORMW 「もういっそのこと噛みちぎって今日のご飯にしてやろうかなんて――」
					PRINTFORMW 「あ、もちろん慎ましい冗談ですヨ♪」
				ENDIF
			ENDIF
		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_CLO("拘束衣")
			PRINTFORMW
		ELSEIF CHECK_BODYS("兔")
			PRINTFORMW
		;其他
		ELSE
			PRINTFORMW
		ENDIF
	;胸も股間も丸出し状態变成了時
	ELSEIF CHECK_COM("換装：裸体变成了")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;露出癖Lv3
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;胖次を変えたり脱いだり
	ELSEIF CHECK_COM("換装：胖次")
		IF EQUIP:胖次
			PRINTFORMW
		;没穿内褲です
		ELSE
			PRINTFORMW
		ENDIF
	;以下は面倒ならELSE でひとまとめでも良いでしょう
	ELSEIF CHECK_COM("換装：外套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：胸罩")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：手套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：襪子")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：靴")
		PRINTFORMW
	;飾品の付け替えや其他
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;被逆推
;-------------------------------------------------
IF SELECTCOM == 176
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「じっとしてろよ。いつまで経っても終わりそうにないからね」
				PRINTFORMW 「%CNAME("一人称")%から搾り取ってやった方が――そう、効率的だ」
			ELSE
				PRINTFORMW 「はーいドーン！！ ワンワン！ ワン！ あう～ん！ ﾊｯﾊｯﾊｯﾊｯﾊｯ！」
				CALL PRINT_STRW, @"「%CNAME("主人")%が悪いんだぜ_HH_ そんなスキだらけで襲ってくれって言ってるようなモンじゃないか_HH_」"
				CALL PRINT_STRW, @"「さ、%CNAME("主人")%――どこから食べられたい？ もちろんエッチな意味でサ_HH_」"
			ENDIF
		ELSE
			PRINTFORMW 「お、豐腴したネ？ それ是けない、いけないなー%CNAME("主人")%ヨ」
			PRINTFORMW 「これは教育の意味も込めてパクパク――いや、ワンワンしてやらなければ！」
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「抵抗しても良いよ。関係ないからね」
				ELSEIF RAND:2
					PRINTFORMW 「もしかしてこうされることを望んでいたのかい？」
					PRINTFORMW 「それはそれは、流石倒錯的だ。反吐が出る」
				ELSE
					PRINTFORMW 「情けないな」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「そんな顔するなよ_HH_ マジで加減出来なくなるだろ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「わん_HH_ わんわん_HH_ あんあんあう～ん_HH__HH_」"
				ELSE
					CALL PRINT_STRW, @"「まな板の上の鯉、腕の下の%CNAME("主人")%_HH_」"
					CALL PRINT_STRW, "「さーて、どう可愛がってやろうか_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「あーあ、捕まっちまったネ？ さてさて、どうしてやろうかナ♪」
			ELSEIF RAND:2
				PRINTFORMW 「さ、良いポジションとったところで、いっただっきま～す！」
				PRINTFORMW 「――っていうのは冗談ですヨ？ ええ、慎ましいワンコなので」
			ELSE
				PRINTFORMW 「にひっ、もしかして期待とかしてましたかネ？」
				PRINTFORMW 「これはご期待には沿えてやらないとワンコが廃るってもんですナ♪」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

;-------------------------------------------------
;挣扎
;-------------------------------------------------
IF SELECTCOM == 280
	;成功
	IF TEQUIP:推倒 == 0
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「へえ、やられっぱ无が癪に触るのはお互い様なワケだ」
				ELSEIF RAND:2
					PRINTFORMW 「――はぁ、逃げられたか。良いぜ、好きにしろよ」
				ELSE
					PRINTFORMW 「少しだけ驚いたな。そんな力があるなんて」
					PRINTFORMW 「それで、どうする？ 」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「わっ、逃げられちまった！！」
					PRINTFORMW 「く、くそぅ、幼気なワンコに何をする気だ！エロ漫画みたいに！！」
				ELSEIF RAND:2
					CALL PRINT_STRW, "「おっ――にひひっ_HH_ あーあ、負けた_HH_」"
					CALL PRINT_STRW, "「それじゃ、負け犬ワンコの躾――しちゃってくれよ_HH_」"
				ELSE
					PRINTFORMW 「むあっ――？ あ、あー、えっと」
					PRINTFORMW 「こっ、これは大変だ慎ましく可愛いワンコがわるーい%CNAME("主人")%に逆襲されてあへんあはんはへはへさせられてしまう！ピンチ！果たして%CALLNAME:TARGET%酱はどうなってしまうのか！！」
					PRINTFORMW 「――で、ですね。是。や、やしくしてください」
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「おっ？ っちぇー、逆襲の時間はおしまいか！」
			ELSEIF RAND:2
				PRINTFORMW 「あらやだ強引！ このままワンワンされちゃうんですネ！」
			ELSE
				PRINTFORMW 「んふっ♪ 引っぺ返されちったい。 さ、躾の再開だ♪」
			ENDIF
		ENDIF
	;失敗
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「ああ、今もしかして逃げようとした？」
					PRINTFORMW 「あんまりにも些細な抵抗で気付かなかったよ」
				ELSEIF RAND:2
					PRINTFORMW 「逃さなくて安心した」
					PRINTFORMW 「ああ、勘違いはよしてくれよ。これはシてあげたいんじゃなくて、復讐の類だ」
				ELSE
					PRINTFORMW 「効率的に搾り取るのもそうだけど、正直もっと歪む顔を見たいんだ」
					PRINTFORMW 「あれは少しだけ胸がすく、抵抗しないで欲しいな」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「は～い是暴れな桑なヨ_HH_ 天国連れてって给からサ_HH_」"
				ELSEIF RAND:2
					PRINTFORMW 「%CALLNAME:TARGET%酱大好きって言ったら離して给ぜ？」
					CALL PRINT_STRW, "「嘘だけどネ_HH_」"
				ELSE
					CALL PRINT_STRW, "「そんな無体しないでもう少し付き合っておくれヨ_HH_」"
					CALL PRINT_STRW, "「戯れるペットの相手も飼い主の甲斐性だろ_HH_」"
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ni↘ひっひ♪ 残念無念！ それじゃあ次いってみよう！」
			ELSEIF RAND:2
				PRINTFORMW 「おいおい%CNAME("主人")%ヨ、そんなんじゃ躾にならないぜ？」
			ELSE
				PRINTFORMW 「心意気は認めよう！ でもぜ～んぜんビクともしないんだよネェ！！」
			ENDIF
		ENDIF
	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 FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「なんだよ、肩なんか晒して」
				PRINTFORMW 「食べて欲しいの？ お断りだよ、お腹壊しちゃいそうだもの」
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2 == 0
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

;-------------------------------------------------
;Ｖ挿入系初選択（処女の時は地の文を口上側で呼ぶ事にする）
;-------------------------------------------------
IF SELECTCOM >= 60 && SELECTCOM <= 69 && FIRSTCOMS("Ｖ挿入") == 0
	;処女
	IF TALENT:処女
		TFLAG:地の文スキップ = 1
	ENDIF
ENDIF

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

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

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

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

;-------------------------------------------------
;TARGETの射精直前の口上
;-------------------------------------------------
@KOJO_MESSAGE_BEFORE_TARGETSHOOT_K60

;-------------------------------------------------
;射精先選択の直前に表示する口上
;頻繁に表示されるため随机や表示条件の設定推奨です
;-------------------------------------------------
@KOJO_MESSAGE_SHOOT_K60
IF RAND:3
	IF TEQUIP:推倒
		;Ｖ性交系
		IF INSERT("Ｖ挿入")
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「中で射精したいならさっさとすれば良いだろう」
					PRINTFORMW 「今更遠慮なんて鼻で笑えるようなことするなよ」
				ELSEIF RAND:2
					PRINTFORMW 「搾り取ってやるって言ってるんだ、さっさと屈服しなよ」
					PRINTFORMW 「無駄だろう。そうやって苦悶する顔を見てるのも、全部無駄だ」
				ELSE
					PRINTFORMW 「少しは我慢しろよ、出来るもんなら」
					PRINTFORMW 「節操の無い%CNAME("二人称")%の事だから無理だろうけどね」
				ENDIF
			;それ以外
			ELSE
				IF TALENT:恋慕 && RAND:2
					IF RAND:3 == 0
						CALL PRINT_STRW, "「にひっ_HH_ このままびゅーってしちゃうかい？」"
						CALL PRINT_STRW, "「良いぜ、気持ち良くなってくれるならペット冥利に尽きるってもんさ_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「ペット的にはこのままサクっと絞り取っても良いんだぜ_HH_ わんわん_HH_ 」"
						CALL PRINT_STRW, @"「まぁ慎ましい%CALLNAME:TARGET%酱まんこがそれで満足するかは別のお話ですけどネ！_HH_」"
					ELSE
						CALL PRINT_STRW, @"「どうだい%CNAME("主人")%ヨ_HH_ このまま射精しちまうってのは」"
						CALL PRINT_STRW, "「ペットに搾り取られて飲むお水はあーまいぞ_HH_」"
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「そんな顔するなよ～味見したくなっちゃうだろ♪」
					ELSEIF RAND:2
						CALL PRINT_STRW, @"「にひひっ_BH_ 今%CNAME("主人")%は食われてるのサ」"
						PRINTFORMW 「酱と敗けましたって白旗挙げるのが作法ってヤツだよネ♪」
					ELSE
						PRINTFORMW 「おっとマジで要去了かい？ しょ～がないにゃ～」
						PRINTFORMW 「ま、どうするかは%CALLNAME:TARGET%酱の指先…いや、マン先三寸なんですけどネ！」
					ENDIF
				ENDIF
			ENDIF
		;Ａ性交中
		ELSEIF INSERT("Ａ挿入")
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「っ……はぁ？ 要去了？ 知ったことじゃないよ」
					PRINTFORMW 「こっちはそれどころじゃないんだ、汚い場所に汚いモノ突っ込んでるんだから」
				ELSEIF RAND:2
					PRINTFORMW 「その顔……ああ、本当に射精できるなら何処でも良いんだね」
					PRINTFORMW 「……%TEXTR("最低だ/気色悪い/良いことだ、もっと嫌いになれる/お似合いだ、何もかも")%。したけりゃしろよ」
				ELSE
					PRINTFORMW 「こんな穴でシてやってるんだ。少し遊んだりするのも%CNAME("一人称")%の自由だろ」
					PRINTFORMW 「はっきり言ってあげようか。%CNAME("二人称")%に、自由は、無い」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「にひひっ_HH_ おいおいまさかペットのお菊門で白旗挙げるつもりかい_HH_」"
					CALL PRINT_STRW, "「まっさか～まっさかネ～？ そんなワケ無いよね_HH_ 尊厳も何も無くなっちまうぜ～_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「どうしてやろうかナ～_HH_ そんな顔されたらですネ、ペットのお尻はきゅんきゅんしちゃうのです_HH_」"
					CALL PRINT_STRW, "「お尻が本当の意味でおまんこになっちゃ～う_HH_ 精液で孕んじゃ～うってネ_HH_ なっちゃうんですヨ_HH_」"
					CALL PRINT_STRW, "「本当かどうか試してみるかい_HH_」"
				ELSE
					CALL PRINT_STRW, @"「%CNAME("主人")%ヨ_HH_ %CNAME("主人")%ヨ_HH_ 今ならペットのお腹の中を精液でタプタプに出来るぜ_HH_」"
					CALL PRINT_STRW, "「どうしたい？ タプタプにするかい_HH_ きっと息まで精液臭くなっちゃう、ああそりゃ大変だ人前に出られないネ！」"
					CALL PRINT_STRW, "「にひっ_HH_ 可愛いペットが他のトコ行かないように、お腹の中までマーキングしちまおうぜ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「お？ 結構コッチでもイけるもんだネ？」
				ELSEIF RAND:2
					PRINTFORMW 「どうだい%CNAME("主人")%ヨ？違う穴でも立派な仕事だ。やっぱ出来るペットは違いますネ！」
					PRINTFORMW 「ところでこのままびゅーびゅーするなら終わった後のご褒美増量して欲しいんですが！ 駄目ですか！？ 駄目！ 是！！」
				ELSE
					PRINTFORMW 「へいへ～いこのままだとペットに絞られてお尻の中に射精しちゃうぜ？」
					PRINTFORMW 「する？ しちゃう？ わぁアブノーマル！ 良いご趣味ですネ！ この縁談は無かったことに！」
					PRINTFORMW 「なーんつって、させるかどうかは%CNAME("一人称")%次第ですがネ？」
				ENDIF
			ENDIF
		;手交
		ELSEIF SELECTCOM == 90
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「……」
					PRINTFORMW 射精の前兆を感じているのか%CALLNAME:TARGET%は眉を顰めて手に力を入れている…
				ELSEIF RAND:2
					PRINTFORMW 「今止める自由も止めない自由も%CNAME("一人称")%のモノなんだよ」
					PRINTFORMW 「解ってるよね%CNAME("主人" , "カナ")%？」
				ELSE
					PRINTFORMW 「ああ要去了なんだ、報告ご苦労様」
					PRINTFORMW 「それが%CNAME("一人称")%の行動にどう影響するのかな？」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「可愛いペットのおてては心地良いかい？_HH_ にひっ_HH_ そいつは結構_HH_」"
					CALL PRINT_STRW, "「それじゃこのまま絞られても本望ってヤツだネ_HH_ 大変結構_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「良いネ良いネ_HH_ そういう我慢してるぞって顔はそそられちゃいますヨ_HH_」"
					CALL PRINT_STRW, "「それを思いっきり歪めるのが可愛いペットのお仕事だって解ってる癖にしちゃうんだからもうネ_HH_」"
				ELSE
					CALL PRINT_STRW, "「おいおいまさかこのままびゅーびゅーしちゃうなんてことは無いよネ？」"
					CALL PRINT_STRW, @"「いや～それは見くびり過ぎですよネ_HH_ ペットに負けちゃう%CNAME("主人")%なんて本当は見たくないんですヨ_HH_」"
					CALL PRINT_STRW, "「がんば～れ_HH_ がんば～れ_HH_ クッソ情けない顔見～せんな_HH_ ざ～こ_HH_ ざ～こ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あっれれ～腰ビクついて来てますヨ？ まさか限界だなんんて言いませんよネ？」
					CALL PRINT_STRW, "「射精したら食べちゃうぞ_BH_」"
				ELSEIF RAND:2
					PRINTFORMW 「そんなに腰上げてシコシコでイかせて～ってしなくても良いんだぜ？」
					CALL PRINT_STRW, "「ちゃ～んと絞り取って差し上げますとも、だからご褒美は弾んでネ_BH_」"
				ELSE
					PRINTFORMW 「は～、これで精液が飯の種になるなら良いんですけどネ」
					PRINTFORMW 「そしたらすぐビュビュっとイかせて给んですけど。 射精とお肉、どっちが良いかナ？」
				ENDIF
			ENDIF
		;乳交
		ELSEIF SELECTCOM == 92
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「流石に射精が近くなると暴れて面倒だな」
				ELSEIF RAND:2
					PRINTFORMW 「もう少し良い子に出来ないかな？ 鬱陶しいんだけれど」
				ELSE
					PRINTFORMW 「情けないな、たかだか胸だろう。我慢してくれよ」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, @"「へい！ %CALLNAME:TARGET%っぱいに降参するなら今だぞ！_HH_」"
					CALL PRINT_STRW, "「さぁ手を――いいや、白旗を挙げろ！びゅ～ってネ_HH_ びゅ～って！_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「あーらら、ちょっと%CALLNAME:TARGET%酱っぱいが魅惑的過ぎたかナ_HH_」"
				ELSE
					CALL PRINT_STRW, "「もう限界かい？ ま、これは仕方がないネ_HH_」"
					CALL PRINT_STRW, "「何せ魅惑の胸部ですから？ 最強ですから？ 最カワですから？ 最強最カワ胸部ペットですから？」"
					CALL PRINT_STRW, @"「%TEXTR("是復唱/リピートアフターミー/さあ言ってみよう")%！ するまでイかせて不给ぞ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ちなみにここで胸部止めたら怒る？ 憤怒ますか是这様吗」
				ELSEIF RAND:2
					PRINTFORMW 「は～ドクドクしてますネ、感じますヨ胸部越しに」
					PRINTFORMW 「さて問題ですヨ、ヤメるでしょうかヤメないでしょうか？」
				ELSE
					PRINTFORMW 「こんなんでも射精出来るってんだからちんちんってのは凄いもんだネ～」
					PRINTFORMW 「いや、射精出来るのとさせるかどうかってのは別の話ですがネ？」
				ENDIF
			ENDIF
		;素股
		ELSEIF SELECTCOM == 93
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「挿入もしてないのにその体たらくかい、情けなくて何よりだよ」
				ELSEIF RAND:2
					PRINTFORMW 「性交してると勘違いしてるんだね。そんな行為をする気も、情も義理も無いんだ」
					PRINTFORMW 「だから、そんな顔をしたって……%CNAME("一人称")%はなんとも思わない」
				ELSE
					PRINTFORMW 「腰を振るなよ、そんなに快楽が欲しいのかい」
					PRINTFORMW 「嫌いだと宣言してる女にこんなことされてもまだそんな事を思ってるの？」
					PRINTFORMW 「……はぁ、ああ良いさお望み街道だ。玩具にして给よ」
				ENDIF
			ELSEIF TALENT:恋慕
				IF RAND:3 == 0
					CALL PRINT_STRW, "「入れてもないのにペット相手にアンアンヘコヘコ_HH_ ああ情けない_HH_」"
					CALL PRINT_STRW, "「これでさー射精までしちまったらどうするヨ_HH_ 極めちまうぜ色々とサ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「おいおいまさか射精したり不会ネ_HH_ 外側スリスリしてるだけなんだぜ_HH_」"
				ELSE
					CALL PRINT_STRW, "「性交じゃないのに射精したくない～ってのがビンビンに伝わってきてる_HH_」"
					CALL PRINT_STRW, "「にひっ_HH_ あーヤバいネ、ヤバいヨ_HH_ そんな顔されちゃあ――――坏心眼したくなっちゃうだろう_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「おや、良いのかい。このままだとヤって無いのにびゅっびゅってしちまうけど？」
				ELSEIF RAND:2
					PRINTFORMW 「お互い無様にカラゴシ振った成果が！ 今！ ここに！」
				ELSE
					PRINTFORMW 「自己も惚れ惚れするネ、魅惑の腰靈活だ」
					PRINTFORMW 「にひっ、もう限界だろ？ 我慢なんて無駄だぜ。何せこのままヤメることだってできちゃうんだからネ！」
				ENDIF
			ENDIF
		;足交
		ELSEIF SELECTCOM == 95 && RAND:3
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「まさかとは思うけれど脚で射精したりしないだろうね」
					PRINTFORMW 「だとしたら、願ったりだ。もっともっと%CNAME("二人称")%を軽蔑出来るから」
				ELSEIF RAND:2
					PRINTFORMW 「ああ、良い気分だ。今嫌いな%CNAME("二人称")%を征服しているって実感してる」
					PRINTFORMW 「良い気分。そうだ、良い気分、だ……なんだよ射精したいのかい？」
					PRINTFORMW 「今浸ってるんだから邪魔するなよ、どうするかは%CNAME("一人称")%が決める」
				ELSE
					PRINTFORMW 「どうしてやろうかな。このままイけないだけの刺激で踏み続けて苦悶する顔を眺めていても良いね」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「あんよが相当お気に召してるみたいですネ_HH_」"
					CALL PRINT_STRW, "「良いんですヨ_HH_ このまま射精させちゃいましょうか_HH_ どーんな顔するのかナ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「負けちゃ駄目だぜ～_HH_ あんよに敗けたら一生の恥だぞ～_HH_」"
				ELSE
					CALL PRINT_STRW, @"「にひひっ_HH_ 駄目ですヨ%CNAME("主人")%_HH_」"
					CALL PRINT_STRW, "「逃げようたってもうしっかり%CALLNAME:TARGET%酱の脚のトリコなんですから_HH_」"
					CALL PRINT_STRW, "「イくもイかないも、どっちだって逃跑ことは不行ヨ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「いや～凄いネ人体。こんなんでもイけちゃいそうなんだからサ」
				ELSEIF RAND:2
					PRINTFORMW 「おや、もう限界だったりします？」
					PRINTFORMW 「丁度良かった、脚も疲れてきたトコだったんですよネ」
				ELSE
					PRINTFORMW 「おいおい腰ビクついてるけどサ、え、何、マジで要去了？」
					PRINTFORMW 「流石の%CALLNAME:TARGET%酱も困惑気味ですヨ？」
				ENDIF
			ENDIF
		ELSE
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「これでイってもイかなくても、別にどっちでも構わないよ」
					PRINTFORMW 「ああ、どうしたって%CNAME("二人称")%の事は嫌いだ。安心して」
				ELSEIF RAND:2
					PRINTFORMW 「イきたいんなら好きにしろよ。%CNAME("一人称")%も好きにするから」
				ELSE
					PRINTFORMW 「迷うなぁ、このままイかせるかどうか……効率云々じゃなくてね」
					PRINTFORMW 「恍惚とした%CNAME("二人称")%の顔はなんだか胸が締め付けられてムカムカする。その鬱憤晴らしみたいなものだよ」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「あーらら射精の権利握られるのクセになっちゃってるネ_HH_」"
					CALL PRINT_STRW, "「ご期待に添えられる聰慧ペットはどうするかナ～_HH_ どうして欲しいか坦率に言って欲しいナ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「こらこら今勝手にイこうとしたかい？ だーめだぞ_HH_」"
					CALL PRINT_STRW, "「プリーズが足りてないんだな～_HH_ ちゃ～んとペットの許可取ってネ_HH_」"
				ELSE
					CALL PRINT_STRW, "「あんまり気持ちよさそうな顔するなよ_HH_」"
					CALL PRINT_STRW, "「可愛くってイジめ方変えたくなっちまうだろ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「イきたい領帯ミングでイかせてあげますヨ？」
					PRINTFORMW 「いや～サービス良すぎる自分が怖い！」
				ELSEIF RAND:2
					PRINTFORMW 「ほー、もしや要去了でいらっしゃる？」
					PRINTFORMW 「そりゃ良い事聞きましたネ。一齧りでどう？」
				ELSE
					PRINTFORMW 「ここは一つどこまでビュルビュル飛ぶか計測してみようぜ！」
					PRINTFORMW 「あ、でも出せるかどうかは気分次第ですけどネ！ さあ今回はどっちでしょ～か！」
				ENDIF
			ENDIF
		ENDIF
	;被逆推じゃない
	ELSE
		;Ｖ性交系
		IF INSERT("Ｖ挿入")
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「……鼻息が荒い」
					PRINTFORMW 「射精したいんだろ。さっさと終わるならそうしてくれ」
				ELSEIF RAND:2
					PRINTFORMW 「ははっ…その目気持ち悪いよ、笑える」
					PRINTFORMW 「射精してやるって？ させて貰ってるの間違いだろう。好きにしろよ」
				ELSE
					PRINTFORMW 「キツいとか何とか知ったことかい。勝手に%CNAME("二人称")%がヨガってるだけだ」
					PRINTFORMW 「……本当にキツいからそんなに締めるな？ 嬉しがってるのか…？」
					PRINTFORMW 「そんな……ちっ、違う。煩い、煩いな…出すなら、さっさと出せよ」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「我慢とか無粋だぜ_HH_ ペットまんこは何時でも準備OKなんだからサ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「%CNAME("主人")%ちんぽ相手にきゅうきゅう媚びんなってのが土台無理な話なのサ_HH_」"
					CALL PRINT_STRW, @"「%CNAME("一人称")%は諦めたからサ、諦めてビューってネ_HH_ %CALLNAME:TARGET%のペットまんこにお射精しちゃいなさいナ_HH_」"
				ELSE
					PRINTFORMW 「あー、ヤバい」
					PRINTFORMW 苦笑交じりに呟いた%CALLNAME:TARGET%は、%CALLNAME:MASTER%に応えるように囁く。
					CALL PRINT_STRW, @"「ねえ、%CNAME("主人")%。女性ノコとして、中でイって欲しい_HH_」"
						PRINTFORMW 普段の様子を圆圈で感じさせない本気の言葉で、少女は射精を強請った…
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「オカワイイコトですネ～_BH_ 必死こいてガマンしながらペットに腰振っちゃてサ_BH_」"
				ELSEIF RAND:2
					PRINTFORMW 「この辺でポイント稼がせて貰おうかナ～、出した分だけ食べさせてくれるんだろ？ 違う？」
				ELSE
					PRINTFORMW 「あらやだ奥桑！ この%CNAME("主人")%ったらまんまんでお射精するつもりですヨ！」
					PRINTFORMW 「何だって！？ それは本当かい%TEXTR("キャシー/ジュディ/巻髪")%！？ んぁっ…こっ、待って！ 射精しても良いから待って！！」
					PRINTFORMW 「まだ終わってないから！ せめてふざけ終わらせて！！」
				ENDIF
			ENDIF
		;Ａ性交中
		ELSEIF INSERT("Ａ挿入")
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「我慢してる？ お尻に出すのがオカシイって解ったんだね、今更」
				ELSEIF RAND:2
					PRINTFORMW 「射精するんだろ、すればいい」
					PRINTFORMW 「こんな異常な性交で何を躊躇うんだ」
				ELSE
					PRINTFORMW 「はぁ……ぐっ……うぅ……」
					PRINTFORMW 圧迫感に喘ぐ%CALLNAME:TARGET%は嫌悪の視線とは裏腹に射精を強請るようにして直腸をきゅうきゅうとさせている…
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「にひっ_HH_ にひひひっ_HH_ お尻でもしっかり解るぜ_HH_」"
					CALL PRINT_STRW, @"「だーせっ_HH_ だーせっ_HH_ 千裕酱のお腹の中に%CNAME("主人")%のどろどろ精液ちょーだいナ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「ガマンは身体に毒ですヨ_HH_」"
					CALL PRINT_STRW, "「ほーらー_HH_ お尻から濃い目こってりのおせーし食べさせて_HH_」"
				ELSE
					CALL PRINT_STRW, @"「有能ペットの肛門が無意識に媚び媚びで申し訳ない_HH_」"
					CALL PRINT_STRW, "「そーゆーわ・け・で_HH_ おらっ抵抗は無駄だ！！射精しろ！！」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「おー？ もう限界なんですネ。こっちは準備万端ですヨ？」
					PRINTFORMW 「お尻の中で射精されるのに準備が要るかは知らんけどネっ！」
				ELSEIF RAND:2
					PRINTFORMW 「あーあーあー、もしかしてびゅーってしようとしてますかネ」
					PRINTFORMW 「良いですヨ～どうぞどうぞ。 モノ出す為のトコに入れられるのも一興ってヤツですからネ！」
				ELSE
					PRINTFORMW 「あ、射精する時は射精する～って一言お願いしますヨ」
					PRINTFORMW 「え？ 何でってそりゃあネ。お尻に射精する人类の顔をつぶさに観察したいからですネ！是！」
				ENDIF
			ENDIF
		;手交
		ELSEIF SELECTCOM == 90 && RAND:3
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「その顔、やめろよ」
				ELSEIF RAND:2
					PRINTFORMW 「気持ち悪いな、もっと締まった顔は出来ないの？」
				ELSE
					PRINTFORMW 「ご自由に。早く終わるならそれに越した事はない」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「ごほーしが効いてますネ～_HH_ ここらで一つご褒美が欲しいナ_HH_」"
					CALL PRINT_STRW, "「ぷりっぷりの赤酱汁を手で無駄撃ちするトコとかどうですかネ？_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「にひ_HH_ い～のかナ～_HH_ い～のっかナ～_HH_」"
					CALL PRINT_STRW, "「おててじゃなくったって他のトコも使わせて给のにサ～_HH_」"
				ELSE
					CALL PRINT_STRW, "「あ～止まんないですヨ_HH_ どーしましょどーしましょ_HH_」"
					CALL PRINT_STRW, @"「暴走%CALLNAME:TARGET%酱おててまんこによって%CNAME("主人")%が射精してしまう_HH_」"
					CALL PRINT_STRW, @"「どーしましょどーしましょ_HH_ どーしましょーネ、%CNAME("主人")%_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「おー、腰めっちゃビクついてますヨ%CNAME("主人")%」
					IF TALENT:恋慕
						PRINTFORMW 「このままが良い？ にひっ♪ どーしよっかナ♪」
						PRINTFORMW 「生殺ならぬ射精の与奪の権は%CNAME("一人称")%が握ってるんですよネ、ちんぽと一緒にサ♪」
						CALL PRINT_STRW, "「おーねーだーり_HH_ 聞きたいナ_HH_」"
					ELSEIF MARK:屈服刻印 >= 2
						PRINTFORMW 「シちゃいます？ ビューってシちゃいます？ へ～～～～！！どーしよっかなーーーー！ 」
						PRINTFORMW 「っかー！ 急に力が入らなくなっちゃったナー！！ご褒美很多にしてくれたらもっと頑張るんだけどナー！！」
						SIF RAND:2
							PRINTFORMW 「あ、冗談ですヨ？ もちろん酱とシますとも～ワンワン♪」
					ELSE
						PRINTFORMW 「射精前？ ほっほー！――なんかオモシロ生物みたいですネ！！」
					ENDIF
				ELSEIF RAND:2
					PRINTFORMW 「お、出ちゃいます？ 射精しちゃいます？」
				ELSE
					PRINTFORMW 「ここで手を止めたら怒るかナ？ あ、もちろんジョークですヨ？」
				ENDIF
			ENDIF
		;乳交
		ELSEIF SELECTCOM == 92 && RAND:3
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「疲れるんだ、これ」
				ELSEIF RAND:2
					PRINTFORMW 「人の胸でこんな事させて耐えようか耐えまいかなんて、贅沢な悩みだね」
				ELSE
					PRINTFORMW 「極まってきた？ ふぅん、そう」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「胸部ン中でなーんかぷるぷるしてますネ_HH_」"
					CALL PRINT_STRW, "「どーするのかナ～_HH_ もーちろーん？ 愛犬的にはこのまま射精しちゃってもバチは当たらないぜ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, @"「おちんちんが苦しいよ～って言ってるぜ%CNAME("主人")%ヨ_HH_」"
					CALL PRINT_STRW, "「このまま窒息させるのも悪いと思わないかい？ 思うだろ_HH_」"
					CALL PRINT_STRW, "「おらっ、殺チン事件にしたくなければ千裕っぱいに敗けてさっさと射精せっ_HH_」"
				ELSE
					CALL PRINT_STRW, @"「ni↘ひ_HH_ 愛犬に隠し立ては無理だ%CNAME("主人")%ヨ_HH_」"
					CALL PRINT_STRW, "「胸部が気持ち良すぎてもう出ちゃうって顔だろ、ソレ_HH_ なーんでもお開阔处だぜ_HH_」"
					CALL PRINT_STRW, "「ここからちょいと工夫するだけでその可愛い我慢も握り潰せちゃうとかサ_HH_ もちろん、お開阔处だ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「およ、今腰が胸部から逃げましたね%CNAME("主人")%ヨ？」
					PRINTFORMW 「にーげんな♪ もっと頑張れ～♪ ま～けんな♪ 是いっちにーいっちにー♪」
				ELSEIF RAND:2
					PRINTFORMW 「くふっ♪ いやいや、なんでもないですヨ」
					PRINTFORMW 「ちょっと客観的に見て今の状況と%CNAME("主人")%の顔が面白色なーとか」
					CALL PRINT_STRW, "「思ってないですヨ_BH_」"
				ELSE
					PRINTFORMW 「神妙にしろよー、你は完全に包囲されている！あ、間違えた。」
					PRINTFORMW 「ちんぽは完全に包囲されている！！」
					PRINTFORMW 「大人しくお縄に付いて出すモン射精しちゃいなヨ♪」
				ENDIF
			ENDIF
		;素股
		ELSEIF SELECTCOM == 93 && RAND:3
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
						PRINTFORMW 「お願いだから射精するついでに入れるような無体はやめてよ」
				ELSEIF RAND:2
					PRINTFORMW 「かけたいなら、ご自由に」
				ELSE
					PRINTFORMW 「思うままにすれば良いだろう。こんな無様なことさせて今更」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					PRINTFORMW 「にひっ♪ 良いの？ こんなんで射精しちゃうのかい？」
					CALL PRINT_STRW, "「ちょーっと腰使えば入るかも知れないのに？ にひ_HH_ ご随意にどーぞ♪」"
				ELSEIF RAND:2
					PRINTFORMW 「息荒いぜ？ にひっ♪ 出そうなんだろ」
					CALL PRINT_STRW, "「このまんま腿でコスコスしてイっちゃう？ それも良いネ_HH_」"
					PRINTFORMW 「もちろん――一旦我慢してペットまんこにブチこんでもいいけどサ、どうする？ にひひ♪」
				ELSE
					PRINTFORMW 「にひー♪ いやね、必死過ぎて笑けてきちゃったというか」
					PRINTFORMW 「そんなに射精したいんですネ？ ええ勿論、ペット的にもオッケーですヨ♪」
					CALL PRINT_STRW, "「でーもー―――こんなんで射精しちゃうのはちょっと情けないよネ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「お？おマタの間でプルプルシてきましたネ？」
					PRINTFORMW 「そーれ射・精！ 射・精！ 手拍子まで付けちゃう！ 射・精！ そーれ射・精！！」
					PRINTFORMW 「はーい射・精！ 射・精！ しゃ・せ・い！！ ふぅ――え、うるさい？ ですよね！！」
				ELSEIF RAND:2
					PRINTFORMW 「お、おお？ おいおいまだ挿入って無いぜ？」
					PRINTFORMW 「なぁんだ、あんまり腰使ってるから入りそうで入らないを楽しむPLAYかと思ったヨ♪」
					SIF TALENT:恋慕
						CALL PRINT_STRW, "「で、ヨ――――本当に挿入れないんだ？ 意っ気地ー无ー_HH_」"
				ELSE
					PRINTFORMW 「にひひ♪ 我慢してますって顔しちゃ駄目ですヨ、%CNAME("主人")%ヨ♪」
					PRINTFORMW 「きもちよーく射精するぞーって顔、しましょうネ♪」
				ENDIF
			ENDIF
		;足交
		ELSEIF SELECTCOM == 95 && RAND:3
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「本気でこんなので射精するつもり？」
				ELSEIF RAND:2
					PRINTFORMW 「言っておくけれど、コレで射精したら軽蔑するからね」
				ELSE
					PRINTFORMW 「……度し難いな」
					PRINTFORMW 足裏で射精の予感を感じ取ったのか%CALLNAME:TARGET%は眉を顰めた…
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「あらら～、まさかまさか射精とかしちゃいますかネ_HH_」"
					CALL PRINT_STRW, "「隠すなよ～ペットはお開阔处だ。 おらっペットあんよで射精しろっ_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「あんよが気持ち良すぎて脳みそ胖次胖次かい_HH_」"
					CALL PRINT_STRW, "「良いぜ_HH_ その胖次胖次の脳みそこのまま布ン_HH_ ってさせてやる_HH_」"
				ELSE
					CALL PRINT_STRW, "「にひ_HH_ 観念して足で射精しちゃえよ_HH_」"
					CALL PRINT_STRW, "「ペットの足まんこに負けるのは、ぜーったい気持ち良いぜ_HH_」"
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「射精しそう？ なるほどそりゃ結構！」
					PRINTFORMW 「足攣りそうになってる甲斐があるネ！！」
				ELSEIF RAND:2
					PRINTFORMW 「へいへい%CNAME("主人")%ヨ。一応訊いておくぜ？」
					PRINTFORMW 「このまま射精することに関して何か思うところは？無い？ デスヨネ！！」
				ELSE
					PRINTFORMW 「えー、こちら%CALLNAME:TARGET%酱、こちら%CALLNAME:TARGET%酱」
					PRINTFORMW 「%CNAME("主人")%が足で踏まれたりシゴかれてるのに射精しそうです。どうぞ」
					PRINTFORMW 「こちら%CALLNAME:TARGET%酱。%CNAME("主人")%は重度の変態性欲だ、好きにさせろ。オーバー」
					PRINTFORMW 「ってなワケで脳内会議で決議出たんでいつでも出していいですヨ？」
				ENDIF
			ENDIF
		ELSE
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「気にせず排泄しろよ、笑着给から」
				ELSEIF RAND:2
					PRINTFORMW 「我慢なんて言うなよ。一刻も早くこの行為を終わらせよう」
				ELSE
					PRINTFORMW 「余り手を煩わせないで欲しいな」
				ENDIF
			ELSEIF TALENT:恋慕 && RAND:2
				IF RAND:3 == 0
					CALL PRINT_STRW, "「ni↘ひ_HH_ もう少し我慢してもいいぜ？」"
					CALL PRINT_STRW, "「できるもんならネっ_HH_ 可愛いペットはご奉仕に加減なんかしませんとも_HH_」"
				ELSEIF RAND:2
					CALL PRINT_STRW, "「わんわん_HH_ お精子欲しいナ～_HH_ 最っ高にドロドロしたやーつー_HH_」"
				ELSE
					CALL PRINT_STRW, "「限界近いのはわかってるんだよネ～_HH_」"
					CALL PRINT_STRW, "「降伏しろ～_HH_ 親御桑も泣いてるぞ～_HH_」"
					SIF RAND:2
						PRINTFORMW 「おっと、申し訳ない。今のは失言だったネ！！」
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「射精寸前のお顔ってのは見てて面白色モンだネ」
					PRINTFORMW 「どんな顔してるかって？ そりゃあ乙女的に出来ませんヨ」
				ELSEIF RAND:2
					PRINTFORMW 「ははーん、さては要去了ですナ？」
					PRINTFORMW 「対精液よーい！ 構えっっ――――あ、いつでも良いですヨ？」
				ELSE
					PRINTFORMW 「射精するのは良いんだけどサー酱とご褒美にイロつけてネ？」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF

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

IF TALENT:恋慕
	IF CEVENT("恋慕：ささくれ")
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;それ以外
ELSE
	PRINTFORMW
ENDIF

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

;-------------------------------------------------
;髪、顔、股間、腹、尻、くぱぁ、Ａくぱぁへのぶっかけ
;-------------------------------------------------
IF SHOOT("ぶっかけ")
	IF SHOOT("自慰")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「なんでわざわざこちらに？」
				ELSEIF RAND:2
					PRINTFORMW 「ティッシュにでも吐き出せば良いのに」
				ELSE
					PRINTFORMW 「…………」
					PRINTFORMW %CALLNAME:TARGET%は理解できないといった風な表情で睨んでいる…
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「掛けてもらえるのは嬉しいですヨ_HH_」"
					PRINTFORMW 「でも自慰で射精されるのは納得いかなーい！！ 抗議する抗議！！」
				ELSEIF RAND:2
					PRINTFORMW 「ははーん、さてはこうやって自慰で射精してぶっかけてみせて」
					PRINTFORMW 「%CALLNAME:TARGET%酱の奉仕欲を煽ろうっていう算段だナ？」
					PRINTFORMW 「まっさかーそんな手に――――できらぁ受けて立ってやる！！！！！」
				ELSE
					PRINTFORMW 「是、ペットは大層ご不満です。いや、ぶっかけは良いけどネ」
					PRINTFORMW 「理由？ 理由を訊きますか？ 作文用紙50枚程頂きますがよろしいか？」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ぶっ掛けられる的！ いやー、こりゃ楽だネ」
			ELSEIF RAND:2
				PRINTFORMW 「おつかれ桑。で、ギャラは如何ほどですかネ」
			ELSE
				PRINTFORMW 「まーそれだけ%CALLNAME:TARGET%酱が魅惑的ってコトで？ 悪い気はしませんがネ。にひひっ」
			ENDIF
		ENDIF
	;鼻钩時専用です。人を選びすぎるので基本的には書かなくて良いと思われます
	ELSEIF SHOOT("鼻の穴")
		;初めて
		IF FIRST_EV("絶頂：ぶっかけ鼻の穴") == 0
			PRINTFORMW
		;鼻の穴に出され慣れて平気变成了
		ELSEIF CHECK("鼻射")
			PRINTFORMW
		;鼻钩自体は受け入れているが苦痛
		ELSEIF CHECK("鼻钩")
			PRINTFORMW
		;全面的につらい
		ELSE
			PRINTFORMW
		ENDIF
	;超大量射精
	ELSEIF COND("絶頂", PLAYER) >= 3 && RAND:3
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「わっ、あ、え……これ、は」
					PRINTFORMW 「……だ…大丈夫、なのかい？」
				ELSEIF RAND:2
					PRINTFORMW 「……心配に……いや」
					PRINTFORMW 「少しは量を抑えて…臭いが、酷い」
				ELSE
					PRINTFORMW 「……次からは加減するよ、できるだけ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					CALL PRINT_STRW, "「にひっ_HH_ めっちゃくちゃ射精しましたネ～_HH_」"
					CALL PRINT_STRW, @"「なんだよ～_HH_ %CALLNAME:TARGET%酱大好きか～このこの～_HH_」"
					SIF RAND:2
						PRINTFORMW 「いや、あのネ――――真顔で頷かれるとマジで照れるからやめてくれ」
				ELSEIF RAND:2
					CALL PRINT_STRW, "「くっふふ_HH_ あーあーあー、このままじゃ干物になっちゃいますヨ_HH_」"
					CALL PRINT_STRW, "「まぁこれも～？ 有能ペットのご奉仕力の賜物ですからネ_HH_ ほら、撫でて撫でて_HH_」"
				ELSE
					CALL PRINT_STRW, "「こっ…こんなに…_HH_ ｺﾞｸｯ…_HH_」"
					CALL PRINT_STRW, @"「にひ…にひひひっ_HH_ あ～ほっぺたニヤけんの止まんねーや_HH_」"
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「あの～ですネ。流石にこの量は心配になりますヨ？」
				PRINTFORMW 「っていうか、まだヤる気なんですネ！まだ出るんですネ！？ どうなってんだ人体！」
			ELSEIF RAND:2
				PRINTFORMW 「ちょっ溺れる！溺れる！！ 精子で溺れる！！！！」
				PRINTFORMW 「溺死（精子）とか洒落になんない！？ 変な記録に載っかっちゃうんですが！？」
			ELSE
				PRINTFORMW 「うわぁっ！！ 何もしてないのにチンコ壊れた！！」
				PRINTFORMW 「え、しただろうって？ しましたけど！ でもこんな量は想定してませんヨ！？」
			ENDIF
		ENDIF
	;大量射精
	ELSEIF COND("絶頂", PLAYER) == 2 && RAND:3
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW 「はぁ、頼みもしないのにビュービューと」
			ELSEIF RAND:2
				PRINTFORMW 「いっそ干からびてしまえば良いのに」
			ELSE
				PRINTFORMW 「後始末をする側の身にもなって欲しいな」
			ENDIF
		ELSEIF TALENT:恋慕
			IF RAND:3 == 0
				PRINTFORMW 「んっ――――にひひ♪」
				PRINTFORMW 「すっかりマーキングされちゃった♪」
			ELSEIF RAND:2
				PRINTFORMW 「あークッソ、ドン引きどころかちょっと嬉しいのが困るナ」
			ELSE
				PRINTFORMW 「はぁーもう、こんなに精液散らかして！！ そんなに気持ちよかったと言いたいんですかネ！！」
				PRINTFORMW 「気持ちよかった？ ならヨシ！！ わんわーん♪」
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ほーこれはこれは――いや、射精し過ぎだろう」
			ELSEIF RAND:2
				PRINTFORMW 「いやーやっぱり%CALLNAME:TARGET%酱って慎ましい生き物なのでは？」
			ELSE
				PRINTFORMW 「こんだけ射精させたっていうのは何処か誇らしいモンはあるんですがネ？」
				PRINTFORMW 「もしかしてこれが默认ルトだったりします？ 怖いなマジで」
			ENDIF
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「何処に掛けようが%CNAME("二人称")%の勝手だ」
					PRINTFORMW 「そしてどんな顔するかも%CNAME("一人称")%の勝手、そうだろう？」
				ELSEIF RAND:2
					PRINTFORMW 「……はぁ、拭う位はしてくれ」
				ELSE
					PRINTFORMW 「気持ち悪いな。率直に」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あーマズいですヨ%CNAME("主人")%。ぶっ掛けられるだけでキュンキュンしてますヨ」
					PRINTFORMW 「これを鎮める方法♪ わっかるっかなー♪」
				ELSEIF RAND:2
					PRINTFORMW 「マーキングかい？ 良い趣味してらっしゃる♪」
					CALL PRINT_STRW, "「でもこんなんじゃ足りないぜ_HH_ もっと、いっぱいシルシをつけておくれよ_HH_」"
				ELSE
					PRINTFORMW 「んっふ、ぶっかけの気分はどうだい？」
					PRINTFORMW 「えー%CALLNAME:TARGET%酱的にはですネー」
					PRINTFORMW 「あ、駄目だ、茶化そうとしてもニオイでニヤけるわこれ」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「おっと、自慢の肌を汚そうだなんてふてえ野郎だ！」
			ELSEIF RAND:2
				PRINTFORMW 「これ塗ってすぐは肌すべすべになるんだけどにゃー」
			ELSE
				PRINTFORMW 「こらこら伸ばすな伸ばすな、带污迹的込むだろう」
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;自慰で射精された(ぶっかけではなく床などに射精した)
;-------------------------------------------------
ELSEIF SHOOT("自慰")
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「……せめてちり紙にでも射精してくれ」
				ELSEIF RAND:2
					PRINTFORMW 「……ああ、まさに排泄だね」
				ELSE
					PRINTFORMW 「む…………別に、何とも」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ちょ、ぶっかけてすらくれない！？」
					PRINTFORMW 「むー、%CNAME("主人")%ヨ。次は、ネ？」
				ELSEIF RAND:2
					PRINTFORMW 「はは、無駄撃ちご苦労大人」
					PRINTFORMW 「……怒ってるか？ ふふ、よくご存知だね」
				ELSE
					PRINTFORMW 「床に気前よくご馳走してるとこ悪いんだけどネ」
					PRINTFORMW 「可愛いペットは大変ご不満です。是、ご不満です」
					PRINTFORMW 「床のヤツ舐めて就这様接吻ぞこの野郎」
				ENDIF
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「おー、良い射精っぷり」
				PRINTFORMW 「それで%CNAME("一人称")%はどうすれば？」
			ELSEIF RAND:2
				PRINTFORMW 「え、床のコレ舐めろとか？」
				PRINTFORMW 「そんなっ この鬼！ 悪魔！ %CNAME("主人")%！！」
				PRINTFORMW 「――そこまでは言ってない？ ですネ！」
			ELSE
				PRINTFORMW 「ははーん、さては%CNAME("主人")%は大気を孕ませようとしてらっしゃる？」
			ENDIF
		ENDIF

;以下は通常の射精区分。
;-------------------------------------------------
;素股、足交や身体で射精させた
;-------------------------------------------------
ELSEIF SHOOT("脚")
	;初めて
	IF FIRST_EV("絶頂：脚") == 0
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「……はぁ」
				PRINTFORMW 「いや、何処で、何処に射精しようと%CNAME("二人称")%の勝手だからね」
			ELSE
				CALL PRINT_STRW, "「にひっ♪ でーちゃった_HH_」"
				CALL PRINT_STRW, @"「こりゃもう%CALLNAME:TARGET%酱は全身凶器と言っても過言じゃないネ_HH_」"
			ENDIF
		;それ以外
		ELSE
			PRINTFORMW 「うわぁ本当に足で射精しやがったコイツ怖」
			PRINTFORMW 「イエイエナンデモナイデスヨ？わんわん！」
		ENDIF
	;二回目以降
	ELSE
		IF TEQUIP:推倒
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「脚で屈服させられた気分はどう？」
					ELSEIF RAND:2
						PRINTFORMW 「こんなに吐き出して、まだ足りないって言うんだろ。浅ましい」
					ELSE
						PRINTFORMW 「いえいえ、何とも思ってませんとも。今更だからネ」
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, "「だらしない顔してますネ_HH_ にひひっ_HH_」"
						CALL PRINT_STRW, "「そんなんじゃまたペットアンヨにワカラセさせられちゃいますヨ_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「ビュービューしたのにガッチガチなんだから本当に度し難いおちんちんだナ_HH_」"
						CALL PRINT_STRW, "「まだ足でシて欲しいかい？ にひひっ_HH_ 良いですとも、ペットのアンヨで良ければ幾らでも_HH_」"
					ELSE
						CALL PRINT_STRW, @"「良いのかい%CNAME("主人")%ヨ_HH_ このままだとアンヨで射精するのクセになっちゃうぜ_HH_」"
						CALL PRINT_STRW, "「もうなってるかも知れないけどネ_HH_ その時は一生このアンヨでおちんちんの面倒見て差し上げますとも_HH_」"
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「マジでこれで絞れちゃうんだもんナー」
				ELSEIF RAND:2
					PRINTFORMW 「おっといけね。余りにも普通な感じに脚で射精するもんだから受け入れてた」
					PRINTFORMW 「サクッと常識が歪むネー%CNAME("主人")%の相手してるとサ」
				ELSE
					PRINTFORMW 「是是アンヨは気持ち良いかい？ よきかなよきかな」
					PRINTFORMW 「対価は足の肉でいいぜ♪ あ、もちろん冗談だけどネ？」
				ENDIF
			ENDIF
		ELSE
			;恋慕
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					IF RAND:3 == 0
						PRINTFORMW 「少しは顧みたらどうだい、%CNAME("二人称")%今凄く情けないよ」
					ELSEIF RAND:2
						PRINTFORMW 「――――足が、ドロドロだ。気持ち悪い」
					ELSE
						PRINTFORMW 「足で弄ばれたのにその満足そうな顔、無性にムカムカするな」
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「んふ_HH_ 射精しましたネ_HH_ 心苦しいんですヨ？ %CNAME("主人")%を足蹴にするのは♪」"
						CALL PRINT_STRW, "「え？嘘だろうって？ にひっ_HH_ どう思う？ おちんちんに聞いてみようか。うりうり♪」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「脱力ついでにぽけーっとしてても良いですヨ_HH_」"
						CALL PRINT_STRW, "「その間ちんぽ蹴って遊んでるからサ_HH_ ――――お、勃起的。マジかよ」"
					ELSE
						CALL PRINT_STRW, "「にひー_HH_ 脚でなんてサ、呆れ半分なんだけどナー」"
						CALL PRINT_STRW, "「何で幸せそうな顔見ると頬が緩むんだか_HH_ ――――愛犬根性が憎いネ、自分の」"
					ENDIF
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あのですネ？ こう、思う所が有ませんかネ？」
					PRINTFORMW 「無い？ 気持ちよかった？ ほっほー！ ヤッベェなこの%CNAME("主人")%」
				ELSEIF RAND:2
					PRINTFORMW 「本当にアンヨがお好きなんですネー」
					PRINTFORMW 「流石のワンコもちょーっとドン引きと言いますかネ」
				ELSE
					PRINTFORMW 「伸びる伸びる、指の間で糸引いてら」
					PRINTFORMW 「いやー我ながら足で射精させる自分の技巧にビッ阴蒂ですヨ」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ELSEIF SHOOT("素股")
	PRINTFORMW
;-------------------------------------------------
;口で射精させた
;-------------------------------------------------
ELSEIF SHOOT("口")
	IF FIRST_EV("絶頂：口") == 0
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW 「ぐぷっ！？ ん――ぁ――ん、んんっ――――げほっごほっはっ――はっ」
			PRINTFORMW 「ああ、酷い、味だ。はは――本当に酷い」
		ELSE
			PRINTFORMW 「んぶっ――――んっ、ん？ んおお？」
			PRINTFORMW 「――――うーん……もしかして意外と飲めるナ？」
		ENDIF
	ELSEIF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF TEQUIP:推倒
				IF RAND:3 == 0
					PRINTFORMW 「んぁ――垂れた、もう」
					PRINTFORMW 「別に、汚さない為だよ。後始末が大変だろ」
				ELSEIF RAND:2
					PRINTFORMW 「ああ、無事お腹にお大人ったよ。無駄撃ちだね、ご苦労大人」
				ELSE
					PRINTFORMW 「口の中と性器の区別は付いているかな？」
					PRINTFORMW 「そうか、付いていたんだね。あんまりにも濃いのを出すから付いてないかと思った」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「―――――んっ、く、ふぅ」
					PRINTFORMW 「ああ、飲んだ、飲んだよ。何か言うことは？」
				ELSEIF RAND:2
					PRINTFORMW 「不味かった。最悪だ。%CNAME("二人称")%も飲んでみると良いよ」
				ELSE
					PRINTFORMW 「――――んぅ」
					PRINTFORMW 「喉を通る感じ、本当に不快なんだよ」
				ENDIF
			ENDIF
		ELSE
			IF TEQUIP:推倒
				;精液中毒Lv3
				IF ABL:精液中毒 >= 3
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「じゅる――_HH_ あー、たまんね_HH_ %CNAME("一人称")%は慎ましい生き物なのにサ」"
						CALL PRINT_STRW, @"「こんな味覚えさせて%CNAME("主人")%も人类が悪いネ_HH_ 悪い人类だぜ、ホントに_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「けぷ――まだまだ、満足してないぜ_HH_」"
						CALL PRINT_STRW, "「轻轻地一週間分は腹ン中に溜め込んどかないとネ_HH_」"
					ELSE
						CALL PRINT_STRW, "「おい、まだ出るだろ_HH_ ペットの嗅覚舐めたらいかんぜ_HH_」"
						CALL PRINT_STRW, "「こうやって根本からつつーっと温柔的してやるとサ――ネ_HH_ 元気变成了_HH_」"
					ENDIF
				;それ以外
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「ごっそ桑っと――はー困ったもんですナ」
						CALL PRINT_STRW, "「いや、お腹の別の場所がキュンキュンしてきちまった_HH_」"
					ELSEIF RAND:2
						PRINTFORMW 「んっ――お掃除も完了！ わんわん♪」
						PRINTFORMW 「いやー自分のワンコ根性が怖い、こりゃ最優秀ペット賞は貰ったネ」
					ELSE
						PRINTFORMW 「んーっ、んんんーん、んっんんっ！ んごぉっぷっんー！」
						PRINTFORMW 「ん、ごくっ、いや、腹ン中入れるの勿体なくて暫く堪能してただけですヨ？」
					ENDIF
				ENDIF
			ELSE
				IF ABL:精液中毒 >= 3 && RAND:2
					IF RAND:3 == 0
						PRINTFORMW 「不思議なモンだネ、どう考えても肉の方が美味いんだけどナ」
						PRINTFORMW 「喉の絡みつく感じも、味も、气味も、最悪なのに――にひっ、もっとちょーだい♪」
					ELSEIF RAND:2
						PRINTFORMW 「あーあー、%CALLNAME:TARGET%酱は慎ましい生き物なんですヨ？」
						PRINTFORMW 「それがどうですか、こうしてお口の中に精液入れたままでも普通に喋れるように――けぷっ」
						PRINTFORMW 「おっと今のはナシだ、乙女的減点が大きすぎる」
					ELSE
						PRINTFORMW 「おいおい%CNAME("一人称")%としたことが飲み残しが主上ゃないか」
						PRINTFORMW 「ちょっとちんちん貸しなさい――んっ――ちゅっ、ぇろ――んぁ――ん――ヨシ、これでお残しは無いネ！！」
					ENDIF
				;それ以外
				ELSE
					IF RAND:3 == 0
						PRINTFORMW 「別に宗旨変えしたわけじゃ無いんですヨ？ 不味いは不味い、めっちゃ不味い」
						CALL PRINT_STRW, "「それでも飲むのは――あのですネ、誰のかって、大事なんですヨ_HH_」"
					ELSEIF RAND:2
						PRINTFORMW 「こんなに飲ませて%CALLNAME:TARGET%酱をどうするつもりなんですかネ♪」
						PRINTFORMW 「まさか精液で溺れさせるとか発情させるとかエロ漫画みたいな事を！？」
						PRINTFORMW 「――いや、マジで出来そうだな%CNAME("主人")%なら。%CNAME("一人称")%も%CNAME("主人")%の精液で発情するし」
					ELSE
						PRINTFORMW 「んっ――にひ、にひひ♪ ――あ、ああ、なんだい？ 顔緩んでる？」
						PRINTFORMW 「そういうのは言わないのが吉だぜ？ 精液飲んで緩む顔は乙女的に減点だ」
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	;NOT恋慕
	ELSE
		IF TEQUIP:推倒
			IF MARK:屈服刻印 >= 2
				IF RAND:3 == 0
					PRINTFORMW 「あー、口ン中青臭くって頭くらっくらするナ」
					PRINTFORMW 「ああもちろん、それでもサービスの手は抜きませんとも、ワンワン♪」
				ELSEIF RAND:2
					PRINTFORMW 「%CNAME("主人")%ヨ、何か言うことはあるかい？」
					PRINTFORMW 「にひひ♪ そうそう、そうやって良好な関係を築君だ♪」
				ELSE
					PRINTFORMW 「にひっ――良いね、ねっとり濃いのが出てる」
					PRINTFORMW 「こりゃあお肉の味にも期待が持てるってモンですヨ♪」
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「んっ――べぇ、やっぱり不味いな」
					PRINTFORMW 「サービス料金は餌でのお支支付を希望するぜ」
				ELSEIF RAND:2
					PRINTFORMW 「うっわまだ喉の絡んでやがる。なんて粘着質なんだ」
					PRINTFORMW 「%CNAME("主人")%ヨ、呆けてないで労いの一つでも掛けるのが良い飼い主への第一歩だぜ」
				ELSE
					PRINTFORMW 「はーいお口の中にごあんな――ごふっ、げふっごぉっ！！」
					PRINTFORMW 「ちょっと濃く無いか？ 体調不良とかじゃなくて普通こんなモン？ 肉の味落とすのだけは勘弁してくれよ」
				ENDIF
			ENDIF
		ELSE
			IF MARK:屈服刻印 >= 2
				IF RAND:6 == 0
					PRINTFORMW 「むー、飲めと言われりゃそりゃペットとしちゃあ飲みますがネ？」
				ELSEIF RAND:5 == 0
					PRINTFORMW 「これが美味しい血肉だったらナー――――お、そう考えたら何か飲める気がしてきた」
				ELSEIF RAND:4 == 0
					PRINTFORMW 「青臭くってたまんないネ。あ、このたまんないはやってらんないのたまんないであってですネ」
					PRINTFORMW 「『やだ%CNAME("主人")%の精液素敵！毎日ゴクゴク飲めちゃうわ！』 って意味じゃ無いので悪しからず！」
				ELSEIF RAND:3 == 0
					PRINTFORMW 「中々どーして味にゃ慣れませんナ」
					PRINTFORMW 「飲んでみたら解るぜ、最悪を煮詰めた味してる」
				ELSEIF RAND:2
					PRINTFORMW 「んべぇ――こひゃまはえんろなくらしまひはへ？」
					PRINTFORMW 「ん――きちんと受け止めたペットを労っても良いんだぜ」
				ELSE
					PRINTFORMW 「んく――ふぅーわんわん！ もっとせーえき欲しいですわん！」
					PRINTFORMW 「わお、おっきくなった。適当な演技でも反応するんだネ。なんて哀しい生き物だ」
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ほっほーこれはまた何とも珍奇な味ですナ」
					PRINTFORMW 「正直に？ 不味い。喜んで飲むなんてどうかしてるネ」
				ELSEIF RAND:2
					PRINTFORMW 「うっぷ――失礼？ 餌の為ですもの、出来る限りのサービス致しますわ♪」
				ELSE
					PRINTFORMW 「ぐぇー、血でも混ぜたらマシになるかナ」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;胸で射精させた
;-------------------------------------------------
ELSEIF SHOOT("胸")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF TEQUIP:推倒
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ELSE
			;初めて
			IF FIRST_EV("絶頂：胸") == 0
				PRINTFORMW
			;それ以外
			ELSE
				IF TEQUIP:推倒
					IF RAND:3 == 0
						PRINTFORMW
					ELSEIF RAND:2
						PRINTFORMW
					ELSE
						PRINTFORMW
					ENDIF
				ELSE
					IF RAND:3 == 0
						PRINTFORMW
					ELSEIF RAND:2
						PRINTFORMW
					ELSE
						PRINTFORMW
					ENDIF
				ENDIF
			ENDIF
		ENDIF
	ELSE
		;初めて
		IF FIRST_EV("絶頂：胸") == 0
			PRINTFORMW
		ELSEIF TEQUIP:推倒
			IF MARK:屈服刻印 >= 2
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ELSE
			IF MARK:屈服刻印 >= 2
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			;それ以外
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;手で射精させた
;-------------------------------------------------
ELSEIF SHOOT("手") && RAND:2
	;初めて
	IF FIRST_EV("絶頂：手") == 0
			IF CEVENT("恋慕：ささくれ")
				PRINTFORMW 「――ちっ」
				PRINTFORMW %CALLNAME:TARGET%は手に掛かった精液を見ると一瞬呆けたが、理解するなり露骨に顔を顰めた…
			ELSE
				PRINTFORMW 「うっわ何か出たぁ！ 塞げ塞げ！！ え？塞がなくて良い？」
				PRINTFORMW 「――あー射精ですネこれ。 へー、手でするとこんな感じかー」
			ENDIF
	ELSEIF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF TEQUIP:推倒
				PRINTFORMW 「――まだ、震えてる」
			ELSE
				PRINTFORMW 「物欲しそうな顔しないでくれ。やれば良いんだろう、後始末」
			ENDIF
		ELSE
			IF TEQUIP:推倒
				PRINTFORMW 「でーたーでーたーだーしーたー♪ ペットのお手々でだーしーた♪」
				PRINTFORMW 「ん？ なになに、ちょっとキツイから歌いながら扱くの止めて欲しい？」
				PRINTFORMW 「にひ♪ ――でーたーでーたーだーしーたー♪」
			ELSE
				PRINTFORMW 「お手々なんかで射精してくれるのも嬉しいんですがネ」
				PRINTFORMW 「こんだけ出るんだから、他も期待しちゃって良いんですよ、ネ♪」
			ENDIF
		ENDIF
	ELSE
		IF TEQUIP:推倒
			IF MARK:屈服刻印 >= 2
				PRINTFORMW 「ああお客様困ります！ そんなに射精されてはああお客様！お客様！！」
				PRINTFORMW 「困ります言いながらちんちんで玩遊戲なって？ ――ああお客様！！」
			;それ以外
			ELSE
				PRINTFORMW 「にひ♪ 出た出た♪ これがお肉に変わると思うと達成感も一入ですヨ♪」
				PRINTFORMW 「じゅるり――――おっとペットの顔ペットの顔」
			ENDIF
		ELSE
			IF MARK:屈服刻印 >= 2
				PRINTFORMW 「ｸﾝｸﾝ――うーん、食欲唆る气味ってワケでも無いんだけどナ」
				PRINTFORMW 「ついつい嗅いじまう――ｸﾝｸﾝ――ｸﾝｸﾝ――うわくっせー」
			;それ以外
			ELSE
				PRINTFORMW 「これってティッシュのサービスとかある？」
				PRINTFORMW 「セルフですか、良いサービスですネ！」
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;性交で射精させた
;-------------------------------------------------
ELSEIF SHOOT("Ｖ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ｖ中出し") == 0
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「中出ししたんじゃない、絞られたんだ。間違えるな」
					PRINTFORMW 「そして忘れるなよ、%CNAME("二人称")%は、%CNAME("二人称")%を嫌いな女に屈服させられたんだ」
				ELSE
					CALL PRINT_STRW, "「う゛ぅ――お゛ぉ、おおお？_HH_ぁ？_HH_ぁああ？_HH_」"
					CALL PRINT_STRW, "「あ、ひ、にひ、にひひひ――_HH_ やっべ、幸せ過ぎて腰抜けた_HH_ こりゃハマるわ_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「お？ ダされる感覚って解りやすいもんだネ？」
				PRINTFORMW 「ぽーって腹ン中アツく――ああ、満たされる？ しっかり身体は雌なんだナー」
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW 「無責任だね。我慢の素振り位見せたらどうだい？」
					PRINTFORMW 「……いいや、丁度良いか。どうせ同じ人で无だものね」
				ELSE
					CALL PRINT_STRW, @"「あークッソ、ナカで射精しやがった_HH_ ホント駄目だよ、こういうのサ」"
					CALL PRINT_STRW, "「退廃的っていうか、倒錯的っていうかネ――はー、嬉しいで全部塗りつぶされちゃった_HH_」"
				ENDIF
			ELSE
				PRINTFORMW 「お？ ダされる感覚って解りやすいもんだネ？」
				PRINTFORMW 「ぽーって腹ン中アツく――ああ、満たされる？ しっかり身体は雌なんだナー」
			ENDIF
		ENDIF
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「ほら、また絞られた」
					PRINTFORMW 「その程度だよ、%CNAME("二人称")%は。その程度なんだ」
				ELSEIF RAND:2
					CALL PRINT_STRW, "「あ、出て――っふっ_HH_ なんだ、何だよ、その顔は」"
				ELSE
					PRINTFORMW 「跨がられて、抵抗せず、絞られて」
					PRINTFORMW 「もう少し悔しそうな顔は出来ないの？」
					PRINTFORMW 「ふぅん、自尊心って奴は売り切れているんだね」
				ENDIF
			ELSE
				IF CEVENT("めすがきぺっと") && TALENT:相思相愛 == 0
					IF RAND:6 == 0
						PRINTFORMW 「あーあ、このままペットまんこの旦那桑に――」
						CALL PRINT_STRW, "「いや、お嫁桑になっちゃおうぜ_HH_ 浮気ちんぽ君_HH_」"
					ELSEIF RAND:5 == 0
						CALL PRINT_STRW, @"「良いんだぜ_HH_ %CNAME("主人")%は悪くなーい_HH_ 悪くなーい_HH_」"
						CALL PRINT_STRW, "「ネ_HH_ 簡単に射精しちまうこの浮気ちんぽが悪いんだ_HH_ だーかーらー_HH_」"
						CALL PRINT_STRW, "「もっといーっぱい、お仕置きしてやらないと、ネ_HH_」"
					ELSEIF RAND:4 == 0
						CALL PRINT_STRW, "「ほら、ツガイの子の事考えながら射精するのはキモチイイだろ_HH_」"
						CALL PRINT_STRW, "「目を閉じて、もっと考えてやれよ_HH_ どんな顔してる？ 笑着る？ 悲しんでる？」"
						CALL PRINT_STRW, "「にひっ_HH_ 目を開けて？ ――今、誰に射精したのかナ_HH_」"
					ELSEIF RAND:3 == 0
						CALL PRINT_STRW, "「――にひっ_HH_ 浮気精子ご馳走様_HH_」"
					ELSEIF RAND:2
						CALL PRINT_STRW, "「あーあー本気の浮気射精しちゃったネ_HH_」"
						CALL PRINT_STRW, "「爸爸变成了らどーするヨ_HH_ にひひっ_HH_」"
					ELSE
						CALL PRINT_STRW, "「っ_HH_ でーちゃった_HH_」"
						CALL PRINT_STRW, "「ざぁこ_HH_ 諦めて爸爸になれ_HH_」"
					ENDIF
				ELSE
					IF RAND:3 == 0
						CALL PRINT_STRW, @"「ねーねー%CNAME("主人")%ヨ_HH_ 気持ち良かったかい？」"
						CALL PRINT_STRW, "「にひっ_HH_ そりゃ結構♪ じゃ、もっと気持ち良くなるってのはどうだい？」"
					ELSEIF RAND:2
						CALL PRINT_STRW, @"「あったまバチバチする_HH_ ヤバいって、%CNAME("主人")%_HH_」"
						CALL PRINT_STRW, "「駄目です駄目です！_HH_ その射精顔見たらもっと美味しく頂きたくなっちゃうって_HH_」"
					ELSE
						CALL PRINT_STRW, @"「にひっ――呆けちゃやーよ_HH_%CNAME("主人")%専用の万年発情まんこだぜ_HH_」"
						CALL PRINT_STRW, @"「まだまだ、美味しく頂けちゃうんだ_HH_ 遠慮するなよ、もっと味わってくれ_HH_」"
					ENDIF
				ENDIF
			ENDIF
		ELSEIF MARK:屈服刻印 == 2
			IF RAND:3 == 0
				PRINTFORMW 「出てる出てる。すっごい勢いですネ？」
				PRINTFORMW 「これこのまま絞りきったらパクっと頂いたり――冗談ですヨ？」
			ELSEIF RAND:2
				PRINTFORMW 「にひっ♪ グロッキーには早いぜ？ もっと楽しむんだろう、%CNAME("主人")%？」
			ELSE
				PRINTFORMW 「皿の上で頂かれる気分はどうだい%CNAME("主人")%♪」
				PRINTFORMW 「頂いてる側としちゃもちろん、絞り切りますとも♪ お残しは罪だからネ！」
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「ひー、やっと出たな。楽かと思ったら結構な重労働だぜこれ」
			ELSEIF RAND:2
				PRINTFORMW 「休憩、休憩ですヨー！ まったくずっと腰振ったりなんだったりサ」
				PRINTFORMW 「結構胸罩ックな職場――じゃねぇな、胸罩ックな飼育環境ですネこれ！」
			ELSE
				PRINTFORMW 「中出しついでにご褒美の人类噛みー！ 良いだろ？」
				PRINTFORMW 「っちぇー、良いですよ良いですよ、絞り切れば断れなくなるだろうしネ♪」
			ENDIF
		ENDIF
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「――っ、ああ、終わったなら、さっさと抜いてくれ」
				ELSEIF RAND:2
					PRINTFORMW 「ちっ――ナカまで犯して、征服したとでも言いたいの？」
				ELSE
					PRINTFORMW 「嫌いだ、嫌い。大嫌い――懐柔なんかされてやるものか」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「あ゛ー、ちょっとタンマ。今浸ってるトコだから」
					PRINTFORMW 「――――頭撫でるなよ、排卵するぞコラ」
				ELSEIF RAND:2
					PRINTFORMW 「あのネ。射精するって時に抱きしめようとしてくるだろう%CNAME("二人称")%」
					PRINTFORMW 「轻轻地脳で要去了になってフザケられないからやめて頂きたいナーってネ？」
				ELSE
					CALL PRINT_STRW, "「――――ふぅ_HH_ ふぅ_HH_ 話しかけるなよ_HH_」"
					CALL PRINT_STRW, @"「今、%CNAME("二人称")%にお願いされたら、何でもイエスって言いそうだからサ_HH_」"
				ENDIF
			ENDIF
		ELSEIF MARK:屈服刻印 == 2
			IF RAND:3 == 0
				PRINTFORMW 「ちょ、タンマタンマ！ 溢れる！ ドロっと何か出てくる！！」
			ELSEIF RAND:2
				PRINTFORMW 「どひゃあ、こりゃあまた盛大にぶちまけましたネ」
				PRINTFORMW 「しかもまだビンビンでいらっしゃる。にひっ良いネ、欲望たっぷりだ♪」
			ELSE
				PRINTFORMW 「これで実際にお腹一杯になるんだったら良いのにナー」
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「お、腹あったかいな、こりゃまた出たネ？」
			ELSEIF RAND:2
				PRINTFORMW 「どうぞどうぞ、気持ちよくなってくれればそれだけ労働の対価が楽しみだからネ♪」
			ELSE
				PRINTFORMW 「うぉ！？ お、おー――――じわじわむずむずすっげぇなこれ」
			ENDIF
		ENDIF
	ENDIF
ELSEIF SHOOT("Ａ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ａ中出し") == 0
		IF TEQUIP:推倒
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW
			ENDIF
		ELSE
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ELSEIF MARK:屈服刻印 == 2
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ELSEIF MARK:屈服刻印 == 2
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		;それ以外
		ELSE
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;接吻で射精
;-------------------------------------------------
ELSEIF SHOOT("接吻")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ELSE
			IF TEQUIP:推倒
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW
				ELSEIF RAND:2
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ENDIF
	ELSE
		IF TEQUIP:推倒
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ENDIF
;-------------------------------------------------
;面部騎乗で射精
;-------------------------------------------------
ELSEIF SHOOT("面部騎乗")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW
		ELSEIF RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;洗面奶で射精
;-------------------------------------------------
ELSEIF SHOOT("洗面奶")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDIF
	ELSE
		IF RAND:3 == 0
			PRINTFORMW
		ELSEIF RAND:2
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
;-------------------------------------------------
;逆舐陰で射精
;-------------------------------------------------
ELSEIF SHOOT("逆舐陰")
	PRINTFORMW
;-------------------------------------------------
;逆肛交、逆強姦で射精
;-------------------------------------------------
ELSEIF SHOOT("逆強姦") || SHOOT("逆肛交") || SHOOT("肛門奉仕")
	IF TALENT:恋慕
		IF CEVENT("恋慕：ささくれ")
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;PLAYERが女で、イってしまった…
;-------------------------------------------------
ELSEIF SHOOT("調教者が女性")
	;強絶頂
	IF COND("絶頂", PLAYER) >= 2
		PRINTFORMW
	;絶頂
	ELSEIF COND("絶頂", PLAYER) == 1
		PRINTFORMW
	ENDIF
ENDIF

;-------------------------------------------------
;角色が調教中に調教者を攻める際などの口上
;-------------------------------------------------
@KOJO_COUNTER_K60, ARGS
SELECTCASE ARGS
CASE "绝顶忍耐"
	;partnerに焦らされている
	IF TEQUIP:推倒
		PRINTFORMW
	;PLAYERが绝顶忍耐
	ELSE
		;今回がこらえた初回
		IF EX:PLAYER:绝顶忍耐 == 0
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
CASE "恍惚"
	PRINTFORMW
CASE "推倒"
	PRINTFORMW
CASE "強制終了"
	PRINTFORMW
CASE "復活"
	PRINTFORMW
CASE "恍惚から復帰"
	PRINTFORMW
CASE "助手が限界"
	PRINTFORMW
CASE "到脱力为止结束的提案"
	PRINTFORMW
CASE "拒绝到脱力为止结束"
	PRINTFORMW
ENDSELECT

RETURN 1

;-------------------------------------------------
;イベント口上集
;ARGSの各CASEでの分岐において、ARGSの文字列後半に ：地の文前 を追加する事で地の文前に喋らせることもできる。
;また、そこでTFLAG:地の文スキップ = 1 とすると、本来出て来る地の文を飛ばすこともできる
;CASE "中出し後害羞"の地の文の前に喋らせたりスキップさせたい場合にはCASE "中出し後害羞：地の文前"を用意すればよい
;例）CASE "中出し後害羞：地の文前"
;		PRINTW 試しにスキップ
;		TFLAG:地の文スキップ = 1
;-------------------------------------------------
@KOJO_EVENT_K60, ARGS
SELECTCASE ARGS
;-------------------------------------------------
;調教終了不可能
;-------------------------------------------------
CASE "調教終了不可能"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;避孕套装着
;-------------------------------------------------
CASE "Ｖ避孕套装着"
	;挿入指令
	IF TRAIN_GENRE("挿入", SELECTCOM)
		;PLAYヤーは着ける気満々
		IF TEQUIP:PLAYER:避孕套
			IF TALENT:恋慕
				IF CEVENT("恋慕：ささくれ")
					PRINTFORMW
				ELSE
					PRINTFORMW 「%TEXTR("は～い没収/却下DEATH/一昨日来やがれ避孕套！/くたばれ避孕套！！/交尾にそんなの要る？/ボッシュートでーす/是ゴミ箱よーい")%」
					IF RAND:3 == 0
						PRINTFORMW 「可愛い%TEXTR(@"%CALLNAME:TARGET%酱/ペット/ワンコ")%は%TEXTR("避孕套/避孕套")%拒否しまーす」
					ELSEIF RAND:2
						PRINTFORMW 「ナマでシようぜ～？ ――ナマでシたいんだよ、言わせんな恥ずかしい！！」
					ELSE
						PRINTFORMW 「%CNAME("主人")%のぜーんぶ感じたいの、オトメゴコロを解ってないなー！ %CNAME("一人称")%も解らんけど！！」
					ENDIF
					CALL SETFLAG, "避孕套中止", PLAYER
				ENDIF
			ENDIF

		;ご褒美に生Ｈをさせて给場合
		ELSEIF TCVAR:獎勵生H

		;避孕套が無い
		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 COND("嘔吐後余力有")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「う゛ぇ゛っ――あ゛ぁ゛っ、んっ、んんっ！！ はぁ――どうせ、満足なんかしてないんだろう？」
				ELSEIF RAND:2
					PRINTFORMW 「あ゛ぁ゛、うんっ、んんっ――ああ、勿体無い」
					PRINTFORMW 「なんだい、まだやるの？ 構わないけれどね、この趣味の悪い荒淫の後始末は%CNAME("二人称")%がしてくれよ」
				ELSE
					PRINTFORMW 「ん゛っ ぐぅ゛っ ぇ゛え゛っ ――ああ、まだ、うっ、うぇ゛え゛っ！！」
					PRINTFORMW 「げぷっ――うぅ゛ぅ゛げぇえ゛え゛っ―――げぇっ――は゛ぁ゛、は゛ぁ゛――注文街道、全部出し切ってやったよ」
					PRINTFORMW 「まだヤるならご自由に。この散々な状態で何を囁くのか楽しみにしてるよ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「%CNAME("主人")%の趣味にも困ったモンですヨ。見てみろこの大惨事！！」
					PRINTFORMW 「わかるかい、%CNAME("一人称")%に！ %CNAME("二人称")%の大事なお肉を！ 吐かせたんだぞ！？」
					PRINTFORMW 「まーったく、これはワンコとして抗議を――ん、続けるの？ ワンワン♪」
					PRINTFORMW 「――反射的に媚びちまったけど飼い犬根性も考えもんだなおい」
				ELSEIF RAND:2
					PRINTFORMW 「続けるんですよネー、ペットのお腹の中ぶち撒けさせといてサー。ええ怒ってますよ、怒ってますとも！」
					PRINTFORMW 「憤怒すぎて空っぽの腸が煮えて終いには角生えちゃうぜ。ツーンだツーン！」
					PRINTFORMW 「ツーン――ダメですヨ。もう今日はこれ以上しゃぶりません。ツーンでございますからネ」
					PRINTFORMW 「――」
					PRINTFORMW 「―――」
					PRINTFORMW 「――――無言でチンポ向け続けるのやめなさい！ 子宮がキュンキュンするだろうが！！」
				ELSE
					PRINTFORMW 「クッソ、嫌なことされてむぅむぅしてるのに%CNAME("主人")%に媚びる自分が可愛すぎるぜ」
					PRINTFORMW 「健気だろ！ 可愛いよな！ %CALLNAME:TARGET%酱は%TEXTR("一番の/ゲロ吐いても/最高に")%可愛いペットだって言いなさい！ 大号的声で！！」
					CALL PRINT_STRW, "「――にひっ_HH_ ヨシ！ 許す！！」"
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「あー、喉がイガラっぽくてしょうがない」
				PRINTFORMW 「で、見事に大惨事なワケですが続けるのかナ？」
			ELSEIF RAND:2
				PRINTFORMW 「っちぇー、勿体無いことだ」
				PRINTFORMW 「まったく！%CNAME("主人")%は食料になるために屠殺される生き物の気持ちを考えたことが――」
				PRINTFORMW 「当事者でしたネ！！」
			ELSE
				PRINTFORMW 「は゛ー、は゛ー ったく、出来ればこれきりにして欲しいもんですヨ」
				PRINTFORMW 「何が悲しくてお腹の中身ぶち撒けなきゃいけないんですか！」
				PRINTFORMW 「そしてそれで%CNAME("主人")%はなんでまだおちんちんエレクトしてるんですかネェ！」
			ENDIF
		ENDIF
	;強制口交で射精後に吐いた場合。射精個所は@KOJO_MESSAGE_SAMEN_AND_EXTACY_KX1内同様にSHOOTで分岐できます
	ELSEIF COND("射精後嘔吐")
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「ごぶっ―――おェっ――はぁ、はぁ――ああ、スッキリした」
					PRINTFORMW 「胃の中身を吐き出すのは好かないけれど、%CNAME("二人称")%の精液を溜め込んでるのもイヤだからね」
				ELSEIF RAND:2
					PRINTFORMW 「はぁ、はぁ――はは、もろとも吐き出してやったよ。ざまぁ見ろだ」
				ELSE
					PRINTFORMW 「最悪だけど悪くない気分だ。全部、全部だ。全部吐き出してやったよ」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ああ、チクショウ。あんまりだ。折角の%CNAME("二人称")%の精液まで吐き出しちゃった」
					PRINTFORMW 「で、この埋め合わせは酱とご馳走してくれるんだよネ？ %CNAME("主人")%ヨ♪」
				ELSEIF RAND:2
					PRINTFORMW 「勿体無いなぁ、折角出してくれた精液まで吐いちゃったじゃないか」
					PRINTFORMW 「床のモノ啜るなんてハシタナイコト出来るわけ無いだろう？ %CNAME("一人称")%は慎ましくもイヤしくはない聰慧ペットだぜ」
					PRINTFORMW 「ってなワケで――ウ～ワンワン！！ チンコ出せ！ 吐いた分飲ませろコラ！！」
				ELSE
					PRINTFORMW 「一応、何度でも言いますがネ、こういうのは正直好きじゃないんですヨ？」
					PRINTFORMW 「あ、でも一個良いことがあるな――にひっ♪」
					CALL PRINT_STRW, "「精液、おねだりしちゃってもしょうがないよネ_HH_」"
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「は～、吐いちまった」
				PRINTFORMW 「ま、%CNAME("主人")%の出したモノまで吐いたからイーブンだネ、イーブン」
			ELSEIF RAND:2
				PRINTFORMW 「出して吐かせるとか中々良い趣味してるよネ、%CNAME("主人")%ってば」
				PRINTFORMW 「いえいえ、誉めてるんですヨ？ いや、本当に良い趣味だ♪」
			ELSE
				PRINTFORMW 「――むう。これ誰にも得ないよネ？」
				PRINTFORMW 「%CNAME("一人称")%は吐いちまうし、%CNAME("二人称")%は出し損だろう？」
				PRINTFORMW 「なに、吐かせるのが目的だからそれでいい？ ほっほー、大した異常性癖ですわ流石%CNAME("主人")%」
			ENDIF
		ENDIF
	ELSE
		IF TALENT:恋慕
			IF CEVENT("恋慕：ささくれ")
				IF RAND:3 == 0
					PRINTFORMW 「まだ続ける？ 冗談だろ」
				ELSEIF RAND:2
					PRINTFORMW 「うっ――ぷ、ここまでメチャクチャにしてくれたんだ。終わりだよ」
				ELSE
					PRINTFORMW 「――ああ、ハラ減ったな」
				ENDIF
			ELSE
				IF RAND:3 == 0
					PRINTFORMW 「ぐ、ぇえ――うぅ、ごめんネ、%CNAME("主人")%」
					PRINTFORMW 「流石の%CALLNAME:TARGET%酱もこうなっちゃあ続行不可能と言いますかですネ」
					PRINTFORMW 「接吻もちょっと憚られるんだよテンション的に！クセェもん汚えもん！！」
					PRINTFORMW 「是！是！終わり！！」
					PRINTFORMW 「嫌われたくないペットとしては後始末して何か良い感じの枕邊話を所望します！！」
				ELSEIF RAND:2
					PRINTFORMW 「げふぅ――もう胃液も出やしないですヨ。いやマジで」
					PRINTFORMW 「今回はこのまま終わりということでよろしいですね！ 是決まり！」
					PRINTFORMW 「さっさと善后工作して健全にイチャつくぞオラ！！」
				ELSE
					PRINTFORMW 「只今可愛いペットはお憤怒ペットにジョブチェンジしています」
					PRINTFORMW 「理由は勿論お分かりですね？ わからない？ ほう、噛めば思い出しますかナ？」
					PRINTFORMW 「なーんで吐かせたんだよー！ もう！ バカ！ 変態！ 色情魔！」
					PRINTFORMW 「やーい你のちんぽゲロまみれー！ もう知らない！ でも好き！！」
					PRINTFORMW 「――はー、じゃ、一緒にこの惨状の後始末しましょうかネ」
				ENDIF
			ENDIF
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 「あ゛ー、出た出た。こればっかりはあまり好きになれないナ」
				PRINTFORMW 「ン、続き？ ははは、閉店でございますヨ。むしろお代を頂きたい位だ」
			ELSEIF RAND:2
				PRINTFORMW 「スッカラカンですよスッカラカン！！ お腹の中も体力も！」
			ELSE
				PRINTFORMW 「あ゛ー、キッツいな。ハラも減った」
				PRINTFORMW 「流石に続きは次回ってことにしてもらえませんかネ？」
			ENDIF
		ENDIF
	ENDIF
	CFLAG:食欲 += 20
;-------------------------------------------------
;脱衣
;-------------------------------------------------
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_K60, 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_K60(ARGS)
#DIM ACTOR
ACTOR = FINDCHARA(NO, 60)

SELECTCASE ARGS
;CASE "勧誘"のみ、角色としてはまだ存在していないのに注意
CASE "勧誘"
	SIF COND("昼") && TEXTS("曜日") != "日"
		RETURN 1
	STR:実行条件 = ※%CSVNAME(60)%は_黄色_平日の昼のみ_勧誘できます※
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:恋慕 && CEVENT("恋慕：地固圆圈", ACTOR)
		RETURN 1
	STR:実行条件 = イエロー_（※今の%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

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

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

;ENDを選択する際の表示。下で満たしたEND条件に応じて全角21文字以内で好きに変えて良い
STR:ＥＮＤ标题 = ちひろ酱のひ・み・つ☆

[IF_DEBUG]
STR:エンディング += "1_ENGAGE/2_HAPPY BIRTHDAY/3_ESCAPE/4_SANITY/5_WISH/6_既確認幽体姉に会う"
[ENDIF]

IF CEVENT("恋慕：地固圆圈")
	STR:エンディング += "1_ENGAGE/"
	SIF CEVENT("ENGAGE")
		STR:エンディング += "2_HAPPY BIRTHDAY/"
	SIF CEVENT("HAPPY BIRTHDAY")
		STR:エンディング += "3_ESCAPE/"
	SIF CEVENT("ESCAPE")
		STR:エンディング += "4_SANITY/"
	SIF CEVENT("SANITY")
		STR:エンディング += "5_WISH/"
	[IF_DEBUG]
	SIF CEVENT("WISH")
		STR:エンディング += "6_既確認幽体姉に会う"
	[ENDIF]
ELSE
	SIF MARK:屈服刻印 >= 1
		STR:エンディング += "1_ENGAGE/"
	SIF MARK:屈服刻印 >= 2 && CEVENT("ENGAGE")
		STR:エンディング += "2_HAPPY BIRTHDAY/"
	SIF MARK:屈服刻印 == 3 && CEVENT("HAPPY BIRTHDAY")
		STR:エンディング += "3_ESCAPE/"
ENDIF

;閲覧していないイベントがある場合などに選択肢と色を変える事も出来る。これ以外でも好きな条件で変えて良い
;IF COND("未読ＥＮＤ選択可能")
;	STR:ＥＮＤ标题 = エンディングを迎える
;	;これを指定しない場合には本体側で STR:ＥＮＤカラー = 爱心粉紅 となる
;	STR:ＥＮＤカラー = 爱心粉紅
;ENDIF

RETURN 1

;ARGSには@MENU_SINGLE_ENDING_K1で設定したEND名のどれかが入っている
;見たENDはCEVENTで記録される
;例）ＥＮＤ名１を閲覧した場合は CEVENT("ＥＮＤ名１") = 1 となる
@SINGLE_ENDING_K60, ARGS

;默认ルトのフォント記録
#DIMS D_FONT
#DIM MOB

SELECTCASE ARGS
CASE "ENGAGE"
	PRINTL
	PRINTL
	PRINTFORMW "食べる"という事は結構難しい。
	PRINTFORMW そりゃあ現代っ子たちからすれば便利店なりで随意見繕えば幾らでも腹を満たすことが出来るだろう。
	PRINTFORMW だけれど、%CNAME("一人称")%は、生実千裕という生き物はそう是かない。
	PRINTFORMW 何せ人を食うのだから、社会というやつはそれを禁忌と定めているらしいので便利店に行くような手軽さでそんな事は出来ない。
	PRINTFORMW 「ごめんなさいね、手伝って貰っちゃって。%CNAME("一人称")%が頼まれたことなのに」
	PRINTFORMW まずは装うことだ。弱い生き物のように、無害な生き物のように。
	PRINTFORMW 物腰は柔らかく、感情は出さずに、バレた時に『まさかこんなことをする人だったなんて』なんて言われる位に徹底的に装う。
	PRINTFORMW 「困っちゃうわよね、老师からの頼まれごとが多くて。ふふっ、便利屋にでも思われてるのかも」
	PRINTFORMW そして一時でも良いから信用を勝ち取ること。
	PRINTFORMW 仕草で、話し方で、雰囲気で、こいつは信用できると思わせ、胸襟を開かせる。
	PRINTFORMW そういう時、女であるということは武器变成了。
	PRINTFORMW 「よいしょっと……あ、その荷物はそこに置いておいて」
	PRINTFORMW 下調べは入念に。バレて是けない。害獣は駆除されてしまう。
	PRINTFORMW その時間帯、その場所に誰も来ないことを徹底的にリサーチして、突発的に物事は起こさない。
	PRINTFORMW それでもあんまりにもお腹が空いていたりすることもある。だから都合の良い場所は幾つかキープしておく。
	PRINTFORMW 「有がとう。助かっちゃった。何か礼物をしないと」
	PRINTFORMW 食べられそうでもがっついて是けない。もしすぐにでも襲いかかれば逃げられてしまうこともあるだろう。
	PRINTFORMW だから、ここまででインスタントに培った信頼関係がここで活きる。
	PRINTFORMW 慢慢地相手に近付く。あくまで柔らかな物腰を忘れずに、慎ましくだ。
	PRINTFORMW 相手が男の子なら尚のこと楽だ。
	PRINTFORMW 「何がいいのかな……？」
	PRINTFORMW こんなことを言いながら服を脱いで、吃飯の用意の手間を省くことが出来る。
	PRINTFORMW 「%CNAME("二人称")%は、何がいい？」
	PRINTFORMW 囁くような距離まで近づければこちらのものだ。
	PRINTFORMW 後は口を大きく開けて――
	PRINTFORMW 「いただきます」
	PRINTFORMW これが%CNAME("一人称")%のいつもの吃飯。
	PRINTFORMW もちろんバリエーションの一部に過ぎないけれど、学校ではだいたいこれで擅長くいく。
	PRINTFORMW 後は食べ切るなり、余った分は容器に詰めて、証拠隠滅して、ご馳走様といった具合だ。
	PRINTFORMW 確立するのに結構な時間を使ったが、その甲斐あってバレて駆除されるようなことにはなっていない。
	PRINTFORMW このままバレずに平穏に、卒業までこうして慎ましく過ごせれば、そう思っていたのだけれど。
	PRINTL
	PRINTFORMW 「嘘だろう――そりゃあ反則だ」
	PRINTFORMW 喰ったのに生き返るなんてやっぱりあんまりだよね？
CASE "HAPPY BIRTHDAY"
	PRINTL
	PRINTL
	PRINTFORMW 薄暗い小巷子でほぼ一月ぶりの吃飯は名も身寄りも無く薄汚い獣に心地よい満腹感を齎した。
	PRINTFORMW この生活を続けてもう何年も経つ。街の隅に身を潜めて声も上げさせず獲物を狩ることにも慣れてきていた。
	PRINTFORMW それでも最近はどうやら噂にでもなっているのか、一人で彷徨く無防備な獲物が減っている。
	PRINTFORMW 警戒されるのは獣にとって死活問題だった。
	PRINTFORMW 獣は人を殺す。しかしその目的は殺人ではなく平穏な吃飯だ。余分に殺してバレて吃飯が出来なくなるのは本意ではない。
	PRINTFORMW 酩酊にも似た満腹感もそこそこに獣は吃飯の後始末を始める。
	PRINTFORMW 「ちっちっちっちー」
	PRINTFORMW その間も獣はどうしたものかと考え続ける。
	PRINTFORMW 二人以上の獲物は要らない。
	PRINTFORMW 狩りがし辛くなることもあるが、食べられない以上に殺すのは彼女のルールに反している。
	PRINTFORMW 大事なのは平穏であることだ。正体を暴かれた害獣は隔離され、最後には殺されることを獣はよく知っている。
	PRINTFORMW 新しい狩りの方法を考える必要があった。
	PRINTFORMW 今のように拠点を持たず行きずりに食らうのではない堅実な方法が。
	PRINTFORMW 「――ン？」
	PRINTFORMW と、そこまで考えて、後始末をしようとした衣服から一枚のカードが零れた。
	PRINTFORMW 真新しい顔写真が貼り付けられたそれを拾い上げると、学生証だと知れた。
	PRINTFORMW 「――ちっちっちっちっちっ」
	PRINTFORMW 直感的に獣は頭を回す。コレを有効活用する方法を。
	PRINTFORMW やがて獣は小巷子に捨てられた鏡の破片に写った自分の顔と、写真に写る彼女の顔を見比べた。
	PRINTFORMW 先程食べた顔に比べて薄汚れているが似ていなくもない。
	PRINTFORMW 自分の髪の方が若干モジャついているのもイメージチェンジだとかで誤魔化せる範囲だろうか。
	PRINTFORMW 其他の所持品を漁れば、あっさりと鍵と財布を発見した。これはもう至れり尽くせりというやつだ。
	PRINTFORMW 着古した今までの衣類を捨て、先程まで獲物が纏っていた衣類と取り替えた獣は何とか往来を歩ける格好にはなった。
	PRINTFORMW そうして小巷子を去る前に、最後にもう一度学生証を見る。そこに書かれている名前と住所を。
	PRINTFORMW 「――ナマ、ジツ、セン――最後はなんて読むんだろ。ま、いっか、後で調べれば」
	PRINTFORMW その日から、獣は名前を得た。
	PRINTL
	PRINTL
CASE "ESCAPE"
	PRINTL
	PRINTL
	GETFONT
	D_FONT = %RESULTS%
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW おなかがすいて、ねむれなかった。
	PRINTFORML
	PRINTFORMW 被窝の中にもぐっても外まできこえるおなかの音が、自己もうるさい。
	PRINTFORML
	PRINTFORMW 今日も”しせつ”のばんご飯はのこした。
	PRINTFORMW のこしたくてのこしたんじゃなくて、たべられなかった。
	PRINTFORMW 口の中に入ってきたごはんが、とても、とても、きもちわるくて。
	PRINTFORMW 我の食べるものはこれじゃないって、そういわれている気がした。
	PRINTFORML
	PRINTFORMW とても、おなかがすいている。
	PRINTFORMW 嫌になるくらいに。いたいくらいに。
	PRINTFORML
	PRINTFORMW 被窝をめくって起きあがる。
	PRINTFORMW なにか、我でもたべられるものはないか考えた。
	PRINTFORML
	PRINTFORMW "しせつ"のまっくらなへや。ねいきがひとつ。
	PRINTFORMW おなじへやの、名前も知らない女の子のものだ。
	PRINTFORML
	PRINTFORMW 悄悄的、ねがおをのぞきこんだ。
	PRINTFORML
	PRINTFORMW しあわせそうなねがお。
	PRINTFORMW あかいほっぺ。
	PRINTFORMW やわらかそうなくちびる。
	PRINTL
	PRINTL
	PRINTFORML 「ちっちっちっちっ」
	PRINTL
	PRINTL
	PRINTFORMW いっしょうけんめい、考えた
	PRINTL
	PRINTL
	PRINTFORML あばれられたらだめ。
	PRINTFORMW だから、我とおなじくらいちいさなからだを床にしばった。
	PRINTL
	PRINTL
	PRINTFORML こえをあげられたらだめ。
	PRINTFORMW だから、シーツをかませてあたまからふとんをかぶせた。
	PRINTL
	PRINTL
	PRINTFORML とてもおなかがすいていた。
	PRINTFORMW だから、さいしょにいちばんおいしそうなほっぺたを。
	PRINTL
	PRINTL
	CALL PRINT_STRW, "#TEXTC=d3381c_いただきます。"
	PRINTL
	PRINTL
	CHKFONT "游明朝"
	IF RESULT
		SETFONT "游明朝"
	ELSE
		CHKFONT "ＭＳ 明朝"
		SIF RESULT
			SETFONT "ＭＳ 明朝"
	ENDIF
	PRINTFORMW
	PRINTFORMW
	PRINTFORMW
	PRINTL
	PRINTL
	CALL PRINT_STRW, "#TEXTC=d3381c_ああ！ほら、やっぱり！"
	CALL PRINT_STRW, "#TEXTC=d3381c_とってもおいしい！"
	PRINTL
	PRINTL
	CALL PRINT_STRW, "#TEXTC=d3381c_でも、まだたりないわ！まだたりないヨ！"
	CALL PRINT_STRW, "#TEXTC=d3381c_とってもおなかがすいてるんだ！"
	PRINTL
	PRINTL
	CALL PRINT_STRW, "#TEXTC=d3381c_おいしい。おいしい！"
	CALL PRINT_STRW, "#TEXTC=d3381c_你、ほんとうに、すごく、おいしいネ！"
	PRINTL
	PRINTL
	PRINTFORMW
	PRINTFORMW
	PRINTFORMW
	PRINTL
	PRINTL
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	CALL PRINT_STRW, "#TEXTC=d3381c_佳肴大人でした。"
	PRINTL
	PRINTL
	PRINTFORMW
	PRINTFORMW
	PRINTFORMW
	PRINTL
	PRINTL
	CHKFONT "ＭＳ 哥特"
	SIF RESULT
		SETFONT "ＭＳ 哥特"
	PRINTFORMW 『――酱、大姐姐と一緒に行きましょうね』
	PRINTFORML
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW 次の日。こん色、だったと思う。
	PRINTFORMW そんな服の、やさしそうな顔をしたおば桑がそう言った。誰かの名前を、多分、我を呼んでいた。
	PRINTFORML
	CHKFONT "ＭＳ 哥特"
	SIF RESULT
		SETFONT "ＭＳ 哥特"
	PRINTFORMW 『本当にあの娘が？ 確か、あの娘は……例の誘拐事件の被害者だろう。親が引き取りを拒否したとかいう』
	PRINTFORML
	PRINTFORMW 『その娘だよ。床の中は酷い有様でまともに見れたモンじゃねえ』
	PRINTFORMW 『これは君がやったのかと訊いたら、笑着美味しかったと抜かしがった。気味の悪いガキだ』
	PRINTFORML
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW 遠くの方でひそひそと話す”しせつ”の大人の声がする。
	PRINTFORML
	CHKFONT "ＭＳ 哥特"
	SIF RESULT
		SETFONT "ＭＳ 哥特"
	PRINTFORMW 『兎にも角にも、相談所の方に引き取って貰わにゃ。こんな事しでかしたんだ。手に負えんよ』
	PRINTFORML
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW 言葉の意味はよくわからなかった。
	PRINTFORMW ただ、このまま、別の場所でこれからもっとお腹がすくことはよくわかった。
	PRINTFORML
	PRINTFORMW お腹がすくのはだめ。お腹がすくと、しんじゃう。
	PRINTFORML
	PRINTFORMW 「おば桑」
	PRINTFORML
	CHKFONT "ＭＳ 哥特"
	SIF RESULT
		SETFONT "ＭＳ 哥特"
	PRINTFORMW 『どうしたの？――酱』
	PRINTFORML
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW 覗き込むような、やさしいふんいきのおば桑の顔。
	PRINTFORML
	PRINTFORMW 「いただきます」
	PRINTFORML
	PRINTFORMW ひどい味だった。あの子とは全然違う、おけしょうのにおいでとても臭いおにく。
	PRINTFORML
	PRINTFORMW 耳にいたい声があがって、我は走着。
	PRINTFORMW 大人のおこった声がきこえる。
	PRINTFORMW あれにつかまったらきっとまたおなかがすく。
	PRINTFORMW あれにつかまっちゃいけない。
	PRINTFORMW おなかがすくのは、もういやだ。
	PRINTFORMW しげみに飛び込んで、それでもまだはしった。
	PRINTFORMW 服がやぶけちゃっても。
	PRINTFORMW 靴の片方がどこかにいっちゃっても。
	PRINTFORMW いきができなくなりそうなくらい苦しくても。
	PRINTFORMW はしって。
	PRINTFORMW はしって。
	PRINTFORMW はしって。
	PRINTFORMW そうして、
	PRINTFORML
	PRINTFORMW
	PRINTFORML
	SETFONT D_FONT
	PRINTFORMW そうしてめでたく、%CNAME("一人称")%が野に被释放进ってわけサ。
	PRINTL
	PRINTL

CASE "SANITY"
	PRINTL
	PRINTL
	PRINTFORMW 「っていうことで納得して貰えたかナ、ちょっと情緒豊かにしてみたぜ。聞けば感動笑いと涙のお話サ！」
	PRINTFORMW 自己的これまでを語り終えて、%CALLNAME:TARGET%はふぅーっとわざとらしく息を吐いた。
	PRINTFORMW 「いやーそこからも大変だったんだよ、何せ元祖%CALLNAME:TARGET%酱として振る舞う為に色々勉強したからネ」
	PRINTFORMW 「常識なんかは路上暮らしでもそこそこに学習してたけどサ、学习はそうもいかないだろう？」
	PRINTFORMW 「目一杯勉強して、それっぽい振る舞いをしてサ。今のクラスの位置に収まったってわけヨ」
	PRINTFORMW 「ま、元祖%CALLNAME:TARGET%酱が入学してすぐだったのが良かったネ」
	PRINTFORMW 「そんなに目立つ子じゃなかったみたいだし、何か角色変わったね位で済んで貰えたしサ」
	PRINTFORMW とんでもない話をしておいて、にひひと笑う彼女は悪びれた様子もない。
	PRINTFORMW 彼女にとってしてみれば、吃飯のついでに立場まで手に入ったお得な出来事程度の認識なのだろう。
	PRINTFORMW そこで%CALLNAME:MASTER%はふと浮かんだ疑問を投げかけた。
	PRINTFORMW そもそもの問題。何故、生実千裕は人しか喰えないのか。
	PRINTFORMW もし最初からそうであるなら、話に出た孤児院らしき施設に入るまでは何処に居たのか。
	PRINTFORMW 最初に人を喰ったのは、何時なのか。
	PRINTFORMW その疑問に、彼女はうーん、と首を大仰にひねって唸り声を上げる。
	PRINTFORMW 「それは――覚えてないな。気にしたこともない」
	PRINTFORMW 彼女にしては珍しく、戯けた風もない言葉が出てきた。
	PRINTFORMW 「覚えてない――覚えてないよな、覚えてない。うん――覚えてないよ」
	PRINTFORMW 段々と深刻になる顔が沈んでいく。
	PRINTFORMW 何か声を掛けようとした、その時。
	PRINTFORMW 「――う、ん？」
	PRINTFORMW 彼女の目尻からつぅっと一筋の涙が流れた。
	PRINTFORMW 「あれ、あれ、おかしいな。なんだいこれ、なんで%CNAME("一人称")%泣いてるんだい？」
	PRINTFORMW グシグシと涙を拭うが、次から次に雫が零れていく。
	PRINTFORMW 「おいおい情緒不安定か？生理かよ、困っちゃうな」
	PRINTFORMW いつものように戯けて笑う彼女は、
	PRINTFORMW 「ああ、えっとごめんよ。なんだか、おかしいみたいだ。この話は終わりで良いかい？」
	PRINTFORMW そう言って、单方面地会話を打ち切ってしまった…
	PRINTL
	PRINTL
CASE "WISH"
	PRINTL
	PRINTL
	CALL CREATE_MOB, "千裕姉"
	MOB = CNUM("千裕姉")

	PRINTFORMW 『あら』
	PRINTL
	PRINTL
	CALL PRINT_MAIDFACE, MOB
	PRINTFORMW 『ごきげんよう。否、おはようかしら』
	PRINTFORMW 『君は私のことを知らないと思うけれど、私は君を知っているわ』
	PRINTFORMW 『ふふふ、なんだか不公平で失礼よね。ごめんなさい』
	PRINTFORMW 『不公平の失礼ついでで悪いのだけれどお話を聞いてくれないかしら。昔のお話を』
	PRINTFORMW 『そんなに遠い昔の話じゃないの。そう、ね、そこそこ昔？ みたいな感じかしら』
	PRINTL
	PRINTL
	CALL EMOTION_PLUS, "闭眼", MOB
	PRINTFORMW 『无聊はさせないわ、多分。それでも……君に、君には聞いてほしいの』
	PRINTFORMW 『私達の昔話を』
	PRINTL
	PRINTL
	DRAWLINE
	DRAWLINE
	PRINTL
	PRINTL
	PRINTFORMW 錆びた鉄が擦れる音がする。
	PRINTFORMW 次第に大きくなるその音に共鳴するように、くうくうと情けない音が聞こえた。
	PRINTFORMW それが自分の空腹を訴える腹の音だと理解するのには少しの時間を要した。
	PRINTFORMW そう言えば空腹の音とはこんなに情けないものだったな、と思う。
	PRINTFORMW こ的房間に入れられてからもうどれくらい経っただろう。
	PRINTFORMW 鉄格子のはまった窓の外から差し込む光を数えるだけでは日数なんて数える事はできない。
	PRINTFORMW それでも少なくとも、もう一週間も何も食べていないかも知れない。
	PRINTFORMW 身体を動かそうとして、また鉄の擦れる音がした。
	PRINTFORMW 足に繋がった忌々しい鎖は逃がすものかと喰らいついてもう身体の一部にでもなった気分だ。
	PRINTFORMW それでもこの狭窄部屋の中を動くくらいは長さがあるから、ずるずると扉の方へと這い蹲った。
	PRINTFORMW 見るからに重厚な鉄扉は、相変わらず開く气息がない。そんな硬い扉へと、手を叩きつける。
	PRINTFORMW ぺちぺち、力が入らないなりの音が鳴る。それでも叩かないよりは幾らもマシだと思って何度も、何度も叩きつける。
	PRINTFORMW もう一週間、限界が近い。
	PRINTFORMW 泣く体力さえ無い身体が恨めしくなった。それでも、諦めるわけに是かなくて何度も、何度も叩きつける。
	PRINTFORMW これ以上は死んでしまう。
	PRINTFORMW 縋るように扉に身体を押し付けて、壊れた機械が何かを繰り返すように何度も、何度も叩きつける。
	PRINTFORMW だから、どうか。
	PRINTFORMW 誰か、助けに来て。
	PRINTL
	PRINTFORMW
	PRINTL
	PRINTFORMW 『今日から僕が君たちの飼い主サ。わーかるーかなー？これからネ、君たちは僕に飼われるんだヨ』
	PRINTFORMW そう、戯けた調子でこ的房間の主は言った。
	PRINTFORMW 買い物の最中、親から出口た隙に突然攫われたその日はあの子の誕生日だったのを覚えている。
	PRINTFORMW 最初はその人が何を言っているのか解らなくて困惑した。飼う、なんて。人に使う言葉ではない。
	PRINTFORMW だがそんな常識をせせら笑着突っ返すように部屋の主は文字街道私達を飼った。
	PRINTFORMW 鎖で繋いで、こ的房間に閉じ込め、吃飯も睡眠も排泄も、全てを管理した。
	PRINTFORMW 吃飯は一日一回。それも菓子胖次と飲み物の簡素なものだ。
	PRINTFORMW お腹を鳴らすあの子に半分。
	PRINTFORMW 睡眠は決められた時間に。
	PRINTFORMW あの子が泣き疲れるまで偎依在一起洗われていないボロの毛布に一緒にくるまって寝かしつける。
	PRINTFORMW 排泄も時間が決められた。
	PRINTFORMW それを満足そうに眺める部屋の主の醜悪な顔を覚えている。
	PRINTFORMW あの子是つも泣いていた。元が泣き虫なのはよく知っている。
	PRINTFORMW だけれどそれが災いして躾と称してあの子は男の折檻に晒された。
	PRINTFORMW 『ちっちっちっちっち』
	PRINTFORMW どう私達を侮辱てやろうか考えている時のアイツの癖。
	PRINTFORMW 大抵、ろくな事にならない。
	PRINTFORMW 私は、その折檻に割って入って一緒になって折檻を受けた。
	PRINTFORMW 部屋の主是つも笑着いた。
	PRINTFORMW 餌を与える時も。
	PRINTFORMW 就寝を確認する時も。
	PRINTFORMW 排泄を見る時も。
	PRINTFORMW 躾と称した折檻の時も。
	PRINTFORMW 私に反抗され見るからにイラついた時も。
	PRINTFORMW この鉄扉を開けたアイツは、笑着、私達を管理していた。
	PRINTFORMW それがどれ程の期間だったのか。考えていられる余裕は私には無かった。
	PRINTFORMW
	PRINTFORMW その日は何の兆候も無く訪れた。
	PRINTFORMW 部屋の主は来なくなった。
	PRINTFORMW 最初はまた新しい侮辱の準備かと思った。
	PRINTFORMW それが日を跨いで長く続けば、もう来ないものだとようやく知れた。
	PRINTFORMW 飽きたのか、捕まったのか、死んだのか。い移開にせよ、もう随分とこの鉄扉は開いていない。
	PRINTFORMW 最初は僅かな希望があった。
	PRINTFORMW 捕まったのであればい移開この場所は露呈するだろう。そうなれば助かる。
	PRINTFORMW だけれど希望の未来は慢慢地、そして容易く絶望の現実に変化していく。
	PRINTFORMW 私達は飼われていたのだ。
	PRINTFORMW 生かされていたのだ。
	PRINTFORMW では、飼い主が居なくなった時、鎖に繋がれ檻に入れられた獣はどうなるか。
	PRINTL
	PRINTFORMW
	PRINTL
	PRINTFORMW 扉を叩く手を止めて。朦朧とした意識の中で黙考する。
	PRINTFORMW 僅かな体力で取れる手段はもう、多くはない。
	PRINTFORMW 毛布に包まって眠ることで助けが来るまで体力を温存することにも限界があるだろう。
	PRINTFORMW このままでは姉妹揃って死んでしまう。せめて食べる物があれば。
	PRINTFORMW 何か、食べ物が。
	PRINTFORMW そこまで考えて、私は一つの結論に達した。
	PRINTFORMW ある。一つだけ、こ的房間に"食べられるモノ"が。
	PRINTFORMW こ的房間にまともな道具は無い。だがそれしかない。
	PRINTFORMW 私は緊張に震える手で毛布に包まり浅い呼吸を繰り返すだけのあの子を揺り叫醒。
	PRINTFORMW 最後のお願いをするために。
	PRINTFORMW あの子は嫌がるだろう、泣くだろう。
	PRINTFORMW けれど。强行にでもやってやると、私は心に決めた。
	PRINTFORMW 後は――
	PRINTFORMW
	PRINTL
	PRINTL
	DRAWLINE
	DRAWLINE
	PRINTL
	PRINTL
	GETFONT
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW あんなにすいていたおなかが、いま是っぱい。
	PRINTL
	PRINTFORMW ――めがいたいのはなんで？
	PRINTFORMW それは、いっぱいないたから。
	PRINTL
	PRINTFORMW ――なんでいっぱいないたの？
	PRINTFORMW それは、いっぱいたべたから。
	PRINTL
	PRINTFORMW ――なにをいっぱいたべたの？
	PRINTFORMW それは。
	PRINTFORMW それは、たいせつなもの。
	PRINTFORMW 我のいちばんだいすきなひと。
	PRINTL
	PRINTFORMW ――どうしてたべてしまったの？
	PRINTFORMW だいすきなひとがそうおねがいしたから。
	PRINTL
	PRINTFORMW
	PRINTL
	PRINTFORML ――ほんとうに？
	SETFONT RESULTS

	GETFONT
	CHKFONT "游明朝"
	IF RESULT
		SETFONT "游明朝"
	ELSE
		CHKFONT "ＭＳ 明朝"
		SIF RESULT
			SETFONT "ＭＳ 明朝"
	ENDIF
	CALL PRINT_STRW, "#TEXTC=d3381c_嘘だ。"
	CALL PRINT_STRW, "#TEXTC=d3381c_本当は、お腹が空いていたんだ。だから、食べたんだ。"
	PRINTL
	CALL PRINT_STRW, "#TEXTC=d3381c_美味しいなんて感じなかった。感じたくなかった。"
	CALL PRINT_STRW, "#TEXTC=d3381c_でも食べた。食べてしまった。"
	PRINTL
	CALL PRINT_STRW, "#TEXTC=d3381c_もう美味しいものなんて要らない。食べたくない。"
	CALL PRINT_STRW, "#TEXTC=d3381c_これよりも美味しいものなんて、要らない。"
	SETFONT RESULTS

	PRINTL

	GETFONT
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW ――か无いの？
	SETFONT RESULTS

	GETFONT
	CHKFONT "游明朝"
	IF RESULT
		SETFONT "游明朝"
	ELSE
		CHKFONT "ＭＳ 明朝"
		SIF RESULT
			SETFONT "ＭＳ 明朝"
	ENDIF
	CALL PRINT_STRW, "#TEXTC=d3381c_悲しい。だって、こんなに泣いている。"
	SETFONT RESULTS

	PRINTL

	GETFONT
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW ――じゃあ、わすれてしまおう。
	SETFONT RESULTS

	GETFONT
	CHKFONT "游明朝"
	IF RESULT
		SETFONT "游明朝"
	ELSE
		CHKFONT "ＭＳ 明朝"
		SIF RESULT
			SETFONT "ＭＳ 明朝"
	ENDIF
	CALL PRINT_STRW, "#TEXTC=d3381c_忘れて良いの？ 忘れて、無かった事にしていいの？"
	SETFONT RESULTS

	PRINTL

	GETFONT
	CHKFONT "Times New Roman"
	IF RESULT
		SETFONT "Times New Roman"
	ELSE
		CHKFONT "Gadugi"
		SIF RESULT
			SETFONT "Gadugi"
	ENDIF
	PRINTFORMW ――だいすきなひととやくそくしたでしょう。わすれてもいいんだよ。
	SETFONT RESULTS

	GETFONT
	CHKFONT "游明朝"
	IF RESULT
		SETFONT "游明朝"
	ELSE
		CHKFONT "ＭＳ 明朝"
		SIF RESULT
			SETFONT "ＭＳ 明朝"
	ENDIF
	CALL PRINT_STRW, @"#TEXTC=d3381c_…………それなら、%CNAME("一人称")%は、"
	PRINTFORML
	PRINTFORMW
	PRINTFORMW
	CALL PRINT_STRW, "#TEXTC=696969_ぜんぶ、わすれてしまいたい。"
	SETFONT RESULTS
	PRINTFORMW
	PRINTL
	PRINTL
	DRAWLINE
	DRAWLINE
	PRINTL
	PRINTL
	PRINTFORML ――後はどうか。
	PRINTFORMW この泣き虫な妹の、これからの人生が少しでも良いもので有ますように。
	PRINTL
	PRINTL
	DRAWLINE
	DRAWLINE
	PRINTL
	PRINTL
	CALL EMOTION_PLUS, "闭眼", MOB
	PRINTFORMW 『めでたしめでたし……』
	PRINTFORML 『なんちゃって。えへへ、ちょっと情緒豊かにしてみました』
	PRINTFORMW 『君に話しかけられるまでとっても長くて、闲をしていたの。一生懸命考えたけれどどうだった？』
	PRINTFORMW 『あ、でも脚色はしてないわよ。私が思ったことも、妹が思ったことも本当よ。昔話だもの』
	PRINTFORMW 『ねえ、本当の話なの。全部。君が知りたがっていたようだから。教えたのは、あの子には内緒ね』
	PRINTFORMW 『あっえっとね、あの子が、妹が誰かなんて今更訊かないで頂戴ね。ここまで勿体ぶって恥ずかしいもの』
	PRINTL
	PRINTFORMW 『はぁ、なんだか、話疲れちゃった。時間切れが近いのかも』
	PRINTFORMW 『話したいことはまだまだあるのに、融通が聞かないわね幽霊っていうのも』
	PRINTFORMW 『え？ 死んでるわよ。食べられちゃったでしょう、私。妹に。だから幽霊よ。あーいむごーすと』
	PRINTFORMW 『妹に食べられた時からず～っとあの子に憑いてるんだから。もうベテラン桑なのよ？ えっへん』
	PRINTFORMW 『だから今の状況は、ベテラン桑にだけ許された夢枕……という奴ね、多分、よくは解らないけれど』
	PRINTFORMW 『そんな事はどうでも良いのよ、そう、時間が惜しいの。あの子の話をしましょう』
	PRINTFORMW 『あの子と言えば！ たわわに実ったわよね～あの子の胸部。揉み応えあるでしょう？ どうなの？ ねえ？』
	PRINTFORMW 『私も生きて成長したらああなってたのかしらね～、もしかしてあの子私の成長性ごと食べちゃったのかしら？』
	PRINTFORMW 『あら、ふふふ、ゴーストジョークよ。そんな顔しないで頂戴』
	PRINTFORMW 『あ、そうそう、胸部と言えば妹を性的に頂いてる件については気にしなくても良いわよ』
	PRINTFORMW 『最初はそうでも無かったみたいだけれど、今のあの子はそうされるのが嬉しいみたいだし』
	PRINTFORMW 『むしろじゃんじゃん女性にしちゃって』
	PRINTFORML 『そういう時のあの子の頭の中すっごく可愛いんだから、じゃんじゃんね』
	PRINTFORMW 『それから――んっ……ああ、もう、本当に時間みたい。はぁ』
	PRINTFORMW 『君に言いたいこと、あの子に伝えたいこと、まだまだあるの。いっぱい、あるのよ』
	PRINTFORML 『もし、またこうして夢で遭うことがあったら、お話してくれるかしら』
	PRINTFORMW 『今日のところは、そうね……他にも色々考えたのだけれど……』
	PRINTFORMW 『あの子を……妹をああしたのは、間違いなく私よ。許してくれなんて言えないし、言わない』
	PRINTFORMW 『ああしなければ妹は死んでいたわ。そして、今のようにならなければ今まで生きてこれなかったんだもの』
	PRINTFORMW 『でも、否、だからこそ…あの子と出会ってくれて、有がとう。これからも私の妹をよろしくね』
	PRINTL
	PRINTL
	CALL EMOTION_PLUS, "夸奖", MOB
	PRINTFORMW 『それじゃあ、また会えるのを楽しみにしているわ。"飼い主桑"』
	PRINTFORMW
	PRINTL
	PRINTL
	[IF_DEBUG]
	PRINTFORMW 以降エンディングNo.6より夢にて姉に会うことが出来ます。
	[ENDIF]

CASE "既確認幽体姉に会う"
	IF DEVENT("幽体姉：本日訪問") == 0
		IF CFLAG:幽体訪問回数 == 0
			PRINTFORML
			PRINTFORML
			PRINTFORMW 『おはよう、ふふ』
			PRINTFORMW 『私は君を知っているわ。さて、そんな私は誰でしょう？』
			PRINTFORMW 『そう、君の可愛いペットの大姐姐よ！幽霊の！』
			PRINTFORMW 『…………こほん、えっと。あの子みたいにしてみたのだけれど』
			PRINTFORMW 『これは、そうね失敗ね、うん……わ、忘れて頂戴……』
			PRINTFORMW 『ああ、ええっと、特に用があるわけじゃないの。お話したくなっちゃって呼んじゃったというか……』
			PRINTFORMW 『前にも言ったでしょう？ 話したいことはたく桑あるって』
			PRINTFORMW 『こ、これでも前は单方面地喋り過ぎたなぁって、から回っちゃったなぁって反省してるのよ？』
			PRINTFORMW 『だから……その、君から何か聞きたい事は無いかしら』
			PRINTFORMW 『時間的に質問一つが限界かもしれないのは注意してね』
			$INPUT_LOOP_S1
			STR:選択肢 =
			STR:選択肢 += "千裕のこと/"
			SIF CEVENT("幽体姉：大姐姐のこと拒否") == 0
				STR:選択肢 += "大姐姐のこと/"
			STR:選択肢 += "特に何も聞かない/"
			VARSET LOCALS
			SPLIT STR:選択肢, "/", LOCALS
			CALL PRINT_SELECT, STR:選択肢
			SELECTCASE LOCALS:RESULT
			CASE "千裕のこと"
				PRINTFORMW 『あの子のことね？ 任せて。何が聞きたいのかしら』
				PRINTL
				CALL q_chi
			CASE "大姐姐のこと"
				PRINTFORMW 『えっと、私のこと？ 私のこと、か…』
				PRINTFORMW 『そうね、それは次来了時に話しましょう？』
				PRINTFORMW 『今はあの子のことで話したいことで頭がいっぱいで…』
				PRINTFORMW 『あ！ 頭がいっぱいって言っても幽霊だから頭は無いのだけれどね』
				PRINTFORMW 『ふふ、ゴーストジョークよ』
				CALL SET_CEVENT, "幽体姉:大姐姐のこと拒否"
				PRINTL
				GOTO INPUT_LOOP_S1
			CASE "特に何もきかない"
				PRINTFORMW 『えっ、それは、ちょっと大姐姐、想定してなかったわ』
				PRINTFORMW 『それじゃあ……つまり单方面地あの子の話をしても良いってことかしら？』
				PRINTFORMW 『ふふふ、有がとう。そうね、まずは―――』
				PRINTL
				PRINTL
			ENDSELECT
			CALL SET_CEVENT("幽体姉：初回")
		ELSE
			IF RAND:3 == 0
				PRINTFORMW 『ふふ、おはよう。そしてこんばんは』
				PRINTFORMW 『また会えて嬉しいわ。本当よ』

			ELSEIF RAND:2
				PRINTFORMW 『ごきげんよう。ゆっくりして……とは言えないわね』
				PRINTFORMW 『夢の中でも時間が有限だなんて非道い話だわ』
			ELSE
				PRINTFORMW 『う～ら～め～し～や～……なんちゃって』
				PRINTFORMW 『ふふ、驚いたかしら？ あら……もしかしてそうでもない？』
			ENDIF
			PRINTFORMW 『それで早速だけれど、今日は何か訊きたいことがあるのかしら？』
			PRINTL
			STR:選択肢 =
			STR:選択肢 += "千裕のこと/大姐姐のこと/特に何も聞かない/"
			VARSET LOCALS
			SPLIT STR:選択肢, "/", LOCALS
			CALL PRINT_SELECT, STR:選択肢
			SELECTCASE LOCALS:RESULT
			CASE "千裕のこと"
				PRINTFORMW 『あの子のことね？ 任せて。何が聞きたいのかしら』
				PRINTL
				CALL q_chi
			CASE "大姐姐のこと"
				PRINTFORMW 『私のこと？ う、うーん』
				PRINTFORMW 『良いけれど、面白色話はそう多くないと思うわよ？』
				PRINTFORMW 『それでも良ければ答えられるだけ答えるけれど…』
				PRINTL
				CALL q_sis
			CASE "特に何もきかない"
				PRINTFORMW 『それじゃあ……つまり单方面地あの子の話をしても良いってことかしら？』
				PRINTFORMW 『ふふふ、有がとう。そうね、まずは―――』
				PRINTL
				PRINTL
			ENDSELECT
		ENDIF
		PRINTL
		PRINTL
		PRINTFORMW 『%TEXTR("ん……もう時間なのね/あら、起きる時間みたいよ/ああ、朝が近いのね、身体透けてきちゃった")%』
		PRINTFORMW 『%TEXTR("また夢枕に立っちゃうと思うけど、そのときは宜しくね/まだ話し足りないのに、残念/時間が経つのは本当に早いのね、少し憂鬱だわ")%』
		PRINTFORMW 『%TEXTR("それじゃあ、また/回頭见、あの子をお願い/次も楽しみにしているわ、回頭见")%』
		CFLAG:幽体訪問回数 ++
		CALL SET_DEVENT("幽体姉：本日訪問")
	ELSE
		PRINTFORMW 今日はもう会った。明日以降にしよう…
	ENDIF
ENDSELECT
RETURN 1

@q_chi
STR:選択肢 =
STR:選択肢 += "彼女の喜欢的东西は？/施設の外に出てからの彼女/今の彼女/彼女のお腹が空くとどうなる？/彼女の名前/"
VARSET LOCALS
SPLIT STR:選択肢, "/", LOCALS
CALL PRINT_SELECT, STR:選択肢
SELECTCASE LOCALS:RESULT
CASE "彼女の喜欢的东西は？"
	PRINTFORMW 『あの子の喜欢的东西、か』
	PRINTFORMW 『人のお肉は主食だし、そういう話じゃないものね』
	PRINTFORMW 『うぅん……そういう素振りはあんまり見せないのよね、今のあの子は』
	PRINTFORMW 『很强て言うなら君から貰えるものは喜ぶと思うけれど……』
	PRINTFORMW 『あっ、そうだわ！ あの子小小的頃は動物の玩偶なんかが好きだったの』
	PRINTFORMW 『送禮してあげたらもっと喜ぶんじゃないかしら。ふふ、参考にしてね？』
	CALL SET_CEVENT("千裕：玩偶")
CASE "施設の外に出てからの彼女"
	PRINTFORMW 『あの頃のあの子は……姉の私が言うのもなんだけど本当に獣みたいだったわ』
	PRINTFORMW 『施設を出てからあの子はずっと考えていたの』
	PRINTFORMW 『私がかけてしまった食人の呪いを抱えながら安全にお腹を満たすにはどうするのが最適か』
	PRINTFORMW 『考えて、試して、失敗して、逃げて、泥水で飢えを凌いで』
	PRINTFORMW 『それを繰り返す内に、あの子は観察することを覚えた』
	PRINTFORMW 『あの子は本当に人类をよく観察していたわ』
	PRINTFORMW 『どういう時にどういう行動をするのが人类の常識で、その範疇を越えない"安全な"人类を嗅ぎ分けて襲っていたわ』
	PRINTFORMW 『野良犬のように目立たず小巷子を徘徊して、獲物を吟味すると狼のように狩りをする』
	PRINTFORMW 『手際はどんどん良くなった。襲うと後が厄介になる人类の見分けも付くよう变成了』
	PRINTFORMW 『才能、あったのかしらね。 社会の隙間で狩りをする才能が』
	PRINTFORMW 『今の名前を得た後も、生きる為の努力を惜しまなかったわ。徹底的に擬態して、隠蔽して、お腹を満たした』
	PRINTFORMW 『これからもそれは続くと思っていたわ。私も、あの子も。名前を得てもずっと獣のままなんだって』
	PRINTFORMW 『そんなあの子の前に現れたのが君。渾身の隠蔽も擬態も其他の努力のおおよそを無駄にしちゃう理不尽』
	PRINTFORMW 『……そして、同時にあの子にとっての救いだった。そう、私は信じたい』
CASE "今の彼女"
	PRINTFORMW 『あ～、それ訊いちゃうの？』
	PRINTFORMW 『分かっているとは思うのだけれど、いや、分かってないとは言わせないけれどね』
	PRINTFORMW 『あの子……君にゾッコン……っていうのかしら？ その、ちょっと私が嫉妬しちゃう位には』
	PRINTFORMW 『例えばお腹が空いたら君以外を食べないし、食べようとも思わないわ』
	PRINTFORMW 『ええと、これもある意味私の落ち度というか……君に謝らなければならないんだけど』
	PRINTFORMW 『あの子は大切な人が一番美味しいと思わなければならないと思ってるの。私を食べた時から、ずっと』
	PRINTFORMW 『えぇっと、ごめんなさいね、本当に。あの子にはもう君しかいないわ』
	PRINTFORMW 『あの子の心も身体も、本当の意味でもう君でしか満たせないのよ』
	PRINTFORMW 『だから、ではないけれど……いえ、これ以上拜托了のは流石に非道いわね』
	PRINTFORMW 『ただどうか、飽きるまではあの子を可愛がってあげて』
CASE "彼女のお腹が空くとどうなる？"
	PRINTFORMW 『あの子のお腹が空いたら……そうね』
	PRINTFORMW 『先に、今のあの子は君に義理立てして他の誰かを食べるなんて考えて無いのは伝えておくわよ？』
	PRINTFORMW 『まあ、君の気を引こうとしてそういう素振りを見せることはあるだろうけれど、許してあげてね』
	PRINTFORMW 『直接的な影響は……あの子が君のエッチをお手伝いする時が一番顕著かしら』
	PRINTFORMW 『あの子のお腹が空いていれば空いている程、ちょっとあの子の気が立っちゃうの』
	PRINTFORMW 『それで情緒が上がりにくくなったり怖がらせたりしちゃうわ』
	PRINTFORMW 『もしそういうのが嫌だな～って思うなら気を遣ってあげてね』
CASE "彼女の名前"
	PRINTFORMW 『あの子の名前……本名、よね？』
	PRINTFORMW 『……えぇっと、怒らないで聞いて欲しいのだけれどね』
	PRINTFORMW 『わ、私も、その……覚えて、ないのよ。自分の名前も、あの子の名前も』
	PRINTFORMW 『誰にも名前を呼ばれずに十何年も経ってしまったもの』
	PRINTFORMW 『仕方が無いなんて言いたくないけれど……ごめんなさい』
ENDSELECT

RETURN 1

@q_sis
STR:選択肢 =
STR:選択肢 += "普段は何をしているの？/"
SIF CFLAG:姉質問 >= 1
	STR:選択肢 += "ご趣味は？/喜欢的东西は？/"
SIF CFLAG:姉質問 >= 3
	STR:選択肢 += "享年は？/"
SIF CFLAG:姉質問 >= 4
	STR:選択肢 += "生き返れるとしたらどうする？/"
SIF CFLAG:姉質問 >= 5
	STR:選択肢 += "幽霊って性感帯とかある？/"
VARSET LOCALS
SPLIT STR:選択肢, "/", LOCALS
CALL PRINT_SELECT, STR:選択肢
SELECTCASE LOCALS:RESULT
CASE "普段は何をしているの？"
	PRINTFORMW 『普段はー、很强て言うなら……あの子の背後霊？』
	PRINTFORMW 『別に何か手助けをするわけじゃないのだけれどね。やっぱり心配だし…』
	PRINTFORMW 『それに幽霊になってから何かとあの子の心が解る瞬間があるの』
	PRINTFORMW 『だからせめてこんな幽霊になっちゃった私だけでも、あの子に寄り添えたら…なんて思って続けていたのだけれど、ね』
	PRINTFORMW 『ふふ、物理的に寄り添える人に取られちゃった……ってところ？』
	PRINTFORMW 『まあ、こうして君にあの子の今を伝えることだって出来るし。今もあの子の背後霊は続けているわ』
	PRINTFORMW 『あ、もちろん別に怒ってないわよ？ 嫉妬はしているけれど…………ふふ、冗談よ』
CASE "ご趣味は？"
	PRINTFORMW 『……なんだか話に聞くお見合いみたいね？ したこと無いけれど、もしかして大姐姐に気があるのかしら』
	PRINTFORMW 『半透明でよければ……ふふ、もちろん冗談よ？』
	PRINTFORMW 『趣味、趣味、ね。あの子を見守ること、になっちゃうわね』
	PRINTFORMW 『でも最近は、本当にあの子可愛いのよ？ どんどん女性の顔になってきたっていうかね』
	PRINTFORMW 『君に言えないような恥ずかしいことも…………あっ、今のは忘れて？』
CASE "喜欢的东西は？"
	PRINTFORMW 『えっと……それは私の、かしら？』
	PRINTFORMW 『うーん……好きな物……うーーーーーん、なんだったかしら』
	PRINTFORMW 『很强て言うなら、そう、ね…………うーん』
	PRINTFORMW 『あっ……動物の小物とか玩偶とか集めてた覚えがあるわ』
	PRINTFORMW 『あの子も欲しがって、喧嘩变成了りしたんだっけ……そう言えばその時腕に噛みつかれたりしたわね』
	PRINTFORMW 『まさか噛みつかれるどころか本当に食べられることになるとは思わなかったわ』
	PRINTFORMW 『文字街道魂消たわねぇ、魂消えなかったからここに居るのだけれど』
	PRINTFORMW 『……あ、ここ笑うところよ？』
CASE "享年は？"
	PRINTFORMW 『あら、女性に年を訊くなんて勇気があるのね？』
	PRINTFORMW 『そうねーあの子と私は年の出口た姉妹だったから、あの頃は大体高校生位だったかしら』
	PRINTFORMW 『そりゃあもう優等生だったのよ？ 文武両道才色兼備なんて言われてもう、こう、とってもモテモテで……』
	PRINTFORMW 『…………ごめんなさい、少し、いえ、結構盛ったわ。優等生って言われていたのは本当よ？ ちょっとした自慢だったんだから』
	PRINTFORMW 『……もし、あの事件が無ければ今頃結婚して兒童なんか産んじゃって、それにあの子も……』
	PRINTFORMW 『いえ……考えても栓のないこと、ね』
CASE "生き返れるとしたらどうする？"
	PRINTFORMW 『ふふ、何それ。君が言うと本当に生き返れそうね』
	PRINTFORMW 『……生き返りたくない、なんて言ったら本気だって信じる？』
	PRINTFORMW 『別に死が絶対だから生き返らないなんて言うつもりは無いの。ただ……』
	PRINTFORMW 『ただ、そうね……怖い、のよ』
	PRINTFORMW 『あの子から忘れられている事も、私があの子をああしたっていう事実も』
	PRINTFORMW 『何より、あの子が私を思い出してしまう事が怖いわ』
	PRINTFORMW 『あの子があの時何を思っていたかを知っているから、尚更ね』
	PRINTFORMW 『だからもし、その、生き返らせて姉妹丼？で、良いのかしら？』
	PRINTFORMW 『そういうことを考えているのなら、悪いのだけれど諦めて貰えないかしら』
CASE "幽霊って性感帯とかある？"
	PRINTFORMW 『………… いえ、ちょっと絶句しちゃった。そうよね、そういう人だったわ君は』
	PRINTFORMW 『そうね、自己触っているような感覚は確かにあるけれど、気にしたことは無かった』
	PRINTFORMW 『うん……うん……うーん……かなり鈍いみたい。ちょっと気持ち良い、程度かしら？』
	PRINTFORMW 『あ、ちなみに君から触ろうとしても無駄よ？ ここは話すためだけの場なのだし』
	PRINTFORMW 『ふふ、残念でした。大姐姐の身体はお預けです』
ENDSELECT
CFLAG:姉質問 ++
RETURN 1

path: ERB/EVENT_K/60 千裕/EVENT_K60.ERB