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

;==================================================
;依頼口上・各依頼で共通の口上
;==================================================
@M_KOJO_長短髪_IRAI_K59(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%_K59(ROLE, SCENE, CLIENT_ID)
ELSE
	TRYCALLFORM M_KOJO_長短髪_IRAI_{CHK_ID}_K59(ROLE, SCENE, CLIENT_ID)
ENDIF
SIF RESULT
	RETURN 1
;--------------------------------------------------
;ここにあるのは各依頼で共通の口上です
;依頼ごとの口上を表示した場合は共通の口上は表示されません
;【】で囲ってあるのは口上前後の地の文や発生する処理です
;WAITをするか等の目安にしてください（L,WはそれぞれPRINTFORML,PRINTFORMWの略）
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
;●依頼を持ち礦物碎片れる時
;【W どうやら［彼女］は［你］に頼み事があるようだ】
;【◆口上】
;【依頼データ表示】
;【INPUT（受託するかY/N）】

CASE "依頼非受託時"
;●内容だけ見て受託しなかった時
;【L ［你］は丁重にお断りした】
;【◆口上】
;【W ［彼女］は残念そうな顔をしている】

CASE "依頼受託時"
;●依頼を受託した時
;【W ［你］は［彼女］の依頼を受けた】
;【◆口上】

CASE "依頼確認時"
;●[366]で依頼内容を依頼人に確認した時
;【◆口上】
;【依頼データ表示】
;【INPUT（破棄するかY/N）】

CASE "依頼破棄時"
;●受託した依頼を破棄する時
;【◆口上】
;【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_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「その…自分的房間はつい、テキトーでいいかな。って時があるんですよね…だから…その…手伝ってくれたら嬉しいなぁ。って」
	RETURN 1
CASE "依頼非受託時"
	;同じ部屋に住んでる。という分岐ができるなら
	;PRINTFORMW 「%MASTERNAME:59%とも無縁の事じゃないと思うんですけどねぇ」
	PRINTFORMW 「ま、自己やれって事ですよね。反論はありません」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「ありがとうございます。頑張りましょうね」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「私的房間の掃除です。手伝ってくれるんでしたよね?」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「用事でも思い出しましたか?仕方ないですよね、そういう事もあります」
	RETURN 1
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
	IF YOGORE:(GET_CHARAHOME(TARGET)) < 1000
	;先に掃除してしまっていた場合
	;【◆口上】
	;【W ［彼女］的房間は十分にきれいだ】
	;【▼そのまま下の口上へ】
		PRINTFORMW 「那个?」
	;恋慕ならいつでも部屋に入れると聞いた気がするのでこういう分岐。これ、分岐の記述あってるのかな…?
	IF TALENT:恋慕
		PRINTFORMW 「%MASTERNAME:59%、いつやったんですか…?」
	ELSE
		PRINTFORMW 「一体誰が…まあ、頼んだ以上は、礼物をするべきですかね」
	ENDIF
		RETURN 1
	ELSE
	;一緒に掃除場合
	;【◆口上】
	;【W ［你］は［彼女］と協力して部屋の掃除を行なった】
	;【▼そのまま下の口上へ】
		PRINTFORMW 「ふー」
		RETURN 1
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】
	PRINTFORMW 「ありがとうございました」
	RETURN 1
CASE "成功報告時"
;報酬：低級素材
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】
	PRINTFORMW 「またあったら、よろしく…いや、もう、こうならないように気を付けた方がいいんですよね」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「部屋の掃除をしてくれるって約束したじゃないですかー!」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼02：給花澆水
;==================================================
@M_KOJO_長短髪_IRAI_2_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「稍微したお花育ててるんですけども、見ていきませんか?」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「興味ありませんでしたか?」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「普通のお花なんですけど、奇麗ですよー」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「部屋のお花、見てくれるんでしたよね?」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「花の気分じゃありませんでした?そういえば、お腹すいてきた気もしますね」
	RETURN 1
CASE "依頼実行直前"
;【◆口上】
;【W ［你］は［依頼主］的家の鉢植えや植木に水をあげた】
;【▼そのまま下の口上へ】
	IF ROLE == "CLIENT"
	;澆水した時、依頼主である口上主がTARGETの場合
		PRINTFORMW 「奇麗な花でしょう?ほら、実はここがこんな感じで…」
		RETURN 1
	ELSEIF ROLE == "TARGET"
	;澆水した時、依頼主ではない口上主がTARGETの場合
		PRINTFORMW 「ほう、澆水の代行ですか。たいしたものですね」
		RETURN 1
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	IF ROLE == "CLIENT"
	;澆水した時、依頼主である口上主がTARGETの場合
	;この場合はそのまま下の口上へ続きます
		PRINTFORMW (ま、私の奇麗さにはかないませんがね)
		RETURN 1
	ELSEIF ROLE == "TARGET"
	;澆水した時、依頼主ではない口上主がTARGETの場合

		RETURN 0
	ENDIF
CASE "成功報告時"
;報酬：\500
	PRINTFORMW 「お花について語り合えて楽しかったです。また、話しましょうね」
	;初回の時だけ言わせたい
	;PRINTFORMW 「そういえば知ってます?とあるマンションで伝わっている話によると、お花にお水をあげると、お花が礼物をくれるそうです」
	;PRINTFORMW 「もしかしたら、%MASTERNAME:59%の元にも、礼物が来てたりするかもしれませんね?」
	;小悪魔からすれば花を見せただけなんだから、報酬を支払う理由がないのです
	PRINTFORMW そう言った%NICKNAME:59%は、花のように美的笑顔を見せた
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「私的房間のお花、見に行きましょうって言いましたよね…?」
	RETURN 1
CASE "依頼報告不要"
	PRINTFORMW (一緒にお花を見て、そして語り合いましょう。ってつもりだったんだけどなぁ…まあ、いいか)
	RETURN 1
ENDSELECT

;==================================================
;依頼口上・一般依頼03：一起玩吧
;※この依頼は[幼稚]を持っている角色のみ発生します
;==================================================
@M_KOJO_長短髪_IRAI_3_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
;幼稚を持っていれば発生する＝恋慕・恋人特典の素質変更で発生する可能性ある?いわゆるここぁを想定して書くだけ書いてみる
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「%MASTERNAME:59%、私と玩耍ませんか?」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「残念だなぁ。暇がある時は遊んでくださいよ!絶対!」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「やったぁ!何します?何します?」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「私と玩遊戲んですよ!さあ、早く!」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「そんなぁ…次は絶対ですよ、絶対!」
	RETURN 1
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
;【◆口上】
;【W ［你］は［彼女］と遊んだ】
;【▼そのまま下の口上へ】
	PRINTFORMW 「さあ、何しましょうか?何しましょうか!」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】
	PRINTFORMW 「楽しかったです」
	RETURN 1
CASE "成功報告時"
;報酬：好感度と信賴度のみ（心情が良くなる）
;【▲上の口上から続き】
;【◆口上】
	PRINTFORMW 「また玩耍ましょうね!絶対ですよ!」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「遊ぼうって約束したのにぃ!」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼04：想要学習料理
;==================================================
@M_KOJO_長短髪_IRAI_4_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「%MASTERNAME:59%、料理の腕前に自信があるのですよね?」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「ないんですか?じゃあ、なんでもありません」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「じゃあ、一緒に料理してみませんか?しましょう!」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「一緒に料理しましょう」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「えっ?別に料理する気はなかった…?私の勇み足でしたか。申し訳ありません」
	RETURN 1
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
;【◆口上】
;【L ［你］は［彼女］と一緒に料理をした】
;【W ［料理名］を作ります】
;【▼そのまま下の口上へ】
	PRINTFORMW 「さあ、私たちの腕を振るいましょう!」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】
	PRINTFORMW (なんか普段と違う作り方だから、すごく緊張してきました…)
	RETURN 1
CASE "成功報告時"
;報酬：\500
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】
;【L できた料理は二人いっしょに頂いた】
;【吃飯効果（料理打分）】
	PRINTFORMW 「…いただきます」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW (稍微強引に誘った私が悪かったですかね…)
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼05：関于特訓
;==================================================
@M_KOJO_長短髪_IRAI_5_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「弾幕ごっこの練習をしたいので、%MASTERNAME:59%の力を見込んで、手伝いをお願いします」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「ま、疲れますもんね～。やりたくないの、わかりますよ～」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「では、命にかかわらない程度に本気にお願いしますよ!」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「私と弾幕ごっこの練習ですよ」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「やる気満々でしたのに…この高ぶり、どうしましょうか?」
	RETURN 1
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
;【◆口上】
;【W ［你］は［彼女］と弾幕ごっこの特訓をした】
;【▼そのまま下の口上へ】
	PRINTFORMW 「手加減はお願いしますが、手抜きは許しませんよ!」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】
	PRINTFORMW 「隙を見せてなるものかよ!」
	RETURN 1
CASE "成功報告時"
;報酬：\500
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】
	PRINTFORMW 「ふう…なんだか力が付いた気がします。ありがとうございました」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW (時間、取れなかったんですかね…)
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼06：誰来告訴我！
;==================================================
@M_KOJO_長短髪_IRAI_6_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「私はそれなりに知識に自信はあるものですが、それでもわからない事があるのですよね」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「こういう時、誰か教えてくれる賢いお方がいたら、尊敬しちゃいますよね。って思うんですよ」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「えっ?そのわからない事を教えてくれるんですか!?そんなつもりじゃ…いえ、お願いしましょう!」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「私も知らない事を、教えてくれるんでしたよね?」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「あら、上手く教えられるか自信なくなりました?あー、まあ…仕方ないですよね」
	RETURN 1
CASE "依頼実行直前"
	IF IS_LIBRARY(CFLAG:MASTER:現在位置) && TARGET == CLIENT_ID
	;［查資料］と［進行解答］が重なっている場合
	;【◆口上】
	;【L ［你］は［彼女］の疑問に答えるために［現在地］を訪れた】
	;【L ここなら役に立つ資料が見つかりそうだ】
	;【INPUT（查資料/進行解答）】
	;【查資料＞［你］と［彼女］は［現在地］で調べ物をした】
	;【▼そのまま下の口上へ】
	;【進行解答＞［進行解答］へジャンプ】
		PRINTFORMW 「これなら、何かわかるかも…?」
		RETURN 1
	ELSEIF IS_LIBRARY(CFLAG:MASTER:現在位置)
	;［查資料］をした時、依頼主ではない口上主がTARGETの場合
	;【◆口上】
	;【［你］は［現在地］で調べ物をした】
	;【▼そのまま下の口上へ】
		PRINTFORMW 「おやぁ?何か調べものですか?私も%MASTERNAME:59%に倣うべきですかね」
		RETURN 1
	ELSE
	;［進行解答］時（依頼主がTARGET）
	;【◆口上】
	;【L ［你］は［彼女］の疑問に答えた】
	;【成功：［彼女］の疑問は氷解した！】
	;【失敗：［彼女］は納得できなかったようだ……】
	;【▼そのまま下の口上へ】
		PRINTFORML 「なるほど…」
		RETURN 1
	ENDIF
CASE "依頼実行直後"
	;【▲上の口上から続き】
	;【◆口上】
	SELECTCASE CFLAG:CLIENT_ID:依頼状況
	CASE 2
	;［查資料］をした時
		IF ROLE == "CLIENT"
		;一緒に［查資料］をした時
			PRINTFORMW 「なるほど…そういう事なのだとしたら…あるいは…」
			RETURN 1
		ELSEIF ROLE == "TARGET"
		;依頼主ではない口上主の前で［查資料］をした時
			PRINTFORMW 「よかったら協力しましょうか?1人より2人の方が早く済む。なんて単純ながら正しいと思う言葉もあります」
			RETURN 1
		ENDIF
	CASE 3
	;成功した時
	;【▼そのまま下の口上へ】
		PRINTFORMW 「とてもわかりやすくて、参考成为了!」
		RETURN 1
	CASE 6
	;失敗した時
	;【▼そのまま失敗報告時の口上へ】
		PRINTFORMW 「…全くわかりません!」
		RETURN 1
	ENDSELECT
CASE "成功報告時"
;報酬：\500
	PRINTFORMW 「私も、もっと勉強しないといけませんね!」
	RETURN 1
CASE "失敗報告時"
	;全く決めてないが、"日数の経過"と"単純に失敗"で、反応が変えられるなら変えたい
	RETURN 0
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼07：大掃除還沒結束
;==================================================
@M_KOJO_長短髪_IRAI_7_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「来ましたよ…年末…そして大掃除という、1年の清算の時が!」
	RETURN 1
CASE "依頼非受託時"
	;同じ部屋に住んでる。という分岐ができるなら
	;PRINTFORMW 「%MASTERNAME:59%のものもあるから、私が間違って捨てたりしないか心配です…」
	PRINTFORMW 「ええ、%MASTERNAME:59%も大掃除、頑張ってくださいね」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「えっ?手伝ってくれるんですか?それは…本当にありがたいです!」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「"大掃除"という異変の解決ですよ」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「き…期待をさせておいてそんな…あんまりです…!」
	RETURN 1
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
	IF YOGORE:(GET_CHARAHOME(TARGET)) < 1000
	;先に掃除してしまっていた場合
	;【◆口上】
	;【W ［彼女］的房間は十分にきれいだ】
	;【▼そのまま下の口上へ】
	;恋慕ならいつでも部屋に入れると聞いた気がするので(ry
	IF TALENT:恋慕
		PRINTFORMW 「%MASTERNAME:59%!済ませておいてくれたんですか!?」
	ELSE
		PRINTFORMW 「那个ぇ…?今年はそんなんでもなかったかな?」
	ENDIF
		RETURN 1
	ELSE
	;一緒に掃除場合
	;【◆口上】
	;【W ［你］は［彼女］と協力して徹底的に部屋を掃除した】
	;【▼そのまま下の口上へ】
		PRINTFORML 「くっ…!まさかこんなところまで、こんなになってるだなんて…!」
		PRINTFORMW 「%MASTERNAME:59%!そこをお願いします!あとそこの本は間違っても開かないでくださいね!」
		PRINTFORMW 「"つい読み込んでしまって、大掃除が終わらなく"なります!」
		RETURN 1
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】
	PRINTFORMW 「これで今夜も…くつろいで熟睡できますね」
	RETURN 1
CASE "成功報告時"
;報酬：\1500
;【▲上の口上から続き】
;【◆口上】
;【報酬獲得】
	PRINTFORMW 「ふふっ、来年もよろしくお願いしますね。あ、大掃除の事じゃないですよ」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「期待をさせておいて…あんまりです…」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼08：送信
;※この依頼は角色によっては発生しません
;==================================================
@M_KOJO_長短髪_IRAI_8_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「%MASTERNAME:59%、とあるお方に送信くれませんか」
	PRINTFORMW 「…例え、渡す相手が私の隣にいたとしてもです。%MASTERNAME:59%に頼むというのが重要なのです」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「うーん、やはりその手の職業のお方に頼む方がいいですかね?」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「絶対に届けてくださいよ～」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「あるお方に手紙を渡してほしいのですよ」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「…もしかして、そのお方をご存じでないとか?」
	PRINTFORMW 「そんな無茶は、頼みませんよ。頑張ろうとしてくれた事は嬉しいですけどね」
	RETURN 1
CASE "依頼実行直前"
;○この依頼では手紙を渡される側の口上です
;【◆口上】
;【W ［你］は［彼女］に預かっていた手紙を渡した】
;【▼そのまま下の口上へ】
	PRINTFORMW 「是这様吗、私への手紙ですか」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	PRINTFORMW 「なるほど、目を通しておかねばいけませんね」
	RETURN 1
CASE "成功報告時"
;報酬：素材4つ
	PRINTFORMW 「届けてくれましたか。ありがとうございます」
	PRINTFORMW 「これで、アレも円滑に進みそうです」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「手紙、来ましたよ。%MASTERNAME:59%が渡すべき相手から」
	PRINTFORMW 「こうなっては、私が%MASTERNAME:59%に頼んだ手紙は、ただの紙切れですよ…」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼09：誰的遺失物
;==================================================
@M_KOJO_長短髪_IRAI_9_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「落とし物を拾ったんです。なんか見覚えあるんですよね…」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「こういう時、誰が頼れるかなあ…」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「%MASTERNAME:59%が探してくれるんですか?」
	PRINTFORMW 「期待してますからね!」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「前に渡したアレの持ち主を見つけて、返してきて欲しいのです」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「無理是这様吗?是这様吗…」
	PRINTFORMW 「うーん、私の方で頑張るしかないか…」
	RETURN 1
CASE "依頼実行直前"
;○この依頼では落とし物を渡される側の口上です
;【◆口上】
;【W ［你］は［彼女］に預かっていた落とし物を返した】
;【▼そのまま下の口上へ】
	PRINTFORMW 「あ、それ、私のです」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	PRINTFORMW 「いやあ、実は探していたんですよ」
	PRINTFORMW 「%MASTERNAME:59%のおかげで助かりました」
	RETURN 1
CASE "成功報告時"
;報酬：上級素材
	PRINTFORMW 「へぇ、持ち主、見つかったんですか。それはよかった」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「…なんかこのままだと嫌な予感がするので、頼んだアレを私にお渡しください」
	PRINTFORMW 「ああ…どうしてこんな事になるかな…」
	RETURN 1
CASE "依頼報告不要"
	PRINTFORMW 「へぇ、持ち主、見つかったんですか。それはよかった」
	PRINTFORMW %NICKNAME:59%は、自身とよく似た悪魔から報告を受けている
	RETURN 1
ENDSELECT

;==================================================
;依頼口上・一般依頼10：怎麼也找不到（場所探しパターン）
;==================================================
@M_KOJO_長短髪_IRAI_10_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「探し物があるんです。見つけにくいものかもしれません」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「ま、やりませんよね。そんな面倒くさい事」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「ありがとうございます!私はひとまず、提包の中や机の中をまた探してみます!」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「私のアレを探してくれるって話です」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「無理そう?そう…ま、宣言してくれるだけ良しとします」
	PRINTFORMW 「はあ…どうやって探そうか…」
	RETURN 1
CASE "依頼実行直前"
;【◆口上】
;【W 中奖了を探していた［你］はついに探していた落とし物を発見した】
;【▼そのまま下の口上へ】
	IF ROLE == "CLIENT"
	;依頼主である口上主と一緒に発見した場合
		PRINTFORMW 「これです!」
		RETURN 1
	ELSEIF ROLE == "TARGET"
	;発見した時、依頼主ではない口上主がTARGETの場合
		PRINTFORMW 「うん?これがどうかしたんですか?」
		RETURN 1
	ENDIF
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	IF ROLE == "CLIENT"
	;依頼主である口上主と一緒に発見した場合
		PRINTFORMW 「さすがですね、%MASTERNAME:59%は」
		RETURN 1
	ELSEIF ROLE == "TARGET"
	;発見した時、依頼主ではない口上主がTARGETの場合
		PRINTFORMW 「へぇ、落とし物の捜索を…優しいんですね、%MASTERNAME:59%は」
		RETURN 1
	ENDIF
CASE "成功報告時"
;報酬：上級素材2つ
	PRINTFORMW 「なくさないのが一番なのはわかってますが…」
	PRINTFORMW 「その…次があったらよろしくお願いしますね」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「ああ…私の…一体どこにやってしまったのでしょうか…」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼11：怎麼也找不到（人物探しパターン）
;==================================================
@M_KOJO_長短髪_IRAI_11_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「あっれぇ…どこやったんだろうなぁ…」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「それなりに大事な物なんですが、本当にどこにやったのかな…」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「探してくれるんですか?ありがとうございます」
	PRINTFORMW 「思い当たるところは探したのに、なかったんですよね」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「私のアレを探してくれるって話です」
	PRINTFORMW 「私が思い当たる場所は、もう探してみました」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「無理そう?そう…ま、宣言してくれるだけ良しとします」
	PRINTFORMW 「はあ…どうやって探そうか…」
	RETURN 1
CASE "依頼実行直前"
;○この依頼では失くしもの持っていた側の口上です
;【◆口上】
;【W 聞き込みを続けていた［你］はついに探していた落とし物を発見した】
;【▼そのまま下の口上へ】
	PRINTFORMW 「へぇ、何となく持っていたのですが、そのお方の落とし物だったのですか」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
	PRINTFORMW 「%MASTERNAME:59%が渡してきてくれるんですか?じゃあよろしくお願いしますね」
	RETURN 1
CASE "成功報告時"
;報酬：\3200
	PRINTFORMW 「どおりでいくら探しても見つからないわけだ…ありがとうごさいました」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「ああ…私の…一体どこにやってしまったのでしょうか…」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼12：懲らしめて！
;==================================================
@M_KOJO_長短髪_IRAI_12_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「稍微弾幕ごっこに関して研究してる事がありまして」
	PRINTFORMW 「その証明のために、あるお方と戦ってきて欲しいのです」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「うん、弾幕ごっこと言っても、当たると痛いし、危険ですからね」
	PRINTFORMW 「そんな事するの、嫌ですよね。わかります、わかります」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「ありがとうございます」
	PRINTFORMW 「あ、言い忘れていましたが、勝利の情報が一番大事ですからね」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「あるお方との弾幕ごっこの戦闘記録を報告してください」
	PRINTFORMW 「敗北からの情報も気にはなりますが、勝利の情報をお願いします」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「ま、痛いのは嫌ですよねぇ」
	RETURN 1
CASE "依頼実行直前"
;○この依頼では討伐される側の口上です
	IF CANNOT_DANMAKU() == 1
	;屋内のとき（勝負できない）
	;【◆口上】
	;【W 屋外で挑もう…】
		PRINTFORMW 「なんだかわかりませんが、仕方ない、やりますか」
		PRINTFORMW 「…って、室内だと危ないですって?巫女が乗り込んできた時は普通にやったというのに?」
		RETURN 1
	ELSEIF CANNOT_DANMAKU() == 2
	;仕事中（勝負できない）
	;【◆口上】
	;【W お取り込み中だ…】
		PRINTFORMW 「弾幕勝負?今は…見てわかりませんか?」
		RETURN 1
	ELSEIF CANNOT_DANMAKU() == 3
	;你が疲労中（勝負できない）
	;【◆口上】
	;【W 今は疲れている…】
		PRINTFORMW 「%MASTERNAME:59%…你、どこからどう見ても疲れてますよ」
		;関係性次第で、「貴方…你～」というセリフになるが気にして是けない
		RETURN 1
	ELSEIF CANNOT_DANMAKU() == 4
	;口上主が疲労竜（勝負できない）
	;【◆口上】
	;【W 今挑むのはフェアじゃない…】
		PRINTFORMW 「ん?弾幕勝負?いやあ、私の今の姿、よく見てくださいよ…」
		RETURN 1
	ELSEIF CANNOT_DANMAKU() == 5
	;既に今日一度弾幕勝負をしている（勝負できない）
	;【◆口上】
	;【W 今日はもう挑めない…】
		PRINTFORMW 「何度もやる気にはなりませんよ」
		RETURN 1
	ELSE
	;【◆口上】
	;【W 勝負開始！！】
	;【以降はそのまま弾幕口上が呼ばれます】
		PRINTFORMW 「弾幕勝負?しかもあるお方に代わって?ナンデ?」
		PRINTFORMW 「…まあいいです、相手しますよ」
		RETURN 1
	ENDIF
	;【▼そのまま下の口上へ】
CASE "依頼実行直後"
;○この依頼では討伐される側の口上です
	IF CFLAG:CLIENT_ID:依頼状況 == 2
		IF CANNOT_DANMAKU() == 0
			;败犬
			;【▲上の口上から続き】
			;【L ［彼女］の討伐に失敗した……】
			;【W ……こうなったら後日出直すしかない】
			;【◆口上】
			PRINTFORMW 「二時間前に出直してきなさい!」
			PRINTFORMW 「…言ってみたかったんですよ、これ」
			RETURN 1
		ELSE
			;挑めなかった場合
			;【▲上の口上から続き】
			;【◆口上】
			PRINTFORMW 「後にしましょう。後に」
			RETURN 1
		ENDIF
	ELSEIF CFLAG:CLIENT_ID:依頼状況 == 3
	;勝利
	;【▲上の口上から続き】
	;【W ［彼女］を懲らしめた！】
	;【◆口上】
		PRINTFORMW 「ぐえー!」
		PRINTFORMW 「…%MASTERNAME:59%をよこした方には、「小悪魔は美しく倒れた」とお伝えください」
		RETURN 1
	ENDIF
CASE "成功報告時"
;報酬：賞金（時価）
	PRINTFORMW 「なるほど…そうでしたか」
	PRINTFORMW 「これは参考になりそうです。ありがとうございました!」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「成果は得られませんでしたか…残念です」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼13：好吃的魚が食べたいなぁ
;==================================================
@M_KOJO_長短髪_IRAI_13_K59(ROLE, SCENE, CLIENT_ID)
#DIMS ROLE     ;角色の立場、依頼者かそうでないか
#DIMS SCENE    ;セリフの表示されるタイミング
#DIM  CLIENT_ID;依頼者IDだけ抜き出したもの
;--------------------------------------------------
;RETURN 0 の部分は共通の口上が表示されます
;依頼ごとの口上を表示する部分は RETURN 0 を RETURN 1 にしてください
;--------------------------------------------------
SELECTCASE SCENE
CASE "依頼提示時"
	PRINTFORMW 「ある調べもののために、好吃的魚が必要なんです」
	PRINTFORMW 「何を調べるのかって?それは、色々です」
	RETURN 1
CASE "依頼非受託時"
	PRINTFORMW 「魚屋さんにでもあたるべきですかね…」
	RETURN 1
CASE "依頼受託時"
	PRINTFORMW 「ありがとうございます」
	PRINTFORMW 「大漁には必要ないんです。ただ、好吃的魚が那个ばいいのです」
	RETURN 1
CASE "依頼確認時"
	PRINTFORMW 「好吃的魚が必要なんです」
	RETURN 1
CASE "依頼破棄時"
	PRINTFORMW 「無理…ですか、釣魚竿が损壊のりでもしたんですか?」
	PRINTFORMW 「無理なものを頼むわけにもいきません。ありがとうございました」
	RETURN 1
CASE "依頼実行直前"
;○この依頼は依頼主がTARGETです
;【◆口上】
;【L ［你］は［彼女］に好吃的魚を渡した】
;【L 何だか生きる希望がわいてきたよ。】
;【▼そのまま下の口上へ】
	PRINTFORMW 「ふむ…なるほど…この見た目に…」
	PRINTFORMW 「間違いなく、私が必要としてる、好吃的魚です」
	RETURN 1
CASE "依頼実行直後"
;○この依頼は必ず実行後達成します
;【▲上の口上から続き】
;【◆口上】
;【▼そのまま下の口上へ】
	PRINTFORMW 「まさか…急に魚料理の練習がしたいなど私にに言われて、どうしたものかと…」
	PRINTFORMW 「おっと、こっちの話です。気にしないでください」
	;妖精女僕とか、いわゆるここぁに頼まれた感じ
	RETURN 1
CASE "成功報告時"
;報酬：白米３個
	PRINTFORMW 「これで研究も捗ります。ありがとうございました」
	RETURN 1
CASE "失敗報告時"
	PRINTFORMW 「もうだめじゃ…」
	RETURN 1
;CASE "依頼報告不要"
;＜この依頼にはありません＞
;	RETURN 0
ENDSELECT

;==================================================
;依頼口上・一般依頼16：お悩み相談
;==================================================
@M_KOJO_長短髪_IRAI_16_K59(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 "依頼実行直後"
	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:100の値)％の確率で"口上専用"が発生します＞
	RESULT:100 = 10

;＜RESULT:YYに0以外の数値を入れると、該当のお悩みを発生させなくできます（詳しくは一般依頼16_お悩み相談参照）＞
;1,2:弾幕ごっこの悩み 3,4:晩酌の悩み 5,6:本の悩み 7,8:香料の悩み
;9,10:音楽の悩み 11,12:服の悩み 13:髪型の悩み 14:参拝の悩み 15:ダイエットの悩み
;16,17:菜園の悩み 18:休日の悩み 19:人気の悩み 20:集中力の悩み 21:御三家の悩み 22:進化の悩み
;発生させないってこういう事でいいのかな?
	RESULT:1 = 5
	RESULT:2 = 6
	RESULT:3 = 13
	;この小悪魔の仕様上、髪型の悩みは絶対ダメだと思う
	RESULT:4 = 19
	RETURN 1
CASE "口上専用"
;＜この依頼特有の分岐です。(口上委託率)％の確率で発生します＞
;16,お悩み相談 の場合
;RESULT        発生判定,0だと発生しません
;RESULT:1      正解の選択肢（ただしRESULT:2が0だと、一定確率で逆にハズレる）
;RESULT:2      逆張り正解／ハズレ判定の消去,1だと逆張りが無くなります
;RESULTS:0     お悩み文章（自動で『』で囲まれます）
;RESULTS:1～3  選択肢１～３
;何も発生しない状態になると無限ループになるので注意してください
;●追記メモ
;RESULT:1を4～6にするとそれぞれ1～3がハズレ（残り2つが正解）になります
;RESULT:1を7にするとどれも正解になります
;RESULT:1を8にするとどれもハズレになります
;1～3以外の場合は逆張り判定が自動で無くなります

;専用の発生条件の記述がよくわかってない…こう?
	RESULT = 1
	SELECTCASE RAND:2
	CASE 1
		SIF 1
			RESULT = 1
		RESULTS:0 = 図書館にどんな本を増やしたらいいですかね?
		RESULTS:1 = 実用的な物
		RESULTS:2 = 娯楽的な物
		RESULTS:3 = えっちなの
		RESULT:1 = 7
	CASE 0
		SIF 1
			RESULT = 1
		RESULTS:0 = なんか…いい本ないですか?
		RESULTS:1 = 自分のおすすめを挙げる
		RESULTS:2 = 客套地の流行を挙げる
		RESULTS:3 = わからん…
		RESULT:1 = 7
	ENDSELECT

;▼サンプル
[SKIPSTART]
	SELECTCASE RAND:5
	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
	CASE 3
		;このお悩みは、無条件で発生し、1番と3番が正解になります（5 - 3 = 2番がハズレになります）
		SIF 1
			RESULT = 1
		RESULTS:0 = ワンちゃんの名前は何にしよう？
		RESULTS:1 = ボロンゴ
		RESULTS:2 = ゲレゲレ
		RESULTS:3 = プックル
		RESULT:1 = 5
	CASE 4
		;このお悩みは、無条件で発生し、どれを選んでも正解になります
		SIF 1
			RESULT = 1
		RESULTS:0 = 夕飯は何がいい？
		RESULTS:1 = 土豆炖肉
		RESULTS:2 = 炸丸子
		RESULTS:3 = 焼鱼
		RESULT:1 = 7
	ENDSELECT
[SKIPEND]

	SIF !RESULT
		RESTART
	RETURN 1
ENDSELECT

;==================================================
;依頼口上・固有依頼101：
;固有依頼の仕様は角色によって異なりますが依頼番号は101～で共通です
;"依頼名"部分に依頼名を入れて下さい
;==================================================
@M_KOJO_長短髪_IRAI_依頼名_K59(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

[SKIPSTART]
;＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
;依頼口上貂プレの貂プレ
;==================================================
;依頼口上・一般依頼Y：
;==================================================
@M_KOJO_長短髪_IRAI_Y_K59(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/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/M_KOJO_K59_1_依頼.ERB


repo_name: akadiya/eratw

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/M_KOJO_K59_1_奉仕系コマンド.ERB

license: unknown


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

;--------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------
IF LOCAL
	SIF FLAG:口上色
		TRYCALLFORM M_KOJO_長短髪_COLOR_K{NO:TARGET}
	;-------------------------------------------------
	;小分岐
	;-------------------------------------------------
	;戦闘前
	HANDICAP_FIXED = 0
	HANDICAP_RAND = 0
	;ハンデをつけることができ、数値が大きいほど你が不利になる　数値が負なら你が有利に
	;角色の能力に関わらずクッソ強くしたり弱くしたりできる
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "戦闘前"
		PRINTFORML 「要和我弹幕战斗?可以是可以」
		;ここから、能力で各台詞に分岐。ってイメージ。
		;小悪魔より戦闘技能が高い。もしくは小悪魔に勝利済み
		IF ABL:戦闘能力 < ABL:MASTER:戦闘能力 || CFLAG:TARGET:弾幕勝負勝利 == 1
			PRINTFORMW 「うーん、正直、私に勝算はない気もするんですが…まあ、気軽に、本気で行きましょうか」
		;小悪魔より戦闘技能が低い。小悪魔に勝利済みの場合は発生しない。あと、話としてはここだけ「本気」ではなく「手は抜かない」って表現なのがポイント
		ELSEIF ABL:戦闘能力 > ABL:MASTER:戦闘能力
			PRINTFORML 「でも、下手したら、私が目隠しして座ってても、私が勝っちゃうんじゃないですかね?」
			PRINTFORMW 「ま、それでもハンデつけたりみたいな手抜きはしません。やらせていただきましょう」
		;これは戦闘技能が小悪魔と同格
		ELSE
			PRINTFORMW 「既然要打的话、就认真一点吧」
		ENDIF
		;ここから共通
		PRINTFORMW 「那么、開始吧…准备、一决…」
		PRINTL [0] 勝負!
		SIF MESSKIP()
		INPUT
		PRINTFORML 「胜负!」
		PRINTFORMW %NICKNAME:59%和%CALLNAME:MASTER%同时、摆出了战斗姿态
		;你が個性あるというか、ｼｬｧﾍﾞｯﾀｧｧｧｧｧｧｧ!!ってなる事は個人的な趣味でも避けてたのだが、決闘前に声を揃えてとか憧れるし…
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;ハンデ
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "ハンデ"
		;ハンデつけなかったら表示されないので無記入でよい
		PRINTFORML
		RETURN 0
	ENDIF
	;-------------------------------------------------
	;戦闘中TARGET被弾時口上
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "被弾"
		;別に一律で「やられたー」だけでもいいよ
		SELECTCASE 相手残機
			;残り残機3が表示されるのは【洽覧深識】持ちのみ
			CASE 3

				;小悪魔より戦闘力が低い場合。って分岐が可能だったら。満たした場合は上の台詞ではなくこっちに
				;本気を出すとか言うけど、「油断してたから喰らったかな…?」って話なので、パワーUPはしない
				IF ABL:戦闘能力 > ABL:MASTER:戦闘能力
					PRINTFORMW 「侥幸!?不对、太大意了吗…?」
					PRINTFORMW 「看来应该给予相应的敬意。要稍微、认真起来了!」
				ELSE
					PRINTFORMW 「被打中了。嘛啊、这是当然的事情」
				ENDIF
			CASE 2
				PRINTFORMW 「还没有、结束!」
			CASE 1
				IF ABL:戦闘能力 < ABL:MASTER:戦闘能力
					PRINTFORMW 「やっぱ無理かぁ…いや、最後まで…諦めだけはしません!」
				ELSE
					;HIPのyou。別にパワーUPは(ry
					PRINTFORMW 「我居然被打到这种地步…这样的话、就像恶魔一样上了!」
				ENDIF
			CASE 0
				PRINTFORMW 「不女…子!」
		ENDSELECT
	ENDIF
	;-------------------------------------------------
	;戦闘中
	;TARGETの【残忍酷薄】発動時
	;ARGはTARGETの残機
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "残忍酷薄"

	ENDIF
	;-------------------------------------------------
	;戦闘中
	;TARGETの【乾坤一擲】発動時
	;ARGはTARGETの残機
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "乾坤一擲"

	ENDIF
	;-------------------------------------------------
	;戦闘中
	;TARGETの【怪力乱神】発動時
	;ARGはTARGETの残機
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 0
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "怪力乱神"

	ENDIF

	;-------------------------------------------------
	;戦闘後
	;記入チェック（=0, 非表示、1, 表示）
	LOCAL:1 = 1
	;-------------------------------------------------
	IF LOCAL:1 && ARGS == "戦闘後"
		PRINTFORML
		;残り残機4が表示されうるのは【洽覧深識】持ちのみ
		;残機が1以上なら你の負け、0の場合は你の勝利
		SELECTCASE 相手残機
			CASE 4
				;小悪魔より戦闘力が低い場合。って分岐が可能だったら。満たした場合はこっちに
				IF ABL:戦闘能力 > ABL:MASTER:戦闘能力
					PRINTFORMW 「呼唔、辛苦了。我觉得干得挺好、以后也继续提升实力吧!」
				;小悪魔は同格以上で一本も取れない場合、你がわざと負けたという認識をする
				ELSE
					PRINTFORMW 「等等!?一下都没有打到、真的有认真在打吗!?没有放海吧!?」
				ENDIF
			CASE 3
				PRINTFORMW 「呼唔、很好的运动。辛苦了」
			CASE 2
				PRINTFORMW 「呼唔…很棒的一场战斗。继续保持的话、下次也很期待啊」
			CASE 1
				PRINTFORMW 「哈啊…哈啊…虽然很厉害、但是%NICKNAME:59%酱的胜利!太開心了!」
			CASE 0
				;小悪魔より戦闘技能が高い。もしくは小悪魔に勝利済み
				IF ABL:戦闘能力 < ABL:MASTER:戦闘能力 || CFLAG:TARGET:弾幕勝負勝利 == 1
					PRINTFORML 「虽然是输了、但也是预料之中的结果…%MASTERNAME:59%很强啊」
					PRINTFORMW 「啊、但是怎么样?我也稍微能赶上%MASTERNAME:59%吗?」
				;小悪魔より戦闘技能が低い。小悪魔に勝利済みの場合は発生しない。好感度か何かに特別BOUNSあってもいいかも
				ELSEIF ABL:戦闘能力 > ABL:MASTER:戦闘能力
					PRINTFORMW 「输…了…?我…这个…实力差…下…?」
					PRINTFORMW 「好厉害…!太厉害了%MASTERNAME:59%!下次战斗的时候、我也可能会输诶!」
				;同格勝利
				ELSE
					PRINTFORML 「呼嘿嘿、输掉了…很强啊、%MASTERNAME:59%」
				ENDIF
		ENDSELECT
	ENDIF
RESETCOLOR
ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/M_KOJO_K59_1_弾幕勝負.ERB


path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/M_KOJO_K59_1_愛撫系コマンド.ERB


code:
;※※※※※※※※※※※※※※※※※※※※※※※※※
;日常系指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;300,会話
;TFLAG:193(1=大成功 0=成功 -1=失敗 -2=大失敗（TARGETがMASTERより教養が4以上高い)
;TCVAR:302(0=会話可能 1>=非恋慕時会話不能)
;MARK:反発刻印(3以上=会話不能)(4以上はバグ
;TCVAR:烂醉(1=通常成功or大失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_300
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_300
;指令共通メッセージ(TRAIN_MESSAGE)
;削除すると「～说着话。」とかが消えます。また、削除した場合は自動で口上色が付きません。
CALL TRAIN_MESSAGE
;口上メイン呼出
CALL M_KOJO_長短髪_MESSAGE_COM_K59_300_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_300_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:時間停止
		;会話不能
	ELSEIF TCVAR:302
		PRINTFORML 「我很高兴能照顾我、」
		PRINTFORMW 「但我想一定还有其他感到无聊的人」
	ELSEIF TALENT:恋人
		SELECTCASE RAND:5
			CASE 3
				PRINTFORML
				PRINTFORMW
			CASE 2
				PRINTFORML
				PRINTFORML
				PRINTFORMW
			CASE 1
				PRINTFORML
				PRINTFORMW
			CASE 0
				PRINTFORML
				PRINTFORMW
			CASEELSE
				PRINTFORML
				PRINTFORMW
		ENDSELECT
	ELSEIF TALENT:恋慕
		SELECTCASE RAND:5
			CASE 3
				PRINTFORML
				PRINTFORMW
			CASE 2
				PRINTFORML
				PRINTFORML
				PRINTFORMW
			CASE 1
				PRINTFORML
				PRINTFORMW
			CASE 0
				PRINTFORML
				PRINTFORMW
			CASEELSE
				PRINTFORML
				PRINTFORMW
		ENDSELECT
	ELSEIF TALENT:思慕
		SELECTCASE RAND:5
			CASE 3
				PRINTFORMW 「へぇ、そうなんですか、ふふっ」
				PRINTDATA
					DATAFORM 「他に、他には何かないんですか?もっと聞きたいです」
					DATAFORM 「那个?今笑うところではありませんでした?うーん、それは失礼」
					DATAFORM 「そうそう、私はですね…」
					DATAFORM 「あ、ちゃんと片付けたっけな、那个」
					DATAFORM 「確かに、那个ほと美味しいものはないと思いますよ」
					DATAFORM 「あ、でもそれ私じゃありませんからね。そっくりな悪魔もいるから、間違えないでくださいよ」
				ENDDATA
				PRINTFORMW
				PRINTFORMW 小悪魔と、何気ない話が続いた
			CASE 2
				PRINTFORMW 「私達、もうお友達みたいなもんですよね。」
				PRINTFORMW 「いや、もっと前からかな…?こういうの、難しいですね」
			CASE 1
				PRINTFORMW %CALLNAME:MASTER%、很在意小恶魔的%K59_HAIR()%、一直这么看着。
				PRINTDATA
					DATAFORM それに気がついた小悪魔は、手梳子をして、%CALLNAME:MASTER%に%K59_HAIR()%を見せつけている
					DATAFORM それに気がついた小悪魔は、自己的赤の%K59_HAIR()%の美しさを再確認している様子だ。
					DATAFORM 没有注意到的小恶魔、一副认真思考的样子。
					DATAFORM 没有注意到的小恶魔、一副心不在焉的样子。
					DATAFORM 注意到的小恶魔、向%CALLNAME:MASTER%回了个微笑。
				ENDDATA
				PRINTFORMW
			CASE 0
				PRINTFORMW 「至今为止读过的书?那就这本吧…」
				PRINTFORMW 小恶魔递给%CALLNAME:MASTER%一本书
				PRINTDATA
					DATAFORM 「"半人半魔的青年大暴走的故事"。这样爽快的动作漫画、偶尔会看看」
					DATAFORM 「写着打扫和做饭的心得。实操、知识。不论哪个都是必要的。%CALLNAME:MASTER%也读一下吧?」
					DATAFORM 「等等、书皮和里面的东西不一样!正确的书跑去哪里了!?」
					DATAFORM 「"世界的神器武器特集"。但是、剑的话（这里的剑在日语里包含了所有种类的刀剑，包括各种神器）、不是普通的武器吗?」
					DATAFORM 「"世界的奴隶调教者全集"。虽然这是一个令人不安的名称、但里面也有…?纯爱、那里是挺喜欢的」
					DATAFORM 「一副『…那是什么?』的表情。这是我写的诗歌集。已经是10年前的东西了、不觉得给你看会不好意思♪」
				ENDDATA
				PRINTFORMW
			CASEELSE
				PRINTFORMW 「大家对%CALLNAME:MASTER%还是相当认可的。」
				PRINTFORMW 「不对、可能只有我…?嘛啊、我对%CALLNAME:MASTER%是有一定认可的，这一点可以确信!」
				PRINTFORMW 小恶魔挺着胸、这样回答道
				PRINTFORMW …她这么挺着胸、就算没有这样的打算视线也会被拉过去
		ENDSELECT
	ELSE
		SELECTCASE RAND:4
			CASE 2
				PRINTFORM 「很喜欢看书吗。
					IF CFLAG:現在位置 == 310
						;出かけるの図書館でも出るようにしたい
						PRINTFORMW 果然，每天都看那么多的书，有时也会很郁闷吧…」
						PRINTFORMW 这么说着、小恶魔開始苦笑起来。
					ELSE
						PRINTFORMW 平时、因为"经常看大量的书"这样的事很多、在别的地方就会開始想休息」
						PRINTFORML 「也不是那种只顾工作的人，不是因为是恶魔」
						PRINTFORMW 小恶魔这么说着、轻轻的伸了个懒腰。
					ENDIF
			CASE 1
				PRINTFORMW 「推荐的书吗?唔嗯、现在妖精女仆流行的是…」
				PRINTFORMW 小恶魔递给%CALLNAME:MASTER%一本书
				PRINTDATA
					DATAFORM 「"恶魔猎人一瞬间打倒恶魔的故事"。希望不会发生在红魔馆」
					DATAFORM 「"恶魔们和、涩…温柔人类的恋爱故事"。稍微、有点憧憬」
					DATAFORM 「"11点的女人"。读了这个的话、也许会增加自信，也可能会失去自信…」
					DATAFORM 「等等、书皮和里面的东西不一样!正确的书跑去哪里了!?」
					DATAFORM 「…诶诶、好像是"电子游戏的攻略书"。因为有很多插图和图片、看了这个的话会变得很開心?」
					DATAFORM 「"妖精也能明白!语法讲座"。只不过、『理解不能理解不能…想知道的不是这个…』这么说的妖精也有」
					;元ネタはあったりなかったり、有名どころだったり個人レベルだったり
				ENDDATA
				PRINTFORMW
			CASE 0
				PRINTFORMW %CALLNAME:MASTER%、很在意小恶魔的%K59_HAIR()%、一直这么看着。
				PRINTDATA
					DATAFORM 注意到的小恶魔、是头发睡乱了吗…?这么想着。
					DATAFORM 注意到的小恶魔、红色%K59_HAIR()%很少见吗?这样说道。
					DATAFORM 没有注意到的小恶魔、一副认真思考的样子。
					DATAFORM 没有注意到的小恶魔、一副心不在焉的样子。
					DATAFORM 注意到的小恶魔、向%CALLNAME:MASTER%回了个微笑。
				ENDDATA
				PRINTFORMW
			CASEELSE
				PRINTFORMW 「好无聊啊。嘛啊，无聊一点儿也好」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;301,泡茶
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_301
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_301
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_301_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_301_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
;茶ってどういう茶をどういう風に出してるんだろうね。よくわかんないからどこでも茶を作れるのが常識という解釈をとるよ
;出だしの台詞は恋慕などの状態に関わらず共通予定なので、成功・失敗判定の後に思慕・恋慕などの分岐入れる予定だけども、
;もしかしたらそんな節約を考えずに、思慕・恋慕分岐の後に成功・失敗判定入れた方がいい気もしてきたよ
IF LOCAL
	IF TFLAG:193 == 1
		PRINTFORML 「嗯っ…!?哦哦っ!好好喝!这个!」
		PRINTFORMW %NICKNAME:59%称赞了%CALLNAME:MASTER%的水平
		PRINTFORMW 「站在某人的从者这个立场上，我也想有这种技术力♪」
	ELSEIF TFLAG:193 == -1
		PRINTFORML 「我開云…呜!?」
		PRINTFORMW 喝下茶的%NICKNAME:59%、在脸色稍微变差以后、这样回答道
			IF TALENT:恋慕
				PRINTFORMW 「…我会再泡一杯茶的、一起喝那个吧」
					IF TALENT:恋人
						PRINTFORML 「…啊。还是说、是想喝这边的茶吗?呼呼っ♡也是可以的哦♪嘛啊、如果、心情允许的话」
						PRINTFORMW 这么说着、%NICKNAME:59%从下面托起自己的胸部、主张着那巨大的存在
					ENDIF
		ELSEIF TALENT:思慕
			PRINTFORMW 「%CALLNAME:MASTER%的手艺这么差劲、会变得没有干劲的…下次请加油一点♪」
		ELSE
			PRINTFORMW 「看来是我比较擅长。嘛啊这也是当然的、毕竟我是…」
		ENDIF
	ELSE
		PRINTFORML 「啊啦、谢谢款待」
		PRINTFORMW %NICKNAME:59%把、%CALLNAME:MASTER%准备的茶一饮而尽
		PRINTFORMW 「哈啊。爽到」
	ENDIF
ENDIF
RETURN 1
;==================================================
;302,身体接觸
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_302
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_302
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_302_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_302_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
;こっちは思慕・恋慕で丸々反応変えたい予定
	IF CFLAG:318 == 1
		;目指そうとしてる形式上、機能しない分岐になるか、矛盾した文章になりそうな予感
		IF TALENT:恋慕
			PRINTFORML 「怎么说呢，虽然完全不明白，但好像是不能原谅的事…这样的」
		ELSE
			PRINTFORML 「怎么说呢?我想我们的关系应该还没到那种程度吧」
		ENDIF
		PRINTFORMW %NICKNAME:59%略带愤怒地回答道

		;稍微丸々変える。でもとりあえず一旦残しておく
		;PRINTFORML 「稍微。やめてくださいよ!私が何か勘違いさせるような事したのかもしれませんけども」
		;PRINTFORMW 「もし、またするようだったら…」
			;戦闘技能で分岐。みたいな感じ。戦闘技能が小悪魔の方が下or你が小悪魔に勝利経験がある
			;PRINTFORMW 「って、力づく。じゃ敵わないんでしたね。まいったね…」
			;戦闘技能で分岐。みたいな感じ。戦闘技能が小悪魔と同格
			;PRINTFORMW 「互いに痛いのは嫌でしょう?という事で、乙女心とかをわかってほしいもんですね。こちらも理解するよう善処しますから」
			;戦闘技能で分岐。みたいな感じ。戦闘技能が小悪魔の方が上の場合。あと小悪魔でも悪魔。というのは、飽くまでもと悪魔をかけた…
			;PRINTFORMW 「ぶっとばしてさしあげましょうか?"小悪魔でも悪魔"。ですからね。」

	;この辺の台詞も、多分丸々変更する
	ELSEIF TFLAG:193 == 1
		PRINTFORMW 「哦呀、怎么了吗?呼呼っ」
	ELSEIF TFLAG:193 == -1
		PRINTFORMW 「嗯ー…对不起。总觉得，没有那种感觉。」
	ELSE
		PRINTFORML 「哦呀?想要和我玩吗?」
		PRINTFORMW 「嘛啊、只有一会会儿的话可以吧」
	ENDIF
ENDIF
RETURN 1
;==================================================
;303,道歉
;TFLAG:193(2=菓子折成功 1=大成功 0=成功 -1=失敗 -2=菓子折失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_303
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_303
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_303_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_303_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;304,幫忙干活
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:350(仕事内容(JOB_仕事内容.ERB参照のこと
;TCVAR:沒法幫忙(=2 手伝っても早くは終わらない、時間停止中不可 永琳の診察等)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_304
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_304
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_304_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_304_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;305,索求膝枕
;TFLAG:193(-5=MASTERがTARGETよりも巨体の場合(TALENT:MASTER:体型 > TALENT:体型 + 2) 1=大成功 0=成功 -1=失敗)(-5以外は地の文分岐無し)
;ABL:親密(6以上=顔をのぞき込みながら頭を撫でてくれる 3以上=ただ頭を撫でてくれる 2以下=縮こまっている)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_305
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_305
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_305_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_305_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;306,撫摸肚子
;TFLAG:193(1=ABL:親密6以上かつ妊娠時 0=成功 -1=ABL:親密5以下)
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_306
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_306_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_306_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;通常
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;307,捏臉蛋
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
	;以下は先に書いた条件が優先される
	;TALENT:恋慕(受け入れつつ笑顔でやり返す
	;ABL:親密(6以上=怯生生地やり返す
	;ABL:従順(5以上=されるがまま
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_307
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_307
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_307_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_307_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:睡眠
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;308,捅臉頰
;陪睡中or睡眠中限定
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_308
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_308
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_308_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_308_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;睡眠中
	IF CFLAG:睡眠
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;309,摸頭
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:親密(6以上=通常成功時分岐
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_309
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗(注、抱住模式中は自動成功)、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_309
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_309_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_309_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;時間停止中
	IF FLAG:70
	;睡眠中
	ELSEIF CFLAG:睡眠
	;通常
	ELSE
	ENDIF

ENDIF
RETURN 1
;==================================================
;331,泡茶（下薬）
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_331
;成否判定
;TFLAG:192(-2=強制失敗(注、非指令終了）、-1＝強制失敗、0=COM依存、1=強制成功or大成功(注、睡眠薬冰淇淋ティーは眠気を感じていると飲まない)
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_331
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_331_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_331_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;もう何もかもわかんないのでわかりそうな記述だけ下書き。絶対ELSEIFとかELSEとかENDIFとか色々間違えてるやつ
	;IF TALENT:恋人
		;PRINTFORMW %NICKNAME:59%は、じっと茶を見つめる
		;PRINTFORMW 「…正直に言ってください。何が入ってますか?」
		;CALL ASK_YN("正直に言う","言えずに黙り込む")
			;IF !RESULT
				;PRINTFORMW %CALLNAME:MASTER%が正直に伝えると、%NICKNAME:59%は平然と茶を飲みほした
					;媚薬の場合の分岐
						;PRINTFORMW 「こんなもの使用必要もないでしょうに、よくわかりませんね」
						;小悪魔は媚薬を無効化する体質にするべきか、しないべきか。そこも悩んでる
					;それ以外
						;PRINTFORMW 「なんでこんな事をするのか理解できませんが、それを求めてるなら、私は%MASTERNAME:59%に従うまでです」
					;インデントの取り方的にこの辺に色々必要だろうけど、保留
			;ELSE
				;PRINTFORML 「…%MASTERNAME:59%を愛する私にだって、全部を納得できるというわけではありません」
				;PRINTFORMW %NICKNAME:59%は、茶を%CALLNAME:MASTER%に返した
				;TFLAG:192 =-1
				;この記述で失敗にできるであってるのかな
			;ENDIF
		;ELSE
		;なんかこの記述であってるのか全然自信が持てないぞー!恋人がそれ以外で反応を決めるから多分合ってると思いたいけど、インデント狂ってそう!
		;PRINTFORMW %NICKNAME:59%は、じっと茶を見つめる
		;PRINTFORMW 「…私は遠慮しておきます。%MASTERNAME:59%、その茶を自己飲める自信がありますか?」
		;PRINTFORMW 「あ、別に実際に飲まなくて結構です。やられて嫌な事を強要したくはありませんからね」
		;TFLAG:192 =-1
		;強制失敗にしたいなら、これでいいのかな…?
	;ENDIF
ENDIF
RETURN 1
;==================================================
;332,勸酒
;TFLAG:193(0=不會喝酒成功 -1=不會喝酒失敗 -2=不會喝酒大失敗 -5=不會喝酒あきらめ)
;TFLAG:194(51=濁酒 52=清酒 53=鬼殺酒)
;ALCOHOL_TASTE(TFLAG:194)(15以上=気に入る 9以下=口に合わない)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_332
;成否判定
;TFLAG:192(-1＝強制失敗、0=COM依存
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_332
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_332_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_332_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;333,聽牢騷
;TFLAG:193(6=大成功(酔い) 5=成功(酔い) 4=失敗(酔い) 3=大成功 2=成功 1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_333
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_333
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_333_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_333_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 6
		;大成功（酔い）
		CASE 5
		;成功（酔い）
		CASE 4
		;失敗（酔い）
		CASE 3
		;大成功
		CASE 2
		;成功
		CASE 1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;334,碰杯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;CFLAG:妊娠自覚状態(1=吃飯)
;TALENT:酒耐性(-2=吃飯)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_334
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_334
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_334_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_334_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;335,照料
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_335
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_335
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_335_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_335_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:193
		CASE 1
		;大成功
		CASE 0
		;成功
		CASE -1
		;失敗
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;336,膝枕
;ABL:親密(4以下=居心地悪げ 9以下=恥ずかしげ それ以上=幸せそう
;TIME_PROGRESS(TFLAG:膝枕した)(44以下=失敗
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_336
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_336
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_336_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_336_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF TFLAG:193 > 0
	;寝ちゃった
	ELSE
	;それ以外
	ENDIF
ENDIF
RETURN 1
;==================================================
;350,推倒（時姦時猥褻
;TFLAG:194 (0=成功 1=人目がある　2=野外は嫌でござりまする　3=多人数プレイは勘弁　4=合意があっても情緒が足りぬ　100=合意はあるが口上内特殊判定によって失敗）
;TCVAR:初次拥抱　1=普通に合意ゲット　2=先に接吻ぐらいしろよ　3=媚薬or発情には勝てなかったよお…　4=悔しい…刻印さえなければﾋﾞｸﾋﾞｸﾝ
;5=強引に迫られると断れぬ(素質膽怯持ち専用) 6=まんざらでもない　7=駄目　8=論外 98=口上内特殊判定による失敗 99=口上内特殊判定による成功
;口上内特殊判定は該当するCFLAGが0だと無効
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_350
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_350_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_350_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;351,帯出去
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_351
;連れ出しにはTRAIN_MESSAGEが無い
CALL M_KOJO_長短髪_MESSAGE_COM_K59_351_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_351_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGET連れ出し
	IF CFLAG:同行 == 60
	;TARGET以外連れ出し(TARGET同行中のみ
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;352,告白
;FLAG:甲斐性無(1=失敗)
;TFLAG:193 (1=成功 0=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_352
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_352
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_352_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_352_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;353,猥褻
;FLAG:甲斐性無(1=失敗)
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_353
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_353_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_353_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;354,陪睡（相手は起きて被窝に招く感じ）
;CFLAG:衰弱(1以上=起きない
;CFLAG:招待(0以外=起きない
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_354
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_354_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_354_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;355,時止め（地の文の改変程度に留めるべき
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_355
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_355_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_355_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;356,邀请去阴暗处
;ABL:露出癖 + TALENT:羞恥心で判定
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_356
;成否判定
;TFLAG:192(-1＝強制失敗、0=COM依存、1=強制成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_356
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_356_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_356_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;360,任憑擺佈
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_360
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_360_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_360_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;361,抵抗
;TCVAR:20(27=谷間を見せる 32=前から抱きつく 35=裙子の中を見せる 53=乳交 73=ぱふぱふ 77=乳を吸わせる 85=Ｖ挿入する 86=だいしゅき大堂ド 87=Ａ挿入する 88=腰振りＶ 89=腰振りＡ
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_361
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_361_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_361_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;363,朗読（[幼稚]持ち専用）
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;CFLAG:陪睡中(1=被窝orベッドの中で本を読む
;MASTERがTARGETより大柄の場合、膝の上にTARGETを乗せる
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_363
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_363
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_363_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_363_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;364,撒豆子(萃香、勇儀、斯喀雷特姉妹用
;TFLAG:193(撒豆子に参加してる人数
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_364
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_364_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_364_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;365,向守矢神社移動(早苗、神奈子、諏訪子用
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_365
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_365_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_365_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;368,陪同行動
;技能系の行動は技能レベルが1以上なら発生
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_368
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_368_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_368_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE Activity_Type:TARGET
		CASE 0
			;▼考え事［なに考えてるの］
			;TFLAG:193,-1=はぐらかされる
			;PRINTFORMW
		CASE 1
			;▼玩遊戲［一緒に玩遊戲］
			;※[幼稚]持ちのみ
			;TFLAG:193,1=大いに盛り上がる,-1=あまり盛り上がらない
			;PRINTFORMW
		CASE 2
			;▼吃飯［一緒に吃飯する］
			;TFLAG:193,-1=MASTERはお腹が空いてなかった
			;PRINTFORMW
		CASE 3
			;▼つまみ食い［一緒につまみ食い］
			;※[妖精]持ちと露米亜、恋、幽幽子、紫苑のみ
			;TFLAG:193,-1=MASTERはお腹が空いてなかった
			;PRINTFORMW
		CASE 4
			;▼掃除［掃除を手伝う］
			;※[掃除係]持ちまたは汚臭耐性-1以下のみ
			;PRINTFORMW
		CASE 5
			;▼運動［一緒に運動する］
			;※[音楽知識]持ちは除く（演奏になる）
			;PRINTFORMW
		CASE 6
			;▼読書［本の感想を聞く］
			;TFLAG:193,-1=集中していて返事してくれない
			;PRINTFORMW
		CASE 7
			;▼料理［料理を手伝う］→［料理を分けてもらう］
			;TFLAG:193,2=料理を手伝う,0=作った料理を食べる,-1==MASTERはお腹が空いてなかった（食べる時）
			;PRINTFORMW
		CASE 8
			;▼演奏［セッションする］or［伴奏する］
			;※[音楽知識]持ちのみ（TALENT:音楽知識で変化）
			;TALENT:音楽知識,1=演奏してる,2=歌ってる,3=踊ってる
			;TFLAG:193,1=ノリノリ,0=成功,-1=失敗,-2=楽器がなくて見てるだけ
			;PRINTFORMW
		CASE 9
			;▼採集［採集を手伝う］
			;PRINTFORMW
		CASE 10
			;▼釣魚［一緒に釣魚］
			;TFLAG:193,-1=釣魚竿がなくて見てるだけ
			;PRINTFORMW
		CASE 11
			;▼実験［実験を手伝う］
			;PRINTFORMW
		CASE 12
			;▼のんびり［一緒にのんびりする］
			;PRINTFORMW
		CASE 13
			;▼晩酌［晩酌に交手］
			;※酒耐性0以上のみ
			;PRINTFORMW
		CASE 14
			;▼買い物［買い物を手伝う］
			;PRINTFORMW
		CASE 15
			;▼説教［様子をうかがう］
			;※神霊・蓬莱人は除く
			;TFLAG:193,-1
			;PRINTFORMW
		CASE 16
			;▼落とし穴［いたずらに交手］or［様子をうかがう］
			;※三月精・琪露諾・克勞恩皮絲のみ
			;それ以外は落ちる側
			;PRINTFORMW
		CASE 17
			;▼雪だるま作り［一緒に雪作り］
			;※冬之月のみ
			;PRINTFORMW
		CASE 18
			;▼炬燵でのんびり［炬燵でくつろぐ］
			;※冬之月のみ
			;PRINTFORMW
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;402,就寝
;TFLAG:193(0=通常 1=兒童と一緒に川の字で寝る)
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_402
;就寝にTRAIN_MESSAGEは無い
CALL M_KOJO_長短髪_MESSAGE_COM_K59_402_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_402_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;403,休憩
;CFLAG:TARGET:睡眠(1=TARGETが寝てる隣で休憩
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_403
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_403_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_403_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;405,外出(同行時约会
;条件が厄介なので、COMF405 外出.ERBを参照のこと
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_405
;外出にTRAIN_MESSAGEは無い
CALL M_KOJO_長短髪_MESSAGE_COM_K59_405_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_405_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	;TARGETと约会
	IF CFLAG:同行
	;TARGET以外と约会
	ELSEIF CFLAG:MASTER:同行
	;お出かけお見送り
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;410,掃除
;FLAG:70(1=時間停止中
;TFLAG:193(0=見てるだけ 1=一緒に掃除)
;TFLAG:194(3=汚れ高 2=汚れ中 1=汚れ低 0=汚れ最小
;OUTROOF(CFLAG:現在位置)(野外掃除（冬は扫雪
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_410
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_410_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_410_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSEIF CFLAG:318 == 1
		PRINTFORMW
	ELSEIF TALENT:恋人
			;------------------------------------------------------------------
			;条件を満たしている場合1/4で表示
			;------------------------------------------------------------------
			IF ABL:精液中毒 >= 5 && !RAND:4
				PRINTFORML 「即使弄得一尘不染，还是会被弄脏…♡」
				PRINTFORMW %NICKNAME:59%把视线投向%CALLNAME:MASTER%、说着带有深意的话语
				;------------------------------------------------------------------
				;RETURN 1するとそこで関数を抜けるので、いちいちELSEIFを繋げなくて済む
				;------------------------------------------------------------------
				RETURN 1
			ENDIF
			;------------------------------------------------------------------
			;上記の分岐に引っかからなかった場合ここで3択
			;------------------------------------------------------------------
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML (哈啊…%MASTERNAME:59%…♡)
					PRINTFORMW %NICKNAME:59%就算把视线投向%CALLNAME:MASTER%、扫除也在顺利进行着
				CASE 0
					PRINTFORML 「就算弄得这么干净，也不及我的后脚跟。美丽真是一种罪。」
					PRINTFORMW 「…哦呀、说出这种话、被惩罚罪人的人听到了可不好!」
				CASEELSE
					PRINTFORML 「打扫、真是一件麻烦的事情啊ー」
					PRINTFORMW 「虽然、变干净的时候、心情也会变好就是了」
			ENDSELECT
	ELSEIF TALENT:恋慕
			SELECTCASE RAND:3
				CASE 1
					PRINTFORML (%MASTERNAME:59%…)
					PRINTFORMW %NICKNAME:59%就算把视线投向%CALLNAME:MASTER%、扫除也在顺利进行着
				CASE 0
					PRINTFORML 「就算弄得这么干净，也不及我的后脚跟。美丽真是一种罪。」
					PRINTFORMW 「…哦呀、说出这种话、被惩罚罪人的人听到了可不好!」
				CASEELSE
					PRINTFORML 「打扫、真是一件麻烦的事情啊ー」
					PRINTFORMW 「虽然、变干净的时候、心情也会变好就是了」
			ENDSELECT
	ELSEIF TALENT:思慕
		SELECTCASE RAND:3
			CASE 1
				PRINTFORML 「很好!肯定都打扫干净了!快点、%MASTERNAME:59%也认真地确认一下吧?」
				PRINTFORMW 小恶魔在认真检查着打扫过的地方
			CASE 0
				PRINTFORML 「唔ー嗯、就算再怎么打扫、也不会变得比我还漂亮的。真是让人困扰♪」
				PRINTFORMW 小恶魔看着和%CALLNAME:MASTER%一起打扫过的地方、嘟囔着
			CASEELSE
				PRINTFORMW 「因为我也会指导下级，很擅长合作打扫」
				PRINTFORMW 「下级是指?啊?比如妖精女仆…其他的、比我更下位的恶魔?」
		ENDSELECT
	ELSEIF TFLAG:193 == 1
		SELECTCASE RAND:3
			CASE 1
				PRINTFORMW 「是在打扫吗。我也来帮忙吧」
				PRINTFORML (哈ー。我也想能有更高的扫除技术力)
				PRINTFORMW 小恶魔看着%CALLNAME:MASTER%、这么想着
			CASE 0
				PRINTFORMW 「干净的地方真是让人舒心。我很能理解」
			CASEELSE
				PRINTFORML 「诶诶…在这个时间…打扫这个地方。」
				PRINTFORMW 小恶魔把打扫过的地方记在了笔记上
				;他拠点だと不自然な気もするけど、どういう掃除をしたか、それをどう活かすかのメモみたいな感じ?
		ENDSELECT
	ELSE
		PRINTFORMW 「是在打扫吗。毕竟干净的地方会让人静下心来」
		SIF CFLAG:MASTER:現在位置 >= 301 && CFLAG:MASTER:現在位置 <= 333
			PRINTFORMW 「唔嗯唔嗯、很努力啊、也要让大家加吧劲啊」
	ENDIF
ENDIF
RETURN 1
;==================================================
;411,戦闘訓練
;TFLAG:194(3=夏の昼間 2=ヤバい天気 1=悪天候 0=屋内or通常天気
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_411
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_411_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_411_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 1
;-------------------------------------------------
IF LOCAL
;初回反応とか作れた気がするけどどうやるのか忘れた…
;PRINTFORMW 「戦闘訓練、というと、弾幕勝負は当然として、もっと直接的な対決とか、そういうのもですかね?」
;PRINTFORMW 「まあ、私の力にもなることですし、付き合いますよ」
	IF TALENT:恋慕
		SELECTCASE RAND:3
			CASE 1
				PRINTFORMW
			CASE 0
				PRINTFORMW
			CASEELSE
				PRINTFORML
				PRINTFORMW
		ENDSELECT
	ELSE
		SELECTCASE RAND:3
			CASE 1
				IF ABL:戦闘能力 < ABL:MASTER:戦闘能力
					PRINTFORML 「はぁ…はぁ…やっぱり強いなぁ。稍微加減してくれません?」
					PRINTFORMW 小悪魔は、疲弊した様子で、そう答える
				ELSEIF ABL:戦闘能力 > ABL:MASTER:戦闘能力
					PRINTFORMW 「ほらほら、これをどうにかできないとダメですよ!」
					PRINTFORMW 「…戦闘を教える立場って、稍微楽しいですね」
				ELSE
					PRINTFORMW 「はっ、よっ、っと」
					PRINTFORMW 「対等に攻撃をうちあってるような感覚、最高です」
				ENDIF
			CASE 0
				PRINTFORMW 「正直戦えなくてもいいんじゃないかな。とも思いますけど、鍛えておくには越したことはないですかね?」
				PRINTFORMW 小悪魔は『門番さんの真似です』と、あまり型のしっかりしてない武術を見せ的同时、そう語る
			CASEELSE
				PRINTFORML 「符卡宣言!」
				PRINTFORMW 「…名称?まだ未定です。宣言した事さえ明確なら、ルールに反しないはずですもの」
				;そうだった…ような気がする
				PRINTFORMW 「でも、そのうち決めないといけませんよねー」
		ENDSELECT
	ENDIF
ENDIF
RETURN 1
;==================================================
;412,学习
;ABL:教養(ABL:MASTER:教養より大=MASTERが教えてもらう ABL:MASTER:教養より小=TARGETが教えてもらう
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_412
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_412_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_412_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;413,料理
;TFLAG:194(100以上=禁断のメニュー 3=甜点 2=主食 1=軽食
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_413
;TFLAG:194が100以上の場合のみ
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_413_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_413_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
ENDIF
RETURN 1
;==================================================
;414,吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:194(1=没穿内裤涮涮锅 2=禁断のメニュー 31=興奮劑高湯 30=奶酪番茄沙拉 34=银吉獣料理
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_414
;成否判定
;TFLAG:192(-2=指令終了(非TARGET時強制失敗)、-1＝強制失敗、0=COM依存(非TARGET時強制成功)、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_414
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_414_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_414_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;415,招待吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TCVAR:MASTER:308(bit0=浓郁 bit1=薄味 bit3=超辣 bit4=超甜 bit5=芥末 bit6=激酸っぱ
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_415
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_415
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_415_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_415_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;416,演奏
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;TFLAG:使用楽器(1=電子琴 2=鋼琴 3=吉他 4=小號 5=小提琴)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_416
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_416
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_416_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_416_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;417,午睡をする
;TFLAG:193(0=MASTERを抱き枕にして寝ている 1=MASTERの膝を枕にして寝ている 2=寝顔に接吻された 3=寝顔をのぞき込まれた 4=MASTERが膝枕されてる 5=秘処or阴茎揉み
;CFLAG:陪睡中(1=一緒に寝ている
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_417
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_417_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_417_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;421,祈願する
;条件が複雑なので、COMF421 祈願.ERBおよび、EVENT_MESSAGE_COM400.ERBの祈願するの項を参照のこと
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_421
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_421_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_421_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;422～430は、特殊指令なので貂プレでは対応しません
;==================================================

;==================================================
;431,在浴室里放鬆
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;TFLAG:194(1=連続入浴不可(表示しない可能性あり？
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_431
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_431_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_431_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;432,在浴室里放鬆
;表示タイミングは入浴後なので、お風呂上がりでの
;TFLAG:209(4=人里の銭湯で番台ちゃんを怒らせている 1=銭湯に入った
;TFLAG:211(4=地底の温泉で番台妖怪を怒らせている 1=温泉に入った
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_432
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_432_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_432_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;436,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_436
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_436_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_436_1
;==================================================
;440,等待
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_440
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_440_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_440_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;441,聽課(慧音専用
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_441
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_441_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_441_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;442,伐採（未実装
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_442
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_442_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_442_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;445,採集
;TFLAG:193(採集物のID, 0=『何も見つからなかった…』
;TFLAG:194(今回採集した個数
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_445
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_445_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_445_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;448,设下罠／昆虫诱捕装置
;TFLAG:193,
;   -1=罠が损壊の
;    0=罠を仕掛けた
;    1=獲物が得られた
;   10=昆虫诱捕装置を仕掛けた
;   11=昆虫诱捕装置を破棄した
;   12=ムシを捕まえた
;FLAG:194,獲物の番号
;ムシの名前は MUSHI_NAME で表示したり判別したりできます
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_448
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_448_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_448_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;449,捕虫
;TFLAG:193,
;   -2=殺してでもうばいとる（取っ組み合いの末逃がす）
;   -1=ゆずってくれ！→拒否
;    0=捕獲失敗
;    1=MASTERが捕まえた
;    2=角色が捕まえたのをMASTERが褒めた
;    3=ゆずってくれ！→渋々オッケー
;    4=ゆずってくれ！→オールオッケー
;TRAINMESSAGEを省略する場合は虫カゴに入れる処理を忘れないように
;ムシの名前は MUSHI_NAME で表示したり判別したりできます
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_449
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_449_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_449_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;483,斗虫
;TFLAG:193,
;    1=１対１の対戦
;    2=３～４人戦
;    3=２対２のチーム戦
;TFLAG:194にMASTERの順位が入っています（MASTERが1なら角色負け）
;バトル中の口上はイベント口上ファイルに入っています
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_483
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_483_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_483_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;484,打西瓜
;TFLAG:193,
;   -1=失敗
;    0=成功
;    1=大成功
;    2=木刀で大成功（BOUNS点）
;TFLAG:194
;    0=正直者
;    1=ウソつき
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_484
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_484_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_484_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;490,道具
;TFLAG:193(使用道具のID
;TFLAG:194(対象 0=MASTER,1=TARGET
;==================================================
@M_KOJO_XXX_MESSAGE_COM_KX_490
;道具にTRAIN_MESSAGEはない
CALL M_KOJO_XXX_MESSAGE_COM_KX_490_1
RETURN RESULT

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

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;约会系指令
;约会系口上は文字街道外出先で発生
;※※※※※※※※※※※※※※※※※※※※※※※※※
[SKIPSTART]
;現状未実装
;==================================================
;600,约会会話
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_600
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_600_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_600_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;601,约会身体接觸
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_601
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_601_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_601_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;602,约会接吻
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_602
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_602_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_602_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
[SKIPEND]
;==================================================
;603,牽手
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗でもふりほどかれたりはしません
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_603
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_603
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_603_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_603_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;604,散步
;约会中の場合、CFLAG:現在位置に移動先の場所が既に入ってる
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_604
;散步にはTRAIN_MESSAGEが無い
CALL M_KOJO_長短髪_MESSAGE_COM_K59_604_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_604_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;605,繞道
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文無し
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_605
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_605
;繞道にはTRAIN_MESSAGEが無い
CALL M_KOJO_長短髪_MESSAGE_COM_K59_605_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_605_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;610,請吃飯
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_610
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_610
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_610_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_610_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;==================================================
;613,賺錢（オミットされました
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_613
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_613
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_613_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_613_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;614,採購食材
;TFLAG:193(1=購入＆約會経験UP 0=購入 -1=非購入)
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_614
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_614_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_614_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;615,吃便當
;実行可能場所　地蔵小路,倒垂的柳樹下,霧之湖,玄武之澤,大蛤蟆之池,絶景之丘,山之湖,天界
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;ABL:料理技能(2未満=微妙な出来 4未満=そこそこ美味しい 4以上=絶品)
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_615
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_615_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_615_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;617,甘味処に誘う
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐は大成功のみ追加
;==================================================
@M_KOJO_長短髪_SUCCESS_COM_K59_617
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_COM_K59_617
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_617_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_617_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;618,花屋（口上は表示されない模様？
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_618
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_618_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_618_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;620,鈴奈庵
;TFLAG:193(1=貸し出しOK 0=貸し出し不可
;ITEM:10X (X=1戦術指南書 X=2調理指南書 X=3字典 X=4御伽草子
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_620
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_620_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_620_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;621,釣魚
;TFLAG:193(0=釣れない 1～4=魚 11～15=好吃的魚 610=木材 131=守矢之守札 21=跳蛋 609=氷之鱗 606=龍之爪)
;TFLAG:194(1000以上ならTARGETが釣った)
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_621
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_621_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_621_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;626,土産屋
;TFLAG:194(行動結果(-2=ひやかし -1=ウィンドウショッピング 1=400点未満（BAD） 2=～699点（NOMAL） 3=700点以上（GOOD）
;CFLAG:性格傾向による地の文分岐あり
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_626
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_626_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_626_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	SELECTCASE TFLAG:194
		;ひやかし
		CASE -2
			PRINTFORMW 「已…已经过了这么长的时间了吗…?完全没有注意到…」
		;果然還是放棄（見送り）
		CASE -1
			PRINTFORMW 「虽然很在意这家店、但并没有想要的东西哦」
		;できるかわからないけども、"天使の～"を渡した時のみの会話。(TCVAR:59:今天的礼物, "形容詞")こんな感じなのを使用のかな?よくわからない
			;作者さんはわからないらしいので勝手にやってみました
		;400点未満（BAD）
		CASE 1
			PRINTFORMW (这个…是%MASTERNAME:59%的审美问题吗、还是是我的审美问题…)
			PRINTFORMW 「那个…"心情"是、很好的收到了。唔嗯、很…開心…哦?」
		;400点～699点（NOMAL）
		CASE 2
			PRINTFORMW 「买到好东西了吗?那真是太好了」
			PRINTFORMW 「诶、是、给我的吗?呼呼っ、那就谢谢啦」
		;700点以上（GOOD）
		CASE 3
			PRINTFORMW 「哦ー、真是漂亮。我也好想要」
			PRINTFORMW 「诶…给我的?真的吗?」
		;この小悪魔は、天使系は大好き。にする予定
			IF GET_GIFTDATA(TCVAR:59:今天的礼物, "形容詞") == 1220
				PRINTFORMW 「って、これ、天使の…じゃないですか」
				PRINTFORMW %NICKNAME:59%一直看着、从%CALLNAME:MASTER%那里拿到了礼物
				PRINTFORMW 「%MASTERNAME:59%…」
				IF TALENT:恋慕
					;あいつ天使の話になると早口になるの。毎回流れるのも那个だから、初回だけ分岐とかも用意した方がいいかな
					PRINTFORMW 「嗯嗯!天使的东西、我很喜欢♪」
					PRINTFORM 「虽说是天使，但有时甚至让人觉得是恶魔的令人毛骨悚然
					PRINTFORM 我也不讨厌那种，但果然还是喜欢可爱系的
					PRINTFORM 我还是觉得贴切天使这个词的人会是很棒的那种人
					PRINTFORM 还有说到天使的话就是会联想到堕天使
					PRINTFORM 某种意义上和恶魔很接近
					PRINTFORM 不，也许离恶魔很遥远也说不定
					PRINTFORM 恶魔也有像天使一样的存在，知道吗?
					PRINTFORM 是%MASTERNAME:59%その街道です私こと%NICKNAME:59%の事です
					PRINTFORM 拥有跟天使一样的美丽的我，也就是说，我既是魔鬼，也是天使」
					PRINTFORMW
					PRINTFORML 感受到土产店店员的视线、%NICKNAME:59%恢复了理智
					PRINTFORMW 那个店员的视线，虽然看起来是在微笑，但说不定是在看碍事的人的视线
					PRINTFORML
					PRINTFORMW 「好…好像有点羞耻…%MASTERNAME:59%、对不起」
				ELSE
					PRINTFORML
					PRINTFORMW 「给恶魔、送天使的东西、不觉得有点大胆吗…?」
					PRINTFORML
					PRINTFORMW 「并不是很讨厌哦、这种的。呼呼っ」
					PRINTFORMW 小恶魔虽然露出强势的笑容，但其实也很開心。
				ENDIF
			ELSEIF TALENT:恋慕
				PRINTFORML
				PRINTFORMW 「我真的是、太開心了♪我会好好保管起来的♪」
				PRINTFORML 「该拿这个怎么办呢…还是应该这样子吗…回去了得好好想一想」
				PRINTFORMW %NICKNAME:59%看上去很開心的样子
				PRINTFORML
				PRINTFORMW (如果我也有、送%MASTERNAME:59%的礼物就好了)
			ELSE
				PRINTFORMW 「那个…我很…開心…」
				PRINTFORML
				PRINTFORML
				PRINTFORMW 「怎么说呢、那个、拿到这个太開心了、不知道该说些什么」
			ENDIF
	ENDSELECT
ENDIF
RETURN 1
;==================================================
;660,読書
;TFLAG:193(選択肢文学(1=忍殺(文学？) 2=失敗 3=文学),選択肢実用書(4=失敗 5=実用書),選択肢エッチな本(6=单薄的高い本 7=保健体育 8=カーマスートラ))
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_660
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_660_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_660_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;698,進入房間
;TARGET的房間に入る場合のみ表示
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_698
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_698_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_698_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;699,外出
;==================================================
@M_KOJO_長短髪_MESSAGE_COM_K59_699
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_COM_K59_699_1
RETURN RESULT

@M_KOJO_長短髪_MESSAGE_COM_K59_699_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

;※※※※※※※※※※※※※※※※※※※※※※※※※
;派生指令
;※※※※※※※※※※※※※※※※※※※※※※※※※
;==================================================
;60,掏耳朵
;前ターン膝枕後身体接觸指令
;TFLAG:193(1=大成功 0=成功 -1=失敗)(失敗するのはTARGET
;==================================================
@M_KOJO_長短髪_SUCCESS_SCOM_K59_60
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_SCOM_K59_60
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_SCOM_K59_60_1
RETURN RESULT
@M_KOJO_長短髪_MESSAGE_SCOM_K59_60_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;61,抱枕
;(TARGET睡眠時間or衰弱)陪睡中、前ターン抱きつく後就寝指令
;分岐無し
;==================================================
@M_KOJO_長短髪_MESSAGE_SCOM_K59_61
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_SCOM_K59_61_1
RETURN RESULT
@M_KOJO_長短髪_MESSAGE_SCOM_K59_61_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;62,亲額頭
;前ターン頭撫で後接吻
;TFLAG:193(1=大成功 0=成功 -1=失敗)(地の文分岐無し
;ABL:欲望(5以上=物足りない
;ABL:親密(5以上=照れる
;==================================================
@M_KOJO_長短髪_SUCCESS_SCOM_K59_62
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_SCOM_K59_62
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_SCOM_K59_62_1
RETURN RESULT
@M_KOJO_長短髪_MESSAGE_SCOM_K59_62_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1
;==================================================
;63,更多的接吻
;前ターン接吻後接吻
;分岐条件はEVENT_MESSAGE_COM500.ERB参照
;==================================================
@M_KOJO_長短髪_SUCCESS_SCOM_K59_63
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_SCOM_K59_63
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_SCOM_K59_63_1
RETURN RESULT
@M_KOJO_長短髪_MESSAGE_SCOM_K59_63_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL
	IF FLAG:70
	ELSE
	ENDIF
ENDIF
RETURN 1
;==================================================
;80,拉手
;约会出発後目的地に着くまでの間
;TFLAG:193(1=大成功 0=成功 -1=失敗)
;==================================================
@M_KOJO_長短髪_SUCCESS_SCOM_K59_80
;成否判定
;TFLAG:192(-2=指令終了、-1＝強制失敗、0=COM依存、1=強制成功or大成功
TFLAG:192 =0

@M_KOJO_長短髪_MESSAGE_SCOM_K59_80
CALL TRAIN_MESSAGE
CALL M_KOJO_長短髪_MESSAGE_SCOM_K59_80_1
RETURN RESULT
@M_KOJO_長短髪_MESSAGE_SCOM_K59_80_1
;-------------------------------------------------
;記入チェック（=0, 非表示、1, 表示）
LOCAL = 0
;-------------------------------------------------
IF LOCAL

ENDIF
RETURN 1

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/M_KOJO_K59_1_日常系コマンド.ERB


code:
;CFLAG:1001に応じてヘアス磚瓦を返す関数
@K59_HAIR(ARG)
#FUNCTIONS
SELECTCASE CFLAG:[[小悪魔]]:1001
	CASE 0
		RETURNF "長髪"
		;RETURNF "ロングヘア"
	CASE 1
		RETURNF "短髪"
		;RETURNF "ショートヘア"
	CASE 2
		RETURNF "長髪"
		;RETURNF "ミディアムヘア"
	;コメントアウトしておくけどやろうと思えばいくらでも分岐作れます
	;CASE 3
	;	RETURNF "シニョン"
	;CASE 4
	;	RETURNF "ちょんまげ"
	;CASE 5
	;	RETURNF "トンスラ"
ENDSELECT

@CHARA_INFO_KOJO_K59()
;長短髪口上じゃないと表示されないようにしておく
IF CFLAG:[[小悪魔]]:口上セレクタ != 1
	FOR LOCAL,10,20
		SIF CSVCSTR([[小悪魔]], LOCAL) != ""
			PRINTFORML %CSVCSTR([[小悪魔]], LOCAL,)%
	NEXT
	RETURN
ENDIF
PRINTFORML 管理红魔馆的图书馆的恶魔。
PRINTFORML 红色的%K59_HAIR()%是其特征。

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/M_KOJO_K59_1_独自関数.ERB


code:
小悪魔長髪短髪切り替え口上
かいたひと:ルアン
口上製作日:2021/7/1ごろ
--------------------------------------------------
Q:どんな口上なの?
A:
・名無しである事をいいことに、名前を付ける(話的には名前を教えてもらう)機能搭載
・好きなように呼んでもらう機能搭載(他の口上でもよくあるね)
・長髪か短髪か選べる(文章が分岐するわけではなく、長髪って単語が入るか短髪って単語が入るかのショボイ分岐の予定です)
こんな感じにできたらいいな。と思ってるだけの人が、書くかもしれない口上です

Q:胸部の大きさ可変は搭載予定?
A:すまねぇ…胸部に貴賤無という信念自体はあるものの、大きい派なんだ…ってことでありません

Q:えろいのはどういうのある予定?
A:胸部と、你側が受け身よりのイチャラブと、胸部と…それと胸部。あとウフフ指令は恋慕前提。それ未満などは書かないかも
　ハードなのとかAとかはないです

Q:なんか中途半端な記述のが混じってるんですけど?
A:本来未完成部分は上げる時にコメントアウト、削除しておくべきなのだろうけど、自己記述する際の混乱、めんどくさがりなのでそのままの場合があります。すまない

Q:逆に完成してるのにコメントアウトしてる部分も結構あるよね。なんで?
A:大体は「調べても記述の仕方が分からないor調べればわかりそうだが、後回しにしている」って感じです
--------------------------------------------------
・角色付け＆予定

「それが…自己もよくわかんないんすよ」
Kこあ口上が好きなので、インス派アしよう!と思ってたはずなんだけども、多分似ても似つかない
エロ部分に関しては、"淫魔設定ではない"が、"あくまはえっちだよ!"というイメージ。の予定
ただし、"誰にでも体を許すわけではない。というか結構堅い(もしかしたら素質的にはちょろい感じになるかもしれないけど、恋人じゃないと推倒てこないようにする)の予定"
口上側での素質変更は大きくする予定だが、周回の恋慕・恋人特典を考えると、変更しない選択肢も入れる
また、素質変更の選択肢とは別に、処女かどうかの選択肢を入れる?「処女非処女は、口上が想定しているものに変えちゃっていい」って気もするので、悩みどころ

"あくまはえっちだよ!"ってのは、えっちな事はした事ないけど、いきなりうまくできるようなイメージ。つまり実際にえっちな事はした事ないけど技術は高い(でも、経験0でレベルだけ高いとか面倒なだけだと思うので、レベルに準じた経験はさせておきたい)
胸部はびんかんにします
胸部はびんかんにします

陥落前は「名前は知ってるかもしれないが、呼ばない」
思慕で「名前を呼んでくれる(様付けかさん付けか呼び捨てかどれがいいか…)」
×恋慕で「好きなように呼んでもらえる」あと「本名も教えてもらえる」そして数日後「髪の長さを変えて、どっちが似合うか聞いて来る」
×本当は、恋人として選んでくれた特典にしたいけども、なんかそれ、プレイする側が大変なだけかな…と思うので恋慕でいいや
本名は恋人特典にする
あと、多分恋慕での台詞全般、「恋人前提じゃないこれ?」みたいな感じになると思う

"帕秋莉の使い魔とは明言しない"という地味な方針がある。"我が主"みたいにぼかした言い方をする。蕾米莉亜が主かもしれない
ただし深い意味合いはない
この小悪魔以外の小悪魔も、存在してる感じを想定している。これも深い意味合いはないが
"帕秋莉が図書館にいるため、実際は違うが、形式上としては図書館のトップ"という感じを想定している。
やけに、"非公式名称・ヴワル魔法図書館"を推してくるのは、その立場の関係。今(2021/07/16)思いついた

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/りどみ.txt


code:
;  小悪魔長短髪口上
;  作者：＜ルアン＞（“XXスレ目>>123” 等でもOKなので、何か他人と被らないものを）
;  ＜改変した場合はここに改変者の名前・連絡先を追加する＞
;
;  ＜この口上について語ったりするスペース＞
;  りどみの方を見てね!
;
;  ライセンス：
;  作者は以下で○をつけた行為について、誰でも無断で行えるものとし、違反しない限り許可を撤回しないものとします。
;    ○：常に許可　△：要相談、上記の作者と改変者全員に連絡が取れない場合は不許可　×：不許可、相談を受けても許可しない
;
;  +----+-----------------------------------+
;  | 口上の再配布                           |
;  +----+-----------------------------------+
;  | ○ | 単体での再UPロード            |
;  | ○ | 本体への同梱・口上まとめへの収録  |○にしてるけどまだ基本すら完成してないからね…
;  +----+-----------------------------------+
;  | 再配布を許可する場合の改変             |
;  +----+-----------------------------------+
;  | ○ | 口上の加筆                        |いいけども
;  | ○ | 口上の改変・其他改変            |簡単にどんな風に変えたか教えてね!誤字じゃないかもしれないし!
;  +----+-----------------------------------+
;  | 其他                                 |
;  +----+-----------------------------------+
;  | ○ | 他の口上での利用                  |これを参考にしたとか言われたら喜ぶかもしれんよ
;  | ○ | 他のeraバリアントでの利用         |でも明言の有無は那个ど、この口上も数々の口上を参考にしてるので、これのおかげとは限らんがね
;  | ○ | era以外への流用                   |アタリマエだけど、TBOはわきまえるのよ!
;  | ○ | 翻訳・他言語版バリアントへの流用  |
;  | △ | 商用利用・金銭のやり取りを伴う利用|イ舞チよくわかんないけど多分だめだとおもう。要相談ってやつ
;  | ○ | 二次創作                          |
;  +----+-----------------------------------+
;  ・以下の行為に関しては上記と関係なく、無断で行えるものとします。
;    １：バグ・誤字脱字の修正・本体VerUpへの対応のための改変
;  ・以下の行為に関しては上記と関係なく、作者であっても禁止とします。
;    １：以下の例外を除き、この口上からライセンス文・添付文章（ファイル名を除く）の内容を変更・削除すること
;        ・次期バージョンから、ライセンスの○・△を×に変更すること
;        ・次期バージョンから、上記の作者と改変者全員の許可が那个ば、それ以外の変更も
;    ２：この口上が二次創作等の場合に、原作者が禁止を宣言している行為
;  ・改変者は自分の名前を削除することができ、それによりこの口上に関する一切の権利を放棄し、放棄できない権利について行使しないことを宣言したものとします。
;  ・この口上を使用したことによる損害等について、バリアント・口上の作者、改変者は一切の責任を負いません。

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/ライセンステンプレ.txt


code:
--------------------------------------------------
・実装したい事

［髪］を保存する機能(大体実装してくれました)
既に281スレ目でアドバイス、実際の例を貰っているのに、未だにイ舞チピンと来てない
1日の終わりに数値が＋1されて、髪が伸びる。という実例も書いてくれたが
これは恋慕時の「どっちも素敵だ」を選んだ時に、使える機能な可能性がある?
大まかに0～50:短髪。51～100:長髪。101以上になったら0に返回(髪を切る)とする?
「髪の長さにももう少し段階があるだろう」とか、有志の方がもしもリソースを用意してくれた際、3種類以上の長さがあった場合、もう少し区分を分ける?
ここで重要なのが、"髪を撫でる、などの指令の場合は細かい描写をするかもしれない"という可能性はあるが
俺の中での想定は、"文章中の［髪］が［長髪］になるか［短髪］になるか程度の、超地味な仕様"の想定

二度目の髪の長さの変更について
恋慕になった後、二回目の遭遇ぐらいで髪の長さが逆転のイベントが起こる
いわゆるイメチェンという事。ただ、勝手に入れ替わってしまう。のではなく、次のイベントの布石
「その…(髪の長さを変えてみたの)どうですか?」って小悪魔が聞いて、それに答えるというもの
ここで「普段のがいい」「今のがいい」「両方素敵だ」と選ぶことになる
ここで「両方素敵だ」を選ぶと、毎日随机か、一定の周期で髪が変わる。というのを想定(随机はおかしい?悪魔なんだから気合で髪を伸ばしたりできるだろう多分)
あとの問題で、「この後完全固定なのか」と、「長さに長・短二種を超えるバリエーションがある場合」だが
前者は、何かしらで変更可能にしようと思う。ただそれがUP约会か、祈願か、摸頭を二連続でやるとか中奖了かは、未定
後者は、「超えると言っても、"長い"か"短い"で区分できるなら、なんとかなるだろう」と思ってる
「短くしてみたんですが…どうですか?」に対し、長髪に種類がある場合
「普段のがいい(現状維持)」「普段のより稍微短い方がいい(普段がめっちゃ長髪の場合)」「普段のよりもっと長い方がいい(普段が普通の長髪の場合)」「今のがいい(髪型が逆転の)」「両方素敵だ(変化するようになる)」
逆の場合は、短髪から、どっちの長髪を選ぶのか…という問題があるが…まあ、多分なんとかなるだろう
なお、あくまでも、髪の長さの話しかしてないので、"長さのバリエーション"には対応したい予定だけども、長さ以外や、細かすぎる長さは対応できません
例えばの話ですが、もしポニテ小悪魔が書かれたとして「オレ、結構あの髪型(ポニーテール)好きだったりして」とかあっても、対応しません
欲しかったら、君も口上を作ってみよう!
…ポニテ、もしもあったら悪くないなと思いましたけども、対応しません!したいけどもしません!

他に恋人がいるとお堅くなる(実装の手間や、プレイする側の面倒くささ次第ではやらないかも)
この小悪魔は、体はえろえろだけども、内面は愛、もしくは"契約のようなもの"を重視する感じ
"自分だけが愛されてればいい…とは言わないが、自分が一番愛されてる(TW的に言えば恋人)なら、自分の全てを獻出"とかそんな感じ(ただし、忠誠を誓うとかではない。対等)
なので、自分が一番愛されてる事が確定すると、性的なガードが完全になくなる
しかし、他に恋人がいる＝自分は一番ではない。となると、恋人との関係を邪魔不会うに、ウフフに応じづらくなる(メチャクチャ仲良くなれば不可能ではない)
って感じにしたい
これは、内心自信がないK小悪魔松鼠ペクト…というのもあるかもだけど
そういうわけではなく、俺自己的"(一周につき)一人しか愛さない"というプレイス磚瓦を押し付けようとしてるのかもしれない。自己もよくわからないけども
ただ、仮に実装してもあくまで"お堅くなる"止まりにはなるようにはします。プレイス磚瓦次第で厳しくなるようにはするけど、絶対無理なようにはしない。予定
「恋慕じゃない場合、欲求不満が溜まらない」という記述を教えてもらったが、「恋慕でも欲求不満に制限があり、恋人じゃないと100％にならない」
みたいにしたい。稍微プレイヤー側からすると面倒なだけかもしれないが、

--------------------------------------------------
・メモ(実装したい事。と意味が違うのかは不明)

変えたい・こうしたい素質
なお、恋慕・恋人特典で初期素質を変更した場合なども想定して、素質を変えない選択肢も入れる

生活的な素質
教養:3(司書なら結構あってもいいかも)
掃除:1～2(掃除係ついてるし)
料理:1(個人的に雑用はなんでもできるイメージ。って事で料理も。本当はもっと上げたいけど盛りすぎの予感)
それに合わせた経験も足す

性的なステータス
個人的な前提として、性的経験は0という事にしたい。選択可能にはするけど、処女前提となる
しかし的同时、ここで問題が起きる、"性的経験は0だけど、性技のレベルは高くしたい"というもの
極端な事言うと、「胸技術5のベテランクラスなのに、経験がないから全然レベルが上がらない」という事になってしまう
そこは仕方ないという事で、レベルに合わせた経験を付けるべきか、「初期能力が高いけど、成長率の悪いジェ○ガン型です」と言うべきか
それとも、何かしらのイベントをつけて、初期経験が0な分、経験が増えるようにするか…?

口上側で処女に設定した場合のみ
V経験;0

処女とか関係なく変化する部分:経験＆技能
絶頂・自慰・レズ・異常経験:0
百合属性・精液中毒:0
胸:3
胸・A以外:2
※性技術に関しては、"初期はA以外1だが、なんかを条件(恋慕や恋人など、"你"への想いが強まる時が妥当か)に、なんか経験がたまる。"みたいな感じも検討

処女とか関係なく変化する部分:感度
B:1
Vは保留。感覚1でも処女が可能ならあえてそうしたい

親密とかのステータス
欲望:0
技巧:2
奉仕精神(未定。"你"への。って意味だと思うし、変えなくていいかな)

素質　盛りすぎな気がする。あと、"性的な事は気を許さないとダメ"だが、"そうでなければ、割と気安い方"というのを表現できるかどうか…
　　　要は、「えっちな事には応じないけど、反発は溜まりづらく、恋慕は簡単」みたいな風にしたい

傲慢:0(これ、司書想定の場合の小悪魔には合わない気がする。まあ、この小悪魔、真面目なようで傲慢っぽいけど…)
自制心:1
保守的:-1
開朗:1(盛りすぎな気がするので、検討の余地あり)
贞操重视:1
献身的:1(もっと後につけてもいいかも)
否定快感:1
B敏感:1

素質:思慕
平たく言うと、いくつかの否定的な素質がなくなる
ただ、思慕になるまで能力が上がってる＝元々不自由が減る?って事で、ここでは変えなくてもいいのかもしれん
追伸:陥落状況で指令の成功・失敗を制御できると思うと、やっぱほぼ変化なくてもいいかも
なお、陥落系素質に共通して、「その角色を知る」という事で、説明が増えたらいいんじゃないかな。とは思ってる

素質:恋慕
平たく言うと、否定的な素質が裏返る
この辺で、他の部位も敏感になるようにしたい(Aは個人的な性癖の範囲外なため、どうするか…)
追伸:部位の敏感は、それ関連の指令を実行してるうちに。という方向性でもいいかな?

素質:恋人
母乳体質:2(永続的って2だよね?)
爆乳:2(えっちな想いが胸部に母乳として貯まるんです)
容易高潮や迷信?普通は1人しか選べないって事で、やりすぎなぐらいにプラス素質を盛りたい
"你"側も告白・告白に答えるほど、そこまで惚れ込んでる。という事で、魅力魅惑系がついてもいいかな?

素質;条件未定
調合知識:1(サポートはなんでも得意みたいな。しかし的同时、これまた盛りすぎな気もするので、検討の余地あり)

贈り物の好物
"天使の"(レベルは未定。この小悪魔はファンタジー系の中二病のケがわずかにあり、そういう人が悪魔を好みやすいように、この小悪魔はそういう理由で天使を好む
　　　　 ただし、それ以外にも、一般的な天使の場合、基本的に可愛いから。という安直な理由もある)

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/予定とかわからない事とか 箇条書き版.txt


code:
・口上にあった素質を適応する
課題:どのタイミングで入れるか。恋慕・恋人による素質変更を想定すると、口上にあった素質に変更する事は任意とするべきか
1:UP约会処理の時に質問という形にする
2:まず、処女(口上推奨環境)にするかどうかを確認する選択肢を出す
3:次に、口上推奨の素質への変化・恋慕などになった時の素質変化を適応するかの選択肢を出す
4:これらのやり方を勉強するor教えてもらう
番外:現在、UP约会処理の時にヘアス磚瓦の変更の確認が出るが、いずれできないように変更しなくて是けない。別の方法で変更できるようにする

・恋慕になった時の口上
課題:Masterの呼び方を決めるイベントを入れなければいけない。完成したら、ついでに一部既存の角色の名前を入れると反応があるとか
美鈴とか紅美鈴と入力:「門番さんと同じ名前で呼べとか、わかりづらいとかそんなもんじゃないですよ…それとも、本名なんですか?」
帕秋莉or蕾米莉亜を思わせる名称を入力:「我が主の名前!?おふざけでもそれは…いや、まさか、それが你の本名?」
※どっちが主か。みたいな面倒くさいフラグは用意しないので、片方入力後にもう片方入れても、どっちも我が主呼びする予定
芙蘭朶露:「…彼女が狂気のお方にしても、案外まともそうにしても、館の主の妹君様が、名を騙られるのを許すかな…それとも、本名?」
芙兰:「芙蘭朶露様…いや、考え過ぎですかね。もしかしたら、本名を明かしてくれてるのかもしれませんし、それが被る事だって…」
普通の名前、もしくは前述のアクションの後に:「%MASTERNAME:59%とお呼びすればよろしいのですか?」
※前述のアクションが含まれてる場合、「それで…本当に、%MASTERNAME:59%とお呼びすればよろしいのですか?」みたいになるといいかも?
まあどうするにしても、まず下地を作らない事には始まらない…

・恋慕になった時の口上 その2
課題:稍微下書きみたいなのは既に書いてあります

・不特定多数の面倒そうな仕様
課題:「恋慕じゃないと制限がかかる・恋人じゃないと制限がかかる」という面倒そうなシロモノ
ただ、前者は「性騷擾などいやらしい事禁止」だけども、後者は「小悪魔が自発的に推倒たりしない」というもの。小悪魔以外と恋人の場合、後者の要素は強くなる予定
前者は明確な制限であるが、後者はイケイケハーレムの場合は問題ないかも(ただし一周につき一人を愛すプレイしか経験がないため、問題ある場合もあるかもしれない)
現状、恋慕までは积攒度の抑制。という仕様が実装されてるはずだが、恋人じゃないとまた制限がかかる仕様も考えている
积攒度300が実数値でいくつか分からんが、30％だと仮定すると、恋慕だけど恋人ではない場合は、500で50％制限中奖了だろうか
…ところで、性騷擾指令って、全部に-2の記述効くんだろうか?

・自慰の替わりの夜這いシステム(デイリー)
悪魔全般"そういうもの"という設定であり、性欲の抑制など簡単。だから自慰とか不会。しかし、恋人(＝生涯かけて愛する価値の相手)がいる場合は…?
課題:まず自慰の抑制。恋人前に関しては、积攒度の抑制で実質的に行えると思われる。ただ、积攒度のデータ上の数値がわからん。あとソース変更機能?
夜這いの発生条件は"小悪魔と恋人である事"ただ一つ。恋人無しの恋慕かつ同居。も考えてみたけど不採用
デイリーを作るという部分に関しては、製作者様がどうにかしてくれるそうなので…文章を作るのが難題

・恋人になった時の口上
課題:小悪魔の名前を決めなければいけない(話の流れとしては小悪魔が本名を明かす)
スレで例を作ってくれた人がいた気がするので、それを参考にすれば良さそうだが、記述に細かい部分で想定と違いそうな部分があるので、そこをどうするか
…例を作ってくれた人には本当に礼物申し上げます

path: ERB/口上・メッセージ関連/個人口上/【59】小悪魔長髪短髪切り替え/予定とかわからない事とか 簡易版.txt