repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【29】文/M_KOJO_K29_自慰系(あなた)コマンド.ERB

license: unknown


code:
※初めに、自己紹介のような何か※
どうも、初めましての方は初めまして、それ以外の方はご無沙汰しております。
ＴＷ霊夢口上の人です。
作者は本口上が二作目です、至らぬ点もありますでしょうがどうかよろしくお願いします。
不具合、問題点など那个ば、era板　避難所にあるeratoho総合スレまでどうぞ。

※本口上のコンセプト※
前述のeratoho総合スレより貴重なご意見をいただきまして、方針を決定いたしました。
思慕及び陥落素質無の場合、日常的に敬語を使用し、何気なく你を見下ろしている感じの文。
恋慕の場合、诶嘿嘿状態において敬語を崩し、女として話す文。
恋人の場合、上同。　好意を隠さないので超甜な文。
そんな感じで書いていきたいと思います。
ちなみにあまり角色が定まりません。单薄的本とか読んだりしたら印象が変わるんです。ごめんなさい。

※以下、角色崩壊の言い訳※
さて、プレイしてみて思う人もいるでしょう。
こんなの自分の思っているあややじゃねえ！　とか。
もっと上手い文かけねえのかゴルァ！　とか。
誠に申し訳ありません、作者は結構構文が読めない人です。
そしてそんな方は、ご自己口上製作に挑戦してみてください。我々は你方の参加をお待ちしております。
きっと、新たな世界が開けることでしょう。

※モチベ不足による記述指令減少の言い訳※
本口上は、霊夢口上と違って少し趣味に走るつもりです、すみません。
あと量より質をなるべく取る事にしたので、舞ナーな指令まで手が届かないかも。
ただ、自分のあまり書きたくない文を書いても上手い文が書けない、という結論に至った故の結果です。要するにモチベ不足です
何卒、ご了承願います。でももしかしたら気分で書くかも。

※参考口上・及び参考口上作者への礼物※
本口上は、霊夢口上同様、覚口上、小傘口上、其他各種口上を参考にさせていただいております。
口上作者様には、この場を持って礼物申し上げます。ありがとうございます。

※最後に※
それでは、姉妹口上である霊夢口上もよろしくお願いします。
本口上によって、你のプレイに花を添えられることを願って。
それでは、良い時止めライフを。

◎更新履歴◎
2015/05/23　初莉莉ス、イベント、刻印取得時の部分のみ記述。
2015/06/20　指令部分を肛門愛撫まで記述、イベントの一日遅れとして莉莉ス。遅れてごめんなさい。
2015/07/11　日常系指令まで記述完了、モチベ維持のためにも莉莉ス。やっぱり霊夢口上よりも各指令が少なくなるかも				まったりやって行きますので、これからも何卒よろしくお願いします。モチベをあげる方法随時募集中。
2015/07/28　愛撫系指令全般を記述、区切りが良さそうだったので莉莉ス。いろいろ手抜きだったりもする。　ごめんなさい				あと膣内射精やら調教後の口上やら絶頂口上とかもちょびっと記述。愉悦愉悦。
2015/08/19　イベントなので、区切りとして更新。なんか目新しい更新ができなくてすみません。口上の更新頻度ってこんな感じなん			ですかね？遅かったりしたら稍微更新頻度を早めようかと思います。
2015/10/19　イベントなので久々にUPロード。お久しぶりです。手淫・口交・正常位肛交などを記述、誤字などを修正。
			射精時の口上も追加。誰か……誰か私に、モ、モチベーションを……（懇願）
2016/01/24　最近ご無沙汰でしたが、【雙乳間抽插】のエラー箇所を修正しました。
			其他様々な場所の誤字修正や追記を行いました。修正が遅くなり、真に申し訳ありませんでした。
2016/01/27　スレで報告のあった不具合（【散步】と時間停止中の動作について）を修正。
			さらに、懐妊・出産口上を加筆しました。

path: ERB/口上・メッセージ関連/個人口上/【29】文/文々。readme.txt


code:
;-------------------------------------------------
; eraTheWorld 4.611用 留琴口上
;-------------------------------------------------
;他者による修正、加筆、改変については、同梱のライセンス条項に従ってください。

;**** FlagManagement **********************************************************
;本口上にて使用しているCFLAG・TCVAR等
;
;CFLAG:2:1001	真正風騷判定用。心だけでなく体もやりまくりの真正風騷なら１。初対面かUPDATEのとき選択する。
;CFLAG:2:1002	CFLAG:1001を選択済みかどうかのフラグ
;
;******************************************************************************
;******************************************************************************
;FIRSTTIME()によってCSTR:2:0に追加した独自の文字列
;
;"胖次没収"			EVENT_K2_9
;"MASTERを推倒た"	EVENT_K2_10
;
;******************************************************************************

;### 口上存在判定 ###################################
@M_KOJO_K2(ARG)
;別人版を作成する際はこの貂プレではなく別人版用口上貂プレをご利用ください

;口上存在判定です、けしてコメントアウトしないでください
;他の処理は一切行わないように
RETURN 1

;### 口上基本フラグ設定 #############################
@M_KOJO_FLAGSETTING_K2
;基本フラグ設定はここで行ってください
;共通の口上フラグは必要な箇所のコメントアウトを外してご利用ください
;口上専用フラグはご自由に
;Xには角色番号を入れてください

;眠姦口上有、時間停止口上有、扮演に1を入れると、それぞれ時間停止時、眠姦時、扮演時に指令口上が読み込まれるように
;入れないと時間停止時、眠姦時、扮演時は一切喋りません
;CFLAG:X:眠姦口上有 = 0
;CFLAG:X:時間停止口上有 = 0
;CFLAG:X:扮演口上有 = 0

;破瓜中止口上有に1を入れると、@M_KOJO_EVENT_KX_LOST_VIRGIN_STOPで中止の成否を操作できます
;CFLAG:X:破瓜中止口上有 = 0

;口上内抱き寄せ判定_初回と口上内抱き寄せ判定_通常に1を入れると、M_KOJO_EVENT_KX_PERMISSIONで推倒の成否を操作できます
;CFLAG:X:口上内抱き寄せ判定_初回 = 0
;CFLAG:X:口上内抱き寄せ判定_通常 = 0

;推倒禁止に1を入れると、主动推倒てこなくなります
;以下は恋慕か炮友がつくまで推倒てこなくなる使用例
;IF !TALENT:X:恋慕 && !TALENT:X:炮友
;	CFLAG:X:推倒禁止 = 1
;ELSE
;	CFLAG:X:推倒禁止 = 0
;ENDIF

;来訪不能に1を入れると、来訪してこなくなります
;以下は面識があるまで来訪してこなくなる使用例
;IF !CFLAG:X:面識
;	CFLAG:X:来訪不能 = 1
;ELSE
;	CFLAG:X:来訪不能 = 0
;ENDIF

;### 口上色判定 ###################################
@M_KOJO_COLOR_K2

SETCOLOR 0xA0FF00

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"UPDATE判定"
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_UPDATE_K2
;口上独自のUPDATE用
;ENCOUNTER専用に独自分岐フラグを仕込んだ場合等にどうぞ
;UPDATE判定でCFLAG等の角色変数を使用場合、角色番号の指定が必要になります

;留琴が風騷、留琴と面識がある、真正風騷か否か選択済みのフラグが立っていない
IF TALENT:2:風騷 && CFLAG:2:面識 && CFLAG:2:1002 == 0
	PRINTFORML 这个留琴是虽然心灵淫靡，但身体纯洁的类型吗？
	PRINTFORML 还是说，是身体经验丰富的真风骚吗？
	PRINTFORML （选哪个都不会对素质和经验等生产实际影响。只是单纯的趣味要素而已）
	PRINTFORML

	CALL ASK_YN("体はうぶなタイプ","ヤりまくりの真正風騷")
	IF RESULT == 0
		CFLAG:2:1001 = 0
		PRINTFORMW 我确信不是真正的风骚。
	ELSEIF RESULT == 1
		CFLAG:2:1001 = 1
		PRINTFORMW 我确信是真正的风骚。
	ENDIF

	;選択済みフラグを立てる
	CFLAG:2:1002 = 1
ENDIF

RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"ENCOUNTER"系イベント（エクストラ構文）
;※※※※※※※※※※※※※※※※※※※※※※※※※※
@M_KOJO_ENCOUNTER_K2
;初対面、挨拶のタイミング
;TALENTの変更はここでどうぞ。
;経験の変更は齟齬が出る場合がありますので、CSVを修正し同梱する事を推奨します

PRINTL
PRINTFORMDW 有个穿着洋装围裙的女仆样少女。
;霊夢か魅魔か千百合か夢美か魔理沙に扮演
IF GROUPMATCH(FLAG:扮演,1,4,8,9,11)
	PRINTFORMDW 由%CALLNAME:9%制作的人类女仆，%CALLNAME:TARGET%。
	PRINTFORMW 「啊，%CALLNAME:MASTER%大人♪」
	PRINTFORMDW 注意到了%CALLNAME:MASTER%的%CALLNAME:TARGET%用笑容打招呼了。
ELSE
	PRINTFORMW 「啊，初次见面」
	PRINTFORMDW 发现了%CALLNAME:MASTER%的少女点头行礼。
	PRINTFORMW 「我是博丽神社的女仆%CALLNAME:TARGET%。」
	;拠点が博麗神社
	IF GET_MAPNAME(MAIN_MAP) == "博麗神社"
		PRINTFORMW 「你是帮忙打扫房间的人吧。」
		IF ABL:清掃技能 >= 2
			PRINTFORMW 「请多关照。一起努力工作吧」
		ELSE
			PRINTFORMW 「不好意思，其实我不太擅长打扫卫生……」
			PRINTFORMW 「所以，帮了大忙。请多关照」
		ENDIF
	;拠点が博麗神社以外
	ELSE
		PRINTFORMDW 听说%CALLNAME:MASTER%最近来了这里，所以来打个招呼。
		PRINTFORMW 「来博丽神社参拜的客人很少……」
		PRINTFORMW 「所以，如果近期有空的话，一定要去看看哦」
	ENDIF
ENDIF
PRINTL

;風騷なら真正風騷か否か選択肢を出す
IF TALENT:風騷
	PRINTFORMDW 面对结束了寒暄的%CALLNAME:MASTER%，%CALLNAME:TARGET%用妖媚的眼神看着我。
	PRINTFORMDW 当%CALLNAME:MASTER%不知所措时，%CALLNAME:TARGET%更加……
	PRINTL
	PRINTFORMDL （选择了「放松胸部来展示自己」的时候，虽然心里是风骚，但是身体却是纯粹的类型）
	PRINTFORMDL （选择「拉着手把身体靠过来」的时候，身体的经验也会成为丰富的）
	PRINTFORMDL （无论选择哪个，对素质和经验都没有影响。仅是趣味元素）
	PRINTL
	LOCAL = GETCOLOR()
	SETCOLOR GETDEFCOLOR()
	CALL ASK_YN("胸元をゆるめてアピールしてきた","手をとって体を寄せてきた")
	SETCOLOR LOCAL
	IF RESULT == 0
		CFLAG:2:1001 = 0
		PRINTFORMDW 把胸膛敞開，向%CALLNAME:MASTER%引诱着。
		PRINTFORMDW 难道是相当的\@ TALENT:MASTER:性別 == 2 ?渴求男性 #欲求不満 \@吗？这种样子也许会立刻让我有反应。
	ELSEIF RESULT == 1
		CFLAG:2:1001 = 1
		PRINTFORMDW 牵起%CALLNAME:MASTER%的手靠近身体。
		IF GROUPMATCH(FLAG:扮演,1,4,8,9,11)
			CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%さまはあいかわらずお美的ですねHPH」","W"
			PRINTFORMW 「但是，我这份奖品几乎没有男人能抽到……您也是要忍耐下去吗？」
			CALL K2_HPH_PRINT,@"「我是机器人，不会生病……所以实际上很有人气的，在那种方面HPH」","W"
			CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%大人觉得怎么样？HPH」","W"
		ELSE
			PRINTFORMW 「其实，我是机器人。」
			CALL K2_HPH_PRINT,@"「所以……\@ !EXP:出産経験 && !CFLAG:妊娠自覚状態 ?不会怀孕，也不会生病 #不会生病，身体很好 \@…… 很受欢迎哦HPH」","W"
			CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%大人好像也不讨厌呢HPH」","W"
		ENDIF
		PRINTFORMDW %CALLNAME:TARGET%和外表相反，确实很风骚。
	ENDIF
	PRINTL
	;選択済みフラグを立てる
	CFLAG:2:1002 = 1
ENDIF

RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"SP_EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;约会帰りにファーストKISS（合意も付く）
;==================================================
@M_KOJO_SPEVENT_K2_1(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_1(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	PRINTFORML
	;接吻を中止したい場合は以下を開放
	;TCVAR:中止接吻 = 1
ENDIF
RETURN 1

;==================================================
;约会帰りに告白（恋人が付く）
;==================================================
@M_KOJO_SPEVENT_K2_2(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_2(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;告白内容
	;この告白内容表示後に接受かどうかの選択分が表示されます
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白オッケー（恋人が付く）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;告白失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF

ENDIF
RETURN 1

;==================================================
;约会帰り
;==================================================
@M_KOJO_SPEVENT_K2_3(ARG,ARG:1)
;口上主はTARGET
;地の文表示
CALL SPEVENT_MESSAGE_3(ARG,ARG:1)
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印消去イベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印2>1レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;反発刻印3>2レベルダウンイベント
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	PRINTFORML
ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※※
;"EVENT"系イベント
;※※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;部屋で遭遇
;==================================================
@M_KOJO_EVENT_K2_1(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;MASTERが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORMW 「啊，%CALLNAME:MASTER%大人。有什么事吗？」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて一緒に入る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて出て行った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが風呂に入ってきて追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;外出先で遭遇した
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;他角色と约会中に遭遇した
	;ARG:1に约会的对象
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;朝起きたとき（おはよう口上）
;==================================================
@M_KOJO_EVENT_K2_2(ARG,ARG:1)
CALL MESSAGE_GOODMONING(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;非同棲かつ相手が先に起きてる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;TARGET私室にMASTERが入っている（恋慕時陪睡中就寝時のみ？
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTER私室にTARGETが入ってきてる(恋慕無しでも入ってくる可能性有り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF K2_CONSCIOUS_AND_TOLERANT()
				IF TALENT:恋慕 || TALENT:恋人
					CALL K2_HPH_PRINT,@"「早上好♪ 哎嘿嘿、我来打扫房间了HPH」","W"
				ELSE
					PRINTFORMW 「早上好。要打扫房间了」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が起きている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORM 「早上好♪
			SELECTCASE RAND:3
			CASE 1
				PRINTFORML 现在为您准备饮料」
			CASE 2
				PRINTFORML 今天的饭菜在这儿吃怎么样？」
			CASEELSE
				PRINTFORML 啊，想睡了。为你整理一下吧」
			ENDSELECT
			PRINTFORMDW %CALLNAME:TARGET%贴心地照顾%CALLNAME:MASTER%。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同棲かつ相手が寝ている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERが起きていて、相手が起きてきた
	;添い寝時TARGET起床はこちら（TARGET衰弱or陪睡中TARGET睡魔負け後そのままMASTERが起き続けた上で相手が起床した場合限定
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;-------------------------------------------------
		;非同棲
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			PRINTFORMW
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;同棲中
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORMW
			RETURN 1
		ENDIF
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;夜寝るとき（おやすみ口上）
;==================================================
@M_KOJO_EVENT_K2_3(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;自室に返回（定時になって寝る）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORMW 「哇……实在对不起，我应该告辞了」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;眠そうにしている
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;睡眠中（起きていないので会話というよりは寝言？）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;恶作剧中
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 4
		;PRINTFORMW
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;衰弱中（恋慕付き拠点内角色がMAIN_MAPで衰弱状態になった場合か、待客室で相手が衰弱した場合に発生
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;MASTERがダウン（部屋まで運ばれる）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;TARGETが自室まで回来了
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;-------------------------------------------------
		;そのまま着替えて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 0
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部屋から追い出された
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;他角色とのＨを止めさせて寝た
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;非在住TARGETがMAIN_MAPで休憩
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		PRINTFORMW
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;前のターンから一緒的房間にいる状態で相手が寝る（待客室含む（
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;移動時すれちがい
;==================================================
@M_KOJO_EVENT_K2_4(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;立ち止まった
	;この後遭遇口上に接続
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;轻轻地会釈して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORMW 「当心哦~」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無視して街道過ぎた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORMDW %CALLNAME:TARGET%点头行礼。
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;他者介入で情緒変化
;==================================================
@M_KOJO_EVENT_K2_5(ARG,ARG:1)
;口上主はTARGET
;ARGに入ってきた角色（人数が膨大なので、自己把握自己責任で
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;霊夢が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;留琴が入ってきた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他（角色指定無
	IF K2_CONSCIOUS_AND_TOLERANT()
		IF !CFLAG:诶嘿嘿
			IF TALENT:恋慕 || TALENT:愛欲
				PRINTFORMW 「啊，有人来了。」
			ENDIF
		ELSE
			IF TALENT:恋慕 || TALENT:愛欲
				CALL K2_HPH_PRINT,@"「啊，有人来了HPH」","W"
			ELSE
				PRINTFORMW 「啊呀，好像有人要来了，怎么办呢？」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;情事を目撃した
;==================================================
@M_KOJO_EVENT_K2_6(ARG,ARG:1)
;口上主はTARGET
;ARGに情事相手
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を目撃した（亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;負けじと参加（亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		IF TALENT:恋人
			PRINTFORML 「啊，%CALLNAME:MASTER%大人。为什么要把我当作外人？」
			PRINTFORMDL 目击了%CALLNAME:ARG%和%CALLNAME:MASTER%的情事的%CALLNAME:TARGET%，嫉妒了的样子慢慢接近。
			PRINTFORML 「啊，%CALLNAME:MASTER%大人老是出轨……」
			CALL K2_HPH_PRINT,@"「果然，我还是得负起责任来为您榨出呢HPH」","W"
		ELSEIF TALENT:恋慕 || TALENT:愛欲
			PRINTFORMDL 目击了%CALLNAME:ARG%和%CALLNAME:MASTER%的情事的%CALLNAME:TARGET%，浮起了可怕的微笑。
			;主人に恋人がいない
			SIF !TALENT:MASTER:恋人
				PRINTFORML 「啊，%CALLNAME:MASTER%大人。好像只有我一个人无法满足呢」
			CALL K2_HPH_PRINT,@"「这么有活力的话，您也要连同我一起爱吧？HPH」","W"
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;気まずそうに立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF GET_MAPNAME(GET_MAPID(CFLAG:MASTER:現在位置)) == "博麗神社"
			PRINTFORMW 「啊，那个，我想打扫一下……对不起，以后我会注意的」
		ELSE
			PRINTFORMW 「啊，那么，失礼了。」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;情事を見られた
;==================================================
@M_KOJO_EVENT_K2_7(ARG,ARG:1)
;口上主はTARGET
;ARGに目撃者
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;情事を見られた（目撃者の亲热度:低）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		IF K2_CONSCIOUS_AND_TOLERANT()
			;拠点が博麗神社
			IF GET_MAPNAME(MAIN_MAP) == "博麗神社"
				IF TALENT:恋慕 || TALENT:愛欲
					CALL K2_HPH_PRINT,@"「不工作而在这偷懒、果然被人看见了HPH」","L"
					PRINTFORM 「但是，还不能结束吧？
					;目撃者が霊夢
					IF ARG == 1
						CALL K2_HPH_PRINT,@"也许会被挨灵梦大人的骂，但是没关系HPH」","W"
					ELSE
						PRINTFORMW 」
					ENDIF
				ELSE
					PRINTFORMW 「怎、怎么办呢。现在偷懒不工作，却做这种事……」
				ENDIF
			ELSE
				IF TALENT:恋慕 || TALENT:愛欲
					PRINTFORML 「吓了一跳。怎么办？已经放弃了吗？
					PRINTFORMDL %CALLNAME:MASTER%无言地再次抱住了%CALLNAME:TARGET%。
					CALL K2_HPH_PRINT,@"「あっHPH ……我明白了HPH」","W"
				ELSE
					PRINTFORMW 「吓，吓了我一跳。」
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が負けじと参加（目撃者の亲热度:高）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目撃者が立ち去る
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		IF K2_CONSCIOUS_AND_TOLERANT()
			;拠点が博麗神社
			IF GET_MAPNAME(MAIN_MAP) == "博麗神社"
				IF TALENT:恋慕 || TALENT:愛欲
					CALL K2_HPH_PRINT,@"「不工作而在这偷懒、果然被人看见了HPH」","L"
					PRINTFORM 「但是，还不能结束吧？
					;目撃者が霊夢
					IF ARG == 1
						CALL K2_HPH_PRINT,@"也许会被挨灵梦大人的骂，但是没关系HPH」","W"
					ELSE
						PRINTFORMW 」
					ENDIF
				ELSE
					PRINTFORMW 「怎、怎么办呢。现在偷懒不工作，却做这种事……」
				ENDIF
			ELSE
				IF TALENT:恋慕 || TALENT:愛欲
					PRINTFORML 「吓了一跳。怎么办？已经放弃了吗？
					PRINTFORMDL %CALLNAME:MASTER%无言地再次抱住了%CALLNAME:TARGET%。
					CALL K2_HPH_PRINT,@"「あっHPH ……我明白了HPH」","W"
				ELSE
					PRINTFORMW 「吓，吓了我一跳。」
				ENDIF
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;目撃した情事を問い詰める（現在無し
;==================================================
@M_KOJO_EVENT_K2_8(ARG,ARG:1)
RETURN 1

;==================================================
;胖次没収された
;==================================================
@M_KOJO_EVENT_K2_9(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME("胖次没収",0,2)
		PRINTFORMW 「哎呀，有什么东西露出来了。」
		PRINTFORMW 「这、这是……」
		PRINTFORM 「原来如此……」
		;拠点が博麗神社
		IF GET_MAPNAME(MAIN_MAP) == "博麗神社"
			PRINTFORM 总是在忙碌地给我们打扫
		;拠点が博麗神社以外
		ELSE
			PRINTFORM 打扫得很干净
		ENDIF
		PRINTFORMW 「就是这样……」
		PRINTFORMDW 被%CALLNAME:TARGET%瞪了一眼。
		RETURN 1
	ENDIF
	;二回目以降
	PRINTFORML 「又在打扫的时候偷东西了吗……」
	;拠点が博麗神社
	IF GET_MAPNAME(MAIN_MAP) == "博麗神社"
		PRINTFORML 「哈……要是我能一个人好好打扫的话……」
		PRINTFORMDW %CALLNAME:TARGET%感觉自己对这件事负有责任。
	ELSE
		PRINTFORMDW %CALLNAME:TARGET%叹了口气。
	ENDIF
ENDIF
RETURN 1

;==================================================
;推倒た
;==================================================
@M_KOJO_EVENT_K2_10(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;诶嘿嘿==2（開始時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		;-------------------------------------------------
		;MASTERを推倒た（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF K2_CONSCIOUS_AND_TOLERANT() && !TALENT:無知
				;初めて
				IF FIRSTTIME("MASTERを推倒た",0,2)
					;诶嘿嘿既成事實無
					IF ( CFLAG:既成事實 & 2 ) == 0
						;処女ビッチ
						IF TALENT:風騷 && !CFLAG:1001 && ( TALENT:処女 == 1 || TALENT:処女 == -1 )
							CALL K2_HPH_PRINT,@"「我再也不能忍受了HPH 要袭击了哦HPH」","W"
							PRINTFORMDW %CALLNAME:TARGET%这样说着，突然推倒了%CALLNAME:MASTER%。
							;兩面通吃でも討厭男人でもなく、かつ主人が男
							IF TALENT:性別嗜好 != -1 && TALENT:性別嗜好 != 1 && TALENT:MASTER:性別 == 2
								PRINTFORMW 「我一直那种事情很感兴趣，但是博丽神社里尽是女人……」
								CALL K2_HPH_PRINT,@"「所以、自从%CALLNAME:MASTER%大人\@ GET_MAPNAME(MAIN_MAP) == "博麗神社" ?来了 #与我相遇 \@之后、我就想象着会遭遇这样的袭击。HPH」","W"
							ELSE
								PRINTFORMW 「我一直那种事情很感兴趣，但至今为止都没有那种缘分……」
								CALL K2_HPH_PRINT,@"「但是，%CALLNAME:MASTER%大人总给我一种很奇怪的感觉……已经受不了了HPH」","W"
							ENDIF
						;真正風騷
						ELSEIF CFLAG:1001
							CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%大人真讨厌HPH 现在的气氛好奇怪HPH」","W"
							CALL K2_HPH_PRINT,@"「像我这样习惯于张開双脚的女人，真想把你榨干HPH」","W"
						;其他
						ELSE
							PRINTFORMW 「你或许觉得我是个不成熟的女人吧……」
							PRINTFORMW 「但我无论如何都无法忍受。请原谅我」
							PRINTFORMDW %CALLNAME:TARGET%一这么说就向%CALLNAME:MASTER%扑了上来。
						ENDIF
					;诶嘿嘿既成事實あり
					ELSE
						;風騷
						IF TALENT:風騷
							CALL K2_HPH_PRINT,@"「哎嘿嘿HPH 也不知道为什么、今天由我来主动吧HPH」","W"
						;非風騷
						ELSE
							PRINTFORMW 「因为%CALLNAME:MASTER%大人……我……我变成了可恶的女人」
						ENDIF
					ENDIF
					RETURN 1
				ENDIF
				;二回目以降
				IF TALENT:恋人 || TALENT:恋慕
					CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%大人HPH」","L"
					SIF !K2_EXCESSIVE_STATURE_GAP()
						PRINTFORMDL 抓住%CALLNAME:TARGET%的手腕把身体靠近了。
					IF !FLAG:甲斐性無 && RAND:2
						CALL K2_HPH_PRINT,@"「今天就交给我吧HPH」","W"
					ELSE
						CALL K2_HPH_PRINT,@"「哎嘿嘿HPH 我也很想要HPH」","W"
					ENDIF
				ELSEIF TALENT:風騷 || TALENT:愛欲
					CALL K2_HPH_PRINT,@"「又来了吗？HPH 希望能让%CALLNAME:MASTER%舒服起来HPH」","W"
				ELSE
					PRINTFORMW 「对不起……另外……我忍不住了」
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;MASTERに抱きついた（開始時）
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF

		RETURN 1
	ENDIF
	;-------------------------------------------------
	;なだめられた（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		;-------------------------------------------------
		;抜け出した
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && !ARG:1
			IF K2_CONSCIOUS_AND_TOLERANT() && !TALENT:無知
				IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲 || TALENT:風騷
					PRINTFORML 「咦 已经结束了吗？」
					IF CFLAG:积攒度 >= 300
						CALL K2_HPH_PRINT,@"「う～HPH 我还想继续…HPH」","L"
						PRINTFORMDW %CALLNAME:TARGET%依然大喘着气湿润着眼睛看着你。
					ELSE
						CALL K2_HPH_PRINT,@"「…满足了。下次再多做一点吧HPH」","W"
					ENDIF
				ELSEIF TALENT:炮友
					PRINTFORML 「啊…已经……结束了吗…？」
					SIF CFLAG:积攒度 >= 300
						PRINTFORMDL %CALLNAME:TARGET%好像并不满足的样子。
					WAIT
				ELSE
					PRINTFORML 「啊…您很讨厌这样吧……对不起……」
					SIF CFLAG:积攒度 >= 300
						PRINTFORMDL %CALLNAME:TARGET%虽然低下了头，但坏心情还没有平息的样子，还很起劲。
					WAIT
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード満足終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;抱き着きモード強制終了
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
	ENDIF
	;-------------------------------------------------
	;摆脱失敗
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;随便状態から抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;欲求不満が高くて抜け出せなかった
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF

		IF K2_CONSCIOUS_AND_TOLERANT() && !TALENT:無知
			IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲 || TALENT:風騷
				SELECTCASE RAND:2
				CASE 1
					CALL K2_HPH_PRINT,@"「呀HPH 不许逃HPH 还远远不够哦HPH」","W"
				CASEELSE
					CALL K2_HPH_PRINT,@"「别离開我HPH 请再多爱我一点HPH」","W"
				ENDSELECT
			ELSE
				PRINTFORML 「…对不起……我还想要……」
				PRINTFORMDW %CALLNAME:TARGET%紧紧地抱住不放手。
			ENDIF
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;浴場で遭遇
;==================================================
@M_KOJO_EVENT_K2_11(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出された
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:愛欲
			PRINTFORMW 「诶呀、我很害羞、快出去吧」
		ELSE
			PRINTFORMW 「啊呀！快，快出去！」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;目が合った（追い出されない）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORMW 「啊，是%CALLNAME:MASTER%大人。一起怎么样？洗澡水烧得正好」
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;寝床に忍び込み
;==================================================
@M_KOJO_EVENT_K2_12(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;追い出される（憤怒）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;寝床に侵入（相手が恋慕・衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;追い出される（衰弱）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG:1 == 5
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;お仕事中
;==================================================
@M_KOJO_EVENT_K2_13(ARG,ARG:1)
;口上主はTARGET
;ARG:1に残っている工作量
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;工作開始（職場へ移動する）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORMW 「非常抱歉。我有工作要做，失礼了」
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;業務中
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;工作結束
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;吃飯系
;==================================================
@M_KOJO_EVENT_K2_14(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;持っていた食物を食べられた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == -1
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1

;==================================================
;MASTERが推倒た
;==================================================
@M_KOJO_EVENT_K2_15(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;未実装（推倒指令に統合？
	;MASTERが推倒た（ウフフ開始時）
	;記入チェック（=0, 非表示、1, 表示）
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;逢瀬終了（ウフフ終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 2
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;事後描写
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		;-------------------------------------------------
		;精液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			IF ( TALENT:恋慕 || TALENT:愛欲 ) && !TALENT:無知
				CALL K2_HPH_PRINT,@"啊HPH 您的精液"
				SIF SOAKED_OR_NOT("V_SEMINAL")
					PRINTFORM 她的那里
				SIF SOAKED_OR_NOT("A_SEMINAL")
					PRINTFORM \@ SOAKED_OR_NOT("V_SEMINAL") ?と # \@お菊门
				CALL K2_HPH_PRINT,@"「流出来了HPH」","L"
			ELSE
				PRINTFORML 「啊……流出来了……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;愛液が垂れてきた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			IF ( TALENT:恋慕 || TALENT:愛欲 ) && !TALENT:無知
				CALL K2_HPH_PRINT,@"「あんHPH 两腿间又湿又粘HPH」","L"
			ELSE
				PRINTFORML 「嗯……已经湿透了……」
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;事後の情緒
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;服を着る
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 1
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			IF TALENT:恋慕 || TALENT:恋人 || ( ABL:奉仕精神 >= 5 && ( TALENT:愛欲 || TALENT:思慕 || TALENT:炮友 ) )
				PRINTFORMDL %CALLNAME:MASTER%整理服装时，%CALLNAME:TARGET%帮忙了。
				PRINTFORML 「啊、这次好快……就这样吧♪」
			ELSE
				PRINTFORMDL %CALLNAME:MASTER%擦了擦汗，整理了服装。
			ENDIF
			PRINTW
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;陪睡
;==================================================
@M_KOJO_EVENT_K2_16(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;添い寝を始めた（開始時）(存在せず
	;記入チェック
	;LOCAL:1 = 0
	;-------------------------------------------------
	;IF LOCAL:1 && ARG == 1
		;PRINTFORML
		;RETURN 1
	;ENDIF
	;-------------------------------------------------
	;添い寝を終了した（終了時）
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;時止め終了時
;==================================================
@M_KOJO_EVENT_K2_17(ARG,ARG:1)
;口上主はTARGET
;排他と明記されていないモノは状況によっては連続で表示されるので注意
;ARGに射精状況
;ARG:1に射精状態
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------

IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;ARG=1～3は排他
	;謎の快感
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;絶頂
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;胖次紛失
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚口内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		;精液中毒低精飲
		IF ARG:1 == 1
		;精液中毒低吐き出し
		ELSEIF ARG:1 == 2
		;精液中毒低手で覆う
		ELSEIF ARG:1 == 3
		;精液中毒高精飲
		ELSEIF ARG:1 == 4
		;濃厚精液＆精液中毒低吐き出し
		ELSEIF ARG:1 == 5
		;濃厚精液＆精液中毒高精飲
		ELSEIF ARG:1 == 6
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚顔面射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;幼稚持ち＆精液経験100未満
		IF ARG:1 == 1
		;通常ぬぐい取り
		ELSEIF ARG:1 == 2
		;顔射精液舐めとり
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚手淫射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;ぬぐい取り
		IF ARG:1 == 1
		;舐めとり
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚肛門射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		;Ａ感覚2以下
		IF ARG:1 == 1
		;ソレ以外
		ELSEIF ARG:1 == 2
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚処女喪失】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 8
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;【無自覚膣内射精】
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 9
		;非処女膣内射精口服避孕薬無
		IF ARG:1 == 1
		;非処女膣内射精口服避孕薬あり
		ELSEIF ARG:1 == 2
		;処女膣内射精
		ELSEIF ARG:1 == 3
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;時間停止解除共通
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 0
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;ナマでやらせろ時
;==================================================
@M_KOJO_EVENT_K2_18(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;避妊要求台詞
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断った
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;断ったのに粘られて切れた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日以外許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;危険日許可
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;神社暮らしを承認して貰う
;==================================================
@M_KOJO_EVENT_K2_19(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;認められる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;認められない
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;帰宅時
;==================================================
@M_KOJO_EVENT_K2_20(ARG,ARG:1)
;口上主はLOCALS or RESULT
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;通常帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;约会中帰宅
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;玄関先でお見送り
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;陥落素質取得時
;==================================================
@M_KOJO_EVENT_K2_21(ARG,ARG:1)
;口上主はARG
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛欲取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;愛人取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;炮友取得
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;調教終了時に自慰
;==================================================
@M_KOJO_EVENT_K2_22(ARG,ARG:1)
;口上主はARG
;ARG:0に自慰状況
;ARG:1に自慰種類
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;通常自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;同室時自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;中だし精液自慰
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無知持ち（自慰経験(調教自慰経験は差し引き)による分岐あり
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		LOCAL:2 = EXP:自慰経験 - EXP:調教自慰経験
		;無知消去イベントあり（表示は一度だけ
		IF LOCAL:1 >= 25
		;地の文分岐。書きたい場合は[SKIPSTART][SKIPEND]を削除してください
		[SKIPSTART]
		ELSEIF LOCAL:1 >= 20
		ELSEIF LOCAL:1 >= 15
		ELSEIF LOCAL:1 >= 10
		ELSEIF LOCAL:1 >= 5
		[SKIPEND]
		ELSE
		ENDIF
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質あり自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 5
		;-------------------------------------------------
		;Ｃ敏感orＣ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｖ敏感orＶ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ａ敏感orＡ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 3
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;Ｂ敏感orＢ感覚10以上
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 4
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;部位指定無し
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 5
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで陥落素質あり自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;自慰中毒高め
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 6
		;-------------------------------------------------
		;尻穴膣腔同時
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 1
			PRINTFORML
			RETURN 1
		ENDIF
		;-------------------------------------------------
		;膣腔のみ
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1 && ARG:1 == 2
			PRINTFORML
			RETURN 1
		ENDIF
		;其他
		;上の分岐を一切書かずに、ここに書くことで自慰中毒高め自慰の共通口上を表示することが出来ます
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;我慢
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 7
		PRINTFORML
		RETURN 1
	ENDIF
	;其他
	;上の分岐を一切書かずに、ここに書くことで自慰の共通口上を表示することが出来ます
	PRINTFORML
	RETURN 1
ENDIF
RETURN 1
;==================================================
;浴場連れだし
;==================================================
@M_KOJO_EVENT_K2_23(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;断られた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;一緒に入ってくれた
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF K2_CONSCIOUS_AND_TOLERANT()
			PRINTFORMW 「啊，在浴室吗？那么让我帮您擦一下后背吧」
		ENDIF
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;懐妊
;==================================================
@M_KOJO_EVENT_K2_24(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;出産
;==================================================
@M_KOJO_EVENT_K2_25(ARG,ARG:1)
;口上主はLOCAL
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;恋慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;思慕
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;陥落素質無し
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;無自覚
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		RETURN 1
	ENDIF
	;其他
	PRINTFORML
ENDIF
RETURN 1
;==================================================
;オナバレ
;==================================================
@M_KOJO_EVENT_K2_26(ARG,ARG:1)

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;見られた瞬間
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;什麼也不做
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;そのまま続行
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;逐出
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;やっちゃう
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;事後
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 6
		;事後お泊り
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
	ENDSELECT
ENDIF

;==================================================
;相手から约会のお誘い
;==================================================
@M_KOJO_EVENT_K2_27(ARG,ARG:1)
;口上主はLOCAL
;ARG:1は目的地
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;誘い文句
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;部屋に誘われた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 4
		;部屋に誘われたのを受けた
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 5
		;部屋に誘われたのを断った
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			RETURN 1
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;脱衣口上
;==================================================
@M_KOJO_EVENT_K2_28(ARG,ARG:1)
;口上主はTARGET
;ARGに脱がし方選択
;ARG:1（ARG=3の場合のみあり）地の文の反応
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	SELECTCASE ARG
		;-------------------------------------------------
		CASE 0
		;全裸にする
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 1
		;变成只穿内衣的样子
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 2
		;半脱
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			;時間停止時
			IF FLAG:70
			;通常
			ELSE
			ENDIF
			RETURN 1
		ENDIF
		;-------------------------------------------------
		CASE 3
		;胖次ちょうだい
		;記入チェック（=0, 非表示、1, 表示）
		LOCAL:1 = 0
		;-------------------------------------------------
		IF LOCAL:1
			SELECTCASE ARG:1
				;-------------------------------------------------
				CASE 0
				;交換です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 1
				;OK（嬉々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 2
				;OK（渋々
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				;-------------------------------------------------
				CASE 3
				;嫌です
				;記入チェック（=0, 非表示、1, 表示）
				LOCAL:1 = 0
				;-------------------------------------------------
				IF LOCAL:1
					RETURN 1
				ENDIF
				RETURN 1
			ENDSELECT
		ENDIF
	ENDSELECT
ENDIF
RETURN 1

;==================================================
;憤怒口上
;==================================================
@M_KOJO_EVENT_K2_29(ARG,ARG:1)
;口上主はTARGET
;ARGはTARGETの胆量で分岐
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;怒らせてしまった
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;泣かせてしまった　[膽怯]持ち
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;相手が推倒を解除
;==================================================
@M_KOJO_EVENT_K2_30(ARG,ARG:1)
;口上主はTARGET
;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------

IF LOCAL
	;-------------------------------------------------
	;疲惫
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 1
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲 || TALENT:風騷
			PRINTFORMW 「哈…虽然还想再多做一点……但我累了」
		ELSE
			PRINTFORML 「哈……哈……对不起……」
			PRINTFORMDW %CALLNAME:TARGET%疲惫地离開了%CALLNAME:MASTER%的身体。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;満足して解放
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 2
		IF TALENT:恋人 || TALENT:恋慕 || TALENT:愛欲 || TALENT:風騷
			IF K2_SEXUAL_FRANKNESS() && !RAND:3
				CALL K2_HPH_PRINT,@"「はぁHPH 真棒HPH」","L"
			ELSEIF RAND:2
				CALL K2_HPH_PRINT,@"「はぁ、はぁHPH 我爱你HPH」","L"
			ELSE
				CALL K2_HPH_PRINT,@"「感谢您对我的爱HPH」","L"
			ENDIF
			PRINTFORMDW %CALLNAME:TARGET%满足地微笑着，最后亲吻了%CALLNAME:MASTER%的脸颊，放開了身体。
		ELSE
			PRINTFORML 「实在很抱歉。我真的……」
			PRINTFORMDW %CALLNAME:TARGET%为自己因%TEXTR("欲望/劣情")%而对%CALLNAME:MASTER%的采取的袭击行为道歉了。
		ENDIF
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;満足したところを被逆推た
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 3
		PRINTFORML
		RETURN 1
	ENDIF
	;-------------------------------------------------
	;壊れるまでしてあげる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARG == 4
		PRINTFORML
		RETURN 1
	ENDIF
ENDIF
RETURN 1

[SKIPSTART]
;-------------------------------------------------
;オナバレ遭遇時の地の文。
;默认のものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K2_ONABARE_1(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレでそのまま続けてもらう場合の地の文。
;默认のものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K2_ONABARE_2(ARG)
;-------------------------------------------------
IF ARG
	PRINTFORML A弄ってる場合
ELSE
	PRINTFORML V弄ってる場合
ENDIF
;-------------------------------------------------
[SKIPEND]

[SKIPSTART]
;-------------------------------------------------
;オナバレ無崩しックスの地の文。
;默认のものと置き換えたい場合は上下のSKIPSTART~SKIPENDを外してください。
;置き換える気がないならスルー。
;-------------------------------------------------
@M_KOJO_EVENT_K2_ONABARE_3(前戯１,本番はどっちか,回数,注入量)
;-------------------------------------------------
#DIM 前戯１
;1=C 2=B 3=M
#DIM 本番はどっちか
;0でＶ、1でＡ
#DIM 注入量
#DIM 回数

SELECTCASE 前戯１
	CASE 1
		PRINTFORML Ｃ責め
	CASE 2
		PRINTFORML Ｂ責め
	CASE 3
		PRINTFORML Ｍ責め
ENDSELECT

IF 本番はどっちか
	PRINTFORML Aで本番
ELSE
	PRINTFORML Vで本番
ENDIF
;-------------------------------------------------
[SKIPEND]

path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_イベント.ERB


path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_カウンター.ERB


path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_コマンド.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;性騷擾系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;310,摸屁股
;TFLAG:193(1=不快(TALENT:膽怯なら涙目) 2&&3=恥ずかしがる(TALENT:討厭男人兼MASTERが男なら、身をすくめる) 4=されるがまま)
;CFLAG:诶嘿嘿==2&&TCVAR:20(胖次無し顔面騎乗(70=強制舐陰 71=口交強制 72=肛門奉仕) 35=裙子内見せつけ 52=素股)
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K2_310
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_310_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_310_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	$CARESS_HIP_LOOP
	IF CFLAG:诶嘿嘿 != 2
		IF K2_CONSCIOUS_AND_TOLERANT()
			SELECTCASE TFLAG:193
			CASE 1
				PRINTFORMW 「哎呀，太过分了！不要这样！」
			CASE 2,3
				IF TALENT:恋慕 || TALENT:愛欲
					SELECTCASE RAND:2
					CASE 1
						CALL K2_HPH_PRINT,@"「如果不是在这里做恶作剧…而是到床上去…HPH」","W"
					CASEELSE
						CALL K2_HPH_PRINT,@"「呀HPH 心情变得好奇怪…已经没法好好工作了HPH」","W"
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「喂，突然要做什么呢？」
					CASEELSE
						PRINTFORMW 「啊！？哎呀，不行」
					ENDSELECT
				ENDIF
			CASE 4
				;無知でない、かつ恋慕or愛欲、かつ欲望10以上or人目がない
				IF !TALENT:無知 && ( TALENT:恋慕 || TALENT:愛欲 ) && ( ABL:欲望 >= 10 || !EYEWITNESS() )
					SELECTCASE RAND:3
					CASE 1
						IF BASE:情緒 >= 750 && BASE:理性 < 800 && CFLAG:积攒度 >= 500
							CALL K2_HPH_PRINT,@"「不只是触碰、您可以继续…HPH」","W"
						ELSE
							GOTO CARESS_HIP_LOOP
						ENDIF
					CASE 2
						CALL K2_HPH_PRINT,@"「啊HPH 又想做恶作剧了吗？HPH」","W"
					CASEELSE
						CALL K2_HPH_PRINT,@"「嗯HPH %CALLNAME:MASTER%大人真是的HPH」","W"
					ENDSELECT
				ELSE
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「啊。真是没办法啊」
					CASEELSE
						PRINTFORMW 「呀、啊。%CALLNAME:MASTER%大人太过分了」
					ENDSELECT
				ENDIF
			ENDSELECT
		ELSEIF SHIRAHU(TARGET) && TFLAG:193 == 1
			PRINTFORMW 「喂，喂，你在干什么 真是奇怪！」
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;311,擁抱
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 60=ディープ接吻 73=ぱふぱふ 74=乳合わせ 77=乳を吸わせる ＶＡ性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K2_311
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_311_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_311_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF K2_CONSCIOUS_AND_TOLERANT() && !K2_EXCESSIVE_STATURE_GAP()
		IF CFLAG:诶嘿嘿 != 2
			IF TALENT:恋慕 && BASE:情緒 >= 500 && BASE:理性 < 975
				SELECTCASE RAND:3
				CASE 1
					CALL K2_HPH_PRINT,@"「呼呼HPH 能不能再用力些抱我HPH」","W"
				CASE 2
					CALL K2_HPH_PRINT,@"「感受到了%CALLNAME:MASTER%的心跳HPH」","W"
				CASEELSE
					CALL K2_HPH_PRINT,@"「我也想像这样拥抱着您HPH」","W"
				ENDSELECT
			ELSEIF ( TALENT:思慕 && !TALENT:風騷 && BASE:情緒 >= 750 && BASE:理性 < 700 ) || TALENT:恋慕
				PRINTFORMW 「啊 如果是%CALLNAME:MASTER%大人的话，这么紧紧地抱住的话我就动不了。」
			ELSEIF TALENT:思慕 && !TALENT:風騷
				PRINTFORMW 「啊呜…总觉得，身体变得非常暖和了」
			ELSEIF ABL:親密 >= 6
				IF ( TALENT:愛欲 || TALENT:風騷 )
					IF ( TALENT:愛欲 && BASE:情緒 >= 500 && BASE:理性 < 975 ) || ( TALENT:風騷 && BASE:情緒 >= 750 && BASE:理性 < 700 )
						SELECTCASE RAND:2
						CASE 1
							CALL K2_HPH_PRINT,@"「呀HPH 想撒娇吗？还是想H？HPH」","W"
						CASEELSE
							CALL K2_HPH_PRINT,@"「啊咧？ 只是抱着就可以吗？HPH」","W"
						ENDSELECT
					ELSE
						PRINTFORMW 「突然怎么了？」
					ENDIF
				ELSE
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「哎呀，好，好痒啊」
					CASEELSE
						PRINTFORMW 「呜…好，好痛啊」
					ENDSELECT
				ENDIF
			ELSE
				PRINTFORMW 「呜！别，别吓我……」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;312,接吻
;TFLAG:193(99=拒絶(接吻不可) 1=大成功 0=成功 -1=失敗)
;CFLAG:诶嘿嘿==2&&TCVAR:20(32=前から抱きつく 50=手淫 60=接吻 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;PREVCOM(305=膝枕
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K2_312
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_312_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_312_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF K2_BASIC_CONDITION_IN_MATING()
		;被逆推中
		IF CFLAG:诶嘿嘿 == 2
			IF TALENT:恋慕 || TALENT:愛欲
				IF !RAND:10
					PRINTFORMDL 不但让舌头互相缠绕，还用舌头在%CALLNAME:TARGET%的嘴唇与锁骨间亲吻。
					CALL K2_HPH_PRINT,@"「啊HPH 如果在这个地方做记号，会被大家发现哦HPH」","W"
				ELSEIF !RAND:3
					CALL K2_HPH_PRINT,@"「哇呜……嗯……啾HPH 嗯啾……啾啵……嗯……嗯哈HPH」","W"
				ELSEIF RAND:2
					CALL K2_HPH_PRINT,@"「呼HPH 啊呜……啾啵……嗯啾…啾噜……嗯…啾啵HPH」","W"
				ELSE
					CALL K2_HPH_PRINT,@"「啾……啾啵……嗯……哈HPH 请再亲亲我HPH 啊呜…啾……嗯HPH」","W"
				ENDIF
			ELSE
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「嗯……就…….呜…….嗯……」
				CASEELSE
					PRINTFORMW 「嗯……哈……哈嗯……嗯……呜……」
				ENDSELECT
			ENDIF
		;接吻拒絶ではない
		ELSEIF TFLAG:193 != 99
			IF BASE:情緒 >= 650 && BASE:理性 < 875
				IF TALENT:恋慕 || ( TALENT:愛欲 && ( ABL:親密 >= 5 || ABL:欲望 >= 5 ) )
					SELECTCASE RAND:2
					CASE 1
						CALL K2_HPH_PRINT,@"「啾…啾啵HPH……呸咯……嗯哈HPH」","W"
					CASEELSE
						CALL K2_HPH_PRINT,@"「哈呜……啾……呸咯…啾…啾啵HPH」","W"
					ENDSELECT
				ELSEIF ABL:親密 >= 5 || ABL:欲望 >= 5
					SELECTCASE RAND:2
					CASE 1
						PRINTFORMW 「嗯……嗯……呜……嗯」
					CASEELSE
						PRINTFORMW 「啊……呃……啊……嗯」
					ENDSELECT
				ELSE
					PRINTFORMW 「啊……嗯……唔姆……」
				ENDIF
			ELSE
				IF TALENT:恋慕 || ( TALENT:愛欲 && ( ABL:親密 >= 5 || ABL:欲望 ) )
					PRINTFORMW 「啊…嗯……太突然了」
				ELSE
					PRINTFORMW 「嗯！？突然怎么了？」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;313,胸愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(27=谷間を見せる 33=胸を揉ませる 53=乳交(小分岐は地の文EVENT_MESSAGE_COM_性騷擾.ERB参照) 73=ぱふぱふ 77=乳を吸わせる 性交(85=Ｖ挿入する 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ) 86=だいしゅき大堂ド)
;ABL:Ｂ感覚(2未満=性的には感じてない 5未満=多少感じてる 5以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;乳の尺寸でも変わる場合があるので、地の文EVENT_MESSAGE_COM_性騷擾.ERB参照
;==================================================
@M_KOJO_MESSAGE_COM_K2_313
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_313_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_313_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF K2_BASIC_CONDITION_IN_MATING()
		;非被逆推
		IF CFLAG:诶嘿嘿 != 2
			IF TALENT:恋慕 || TALENT:愛欲
				;情緒半分以上、理性半分未満
				IF BASE:情緒 >= 750 && BASE:理性 < 500
					;人目があるか屋外
					IF EYEWITNESS() || OPENPLACE(CFLAG:MASTER:現在位置) >= 2
						SELECTCASE RAND:2
						CASE 1
							CALL K2_HPH_PRINT,@"「嗯…HPH 既然如此、不如到别的地方…HPH」","W"
						CASEELSE
							CALL K2_HPH_PRINT,@"「呀HPH 不行啊，在这种地方HPH」","W"
						ENDSELECT
					ELSE
						IF TEQUIP:上半身着衣状況 & 2 && RAND:2
							CALL K2_HPH_PRINT,@"「衣服就这样可以吗？HPH」","W"
						ELSE
							CALL K2_HPH_PRINT,@"「呼呼、真的很喜欢胸部呢HPH」","W"
						ENDIF
					ENDIF
				ELSE
					PRINTFORMW 「哎呀，又来恶作剧了」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;314,肛門愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(72=肛門奉仕
;CFLAG:诶嘿嘿==2&&TEQUIP:六九式(胖次ありTCVAR:20(70～72)はこちら)
;ABL:Ａ感覚(2未満=受け入れられない 4未満=異物感に翻弄 4以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K2_314
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_314_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_314_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;315,陰蒂愛撫
;CFLAG:诶嘿嘿==2&&TCVAR:20(35=裙子の中を見せる 70=強制舐陰 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振り
;ABL:Ｃ感覚(4未満=くすぐったい 6未満=稍微いいかも 6以上=カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K2_315
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_315_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_315_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF K2_BASIC_CONDITION_IN_MATING()
		IF CFLAG:诶嘿嘿 != 2
			IF TALENT:恋慕 || TALENT:愛欲
				IF BASE:情緒 >= 750 && BASE:理性 < 500
					;人目があるか屋外
					IF EYEWITNESS() || OPENPLACE(CFLAG:MASTER:現在位置) >= 2
						;下半身丸出しか没穿内裤裙子、かつ随机３分の２
						IF TEQUIP:下半身着衣状況 <= 1 && RAND:3
							;人がいる、かつ随机２分の１
							IF ( GET_TARGETNUM() >= 2 || DATE_HITOGOMI(CFLAG:MASTER:現在位置) || WITH_MOB() ) && RAND:2
								CALL K2_HPH_PRINT,@"「啊、发出讨厌的声音了HPH 会被人听到的HPH」","W"
							ELSE
								CALL K2_HPH_PRINT,@"「\@ TALENT:性別 & 2 ?咕噜咕噜 #咕叽咕叽 \@的声音会被\@ GET_TARGETNUM() < 2 ?誰 # \@听到的HPH 不，不行HPH」","W"
							ENDIF
						ELSE
							CALL K2_HPH_PRINT,@"「不要啦HPH 竟然在这种地方欺负人HPH」","L"
							SIF ABL:Ｃ感覚 >= 4 && K2_SEXUAL_FRANKNESS()
								PRINTFORMDL %CALLNAME:TARGET%一边说着不行一边把股间贴到%CALLNAME:MASTER%的手上。
							WAIT
						ENDIF
					ELSE
						;下半身丸出しか没穿内裤裙子
						IF TEQUIP:下半身着衣状況 <= 1
							IF ( CFLAG:1001 || TALENT:愛欲 ) && RAND:2
								SIF CFLAG:1001 && (TALENT:性別 & 2) == 0
									PRINTFORMDL 本来大到包皮也遮不住的阴核，充血了显得活力满满。
								CALL K2_HPH_PRINT,@"「不只是手指、别的也想要HPH」","W"
							ELSE
								CALL K2_HPH_PRINT,@"「啊、嗯、嗯、啊呜、哈嗯HPH」","L"
								PRINTFORMDW 屏着呼吸的%CALLNAME:TARGET%，是在期待着新的行动吗，用媚眼凝视着%CALLNAME:MASTER%。
							ENDIF
						ELSE
							PRINTFORMDL %CALLNAME:TARGET%好像很着急的样子。
							CALL K2_HPH_PRINT,@"「咕、哈HPH 想直接感受%CALLNAME:MASTER%大人的手指HPH」","W"
						ENDIF
					ENDIF
				ELSE
					PRINTFORMW 「那不行，不行」
				ENDIF
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;316,指挿入れ
;CFLAG:诶嘿嘿==2&&TCVAR:20(35=裙子の中を見せる 70=強制舐陰 87=Ａ挿入する 89=腰振りＡ
;TALENT:処女(指挿入れ連続時喪失注意、基本拒否ぎみ)
;ABL:Ｖ感覚(1未満=違和感に戸惑う 5未満=稍微気持ちいい 5以上＝カイカン)
;TFLAG:400(1=约会先or地底の路人が反応する)
;==================================================
@M_KOJO_MESSAGE_COM_K2_316
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_316_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_316_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;317,Ｖ腰を振る
;ABL:Ｖ感覚(2未満=まだ気持ち良くない 5未満=稍微気持ちいい 5以上=カイカン
;==================================================
@M_KOJO_MESSAGE_COM_K2_317
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_317_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_317_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;318,Ａ腰を振る（現状存在せず
;==================================================
;@M_KOJO_MESSAGE_COM_K2_318
;CALL TRAIN_MESSAGE
;CALL M_KOJO_MESSAGE_COM_K2_318_1
;RETURN RESULT

;@M_KOJO_MESSAGE_COM_K2_318_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
;LOCAL = 0
;-------------------------------------------------
;IF LOCAL

;ENDIF
;RETURN 1
;==================================================
;330,掀裙子
;TFLAG:193(-5=拒絶（ビンタ） -3=拒絶（つねり） -1=いやがる 0=いやがる（嬉しげ） 1=受け入れ)
;TFLAG:193=1&&ABL:露出癖(6以上=人目のある場所で自ら裙子をまくり上げる 4以上=人目のない場所で自ら裙子をまくり上げる)
;TFLAG:400(1=约会先or地底の路人が反応する)
;从后面将ピラリ、ではなく、前からペラって感じ（そうじゃなかったら、めくり上げようとするのを止めて即座にビンタとか無理、めくり上げられた後にしかならないしその状況ならビンタ食らうより普通に弾幕で一発ＫＯにならないほうがおかしい
;==================================================
@M_KOJO_MESSAGE_COM_K2_330
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_330_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_330_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	$LIFT_UP_SKIRT_LOOP
	IF CFLAG:诶嘿嘿 != 2
		IF SHIRAHU(TARGET) && TFLAG:193 == -5
			PRINTFORMW 「嘿，变态！不许看！」
		ELSEIF SHIRAHU(TARGET) && TFLAG:193 == -3
				PRINTFORMW 「恶作剧也要有个限度！」
		ELSEIF SHIRAHU(TARGET) && TFLAG:193 == -1 && !CFLAG:ブチギレ
			PRINTFORMW 「不要这样。哦，我会生气的」
		ELSEIF K2_CONSCIOUS_AND_TOLERANT() && TFLAG:193 >= 0
			SELECTCASE TFLAG:193
			CASE 0
				PRINTFORMW 「呜…请不要这么突然」
			CASE 1
				IF ( TALENT:恋慕 || TALENT:愛欲 ) && ( ABL:露出癖 >= 6 || ( GET_TARGETNUM() == 1 && !DATE_HITOGOMI(CFLAG:PLAYER:現在位置) && !WITH_MOB() && ABL:露出癖 >= 4 ) )
					SELECTCASE RAND:4
					CASE 1
						IF BASE:情緒 >= 750 && BASE:理性 < 600 && CFLAG:积攒度 >= 500
							CALL K2_HPH_PRINT,@"「啊嗯HPH 只是看着……不做吗？HPH」","L"
						ELSE
							GOTO LIFT_UP_SKIRT_LOOP
						ENDIF
					CASE 2
						IF BASE:情緒 >= 750 && BASE:理性 < 800
							CALL K2_HPH_PRINT,@"「看看就行了吗？HPH 呼呼HPH」","L"
						ELSE
							GOTO LIFT_UP_SKIRT_LOOP
						ENDIF
					CASE 3
						CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%大人、总觉得有点变态HPH」","L"
					CASEELSE
						CALL K2_HPH_PRINT,@"「被%CALLNAME:MASTER%大人看着的话，身体就会变热HPH」","L"
					ENDSELECT
				ELSE
					PRINTFORML 「%CALLNAME:MASTER%大人，净做些恶作剧。」
				ENDIF
				;裤子と下身衣服無
				IF !EQUIP:裤子 && !EQUIP:下身衣服
					PRINTL
					PRINTFORMDL %CALLNAME:MASTER%踏踏实实地观察了%CALLNAME:TARGET%的胯间。
					;精液があふれている場合
					IF SOAKED_OR_NOT("V_SEMINAL") || SOAKED_OR_NOT("A_SEMINAL")
						;胖次無かつ全身内衣無
						IF CFLAG:没穿内裤 && !EQUIP:緊身内衣 && !EQUIP:連体内衣
							PRINTFORMD 充分被灌进了%K2_EXPRESSION_VARIATION("SPERM")%裸露在外
							SIF SOAKED_OR_NOT("V_SEMINAL")
								PRINTFORMD %K2_EXPRESSION_VARIATION("VULVA")%
							SIF SOAKED_OR_NOT("A_SEMINAL")
								PRINTFORMD \@ SOAKED_OR_NOT("V_SEMINAL") ?と # \@%K2_EXPRESSION_VARIATION("ANUS")%
							PRINTFORMDL 咕嘟咕嘟地流出来，滴落在%CALLNAME:TARGET%的脚下。
						ELSE
							SIF SOAKED_OR_NOT("V_SEMINAL")
								PRINTFORMD %K2_EXPRESSION_VARIATION("VULVA")%
							SIF SOAKED_OR_NOT("A_SEMINAL")
								PRINTFORMD \@ SOAKED_OR_NOT("V_SEMINAL") ?と # \@%K2_EXPRESSION_VARIATION("ANUS")%
							PRINTFORMDL 从里面溢出来的%K2_EXPRESSION_VARIATION("SPERM")%浸湿了\@ PANTIES_TRANSPARENCY(TARGET) ?连阴唇的形状都能看出来 # \@内衣湿透了。
						ENDIF
					;愛液でびしょびしょの場合
					ELSEIF SOAKED_OR_NOT("SECRETIONAL")
						PRINTFORMD 淫乱的分泌液，
						;胖次無かつ全身内衣無
						IF CFLAG:没穿内裤 && !EQUIP:緊身内衣 && !EQUIP:連体内衣
							PRINTFORMDL 从赤裸的秘处流到大腿上形成一条线。
						ELSE
							PRINTFORMDL \@ PANTIES_TRANSPARENCY(TARGET) ?连陰唇的形状都能看出来 # \@内衣湿透了。
						ENDIF
					ENDIF
				ENDIF
				PRINTW
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_セクハラコマンド.ERB


path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_ハードなコマンド.ERB


code:
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K2
CALL MARK_MESSAGE
;苦痛刻印
IF TFLAG:22 == 1
	PRINTFORMW
ELSEIF TFLAG:22 == 2
	PRINTFORMW
ELSEIF TFLAG:22 == 3
	PRINTFORMW
ENDIF

;時姦刻印
IF TFLAG:時姦刻印取得 == 1
	PRINTFORMW
ELSEIF TFLAG:時姦刻印取得 == 2
	PRINTFORMW
ELSEIF TFLAG:時姦刻印取得 == 3
	PRINTFORMW
ENDIF

;快楽刻印
IF TFLAG:23 == 1
	PRINTFORMW
ELSEIF TFLAG:23 == 2
	PRINTFORMW
ELSEIF TFLAG:23 == 3
	LOCAL = GETCOLOR()
	SETCOLOR 0xC0C070
	PRINTFORMW 惊人的快感刻入了%CALLNAME:TARGET%的身体。
	PRINTFORMW %CALLNAME:TARGET%已经无法忘记这快乐的滋味。
	SETCOLOR LOCAL
	IF !CFLAG:睡眠姦
		IF TALENT:快感応答 < 0 && !TALENT:風騷
			CALL K2_HPH_PRINT,@"「不行了HPH 已经、已经无法忍受了HPH」","W"
		ELSE
			CALL K2_HPH_PRINT,@"「太、太厉害了HPH 永远不会忘掉这种感觉HPH」","W"
		ENDIF
	ENDIF
ENDIF

;不埒刻印
;快楽による刻印
;LV1
IF TFLAG:24 == 11
	PRINTFORMW
;LV2
ELSEIF TFLAG:24 == 12
	PRINTFORMW
;LV3
ELSEIF TFLAG:24 == 13
	PRINTFORMW
;屈服、恭順による刻印
;LV1
ELSEIF TFLAG:24 == 31
	PRINTFORMW
;LV2
ELSEIF TFLAG:24 == 32
	PRINTFORMW
;LV3
ELSEIF TFLAG:24 == 33
	PRINTFORMW
ENDIF

;反発刻印
IF TFLAG:21 == 1
	PRINTFORMW
ELSEIF TFLAG:21 == 2
	PRINTFORMW
ELSEIF TFLAG:21 == 3
	PRINTFORMW
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_刻印取得.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;加虐系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;100,打屁股
;==================================================
@M_KOJO_MESSAGE_COM_K2_100
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_100_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_100_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF

	$SPANKING_LOOP
	IF ( TALENT:恋慕 || TALENT:愛欲 || TALENT:思慕 || TALENT:炮友 ) && K2_BASIC_CONDITION_IN_MATING()
		IF ( ABL:受虐属性 >= 4 || ( TALENT:受虐狂 && ABL:受虐属性 >= 2 ) ) && ( !TALENT:施虐狂 || ABL:欲望 >= 20 )
			SELECTCASE RAND:4
			CASE 1
				IF CFLAG:1001 && !RAND:3
					IF TALENT:恋慕 || TALENT:恋人
						CALL K2_HPH_PRINT,@"「没有把处女献给%CALLNAME:MASTER%大人、实在不好意思HPH」","L"
						CALL K2_HPH_PRINT,@"「请随意品尝这个被各式各样的人使用过的二手机器人吧HPH」","W"
					ELSEIF ABL:清掃技能 + ABL:料理技能 < 4
						CALL K2_HPH_PRINT,@"「好好惩罚一下这个忘记了工作、只会记着你的事的无耻女仆吧HPH」","W"
					ELSE
						CALL K2_HPH_PRINT,@"「嗯、哈HPH 无论是谁都可以的淫乱女仆、真抱歉HPH」","W"
					ENDIF
				ELSE
					GOTO SPANKING_LOOP
				ENDIF
			CASE 2
				CALL K2_HPH_PRINT,@"「啊哈HPH 请惩罚我这个废物女仆HPH」","W"
			CASE 3
				CALL K2_HPH_PRINT,@"「呼HPH 哈HPH 好痛HPH」","W"
			CASEELSE
				CALL K2_HPH_PRINT,@"「啊呀HPH 呃哈HPH 嗯，哈…可以…结束了吗?HPH」","W"
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「呜……屁股疼得要命」
			CASEELSE
				PRINTFORMW 「呜……屁股痛得发麻」
			ENDSELECT
		ENDIF
	ELSE
		SELECTCASE RAND:2
		CASE 1
			PRINTFORMW 「呜呜……好痛啊，请停止吧」
		CASEELSE
			PRINTFORMW 「噫、嗯、哇、哈……不，不要，请……」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;101,鞭
;==================================================
@M_KOJO_MESSAGE_COM_K2_101
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_101_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_101_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;102,蝋燭
;==================================================
@M_KOJO_MESSAGE_COM_K2_102
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_102_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_102_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;103,針
;==================================================
@M_KOJO_MESSAGE_COM_K2_103
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_103_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_103_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;104,眼罩
;==================================================
@M_KOJO_MESSAGE_COM_K2_104
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_104_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_104_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:眼罩
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 1
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;105,縄
;==================================================
@M_KOJO_MESSAGE_COM_K2_105
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_105_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_105_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:縄
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 1
		;恋慕
		ELSEIF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;106,口球
;==================================================
@M_KOJO_MESSAGE_COM_K2_106
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_106_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_106_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:口球
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1
;==================================================
;107,拘束PLAY
;==================================================
@M_KOJO_MESSAGE_COM_K2_107
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_107_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_107_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;装着
	IF TEQUIP:口球
		;恋慕
		IF TALENT:恋慕
			PRINTFORMW
			RETURN 1
		;屈服3
		ELSEIF MARK:不埒刻印 == 3
			PRINTFORMW
			RETURN 1
		;それ以外
		ELSE
			PRINTFORMW
			RETURN 1
		ENDIF
	;解除
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;108,打胸部
;==================================================
@M_KOJO_MESSAGE_COM_K2_108
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_108_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_108_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_加虐系コマンド.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;奉仕系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;80,手淫
;==================================================
@M_KOJO_MESSAGE_COM_K2_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_80_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && K2_BASIC_CONDITION_IN_MATING() && CFLAG:1001 && FIRSTTIME(SELECTCOM)
		PRINTFORM 「呵呵，
		SELECTCASE TALENT:MASTER:形状
		CASE 1
			PRINTFORM 可爱
		CASE 2
			PRINTFORM 好小啊
		CASE 3
			PRINTFORM 健壮
		CASE 4
			PRINTFORM 晃眼
		CASE 5
			PRINTFORM 改变了形态
		CASE 6
			PRINTFORM 气派
		CASE 10
			PRINTFORM 非常大
		CASEELSE
			PRINTFORM 小鬼
		ENDSELECT
		PRINTFORMW 真是小不点儿啊」
		PRINTFORMDW %CALLNAME:TARGET%脸上露出厌恶的笑容的同时，一只手在玩弄阴茎。
		PRINTFORMW 「那么，我就为你服务了。」
		RETURN 1
	ENDIF

	$HANDJOB_LOOP
	IF K2_BASIC_CONDITION_IN_MATING()
		IF TALENT:恋慕 || TALENT:愛欲
			SELECTCASE RAND:6
			CASE 1
				IF ABL:技巧 >= 4 && !NOWEX:MASTER:射精
					CALL K2_HPH_PRINT,@"「要我用手再刺激一下吗？ 什么时候出来都可以哦HPH」","W"
				ELSE
					GOTO HANDJOB_LOOP
				ENDIF
			CASE 2
				IF ABL:指 >= 4
					CALL K2_HPH_PRINT,@"「%CALLNAME:MASTER%大人的这里只要咯吱咯吱地一动就要出来了呢HPH」","L"
					PRINTFORMDW %CALLNAME:TARGET%用巧妙的指技责备%CALLNAME:MASTER%的弱点。
				ELSE
					GOTO HANDJOB_LOOP
				ENDIF
			CASE 3
				IF !TEQUIP:眼罩 && !TEQUIP:吸乳头 && !TEQUIP:継続接吻 && !TEQUIP:六九式 && ABL:受虐属性 >= 3
					PRINTFORMDL 跪下的%CALLNAME:TARGET%用手服务的同时，眼神看着%CALLNAME:MASTER%的脸。
					PRINTFORMW 「一边被%CALLNAME:MASTER%大人俯视一边这样做，感觉像是在为%CALLNAME:MASTER%大人服务。」
				ELSE
					GOTO HANDJOB_LOOP
				ENDIF
			CASE 4
				IF ABL:指 >= 2 && ABL:施虐属性 >= 4
					PRINTFORMDL 由于%CALLNAME:TARGET%的激烈的责备，%CALLNAME:MASTER%情不自禁地退缩了。
					CALL K2_HPH_PRINT,@"「啊、别想跑。还没结束呢HPH」","L"
					SIF !TEQUIP:吸乳头 && !TEQUIP:揉胸 && !TEQUIP:拘束 && !TEQUIP:六九式
						PRINTFORMDL %CALLNAME:TARGET%绕到%CALLNAME:MASTER%的后面，为了不让你逃跑而紧紧地、从背后更加激烈地抱住你。
					WAIT
				ELSE
					GOTO HANDJOB_LOOP
				ENDIF
			CASE 5
				CALL K2_HPH_PRINT,@"「能感觉到它在手里跳动HPH」","W"
			CASEELSE
				SELECTCASE ABL:指
				CASE 0
					PRINTFORMW 「啊，是这样的感觉吗？」
				CASE 1,2
					PRINTFORMW 「怎么样？做得舒服吗？」
				CASE IS >= 3
					PRINTFORMDL %CALLNAME:TARGET%巧妙控制着缓急的同时，引导着%CALLNAME:MASTER%射精。
					;フル勃起
					IF CFLAG:MASTER:勃起度 >= 1500
						CALL K2_HPH_PRINT,@"「啊哈、好硬啊HPH 该怎么做呢？ 就这样用手射精吗? 还是要留在后面？HPH」","W"
					;挿入可能な勃起
					ELSEIF CFLAG:MASTER:勃起度 >= 1000
						CALL K2_HPH_PRINT,@"「啊HPH 硬度很棒HPH 但是，%CALLNAME:MASTER%大人还可以变得更硬吧？HPH」","W"
					;半勃ち
					ELSEIF CFLAG:MASTER:勃起度 > 500
						CALL K2_HPH_PRINT,@"「嘿咻、嘿咻HPH 看呀HPH 再大一点的话、就可以做了HPH」","W"
					;ふにゃちん
					ELSE
						CALL K2_HPH_PRINT,@"「还是软绵绵的样子。嘿、加油HPH 加油HPH」","W"
					ENDIF
				ENDSELECT
			ENDSELECT
			IF NOWEX:MASTER:射精 && ABL:技巧 >= 4
				PRINTL
				PRINTFORMDL 被%CALLNAME:TARGET%的手弄脏了的%K2_EXPRESSION_VARIATION("PENIS")%快要射精了。
				SELECTCASE RAND:2
				CASE 1
					CALL K2_HPH_PRINT,@"「啊HPH 怎么了？HPH 只是用手就biubiu地射出来了吗？HPH」","W"
				CASEELSE
					CALL K2_HPH_PRINT,@"「啊，已经出来了吧？不错HPH 我的手上都黏糊糊的了HPH」","W"
				ENDSELECT
			ENDIF
		ELSEIF TALENT:思慕 || TALENT:炮友
			IF ABL:指 >= 2
				SELECTCASE RAND:2
				CASE 1
					PRINTFORMW 「我渐渐明白了该怎么做比较好了。」
				CASEELSE
					PRINTFORML 「嗯……嗯……没关系吧？不疼吗？
					PRINTFORMDW %CALLNAME:TARGET%在发出咕嘟咕嘟的声音的同时，以快速的动作给予%CALLNAME:MASTER%快感。
				ENDSELECT
			ELSE
				PRINTFORMW 「呜……胳膊累了」
			ENDIF
		ELSE
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMW 「用手摩擦就可以了吧。我明白了」
			CASEELSE
				PRINTFORML 「……」
				PRINTFORMDW %CALLNAME:TARGET%沉默着，一味地动着手。
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;81,口交
;==================================================
@M_KOJO_MESSAGE_COM_K2_81
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_81_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_81_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF

	$BLOWJOB_LOOP
	IF K2_BASIC_CONDITION_IN_MATING()
		IF TALENT:恋慕 || TALENT:愛欲
			SELECTCASE RAND:4
			CASE 1
				SELECTCASE ABL:舌
				CASE 0,1
					PRINTFORML 「嗯……哈哈……那个，我能做好吗？」
					PRINTFORMDL 对用嘴巴服务不习惯的%CALLNAME:TARGET%用，看起来不安地询问了。
					PRINTFORMW 「想让%CALLNAME:MASTER%大人心情变好」
				CASE 2,3
					CALL K2_HPH_PRINT,@"「啾啵……啾呼…… 欸嘿HPH 感觉真不错HPH」","W"
				CASE IS >= 4
					PRINTFORMDL %CALLNAME:TARGET%用嘴唇刺激的同时，也用舌头狠狠地责备阴茎小带。
					CALL K2_HPH_PRINT,@"「咕啵…啾、啾啵HPH ……啾噜……呸咯……啾啵……呸咯咯HPH」","W"
				ENDSELECT
			CASE 2
				;フル勃起
				IF CFLAG:MASTER:勃起度 >= 1500
					CALL K2_HPH_PRINT,@"「硬邦邦的样子、我的服务还可以吧？ 就这么出来也可以哦HPH」","W"
				;挿入可能な勃起
				ELSEIF CFLAG:MASTER:勃起度 >= 1000
					IF !TEQUIP:MASTER:避孕套
						CALL K2_HPH_PRINT,@"「啊、有什么要漏出来了HPH」","W"
					ELSE
						GOTO BLOWJOB_LOOP
					ENDIF
				;半勃ち
				ELSEIF CFLAG:MASTER:勃起度 > 500
					CALL K2_HPH_PRINT,@"「用嘴、让它更硬一些HPH」","W"
				;ふにゃちん
				ELSE
					CALL K2_HPH_PRINT,@"「软绵绵的小鸡，在嘴袋里快乐地发出咕噜咕噜的声音HPH」","W"
				ENDIF
			CASE 3
				IF TEQUIP:MASTER:避孕套
					PRINTFORML 「%CALLNAME:MASTER%大人的小不点，想亲身体验一下……」
					PRINTFORMDW %CALLNAME:TARGET%似乎对越过橡胶的口淫不满。
				ELSE
					PRINTFORMDL %CALLNAME:TARGET%一边舔着竿子，一边将鼻子贴在内侧，不停地嗅着香味。
					CALL K2_HPH_PRINT,@"「哈…HPH 好下流的味道……我想一直闻HPH」","W"
				ENDIF
			CASEELSE
				CALL K2_HPH_PRINT,@"「噗啾……呸咯……啾啵……咕啵……啾噜噜HPH」","W"
			ENDSELECT
			IF NOWEX:MASTER:射精
				PRINTL
				SELECTCASE RAND:2
				CASE 1
					CALL K2_HPH_PRINT,@"「小鸡pikupiku的HPH 很舒服吧HPH 请便HPH」","L"
					IF EXP_UP(15,TARGET) == NOWEX:PLAYER:射精 * 3 && !TEQUIP:MASTER:避孕套 && ABL:精液中毒 >= 5 && TCVAR:精飲経験 >= 20
						CALL K2_HPH_PRINT,@"「请让我成为最喜欢精液的女仆吧HPH」","W"
					ELSEIF !TEQUIP:MASTER:避孕套 && TCVAR:精飲経験 >= 20
						CALL K2_HPH_PRINT,@"「把biubiu地射出来的精液赏给%CALLNAME:TARGET%吧HPH」","W"
					ELSE
						CALL K2_HPH_PRINT,@"「请射进我的嘴里HPH」","W"
					ENDIF
				CASEELSE
					PRINTFORMDL %CALLNAME:MASTER%的%K2_EXPRESSION_VARIATION("PENIS")%已经快要爆炸了。
					IF EXP_UP(15,TARGET) == NOWEX:PLAYER:射精 * 3 && !TEQUIP:MASTER:避孕套 && ABL:精液中毒 >= 5 && TCVAR:精飲経験 >= 20
						CALL K2_HPH_PRINT,@"「让我都喝下去吧HPH 可以吧? 嗯？HPH 好想要您的精液啊HPH」","W"
					ELSEIF !TEQUIP:MASTER:避孕套 && TCVAR:精飲経験 >= 20
						CALL K2_HPH_PRINT,@"「咕啾……呸咯……啾啵……咕啵……啾噜噜HPH biubiu、哈、呜呼HPH」","W"
					ELSE
						CALL K2_HPH_PRINT,@"「嗯啾、啵、啾HPH 就这样做到最后HPH」","W"
					ENDIF
				ENDSELECT
			ENDIF
		ELSEIF TALENT:思慕 || TALENT:炮友
			SELECTCASE RAND:4
			CASE 1
				IF ABL:舌 < 2
					PRINTFORMW 「啾……呸咯……嗯……太难受了……」
				ELSE
					GOTO BLOWJOB_LOOP
				ENDIF
			CASE 2
				PRINTFORMW 「嗯、啾噜……噗噜………啾噗……啾啵…」
			CASE 3
				PRINTFORMW 「嗯……啊，怎么样？舒服吗？
			CASEELSE
				PRINTFORMW 「呜，好难受。快要出来的话请告诉我」
			ENDSELECT
		ELSE
			IF ABL:奉仕精神 >= 2
				;主人の阴茎に、精液か肛門か粘液か血の有污垢、かつ避孕套無
				IF STAIN:MASTER:Ｐ & 108 && !TEQUIP:MASTER:避孕套
					PRINTFORML 「……好脏……太、太臭了……呜呣……啾噜」
					PRINTFORMDW 一边说着%CALLNAME:TARGET%很臭，一边淡淡地继续着服务。
				ELSE
					PRINTFORMW 「呜呣、嗯……噗噜……噗啾……呸咯………啾噜」
				ENDIF
			ELSE
				PRINTFORMW 「嗯，要舔吗？呜……」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;82,乳交
;==================================================
@M_KOJO_MESSAGE_COM_K2_82
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_82_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_82_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;恋慕
	ELSEIF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;83,素股
;==================================================
@M_KOJO_MESSAGE_COM_K2_83
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_83_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_83_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF

	$FEMORAL_SEX_LOOP
	IF K2_BASIC_CONDITION_IN_MATING()
		IF TALENT:恋慕 || TALENT:愛欲 || TALENT:風騷
			SELECTCASE RAND:5
			CASE 1
				IF !TEQUIP:継続接吻 && !( TALENT:性別 & 2 ) && TALENT:MASTER:形状 != 2
					PRINTFORMDL 让%CALLNAME:TARGET%站直，在背后从胯间摩擦着%K2_EXPRESSION_VARIATION("PENIS")%。
					CALL K2_HPH_PRINT,@"「呼呼HPH 就像自己长出来了一样、好有趣HPH」","L"
					SIF !TEQUIP:縄 && !TEQUIP:拘束
						PRINTFORMDL %CALLNAME:TARGET%兴致勃勃地摆弄着%CALLNAME:MASTER%的%K2_EXPRESSION_VARIATION("PENIS")%。
					WAIT
				ELSE
					GOTO FEMORAL_SEX_LOOP
				ENDIF
			CASE 2
				IF !( CFLAG:育児人数 > 0 && !TEQUIP:MASTER:避孕套 && !TCVAR:口服避孕薬 && CFLAG:生理周期 >= 3 )
					IF CFLAG:积攒度 >= 500 && PALAM:潤滑 >= PALAMLV:3
						PRINTFORML 「咦？不能插吗？我早就准备好了……」
						PRINTFORMDW %CALLNAME:TARGET%好像很羡慕的样子\@ TEQUIP:眼罩 ?。#看着。 \@
					ELSE
						PRINTFORMW 「真的可以不插吗？向你摆出姿势就可以了吗？」
					ENDIF
				ELSE
					GOTO FEMORAL_SEX_LOOP
				ENDIF
			CASE 3
				IF K2_SEXUAL_FRANKNESS()
					CALL K2_HPH_PRINT,@"「嗯啊HPH 摩擦着鸡鸡HPH 要出来了哟HPH」","W"
				ELSE
					GOTO FEMORAL_SEX_LOOP
				ENDIF
			CASE 4
				CALL K2_HPH_PRINT,@"「用温热的大腿和%CALLNAME:MASTER%大人的小鸡巴吧唧吧唧地摩擦HPH 啊HPH 声音好下流HPH」","W"
			CASEELSE
				CALL K2_HPH_PRINT,@"「我的腰技如何？HPH 舒服吗？HPH」","W"
			ENDSELECT
		ELSE
			SELECTCASE RAND:3
			CASE 1
				PRINTFORMDL 让%CALLNAME:TARGET%坐在上面，让她分開双腿。
				PRINTFORMW 「没事吧…我很担心会不会压坏……」
			CASE 2
				PRINTFORMW 「啊…嗯……啊、啊……嗯」
			CASEELSE
				PRINTFORMW 「不插吗？我明白了」
			ENDSELECT
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;84,泡泡浴
;==================================================
@M_KOJO_MESSAGE_COM_K2_84
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_84_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_84_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF
	;基本セット
	;恋慕
	IF TALENT:恋慕
		PRINTFORMW
		RETURN 1
	;屈服3
	ELSEIF MARK:不埒刻印 == 3
		PRINTFORMW
		RETURN 1
	;それ以外
	ELSE
		PRINTFORMW
		RETURN 1
	ENDIF
ENDIF
RETURN 1

;==================================================
;85,足交
;==================================================
@M_KOJO_MESSAGE_COM_K2_85
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_85_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_85_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF

	IF K2_BASIC_CONDITION_IN_MATING()
		;真正風騷で矮小体型以上、かつ主人の阴茎が普通より小さい、かつ眼罩無
		IF CFLAG:1001 && TALENT:体型 >= -1 && TALENT:MASTER:性別 & 2 && TALENT:MASTER:形状 < 3 && !TEQUIP:眼罩
			IF TALENT:施虐狂 && !TALENT:受虐狂
				PRINTFORM 「再看一遍，真的是小矮子。」
			ELSE
				PRINTFORM 「小巧又可爱。」
			ENDIF
			;フル勃起
			IF CFLAG:MASTER:勃起度 >= 1500
				IF TALENT:施虐狂 && !TALENT:受虐狂
					PRINTFORML 这样就足够大了吗？」
					PRINTFORMDW %CALLNAME:TARGET%一边问一边用脚欺负着。
				ELSE
					CALL K2_HPH_PRINT,@"我要加把劲虐待这个小家伙了HPH","W"
				ENDIF
			;挿入可能な勃起
			ELSEIF CFLAG:MASTER:勃起度 >= 1000
				IF TALENT:施虐狂 && !TALENT:受虐狂
					PRINTFORML 这么\@ TALENT:MASTER:形状 == 1 ?令尊#粗茶淡饭\@明明是矮子，却会变硬」
					PRINTFORMDW %CALLNAME:TARGET%强烈地责备了你。
				ELSE
					PRINTFORML 但是能好好地变得硬。真了不起♪」
					PRINTFORMDW %CALLNAME:TARGET%用脚抚摸了%K2_EXPRESSION_VARIATION("PENIS")%。
				ENDIF
			;半勃ち
			ELSEIF CFLAG:MASTER:勃起度 > 500
				IF TALENT:施虐狂 && !TALENT:受虐狂
					PRINTFORML 太小了，用脚的话很难做」
					PRINTFORMDW %CALLNAME:TARGET%加强了责备。
				ELSE
					PRINTFORML 但是太小了很难用脚摩擦」
					PRINTFORMDW %CALLNAME:TARGET%一副为难的样子。
				ENDIF
			;ふにゃちん
			ELSE
				PRINTFORMW 软绵绵的，像婴儿的一样」
			ENDIF
		ENDIF
	ENDIF
ENDIF
RETURN 1
;==================================================
;88,真空口交
;==================================================
@M_KOJO_MESSAGE_COM_K2_88
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K2_88_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K2_88_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW
		RETURN 1
	ENDIF

	IF K2_BASIC_CONDITION_IN_MATING()
		IF TALENT:恋慕 || TALENT:愛欲
			SELECTCASE RAND:2
			CASE 1
				PRINTFORMD %CALLNAME:TARGET%将%K2_EXPRESSION_VARIATION("PENIS")%叼到根部，
				SIF !TEQUIP:眼罩 && !TEQUIP:六九式
					PRINTFORMD 一边向上眼神窥视着%CALLNAME:MASTER%的表情
				PRINTFORMDL 努力服务。
				CALL K2_HPH_PRINT,@"「嗯唔……咕……呜…呼~呼~…………咕啵……啾啵HPH」","W"
			CASEELSE
				PRINTFORMDL %CALLNAME:TARGET%抿着嘴，将%CALLNAME:MASTER%的%K2_EXPRESSION_VARIATION("PENIS")%全部吸入其中。
				SIF !TEQUIP:六九式
					PRINTFORMDL 脸颊凹陷，鼻孔鼓起的同时发出粗俗声音的身姿，与平素美丽的脸的落差更加刺激了%CALLNAME:MASTER%的情欲。
				CALL K2_HPH_PRINT,@"「咕……噗啵……呼哈…哈……嗯HPH……啾噜……噗啾……呸咯HPH」","W"
			ENDSELECT
		ELSEIF TALENT:思慕 || TALENT:炮友
			PRINTFORMDL %CALLNAME:TARGET%用整个嘴服务着。
			PRINTFORMW 「啊……」呜…………呜呜……呜」
		ELSE
			PRINTFORMW 「啾噜、啾噗………咕……噗哈……好痛苦」
		ENDIF
	ENDIF
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【2】る～こと/M_KOJO_K2_奉仕系コマンド.ERB