code:
;==================================================
;依頼口上・各依頼で共通の口上
;==================================================
@M_KOJO_IRAI_K30(ROLE, SCENE, IRAI_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  IRAI_ID  ;依頼自体のID
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
#DIM  CHK_ID   ;依頼IDだけ抜き出したもの
#DIMS IRAI_NAME;依頼名
CHK_ID    = IRAI_ID % 1000
CLIENT_ID = IRAI_ID_TO_CLIENT(IRAI_ID)
IRAI_NAME = %STR_DATA_IRAI(IRAI_ID, "依頼名", CLIENT_ID)%
RESULT = 0
IF CHK_ID > 100
	TRYCALLFORM M_KOJO_IRAI_%IRAI_NAME%_K30(ROLE, SCENE, CLIENT_ID)
ELSE
	TRYCALLFORM M_KOJO_IRAI_{CHK_ID}_K30(ROLE, SCENE, CLIENT_ID)
ENDIF
SIF RESULT
	RETURN 1
;--------------------------------------------------
;ここにあるのは各依頼で共通の口上です
;依頼ごとの口上を表示した場合は共通の口上は表示されません
;【】で囲ってあるのは口上前後の地の文や発生する処理です
;WAITをするか等の目安にしてください（L,WはそれぞれPRINTFORML,PRINTFORMWの略）
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
;●依頼を持ち礦物碎片れる時
;【W どうやら［彼女］は［你］に頼み事があるようだ】
;【◆口上】
;【依頼データ表示】
;【INPUT（受託するかY/N）】

CASE "依頼非受託時"
;●内容だけ見て受託しなかった時
;【L ［你］は丁重にお断りした】
PRINTFORML 「……是吗?也不能勉强啊」
;【W ［彼女］は残念そうな顔をしている】

CASE "依頼受託時"
;●依頼を受託した時
;【W ［你］は［彼女］の依頼を受けた】
PRINTFORMW 「非常感谢。请多多关照」
CASE "依頼確認時"
;●[366]で依頼内容を依頼人に確認した時
PRINTFORML 「怎么了？　请好好做吧」
;【依頼データ表示】
;【INPUT（破棄するかY/N）】

CASE "依頼破棄時"
;●受託した依頼を破棄する時
PRINTFORML 「…是吗。没办法呢」
;【W 依頼を破棄しました。】

CASE "依頼実行直前"
;●[367]で依頼を実行する時、実行処理の前に呼び出される
;※依頼によって状況が大きく異なるので共通口上は非推奨
;【◆口上】
;【実行時の地の文・ソース等】
;【▼下の口上に続く】
	IF ROLE == "CLIENT"
	;（共通）CLIENT：依頼実行の対象と依頼主（口上主）が同一の場合（主に特訓系ですが一緒に捜索等をした場合も含まれます）

	ELSEIF ROLE == "TARGET"
	;（共通）TARGET：口上主が依頼実行の対象である場合（主に配達系ですが捜索等をした際、TARGETにしていた場合も含まれます）

	ENDIF
CASE "依頼実行直後"
;●[367]で依頼を実行する時、実行処理の後に呼び出される
;※依頼によって状況が大きく異なるので共通口上は非推奨
;【▲上の口上から続き】
;【◆口上】
;【達成時・CLIENT：▼下の口上に続く】
;【達成時・TARGET：忘れずに［依頼主］に報告しよう】
	IF ROLE == "CLIENT"
	;（共通）CLIENT：依頼実行の対象と依頼主（口上主）が同一の場合（主に特訓系ですが一緒に捜索等をした場合も含まれます）
		SELECTCASE CFLAG:CLIENT_ID:依頼状況
		CASE 2
		;実行後未解決

		CASE 3
		;実行後達成

		CASE 6
		;実行後失敗（現在「06_誰来告訴我！」のみ）

		ENDSELECT
	ELSEIF ROLE == "TARGET"
	;（共通）TARGET：口上主が依頼実行の対象である場合（主に配達系ですが捜索等をした際、TARGETにしていた場合も含まれます）
		SELECTCASE CFLAG:CLIENT_ID:依頼状況
		CASE 2
		;実行後未解決

		CASE 3
		;実行後達成

		CASE 6
		;実行後失敗（現在「06_誰来告訴我！」のみ）

		ENDSELECT
	ENDIF
CASE "成功報告時"
;●報告時（成功）
;【依頼実行と報告が同時の時：▲上の口上から続き】
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置 || TALENT:恋人
		PRINTFORML 「非常感谢」
		PRINTFORML 「当然也有奖励哦」
	ELSE
		PRINTFORML 「非常感谢。这里是约好的报酬」
	ENDIF
;【ソースの入手・道具等の報酬獲得】

CASE "失敗報告時"
;○直接失敗報告は現在「06_誰来告訴我！」のみ
;●報告忘れ・期限切れになった際、遭遇時の最後に呼び出される
;（遭遇時）【挨拶等】→【心情の良し悪し】→【劣情察知】→【祭日イベント】→【◆ココ！】（尚、依頼失敗判定があると约会のお誘いは発生しません）
PRINTFORML 「%K30_C_NAME(MASTER)%，不是都和阎魔约好了吗」
PRINTFORMW 「呼…过去的事情是没办法的，以后请注意」
TALENT:30:心情 = MIN(TALENT:30:心情, 0)
;○心情の変化や追加のペナルティ等は口上側で処理してください

CASE "依頼報告不要"
;○一般依頼では現在「02_給花澆水」「09_誰的遺失物」のみ
;●起床時、報告不要依頼を達成していた場合に呼ばれる口上
;（起床時）【起床メッセージ】→【X時間寝た等】→【◆ココ！】→【神簽・補充等】→【一日開始】
;○地の文はありません
;○口上主がその場にいなくても表示されます（MASTERが寝る時のイベント口上と同じタイプ）

ENDSELECT
RETURN 1

;==================================================
;依頼口上・一般依頼01：幫忙做掃除
;==================================================
@M_KOJO_IRAI_1_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置
		PRINTFORML 「嗯，差不多该收拾房间了吧？ 」
	ELSEIF TALENT:30:恋慕
		PRINTFORML 「工作忙得不可開交…」
		PRINTFORML 「可以拜托你吗」
	ELSE
		PRINTFORML 「%K30_C_NAME(MASTER)%、手头有空吧」
	ENDIF
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置
		PRINTFORMW 「干净利落的收拾一下吧」
	ELSEIF TALENT:30:恋慕
		PRINTFORMW 「真的、抱歉、拜托你了」
	ELSE
		PRINTFORMW 「非常抱歉。拜托了」
	ENDIF
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
	IF YOGORE:(GET_CHARAHOME(TARGET)) < 1000
	;先に掃除してしまっていた場合
	PRINTFORML 「诶…什么时候?」
	;【W ［彼女］的房間は十分にきれいだ】
	;【▼そのまま下の口上へ】

		RETURN 1
	ELSE
	;一緒に掃除場合
	PRINTFORML 「二人すれば、すぐ終わりますね」
	;【W ［你］は［彼女］と協力して部屋の掃除を行なった】
	;【▼そのまま下の口上へ】

		RETURN 1
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置 || TALENT:恋人
		PRINTFORML 「还是要平时多注意才行」
	ELSE
		PRINTFORML 「非常感谢。漂亮的完成了」
	ENDIF
;【▼そのまま下の口上へ】

	RETURN 1
CASE "成功報告時"
;報酬：低級素材
;【▲上の口上から続き】
;【報酬獲得】

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼02：給花澆水
;==================================================
@M_KOJO_IRAI_2_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置
		PRINTFORML 「你和我今天早上都完全忘记了吧…」
	ELSEIF TALENT:30:恋慕
		PRINTFORML 「稍微有些走不開，可以拜托你吗？」
	ELSE
		PRINTFORML 「%K30_C_NAME(MASTER)%、手头有空吧」
	ENDIF
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置 || TALENT:恋人
		PRINTFORMW 「那就拜托了」
	ELSE
		PRINTFORMW 「谢谢」
	ENDIF
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;【◆口上】
;【W ［你］は［依頼主］的家の鉢植えや植木に水をあげた】
;【▼そのまま下の口上へ】
	IF ROLE == "CLIENT"
	;澆水した時、依頼主である口上主がTARGETの場合

		RETURN 0
	ELSEIF ROLE == "TARGET"
	;澆水した時、依頼主ではない口上主がTARGETの場合

		RETURN 0
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	IF ROLE == "CLIENT"
	;澆水した時、依頼主である口上主がTARGETの場合
	;この場合はそのまま下の口上へ続きます

		RETURN 0
	ELSEIF ROLE == "TARGET"
	;澆水した時、依頼主ではない口上主がTARGETの場合

		RETURN 0
	ENDIF
CASE "成功報告時"
;報酬：\500

	RETURN 0
CASE "失敗報告時"

	RETURN 0
CASE "依頼報告不要"

	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼03：一起玩吧
;※この依頼は[幼稚]を持っている角色のみ発生します
;==================================================
@M_KOJO_IRAI_3_KX(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"

	RETURN 0
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
;【◆口上】
;【W ［你］は［彼女］と遊んだ】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "成功報告時"
;報酬：好感度と信賴度のみ（心情が良くなる）
;【▲上の口上から続き】
;【◆口上】

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼04：想要学習料理
;==================================================
@M_KOJO_IRAI_4_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「啊喏…能教我做料理吗？」
	IF TALENT:30:恋慕
		PRINTFORML 「……拜托想做的人很奇怪」
		PRINTFORML 「但果然还是你最可靠」
	ELSE
		PRINTFORML 「光靠书本上的调查，总觉得难以理解」
		PRINTFORML 「最好还是让人直接看护最好。」
	ENDIF
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	PRINTFORML 「谢谢。我会努力的，请好好指导我」
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
	IF ABL:30:料理技能 < 2
		PRINTFORML 「嗯，首先应该怎么做呢…」
	ELSEIF ABL:30:料理技能 < 4
		PRINTFORML 「总觉得已经掌握了诀窍…」
	ELSE
		PRINTFORML 「呵呵呵，其实只是想和你一起做料理而已」
	ENDIF
;【L ［你］は［彼女］と一緒に料理をした】
;【W ［料理名］を作ります】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
	IF ABL:30:料理技能 < 2
		PRINTFORML 「完成了…非常有达成感呢，这个」
	ELSEIF ABL:30:料理技能 < 4
		PRINTFORML 「嗯，看起来很好吃的样子」
	ELSE
		PRINTFORML 「毫无疑问，做出了美味的料理♪」
	ENDIF
;【▼そのまま下の口上へ】

	RETURN 1
CASE "成功報告時"
;報酬：\500
;【▲上の口上から続き】
	IF TALENT:恋慕
		PRINTFORML 「谢谢你和我约会。」
		PRINTFORML 「是，这是奖励。」
	ELSE
		PRINTFORML 「谢谢你教我」
		PRINTFORML 「约定的报酬，就支付给你了」
	ENDIF
	PRINTFORML 「做好的料理马上来尝尝吧」
;【報酬獲得】
;【L できた料理は二人いっしょに頂いた】
;【吃飯効果（料理打分）】

	RETURN 1
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼05：関于特訓
;==================================================
@M_KOJO_IRAI_5_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「弾幕勝負、能陪我一下吗」
	PRINTFORML 「人的身体要经过怎样的锤炼才能拥有那样的力量呢…」
	PRINTFORML 「请让我直接讨教一番吧」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	PRINTFORMW 「非常感谢。已经准备好了，什么时候都可以哦」
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
	PRINTFORML 「那么我们開始吧」
;【W ［你］は［彼女］と弾幕ごっこの特訓をした】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
	PRINTFORML
	IF RAND:2 == 1
		PRINTDATADL
			DATAFORM 最终以%CALLNAME:MASTER%漂亮的逆转获胜告终
			DATAFORM 在你来我往的攻防后,%CALLNAME:MASTER%终于获胜
		ENDDATA
		PRINTDATAW
			DATAFORM 「我也要更加精进才行啊」
			DATAFORM 「真厉害啊…」
			DATAFORM 「你的强大真是难以捉摸啊。如果还有机会讨教的话，拜托了。」
		ENDDATA
	ELSE
		PRINTDATADL
			DATAFORM 最终以映姬漂亮的逆转获胜告终
			DATAFORM 在你来我往的攻防后,映姬终于获胜
		ENDDATA
		PRINTDATAW
			DATAFORM 「总算保住了面子」
			DATAFORM 「出现了日常行为的差异啊……实际上的实力相当接近。」
			DATAFORM 「……下次也不一定是同样的结果。我还需要继续努力。」
		ENDDATA
	ENDIF

	PRINTFORML 「那我们来回顾一下今天比试的全过程吧」
	PRINTFORMDW 特训结束后,和映姬进行了长时间的感想讨论...
;【▼そのまま下の口上へ】
	RETURN 1
CASE "成功報告時"
;報酬：\500
;【▲上の口上から続き】
	PRINTFORML
	PRINTFORML 「今天谢谢您的陪伴」
	PRINTFORML 「这也让我有机会重新审视自己的实力」
	PRINTFORMW 「如果有机会的话,还请多多指教」
;【報酬獲得】
	RETURN 1
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼06：誰来告訴我！
;==================================================
@M_KOJO_IRAI_6_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「需要外界的知识 」
	PRINTFORML 「如果要请教，你是最合适的吧」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
	IF IS_LIBRARY(CFLAG:MASTER:現在位置) && TARGET == CLIENT_ID
	;［查資料］と［進行解答］が重なっている場合
	;【◆口上】
	;【L ［你］は［彼女］の疑問に答えるために［現在地］を訪れた】
	;【L ここなら役に立つ資料が見つかりそうだ】
	;【INPUT（查資料/進行解答）】
	;【查資料＞［你］と［彼女］は［現在地］で調べ物をした】
	;【▼そのまま下の口上へ】
	;【進行解答＞［進行解答］へジャンプ】

		RETURN 0
	ELSEIF IS_LIBRARY(CFLAG:MASTER:現在位置)
	;［查資料］をした時、依頼主ではない口上主がTARGETの場合
	;【◆口上】
	;【［你］は［現在地］で調べ物をした】
	;【▼そのまま下の口上へ】

		RETURN 0
	ELSE
	;［進行解答］時（依頼主がTARGET）
	;【◆口上】
	;【L ［你］は［彼女］の疑問に答えた】
	;【成功：［彼女］の疑問は氷解した！】
	;【失敗：［彼女］は納得できなかったようだ……】
	;【▼そのまま下の口上へ】

		RETURN 0
	ENDIF
CASE "依頼実行直後"
	;【▲上の口上から続き】
	;【◆口上】
	SELECTCASE CFLAG:CLIENT_ID:依頼状況
	CASE 2
	;［查資料］をした時
		IF ROLE == "CLIENT"
		;一緒に［查資料］をした時

			RETURN 0
		ELSEIF ROLE == "TARGET"
		;依頼主ではない口上主の前で［查資料］をした時

			RETURN 0
		ENDIF
	CASE 3
	;成功した時
	;【▼そのまま下の口上へ】
		PRINTDATAL
			DATAFORM 「我明白了...非常有参考价值」
			DATAFORM 「...果然还是向知情者求教最好呢」
			DATAFORM 「...原来是这样啊」\n「就算我自己研究也得不出这些信息」
		ENDDATA
		RETURN 1
	CASE 6
	;失敗した時
	;【▼そのまま失敗報告時の口上へ】
		PRINTDATAL
			DATAFORM 「嗯嗯?」\n「这好像不对啊...?」
			DATAFORM 「...虽然很感谢您的指点,但」\n「我觉得您的解释存在逻辑问题」
			DATAFORM 「...话说回来确实合理,但是」\n「总感觉哪里很不对劲的样子...?」
		ENDDATA
		RETURN 1
	ENDSELECT
CASE "成功報告時"
;報酬：\500

	RETURN 0
CASE "失敗報告時"
	PRINTFORML 「抱歉占用了您的时间,但」
	PRINTFORMW 「我还是无法理解...」
	PRINTFORML 「...报酬先给您」
	PRINTFORML
	PRINTFORMDL 所持金 ＋500円
	MONEY += 500
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼07：大掃除還沒結束
;==================================================
@M_KOJO_IRAI_7_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置 || TALENT:恋人
		PRINTFORML 「果然不收拾房间的话，不好看吧？」
	ELSE
		PRINTFORML 「虽然是很不好意思的事情，但是无论如何都忙不过来，所以就推迟了…」
		PRINTFORML 「可以请您帮忙吗?」
	ENDIF
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	IF CFLAG:30:初期位置 == CFLAG:MASTER:初期位置 || TALENT:恋人
		PRINTFORMW 「干净利落的收拾一下吧」
	ELSEIF TALENT:30:恋慕
		PRINTFORMW 「真的、抱歉、拜托你了」
	ELSE
		PRINTFORMW 「非常抱歉。拜托了」
	ENDIF
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
	IF YOGORE:(GET_CHARAHOME(TARGET)) < 1000
	;先に掃除してしまっていた場合
	PRINTFORML 「啊…变漂亮了吗?」
	;【W ［彼女］的房間は十分にきれいだ】
	;【▼そのまま下の口上へ】

		RETURN 1
	ELSE
	;一緒に掃除場合
	;【◆口上】
	PRINTFORML 「二人すれば、すぐ終わりますね」
	;【▼そのまま下の口上へ】

		RETURN 1
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "成功報告時"
;報酬：\1500
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼08：送信
;※この依頼は角色によっては発生しません
;==================================================
@M_KOJO_IRAI_8_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	LOCAL = SEARCH_IRAI_EMPTY()
	PRINTFORML 「%K30_C_NAME(MASTER)%，你现在有空吗？」
	PRINTFORML 「如果可以的话，能帮我送这封信就帮大忙了」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	PRINTFORML 「非常感谢。那么，%K30_C_NAME(IRAI_SLOT_TO_PERSON(LOCAL))%的信，确实寄存了。」
	PRINTFORML 「虽然不是很急，但请不要忘记交给她。」
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"
	PRINTFORML 「是这様吗…」
	PRINTFORML 「没办法。请把信还给我」
	RETURN 1
CASE "依頼実行直前"
;○この依頼では手紙を渡される側の口上です
;【◆口上】
	PRINTFORML 「那就是…来自%K30_C_NAME(CLIENT_ID)%的\@ CLIENT_ID == 49 ? 报告吧 # 信… \@」
;【W ［你］は［彼女］に預かっていた手紙を渡した】
;【▼そのまま下の口上へ】
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	IF CLIENT_ID == 49
		PRINTFORML 「%K30_C_NAME(MASTER)%，谢谢你的到来。」
		PRINTFORM 「如果你见到她
		PRINTDATAL
			DATAFORM 能请你说点感谢的话吗?她总是报告得很快，真是帮了大忙。」
			DATAFORM 告诉她，让她负责管理真是帮了大忙，把这回礼交给她。」
			DATAFORM 能请您转告他我这边没有问题，请继续拜托他吗」
		ENDDATA
		SIF DIARY:30:17 == 0
			CALL K30_WRITE_DIARY(17)
	ELSEIF !STRCOUNT(CSTR:30:0, "変Ｔ")
		PRINTFORMW 「…………………………………诶诶…」
		PRINTFORML 「…不会吧……………………………」
		PRINTFORMW 「…………这样的事……」
		PRINTFORMW 「……………………………」
		PRINTFORMW 「赫卡提亚大人，请转告她我知道了…」
		CALLF FIRSTTIME("変Ｔ指令")
	ELSE
		PRINTFORML 「莫非、%\@ K30_CHECK_HEN_T() ? 这 # 那 \@%的制服被取消了……」
		PRINTFORMW 「………………………………………………」
		PRINTFORML 「………果然……不行吗…」
		PRINTFORMW 「………………………」
		PRINTFORMW 「赫卡提亚大人我%TEXTR("明白了/马外套手/日后答复/")%、能请帮转告一下吗？…」
	ENDIF
	SIF CLIENT_ID == 113 && DIARY:30:18 == 0
		CALL K30_WRITE_DIARY(18)
	RETURN 1
CASE "成功報告時"
;報酬：素材4つ

	RETURN 0
CASE "失敗報告時"
	PRINTFORML 「%K30_C_NAME(MASTER)%，你忘了什么吗…？」
	PRINTFORML 「……这不是我一个人的问题，我也很为难」
	PRINTFORML 「以后请注意」
	CALL CHANGE_CFLAG(4, 30, -10)
	PRINTFORML 映姬用略带恐怖的眼神瞪着我…
	TALENT:30:心情 = MIN(TALENT:30:心情, 0)
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼09：誰的遺失物
;==================================================
@M_KOJO_IRAI_9_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「%K30_C_NAME(MASTER)%、这是积累善行的好机会」
	PRINTFORML 「这是谁的失物。请帮我找出来并送去」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼では落とし物を渡される側の口上です
PRINTFORML 「啊拉…？那是…我的…？」
PRINTFORML 「为什么%K30_C_NAME(MASTER)%…？」
;【W ［你］は［彼女］に預かっていた落とし物を返した】
;【▼そのまま下の口上へ】

	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
PRINTFORML 「是这様吗。%K30_C_NAME(CLIENT_ID)%是你帮我找到的…」
PRINTFORML 「%K30_C_NAME(MASTER)%、%K30_C_NAME(CLIENT_ID)%你能把失物还给我吗？」
PRINTFORML 「%K30_C_NAME(MASTER)%也给您添麻烦了。非常感谢」
	RETURN 1
CASE "成功報告時"
;報酬：上級素材

	RETURN 0
CASE "失敗報告時"

	RETURN 0
CASE "依頼報告不要"

	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼10：怎麼也找不到（場所探しパターン）
;==================================================
@M_KOJO_IRAI_10_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「帮我寻找一下遗失的物品、可以接受吗？」
	PRINTFORML 「……虽然只是这里的讲话，我的部下还不知道」
	PRINTFORML 「在被意识到丢失前，我想悄悄的把它放回去」
	PRINTFORML 「请尽量保密，可以吗」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;【◆口上】
;【W 中奖了を探していた［你］はついに探していた落とし物を発見した】
;【▼そのまま下の口上へ】
	IF ROLE == "CLIENT"
	;依頼主である口上主と一緒に発見した場合

		RETURN 0
	ELSEIF ROLE == "TARGET"
	;発見した時、依頼主ではない口上主がTARGETの場合

		RETURN 0
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	IF ROLE == "CLIENT"
	;依頼主である口上主と一緒に発見した場合

		RETURN 0
	ELSEIF ROLE == "TARGET"
	;発見した時、依頼主ではない口上主がTARGETの場合

		RETURN 0
	ENDIF
CASE "成功報告時"
;報酬：上級素材2つ

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼11：怎麼也找不到（人物探しパターン）
;==================================================
@M_KOJO_IRAI_11_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「帮我寻找一下遗失的物品、可以接受吗？」
	PRINTFORML 「……虽然只是这里的讲话，我的部下还不知道」
	PRINTFORML 「在被意识到丢失前，我想悄悄的把它放回去」
	PRINTFORML 「请尽量保密，可以吗」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼では失くしもの持っていた側の口上です
PRINTFORML 「那样的话…是不是我寄存的这件东西?？」
;【W 聞き込みを続けていた［你］はついに探していた落とし物を発見した】
;【▼そのまま下の口上へ】
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
PRINTFORML 「能找到主人真是太好了」
PRINTFORML 「早点给%K30_C_NAME(CLIENT_ID)%送去，让她安心比较好哦」
	RETURN 1
CASE "成功報告時"
;報酬：\3200

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼12：懲らしめて！
;==================================================
@M_KOJO_IRAI_12_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	LOCAL = SEARCH_IRAI_EMPTY()
	PRINTFORML 「可以打扰一下吗?」
	PRINTFORML 「作为阎王的代理，我想让你和她安排一个弹幕比斗」
	PRINTFORML 「我和部下直接前往的话，问题可能会扩大…」
	PRINTFORML 「在这一点上，如果站在你的立场，结果如何，双方都不会起什么风波」
	PRINTFORML 「怎么样，能拜托您吗?」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	PRINTFORML 「非常感谢」
	PRINTFORML 「那么，和%K30_C_NAME(IRAI_SLOT_TO_PERSON(LOCAL))%的弹幕胜负，交给你了」
	PRINTFORML 「还有需要注意的是…」
	SELECTCASE ABL:MASTER:戦闘能力
		CASE 1, 2
			PRINTFORML 「不要勉强，没关系的，请彼此都不要受伤。」
		CASE 3, 4
			PRINTFORML 「以两位的实力，搞不好连周围的人也会卷入其中」
			PRINTFORML 「请不要做得太夸张」
		CASE IS > 4
			PRINTFORML 「如果你们认真的话，附近一带就会变成废墟」
			PRINTFORML 「好吗，请千万不要让『大事』发生」
	ENDSELECT
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼では討伐される側の口上です
	IF CANNOT_DANMAKU() == 1
	;屋内のとき（勝負できない）
	;【◆口上】
	;【W 屋外で挑もう…】

		RETURN 0
	ELSEIF CANNOT_DANMAKU() == 2
	;仕事中（勝負できない）
	;【◆口上】
	;【W お取り込み中だ…】

		RETURN 0
	ELSEIF CANNOT_DANMAKU() == 3
	;你が疲労中（勝負できない）
	;【◆口上】
	;【W 今は疲れている…】

		RETURN 0
	ELSEIF CANNOT_DANMAKU() == 4
	;口上主が疲労竜（勝負できない）
	;【◆口上】
	;【W 今挑むのはフェアじゃない…】

		RETURN 0
	ELSEIF CANNOT_DANMAKU() == 5
	;既に今日一度弾幕勝負をしている（勝負できない）
	;【◆口上】
	;【W 今日はもう挑めない…】

		RETURN 0
	ELSE
	;【◆口上】
	;【W 勝負開始！！】
	;【以降はそのまま弾幕口上が呼ばれます】

		RETURN 0
	ENDIF
	;【▼そのまま下の口上へ】
CASE "依頼実行直後"
;○この依頼では討伐される側の口上です
	IF CFLAG:CLIENT_ID:依頼状況 == 2
		IF CANNOT_DANMAKU() == 0
			;败犬
			;【▲上の口上から続き】
			;【L ［彼女］の討伐に失敗した……】
			;【W ……こうなったら後日出直すしかない】
			;【◆口上】
			RETURN 0
		ELSE
			;挑めなかった場合
			;【▲上の口上から続き】
			;【◆口上】
			RETURN 0
		ENDIF
	ELSEIF CFLAG:CLIENT_ID:依頼状況 == 3
	;勝利
	;【▲上の口上から続き】
	;【W ［彼女］を懲らしめた！】
	;【◆口上】

		RETURN 0
	ENDIF
CASE "成功報告時"
;報酬：賞金（時価）

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼13：好吃的魚が食べたいなぁ
;==================================================
@M_KOJO_IRAI_13_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「我想慰劳一下平时努力的部下。」
	PRINTFORML 「我没有好的沟通渠道，能请您代为转达吗?」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
;【◆口上】
;【L ［你］は［彼女］に好吃的魚を渡した】
;【L 何だか生きる希望がわいてきたよ。】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】

	RETURN 0
CASE "成功報告時"
;報酬：白米３個

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼16：お悩み相談
;==================================================
@M_KOJO_IRAI_16_KX(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	IF TALENT:30:思慕
		PRINTFORML 「%K30_C_NAME(MASTER)%、也许是无聊的话…」
		PRINTFORML 「可以稍微请您听一听吗？」
	ELSE
	    PRINTFORML 「您现在有空吗?」
	    PRINTFORML 「有些事想请教您」
	ENDIF
	RETURN 1
CASE "依頼非受託時"
	IF TALENT:30:思慕
		PRINTFORML 「是这様吗…」
		PRINTFORML 「不…没什么大不了的，请不要放在心上」
	ELSE
	    PRINTFORML 「是吗」
	    PRINTFORML 「那请先忙您的事」
	ENDIF
	RETURN 1
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"
	PRINTFORML 「不用特意去确认」
	PRINTFORML 「只是，听一下就可以了…」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORML 「………」
	PRINTFORML 「你就那么不想听吗？」
	RETURN 1
CASE "依頼実行直前"

	RETURN 0
CASE "依頼実行直後"
	IF TALENT:30:思慕
	;正解の選択肢
	IF TFLAG:193 == 1
		IF TFLAG:194 == 2
			PRINTFORML 「是啊…果然是这样啊」
			PRINTFORML 「谢谢，成功参考了…」
		ELSE
			PRINTFORML 「原来如此…」
			PRINTFORML 「非常好的参考」
		ENDIF
	;ハズレの選択肢だったが逆に正解
	ELSEIF TFLAG:193 == 2
		PRINTFORML 「！！！」
		PRINTFORML 「哦，是真的吗？？」
		PRINTFORML 「谢谢，成功参考了。」
	;ハズレの選択肢
	ELSEIF TFLAG:193 == -1
		PRINTFORML 「………」
		PRINTFORML 「…%TEXTR("你不是随便敷衍的吧/真心…是这么想的/")%？」
	;正解の選択肢だったが逆にハズレ
	ELSEIF TFLAG:193 == -2
		PRINTFORML 「………」
		PRINTFORML 「…你不会稍微修饰一下吗？」
	ENDIF
	SIF DIARY:30:27 == 0
		CALL K30_WRITE_DIARY(27)
	ELSE
	    PRINTDATAL
	        DATAFORM 「啊,您说的对」\n「我不该多问的」
	        DATAFORM 「您很清楚这件事就最好不过了」
	        DATAFORM 「是的,您说得对」\n「我本不该问这个」
	    ENDDATA
	ENDIF
	RETURN 1
CASE "成功報告時"
;報酬：野菜か果物
	PRINTFORML
	IF TALENT:30:思慕
		PRINTFORML 「这礼物只是一点心意」
		PRINTFORML 「这边请」
	ELSE
	    PRINTFORML 「那就请您也继续努力」
	ENDIF
	RETURN 1
CASE "失敗報告時"
	PRINTFORML 「嘛，总之…」
	PRINTFORML 「谢谢你的倾听。…」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
CASE "口上委託率"
;＜この依頼特有の分岐です。(RESULT:100の値)％の確率で"口上専用"が発生します＞
	RESULT:100 = 100

;＜RESULT:YYに0以外の数値を入れると、該当のお悩みを発生させなくできます（詳しくは一般依頼16_お悩み相談参照）＞
;1,2:弾幕ごっこの悩み 3,4:晩酌の悩み 5,6:本の悩み 7,8:香料の悩み
;9,10:音楽の悩み 11,12:服の悩み 13:髪型の悩み 14:参拝の悩み 15:ダイエットの悩み
;16,17:菜園の悩み 18:休日の悩み 19:人気の悩み 20:集中力の悩み 21:御三家の悩み 22:進化の悩み
	VARSET RESULT, 1, 1, 23
	RETURN 1
CASE "口上専用"
;＜この依頼特有の分岐です。(口上委託率)％の確率で発生します＞
;16,お悩み相談 の場合
;RESULT        発生判定,0だと発生しません
;RESULT:1      正解の選択肢（ただしRESULT:2が0だと、一定確率で逆にハズレる）
;RESULT:2      逆張り正解／ハズレ判定の消去,1だと逆張りが無くなります
;RESULTS:0     お悩み文章（自動で『』で囲まれます）
;RESULTS:1～3  選択肢１～３
;何も発生しない状態になると無限ループになるので注意してください
;●追記メモ
;RESULT:1を4～6にするとそれぞれ1～3がハズレ（残り2つが正解）になります
;RESULT:1を7にするとどれも正解になります
;RESULT:1を8にするとどれもハズレになります
;1～3以外の場合は逆張り判定が自動で無くなります
IF TALENT:30:思慕
	SELECTCASE RAND:4
		CASE 0
			RESULTS:0 = 如果要约心仪的人出去玩...』\n   『你觉得怎么邀请比较好?
            RESULTS:1 = 直接坦白心意
            RESULTS:2 = 装作是随意的邀请
            RESULTS:3 = 不遮掩直接邀请
			RESULT:1 = 6
			RESULT:2 = 1
		CASE 1
            RESULTS:0 = 假设要和心仪的人约会...』\n   『你觉得去哪里比较好?
            RESULTS:1 = 人多的地方
            RESULTS:2 = 两人独处的安静场所
            RESULTS:3 = 直接开房
			RESULT:1 = 6
			RESULT:2 = 1
		CASE 2
            RESULTS:0 = 仅就一般情况说...』\n   『你觉得什么样的神明会更受人欢迎?
            RESULTS:1 = 坚守教条,不通融的神明
            RESULTS:2 = 开朗友善的神明
            RESULTS:3 = 亲切又对所有人温柔的神明
			RESULT:1 = 4
			RESULT:2 = 0
			TFLAG:194 = 2
		CASE 3
            RESULTS:0 = 嗯...其实很无聊的问题但』\n   『大家会在意胸部大小吗?
            RESULTS:1 = 端庄的也不错
            RESULTS:2 = 有总比没有好
            RESULTS:3 = 大的最棒
			RESULT:1 = 4
			RESULT:2 = 0
			TFLAG:194 = 2
	ENDSELECT
ELSE
	SELECTCASE RAND:4
		CASE 0
            RESULTS:0 = 如果我要给你奖赏,你觉得会是什么?』\n
            RESULTS:1 = 罪恶奖
            RESULTS:2 = 罪恶奖
            RESULTS:3 = 罪恶奖
			RESULT:1 = 7
			RESULT:2 = 1
		CASE 1
            RESULTS:0 = 如果你来听我的教诲,』\n   『你觉得什么频率比较好?
            RESULTS:1 = 每天
            RESULTS:2 = 一周7次
            RESULTS:3 = 每小时一次
			RESULT:1 = 7
			RESULT:2 = 1
		CASE 2
            RESULTS:0 = 你觉得不遵守我的教诲死后会怎样?
            RESULTS:1 = 下地狱
            RESULTS:2 = 下地狱
            RESULTS:3 = 下地狱
			RESULT:1 = 7
			RESULT:2 = 1
		CASE 3
            RESULTS:0 = 你觉得你现在最该做什么事?
            RESULTS:1 = 积累善行
            RESULTS:2 = 努力做善事
            RESULTS:3 = 行善
			RESULT:1 = 7
			RESULT:2 = 1
ENDSELECT
ENDIF
ENDSELECT
;==================================================
;依頼口上・固有依頼101：
;固有依頼の仕様は角色によって異なりますが依頼番号は101～で共通です
;"依頼名"部分に依頼名を入れて下さい
;==================================================
@M_KOJO_IRAI_お説教たいむ_K30(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
;サボりが一瞬でバレるくらいだし、場所だって丸わかりでいいんじゃないかと
SELECTCASE GET_MAPID(CFLAG:[[小町]]:現在位置)
	CASE 0
		LOCALS = 博麗神社近辺
	CASE 1
		LOCALS = 命蓮寺辺り
	CASE 2
		LOCALS = 人里辺り
	CASE 3
		LOCALS = 紅魔館近辺
	CASE 4
		LOCALS = 永遠亭辺り
	CASE 5
		LOCALS = 香霖堂
	CASE 6
		IF GET_MAPID(CFLAG:MASTER:現在位置) == 6
			LOCALS = どこかその辺
		ELSE
			LOCALS = 人目につかない場所
		ENDIF
	CASE 7
		LOCALS = 茨華仙の屋敷
	CASE 8
		LOCALS = 守矢神社近辺
	CASE 9
		LOCALS = 旧都辺り
	CASE 10
		LOCALS = 月都の近辺
	CASEELSE
		LOCALS = 訳のわからない場所
ENDSELECT
SIF CFLAG:[[小町]]:現在位置 % 100 == 99 && MAIN_MAP != 6
	LOCALS = 自分的房間
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「%K30_C_NAME(MASTER)%、可以帮我把这封信送到小町吗？」
	PRINTFORML 「……是的，所写的内容如您所料」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	PRINTFORML 「非常感谢。所以，这是最重要的小町的住所…」
	PRINTFORM 「%TEXTR("大多/反正/大概/")%%LOCALS%
	IF LOCALS == "自分的房間"
		PRINTDATAL
			DATAFORM 应该还在睡觉」
			DATAFORM 在里面翻来覆去偷懒吧」
		ENDDATA
	ELSE
		PRINTDATAL
			DATAFORM 闲聊摸鱼是这样的吧」
			DATAFORM 是去偷懒了吧」
			DATAFORM 摇摇晃晃是这样吧」
			DATAFORM 应该还在睡午觉」
		ENDDATA
	ENDIF
	PRINTDATAL
		DATAFORM 「真的……说几次才知道呢」
		DATAFORM 「呀累呀累……这次要找什么借口呢」
		DATAFORM 「真是的……如果再不端正一点就麻烦的是那个孩子」
		DATAFORM 「真的……什么时候才能认真呢」
	ENDDATA
	RETURN 1
CASE "依頼確認時"
	PRINTFORML 「哦呀？　%LOCALS%我想肯定是在…」
	PRINTFORML 「因为是小町，所以又在哪里摇摇晃晃的吧」
	PRINTFORML 「对不起，能再帮忙找找周围吗?」
	RETURN 1
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"
	;書いた是いけどここには飛ばない
	SETCOLOR 0xFF003C
	IF TALENT:[[小町]]:恋人
		PRINTFORML 「…%CALLNAME:MASTER%，就当是帮助你美丽可爱的恋人吧。」
	ELSEIF TALENT:[[小町]]:恋慕
		PRINTFORML 「…考虑到%TEXTR(@"%CALLNAME:MASTER%/お前さん/")%和你之间的关系，我想拜托你。」
	ELSE
		PRINTFORML 「…%TEXTR(@"%CALLNAME:MASTER%/お前さん/")%、%TEXTR("我想和你谈谈/我有个请求/")%」
	ENDIF
	PRINTDATAL
		DATAFORM 「这封信，或许能不能当作没有呢……」
		DATAFORM 「怎样的代价能让我不生气……」
	ENDDATA
	RESETCOLOR
	RETURN 1
CASE "依頼実行直後"
	;ここにも飛ばない
	SETCOLOR 0xFF003C
	PRINTDATAL
		DATAFORM 「四季大人很可怕？是吗，果然是这样啊……」
		DATAFORM 「说是做不到那种事？想想也是理所当然的吧…」
		DATAFORM 「你说偶尔反省一下比较好吗？ 不要说那种风凉话哦…」
		DATALIST
			DATAFORM 「啊……四季大人的说教啊……」
			DATAFORM 「……我偷懒，其实都是你的错」
			DATAFORM 「…不行吗？ 果然？」
		ENDLIST
	ENDDATA
	RESETCOLOR
	RETURN 1
CASE "成功報告時"
	PRINTFORML 「辛苦了，非常感谢」
	PRINTFORML 「费这么大的工夫也想到此为止了」
	PRINTFORML 「相当相当的难呢」
	RETURN 1
CASE "失敗報告時"
	PRINTFORML 「…你不会是在袒护小町吧?」
	PRINTFORML 「慈悲之心固然重要，但这样做对那个孩子没有好处哦」
	RETURN 1
CASE "依頼報告不要"

	RETURN 0
ENDSELECT

;＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
;依頼口上貂プレの貂プレ
;==================================================
;依頼口上・一般依頼Y：
;==================================================
@M_KOJO_IRAI_Y_KX(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"

	RETURN 0
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"

	RETURN 0
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"

	RETURN 0
CASE "依頼実行直後"

	RETURN 0
CASE "成功報告時"
;報酬：

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_依頼.ERB


code:
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K30
;このままだと地の文が表示されません
;地の文を表示したい方は、下記のコメントアウトを削除して下さい
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
	PRINTFORMW
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

;反発刻印
;LV1
IF TFLAG:21 == 1
	TCVAR:30:372 = 0
;LV2
ELSEIF TFLAG:21 == 2
	TCVAR:30:372 = 0
;LV3
ELSEIF TFLAG:21 == 3
	TCVAR:30:372 = 0
ENDIF

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_刻印取得.ERB

license: unknown


code:
;K30_固有Counter_1_指チュパ
;パラメータ的には口愛撫

;固有Counter可否
@UNIQUE_COUNTER1_ABLE_K30
	SIF !TALENT:30:恋慕
		RETURN 0
	SIF ABL:30:舌 < 2
		RETURN 0
	SIF TEQUIP:PLAYER:50 >= 0 || TEQUIP:PLAYER:51 >= 0
		RETURN 0
	SIF TEQUIP:30:50 != PLAYER && TEQUIP:30:51 != PLAYER
		RETURN 0
RETURN 1

;固有Counterの種別と頻度
@UNIQUE_COUNTER1_FREQUENCY_K30
;ソフト/ベリーソフト/コミュ/着衣/脱衣愛撫/脱衣強要/抱き着き/性交/責め/おねだりの中なら選ぶべし
;タイプによって発生しない状況があるので注意→@COUNTER_TYPE内に発生状況の判定
;よくわかんないので口交と同じカテゴリ
RESULTS = 脱衣愛撫
;発生率、基本値(10)にこの数値を足す
;通常のCounterはプラ舞5以下なので、テストプレイ以外であんまり極端な数字を入れない方がいい
;適当なパラメータ足して丸めとけば極端な数字も出ない、はず
RETURN 10 + (CFLAG:30:積極性 + ABL:30:舌) / 2

;文本
@UNIQUE_COUNTER1_MESSAGE_K30
PRINTFORML 映姬把%CALLNAME:MASTER%的手指引导至嘴边，開始吮吸
PRINTFORML 和\@ TEQUIP:50 == PLAYER ? 膣穴 # 腸内 \@一样，映姬的嘴里也同样热乎乎的，蠕动的舌头在挠着%CALLNAME:MASTER%手指痒痒的。…

;固有Counterのソース等
@UNIQUE_COUNTER1_SOURCE_K30

	;体勢の変更
	;=============================
	CALL TOUCH_SET(SET_FROM_M, 3, 30)
	TFLAG:MASTERの手使用中 ++

	;ソース計算および内部処理系統、調整よくわかんないから口交の弱化版
	;=============================

	SOURCE:30:性行動 += 75
	SOURCE:30:誘惑 += 300
	SOURCE:30:挑発 += 75
	SOURCE:30:征服 += 25
	SOURCE:30:奉仕 += 400
	SOURCE:30:快Ｍ += 120

	EXP:30:口淫経験 ++
	;奉仕FLAG
	TCVAR:30:108 = 1

	;マ斯塔Counter制御、よくわからんけどCCOM口交から引っ張ってきた
	;(ビット立ちで不可 0=摸屁股 1=擁抱 2=接吻 3=胸愛撫 4=肛門愛撫 5=陰蒂愛撫 6=指挿入れ 7=掀裙子)
	;=============================
	;CALL Counter挿入され継続中処理(ARG)
	SETBIT TCVAR:30:26 ,1
	SETBIT TCVAR:30:26 ,2

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_固有カウンター_1_指ちゅぱ.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;奉仕系指令＠椛＆ナズ口上構文お借りしました
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;80,手淫
;==================================================
@M_KOJO_MESSAGE_COM_K30_80
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_80_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ELSEIF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「用手…摩擦吗？」
		PRINTFORMW 「嗯，握着没关系吗？」
		PRINTFORMW 「…啊，对不起，不需要那么大的力量……」
		RETURN 1
	;基本セット
	;これでMASTERが射精する
	ELSEIF NOWEX:MASTER:11
		;慣れてない
		IF EXP:手淫経験 < 10
			PRINTFORML 「手已经黏糊糊的了…」
			PRINTFORMW 「啊，再快点摩擦就好了吗？」
		;顔射待ち
		ELSEIF ABL:精液中毒 >= 5 && ABL:技巧 > 3 && RAND:2 == 1
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「%K30_C_NAME(MASTER)%如果心情好的话，那是最重要的……」
					PRINTFORML 「那个…我想用嘴给你做…好想为你舔啊」
					PRINTFORMW 「……啊，出来了吧？那么……请给我这里——啊—呜」
				CASE 1
					PRINTFORML 「不需要忍耐…就这样用手？　还是在脸上?嘴巴也可以啊?」
					PRINTFORMDL 映姬伸出软舌，舔了舔前列腺液渗出的铃口
					PRINTFORMW 「哼哼~、有你的味道♥ …想要，就这样…射出来♥」
				CASE 2
					PRINTFORML 「啊，好像马上就要出来了吧…不忍耐也可以哦？」
					PRINTFORMDW 映姬用陶醉的眼神对待着爱郎%CALLNAME:MASTER%的肉棒
					PRINTFORML 「我…%K30_C_NAME(MASTER)%的想要、因为已，经不能忍耐了……」
					PRINTFORMW 「就这样，请多给我一些吧♥　―――啊ー嗯」
			ENDSELECT
		;手馴れた手つき
		ELSEIF ABL:技巧 > 3
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「在这里，这样擦的话…」
					PRINTFORML 「哼哼~、看起来很舒服呢…怎么样？ 进步了吧？」
					PRINTFORMW 「所以，我知道已经受不了了…请都射出来♥」
				CASE 1
					PRINTFORML 「嗯…要去了吗？」
					PRINTFORMW 「不用忍耐，没关系…」
				CASE 2
					PRINTFORMW 「啊，刺激不够吗？那么，就这样…」
					PRINTFORMDL 映姬用另一只手紧紧握住爱郎玉袋催促射精…
					PRINTFORMW 「精液想出来的话，请不要客气呀，射出来吧？ 你看……♥」
			ENDSELECT
		;戸惑いながら
		ELSEIF RAND:2 == 1
			PRINTFORML 「嗯，出来吧…？」
			PRINTFORML 「我知道了…就这样用手搓着…」
			PRINTFORMDW 映姬一副认真的表情埋头于摩擦着……
		ELSE
			PRINTFORML 「这个，这样可以吗？不会痛吗？」
			PRINTFORML 「从指尖渗透出来的…马上就要出来了呢」
			PRINTFORMW 「嗯，我知道了，那就这样…」
		ENDIF
	;通常
	;何度も射精した
	ELSEIF TCVAR:30:396 > 4 && RAND:3 == 1 && ABL:指 > 2
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「啊…已经变硬了…」
				PRINTFORMDW 看着不管射出多少次都会耸起的肉棒，映姬看起来很高兴
				PRINTFORMW 「%K30_C_NAME(MASTER)%，我的手很舒服呢……♥」
			CASE 1
				PRINTFORML 「好厉害，%K30_C_NAME(MASTER)%…还没，这么……」
				PRINTFORMDW 映姬一边佩服一边处理着%CALLNAME:MASTER%的肉竿……
		ENDSELECT
	;勃起きってない
	ELSEIF BASE:MASTER:勃起 < 1000 && RAND:3== 1
		PRINTFORML 「啊、软绵绵的…」
		PRINTFORMW 「马上就让你再起……♥」
	;指技量高め
	ELSEIF ABL:指 > 3 && RAND:2 == 1
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「不可思议…明明只是用手帮你做的，连我也心跳得厉害…」
				PRINTFORMDW 映姫出神地对%CALLNAME:MASTER%的阴茎处理着
				PRINTFORML 「好像能传达出郎君的心情呢……」
			CASE 1
				PRINTFORML 「用手的话能知道你的反应很開心。例如，像这样…」
				PRINTFORMDL 映姬握着肉棒的大拇指轻软地揉搓里筋附近…
				PRINTFORMW 「你看，看起来很舒服呢♪那么，下一个……」
				PRINTFORML 「……这是感谢你一直以来为我做的事的回礼。是真的哦？」
				PRINTFORMDW 在用手指玩弄阴茎的同时，映姬笑起来。
			CASE 2
				PRINTFORML 「不给他弄得更温一点的话，心情就不会好起来吧？」
				PRINTFORMDW 映姬为了增加阴茎的滑腻，在龟头上滴了好几次香唾
				PRINTFORMDL 严肃的阎王大人的香艳举动让%CALLNAME:MASTER%欲火飙升…。
				PRINTFORMW 「即使这样…下流也可以。这种事小女子我，只为郎君才做…」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 0
				SELECTCASE  TALENT:MASTER:形状
					;未熟・粗チン
					CASE 1, 2
						PRINTFORMW 「这样看来总觉得很可爱……」
						SIF TALENT:処女 == 0
							PRINTFORMW 「我不在乎大小…」
					;健壮的
					CASE 3
						PRINTFORMW 「你这里果然很大啊……」
						SIF TALENT:処女 == 0
							PRINTFORMW 「那个，像那样…在我里面……♥」
					;光る
					CASE 4
						PRINTFORMW 「你这里果然很奇怪啊……」
						SIF TALENT:処女 == 0
							PRINTFORMW 「好几次…如果被插上的话，我的也…会发光吗……」
					;长疣的・巨根
					CASEELSE
						PRINTFORMW 「无论何时看你的都有点害怕……」
						SIF TALENT:処女 == 0
							PRINTFORMW 「最初…做的时候也是，真的…疼得……」
				ENDSELECT
			CASE 1
				PRINTFORML 「一直在一跳一跳抽搐呢……」
				PRINTFORMW 「而且，也很烫……」
			CASE 2
				;準備出来て経験那个ば1/2でおねだりして欲しいよね
				IF (ABL:30:Ｖ感覚 >= 3 || ABL:30:Ａ感覚 >= 3) && BASE:MASTER:勃起 >= 1000 && RAND:2 ==1
					;潤滑と経験だけ見るガバ判定だけど
					IF PALAM:潤滑 < PALAMLV:2
						PRINTFORMW 「哼哼~…变大了♪接下来，我也……♥」
					ELSE
						PRINTFORML 「……呼呼っ、变大了」
						PRINTFORMW 「这样的话…对我的\@ TCVAR:30:391 > TCVAR:30:393 ? 这里 # 屁股 \@也…呢♥」
						SIF TCVAR:30:391 > TCVAR:30:393
							PRINTFORMDW 映姫有些害羞地指着%SLIT(, 1)%
					ENDIF
				ELSE
					PRINTFORMW 「还是手比较好吧？ 还是……」
				ENDIF
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;81,口交
;==================================================
;映姫様は説教好き→舌と口をよく動かす
;映姫様は[献身的]に[鼓舞]をする素質がある
;以上から映姫様は口交大好き設定になってます
;アニメ付けたついでに分岐増
;-------------------------------------------------
@M_KOJO_MESSAGE_COM_K30_81
CALL TRAIN_MESSAGE
IF SHIRAHU(30)
	CALL K30_BLOW_JOB_ANIME(2)
	PRINTFORML
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_81_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_81_1
#DIM 射出, 2
#DIM 箇所
VARSET 射出
;清洁口交用＠地の文からコピペ
;箇所 = TCVAR:112 MASTERが直前のターンに已射精部位FLAG 1=膣内 2=肛門
;射出:0 = 前ターン中出しされたTARGET_ID
;射出:1 = 前ターンＶorA挿入されていたTARGET_ID
IF TCVAR:MASTER:112 == 1
	射出:0 = MASTER_POSE(SET_V,SET_P,1)
	箇所 = 1
ELSEIF TCVAR:MASTER:112 == 2
	射出:0 = MASTER_POSE(SET_A,SET_P,1)
	箇所 = 2
ENDIF
IF MASTER_POSE(SET_V,SET_P,1)
	射出:1 = MASTER_POSE(SET_V,SET_P,1)
	箇所 = 1
ELSEIF MASTER_POSE(SET_A,SET_P,1)
	射出:1 = MASTER_POSE(SET_A,SET_P,1)
	箇所 = 2
ENDIF
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ELSEIF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 「哎呀…？」
		PRINTFORMW 「做这种下流的事总觉得快没原则了，那个……舔这个就好了吧……」
		PRINTFORMDL 看着%CALLNAME:MASTER%的%TINKO(PLAYER)%映姬不安地问，接着叹了口气
		PRINTFORMW 「只、只为你而做哟…那么，失礼了……嗯唔♥」
		PRINTFORMDW 映姬满脸通红、怯生生地伸出软舌，小心翼翼地从%TINKO_SIMPLE(0)%的前端開始舔…
		RETURN 1
	;基本セット
	;清洁口交
	ELSEIF 射出:0
		;映姫様に中出しした
		IF 射出:0 == 30
			IF ABL:精液中毒 >= 5
				SELECTCASE RAND:4 + (INRANGE(TCVAR:21, 1, 3) * 4)
					CASE 0
						PRINTFORML 「啾…哈姆，嗯…啾ううう……已经没有剩下了呢」
						PRINTFORMW 「……还不够……。要不要再来1回呢？」
					CASE 1
						PRINTFORML 「嗯…漂亮地弄干净了……但是，如果可以的话，请再给我一次…怎么样？」
						PRINTFORMW 「我的\@ TCVAR:102 == 1 ? 这个 # 屁股 \@那么，下次…我会让你舒服的…♥」
					CASE 2
						PRINTFORML 「…是，漂亮地弄干净了♪」
						PRINTFORMW 「但是，\@ BASE:MASTER:勃起 >= 1000 ? 滴答作响 # 看起来还很精神 \@是啊…」
						PRINTFORMW 「接下来…可以给我吗？」
					;こ れ は ひ ど い
					CASE 3
						PRINTFORML 「诶~…\@ TCVAR:102 == 1 ? 自，自己 # 屁、屁股 \@味道的…感想？」
						PRINTFORMW 「非说不可只能说你的精液很好喝…」
						PRINTFORMW 「什么也不说……不行吗？」
						PRINTFORMW 「……那个…\@ TCVAR:102 == 1 ? 稍微…酸了# 稍微…有点苦 \@…是」
					CASE 4
						PRINTFORMW 「确实…射出来之后会变得敏感吧？那么现在的话……啊呜っ」
						PRINTFORMDL 映姬提取剩下的精液后，再次巧妙地使用香舌继续攻击龟头……
						PRINTFORMDW 比平时更加敏锐的快感和映姬的侍奉让%CALLNAME:MASTER%爽的两眼泛白…
						CALL HPH_PRINT("（呵呵…好厉害的表情……也许有点可爱HPH）", "W")
					CASE 5
						PRINTFORMW 「已经变干净了…明明还不够吃…」
						PRINTFORML 「………！　对了对了，这里还足够……啊嗯っ♥」
						PRINTFORMDL 映姬松開嘴，被中出了\@ TCVAR:102 == 1 ? %SLIT(30)% # 肛門 \@用手指一插，把精液刮出来
						PRINTFORMW 「嗯~…呼呼呼~♥　这个琼浆，可不能就这样……」
						PRINTFORML 「啊ー呜っ、啾卟っ、嘞咯…♥」
						PRINTFORMDL 竟然把到手的精液涂在阴茎上，再次继续口交
						PRINTFORMDW 太淫荡的映姬的样子和灵活软舌令%CALLNAME:MASTER%\@ RAND:2 ? 好不容易才忍住连射 # 的阴茎很快就恢复了力量 \@た…
					CASE 6
						PRINTFORML 「嗯~…♥　嗯啾~、嗯姆~……啾噜噜~！」
						PRINTFORMDL 尽管暂时放開了嘴，但映姬马上又開始口交了，已经是没有%CALLNAME:MASTER%的肉棒就活不下去的女人了
						LOCALS:0 '= "", "一边吸着阴茎发出咕嘟咕嘟的声音", "被卵蛋贴着玉颊", "把阴茎吞到极限，顶到喉咙深处"
						PRINTFORMDW %CALLNAME:MASTER%の%LOCALS:(TCVAR:21)%被继续侍奉，不管不顾，一直干下去…
						PRINTFORML （%K30_C_NAME(MASTER)%の…小鸡鸡，很好吃…♥）
						PRINTFORML （\@ TCVAR:102 == 1 ? 在肚子里 # 屁股 \@光靠，不够……嘴里，想要牛奶呀…）
						PRINTFORMW （射嘴里吧…映姬，射满满的…映姬没有你的精华已经不行了…♥）
					CASE 7
						PRINTFORML 「嗯~♥　这样，干净了吗…？」
						PRINTFORML 「啊~…又冒出来，汤汁了…」
						PRINTFORML 「这个也会给你弄干净的……哈呜♥　啾噜…」
						PRINTFORMDW 映姬的热心服务下%CALLNAME:MASTER%的胯间好像永远也不会休息
				ENDSELECT
			ELSEIF ABL:精液中毒 >= 2
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「啊，又硬了……」
						PRINTFORMW 「\@ TCVAR:102 == 1 ? 这里 # 屁股 \@明明只给了那一个……♥」
						PRINTFORMW 「还会……做吧？」
					CASE 1
						PRINTFORML 「啊…啾卟…哈、啾……」
						PRINTFORMW 「……就这样拿出来吗？」
					CASE 2
						PRINTFORML 「诶~…\@ TCVAR:102 == 1 ? 自，自己 # 屁、屁股 \@味道的…感想？」
						PRINTFORML 「别，别问奇怪的事…而且各种各样的…混在一起…」
						PRINTFORMW 「那种事我才不知道……」
				ENDSELECT
			ELSE
				SELECTCASE RAND:3
					CASE 0
						PRINTFORML 「来吧…啾卟…啊姆，啾……」
						PRINTFORMW 「舒服吗？」
					CASE 1
						PRINTFORML 「哈姆…、啾噜…呃……」
						PRINTFORMW 「最好是擦掉，擦掉不好吗？」
					CASE 2
						PRINTFORML 「诶~…\@ TCVAR:102 == 1 ? 自，自己 # 屁、屁股 \@味道的…感想？」
						PRINTFORMW 「……请，请不要问奇怪的事情！」
				ENDSELECT
			ENDIF
		;違う人に中出し
		ELSE
			SELECTCASE ABL:精液中毒
				CASE IS <= 1
					PRINTFORMW 「我说，也太……不太愿意…这样的事…」
				CASE 2, 3, 4
					PRINTFORML 「虽然想帮忙打起精神来……」
					PRINTFORMW 「稍微有点抵触啊…我知道了」
				CASE IS > 4
					SELECTCASE RAND:7
						CASE 0, 4
							PRINTFORMW 「嗯呼…啾卟…rero……」
							PRINTFORML 「啊~、已经够了？」
							PRINTFORMW 「我明明也想要吃的……」
						CASE 1, 5
							PRINTFORML 「是，给你漂亮地弄干净了。」
							PRINTFORMW 「%K30_C_NAME(射出:0)%的味道，已经没剩下了……」
						CASE 2, 6
							PRINTFORML 「真是的，总是让我做这种事……」
							PRINTFORMW 「这样就满足了么？？」
							PRINTFORMW 「……下一个总该不是%K30_C_NAME(射出:0)%……请给…我的……」
						CASE 3
							PRINTFORML 「净让我做这种事……那就稍微问一下」
							PRINTFORMW 「我的嘴和%K30_C_NAME(射出:0)%の\@ LOCAL:2 == 1 ? 那里 # 屁股 \@…哪个更舒服？」
							PRINTFORMDL 映姬笑着看完了无法回答的%CALLNAME:MASTER%，眼睛却没有笑意
							PRINTFORMDW 从背后可以感受到%CALLNAME:(射出:0)%的冷眼…
					ENDSELECT
			ENDSELECT
		ENDIF
	;これでMASTERが射精する
	ELSEIF NOWEX:MASTER:11
		;慣れてない
		IF EXP:精飲経験 < 20
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「诶？　出来了…？」
					PRINTFORMW 「就这样含着就行了…？　嗯…啾噗…」
				CASE 1
					PRINTFORMW 「啊，总觉得有点害怕…！？」
					PRINTFORMW 「诶、不能松開嘴吗？　嗯…啾噜…」
				CASE 2
					PRINTFORMW 「哈姆……啾噜、啾噜……嗯！？」
					PRINTFORMDW 技巧虽拙劣，但映姬极其忘我的侍奉，让%CALLNAME:MASTER%的忍耐不起作用…
			ENDSELECT
		;口内射精
		ELSEIF 射出:1 == 30
			SELECTCASE ABL:精液中毒
				CASE 0, 1
					PRINTFORML （诶~！？　嘴里…射出来！？）
					PRINTFORMDW 映姬虽然很吃惊，但还是为即将射精的阴茎服务……
				CASE 2, 3, 4
					IF RAND:2 == 1
						PRINTFORML （好厉害，气味……）
						PRINTFORMW （但是，我不讨厌…为什么呢…）
					ELSE
						PRINTFORML 「啾噜……嗯姆……哈……」
						PRINTFORMW （咕，在嘴里面，抖的好厉害……）
					ENDIF
				CASE IS > 4
					SELECTCASE RAND:4
						CASE 0
							PRINTFORML 「啾噗…rero……噗哈~」
							PRINTFORMW 「你更喜欢嘴吗？真是没办法♥」
							PRINTFORMW 「肉棒牛奶，我会全部喝掉的……请给我，更多……♥　啊姆~、啾噜…」
						CASE 1
							PRINTFORML 「嗯姆~、啾噗……嗯卟、啾噜…」
							PRINTFORMDW 直到刚才自己的\@ LOCAL:2 == 1 ? 膣内 # 肛門 \@里还插入着的肉棒映姬也不在意污秽，一直在淫靡的吮舔着……
							PRINTFORMW （好想吃……快点，快点……想要……♥）
						CASE 2
							PRINTFORML （\@ LOCAL:2 == 1 ? 在这里 # 屁股に \@不射出来吗……）
							PRINTFORMW 「……我明白了。但是，不把精华多射出来些是不行的哦？…啊，只是……」
							PRINTFORML 「啾吧、嗯嗯~…啾噜……嗯姆~♥」
							PRINTFORMDW 但是很快開关打開了，一脸荡漾的样子，饥渴地含着阴茎…
						CASE 3
							PRINTFORMDL %CALLNAME:MASTER%突然停止了活塞，在映姬的眼前被抹满\@ LOCAL:2 == 1 ? 愛液 # 腸液 \@的阴茎无声地伸出来
							PRINTFORMW 「…是。想放进口吧♥」
							PRINTFORML 「诶诶、好的…啊ー姆~♥」
							PRINTFORML 「嗯卟……啾噜噜~！　叽啵、啾啵……」
							PRINTFORMDW 映姬娴熟地叼着肮脏的阴茎，朝着终点加速檀口的动作…
					ENDSELECT
			ENDSELECT
		;誰かから抜いて口内射精
		ELSEIF 射出:1 > 0
			SELECTCASE ABL:精液中毒
				CASE IS <= 1
					PRINTFORML 「嗯嗯~！？　…嗯呃…姆咕~…」
					PRINTFORMW （讨厌…总觉得有点奇怪的味道……）
				CASE 2 TO 4
					PRINTFORML 「嗯，嗯啾……嗯，嗯……」
					PRINTFORMDW 映姬的口交没有平时献身的样子。果然内心还有抵抗啊…
				CASE IS > 4
					SELECTCASE RAND:4
						CASE 0
							PRINTFORML （%K30_C_NAME(MASTER)%的精液、射映姬嘴里…想要…满满的♥）
							PRINTFORMDW %CALLNAME:(射出:1)%の\@ LOCAL:2 == 1 ? 膣内 # 肛門 \@还没有来得及射出来、映姬就吸住阴茎催促射精…
						CASE 1
							PRINTFORML （%K30_C_NAME(射出:1)%の\@ LOCAL:2 == 1 ? 啊那里 # 屁股 \@比起，我的嘴里……更好哟♥）
							PRINTFORMDW 映姬怀着奇妙的优越感，将爆发前的阴茎吞下……
						CASE 2
							PRINTFORML 「叽噗、叽卟卟~！　啾噜、叽噗~……」
							PRINTFORMDW %SAMEN_DESCRIPTION(PLAYER)%要独占似的，映姬更加淫荡激烈地动着香舌和樱唇…
						CASE 3
							PRINTFORML 「嗯啾…啾呜呜呜~♥　啾噜~……啾噜……啾噜噜~！」
							PRINTFORMDW 映姫の口は%CALLNAME:(射出:1)%の\@ LOCAL:2 == 1 ? 膣 # 肛門 \@用不同的柔软包裹着阴茎…
							PRINTFORML （%K30_C_NAME(MASTER)%会给我吧……%K30_C_NAME(射出:1)%不是……我的，给我的嘴♥）
							PRINTFORMDW 奉献的喜悦快要达到的同时，映姬激烈地吸著快要射精的阴茎…
					ENDSELECT
			ENDSELECT
		;精液中毒高め
		ELSEIF ABL:精液中毒 > 5 && RAND:3 != 1
			SELECTCASE RAND:5
				CASE 0
					PRINTFORML 「是吗…嗯唔，唔呼……你也喜欢吗♪」
					PRINTFORMDL 记住了精液味道的映姬感受到了射精的预兆，一边含着阴茎一边对%CALLNAME:MASTER%说话
					PRINTFORMDW 映姬的香舌碰到了铃口，意想不到的快感袭击了%CALLNAME:MASTER%
					PRINTFORML （%K30_C_NAME(MASTER)%、看起来很称心…♥）
					PRINTFORMDW %CALLNAME:MASTER%的反应，映姬满足地进一步加快了服务的步伐……
				CASE 1
					CALL HPH_PRINT("「不用忍耐哦…没关系，我会马上让你快乐的HPH　嗯姆~…啾噜…」", "L")
					PRINTFORMDW 映姬慈爱着舔着试图寸止的阴茎，真空口交一样紧紧吞着……
					CALL HPH_PRINT("「嗯啾…HPH　滋兹~……嗯呼…啊姆~HPH」", "L")
					PRINTFORMDW 映姬的猛烈地口淫，受不了的%CALLNAME:MASTER%已经到了极限…
				CASE 2
					PRINTFORML 「嗯~………叽噗……、滋兹~……れろっ」
					PRINTFORMDL 映姬的香舌灵活地将%CALLNAME:MASTER%逼入绝境…
					PRINTFORMDW 因为平时说教时经常动嘴，所以自然而然地锻炼了吗？
					CALL HPH_PRINT("「啾卟、啊姆HPH　……嗯姆~HPH　咕噗~！　滋兹~…」", "L")
					PRINTFORMDW 映姬的软舌好像也察觉到了射精近在眼前，像最后的冲刺一样，奉仕变得激烈……
				CASE 3
					CALL HPH_PRINT("「啾卟、啊姆~HPH　……嗯啾~HPH　啾噜~…」", "L")
					PRINTFORMDL 映姬一边时不时地抬头眼神询问%CALLNAME:MASTER%的情况，一边继续全心服务…轻拢慢捻抹复挑
					PRINTFORML （%K30_C_NAME(MASTER)%的精液…♥　想要，满满的…♥）
					PRINTFORMDW 完全被精液俘虏的映姬的口交服务，伴随着强烈的快感催促着%CALLNAME:MASTER%射精……
				CASE 4
					CALL HPH_PRINT("（！！　映姬…给我吧、给映姬…淫荡的嘴巴HPH　满满的HPHHPH）", "L")
					PRINTFORMDW 映姬感受到射精的征兆后，搂着%CALLNAME:MASTER%的腰，将阴茎含到了极限
					CALL HPH_PRINT("「嗯呃~………嗯嗯ーっHPH　嗯呃~……………嗯呼呼~HPH」", "L")
					PRINTFORMDW 映姬目泛泪光，阴茎仍固定在喉咙深处，眼白上翻催促射精…
			ENDSELECT
		;それ以外
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORML 「啊，好大啊…嗯…、拿出来吧……」
					PRINTFORMDW 映姬含着龟头，像魅魔一样要把阳具吸出来似的催促射精
				CASE 1
					PRINTFORMW 「不用忍耐，也可以的…让我们一起舒服吧…」
					PRINTFORMW 「啊姆、嗯…啾…嗯、滋兹」
				CASE 2
					PRINTFORML 「要出来了吗？嗯，没关系的……\@ ABL:精液中毒 > 4 ? 快点让我喝你的“琼浆玉液”吧 # 我会好好地全喝掉牛奶的 \@……」
					PRINTFORMW 「所以，不要客气，都射出来吧…」
			ENDSELECT
		ENDIF
	;何度も射精した
	ELSEIF TCVAR:30:396 > 4 && RAND:2 && ABL:舌 > 2
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「呵呵，还不满足啊，这孩子……♪」
				PRINTFORMDW 眼泛爱心地看着正在恢复硬度的阴茎后，映姬不断吻着肉棒前端……
			CASE 1
				PRINTFORML 「嗯呜……啊呜，嗯…♪　已经，这样了…」
				PRINTFORML 「连这种事情，都为你做了，%CALLNAME:MASTER%，请用我的嘴，变得更舒服……」
		ENDSELECT
	;勃起きってない
	ELSEIF BASE:MASTER:勃起 < 1000 && RAND:2 == 1 && ABL:舌 > 2
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「啊，还很柔软的…」
				PRINTFORMW 「是、会叫醒你的……用我的嘴♪　嗯姆、啾~…」
			CASE 1
				PRINTFORML 「哼哼~、如果是这个大小的话…啊ー姆♪　嗯、呼、啾噜…」
				PRINTFORMDW 映姬把阴茎含的比平时更深，并同时刺激龟头和枪杆
				PRINTFORMW 「嗯姆……嗯呼、……嗯呃~………」
		ENDSELECT
	;舌技能高め＠なげーよ、確率下げよ
	ELSEIF ABL:30:舌 > 2 && RAND:3 == 1
		SELECTCASE RAND:5
			CASE 0
				PRINTFORMDL 仔细为龟头服务的映姬，发出了“叽啵”的一声，放開了嘴
				PRINTFORMW 「啊，%K30_C_NAME(MASTER)%……偶尔忍耐一下吧？」
				PRINTFORMDL 映姬伸长香舌，从阴茎的根部開始到尿道、背部用舌尖慢慢地舔起来…
				PRINTFORMDW 受到刺激而涌出的先行汁液映姬也只是用细舌轻舔着而已，持续着令人着急的侍奉……绛唇渐轻巧，云步转虚徐
				PRINTFORMDL 对焦急样子的%CALLNAME:MASTER%，映姬妖艳地微笑着…
				CALL HPH_PRINT("「总是被欺负，这是回击哦，你平时总是这样開心吧？HPH」", "W")
			CASE 1
				PRINTFORMDL 热心侍奉的映姬越来越可爱，慰劳般地摸了摸她的头
				CALL HPH_PRINT("「！？………嗯呼っHPH　嗯呼呼~…HPHHPH」", "L")
				PRINTFORMDL 继续抚摸的话，她的笑颜就更加淫靡，侍奉也会更加热情
				PRINTFORMDW 也许是立场上不习惯被夸奖，映姬看起来很開心…
				CALL HPH_PRINT(@"「嗯~HPH　嗯~HPH　哈姆~……啾噜噜~！」", "L")
				CALL HPH_PRINT(@"（%K30_C_NAME(MASTER)%…很高兴HPH　用我的口…HPH）", "L")
				CALL HPH_PRINT(@"（更加…舒服了HPH　希望能得到更多、更多、更多的奖励…HPH）", "W")
			CASE 2
				CALL HPH_PRINT("「啊姆~…嗯~HPH　嗯~HPH　嗯啾………滋兹~」", "L")
				PRINTFORMDW 映姬似乎迫不及待地要精饮，热心地继续为阴茎侍奉……
				PRINTFORMDL 这算是被阎王爷施以涩情的『拔舌』之刑么，%CALLNAME:MASTER%在想无聊的事情。
				CALL HPH_PRINT("「嗯啾~HPH　滋兹~……嗯啾、嗯呼っ…HPH」", "W")
			CASE 3
				CALL HPH_PRINT("「啾噜噜地！　嗯~HPH　嗯呼っ…HPH　啾噜地！」", "L")
				PRINTFORMDL 映姫は%TEXTR("发出特别大的下流声音/用柔软的颊肉抚慰/不停地转动香舌")%同时含着%TINKO(PLAYER)%
				PRINTFORMDW 和往常不同，被人看到了不体面的样子，%CALLNAME:MASTER%的兴奋会更加高涨
				PRINTFORML 「噗哈~……%K30_C_NAME(MASTER)%、怎么样…刚才的，很舒服…吗？」
				PRINTFORMW 「我也是，为了让你…高兴，做了很多调查…很努力哦…♥」
				PRINTFORMDL 一本正经和献身的性格，甚至是平时说个不停锻炼过的粉嫩软舌
				PRINTFORMDW 难不成想说阎王大人的朱唇是为他而生的，真是至福…
			CASE 4
				PRINTFORML 映姬沉浸其中，吮吸%TINKO(PLAYER)%……。
				CALL HPH_PRINT("「啊姆~、叽噗……嗯呼HPH　叽噗HPH　……啾啵~」", "W")
				PRINTFORML 「哈啊…哈啊……啊~、哼哼、半途而废不满意吗?　……那样的话…♪」
				PRINTFORMDW 说完，映姬含住阴茎，開始深喉
				PRINTFORMDL 用喉咙将龟头紧紧地咬住，与平时不一样的快感让%CALLNAME:MASTER%坐立不安…
				PRINTFORMDW 虽然担心会不会很痛苦，但映姬倒不如说陶醉于深喉服务……朱唇咽入香喉时，明眸渐開横秋水
		ENDSELECT
	;通常
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「啊姆~、嗯噗~……啊姆~……嗯姆~」
				PRINTFORMDW 看着只为自己献身侍奉的映姫，%CALLNAME:MASTER%获得了深深的满足感
			CASE 1
				PRINTFORML 「嗯姆…嗯呃~………叽噗~………哈啊~…哈啊…」
				;準備出来て経験那个ば1/2でおねだりして欲しいよね
				IF (ABL:30:Ｖ感覚 >= 3 || ABL:30:Ａ感覚 >= 3) &&( BASE:MASTER:勃起 >= 1000 && RAND:2 ==1)
					;潤滑と経験だけ見るガバ判定だけど
					IF PALAM:潤滑 < PALAMLV:2
						PRINTFORMW 「哼哼~…变大了♪　接下来，我的也…舔一下♥」
					ELSE
						PRINTFORML 「……呼呼っ、变大了」
						PRINTFORMW 「吶、%K30_C_NAME(MASTER)%……\@ TCVAR:30:391 > TCVAR:30:393 ? 这里 # 屁股 \@…准备好了哦♥」
						SIF TCVAR:30:391 > TCVAR:30:393
							PRINTFORMDW 映姫有些害羞地指着%SLIT(, 1)%
					ENDIF
				ELSE
					PRINTFORMW 「怎么办？ 用嘴继续吗？ 还是…」
				ENDIF
			CASE 2
				PRINTFORML 「嗯っ……嗯啾，呸咯，啊呜っ…」
				PRINTFORMDL 映姬没有疲惫的样子，一直舔着%TINKO(PLAYER)%
				PRINTFORMDW 考虑到平时不停说教的体力，这点小事也根本不算什么…
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;82,乳交＠尺寸変えると全て破綻するけどヨシ
;==================================================
@M_KOJO_MESSAGE_COM_K30_82
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_82_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_82_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	ELSEIF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORMW 「榨乳？……」
		PRINTFORMW 「就算你对我说『用胸』夹住…呜，这太下流了」
		PRINTFORMW 「…………………………」
		PRINTFORMW 「是吗…最相爱的人才做，情侣间……我明白了」
		PRINTFORMW 「………………」
		PRINTFORMW 「………」
		PRINTFORMDW 鬱屈 + 5
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	;これでMASTERが射精する
	ELSEIF NOWEX:MASTER:11
		IF ABL:30:胸 < 2 && RAND:3 != 1
			PRINTFORMW 「要出来吗？……那么，就这样…」
		ELSEIF PALAM:欲情 >= PALAMLV:5 && RAND:2 == 1 && ABL:30:胸 > 1
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「呼呼っ、在我这里捅的话…♥」
					PRINTFORMDL 映姬用乳头摩擦里筋，享受阴茎颤颤悠悠的运动……鬓垂香颈云遮藕，粉著兰胸雪压梅
					PRINTFORMW 「啊…好像要出来了……?啊哈♥那么，就那样，请吧…♥」
				CASE 1
					PRINTFORML 「这个，我也…我的乳头…好舒服呀…♥」
					PRINTFORMW 「你也要去吗?好啊，对映姬的欧派…不要客气地挂满吧…♥」
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「好像已经，想要发射了…我的胸口，很舒服吗？呼呼，看你还敢不敢说映姬是“阎萝王”」
					PRINTFORML 「…………♪」
					PRINTFORMW 「请，就这样，射在胸前…♥」
				CASE 1
					PRINTFORML 「好啊，满满的射在我的胸口上……」
					PRINTFORMW 「用我……来变得快乐……」
			ENDSELECT
		ENDIF
	ELSEIF ABL:30:胸 < 2 && RAND:3 != 1 && (EX:Ｂ絶頂 * 10000 + PALAM:快Ｂ + PALAM:欲情 < 30000)
		PRINTDATAW
			DATAFORM （%K30_C_NAME(MASTER)%我想让你更高兴…）
			DATAFORM 「很难啊…这个…」
			DATAFORM 「做得好吗…」
		ENDDATA
	;勃起きってない
	ELSEIF BASE:MASTER:勃起 < 1000 && RAND:2 == 1
			PRINTFORML 「啊…还很柔软的……」
			PRINTFORMW 「呵呵，那我会打起精神的」
	ELSEIF PALAM:欲情 >= PALAMLV:5 && RAND:2 == 1 && ABL:30:胸 > 1
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「哼哼~、哪一个葡萄、更舒服呢♥」
				PRINTFORMDL 映姬左右的乳头交替慢慢地蹭%TINKO(PLAYER)%…皓腕高抬身宛转，销魂双乳耸罗衣
				PRINTFORMDW 为了让刺激而挺尖的乳头贴在背面和铃铛口上，映姬继续全心全意地服务着……夫婿调酥绮窗下，金茎几点露珠悬
			CASE 1
				PRINTFORMDL 映姬说%TINKO(PLAYER)%放在左胸上后，用手从上面按住慢慢地移动身体……
				PRINTFORMDW 被光滑如玉的纤手和小小软酥的胸部夹住，，%TINKO(PLAYER)%更加一柱擎天…。
				PRINTFORML 「这也是夹在胸前的吧？」
				PRINTFORMW 「%K30_C_NAME(MASTER)%に、想让你高兴……怎么样，舒服吗？」
		ENDSELECT
	ELSE
		SELECTCASE RAND:13
			CASE 0 TO 3
				;準備出来て経験那个ば1/2でおねだりして欲しいよね
				IF (ABL:30:Ｖ感覚 >= 3 || ABL:30:Ａ感覚 >= 3) &&( BASE:MASTER:勃起 >= 1000 && RAND:2 ==1)
					;潤滑と経験だけ見るガバ判定だけど
					IF PALAM:潤滑 < PALAMLV:2
						PRINTFORMW 「你好像准备好了…接下来是我的，对吧…♪」
					ELSE
						PRINTFORML 「……呼呼っ、变大了」
						PRINTFORMW 「吶、这样的话……我的\@ TCVAR:30:391 > TCVAR:30:393 ? 这里 # 屁股 \@给……怎么样？♥」
						SIF TCVAR:30:391 > TCVAR:30:393
							PRINTFORMDW 映姫有些害羞地指着%SLIT(, 1)%
					ENDIF
				ELSE
					PRINTFORMW 「虽然很小，但如果能让你高兴的话…」
				ENDIF
			CASE 4 TO 7
				PRINTFORMW 「想让你舒服起来…努力着哦？」
			CASE 8 TO 11
				PRINTFORMW 「即使夹不住、也有能做到的事」
			CASE 12
				PRINTFORML 「不要放弃，我再试一次。」
				PRINTFORMDW  映姬不服输，用腋下夹住%TINKO(PLAYER)%，就算用腋穴侍奉，也要让%CALLNAME:MASTER%舒服
				PRINTFORMDL 苗条纤细的映姬努力让肢体的脂肪夹住……
				PRINTFORML 「…………」
				PRINTFORMDW 映姬把%CALLNAME:MASTER%的龟头上涂满了唾沫，比平时更专注于服务……水晶帘下恣窥张，半臂才遮菽乳香
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;稍微だけ胸部の大きさを気にする映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_82
SIF STRCOUNT(CSTR:30:0, "82/")
	RETURN
SOURCE:鬱屈 += 5
RETURN

;==================================================
;83,素股
;極口上とてもえっちで良かったので素股→挿入を真似してます
;丸パクリは那个なので、攻守交代をはさんでそれっぽくする。ついでに隙あらば肛門挿入を狙ったりするように
;==================================================
@M_KOJO_MESSAGE_COM_K30_83
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_83_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_83_1
#DIM Ｖ可否
#DIM Ａ可否
#DIM 交代可
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	;マグロスイッチオン
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	;初めて
	ELSEIF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TALENT:処女 == 0
			PRINTFORML 「明明是这个姿势……却不是插入…」
		ELSE
			PRINTFORML 「从上面跨过去，怎么这样…」
			PRINTFORMW 「ひっ！　……疑，疑似要进去了的感觉，唔…」
		ENDIF
		PRINTFORMW 「嗯……这样摩擦……你……舒服吗？」
		RETURN 1
	ENDIF
	;挿入可条件を算出
	CALL COM_ABLE24
	交代可 = RESULT && INROOM(CFLAG:現在位置) && !FLAG:99
	CALL COM_ABLE65
	Ｖ可否 = RESULT && 交代可 && BASE:気力 >= 100 && BASE:体力 >= 600 && !TALENT:処女
	CALL COM_ABLE66
	Ａ可否 = RESULT && 交代可 && BASE:気力 >= 100 && BASE:体力 >= 600
	SIF !Ｖ可否 || GET_TARGETNUM() > 1 || NOWEX:MASTER:射精
		GOTO NORMAL
	SIF  !(TALENT:妊娠願望 || GETBIT(CFLAG:1502, 4)) || TCVAR:口服避孕薬
		GOTO NORMAL
	;素股→子作りックス
	IF !TCVAR:口服避孕薬 && ESTRUS_CYCLE(30) >= 100 && PALAM:潤滑 >= PALAMLV:5 && (BASE:MASTER:射精 > (MAXBASE:MASTER:射精 / 2))
		PRINTFORML 「吶，看…♥ 这里，很热…已经，很粘稠了…」
		PRINTFORML 「然而…插进去，不给映姬吗？好想要啊♥」
		PRINTFORMDW 映姬滴着爱蜜，拼命地侍奉着，却总觉得有些不耐烦地扭动着腰。
		PRINTFORML 「嗯嗯~…♥　现在，不上不下的……已经，马上…」
		PRINTFORMDW %CALLNAME:MASTER%\@ TCVAR:MASTER:要去了 ? 的极限接近 # 没有多少余裕 \@意识到这一点，映姬也到了忍耐的极限…
		IF !EX:膣内精液 && ONCE("素股挿入")
			PRINTFORML 「不记得了吗…%K30_C_NAME(MASTER)%」
			PRINTFORML 「今天是…两个人的宝宝，的诞生日」
			PRINTFORMW 「让我当妈妈…重要的日子，的说♥」
		ELSE
			PRINTFORML 「已经忘记了吗？　%K30_C_NAME(MASTER)%、今天射出的话…不是这里吧?」
			PRINTFORMW 「我，最重要的地方…婴儿的房间必须，不塞满…不行♥」
		ENDIF
		IF TEQUIP:MASTER:避孕套
			TEQUIP:MASTER:避孕套 = 0
			PRINTFORML 「所以，把这种东西摘下来…」
			PRINTFORMD 映姬剥下避孕套
			LOCAL = 0
		ENDIF
		PRINTDATADL
			DATAFORM \@ LOCAL ? 映姫将 # \@%CALLNAME:MASTER%紧紧地抱住，用%SLIT(30,1)%夹住阴茎
			DATAFORM \@ LOCAL ? 映姫对 # \@%CALLNAME:MASTER%重新跨坐，让湿溜溜的阴茎顺势滑进去%SLIT(30,1)%
		ENDDATA
		PRINTDATADL
			DATAFORM 就这样紧紧地搂着%CALLNAME:MASTER%，骚浪地開始扭动腰肢
			DATAFORM 膣肉欢喜地颤抖着，妖娆地缠着整根阴茎
		ENDDATA
		IF FLAG:画像表示 && FLAG:挿絵表示
			CALL PRINT_IMAGE_ANIMATION_正常位("正常位_挿入")
			PRINTFORML
		ENDIF
		IF TCVAR:MASTER:要去了
			PRINTFORML 「哈……嗯~♥　呼、嗯ぅうぅ♥好喜欢啊这个肉棒，要飞起来了！飞了啊　…请就这样…给我，在这里，给我♥」
			PRINTFORML 「射出来，之前，我是不会……的♥」
		ELSE
			PRINTFORML 「啊啊…っ♥　啊嗯~♥　就这样，交给我吧♥」
			PRINTFORML 「小宝宝的材料，全部，都收到了♥小映姬是个想要肉棒牛奶的小骚货！给我！给我吧~♥」
		ENDIF
		PRINTFORMW
		PRINTFORMDL 映姬似乎脑子里只剩下榨取种子了
		PRINTFORMDL %CALLNAME:MASTER%放弃挣扎了，只能把自己交给眼泛爱心的映姬…
		PRINTFORMW
		;ステータスを被逆推Ｖ騎乗位に移行
		CFLAG:MASTER:诶嘿嘿 = 2
		CFLAG:诶嘿嘿 = 2
		TFLAG:COMABLE管理 = 3
		TCVAR:30:26 = 0
		CALL CCOMF85(30)
		SELECTCCOM:0:1 = 85
		TCVAR:次回Counter = TCVAR:MASTER:要去了 ? 86 # 88
		CFLAG:积攒度 = MAX(CFLAG:积攒度, 150)
		TCVAR:30:362 = 1
		RETURN 1
	ENDIF
	$NORMAL
	;これでMASTERが射精する
	IF NOWEX:MASTER:11
		;子作り未解禁or幼児育児中で避妊無しで性器にぶっかけ
		IF TEQUIP:MASTER:避孕套 == 0 && K30_CREAMPIE() > 1
			PRINTFORMW 「诶……要中出了吗…不行！等等…」
			PRINTFORMW 「射在那里的话……不是很危险吗！ …啊…」
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「……没有忍耐…吗？」
					PRINTFORMW 「发射出来就行了♥ 乖乖，好快活吶…满满的好满呀……」
				CASE 1
					PRINTFORML 「一跳一跳的……是啊，因为我……」
					PRINTFORMW 「就这样…发射出来，给我，好烫……好多…♥」
			ENDSELECT
		ENDIF
		RETURN 1
	;技巧高い 1/3で下選択肢
	ELSEIF (ABL:腰 >= 3 || ABL:技巧 >= 5) && !RAND:3 == 1
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「啊嗯~、嗯呼…%K30_C_NAME(MASTER)%、啾地、して…♥」
				PRINTFORMDW %CALLNAME:MASTER%将映姬以对面座位的体位抱着，映姬也热情地活动腰部，%SLIT(30)%紧紧贴合……
				PRINTFORMW 「呼啊~…、我喜欢，这个♥ 和你…紧紧地粘在一起……♥好爱你呀」
			CASE 1
				PRINTFORML 「啊、哈啊~………硬硬的……在摩擦呀♥　……ひうっ！」
				PRINTFORMDL 从映姬的%SLIT()%不断地溢出代替润滑液的爱液
				PRINTFORMDW 奉仕的兴奋似乎就这样转化为快乐……
				PRINTFORMW 「你……可以的……全部，我的腿穴来……快乐地给你做♥」
			CASE 2
				PRINTFORML 「…我想让你更…快活……♥」
				PRINTFORMDW 映姬挪动身体用大腿夹住阴茎，開始动了腰身……
				PRINTFORMDW 光滑的大腿舒服得不得了……每次突然摩擦映姬的性器都会让她发出娇声…
		ENDSELECT
	;技巧低い
	ELSEIF (ABL:腰 <= 1 || ABL:技巧 <= 2) && RAND:3 == 1
		PRINTFORML 「啊……你的，那个…滑出去了，别闹了…」
		PRINTFORMW 「比想象中…好难啊，这个……」
		RETURN 1
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「啊、啊，这里…这里，好快乐啊！　……呼啊啊~♥」
				PRINTFORMDL 似乎喜欢雁首挂在阴蒂上的感觉，映姬不断重复着动作……
			CASE 1
				PRINTFORML 「啊啊呃、哈啊~♥　……%K30_C_NAME(MASTER)%も…这里，舒服吗……」
				PRINTFORMDW 映姬把手放在%CALLNAME:MASTER%的阴茎上，与阴唇夹住，继续服务…
			CASE 2
				PRINTFORML 「…哈啊、哈啊…嗯嗯~！……%K30_C_NAME(MASTER)%は，没有，忍耐吗…？」
				IF TALENT:処女 != 0
					PRINTFORMW 「如果是你的话……」
				ELSEIF ABL:Ｖ感覚 <= 1
					PRINTFORMW 「虽然我还很害怕，但是如果是你的话……」
				ELSEIF PALAM:欲情 >= PALAMLV:5
					PRINTFORMW 「我，想要，更多的…♥」
				ELSEIF PALAM:潤滑 > PALAMLV:2
					PRINTFORMW 「我，什么时候，都可以……♥」
				ELSE
					PRINTFORMW 「在我那里，感觉好快乐好美啊……♥」
				ENDIF
		ENDSELECT
	ENDIF
	SIF !Ａ可否 || GET_TARGETNUM() > 1
		RETURN 1
	;尻素股→Ａ挿入
	IF ABL:Ａ感覚 >= 5 && PALAM:欲情 >= PALAMLV:10
		PRINTFORML
		PRINTFORML 「啊呋~…♥　……嗯嗯~、あ……嗯♥」
		PRINTFORMDL 虽然映姬继续尽心奉仕，但总觉得有些不够
		PRINTFORML 「吶、%K30_C_NAME(MASTER)%……♥」
		PRINTDATA
			DATAFORM 「你的这里，也喜欢吧…
			DATAFORM 「更多更多，更舒服的事…怎么样
			DATAFORM 「这种做法也是…有啊…
		ENDDATA
		CALL HPH_PRINT("HPH」", "W")
		PRINTFORMDL %CALLNAME:MASTER%的阴茎从%SLIT()%引导到臀部的裂口，映姬再次開始动起来了腰身。
		PRINTFORMDL 被映姬柔软的手和光滑的臀部夹着，沉浸在与%SLIT()%完全不同的快感中…
		CALL HPH_PRINT("「很厉害，吧HPH　我也可以HPH　非常，舒服…好吗HPH」", "L")
		CFLAG:积攒度 += 50
		IF CFLAG:积攒度 >= 250
			PRINTFORMW
			PRINTFORMDL 激烈的尻素股令%CALLNAME:MASTER%\@ TCVAR:MASTER:要去了 ? 已经接近极限了 # 的阴茎越来越滚烫 \@くる
			PRINTFORMDL 映姬把阴茎贴在屁股上的过程中，也变得更加情欲高涨…
			IF TCVAR:MASTER:要去了
				{
				LOCALS = %TEXTR(@"中出吧…是啊HPH　那么，请在这里，屁股，请给我…HPH
						/啊啊啊っ…HPH　果然，这里！屁股，想要的HPHHPH
						/不行，还不行HPH　因为你的、要射出来、是这里HPH")%
				}
			ELSE
				{
				LOCALS = %TEXTR(@"哈、唔…っHPH　啊、啊啊~HPH　这样，可不够啊！」\n「请给我、%K30_C_NAME(MASTER)%っHPH　屁股上…请给我っHPH
						/啊呜~…HPH　这个、也不错，但是里面……我想要在屁股里…HPH
						/更多…舒服、的…HPH　屁股，更……呐HPH　更多~冤家儿♥我要被你弄死了HPH")%
				}
			ENDIF
			CALL HPH_PRINT(@"「%LOCALS%」", "W")
			PRINTFORMDL 无法忍耐的映姬把贴着的手稍微挪開了一点
			CALL HPH_PRINT(@"「嗯~、嗯嗯~……嘠呼っHPH」", "L")
			PRINTFORMDW 就这样，菊门迅速地饮下阴茎，紧紧地夹住等待已久的东西…
			IF FLAG:画像表示 && FLAG:挿絵表示
				CALL PRINT_IMAGE_ANIMATION_正常位("Ａ正常位_挿入")
				PRINTFORML
			ENDIF
			IF TCVAR:MASTER:要去了
				CALL HPH_PRINT("「嗯呼~…HPH　好厉害、太猛了…HPH」", "L")
				CALL HPH_PRINT("「这里，射出的话…会非常舒服哦HPHHPH」", "L")
				PRINTFORMDL 映姬露出骚浪的表情，像冲刺一样開始动腰…
			ELSE
				CALL HPH_PRINT("「あはっHPH　屁股，非常……快乐HPH」", "L")
				CALL HPH_PRINT(@"「%K30_C_NAME(MASTER)%HPH　动，动起来，动起来，是吧…HPH」", "L")
				PRINTFORMDL 被肛门的快乐所吸引，映姬忘我地摇着腰…
			ENDIF
			PRINTFORMW
			PRINTFORMDL 完全被剥夺了主导权的%CALLNAME:MASTER%听凭映姬的摆布
			PRINTFORMW
			;ステータスを被逆推Ａ騎乗位に移行
			CFLAG:MASTER:诶嘿嘿 = 2
			CFLAG:诶嘿嘿 = 2
			TFLAG:COMABLE管理 = 3
			TCVAR:30:26 = 0
			CALL CCOMF87(30)
			SELECTCCOM:0:1 = 87
			TCVAR:次回Counter = 89
			BASE:気力 += 40
			RETURN
		ELSE
			CALL HPH_PRINT("「不用客气…小映姬淫荡的屁股HPH　随时，都可以干…HPH」", "W")
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;84,泡泡浴
;==================================================
@M_KOJO_MESSAGE_COM_K30_84
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K30_84_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_84_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;マグロスイッチオン
	IF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ELSEIF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 「……特意为了这个……。连这样的道具都买齐了。」
		PRINTFORMW 「…诶诶，什么都不说了。那怎么办才好呢？」
		PRINTFORML 「把肥皂打起泡……这样的感觉？」
		PRINTFORMW 「真是太讨厌了，这个……」、
		RETURN 1
	ENDIF
	;これでMASTERが射精する
	IF NOWEX:MASTER:11
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「……各种各样的磨擦…很快乐，对吧」
				PRINTFORMW 「你也是吧?……我……那么，变舒服了…给我，很多…挂着…♥」
			CASE 1
				PRINTFORML 「没有，忍耐吗…射出来，就行了…」
				PRINTFORMW 「即使脏了，也能马上洗好…给我…浇上热的白浊吧………♥」
		ENDSELECT
	ELSE
	;地の文も平文のみ、他の指令とも被るから手抜き
		SELECTCASE RAND:2
			CASE 0
				PRINTFORML 「就这样……抱在怀里好吗？」
				PRINTFORML 「滑溜溜得很厉害……嗯，这个，这样啊……嗯，♥嗯」
				PRINTFORMW 「%K30_C_NAME(MASTER)%的那…正中了…奇怪的，舒服……」
			CASE 1
				PRINTFORML 「挺起胸膛这样擦…要动啊……那么，你仰着身子……」
				PRINTFORML 「嗯，正好…两人粘在一起的话，会有各种各样的舒服摩擦……啊嗯♥」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;==================================================
;85,足交
;良さがわからないので否定的になってしまう。好きな人にはごめんなさい
;構文読んでたら切り替え方法わかったので、映姫様が隙あらばしゃぶりつくようにしてみる
;→EXTRASOURCEを使い指令ごと書き換えてしゃぶりつくように
;==================================================
@M_KOJO_MESSAGE_COM_K30_85
IF TFLAG:193 == 99
	CALL K30_D_LINE
	PRINTFORMDL 映姫对%CALLNAME:MASTER%的%TINKO(MASTER)%用美丽的足底摩挲着…
	PRINTFORMDL ……半路停下了
	PRINTFORMDL 映姬用好像会说话的眼睛看了看突然起勃的阴茎…
	PRINTFORMW
ELSEIF TCVAR:MASTER:112 && !(FLAG:70 || TCVAR:30:烂醉 || CFLAG:MASTER:恶作剧 == 2)
	CALL K30_D_LINE
	PRINTFORMDL %CALLNAME:MASTER%对%\@ TCVAR:MASTER:112 == 1 ? 在阴道里排了很多 # 射精 \@%后的阴茎，让%CALLNAME:TARGET%的玉足用里侧抚摸着
	PRINTFORMDL %CALLNAME:TARGET%总觉得很难做…
	PRINTFORMW
ELSE
	CALL TRAIN_MESSAGE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_85_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_85_1
#DIM Ｆ可否
#DIM 交代可
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	;時姦中
	IF FLAG:70
		PRINTFORMW
		RETURN 1
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		CALL K30_GASPING_MAGURO
		RETURN 1
	ELSEIF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 「这是…真的不太明白」
		PRINTFORMW 「你这样过瘾吗…？」
		RETURN 1
	ENDIF
	;攻守交代条件クリア＆余裕と経験が那个ばしゃぶりつく
	CALL COM_ABLE24
	交代可 = RESULT && !FLAG:99 && GET_TARGETNUM() == 1
	CALL COM_ABLE81
	Ｆ可否 = (RESULT && 交代可 && ABL:TARGET:舌 >= 3 && ABL:精液中毒 >= 5 && BASE:体力 > 600 && BASE:気力 > 100)
	;これでMASTERが射精する
	IF NOWEX:MASTER:11
		;フラグ立ってたら指令も無視してしゃぶりつく
		IF	TFLAG:193 == 99
			PRINTDATAL
				DATAFORM 「…和现在想做的不一样。 不是这个吗」
				DATAFORM 「…那个…现在不想」
				DATAFORM 「%K30_C_NAME(MASTER)%、这样的话…我不能满足哦」
			ENDDATA
			PRINTDATAL
				DATAFORM 「是的，我想做的是这个……我想这样做…」
				DATAFORM 「好像被放置在那里了，不。我不想忍耐…」
				DATALIST
					DATAFORM 「我也可以偶尔任性一下」
					DATAFORM 「我想更多的舔舐，想要在嘴里…」
				ENDLIST
			ENDDATA
			PRINTFORML 「对不起、%K30_C_NAME(MASTER)%。我会让你舒服一点……啊姆~♥」
			CALL K30_BLOW_JOB_ANIME(0)
			PRINTFORML 「啾，啾噜…啾噜噜！　滋咕滋咕～～っ♥♥」
			PRINTFORMDL 映姬竟然无视%CALLNAME:MASTER%的意向擅自開始了口交
			PRINTFORMDW 舔着雁首舔着里筋的浓密服务，%CALLNAME:MASTER%一眨眼就被逼到绝境……
			PRINTFORML 「啾噜っ、啾噜っ……咕啵っ♥　咕啵っ♥　啾噜噜っ♥」
			PRINTFORMDL 从溢出的先走汁中感受到射精的预兆，映姬的口淫越来越浓厚了
			PRINTFORMDW %CALLNAME:MASTER%在感受到全部被吸尽的快感的同时，向映姬所希望的地方倾泻…
			RETURN 1
		ELSEIF ABL:精液中毒 > 2 && RAND:2
			IF RAND:2 == 1
				PRINTFORML 「嗯……出来吧，是吗？」
				PRINTFORMW 「那个，不觉得可惜吗…？」
				PRINTFORMW 「我…想要啊……」
			ELSE
				PRINTFORML 「要去了…なの？　这样行吗」
				PRINTFORMW 「%K30_C_NAME(MASTER)%舒服，就好…」
				PRINTFORMW 「想给你做更多不同的服务…」
			ENDIF
		ELSE
			PRINTFORML 「这样就很舒服了呢…」
			PRINTFORMW 「快要出来了吗？ 那么，就这样动起来…」
		ENDIF
	;射精直前だと随机で勝手に口内射精を要求
	ELSEIF Ｆ可否 && TCVAR:MASTER:要去了 && RAND:3 == 1
		PRINTFORML 「…………」
		PRINTFORMDL 映姬一脸认真地继续着足交，不知为什么突然停下了脚步
		PRINTFORMDL 快感突然被阻止，生气的阴茎无情地抽动着…
		PRINTFORMW
		PRINTDATAL
			DATAFORM 「很无聊，这样的…」
			DATAFORM 「对不起……果然，还是忍不住…」
			DATAFORM 「不是这样的，是想这样的吧…」
		ENDDATA
		PRINTDATAL LOCAL
			DATAFORM 「你重要的地方，不要草率地对待…」
			DATAFORM 「男女和睦相处，互相舒服比较好哦」
			DATAFORM 「很多，要射出来的……放在这样的地方会不会不一样吗？」
		ENDDATA
		PRINTFORMDL 映姬匍匐着把脸朝%CALLNAME:MASTER%的胯部凑过来。…
		PRINTFORMW 「\@ LOCAL ? 所以呢， # \@我想这样给你………哈啊唔っ♥」
		PRINTFORMDL 一口气把阴茎张口吃到根部，映姬一边发出猥亵的声音一边開始了口交
		CALL K30_BLOW_JOB_ANIME(1)
		PRINTFORML
		PRINTFORML 「啾啵~……啾噜噜っ♥　嗯呜……嗯嗯~～～♥♥」
		PRINTFORML 「啊呋~……我想这样做♥　吃到嘴里，想要……吶，可以吧…♥」
		PRINTFORMW
		PRINTFORMDL 映姬从%CALLNAME:MASTER%那里完全夺取了主导权，咬着肉棒
		PRINTFORMDL 看来在射在口中之前，是不会离開的……
		PRINTFORMW
		;ステータスを被逆推口交に移行
		CFLAG:积攒度 = MAX(CFLAG:积攒度, 100)
		CFLAG:MASTER:诶嘿嘿 = 2
		CFLAG:诶嘿嘿 = 2
		TFLAG:COMABLE管理 = 3
		TCVAR:30:26 = 0
		CALL CCOMF51(30)
		SELECTCCOM:0:1 = 51
		TCVAR:次回Counter = 51
		TCVAR:30:361 = TIME
		TCVAR:30:362 = 3
	;口交以外で射精直後の場合勝手に清洁口交を始める
	ELSEIF Ｆ可否 && TCVAR:MASTER:112 && TCVAR:MASTER:112 != 4
		PRINTFORML 「用脚，做吗…？」
		PRINTFORMDW 映姬好像有什么抵触，慢慢地把脚伸向阴茎，但到了那里就停了下来…
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「刚拿出来擦一下，连我的脚都黏糊糊的。」
				PRINTFORML 「那样的话周围也会变脏吧？」
				PRINTFORMW 「所以呢…我想先给你弄干净…♥」
			CASE 1
				PRINTFORML 「刚射出来，那里……变得非常敏感了吧？」
				PRINTFORML 「用脚做那个什么的…太难了」
				PRINTFORMW 「取而代之的是，温柔的……我会包容你的……♥」
			CASE 2
				PRINTFORML 「对不起……我想用嘴给你做」
				PRINTFORML 「小鸡鸡…把弄脏的东西清理干净」
				PRINTFORMW 「最后剩下的部分，会给你安排的……喜欢…♥」
		ENDSELECT
		PRINTFORML 「首先，这边啊……嘞咯っ、啾~……啾卟，啾っ♥」
		PRINTFORMDL 映姬用嘴代替脚靠近%CALLNAME:MASTER%的胯部，仔细用心地舔去溅在%TEXTR("腿/玉袋/")%上的精液
		PRINTFORMW
		PRINTFORML 「嗯……变漂亮了♥」
		PRINTFORML 「那么，也会把欧金金收拾得漂漂亮亮的……啊唔♥」
		CALL K30_BLOW_JOB_ANIME(1)
		PRINTFORML
		SELECTCASE TCVAR:MASTER:112
			CASE 1, 6
				PRINTFORMD 涂在爱液和精液上，散发出浓厚的性臭
			CASE 2
				PRINTFORMD 涂在精液和肠液上有一点异臭
			CASEELSE
				PRINTFORMD 被先走汁和精液弄黏糊糊的
		ENDSELECT
		PRINTFORMDL 阴茎被映姫%TEXTR("毫不犹豫地/疼爱地/開心地")%咽下，開始舔舐…
		PRINTFORMW
		PRINTFORMDL 完全被映姬掌握了节奏，%CALLNAME:MASTER%就这样转为被动
		PRINTFORMW
		;ステータスを被逆推口交に移行
		CFLAG:积攒度 = MAX(CFLAG:积攒度, 60)
		CFLAG:MASTER:诶嘿嘿 = 2
		CFLAG:诶嘿嘿 = 2
		TFLAG:COMABLE管理 = 3
		TCVAR:30:26 = 0
		CALL CCOMF51(30)
		SELECTCCOM:0:1 = 51
		TCVAR:次回Counter = 51
		TCVAR:30:361 = TIME
		TCVAR:30:362 = 4
	ELSEIF TCVAR:MASTER:112
		IF ABL:精液中毒 < 3 || TCVAR:MASTER:112 == 4
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「明明已经射了那么多了…」
					PRINTFORMW 「用脚紧紧地捏住…没关系吗？」
				CASE 1
					PRINTFORML 「诶诶哆、那个…因为你的…全身变得软绵绵的」
					PRINTFORMW 「脚很难夹住……」
			ENDSELECT
		ELSE
			SELECTCASE RAND:2
				CASE 0
					PRINTFORML 「收拾残局，应该有更不同的方法吧？
					PRINTFORMW 「比如说，你看…用嘴，之类的…」
				CASE 1
					PRINTFORML 「怎么说呢，我不太愿意」
					PRINTFORML 「好不容易把牛奶取出来」
					PRINTFORMW 「想更用心地照顾你……」
			ENDSELECT
		ENDIF
	ELSEIF ABL:技巧 >= 3 && RAND:2 == 1
		SELECTCASE RAND:3
			CASE 0
				PRINTFORML 「这、这样吗……？」
				PRINTFORMW 「诶~…轻轻地，踩上…的？　大丈夫？」
			CASE 1
				PRINTFORML 「竟然说要用脚…」
				PRINTFORMW 映姬突然顽皮的露出嗜虐的笑容
			CASE 2
				PRINTFORMW 「……你喜欢这样做吗？」
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 0
				PRINTFORMW 「果然还是不太明白力量的大小…」
			CASE 1
				PRINTFORML 「总觉得好像在处理杂项…」
				PRINTFORMW 「诶……那样好吗？」
			CASE 2
				PRINTFORML 「那个…不是嘴…什么的，真的可以吗…」
				PRINTFORMW 「如果疼的话，请马上告诉我」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1

;足交を断固拒否して咥えたがる映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_85
;色々条件の精査
;SIF TCVAR:MASTER:要去了
;	GOTO TEST
SIF !TCVAR:MASTER:要去了 || GET_TARGETNUM() != 1
	RETURN
SIF FLAG:99 || !SHIRAHU(30) || EXP:口淫経験 < 100
	RETURN
CALL COM_ABLE81
SIF !(RESULT && ABL:TARGET:舌 >= 3 && ABL:精液中毒 >= 5)
	RETURN
;积攒度/精愛味覚に応じて3～60%ぐらいの適当判定
SIF (CFLAG:积攒度 / 100) + (TALENT:精愛味覚 * 3) < RAND:20
	RETURN
;ここまで抜けたら実行。口交のソース/経験等の加算と修正
;$TEST
;継続行動はリセット
CALL TOUCH_SET(0,0,0,1)
CALL TOUCH_SET(SET_FROM_M, SET_P, 30)
CSTR:MASTER:10 = /
CALL COM81
;映姫様の快感を2倍、大体イくようにする
SOURCE:快Ｍ *= 2
DOWNBASE:体力 -= 10
DOWNBASE:気力 -= 150
SOURCE:加虐 = 0
SOURCE:征服 = 0
SIF TALENT:自己愛 < 0 || TALENT:抵抗
	SOURCE:鬱屈 -= 600
IF HETEROSEX(TARGET,MASTER)
	EXP:(50 + HETEROSEX(TARGET,MASTER)) -= 4
	EXP:MASTER:(50 + HETEROSEX(TARGET,MASTER)) -= 4
ENDIF
SIF TALENT:施虐狂 || ABL:施虐属性
	EXP:嗜虐快楽経験 --
;口上側に渡すフラグ
TFLAG:193 = 99
RETURN

;==================================================
;88,真空口交
;色々茶番を入れてフェラチオコマンドと差別化を図る
;TFLAG:192：疑似射精回数
;TFLAG:193：直前の我慢ゲージ 0-通常 1-限界 2-射精直後
;==================================================
@M_KOJO_MESSAGE_COM_K30_88
IF TFLAG:192 < 0 && !TCVAR:烂醉
	CALL TRAIN_MESSAGE
	CALL K30_BLOW_JOB_ANIME(2)
	SIF TCVAR:30:385 || TCVAR:30:强行
		CALL K30_GASPING_MAGURO
ELSE
	CALL K30_D_LINE
	CALL M_KOJO_MESSAGE_COM_K30_88_1
ENDIF
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_88_1
#DIM 射出, 2
#DIM 箇所
#DIM 分岐
#DIM 回数
#DIM L_COUNT
IF TCVAR:烂醉
	PRINTFORMDL 让迷迷糊糊的映姬张嘴,让她给%TINKO(MASTER)%口交
	PRINTFORMW
	PRINTFORML 「呜呜...咕咚,咕咚咕咚...」
	PRINTFORMDW 映姬满含着阴茎,像在吮吸热酒一样吞下前液...
	RETURN 1
ENDIF
VARSET 射出
;箇所 = TCVAR:112 MASTERが直前のターンに射精した箇所フラグ 1=膣内 2=アナル
;射出:0 = 前ターン中出しされたTARGET_ID
;射出:1 = 前ターンＶorA挿入されていたTARGET_ID
IF TCVAR:MASTER:112 == 1
	射出:0 = MASTER_POSE(SET_V, SET_P, 1)
	箇所 = 1
ELSEIF TCVAR:MASTER:112 == 2
	射出:0 = MASTER_POSE(SET_A, SET_P, 1)
	箇所 = 2
ENDIF
IF MASTER_POSE(SET_V, SET_P, 1)
	射出:1 = MASTER_POSE(SET_V, SET_P, 1)
	箇所 = 1
ELSEIF MASTER_POSE(SET_A, SET_P, 1)
	射出:1 = MASTER_POSE(SET_A, SET_P, 1)
	箇所 = 2
ENDIF
回数 = (TFLAG:193 == 2)
;カウンター地の文を固定
TCVAR:30:21 = 3
;地の文分岐はフェラチオコマンドからコピペ
IF 射出:0
	PRINTFORMDL %CALLNAME:(射出:0)%の\@ 箇所 < 2 ? おまんこ # 肛門 \@にたっぷりと射精してから%TINKO(MASTER)%を引き抜き、
    PRINTFORMDL 把沾满了精液的%TINKO(MASTER)%塞进了映姬嘴里...
    PRINTFORMDL 映姬吸着阴茎发出下流的声音,脸颊凹陷
    分岐 = 1 + (射出:0 == 30)
ELSEIF 射出:1
    IF 射出:1== 30
		PRINTFORMDL 射精の直前に\@ 箇所 == 1 ? ヴァギナ # 菊穴 \@から%TINKO(MASTER)%を抜き映姫にしっかりと咥えさせた…
        PRINTFORMDL 映姬迫不及待地吸着阴茎,仿佛等不及想吞下精液。
		分岐 = 3
    ELSE
        PRINTFORMDL 在高潮前一刻从%CALLNAME:(射出:1)%的\@ 箇所 == 1 ? 雌穴 # 尻穴 \@拔出,用力把%TINKO(MASTER)%塞进了映姬嘴里...
        PRINTFORMDL 映姬抱住你的腰牢牢吸附着阴茎。
        分岐 = 4
    ENDIF
ELSE
    LOCALS '= "", "即将喷发的", "刚射过的"
    IF MASTER_POSE(SET_M, SET_P, 1) == 30
        PRINTFORMDL 映姬更加贪婪地吸吮着口中的%LOCALS:(TFLAG:193)%阴茎
    ELSE
        PRINTFORMDL 一靠近%LOCALS:(TFLAG:193)%阴茎映姬就本能地吞下吸吮
    ENDIF
    PRINTFORMDL 从她仿佛要榨干精液的样子看,完全感受不到平日作为阎魔的威严和谨慎...
    分岐 = 5
ENDIF
CALL K30_BLOW_JOB_ANIME(0)
分岐 = !TFLAG:192 ? 0 # 分岐
SELECTCASE 分岐
CASE 0
        PRINTDATAL
            DATAFORM 「唔啊,咕咚...咕嘟嘟!唔嗯嗯♥ 咕嘟,咕嘟嘟...」
            DATAFORM 「呜嗯,呜呜嗯♥ 咕噜,咕嘟嘟嘟...咕嘟嘟!咕咕...♥」
            DATAFORM 「呜噗♥ 咕嘟,咕噗噗...咕嘟嘟嘟!咕嘟,咕嘟...」
        ENDDATA
        PRINTDATADW
            DATAFORM 映姬扭曲着端庄的脸蛋,吸附着阴茎...
            DATAFORM 映姬红润的嘴唇发出淫靡的吮吸声,彼此的兴奋越烧越旺...
            DATAFORM 映姬锻炼良好的舌头和口腔仿佛要将%CALLNAME:MASTER%的性器整根吸入腹中...
        ENDDATA
        RETURN
    CASE 1
        PRINTDATAW
            DATAFORM (只让%K30_C_NAME(射出:0)%独享不行...)\n(我也要...多要些...)
            DATAFORM (我的小嘴...能接待后援吗?)\n(..................)\n(我也想要...好多好多...)
            DATAFORM (...比%K30_C_NAME(射出:0)%更...舒服的话)\n(说不定他就...只给我了)
        ENDDATA
    CASE 2
        PRINTDATAW
            DATAFORM (啊哈♥ 小嘴也...有份啦♥)\n(啊...还想要...更多更多♥)\n(想要的心情...越来越强烈了♥)
            DATAFORM (得好好清理干净...♥)\n(全部、全部...吸出来...弄干净♥)
            DATAFORM (...\@ 箇所 < 2 ? 小穴 # 小屁股 \@只有的话...总觉得寂寞)\n(%K30_C_NAME(MASTER)%、小嘴也...可以有份吧♥)
        ENDDATA
CASE 3
        PRINTDATAW
            DATAFORM (%K30_C_NAME(MASTER)%更喜欢...这里吗?)\n(嘻嘻...♥ 那我得更努力了♥)
            DATAFORM (啊...要出来了吗?)\n(..................)\n(一次...好像不太够呢♥)
            DATAFORM (%K30_C_NAME(MASTER)%...看起来很舒服的样子...♥)\n(想再...努力一些♥)\n(想更更多地...用小嘴取悦你...♥)
        ENDDATA
    CASE 4
        PRINTDATAW
            DATAFORM (啊...♥ 不是%K30_C_NAME(射出:1)%,是我♥)\n(%K30_C_NAME(MASTER)%的...精液,只给我一个人...♥)
            DATAFORM (%K30_C_NAME(MASTER)%...不要再忍耐,射在我身上♥)\n只给我...只射进我嘴里,给我好多好多...♥)
            DATAFORM (虽然对%K30_C_NAME(射出:1)%不好意思...)\n(现在该我了...♥ 该我让%K30_C_NAME(MASTER)%...舒服起来的时候了♥)
        ENDDATA
    CASE 5
        PRINTDATAW
            DATAFORM (啊哈...♥ %K30_C_NAME(MASTER)%...我爱你♥)\n(不仅%K30_C_NAME(MASTER)%,连%K30_C_NAME(MASTER)%的小弟弟都...超爱的♥)
            DATAFORM (想要...快给我,我想要...♥)\n(%K30_C_NAME(MASTER)%的精液,很多很多...都想要...♥)
            DATAFORM (啊...♥ 嘴都要化了...♥)\n(如果%K30_C_NAME(MASTER)%射在里面...会更加舒服吧...)\n(更更多...♥)
        ENDDATA
ENDSELECT
SELECTCASE TFLAG:193
CASE 0
    PRINTFORMDL 映姬高超的舌技很快就将%CALLNAME:MASTER%逼至极限
    PRINTFORMDW 本来还有余力的%CALLNAME:MASTER%,但被映姬用力吮吸铃口后很轻松就达到了高潮...
CASE 1
    PRINTFORMDL 本就已近高潮的阴茎在映姬的侍奉下猛烈跳动
    PRINTFORMDW 和映姬大力吸吮前液的同时,一股热流也涌上了阴茎...
CASE 2
    PRINTFORMDL 映姬细心地吮吸着刚射过还很敏感的粘膜
    PRINTFORMDL 阴茎很快就重新聚集了力量,准备进行下一次喷发
    PRINTFORMDW 看到%CALLNAME:MASTER%的反应,映姬喜形于色,发出更大声的吮吸声...
ENDSELECT
;射精1回なら通常の絶頂口上に合流
SIF TFLAG:192 == 1
		RETURN 1
;映姫様の連続ターン
分岐 = RAND:3 + 5
FOR L_COUNT, 1, TFLAG:192
	CALL K30_D_LINE
	PRINTFORML
	PRINTFORMDL Ｃ経験 +1(%CALLNAME:MASTER%)
	PRINTFORMDL 絶頂経験 +1(%CALLNAME:MASTER%)
	PRINTFORMDL 射精経験 +1(%CALLNAME:MASTER%)
	WAIT
	CALL COLORMESSAGE, @"【口内%\@ TFLAG:194 ? 大量 # \@%%\@ TALENT:MASTER:濃厚精液 ? 濃厚 # \@%射精】", C_CREAM, 1, 0
	分岐 = 分岐 > 6 ? 5 # 分岐 + 1
    PRINTFORMDL %CALLNAME:MASTER%再度向映姬嘴里%\@ L_COUNT > 1 ? %TEXTR("再次/又一次/再再次/更多")% # \@%射精了
	CALL K30_BLOW_JOB_ANIME(分岐)
	SELECTCASE 分岐
CASE 5
            PRINTFORMDL 映姬一边用舌头爱抚着龟头,一边接受着%CALLNAME:MASTER%%SAMEN_DESCRIPTION(MASTER)%,诱导着更多的射精...
            PRINTDATAW
                DATAFORM 「啊啊...好舒服...♥」
                DATAFORM 「我会...全部吃干净的...♥」
                DATAFORM 「嘻嘻...:红心: 叭嗒、呜啾...♥」
            ENDDATA
        CASE 6
            PRINTFORMDL 映姬一边用舌头戳刺着%CALLNAME:MASTER%尿道口,%SAMEN_DESCRIPTION(MASTER,1)%喷发而出,
            PRINTFORMDL 从张开的嘴巴里%SAMEN_DESCRIPTION(MASTER)%滴滴答答流了出来...
            PRINTDATAW
                DATAFORM 「溢出来的部分,再给我的话...就没关系了♥」
                DATAFORM 「嘻嘻♥ 跳动得这么厉害...♥」
                DATAFORM 「碰一碰就...源源不断地出来啊...♥」
            ENDDATA
        CASE 7
            PRINTFORMDL 映姬用嘴唇抹净所有%SAMEN_DESCRIPTION(MASTER)%,全部吞入口中,然后
            PRINTFORMDL 将%SAMEN_DESCRIPTION(MASTER)%吐在双手上展示给%CALLNAME:MASTER%看...
            PRINTDATAW
                DATAFORM 「%K30_C_NAME(MASTER)%...我全吃掉了♥」
                DATAFORM 「这是,我的小嘴让您舒服的证据吧...♥」
                DATAFORM 「好烫啊...♥ 感觉手心要烫伤了...♥」
            ENDDATA
	ENDSELECT
	PRINTFORML
	PRINTFORMD ...映姬%TEXTR("舔掉溢出来的精液/擦去嘴边的精液/吞下剩余的所有精液")%后,
    PRINTFORMDW %TEXTR("盯着/亲了亲/用手玩弄着")%变得%TEXTR("柔软的/萎靡的/缩小的")%阴茎...

	IF TFLAG:192 - 1 == L_COUNT
		PRINTDATAL
            DATAFORM 「这就是最后了...」\n「我会让您最舒服...♥」
            DATAFORM 「那么,最后一次...尽情地射出来吧...♥」
            DATAFORM 「最后...想射在脸上,可以吗...♥」\n「那我就...全都吃掉好了♥」
            DATAFORM 「还想更多地...感受%K30_C_NAME(MASTER)%」\n「这次要...满脸都是♥」
            DATAFORM 「我对自己的舌头...还是很有自信的」\n「可以完完全全...吸干%K30_C_NAME(MASTER)%...♥」
        ENDDATA
    ELSE
        PRINTDATAL
            DATAFORM 「还要...还要更多,好想要♥」
            DATAFORM 「还射得不够...」\n「%K30_C_NAME(MASTER)%就随我这么做好不好...♥」
            DATAFORM 「再来一次...可以吧?」\n「我不会让您说不的...♥」
            DATAFORM 「还不够,还要更多,拜托了...♥」
            DATAFORM 「我会...再把它弄大的...♥」
            DATAFORM 「还不想停下来...」\n「拜托,可以吗...♥」
            DATAFORM 「您平时不是...还能再来的吗♥」
            DATAFORM 「......嘻嘻♥」\n「加油!♥ 加油!♥」
            DATAFORM 「嘻嘻...♥」\n「很快就...会再次精神起来的♥」
            DATAFORM 「我啊...」\n「最喜欢%K30_C_NAME(MASTER)%和%K30_C_NAME(MASTER)%的小弟弟了♥」
            DATAFORM 「...我们继续吧,好不好♥」
            DATAFORM 「啊哈♥ 还很有精神...♥」\n「%K30_C_NAME(MASTER)%(这点程度)...完全没问题对吧♥」
            DATAFORM 「第%TOKANJIT(回数 + L_COUNT + 1)%次,也想要...射在小嘴里♥」\n「所以...再来一次♥」
        ENDDATA
	ENDIF
	CALL K30_BLOW_JOB_ANIME(8)
    PRINTFORMW 「%TEXTR("嗯.../啊嗯.../呜嗯...")%♥ %TEXTR("吱吱.../嗯嗯...吱/嘎吱、嘎吱...吱嗯")%! %TEXTR("咕咚~.../吱吱吱.../呜吱...♥ 吱吱:红心:")%♥」
    PRINTFORMDL 映姬%TEXTR("马不停蹄地/再次/立刻")%含住了%CALLNAME:MASTER%的阴茎
    IF TFLAG:192 - 1 == L_COUNT
        PRINTFORMDL 这样下去,会被吸干净的...
        PRINTFORMDW 映姬像要把%CALLNAME:MASTER%榨干一样的吸吮,让%CALLNAME:MASTER%产生了这样的错觉
    ELSE
        PRINTDATADL
            DATAFORM 看来闫魔大人的舌头和嘴巴,并不打算让%CALLNAME:MASTER%的阴茎休息...
            DATAFORM 变得更加敏感的龟头被吸吮,酥酥麻麻的快感袭上了%CALLNAME:MASTER%...
            DATAFORM 粘满精液的映姬嘴巴发出更大声的水声,紧紧吸附在%CALLNAME:MASTER%身上...
            DATAFORM 映姬发出下流的声音吸吮着%CALLNAME:MASTER%,阴茎不由自主地再次站立起来...
        ENDDATA
        PRINTFORMDW %CALLNAME:MASTER%很快就无法再忍耐,连续第%TOKANJIT(回数 + L_COUNT + 1)%次高潮就要来临了
    ENDIF
NEXT
RETURN 1

;TINKOに吸い付いて搾り尽くす映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_88
;条件精査-恋慕＆口ステータスが「精液を味わうと身体が疼いてしまう」
TFLAG:192 = -1
SIF !TALENT:恋慕 || !SHIRAHU(30) || TCVAR:30:385 || TCVAR:30:强行
	RETURN
TFLAG:192 ++
SIF FLAG:99 || TEQUIP:MASTER:避孕套
	RETURN
SIF EXP:精飲経験 < 151 || ABL:精液中毒 < 5 || RAND:2
	RETURN
;ここまで抜けたら実行。即射精の処理 + 口上側に渡すフラグ設定
TFLAG:192 = 1 + TCVAR:MASTER:要去了 + (EXP:精飲経験 > 300 && ABL:精液中毒 >= 10) + TALENT:精愛味覚
SIF GROUPMATCH(TCVAR:MASTER:112, 1, 2) && MASTER_POSE((TCVAR:MASTER:112) + 5, SET_P, 1) != 30
	TFLAG:192 ++
TFLAG:193 = TCVAR:MASTER:112 ? 2 # 0
TFLAG:193 = TCVAR:MASTER:要去了 ? 1 # TFLAG:193
TIME += (TFLAG:192 - 1) * 5
BASE:MASTER:射精 = MAXBASE:MASTER:射精
TCVAR:MASTER:要去了 = 1
SOURCE:反感 = 0
SOURCE:MASTER:快Ｃ += 50 * TFLAG:192
RETURN

;==================================================
;89,喝套内精液
;==================================================
@M_KOJO_MESSAGE_COM_K30_89
IF FLAG:70 || CFLAG:MASTER:恶作剧 == 2
	CALL TRAIN_MESSAGE
ELSE
	CALL K30_D_LINE
ENDIF
CALL M_KOJO_MESSAGE_COM_K30_89_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K30_89_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;時姦睡姦
	IF FLAG:70 || CFLAG:MASTER:恶作剧 == 2
		RETURN 1
	ELSEIF TCVAR:30:385 || TCVAR:30:强行 || TCVAR:30:烂醉
		PRINTFORMDL 从积存种子的避孕套中将带橡胶臭地精液灌进映姬的嘴里
		PRINTFORMDL 但是映姬马上就把含在嘴里的东西吐了出来…
		PRINTFORMW
		IF TCVAR:30:烂醉
			PRINTFORMW 「呕~哕%TEXTR("…臭～死～了～/、奇怪的味道…/、等一下…这是什么～")%」
		ELSEIF TCVAR:30:强行
			PRINTFORMW 「真是的…你还想让我做什么…？」
		ELSEIF ABL:精液中毒 < 5
			PRINTFORMW 「这个味道…不行，真的……不讲理…」
		ELSE
			PRINTFORMW 「这样的…又不是理所当然要喝…」
		ENDIF
		RETURN 1
	ENDIF
	PRINTFORMD %CALLNAME:MASTER%让映姬跪坐、
	SELECTCASE TFLAG:193
		CASE IS > 300
			PRINTD 满满的,都快撑破了
		CASE IS > 150
			PRINTD 在前端充分地
	ENDSELECT
	PRINTFORMDL 把积存了子种的避孕套推到嘴边
	IF TFLAG:194 == 590
		PRINTFORMDL 映姬把带着橡胶臭的精液在自己口中滚动着啜饮
		PRINTFORMDL 但是，脸上浮现出不满的表情，怎么也喝不完…
		PRINTFORMW
		PRINTFORML 「…………嗯っ、嗯呼呼っ♥」
		PRINTFORMDL 突然映姬露出恶作剧般的微笑，把脸凑向%CALLNAME:MASTER%的胯座
		CALL K30_BLOW_JOB_ANIME(0)
		PRINTFORML 「嗯っ…啾噜っ♥　嗯啾……啾噜噜っ！」
		PRINTFORMDW 嘴里积满了唾沫和精液，開始剧烈地嘬吸阴茎……
		PRINTFORML
		PRINTFORMW 「…噗哈っ♥」
		PRINTFORML 「%K30_C_NAME(MASTER)%、我……对你的味道\@ TALENT:精愛味覚 ? 非常喜欢 # 不讨厌 \@但是」
		PRINTFORML 「真正喜欢的是…看你愉快的表情和隐忍的表情」
		PRINTFORML 「用喉咙和嘴唇感受你的……小鸡鸡，让你快乐」
		PRINTFORMW 「这样的话，我也很幸福……非常開心…♥」
		PRINTFORML
		PRINTFORML 「所以我不喜欢这么拐弯抹角」
		PRINTFORMW 「%K30_C_NAME(MASTER)%、我想让你直接感受♥」
		IF NOWEX:MASTER:射精
			PRINTFORML 「啊ー姆っ…啾噜、叽啵っ！　叽っ啵……滋兹～っ♥♥」
			PRINTFORMDL 映姬仿佛连呼吸都舍不得似的，叼着阴茎不放
			PRINTFORMDW 转眼间%CALLNAME:MASTER%就迎来了极限，在映姬的口中释放了积存已久的欲望…
		ELSE
			PRINTFORML 「…啊姆っ♥　啾噜っ！　啾噜噜っ♥　啾噗っ……」
			PRINTFORMDL 映姬滴垂着混合白浊的口水，一边热切地口交侍奉着
			PRINTFORMDW %CALLNAME:MASTER%把一切交给映姬，感受这腰下飘荡的极致快感…
		ENDIF
	ELSEIF TALENT:精愛味覚
		PRINTFORMDL 映姬很高兴地舔掉了橡皮臭味的精液，\@ TALENT:MASTER:濃厚精液 ? 就像咀嚼一样 # 在舌间转动着 \@品味……
		PRINTFORMW
		PRINTFORML 「嗯っ……嗯咕っ、嗯っ………噗哈っ♥」
		PRINTFORMW 「嗨！谢谢款待…\@ TALENT:MASTER:濃厚精液 ? 浓厚牛奶 # 美味しく \@我開动了♥」
		PRINTFORML 「但是，只有这个的话嘴会变得寂寞呢…」
		PRINTFORML 「刚榨的热的…更想大口大口地吃…♥」
		PRINTFORMDW 映姬一边舔着舌头一边向%CALLNAME:MASTER%的%TINKO()%投去炙热的视线……
	ELSEIF ABL:精液中毒 < 5 || EXP:口淫経験 < 100
		PRINTFORMDL 映姬皱着眉头，嘴里含着橡胶臭味的精液…
		PRINTFORMW
		PRINTFORML 「嗯嗯っ…呃っ、嗯姆……唔哕…呕」
		PRINTDATAW
			DATAFORM 「总觉得喝了……这个，有点…」
			DATAFORM 「…臭得厉害…讨厌」
			DATAFORM 「这有什么意义吗…」\n「如果你告诉我的话，我会直接用嘴给你做的…？」
		ENDDATA
	ELSE
		PRINTFORMDL 映姬带着微妙的表情，喝下了橡胶味的精液。…
		PRINTFORMW
		PRINTFORML 「嗯咕っ……嗯っ、嗯嗯っ……嗯っ」
		PRINTFORML 「…嗯唔呜っ、总算…咽下去了，但是」
		PRINTFORMW 「\@ TALENT:MASTER:濃厚精液 ? 太…太浓了 # 精臭味……很重 \@、真是太糟糕了」
		PRINTFORML 「而且呢，我觉得这个味道…并不是很喜欢」
		PRINTFORML 「我真正喜欢的是…♥」
		PRINTFORMDW 映姬停顿了一下，热切地注视着%CALLNAME:MASTER%的股间…
	ENDIF
ENDIF
RETURN 1
;精飲よりTINKOに奉仕するのが好きな映姫様のEXTRASOURCE関数
@M_KOJO_EXTRASOURCE_COM_K30_89
;条件精査
SIF FLAG:99 || !TALENT:恋慕
	RETURN
SIF !SHIRAHU(30) || EXP:口淫経験 < 100 || ABL:舌 < 3
	RETURN
CALL COM_ABLE81
SIF !RESULT
	RETURN
;积攒度＆舌技能に応じた適当判定
SIF (CFLAG:积攒度 / 200) + ABL:舌 < RAND:14
	RETURN
;ここまで抜けたら実行。口交のソース/経験等の加算と修正
CALL TOUCH_SET(SET_FROM_M, SET_P, 30)
CSTR:MASTER:10 = /
CALL COM81
SOURCE:快Ｍ += 20
SOURCE:MASTER:快Ｃ += 30
;口上側に渡すフラグ
TFLAG:194 = 590
RETURN

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_奉仕系コマンド.ERB


code:
;==================================================
;弾幕勝負
;==================================================
;
@M_KOJO_MESSAGE_COM_K30_DANMAKU(ARGS, 相手残機)
#DIM 相手残機
;全体の流れ
;①【戦闘前】→②骰子ロールとプレイヤー選択肢、ハンデをつけた場合は【ハンデ口上】→③対応スキルが発動した場合【スキル口上】→④被弾判定、角色が被弾したなら【被弾口上】→
;どちらかの残機が0になっていなければ②に返回→⑤【戦闘後口上】

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
SIF FLAG:口上色
	TRYCALLFORM M_KOJO_COLOR_K{NO:TARGET}
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;戦闘前
	HANDICAP_FIXED = 0
	HANDICAP_RAND = 0
	;花映塚でくっそ強かった覚えがあるけどハンデ表記されるならいじらない

	;ハンデをつけることができ、数値が大きいほど你が不利になる　数値が負なら你が有利に
	;角色の能力に関わらずクッソ強くしたり弱くしたりできる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "戦闘前"
		IF CFLAG:318 == 1
			PRINTFORMW 「就在这里裁决吧！！」
		ELSE
			SELECTCASE RAND:3
				CASE 0
					PRINTFORMW 「就让我来计算一下你罪责的分量」
				CASE 1
					PRINTFORMW 「你有好好遵循我的教诲吗？」
				CASE 2
					PRINTFORMW 「我对弹幕的『対戦』也是很有自信的」
			ENDSELECT
		ENDIF
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;ハンデ
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "ハンデ"
		;ハンデつけなかったら表示されないので無記入でよい
		PRINTFORML
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;戦闘中TARGET被弾時口上
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "被弾"
		;別に一律で「やられたー」だけでもいいよ
		SELECTCASE 相手残機
			;残り残機3が表示されるのは【洽覧深識】持ちのみ
			CASE 3
				PRINTFORML
			CASE 2
				IF CFLAG:318 == 1
					PRINTFORMW 「…接下来」
				ELSE
					PRINTFORML 「有好好遵循我的教诲的话,这种程度也是理所应当的」
					PRINTFORMW 「接下来就让我再试试」
				ENDIF
				PRINTFORMW 「審判『十王审判』！」
			CASE 1
				IF CFLAG:318 == 1
					PRINTFORMW 「…这样就结束了」
				ELSE
					PRINTFORML 「很有两下子呢」
					PRINTFORMW 「那么,就如此分明黑白吧」
				ENDIF
				PRINTFORMW 「審判『最终审判』！！」
			CASE 0
				IF CFLAG:318 == 1
					PRINTFORMW 「…咕」
				ELSE
					PRINTFORMW 「真漂亮」
				ENDIF
		ENDSELECT
	ENDIF
	;-------------------------------------------------
	;戦闘中
	;TARGETの【残忍酷薄】発動時
	;ARGはTARGETの残機
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "残忍酷薄"

	ENDIF
	;-------------------------------------------------
	;戦闘中
	;TARGETの【乾坤一擲】発動時
	;ARGはTARGETの残機
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "乾坤一擲"
		IF CFLAG:318 == 1
			PRINTFORMW 「……小把戏」
		ELSE
			PRINTFORMW 「这里就是胜负的关键」
		ENDIF
	ENDIF
	;-------------------------------------------------
	;戦闘中
	;TARGETの【怪力乱神】発動時
	;ARGはTARGETの残機
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "怪力乱神"

	ENDIF

	;-------------------------------------------------
	;戦闘後
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "戦闘後"
		PRINTFORML
		;残り残機4が表示されうるのは【洽覧深識】持ちのみ
		;残機が1以上なら你の負け、0の場合は你の勝利
		SELECTCASE 相手残機
			CASE 4
				PRINTFORML
			CASE 3
				IF CFLAG:318 == 1
					PRINTFORMW 「…判决是地狱。永远都不会得到拯救」
				ELSE
					PRINTFORMW 「你在干什么？好好振作点！」
				ENDIF
			CASE 2
				IF CFLAG:318 == 1
					PRINTFORMW 「…判决你去畜生界。就去成为畜生的饵料吧」
				ELSE
					PRINTFORMW 「唔嗯ー首先你还记得我的教诲吗？」
				ENDIF
			CASE 1
				IF CFLAG:318 == 1
					PRINTFORMW 「…判决留在人界。一定要痛改前非」
				ELSE
					PRINTFORMW 「虽然很可惜,但也可以说是你每天的积累不足吧」
				ENDIF
			CASE 0
				;日記フラグ＠映姫様が負けた
				IF DIARY:30:4 == 0
					CALL K30_WRITE_DIARY(4)
					;過去に映姫様が勝利してたら分岐
					SIF STRCOUNT(CSTR:30:0, "勝利")
						SETBIT CFLAG:1910, 1
				ENDIF
				IF CFLAG:318 == 1
					PRINTFORMW 「………判決暂且保留」
				ELSE
					PRINTFORML 「做得很好。但这可并不是终点」
					PRINTFORMW 「善行和修炼都要积累起来。今后也请继续精进」
				ENDIF
		ENDSELECT
		;日記フラグ＠你が負けた
		IF 相手残機 > 0
			CALLF FIRSTTIME("勝利")
			IF DIARY:30:3 == 0 && !CFLAG:30:弾幕勝負勝利
				CALL K30_WRITE_DIARY(3)
				SIF 相手残機 == 1
					SETBIT CFLAG:1910, 0
			ENDIF
		ENDIF
	ENDIF
RESETCOLOR
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【30】映姫様/M_KOJO_K30_弾幕勝負.ERB