code:
@M_KOJO_IRAIEXIST_K139(IRAI_NO)
#DIM  IRAI_NO   ;抑制させる一般依頼ナンバー
;動きを抑制させたい場合は、”RETURN 0”に変更すること
SELECTCASE IRAI_NO
	;幫忙做掃除（発生条件：TARGETがメインMap在住）
	CASE 1
		RETURN 0
	;給花澆水（発生条件：TARGETがMASTER侵入可能の自宅住まいかつ、メインMap在住かつ、親密２以上）
	CASE 2
		RETURN 0
	;一起玩吧（発生条件：TARGETがTALENT:幼稚持ち）
	CASE 3
		RETURN 0
	;想要学習料理（発生条件：TARGETの料理技能がMASTER未満かつ、MASTERの料理技能が２以上かつ、親密が３以上）
	CASE 4
		RETURN 1
	;関于特訓（発生条件：TARGETの戦闘能力がMASTER以下かつ、親密が２以上かつ人类之里以外）
	CASE 5
		RETURN 0
	;誰来告訴我！（発生条件：TARGETの教養がMASTER以下）
	CASE 6
		RETURN 0
	;大掃除還沒結束（発生条件：TARGETがメインMap在住かつ、冬の15日から31日までかつ、親密が３以上）
	CASE 7
		RETURN 0
	;送信（発生条件：TARGETの信賴度が30以上かつ、TARGETに文通相手が設定されている（FUNC_IRAI.ERBの965目以降に存在）
	CASE 8
		RETURN 0
	;誰的遺失物（発生条件：TARGETの信賴度が30以上）
	CASE 9
		RETURN 0
	;怎麼也找不到(そのまま落ちてる)（発生条件：TARGETの信賴度が30以上）
	CASE 10
		RETURN 0
	;怎麼也找不到(誰かが拾ってる)（発生条件：TARGETの信賴度が30以上）
	CASE 11
		RETURN 0
	;懲らしめて！（発生条件：TARGETのCSVに戦闘能力が１以上ある場合）
	CASE 12
		RETURN 1
	;好吃的魚が食べたいなぁ（発生条件：若鷺姫以外）
	CASE 13
		RETURN 1
	;想被你抱（発生条件：炮友or愛欲かつ积攒度700以上 or 風騷）
	CASE 15
		RETURN 1
	;お悩み相談（発生条件：MASTERの話術技能が１以上）
	CASE 16
		RETURN 1
	[SKIPSTART]
	;現状無し
	CASEELSE
		RETURN 1
	[SKIPEND]
ENDSELECT

;==================================================
;依頼口上・各依頼で共通の口上
;==================================================
@M_KOJO_IRAI_K139(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%_K139(ROLE, SCENE, CLIENT_ID)
ELSE
	TRYCALLFORM M_KOJO_IRAI_{CHK_ID}_K139(ROLE, SCENE, CLIENT_ID)
ENDIF
SIF RESULT
	RETURN 1
;--------------------------------------------------
;ここにあるのは各依頼で共通の口上です
;依頼ごとの口上を表示した場合は共通の口上は表示されません
;【】で囲ってあるのは口上前後の地の文や発生する処理です
;WAITをするか等の目安にしてください（L,WはそれぞれPRINTFORML,PRINTFORMWの略）
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
;●依頼を持ち礦物碎片れる時
;【W どうやら［彼女］は［你］に頼み事があるようだ】
IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
	PRINTFORML 「お姉ちゃん、%CALLNAME:MASTER%どのにお願いしたいことがあるんですけどね…」
	PRINTFORML 典は%CALLNAME:MASTER%の肩を揉みながら耳元に唇を寄せた
ELSE
	PRINTFORML 「%CALLNAME:MASTER%どの。你様にしか頼めないことがありまして…」
ENDIF
;【依頼データ表示】
;【INPUT（受託するかY/N）】

CASE "依頼非受託時"
;●内容だけ見て受託しなかった時
;【L ［你］は丁重にお断りした】
IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
	PRINTFORML 「あーあ。お姉ちゃん、%CALLNAME:MASTER%どのならお願い聞いてくれると思ったのになぁ。くすん、くすん」
	PRINTFORML 典はわざとらしい泣きまねをしている…
ELSE
	PRINTFORML 「そうでございますか…残念です」
ENDIF

;【W ［彼女］は残念そうな顔をしている】

CASE "依頼受託時"
;●依頼を受託した時
;【W ［你］は［彼女］の依頼を受けた】
IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
	PRINTFORML 「本当ですか？　だから%CALLNAME:MASTER%どののこと大好きなんです♪」
	PRINTFORML 典は%CALLNAME:MASTER%に抱きついてきた
ELSE
	PRINTFORML 「ありがとうございます。さすがは%CALLNAME:MASTER%どのですね♪」
ENDIF

CASE "依頼確認時"
;●[366]で依頼内容を依頼人に確認した時
IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
	PRINTFORML 「よい心掛けですね。記憶に自信がなかったらすぐ確認する。大事なことですよ」
	PRINTFORML 典は%CALLNAME:MASTER%の頭をくしゃりと撫でた
ELSE
	PRINTFORML 「依頼の内容を確認したいのですか？　覚えきれない時は紙か何かに記すとよいですよ」
ENDIF
;【依頼データ表示】
;【INPUT（破棄するかY/N）】

CASE "依頼破棄時"
;●受託した依頼を破棄する時
IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
	PRINTFORML 「あーあ。お姉ちゃん、%CALLNAME:MASTER%どのならお願い聞いてくれると思ったのになぁ。くすん、くすん」
	PRINTFORML 典はわざとらしい泣きまねをしている…
ELSE
	PRINTFORML 「そうでございますか…残念です」
ENDIF
;【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 "成功報告時"
;●報告時（成功）
;【依頼実行と報告が同時の時：▲上の口上から続き】
;【◆口上】
;【ソースの入手・道具等の報酬獲得】

CASE "失敗報告時"
;○直接失敗報告は現在「06_誰来告訴我！」のみ
;●報告忘れ・期限切れになった際、遭遇時の最後に呼び出される
;（遭遇時）【挨拶等】→【心情の良し悪し】→【劣情察知】→【祭日イベント】→【◆ココ！】（尚、依頼失敗判定があると约会のお誘いは発生しません）
;【◆口上】
;○心情の変化や追加のペナルティ等は口上側で処理してください

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

ENDSELECT
RETURN 1

;==================================================
;依頼口上・一般依頼01：幫忙做掃除
;==================================================
@M_KOJO_IRAI_1_K139(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です
	IF YOGORE:(GET_CHARAHOME(TARGET)) < 1000
	;先に掃除してしまっていた場合
	;【◆口上】
	;【W ［彼女］的房間は十分にきれいだ】
	;【▼そのまま下の口上へ】

		RETURN 0
	ELSE
	;一緒に掃除場合
	;【◆口上】
	;【W ［你］は［彼女］と協力して部屋の掃除を行なった】
	;【▼そのまま下の口上へ】

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

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

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼02：給花澆水
;==================================================
@M_KOJO_IRAI_2_K139(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 "依頼実行直前"
;【◆口上】
;【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_K139(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_K139(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です
;【◆口上】
;【L ［你］は［彼女］と一緒に料理をした】
;【W ［料理名］を作ります】
;【▼そのまま下の口上へ】

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

	RETURN 0
CASE "成功報告時"
;報酬：\500
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】
;【L できた料理は二人いっしょに頂いた】
;【吃飯効果（料理打分）】

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼05：関于特訓
;==================================================
@M_KOJO_IRAI_5_K139(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 "成功報告時"
;報酬：\500
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼06：誰来告訴我！
;==================================================
@M_KOJO_IRAI_6_K139(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 "依頼実行直前"
	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
	;成功した時
	;【▼そのまま下の口上へ】

		RETURN 0
	CASE 6
	;失敗した時
	;【▼そのまま失敗報告時の口上へ】

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

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼07：大掃除還沒結束
;==================================================
@M_KOJO_IRAI_7_K139(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です
	IF YOGORE:(GET_CHARAHOME(TARGET)) < 1000
	;先に掃除してしまっていた場合
	;【◆口上】
	;【W ［彼女］的房間は十分にきれいだ】
	;【▼そのまま下の口上へ】

		RETURN 0
	ELSE
	;一緒に掃除場合
	;【◆口上】
	;【W ［你］は［彼女］と協力して徹底的に部屋を掃除した】
	;【▼そのまま下の口上へ】

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

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

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼08：送信
;※この依頼はキャラによっては発生しません
;==================================================
@M_KOJO_IRAI_8_K139(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 "依頼実行直前"
;○この依頼では手紙を渡される側の口上です
;【◆口上】
;【W ［你］は［彼女］に預かっていた手紙を渡した】
;【▼そのまま下の口上へ】

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

	RETURN 0
CASE "成功報告時"
;報酬：素材4つ

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼09：誰的遺失物
;==================================================
@M_KOJO_IRAI_9_K139(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 "依頼実行直前"
;○この依頼では落とし物を渡される側の口上です
;【◆口上】
;【W ［你］は［彼女］に預かっていた落とし物を返した】
;【▼そのまま下の口上へ】

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

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

	RETURN 0
CASE "失敗報告時"

	RETURN 0
CASE "依頼報告不要"

	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼10：怎麼也找不到（場所探しパターン）
;==================================================
@M_KOJO_IRAI_10_K139(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 "依頼実行直前"
;【◆口上】
;【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_K139(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 "依頼実行直前"
;○この依頼では失くしもの持っていた側の口上です
;【◆口上】
;【W 聞き込みを続けていた［你］はついに探していた落とし物を発見した】
;【▼そのまま下の口上へ】

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

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

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼12：懲らしめて！
;==================================================
@M_KOJO_IRAI_12_K139(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 "依頼実行直前"
;○この依頼では討伐される側の口上です
	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_K139(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です
;【◆口上】
;【L ［你］は［彼女］に好吃的魚を渡した】
;【L 何だか生きる希望がわいてきたよ。】
;【▼そのまま下の口上へ】

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

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

	RETURN 0
CASE "失敗報告時"

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

;==================================================
;依頼口上・一般依頼15：想被你抱
;とりあえずテストがてら好吃的魚をコピペしてみる
;==================================================
@M_KOJO_IRAI_15_K139(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;キャラの立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		IF CFLAG:1020 == 1
			PRINTFORML 「%CALLNAME:MASTER%どの…♪　お姉ちゃんとまた『イイこと』しましょ…♪」
			PRINTFORML 典が自らの下腹部を撫でさすりながら誘ってきた
			PRINTW
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%どの…お姉ちゃんと『イイこと』しませんか…♪」
			PRINTFORML 典は%CALLNAME:MASTER%を後ろ抱きにしながら語りかけてきた
			PRINTW
			PRINTFORML 「難しいことじゃありません。お姉ちゃんを気持ちよくしてくれればそれでいいんです…♪」
			IF TALENT:MASTER:無知
				PRINTFORML 「……あー、本当に何をすればいいのか分からないって顔してますねぇ…」
				PRINTFORML 「難しいことじゃありません。お姉ちゃんの指示街道体を撫でさすったり、解したりしてくれればいいんです♪」
				PRINTFORML 「頑張ったら、たくさんお小遣いあげちゃいます♪」
			ELSE
				IF TALENT:MASTER:非童貞 == 0
					PRINTFORML 「経験はなくても分かりますよね？　お姉ちゃんのお尻とかチラチラ見てますもんね♪」
					PRINTFORML 典はニヤリと笑い、耳元でそっと囁く
					SETCOLOR 0xFF69B4
					CALL HPH_PRINT,@"「お姉ちゃんと、性交しましょ…HPH」","L"
					RESETCOLOR
				ELSE
					CALL HPH_PRINT,@"「その街道。お姉ちゃんと、性交してくれればいいんです…HPH」","L"
					CALL HPH_PRINT,@"「お姉ちゃんのこと、たくさん気持ちよくしてくれたらお小遣いもあげますHPH」","L"
					PRINTW
					PRINTFORML そう言って、典は額を提示してきた
					CALL HPH_PRINT,@"「どうですか？　悪い条件ではないと思いますが…HPH」","L"
					PRINTFORML %CALLNAME:MASTER%のお腹を撫でさすりながら、典は返事を待っている
				ENDIF
			ENDIF
		ENDIF
	ELSE
		IF CFLAG:1020 == 1
			PRINTFORML 「%CALLNAME:MASTER%どの…♪　また\@ (TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3) ? おちんぽ # 体を \@貸していただけませんか♪」
			PRINTFORML 典が%CALLNAME:MASTER%の下腹部を撫でさすりながら誘ってきた
			PRINTW
			CALL HPH_PRINT,@"「\@ (TALENT:MASTER:性別 == 2 || TALENT:MASTER:性別 == 3) ? 中出しし放題HPH # \@　犯し放題HPHの女狐の体の疼き、鎮めてくださいませ…HPH」","L"
			PRINTW
		ELSE
			PRINTFORML 「%CALLNAME:MASTER%どの、折り入ってお願いが…」
			PRINTFORML 典は%CALLNAME:MASTER%にしなだれかかり、頬を指でなぞってきた
			CALL HPH_PRINT,@"「典のこと、抱いていただけませんか…HPH」","L"
			PRINTW
			IF TALENT:MASTER:無知
				PRINTFORML %CALLNAME:MASTER%は典をそっと抱きしめた
				PRINTFORML 「わぁ、%CALLNAME:MASTER%どのあったかいです…ってその抱くじゃありませんってば」
				PRINTFORML 典は少しだけ距離をとると何かを横にどける仕草をした
				PRINTW
				PRINTFORML 「人にして是い歳してそういう方向に疎いとか…霞でも食べて生きてるんですか？」
				PRINTFORML 「まあ食欲まみれの仙人様もいらっしゃるくらいですし、そういう人类がいてもいいのかもしれないですね…」
				PRINTW
				PRINTFORML 「…っと、話が逸れてしまいました」
				PRINTFORML 「早い話が、典の体の『凝り』を『撫でたり』『揉んだり』して解していただければと…♪」
				PRINTFORML 「やり方は典から指示いたしますし、もちろん報酬もお支支付いたしますよ♪」
				PRINTW
				PRINTFORML 「どうです？　受けていただけますか？」
				PRINTW
			ELSE
				PRINTFORML 頬を撫でる手と反対の手は%CALLNAME:MASTER%の股間に延び、五指で巧みに愛撫を加えてくる
				PRINTFORML まるで、これは自分のものだといわんばかりに
				PRINTW
				CALL HPH_PRINT,@"「仕事柄、色々と気を遣うものでして…たまにはこうやって気晴らしをしませんと、ね…HPH」","L"
				CALL HPH_PRINT,@"「もちろんタダとは申しません。満足させていただけるなら報酬もお支支付いたしますHPH」","L"
				PRINTFORML 典の指の動きに熱がこもってくる
				PRINTW
				SETCOLOR 0xFF69B4
				IF TALENT:恋慕 || TALENT:恋人
					CALL HPH_PRINT,@"「こんなこと…%CALLNAME:MASTER%どのにしか頼めませんから…どうか…お情けを…HPH」","L"
				ELSEIF CFLAG:既成事實 & 合意_诶嘿嘿
					CALL HPH_PRINT,@"「知らぬ仲ではないでしょう。また、典を可愛がってくださいませ…HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「典が満足した後でも、この身体、存分に味わってくださって構いませんから…HPH」","L"
				ENDIF
				RESETCOLOR
				PRINTFORML 「どうです？　受けていただけますか？」
				PRINTW
			ENDIF
		ENDIF
	ENDIF
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		IF TALENT:MASTER:無知
			CALL HPH_PRINT,@"「よろしくお願いしますね…HPH」","L"
			IF TALENT:MASTER:非童貞 == 0
				CALL HPH_PRINT,@"（ああ…何も知らない子に性の悦びを教えるなんて…HPH）","W"
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"（私に逸物が生えていたら、今頃いきり立たせて先端から先走り汁を浅ましく垂らしていることでしょうHPH）","W"
				PRINTW
				CALL HPH_PRINT,@"（早くHPH　早くこの子を犯したいHPHHPH　精液が涸れ果てるまで絞りつくしたいHPHHPH）","L"
				PRINTW
				RESETCOLOR
			ELSE
				CALL HPH_PRINT,@"（ああ…いまだ男女の交わりがどういうことか理解していないこの子を私が犯す…HPH）","W"
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"（想像しただけで下腹部が疼くHPHHPH　迎えたがっているHPHHPH）","W"
				PRINTW
				CALL HPH_PRINT,@"（早くHPH　早くこの子を犯したいHPHHPH　精液が涸れ果てるまで絞りつくしたいHPHHPH）","L"
				PRINTW
				RESETCOLOR
			ENDIF
		ELSE
			IF TALENT:MASTER:非童貞 == 0
				CALL HPH_PRINT,@"「ふふ…HPH　お姉ちゃんが優しく手ほどきしてあげますね…HPH」","L"
				PRINTFORML 典の視線は青臭い臭いを漂わせる%CALLNAME:MASTER%の股間に注がれている…
				CALL HPH_PRINT,@"（ああ…HPH　服越しでも分かる濃厚な初物の臭い…HPH　早く、早く味わいたい…HPH）","L"
				PRINTW
			ELSE
				CALL HPH_PRINT,@"「ふふ…HPH　楽しみなのはお姉ちゃんだけじゃないみたいですね…HPH」","L"
				PRINTFORML 典はねっとりと絡みつくような視線を%CALLNAME:MASTER%の股間に注いでいる…
				CALL HPH_PRINT,@"（さて、どれだけ私のことを楽しませてくれるかしら…HPH）","L"
				PRINTW
			ENDIF
		ENDIF
	ELSE
		CALL HPH_PRINT,@"「ふふ…HPH　嬉しい…HPH」","L"
		CALL HPH_PRINT,@"「%CALLNAME:MASTER%どのの金玉に溜め込んだ濃厚な子種、典に全部吐き出してくださいね…HPH」","L"
		PRINTW
	ENDIF
	RETURN 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

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

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

	RETURN 0
CASE "成功報告時"
;報酬：\\20000
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		CALL HPH_PRINT,@"「%CALLNAME:MASTER%どの、すっごくよかったですよぉ…HPH」","L"
		CALL HPH_PRINT,@"「お姉ちゃん、たくさん気持ちよくなっちゃいましたぁ…HPH」","L"
		PRINTW
		PRINTFORML 典はまだ余韻が冷めやらぬのか、四肢を絡みつかせながら%CALLNAME:MASTER%の頬や脖子に何度も接吻の雨を降らせている…
		CALL HPH_PRINT,@"「またお小遣いあげますから、お姉ちゃんが『困った』ときは、よろしくお願いしますね…HPH」","L"
		PRINTFORML 典に下腹部を撫でさすられ、\@ TALENT:MASTER:性別 == 1 ? 子宮がキュンと疼くのを # 阴茎が石更と鎌首をもたげてくるのを \@感じてしまった…
		PRINTW
	ELSE
		CALL HPH_PRINT,@"「んっHPH　ちゅるっHPH　ちゅHPH」","L"
		CALL HPH_PRINT,@"「はぁ…HPH　%CALLNAME:MASTER%どの、素敵でしたぁ…HPH」","L"
		PRINTFORML 典は%CALLNAME:MASTER%の\@ TALENT:MASTER:性別 == 1 ? ヴァギナ # 阴茎 \@を舐め清めると、満足げな表情を浮かべた
		PRINTW
		CALL HPH_PRINT,@"「典は性欲を解消できる。%CALLNAME:MASTER%どのはお金が稼げる。まさにwin-winですねHPH」","L"
		CALL HPH_PRINT,@"「%CALLNAME:MASTER%どのさえよろしければ、これからもご贔屓いたしますよ…HPH」","L"
		PRINTFORML 典はよほど%CALLNAME:MASTER%がお気に召したのか、股間を絶妙なタッチで撫でさすってきた…
		PRINTW
	ENDIF
	CFLAG:139:1020 = 1
	RETURN 0
CASE "失敗報告時"
	IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
		PRINTFORML 「う～ん……次はもう少し頑張りましょうね♪」
		PRINTFORML 典は困ったような笑みを浮かべ、%CALLNAME:MASTER%の頭を優しく撫でてくれている
		PRINTFORML 逆にその優しさが辣…
	ELSE
		PRINTFORML 「……%CALLNAME:MASTER%どのだけ満足してどうするんですか」
		PRINTFORML 「こんなの、生殺しじゃないですかぁ～」
		PRINTFORML 中途半端に性感を高められ、典は恨みがましい表情を%CALLNAME:MASTER%に向けている…
	ENDIF
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼16：お悩み相談
;==================================================
@M_KOJO_IRAI_16_K139(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 1
CASE "依頼確認時"

	RETURN 0
CASE "依頼破棄時"

	RETURN 0
CASE "依頼実行直前"

	RETURN 0
CASE "依頼実行直後"
	IF TFLAG:193 == 1
		;正解の選択肢
	ELSEIF TFLAG:193 == 2
		;ハズレの選択肢だったが逆に正解
	ELSEIF TFLAG:193 == -1
		;ハズレの選択肢
	ELSEIF TFLAG:193 == -2
		;正解の選択肢だったが逆にハズレ
	ENDIF
	RETURN 0
CASE "成功報告時"
;報酬：野菜か果物

	RETURN 0
CASE "失敗報告時"

	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
CASE "口上委託率"
;＜この依頼特有の分岐です。(RESULT:1の値)％の確率で"口上専用"が発生します＞
	RESULT:1 = 0
	RETURN 1
CASE "口上専用"
;＜この依頼特有の分岐です。(口上委託率)％の確率で発生します＞
;16,お悩み相談 の場合
;RESULT        発生判定,0だと発生しません
;RESULT:1      正解の選択肢（ただしRESULT:2が0だと、一定確率で逆にハズレる）
;RESULT:2      逆張り正解／ハズレ判定の消去,1だと逆張りが無くなります
;RESULTS:0     お悩み文章（自動で『』で囲まれます）
;RESULTS:1～3  選択肢１～３
;何も発生しない状態になると無限ループになるので注意してください
	RESULT = 0

;▼サンプル
[SKIPSTART]
	SELECTCASE RAND:3
	CASE 0
		;このお悩みは、恋慕で発生し、親密によって正解が変わります
		SIF TALENT:恋慕
			RESULT = 1
		RESULTS:0 = 赤ちゃん作るなら何人がいいかな？
		RESULTS:1 = ５人で風呂ケチームを作ろう
		RESULTS:2 = ９人で野球チームを作ろう
		RESULTS:3 = １１人でサッカーチームを作ろう
		IF ABL:親密 >= 100
			RESULT:1 = 3
		ELSEIF ABL:親密 >= 20
			RESULT:1 = 2
		ELSE
			RESULT:1 = 1
		ENDIF
	CASE 1
		;このお悩みは、無条件で発生し、正解は絶対に2番で固定化されます
		SIF 1
			RESULT = 1
		RESULTS:0 = どのジョブがいいかな？
		RESULTS:1 = かっ恋ナイト
		RESULTS:2 = シーフが便利だよ
		RESULTS:3 = 青魔道士最強！
		RESULT:1 = 2
		RESULT:2 = 1
	CASE 2
		;このお悩みは、夏之月に発生し、正解が随机で変わります
		SIF DAY:2 == 2
			RESULT = 1
		RESULTS:0 = どの水着を買おうかな？
		RESULTS:1 = 可爱連衣裙
		RESULTS:2 = クールなセパレート
		RESULTS:3 = 色っぽい比基尼
		RESULT:1 = RAND:3 + 1
	ENDSELECT
[SKIPEND]

	SIF !RESULT
		RESTART
	RETURN 1
ENDSELECT

;==================================================
;依頼口上・固有依頼101：
;固有依頼の仕様はキャラによって異なりますが依頼番号は101～で共通です
;"依頼名"部分に依頼名を入れて下さい
;==================================================
@M_KOJO_IRAI_依頼名_K139(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;キャラの立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORML 「%CALLNAME:MASTER%阁下、可以听一听\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@的请求吗？」
	PRINTFORML 「……因为有些不方便直接大声说出来、还请附耳」
	PRINTW
	PRINTFORML 「其实…希望%CALLNAME:MASTER%阁下能分给我一些精液」
	PRINTFORML 「直接往这个容器里…简单吧？」
	RETURN 1
CASE "依頼非受託時"

	RETURN 0
CASE "依頼受託時"
	PRINTFORML 「非常感谢。只会%CALLNAME:MASTER%阁下这一件事♪」
	PRINTFORML 「%CALLNAME:MASTER%阁下的精液似乎有某些特别之处…身为研究者、还请麻烦容许我做一些各种各样的调查♪」
	PRINTFORML 「如果能把方方面面都解明的话、或许能应用在药物和治疗方面也说不定…」
	PRINTW
	PRINTFORML 「啊、但有一点需要注意」
	PRINTFORML 「您提供的精液、请要在最最濃厚的状态下进行提供。不然就会无效所以请注意」
	PRINTFORML 「可以吗。请在[濃厚精液]状态下、在自己房间里自慰吧」
	PRINTW
	PRINTFORML 「嘛…确实条件有些严苛所以、期限是30天之内」
	PRINTFORML 「只要保存到这个容器里、新鲜度就会不成问题了哦」
	PRINTFORML 「那么、就拜托你了」
	PRINTW
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「忘记依頼内容了吗？　那么、就再说一遍、请好好记住哦」
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		SETCOLOR 0xFF69B4
		CALL HPH_PRINT,@"「麻烦%CALLNAME:MASTER%阁下用小鸡鸡咻咻咻地、把精子多多地射进这个容器里呢HPH」","L"
		CALL HPH_PRINT,@"「姐姐啊、希望能拿到最最浓的精液呐…HPH」","L"
		CALL HPH_PRINT,@"「这～里HPH　用这个蛋蛋、拼命地积蓄上一阵子就能射出来了哦…HPH」","L"
		RESETCOLOR
		PRINTW
		PRINTFORML 「明白了吗♪　那拜托你了♪」
		PRINTW
	ELSE
		PRINTFORML 「请%CALLNAME:MASTER%阁下在自己房间里自慰、然后将精液保存到给你的那个容器里」
		PRINTFORML 「不过、如果不是[濃厚精液]的话是不算数的所以请注意」
		PRINTFORML 「等着你的好消息♪」
		PRINTW
	ENDIF
	RETURN 1
CASE "依頼破棄時"
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		PRINTFORML 「真是遗憾呢…姐姐、明明很想要、%CALLNAME:MASTER%阁下的精液…」
		PRINTW
	ELSE
		PRINTFORML 「哦呀哦呀、这还真是遗憾…希望下次能有机会吧」
		PRINTW
	ENDIF
	RETURN 1
CASE "依頼実行直前"

	RETURN 0
CASE "依頼実行直後"

	RETURN 0
CASE "成功報告時"
;報酬：
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		PRINTFORML 「哇啊、好好的射进去了呢♪　了不起了不起♪」
		PRINTFORML 典在%CALLNAME:MASTER%的脸颊上吻了一下、然后把嘴唇靠到你耳旁
		PRINTFORML 「是一边想着姐姐、一边射出来的吧…%UNICODE(0x2665) *1%」
		PRINTW
	ELSE
		PRINTFORML 「没错、确实。哎呀、这个确实是值得一喝的…咳咳、什么都没有」
		PRINTFORML 「实在是万分感谢。之后也请务必协助我哦」
		PRINTW
	ENDIF
	RETURN 1
CASE "失敗報告時"
	IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
		PRINTFORML 「啊～啊…姐姐啊、好失落啊…」
		PRINTFORML 「%CALLNAME:MASTER%阁下、是个连精液都没法提供给姐姐的、没用的孩子呢」
		PRINTFORML 「那姐姐、就只好去拜托别人了啊…」
		PRINTW
	ELSE
		PRINTFORML 「本想着%CALLNAME:MASTER%阁下的话是一定可以完成依赖的…真遗憾」
	ENDIF
	RETURN 1
CASE "依頼報告不要"

	RETURN 0
ENDSELECT

[SKIPSTART]
;＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
;依頼口上テンプレのテンプレ
;==================================================
;依頼口上・一般依頼Y：
;==================================================
@M_KOJO_IRAI_Y_K139(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
[SKIPEND]

path: ERB/口上・メッセージ関連/個人口上/【139】典/M_KOJO_K139_依頼.ERB


code:
;CALL K139_ONASAPO
;==========================================================================================
;自慰サポーター典
;==========================================================================================
@K139_ONASAPO
	PRINTFORML ┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
	PRINTFORML ┃%"事件：自慰supporter典",72,LEFT%┃
	PRINTFORML ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛
	PRINTW
	IF CFLAG:1008 == 0
		PRINTFORML 因为最近没有自慰过所以变得很烦躁……！
		PRINTFORML %CALLNAME:MASTER%在被窝里来回打着滚
		PRINTW
		PRINTFORML 「哎呀哎呀、你好像很困扰啊」
		PRINTFORML 不知何时从哪里进来的、典在枕边用手托着腮、俯视着%CALLNAME:MASTER%
		PRINTW
		PRINTFORML 「那个ー、%CALLNAME:MASTER%阁下」
		PRINTFORML 「如果可以的话、让我来帮你吧？」
		PRINTW
		PRINTFORML 这姑娘突然在说什么啊！？
		PRINTFORML 「事实上、我希望%CALLNAME:MASTER%阁下可以分一些自己的精液给我」
		PRINTW
		PRINTFORML 「我每天都在调配各种各样的药、其中也有以精液为材料的」
		PRINTFORML 「不一定总是都能顺利得到」
		PRINTW
		PRINTFORML 「因此、希望能由熟识的%CALLNAME:MASTER%阁下来提供材料。
		PRINTFORML 　%CALLNAME:MASTER%阁下既能舒服起来、我又能得到精液。我认为这是一个win-win（双赢）的方案」
		PRINTFORML 「啊、顺带一提如果不是[童贞]的话就没有意义了、还请包含」
		PRINTW
		PRINTFORML 要听取典的建议吗…
		CALL ASK_YN("不接受的话感觉不太礼貌…","好像有什么内幕、好可怕。果然还是拒绝吧")
		IF !RESULT
			PRINTFORMW 「交涉成立♪　那么、下次就让我来照顾你吧♪」
			PRINTFORML 今天不能帮我做吗！？
			PRINTFORML %CALLNAME:MASTER%被一个人留在那里、陷入愕然之中…
			PRINTL
			CFLAG:1008 = 1
		ELSE
			PRINTFORML 「这样啊、真是遗憾」
			PRINTFORML 「那么、就当我没提起过这个话题吧…那就请好好休息吧」
			PRINTW
			PRINTFORML 典的全身突然被烟雾笼罩。待到烟雾散去的时候、典已经消失了
			PRINTW
			CFLAG:1008 = 2
		ENDIF
	ELSEIF CFLAG:1008 == 1
		PRINTFORML 「看起来很辛苦的样子呢」
		PRINTFORML 典从上面看着躺在被子里闷闷不乐的自己
		PRINTW
		PRINTFORML 「我是按照约定来帮忙的」
		PRINTFORML 「无需忍耐、请好好享受吧♪」
		PRINTW
		PRINTFORML 「来吧♪　请立即開始吧♪」
		PRINTFORML 感觉好像不像约定的那样…
		PRINTW
		PRINTFORML 「啊咧啊咧？让你误会了吗？」
		PRINTFORML 典把手放在嘴边、扑哧一笑
		PRINTFORML 「我说过『我会帮忙』、但没说过『我会帮你』」
		PRINTW
		PRINTFORML 「%CALLNAME:MASTER%阁下射精的时候、我会好好看着的、所以请多射一些出来♪」
		PRINTFORML 总觉得被陷害了…尽管如此、%CALLNAME:MASTER%还是掏出自己的逸物開始自慰
		PRINTW
		PRINTFORML 「啊ー啊、真的開始自慰了呢%UNICODE(0x2665) *1%　明明还被我看着呢%UNICODE(0x2665) *1%」
		PRINTFORML 「你总是这样自慰吗%UNICODE(0x2665) *1%　呼呼%UNICODE(0x2665) *1%」
		PRINTFORML 典把手放在嘴边、一边咯咯地笑着、一边看着%CALLNAME:MASTER%用逸物自慰的样子
		PRINTW
		PRINTFORML 「嘸呼呼%UNICODE(0x2665) *1%　一边被我看着一边自慰、感觉舒服吗？」
		PRINTFORML 典把脸凑到我耳边、小声说道
		PRINTW
		PRINTFORML 「哎呀哎呀、肉棒、正在颤抖着呢%UNICODE(0x2665) *1%」
		PRINTFORML 「%CALLNAME:MASTER%阁下、真是个被人看到就兴奋的变态啊…%UNICODE(0x2665) *1%」
		PRINTW
		PRINTFORML 典的双手放在%CALLNAME:MASTER%的肩上、轻轻地開始抚摸起来
		PRINTFORML 「在女性面前把肉棒露出来、还弄得如此雄壮、如果讨厌的话是不会这么做的吧…%UNICODE(0x2665) *1%」
		PRINTFORML 「快、再继续多撸撸肉棒。撸啊撸、这不是很擅长嘛？」
		PRINTW
		PRINTFORML 「继续、撸啊撸…♪　撸啊撸…♪」
		PRINTFORML 「撸啊撸…♪　撸啊撸…♪　就这样继续%UNICODE(0x2665) *1%」
		PRINTFORML 典灼热的吐息吹拂着我的耳朵、我的脖子因此而不断哆嗦着
		PRINTW
		PRINTFORML 「哈啊…%UNICODE(0x2665) *1%　从肉棒的前端处、先走汁已经流出来了呢…%UNICODE(0x2665) *1%」
		PRINTFORML 「撸动肉棒的速度越来越快了哦…%UNICODE(0x2665) *1%　很想射吗？　看来是很想射出来呢…%UNICODE(0x2665) *1%」
		PRINTW
		PRINTFORML 「先走汁越流越多了哦%UNICODE(0x2665) *1%　传来了阵阵臭味呢%UNICODE(0x2665) *1%」
		PRINTFORML 「五～%UNICODE(0x2665) *1%四～%UNICODE(0x2665) *1%三～%UNICODE(0x2665) *1%二～%UNICODE(0x2665) *1%一～～%UNICODE(0x2665) *1%」
		PRINTFORML 「piupiu地射出来吧～～%UNICODE(0x2665) *1%%UNICODE(0x2665) *1%」
		PRINTW
		PRINTFORML 哔咕…
		PRINTFORML 　　哔咕…
		PRINTW
		PRINTFORML 「哇…%UNICODE(0x2665) *1%　出来了好多呢…%UNICODE(0x2665) *1%」
		PRINTFORML 「试管里都装满了%CALLNAME:MASTER%阁下的精液%UNICODE(0x2665) *1%」
		PRINTW
		PRINTFORML 「好的%UNICODE(0x2665) *1%　辛苦了%UNICODE(0x2665) *1%　已经足够了」
		PRINTFORML 典盖上装满精液的试管、一下子从%CALLNAME:MASTER%的身边离開
		PRINTW
		PRINTFORML 「下次也请继续合作吧♪　那么、我就到此为止了…」
		PRINTFORML 在%CALLNAME:MASTER%的房间里、只剩下处理铃口处流出的残余汁液的%CALLNAME:MASTER%…
		PRINTW
		IF CFLAG:1008 == 1
			CFLAG:1008 = 4
		ELSE
			CFLAG:1008 += 1
		ENDIF
	ELSEIF CFLAG:1008 >= 4
		PRINTFORML 「看起来很辛苦的样子呢」
		PRINTFORML 典从上面看着躺在被子里闷闷不乐的自己
		PRINTW
		PRINTFORML 「我是按照约定来帮忙的」
		PRINTFORML 「无需忍耐、请好好享受吧♪」
		PRINTW
		PRINTFORML 「那么、今天打算怎么办？」
		CALL ASK_M("想要射出来", 1,"中断support", 1,"已经不需要了（结束support）", 1)
		SELECTCASE RESULT
		CASE 0
			PRINTFORML 「嘸呼呼%UNICODE(0x2665) *1%　今天也要一边自慰一边被我看着呢、这样做是不是很舒服？」
			PRINTL 典的吐息声不断搅弄着大脑。逐渐变得除了自慰之外什么也无法思考的情况
			PRINTW
			PRINTFORML 「……好厉害%UNICODE(0x2665) *1%　肉棒变得这么有精神…%UNICODE(0x2665) *1%」
			PRINTFORML 典把脸凑近流滴着先走汁的龟头上、一脸陶醉地注视着它
			PRINTW
			PRINTFORML 「啊哇…%UNICODE(0x2665) *1%　有股很色情的味道呢…%UNICODE(0x2665) *1%　头都開始有些晕乎乎的了…%UNICODE(0x2665) *1%」
			PRINTL 呼出的气息打在阴茎上、一种哆哆嗦嗦的感觉以下半身为中心、传遍全身
			PRINTW
			PRINTL 「啊～～、现在、想要把我的嘴巴贴到鸡鸡上对吧？」
			PRINTL 「就算撒谎也没有用哟。想法暴露得一清二楚啊」
			PRINTFORML 典一脸恍然大悟的表情、准备嗖地一下从%CALLNAME:MASTER%旁边离開
			PRINTW
			PRINTFORML 「问我要去哪里吗…%CALLNAME:MASTER%阁下打破了约定所以我该回去了」
			PRINTL 「之后、就请独自努力了呢。那么再见」
			PRINTW
			PRINTL 「……哦呀、那只手是在做什么？　请放開」
			PRINTL 「『很抱歉』？『什么都不会做』？」
			PRINTL 「鸡鸡完全暴露着、一边有先走液从前面滴滴答答地往下流一边一颤一颤地跳动着。完全没有说服力呢」
			PRINTW
			PRINTFORML 「……那么、如果%CALLNAME:MASTER%阁下能一边喊着喜欢的人的名字一边自慰的话、那我就原谅你了」
			PRINTFORML 「当然、不可以碰我哦。如果明白了的话、请把手放開吧」
			PRINTW
			CALL ASK_M("喊典的名字", 1,"喊龙的名字", 1,"喊两人以外的名字", 1)
			SELECTCASE RESULT
			CASE 0
				PRINTL 「哇啊…原来您喜欢我吗？　拜托喜欢的人帮忙做这种事情…真的是最差劲了呢♪」
				PRINTL 「那么、被喜欢的人看见自己在手淫是什么感受呢？　特别舒服吗？」
				PRINTW
				PRINTL 「还有、您是一边想象着什么样的事情一边在手淫呢…？　请告诉我吧」
				PRINTL 「难道是抱着典不断浓厚地接吻、像恋人一样做爱吗…」
				PRINTW
				PRINTL 「啊哈哈哈哈！　真是恶心！　这是多么恶心的妄想啊！」
				PRINTL 「但是很遗憾。现实中的您根本就碰不到我、只能一个人寂寞地玩弄小鸡鸡呢…！」
				PRINTW
				PRINTL 「真是糟糕呢。真是没出息呢。你看、撸动肉棒的手都那么敷衍呢♪」
				PRINTFORML 典一边咯咯地笑着、一边对继续自慰的%CALLNAME:MASTER%说了侮蔑的话
				PRINTL 不过、她突然一改充满恶意的表情、露出了十分温和温柔的表情
				PRINTW
				PRINTL 「不过呢、毕竟约定好了。所以我会一直看着您的♪」
				PRINTFORML 「一边被喜欢的人守护着、一边在妄想的我的体内～～在膣内射出来吧…%UNICODE(0x2665) *1%」
				PRINTFORML 典绕到%CALLNAME:MASTER%的背后、用手掌轻轻盖住他的双眼、嘴唇贴在耳边
				PRINTW
				PRINTL ……
				PRINTL …
				PRINTW
				;わざわざ演技してくれる典も大概
				SETCOLOR 0xFF69B4
				CALL PRINT_FACE, [[典]], "自慰", "裸", "", ""
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下HPH　喜欢你HPH　最喜欢你了」","L"
				CALL HPH_PRINT,@"「\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@要去了HPH　又要去了HPHHPH」","L"
				PRINTW
				CALL PRINT_FACE, [[典]], "性交", "裸", "", ""
				CALL HPH_PRINT,@"「啊HPH　小鸡鸡HPH似乎已经HPH　快要射出来了呢HPHHPH」","L"
				CALL HPH_PRINT,@"「在\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@的肉膣里满满地射出来吧HPH」","L"
				PRINTW
				CALL PRINT_FACE, [[典]], "発情", "裸", "", ""
				CALL HPH_PRINT,@"「别嘛HPH　才不要怀孕HPH　饶过我吧HPH　唯独中出还请饶过我吧HPH」","L"
				CALL HPH_PRINT,@"「讨厌HPH　鸡鸡胀大起来了啊HPHHPH　可以做了HPH　讨厌呀～～HPHHPH」","L"
				PRINTW
				RESETCOLOR
			CASE 1
				PRINTFORML 「喜欢我的主人什么的…」
				IF TALENT:140:恋人
					PRINTL 「嘛、虽然早就知道了呢♪　两人正在交往对吧？」
					PRINTL 「都已经有恋人了、还想在自慰的时候让我看着…真是无可救药呢…♪」
					PRINTW
					PRINTL 「要不要去报告呢…♪」
					PRINTL 「您的恋人、是个会低声下气地让别的女人看自己自慰的、意想不到的变态这样♪」
				ELSE
					PRINTL 「要不要透露给饭纲丸大人呢♪　该怎么办呢♪」
					PRINTFORML 「%CALLNAME:MASTER%阁下一边想着您、一边看着别的女人的同时撸管♪」
					PRINTW
				ENDIF
				PRINTFORML 「開玩笑、的啦♪　请放心吧。这是、只属于我们两人的秘密♪」
				PRINTFORML 「%CALLNAME:MASTER%阁下狼狈的模样实在太可爱了、\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 姐姐 # 典 \@、就忍不住恶作剧了一下♪」
				PRINTW
				PRINTL 「那么、就快些完事、然后高潮吧…♪　闭上眼…♪」
				PRINTFORML 典绕到了%CALLNAME:MASTER%的背后、用手心轻轻遮住了你的双眼、把嘴唇贴近你的耳边
				PRINTW
				PRINTL ……
				PRINTL …
				PRINTW
				SETCOLOR 0xFF69B4
				CALL PRINT_FACE, [[典]], "通常", "裸", "", ""
				PRINTFORML 「你看、%CALLNAME:MASTER%阁下…♪　饭纲丸大人、在看着你哦…%UNICODE(0x2665) *1%」
				PRINTFORML 「看着先走汁从你那根已经变得硬邦邦的鸡巴的龟头上、啾咕啾咕地往下滴…%UNICODE(0x2665) *1%」
				PRINTW
				CALL PRINT_FACE, [[龍]], "憤怒", "裸", "", ""
				CALL PRINT_FACE, [[龍]], "発情", "裸", "", ""
				PRINTFORML 「完全就是一副看见脏东西的眼神呢…不过、目光片刻不离、脸也通红一片、呼吸都很粗乱…%UNICODE(0x2665) *1%」
				PRINTFORML 「饭纲丸大人也被弄兴奋了哟…%UNICODE(0x2665) *1%　被你的肉棒%UNICODE(0x2665) *1%」
				PRINTW
				PRINTFORML 「来吧、继续撸你的肉棒♪　很想把那肮脏的精汁、喷到主人的脸上对吧？」
				PRINTFORML 「用你那臭不可闻的精液、弄脏喜欢的女孩子的脸♪」
				PRINTW
				PRINTFORML 「再快一点♪　再快♪　用能把小鸡鸡弄断的程度去撸动♪」
				CALL HPH_PRINT,@"「射吧HPH　射吧HPH　把精液全部倾泻到饭纲丸大人的脸上HPHHPH」","L"
				RESETCOLOR
				PRINTW
			CASE 2
				PRINTFORML 「呼嗯、%CALLNAME:MASTER%阁下原来喜欢……小姐呢♪」
				PRINTL 「要不要我代为传达啊？」
				PRINTFORML 「%CALLNAME:MASTER%阁下一边想着您、一边看着别的女人的同时撸管♪」
				PRINTW
				PRINTL 「那么、就快些完事、然后高潮吧…♪　闭上眼…♪」
				PRINTFORML 典绕到了%CALLNAME:MASTER%的背后、用手心轻轻遮住了你的双眼、把嘴唇贴近你的耳边
				PRINTW
				PRINTL ……
				PRINTL …
				PRINTW
				SETCOLOR 0xFF69B4
				PRINTFORML 「你看、%CALLNAME:MASTER%阁下…♪　……小姐、在看着你哦…%UNICODE(0x2665) *1%」
				PRINTFORML 「看着先走汁从你那根已经变得硬邦邦的变态鸡巴的龟头上、啾咕啾咕地往下滴…%UNICODE(0x2665) *1%」
				PRINTW
				PRINTFORML 「完全就是一副看见脏东西的眼神呢…不过、目光片刻不离、脸也通红一片、呼吸都很粗乱…%UNICODE(0x2665) *1%」
				PRINTFORML 「……小姐也被弄兴奋了哟…%UNICODE(0x2665) *1%　被你的肉棒%UNICODE(0x2665) *1%」
				PRINTW
				PRINTFORML 「来吧、继续撸你的肉棒♪　很想把那肮脏的精汁、喷到……小姐的脸上对吧？」
				PRINTFORML 「用你那臭不可闻的精液、弄脏喜欢的女孩子的脸♪」
				PRINTW
				PRINTFORML 「再快一点♪　再快♪　用能把小鸡鸡弄断的程度去撸动♪」
				CALL HPH_PRINT,@"「射吧HPH　射吧HPH　把精液全部倾泻到……小姐的脸上HPHHPH」","L"
				RESETCOLOR
				PRINTW
			ENDSELECT
			PRINTFORML 「五～%UNICODE(0x2665) *1%四～%UNICODE(0x2665) *1%三～%UNICODE(0x2665) *1%二～%UNICODE(0x2665) *1%一～～%UNICODE(0x2665) *1%」
			PRINTFORML 「piupiu地射出来吧～～%UNICODE(0x2665) *1%%UNICODE(0x2665) *1%」
			PRINTW
			PRINTFORML 哔咕…
			PRINTFORML 　　哔咕…
			PRINTW
			PRINTFORML 「哇…%UNICODE(0x2665) *1%　出来了好多呢…%UNICODE(0x2665) *1%」
			PRINTFORML 「试管里都装满了%CALLNAME:MASTER%阁下的精液%UNICODE(0x2665) *1%」
			PRINTW
			PRINTFORML 「好的%UNICODE(0x2665) *1%　辛苦了%UNICODE(0x2665) *1%　已经足够了」
			PRINTFORML 典盖上装满精液的试管、一下子从%CALLNAME:MASTER%的身边离開
			PRINTW
			PRINTFORML 「下次也请继续合作吧♪　那么、我就到此为止了…」
			PRINTFORML 在%CALLNAME:MASTER%的房间里、只剩下处理铃口处流出的残余汁液的%CALLNAME:MASTER%…
			PRINTW
			;まだイベントが出来上がってないのでカウント不会うに
			;CFLAG:1008 += 1
		CASE 1
			CALL PRINT_FACE, [[典]], "笑顔", "服", "", ""
			PRINTL 「啊、这样吗。那么、下次想要光顾的时候请和我打声招呼哦。」
			PRINTL
			PRINTL 如果想要再次開始support的话、请带着典去「祈愿」
			PRINTL
			PRINTW
			CFLAG:1008 = 2
		CASE 2
			CALL PRINT_FACE, [[典]], "睡眠", "服", "", ""
			PRINTL 「哎呀、那真是太遗憾了。您难道不喜欢吗？」
			PRINTL 「不过也不能勉强啊。那么、契约就这样终止了…」
			PRINTL 「那么、感谢您一直以来的关照。再见」
			CFLAG:1008 = 3
		ENDSELECT
	ENDIF
	PRINTL
	RETURN 1

;CALL K139_PREG_WISH
;==========================================================================================
;妊娠願望
;==========================================================================================
@K139_PREG_WISH
	PRINTFORML 「饭纲丸大人…怀上了%CALLNAME:MASTER%阁下的孩子…」
	PRINTL 「那副模样看起来十分幸福…是我从未见过的…」
	PRINTL 典轻轻抚摸着自己的下腹部。開始幻想起自己素未谋面的孩子
	PRINTW
	PRINTFORML 「我也…想怀上%CALLNAME:MASTER%阁下的孩子…」
	PRINTFORML 「%CALLNAME:MASTER%阁下…」
	PRINTW
	PRINTFORML 典似乎、非常希望能怀上心爱的%CALLNAME:MASTER%的孩子…
	PRINTFORML 典得到了[妊娠願望]
	PRINTW
	TALENT:妊娠願望 = 1
	RETURN 1

;CALL K139_AFFAIR
;==========================================================================================
;秘密の情事
;==========================================================================================
@K139_AFFAIR
	PRINTFORML 好想和龙做些愉快的事情啊…
	PRINTFORML 虽然这么想、但龙也已经很累了、早早就上床睡觉了…
	PRINTW
	PRINTFORML 要不悄悄地撸一发吧…
	PRINTFORML %CALLNAME:MASTER%正要从睡衣里掏出肉棒的时候、和在眼前躺着的典对上了目光
	PRINTW
	PRINTFORML 「睡不着吗？」
	PRINTFORML 刚想出声、却被典的手堵住了嘴
	PRINTW
	PRINTFORML 「请安静一些…不然饭纲丸大人会醒来的」
	PRINTFORML 典把食指放在嘴边、瞥了一眼%CALLNAME:MASTER%身后的龙的睡颜、微微眯起了眼睛
	PRINTW
	PRINTFORML 「很辛苦吧…明明很想做爱、恋人却毫不知情地睡着了…」
	PRINTFORML 典轻抚着%CALLNAME:MASTER%的股间
	PRINTW
	PRINTFORMW 「这么硬…很痛苦吧？　忍耐得很辛苦吧？　很想射出来吧？」
	PRINTFORMW 典的手轻轻松松地入侵到了你的睡衣里面
	PRINTFORML 典的五指缠绕在%CALLNAME:MASTER%的肉棒上、用羽毛般的触感不断爱抚着
	PRINTW
	CALL HPH_PRINT,@"「哎呀、先走汁都已经流出来了呢…HPH　典的手都变得滑溜溜的了…HPH」","L"
	PRINTFORML 典似乎坚决不想让%CALLNAME:MASTER%高潮。每当你快要射的时候、她爱抚的手就会放慢动作
	PRINTFORML 十分舒服却射不出来…做到一半却又弄得有头无尾的时光仍在持续着
	PRINTFORML 想射出来…想射出来……无意识地開始摆动起腰部
	PRINTW
	CALL HPH_PRINT,@"「不行哦、%CALLNAME:MASTER%阁下…HPH」","L"
	PRINTFORML 典松開勃起到极限的肉棒、转过身背对着%CALLNAME:MASTER%
	PRINTW
	PRINTFORML 沙沙、沙沙…衣服摩擦的声音传来
	PRINTFORML 典脱掉睡衣和内衣、撅起了屁股
	PRINTW
	CALL PRINT_FACE, [[典]], "通常", "裸", "", ""
	SETCOLOR 0xFF69B4
	CALL HPH_PRINT,@"「想射出来的话、请用这里…HPH」","L"
	RESETCOLOR
	PRINTW
	CALL ASK_YN("插入","那有点…不合适")
	;挿れる
	IF !RESULT
		PRINTFORML 抓住典的腰和胸部、把勃起到疼痛的肉棒前端对准典的秘裂、一口气插进去
		CALL HPH_PRINT,@"妞噜嗯HPH","L"
		PRINTFORML 已经濡湿了的典的膣肉、虽然还有一定的抵抗感、但还是很轻易地就吞下了%CALLNAME:MASTER%的阴茎
		PRINTW
		CALL PRINT_FACE, [[典]], "発情", "服", "", ""
		CALL HPH_PRINT,@"「啊啊HPH　%CALLNAME:MASTER%阁下的肉棒、插进来了HPH」","L"
		CALL HPH_PRINT,@"「这个好棒HPH　好棒HPH　哦HPH　哦哦哦HPHHPH」","L"
		PRINTW
		PRINTFORML 把手指塞进了正想大声呻吟出来的典的嘴巴里。典抽搐着反弓着身体、用舌头缠上了口腔内的手指
		CALL HPH_PRINT,@"「哦哦HPH　哦HPH　呼HPH　呼ーーHPH　呼ーーHPHHPH　」","L"
		PRINTW
		PRINTFORML 这是完全没有使用技巧也没有考虑对方的感受、单纯为了射精而进行的性交
		PRINTFORML 尽管如此、典还是露出了十分幸福的表情、喜悦不已
		PRINTW
		PRINTFORML %CALLNAME:MASTER%的阴茎不断传来一阵阵酥麻感。精液開始从尿道爬升上来
		PRINTFORML 终于迎来极限%CALLNAME:MASTER%决定…
		CALL ASK_YN("射在典的膣内","射在典的膣外")
		;膣内に射精した
		IF !RESULT
			PRINTFORML 咚啾！
			PRINTFORML 非常用力地抱住了典、把阴茎捅入了最深处、在紧密贴合的状态下射精了
			PRINTFORML 噼咻～～～～～
			PRINTFORML 　　噼咻噼咻～～～～～～
			PRINTW
			CALL PRINT_FACE, [[典]], "自慰", "裸", "", ""
			CALL HPH_PRINT,@"「哈HPH　哦HPH　哦、哦哦HPH」","L"
			PRINTW
			PRINTFORML 典的穴内似乎连一滴精液也不会放过一样、子宫口还在紧紧吸住龟头、肉壁也啾噜啾噜地紧紧缠绕着
			PRINTFORML %CALLNAME:MASTER%感受着这几乎让自己失神的快感…
			PRINTW
			CALL AddEXP("膣射経験", 139, 1)
			CALL AddEXP("精液経験", 139, 1)
			CALL AddEXP("Ｖ経験", 139, 1)
			CALL AddEXP("Ｖ性交経験", 139, 1)
			CALL AddEXP("絶頂経験", 139, 3)
			CALL AddEXP("Ｖ絶頂経験", 139, 3)
			CALL AddEXP("射精経験", MASTER, 1)
			CALL AddEXP("挿入経験", MASTER, 1)
			CALL AddEXP("Ｃ絶頂経験", MASTER, 1)
			IF TALENT:MASTER:濃厚精液
				EX:膣内精液 += 1000
			ELSE
				EX:膣内精液 += 500
			ENDIF
			CALL HPH_PRINT,@"「呼…肚…肚…肚子里面、好热额……HPH」","L"
			CALL HPH_PRINT,@"「居然在饭纲丸大人的面前、被中出了啊…HPH」","L"
			PRINTW
			PRINTFORML 一说出龙的名字、%CALLNAME:MASTER%感觉脑袋瞬间清明了过来
			PRINTFORML 自己在龙的面前到底做了什么…
			PRINTW
			PRINTFORML 急忙扭头看向龙那里、该说是幸运吗、龙正背向这边熟睡着
			PRINTFORML 意识到这场情事并没有暴露、%CALLNAME:MASTER%抚了抚心口
			PRINTW
			CALL HPH_PRINT,@"「太好了呢、没有暴露…HPH」","L"
			CALL HPH_PRINT,@"「舒服了不少吧？　那么、典就回自己的床上了哦…HPH」","L"
			PRINTW
			PRINTFORML 临走之际、典轻轻地吻了%CALLNAME:MASTER%
			CALL AddEXP("接吻経験", 139, 1)
			SIF TALENT:139:無接吻経験 == 1
			TALENT:139:無接吻経験 = 0
			PRINTFORML 「那么…祝您好梦、%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%」
			PRINTFORML 被一种惬意的疲劳感与罪恶感包裹着、%CALLNAME:MASTER%几乎是瞬间就被困意侵袭…
			PRINTW
		;膣外で射精した
		ELSE
			PRINTFORML 果然射在穴内还是很糟糕…
			PRINTFORML %CALLNAME:MASTER%绞尽自己最后的理性、在射精前的一瞬间把阴茎从穴内抽了出来
			PRINTW
			PRINTFORML 哔咕哔咕哔咕
			PRINTFORML 　　哔哟哔哟、哔哟卟…
			PRINTW
			PRINTFORML 大量的白浊液、把典已经被玷污的黏黏糊糊的裂缝进一步污浊了…
			PRINTFORML 直到最后一滴也射出来之前、%CALLNAME:MASTER%大口喘着气、用逐渐失去硬度的肉壁用力摩擦着典的屁股
			PRINTW
			CALL AddEXP("精液経験", 139, 1)
			CALL AddEXP("Ｖ経験", 139, 1)
			CALL AddEXP("Ｖ性交経験", 139, 1)
			CALL AddEXP("絶頂経験", 139, 3)
			CALL AddEXP("Ｖ絶頂経験", 139, 3)
			CALL AddEXP("射精経験", MASTER, 1)
			CALL AddEXP("挿入経験", MASTER, 1)
			CALL AddEXP("Ｃ絶頂経験", MASTER, 1)
			CALL HPH_PRINT,@"「啊嗯…HPH　明明就算在小穴里射出来也可以的…HPH」","L"
			PRINTFORML 典反手从她后面握住了半萎的肉棒、把还沾着精液的肉棒在裂缝上蹭来蹭去
			PRINTW
			CALL HPH_PRINT,@"「明明典今天是安全期的…HPH」","L"
			SIF FLAG:生理周期可視化 == 1 && (!CFLAG:生理周期 == 1 || !CFLAG:生理周期 == 2)
			PRINTFORML 戳了戳典告诉她不要说谎
			PRINTW
			PRINTFORML 「啊嘞、暴露了吗？　您知道的挺多呢」
			PRINTFORML 完全没有谎言被戳破后的惊慌、典只是開玩笑般的吐了吐舌头
			PRINTW
			PRINTFORML 说起来、应该没有被龙发现吧？
			PRINTFORML 急忙扭头看向龙那里、该说是幸运吗、龙正背向这边熟睡着
			PRINTFORML 意识到这场情事并没有暴露、%CALLNAME:MASTER%抚了抚心口
			PRINTW
			CALL HPH_PRINT,@"「太好了呢、没有暴露…HPH」","L"
			CALL HPH_PRINT,@"「舒服了不少吧？　那么、典就回自己的床上了哦…HPH」","L"
			PRINTW
			PRINTFORML 临走之际、典轻轻地吻了%CALLNAME:MASTER%
			CALL AddEXP("接吻経験", 139, 1)
			SIF TALENT:139:無接吻経験 == 1
			TALENT:139:無接吻経験 = 0
			PRINTFORML 「那么…祝您好梦、%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%」
			PRINTFORML 被一种惬意的疲劳感与罪恶感包裹着、%CALLNAME:MASTER%几乎是瞬间就被困意侵袭…
			PRINTW
		ENDIF
	;それは…まずい
	ELSE
		CALL HPH_PRINT,@"「要怎么办呢…HPH　想射出来对吧…HPH」","L"
		PRINTFORML 典抓住%CALLNAME:MASTER%的肉棒、对着自己的秘裂来回摩擦
		PRINTFORML 随着咕啾咕啾的水声。典的那里、已经湿漉漉一片了
		PRINTW
		CALL HPH_PRINT,@"「难道说、想要背着饭纲丸大人出轨吗…HPH」","L"
		CALL HPH_PRINT,@"「没关系哦…HPH　就算插进来、只要不动就不算出轨的啦…HPH」","L"
		PRINTW
		PRINTFORML 不管怎么想都只是典的权宜之计、但涌上全身的快感和兴奋感、使得你的思维如同蒙上了一层雾…
		PRINTFORML 龟头、正触碰着典泥泞的穴口…
		PRINTW
		CALL ASK_YN("只是插进去的话…","就算只是插进去、也不行…")
		IF !RESULT
			CALL HPH_PRINT,@"咕唧…HPH　咕啾…HPH","L"
			CALL HPH_PRINT,@"「啊…HPH」","L"
			PRINTW
			CALL HPH_PRINT,@"咕、咕咕…忸噜…HPH","L"
			CALL HPH_PRINT,@"「哦哦…进来…HPH」","L"
			PRINTW
			CALL HPH_PRINT,@"嗞忸噜噜噜噜HPHHPHHPH","L"
			CALL HPH_PRINT,@"「了啊～～～～HPH唔HPHHPH唔HPHHPHHPHHPH」","L"
			PRINTW
			CALL HPH_PRINT,@"「还是进来了呢…鸡鸡、全部…在典的小穴里…HPH」","L"
			CALL HPH_PRINT,@"「感觉如何…？　想插得不得了的、小穴的触感…HPH」","L"
			PRINTW
			PRINTFORML 典的小穴里面很温暖、轻柔地包裹着%CALLNAME:MASTER%的阴茎
			PRINTFORML 时不时整个小穴都啾啾啾地反复收缩、紧紧缠上肉棒
			PRINTW
			CALL HPH_PRINT,@"「呵呵…HPH　一副心神飘荡的表情哦HPH」","L"
			CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、只动上一下腰试试怎么样呢HPH」","L"
			PRINTW
			CALL HPH_PRINT,@"「只是一下的话、典也可以当作没有发生HPH」","L"
			CALL HPH_PRINT,@"「好么、反正只有一下呢…HPH　再多的话、就会算是出轨了…HPHHPH」","L"
			PRINTW
			PRINTFORML 只是一下的话、不算出轨…
			PRINTFORML 蒙上一层雾的脑袋里不断回响着这句话的同时、把腰往后抬了一下
			PRINTW
			CALL HPH_PRINT,@"「哈HPH　哦HPH　哦HPH　哦HPHHPH」","L"
			PRINTFORML 只是一下的话…不算出轨
			PRINTW
			CALL HPH_PRINT,@"嗞啾HPHHPH","L"
			CALL HPH_PRINT,@"「哈唔啊啊啊啊HPHHPH　HPH」","L"
			PRINTW
			PRINTFORML 只是一下的话…
			CALL HPH_PRINT,@"嗞啾HPHHPH","L"
			CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下、说了只能一下HPH」","L"
			PRINTW
			PRINTFORML 只是一下的话…
			CALL HPH_PRINT,@"嗞啾HPHHPH","L"
			CALL HPH_PRINT,@"「已HPH　三下HPH　不行HPH」","L"
			PRINTW
			PRINTFORML 只是一下的话…
			CALL HPH_PRINT,@"嗞啾HPHHPH","L"
			CALL HPH_PRINT,@"「出轨　出轨可不行HPH　这已经是做爱了HPHHPH」","L"
			PRINTW
			PRINTFORML 再来一下…
			CALL HPH_PRINT,@"嗞啾HPHHPH","L"
			CALL HPH_PRINT,@"「肉棒再多HPHHPH」","L"
			PRINTW
			PRINTL ……
			PRINTL …
			PRINTL
			PRINTW
			PRINTFORML 噼咻～～～～～
			PRINTFORML 　　噼咻噼咻～～～～～～
			PRINTW
			CALL PRINT_FACE, [[典]], "自慰", "裸", "", ""
			CALL HPH_PRINT,@"「哈HPH　哦HPH　哦、哦哦HPH」","L"
			PRINTW
			PRINTFORML 典的穴内似乎连一滴精液也不会放过一样、子宫口还在紧紧吸住龟头、肉壁也啾噜啾噜地紧紧缠绕着
			PRINTFORML %CALLNAME:MASTER%感受着这几乎让自己失神的快感…
			PRINTW
			CALL AddEXP("膣射経験", 139, 1)
			CALL AddEXP("精液経験", 139, 1)
			CALL AddEXP("Ｖ経験", 139, 1)
			CALL AddEXP("Ｖ性交経験", 139, 1)
			CALL AddEXP("絶頂経験", 139, 3)
			CALL AddEXP("Ｖ絶頂経験", 139, 3)
			CALL AddEXP("射精経験", MASTER, 1)
			CALL AddEXP("挿入経験", MASTER, 1)
			CALL AddEXP("Ｃ絶頂経験", MASTER, 1)
			IF TALENT:MASTER:濃厚精液
				EX:膣内精液 += 1000
			ELSE
				EX:膣内精液 += 500
			ENDIF
			CALL HPH_PRINT,@"「呼…肚…肚…肚子里面、好热额……HPH」","L"
			CALL HPH_PRINT,@"「居然在饭纲丸大人的面前、被中出了啊…HPH」","L"
			PRINTW
			PRINTFORML 一说出龙的名字、%CALLNAME:MASTER%感觉脑袋瞬间清明了过来
			PRINTFORML 自己在龙的面前到底做了什么…
			PRINTW
			PRINTFORML 急忙扭头看向龙那里、该说是幸运吗、龙正背向这边熟睡着
			PRINTFORML 意识到这场情事并没有暴露、%CALLNAME:MASTER%抚了抚心口
			PRINTW
			CALL HPH_PRINT,@"「太好了呢、没有暴露…HPH」","L"
			CALL HPH_PRINT,@"「真是、都说了只动一下的、出轨性交甚至还中出了什么的、真是没救…HPH」","L"
			PRINTW
			CALL HPH_PRINT,@"「不过、请安心吧HPH　典、会把今天的事情埋到心里的…」","L"
			CALL HPH_PRINT,@"「舒服了不少吧？　那么、典就回自己的床上了哦…HPH」","L"
			PRINTW
			PRINTFORML 临走之际、典轻轻地吻了%CALLNAME:MASTER%
			CALL AddEXP("接吻経験", 139, 1)
			SIF TALENT:139:無接吻経験 == 1
			TALENT:139:無接吻経験 = 0
			PRINTFORML 「那么…祝您好梦、%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%」
			PRINTFORML 被一种惬意的疲劳感与罪恶感包裹着、%CALLNAME:MASTER%几乎是瞬间就被困意侵袭…
			PRINTW
		ELSE
			CALL HPH_PRINT,@"「还真是顽固呢…HPH　稍微有点嫉妒呢…不过HPH」","L"
			CALL HPH_PRINT,@"咕、咕咕…嗞忸噜噜噜噜HPHHPHHPH","L"
			CALL HPH_PRINT,@"「哦哦…进来、了啊～～～～HPH唔HPHHPH唔HPHHPHHPHHPH」","L"
			PRINTW
			PRINTFORML 典的肉壁上疙疙瘩瘩的部位、磨蹭着%CALLNAME:MASTER%变得敏感的肉棒
			PRINTFORML 让人始料未及的插入、让%CALLNAME:MASTER%不由得在小穴里射出了少许精子
			PRINTW
			CALL HPH_PRINT,@"「请不要生气HPH　虽然%CALLNAME:MASTER%阁下主动插进来的话会变成出轨、但现在这样就只是典在擅自[自慰]而已HPH」","L"
			PRINTFORML 自慰？　那是、什么白痴借口…
			PRINTFORML 虽然大脑在命令自己快点拔出来、但身体却完全听不进去这些命令。简直就像、被典的小穴给控制了一样
			PRINTW
			CALL HPH_PRINT,@"「只是用碰巧在这里的肉振动棒、进行典每日例行的自慰而已…HPH」","L"
			CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下只是在旁边睡觉而已…HPH　所以、算不上出轨哟…HPH」","L"
			PRINTW
			PRINTFORML 是个充满破绽的理论。不过、%CALLNAME:MASTER%没有否定。不、是无法否定
			PRINTFORML 即使是无聊的把戏也好、是诡辩也好、对自己而言确实没有出轨
			PRINTW
			CALL HPH_PRINT,@"呣叽HPH　呣叽HPH","L"
			CALL HPH_PRINT,@"「哈嗯HPH　啊HPH　哈啊HPHHPH」","L"
			PRINTW
			CALL HPH_PRINT,@"　　　呣噗HPH　　　　呣噗HPH","L"
			CALL HPH_PRINT,@"「唔HPH　唔HPH　唔呜HPH」","L"
			PRINTW
			CALL HPH_PRINT,@"　嗞叽HPH　　嗞叽HPH","L"
			CALL HPH_PRINT,@"「啊HPHHPH　啊嗯HPHHPH　唔唔唔HPHHPH」","L"
			PRINTW
			CALL HPH_PRINT,@"　　啪啾HPH　　　啪啾HPH","L"
			CALL HPH_PRINT,@"「去了HPH　已经去了HPHHPH　呜唔唔唔唔HPHHPH」","L"
			PRINTW
			PRINTFORML 要射精了…！
			PRINTW
			CALL ASK_YN("射在典的膣内","射在典的膣外")
			IF !RESULT
				PRINTFORML 咚啾%UNICODE(0x2665) *1%
				PRINTFORML 非常激烈地、典用臀肉拍打着%CALLNAME:MASTER%的下半身
				PRINTFORML 终于、%CALLNAME:MASTER%迎来了极限。这下子、是真正要射精了
				PRINTW
				PRINTFORML 噼咻～～～～～
				PRINTFORML 　　噼咻噼咻～～～～～～
				PRINTW
				CALL PRINT_FACE, [[典]], "自慰", "裸", "", ""
				CALL HPH_PRINT,@"「哈HPH　哦HPH　哦、哦哦HPH」","L"
				PRINTW
				PRINTFORML 典的穴内似乎连一滴精液也不会放过一样、子宫口还在紧紧吸住龟头、肉壁也啾噜啾噜地紧紧缠绕着
				PRINTFORML %CALLNAME:MASTER%感受着这几乎让自己失神的快感…
				PRINTW
				CALL AddEXP("膣射経験", 139, 1)
				CALL AddEXP("精液経験", 139, 1)
				CALL AddEXP("Ｖ経験", 139, 1)
				CALL AddEXP("Ｖ性交経験", 139, 1)
				CALL AddEXP("絶頂経験", 139, 3)
				CALL AddEXP("Ｖ絶頂経験", 139, 3)
				CALL AddEXP("射精経験", MASTER, 1)
				CALL AddEXP("挿入経験", MASTER, 1)
				CALL AddEXP("Ｃ絶頂経験", MASTER, 1)
				IF TALENT:MASTER:濃厚精液
					EX:膣内精液 += 1000
				ELSE
					EX:膣内精液 += 500
				ENDIF
				CALL HPH_PRINT,@"「呼…肚…肚…肚子里面、好热额……HPH」","L"
				CALL HPH_PRINT,@"「居然在饭纲丸大人的面前、被中出了啊…HPH」","L"
				PRINTW
				PRINTFORML 一说出龙的名字、%CALLNAME:MASTER%感觉脑袋瞬间清明了过来
				PRINTFORML 自己在龙的面前到底做了什么…
				PRINTW
				PRINTFORML 急忙扭头看向龙那里、该说是幸运吗、龙正背向这边熟睡着
				PRINTFORML 意识到这场情事并没有暴露、%CALLNAME:MASTER%抚了抚心口
				PRINTW
				CALL HPH_PRINT,@"「太好了呢、没有暴露…HPH」","L"
				CALL HPH_PRINT,@"「好好地遵守了约定呢…HPH　请放心吧。毕竟这不算是出轨…HPH」","L"
				PRINTW
				PRINTFORML 忸噜…
				PRINTFORML 把软下来的阴茎、从刚被射精过的典的小穴里面抽了出来
				PRINTW
				CALL HPH_PRINT,@"「只是典借用了一下饭纲丸大人喜爱的射精振动棒、然后用来自慰…HPH」","L"
				CALL HPH_PRINT,@"「所以在小穴的最里面被大量中出了而已…HPH」","L"
				CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下无需介怀呢…HPH」","L"
				PRINTW
				CALL HPH_PRINT,@"「舒服了不少吧？　那么、典就回自己的床上了哦…HPH」","L"
				PRINTW
				PRINTFORML 临走之际、典轻轻地吻了%CALLNAME:MASTER%
				CALL AddEXP("接吻経験", 139, 1)
				SIF TALENT:139:無接吻経験 == 1
				TALENT:139:無接吻経験 = 0
				PRINTFORML 「那么…祝您好梦、%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%」
				PRINTFORML 被一种惬意的疲劳感与罪恶感包裹着、%CALLNAME:MASTER%几乎是瞬间就被困意侵袭…
				PRINTW
			ELSE
				PRINTFORML 果然、在穴内还是不行…！
				PRINTFORML %CALLNAME:MASTER%打破了约定、腰身一摆把阴茎从典的小穴里抽了出来
				PRINTW
				PRINTFORML 哔咕哔咕哔咕
				PRINTFORML 　　哔哟哔哟、哔哟卟…
				PRINTW
				PRINTFORML 大量的白浊液、把典已经被玷污的黏黏糊糊的裂缝进一步污浊了…
				PRINTFORML 直到最后一滴也射出来之前、%CALLNAME:MASTER%大口喘着气、用逐渐失去硬度的肉壁用力摩擦着典的屁股
				PRINTW
				CALL AddEXP("精液経験", 139, 1)
				CALL AddEXP("Ｖ経験", 139, 1)
				CALL AddEXP("Ｖ性交経験", 139, 1)
				CALL AddEXP("絶頂経験", 139, 3)
				CALL AddEXP("Ｖ絶頂経験", 139, 3)
				CALL AddEXP("射精経験", MASTER, 1)
				CALL AddEXP("挿入経験", MASTER, 1)
				CALL AddEXP("Ｃ絶頂経験", MASTER, 1)
				CALL HPH_PRINT,@"「啊嗯…HPH　明明就算在小穴里射出来也可以的…HPH」","L"
				PRINTFORML 典反手从她后面握住了半萎的肉棒、把还沾着精液的肉棒在裂缝上蹭来蹭去
				PRINTW
				CALL HPH_PRINT,@"「不过、最后是您自己主动动起来了呢…HPH」","L"
				CALL HPH_PRINT,@"「啊ー啊、在饭纲丸大人面前出轨加做爱了呢…HPH」","L"
				PRINTW
				PRINTFORML 说起来、应该没有被龙发现吧？
				PRINTFORML 急忙扭头看向龙那里、该说是幸运吗、龙正背向这边熟睡着
				PRINTFORML 意识到这场情事并没有暴露、%CALLNAME:MASTER%抚了抚心口
				PRINTW
				CALL HPH_PRINT,@"「太好了呢、没有暴露…HPH」","L"
				CALL HPH_PRINT,@"「柑橘如何？　出轨性交、又让你兴奋吗？HPH」","L"
				PRINTW
				CALL HPH_PRINT,@"「嘛、特别是在典的小穴里浇灌了这么多精子、不可能不兴奋呢HPH」","L"
				CALL HPH_PRINT,@"「舒服了不少吧？　那么、典就回自己的床上了哦…HPH」","L"
				PRINTW
				PRINTFORML 临走之际、典轻轻地吻了%CALLNAME:MASTER%
				CALL AddEXP("接吻経験", 139, 1)
				SIF TALENT:139:無接吻経験 == 1
				TALENT:139:無接吻経験 = 0
				PRINTFORML 「那么…祝您好梦、%CALLNAME:MASTER%阁下…%UNICODE(0x2665) *1%」
				PRINTFORML 被一种惬意的疲劳感与罪恶感包裹着、%CALLNAME:MASTER%几乎是瞬间就被困意侵袭…
				PRINTW
			ENDIF
		ENDIF
	ENDIF

repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【139】典/M_KOJO_K139_典特殊イベント.ERB

license: unknown


code:
;-------------------------------------------
;刻印取得
;-------------------------------------------
@M_KOJO_MESSAGE_MARKCNG_K139
;このままだと地の文が表示されません
;地の文を表示したい方は、下記のコメントアウトを削除して下さい
;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
	PRINTFORML 「典想帮%CALLNAME:MASTER%一些忙」
	PRINTFORML 「如果有什么需求的话、请尽管吩咐」
	PRINTFORML （哼唔、这位也许是个值得信赖的人物呢）
	PRINTW
;LV2
ELSEIF TFLAG:24 == 32
	PRINTFORML 「如果%CALLNAME:MASTER%阁下的话、无论刀山火海请您随意吩咐哟」
	PRINTFORML 「啊啊ー、信不过我吗？　明明是真的」
	PRINTFORML （真是不可思议。除了饭纲丸大人以外居然还有这么想的人）
	PRINTW
;LV3
ELSEIF TFLAG:24 == 33
	PRINTFORML （虽说忠臣不事二主……）
	PRINTFORML （但待在这位身边、说不定也能为饭纲丸大人带来一些好处）
	PRINTW
	IF TALENT:140:恋慕 && (!TALENT:139:恋慕 && !TALENT:139:恋人)
		PRINTFORML （而且、饭纲丸大人似乎对%CALLNAME:MASTER%阁下很迷恋的样子
		PRINTFORML （帮忙牵红绳、也可以说是从者的义务吧）
		PRINTW
	ENDIF
ENDIF

;反発刻印
IF TFLAG:21 == 1
	PRINTFORML 「%CALLNAME:MASTER%阁下」
	PRINTFORML 「即使是我、也是会有生气的时候哟？」
	PRINTW
ELSEIF TFLAG:21 == 2
	PRINTFORML 「………………」
	PRINTFORML 典的嘴角浮现出一抹笑容、但眼神里却完全没有笑意
	PRINTW
ELSEIF TFLAG:21 == 3
	IF TALENT:恋慕 || TALENT:恋人
		PRINTFORML 「一直以来都因为对方是你我才会放任不管的……」
		PRINTFORML 「但就算是%CALLNAME:MASTER%阁下我也忍无可忍了」
		PRINTFORML 「现在就算后悔、也已经晚了哦？」
		PRINTFORML 典的语气虽然十分平淡、却如实地表达出她的愤怒……
		PRINTW
	ELSE
		PRINTFORML 「一直以来都是因为没出什么大问题我才会放任不管的……」
		PRINTFORML 「但这回实在是忍无可忍了」
		PRINTFORML 「现在就算后悔、也已经晚了哦？」
		PRINTFORML 典的语气虽然十分平淡、却如实地表达出她的愤怒……
		PRINTW
	ENDIF
ENDIF

path: ERB/口上・メッセージ関連/個人口上/【139】典/M_KOJO_K139_刻印取得.ERB


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

@M_KOJO_MESSAGE_COM_K139_100_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		IF TCVAR:発情
			IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
			ELSE
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「咿咿唔HPH　咿呀HPH　咿咿HPHHPH」","L"
				RESETCOLOR
				PRINTFORML 每次当啪、啪的生硬的声音响起时、典的娇声也会一并响起
				PRINTW
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「明明很痛HPH　明明很痛但是又好舒服HPH　怎么会HPH」","L"
				RESETCOLOR
				PRINTFORML 由于发情导致敏感度高到极致的典的身体、连痛感都会被强制替换成快感
				PRINTFORML 屁股被拍打的冲击化作快感的浪潮、一直传递到子宫
				PRINTW
				SETCOLOR 0xFF69B4
				CALL HPH_PRINT,@"「不要HPH　不要打了HPH　疼HPH　啊咕HPH　啊啊ーHPH　啊啊ーHPH」","L"
				RESETCOLOR
				PRINTW
			ENDIF
		ELSE
			IF (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行)
				IF ABL:受虐属性 >= 2
					CALL HPH_PRINT,@"「哦哦哦唔HPH」","W"
					PRINTFORML 「啊、刚才的是…不是的…姐姐、并没有很舒服什么的…」
					PRINTW
					PRINTFORML %CALLNAME:MASTER%一言不发的继续挥动着手
					CALL HPH_PRINT,@"「咿咿咿咿HPH」","W"
					CALL HPH_PRINT,@"「不、不行HPH　很痛的、请、请停下、咿咿唔HPH」","L"
					PRINTW
				ELSE
					PRINTFORML 「哦哦哦唔！！？」
					PRINTFORML 「等、等下…打屁股的话…哦哦哦唔！！」
					PRINTFORML 「姐姐、要生气了、哦哦！」
					PRINTFORML 「很、很痛的、别再打了、啊！」
					PRINTW
				ENDIF
			ELSE
				IF ABL:受虐属性 >= 2
					CALL HPH_PRINT,@"「哦哦哦唔HPH」","W"
					PRINTFORML 「刚、刚才是意外、很舒服、什么的哦哦哦哦哦唔！！？」
					PRINTW
					PRINTFORML 每在典的屁股上拍打两三下、圆润的屁股上就会浮现出一片红叶
					CALL HPH_PRINT,@"「不要HPH　不能打屁股HPH　说了很痛HPH　哦哦哦哦唔！！」","L"
					PRINTW
				ELSE
					PRINTFORML 「哦哦哦唔！！？」
					IF GROUPMATCH(TALENT:MASTER:体型,2,3)
						PRINTFORML （好痛好痛好痛！！？　真的好痛！！！）
						PRINTW
						PRINTFORML 啪唧！
						PRINTFORML 「咿叽咿咿！！？」
						PRINTW
						PRINTFORML 「啊、啊…%CALLNAME:MASTER%阁下、请住手…」
						PRINTFORML 典眼角噙着泪花、不含伪装的剧烈颤抖着
						PRINTW
					ELSE
						PRINTFORML 「等、等下…打屁股的话…哦哦哦唔！！」
						PRINTFORML 「痛、请住手、不要、哦哦哦唔！」
						PRINTW
					ENDIF
				ENDIF
			ENDIF
		ENDIF
		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

;==================================================
;101,鞭
;==================================================
@M_KOJO_MESSAGE_COM_K139_101
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_101_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_102
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_102_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_103
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_103_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_104
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_104_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_105
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_105_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_106
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_106_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_107
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_107_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_108
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_108_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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/口上・メッセージ関連/個人口上/【139】典/M_KOJO_K139_加虐系コマンド.ERB


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

@M_KOJO_MESSAGE_COM_K139_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 「想让我用手摩擦？　肉棒？」
		PRINTW
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「好啊%UNICODE(0x2665) *1%　典、很想做一些能让%CALLNAME:MASTER%阁下高兴的事情%UNICODE(0x2665) *1%」
			IF TALENT:恋人
				PRINTFORML 「用典的手为%CALLNAME:MASTER%阁下的肉棒上下撸动、让其射精就可以了吗♪」
			ELSE
				IF K139_FIND_LOVER() == 1
					IF TALENT:140:恋人 || TALENT:140:恋慕
						PRINTFORML 「不过…要对饭纲丸大人…保密哦」
					ELSE
						PRINTFORML 「请对阁下的恋人小姐、好好保密…%UNICODE(0x2665) *1%」
						PRINTFORML 「作为代替、就用典来多多地射出来吧%UNICODE(0x2665) *1%」
					ENDIF
				ELSEIF K139_FIND_LOVER() == 2
					IF TALENT:140:恋人 || TALENT:140:恋慕
						PRINTFORML 「在饭纲丸大人的面前做这种事…%CALLNAME:MASTER%阁下还真是过分啊」
						PRINTFORML 「毕竟…要展示典让%CALLNAME:MASTER%阁下高潮的过程…%UNICODE(0x2665) *1%」
					ELSE
						PRINTFORML 「恋人小姐还在看着真的没关系吗？虽说典是无所谓…」
						PRINTFORML 「那么、就请一边被爱着的人看着一边用典的手高潮吧♪」
					ENDIF
				ENDIF
			ENDIF
		ELSE
			PRINTFORML 「诶诶～、该如何是好呢♪　就那么想让典来帮你撸吗？」
			IF K139_FIND_LOVER() == 1
				PRINTFORML 「是恋人小姐不愿意这样帮你做吗？　哎呀哎呀…」
				PRINTFORML 「那确实是很可怜呢。那么、典不来好好安慰你一下可不行呢…♪」
				IF TALENT:140:恋人
					CALL HPH_PRINT,@"「要对饭纲丸大人保密哟…HPH」","L"
				ELSEIF TALENT:29:恋人
					CALL HPH_PRINT,@"「可以对射命丸阁下保密吗…HPH」","L"
				ELSEIF TALENT:42:恋人
					CALL HPH_PRINT,@"「要对姫海棠阁下保密啊…HPH」","L"
				ELSEIF TALENT:65:恋人
					CALL HPH_PRINT,@"「不要让犬走阁下知道哦…HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「要对恋人小姐保密哟…HPH」","L"
				ENDIF
			ELSEIF K139_FIND_LOVER() == 2
				IF TALENT:140:恋人 || TALENT:140:恋慕
					PRINTFORML 「在饭纲丸大人的面前做这种事…%CALLNAME:MASTER%阁下还真是过分啊」
					PRINTFORML 「毕竟…要展示典让%CALLNAME:MASTER%阁下高潮的过程…%UNICODE(0x2665) *1%」
				ELSEIF TALENT:29:恋人
					CALL HPH_PRINT,@"「在射命丸阁下的面前被别人撸着肉棒什么的…HPH」","L"
				ELSEIF TALENT:42:恋人
					CALL HPH_PRINT,@"「姫海棠阁下、您恋人的射精管理可是一直是由我在负责的呢HPH」","L"
				ELSEIF TALENT:65:恋人
					CALL HPH_PRINT,@"「犬走阁下、%CALLNAME:MASTER%阁下似乎很想让我去撸一撸他的肉棒哦…HPH」","L"
				ELSE
					PRINTFORML 「恋人小姐还在看着真的没关系吗？虽说典是无所谓…」
					PRINTFORML 「那么、就请一边被爱着的人看着一边用典的手高潮吧♪」
				ENDIF
			ENDIF
		ENDIF

		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			SELECTCASE TALENT:MASTER:形状
			CASE 6,10;巨根、馬並み
				CALL HPH_PRINT,@"「HPH　这、这还真是…超乎常人的…HPH」","L"
				CALL HPH_PRINT,@"（明明是个小孩子、这是何等神物…HPH）","L"
				CALL HPH_PRINT,@"（即使被包皮盖着也能看出来、龟头的巨大、青筋暴起的样子…这可真是、要完了…HPH）","L"
			CASE 1,2;粗チン
				CALL HPH_PRINT,@"「哦呀哦呀、勉勉强强…HPH」","L"
				CALL HPH_PRINT,@"（啊啊、果然小孩子就是这样的HPH）","L"
				CALL HPH_PRINT,@"（被包皮裹着、尚未成熟的肉棒…HPH）","L"
			CASE 5;イボ付き
				CALL HPH_PRINT,@"「…呜呀哈呀…这还真是…HPH」","L"
				CALL HPH_PRINT,@"（明明是个小孩子、这是何等面目丑恶的绝品啊…HPH）","L"
			CASEELSE
				CALL HPH_PRINT,@"「哦呀哦呀、还真是意外的…HPH」","L"
				CALL HPH_PRINT,@"（本来还想着只是个小孩子、这看起来未来可期啊…HPH）","L"
			ENDSELECT
		ELSE
			SELECTCASE TALENT:MASTER:形状
			CASE 6,10;巨根、馬並み
				CALL HPH_PRINT,@"「哦…哦哦…HPH」","L"
				CALL HPH_PRINT,@"（啊哈哈…HPH　怎么回事、这个…）","L"
				CALL HPH_PRINT,@"（与其说是肉棒不如说是桩子…这种东西进来的话…HPH）","L"
			CASE 1,2;粗チン
				CALL HPH_PRINT,@"「哦呀哦呀、勉勉强强…HPH」","L"
				CALL HPH_PRINT,@"（啊啊、多么短小的…HPH）","L"
				CALL HPH_PRINT,@"（被包皮裹着、像小孩子一样的肉棒…好可爱HPH）","L"
			CASE 5;イボ付き
				CALL HPH_PRINT,@"「…呜呀哈呀…这还真是…HPH」","L"
				CALL HPH_PRINT,@"（这个…实在是可怕的形状啊…HPH）","L"
				CALL HPH_PRINT,@"（简直就是名为阴茎的拷问用具啊、还真是…HPH）","L"
			CASEELSE
				CALL HPH_PRINT,@"「啊哈…HPH」","L"
				CALL HPH_PRINT,@"（这就是、%CALLNAME:MASTER%阁下的肉棒…还、挺强壮的…HPH）","L"
				CALL HPH_PRINT,@"（只要一想到这根东西要进入我的里面…就心动不已啊HPH）","L"
			ENDSELECT
		ENDIF
		PRINTW
		CALL HPH_PRINT,@"「那么、要開始侍奉了哦…HPH」","W"
		PRINTL
		PRINTFORML 　撸…　撸…
		PRINTFORML 　　　撸…　撸…
		PRINTL
		CALL HPH_PRINT,@"「首先、要慢慢地…HPH　不能急躁…」","L"
		CALL HPH_PRINT,@"「这里感觉怎么样呢？　呼呼、真是不错的表情HPH　那就再多、这样帮你弄一弄吧…HPH」","L"
		PRINTW

		IF STAIN:PLAYER:2
			CALL HPH_PRINT,@"「呜哇……真的好臭呢HPH」","L"
			CALL HPH_PRINT,@"「有好好洗过吗？HPH　臭得不得了哟…HPH」","L"
			CALL HPH_PRINT,@"「居然让典碰这么臭的东西什么的…HPH」","L"
			CALL HPH_PRINT,@"「你看、这里、污垢都堆积了这么多…HPH」","L"
		ENDIF
		RETURN 1
	ELSEIF TCVAR:MASTER:要去了 == 1
		IF FLAG:70
		ELSE
			SELECTCASE PREVCOM
			;接吻
			CASE 19, 20
				SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「嗯啾HPH　哈呣HPH　要去了吗？HPH」","L"
					CALL HPH_PRINT,@"「啾HPH　啾HPH　嘴唇（这里）也是、肉棒也是、舒服得都要化掉了…HPH」","L"
					PRINTW
				CASE 1
					CALL HPH_PRINT,@"「哈呣HPH　啾噗唔HPH　舔HPH」","L"
					PRINTFORML 用眼神表示自己想射了、典也同样用眼神表示了许可
					PRINTW
				ENDSELECT
			;V性交
			CASE 60, 61, 65, 67, 68
				CALL HPH_PRINT,@"「嗯HPH　呼呜…嗯！HPH」","L"
				PRINTFORML 典把临近射精的阴茎从阴道内抽了出来、開始啾咕啾咕地撸动起来
				IF TEQUIP:MASTER:避孕套
					CALL HPH_PRINT,@"「全都射进套套里面去吧HPH　来——HPHpiupiuーHPH」","L"
				ELSEIF TCVAR:TARGET:口服避孕薬 == 1
					CALL HPH_PRINT,@"「呵呵、明明已经做好避孕措施了…真是胆小呢HPH」","L"
					CALL HPH_PRINT,@"「明明在阴道里面射出来的话肯定会很舒服的HPH」","L"
					CALL HPH_PRINT,@"「嘛算啦HPH　就帮你这样白白浪费地射出来吧HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「呵呵、在阴道里射出来的话会怀孕也说不定呢HPH」","L"
					CALL HPH_PRINT,@"「不过、先走汁都已经在典的阴道里流出来了、感觉是在做无用的挣扎哦HPH」","L"
					CALL HPH_PRINT,@"「啊ー啊、明明直接在阴道里射出来就好的HPH　不过很遗憾HPH　就这样射出来吧HPH」","L"
				ENDIF
			;A性交
			CASE 62, 63, 66, 69, 70
				CALL HPH_PRINT,@"「嗯HPH　呼呜…嗯！HPH」","L"
				PRINTFORML 典把临近射精的阴茎从肛門内抽了出来、開始啾咕啾咕地撸动起来
				CALL HPH_PRINT,@"「明明直接那样在屁股里射出来就好的…说什么用手就行PH」","L"
				CALL HPH_PRINT,@"「你看、已经要射了对吧？　来HPHpiupiuーHPH」","L"
			;手淫（連続で手淫）
			CASE 80
				SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「要射了吗？　已经要射了吗？HPH」","L"
					PRINTFORML 精液几乎開始涌上尿道的时候、典忽然一下松開了手
					PRINTW
					CALL HPH_PRINT,@"「啊哈哈HPH　肉棒、一跳一跳的闹得好厉害啊～HPH」","L"
					CALL HPH_PRINT,@"「在变得最敏感的时候、这样子～HPH」","L"
					PRINTFORML 典一边揉着卵袋一边用手指捏住濒临极限的肉棒、噗噜噗噜的摇晃着那根肉棒让你看
					CALL HPH_PRINT,@"「HPH 好啦、已经可以射了哟HPH　去吧HPH」","L"
				CASE 1
					CALL HPH_PRINT,@"「怎么样？　鸡儿很热吧？HPH」","L"
					CALL HPH_PRINT,@"「不过、感觉很舒服对吧？　精子已经開始渗出来了哟HPH」","L"
					CALL HPH_PRINT,@"「请不要一直忍着快让鸡儿高潮吧HPH　来嘛来嘛来嘛HPH」","L"
				ENDSELECT
			;口交
			CASE 81, 88
				CALL HPH_PRINT,@"「噗哈——！　哈啊、哈啊、最后用手就好什么的…HPH」","L"
				CALL HPH_PRINT,@"「想射上去对吧？　往典的脸上、把黏乎乎滚烫烫的带着橡胶臭味的精子…HPH」","L"
				CALL HPH_PRINT,@"「请吧HPH　用%CALLNAME:MASTER%阁下的精子把典弄脏HPH　弄得满脸都是HPH」","L"
				PRINTW
			;泡泡浴
			CASE 84
				CALL HPH_PRINT,@"「像这样滑溜溜的时候、快感也完全不同对吧…HPH」","L"
				CALL HPH_PRINT,@"「来吧、请就这样在手里射出来吧…HPH」","L"
				PRINTW
			;A愛撫される
			CASE 90
				SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「想一边被玩弄屁股一边高潮什么的、%CALLNAME:MASTER%阁下还真是变态呢HPH」","L"
					CALL HPH_PRINT,@"「来吧HPH　来吧HPH　请一边用屁穴前列腺高潮一边射精吧HPH」","L"
				CASE 1
					CALL HPH_PRINT,@"「一边被搅动着屁股一边被撸着的时候的%CALLNAME:MASTER%阁下的脸…好可爱HPH」","L"
					CALL HPH_PRINT,@"「就这样帮你高潮吧HPH　可以的哟、射出来吧HPH」","L"
				ENDSELECT
				PRINTW
			;A舐めされる
			CASE 91
				SELECTCASE RAND:2
				CASE 0
					CALL HPH_PRINT,@"「简直就好像在挤牛奶一样呢HPH」","L"
					CALL HPH_PRINT,@"「请就这样屁股被舔弄着、肉棒也被不停捋着、一边叫喊着一边高潮吧HPH」","L"
					PRINTW
					PRINTFORML %CALLNAME:MASTER%用四肢跪地的姿势撅起屁股、被典一边舔着屁穴一边撸动着肉棒
					PRINTFORML 虽然是很屈辱的姿势、但%CALLNAME:MASTER%由于汹涌而来的快乐、而轻易的高潮了…
					PRINTW
				CASE 1
					CALL HPH_PRINT,@"「快HPH　快HPH　请一脸悲惨的高潮吧HPH」","L"
					CALL HPH_PRINT,@"「一边难看的高潮一边被自己的精子淋得满身都是吧HPH」","L"
					PRINTW
					PRINTFORML %CALLNAME:MASTER%被摆成屈曲位的姿势、一边被舔着屁穴一边被撸动着肉棒
					PRINTFORML 就保持着这动弹不得的样子射精了、白浊色的液体浇洒到了自己的身上…
					PRINTW
				ENDSELECT
			;A性交される
			CASE 92, 93, 94
				CALL HPH_PRINT,@"「啊哈HPH　一边被侵犯屁股一边被撸动肉棒感觉很舒服吗？」","L"
				CALL HPH_PRINT,@"「很舒服对吧HPH　毕竟、都露出了如此雌气的表情HPH」","L"
				CALL HPH_PRINT,@"「快点HPH　请一边前列腺高潮一边射精吧HPH　给我射精HPH」","L"
			;被愛撫
			CASE 125
				CALL HPH_PRINT,@"「要去了吗？　肉棒開始抖动起来了哟HPH」","L"
				CALL HPH_PRINT,@"「那么、就一边被玩弄乳頭一边高潮吧HPH」","L"
				PRINTW
				PRINTFORML 被典从背后紧紧抱住、一边用指腹咕哩咕哩地搔弄着乳頭、
				PRINTFORML 一边啾叩啾叩的撸动着%CALLNAME:MASTER%的阴茎
				PRINTFORML 连抵抗的时间都没有、%CALLNAME:MASTER%就已经轻易地把精液射了出来…
			ENDSELECT
		ENDIF
	ELSE
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 1
		;恋慕
		ELSEIF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呀嗯HPH　%CALLNAME:MASTER%阁下的、还是那么巨大呢HPH」","L"
						CALL HPH_PRINT,@"「你看、两只手都握不住…HPH　想必、是幻想乡最大的肉棒了呢HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呀ー唔HPH　%CALLNAME:MASTER%阁下的小鸡鸡真是可爱呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　你看、这么硬真是了不起…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「摸起来、特别疙疙瘩瘩呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、还是一如既往的棒啊HPH」","L"
						CALL HPH_PRINT,@"「不可以放进嘴里含住吗？　还不行？　啊啊嗯、真坏心眼」","L"
					ENDSELECT
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呀嗯HPH　%CALLNAME:MASTER%阁下的、明明还软乎乎的却这么大HPH」","L"
						CALL HPH_PRINT,@"「你看、要两只手才能握住…HPH　会好好让我高潮的吧…HPH」","L"
						CALL HPH_PRINT,@"「HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒真是个害羞的孩子呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　来和姐姐问个好吧HPH　来、变壮变壮ーHPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、软着的时候会缩在包皮里面真是可爱HPH」","L"
						CALL HPH_PRINT,@"「不过、稍微撸一撸的话瞬间就会变成健壮的肉棒呢…你看HPH」","L"
					ENDSELECT
				ENDIF
			;青年以上
			ELSE
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「啊啊…HPH　何等、何等了不起的…HPHHPH」","L"
						IF TALENT:処女 == 1
							CALL HPH_PRINT,@"「被这种东西捅进来的话、典的肚子都会记住它的形状的…HPH」","L"
						ELSE
							CALL HPH_PRINT,@"「这个会、把典的阴道里…HPH　把我的阴道里、完全重新塑形呢…HPH」","L"
						ENDIF
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的肉棒、我很喜欢哦HPH」","L"
						CALL HPH_PRINT,@"「你看、这么又热、又硬…HPH　在典的手里都变成这样子了哟…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「摸起来、特别疙疙瘩瘩呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、还是一如既往的棒啊HPH」","L"
						CALL HPH_PRINT,@"「不可以放进嘴里含住吗？　还不行？　啊啊嗯、真坏心眼」","L"
					ENDSELECT
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「！！　呼啊啊…HPH」","L"
						CALL HPH_PRINT,@"「啊啊、看到这种东西的话、典都…HPHHPH」","L"
						CALL HPH_PRINT,@"「只能碰吗？　不能舔、也不能插进来吗…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒真是个害羞的孩子呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　来和典打个招呼吧HPH　来、变壮变壮ーHPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「这些疣被捏一捏也不会感到痛吗？　嗯嗯…」","L"
					CASEELSE
						CALL HPH_PRINT,@"「啊…開始有些硬起来了呢…HPH」","L"
						CALL HPH_PRINT,@"「这样子撸动感觉如何呢？　呵呵、再继续变大一些吧HPH」","L"
					ENDSELECT
				ENDIF
			ENDIF
			RETURN 1
		;恋慕、恋人以外
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「真是…这么大的东西垂在这里…HPH」","L"
						CALL HPH_PRINT,@"「姐姐的小腹深处感觉小鹿乱撞的HPH都停不下来了…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「看ー吧、小鸡鸡变得硬邦邦的从前面冒出头了呢HPH」","L"
						CALL HPH_PRINT,@"「想不想变得更加舒服？　来吧、告诉姐姐…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「勃起之后看起来更吓人了呢…HPH」","L"
						CALL HPH_PRINT,@"「不过、对这里这样弄的话就会很舒服、这一点还是不变的吧？　你看你看HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「你看、%CALLNAME:MASTER%阁下的肉棒、都已经变得这么大了HPH」","L"
						CALL HPH_PRINT,@"「而且好烫啊…HPH　能看出来已经兴奋了HPH」","L"
						CALL HPH_PRINT,@"「会变得这么兴奋、是因为一直在期待着被姐姐做这种事情对吧？HPH」","L"
					ENDSELECT
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呵呵、明明是个小孩子、依然是『大肉棒』的形状呢…HPH」","L"
						CALL HPH_PRINT,@"「还没勃起就是这个样子…变硬之后的样子、也让姐姐看看吧…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呀ー嗯HPH　还是和往常一样可爱呢HPH」","L"
						CALL HPH_PRINT,@"「来来、不要害羞HPH　想让姐姐摸你的包茎小鸡鸡对吧？HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「明明是个小孩子、还真是长了个相当吓人的东西啊…HPH」","L"
						CALL HPH_PRINT,@"「这是天生的吗？　还是说莫非、是你自己入珠的呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「哎呀、还没勃起…」","L"
						CALL HPH_PRINT,@"「来、姐姐帮你撸一撸就会硬起来了哟…HPH」","L"
					ENDSELECT
					PRINTW
				ENDIF
			ELSE
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「好厉害…HPH　典的阴道似乎没法完全吞进去…HPH」","L"
						CALL HPH_PRINT,@"「看见这种东西的话、典的子宮都開始发情了…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、明明大小也就和小孩子的差不多、硬度却相当不错呢…HPH」","L"
						CALL HPH_PRINT,@"「肉棒被撸着、感觉舒服吗？HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下勃起的肉棒、看起来真是相当凶恶呢…HPH」","L"
						CALL HPH_PRINT,@"「这种东西在里面刮来刮去的话、典简直不堪一击…HPH」","L"
						SELECTCASE RAND:2
						CASE 0
						CASE 1
							IF TALENT:処女 == 1
								PRINTFORML （…实际上、要插进来的话可能会稍微有些费劲）
							ELSE
								PRINTFORML （实际上、阴道里会被咕哩咕哩地刮个不停吧…）
							ENDIF
						ENDSELECT
					CASEELSE
						CALL HPH_PRINT,@"「呼呼、想让我用手撸是吗…HPH　交给我吧HPH」","L"
						CALL HPH_PRINT,@"「看来非常期待呢…已经一颤一颤的了HPH」","L"
						CALL HPH_PRINT,@"「会变得这么兴奋、、是因为一直在期待着被典做这种事情对吧？　呵呵…HPH」","L"
					ENDSELECT
					PRINTW
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「明明还没有勃起、这个大小…HPH」","L"
						CALL HPH_PRINT,@"「真是根非常具有被撸价值的肉棒呢…HPH」","L"
						PRINTFORML 典一边把脸贴近、一边用两只手上下撸动着还在半勃起状态的肉棒…
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、称之为肉棒有些可爱过头了…HPH」","L"
						CALL HPH_PRINT,@"「不过、%CALLNAME:MASTER%殿下的鸡鸡、典很喜欢哦HPH」","L"
						CALL HPH_PRINT,@"「毕竟你看、手感是如此之好…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「这些疙瘩到底是把什么东西入珠进去才形成的？　还是说是天生的东西吗？HPH」","L"
						CALL HPH_PRINT,@"「和在文献中所看到的哥布林和食人魔的极品完全一样呢…HPH」","L"
						CALL HPH_PRINT,@"「变大之后的样子也请让我观察一下…HPH」","L"
					CASEELSE
						PRINTFORML 「哦呀、还没有勃起呢」
						CALL HPH_PRINT,@"「看来非常期待呢…已经一颤一颤的了HPH」","L"
						CALL HPH_PRINT,@"「会变得这么兴奋、、是因为一直在期待着被典做这种事情对吧？　呵呵…HPH」","L"
					ENDSELECT
					PRINTW
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;81,口交
;==================================================
@M_KOJO_MESSAGE_COM_K139_81
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_81_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_81_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;初めて
	;記入チェック
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && FIRSTTIME(SELECTCOM)
		PRINTFORML 「お口で…ですか？」
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「好高兴啊%UNICODE(0x2665) *1%　\@ (TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行) ? 可以用姐姐 # 典 \@的嘴来为你侍奉什么的…%UNICODE(0x2665) *1%」
			IF TALENT:恋人
				PRINTFORML 「典用嘴仔仔细细舔舐、吞含、再把浓厚的精液全部喝下去的话您会很高兴的吧%UNICODE(0x2665) *1%」
			ELSE
				IF K139_FIND_LOVER() == 1
					IF TALENT:140:恋人 || TALENT:140:恋慕
						PRINTFORML 「不过…要对饭纲丸大人…保密哦」
						IF EXP:140:接吻経験 == 0 && TALENT:処女 == 1
							PRINTFORML 「对于连接吻都没有做过的饭纲丸大人来说、这种事情肯定无法想象呢…%UNICODE(0x2665) *1%」
						ELSEIF EXP:140:口淫経験 == 0
							PRINTFORML 「如果她知道有人比自己更早含过所爱之人的肉棒的话、会怎么想呢…」
						ELSE
							PRINTFORML 「如果她知道自己在和我用嘴共享同一根肉棒的话、会怎么想呢…」
						ENDIF
					ELSE
						PRINTFORML 「请对阁下的恋人小姐、好好保密…%UNICODE(0x2665) *1%」
						PRINTFORML 「作为代替、就用典来多多地射出来吧%UNICODE(0x2665) *1%」
					ENDIF
				ELSEIF K139_FIND_LOVER() == 2
					IF TALENT:140:恋人 || TALENT:140:恋慕
						PRINTFORML 「在饭纲丸大人的面前做这种事…%CALLNAME:MASTER%阁下还真是过分啊」
						PRINTFORML 「毕竟…要展示典用嘴让%CALLNAME:MASTER%阁下高潮的过程…%UNICODE(0x2665) *1%」
					ELSE
						PRINTFORML 「恋人小姐还在看着真的没关系吗？虽说典是无所谓…」
						PRINTFORML 「那么、就请一边被爱着的人看着一边用典的嘴高潮吧♪」
					ENDIF
				ENDIF
			ENDIF
		ELSE
			PRINTFORML 「诶诶～、该如何是好呢♪　就那么想用典的嘴来射精吗♪」
			IF K139_FIND_LOVER() == 1
				IF TALENT:140:恋人
					CALL HPH_PRINT,@"「要对饭纲丸大人保密哟…HPH」","L"
				ELSEIF TALENT:29:恋人
					CALL HPH_PRINT,@"「可以对射命丸阁下保密吗…HPH」","L"
				ELSEIF TALENT:42:恋人
					CALL HPH_PRINT,@"「要对姫海棠阁下保密啊…HPH」","L"
				ELSEIF TALENT:65:恋人
					CALL HPH_PRINT,@"「不要让犬走阁下知道哦…HPH」","L"
				ELSE
					CALL HPH_PRINT,@"「要对恋人小姐保密哟…HPH」","L"
				ENDIF
			ELSEIF K139_FIND_LOVER() == 2
				IF TALENT:140:恋人 || TALENT:140:恋慕
					PRINTFORML 「在饭纲丸大人的面前做这种事…%CALLNAME:MASTER%阁下还真是过分啊」
					PRINTFORML 「毕竟…要展示典用嘴让%CALLNAME:MASTER%阁下高潮的过程…%UNICODE(0x2665) *1%」
				ELSE
					PRINTFORML 「恋人小姐还在看着真的没关系吗？虽说典是无所谓…」
					PRINTFORML 「那么、就请一边被爱着的人看着一边在典的嘴里射出来吧♪」
				ENDIF
			ENDIF
		ENDIF

		IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
			SELECTCASE TALENT:MASTER:形状
			CASE 6,10;巨根、馬並み
				CALL HPH_PRINT,@"「HPH　这、这还真是…超乎常人的…HPH」","L"
				CALL HPH_PRINT,@"（明明是个小孩子、这是何等神物…HPH）","L"
				CALL HPH_PRINT,@"（即使被包皮盖着也能看出来、龟头的巨大、青筋暴起的样子…这可真是、要完了…HPH）","L"
			CASE 1,2;粗チン
				CALL HPH_PRINT,@"「哦呀哦呀、勉勉强强…HPH」","L"
				CALL HPH_PRINT,@"（啊啊、果然小孩子就是这样的HPH）","L"
				CALL HPH_PRINT,@"（被包皮裹着、尚未成熟的肉棒…HPH）","L"
			CASE 5;イボ付き
				CALL HPH_PRINT,@"「…呜呀哈呀…这还真是…HPH」","L"
				CALL HPH_PRINT,@"（明明是个小孩子、这是何等面目丑恶的绝品啊…HPH）","L"
			CASEELSE
				CALL HPH_PRINT,@"「哦呀哦呀、还真是意外的…HPH」","L"
				CALL HPH_PRINT,@"（本来还想着只是个小孩子、这看起来未来可期啊…HPH）","L"
			ENDSELECT
		ELSE
			SELECTCASE TALENT:MASTER:形状
			CASE 6,10;巨根、馬並み
				CALL HPH_PRINT,@"「哦…哦哦…HPH」","L"
				CALL HPH_PRINT,@"（啊哈哈…HPH　怎么回事、这个…）","L"
				CALL HPH_PRINT,@"（与其说是肉棒不如说是桩子…这种东西进来的话…HPH）","L"
			CASE 1,2;粗チン
				CALL HPH_PRINT,@"「哦呀哦呀、勉勉强强…HPH」","L"
				CALL HPH_PRINT,@"（啊啊、多么短小的…HPH）","L"
				CALL HPH_PRINT,@"（被包皮裹着、像小孩子一样的肉棒…好可爱HPH）","L"
			CASE 5;イボ付き
				CALL HPH_PRINT,@"「…呜呀哈呀…这还真是…HPH」","L"
				CALL HPH_PRINT,@"（这个…实在是可怕的形状啊…HPH）","L"
				CALL HPH_PRINT,@"（简直就是名为阴茎的拷问用具啊、还真是…HPH）","L"
			CASEELSE
				CALL HPH_PRINT,@"「啊哈…HPH」","L"
				CALL HPH_PRINT,@"（这就是、%CALLNAME:MASTER%阁下的肉棒…还、挺强壮的…HPH）","L"
				CALL HPH_PRINT,@"（只要一想到这根东西要进入我的里面…就心动不已啊HPH）","L"
			ENDSELECT
		ENDIF
		PRINTW
		CALL HPH_PRINT,@"「那么、要開始侍奉了哦…就HPH」","W"
		PRINTL
		PRINTFORML 　啾…%UNICODE(0x2665) *1%
		PRINTFORML 　　　噼啾…呣噜…%UNICODE(0x2665) *1%
		PRINTL
		CALL HPH_PRINT,@"「首先、要慢慢地…HPH　不能急躁…」","L"
		CALL HPH_PRINT,@"「这里感觉怎么样呢？　呼呼、真是不错的表情HPH　那就再多、这样帮你弄一弄吧…HPH」","L"
		PRINTW

		IF STAIN:PLAYER:2
			CALL HPH_PRINT,@"「呜哇……真的好臭呢HPH」","L"
			CALL HPH_PRINT,@"「有好好洗过吗？HPH　臭得不得了哟…HPH」","L"
			CALL HPH_PRINT,@"「居然要让典含住这么臭的东西什么的…HPH」","L"
			CALL HPH_PRINT,@"「你看、这里、污垢都堆积了这么多…真是的…唔呣HPH」","L"
		ENDIF
		RETURN 1
	ELSEIF TCVAR:MASTER:要去了 == 1
		IF TALENT:恋慕 || TALENT:恋人
			PRINTFORML 「差不多要射了」如此告知之后、典「…%UNICODE(0x2665) *1%」看起来很開心的一言不发地点了点头
		ELSE
			PRINTFORM 「差不多要射了」如此告知之后、典笑眯眯地眯起了眼睛、
			SELECTCASE RAND:4
			CASE 0
				PRINTFORML 脸開始激烈地大幅晃动着…
			CASE 1
				PRINTFORML 一言不发地点了点头
			CASE 2
				PRINTFORML 把阴茎从嘴中拔出来之后、開始不停地舔舐龟头…
			CASE 3
				PRINTFORML 在口腔内開始舔舐着龟头的腮部…
			ENDSELECT
		ENDIF
	ELSE
		;基本セット
		;時姦中
		IF FLAG:70
			PRINTFORMW
			RETURN 1
		;恋慕
		ELSEIF TALENT:恋慕 || TALENT:恋人
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				;お掃除フラグ。1がVに入れた。2がAに入れた
				IF (TCVAR:MASTER:112 == 1 || TCVAR:MASTER:112 == 2)
					IF TCVAR:MASTER:112 == 1
						CALL HPH_PRINT,@"「啾噗、啾噗、啾噗、啾噗、啾噜噜噜HPH」","L"
						CALL HPH_PRINT,@"「啾呜呜呜HPH　…噗啊HPH　小鸡鸡、变干净了HPH」","L"
						PRINTW
						PRINTFORML 将阴茎上附着的污垢全部舔干净、又把尿道中的精液一滴不剩的全部吸光之后典才松開了嘴唇
						CALL HPH_PRINT,@"「当然、还可以、继续做呢…HPH　还是说、希望我继续用嘴呢…HPH」","L"
						PRINTW
					ELSE
						CALL HPH_PRINT,@"「啾噜、噗啊…HPH」","L"
						CALL HPH_PRINT,@"「把脏兮兮的小鸡鸡打扫干净、是姐姐的义务…HPH　啊呣、啾噜噜噜HPH」","L"
						PRINTW
						PRINTFORML 对着被肠液和精液污浊的%CALLNAME:MASTER%的肉棒、典毫不犹豫的将其放入口腔内进行清扫
						PRINTFORML 那个表情和舌头的动作就好像在说「这个鸡巴可是能给予我快感啊」一般让人甚至能感觉到爱意
						PRINTW
						CALL HPH_PRINT,@"鸡鸡HPH","L"
						CALL HPH_PRINT,@"「好——啦HPH　变得干干净净了哟HPH」","L"
						PRINTW
						CALL HPH_PRINT,@"「想再、用屁股做一次吗？　还是说、希望用这里做呢…HPH」","L"
						PRINTFORML 用手指把两穴咕啪…的掰開、典诱惑着你…
						PRINTW
					ENDIF
				ELSEIF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呀嗯HPH　%CALLNAME:MASTER%阁下的、还是那么巨大呢HPH」","L"
						CALL HPH_PRINT,@"「你看、两只手都握不住…HPH　想必、是幻想乡最大的肉棒了呢HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呀ー唔HPH　%CALLNAME:MASTER%阁下的小鸡鸡真是可爱呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　你看、这么硬真是了不起…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「摸起来、特别疙疙瘩瘩呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、还是一如既往的棒啊HPH」","L"
						CALL HPH_PRINT,@"「已经含住了呢…HPH　姐姐、忍不住了…HPH」","L"
					ENDSELECT
					PRINTFORML 典不断、爱惜不已地舔舐着傲然屹立的肉棒…
					PRINTW
					CALL HPH_PRINT,@"（明明是个小孩子、雄性的臭味却浓厚扑鼻…HPH）","L"
					CALL HPH_PRINT,@"（光是舔一下、就感觉胸口兴奋地咚咚跳个不停…HPH）","L"
					CALL HPH_PRINT,@"（这根鸡鸡、让人好想屈服啊…HPH）","L"
					PRINTW
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呀嗯HPH　%CALLNAME:MASTER%阁下的、明明还软乎乎的却这么大HPH」","L"
						CALL HPH_PRINT,@"「你看、要两只手才能握住…HPH　会好好让我高潮的吧…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒真是个害羞的孩子呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　来和姐姐问个好吧HPH　来、变壮变壮ーHPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、软着的时候会缩在包皮里面真是可爱HPH」","L"
						CALL HPH_PRINT,@"「不过、稍微撸一撸的话瞬间就会变成健壮的肉棒呢…你看HPH」","L"
					ENDSELECT
					PRINTFORML 典、仍然在爱惜不已的来回舔舐着\@ BASE:MASTER:勃起 < 500 ? 软乎乎的 # 半勃起来的 \@肉棒…
					CALL HPH_PRINT,@"「呵呵…HPH　柔软的肉棒在典的口中渐渐膨胀起来的感觉…好喜欢啊HPHHPH」","L"
				ENDIF
			;青年以上
			ELSE
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「啊啊…HPH　何等、何等了不起的…HPHHPH」","L"
						IF TALENT:処女 == 1
							CALL HPH_PRINT,@"「被这种东西捅进来的话、典的肚子都会记住它的形状的…HPH」","L"
						ELSE
							CALL HPH_PRINT,@"「这个会、把典的阴道里…HPH　把我的阴道里、完全重新塑形呢…HPH」","L"
						ENDIF
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的肉棒、我很喜欢哦HPH」","L"
						CALL HPH_PRINT,@"「你看、这么又热、又硬…HPH　在典的嘴里都变成这样子了哟…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「特别疙疙瘩瘩呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、还是一如既往的棒啊HPH」","L"
						CALL HPH_PRINT,@"「已经无法忍耐了HPH　请快点让我含住吧HPH」","L"
					ENDSELECT
					PRINTFORML 典不断、爱惜不已地舔舐着傲然屹立的肉棒…
					CALL HPH_PRINT,@"（啊啊、这个味道HPH　这种臭味HPH　真不得了…HPH）","L"
					CALL HPH_PRINT,@"（传递出了一种必须要给我播上种的气息…小腹都開始疼起来了…HPH）","L"
					CALL HPH_PRINT,@"（%CALLNAME:MASTER%阁下的种子、无论是上面的嘴还是下面的嘴都很想要喝呢…HPH）","L"
					PRINTW
				;フルボッキしてない
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「！！　呼啊啊…HPH」","L"
						CALL HPH_PRINT,@"「啊啊、看到这种东西的话、典都…HPHHPH」","L"
						CALL HPH_PRINT,@"「真是根非常具有被含住的价值的肉棒啊…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒真是个害羞的孩子呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　来和典打个招呼吧HPH　来、变壮变壮ーHPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「疣被舔到也不会感到痛吗？　嗯嗯…」","L"
					CASEELSE
						CALL HPH_PRINT,@"「啊…開始有些硬起来了呢…HPH」","L"
						CALL HPH_PRINT,@"「这样子舔感觉如何？　呵呵、再继续变大一些吧HPH」","L"
					ENDSELECT
					PRINTFORML 典、仍然在爱惜不已的来回舔舐着\@ BASE:MASTER:勃起 < 500 ? 软乎乎的 # 半勃起来的 \@肉棒…
					CALL HPH_PRINT,@"「呵呵…HPH　柔软的肉棒在典的口中渐渐膨胀起来的感觉…好喜欢啊HPHHPH」","L"
				ENDIF
			ENDIF
			RETURN 1
		;恋慕、恋人以外
		ELSE
			IF TALENT:MASTER:年齢 == -1 || TALENT:MASTER:幼児／幼児退行
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呀嗯HPH　%CALLNAME:MASTER%阁下的、还是那么巨大呢HPH」","L"
						CALL HPH_PRINT,@"「你看、两只手都握不住…HPH　想必、是幻想乡最大的肉棒了呢HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呀ー唔HPH　%CALLNAME:MASTER%阁下的小鸡鸡真是可爱呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　你看、这么硬真是了不起…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「摸起来、特别疙疙瘩瘩呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、还是一如既往的棒啊HPH」","L"
						CALL HPH_PRINT,@"「光舔就可以了对吧…HPH　哈啊、我舔HPH　啊啊、好喜欢这个味道HPH」","L"
					ENDSELECT
					PRINTFORML 典不断、爱惜不已地舔舐着傲然屹立的肉棒…
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「呀嗯HPH　%CALLNAME:MASTER%阁下的、明明还软乎乎的却这么大HPH」","L"
						CALL HPH_PRINT,@"「你看、要两只手才能握住…HPH　会好好让我高潮的吧…HPH」","L"
						CALL HPH_PRINT,@"「HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒真是个害羞的孩子呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　来和姐姐问个好吧HPH　来、变壮变壮ーHPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、软着的时候会缩在包皮里面真是可爱HPH」","L"
						CALL HPH_PRINT,@"「不过、稍微撸一撸的话瞬间就会变成健壮的肉棒呢…你看HPH」","L"
					ENDSELECT
					PRINTFORML 典、仍然在爱惜不已的来回舔舐着\@ BASE:MASTER:勃起 < 500 ? 软乎乎的 # 半勃起来的 \@肉棒…
					CALL HPH_PRINT,@"「呵呵…HPH　柔软的肉棒在典的口中渐渐膨胀起来的感觉…好喜欢啊HPHHPH」","L"
				ENDIF
			;青年以上
			ELSE
				IF BASE:MASTER:勃起 >= 1000
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「啊啊…HPH　何等、何等了不起的…HPHHPH」","L"
						IF TALENT:処女 == 1
							CALL HPH_PRINT,@"「被这种东西捅进来的话、典的肚子都会记住它的形状的…HPH」","L"
						ELSE
							CALL HPH_PRINT,@"「这个会、把典的阴道里…HPH　把我的阴道里、完全重新塑形呢…HPH」","L"
						ENDIF
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「%CALLNAME:MASTER%阁下的肉棒、我很喜欢哦HPH」","L"
						CALL HPH_PRINT,@"「你看、这么又热、又硬…HPH　在典的手里都变成这样子了哟…HPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「摸起来、特别疙疙瘩瘩呢…HPH」","L"
					CASEELSE
						CALL HPH_PRINT,@"「HPH　%CALLNAME:MASTER%阁下的肉棒、还是一如既往的棒啊HPH」","L"
						CALL HPH_PRINT,@"「光舔就可以了对吧…HPH　哈啊、我舔HPH　啊啊、好喜欢这个味道HPH」","L"
					ENDSELECT
					PRINTFORML 典不断、爱惜不已地舔舐着傲然屹立的肉棒…
				ELSE
					SELECTCASE TALENT:MASTER:形状
					CASE 6,10;巨根、馬並み
						CALL HPH_PRINT,@"「！！　呼啊啊…HPH」","L"
						CALL HPH_PRINT,@"「啊啊、看到这种东西的话、典都…HPHHPH」","L"
						CALL HPH_PRINT,@"「只能碰吗？　不能舔、也不能插进来吗…HPH」","L"
					CASE 1,2;粗チン
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒真是个害羞的孩子呢HPH」","L"
						CALL HPH_PRINT,@"「不用不好意思哟HPH　来和典打个招呼吧HPH　来、变壮变壮ーHPH」","L"
					CASE 5;イボ付き
						CALL HPH_PRINT,@"「呵呵、%CALLNAME:MASTER%阁下的肉棒还是和往常一样很强的样子呢…HPH」","L"
						CALL HPH_PRINT,@"「这些疣被捏一捏也不会感到痛吗？　嗯嗯…」","L"
					CASEELSE
						CALL HPH_PRINT,@"「啊…開始有些硬起来了呢…HPH」","L"
						CALL HPH_PRINT,@"「这样子撸动感觉如何呢？　呵呵、再继续变大一些吧HPH」","L"
					ENDSELECT
					PRINTFORML 典、仍然在爱惜不已的来回舔舐着\@ BASE:MASTER:勃起 < 500 ? 软乎乎的 # 半勃起来的 \@肉棒…
					CALL HPH_PRINT,@"「呵呵…HPH　柔软的肉棒在典的口中渐渐膨胀起来的感觉…好喜欢啊HPHHPH」","L"
				ENDIF
			ENDIF
			RETURN 1
		ENDIF
	ENDIF
ENDIF
RETURN 1

;==================================================
;82,乳交
;==================================================
@M_KOJO_MESSAGE_COM_K139_82
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_82_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_83
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_83_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_83_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

;==================================================
;84,泡泡浴
;==================================================
@M_KOJO_MESSAGE_COM_K139_84
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_84_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_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_K139_85
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_85_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_85_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
;==================================================
;88,真空口交
;==================================================
@M_KOJO_MESSAGE_COM_K139_88
CALL TRAIN_MESSAGE
CALL M_KOJO_MESSAGE_COM_K139_88_1
RETURN RESULT

@M_KOJO_MESSAGE_COM_K139_88_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/口上・メッセージ関連/個人口上/【139】典/M_KOJO_K139_奉仕系コマンド.ERB