code:
;-------------------------------------------------
;口上テンプレート
;玉寄杏珠口上_2018_04_29（角色クターの名前を入れる、下にコンセプトなど一言あれば入れる）
;製作者　Jet1945
;-------------------------------------------------
;コンセプト：おバカ系女友達　人外系のなかに放り込まれた人类枠　女の子が部活する漫画や动画によくいる賑やかし領帯プというか
;エロに関しては皆やってるって言えば「え、マジで？」っつって乗ってくる
;言葉のボキャ胸罩リーが基本少ない　感動詞がおおい

;-------------------------------------------------

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

VARSET LOCALS

SELECTCASE ARGS
CASE "一人称"
	LOCALS = 我_我
CASE "二人称"
	;相手が主人
	IF PLAYER == MASTER
		LOCALS = 你_你
	;相手が主人ではない
	ELSE
		SELECTCASE CSTR:PLAYER:称号
		CASE "実母"
			IF TALENT:相思相愛
				LOCALS = 義母桑_かあ桑
			ELSE
				LOCALS = おば桑_おば桑
			ENDIF
		CASE "実妹"
				LOCALS = %CALLNAME:PLAYER%酱_%CSTR:PLAYER:ふりがな%酱
		CASEELSE
			SELECTCASE CSTR:PLAYER:学年
			CASE "１年生", "初等部", "中等部"
				IF TALENT:PLAYER:男性
					LOCALS = %CALLNAME:PLAYER%君_%CSTR:PLAYER:ふりがな%君
				ELSE
					LOCALS = %CALLNAME:PLAYER%酱_%CSTR:PLAYER:ふりがな%酱
				ENDIF
			CASE "２年生"
				IF TALENT:PLAYER:男性
					LOCALS = %CALLNAME:PLAYER%_%CSTR:PLAYER:ふりがな%
				ELSE
					LOCALS = %CALLNAME:PLAYER%_%CSTR:PLAYER:ふりがな%
				ENDIF
			CASE "３年生", "研究生"
				LOCALS = %CALLNAME:PLAYER%前輩_%CSTR:PLAYER:ふりがな%前輩
			CASEELSE
				IF COND("教員", PLAYER)
					LOCALS = %CALLNAME:PLAYER%老师_%CSTR:PLAYER:ふりがな%老师
				ELSE
					LOCALS = %CALLNAME:PLAYER%_%CSTR:PLAYER:ふりがな%
				ENDIF
			ENDSELECT
		ENDSELECT
	ENDIF
CASE "主人"
	LOCALS = アイツ_あいつ
CASE "助手"
		SELECTCASE CSTR:ASSI:称号
		CASE "実母"
			IF TALENT:相思相愛
				LOCALS = 義母桑_かあ桑
			ELSE
				LOCALS = おば桑_おば桑
			ENDIF
		CASE "実妹"
				LOCALS = %CALLNAME:ASSI%酱_%CSTR:ASSI:ふりがな%酱
		CASEELSE
			SELECTCASE CSTR:ASSI:学年
			CASE "１年生", "初等部", "中等部"
				IF TALENT:ASSI:男性
					LOCALS = %CALLNAME:ASSI%君_%CSTR:ASSI:ふりがな%君
				ELSE
					LOCALS = %CALLNAME:ASSI%酱_%CSTR:ASSI:ふりがな%酱
				ENDIF
			CASE "２年生"
				IF TALENT:ASSI:男性
					LOCALS = %CALLNAME:ASSI%_%CSTR:ASSI:ふりがな%
				ELSE
					LOCALS = %CALLNAME:ASSI%_%CSTR:ASSI:ふりがな%
				ENDIF
			CASE "３年生", "研究生"
				LOCALS = %CALLNAME:ASSI%前輩_%CSTR:ASSI:ふりがな%前輩
			CASEELSE
				IF COND("教員", ASSI)
					LOCALS = %CALLNAME:ASSI%老师_%CSTR:ASSI:ふりがな%老师
				ELSE
					IF TALENT:ASSI:男性
						LOCALS = %CALLNAME:ASSI%_%CSTR:ASSI:ふりがな%
					ELSE
						LOCALS = %CALLNAME:ASSI%_%CSTR:ASSI:ふりがな%
					ENDIF
				ENDIF
			ENDSELECT
		ENDSELECT

ENDSELECT
RETURNF LOCALS

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

SELECTCASE ARGS
CASE "紹介文"
	STR:1 = 你の同級生でいつも騒がしく好奇心旺盛な女子
	STR:2 = 良く言えば情緒メーカー、悪く言えばトラブルメーカー
	STR:3 = 兒童の頃は同じ玩耍仲間グループでよく遊んでいた
;	STR:4 = 好きなＭＳはハン胸罩ビ　好きでも嫌いでもないＭＳはドートレス
CASE "勧誘"
	PRINTFORML - %NAME:TARGET% -
	PRINTFORMW 「ねーねーねー、%CNAME("二人称")%　ひょっとして学校でなんかやってる？」
	PRINTFORMW 「最近色んな濃ゆい人達から同じクラスだからって%CNAME("二人称")%の事聞かれるんだよね」
	PRINTFORMW 「あ、そう言えば%CNAME("二人称")% 部活って何やってんだっけ？ ひょっとしてそれのこと？」
	PRINTFORMW 「%CNAME("一人称")%も入部してみようかなぁ、何か賑やかそうだし」

;これは別になくても構いません
CASE "勧誘直後"
	PRINTFORML - %NAME:TARGET% -
	PRINTFORMW 「ね、いいでしょ？ ってことでハイ、よろしくー」
	PRINTFORMW 「……ところでどんな部活してんの？ %CNAME("二人称")%」
;これも別になくても構いません。特殊な条件がある場合などにどうぞ
CASE "出現条件"
	PRINTFORMW %NAME:TARGET%は%CALLNAME:MASTER%の"%CSTR:関係%"として、(昼)の部室に顔を出してくれます。

CASE "自室描写"
	PRINTFORML 意外にも多少は片付いており、足の踏み場程度はある。
	PRINTFORML だが机や床、棚の上には玩偶やプラモ、漫画、脱いだ服などが山積みだ。

ENDSELECT

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

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

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

DRAWLINE
;-------------------------------------------------
;初調教時
;-------------------------------------------------
IF CEVENT("調教開始：初調教") == 0
	PRINTFORML 「ちょっ……な、どーしたの いきなり！？」
	PRINTFORML 「は？ 部活？ 活動内容ってそーゆうアレなの！？」
	PRINTFORMW 「ふぇ～～…そういうアレかぁ～ いやぁマジかぁ～…」
	PRINTFORMW 「まぁ 部活入っちゃったしなぁ～ 仕方ないかぁ」
	PRINTFORML
	PRINTFORMW 「モノは試しって言うしね、よっしゃバッチこい！」
	CALL SET_CEVENT, "調教開始：初調教"
;-------------------------------------------------
;調教開始時（一回のみ）
;-------------------------------------------------
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ１") == 0
	PRINTFORML 「嗯……一開始感觉还不太明白」
	PRINTFORML 「啊，感觉吗？更容易理解这种气氛了？」
	PRINTFORMW 「果然%CNAME("一人称")%很容易理解呢～♪」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ１"
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ２") == 0
	PRINTFORML 「%CNAME("一人称")%觉得还不错」
	PRINTFORML 「总觉得有种被%CNAME("二人称")%压制的感觉呢」
	PRINTFORMW 「我不喜欢一直被人欺负，也该差不多该反击了～」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ２"
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3 && TALENT:恋慕 == 0 && CEVENT("調教開始：屈服刻印ＬＶ３") == 0
	PRINTFORML 「可能%CNAME("一人称")%是误会了吧」
	PRINTFORML 「做爱这件事啊，不是谁厉害谁更厉害的问题吧?」
	PRINTFORML 「这样…配合呼吸的方法？是组合还是靠默契」
	PRINTFORMW 「也就是说，我觉得这就是对%CNAME("二人称")%有好感的原因！」
	CALL SET_CEVENT, "調教開始：屈服刻印ＬＶ３"
;恋慕
ELSEIF TALENT:恋慕 && CEVENT("調教開始：恋慕") == 0
	PRINTFORML 「……什么啊，好像在等这边的反应一样！」
	PRINTFORML 「%CNAME("二人称")%才是啊，怎么会这样……没有令人吃惊的地方吗吗？」
	PRINTFORMW 「对%CNAME("一人称")%！说什么呢～！」
	CALL SET_CEVENT, "調教開始：恋慕"
;相思相愛
ELSEIF TALENT:相思相愛 && CEVENT("調教開始：相思相愛") == 0
	PRINTFORML 「哎呀，所谓的恋人就是这样的関系」
	PRINTFORML 「我们也加油吧！」
	PRINTFORMW 「必须更加彻底了解对方呢~」
	CALL SET_CEVENT, "調教開始：相思相愛"
;助手の有無をチェック（いない場合は二回目以降へ飛ぶ）
ELSEIF ASSI <= 0
	CALL K16_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 K16_KOJO2
ENDIF

RETURN 1

;-------------------------------------------------
;調教開始時（2回目以降）
;-------------------------------------------------
@K16_KOJO2
;相思相愛
IF TALENT:相思相愛
			SELECTCASE RAND:5
			CASE 0
				PRINTFORMW 「嘛，不管怎么说最终还是%CNAME("一人称")%吧～我知道啦♪」
			CASE 1
				PRINTFORMW 「好！嘘，脱了脱了！还是帮你脱掉？」
			CASE 2
				PRINTFORML 「%CNAME("一人称")%姑且不论，不管别的孩子不好吧？」
				PRINTFORMW 「我是绝对需要%CNAME("二人称")%的人」
			CASE 3
				PRINTFORMW 「嗯～…%CNAME("二人称")%，我无论做多少次都还是会害羞啊」
			CASEELSE
				PRINTFORMW 「嗯~，不管看多少次都会爱上的身体！」
			ENDSELECT
;屈服刻印Lv0
ELSEIF MARK:屈服刻印 == 0
			SELECTCASE RAND:5
			CASE 0
				PRINTFORMW 「真的要做吗？虽然没什么心情~」
			CASE 1
				PRINTFORMW 「也没関系……不做其他更開心的事吗？」
			CASE 2
				PRINTFORMW 「嗯，我觉得%CNAME("二人称")%和这个不太般配呢~」
			CASE 3
				PRINTFORMW 「和%CNAME("一人称")%？应该还有其他的对象吧…」
			CASEELSE
				PRINTFORMW 「嘛，我可以陪你…下次请我吃点什么吧？」
			ENDSELECT
;屈服刻印Lv1
ELSEIF MARK:屈服刻印 == 1
			SELECTCASE RAND:5
			CASE 0
				PRINTFORMW 「%CNAME("二人称")%也不会厌倦呢～♪」
			CASE 1
				PRINTFORMW 「喂，让我看看你的本领！」
			CASE 2
				PRINTFORMW 「也许和%CNAME("二人称")%在一起也会变得越来越開心吧！」
			CASE 3
				PRINTFORMW 「真是…干劲十足啊~」
			CASEELSE
				PRINTFORMW 「然后呢？今天做什么？」
			ENDSELECT
;屈服刻印Lv2
ELSEIF MARK:屈服刻印 == 2
			SELECTCASE RAND:5
			CASE 0
				PRINTFORMW 「好吧，我也在学习各种各样的东西呢～！」
			CASE 1
				PRINTFORMW 「来吧！对手是%CNAME("一人称")%！」
			CASE 2
				PRINTFORMW 「好吧，今天我一定要弄清楚哪一个更厉害！」
			CASE 3
				PRINTFORMW 「好吧，来上吧！」
			CASEELSE
				PRINTFORMW 「来吧，我会站稳接牢的！」
			ENDSELECT
;屈服刻印Lv3
ELSEIF MARK:屈服刻印 == 3
			SELECTCASE RAND:5
			CASE 0
				PRINTFORMW 「终于！？是不是一直在等着呢！？」
			CASE 1
				PRINTFORML 「嗯……完全被%CNAME("二人称")%流派的做法影响了呢～」
				PRINTFORMW 「嘛，没什么！好吧！」
			CASE 2
				PRINTFORMW 「也许之前就一直有这样的感觉」
			CASE 3
				PRINTFORMW 「嗯，这个和那个要用。这个不用，这个要具体情况具体分析……」
			CASEELSE
				PRINTFORMW 「彼此的心思差不多都知道了，開始之前也没什么好说的」
			ENDSELECT
ENDIF
RETURN 1

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

DRAWLINE
;-------------------------------------------------
;※精力限界値を超えた場合の終了口上
;-------------------------------------------------
;調教強制終了時の口上
IF STATE("撃沈", MASTER)
	;相思相愛
	IF TALENT:相思相愛
			SELECTCASE RAND:4
			CASE 0
				PRINTFORM 「好嘞好嘞
				CALL HEARTMARK
				PRINTFORM  今天好厉害啊，快睡吧快睡吧。我会跟你睡在一起直到起床的
				CALL HEARTMARK
				PRINTFORMW 」
			CASE 1
				PRINTFORML 「……其实，就算不那么努力拼命我也是不会逃走的」
				PRINTFORMW 「等一下，我现在把水拿过来」
			CASE 2
				PRINTFORM 「嘿嘿~，%CNAME("一人称")%真是被爱着呢~
				CALL HEARTMARK
				PRINTFORMW 」
			CASEELSE
				PRINTFORM 「嘿嘿~，%CNAME("一人称")%真是被爱着呢~
				CALL HEARTMARK
				PRINTFORMW 」
			ENDSELECT
	;其他
	ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「什么啊，完了吗？那可不行啊」
			CASE 1
				PRINTFORMW 「呼~嗯，好像已经没有力气站起来站了啊！」
			CASEELSE
				PRINTFORMW 「啊，太勉强了～」
			ENDSELECT
	ENDIF
ELSEIF STATE("撃沈", TARGET)
	;恋慕
	IF TALENT:恋慕
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「什么、你这是什么体力啊～%CNAME("二人称")%啊～……」
			CASE 1
				PRINTFORMW 「好…好…啊~不行，也到极限了~」
			CASEELSE
				PRINTFORMW 「啊……不行，站不起来。去拿果汁来」
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「什么、你这是什么体力啊～%CNAME("二人称")%啊～……」
			CASE 1
				PRINTFORMW 「好…好…啊~不行，也到极限了~」
			CASEELSE
				PRINTFORMW 「啊……不行，站不起来。去拿果汁来」
			ENDSELECT
		ENDIF

;恋慕＋満足
ELSEIF TALENT:恋慕 && COND("満足")
			SELECTCASE RAND:4
			CASE 0
				PRINTFORM 「哇哈～～～
				CALL HEARTMARK
				PRINTFORMW  腰都站不直了♪」
			CASE 1
				PRINTFORMW 「唔唔 看样子知道%CNAME("一人称")%的弱点了呢～♪」
			CASE 2
				PRINTFORMW 「%CNAME("二人称")%太棒了～♪%CNAME("一人称")%已经被迷住了♪」
			CASEELSE
				PRINTFORM 「呀～满足
				CALL HEARTMARK
				PRINTFORMW  %CNAME("二人称")%怎么样？还好吗？」
			ENDSELECT
;恋慕
ELSEIF TALENT:恋慕
			SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 「诶~已经结束了？再努力一下吧～」
			CASE 1
				PRINTFORML 「怎么这么简单就完了啊～」
				PRINTFORMW 「现在还年轻所以要更加努力啊」
			CASE 2
				PRINTFORMW 「嗯，要更加沉溺于%CNAME("一人称")%的魅力啊～」
			CASEELSE
				PRINTFORMW 「啊，太勉强了～」
			ENDSELECT
ELSE
			SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 「呼~……口渴了」
			CASE 1
				PRINTFORMW 「果然很累啊」
			CASE 2
				PRINTFORMW 「嗨，辛苦了~」
			CASEELSE
				PRINTFORMW 「咦，%CNAME("一人称")%的袜子在什么地方？」
			ENDSELECT
ENDIF

RETURN 1

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

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

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

;-------------------------------------------------
;肛門愛撫
;-------------------------------------------------
IF SELECTCOM == 2
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;気持ちいい
		IF CHECK("Ａ指挿入")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;気持ちいい
		ELSEIF CHECK("Ａ指挿入")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

;-------------------------------------------------
;接吻
;-------------------------------------------------
IF SELECTCOM == 6
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;テンダー接吻
		IF CHECK_COM("テンダー接吻")
			PRINTFORMW
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

;-------------------------------------------------
;舐肛　Ａ面部騎乗(被逆推ているとき)
;-------------------------------------------------
;舐肛
IF SELECTCOM == 9
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方手交
;-------------------------------------------------
IF SELECTCOM == 10
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方乳交
;-------------------------------------------------
IF SELECTCOM == 11
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;给对方足交
;-------------------------------------------------
IF SELECTCOM == 12
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開阴道
;-------------------------------------------------
IF SELECTCOM == 13
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;扒開菊穴
;-------------------------------------------------
IF SELECTCOM == 14
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道指挿入
;-------------------------------------------------
IF SELECTCOM == 15
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;痛くない
		IF CHECK("尿道PLAY")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;跳蛋
;-------------------------------------------------
IF SELECTCOM == 30
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;振動棒
;-------------------------------------------------
;開始時
IF SELECTCOM == 31
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕有
		IF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ｖ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:振動棒 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛用振動棒
;-------------------------------------------------
;開始時
IF SELECTCOM == 33
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;余裕有
		IF CHECK("Ａ振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;脱着時(使用していた振動棒の尺寸はCHECK("Ａ最新受け入れサイズ")で判定)
	ELSEIF TEQUIP:肛用振動棒 == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;余裕有
		IF CHECK("Ａ振動棒")
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;飛機杯
;-------------------------------------------------
IF SELECTCOM == 37
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;Ｖ挿入系初選択
;-------------------------------------------------
IF SELECTCOM >= 60 && SELECTCOM <= 69 && FIRSTCOMS("Ｖ挿入") == 0
	;処女
	IF TALENT:処女
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;非処女
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
;-------------------------------------------------
;調教ごとの初Ｖ挿入
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOMS("Ｖ挿入") == 0 && FIRSTCOM(SELECTCOM) && RAND:3 == 0
	;巨根
	IF SIZE("阴茎", PLAYER) >= 2 && RANDIF(1, TALENT:恋慕)
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		SELECTCASE SELECTCOM
		;騎乗位
		CASE 65
			PRINTFORMW
		;対面座位
		CASE 63
			PRINTFORMW
		;それ以外
		CASEELSE
			PRINTFORMW
		ENDSELECT
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
;-------------------------------------------------
;全Ｖ挿入共通の随机文
;ここに力を入れると毎回異なる反応をするようになるのでおすすめ
;-------------------------------------------------
ELSEIF SELECTCOM >= 60 && SELECTCOM <= 69 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:手下留情 && NOWEX:Ｖ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ｖ対応指令") && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;SELECTCASE CONDS("体位")
		;;CASE "正常位", "屈曲位"
		;	IF TALENT:恋慕 && RAND:3 == 0
		;		PRINTFORMW
		;	ELSEIF MARK:屈服刻印 >= 2 && RAND:2
		;		PRINTFORMW
		;	ELSE
		;		PRINTFORMW
		;	ENDIF
		;CASEELSE
			IF TALENT:恋慕 && RAND:6 == 0
				PRINTFORMW 「嗯，呃，什么啊，来认真的啊…」
				PRINTFORMW 「比平时…看起来更帅一点呢…一点？」
			ELSEIF (INSERT("後背位") || INSERT("背面座位")) == 0 && RAND:5 == 0
				PRINTFORMW 「嗯……看着这边呢…」
				PRINTFORMW 「嘿嘿嘿…好棒，好棒…♪」
			ELSEIF ABL:Ｖ感覚 >= 3 && RAND:4 == 0
				PRINTFORMW 「嗯，哦，哦……那里，不错啊…」
				PRINTFORMW 「现在再做一次吧，快一点，快～一～点～♪」
				PRINTFORMW 「……哦哦♪」
			ELSEIF RAND:6 == 0
				PRINTFORMW 「呵呵♪我自己一个人的时候练过腰技了！」
			ELSEIF RAND:5 == 0
				PRINTFORMW 「虽然现在是你的回合，不过我也是会反击的！」
			ELSEIF RAND:4 == 0
				PRINTFORMW 「进攻的话是不是有些勉强呢?」
			ELSEIF RAND:3 == 0
				PRINTFORMW 「啊，啊…好舒服啊……嗯…！」
				PRINTFORMW 「……怎么样？！刚才的声音？！刚才感觉很舒服对吧？！」
			ELSEIF RAND:2
				PRINTFORMW 「气氛可以更活跃一些哦～…%CNAME("一人称")%在做爱哦～、做爱～」
				PRINTFORMW 「………」
				PRINTFORMW 「果然…自己说出来有点不对劲」
			ELSE
				PRINTFORMW 「把%CNAME("一人称")%的身体弄得这么色情…你这个幸福的家伙」
			ENDIF
		;ENDSELECT
	ENDIF
	RETURN 1
;-------------------------------------------------
;二穴挿入(書く場合には;を消してください)
;-------------------------------------------------
;ELSEIF SELECTCOM >= 60 && SELECTCOM <= 79 && COND("３Ｐ")
;	IF CHECK_COM("两根挿入Ｖ中")
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;余裕有
;		ELSEIF CHECK("两根挿入Ｖ中")
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		RETURN 1
;	ELSEIF CHECK_COM("两根挿入Ａ中")
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;余裕有
;		ELSEIF CHECK("两根挿入Ａ中")
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		RETURN 1
;	ELSEIF CHECK_COM("二穴挿入")
;		;恋慕
;		IF TALENT:恋慕
;			PRINTFORMW
;		;余裕有
;		ELSEIF CHECK("二穴挿入")
;			PRINTFORMW
;		;それ以外
;		ELSE
;			PRINTFORMW
;		ENDIF
;		RETURN 1
;	ENDIF
ENDIF

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

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

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

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

;-------------------------------------------------
;背面座位
;-------------------------------------------------
;背面座位
IF SELECTCOM == 64
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;屈服刻印Lv2以上
		ELSEIF MARK:屈服刻印 >= 2
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;騎乗位
;-------------------------------------------------
IF SELECTCOM == 65
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;挿入刺激Ｇ点
;-------------------------------------------------
IF SELECTCOM == 66
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;挿入子宮口玩弄
;-------------------------------------------------
IF SELECTCOM == 67
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;子宮挿入
;-------------------------------------------------
IF SELECTCOM == 68
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;Ａ挿入系初選択
;疼痛が少なく楽しめているかはCHECK("Ａ挿入")で判定
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 79 && FIRSTCOMS("Ａ挿入") == 0
	;Ａ処女
	IF TALENT:Ａ処女
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW 「尻穴吗……%CNAME("二人称")%，真的很喜欢这个呢~」
			PRINTFORMW 「嘛，和喜欢这个东西的人交往的%CNAME("一人称")%也是%CNAME("一人称")%」
		;余裕有 & 処女だった場合
		ELSEIF CHECK("Ａ挿入") && TALENT:処女
			PRINTFORMW 「%CNAME("二人称")%喜欢东西的样子真让人吃惊」
			PRINTFORMW 「比起小穴，屁股上的洞更好……说什么蠢话呢」
			PRINTFORMW 「%CNAME("二人称")%来教%CNAME("一人称")%尻穴要怎么用？」
			PRINTFORML
			PRINTFORMW 「感觉真的很好哦，%CNAME("二人称")%也会更舒服的！」
		;それ以外
		ELSE
			PRINTFORMW 「尻穴……%CNAME("二人称")%，真的很喜欢这个呢」
			PRINTFORMW 「笨蛋，不要一直动啊，%CNAME("一人称")%也没有什么余裕了……」
		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 && CHOSECOM(SELECTCOM) && RAND:3 == 0
	;要去了なのに焦らされている
	IF TEQUIP:PLAYER:手下留情 && NOWEX:Ａ绝顶前骤停 && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;余裕が無い
	ELSEIF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;喜欢的体位
	ELSEIF COND("喜欢的体位中") && SELECTCOM == INSERT("Ａ対応指令") && RAND:2
		IF TALENT:恋慕
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		SELECTCASE CONDS("体位")
		CASE "正常位", "屈曲位"
			IF TALENT:恋慕 && RAND:3 == 0
				PRINTFORMW
			ELSEIF MARK:屈服刻印 >= 2 && RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		CASEELSE
			IF RAND:4 == 0
				PRINTFORMW
			ELSEIF RAND:3 == 0
				PRINTFORMW
			ELSEIF RAND:2
				PRINTFORMW
			ELSE
				PRINTFORMW
			ENDIF
		ENDSELECT
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門性交(初めては上のＡ挿入系初選択などで)
;-------------------------------------------------
IF SELECTCOM >= 70 && SELECTCOM <= 74
	;余裕が無い
	IF CHECK("Ａ挿入") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;肛門騎乗位
;-------------------------------------------------
IF SELECTCOM == 75
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;貝あわせ
;-------------------------------------------------
IF SELECTCOM == 80
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;雙乳間抽插
;-------------------------------------------------
IF SELECTCOM == 81
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;乳頭奸
;-------------------------------------------------
IF SELECTCOM == 82
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;尿道挿入
;-------------------------------------------------
IF SELECTCOM == 83
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;余裕が無い
		ELSEIF CHECK("尿道挿入") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;余裕が無い
		IF CHECK("尿道挿入") == 0
			PRINTFORMW
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;洗面奶手交
;手淫と洗面奶から派生する
;-------------------------------------------------
IF CHECK_COM("洗面奶手交")
	;恋慕
	IF TALENT:恋慕
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		IF COND("喝母乳フラグ", PLAYER)
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;手淫
;-------------------------------------------------
IF SELECTCOM == 90
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「诶，要用手握住小鸡鸡？好好洗了的吧～？」
		PRINTFORMW 「要去了吗？怎么」
		PRINTFORMW 呼！
		PRINTFORMW 「怎么样，舒服吗……咦，没事吧？」
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			IF RAND:2
				PRINTFORMW 「呵呵，别动。我会让你更舒服的」
			ELSE
				PRINTFORMW 「你看，不是在这里吗吗？因为%CNAME("二人称")%的弱点已经被我找到了♪」
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「那么，抓住了。就这样射出来吧」
			ELSE
				PRINTFORMW 「不能就这样让他出来啊。快看，撸撸撸♪」
			ENDIF
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			IF RAND:2
				PRINTFORMW 「什么啊？你喜欢%CNAME("一人称")%的手吗？哼哼」
			ELSE
				PRINTFORMW 「呵呵♪好開心啊，用%CNAME("二人称")%被%CNAME("一人称")%的手弄得很舒服的样子」
			ENDIF
		;それ以外
		ELSE
			IF RAND:2
				PRINTFORMW 「看啊，这样做的话会怎么样呢？撸撸撸撸撸撸撸撸♪」
			ELSE
				PRINTFORMW 「触摸这边的话……？啊哈哈，表情变来变去真有趣♪」
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;口交
;-------------------------------------------------
IF SELECTCOM == 91
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;被逆推ている時
		IF TEQUIP:推倒
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW 「嗯？你想让我用嘴来吗？」
			PRINTFORMW 「怎么办呢……真是很奇怪啊」
			PRINTFORMW 「诶～？不用舌頭舔不行吗？」
			PRINTFORMW 「……嗯！女儿当自强！」
		ENDIF
	;二回目以降
	ELSEIF CHECK_COM("阴茎接吻")
		PRINTFORMW 「啾……嗯……啾……」
		;恋慕
		IF TALENT:恋慕
			CALL PRINT_STRW, @"「……因为是未来老公的宝贝，所以必须好好地亲他哦H_」"
		;それ以外
		ELSE
			PRINTFORMW 「……因为是重要的%CNAME("二人称")%的宝贝，所以要好好疼爱他哦♪」
		ENDIF
	;みんな大好き清洁口交
	ELSEIF CHECK_COM("清洁口交")
		;恥垢もお掃除
		IF CHECK_COM("恥垢清洁口交")
			PRINTFORMW 「真是的，这么脏，小心会生病哦？」
			PRINTFORMW 「……真没办法啊，就让%CALLNAME:TARGET%清扫之神大人，把%CNAME("二人称")%的小鸡鸡好好地清洗，变得特别漂亮吧」
			PRINTFORMW 「不应该感谢我一下吗～？」
		;恋慕
		ELSEIF TALENT:恋慕 && RANDIF(1, ABL:奉仕精神 >= 3)
			PRINTFORMW 「真是的」
			PRINTFORMW 「如果对%CNAME("一人称")%以外的人做这种事情，会被讨厌的哦？」
			PRINTFORMW 「%CNAME("一人称")%吗……啊，没関系的」
			PRINTFORMW 「我并不讨厌这种事情哦」
		;奉仕精神Lv3以上
		ELSEIF ABL:奉仕精神 >= 3 && RAND:2
			PRINTFORMW 「咕噜……咕噜噜……」
			PRINTFORMW 「……呵呵呵。你看，我给你弄得这么干净哦？」
			PRINTFORMW 「做了这么辛苦的事，要好好对我回礼哦？」
		ELSE
			PRINTFORMW 「噗啾……啾噜噜……」
			PRINTFORMW 「如果是以前的话，这种怪东西我应该连看都不想看吧~」
			PRINTFORMW 「……%CNAME("一人称")%，可能是有点糟糕的人啊」
		ENDIF
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		PRINTFORMW 「嗯……啾噜……呜嗯……」
		;恋慕
		IF TALENT:恋慕 && RAND:2
			PRINTFORMW 「吓我一跳哦，看起来怪怪的，真可爱♪」
			PRINTFORMW 「……呐，可以再舔一下吗？」
		;それ以外
		ELSE
			SELECTCASE SIZE("阴茎", PLAYER)
			CASE 0
				PRINTFORMW 「……%CNAME("二人称")%的小鸡鸡，又好吃又可爱呢～♪」
				PRINTFORMW 「很简单就可以整根含住哦，……看，这样就可以包起来了」
			CASE IS >= 3
				CALL PRINT_STRW, @"「……%CNAME("二人称")%的小鸡鸡，好大呀……………_H_」"
				CALL PRINT_STRW, @"「含住的的话嘴里满满都是雄性的%TEXTS("气味儿")%……脑子都要变得不好使了……_H_」"
			CASEELSE
				PRINTFORMW 「……%CNAME("二人称")%的那个、大小正好」
				PRINTFORMW 「不大不小刚刚好，硬硬的有嚼劲♪」
			ENDSELECT
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;乳交
;-------------------------------------------------
IF SELECTCOM == 92
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	;被逆推ているとき
	ELSEIF TEQUIP:推倒
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;それ以外
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;素股
;-------------------------------------------------
IF SELECTCOM == 93
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	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 == 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:推倒
			PRINTFORML 「机会难得，就放点东西进去吧~♪」
			PRINTFORMW 「没関系没関系！以前我也用吸管扎过青蛙的！」

		;それ以外
		ELSE
			PRINTFORML 「え～、マジ？ %CNAME("二人称")%のケツに入れろって？」
			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 == 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 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;強制口交
;-------------------------------------------------
IF SELECTCOM == 140
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;フィスト系指令
;-------------------------------------------------
IF SELECTCOM == 141 || SELECTCOM == 142 || SELECTCOM == 143
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;楽しめる余裕が無い
		IF CHECK("フィスト") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;楽しめる余裕が無い
		IF CHECK("フィスト") == 0
			;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
			RETURN 0
			PRINTFORMW
		;恋慕
		ELSEIF 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 == 148
	;口上を書く際には RETURN 0 を削除してください(何も喋らない場合には地の文が強化されます)
	RETURN 0
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;こういうのは好きじゃない
		IF CHECK("穿环") == 0
			PRINTFORMW
		;それ以外
		ELSE
			;ＯＮフラグが付けた際のセリフです
			IF COND("陰蒂環フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("陰唇環フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("乳环フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ELSEIF COND("肚脐环フラグ")
				IF COND("穿環ＯＮフラグ")
					PRINTFORMW
				ELSE
					PRINTFORMW
				ENDIF
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
ENDIF

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

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

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

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

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

;-------------------------------------------------
;新妻PLAY
;-------------------------------------------------
IF SELECTCOM == 173
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;終了時
	ELSEIF TEQUIP:新妻PLAY == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;室内露出PLAY
;まだ仕様が決まってない
;-------------------------------------------------
IF SELECTCOM == 174
	RETURN 1
ENDIF
;-------------------------------------------------
;換装
;-------------------------------------------------
IF SELECTCOM == 175
	;服、贴身制服、泳装に着替えた時
	IF CHECK_COM("換装：服を着替えた")
		IF CHECK_CLO("自分の服")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("衬衫")
			PRINTFORMW
		ELSEIF CHECK_SHIRT("女教師")
			PRINTFORMW 「那么！现在開始H科目的补考！不行的话就要退学了！什么嘛！」
		ELSEIF CHECK_SHIRT("和服")
			PRINTFORML 「……是不是像时代剧中出现的茶店店员一样帅吧？」
			PRINTFORMW 「已经没有华丽又可爱的和服了吗？」
		ELSEIF CHECK_SHIRT("女仆装")
			PRINTFORML 「主人！欢迎光临！」
			PRINTFORMW 「今天的饮料是%TEXTR("淡蓝色的油漆/塑料胶水/酱油/孔雀鱼缸里的水/十四公斤的糖水")%那么～す♪」
		ELSEIF CHECK_SHIRT("体操服")
			PRINTFORMW 「穿着也可以……不小心弄脏了会很麻烦吧？」
		ELSEIF CHECK_SHIRT("看護婦")
			PRINTFORMW 「笨笨儿童护士的实战治疗！尝试过以后就不能一个人去上厕所咯♪」
		ELSEIF CHECK_SHIRT("旗袍")
			PRINTFORMW 「アイヤー　どーだ%CNAME("二人称")%、ちうごく四千年の伝統の服、興奮したアルか！」
		ELSEIF CHECK_SHIRT("水手服")
			PRINTFORMW 「穿着也可以……不小心弄脏了会很麻烦吧？」
		ELSEIF CHECK_SHIRT("巫女")
			PRINTFORML 「嗯，虽然自己说也不太好，但是总觉得有些不对劲啊」
			PRINTFORMW 「说是有cosplay感吧～？为什么%CNAME("一人称")%穿上后比起可爱更有打工的感觉呢？」
		ELSEIF CHECK_SHIRT("情趣内衣")
			PRINTFORML 「嗯~嗯，很性感！」
			PRINTFORMW 「但是为什么%CNAME("一人称")%穿上后看起来很傻呢？这个？」
		ELSEIF CHECK_CLO("比基尼姿")
			PRINTFORML 「嗯，还不错哦~！」
			PRINTFORMW 「用这种性感的样子会独占今年海滩上的视线吧！」
		ELSEIF CHECK_BODYS("拘束衣")
			PRINTFORML 「这个，与其说是色情，不如说像是以前的搞笑艺人，更让人害羞了！？」
			PRINTFORMW 「可以脱掉吗！？可以脱掉这个吗！？」
		ELSEIF CHECK_BODYS("兔")
			PRINTFORML 「那么轮盘開始！红色的话%CNAME("一人称")%里会有100万美元，黑色的话会有200万美元的奖金♪」
			PRINTFORMW 「……兔女郎我只在动画和游戏里见过，所以不知道应该是什么感觉？」
		;其他
		ELSE
			PRINTFORMW
		ENDIF
	;胸も股間も丸出し状態变成了時
	ELSEIF CHECK_COM("換装：裸体变成了")
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;露出癖Lv3
		ELSEIF ABL:露出癖 >= 3
			PRINTFORMW
		ELSE
			PRINTFORMW
		ENDIF
	;胖次を変えたり脱いだり
	ELSEIF CHECK_COM("換装：胖次")
		IF EQUIP:胖次
			PRINTFORMW
		;没穿内褲です
		ELSE
			PRINTFORMW
		ENDIF
	;以下は面倒ならELSE でひとまとめでも良いでしょう
	ELSEIF CHECK_COM("換装：外套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：胸罩")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：手套")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：襪子")
		PRINTFORMW
	ELSEIF CHECK_COM("換装：靴")
		PRINTFORMW
	;飾品の付け替えや其他
	ELSE
		PRINTFORMW
	ENDIF
	RETURN 1
ENDIF
;-------------------------------------------------
;被逆推
;-------------------------------------------------
IF SELECTCOM == 176
	;初めて
	IF FIRSTCOM(SELECTCOM) == 0
		PRINTFORMW 「嘿嘿~！%CNAME("一人称")%也想体验一下进攻的一方啊！」
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「好！交给%CNAME("一人称")%吧！」
			CASE 1
				PRINTFORML 「从这里開始是%CNAME("一人称")%的表演时间～～！」
			CASE 2
				PRINTFORML 「嘿嘿~老实一点哦~？」
			CASEELSE
				PRINTFORML 「没问题没问题！我有好好学习过了！」
			ENDSELECT
		;それ以外
		ELSE
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「唔～～！！」
			CASE 1
				PRINTFORML 「我不是那种被欺负了还能保持沉默的好孩子!」
			CASE 2
				PRINTFORML 「我等着你！在这个瞬间——！！」
			CASEELSE
				PRINTFORML 「现在——！！」
			ENDSELECT
		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
		PRINTFORMW 「哇！？」
	;失敗
	ELSE
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「还差得远呢～！」
			CASE 1
				PRINTFORML 「还在挣扎吗……住手吧！」
			CASE 2
				PRINTFORML 「不行不行！还是%CNAME("一人称")%的回合！」
			CASEELSE
				PRINTFORML 「压着你的时候不会让你轻易逃走哦～」
			ENDSELECT
	ENDIF
	RETURN 1
ENDIF

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

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

;--------------------------------------------------
;調教指令の地の文の前に喋る台詞はここに書く
;--------------------------------------------------
@KOJO_MESSAGE_BEFORE_COM_K16

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

;-------------------------------------------------
;パラメータ変動をトリガーにした口上
;パラメータ変動後に口上を発動します
;-------------------------------------------------
@KOJO_MESSAGE_PALAMCNG_K16, 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
;-------------------------------------------------
;射精した(扶她/男性のみ)
;-------------------------------------------------
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_K16, ARGS
;助手が調教した時に口上をスキップする（好みに応じて使う、行頭の;を消すとスキップするようになる）
;SIF ASSIPLAY
;	RETURN 0

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

;-------------------------------------------------
;射精先選択時に表示する口上
;頻繁に表示されるため随机や表示条件の設定推奨です
;-------------------------------------------------
@KOJO_MESSAGE_SHOOT_K16

IF INSERT("Ｖ挿入") && (COND("今回初射精", PLAYER) || RAND:3 == 0)
	;このターンに杏珠がイった
	IF COND("絶頂")

	;まだ杏珠は一度もイってない
	ELSEIF EX:絶頂数合計 == 0
		IF TALENT:恋慕
			SELECTCASE KABURAND(3)
			CASE 2
				PRINTFORMW 「怎么回事啊，真是没办法的家伙啊~♪好了好了，不要勉强，拿出来吧，拿出来吧♪」
			CASE 1
				PRINTFORMW 「嘿嘿~就算是%CNAME("二人称")%，好像也敌不过%CNAME("一人称")%的厉害啊～？」
			CASEELSE
				PRINTFORMW 「嘿嘿，这次杏珠大人好像只用了简单的一招就用华丽地取胜呢♪」
			ENDSELECT
		ELSE
			SELECTCASE KABURAND(3)
			CASE 2
				PRINTFORMW 「稍微振作点哦~。%CNAME("一人称")%还没有完全满足呢…」
			CASE 1
				PRINTFORMW 「嗯，再加把劲吧~」
			CASEELSE
				PRINTFORMW 「嗯，已经？不早吗？」
			ENDSELECT
		ENDIF
	ELSE

	ENDIF
ENDIF

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

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

;以下は通常の射精区分。
;-------------------------------------------------
;素股、足交や身体で射精させた
;-------------------------------------------------
ELSEIF SHOOT("脚")
	;初めて
	IF FIRST_EV("絶頂：脚") == 0
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	;二回目以降
	ELSE
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
		;それ以外
		ELSE
			PRINTFORMW
		ENDIF
	ENDIF
ELSEIF SHOOT("素股")
	PRINTFORMW
;-------------------------------------------------
;口で射精させた
;-------------------------------------------------
ELSEIF SHOOT("口")
	;初めて
	IF FIRST_EV("絶頂：口") == 0
		PRINTFORMW
	;精液中毒Lv5
	ELSEIF ABL:精液中毒 >= 5
		PRINTFORMW
	;精液中毒Lv3
	ELSEIF ABL:精液中毒 >= 3
		PRINTFORMW
	;奉仕精神Lv3以上
	ELSEIF ABL:奉仕精神 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;胸で射精させた
;-------------------------------------------------
ELSEIF SHOOT("胸")
	;初めて
	IF FIRST_EV("絶頂：胸") == 0
		PRINTFORMW
	;奉仕精神Lv5
	ELSEIF ABL:奉仕精神 >= 5
		PRINTFORMW
	;奉仕精神Lv3以上
	ELSEIF ABL:奉仕精神 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;手で射精させた
;-------------------------------------------------
ELSEIF SHOOT("手")
	;初めて
	IF FIRST_EV("絶頂：手") == 0
		PRINTFORMW
	;奉仕精神Lv5
	ELSEIF ABL:奉仕精神 >= 5
		PRINTFORMW
	;奉仕精神Lv3
	ELSEIF ABL:奉仕精神 >= 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;性交で射精させた
;-------------------------------------------------
ELSEIF SHOOT("Ｖ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ｖ中出し") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;屈服刻印Lv3
	ELSEIF MARK:屈服刻印 == 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
ELSEIF SHOOT("Ａ中出し")
	;初めて
	IF FIRST_EV("絶頂：Ａ中出し") == 0
		PRINTFORMW
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
	;屈服刻印Lv3
	ELSEIF MARK:屈服刻印 == 3
		PRINTFORMW
	;それ以外
	ELSE
		PRINTFORMW
	ENDIF
;-------------------------------------------------
;接吻で射精
;-------------------------------------------------
ELSEIF SHOOT("接吻")
	PRINTFORMW
;-------------------------------------------------
;面部騎乗で射精
;-------------------------------------------------
ELSEIF SHOOT("面部騎乗")
	PRINTFORMW
;-------------------------------------------------
;洗面奶で射精
;-------------------------------------------------
ELSEIF SHOOT("洗面奶")
	PRINTFORMW
;-------------------------------------------------
;逆舐陰で射精
;-------------------------------------------------
ELSEIF SHOOT("逆舐陰")
	PRINTFORMW
;-------------------------------------------------
;逆肛交、逆強姦で射精
;-------------------------------------------------
ELSEIF SHOOT("逆強姦") || SHOOT("逆肛交") || SHOOT("肛門奉仕")
	PRINTFORMW
;-------------------------------------------------
;PLAYERが女で、イってしまった…
;-------------------------------------------------
ELSEIF SHOOT("調教者が女性")
	;強絶頂
	IF COND("絶頂", PLAYER) >= 2
	SELECTCASE RAND:5
		CASE 0
			PRINTFORMW 「哇，吓了我一跳！不要突然大叫哦」
		CASE 1
			PRINTFORMW 「发出更奇怪的喘息吧，很有趣的哦」
		CASE 2
			PRINTFORMW 「就按照这个步调让我们好好亲热一下吧♪」
		CASE 3
			PRINTFORMW 「嗯嗯，有个可爱的女孩子哦～♪」
		CASE 4
			PRINTFORMW 「哼哼，优越优越！」
		CASEELSE
			PRINTFORMW 「呜哇~哼哼地娇喘着♪」
		ENDSELECT
	;絶頂
	ELSEIF COND("絶頂", PLAYER) == 1
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「哦？刚才去了吗？刚从去了吗？ 」
		CASE 1
			PRINTFORMW 「嘿嘿~！给你添麻烦了！」
		CASE 2
			PRINTFORMW 「女性身上的弱点我基本都知道哦！」
		CASEELSE
			PRINTFORMW 「哈哈~如何如何♪」
		ENDSELECT
	ENDIF
ENDIF

;-------------------------------------------------
;角色が調教中に調教者を攻める際などの口上
;-------------------------------------------------
@KOJO_COUNTER_K16, ARGS
SELECTCASE ARGS
CASE "恍惚"
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「哦？被%CNAME("一人称")%迷住了吗？」
		CASE 1
			PRINTFORMW 「哼哼♪完全是哆隆哆隆的感觉！」
		CASE 2
			PRINTFORMW 「好！我会好好疼爱你的！」
		CASEELSE
			PRINTFORMW 「嘿嘿~从你的眼睛看见心心咯~♪」
		ENDSELECT
CASE "推倒"
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「这次就交给我吧！就这次！」
		CASE 1
			PRINTFORMW 「真是太磨蹭了~换到我的回合吧！」
		CASE 2
			PRINTFORMW 「就先这样了吧！现在轮到%CNAME("一人称")%了！」
		CASEELSE
			PRINTFORMW 「让%CNAME("一人称")%来，让%CNAME("一人称")%来！」
		ENDSELECT
CASE "強制終了"
	PRINTFORMW
CASE "復活"
	PRINTFORMW
CASE "恍惚から復帰"
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「哦，回过神了吗？那就在来一次吧♪」
		CASE 1
			PRINTFORMW 「哎呀呀～振作点～～♪」
		CASE 2
			PRINTFORMW 「%CNAME("一人称")%的魅力，真可怕！是吧～」
		CASEELSE
			PRINTFORMW 「那么，要怎么逃出去呢？」
		ENDSELECT
CASE "助手が限界"
			PRINTFORMW 「哎呀，%CNAME("二人称")%已经放弃了？」
ENDSELECT

RETURN 1

;-------------------------------------------------
;イベント口上集
;-------------------------------------------------
@KOJO_EVENT_K16, ARGS
SELECTCASE ARGS
;-------------------------------------------------
;調教終了不可能
;-------------------------------------------------
CASE "調教終了不可能"
	;恋慕
	IF TALENT:恋慕
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 「你看，不用害怕也可以啊~」
			CASE 1
				PRINTFORML 「下一场，我还是很期待哦！」
			CASE 2
				PRINTFORML 「就交给%CNAME("一人称")%吧！」
			CASEELSE
				PRINTFORML 「不会就这样结束吧，我知道的哦～♪」
			ENDSELECT
	;それ以外
	ELSE
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「喂，别逃了，别逃啊～♪」
		CASE 1
			PRINTFORMW 「你在说什么呢！现在才開始吧，才開始！！」
		CASE 2
			PRINTFORMW 「没関系没関系！我会好好干的！！」
		CASEELSE
			PRINTFORMW 「嘿嘿~嘿！不能从%NAME:TARGET%那里逃走哦~」
		ENDSELECT
	ENDIF
;-------------------------------------------------
;避孕套装着
;-------------------------------------------------
CASE "Ｖ避孕套装着"
	;挿入指令
	IF TRAIN_GENRE("挿入", SELECTCOM)
		;PLAYヤーは着ける気満々
		IF TEQUIP:PLAYER:避孕套
			SELECTCASE RAND:4
				CASE 0
					PRINTFORMW 「避孕套戴好了吗？嗯，那么来了！」
				CASE 1
					PRINTFORMW 「好像准备好了呢，来吧！」
				CASE 2
					PRINTFORMW 「不管多么堂堂正正地，戴着避孕套的地方老实说很难看呢~」
				CASEELSE
					PRINTFORMW 「快看，快点～～♪」
			ENDSELECT
		;避妊処置をしなくて良い事が角色に分かっている状態
		ELSEIF COND("避妊不要")

		;避孕套が無い
		ELSEIF ITEM:避孕套 == 0
			IF TALENT:相思相愛 || COND("合意：危険日生性交") || TCVAR:獎勵生H
				SELECTCASE RAND:4
					CASE 0
						PRINTFORMW 「就算避孕套破了了也没関系，上吧，做好觉悟吧！」
					CASE 1
						PRINTFORMW 「就算不用避孕套也能做哦！！呐」
					CASE 2
						PRINTFORMW 「什么嘛，中出也是没関系的哦！」
					CASEELSE
						PRINTFORMW 「哎呀呀，这里可是有个美少女在说“come，come”，别让我等太久哦」
				ENDSELECT
			ELSE
				PRINTFORMW 「哈？没有避孕套吗？」
				PRINTFORMW 「不行啊！为什么不买呢！明明都做到这一步了！」
				PRINTFORMW ……被骂了。
				TFLAG:指令中止 = 1
			ENDIF
		;安全日に生希望
		ELSEIF COND("安全日")

		;安全日じゃないけど生ＯＫ
		ELSEIF COND("女性主導生性交") || COND("合意：危険日生性交")

		;安全日じゃないけど避孕套没有を希望
		ELSE
			IF TALENT:相思相愛 || TCVAR:獎勵生H
				SELECTCASE RAND:4
					CASE 0
						PRINTFORMW 「哦！你想要一个小baby吗？还是说再最后一刻前拔出来？」
					CASE 1
						PRINTFORMW 「嗯~嗯，表情很不错呢！来吧！」
					CASE 2
						PRINTFORMW 「好吧好吧，这份心意我接受咯～♪」
					CASEELSE
						PRINTFORMW 「呵呵，现在已经不需要那个了呢～」
				ENDSELECT
			ELSE
				IF RAND:2
					PRINTFORMW 「快拿出来！」
				ELSE
					PRINTFORMW 「不行不行，就算是%CNAME("一人称")%也不会做到那种地步的」
					PRINTFORMW ……被骂了。
				ENDIF
				TFLAG:指令中止 = 1
			ENDIF
		ENDIF
	;PLAYヤーへの挿入指令
	ELSEIF TRAIN_GENRE("逆挿入", SELECTCOM)
		;PLAYヤーは着けてもらうの希望
		IF TEQUIP:避孕套
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「啊？啊啊……好的避孕套」
					CASE 1
						PRINTFORMW 「啊～…没什么関系吧～…噗噗」
					CASEELSE
						PRINTFORMW 「真是的，没办法啊……」
				ENDSELECT
		;避孕套が無い
		ELSEIF ITEM:避孕套 == 0

		;安全日に生希望
		ELSEIF COND("安全日", PLAYER)
				SELECTCASE RAND:3
					CASE 0
						PRINTFORMW 「嘿嘿~太好了~♪」
					CASE 1
						PRINTFORMW 「呵呵，是在等这一天吗？」
					CASEELSE
						PRINTFORMW 「对~对~，避孕套也不是免费的嘛♪」
				ENDSELECT
		;安全日じゃないけど避孕套没有を希望
		ELSE
			IF TALENT:相思相愛
				SELECTCASE RAND:4
					CASE 0
						PRINTFORMW 「想要%CNAME("一人称")%生孩子吗？想生吧～？」
					CASE 1
						PRINTFORMW 「啊～嗯~！什么嘛，你太会撒娇了～～」
					CASE 2
						PRINTFORMW 「好～好吧，生个健康的宝宝吧～♪」
					CASEELSE
						PRINTFORMW 「嗯，我一定要让你怀孕！」
				ENDSELECT
			ELSE
				IF TRUE_SEX(PLAYER) == "男性" && RAND:3 == 0
					PRINTFORMW 「嗯，%CNAME("二人称")%真的曾经是男人吗～？」
				ELSE
					SELECTCASE RAND:2
						CASE 0
							PRINTFORMW 「是你说的吧，我不知道哦～♪」
						CASE 1
							PRINTFORMW 「你很喜欢这样吧~这可是惩罚哦♪」
					ENDSELECT
				ENDIF
			ENDIF
		ENDIF
	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 "夜袭接吻"
	SELECTCASE RAND:3
		CASE 0
			PRINTFORML 「真是的…悠闲地呼呼大睡……」
			PRINTFORMW 「也要考虑一下我的心情啊……」
		CASE 1
			PRINTFORML 「咦……已经睡了吗？没办法啊」
			PRINTFORM 「……啾
			CALL HEARTMARK
			PRINTFORMW 」
		CASE 2
			PRINTFORMW 「嘿嘿~……喜欢~……嘿♪」
		CASEELSE
			PRINTFORML 「比做爱的时候更让人害羞啊……」
			PRINTFORMW 「……不要醒过来哦~绝对不要醒哦~？」
	ENDSELECT
;-------------------------------------------------
;添い寝
;-------------------------------------------------
CASE "添い寝"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	;それ以外
	ELSE

	ENDIF

;-------------------------------------------------
;清洁口交
;-------------------------------------------------
CASE "清洁口交"
	SELECTCASE TFLAG:口上分岐
	;お掃除前
	CASE 0
		PRINTFORMW
	;お掃除中
	CASE 1
		PRINTFORMW
	;お掃除で射精しなかった
	CASE 2
		PRINTFORMW
	;お掃除で射精しそう？
	CASE 3
		PRINTFORMW
	;射精した
	CASE 4
		PRINTFORMW
	;お掃除で射精後
	CASE 5
		PRINTFORMW
	ENDSELECT
;-------------------------------------------------
;脱衣
;-------------------------------------------------
CASE "自発脱ぎ"
	;裸体变成了
	IF CHECK_CLO("裸体")
		IF TALENT:恋慕
			SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 「稍等一下，现在就全部脱掉吧」
			CASE 1
				PRINTFORMW 「呼~，出汗了」
			CASE 2
				PRINTFORMW 「呵呵，感受到我身体散发出来的魅力了吗~♪」
			CASEELSE
				PRINTFORMW 「话说在这种情况下还能穿着衣服吗！真呆！」
			ENDSELECT
		ELSE
			SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 「好！我会认真上的！」
			CASE 1
				PRINTFORMW 「那么，我来了！」
			CASE 2
				PRINTFORMW 「呵呵，这样一来动作就轻松了～♪」
			CASEELSE
				PRINTFORMW 「那边！三振出局！」
			ENDSELECT
		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 「真是的，%CNAME("二人称")%没有中出哦～」
		ELSE
			PRINTFORMW 「真是的……这是怎么回事嘛！？」
		ENDIF
	ENDIF
;----------------------------------------------------------------
;恥ずかしいところを見せてくれない
;好感度が高いと起きないので、恋慕で分岐させる意味はない。
;また、不知羞恥ならば発生しない
;----------------------------------------------------------------
CASE "中出し後害羞"
	PRINTFORMW
;----------------------------------------------------------------
;精液を味わう
;----------------------------------------------------------------
CASE "中出し後精液掻き出し"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;気持ちよくてぐったり
;----------------------------------------------------------------
CASE "中出し後恍惚"
	;恋慕
	IF TALENT:恋慕
		PRINTFORM 「呃，呃~这个，可不太妙啊……
		CALL HEARTMARK
		PRINTFORM  太舒服了～……
		CALL HEARTMARK
		CALL HEARTMARK
		PRINTFORMW 」
	ELSE

	ENDIF
;-------------------------------------------------
;ビデオ保存
;-------------------------------------------------
CASE "ビデオ保存"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「哇~%CNAME("一人称")%们的历史上又多了一页♪」
	ELSE
		PRINTFORMW 「没関系，但是让别人看见了会很麻烦吧？」
	ENDIF
;-------------------------------------------------
;ビデオ売却
;-------------------------------------------------
CASE "ビデオ売却"
	;恋慕
	IF TALENT:恋慕
		PRINTFORML 「呼呼~卖出去也很好哦」
		PRINTFORMW 「这不是很好转一些小钱吗？」
	ELSE
		PRINTFORMW 「有人会买外行的录像带……这真是超喜欢这种东西啊」
	ENDIF
;-------------------------------------------------
;ビデオ売却失敗
;-------------------------------------------------
CASE "ビデオ売却失敗"
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW 「嗯，%CNAME("一人称")%们平时做的事情实际上相当狂热！？」
	ELSE
		PRINTFORML 「之前拍的视频被转载到了国外的色情网站」
		PRINTFORMW 「而且还得到了很厉害的评价呢～」
	ENDIF

;----------------------------------------------------------------
;塞子をしていない状態での液体浣腸口上
;----------------------------------------------------------------
CASE "无塞浣腸事件"
	;限界値突破時
	IF BASE:排泄欲 >= 10000
		;限界値を超えたが漏らせない場合
		IF INSERT("Ａ挿入") || COND("肛門栓")
			PRINTFORMW
		;漏らす直前
		ELSE
			PRINTFORMW
		ENDIF
	;漏らした
	ELSEIF NOWEX:排泄
		PRINTFORMW
	;我慢しているときの口上
	ELSEIF TEQUIP:浣腸
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;吸能
;----------------------------------------------------------------
CASE "吸能"
	;初めて
	IF FIRST_EV(ARGS) == 0
		PRINTFORMW
	ELSEIF TALENT:恋慕
		PRINTFORMW
	ELSE
		PRINTFORMW
	ENDIF
;----------------------------------------------------------------
;調教者がちんこを挿入する前に射精してしまった！
;----------------------------------------------------------------
CASE "挿入前暴発"
	;初めて
	IF FIRST_EV(ARGS) == 0
		PRINTFORML 「咦…？放进去之前就射出来了吗？说不定」
		PRINTFORMW 「……噗噗」
	ELSEIF TALENT:恋慕
		PRINTFORML 「噗噗…噗~哎呀，别那么沮丧啊～♪」
		PRINTFORMW 「跟%CNAME("一人称")%一起做忍不住 我知道我知道♪」
	ELSE
		PRINTFORML 「哇，又射出来了！」
		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_K16, ARGS
SELECTCASE ARGS
CASE "調教相手に選ばれた"

CASE "助手に抜擢"
	;初めて
	IF EXP:助手経験 == 0
		PRINTFORML 「诶~！%CNAME("一人称")%！？」
		PRINTFORMW 「嗯，虽然没做过，不过还是交给我吧！总会有办法的！」
	ELSE
		SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 「嘿嘿～～♪要小心啦♪」
			CASE 1
				PRINTFORMW 「好吧，我们这个无敌的组合是无敌的！！」
			CASE 2
				PRINTFORMW 「OK，完美地配合！自由地享受吧！」
			CASEELSE
				PRINTFORMW 「好吧，这个也好那样也好，总之吧那家伙弄得乱糟糟的吧！」
		ENDSELECT
	ENDIF

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

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

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

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

CASE "助手：撮影開始"
		SELECTCASE RAND:4
			CASE 0
				PRINTFORMW 「好，那就拍咯」
			CASE 1
				PRINTFORMW 「好，開始！」
			CASE 2
				PRINTFORMW 「嗯……？这个已经開始拍了吗？嗯，很好！」
			CASEELSE
				PRINTFORMW 「OK！開始！」
		ENDSELECT
CASE "助手：調教開始前の準備後台詞"

		SELECTCASE RAND:6
			CASE 0
				PRINTFORMW 「嗯，这里就这样……好的，OK！」
			CASE 1
				PRINTFORMW 「准备完毕！助手的工作我干的很好呢！」
			CASE 2
				PRINTFORMW 「好了，開始前先做好准备吧！」
			CASE 3
				PRINTFORMW 「喂！你小子在看哪边呢！」
			CASE 4
				PRINTFORMW 「准备工作交给我吧！这个东西，就这样…就是这样！」
			CASEELSE
				PRINTFORMW 「那是！開启開幕助手模式！！」
		ENDSELECT
CASE "室内調教：登場台詞"

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

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

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

CASE "助手で性処理"

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

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

ENDSELECT

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

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

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

;普通の、いわゆる角色エンド
SIF TALENT:相思相愛 && CFLAG:好感度 >= 3000
	;ENDの番号_END名 となっている
	;番号は1～60の範囲(でもできれば１から順に詰めて使用)の半角数字で、ＥＮＤ名は喜欢的东西に変更してください
	STR:エンディング += "1_杏珠　びー　あんびしゃす/"
;日常イベントっぽいエンド　杏珠を『攻略』しなくても日常でキャッキャ遊んでたら見られる
SIF DAY >= 150 && CFLAG:日常事件回数 >= 500
	STR:エンディング += "2_巡洋艦ゆめじ、フロンガ星雲に散る！！/"

;隠しエンド　１年目以降の春の部室のみで見れる　杏珠ほぼ関係ない
SIF DAY >= 100 && TEXTS("季節詳細") == "春" && TEXTS("現在位置") == "部室"
	STR:エンディング += "3_ゆめのまたゆめ/"

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

RETURN 1

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

;疲れてるだろうに近くでいきなり大声出されるサラリーマンかわいそうEND
CASE "杏珠　びー　あんびしゃす"
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW 「了不起……」
		PRINTFORMW 正在约会（一边和杏珠一起吃饭，一边嘟嘟囔囔刚才看的电影）
		PRINTFORMW 黄昏时分的归途上，杏珠小声嘀咕。
		PRINTFORML
		PRINTFORML
		PRINTFORMW 「哎呀哎呀，刚才擦肩而过的小学生，这个时间带着包出去大概是补习班之类的地方学习吧？」
		PRINTFORMW 「我们小时候班里不是也有这样的孩子吗?。这样…感觉每天都不怎么開心」
		PRINTFORML
		PRINTFORMW 「以前…一直到刚才为止，看到这种事情我会觉得"真傻啊!不開心的话就停下来玩不就好了!"」
		PRINTFORMW 「现在却是"不得了”这种想法！」
		PRINTFORML
		PRINTFORML 「怎么说呢，就算不開心有的事必须要做，所以忍耐一下吧！这样的心情吗…」
		PRINTFORML 「我觉得能说出"没办法才做啊"的人本质上是很了不起的！我现在才意识到，我完全说不出这种话！」
		PRINTFORMW 「到现在为止觉得"没什么不好的嘛"的事情，做了不是更好吗！」
		PRINTFORML
		PRINTFORML 「我不知道那个孩子是怎么想的，但是做的比我厉害多了！」
		PRINTFORML 「嗯，这么想的话，世界上伟大的人不是很多吗…？与之相比我……？」
		PRINTFORML
		PRINTFORMW 那样一来，杏珠深深地叹了一口气。
		PRINTFORMW 「真了不起啊……（哼）」
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW 「好伟大啊～～～！」
		PRINTFORML
		PRINTFORML
		PRINTFORMW 突然叫出声来，擦肩而过的工薪族用迷惑的目光看向我们。
		PRINTFORMW 如果放任不管的话，估计会再喊2 ~ 3次，于是我慌忙阻止了她，她一脸不满地瞪着我。
		PRINTFORML
		PRINTFORMW 「话说，你也是这样啊！？每天都过得太懒散了吧！？」
		PRINTFORMW 「大体上，毕业后你会怎么做？不会是想靠从弗理希艾尔那里拿零用钱过日子吧!?！？」
		PRINTFORML
		PRINTFORML
		PRINTFORMW 「你知道吧？我会变得了不起的，你也会变得了不起……嗯，是这样的！」
		PRINTFORMW 听起来似懂非懂，两个人就这样稀里糊涂地成长了。
		PRINTFORML
		PRINTFORMW 「好！！那么作为变得了不起的第一步跑回家吧！！」
		PRINTFORMW 「说实话我绝对不喜欢从这里跑回来，但是正因为讨厌所以才觉得做比较好！我上了！！」
		PRINTFORML
		PRINTFORML
		PRINTFORMW 说完，杏珠就跑了起来，%CALLNAME:MASTER%用眼睛追了一会儿
		PRINTFORMW 抱着"没办法啊"的心情同样跑了出去。
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW ──────────ＥＮＤ

;日常系ギャグもの特有の「え、これが最終回？」みたいな平常運転END
CASE "巡洋艦ゆめじ、フロンガ星雲に散る！！"
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML 本以为会永远持续的学园生活……
		PRINTFORMW 吵闹又甜美的每一天，有一天脆弱地崩溃了。
		PRINTFORML
		PRINTFORML 宇宙空间中突然出现了高维虫洞，未知的生命体来袭，
		PRINTFORMW 人类界、魔界、天上界，全部都被这来自其他宇宙的惊异所震惊。
		PRINTFORML
		PRINTFORML 有着未知兵器的外星人迫使地球陷入了苦战。战斗员的数量開始不足
		PRINTFORMW 不管怎么说，%CALLNAME:MASTER%被拉出来成为了宇宙舰队的舰长。
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW ————舰艇内充满了急促的警报声和红灯。
		PRINTFORML 「汪汪！！汪汪！」
		PRINTFORML 宇宙柴犬的彦八副舰长用狗语在说话。舰艇上的自动异种语言翻译装置好像因为刚才的攻击而瘫痪了。
		PRINTFORML
		PRINTFORML 地球军的反攻大作战被敌人识破了。
		PRINTFORML 在舰队的侧面遭受伏兵的同时炮击，旗舰被击沉了。
		PRINTFORMW 其他军舰也来不及调整姿势就成为了瞄准的目标。
		PRINTFORML 虽然现在的状况让他很想尖叫着逃走，但自己是舰长，不可能这么做。
		PRINTFORML 直到最后一刻都要为胜利而行动。
		PRINTFORMW %CALLNAME:MASTER%发出全体人员退舰命令后，把舰艇的操舵换到了舰长席。
		PRINTFORML
		PRINTFORML 这是将过热状态的军舰直接攻击敌方舰队的特攻作战。
		PRINTFORML 顺利的话，能量炉会在敌人眼前发生爆炸，说不定能带走不少敌人。
		PRINTFORMW 即使没有成功，敌人集中攻击这艘军舰的时候，我方也会有重整姿势的时间。
		PRINTFORML
		PRINTFORML
		PRINTFORMW 舰内的温度不断上升。
		PRINTFORMW 能源反应堆已经快要临界了，空调已经没有什么作用了。
		PRINTFORML
		PRINTFORMW 太热了，頭晕目眩。
		PRINTFORMW 但是必须驾驶军舰到最后。
		PRINTFORMW 地球人类的未来之光，无论多么渺小，也一定要继续点亮……
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW 嘎轰
		PRINTFORML 「呜～～呜～呜～呜～♪哇，好热！？
		PRINTFORMW 　诶…为什么这个笨蛋，把社团房间变成桑拿状态，然后握着刚做好的塑料棒倒下了！？」
		PRINTFORML
		PRINTFORML 「看到了煤油炉和坐在上面的水壶……
		PRINTFORML 　电水壶的主人等不及里面的热水出来，就点燃了火炉来烧水壶
		PRINTFORMW 　然后就这样睡着了吧……啊，水壶里的水也几乎蒸发了」
		PRINTFORML
		PRINTFORML 「而且一边说着奇怪的梦话一边呻吟……
		PRINTFORMW 　是在灼热地狱里熬晕了頭吗?算了，算了。不，别管我了。”
		PRINTFORML
		PRINTFORML
		PRINTFORML 関掉暖炉，冷风从打開的窗户吹进来。
		PRINTFORMW %CALLNAME:MASTER%继续做着极寒地狱的梦……。
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW ──────────ＥＮＤ
		PRINTFORML
		PRINTFORML 「啊？这就结束了？」
		PRINTFORMW 嗯。

;夢オチじゃなくてループ落ちなのに不評だったので文庫版ではこっそり弗理希艾尔の影が書き足されるEND
CASE "ゆめのまたゆめ"
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW ……一如往常的活动室，一如往常的放学后。。
		PRINTFORMW 春天还没到，天气却比任何时候都暖和。
		PRINTFORMW 在还没有人来的社团房间里，%CALLNAME:MASTER%在沙发上迷迷糊糊地睡着了。
		PRINTFORML
		PRINTFORMW 今年的春天比平时暖和，樱花也可能早点開。
		PRINTFORMW 再过一段时间，和部员们一起去赏花也许还不错。
		PRINTFORMW 一定需要事先占地方，所以有人——……
		PRINTFORML ……
		PRINTFORML …
		PRINTFORML
		PRINTFORML
		PRINTFORMW
		PRINTFORMW ｶﾞﾂｯ
		PRINTFORML
		PRINTFORML
		PRINTFORMW ……有人把沙发的脚踢飞了。
		PRINTFORML
					;CALL DIALOGUE_FRAME_NAME, ARG
		PRINTFORMW 「真是的！偶尔想邀请他出去玩，没想到竟然在这种地方呼呼大睡！」
		PRINTFORMW 杏珠。
		PRINTFORMW 「话说这里是什么地方啊？是教材保管室还是储物室……好脏啊。」
		PRINTFORMW 「听说放假的时候也有社团活动，我去找出来看了看，原来是名为活动室的秘密据点啊!」
		PRINTFORML
		PRINTFORML 不太明白杏珠说的话，环顾四周
		PRINTFORMW 就算被染污的帘子挡住，也看得见四处飘扬的尘土。
		PRINTFORMW 书架上保存完好的厚书，手指都要发痒了，地球仪、骨骼标本和动物标本被随意放着，都没有地方下脚了。
		PRINTFORML
		PRINTFORML
		PRINTFORMW 那是以前的活动室。
		PRINTFORMW 在与弗理希艾尔相遇之前。
		PRINTFORMW 一个人一直生活的，那个时候的。
		PRINTFORML
		PRINTFORML
		PRINTFORML 「但是这个绝对会被发现的哦~？到上周为止，没有一年级的学生参加部活」
		PRINTFORMW 「春假结束就到了二年级，新生进来的时候社员只有一个人，肯定不会被放过吧~快废部了♪」
		PRINTFORML
		PRINTFORML
		PRINTFORMW 这是怎么回事。
		PRINTFORMW ……是梦吗。
		PRINTFORMW 弗理希艾尔也好，那些日子也好。
		PRINTFORMW 全部都是一瞬间的梦中发生的事吗。
		PRINTFORML
		PRINTFORMW 「哎哟，杏珠拼命地在说话，却全部无视？真傻啊」
		PRINTFORML
		PRINTFORML
		PRINTFORMW 无视嘴里嘟嘟囔囔的杏珠，%CALLNAME:MASTER%从满是灰尘的书架中拿出一本书来。
		PRINTFORML
		PRINTFORML
		PRINTFORMW ——有了。
		PRINTFORMW 関于恶魔，还有写着古今召唤恶魔方法的可疑书籍
		PRINTFORMW 在《梦中》中偶然发现，从兴趣出发尝试的结果——
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW 那是完全的梦想呢，还是在不久的将来会发生的事情呢。
		PRINTFORMW 你下定决心翻開了书的封面……———
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORML
		PRINTFORMW ──────────ＥＮＤ....继续进行新游戏

ENDSELECT

path: ERB/EVENT_K/16 あんず/EVENT_K16_あんず.ERB


path: ERB/EVENT_K/16 あんず/UPDATE_K16.ERB

license: unknown


code:
	;杏珠イベント　何か騒動起こして三択で返す　三択の結果『你バカ度（ギャグ角色度）』が上下してエンディングを３つくらいに分岐させたい させたかった

	;杏珠イベントその１　将来についてちょっとだけ話す
	IF CFLAG:日常事件回数 >= 50 && COND("杏珠イベント１") == 0 && COND("工事中なので塞いでおく") == 1
		PRINTFORMW 「あ"っ！ そうだ、そう言えば やらなきゃいけないのがあったんだった！」
		PRINTFORML %CALLNAME%がいきなり大声を出したかと思えば鞄から印花を取り出し
		PRINTFORML 何やら難しい顔でうんうんと唸りだした。
		PRINTFORMW
		PRINTFORML 「あ、コレ？ ほら、進路書いて出せってさー」
		PRINTFORML 「来年のクラス分けとか学部の人数がどーのこーので早いとこ決めてほしいって言われたんだけど……」
		PRINTFORMW 「そんな来年のことなんて今決めれる訳ないじゃんねぇ～？」
		PRINTFORML
		PRINTFORML 「てゆーか%CNAME("二人称")%も書いた？ ね、ね、進路決まった？ どーすんの？」

		PRINTL [0] 進路は決めてある
		PRINTL [1] 今の段階で決めれる訳がない
		PRINTL [2] 無限の魂で無限に大金貰いながら豪遊して暮らす

		CALL INPUT_SELECT, 3

		SELECTCASE RESULT
			CASE 0
				PRINTFORML 「え、うわ マジで？ そーゆーのってもう考えとくものなの？」
				PRINTFORML 「げ～……んじゃ何かテキトーでもいいから考えて提出しとかなきゃマズいのかなぁ～」
				PRINTFORMW 「でもテキトーに考えたら考えたで『そんなの無理に決まってるだろ』とか言われるのよねー」
				PRINTFORMW 「大人は何もわかっちゃいない！ %CNAME("一人称")%がどれだけ考えてテキトーに答えだしたのかを！」
			CASE 1
				PRINTFORML 「だよねだよね～～♪」
				PRINTFORML 「今をおーかする事に精一杯の%CNAME("一人称")%達が来年の事なんて考えてるって方がおかしいのよ！」
				PRINTFORMW 「明日に出来ることを今日やらない！ うん、これ是いぞ！ %CNAME("一人称")%のモットーにしよう！」
			CASEELSE
				PRINTFORMW 「………ふぅ～～～…」
				PRINTFORML 「%CNAME("二人称")%もさぁ～ %CNAME("一人称")%が言うのも何だけど もう少し先を考えて生きた方がいいんじゃない？」
				PRINTFORML 「今どき中東の石油王だって石油が枯渇した時のこと考えて色々やってるっていうのにー」
				PRINTFORMW 「明日から『やっぱ魂お金に換金没有で』って言われたらどーすんのよ、ったく～…」
		ENDSELECT
			PRINTFORML ………
			PRINTFORML
			PRINTFORML 「う～～ん、まぁ、ともあれ今日是いや！ %CNAME("一人称")%の進路ったって思いつかないし」
			PRINTFORMW 「でも早めに提出しろって言われてるし、将来的には何かしら考えないとなー」
			PRINTFORML
			PRINTFORML
			PRINTFORMW ※%CALLNAME%が将来の事について多少考え始めました。
			PRINTFORMW 　今後の彼女への対応の仕方によって将来への影響が出てくるかもしれません。

			CALL SET_COND, "杏珠イベント１"
	;杏珠イベント之２　料理するのをみてどーたらこーたらいう
	;発生条件 部室のみ昼間のみにしたい
	ELSEIF CFLAG:日常事件回数 >= 140 && COND("杏珠イベント１") == 1 && COND("杏珠イベント２") == 0
		PRINTFORML 「あ、そうだそうだ忘れるところだった！」
		PRINTFORMW 「%CNAME("二人称")% 約束したこと忘れてないわよね！？ %CNAME("二人称")% の料理の腕前っつーのを見せてもらうかんね 今から！！」
		PRINTFORML
		PRINTFORML
		PRINTFORMW %CALLNAME:TARGET%がこのような事を突如として言い出したのには理由があった！
		PRINTFORML 今から数時間前、%CALLNAME:MASTER%が以前%CALLNAME:TARGET%の作った弁当の感想を聞かれ
		PRINTFORMW やれ「茶色のものばっかり」だとか「出来合いの冷凍食品の詰め合わせ」だとか「手 洗った？」だとか散々にこき下ろしたのだった。
		PRINTFORML
		PRINTFORML 親しき仲にも礼儀有、さすがの %CALLNAME:TARGET%もそうまで言われて黙っている筈もなく、
		PRINTFORMW 「そんなに言うなら%CNAME("二人称")%は さぞおじょーずな料理を作れるんでしょうね！？ 作って見せなさいよー！」
		PRINTFORMW と、いう運び变成了のである。
		PRINTFORML
		PRINTFORML 十数分後、%CALLNAME:TARGET%に連れられて来た%CALLNAME:MASTER%宅の廚房は二人の自尊心を賭けた、まさにバトルフィールドと化していた！！
		PRINTFORML
		PRINTFORMW
		PRINTFORMW 「……っつっても実際の所、%CNAME("二人称")%的家の食材勝手に使っちゃ怒られるだろうしなぁー…」
		PRINTFORMW 「とりあえず、あんまり怒られなそうな残り物の野菜でも使って 何か作ってよ。 野菜炒めとかでいいからー」
		PRINTFORML
		PRINTFORML
		PRINTFORML ﾄﾝﾄﾝﾄﾝ……ｼﾞｭｰｯ…
		PRINTFORML
		PRINTFORML
		PRINTFORML 「……有ゃ、何だ。 思ったより手際いいじゃん。 結構料理経験あるっぽい動きしてるー」
		PRINTFORMW

		PRINTL [0] 兒童の頃は親が家を空けがちだったから
		PRINTL [1] この程度は一般教養
		PRINTL [2] ちょっと褒められて有頂天になりながら芝麻油と液体洗剤を間違える

		CALL INPUT_SELECT, 3

		SELECTCASE RESULT
			CASE 0
				PRINTFORMW 「……はぇ～～…。 %CNAME("二人称")%的家も色々と大変だったんだー」
				PRINTFORMW 「ま、その結果こうして料理が出来るよう变成了んだから 結果オーライじゃん！」
				PRINTFORML 「うち的家も両親共働きだったけど、%CNAME("一人称")%達なんか」
				PRINTFORMW 「お腹すいたら冷蔵庫の大根とかコンニャクとか番茄酱つけて生のままかじってたし。 それに比べれば立派立派！」
				PRINTFORML
				PRINTFORMW 「んで…出来た？ どれ、味はー？」
				PRINTFORML
				PRINTFORML ﾓｸﾞﾓｸﾞ…
				PRINTFORML
				PRINTFORML 「嗯。酱と食べれる、生のところとか無いし。 小器用に擅長く作るもんだねぇー」
				PRINTFORML 「っていうか%CNAME("二人称")%コレだけ擅長く作れるんなら %CNAME("一人称")%の料理にどーこー言う事ないじゃん」
				PRINTFORMW 「あー…他の人の手料理を食べるってのがアレか、愛情をほっしてるワケか　なるほどなるほど！」
				PRINTFORML 「そう言う事なら%CNAME("一人称")%もやぶさかじゃない！ ちょっとだけ勉強して何か美味しい物作ったげよう！」
				PRINTFORMW 「えーと、まぁ いつとかじゃなくてそのうち！ いつかね！ いつか！」
				PRINTFORML
				PRINTFORMW
				PRINTFORML ……よく分からない流れで随意心打たれた%CALLNAME:TARGET%に
				PRINTFORML 料理を勉強するきっかけが出来ました。

			CASE 1
				PRINTFORMW 「うわー、出たよ出たよ『こんなの全然大したこと無いんだけど』アピール！！ 腹立つー！」
				PRINTFORML 「%CNAME("二人称")%ねー、今ほとんど料理素人の %CNAME("一人称")%の前だからそんな大口叩けるけど」
				PRINTFORMW 「こんなんネットに動画上げたらボロクソ叩かれるレベルの料理なんだからね！？ 謙虚になれ謙虚に！」
				PRINTFORML
				PRINTFORML
				PRINTFORMW 「んで…出来た？ どれ、味はー？」
				PRINTFORML
				PRINTFORML ﾓｸﾞﾓｸﾞ…
				PRINTFORML
				PRINTFORML 「んー…まぁ普通かなぁ　食べれない訳じゃないしお世辞でなら美味しいって言われるレベル」
				PRINTFORMW 「周日のお昼ごはんみたいな…　っていうか%CNAME("一人称")%の作るものと大差ないんじゃないコレ？」
				PRINTFORMW 「ったく！ この程度の料理の腕で人様の作ったものエラそーに文句つけてたわけー！？ 喝だ喝！！」
				PRINTFORML
				PRINTFORMW
				PRINTFORML ……その後もペ萝莉と%CALLNAME:MASTER%の作ったものを平らげた%CALLNAME:TARGET%に
				PRINTFORML 仕返しのようにずーーっと文句を言われました。

			CASEELSE
				PRINTFORMW 「ん…？ 今%CNAME("二人称")%鍋に何入れ…う”わっ！？」
				PRINTFORML
				PRINTFORML
				PRINTFORML ﾎﾟｺﾎﾟｺ……ﾎﾟｺﾎﾟｺ…
				PRINTFORML
				PRINTFORML
				PRINTFORMW 「わっ、わっ、鍋から泡が！ うわ、外国のお浴室みたい！ もしくは魔術で生まれたドロドロ人类が鍋から手を出してるみたい！」
				PRINTFORML 「ちょっと%CNAME("一人称")%！ なんつー間違いしてんのよ！？」
				PRINTFORMW 「つーか何で洗濯用洗剤がコンロの真横にあるのよ！ どうなってんだ %CNAME("一人称")%的家！？」
				PRINTFORML
				PRINTFORMW 「と、とりあえず何とかしてみよう！ 麺つゆ！ あとえーと、乾燥ワカメと、えーと、柠檬汁を少々…」
				PRINTFORML
				PRINTFORML
				PRINTFORMW 「う”ーわ、麺つゆで邪悪な色变成了物体から鍋から何かいい气味して来た！ 石鹸と蔷薇の香りって意味で」
				PRINTFORML 「ヤバい 収拾付かなくなってきた！ もう火だけ消して逃げちゃおう！ ホレ、早く！！」
				PRINTFORMW 「あ、ちょっと待って、最後に塩コショウ振っておこう　せめてものはなむけに」
				PRINTFORML
				PRINTFORML
				PRINTFORML
				PRINTFORMW
				PRINTFORML 「ふぃ～～… とりあえずココまで逃げてくりゃあとは知らんぶりできる！」
				PRINTFORMW 「あとは%CNAME("二人称")%的家のスゴイ女仆様がどうにか後始末してくれるでしょー♪」
				PRINTFORMW 「とにかく！ %CNAME("二人称")%は今後二度と料理しないこと！ あと%CNAME("一人称")%の作るものに文句言わないこと！！」
				PRINTFORML
				PRINTFORMW
				PRINTFORML ……斜め上を見ながら口笛を吹いて皆の所へ戻って来ました。
				PRINTFORML 調理場を玩耍場にしたことで後でこっぴどく怒られそうですが まぁ今日のところは何とかなるでしょう。

		ENDSELECT
				PRINTFORML
				PRINTFORMW
			CALL SET_COND, "杏珠イベント２"

	;杏珠イベントその３　テスト勉強する
	;発生条件 テスト期間中のみ 杏珠の学力が低い 昼間 部室 同空間に弗理希艾尔がいる イベント終了後に夜にしたい
	;0と1を選んだ場合学力をちょっとあげたい

	ELSEIF CFLAG:日常事件回数 >= 200 && COND("杏珠イベント１") == 1 && COND("杏珠イベント２") == 1 && COND("杏珠イベント３") == 0
		PRINTFORMW 「……唐突に思い出した！ そういやテスト主上ゃん もうすぐ！」
		PRINTFORML %CALLNAME:TARGET%がいきなり大声を出したてまくし立ててきた。
		PRINTFORMW
		PRINTFORML 「いやー…さすがの%CNAME("一人称")%も次赤点取ったら色々とヤバいぞって老师に言われてさー」
		PRINTFORMW 「とは言えテスト勉強するにしても一人じゃどうしようも無い訳じゃん、%CNAME("一人称")%！」
		PRINTFORML
		PRINTFORML 「なのでここは一つ、今から大家勉強会ってのはどう？ いいでしょ！ 真面目でしょ！」
		PRINTFORML
		PRINTFORMW ……と、押し切られる形で急遽、今いる部員たちで勉強会を開催すること变成了。
		PRINTFORMW 「よーし、勉強するぞー！ ５教科で合計８００点くらい取ってやるんだー！」
		PRINTFORML
		PRINTFORML
		PRINTFORMW １０分後。
		PRINTFORML
		PRINTFORML 「…………」（完全に飽きてぼんやり虚空を眺めてる）
		PRINTFORML
		PRINTFORMl 言い出しっぺが早くも脱落しかかかってるので%CALLNAME:MASTER%は叹气を付いて……
		PRINTFORMW
		PRINTL [0] まじめにやれとたしなめる
		PRINTL [1] 仕方ないので勉強を教えてやる
		PRINTL [2] 无聊そうなので『僕のかんがえたさいきょうの弗理希艾尔』を描いて丸めて手元に飛ばす

		SELECTCASE RESULT
			CASE 0

			CASE 1

			CASEELSE
			;吐いた血を掛け合いながら続ける不毛なマラソン
				PRINTFORMW 无聊してそうなので気晴らしに何か面白色絵を描いてこっそり投げてやる事にしよう。
				PRINTFORML
				PRINTFORML
				PRINTFORML
				PRINTFORML ウルトラダークネスデモリッシュ弗理希艾尔
				PRINTFORML
				PRINTFORML ぶき
				PRINTFORML デビルゴッドファイナルアークソード　　攻げき力9999
				PRINTFORML ハイ布グレートデスバーストビーム　　攻げき力99999
				PRINTFORML
				PRINTFORML
				PRINTFORML
				PRINTFORMW ……よし！ なかなかいい出来だ
				PRINTFORMW 武装が２つしか無いのが気になるが 剣とかビーム砲の絵を描いてたらスペースが無くなったので仕方ないだろう。
				PRINTFORML
				PRINTFORMW %CALLNAME:TARGET%に見せるために小さく丸めて指で弾いて近くに飛ばしてみよう。
				PRINTFORML
				PRINTFORMW 「……？」ｺﾞｿｺﾞｿ
				PRINTFORML 「…………」ｶｷｶｷ
				PRINTFORML ﾎﾟｲｯ
				PRINTFORML
				PRINTFORMW 丸まった紙が帰ってきた。
				PRINTFORMW %CALLNAME:MASTER%の描いた紙の後ろに何か９がいっぱいあるやつが書いてある
				PRINTFORML
				PRINTFORML
				PRINTFORML 超市テイスティングつよつよ弗理希艾尔
				PRINTFORML ぶき
				PRINTFORML 絶対よけれない即死ミサイル　　　　　　攻げき力99999999999999....
				PRINTFORML
				PRINTFORML
				PRINTFORML ……何という恥知らずだろうか！！
				PRINTFORML 明らかにこちらのウルトラダークネスデモリッシュ弗理希艾尔を見てから攻撃力を決めている！
				PRINTFORMW こちらが多少配慮してデビルゴッドファイナルアークソードの攻撃力を9999で止めておいたのに！
				PRINTFORML
				PRINTFORMW …むこうがその気ならこちらも対抗策を講じる必要がある。
				PRINTFORML
				PRINTFORML
				PRINTFORML
				PRINTFORML ウルトラダークネスデモリッシュ弗理希艾尔Mk-Ⅱ
				PRINTFORML 超超市アルティメット全属性無効化バリア装備（←絶対壊れない！！）
				PRINTFORML
				PRINTFORML ……ヨシ！
				PRINTFORML これならいくら攻撃力に９が並んでいても全部無効化出来る。
				PRINTFORMW %CALLNAME:TARGET%もこれでどうしようも無いだろう！
				PRINTFORML
				PRINTFORML ﾎﾟｲｯ
				PRINTFORML
				PRINTFORMW ……程なくして丸めて飛ばした紙がまた回来了。
				PRINTFORML
				PRINTFORML 超市テイスティングつよつよげろげろ弗理希艾尔
				PRINTFORMW 無効化バリア無効化兵器装備（←バリアの１００ばいこわれない）
				PRINTFORML
				PRINTFORML
				PRINTFORMW ～～～～～～ッッッ！！！
				PRINTFORML こんな暴挙が許されていいのだろうか！！？
				PRINTFORML 保持这个样子では永遠に後出しジャンケンで向こうの軍事力がこちらを上回ってしまう！
				PRINTFORML
				PRINTFORML この軍拡競争にもルールが必要だ、%CALLNAME:TARGET%の所へ行って何らかの条約を締結しなければ勝利など…
				PRINTFORML 「楽しそうですね、勉強会はもうお止め变成了んですか？」
				PRINTFORML
				PRINTFORML ……ﾋｴｯ

		ENDSELECT

			CALL SET_COND, "杏珠イベント３"

	;杏珠イベントその４　かしこい犬に負けるな
	ELSEIF CFLAG:日常事件回数 >= 20 && COND("杏珠イベント１") == 1 && COND("杏珠イベント２") == 1 && COND("杏珠イベント３") == 1 && COND("杏珠イベント４") == 0

		PRINTL [0] 仕方ないので勉強を教えてやる
		PRINTL [1] まじめにやれとたしなめる
		PRINTL [2] ノートの切れ端に『僕のかんがえたさいきょうの弗理希艾尔』を描いて丸めて手元に飛ばす

		SELECTCASE RESULT
			CASE 0

			CASE 1

			CASEELSE

		ENDSELECT

			CALL SET_COND, "杏珠イベント４"
	;杏珠イベントその５　うその怖い話をつくろう
	ELSEIF CFLAG:日常事件回数 >= 20 && COND("杏珠イベント１") == 1 && COND("杏珠イベント２") == 1 && COND("杏珠イベント３") == 1 && COND("杏珠イベント４") == 1 && COND("杏珠イベント５") == 0

		PRINTL [0] 仕方ないので勉強を教えてやる
		PRINTL [1] まじめにやれとたしなめる
		PRINTL [2] ノートの切れ端に『僕のかんがえたさいきょうの弗理希艾尔』を描いて丸めて手元に飛ばす

		SELECTCASE RESULT
			CASE 0

			CASE 1

			CASEELSE

		ENDSELECT

			CALL SET_COND, "杏珠イベント５"

path: ERB/EVENT_K/16 あんず/ボツ個別イベント.txt