code:
;-------------------------------------------------
;イベント口上
;-------------------------------------------------

;=================================================
;●各種イベント
;※ARGにイベント番号が入る。詳しくは資料フォルダの「era恋姫 イベント表」を参照
;※RETURNの値を0→1に変えると、デフォルトのメッセージが表示されなくなる
;=================================================
@KOJO_EVENT_K1206(ARG)
IF TALENT:虚ろ || CFLAG:400 == 1
	RETURN
ENDIF
;-------------------------------------------------
;ファーストキス実行
;-------------------------------------------------
IF ARG == 1
	;恋慕 or 服従
	IF TALENT:恋慕 || TALENT:服従
		PRINTFORMW 「今、わたし、世界一幸せ者かもしれません」
	;恋人
	ELSEIF TALENT:恋人
		PRINTFORMW 「これは、なかなかドキドキしますね」
	;それ以外
	ELSE
		PRINTFORMW 「はじめてだったのに、はじめてだったのに」
	ENDIF
	RETURN 0
ENDIF

;-------------------------------------------------
;告白成功
;-------------------------------------------------
IF ARG == 2
	;恋慕 or 服従
	IF TALENT:恋慕 || TALENT:服従
		PRINTFORMW %ANAME(TARGET)%は、告白を聞くと、無言で%ANAME(MASTER)%に近づき、身体を預けた。
		PRINTFORMW %ANAME(MASTER)%が抱きとめると、%ANAME(TARGET)%は耳元に口をよせ、囁くように言った。
		PRINTFORMW 「わたしもお慕い申し上げます。常日頃より、貴方と共にありたいと思っておりました」
		PRINTFORMW 「まさか、貴方の方から言ってもらえるとは思いませんでした」
		PRINTFORMW 「だってわたしは、こんなにつまらない人間だから……」
		PRINTFORMW %ANAME(TARGET)%はそう言って、ふわりと笑った。%ANAME(MASTER)%は、なぜか胸が締め付けられるような愛おしさを感じた。
		PRINTFORMW 「願わくば、いつまでも、いつまでもわたしを離さないでください」
		PRINTFORMW %ANAME(MASTER)%が頷くと、%ANAME(TARGET)%は両手で%ANAME(MASTER)%の頬を押さえ、唇を奪った。
	;それ以外
	ELSE
		PRINTFORMW 「わたしに恋人になって欲しい、と」
		PRINTFORMW 「……わたしも、貴方のことは嫌いではありません」
		PRINTFORMW 「しかし、他に魅力的な人たちがいるのになぜわたしなのですか？」
		PRINTFORMW %ANAME(MASTER)%は%ANAME(TARGET)%に対し、抑えきれないほどの慕情を告げた。
		PRINTFORMW %ANAME(TARGET)%は自身の隣にいて欲しい存在であり、他者に渡したくないということを%ANAME(MASTER)%は告白した
		;まあ、寝取られる時は寝取られるがね
		PRINTFORMW %ANAME(TARGET)%は、しばらく沈黙した。%ANAME(MASTER)%は色好い返事は貰えないだろうと諦めかけた時、%ANAME(TARGET)%は口を開いた。
		PRINTFORMW 「この非才の身をここまで思ってもらえるなら、それは果報なことです。」
		PRINTFORMW 「貴方の恋人になりましょう。ただし、浮気は許しませんよ」
		PRINTFORMW そう言って%ANAME(TARGET)%はいたずらっぽく笑うと、両手で%ANAME(MASTER)%の顔を引き寄せると唇を奪った。
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;告白失敗
;-------------------------------------------------
IF ARG == 3
	PRINTFORMW 「ご冗談を」
	PRINTFORMW 「友人でも言っていいことと悪いことがありますよ」
	RETURN 0
ENDIF

;-------------------------------------------------
;押し倒し成功(合意は得られない)
;-------------------------------------------------
IF ARG == 4
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;押し倒し成功(合意を取得)
;-------------------------------------------------
IF ARG == 5
	;恋慕 or 服従
	IF TALENT:恋慕 || TALENT:服従
		PRINTFORMW 「貴方から求めてくれるなんて、嬉しいです」
		PRINTFORMW 「わたしを、抱いてください……」
	;それ以外
	ELSE
		PRINTFORMW （ここで断ったら、他の人を毒牙にかけるかもしれません）
		PRINTFORMW （わたしが犠牲になりますか……）
	ENDIF
	RETURN 0
ENDIF

;-------------------------------------------------
;押し倒し失敗
;-------------------------------------------------
IF ARG == 6
	PRINTFORMW  「色魔！　変態！こっちに来ないで！」
	RETURN 0
ENDIF

;-------------------------------------------------
;押し倒し成功(既に合意あり)
;-------------------------------------------------
IF ARG == 7
	PRINTFORMW 「ま、またですか？」
	RETURN 0
ENDIF

;-------------------------------------------------
;真名を許すイベント
;-------------------------------------------------
IF ARG == 10
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;デート中に向こうからキス
;-------------------------------------------------
IF ARG == 20
	PRINTFORMW 「あの、お礼をさせてもらってもいいですか？」
	PRINTFORMW  %ANAME(MASTER)%が頷くと、%ANAME(TARGET)%は泥棒のような素早さで、 %ANAME(MASTER)%の唇を盗んだ。
	RETURN 0
ENDIF

;-------------------------------------------------
;デート中に向こうから告白
;-------------------------------------------------
IF ARG == 21
	PRINTFORMW 「あの、帰る前に少しよろしいですか」
	PRINTFORMW %ANAME(MASTER)%が頷くと、%ANAME(TARGET)%は心を落ち着けるように息をゆっくり吸った。
	PRINTFORMW 「初めて会った時、貴方を変な人だと思っていました」
	PRINTFORMW 「他に会って有益な人なんていくらでもいるのに、わたしに会いに来る人ですから」
	PRINTFORMW 「会い来てもらえるのは嬉しかったんです。友達ができたから」
	PRINTFORMW 「でも、何度も会いに来て貰って、わたしの心が変わっていったんです」
	PRINTFORMW 「会えないと寂しい。会えないと一日がとても長い気がしました」
	PRINTFORMW 「そう感じるようになってから気づいたんです」
	PRINTFORMW 「貴方とは友人よりもそれ以上の関係になりたいと」
	PRINTFORMW 「だから、つまり……」
	PRINTFORMW %ANAME(TARGET)%はそこまで言い切ると、深呼吸をして言った。
	PRINTFORMW 「わたしの特別に、恋人になってもらえないでしょうか」

	CALL ASK_YN("受け入れる", "断る")

	;告白を受け入れる
	IF RESULT == 0
		PRINTFORMW 「本当、ですか？」
		PRINTFORMW 「あの、夢ではないですよね？」
		PRINTFORMW 「でしたら……」
		PRINTFORMW そう言うと、%ANAME(TARGET)%は両手で%ANAME(MASTER)%の顔を引き寄せ唇を奪った。
	;
		;告白成功時はTFLAG:告白成功に1を代入
		TFLAG:告白成功 = 1

	;告白を断る
	ELSE
		PRINTFORMW 「あ……」
		PRINTFORMW 「そう、ですよね。わたしなんかが、釣り合いませんよね」
		PRINTFORMW 「すみません、変なこと言って。忘れてください……」
		PRINTFORMW %ANAME(TARGET)%は今にも泣きそうな声を潰すように言った。
	;
	;	;告白成功時はTFLAG:告白成功に0を代入
		TFLAG:告白成功 = 0
	ENDIF
	RETURN 1
ENDIF

;-------------------------------------------------
;相手から押し倒される
;-------------------------------------------------
;合意なし
IF ARG == 22
	PRINTFORMW 「いい加減にしてください」
	PRINTFORMW 「わたしは、そんな魅力がありませんか？」
	PRINTFORMW 「いえ、答えなくていいです。身体に聞かせてもらいますから……」
	PRINTFORMW %ANAME(TARGET)%は獲物を前にした肉食動物のように、 %ANAME(MASTER)%に覆いかぶさっていった
	RETURN 0
;合意なし＆酔った勢い
ELSEIF ARG == 23
	;PRINTFORMW
	RETURN 0
;合意あり
ELSEIF ARG == 24
	PRINTFORMW 「逃がしませんよ……」
	PRINTFORMW 「わたし、今日は飢えていますから」
	PRINTFORMW %ANAME(TARGET)%は、 %ANAME(MASTER)%の腕を強い力で掴んでいる。 %ANAME(MASTER)%に拒否権はない。
	RETURN 0
;合意あり＆酔った勢い
ELSEIF ARG == 25
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;相手からおねだりされる
;-------------------------------------------------
;合意なし
IF ARG == 26
	PRINTFORMW 「あの、わたしを、抱いてくれませんか」
	PRINTFORMW %ANAME(TARGET)%は、 %ANAME(MASTER)%の腕を掴み、すがるように言った。
	RETURN 0
;合意なし＆酔った勢い
ELSEIF ARG == 27
	;PRINTFORMW
	RETURN 0
;合意あり
ELSEIF ARG == 28
	PRINTFORMW 「今日は、わたしを抱いていきませんか？」
	PRINTFORMW 「今日はすごく気分、なので」
	PRINTFORMW %ANAME(TARGET)%はにこやかな表情で %ANAME(MASTER)%を見つめている。
	RETURN 0
;合意あり＆酔った勢い
ELSEIF ARG == 29
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;酔い限界で倒れる
;-------------------------------------------------
IF ARG == 32
	PRINTFORMW 「も～だめ～で～す」
	RETURN 0
ENDIF

;-------------------------------------------------
;妊娠発覚
;-------------------------------------------------
IF ARG == 40
	;捕虜調教
	IF CFLAG:9 == CFLAG:MASTER:1
		;父親不明
		IF CFLAG:23 == 0
			IF ABL:出産 >= 3
				;PRINTFORMW
			ELSE
				;PRINTFORMW
			ENDIF
		;主人公の子を孕んだ
		ELSEIF CFLAG:23 == GET_ID(MASTER)
			IF TALENT:恋慕 || TALENT:服従 || TALENT:親友
				PRINTFORMW
			ELSEIF TALENT:恋人 || TALENT:烙印
				;PRINTFORMW
			ELSE
				IF ABL:出産 >= 3
					;PRINTFORMW
				ELSE
					;PRINTFORMW
				ENDIF
			ENDIF
		;触手の子を孕んだ
		ELSEIF CFLAG:23 == GET_SPERM_ID("触手")
			;PRINTFORMW
		;他の士官の子を孕んだ
		ELSE
			;PRINTFORMW
		ENDIF
	;捕虜調教以外
	ELSE
		;父親不明
		IF CFLAG:23 == 0
			IF ABL:出産 >= 3
				;PRINTFORMW
			ELSE
				;PRINTFORMW
			ENDIF
		;主人公の子を孕んだ
		ELSEIF CFLAG:23 == GET_ID(MASTER)
			IF TALENT:恋慕 || TALENT:服従 || TALENT:親友
				PRINTFORMW 「できました」
				PRINTFORMW 「何ができたかですか？　これですよ」
				PRINTFORMW %ANAME(TARGET)%は微笑みながら、お腹をさすった。
			ELSEIF TALENT:恋人 || TALENT:烙印
				;たわしではない　間違いかけた。漢字の私にした方がよかったかもしれない
				PRINTFORMW 「わたし、妊娠しました」
				PRINTFORMW 「責任、取ってください」
				PRINTFORMW 口調こそ穏やかだが、%ANAME(TARGET)%の瞳は強い非難が込められている。
			ELSE
				;PRINTFORMW
			ENDIF
		;触手の子を孕んだ
		ELSEIF CFLAG:23 == GET_SPERM_ID("触手")
			;PRINTFORMW
		;他の士官の子を孕んだ
		ELSE
			;PRINTFORMW
		ENDIF
	ENDIF
	RETURN 0
ENDIF

;-------------------------------------------------
;臨月に入った
;-------------------------------------------------
IF ARG == 41
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;子供を出産した
;-------------------------------------------------
IF ARG == 42
	;父親のキャラ番号をLOCAL:0に取得
	LOCAL:0 = ID_TO_CHARA(CFLAG:23)

	;主人公の子供の場合
	IF LOCAL:0 == MASTER
		IF TALENT:恋慕 || TALENT:服従 || TALENT:親友
			;PRINTFORMW
		ELSEIF TALENT:恋人 || TALENT:烙印
			;PRINTFORMW
		ELSE
			;PRINTFORMW
		ENDIF
	;父親不明の場合
	ELSEIF CFLAG:23 == 0
		;PRINTFORMW
	;他の仕官の子の場合
	ELSE
		;PRINTFORMW
	ENDIF
	RETURN 0
ENDIF

;-------------------------------------------------
;主人公に自分の子供を産ませた
;-------------------------------------------------
IF ARG == 43
	PRINTFORMW 「わたしが、父親、ですか」
	PRINTFORMW 「いい子に育てていきましょう。二人で……」
	RETURN 0
ENDIF

;-------------------------------------------------
;忠誠を誓わせる/成功
;-------------------------------------------------
IF ARG == 50
	PRINTFORMW （この人には、逆らえないんだなあ……）
	RETURN 0
ENDIF

;-------------------------------------------------
;忠誠を誓わせる/失敗
;-------------------------------------------------
IF ARG == 51
	PRINTFORMW 「寝ぼけているんですか？　冗談でも笑えませんよ」
	RETURN 0
ENDIF

;-------------------------------------------------
;自国に誘う/成功
;-------------------------------------------------
IF ARG == 52
	PRINTFORMW 「分かりました。仕える国が変われど天下のため応じましょう」
	RETURN 0
ENDIF

;-------------------------------------------------
;自国に誘う/失敗
;-------------------------------------------------
IF ARG == 53
	PRINTFORMW 「申し訳ありません。まだ心が定まりませんので」
	RETURN 0
ENDIF

;-------------------------------------------------
;恋慕を取得
;-------------------------------------------------
IF ARG == 60
	PRINTFORMW %ANAME(TARGET)%は突然に現れた感情に困惑していた。
	PRINTFORMW 胸がひどくざわめき、言いようのない寂しさがあった。
	PRINTFORMW 無意識に%ANAME(TARGET)%は言葉を溢す。
	PRINTFORMW 「会いたい……」
	PRINTFORMW %ANAME(MASTER)%のことが脳裏に浮かび、%ANAME(TARGET)%はようやく自身の気持ちの正体を知った。
	RETURN 0
ENDIF

;-------------------------------------------------
;親友を取得
;-------------------------------------------------
IF ARG == 61
	PRINTFORMW 「ここまでわたしと仲良くなった人は初めてかもしれませんね」
	RETURN 0
ENDIF

;-------------------------------------------------
;親愛を取得
;-------------------------------------------------
IF ARG == 62
	PRINTFORMW 「わたしは、あの人が好き」
	PRINTFORMW %ANAME(MASTER)%が去った後、%ANAME(TARGET)%は小さな声で呟く。その声は落ち着いている。
	PRINTFORMW 以前のような燃え上がるような感情は収まっているようだった。
	PRINTFORMW 愛が薄れたのだろうか、%ANAME(TARGET)%はそう自問する。
	PRINTFORMW 「違う、そうじゃない」
	PRINTFORMW %ANAME(TARGET)%は目を閉じ、胸に手を当て、%ANAME(MASTER)%を思った。恋をしていた頃のような激情は起こらない。
	PRINTFORMW しかし、水がゆっくりと満たされるように、心からこんこんと涌く愛おしさが%ANAME(TARGET)%を満たしていく。
	PRINTFORMW 「……そっか、わたしはあの人を愛している、きっと心から……」
	PRINTFORMW そう呟くと、%ANAME(TARGET)%はようやく微笑した。
	RETURN 0
ENDIF

;-------------------------------------------------
;服従を取得
;-------------------------------------------------
IF ARG == 63
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;隷属を取得
;-------------------------------------------------
IF ARG == 64
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;淫乱を取得
;-------------------------------------------------
IF ARG == 65
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;婚姻の儀(選択時)
;-------------------------------------------------
IF ARG == 90
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;婚姻の儀(イベント時)
;-------------------------------------------------
IF ARG == 91
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;調教後自慰(Ｃ)
;-------------------------------------------------
IF ARG == 100
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;調教後自慰(Ａ)
;-------------------------------------------------
IF ARG == 101
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;調教後性交
;-------------------------------------------------
IF ARG == 102
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;おねだりに対して「おあずけ」を選択
;-------------------------------------------------
IF ARG == 103
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;コマンド実行失敗
;-------------------------------------------------
IF ARG == 150
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;夜イベント/一般
;-------------------------------------------------
;添い寝
IF ARG == 200
	PRINTFORMW 「不意に寂しくなりました。隣で寝てもよろしいですか？」
	RETURN 0
;晩酌
ELSEIF ARG == 201
	PRINTFORMW 「いい酒が入りました、飲みましょう！」
	RETURN 0
;談笑
ELSEIF ARG == 202
	PRINTFORMW 「天下の行く末を語りたい、というのは建前でして」
	PRINTFORMW 二人は他愛のない雑談を夜遅くまで楽しんだ。
	RETURN 0
ENDIF

;-------------------------------------------------
;夜イベント/愛撫
;-------------------------------------------------
;責め(通常)
IF ARG == 210
	;PRINTFORMW
	RETURN 0
;責め(加虐)
ELSEIF ARG == 211
	;PRINTFORMW
	RETURN 0
;受け(通常)
ELSEIF ARG == 212
	;PRINTFORMW
	RETURN 0
;受け(被虐)
ELSEIF ARG == 213
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;夜イベント/性交
;-------------------------------------------------
;主人公がこのキャラのＶに挿入
IF ARG == 220
	PRINTFORMW 「ちょっと寝付けないので、運動に付き合ってもらえませんか？」
	RETURN 0
;主人公がこのキャラのＡに挿入
ELSEIF ARG == 221
	;PRINTFORMW
	RETURN 0
;このキャラが主人公のＶに挿入
ELSEIF ARG == 222
	;PRINTFORMW
	RETURN 0
;このキャラが主人公のＡに挿入
ELSEIF ARG == 223
	;PRINTFORMW
	RETURN 0
;レズ絡み
ELSEIF ARG == 224
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;戦闘開始
;-------------------------------------------------
;野戦
IF ARG == 300
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「戦は専門外なんだけどなあ……」
		CASE 1
			PRINTFORMW 「仕方ない、腹をくくりますか……」
		CASE 2
			PRINTFORMW 「突撃命令があるまで待機してください」
		CASE 3
			PRINTFORMW 「わたしは文官なのになあ……」
	ENDSELECT
	RETURN 0
;器用戦(侵攻側)
ELSEIF ARG == 301
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「戦は専門外なんだけどなあ……」
		CASE 1
			PRINTFORMW 「事後処理を考えると、憂鬱だなあ……」」
		CASE 2
			PRINTFORMW 「降伏してくれないかなあ……」
		CASE 3
			PRINTFORMW 「ええと、敵の兵站は……ですので……」
	ENDSELECT
	RETURN 0
;器用戦(器用側)
ELSEIF ARG == 302
	SELECTCASE RAND:4
		CASE 0
			PRINTFORMW 「救援は、来るのでしょうか？」
		CASE 1
			PRINTFORMW 「囲まれてる……どうしよう」」
		CASE 2
			PRINTFORMW 「せっかく任された場所なんです。死ぬ気で守りますよ！」
		CASE 3
			PRINTFORMW 「必ず援軍は来ます！　持ち場を離れないで！」
	ENDSELECT
	RETURN 0
ENDIF

;-------------------------------------------------
;特殊戦術
;-------------------------------------------------
;計略発動
IF ARG == 310
	PRINTFORMW 「子供騙しでも、引っかかる人はいるものですね……」
	RETURN 0
;反計
ELSEIF ARG == 311
	PRINTFORMW 「引っかかった振りは得意なので」
	RETURN 0
;貫計(武力)
ELSEIF ARG == 312
	PRINTFORMW 「小細工は抜きです！全軍突撃！」
	RETURN 0
;貫計(好感度)
ELSEIF ARG == 313
	PRINTFORMW 「こんな所で終わりません！あの人の所に帰るんです、わたしは！」
	RETURN 0
ENDIF

;-------------------------------------------------
;主人公勢力に捕縛される(部隊壊滅時)
;-------------------------------------------------
IF ARG == 330
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;主人公勢力に捕縛される(滅亡時)
;-------------------------------------------------
IF ARG == 331
	PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;主人公勢力に捕縛されたときのリアクション
;-------------------------------------------------
;登用に応じる
IF ARG == 332
	PRINTFORMW 「分かりました、従いましょう」
	RETURN 0
;登用を拒否する
ELSEIF ARG == 333
	PRINTFORMW 「こんな国に仕えるのは、死んでも嫌ですね」
	RETURN 0
;解放される
ELSEIF ARG == 334
	PRINTFORMW 「さて、どうしましょうか……」
	RETURN 0
;投獄される
ELSEIF ARG == 335
	PRINTFORMW 「こんな、こんなことって……」
	RETURN 0
;処刑される
ELSEIF ARG == 336
	PRINTFORMW 「もっと平和な世界に生まれたかったなあ……」
	RETURN 0
ENDIF

;-------------------------------------------------
;戦死時
;-------------------------------------------------
IF ARG == 337
	;主人公と同一勢力に所属
	IF CFLAG:1 >= 1 && CFLAG:1 == CFLAG:MASTER:1
		IF TALENT:恋慕 || TALENT:服従 || TALENT:親友
			PRINTFORMW 「ごめんなさい、%ANAME(MASTER)%……もう帰れないようです……」
		ELSE
			PRINTFORMW 「もう動けない……死にたくない……」
		ENDIF
	;主人公と異なる勢力に所属
	ELSE
		PRINTFORMW 「もう動けない……死にたくない……」
	ENDIF
	RETURN 0
ENDIF

;-------------------------------------------------
;捕虜調教のメニュー
;-------------------------------------------------
;解放される
IF ARG == 340
	PRINTFORMW 「助かったの……？」
	RETURN 0
;処刑される
ELSEIF ARG == 341
	PRINTFORMW 「…………」
	RETURN 0
;性奴隷化される
ELSEIF ARG == 342
	PRINTFORMW 「い、いや、いや、こんなことって……」
	RETURN 0
ENDIF

;-------------------------------------------------
;放浪イベント
;-------------------------------------------------
;登用に応じる
IF ARG == 350
	PRINTFORMW 「そろそろ路銀が尽きる頃でしたから、応じましょう」
	RETURN 0
;登用を拒否する
ELSEIF ARG == 351
	PRINTFORMW 「まだ、回っていない場所があるので失礼します」
	RETURN 0
;投獄される
ELSEIF ARG == 352
	PRINTFORMW 「暗君……」
	RETURN 0
ENDIF

;-------------------------------------------------
;霖之助・藍関係
;-------------------------------------------------
;[霖之助に恋慕]を取得
IF ARG == 400
	;PRINTFORMW
	RETURN 0
;[霖之助の恋人]を取得
ELSEIF ARG == 401
	;PRINTFORMW
	RETURN 0
;[霖之助に恋慕]を喪失
ELSEIF ARG == 402
	;PRINTFORMW
	RETURN 0
;霖之助と別れさせることに成功
ELSEIF ARG == 403
	;PRINTFORMW
	RETURN 0
;霖之助と別れさせることに失敗
ELSEIF ARG == 404
	;PRINTFORMW
	RETURN 0
;[藍に恋慕]を取得
ELSEIF ARG == 410
	;PRINTFORMW
	RETURN 0
;[藍の恋人]を取得
ELSEIF ARG == 411
	;PRINTFORMW
	RETURN 0
;[藍に恋慕]を喪失
ELSEIF ARG == 412
	;PRINTFORMW
	RETURN 0
;藍と別れさせることに成功
ELSEIF ARG == 413
	;PRINTFORMW
	RETURN 0
;藍と別れさせることに失敗
ELSEIF ARG == 414
	;PRINTFORMW
	RETURN 0
ENDIF

;-------------------------------------------------
;逆調教時
;-------------------------------------------------
;主人公に対して忠誠を誓わせる
IF ARG == 450
	PRINTFORMW 「こんな手段はとりたくありませんでしたが、貴方が強情なのが悪いのです」
	PRINTFORMW 「こちらに仕官してくれるなら、解放しましょう。どうしますか？」
	RETURN 0
;主人公に対して忠誠を誓わせる/成功
ELSEIF ARG == 451
	PRINTFORMW 「応じてくれますか。よかった、貴方とは戦いたくなかったですから……」
	RETURN 0
;主人公に対して忠誠を誓わせる/失敗
ELSEIF ARG == 452
	PRINTFORMW 「強情ですね。まあそこがかわいいですよ、貴方」
	RETURN 0
ENDIF

repo_name: napo/erafl

license: unknown


code:
;ライセンス
;口上の作者はこの口上についての意思表示をしてください。書かなくとも構いませんが、
;あなたの口上が無断で口上まとめに入れられたりする恐れがあります。
;このライセンスの基本構造または文章を改変する場合、必ず作者に申し出てください。
;口上のオリジナルの作者であっても、指定された部分(…の後)以外を変更することはできません。
;ただし「変更者名X…」(Xは整数とする)についてはその枠を無断で増やすことを許可します。
;基本的に「はい」と「いいえ」で答え、「条件付のはい/いいえ」にしたい場合、その条件も明記しておいてください。
;
;言葉の定義
;修正…構文のミス(IF-ENDIFなど)の修正や条件式とコメント欄の食い違い、明らかな誤字を正しい文字に修正すること。
;加筆…PRINTFORMWを増やす等した後、PRINTFORMの後ろに文章を書き足すこと。
;改変…それ以外のソースの変更行為。条件分岐を増やしたり、新しいエクストラ構文の追加等も含む。
;二次配布…ソースやreadmeを全く変更せず、そのままの形または一つのファイルにまとめる形で公開すること。
;
;口上作者名…２スレ目＞９０２
;変更者名1…スクリプト組んでる方の人(口上テンプレートのミスによる修正)
;変更者名2…

;◆ライセンスについて
;	+----+----+-------------------------------+
;	|番号|許可|ライセンス内容                 |
;	+----+----+-------------------------------+
;	|   1| ○ | 処理上のバグ修正              |
;	+----+----+-------------------------------+
;	|   2| ○ | 口上の誤字・脱字の修正        |
;	+----+----+-------------------------------+
;	|   3| ○ | 口上まとめへの収録            |
;	+----+----+-------------------------------+
;	|   4| ○ | 口上の新規追加                |
;	+----+----+-------------------------------+
;	|   5| ○ | 既存口上の改変                |
;	+----+----+-------------------------------+
;	|   6| ○ | 改変した口上の自由な再配布    |
;	+----+----+-------------------------------+
;	|   7| ○ | 口上内容の転載・流用          |
;	+----+----+-------------------------------+
;
;　バリアント支援の名目で書かせていただきました。
;上記の通り、口上の改変、修正、加筆、転載は自由なのでお好きにどうぞ。
;口上として薄味ですので、過度の期待はするべきではありません
;

;修正した場合は口上作者名を変えず、必ず元作者のreadmeを同梱してください。
;加筆/改変した場合は必ず元の作者名を明記するようにしてください。
;また、口上のオリジナルの作者によって削除依頼が出た場合、修正、加筆、改変、二次配布者は速やかに削除しなくてはなりません。
;
;変更時に(各)作者のreadmeの同梱を義務付ける
;口上作者(作者名)…できればお願いします
;変更者1(変更者名)…
;変更者2(変更者名)…
;加筆、改変、二次配布等の際にreadmeを残すのを義務付けるかどうかです。
;口上作者(作者名)…「はい」、変更者1(変更者名)…「はい/いいえ」…という形式で1行ずつ表記してください。
;はいの場合は必ず口上の場所と同じフォルダに(各)作者のreadmeの同梱をしてください。
;その際、加筆、改変、二次配布者はreadme.txtの名前を変更しても構いませんが、readmeの内容を変更することはできません。
;
;ライセンスの継承を義務付ける…
;加筆、改変、二次配布等の際にこのライセンスを書き変えてよいかどうかです。
;はいの場合はあらゆるライセンスの表示(はい/いいえ)を勝手に変更することは許されません。
;いいえの場合は口上作者名や変更者名、readme同梱の意思を除き変更することができます。
;
;
;共通事項
;1.この口上の出典について虚偽の表示をしてはなりません。
;  あなたがこの口上を(テンプレートを使用して)最初から書いた場合を除き、あなたがこの口上のオリジナルの作者であると主張してはなりません。
;2.あなたがこの口上を修正、加筆、改変、二次配布した場合は、そのことを明示しなければなりません。
;  この口上のオリジナルの作者が新たに修正、加筆、改変した場合を除き、この口上をオリジナルの口上であるという虚偽の表示をしてはなりません。
;3.このライセンスの項目に空欄があった場合、原則として許可されたものとします。
;4.あなたがこのライセンスによって禁止されていることをする場合、口上作者に連絡し許可をとる必要があります。
;  連絡に対する口上作者の返答がない場合、原則として否定されたものとします。
;5.あなたはこの口上を開くまたは二次配布する際に、このライセンスを読む義務があります。読まなかった等の理由によりこれらの義務を破ることは許されません。
;
;
;あなたはいかなる場合であっても、以上のことに必ず従わなければなりません。


path: ERB/口上/1206_ランダムキャラ文官/既成事実修正パッチ個人用メモ.txt


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K13_ALEXIA_JOIN_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K13_ALEXIA_JOIN_DECISION(対象)
#DIM 対象
#DIM EVENT_FLAG

IF CFLAG:対象:所属 == 所属_プレイヤー
    RETURN 0
ENDIF
IF K13_DFLAG_アレクシア加入判定 !=1
    RETURN 0
ENDIF
RETURN 1

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K13_ALEXIA_JOIN_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K13_ALEXIA_JOIN(対象)
#DIM 対象

PRINTL
PRINTFORMW ある朝、屋敷の外に出た%ANAME(MASTER)%は、見知らぬ金髪の女騎士に呼び止められた
PRINTL
CALL KJ_PRINT(対象, @"「先日は、助けていただいてありがとうございました」")
PRINTL
PRINTFORML そう言われて、改めて彼女の顔を見て、ふと気づく
PRINTFORMW 先日、ゴブリンの洞窟に捕らわれていた女性ではないか、と
PRINTL
CALL KJ_PRINT(対象, @"「ええ、そうです。あの時はお恥ずかしいところをお見せしました」")
CALL KJ_PRINT(対象, @"「また、助けていただいたのに満足なお礼もできず、重ねて失礼いたしました」")
PRINTL
CALL KJ_PRINT(対象, @"「ああ、申し遅れました。私はアレクシア・グランベルと申します」")
PRINTL
PRINTFORML 深々と頭を下げるアレクシアに、傷の具合はもういいのかと尋ねると、
PRINTFORMW 彼女は一つ息をついて、悲しげに口を開いた
PRINTL
CALL KJ_PRINT(対象, @"「おかげさまで、身体の方は、もう大丈夫です」")
CALL KJ_PRINT(対象, @"「ですが……ご存じの通り、仲間を失い、操を汚され……」")
CALL KJ_PRINT(対象, @"「私に残ったものは、この身一つになってしまいました」")
PRINTL
PRINTFORML そこまで言うと、彼女は顔を上げて%ANAME(MASTER)%を見た
PRINTFORMW その瞳には、強い決意が宿っているように見える
PRINTL
CALL KJ_PRINT(対象, @"「もはや私に帰れる場所はなく、そして%ANAME(MASTER)%様には返しきれぬ御恩があります」")
CALL KJ_PRINT(対象, @"「どうか私を%ANAME(MASTER)%様の剣として、あるいは盾として、使ってはいただけませんか」")
PRINTL
PRINTFORML あのときはあんなことになってしまっていたが、
PRINTFORMW こうしてその所作を見た感じでは、相応に腕が立つものと考えられる
PRINTFORMW 精神的な傷が残っていないかは不安だが、戦力としては計算できるだろう
PRINTL
PRINTFORML さて、アレクシアを受け入れるべきだろうか？
CALL ASK_YN("受け入れる","やめておく")
IF !RESULT
    PRINTFORMW %ANAME(MASTER)%が承諾すると、彼女はもう一度深々と頭を下げた
    PRINTL
    CALL KJ_PRINT(対象, @"「ありがとうございます。今この時より、あなたの剣として、盾として忠義を尽くします」")
    PRINTL
    CALL PRINT_NOTICE("アレクシアが仲間になった")
    CFLAG:NAME_TO_CHARA("アレクシア"):所属 = 所属_プレイヤー
    SEXUAL_EXPERIENCE:(対象):初体験_処女 '= "醜悪なゴブリン"
    SEXUAL_LAST_EXPERIENCE:(対象):初体験_処女 '= "痩せたゴブリン"
    SEXUAL_EXPERIENCE:(対象):初体験_キス '= "小太りのゴブリンの唇"
    SEXUAL_LAST_EXPERIENCE:(対象):初体験_キス '= "小太りのゴブリンのペニス"
    SEXUAL_EXPERIENCE:(対象):初体験_アナル処女 '= "ホブゴブリン"
    SEXUAL_LAST_EXPERIENCE:(対象):初体験_アナル処女 '= "醜悪なゴブリン"
ELSE
    PRINTFORMW %ANAME(MASTER)%が首を横に振ると、彼女はもう一度深々と頭を下げた
    PRINTL
    CALL KJ_PRINT(対象, @"「そうですか……では、これ以上ご迷惑をおかけするわけにもいきませんね」")
    CALL KJ_PRINT(対象, @"「ご恩を返せないのは、痛恨の極みではありますが……失礼いたします」")
    PRINTL
    PRINTFORML そう言って、彼女は去っていった
    PRINTFORMW その後、彼女の姿を見かけることは二度となかった
    K13_DFLAG_アレクシア加入判定 = 2
ENDIF

RETURN 1


code:
;-------------------------------------------------
; @FL_INIT_LOADER から呼ばれる口上初期読み込み
; 口上スプレッドシート格納先
; https://docs.google.com/spreadsheets/d/1QChtpaWpeF_M3Uv72URdolgAwW_3AKQegaHPNNCvHzs/edit#gid=1569492545
;-------------------------------------------------
@KOJO_DEFINE_K13
#DIMS CONST XML_PATH_COM = "ERB/口上/13_アレクシア/KOJO_K13_COM.xml"

;口上未完成のためコメントアウト
; CALL KOJO_XML_REGISTER(XML_PATH_COM, NO:(NAME_TO_CHARA("アレクシア")), XMLID_KOJO_CLASS_COM)
; RETURN 1

;口上出力前の初期処理。共通処理以外で口上出力前に予め取得しておきたい情報があれば別途ここに記述
@KOJO_XML_INIT_K13(KOJO_CHARA_ID)
#DIM  KOJO_CHARA_ID
#DIM  CONST OLD_XML_FORMAT = 0  ;基本は0指定。v0.211以前のXML口上フォーマットの場合 1
;出力前の共通初期処理
CALL KOJO_XML_INIT_COMMON_BEFORE_PRINT(KOJO_CHARA_ID)

RETURN OLD_XML_FORMAT

;-------------------------------------------------
; SELECTCOMがどのグループに属するのかを文字列で返す
; RESULTSで返却するグループ名のリストは口上シートA列COM|GROUPに指定した名称と一致している必要がある
; KOJO_CHARA_ID 口上参照キャラの登録番号
; PLACE 口上出力箇所 コマンド実行前と後で参照グループを切り替えたいならばこの引数を見る
; REUSLT = 0 合致グループなし
; REUSLT = 1 合致グループあり
; REUSLT = 2 合致グループあり、排他(該当グループ以外に適合する条件の口上があっても該当するグループのみ出力)
; RESULTS: グループ名のリスト
;-------------------------------------------------
@KOJO_XML_COMGROUP_K13(KOJO_CHARA_ID, PLACE)
#DIM  KOJO_CHARA_ID
#DIMS PLACE
;口上固有の条件グループはここに定義

;共通のコマンドグループ
CALL KOJO_GET_COMGROUP(KOJO_CHARA_ID, PLACE)

RETURN RESULT


code:
;───────────────────────────────────────
;デイリー
;───────────────────────────────────────
;───────────────────────────────────────
;口上用
;───────────────────────────────────────
#DIM  SAVEDATA K13_DFLAG_アレクシア加入判定
;TCVAR:2500
;加入イベントの無限発生防止用


code:
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<kojodef>
	<command com="300" name="会話">
		<kojo place="TOP" isMob="FALSE" priority="1">「ごきんげんよう、奇遇ですね～」
「よろしければ少しご一緒にお散歩しませんか？」</kojo>
	</command>
	<command com="300" name="会話">
		<kojo place="TOP" isFall="恋慕" isMob="FALSE" priority="1">「ごきんげんよう、%CALLNAME(MASTER)%様」</kojo>
	</command>
	<command com="300" name="会話">
		<kojo place="TOP" isFall="親愛" isMob="FALSE" priority="1">「ふふ、ご機嫌麗しゅう。%CALLNAME(MASTER)%様」</kojo>
	</command>
	<command com="300" name="会話">
		<kojo place="TOP" isInitiative="無" isMob="FALSE" priority="1">「何かご用ですか？」</kojo>
	</command>
	<command com="300" name="会話">
		<kojo place="TOP" isInitiative="有" isMob="FALSE" priority="1">「お暇でしたら……少しお話しませんか？」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">「思っていたより、いろいろな品物があるんですねぇ……」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">「%S_R("ふぅん……/へぇ……/なるほど……/ほうほう……")%」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">「こちらの品物のこと、もう少しお伺いしてもいいかしら？」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">「もう少しお安くならないかしら？」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" emotion="GOOD" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">「あらあら……お上手ですねぇ！」
「それじゃあもう少し見ていこうかしら」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" emotion="GOOD" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">「フロリアの内戦のおかげで何処も治安は酷いものでして……」
「ここまでくるのも命がけでしたわ」</kojo>
	</command>
	<command com="300" name="商談">
		<kojo place="TOP" isMob="TRUE" priority="1" eval="{TSTR:会話モード == "商談"}">%ANAME([$KC])%はぶつぶつ呟きながら東風の算盤を弾いている[$NC]</kojo>
	</command>
	<command com="320" name="スキンシップ">
		<kojo place="TOP" isPlayer="対象" priority="1">「あらあら……、あまりベタベタ触ると嫌われちゃいますよ」</kojo>
	</command>
	<command com="320" name="スキンシップ">
		<kojo place="TOP" isPlayer="対象" priority="1">「マッサージ？　ではお願いしちゃいましょうか」</kojo>
	</command>
	<command com="320" name="スキンシップ">
		<kojo place="TOP" isPlayer="実行" priority="1">「凝ってますね～。　運動の後はよくほぐした方がいいですよ」</kojo>
	</command>
	<command com="320" name="セクハラ">
		<kojo place="TOP" isPlayer="実行" priority="1" eval="{AT_SITU("セクハラ")}">「ねぇ……堅苦しい話は抜きにして……、楽しいこと、しましょうよ❤」</kojo>
	</command>
	<command com="320" name="セクハラ">
		<kojo place="TOP" isPlayer="実行" priority="1" eval="{AT_SITU("セクハラ")&&IS_MALE(MTAR:0)}">「もしもお兄さんが"尽くして"くれたら……、私のお財布ゆるゆるになっちゃうかもしれないなー」
「ねぇ、遊びましょうよ。　ほらほら❤」</kojo>
	</command>
	<command com="320" name="セクハラ">
		<kojo place="TOP" isPlayer="実行" priority="1" eval="{AT_SITU("セクハラ")&&IS_FEMALE(MTAR:0)}">「あら可愛い娘……❤　ねぇ、どうしたらたくさん買ってもらえるか、わかってるよね❤」
「ほら、お客さんは喜ばせてあげないと」</kojo>
	</command>
	<command com="321" name="頭を撫でる">
		<kojo place="TOP" isPlayer="実行" withMaster="TRUE" emotion="GOOD" priority="1">「よしよし」</kojo>
	</command>
	<command com="321" name="頭を撫でる">
		<kojo place="TOP" isPlayer="対象" withMaster="TRUE" emotion="GOOD" priority="1">「ふふっ、なでなでされるのも悪い気はしませんね」</kojo>
	</command>
	<command com="327" name="抱きしめる">
		<kojo place="TOP" isPlayer="実行" withMaster="TRUE" emotion="GOOD" priority="1">「ぎゅってして欲しい？　では……どうぞ❤」</kojo>
	</command>
	<command com="327" name="抱きしめる">
		<kojo place="TOP" isPlayer="対象" withMaster="TRUE" emotion="GOOD" priority="1">「もーっと、甘やかしてくれても……いいんですよ？」</kojo>
	</command>
	<command com="704" name="食事する">
		<kojo place="TOP" priority="1">「いただきまーす」
「うん、美味しいです」</kojo>
	</command>
	<command com="30" name="正常位">
		<kojo place="TOP" isInitiative="有" isPlayer="対象" priority="1">「動きますね……。　力を抜いて……」</kojo>
	</command>
	<command com="30" name="正常位">
		<kojo place="TOP" isInitiative="無" isPlayer="対象" priority="1">「んっ、や、優しくしてください……」</kojo>
	</command>
	<command com="VSEX" name="Ｖ性交">
		<kojo place="TOP" isPlayer="対象" priority="1">「突いて…、んんっ、もっと奥まで……きて❤」</kojo>
	</command>
	<command com="VSEX" name="Ｖ性交">
		<kojo place="TOP" isPlayer="対象" priority="1">「やぁ……こんな……、気持ちいいぃ、んんっ！」</kojo>
	</command>
	<command com="VSEX" name="Ｖ性交">
		<kojo place="TOP" isPlayer="対象" priority="1" eval="{IS_ESTRUS([$KC])}">「はぁ❤　後ろからグリグリ突かれるの……すごくいい❤　あああぁん！」</kojo>
	</command>
	<command com="ORAL" name="口淫">
		<kojo place="TOP" isPlayer="実行" emotion="GOOD" priority="1">「んぷっ❤　ちゅる　はぁぁ、お口の中でびくんびくんっってして……」
「そんなに気持ちいいですか❤　じゃあもっとペロペロして……さしあげますね」</kojo>
	</command>
	<command com="ORAL" name="口淫">
		<kojo place="TOP" isPlayer="実行" emotion="GOOD" priority="1">「先っぽから……んっ、じゅるるるぅ❤　えっちな……お汁、出ちゃってますよ……」
「はぁ……❤　舐めても舐めても……、ちゅるるっ、全然きれいに……なりませんね❤」</kojo>
	</command>
	<command com="ORAL" name="口淫">
		<kojo place="TOP" isPlayer="実行" emotion="GOOD" priority="1">「あは、はぁぁ……❤　んぷっ、そんなに腰をへこへこさせて……」
「ちゅるるるるぅっ。　よっぽど、気持ちいいん……ですね❤❤」</kojo>
	</command>
	<command com="ORAL" name="口淫">
		<kojo place="TOP" isPlayer="実行" priority="1">「んぶっ、ぐぅっ……！　んれぇ、んぐっ！　く、苦し……苦しいです、んぶっ」
「げほッ　も、もう少し、やさしく……して……」</kojo>
	</command>
	<command com="ANY" name="口淫_射精">
		<kojo place="BOTTOM" emotion="GOOD" priority="10" eval="{NOW_BUKKAKED([$KC]) == 射精部位_口}">「んんんっ――――！　んぐっ……。　……はぁ❤」
%ANAME([$KC])%がどくどくと脈打つ%語彙_ペニス()%から唇を離すと、%語彙_精液()%が糸を引いた…[$NC]</kojo>
	</command>
	<command com="ORAL" name="机下フェラ">
		<kojo place="TOP" isPlayer="実行" emotion="GOOD" isMob="TRUE" priority="2" eval="{HOKJ_CHECK_ELEMENT([$KC], "机")}">「んぷっ……❤　フーッ……　はぁ……　んぐっ！　はぁぁぁ、ん、ちゅるるぅ❤」
「はぁ……、お客様に……こんなところでさせて……信じられない、んぐっ……❤」
「もし見られたら、んっ――！　どうするつもりなのかしら❤　この変態……❤」</kojo>
	</command>
	<command com="RAPE_INSERTED" name="レイプ">
		<kojo place="" isPlayer="対象" priority="1">「いやぁぁぁ！　やだ！　やめて……！！　私の中に入ってこないでぇ！」</kojo>
	</command>
	<command com="RAPE_INSERTED" name="レイプ">
		<kojo place="" isPlayer="対象" priority="1">「こんなのいやぁっ！！　や゛めてっ……！　気持ち悪いっ！　いや゛ぁぁぁっ！」　</kojo>
	</command>
	<command com="RAPE_INSERTED" name="レイプ">
		<kojo place="" isPlayer="対象" priority="1">「ひ゛っぐ……。ひどい……、私を汚さないで……、お願いいぃぃ」</kojo>
	</command>
	<command com="RAPE_INSERTED" name="レイプ">
		<kojo place="" isPlayer="対象" priority="1">「も゛うやだぁ……。どうして……こんな……　ひっぐっ……」</kojo>
	</command>
	<command com="RAPE_INSERTED" name="レイプ">
		<kojo place="" isPlayer="対象" priority="1">「なかはやめて……お願い……お願いします！　いや゛あぁぁぁぁぁ！！！！」</kojo>
	</command>
</kojodef>


code:
@SHOW_CHARA_EXPLANATION_14

PRINTFORML フォルメンで雇用した流れの傭兵
PRINTFORML 特技は軽業、鍵開け、罠抜けほか、斥候技能全般
IF K14_DFLAG_原理 == 2
	PRINTFORML 闇に溶ける忍装束を纏い、夜をしなやかに駆ける黒豹のような女性
	PRINTFORML 出身は東方辺境、峻険な山岳の隠れ里に根付いた先祖伝来の『術』を受け継ぐ『草』の者
	PRINTFORML 幼少期から厳しく養成され、東方独特の術理を駆使し、かく乱や幻惑に長ける
	PRINTFORML 『術』は、魔道工学に近似する部分と、魔法に通ずる部分の二面性を持ち合わせているようだ
	PRINTFORML 間諜を得手とする『草』として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていたが、
	PRINTFORML 最終的に、%ANAME(MASTER)%のもとで悠々自適のスローライフを送ることになった
	PRINTFORML 里を離れた後も修練に励み、%ANAME(MASTER)%の援けもあり彼女なりの秘術『影縫い』に至った
	PRINTFORML 彼女自身は謙遜するが、術理としては師の奥義『影縛り』とほぼ遜色のない段階まで錬り上げられている
	PRINTFORML 分身の展開、そこから繰り出される残像殺法は、幻魔の如き攻防一体を実現する
ELSEIF K14_DFLAG_錬磨 == 4
	PRINTFORML 闇に溶ける忍装束を纏い、夜をしなやかに駆ける黒豹のような女性
	PRINTFORML 出身は東方辺境、峻険な山岳の隠れ里に根付いた先祖伝来の『術』を受け継ぐ『草』の者
	PRINTFORML 幼少期から厳しく養成され、魔導工学に近似した東方独特の術理を駆使し、かく乱や幻惑に長ける
	PRINTFORML 間諜を得手とする『草』として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていた
	PRINTFORML 現在の環境は、それなり以上に満足のいくものであるらしい
	PRINTFORML 最終的に、%ANAME(MASTER)%のもとで悠々自適のスローライフを送ることになった
	PRINTFORML 里を離れた後も修練に励み、%ANAME(MASTER)%の援けもあり彼女なりの秘術『影縫い』に至った
	PRINTFORML 彼女自身は謙遜するが、術理としては師の奥義『影縛り』とほぼ遜色のない段階まで錬り上げられている
	PRINTFORML 分身の展開、そこから繰り出される残像殺法は、幻魔の如き攻防一体を実現する
ELSEIF K14_DFLAG_錬磨 >= 1 && K14_DFLAG_錬磨 <= 3
	PRINTFORML 闇に溶ける忍装束を纏い、夜をしなやかに駆ける黒豹のような女性
	PRINTFORML 出身は東方辺境、峻険な山岳の隠れ里に根付いた先祖伝来の『術』を受け継ぐ『草』の者
	PRINTFORML 幼少期から厳しく養成され、魔導工学に近似した東方独特の術理を駆使し、かく乱や幻惑に長ける
	PRINTFORML 間諜を得手とする『草』として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていた
	PRINTFORML 現在の環境は、それなり以上に満足のいくものであるらしい
	PRINTFORML 最終的に、%ANAME(MASTER)%のもとで悠々自適のスローライフを送ることになった
	PRINTFORML 日々の暮らしの中で改めて自身の『術』に向き合い、彼女なりの奥義に至るべく修練に励んでいる
	SETCOLOR COLOR("シルバー")
	PRINTFORML 　現在修行中…（{K14_修行ポイント01}／100）
	RESETCOLOR
ELSEIF K14_DFLAG_睦言 == 2
	PRINTFORML 闇に溶ける忍装束を纏い、夜をしなやかに駆ける黒豹のような女性
	PRINTFORML 出身は東方辺境、峻険な山岳の隠れ里に根付いた先祖伝来の『術』を受け継ぐ『草』の者
	PRINTFORML 幼少期から厳しい訓練を受け育て上げられてきた
	PRINTFORML 魔導工学に近似した東方独特の術理も駆使し、かく乱や幻惑に長ける
	PRINTFORML 間諜を得手とする『草』として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていた
	PRINTFORML 現在の環境は、それなり以上に満足のいくものであるらしい
	PRINTFORML 最終的に、%ANAME(MASTER)%のもとで悠々自適のスローライフを送ることになった
ELSEIF K14_DFLAG_術理 == 2
	PRINTFORML 闇に溶ける忍装束を纏い、夜をしなやかに駆ける黒豹のような女性
	PRINTFORML 出身は東方辺境、峻険な山岳の隠れ里に根付いた先祖伝来の『術』を受け継ぐ『草』の者
	PRINTFORML 幼少期から厳しい訓練を受け育て上げられてきた
	PRINTFORML 魔導工学に近似した東方独特の術理も駆使し、かく乱や幻惑に長ける
	PRINTFORML 間諜を得手とする『草』として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていた
	PRINTFORML 現在の環境は、それなり以上に満足のいくものであるらしい
ELSEIF K14_DFLAG_郷里 == 2
	PRINTFORML 闇に溶ける忍装束を纏い、夜をしなやかに駆ける黒豹のような女性
	PRINTFORML 出身は東方辺境、峻険な山岳の隠れ里に根付いた先祖伝来の『術』を受け継ぐ『草』の者
	PRINTFORML 幼少期から厳しい訓練を受け育て上げられてきた
	PRINTFORML 間諜を得手とする『草』として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていた
	PRINTFORML 現在の環境は、それなり以上に満足のいくものであるらしい
ELSEIF K14_DFLAG_流浪 == 2
	PRINTFORML この辺りでは見かけない装束を纏い、面妖な『術』を操る謎の女性
	PRINTFORML 傭兵として東方の小国同士の小競り合いやフロリア内戦に派遣されて暗躍するも、
	PRINTFORML 戦乱の日々の中で精神を擦り減らし、ついには足抜けを決意
	PRINTFORML 夜の街を駆ける日銭稼ぎの何でも屋に身をやつし、なおも満たされない日々を送っていた
ELSE
	PRINTFORML この辺りでは見かけない装束を纏い、面妖な『術』を操る謎の女性
	PRINTFORML どうも堅気ではない雰囲気を纏っているが……？
ENDIF
;DE『継承』『燃水』の文を下に回す
IF K14_DFLAG_燃水 == 4
	PRINTFORML 術の継承・発展は多岐に渡り、『燻毒』『火遁』『煙炬』の術をはじめとした搦め手も多数備えている
ELSEIF K14_DFLAG_燃水 >= 1 && K14_DFLAG_燃水 <= 3
	PRINTFORML 術の継承・発展は多岐に渡り、『燻毒』の術をはじめとした搦め手も多数備えている
	PRINTFORML 現在は、新たに獲得した資源を用いた術の開発に励んでいる
	SETCOLOR COLOR("シルバー")
	PRINTFORML 　現在修行中…（{K14_修行ポイント03}／100）
	RESETCOLOR
ELSEIF K14_DFLAG_継承 == 4
	PRINTFORML 術の継承・発展は多岐に渡り、『燻毒』の術をはじめとした搦め手も多数備えている
ELSEIF K14_DFLAG_継承 >= 1 && K14_DFLAG_継承 <= 3
	PRINTFORML 不運にも行き違った同郷の者が遣った術を再現すべく、修練に励んでいる
	SETCOLOR COLOR("シルバー")
	PRINTFORML 　現在修行中…（{K14_修行ポイント02}／100）
	RESETCOLOR
ENDIF


code:
;-------------------------------------------------
;desc  :口上デイリーを登録する。REGISGER_KOJO_DAILYを呼び出す
;param :対象:対象のキャラ番号
;-------------------------------------------------
@CREATE_KOJO_DAILY_MAP_K14(対象)
#DIM 対象
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "WANDERING_LIFE", "流浪")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "NATIVE_PLACE", "郷里")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ART_THEORY", "術理")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "PILLOW_TALK", "睦言")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ART_TRAINING", "錬磨")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ART_MIMICS", "継承")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ART_PRINCIPLE", "原理")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "PRACTICE_MATCH", "手合")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "GREEN_TEA", "喫茶")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "CRUDE_OIL", "燃水")


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_ART_PRINCIPLE_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_ART_PRINCIPLE_DECISION(対象)
#DIM 対象

;デイリーイベント『錬磨』まで達成すると発生
SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_術理 != 2
	RETURN 0
SIF K14_DFLAG_錬磨 != 4
	RETURN 0
SIF K14_DFLAG_原理
	RETURN 0
;好感度3500を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 3499
	RETURN 0
;ソーニャが雇用されている
SIF CFLAG:NAME_TO_CHARA("UC_ソーニャ"):所属 != CFLAG:MASTER:所属
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_ART_PRINCIPLE_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_ART_PRINCIPLE(対象)
#DIM 対象
VARS UC_ススキ = "UC_ススキ"
VARS UC_ソーニャ = "UC_ソーニャ"
VARI ススキ_ID
VARI ソーニャ_ID

ススキ_ID = NAME_TO_CHARA("UC_ススキ")
ソーニャ_ID = NAME_TO_CHARA("UC_ソーニャ")

CALL FL_PLAYBGM("Battle_1.ogg")
VARS TEXT
{
	TEXT '= @"
		\n
		さる魔物の群れの討伐依頼の最中のこと[$W]\n
		――周囲を取り巻く魔物の群れ、これをいかにして切り抜けるか[$W]\n
		"
}
PRINTL
PRINTL
CALL PRINT_DIAG(TEXT)
PRINTL
CALL DRAW_PORTRAIT(ソーニャ_ID, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
CALL FL_PLAYSE("Charge_0.mp3")
{
	TEXT '= @"
		[UC_ソーニャ]:「私が……一掃する……」[$W]\n
		\n
		大魔術の詠唱を開始するソーニャ[$W]\n
		紡がれる言霊は、只人には見えず、しかしそこに確かに存在する何者かに語りかけるものだ[$W]\n
		……渦巻くマナの奔流は、ヒトよりも魔の者を引き寄せる[$W]\n
		幾多の魔物が、その眼をマナの流れの結節点に向け――[$W]\n
		\n
		[UC_ススキ]:「――分身の術」[$W]\n
		\n
		どろん、と澱んだ空気層が、刹那にその視線を遮断する[$W]\n
		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Explode_2.mp3")
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
{
	TEXT '= @"
		ソーニャの足元に影のように蹲った黒い人型――[$W]\n
		ススキの姿が幾重にもぶれ、散布された煌めくマナ触媒の霧の内から、無数の分身が湧き立った[$W]\n
		\n
		[UC_ススキ]:「鬼さんこちら、手の鳴る方へ――ってね」[$W]\n
		\n
		ソーニャに注視していた魔物たちは、目の前に突如出現した分身に泡を食ったように標的を変え――[$W]\n
		\n
		[UC_ソーニャ]:「……マナストーム」[$W]\n
		\n
		その間隙を縫って、ソーニャの詠唱が完了する[$W]\n
		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Explode_0.mp3")
{
	TEXT '= @"
		刹那、形の無い天蓋を裂くように、虚空より巻き起こった魔力の大嵐[$W]\n
		のたくる巨大な蛇にも似た、鋼の質量を持つ熱風が、魔物の群れを薙ぎ払う――[$W]\n
		\n
		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_STOPBGM()
{
	TEXT '= @"
		…………[$W]\n
		………[$W]\n
		……[$W]\n
		…[$W]\n
		"
}
CALL PRINT_DIAG(TEXT)
PRINTL
CALL FL_PLAYBGM("Orient_0.ogg")
{
	TEXT '= @"
		帰路の野営の最中――[$W]\n
		夜番を買って出たススキが焚火を弄っていると、テントから物音が聞こえてくる[$W]\n
		……ランタンを片手に歩み寄ってくる、ソーニャの姿だった[$W]\n
		"
}
CALL PRINT_DIAG(TEXT)
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:通常][サイズ:180px][POS_X:0]")
CALL DRAW_PORTRAIT(ソーニャ_ID, "[感情:通常][サイズ:180px][POS_X:200px]",,1)
PRINTL
{
	TEXT '= @"
		[UC_ススキ]:「どしたの？　眠れない？」[$W]\n
		\n
		ソーニャに隣に座るよう促しながら、ススキが問う[$W]\n
		\n
		[UC_ソーニャ]:「ううん……ススキにお礼を言いたくて。さっきは……ありがとう」[$W]\n
		\n
		[UC_ススキ]:「ああ、こちらこそ。きみの判断が早くて、対応するのがやっとだった」[$W]\n
		\n
		[UC_ソーニャ]:「『術』……すごいね」[$W]\n
		\n
		[UC_ススキ]:「本職の魔術師にそれを言ってもらえるのはありがたいけど。そっちのほうが、威力も出力も上でしょうに」[$W]\n
		\n
		あまり裏表のないソーニャの心からの賞賛に、頬を掻きながら応じるススキ[$W]\n
		腹芸なしのやり取りは、やはりこそばゆいものである[$W]\n
		\n
		[UC_ソーニャ]:「それはそれ。小回りというか……瞬発力？　は、そちらが数段上」[$W]\n
		\n
		[UC_ススキ]:「そりゃあ、瞬時に打てないと、実戦では通用しないしね。まあ、目的と用途の違いというか」[$W]\n
		\n
		[UC_ソーニャ]:「同じ目的に限っても……一部は魔法が及ぶ領域を超えてる部分も、あるよ」[$W]\n
		\n
		ソーニャが珍しく、縷々、言葉を連ねる[$W]\n
		\n
		[UC_ソーニャ]:「幻惑の魔法には『アルカナミラージュ』がある……けど、分身は鏡像とも全く違う」[$W]\n
		[UC_ソーニャ]:「分身の多重創出と……それら一体一体の独立駆動……まるで、使い魔の創出―― っ」[$W]\n
		\n
		突然、ソーニャの口元に寄せられた人差し指が、彼女の言葉を遮った[$W]\n
		\n
		[UC_ススキ]:「おっと、それまでさ。あんまり術理解析をされると――」[$W]\n
		\n
		肩を竦めたススキが、苦笑いとともに、ちっちっ、指を振る[$W]\n
		\n
		[UC_ススキ]:「きみの口を封じなきゃいけなくなる」[$W]\n
		\n
		[UC_ソーニャ]:「……、……わかった」[$W]\n
		\n
		ソーニャは気圧された、というより、納得したように引き下がる[$W]\n
		それが、ススキなりの配慮の形であると、それなりに長い付き合いからわかっていたからだろう[$W]\n
		……ゆえに、悪戯っぽく笑って、こう続けた[$W]\n
		\n
		[UC_ソーニャ]:「じゃあ……これから、独り言を喋るね」[$W]\n
		\n
		[UC_ススキ]:「……へえ？」[$W]\n
		\n
		[UC_ソーニャ]:「『術』はマナ触媒をエネルギー源としてはいるけれど……」\n
		[UC_ソーニャ]:「部分的には、魔導工学より……魔法の側に近しいもののように見える」[$W]\n
		\n
		すう、と目を細めたススキはだが、ゆったりと座りなおすと、先を促した[$W]\n
		\n
		[UC_ソーニャ]:「最たるものが……『術』を唱える時の口訣と手指の結印。あれは……魔法における『詠唱』に相当するもの」[$W]\n
		\n
		[UC_ススキ]:「確かに東方のほうにも、こっちの魔法とよく似た、超常現象を引き起こす術法はあったかな」[$W]\n
		[UC_ススキ]:「『術』も、大元はそれを参考にしているんだろうけど」[$W]\n
		\n
		[UC_ススキ]:「そもそも、魔法ってなんなのさ？」[$W]\n
		\n
		[UC_ソーニャ]:「イメージとしては……世界との対話を通して、その力を借り受ける手法……かな」[$W]\n
		\n
		[UC_ソーニャ]:「有り体に言えば……こことは異なる次元・位相との結節点……窓のようなものを開く」[$W]\n
		[UC_ソーニャ]:「そこから射し込むもの……マナを詠唱によって方向づけ、様々な事象を起こしてもらうの」[$W]\n
		\n
		[UC_ススキ]:「魔導工学は、エネルギー源をマナ触媒……物的に固定されたマナで賄い、機械的に転換させることで現象を起こさせるんだっけ」[$W]\n
		\n
		[UC_ソーニャ]:「そうみたい……あんなに回りくどいやり方をすると……発揮できる力も、かなり小さいと思うけど」[$W]\n
		\n
		[UC_ススキ]:「万人に扱える、ってところがミソなんだろうね」[$W]\n
		\n
		……『術』に話を戻すね、とソーニャ[$W]\n
		\n
		[UC_ソーニャ]:「『術』は空間へのマナの充填に触媒を用い……口訣と結印によってその発現を制御する」[$W]\n
		\n
		[UC_ソーニャ]:「前段の部分は魔導工学に近く……後段の作用プロセスについては魔法に近い」[$W]\n
		[UC_ソーニャ]:「魔法より出力は小さい……でも、効果の柔軟性は魔導工学に勝る……そういうふうに、見えるけど。　どう？」[$W]\n
		\n
		[UC_ススキ]:「………」[$W]\n
		\n
		反応をうかがうようなソーニャの視線に――[$W]\n
		\n
		[UC_ススキ]:「……うん。勉強になった。そういうカラクリなのか、『術』って」[$W]\n
		\n
		あっけらかんと言い放ったススキに、ソーニャは目をぱちくりさせてしまっていた[$W]\n
		\n
		[UC_ソーニャ]:「……もしかして。原理も知らずに、『術』を使っていたの？」[$W]\n
		\n
		[UC_ススキ]:「まあ、秘伝の技だし。そういうもの、として打ってたからね。いやあ、こんな里から遠く離れた所で、理屈を学ぶ機会がくるとは」[$W]\n
		\n
		愉快気に笑うススキに、ソーニャは押し黙り、考えを巡らせる[$W]\n
		\n
		[UC_ソーニャ]:（……言霊だけでなく、手指の印相をも用いて非常に短い工程に圧縮された呪唱のカタチ）[$W]\n
		[UC_ソーニャ]:（遥か昔に失われし、古代のエルフたちが繰ったという『高速詠唱』と、何か関係が……？）[$W]\n
		\n
		[UC_ソーニャ]:「ススキ、もしよければ――」[$W]\n
		\n
		……ソーニャの願いを先回りするように、ススキは両手で×印を作って見せた[$W]\n
		\n
		[UC_ススキ]:「あー……ゴメン、それはダメ。堪忍ね？」[$W]\n
		\n
		[UC_ソーニャ]:「そう……残念」[$W]\n
		\n
		しょぼん、とした様子のソーニャ[$W]\n
		それを見やったススキはうーん、と腕を組んで、しばし考えに耽った[$W]\n
		\n
		[UC_ススキ]:「とはいえ……ソーニャの魔法の講義は聞いちゃったワケだし……」[$W]\n
		\n
		瞑目し、うーんうーん、と二、三度唸り……　ふっ、と息を吐くと[$W]\n
		\n
		[UC_ススキ]:「……、……まあ。印の結び方くらいならいいか」[$W]\n
		\n
		[UC_ソーニャ]:「……いいの？」[$W]\n
		\n
		[UC_ススキ]:「いやあ。ソーニャの話を聞くまでは、ただのハンドサインみたいなものだと思ってたし」[$W]\n
		[UC_ススキ]:「この際だから技術交流もありかも、ってね。もしかしたら、新しい『術』を編み出すきっかけになるかもしれないし」[$W]\n
		\n
		[UC_ソーニャ]:「研究熱心というか……なんというか」[$W]\n
		\n
		ソーニャは少し呆れたように笑い、ススキは稚気に溢れた笑みを返す\n
		\n
		[UC_ススキ]:「とりあえず……他の人にはナイショ、ナイショでね」[$W]\n
		\n
		[UC_ソーニャ]:「うん……二人だけの、秘密」[$W]\n
		\n
		[UC_ススキ]:「……うーん、なんだかイケない雰囲気だね！」[$W]\n
		\n
		[UC_ソーニャ]:「ススキ……ちょっと、オジサンっぽい」[$W]\n
		\n
		[UC_ススキ]:「なにおうー！」[$W]\n
		\n
		あははー、と笑いあいながら、二人の夜は更けていった……[$W]\n
		\n
		"
}
CALL PRINT_DIAG(TEXT)
;魔術経験値増加処理　もともと素養があったと見るべき？
CALL PRINT_ADD_EXP(NAME_TO_CHARA("UC_ススキ"), "魔術経験値", 700, 1)
CALL TRAIN_AUTO_ABLUP(NAME_TO_CHARA("UC_ススキ"), 2)
PRINTFORMW %ANAME(対象)%はソーニャの手ほどきを受け、魔術経験値を獲得した

CALL FL_STOPBGM()
K14_DFLAG_原理 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_GREEN_TEA_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_GREEN_TEA_DECISION(対象)
#DIM 対象

;デイリーイベント『睦言』まで達成すると発生
SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_睦言 != 2
	RETURN 0
SIF K14_DFLAG_喫茶 == 2
	RETURN 0
;クエスト52「東方世界への道」をクリアすると発生する
SIF QST_SV_QUEST_FLAG:52 != 2
	RETURN 0
;好感度5000を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 5000
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_GREEN_TEA_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_GREEN_TEA(対象)
#DIM 対象
VARS UC_ススキ = "UC_ススキ"
VARI ススキ_ID

ススキ_ID = NAME_TO_CHARA("UC_ススキ")

VARS TEXT
CALL FL_PLAYBGM("Orient_0.ogg")
PRINTL
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
{
	TEXT '= @"
		[UC_ススキ]:「……緑茶がのみたい」[$W]

		ある日の喫茶休憩中、突然、ススキがそんなことを言い出した[$W]

		[UC_ススキ]:「どっちも同じ東方伝来の『茶』だろうって？」[$W]
		[UC_ススキ]:「いや、紅茶が悪い、というわけじゃないんだけどさ……やっぱり、違う飲み物なんだよ、うん」[$W]

		手元の紅茶を揺すりながら、うーん、とススキが嘆き節[$W]

		[UC_ススキ]:「紅茶は茶葉を発酵させてるから、独特の豊かな風味と味わいを持つ。綺麗な琥珀色も、紅茶の特徴だよね」[$W]
		[UC_ススキ]:「緑茶はただ蒸すだけだから、緑色が保たれ、熱で壊れなかった成分が残った状態で新鮮な風味がするんだ」[$W]

		同じ茶葉が原料なのに、処理によって大分変わるものなんだなあ[$W]

		[UC_ススキ]:「そうだねえ。緑茶は……なんというか、爽やかさと苦みのバランスが絶妙というか」[$W]
		[UC_ススキ]:「淡い緑色とか、草のような匂いとか、やっぱり紅茶とは異なる存在感があるのさ」[$W]

		中央世界の方でも、紅茶が大勢を占めるまでは、上流階級に薬草のような扱いで飲用されてたという話だけど[$W]

		[UC_ススキ]:「そう、やっぱり高級品なんだよね。もっと何の衒いもなく気軽に飲めるといいんだけどねえ」[$W]

		まあ、大衆に広まるにはそれなりの理由が必要だろうし[$W]
		そもそも、あの匂いが苦手、という人も多いのでは？[$W]

		[UC_ススキ]:「うーん、そればっかりは民族性もあるだろうけど。でも、慣れるとあれが病みつきになると思うよ」[$W]
		[UC_ススキ]:「ま、輸入するにあたっても水分が飛んでる紅茶の方が保存性が高いのもわかるし、商品としても売れ筋なんだろうけど」[$W]

		[UC_ススキ]:「昨今の都市部の健康ブームにあやかって、こう、販路拡大とかしないものかねえ」[$W]
		[UC_ススキ]:「砂糖入れたりミルク入れなくても済むから健康にもいいし、良いことづくめだと思うけど」[$W]

		熱のこもったススキの緑茶プレゼンを聞きながら……[$W]
		彼女の出自……里のことに、少し思いを馳せていた[$W]

		[UC_ススキ]:「……どしたの？　ヘンな顔して」[$W]

		なんでもない……とだけ返し、続けようとした言葉を飲み込んでおく[$W]
		一日の作業の労苦を労う一服に、彼女の故郷では緑茶が出てきたのだろう[$W]
		妙なこだわりようも、その辺りに原因があるのかもしれないな……と感じる[$MNAME]だった[$W]

		…………[$W]
		………[$W]
		……[$W]
		…[$W]

		後日――[$W]

		[UC_ススキ]:「なにさ、[$MNAME]。改まっちゃって」[$W]

		ススキを呼び出し、丁重に布で包まれた品物を差し出した[$W]
		こちら、ルムア隊商のアゥルフ氏に頼んで、用立ててもらった品々です[$W]

		[UC_ススキ]:「え。湯呑茶碗に、急須に………」[$W]

		呪的封入処置……くさり止めを施した緑茶――煎茶の茶葉の袋を見て、ススキがぴしり、と固まった[$W]
		じっと袋を見つめたまま、たっぷり数十秒経ってから、苦笑いを浮かべたススキがこちらに向き直る[$W]

		[UC_ススキ]:「……ごめん。なんか、おねだりしたみたいになっちゃったね」[$W]

		これくらいは。日頃世話になってるのだから、雇い主としてはそれに報いないと[$W]

		[UC_ススキ]:「そういうところが甘いというか、なんというか……まあ、うん」[$W]

		ブツブツと呟きつつ、頭を掻きながら――ススキは、はにかむ様に笑った[$W]
		"
}
CALL PRINT_DIAG(TEXT)
PRINTL
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:幸][サイズ:180px][POS_X:0]",,1)
PRINTL
{
	TEXT '= @"

		[UC_ススキ]:「……ありがとう、[$MNAME]」[$W]
		[UC_ススキ]:「じゃあ、早速一服しよっか。私が淹れるよ」[$W]

		容器を一通り洗い清めると、ススキは丁寧に急須と湯呑に沸騰したお湯を注ぎ、容器を暖める[$W]
		同時に、急須に注ぐためのお湯を別に取り、しばらく冷ましていた[$W]

		[UC_ススキ]:「緑茶を淹れるには、温度管理が重要でさ。あんまり熱いお湯を入れちゃうと、苦みが多く出てきちゃうんだ」[$W]
		[UC_ススキ]:「ひと手間かければ、より美味しくなる。爽やかさとほどよい苦みが、緑茶の一番の醍醐味だからね」[$W]

		急須を暖めるためのお湯を切り、茶葉を匙で測り取って入れる[$W]
		その後、適温になったお湯をゆっくりと急須に注いでいく……[$W]

		[UC_ススキ]:「一煎目はゆっくり時間をかけて。二煎目は茶葉が開いてるから短めに……だったかな？」[$W]
		[UC_ススキ]:「最後の一滴まで、全て注ぎ切って……はい、どうぞ」[$W]

		湯呑茶碗に満々と注がれた、淡緑色の美しい液体[$W]
		ふわり、と漂う、生気に溢れた草葉の香り[$W]

		口をつけると、口腔内に鮮烈な苦み――[$W]
		のち、不思議な甘みが充満し、芳醇な緑の香りが全てを包んで駆け抜けていく[$W]
		ゆっくり飲まないと勿体ない、と思える、そんな味わいだった[$W]

		[UC_ススキ]:「……お粗末様でした」[$W]

		結構なお点前で？[$W]

		[UC_ススキ]:「それはちょっと違う時のコメントじゃないかなあ」[$W]

		ふふ、と笑いながら、ススキがじっと自分の分の緑茶を見つめる[$W]

		[UC_ススキ]:「ん……」[$W]

		意を決したように、緑茶を一口[$W]
		柔らかな表情でススキが、ふぅ、と吐いたため息は、複雑な色を帯びていた[$W]

		……二人で、ただ領地の田園風景を眺めながら、緑茶を喫する[$W]
		言葉がなくとも、隣り合って同じ時間を共有できることが、古来より茶の美徳であったのだろう[$W]

		遠く流れてきた異邦の地で、同じく遠くよりやってきた茶を味わうススキの姿を、横目に見る[$W]

		彼女の心情の全てを推し量ることはできないけれど……[$W]
		ひとときでも、その無聊の慰めになれたならば良かったな、と[$W]

		――そんなことを、思ったのだった[$W]
		"
}
CALL PRINT_DIAG(TEXT)
PRINTW
CALL FL_STOPBGM()
K14_DFLAG_喫茶 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_PRACTICE_MATCH_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_PRACTICE_MATCH_DECISION(対象)
#DIM 対象

;デイリーイベント『錬磨』まで達成すると発生
SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_術理 != 2
	RETURN 0
SIF K14_DFLAG_錬磨 != 4
	RETURN 0
SIF K14_DFLAG_手合
	RETURN 0
;好感度3500を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 3499
	RETURN 0
;アーレンが雇用されている
SIF CFLAG:NAME_TO_CHARA("UC_アーレン"):所属 != CFLAG:MASTER:所属
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_PRACTICE_MATCH_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_PRACTICE_MATCH(対象)
#DIM 対象
VARS UC_ススキ = "UC_ススキ"
VARS UC_アーレン = "UC_アーレン"
VARI ススキ_ID
VARI アーレン_ID

ススキ_ID = NAME_TO_CHARA("UC_ススキ")
アーレン_ID = NAME_TO_CHARA("UC_アーレン")

CALL FL_STOPBGM()
VARS TEXT
{
	TEXT '= @"
		早朝――[$W]

		領地の大半がまだ寝静まっているその中で、緊張感に満ちた対峙が起きていていることを知るものは少ない[$W]

		所は領地の広場[$W]
		人っ子一人いないその空間に、ススキとアーレンの姿がある[$W]
		"
}
PRINTL
PRINTL
CALL PRINT_DIAG(TEXT)
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:通常][サイズ:180px][POS_X:0]")
CALL DRAW_PORTRAIT(アーレン_ID, "[感情:通常][サイズ:180px][POS_X:200px]",,1)
PRINTL
{
	TEXT '= @"
		早朝の鍛錬に出ていた両者がかち合い、互いの得物について論評をし、ごくごく自然な流れで――[$W]

		「じゃあ、一手、手合わせを所望」[$W]

		となったのは、双方ともに伝承武術の遣い手であったが故だろうか[$W]

		ススキは短刀を構え、アーレンは愛槍・ラグダールを対手に据えている[$W]
		得物の間合いの優劣で言えば、圧倒的にアーレンに分があると言えよう[$W]

		穂先を下げつつ、ゆらゆらと槍を揺らし、隙を作っては消すアーレン[$W]
		虚実往来――次の動き、攻め手、詰め時を悟らせぬ、ランベルス流槍術の基本の構えであろうか[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Slash_1.mp3")
TWAIT 500, 1
CALL FL_PLAYBGM("BOSS_9.ogg")
{
	TEXT '= @"
		[UC_アーレン]:「ふ――ッ！」[$W]

		先に仕掛けたのはアーレン。虚から実へ――刹那の一突き[$W]
		一足に間合いを詰め、ラグダールがススキへ牙を剥く[$W]

		[UC_ススキ]:「………！」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Speed_0.mp3")
{
	TEXT '= @"
		対するススキは迫る青い一閃を、間合いを外して回避[$W]
		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Critical_0.mp3")
{
	TEXT '= @"
		啄木鳥の如く、目にも留まらぬ超高速で繰り返し放たれる鋭槍を、その名の通り風にそよぐ芒の葉の如くのらくらと凌いでいく[$W]

		アーレンは攻め手を緩めず、長大な槍を軽々と振るって追撃――槍の得手は、刺突だけではない[$W]
		刺突が出たと思えば、次の瞬間には旋回した石突が下段に放たれ、そのまま旋転した槍穂が横薙ぎに飛んでくる[$W]
		変幻自在に繰り出される鮮やかな槍撃は、反撃の隙も与えぬように見えたが――[$W]

		[UC_ススキ]:「槍は鋭い――けど」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Whip_2.mp3")
{
	TEXT '= @"
		ススキは涼し気な顔でラグダールの横薙ぎの一閃をブリッジ回避――[$W]
		そのまま、逆エビの体勢から、いかなる仕儀か後方に跳ね飛び距離を取る！[$W]

		[UC_ススキ]:「ちょっと、攻撃一辺倒にすぎるかね？」[$W]
		[UC_アーレン]:「！！」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Guard_0.mp3")
{
	TEXT '= @"
		咄嗟に槍を構えなおしたアーレンの眼前で、鈍い金属音ともに何かが弾け飛んだ[$W]
		いつ放たれたものか――ススキの手裏剣が、急所狙いで飛来してきていたのだ[$W]

		着地したススキの両手にいつの間にか収まっていた手裏剣が、間髪入れず次々と打ち放たれていく[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Throw_0.mp3")
TWAIT 500, 1
CALL FL_PLAYSE("Throw_0.mp3")
{
	TEXT '= @"
		[UC_アーレン]:「あらよっ――とぉ！」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Guard_0.mp3")
TWAIT 500, 1
CALL FL_PLAYSE("Slash_4.mp3")
{
	TEXT '= @"
		ひょい、ひょいと出どころも見せぬまま放たれる手裏剣を、アーレンの槍が一つ残らず叩き落す[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Speed_0.mp3")
{
	TEXT '= @"
		その間隙を縫うように――地を這う蜘蛛のような体勢のまま、ススキが一足で間合いを詰めに行く！[$W]

		[UC_アーレン]:「ッせぇい！」[$W]

		だが、槍遣いの本領はここから。手裏剣を弾いた動作から流れるように、円を描いた穂先の煌めきがススキに向かう[$W]
		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("HeavySlash_1.mp3")
{
	TEXT '= @"
		奔るラグダール、地を掃う神速の下段薙ぎ払い――[$W]

		[UC_アーレン]:「！！」[$W]

		アーレンが、驚愕に目を見張る[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("HeavySmash_0.mp3")
TWAIT 1000, 1
{
	TEXT '= @"
		[UC_ススキ]:「槍を封じるなら――この手――いや、足に限る、か」[$W]

		地に縫い付けられたラグダールの「上」に軽やかに立つススキの姿[$W]
		体重で槍を封殺しつつ、そのまま、槍の上を滑るように入り身し、短刀を閃かせ――[$W]

		[UC_ススキ]:「ッ！？」[$W]
		[UC_アーレン]:「っでぃぃやぁッ！」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("HeavySmash_2.mp3")
{
	TEXT '= @"
		咄嗟に槍から手を離したアーレン渾身の飛び蹴りが、ススキを弾き飛ばす！[$W]

		"
}
CALL PRINT_DIAG(TEXT)
TWAIT 800, 1
CALL FL_PLAYSE("Fire_0.mp3")
{
	TEXT '= @"
		後方蜻蛉返りをし、猫のように柔らかく地面に着地するススキ[$W]
		"
}
CALL PRINT_DIAG(TEXT)
TWAIT 800, 1
CALL FL_PLAYSE("Slash_1.mp3")
{
	TEXT '= @"
		足でラグダールを蹴り上げ、頭上でキャッチしたそれを旋回させて肩に担ぎなおしたアーレン[$W]

		…… 一合を終えて、やや弛緩した空気が両者の間に流れる[$W]
		"
}
CALL PRINT_DIAG(TEXT)
TWAIT 1000, 1
PRINTL
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:通常][サイズ:180px][POS_X:0]")
CALL DRAW_PORTRAIT(アーレン_ID, "[感情:良][サイズ:180px][POS_X:200px]",,1)
PRINTL
{
	TEXT '= @"
		[UC_ススキ]:「……今のは、とった、と思ったんだけどね」[$W]

		[UC_アーレン]:「いやぁ、マジで危なかった……ああ来るとは思ってなかった。さすが、ススキの姐さんだ」[$W]

		[UC_ススキ]:「そちらこそ。猪武者かと思いきや、なかなか芸が細かいじゃないの」[$W]

		[UC_アーレン]:「おホメに預かりキョーエツシゴク、ってか？　ただ……」[$W]

		とんとん、と肩を槍で叩きながら、アーレンが心底楽しそうに歯を剥いてキシシ、と笑う[$W]

		[UC_アーレン]:「姐さん。まだ本気出してないだろ？　見せてもらいてーなぁ、『術』」[$W]

		[UC_ススキ]:「あら、いいの？　じゃあ――きみの『奥の手』も、見せてもらおうかな」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Hit_0.mp3")
{
	TEXT '= @"
		にっ、と笑ったススキが、腰衣の辺りを平手で叩き上げる[$W]
		ポーン、と回転しながら飛び出した円筒状の容器が、周囲に煌めくマナ触媒をまき散らし――[$W]

		[UC_ススキ]:「――分身の術」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Explode_2.mp3")
{
	TEXT '= @"
		印を結んだススキの回りで、どろん、と淀んだ気流が渦を巻く[$W]
		刹那にススキの周囲に全く区別がつかない分身が出現、一斉に構えを取った[$W]

		[UC_ススキ]:「さあて……真贋、見極められるかな？」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Wind_0.mp3")
{
	TEXT '= @"
		その言霊を合図にしたように、分身それぞれが別の歩調、別の動作で、一斉にアーレンに襲い掛かる！[$W]

		[UC_アーレン]:「…………」[$W]

		対するアーレンは、両手で青槍を構えると――ふぅ―、と長く息を吐いて目を瞑る[$W]

		[UC_アーレン]:（視覚情報なんざ、却って判別のジャマだ）[$W]\n

		感じ取るべきは対手の地を駆ける足音、動体が揺らす大気、気配の濃淡[$W]
		獣耳をそばだたせ、恐怖を滅し、全神経をススキの所在の割り出しに充てる[$W]

		[UC_アーレン]:（前陣２、中陣１、後陣２のフォーメーション、その中で最も『重い』のは―――）[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL DRAW_PORTRAIT(アーレン_ID, "[感情:通常][サイズ:180px][POS_X:0]",,1)
CALL FL_PLAYSE("Skill_0.mp3")
{
	TEXT '= @"
		[UC_アーレン]:「……視えた！　ランベルス槍殺法――」[$W]

		見開かれた眼、力を蓄えるゼンマイのように、大きく捩じられたアーレンの身体[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Charge_1.mp3")
{
	TEXT '= @"
		主の気迫に応えるように、ヴォン、とその手の内の剛槍が哭く[$W]
		ぎゅるん、と刹那に渦巻いたマナが、その槍穂に不可思議な煌めきと魔風を纏わせ――[$W]

		[UC_アーレン]:「―――そ・こ・だぁ！！」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("HeavySlash_1.mp3")
{
	TEXT '= @"
		突き出した槍から放たれた、蒼く輝く魔力螺旋[$W]
		その奔流が――狙い過たず、分身に紛れたススキ本人に迫る！[$W]

		[UC_ススキ]:「ち――」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Explode_2.mp3")
{
	TEXT '= @"
		ススキは分身の一体を身代わりに凌ぐも、既に眼前には槍を構えて肉薄するアーレンの姿が大写しになっている[$W]

		[UC_アーレン]:「おぉりゃあああ！！！」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Critical_0.mp3")
TWAIT 750, 1
CALL FL_PLAYSE("Critical_0.mp3")
{
	TEXT '= @"
		魔力の残光、輝線を引きながら、流星の如く連続するアーレンの槍撃[$W]
		その精度と速度は、先の攻防とはまるで比べ物にならない[$W]

		一体、また一体と分身を蹴散らしながら、ススキを追い詰める様はまさに突進してくる槍衾に相違なく[$W]
		歳若くして練り上げられた、彼の技量の高さを証明する！[$W]

		ススキの伴った分身、最後の一体を貫き――[$W]

		[UC_アーレン]:「もらっ―――　！？」[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("Wind_0.mp3")
{
	TEXT '= @"
		返しの一突きで止めと、槍を引こうとしたアーレンが、がくん、と不自然に動きを停止する[$W]
		アーレンの視界の端――彼の背後から、足元に伸びた影にクナイを突き立てた分身が、解けて消えた[$W]

		[UC_ススキ]:「……残像殺法……『影縫いの術』」[$W]

		ぎちり、とアーレンの身を縛るのは、ススキの奥の手、秘術中の秘術[$W]
		刹那に攻撃に転じたススキが、刃を閃かせる[$W]
		勝負の趨勢は完全にススキに傾き――あとは止めを待つばかり[$W]

		[UC_ススキ]:（とった―――）[$W]
		[UC_ススキ]:（―――！？）[$W]
		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PAUSEBGM()
PRINTL
CALL FL_PLAYSE("Heartbeat_0.mp3")
PRINTFORMW だから、そんなことは――ありえないのだ
PRINTL
CALL FL_PLAYSE("Heartbeat_0.mp3")
PRINTFORMW なぜだ
PRINTL
CALL FL_PLAYSE("Heartbeat_0.mp3")
PRINTFORMW なぜラグダールが、動いている――？
PRINTL
SETCOLOR 0x00BFFF
CALL TYPE_PRINT("（動けないのは――影を縛った担い手だけだろうさ）", 20)
RESETCOLOR
CALL FL_PLAYSE("Heartbeat_0.mp3")
WAIT
PRINTL
PRINTFORMW と、何者かが嘯く幻聴が、ススキには届いていたか
CALL FL_PLAYSE("Heartbeat_0.mp3")
CALL FL_REPLAYBGM
{
	TEXT '= @"

		ラグダールがアーレンの固まった腕を引きずり回すように動き、切りかかるススキに向けて切っ先を据える[$W]
		それはまるで、青槍そのものが『意思』を持って、反撃の牙を剥こうとしているようで――[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_PLAYSE("HeavySlash_0.mp3")
{
	TEXT '= @"
		――刹那の交錯[$W]

		黒髪の一房が飛ぶ[$W]

		鋭く突き込まれたラグダールは、咄嗟に身を屈めたススキの頭上を掠め――[$W]
		ススキの短刀は、アーレンの胴鎧に据えられていた[$W]

		勝負、あり――[$W]

		"
}
CALL PRINT_DIAG(TEXT)
CALL FL_STOPBGM()
{
	TEXT '= @"
		…………[$W]
		………[$W]
		……[$W]

		"
}
CALL PRINT_DIAG(TEXT)
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:悲][サイズ:180px][POS_X:0]")
CALL DRAW_PORTRAIT(アーレン_ID, "[感情:良][サイズ:180px][POS_X:200px]",,1)
PRINTL
CALL FL_PLAYBGM("Town_2.mp3")
{
	TEXT '= @"
		互いに深々と礼をする二人[$W]

		[UC_アーレン]:「っはー、負けた負けたっ！」[$W]

		アーレンは元気に、それでいて悔し気に、稚気に溢れた表情で笑っている[$W]

		[UC_ススキ]:「うーん……勝った気がしない……」

		対してススキは、反省しきり、という表情で首をひねっていた[$W]

		[UC_アーレン]:「いやぁ、やっぱり搦め手アリじゃあ姐さんには及ばねーわ！」[$W]

		[UC_ススキ]:「そんなこともないさ……『影縫い』まで打たされた段階で、私の作戦負けだ。よく見破ったもんだね」[$W]

		[UC_アーレン]:「俺は耳がいいからな！　分身と姐さん本人じゃあ、少しばかり『音』が違うのがわかるのさ」[$W]

		[UC_ススキ]:「あぁ、そういう……亜人種相手だと、ちょっと気をつけなきゃいけないワケね。勉強になったよ」[$W]

		[UC_アーレン]:「そーそー。ところで勉強ついでに姐さん、もう一合……」[$W]

		[UC_ススキ]:「……命が縮む気がするから、今日はやめとくよ」[$W]

		[UC_アーレン]:「えー」[$W]

		不平を述べるアーレンを小突いて、ススキがニッと笑う[$W]
		また、いずれ――そういう意図を、お互いが感じ取っていたからだろう[$W]

		"
}
CALL PRINT_DIAG(TEXT)
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:幸][サイズ:180px][POS_X:0]")
CALL DRAW_PORTRAIT(アーレン_ID, "[感情:幸][サイズ:180px][POS_X:200px]",,1)
PRINTL
{
	TEXT '= @"
		[UC_ススキ]:「じゃあ、アーレン。よい一日を」[$W]

		[UC_アーレン]:「あいよ。姐さんもな！」[$W]

		爽やかに笑い合いながら、二人は背を向け、歩き出す[$W]
		日が昇り、領地の人々が目覚め始め――　今日も、一日が始まった[$W]

		"
}
CALL PRINT_DIAG(TEXT)
;戦闘経験値増加処理　良い朝の運動でした
CALL PRINT_ADD_EXP(NAME_TO_CHARA("UC_ススキ"), "戦闘経験値", 50, 1)
CALL PRINT_ADD_EXP(NAME_TO_CHARA("UC_ススキ"), "身体経験値", 50, 1)
CALL TRAIN_AUTO_ABLUP(NAME_TO_CHARA("UC_ススキ"), 2)
CALL PRINT_ADD_EXP(NAME_TO_CHARA("UC_アーレン"), "戦闘経験値", 50, 1)
CALL PRINT_ADD_EXP(NAME_TO_CHARA("UC_アーレン"), "身体経験値", 50, 1)
CALL TRAIN_AUTO_ABLUP(NAME_TO_CHARA("UC_アーレン"), 2)

PRINTFORMW %ANAME(対象)%とアーレンは手合わせを経て、戦闘経験値と身体経験値を獲得した

CALL FL_STOPBGM()
K14_DFLAG_手合 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_WANDERING_LIFE_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_WANDERING_LIFE_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪
	RETURN 0
;好感度300を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 299
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_WANDERING_LIFE_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_WANDERING_LIFE(対象)
#DIM 対象

CALL FL_PLAYBGM("Orient_0.ogg")
CALL KJ_PRINT(対象,@"「やあ、%ANAME(MASTER)%」", 1)
PRINTL
CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
PRINTFORMW %ANAME(対象)%がこちらにやってくる
PRINTFORMW 心なしか、楽しげな様子だ
PRINTL
CALL KJ_PRINT(対象,@"「ここはいい所だね。雇ってもらって正解だったよ」", 1)
PRINTL
PRINTFORMW そう……か？　退屈していないか心配だったのだが
PRINTL
CALL KJ_PRINT(対象,@"「そう見える？　まあ……私の特技と前のねぐらからみれば、そういう風に捉えられてもおかしくないか」", 1)
PRINTL
PRINTFORMW 肩を竦める%ANAME(対象)%に、素直に疑問をぶつけてみる
PRINTFORMW その身のこなし、戦闘技術、多種多様な技巧……どう見ても、一山いくらの盗賊には見えない
PRINTL
CALL KJ_PRINT(対象,@"「……買いかぶりすぎだよ。無頼の悪党、それでいいじゃない」", 1)
PRINTL
PRINTFORMW ……まだ身の上について話す気はない、ということかもしれない
PRINTFORMW 彼女とフォルメンで出会ったときの言葉を思い出しつつ、どういう経緯でここに至ったのかを聞いてみる
PRINTL
CALL KJ_PRINT(対象,@"「うーん……雇い主にあんまり隠し立てするのも義理に悖る、か」", 1)
CALL KJ_PRINT(対象,@"「直近だと……フロリア内戦で雇われ兵をやってたんだけど……色々イヤになってね」", 1)
CALL KJ_PRINT(対象,@"「隙を見つけて、うまいことトンズラしたやったわけ」", 1)
PRINTL
PRINTFORMW ようするに、脱走兵ということか……あまり安泰な身の上ではないような
PRINTL
CALL KJ_PRINT(対象,@"「まあね。とはいえ、怖いのは雇い主より、私の……ええと、『派遣元』でね」", 1)
CALL KJ_PRINT(対象,@"「とはいえ、方々で戦乱の絶えない今は稼ぎ時で、追手を出す余裕もない、というのは計算ずくさ」", 1)
CALL KJ_PRINT(対象,@"「それに、抜ける時の偽装には念を入れたから、ホームシックで里帰りとかしない限りは問題ないよ」", 1)
PRINTL
PRINTFORMW で、フォルメンに潜り込んだ、と
PRINTFORMW 潜伏先ではどういう生活をしてきたのか、と問うてみると…
PRINTL
CALL KJ_PRINT(対象,@"「一応の新天地とはいえ、同族の目は避けたいし、あまり陽の当たるトコでのうのうとは暮らせない」", 1)
CALL KJ_PRINT(対象,@"「とはいえ、日々の生計は立てなきゃいけない。幸い、法の隙を縫うような生業とは相性がよくてね」", 1)
CALL KJ_PRINT(対象,@"「とりあえず何でも屋として色々と。バレたら手が後ろに回るようなこともちょいちょいしてきたさ」", 1)
PRINTL
PRINTFORMW ……%ANAME(対象)%は、その口ぶりに、少しばかりの倦怠を滲ませる
PRINTFORMW 生活には困っていなかっただろうし、自分の技を存分に生かし、スリルある日々を送っていたのだろうが……
PRINTFORMW おそらくは、そんな生活も本来彼女の求めたものではなかったのかもしれない
PRINTL
CALL KJ_PRINT(対象,@"「だからね。私には、退屈なくらいがちょうどいいんだ」", 1)
CALL KJ_PRINT(対象,@"「私はここに来たことは後悔してないし、むしろ喜ばしいことだと思ってるから」", 1)
PRINTL
PRINTFORMW たっぷり時間をかけて周囲を振り仰いでから、ふわり、と笑った%ANAME(対象)%
PRINTFORMW その表情が、その言葉に偽りがないことを示していた……
PRINTW
CALL FL_STOPBGM()
K14_DFLAG_流浪 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_CRUDE_OIL_RATE(対象)
#DIM 対象

IF K14_DFLAG_燃水 <= 2
	RETURN 1000
;修行中は（30＋√ススキ好感度）％の確率で
ELSEIF K14_DFLAG_燃水 == 3 && K14_修行ポイント03 <= 100
	RETURN 300 + SQRT(CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度)
;条件を満たしたときは100％に
ELSEIF K14_DFLAG_燃水 == 3 && K14_修行ポイント03 > 100
	RETURN 1000
ELSE
	RETURN 1000
ENDIF
;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_CRUDE_OIL_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_術理 != 2
	RETURN 0
SIF K14_DFLAG_錬磨 != 4
	RETURN 0
SIF K14_DFLAG_継承 != 4
	RETURN 0
SIF K14_DFLAG_燃水 >= 4
	RETURN 0
;クエスト53「城塞都市ヴェロエア」で油田イベント(EV162)をクリアすると発生
SIF QST_SV_EVENT_FLAG:53:162 == 0
	RETURN 0

;好感度4000を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 4000
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_CRUDE_OIL_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_CRUDE_OIL(対象)
#DIM 対象

VARS UC_ススキ = "UC_ススキ"
VARI ススキ_ID

ススキ_ID = NAME_TO_CHARA("UC_ススキ")

VARS TEXT
CALL FL_PLAYBGM("Orient_0.ogg")
PRINTL
PRINTL
CALL DRAW_PORTRAIT(ススキ_ID, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
SELECTCASE K14_DFLAG_燃水
	;導入
	CASE 0
		{
			TEXT '= @"
				運ばれてきた荷樽に、ススキが興味深々といった面持ちを示している[$W]

				[UC_ススキ]:「へぇ、くそうずが手に入るようになったんだ」[$W]

				……くそうず？[$W]

				[UC_ススキ]:「臭水……こっちの言葉だと石油、だっけ？」[$W]
				[UC_ススキ]:「うちの里のほうでもごくごく少量だけど、湧いてる所があってね。これを使う『術』の流派もあったんだ」[$W]

				火炎遣いもいるとは、『草』の世界も幅が広い……[$W]

				[UC_ススキ]:「まあ、火器や爆薬の扱いも私たち『草』の得手とするところだしね」[$W]
				[UC_ススキ]:「遁走や目晦まし、威嚇には、やっぱり本能的な怖れを引き出す『火』の力は重要だよね」[$W]

				呟きながら、石油を少量取ってしげしげと観察し、匂いを嗅いで「んー」と唸り……[$W]

				[UC_ススキ]:「うん……これを利用すれば、いくつかの『術』に使えそうだね」[$W]
				[UC_ススキ]:「ねぇ[$MNAME]、これ、ちょっと分けてもらえないかな？」[$W]

				こちらも使い方を思案していたところではあったので、一も二もなく首肯する[$W]

				[UC_ススキ]:「ありがと。じゃあ、ちょっと研究してみるとしますか！」[$W]

				楽し気なススキに引っ張られるように、あなたは術の試行に付き合うことになった……[$W]
				"
		}
		CALL PRINT_DIAG(TEXT)
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_燃水 = 1
		RETURN 1
	;鍛錬初回
	CASE 1
		{
			TEXT '= @"
				[UC_ススキ]:「来たね、[$MNAME]」[$W]

				[UC_ススキ]:「まずは、今回の術の方向性だけど……」[$W]
				[UC_ススキ]:「まあ、石油を使う以上、炎を扱う術になるのは当然だね」[$W]
				[UC_ススキ]:「調べてみたけど……不思議なことに、石油そのものがマナ触媒ほどではないけど、マナを含有してるみたいなんだ」[$W]

				……やっぱり、古生物由来、って説が濃厚なのだろうか[$W]
				太古の生物の体液だと思えば、説明がつく部分も多いのではあるが[$W]

				[UC_ススキ]:「そうだね。まあ、無加工では扱いにくいから、少し加工することにはなりそうだけど」[$W]
				[UC_ススキ]:「らんびきとかで成分を分離して、粘性の違いで使い分けてみようと思う」[$W]

				やっぱり、散布しながら使う形になるのだろうか[$W]

				[UC_ススキ]:「確かに考え方は『燻毒の術』にも近いけど、もともと石油は引火するものだし」[$W]
				[UC_ススキ]:「その発火、爆燃の方向性を絞ったり、一瞬で燃え尽きて終わりにせず、継続して燃やし続けるとかね」[$W]

				「消えない炎」とか、考えるだにぞっとする……[$W]

				[UC_ススキ]:「まあ、やってみなくちゃわからないことも多いんだ」[$W]
				[UC_ススキ]:「火事にだけは気をつけて、色々試してみるとしようかね」[$W]

				錬金学者や薬師顔負けだな……と思いつつ、ススキの実験に付き合うことにした……[$W]

				"
		}
		CALL PRINT_DIAG(TEXT)
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_燃水 = 2
		;修行ポイントと戦闘経験値を加算
		K14_修行ポイント03 += KOJO_K14_TRAINING_CULC()
		CALL KOJO_K14_ADD_BATTLEEXP()
		RETURN 1
	;鍛錬２回目
	CASE 2
		{
			TEXT '= @"
				[UC_ススキ]:「よっ、[$MNAME]」[$W]

				[UC_ススキ]:「あれから色々試してみた結果、燃やす方はおおむね形になったよ」[$W]
				[UC_ススキ]:「まあ、『吹き』に関しては、燻毒の術で散々鍛錬したからねえ」[$W]

				苦笑いを浮かべるススキ……あの時は毎回苦労していたような気がする[$W]
				で、燃やす方、ってことは、もう一つなにか術策が？[$W]

				[UC_ススキ]:「うん。らんびきで石油の成分を分離すると、重くてドロドロした液が残るんだ」[$W]

				ススキが、マナグラスに封入された粘性の高い黒い液体を示す

				[UC_ススキ]:「これが中途半端に空気中で燃焼すると、重たく黒い煙が出る。つまり……」[$W]

				煙幕としての活用……というわけか[$W]

				[UC_ススキ]:「そうだね。『草』の術のひとつに『鳥の子』っていう煙玉もあるんだけど」[$W]
				[UC_ススキ]:「それをもっともっと大規模にできるといいな、って思ってる」[$W]

				キャラバン・ロードでの砂漠のジンとの戦いでは、視界を奪われて散々な目にあった[$W]
				あれを戦術に組み込めるなら、非常に頼りになりそうだ[$W]

				[UC_ススキ]:「ふふ、期待してもらえると、やる気も出てくるね」[$W]
				[UC_ススキ]:「じゃあ、また、色々試してみるとしようかね」[$W]

				この後全身煤塗れになり、しばらくシャワー室を占拠する羽目になるのだった……[$W]
				"
		}
		CALL PRINT_DIAG(TEXT)
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_燃水 = 3
		;修行ポイントと戦闘経験値を加算
		K14_修行ポイント03 += KOJO_K14_TRAINING_CULC()
		CALL KOJO_K14_ADD_BATTLEEXP()
		RETURN 1
	;以降
	CASE 3
		;完成
		IF K14_修行ポイント03 >= 100
			{
				TEXT '= @"
					[UC_ススキ]:「……よし、仕込みは上々。[$MNAME]は少し離れててね」[$W]

					ススキは手元の薬瓶に目を落としつつ、注意を促した[$W]
					場所は採石場……領地の中でも、最も引火の恐れが低い所を選んでの試技となった[$W]

					[UC_ススキ]:「では――ご覧じろ」[$W]

					ススキの手の内に現れた薬瓶が弾け、石油から精製された透明な液体が周囲に吹き散らされる[$W]

					[UC_ススキ]:「火、一たび熾れば、玉石ともに焚かる――」[$W]

					口訣を結び、印を切ったその手元に、チッ、と火の粉が走り――[$W]

					[UC_ススキ]:「――『火遁の術』」[$W]

					"
			}
			CALL PRINT_DIAG(TEXT)
			CALL FL_PLAYSE("Fire_1.mp3")
			{
				TEXT '= @"
					刹那、放射状に広がった爆炎が、ススキの前方を広く舐めるように荒れ狂い、万象を焼き払った[$W]
					パチパチ、と火が上がり、温度差で生じた蜃気楼の中に佇むススキが、うん、と小さく頷くのが見えた[$W]

					[UC_ススキ]:「……大元は、逃走時に火付けで混乱を撒くための術だけど……石油の力なら、焼夷術としても行使できるね」[$W]

					確かに……散布された範囲が、しぶとくずっと燃え続けている[$W]
					ひとたびこれを浴びたら、ひとたまりもないだろう[$W]

					[UC_ススキ]:「そして、今回はもう一つ……」[$W]

					"
			}
			CALL PRINT_DIAG(TEXT)
			CALL FL_PLAYSE("Put_0.mp3")
			{
				TEXT '= @"
					ススキの手の内に現れたもう一種の薬瓶――[$W]
					黒い液体が仕込まれたそれを口元に、彼女が口訣を結ぶ[$W]

					[UC_ススキ]:「天道があらゆる影を消すならば――我らは闇を作り出す」[$W]

					ぴん、と指で打ち放たれた薬瓶が、地面で弾けたその刹那――[$W]

					[UC_ススキ]:「――『煙炬の術』」[$W]

					"
			}
			CALL PRINT_DIAG(TEXT)
			CALL FL_PLAYSE("Explode_3.mp3")
			{
				TEXT '= @"
					パン、と弾けた閃光、そしてもうもうと湧き上がる黒煙――[$W]
					風にも負けずその場で揺蕩う煙は壁となり、周囲からその場を隔絶せしめていた[$W]

					[UC_ススキ]:「ちょっと手の込んだ煙幕弾さ。視覚を奪うのは、やはり基本にして強力だよね」[$W]
					[UC_ススキ]:「術にちょっと工夫をすると、催涙性を持たせたりもできる。まあ、遣い時に応じて変えていこうかね」[$W]

					『術』の応用範囲にも感心するが……[$W]
					いやしかし、石油ひとつで色々な使い道があるものだ[$W]

					[UC_ススキ]:「そうだね。液体であることが、大きな強みになってる感じかな」[$W]
					[UC_ススキ]:「質量比のマナ含有量も高いし、石炭にとって代わるってのも夢物語じゃあないかもしれないね」[$W]

					[UC_ススキ]:「ま、何はともあれ、せっかくの新しい資源だしね。有効活用していこう」[$W]

					ススキはニッと笑って、新たな術の効果的な使い方を考えだしたようだ……[$W]

					"
			}
			CALL PRINT_DIAG(TEXT)
			SETCOLOR COLOR("イエロー")
			PRINTFORMW %ANAME(対象)%が、スキル『火遁の術』『煙炬の術』を習得可能になった！
			RESETCOLOR
			PRINTW
			CALL FL_STOPBGM()
			K14_DFLAG_燃水 = 4
			K14_新スキル習得03 = 1
			RETURN 1
		ELSE
			CALL KJ_PRINT(対象,@"「よっ、%ANAME(MASTER)%」", 1)
			PRINTL
			CALL KJ_PRINT(対象,@"「今日こそ石油を使った術、モノにしたいね」", 1)
			PRINTL
			PRINTFORMW ……
			PRINTFORMW ………
			PRINTFORMW …………
			PRINTL
			;先に修行ポイントを加算、累積量を推測させるテキストを流す
			K14_修行ポイント03 += KOJO_K14_TRAINING_CULC()
			SELECTCASE K14_修行ポイント03
				CASE 0 TO 50
					CALL KJ_PRINT(対象,@"「方向性は定まってるから、あとは調整あるのみかな」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASE 51 TO 75
					CALL KJ_PRINT(対象,@"「……もう一息、かな」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASE 76 TO 100
					CALL KJ_PRINT(対象,@"「あとほんのちょっとで、モノにできそうな感じはあるんだ」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASEELSE
					CALL KJ_PRINT(対象,@"「……！　この感じ、か」", 1)
					PRINTL
					PRINTFORMW 目を見開いた%ANAME(対象)%が、即座に印を切り直し、調息する
					PRINTFORMW 微細な感覚で、何かをつかみ取ったのかもしれない……
					PRINTL
					CALL KJ_PRINT(対象,@"「いやあ……ここまで煤塗れになるとは思わなかった」", 1)
					PRINTL
					PRINTFORMW %ANAME(対象)%に風呂は沸かしておくよ、と返しておく
					PRINTFORMW いよいよ、新しい『術』がその全貌を顕していく……
			ENDSELECT
			PRINTW
			CALL FL_STOPBGM()
			;戦闘経験値を加算
			CALL KOJO_K14_ADD_BATTLEEXP()
			RETURN 1
		ENDIF
ENDSELECT
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_PILLOW_TALK_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_PILLOW_TALK_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_睦言
	RETURN 0
;合意を得ると発生する
SIF TALENT:NAME_TO_CHARA("UC_ススキ"):合意 == 0
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_PILLOW_TALK_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_PILLOW_TALK(対象)
#DIM 対象

CALL FL_PLAYBGM("Orient_0.ogg")
PRINTL
PRINTFORMW %ANAME(対象)%を見かけて、声をかける
PRINTL
CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
CALL KJ_PRINT(対象,@"「あー……おはよう、%ANAME(MASTER)%」", 1)
CALL KJ_PRINT(対象,@"「……えーと。ご機嫌、いかが？」", 1)
PRINTL
PRINTFORMW ？　なんだか様子がいつもと少し違う気がする。所作が固い、というか
PRINTL
CALL KJ_PRINT(対象,@"「……むう。さすがに、%ANAME(MASTER)%とはいえ、悟られるかぁ」", 1)
PRINTL
PRINTFORMW 疑問が表情に出ていたらしい。改めて、どうしたんだ？　と尋ねてみると……
PRINTL
CALL KJ_PRINT(対象,@"「そりゃまぁ……ああいうことがあったわけだし…ねえ？」", 1)
PRINTL
PRINTFORMW 少し目を逸らしながらの発言に、一瞬疑問符を浮かべるも――
PRINTFORMW 先日の同衾のことを言っているのだ、と思い当たり……少し首を捻った
PRINTL
PRINTFORML ……そういう割に、行為自体には慣れているようだった、と%ANAME(MASTER)%が返すと、
PRINTFORMW %ANAME(対象)%は少し頭を掻きながら、何とも言えない表情を浮かべた
PRINTL
CALL KJ_PRINT(対象,@"「……存外にデリカシー無いね、キミってヤツは」", 1)
CALL KJ_PRINT(対象,@"「そのへん、なんとなく察して黙っておくのも、度量ってやつだと思うのだけど？」", 1)
PRINTL
PRINTFORML ……どうやら、地雷を踏んだらしい
PRINTFORMW ひとまず、気に障ったなら…と詫びを入れておく
PRINTL
CALL KJ_PRINT(対象,@"「……いや……ごめん。別に、キミが気にするようなことじゃないんだ」", 1)
CALL KJ_PRINT(対象,@"「ようするに、私の……気持ちの問題？　というか……」", 1)
PRINTL
PRINTFORMW そんなことを、もごもごと呟いて、んー、と唸って、百面相を浮かべる%ANAME(対象)%
PRINTFORMW ……何か、とても珍しいものを見ている気がする
PRINTL
CALL KJ_PRINT(対象,@"「むー……微笑ましいものを見るようなカオはしないで欲しいなあ」", 1)
CALL KJ_PRINT(対象,@"「はぁー……まあ、いい機会だから、キミには話しておこうかな」", 1)
PRINTL
CALL KJ_PRINT(対象,@"「……うちの里に生まれた男児は、幼少期から『術』を仕込まれる、って話はしたでしょ？」", 1)
CALL KJ_PRINT(対象,@"「女児もだいたい同様だけど、もうひとつ、女であることを最大限活かす『術』を学ぶことになる」", 1)
PRINTL
PRINTFORMW ……なんとなく予想はついていたが、先を促しておく
PRINTFORMW おそらく、%ANAME(対象)%自身にも、吐き出したいものがあるのだろうから
PRINTL
CALL KJ_PRINT(対象,@"「お察しの通り。標的を篭絡するための色香や性技の類。ようは、色仕掛の手練手管だね」", 1)
CALL KJ_PRINT(対象,@"「私は、そっちの方面でも出来がよろしくてね。あんまり自慢にもなりゃしないけど」", 1)
PRINTL
PRINTFORMW その言葉には、やはり一点の恥じらいも、躊躇いもなく……
PRINTFORMW 「そうする」しかなかった、彼女の「意地」のみがただ滲んでいる
PRINTFORMW 目的のためには手段を選ばず。冷徹非情の「草」の生き様を、%ANAME(MASTER)%はそこに見た
PRINTL
CALL KJ_PRINT(対象,@"「ま、そんなわけで、この身体を武器に、ここまで色々やってきた」", 1)
CALL KJ_PRINT(対象,@"「寝物語に重要な情報を抜き取ったり、強談判のネタにしたり……」", 1)
PRINTL
PRINTFORMW 気づけば、音もなく%ANAME(MASTER)%の眼前に入り身した%ANAME(対象)%の姿がある
PRINTFORMW 囁くように、さりながら物語るように。息遣いさえ聞こえる耳元で紡がれたその言葉は――
PRINTL
CALL KJ_PRINT(対象,@"「極めつけは……褥での殺しとかも、ね」", 1)
PRINTL
PRINTFORMW 瞬きの間に……すでに、眼前にあったはずの%ANAME(対象)%の姿はない
PRINTFORMW 同時、%ANAME(MASTER)%の背後から、とん、と彼女が頭を押し付けるように抱き着いてくる
PRINTL
CALL KJ_PRINT(対象,@"「だからね。『仕事』として寝たことは、それなりにある。酷い目にあったこともね」", 1)
CALL KJ_PRINT(対象,@"「……でも、ね」", 1)
PRINTL
PRINTFORMW %ANAME(対象)%はそこまで言うと、何かを逡巡するように、言葉を切った
PRINTFORMW やがて、背中越しに意を決したような身じろぎを感じ――
PRINTL
CALL KJ_PRINT(対象,@"「初めて、だった。『そういうの』抜きで、求められて――求めて、抱かれたのは」", 1)
PRINTL
PRINTFORML ようやく紡ぎ出されたその言葉は、ひどくか細く……何かにすがるようで
PRINTFORMW いつもの凛とした%ANAME(対象)%の気配は、どこにもなかった
PRINTL
CALL KJ_PRINT(対象,@"「だから。%ANAME(MASTER)%と顔を合わせるのが……すこし、怖かったんだ」", 1)
CALL KJ_PRINT(対象,@"「どういう顔で、身体を重ねた相手と向き合えばいいのか、解らなかったから」", 1)
PRINTL
PRINTFORML ……とりあえず、落ち着くまで待とうか、と背中越しに投げかけると、
PRINTFORMW 沈黙とわずかな身じろぎが、彼女の肯定を伝えてきた
PRINTL
PRINTFORMW ……
PRINTFORMW ………
PRINTFORMW …………
PRINTL
CALL KJ_PRINT(対象,@"「もう大丈夫……あぁもう、恥ずかしいったらありゃしない」", 1)
PRINTL
PRINTFORMW するり、と身を離した彼女に、改めて向き直る
PRINTFORMW 羞恥と困惑、そしてわずかな期待をないまぜにした表情で、%ANAME(対象)%がこちらを見やっていた
PRINTL
CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%」", 1)
CALL KJ_PRINT(対象,@"「ええ、と……」", 1)
IF TALENT:NAME_TO_CHARA("UC_ススキ"):恋慕 || TALENT:NAME_TO_CHARA("UC_ススキ"):親愛
	CALL KJ_PRINT(対象,@"「……不束者ですが。今後とも、よろしく」", 1)
	PRINTL
	PRINTFORMW なんだか、階段を３段飛ばしくらいされたような気がする……！
ELSE
	CALL KJ_PRINT(対象,@"「……今後とも、よろしく」", 1)
	PRINTL
ENDIF
PRINTW
CALL FL_STOPBGM()
K14_DFLAG_睦言 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_ART_MIMICS_RATE(対象)
#DIM 対象

IF K14_DFLAG_継承 <= 2
	RETURN 1000
;修行中は（30＋√ススキ好感度）％の確率で
ELSEIF K14_DFLAG_継承 == 3 && K14_修行ポイント02 <= 100
	RETURN 300 + SQRT(CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度)
;条件を満たしたときは100％に
ELSEIF K14_DFLAG_継承 == 3 && K14_修行ポイント02 > 100
	RETURN 1000
ELSE
	RETURN 1000
ENDIF
;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_ART_MIMICS_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_術理 != 2
	RETURN 0
SIF K14_DFLAG_錬磨 != 4
	RETURN 0
SIF K14_DFLAG_継承 >= 4
	RETURN 0
;クエスト22「ノアレルム辺境の賊徒」をクリアすると発生
SIF QST_SV_QUEST_FLAG:22 != 2
	RETURN 0

;好感度3000を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 3000
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_ART_MIMICS_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_ART_MIMICS(対象)
#DIM 対象

CALL FL_PLAYBGM("Orient_0.ogg")
SELECTCASE K14_DFLAG_継承
	;導入
	CASE 0
		PRINTL
		PRINTFORMW %ANAME(対象)%が黒い面頬を矯めつ眇めつしている…
		PRINTL
		CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
		PRINTL
		CALL KJ_PRINT(対象,@"「ああ、%ANAME(MASTER)%。どしたの？」", 1)
		PRINTL
		PRINTFORMW その様子に、ちょっと気が咎めた
		PRINTFORMW こないだの一件が後を引いてるんじゃないか、と尋ねてみると
		PRINTL
		CALL KJ_PRINT(対象,@"「……こないだの件？」", 1)
		PRINTL
		PRINTFORMW %ANAME(対象)%がきょとんとした表情で首をかしげる
		PRINTFORMW その面頬の出どころ……改造された『草』の者を討った、ノアレルム辺境での戦いのことだ
		PRINTL
		CALL KJ_PRINT(対象,@"「あぁ、あれのこと……不幸なことではあったけど、別に気にするほどのことでもないよ」", 1)
		PRINTL
		PRINTFORMW さらりと言ってのける%ANAME(対象)%
		PRINTFORMW ……なんだか、相手は知り合いのようにも見えたのだけど
		PRINTL
		CALL KJ_PRINT(対象,@"「同郷の者だしね。知り合いかもしれないし、そうじゃないかもしれない」", 1)
		CALL KJ_PRINT(対象,@"「まあ、お互いに足抜け者どうし、今更詮無いことだよ」", 1)
		CALL KJ_PRINT(対象,@"「あちらにはあちらの事情が……こちらにはこちらの事情があって、それがたまたまカチ合っただけのことさ」", 1)
		PRINTL
		PRINTFORMW ……確かに、やらなければこちらが屍を晒していたかもしれない
		PRINTFORMW だけど、それしか術がなかったとはいえ、やるせないな……
		PRINTFORMW そんなことを考えていると、%ANAME(対象)%が少しばかり驚いた表情を浮かべていた
		PRINTL
		CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%は優しいね。　甘い、とも言えるのかもだけど」", 1)
		CALL KJ_PRINT(対象,@"「雇われの刃、『草』の者たる私達には、過ぎた気遣いだよ」", 1)
		PRINTL
		PRINTFORMW 言葉の割には、%ANAME(対象)%はどこか自虐的な笑みを浮かべていた
		PRINTL
		CALL KJ_PRINT(対象,@"「だけど……ありがとう。私の同郷の者に対して、弔いの気持ちを抱いてくれて」", 1)
		CALL KJ_PRINT(対象,@"「恥ずかしながら。そういうのは、私達にはとうに失われた感情だった」", 1)
		PRINTL
		PRINTFORMW 任務遂行の為ならば、同族同士相争うのも止む無し
		PRINTFORMW そして……死して屍、拾う者無し
		PRINTFORMW 苛烈にすぎる『草』の者の生き様を、%ANAME(対象)%の表情が物語っていた
		PRINTL
		CALL KJ_PRINT(対象,@"「まあ、これを拾ったりしてる段階で、少しずつ心持ちも変わっては来てる……のかもね」", 1)
		CALL KJ_PRINT(対象,@"「娑婆に染まるのも、まあ……悪くはないと思ってるよ」", 1)
		PRINTL
		PRINTFORMW それなら……%ANAME(対象)%を雇ってよかった、というべきか
		PRINTFORMW ところで……感傷に浸ってるのでなければ、何をしていたんだ？
		PRINTL
		CALL KJ_PRINT(対象,@"「いや……なんか、この話の流れでするのは、憚られる内容なんだけど」", 1)
		CALL KJ_PRINT(対象,@"「あの改造忍者の『術』、私にも使えないかなー、って」", 1)
		PRINTL
		PRINTFORMW てへ、と笑う%ANAME(対象)%の様子に、しんみりした気持ちが刹那に霧散する
		PRINTFORMW ……ま、まぁ、志を受け継ぐって意味ではアリ……なのでは？
		PRINTL
		CALL KJ_PRINT(対象,@"「あ、あははー、まあそういう反応になるよね」", 1)
		PRINTL
		PRINTFORMW %ANAME(対象)%は苦笑しながら、黒い面頬をしまい込みつつ、言葉を継ぐ
		PRINTL
		CALL KJ_PRINT(対象,@"「でも……珍しいものを見ちゃった以上、真似をしてみたくなるもんでしょう？」", 1)
		PRINTL
		PRINTFORMW いつしか、%ANAME(対象)%の表情がしごく悪い笑みに移り変わっている
		PRINTFORMW ……こういうところは、やっぱり『草』の者なんだなあ、と背筋が冷える思いがした
		PRINTL
		CALL KJ_PRINT(対象,@"「毒遣いの一門は、うちの里でも特に閉鎖的でさ。門外不出の術を相伝していってたらしい」", 1)
		CALL KJ_PRINT(対象,@"「噂では、真に重要な任務……『暗殺』を遂行するため、とか言われてたけど」", 1)
		PRINTL
		PRINTFORMW 一体誰を標的にしてるんだろうねえ、と肩を竦めながら付け足す%ANAME(対象)%
		PRINTFORMW しかし、そんなに秘された術をどうやってモノにする気なんだ？
		PRINTL
		CALL KJ_PRINT(対象,@"「ああ、それなら平気。実用してる所を見たからね。あの術…『燻毒の術』のあらかたのカラクリは掴めてる」", 1)
		PRINTL
		PRINTFORMW ……そんな単純なものなのか？　見ただけで習得できると？
		PRINTL
		CALL KJ_PRINT(対象,@"「『術』を学ぶってのはそういうことなのさ。『草』にとって術は大事な飯の種だから、そう簡単に教えたくはないわけ」", 1)
		CALL KJ_PRINT(対象,@"「私たちは同族の使う術、その『術理』を模倣して、少しずつ手札を増やしていくんだ」", 1)
		CALL KJ_PRINT(対象,@"「私が師匠の『分身の術』や『影縫いの術』の模倣を試み、成功したり失敗したりしてきたようにね」", 1)
		PRINTL
		PRINTFORMW つくづくスパルタというか……それだけやらないと、里が存続できなかったと見るべきなのか
		PRINTL
		CALL KJ_PRINT(対象,@"「まぁもっとも、それも表層を攫っただけ。毒遣いの神髄はもっともっと奥、研鑽の果てにあるんだろうけど」", 1)
		PRINTL
		PRINTFORMW 対手から見えている毒などまだまだ序の口、といったところか
		PRINTFORMW ……それでも、ノアレルム辺境では十分すぎるほどに辛酸を舐めさせられたけれど
		PRINTL
		CALL KJ_PRINT(対象,@"「そうだね。毒は戦いに時間制限を課す。焦りを生じさせ、やがて致命的な隙を導く……」", 1)
		CALL KJ_PRINT(対象,@"「何なら、時間をかけて凌ぐだけでもいい。搦め手としては最上の部類だしね。手札としてはぜひとも欲しい」", 1)
		PRINTL
		PRINTFORMW あの力をこちらが使えるなら、とても頼りになるだろう
		PRINTL
		CALL KJ_PRINT(対象,@"「……ということで、また修練に付き合って欲しいんだけど」", 1)
		PRINTL
		PRINTFORMW ……、……毒の研究に？
		PRINTL
		CALL KJ_PRINT(対象,@"「そうだけど？」", 1)
		PRINTL
		PRINTFORMW ……被験体になれと？
		PRINTL
		CALL KJ_PRINT(対象,@"「………あー、何も、発生した毒を検分してとは言わないよ」", 1)
		CALL KJ_PRINT(対象,@"「戦の場において、術の切り方、咄嗟に打てるかを試したいだけだから」", 1)
		PRINTL
		PRINTFORMW な、ならいい……のか？
		PRINTFORMW また、模擬戦やらこういう場で手伝えばいいのだろうか
		PRINTL
		CALL KJ_PRINT(対象,@"「……ありがとう、%ANAME(MASTER)%」", 1)
		CALL KJ_PRINT(対象,@"「アイツに対しても、それが供養のひとつになるはずさ」", 1)
		PRINTL
		PRINTFORMW %ANAME(対象)%はこちらに深々と頭を下げてくる
		PRINTFORMW 術理継承のため、一肌脱ぐとしよう……
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_継承 = 1
		RETURN 1
	;鍛錬初回
	CASE 1
		PRINTL
		CALL KJ_PRINT(対象,@"「来たね、%ANAME(MASTER)%」", 1)
		PRINTL
		CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
		PRINTL
		CALL KJ_PRINT(対象,@"「まずは、今回の習得を目指している『燻毒の術』の仕組みのおさらいから」", 1)
		CALL KJ_PRINT(対象,@"「マナ触媒を撒いて、それを毒に転換するのは『分身の術』と同じ」", 1)
		CALL KJ_PRINT(対象,@"「ただ、敵方全域に撒き散らすには、ちょっと工夫がいりそうだな、と」", 1)
		PRINTL
		PRINTFORMW たしかに、改造忍者と対敵した時、毒を全体にばらまいてたけど、そのときは特に変な動作はなかったような……
		PRINTL
		CALL KJ_PRINT(対象,@"「そう、まき散らすのに術を使ってる風情もなかった。ということは純粋な吐息だけで撒いてたわけで」", 1)
		CALL KJ_PRINT(対象,@"「単純に大量のマナ触媒を撒くだけだとムラが出るし、均質に効果を発揮させるだけでも一苦労でね」", 1)
		CALL KJ_PRINT(対象,@"「触媒を毒に転換するより、それをいかに撒くかが難題なんだ」", 1)
		PRINTL
		PRINTFORMW ……なんということでしょう。触媒を吹き散らすほうに匠の技が隠されていたとは
		PRINTL
		CALL KJ_PRINT(対象,@"「……肺活量も鍛えた方がいいのかなあ」", 1)
		PRINTL
		PRINTFORMW %ANAME(対象)%は真面目な顔で悩んでいるようだ……
		PRINTL
		CALL KJ_PRINT(対象,@"「ま、とりあえず頑張ってみようか、では―――」", 1)
		PRINTL
		PRINTFORMW ……
		PRINTFORMW ………
		PRINTFORMW …………
		PRINTL
		CALL KJ_PRINT(対象,@"「ぜーはー、ぜーはー……」", 1)
		PRINTL
		PRINTFORMW ……おつかれさまです
		PRINTL
		CALL KJ_PRINT(対象,@"「こ、こんなに、息が切れたのは、久しぶり……」", 1)
		PRINTL
		PRINTFORMW %ANAME(対象)%は顔を真っ赤にして、ぐでーとしている
		PRINTFORMW まだまだ先は長そうだ……
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_継承 = 2
		;修行ポイントと戦闘経験値を加算
		K14_修行ポイント02 += KOJO_K14_TRAINING_CULC()
		CALL KOJO_K14_ADD_BATTLEEXP()
		RETURN 1
	;鍛錬２回目
	CASE 2
		PRINTL
		CALL KJ_PRINT(対象,@"「よっ、%ANAME(MASTER)%」", 1)
		PRINTL
		CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
		PRINTL
		CALL KJ_PRINT(対象,@"「じゃあ今回も、よろしくお願いします」", 1)
		PRINTL
		PRINTFORMW ……
		PRINTFORMW ………
		PRINTFORMW …………
		PRINTL
		CALL KJ_PRINT(対象,@"「……ふーッ、ふーッ……」", 1)
		PRINTL
		PRINTFORMW 相変わらず息切れに苦しんでいるようだ……
		PRINTL
		CALL KJ_PRINT(対象,@"「き、キツイ……これは、今までで一番キツイ……」", 1)
		CALL KJ_PRINT(対象,@"「やっぱり、私の肺活量では限界があることがわかった……」", 1)
		PRINTL
		PRINTFORMW そこは前提として留め置いておかないといけないわけか……
		PRINTFORMW なら、薄く撒いても同様の効果が発現できるようにならないものか
		PRINTL
		CALL KJ_PRINT(対象,@"「マナ触媒の転換効率に限界があるから、均等に撒いてやる必要があるんだよね……」", 1)
		CALL KJ_PRINT(対象,@"「ちゃんと効果を発揮する濃度の毒を撒かなきゃ、毒の壁としては意味ないからなあ……」", 1)
		PRINTL
		PRINTFORMW ……それはもしかすると、%ANAME(対象)%が知っている触媒では限界があるだけでは？
		PRINTL
		CALL KJ_PRINT(対象,@"「……というと？」", 1)
		PRINTL
		PRINTFORMW 取り出しましたるこちらは『高効率魔導触媒』――
		PRINTFORMW 通常のマナ触媒を精製し、より高エネルギーを引き出せるようにしたものだ
		PRINTL
		CALL KJ_PRINT(対象,@"「うちの里のほうでは、まずありえない潤沢な触媒量から作り出された逸品……」", 1)
		CALL KJ_PRINT(対象,@"「……確かにこれなら、多少のムラが出ても、効果のある毒を作り出せるかもしれないね」", 1)
		PRINTL
		PRINTFORMW ふむふむ、と触媒を矯めつ眇めつしていた%ANAME(対象)%が、ぱっと顔を綻ばせる
		PRINTFORMW 彼女がここに来たからこそ、手にできた素材だ。色々アイデアが浮かんできているのだろう
		PRINTL
		CALL KJ_PRINT(対象,@"「こんないいものを術に使うのは初めて。%ANAME(MASTER)%、すぐ取り掛かろう！」", 1)
		PRINTL
		PRINTFORMW 目を輝かせた%ANAME(対象)%に引きずられるように、再び術式の引き直しに入った……
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_継承 = 3
		;修行ポイントと戦闘経験値を加算
		K14_修行ポイント02 += KOJO_K14_TRAINING_CULC()
		CALL KOJO_K14_ADD_BATTLEEXP()
		RETURN 1
	;以降
	CASE 3
		;完成
		IF K14_修行ポイント02 >= 100
			CALL KJ_PRINT(対象,@"「……こんなところかな」", 1)
			PRINTL
			CALL DRAW_PORTRAIT(対象, "[目:閉じ(緩)][サイズ:180px][POS_X:0]",,1)
			PRINTL
			PRINTFORMW %ANAME(対象)%は小さくうなずいた
			PRINTL
			CALL KJ_PRINT(対象,@"「広範囲に噴霧される毒を敵対者全体に浴びせかけるのが、この術の基本骨子」", 1)
			CALL KJ_PRINT(対象,@"「今回は、やや狭い展開範囲を、高効率魔導触媒によって転換される強毒によって補う」", 1)
			PRINTL
			PRINTFORMW 高効率魔導触媒を手に、すう、と大きく息を吸い込んだ%ANAME(対象)%
			PRINTFORMW 舞い散るマナ触媒が、吐息にのって拡散しきったタイミングで――
			PRINTL
			CALL KJ_PRINT(対象,@"「ゆえに、これは剣では断てず、鎧も盾も無用の長物――」", 1)
			PRINTL
			PRINTFORMW %ANAME(対象)%は息を切らすことなく目を瞑り、印を切り口訣を結ぶ
			PRINTFORMW 刹那、彼女の近傍から放射状に有形化した毒霧が、鈍い煌めきを放って付近の空気を侵蝕した
			PRINTL
			CALL KJ_PRINT(対象,@"「――『燻毒の術』」", 1)
			PRINTL
			PRINTFORMW 方向性を制御して撒き散らされた強毒が、瞬く間に周囲にあった草木を枯らしていく
			PRINTFORMW ……あそこにいたらひとたまりもないな、と背筋が寒くなった
			PRINTL
			CALL KJ_PRINT(対象,@"「……うん、効果、範囲ともに上々かな」", 1)
			PRINTL
			PRINTFORMW 毒の効き目を検分していた%ANAME(対象)%が戻ってくる
			PRINTFORMW 一度敵対していたからわかるものの、やはり恐ろしい効き目だ
			PRINTL
			CALL KJ_PRINT(対象,@"「ありがと。でも、私の『燻毒の術』は、この触媒の存在あってこそだよ」", 1)
			PRINTL
			PRINTFORMW 呟いて、%ANAME(対象)%はこちらにふわりとした笑顔を向けてくる
			PRINTL
			CALL DRAW_PORTRAIT(対象, "[感情:幸][サイズ:180px][POS_X:0]",,1)
			PRINTL
			CALL KJ_PRINT(対象,@"「ここに来なければ使うことができなかった術……と考えると、なんだか不思議なカンジだね」", 1)
			PRINTL
			PRINTFORMW そう言われると、彼女をここに招いたことにも何かの意味があったのだろう、と改めて感じられた
			PRINTL
			CALL KJ_PRINT(対象,@"「まあ、高効率魔導触媒もあんまり安いものじゃないし、切り札に近い扱いだけど」", 1)
			CALL KJ_PRINT(対象,@"「この術を十全に使ってもらえれば、あいつも浮かばれるんじゃないかな？」", 1)
			PRINTL
			PRINTFORMW %ANAME(対象)%は何かに思いを馳せるように、遠くを見るような顔をしている
			PRINTFORMW ……術の継承、その重みを感じながら、%ANAME(MASTER)%はその姿を見守っていた
			PRINTL
			SETCOLOR COLOR("イエロー")
			PRINTFORML %ANAME(対象)%が、スキル『燻毒の術』『分身の術・改』『影縫いの術・改』を習得可能になった！
			PRINTL
			PRINTFORML ※『分身の術・改』と『分身の術』はどちらかしか習得できません
			PRINTFORMW 　同様に、『影縫いの術・改』と『影縫いの術』もどちらかしか習得できません
			RESETCOLOR
			PRINTW
			CALL FL_STOPBGM()
			K14_DFLAG_継承 = 4
			K14_新スキル習得02 = 1
			RETURN 1
		ELSE
			CALL KJ_PRINT(対象,@"「よっ、%ANAME(MASTER)%」", 1)
			PRINTL
			CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
			PRINTL
			CALL KJ_PRINT(対象,@"「今日こそ『燻毒の術』、モノにしたいね」", 1)
			PRINTL
			PRINTFORMW ……
			PRINTFORMW ………
			PRINTFORMW …………
			PRINTL
			;先に修行ポイントを加算、累積量を推測させるテキストを流す
			K14_修行ポイント02 += KOJO_K14_TRAINING_CULC()
			SELECTCASE K14_修行ポイント02
				CASE 0 TO 50
					CALL KJ_PRINT(対象,@"「方向性は定まってるから、あとは調整あるのみかな」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASE 51 TO 75
					CALL KJ_PRINT(対象,@"「……もう一息、かな」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASE 76 TO 100
					CALL KJ_PRINT(対象,@"「あとほんのちょっとで、モノにできそうな感じはあるんだ」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASEELSE
					CALL KJ_PRINT(対象,@"「……！　この感じ、か」", 1)
					PRINTL
					PRINTFORMW 目を見開いた%ANAME(対象)%が、即座に印を切り直し、調息する
					PRINTFORMW 微細な感覚で、何かをつかみ取ったのかもしれない……
					PRINTL
					CALL KJ_PRINT(対象,@"「文字通りのもう一息、か。ちょっと息苦しいけど、頑張ろっか」", 1)
					PRINTL
					PRINTFORMW %ANAME(対象)%に苦笑いを返し、
					PRINTFORMW いよいよ、新しい『術』がその全貌を顕していく……
			ENDSELECT
			PRINTW
			CALL FL_STOPBGM()
			;戦闘経験値を加算
			CALL KOJO_K14_ADD_BATTLEEXP()
			RETURN 1
		ENDIF
ENDSELECT
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_ART_THEORY_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_ART_THEORY_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_術理
	RETURN 0
;好感度900を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 899
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_ART_THEORY_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_ART_THEORY(対象)
#DIM 対象

CALL FL_PLAYBGM("Orient_0.ogg")
PRINTL
CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
CALL KJ_PRINT(対象,@"「なに%ANAME(MASTER)%、聞きたい事って？」", 1)
PRINTL
PRINTFORMW 戦闘時に使った「術」について尋ねようと思い、%ANAME(対象)%を呼び止める
PRINTFORMW あれはいったいどんな魔術なのか、と尋ねると……
PRINTL
SELECTCASE ABL:(NAME_TO_CHARA("UC_ススキ")):魔術
	CASE 0 TO 30
		CALL KJ_PRINT(対象,@"「いや……私は魔術は使えないよ？」", 1)
	CASE 31 TO 60
		CALL KJ_PRINT(対象,@"「いや……魔術に対する心得がないでもないけど。あれは魔術じゃないんだ」", 1)
	CASEELSE
		CALL KJ_PRINT(対象,@"「ああ……紛らわしいけど、あれは魔術じゃないんだ」", 1)
ENDSELECT
CALL KJ_PRINT(対象,@"「そう見えているなら、『草』冥利には尽きるのだけど」", 1)
PRINTL
PRINTFORMW そう言って、%ANAME(対象)%は稚気にあふれた表情でくつくつと笑う
PRINTL
CALL KJ_PRINT(対象,@"「私達『草』の者が遣う『術』には必ずタネがある。幼少期からの鍛錬の末に会得できる特殊技巧がほとんどさ」", 1)
CALL KJ_PRINT(対象,@"「背丈より高く跳躍する。壁を駆け上る。声真似、姿を眩ましたりするのはこの類だね」", 1)
CALL KJ_PRINT(対象,@"「私にはムリだけど、関節を外して小さい箱に収まったり、仮死状態で土の中に潜伏するヤツとかもいたよ」", 1)
PRINTL
PRINTFORMW いや、どう見てもあの「分身の術」だけは説明がつかないだろう、と彼女に問う
PRINTL
CALL KJ_PRINT(対象,@"「あれにも一応タネがあってね。コレを使うんだ」", 1)
PRINTL
PRINTFORMW そう言うと、%ANAME(対象)%は懐から筒状の容器を取り出し、中身の粉末を示して見せた
PRINTL
CALL KJ_PRINT(対象,@"「マナ触媒、ってこっちでは言うのかな」", 1)
CALL KJ_PRINT(対象,@"「秘伝だから細かい作法までは教えられないけど、これを元手にしてるのさ」", 1)
PRINTL
PRINTFORMW その理屈だけを聞いていると、まるで別の技術の話を聞いているような気がする…
PRINTL
CALL KJ_PRINT(対象,@"「ああ、魔導工学……だっけ？　錬金学とやらはよくわからないけど」", 1)
CALL KJ_PRINT(対象,@"「うちの里でも、古来から色々な術法に活用してきてる」", 1)
CALL KJ_PRINT(対象,@"「風を招いて火災を広めたり、雷を招いて発火させたり、土を操って血路を拓いたりね」", 1)
PRINTL
CALL KJ_PRINT(対象,@"「まあ、マナ鉱脈が細く分布も限られてたから、東方のどこでも広まったわけじゃないみたい」", 1)
CALL KJ_PRINT(対象,@"「たまたまうちの里の近くに鉱脈があって、それを利活用しようという環境があったからこそだね」", 1)
PRINTL
;エルが雇用されてる場合
IF CFLAG:NAME_TO_CHARA("エル"):所属 == CFLAG:MASTER:所属
	PRINTFORMW これは、アカデミーの連中が聞きつけたらまあ大変なことになりそうである
	PRINTFORMW エルあたり、目の色を変えて飛びついてきそうな案件だなあ……
	PRINTFORMW %ANAME(対象)%の言葉を借りれば、知らぬが仏、ということだし。黙っておくとしよう
	PRINTL
ENDIF
CALL KJ_PRINT(対象,@"「もちろん本職の魔術師には出力、精度ともに及ばない。けど、私達にも永年積み重ねた幾多の『術』がある」", 1)
CALL KJ_PRINT(対象,@"「手妻くらいのほんの少しの神秘でも、私たちの任務にには必要十分なのさ」", 1)
PRINTL
PRINTFORMW 魔導工学とは別系統で進化してきた秘伝の技術とは……
PRINTFORMW まだ見ぬ東方辺境の奥深さをひしひしと感じる%ANAME(MASTER)%だった
PRINTW
CALL FL_STOPBGM()
K14_DFLAG_術理 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_NATIVE_PLACE_RATE(対象)
#DIM 対象
RETURN 1000

;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_NATIVE_PLACE_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里
	RETURN 0
;好感度500を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 499
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_NATIVE_PLACE_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_NATIVE_PLACE(対象)
#DIM 対象

CALL FL_PLAYBGM("Orient_0.ogg")
PRINTL
PRINTFORMW %ANAME(対象)%を見かけて、声をかける
PRINTL
CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
PRINTL
CALL KJ_PRINT(対象,@"「ああ、%ANAME(MASTER)%」", 1)
PRINTL
PRINTFORMW 何か生活で困っていることはないか？　と尋ねると、
PRINTL
CALL KJ_PRINT(対象,@"「大丈夫。おかげさまで、みんな良くしてくれる。感謝してるよ」", 1)
PRINTL
PRINTFORMW さして考える間も置かず、%ANAME(対象)%がさらりと答えた
PRINTFORMW たしかに、すっかり馴染んでいる……というか、異邦人なのに馴染みすぎ、とも言える
PRINTL
CALL KJ_PRINT(対象,@"「そうだね。言われてみれば、たしかに不思議だ」", 1)
CALL KJ_PRINT(対象,@"「風の匂いも行きかう人種も、建物の雰囲気も……何もかも、違うのにね」", 1)
PRINTL
PRINTFORMW そう言って、%ANAME(対象)%はふわり、と微かに笑った
PRINTFORMW その表情をかすめた微かな寂寥に……思わず、きみの故郷はどういう場所だったのか、と尋ねていた
PRINTL
CALL KJ_PRINT(対象,@"「私の故郷？ 一応、口外したら色々とマズいことになるんだけど」", 1)
CALL KJ_PRINT(対象,@"「うーん……まあ、事ここに至って隠し事をしてもしょうがないか」", 1)
PRINTL
PRINTFORMW そうつぶやくと、%ANAME(対象)%は視線を彼方の空へ飛ばしてみせる
PRINTL
CALL KJ_PRINT(対象,@"「私は、ここから見ればずーっと東の方、大陸の東方辺境の出でね」", 1)
CALL KJ_PRINT(対象,@"「里はどこにでもある山村だった……まあ、ただのひなびた片田舎ならよかったんだけど」", 1)
PRINTL
PRINTFORMW 始まる昔語り。その言葉には、微かに恥じ入るような響きがあった
PRINTL
CALL KJ_PRINT(対象,@"「里を拓いた私達の先祖は、大きな戦乱で敗れて、その地に流れ着いたらしくてね」", 1)
CALL KJ_PRINT(対象,@"「土地が痩せ、平地も限られた峡谷で、始めは生計を立てるのもままならなかったんだって」", 1)
PRINTL
PRINTFORMW 食い詰めた落人が何を始めるかは、おおかた予想がつく
PRINTFORMW ……元手の要らない「暴力」を用いるのが、一番手っ取り早い方法だろう
PRINTL
CALL KJ_PRINT(対象,@"「必然、里の人々は通行代の徴収や、周辺地域への略奪をはたらくようになった」", 1)
CALL KJ_PRINT(対象,@"「山渓を根城にした群盗一座のできあがり、さ」", 1)
PRINTL
CALL KJ_PRINT(対象,@"「もちろん、里が逆に脅かされることもあったそうだけど……」", 1)
CALL KJ_PRINT(対象,@"「地の利を生かした夜討ち朝駆けの撹乱戦法を駆使し、よく侵略を禦いだらしい」", 1)
PRINTL
CALL KJ_PRINT(対象,@"「そんな殺伐とした日常の中で、里の人々は生き残りをかけて多岐に渡る知恵を集積していった」", 1)
CALL KJ_PRINT(対象,@"「夜襲や逃散の手管、建物に忍び入る技能や特殊な道具。軽業、手妻の類、薬草、鉱石の扱い……」", 1)
CALL KJ_PRINT(対象,@"「外敵を退ける為、時には内部での凄惨な抗争に勝ち抜く為、それらの英知は次々に統合・錬磨されていった」", 1)
CALL KJ_PRINT(対象,@"「それが、私たちが用いる『術』。先祖の艱難辛苦の歴史の結晶なのさ」", 1)
PRINTL
CALL KJ_PRINT(対象,@"「永年を経て、『術』を擁する職能集団となった里の民は、自衛のみでなく外部にも目を向けた」", 1)
CALL KJ_PRINT(対象,@"「得意の浸透・破壊工作、暗殺や諜報など、謀略を担う『傭兵』として自身を売り込んでいったわけ」", 1)
PRINTL
CALL KJ_PRINT(対象,@"「里の民は自らを『草』と称し、その『術』を秘伝として門外不出のものとした」", 1)
CALL KJ_PRINT(対象,@"「里は『草』を養成する土壌となり、傭兵稼業で外貨を稼ぐ、世界でも稀な集落となったのさ」", 1)
CALL KJ_PRINT(対象,@"「今や、中央世界の東方、ことによると西方の人間対人間の戦の裏にも、『草』の暗躍があるかもしれない」", 1)
PRINTL
PRINTFORMW ……ふり仰ぐように言葉を継いでいた%ANAME(対象)%が、ふう、と一息入れる
PRINTL
CALL KJ_PRINT(対象,@"「……まあ、いろいろ血腥いところもあるけど」", 1)
CALL KJ_PRINT(対象,@"「今思えば。そんなに悪い所じゃなかったのかな、うん」", 1)
PRINTL
PRINTFORML 肩をすくめて、%ANAME(対象)%は昔語りをそうまとめた
PRINTFORMW 今の暮らしとあまり接点がないようにも思えるのだけど、と思っていると
PRINTL
CALL KJ_PRINT(対象,@"「ああ……うん。ようやく気付いた」", 1)
CALL KJ_PRINT(対象,@"「山野に囲まれ、人々が顔を突き合わせて汗水垂らして働き、日々の労働とその成果を喜び合う」", 1)
CALL KJ_PRINT(対象,@"「……そういうところだけは、私の故郷とここは、よく似ているんだろうね」", 1)
PRINTL
PRINTFORMW ……故郷は、遠くにありて思うもの、という
PRINTFORMW それを噛みしめているかのように、%ANAME(対象)%が穏やかな表情で周囲を見回した
PRINTFORMW 彼女のそんな表情を引き出せただけでも、此処に彼女を招いた甲斐があったのかもしれない……
PRINTL
CALL FL_STOPBGM()
;CALL KJ_PRINT(対象,@"「え？　私の故郷も見てみたい？」", 0)
;CALL KJ_PRINT(対象,@"「うーん、それはちょっと難しいかなあ。他所者にはすごく厳しいし……」 1)
;PRINTL
;PRINTFORMW
;PRINTL

K14_DFLAG_郷里 = 2
RETURN 1


code:
;---------------------
;基本的な発生確率(1000分率 100で10%)
;これにコンフィグ項目の発生頻度がかけられるので、必ずしもこの通りにはならない
;---------------------
@KOJO_DAILY_K14_ART_TRAINING_RATE(対象)
#DIM 対象

IF K14_DFLAG_錬磨 <= 2
	RETURN 1000
;修行中は（30＋√ススキ好感度）％の確率で
ELSEIF K14_DFLAG_錬磨 == 3 && K14_修行ポイント01 <= 100
	RETURN 300 + SQRT(CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度)
;条件を満たしたときは100％に
ELSEIF K14_DFLAG_錬磨 == 3 && K14_修行ポイント01 > 100
	RETURN 1000
ELSE
	RETURN 1000
ENDIF
;---------------------
;確率以外の発生判定
;〇期以降になると発生するとか、デイリー側で利用している変数が-1だったら起こさない　みたいなはじき方をするときに使う
;---------------------
@KOJO_DAILY_K14_ART_TRAINING_DECISION(対象)
#DIM 対象

SIF K14_DFLAG_流浪 != 2
	RETURN 0
SIF K14_DFLAG_郷里 != 2
	RETURN 0
SIF K14_DFLAG_術理 != 2
	RETURN 0
SIF K14_DFLAG_錬磨 >= 4
	RETURN 0
;好感度2000を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_ススキ"):好感度 <= 1999
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

;---------------------
;ジャンル
;コンフィグ設定で使用
;---------------------
@KOJO_DAILY_K14_ART_TRAINING_GENRE(対象)
#DIM 対象
RETURN デイリー_ジャンル_その他

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;旧仕様で作ったことある人向けにいうと「旧仕様のデイリー本体冒頭で-1を返すような状況」
;---------------------
@KOJO_DAILY_K14_ART_TRAINING(対象)
#DIM 対象

CALL FL_PLAYBGM("Orient_0.ogg")
SELECTCASE K14_DFLAG_錬磨
	;導入
	CASE 0
		PRINTL
		PRINTFORMW %ANAME(対象)%が声をかけてきた
		PRINTL
		CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
		PRINTL
		CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%、いいところに」", 1)
		CALL KJ_PRINT(対象,@"「ちょっと、相談したいことがあってさ」", 1)
		PRINTL
		PRINTFORMW 改まってなんだろう、と尋ねてみると
		PRINTL
		CALL KJ_PRINT(対象,@"「『術』のことだよ。あ、伝授するとかそういうことじゃなくってね」", 1)
		PRINTL
		PRINTFORMW それは……とても残念だ、うん
		PRINTL
		CALL KJ_PRINT(対象,@"「物欲しそうな顔しちゃってまあ……まあ、それだけ興味を持ってもらえるのは嬉しいけどさ」", 1)
		PRINTL
		PRINTFORML %ANAME(対象)%は頬を掻きながら、満更でもなさそうな表情を浮かべていたが、
		PRINTFORMW 思い直したか、真面目な顔つきでこちらに向き直った
		PRINTL
		CALL KJ_PRINT(対象,@"「……ええと。私の『術』をうまく遣ってくれてありがとう」", 1)
		CALL KJ_PRINT(対象,@"「でも、最近ちょっと、自分でも満足が行ってない部分もあって」", 1)
		PRINTL
		CALL KJ_PRINT(対象,@"「もともと、私たち『草』の仮想敵は人間だから、あまり魔物に対する戦術が練れていなくてね」", 1)
		CALL KJ_PRINT(対象,@"「ちょっと、後れを取っている部分もあるんじゃないかな、って」", 1)
		PRINTL
		CALL ASK_YN("今のままでも十分に役立っている", "たしかに、力負けする部分もあるかも")
		IF RESULT == 0
			PRINTL
			CALL KJ_PRINT(対象,@"「あらら、お褒めにあずかり光栄だけど。やっぱり、他の人達と比べるとね」", 1)
		ELSE
			PRINTL
			CALL KJ_PRINT(対象,@"「やっぱり、そうだよね……うん、わかってはいたけど」", 1)
		ENDIF
		;エルが雇用されてる場合
		SIF CFLAG:NAME_TO_CHARA("エル"):所属 == CFLAG:MASTER:所属
			CALL KJ_PRINT(対象,@"「マナ触媒をより攻撃的に運用することにかけては、錬金学を学んだエルという先達がいるし」", 1)
		;ソーニャが雇用されてる場合
		SIF CFLAG:NAME_TO_CHARA("UC_ソーニャ"):所属 == CFLAG:MASTER:所属
			CALL KJ_PRINT(対象,@"「単純な破壊力の大小で言うなら、ソーニャの修めた魔術にはとても及ばない」", 1)
		PRINTL
		PRINTFORMW はあ、と少し悩ましげにため息をつく%ANAME(対象)%
		PRINTFORMW 今でも、色々な場面で他の仲間にも劣らない働きをしてくれてるよ、と励ますと
		PRINTL
		CALL KJ_PRINT(対象,@"「いや……やっぱりね。戦いの場面でも、もっと%ANAME(MASTER)%の役に立ちたい、って」", 1)
		CALL KJ_PRINT(対象,@"「ガラにもなく、そんなことを思っちゃって、さ」", 1)
		PRINTL
		PRINTFORMW そう、呟くように言った%ANAME(対象)%は、こちらから少しばかり視線を逸らした
		PRINTFORMW 少しだけ、頬に赤みがさしていたような気がするのは、気のせいだろうか
		PRINTL
		CALL KJ_PRINT(対象,@"「で、ちょっと思いついたことがあって。そのためのお願いをしに来たんだ」", 1)
		CALL KJ_PRINT(対象,@"「私も『術』の修行は重ねてきたけど、まだ奥義までは授かっていなくてね」", 1)
		PRINTL
		PRINTFORMW いや待て……あの『分身の術』ですら、最上位の『術』ではないということか
		PRINTFORMW 東方辺境、一体どうなっているのだろう？
		PRINTL
		CALL KJ_PRINT(対象,@"「『草』の者は、ある程度の任務経験を積んでを生き延びられたら、教導者として里に戻ることになっているんだ」", 1)
		CALL KJ_PRINT(対象,@"「そこで、自分の師匠からその流派の奥義の相伝を受けることになるのが、里の流儀でね」", 1)
		CALL KJ_PRINT(対象,@"「……あいにく、私は我慢できずに逃げ出した身だし、そっちの線は薄い」", 1)
		PRINTL
		PRINTFORMW そう言うと、%ANAME(対象)%はこちらをまっすぐに見つめてきた
		PRINTL
		CALL KJ_PRINT(対象,@"「だから、%ANAME(MASTER)%。私の『術』の研鑚に、つきあってもらえないかな」", 1)
		PRINTL
		PRINTFORMW ……彼女が、自分の生まれを――『術』を、どう思っているのかはそれなりに知っているつもりだ
		PRINTFORMW それを含めたうえで……頑張ろうとしてくれているなら、無碍に断ることはできないだろう
		PRINTL
		CALL KJ_PRINT(対象,@"「……ありがとう。色々忙しいのはわかってるから、すぐに、とは言えないけど」", 1)
		CALL KJ_PRINT(対象,@"「こういう時間でも、模擬戦でもいい、時間をくれると助かる」", 1)
		PRINTL
		PRINTFORMW %ANAME(対象)%はこちらに深々と頭を下げてくる
		PRINTFORMW 改めて、彼女の力になってあげようと気持ちを新たにする%ANAME(MASTER)%だった
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_錬磨 = 1
		RETURN 1
	;鍛錬初回
	CASE 1
		PRINTL
		CALL KJ_PRINT(対象,@"「来たね、%ANAME(MASTER)%」", 1)
		PRINTL
		CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
		PRINTL
		CALL KJ_PRINT(対象,@"「さっそくだけど、修行の方向を決めておきたい」", 1)
		CALL KJ_PRINT(対象,@"「私の師の秘術『影縛り』……これが、私の目指すべき『術』になる……と思う」", 1)
		PRINTL
		CALL KJ_PRINT(対象,@"「『影縛り』はその名の通り、対象の影に術の起点を打ち込むことで、不動金縛りに陥らせる」", 1)
		CALL KJ_PRINT(対象,@"「一度受けたことがあるけど、本当に金縛りにあった。実戦だったなら……結果は推して知るべし、だね」", 1)
		PRINTL
		PRINTFORMW ……聞くだに恐ろしい。術の仕組みはわかっているのか、と問うと
		PRINTL
		CALL KJ_PRINT(対象,@"「一度受けたから、それなりには。ただ、師匠はそれこそ……なんでも、術に使えていた」", 1)
		CALL KJ_PRINT(対象,@"「それこそ、何の変哲もない小枝や、待ち針一本からでも術を打てていたんだ」", 1)
		CALL KJ_PRINT(対象,@"「いったいどうなっているのやら、恥ずかしながら皆目見当もつかない」", 1)
		PRINTL
		PRINTFORMW だけど、もしその術を再現できたなら、大きな力となるはずだ
		PRINTL
		CALL KJ_PRINT(対象,@"「うん。ということで、色々試してみようと思う」", 1)
		CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%、準備はいい？　それじゃあ――」", 1)
		PRINTL
		PRINTFORMW ……
		PRINTFORMW ………
		PRINTFORMW …………
		PRINTL
		CALL KJ_PRINT(対象,@"「まぁ、始めはこんなものでしょ」", 1)
		CALL KJ_PRINT(対象,@"「お疲れ、%ANAME(MASTER)%。また、よければ付き合ってね」", 1)
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_錬磨 = 2
		;修行ポイントと戦闘経験値を加算
		K14_修行ポイント01 += KOJO_K14_TRAINING_CULC()
		CALL KOJO_K14_ADD_BATTLEEXP()
		RETURN 1
	;鍛錬２回目
	CASE 2
		PRINTL
		CALL KJ_PRINT(対象,@"「よっ、%ANAME(MASTER)%」", 1)
		PRINTL
		CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
		PRINTL
		CALL KJ_PRINT(対象,@"「じゃあ今回も、よろしくお願いします」", 1)
		PRINTL
		PRINTFORMW ……
		PRINTFORMW ………
		PRINTFORMW …………
		PRINTL
		CALL KJ_PRINT(対象,@"「……ふッ！」", 1)
		PRINTL
		PRINTFORMW 裂帛の気合とともに放たれた手裏剣が、%ANAME(MASTER)%の背後の影に突き立つ――
		PRINTL
		CALL KJ_PRINT(対象,@"「どうかな？　動ける、%ANAME(MASTER)%？」", 1)
		PRINTL
		PRINTFORMW 身体は――
		PRINTFORMW 動く。若干、ピリっとはしたけれども
		PRINTL
		CALL KJ_PRINT(対象,@"「……そっかあ。今の私の術の練り方じゃ、これが限界、かな」", 1)
		PRINTL
		PRINTFORMW うーん、とススキが顎に手をやって考えに沈んでいる
		PRINTFORMW ……塗布するマナ触媒の量が足りてないのでは、とおずおずながら素人考えを述べてみる
		PRINTL
		CALL KJ_PRINT(対象,@"「たしかに、マナ触媒の使用量を増やせば確実だろうけど……」", 1)
		CALL KJ_PRINT(対象,@"「それこそ、投擲物を棒火矢みたいに大きくして容量を増やさなきゃいけないしね」", 1)
		CALL KJ_PRINT(対象,@"「取り回しが悪くなっちゃったら元も子もないし」", 1)
		PRINTL
		PRINTFORMW 奇襲性、即応性、秘匿性を持ちながら、金縛りを起こすに十分な出力を確保する
		PRINTFORMW 二律背反、難題もいいところだ。これを何とかするには……、……ううーん……
		PRINTL
		PRINTFORMW ……！？
		PRINTFORMW 思考に集中しているタイミングで耳元で聞こえた羽音に、思わず飛びのいてしまった
		PRINTFORMW 目の前を、何の変哲もないミツバチが飛んでいく……
		PRINTL
		PRINTFORMW ふいに思い浮かんだイメージは……ミツバチが天敵のスズメバチを熱殺するために作る『蜂球』の様子
		PRINTFORMW 思わず、%ANAME(対象)%を見る
		PRINTFORMW ……、……ロクでもない連想をしてしまった
		PRINTL
		CALL KJ_PRINT(対象,@"「……ヘンなカオしてるけど。何か思いついた？」", 1)
		PRINTL
		PRINTFORMW いやまあ、元も子もないのだが
		PRINTFORMW いっそ、『分身の術』で作った分身で拘束でもすれば――
		PRINTL
		CALL KJ_PRINT(対象,@"「――――」", 1)
		PRINTL
		PRINTFORMW 唖然としたような%ANAME(対象)%の表情に、これは怒られるかなあ、と首を竦めていると……
		PRINTL
		CALL KJ_PRINT(対象,@"「――それだ。なんで、今まで思い至らなかったんだろう」", 1)
		PRINTL
		PRINTFORMW みるみるうちに、天啓がひらめいたかのような表情に移り変わる
		PRINTL
		CALL KJ_PRINT(対象,@"「『分身』も、もとはマナ触媒から作り出されたもの」", 1)
		CALL KJ_PRINT(対象,@"「それをあたら霧散させるだけでなく、次の『術』の布石として用いれば――」", 1)
		PRINTL
		PRINTFORMW 早口でまくし立てる%ANAME(対象)%に、状況が若干呑み込めない部分もあったが……
		PRINTFORMW 解決策が見つかったなら、それば喜ばしいことなのだろう
		PRINTL
		CALL KJ_PRINT(対象,@"「よし、方向性は決まった！　%ANAME(MASTER)%、すぐ取り掛かろう！」", 1)
		PRINTL
		PRINTFORMW 急にイキイキとし出した%ANAME(対象)%に引きずられるように、特訓を再開した……
		PRINTW
		CALL FL_STOPBGM()
		K14_DFLAG_錬磨 = 3
		;修行ポイントと戦闘経験値を加算
		K14_修行ポイント01 += KOJO_K14_TRAINING_CULC()
		CALL KOJO_K14_ADD_BATTLEEXP()
		RETURN 1
	;以降
	CASE 3
		;完成
		IF K14_修行ポイント01 >= 100
			CALL KJ_PRINT(対象,@"「……為った」", 1)
			PRINTL
			CALL DRAW_PORTRAIT(対象, "[目:閉じ(緩)][サイズ:180px][POS_X:0]",,1)
			PRINTL
			PRINTFORMW 満足そうな表情で、%ANAME(対象)%は小さくうなずいた
			PRINTFORMW ……考案した『術』が、ついに完成に至ったのだ
			PRINTL
			CALL KJ_PRINT(対象,@"「師の、ありとあらゆる投擲物を起点とできる秘術『影縛り』」", 1)
			CALL KJ_PRINT(対象,@"「それを私の得手、『分身』を用いて再現した崩し（アレンジ）……」", 1)
			PRINTL
			PRINTFORMW %ANAME(対象)%は目を瞑り、印を切り口訣を結ぶ
			PRINTFORMW 舞い散るマナ触媒――たちまちのうちに、その姿が無数に分身する
			PRINTL
			CALL KJ_PRINT(対象,@"「とくと御覧じろ。これなるは、我流・残像殺法――」", 1)
			PRINTL
			PRINTFORMW 刹那、無数の分身が攻撃態勢に入り――四方八方から、こちらに殺到する！
			PRINTL
			CALL KJ_PRINT(対象,@"「――『影縫い』の術」", 1)
			PRINTL
			PRINTFORMW 刹那に%ANAME(MASTER)%の身体をすりぬけた分身は、その背後、足元に伸びた影に刃を突き立て――
			PRINTFORMW %ANAME(MASTER)%は、指一本動かせなくなってしまった！
			PRINTL
			CALL KJ_PRINT(対象,@"「金縛りに至ったね……よし」", 1)
			PRINTL
			PRINTFORMW 検分を終え、%ANAME(対象)%が背後の刃を抜き取れば……
			PRINTFORMW ふっ――と、血流と、重みが身体に戻る感覚。強張った体を、少しほぐすことができた
			PRINTFORMW ……原理はわからないが、本当に恐ろしい効き目だ
			PRINTL
			CALL KJ_PRINT(対象,@"「見事な術だって？　まだまだ……分身を挟まなきゃいけないぶん、師の『影縛り』には遠く及ばないよ」", 1)
			CALL KJ_PRINT(対象,@"「ああ、でも――」", 1)
			PRINTL
			PRINTFORMW 呟いて、%ANAME(対象)%はこちらにふわりとした笑顔を向けてくる
			PRINTL
			CALL DRAW_PORTRAIT(対象, "[感情:幸][サイズ:180px][POS_X:0]",,1)
			PRINTL
			CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%と共に作り上げた『術』だしね。もっと、自慢しちゃっていいのかな？」", 1)
			PRINTL
			PRINTFORMW その笑顔が見れただけでも、ここまでの苦労が報われる――とは、口にするだけ野暮、か
			PRINTL
			CALL KJ_PRINT(対象,@"「……ありがとう、%ANAME(MASTER)%。私のわがままに付き合ってくれて」", 1)
			CALL KJ_PRINT(対象,@"「恩は必ず返すよ。これからもっと、%ANAME(MASTER)%のために活躍してみせるから」", 1)
			PRINTL
			PRINTFORMW そう言うと、%ANAME(対象)%はこちらに手を差し出してくる
			PRINTFORMW 期待してる、と応える代わりに、%ANAME(MASTER)%は優しくその手を取った――
			PRINTL
			SETCOLOR COLOR("イエロー")
			PRINTFORML %ANAME(対象)%が、スキル『影縫いの術』『陽忍』『陰忍』を習得可能になった！
			PRINTFORMW ※『陽忍』と『陰忍』は同時には習得できません
			RESETCOLOR
			PRINTW
			CALL FL_STOPBGM()
			K14_DFLAG_錬磨 = 4
			K14_新スキル習得01 = 1
			RETURN 1
		ELSE
			CALL KJ_PRINT(対象,@"「よっ、%ANAME(MASTER)%」", 1)
			PRINTL
			CALL DRAW_PORTRAIT(対象, "[感情:通常][サイズ:180px][POS_X:0]",,1)
			PRINTL
			CALL KJ_PRINT(対象,@"「今日こそ新しい『術』、形にしたいね」", 1)
			PRINTL
			PRINTFORMW ……
			PRINTFORMW ………
			PRINTFORMW …………
			PRINTL
			;先に修行ポイントを加算、累積量を推測させるテキストを流す
			K14_修行ポイント01 += KOJO_K14_TRAINING_CULC()
			SELECTCASE K14_修行ポイント01
				CASE 0 TO 50
					CALL KJ_PRINT(対象,@"「方向性は定まってるから、あとは練習あるのみかな」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASE 51 TO 75
					CALL KJ_PRINT(対象,@"「……もう一息、かな」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASE 76 TO 100
					CALL KJ_PRINT(対象,@"「あとほんのちょっとで、モノにできそうな感じはあるんだ」", 1)
					CALL KJ_PRINT(対象,@"「ありがとう、%ANAME(MASTER)%。　次の機会もよろしくね」", 1)
				CASEELSE
					CALL KJ_PRINT(対象,@"「……！　今の感覚……」", 1)
					PRINTL
					PRINTFORMW 目を見開いた%ANAME(対象)%が、反復するように動きを繰り返す
					PRINTFORMW 微細な感覚で、何かをつかみ取ったのかもしれない……
					PRINTL
					CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%、もう少しだけ付き合って！　今ならやれそうな気がする……！」", 1)
					PRINTL
					PRINTFORMW もちろん、と返し、躍動する%ANAME(対象)%の対手を務める
					PRINTFORMW いよいよ、新しい『術』がその全貌を顕していく……
			ENDSELECT
			PRINTW
			CALL FL_STOPBGM()
			;戦闘経験値を加算
			CALL KOJO_K14_ADD_BATTLEEXP()
			RETURN 1
		ENDIF
ENDSELECT
RETURN 1


code:
;-------------------------------------------------
; @FL_INIT_LOADER から呼ばれる口上初期読み込み
; 編集用シート
;-------------------------------------------------
@KOJO_DEFINE_K14
#DIMS CONST XML_PATH_COM = "ERB/口上/14_ススキ/KOJO_K14_COM.xml"
#DIMS CONST XML_PATH_EVENT = "ERB/口上/14_ススキ/KOJO_K14_EVENT.xml"
#DIMS CONST XML_PATH_COMBAT = "ERB/口上/14_ススキ/KOJO_K14_COMBAT.xml"
CALL KOJO_XML_REGISTER(XML_PATH_COM, NO:(NAME_TO_CHARA("UC_ススキ")), XMLID_KOJO_CLASS_COM)
CALL KOJO_XML_REGISTER(XML_PATH_EVENT, NO:(NAME_TO_CHARA("UC_ススキ")), XMLID_KOJO_CLASS_EVENT)
CALL KOJO_XML_REGISTER(XML_PATH_COMBAT, NO:(NAME_TO_CHARA("UC_ススキ")), XMLID_KOJO_CLASS_COMBAT)
RETURN 1

;口上出力前の初期処理。共通処理以外で口上出力前に予め取得しておきたい情報があれば別途ここに記述
@KOJO_XML_INIT_K14(KOJO_CHARA_ID)
#DIM  KOJO_CHARA_ID
#DIM  CONST OLD_XML_FORMAT = 0  ;基本は0指定。v0.211以前のXML口上フォーマットの場合 1
;出力前の共通初期処理
CALL KOJO_XML_INIT_COMMON_BEFORE_PRINT(KOJO_CHARA_ID)

RETURN OLD_XML_FORMAT

;-------------------------------------------------
; SELECTCOMがどのグループに属するのかを文字列で返す
; RESULTSで返却するグループ名のリストは口上シートA列COM|GROUPに指定した名称と一致している必要がある
; KOJO_CHARA_ID 口上参照キャラの登録番号
; PLACE 口上出力箇所 コマンド実行前と後で参照グループを切り替えたいならばこの引数を見る
; REUSLT = 0 合致グループなし
; REUSLT = 1 合致グループあり
; REUSLT = 2 合致グループあり、排他(該当グループ以外に適合する条件の口上があっても該当するグループのみ出力)
; RESULTS: グループ名のリスト
;-------------------------------------------------
@KOJO_XML_COMGROUP_K14(KOJO_CHARA_ID, PLACE)
#DIM  KOJO_CHARA_ID
#DIMS PLACE
;口上固有の条件グループはここに定義

;共通のコマンドグループ
CALL KOJO_GET_COMGROUP(KOJO_CHARA_ID, PLACE)

RETURN RESULT