code:
;───────────────────────────────────────
;■日常_TARGET_対象_実行前
;───────────────────────────────────────
@KOJO_K7_NOON_BEFORE_TARGET(エル_対象)
#DIM エル
#DIM エル_対象
#DIMS エル機嫌

IF !エル_対象
	エル_対象 = MASTER
ENDIF

エル = NAME_TO_CHARA("エル")
エル機嫌 '= TOSTR_EMOTION(エル)

;───────────────────────────────────────
;●機嫌が悪ければ通常のコマンド口上は喋らない　->XML口上に移植
;───────────────────────────────────────
; エル機嫌 = %TOSTR_EMOTION(エル)%
SELECTCASE エル機嫌
	CASE "恨", "怒", "憤"
		; 		IF PALAM:エル:怒主 <= PALAM:エル:怒外
		; 			PRINTDATAL
		; 				DATAFORM 「……何か？」
		; 				DATAFORM 「……何かな？」
		; 				DATAFORM 「理解できないな……」
		; 				DATAFORM 「……」
		; 			ENDDATA
		; 		ELSE
		; 			PRINTDATAL
		; 				DATAFORM 「……一人にしてくれないかな、今は腹の虫が悪くてね」
		; 				DATAFORM 「……何か？」
		; 				DATAFORM 「……何かな？」
		; 				DATAFORM 「理解できないな……」
		; 				DATAFORM 「……」
		; 			ENDDATA
		; 		ENDIF
		RETURN 0

	CASE "鬱", "悲", "憂"
		; 		IF PALAM:エル:哀主 <= PALAM:エル:哀外
		; 			PRINTDATAL
		; 				DATAFORM 「……何か？」
		; 				DATAFORM 「……しばらく一人にしてくれないかな」
		; 				DATAFORM 「……」
		; 			ENDDATA
		; 		ELSE
		; 			PRINTDATAL
		; 				DATAFORM 「……しばらく一人にしてくれないかな」
		; 				DATAFORM 「何か……？」
		; 				DATAFORM 「……」
		; 			ENDDATA
		; 		ENDIF
		RETURN 0

	CASE  "狂", "恐", "怯"
		; 		IF PALAM:エル:怖主 <= PALAM:エル:怖外
		; 			PRINTDATAL
		; 				DATAFORM 「ひっ……。今度は一体なにを……するつもり……？」
		; 				DATAFORM 「お願いだ……お願いします……ひどいこと……しないで」
		; 			ENDDATA
		; 		ELSE
		; 			PRINTDATAL
		; 				DATAFORM 「ひっ……。今度は一体なにを……するつもり……？」
		; 				DATAFORM 「お願いだ……お願いします……ひどいこと……しないで」
		; 			ENDDATA
		; 		ENDIF
		RETURN 0

		; 	CASEELSE

ENDSELECT

;───────────────────────────────────────
;●相槌(同一コマンド)
;───────────────────────────────────────
IF RAND:3 == 0
	IF SELECTCOM == PREVCOM
		;エルに主導権なし
		IF !IS_INITIATIVE(エル)
			PRINTDATAL
				DATAFORM 「もうちょっと%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たい？　いいよ」
				DATAFORM 「もう少し%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たい？　構わないよ」
				DATAFORM 「まだ%KOJO_COM_NAME_TARGET_K7(SELECTCOM)%たいんだね」
				DATAFORM 「構わないよ。このまま続けよう」
			ENDDATA
			;エルに主導権あり
		ELSE
			PRINTDATAL
				DATAFORM 「このまま%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たいよ、いい？」
				DATAFORM 「もうちょっと%KOJO_COM_NAME_TARGET_K7(SELECTCOM)%たいな。……構わないかな？」
				DATAFORM 「このまま？　構わないよ」
				DATAFORM 「もう少し%KOJO_COM_NAME_TARGET_K7(SELECTCOM)%たいよ、いいよね？」
			ENDDATA
		ENDIF
		;───────────────────────────────────────
		;●相槌(同一コマンドでない)
		;───────────────────────────────────────
	ELSE
		;エルに主導権なし
		IF !IS_INITIATIVE(エル)
			PRINTDATAL
				DATAFORM 「%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たい？　構わないよ」
				DATAFORM 「%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たいんだね。いいとも」
				DATAFORM 「%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たい？　いいよ」
			ENDDATA
			;エルに主導権あり
		ELSE
			PRINTDATAL
				DATAFORM 「%KOJO_COM_NAME_TARGET_K7(SELECTCOM)%たいな」
				DATAFORM 「%KOJO_COM_NAME_TARGET_K7(SELECTCOM)%たいよ」
				DATAFORM 「%KOJO_COM_NAME_TARGET_K7(SELECTCOM)%たいけれど、いいかな？」
				DATAFORM 「%KOJO_COM_NAME_PLAYER_K7(SELECTCOM)%たいな、構わないかい？」
			ENDDATA
		ENDIF
	ENDIF
ENDIF

;───────────────────────────────────────
;●会話　->XML口上に移植
;───────────────────────────────────────
; $TALK_K7
IF SELECTCOM == 300
	; 	{
	; 		SELECTCASE IFRAND(
	; 			"1TO3",1,
	; 			"9",CHECK_K7("陥落", エル_対象),
	; 			"8",CHECK_K7("陥落", エル_対象) && IS_BATHING(エル),
	; 			"D1TO9,10",CHECK_K7("陥落", エル_対象) && IS_ESTRUS(エル)
	; 			)
	; 	}
	; 			;エルに主導権あり（話し手）
	; 		CASE 1 TO 3  ;通常の会話
	; 			IF IS_INITIATIVE(エル)
	; 				PRINTDATAL
	; 					DATAFORM 「何事も日々の積み重ねが大事だよ。研究というものはそうやって営々と積み上げられてきたのだからね」
	; 					DATAFORM 「よかったら今度%SPLIT_RAND("狩りのやり方/料理",1)%を教えてくれないかな？」
	; 					DATAFORM 「時には休憩も必要だよ。お茶を淹れてこよう」
	; 					DATAFORM 「がむしゃらに努力すれば良いというものでもない。さもなければ努力はあっさり裏切るからね」
	; 					DATAFORM 「こうしてゆっくり人とお喋りするのは久しぶりな気がするよ」
	; 					DATAFORM 「冒険にいくならきちんと準備しないとね」
	; 					DATALIST
	; 						DATAFORM 「どうにもアカデミーの人々は魔導でいかに効率よく湯を沸かすかに取り憑かているみたいだ」
	; 						DATAFORM 「だから私のような、一見なんの役にも立たない研究が好きな人間にはいささか居心地が悪くてね」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「錬金術とその流れを汲む魔導は人類社会を大いに進歩させた」
	; 						DATAFORM 「今や巨大な鉄の塊を大地に走らせることさえできるんだ」
	; 						DATAFORM 「私はいつかあの月、そしてそのさらに向こうにさえ、人の手が届くと信じているよ」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「先天的な才覚がないと扱えなかった魔術を科学的な手法で体系化、一般化しようと試みたのが魔導工学だ」
	; 						DATAFORM 「おかげで杖の先から火の玉を出せなくても皆が魔術の恩恵を受けられるようになった」
	; 						DATAFORM 「もっとも……一部の人はそれををあまり快く思っていないようだけどね」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「森も山も資源の宝庫だ。歩き回ってみれば色々発見があると思うよ」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「道具や武器が欲しいなら工房に足を運んでみるといい。材料は必要だけどね」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「山には行って見たかい？　あの山はとても純度の高いマナ結晶がとれそうだよ」
	; 						DATAFORM 「錬金術の触媒としてはうってつけだ。時間があるときにいくつか掘ってみようよ」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「大域錬金術……土地そのものをまるごと作り変えてしまうような秘術がかつては存在したらしい」
	; 						DATAFORM 「理論上行使には非現実的な量のマナが必要になるのだけど、この土地の特性を活かせばあるいは……」
	; 					ENDLIST
	; 				ENDDATA
	; 				;エルに主導権なし（聞き手）
	; 			ELSE
	; 				PRINTDATAL
	; 					DATAFORM 「時には休憩も必要だよ。お茶を淹れてこよう」
	; 					DATAFORM 「がむしゃらに努力すれば良いというものでもない。さもなければ努力はあっさり裏切るからね」
	; 					DATAFORM 「こうしてゆっくり人とお喋りするのは久しぶりな気がするよ」
	; 					DATAFORM 「空いている場所に工房をこしらえさせてもらったよ。すまないが事後報告だ」
	; 					DATAFORM 「わかっていると思うけど……丸腰で冒険に行くのは自殺のようなものだからね？」
	; 					DATALIST
	; 						DATAFORM 「サイズなんて問題じゃない？　いや、それはまやかしだよ、%CALLNAME_K7(エル_対象)%」
	; 						DATAFORM 「サイズは、重要だ。いや、何が……とは言わないけど……」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「私は魔導工学者であって、魔術師ではないよ」
	; 						DATAFORM 「だから人をカエルにするとか、箒で空を飛ぶとか、そういうのは専門外だよ」
	; 					ENDLIST
	; 					DATALIST
	; 						DATAFORM 「この土地は%CALLNAME_K7(エル_対象)%が思っているよりずっと興味深い場所かもしれないね」
	; 						DATAFORM 「資源もマナも植生も実に豊かだ。あれこれ研究するには理想的な場所だよ」
	; 					ENDLIST
	; 				ENDDATA
	; 			ENDIF
	; 		CASE 8 ;入浴中
	; 			PRINTDATAL
	; 				DATALIST
	; 					DATAFORM 「ふぅ……やっぱり湯船に浸かるのは気持ちがいいね」
	; 					DATAFORM 「ノルディアの街には肩まで浸かれる場所なんてほとんどないからね。これは格別の贅沢だよ」
	; 				ENDLIST
	; 				DATALIST
	; 					DATAFORM 「古帝国が全盛を迎えた時代には、こうやってのんびりと浸かれる浴場があちこちにあったそうだよ」
	; 					DATAFORM 「中には今でも使われているものもあるらしい。是非一度行ってみたいものだね」
	; 				ENDLIST
	; 				DATALIST
	; 					DATAFORM 「……まぁ恥ずかしくないと言えば嘘になるけれど、今更気後れするような間柄でもないだろう？」
	; 					DATAFORM 「ふふっ、キミは……どう思っているのかな？」
	; 				ENDLIST
	; 			ENDDATA
	; 		CASE 9 ;親しくなるとたまにちょっと詳しい身の上話をしてくれる予定
	; 			SELECTCASE IFRAND("1TO2",1)
	; 				CASE 1
	; 					PRINTFORML 「アカデミーを飛び出してきたことを後悔していないか？　後悔したことがないといえば嘘になるだろうね」
	; 					PRINTFORML 「私だって時々都会の雑踏や喧騒、不自由のない暮らしが恋しくなるよ」
	; 					PRINTL
	; 					PRINTFORML 「でもまぁここでの暮らしに勝るものではないね」
	; 					PRINTFORML 「ここなら誰にも指図されずに好きなものを研究できる」
	; 					PRINTFORMW 「それに……%CALLNAME_K7(エル_対象)%と一緒に、こうしてのんびりと談笑に耽っている時間ほど得がたいものはないよ」
	; 				CASE 2
	; 					PRINTFORML 「魔導工学は伝統的な魔術に錬金術、自然科学のごった煮の産物だ」
	; 					PRINTFORML 「今日の文明は魔導工学の上に成り立っていると言っても過言ではない」
	; 					PRINTFORMW 「ここみたいな田舎でも蛇口をひねれば熱々のシャワーを浴びられるのだから、実にありがたいね」
	; 				CASEELSE
	; 			ENDSELECT
	; 		CASE 10 ;発情してるときは真面目な話はしない
	; 			PRINTDATADL
	; 				DATAFORM %ANAME(エル)%の息がひどく荒い
	; 				DATAFORM %ANAME(エル)%は頬を紅潮させて%ANAME(エル_対象)%を見つめる
	; 				DATAFORM %ANAME(エル)%はとろんとした目つきで%ANAME(エル_対象)%の方を向く
	; 			ENDDATA
	; 			PRINTL
	; 			SELECTCASE TCVAR:エル:当日ウフフ継続時間
	; 				CASE IS > 150
	; 					PRINTDATAL
	; 						DATALIST
	; 							DATAFORM 「ふふっ、今日は……その…いっぱい、しちゃったね……」
	; 							DATAFORM 「%CALLNAME_K7(エル_対象)%は、満足してくれたかな……？」
	; 							DATAFORM 「私は……実は結構欲張りだからね。もっと、してもいいかな、なんてね」
	; 						ENDLIST
	; 						DATALIST
	; 							DATAFORM 「困ったな……あんなに愛してもらったのに……まだ身体の火照りが収まらないや」
	; 							DATAFORM 「ねぇ、この後はどうする？　%CALLNAME_K7(エル_対象)%さえ良けれれば今日はずっと一緒にいようよ」
	; 							DATAFORM 「正直に言うと……さっきの続き、もっと…したいな❤」
	; 						ENDLIST
	; 					ENDDATA
	; 				CASEELSE
	; 					PRINTDATAL
	; 						DATAFORM 「はぁ…はぁ…❤　ねぇ、その……わかっているだろう？」
	; 						DATAFORM 「%CALLNAME_K7(エル_対象)%は……その……本当に意地が悪いね……❤」
	; 						DATAFORM 「……私がどうして欲しいのか、よく分かっているくせに……❤」
	; 					ENDDATA
	; 			ENDSELECT
	; 		CASEELSE
	; 	ENDSELECT
	; 	PRINTL
	; 	RETURN 0

	;───────────────────────────────────────
	;●酒
	;───────────────────────────────────────
ELSEIF SELECTCOM == 310
	IF IS_INITIATIVE(エル)
		PRINTFORML 「大丈夫、ちょっと舐めるだけだから。本当だよ」
		PRINTFORMDL 酒瓶を片手にそう口にする%ANAME(エル)%の目は左右に泳いでいる。
	ELSE
		PRINTFORML 「本当はいけないのだろうけどね……」
		PRINTFORML 「まぁ舐めるくらいなら構わないだろう」
	ENDIF

	;───────────────────────────────────────
	;●蜂蜜水
	;───────────────────────────────────────
ELSEIF SELECTCOM == 311
	PRINTFORML 「甘くて美味しい！　ありがとう♪」

	;───────────────────────────────────────
	;●水浴び
	;───────────────────────────────────────
ELSEIF SELECTCOM == 354
	PRINTDATAL
		DATAFORM 「やったね！　それっ」
		DATAFORM 「ははっ、服がびしょびしょだ」
		DATAFORM 「こうして水浴びするなんて、ノルディアの街中じゃ中々できない贅沢だ」
		DATAFORM 「ふぅ……。気持ちいい」
	ENDDATA

	;───────────────────────────────────────
	;●泳ぐ
	;───────────────────────────────────────
ELSEIF SELECTCOM == 355
	IF TFLAG:コマンド成否 == 1
		PRINTFORML 「%CALLNAME_K7(エル_対象)%は泳ぐのが上手だね。私にも教えてくれないかな？」
	ELSEIF TFLAG:コマンド成否 == -1
		IF TFLAG:17 == 1
			PRINTFORML 「%CALLNAME_K7(エル_対象)%！？　大丈夫！？」
		ELSEIF TFLAG:17 == 2
			PRINTFORML 「大丈夫、大丈夫、私が簡単に溺れるわけ……わっぷ……」
		ELSE
			PRINTFORML 「%CALLNAME_K7(エル_対象)%！？　大丈夫！？　こっちに……お、重い……！」
		ENDIF
	ELSE
		PRINTFORML 「%CALLNAME_K7(エル_対象)%、ちょっとあそこまで競争しようよ」
	ENDIF

	;───────────────────────────────────────
	;●スキンシップ・頭を撫でる・髪を梳く・櫛で髪を梳く・背中を流す
	; 濃厚 TFLAG:17 = 1
	; 温泉 TFLAG:デート場所 = 7, TFLAG:17 = 2
	;───────────────────────────────────────
ELSEIF GROUPMATCH(SELECTCOM, 320, 321, 322, 323, 358)
	{
		SELECTCASE IFRAND(
			"1",1,
			"D1,2",エル機嫌 == "良" || エル機嫌 == "悦" || エル機嫌 == "幸",
			"D1,3", SELECTCOM == 320 && (エル機嫌 == "良" || エル機嫌 == "悦" || エル機嫌 == "幸") && TFLAG:17 == 1,
			"D1TO9,10", SELECTCOM == 321 && CUM_GET_COUNT:(エル):射精部位_口 > 1 && CHECK_K7("陥落", エル_対象),
			"D1TO9,11", SELECTCOM == 320 && CHECK_K7("陥落", エル_対象) && PALAM:エル:欲情 >= 9000 && !IS_EQUIP(エル,331, 333)
			)
	}
		CASE 1
			PRINTDATAL
				DATAFORM 「……子どもじゃあるまいし……、頭を撫でられてもねぇ……」
				DATAFORM 「……うん？」
				DATAFORM 「まぁ……悪い気は……しないけれど」
			ENDDATA
		CASE 2
			PRINTDATAL
				DATAFORM 「ふふっ、くすぐったいよ」
				DATAFORM 「なんだか子どもの頃を思い出すよ。まだまだ子どもだって……？　ん、それもそうだね」
				DATAFORM  %PRINT_DESC_K7(@"%ANAME(エル)%は%ANAME(エル_対象)%に撫でられながら鼻歌を歌っている……")%
			ENDDATA
		CASE 3 ;濃厚スキンシップのみ
			IF !IS_INITIATIVE(エル)
				PRINTDATAL
					DATAFORM 「んんっ……❤　いやらしいなぁ、もう」
					DATAFORM 「……そんなふうに触られたら、んんっ……、私だって心の準備が……」
					DATAFORM 「ねぇ……、息が荒いよ？　ん、私も？　……誰のせいだと思ってるんだい？」
				ENDDATA
			ELSE
				PRINTDATAL
					DATAFORM 「%CALLNAME_K7(エル_対象)%の身体は……温かいね」
					DATAFORM 「ふふっ、甘やかされるのは悪い気がしないよ。特に%CALLNAME_K7(エル_対象)%なら……ね」
					DATAFORM 「ねぇ……、息が荒いよ？　ん、私も？　……誰のせいだと思ってるんだい？」
				ENDDATA
			ENDIF
		CASE 11 ;濃厚スキンシップ,発情
			PRINTFORMDW %ANAME(エル)%は%ANAME(MASTER)%に身体を弄られながら甘い吐息を漏らしている……
			PRINTFORML 「こ、こんなになるまで……好き放題しておいて……」
			PRINTFORMW 「肝心なところに触れてくれないなんて……%CALLNAME_K7(エル_対象)%は意地が悪いよ……」
			PRINTL
			PRINTFORMDL %ANAME(MASTER)%の執拗なじらしに耐えかねた%ANAME(エル)%は%ANAME(MASTER)%の手をとると、
			IF RAND:2
				PRINTFORMDW 自身の%STR_BODY("胸：長：感度", エル)%に導いた……
				CALL SET_EQUIP(331, 1)
			ELSE
				PRINTFORMDW 自身の%STR_BODY("クリ：長：感度", エル)%に導いた……
				CALL SET_EQUIP(333, 1)
			ENDIF
			RETURN 1
		CASE 10
			PRINTFORMDW %ANAME(MASTER)%は口から精液を滴らせ、とろんとした表情を浮かべる%ANAME(エル)%の頭を撫でている……
			PRINTFORMW 「あんなに頑張ってご奉仕したんだからね……。もう少し褒めて貰わないと割に合わないよ」
			PRINTL
			PRINTFORMW 「それに今度は……わたしのことも気持ちよくして欲しいな❤」
		CASEELSE
	ENDSELECT

	;───────────────────────────────────────
	;●見つめる・甘い言葉
	;───────────────────────────────────────
ELSEIF GROUPMATCH(SELECTCOM, 324, 325)
	{
		SELECTCASE IFRAND(
			"1",1,
			"D1,2", エル機嫌 == "良" || エル機嫌 == "悦" || エル機嫌 == "幸",
			"D1,3", (エル機嫌 == "良" || エル機嫌 == "悦" || エル機嫌 == "幸") && CHECK_K7("陥落", エル_対象)
			)
	}
		CASE 1
			PRINTDATAL
				DATAFORM 「えっと……そんな目で見ないでくれたまえよ……。私もリアクションに困る」
				DATAFORM 「……うん？」
				DATAFORM 「……急にどうしたんだい？」
				DATAFORM 「……おだてても何も出ないよ？」
			ENDDATA
		CASE 2
			PRINTDATAL
				DATAFORM 「ふふっ、まぁ……悪い気はしないね」
				DATAFORM 「あー、なんというか……その、そんなにじっと見ないでよ」
				DATAFORM 「その……これはなんだか、気恥ずかしいね」
				DATAFORM  %PRINT_DESC_K7(@"%ANAME(エル)%は照れくさそうに頬を掻いている")%
			ENDDATA
		CASE 3 ;陥落済み
			IF IS_BATHING(エル) && TALENT:エル:合意
				SELECTCASE C_COND_MAP_GETS(MASTER, "視線")
					CASE "胸"
						PRINTDATAL
							DATALIST
								DATAFORM 「……何か言いたげな顔をしているね？」
								DATAFORM 「仕方ないだろう……栄養は全部頭が持っていってしまったのだから……」
							ENDLIST
							DATALIST
								DATAFORM 「……サイズは確かに重要だが、全てではない」
								DATAFORM 「ス、スタイルは……そんなに悪くないと思うのだがね」
							ENDLIST
						ENDDATA
					CASEELSE
						PRINTDATAL
							DATALIST
								DATAFORM 「その……そう、じっと見つめないでくれるかな」
								DATAFORM 「……改めて裸をまじまじと見られるのは、やっぱり恥ずかしいよ」
							ENDLIST
						ENDDATA
				ENDSELECT
			ELSE
				PRINTDATAL
					DATAFORM 「うん、こういうのも悪い気はしないよ。特に……%CALLNAME_K7(エル_対象)%とならね❤」
					DATAFORM 「そんなふうにじっと見られると、えっと、そろそろ穴があきそうだ……」
					DATAFORM  %PRINT_DESC_K7(@"%ANAME(エル)%は柔和な笑みを浮かべて%ANAME(エル_対象)%を見つめている")%
				ENDDATA
			ENDIF
		CASEELSE
	ENDSELECT

	;───────────────────────────────────────
	;●抱きしめる
	;───────────────────────────────────────
ELSEIF GROUPMATCH(SELECTCOM, 327)
	{
		SELECTCASE IFRAND(
			"1",1,
			"D1,2", エル機嫌 == "良" || エル機嫌 == "悦" || エル機嫌 == "幸",
			"D1,D2,3", (エル機嫌 == "良" || エル機嫌 == "悦" || エル機嫌 == "幸") && CHECK_K7("陥落", エル_対象),
			"D1TO9,10", CHECK_K7("陥落", エル_対象) && PALAM:エル:欲情 >= 9000 && PALAM:エル_対象:欲情 >= 6000 && HAS_PENIS(エル_対象) && !RAND:3
			)
	}
		CASE 1
			IF !IS_INITIATIVE(エル)
				PRINTDATAL
					DATAFORM 「ちょ、ちょっと。　……そんな急に……」
					DATAFORM 「%CALLNAME_K7(エル_対象)%は急だなぁ……もう……」
					DATAFORM 「ええっと……、よしよし……」
				ENDDATA
			ENDIF
		CASE 2
			;エルに主導権なし
			IF !IS_INITIATIVE(エル)
				PRINTDATAL
					DATAFORM 「んっ……。もう少し……このままがいいかな……」
					DATAFORM 「……温かい……」
					DATAFORM 「ちょ、ちょっと。　……そんな急に……」
				ENDDATA
				;エルに主導権あり
			ELSE
				PRINTDATAL
					DATAFORM 「んっ……。もう少し……このままがいいかな……」
					DATAFORM 「……温かい……」
					DATAFORM 「……もう少し、このままでいさせてよ」
				ENDDATA
			ENDIF
		CASE 3
			IF !IS_INITIATIVE(エル)
				PRINTDATAL
					DATAFORM 「%CALLNAME_K7(エル_対象)%の身体は……温かいね」
					DATAFORM 「%CALLNAME_K7(エル_対象)%も大概甘えんぼうだなぁ。　よしよし❤」
					DATAFORM 「んっ、 ちょっと、痛いよ……。　でもまぁ、少し痛いくらいの方が……いいかな❤」
					DATAFORM 「もう少し、強くしても……いいよ❤」
				ENDDATA
			ELSE
				PRINTDATAL
					DATAFORM 「%CALLNAME_K7(エル_対象)%の胸は温かいなぁ……」
					DATAFORM 「存分に甘えさせてもらうよ❤　ダメとは……言わないだろう？」
					DATAFORM 「%CALLNAME_K7(エル_対象)%は……温かいね」
					DATAFORM 「心臓、凄くドキドキ鳴ってるね。　ふふっ、この距離じゃぁ何も隠せないよ？」
					DATAFORM 「ねぇ、今いやらしいこと考えただろう？　ふふっ、この距離じゃぁごまかしてもバレバレなんだから……ね？」
				ENDDATA
			ENDIF
		CASE 10
			PRINTDATAL
				DATALIST
					DATAFORM 「心臓、凄くドキドキ鳴ってるね」
					DATAFORM 「それに……こんなに固くしたモノを私に押し当てて、このあと一体どうするつもりなのかな……❤」
					DATAFORM 「ふふっ、この距離じゃぁ何も隠せないよ？　正直になって……いいんだからね❤」
				ENDLIST
			ENDDATA
		CASEELSE
	ENDSELECT

	;───────────────────────────────────────
	;●訓練系
	;───────────────────────────────────────
ELSEIF GROUPMATCH(SELECTCOM, 301, 302, 303, 304, 305, 306, 307)
	SELECTCASE SELECTCOM
		CASE 301
			PRINTFORML 「確かに身を守るのは大事だね。戦うのはあまり得意ではないんだけれども……」
			PRINTFORML 「おおっと」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「%CALLNAME_K7(エル_対象)%、私の動き、どうだったかな？」
			ENDIF
		CASE 302
			PRINTFORML 「宇宙でやっていくからには艦くらい動かせないとね」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「これで今までよりももっと%CALLNAME_K7(エル_対象)%の役に立てるはずだ」
			ENDIF
		CASE 303
			PRINTFORML 「実践は大事だけれど……もちろん座学もおろそかにしてはいけないよ」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「%CALLNAME_K7(エル_対象)%……起きているかい？」
			ENDIF
		CASE 304
			PRINTFORML 「サボってはいけないよ、%CALLNAME_K7(エル_対象)%。まだこんなにたくさん書類が残っているんだ」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「ふぅ……凄まじい量だね……」
				PRINTFORML 「程よいところで休憩にしようか」
			ENDIF
		CASE 305
			PRINTFORML 「さぁ行こう。警戒を怠ってはいけないよ」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「%CALLNAME_K7(エル_対象)%と一緒に行けるのだから、ちょっとした役得……かな」
			ENDIF
		CASE 306
			PRINTFORML 「歌の練習？　あまり得意ではないけれど……頑張ってみよう」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「勿論やるからにはベストを尽くさないとね」
			ENDIF
		CASE 307
			PRINTFORML 「食べるほうが好きなんだけれど……せっかくなら自分で作りたいしね」
			IF CHECK_K7("陥落",エル_対象)
				PRINTFORML 「どうかな？　我ながら結構自信はあるのだけれど……」
			ENDIF
	ENDSELECT

	;───────────────────────────────────────
	;●猥談
	;───────────────────────────────────────
ELSEIF (SELECTCOM == 309) || (SELECTCOM == 292 && FLAG:ウフフフラグ == 1)
	{
		SELECTCASE IFRAND(
			"1TO2",1,
			"4",CHECK_K7("陥落", エル_対象) && TALENT:エル:キス未経験 != 1,
			"5",CHECK_K7("陥落", エル_対象) && TALENT:エル:合意 == 1 && GET_BUSTSIZE(エル) < 0,
			"D1TO9,10",CHECK_K7("陥落", エル_対象) && PALAM:エル:欲情 >= 8000 && SUM_CUM_TO_COUNT_K7(エル_対象) > 1,
			"D1TO9,11",SELECTCOM == 292 && FLAG:ウフフフラグ == 1
			)
	}
			;猥談通常
		CASE 1 TO 2
			PRINTFORML 「うーん……こういう手の話は疎くてね……」
			PRINTFORML 「その、興味がないわけではないのだけれど……」
			;キス経験済み
		CASE 4
			PRINTFORML 「初めて口づけしたときのこと……覚えているかな？」
			PRINTFORMW 「……実はわたしはよく覚えていなんだ」
			PRINTFORMDW %ANAME(エル)%は白い髪を指でくるくると弄りながら、照れくさそうに苦笑する
			PRINTFORMW 「胸はドキドキして張り裂けそうだったし、頭は茹で上がりそうな有様でね」
			PRINTL
			PRINTFORMW 「だからさ……」
			PRINTL
			PRINTFORMDW %ANAME(エル)%がぐっと身を乗り出し、%ANAME(エル_対象)%の間近に顔を寄せる
			PRINTL
			PRINTFORMW 「もう一度、教えてよ……？」
			PRINTL
			PRINTFORMDW %ANAME(エル)%の艶めかしい舌の感触が%ANAME(エル_対象)%の口内を満たした……
			CALL SET_EQUIP(342, 1)
			RETURN 1
			;胸が小さいのを気にしている
		CASE 5
			PRINTFORMW 「その……実は結構気にしてるんだ」
			PRINTL
			PRINTFORMDL %ANAME(エル)%が起伏感に乏しい自身の胸元をそっと手でなぞる
			PRINTL
			PRINTFORMW 「結構食べているつもりなんだが……ちっともここには栄養が行かない」
			PRINTFORMW 「でも%CALLNAME_K7(エル_対象)%はその……大きいのと小さいのとでは……当然、小さい方が好きだろう？」
			PRINTL
			CALL KOJO_ASK_K7("うん", "はい","……うなずく","脅迫には屈しない。信念には抗えない")
			IF RESULT != 3
				PRINTFORMW 「大変結構♪」
			ELSE
				PRINTFORMW 「ほう……いい度胸だね」
				PRINTFORMDW %ANAME(エル)%は%ANAME(エル_対象)%の背中に回り込むと、わざとらしく胸を押し当てるように抱きついた
				PRINTFORMW 「悪くないだろう……？　いずれ好きになるよ。きっとそうなる」
			ENDIF
			PRINTL
			;ねちょ。閨の「なにもしない」からも呼ばれる。
		CASE 10
			{
				SELECTCASE IFRAND(
					"1",1,
					"2",CUM_GET_COUNT:(エル):射精部位_口 > 0,
					"3",CUM_GET_COUNT:(エル):射精部位_手 > 0,
					"4",CUM_GET_COUNT:(エル):射精部位_顔 > 0,
					"5",CUM_GET_COUNT:(エル):射精部位_髪 > 0
					)
			}
				CASE 1
					PRINTDATAL
						DATALIST
							DATAFORM 「まったく……大したものだね」
							DATAFORM 「もう%TOSTR(SUM_CUM_TO_COUNT_K7(エル_対象))%回も出させてあげたのに……。まだこんなに勃起させててるじゃないか」
							DATAFORM 「このまま続けてほしいかい？」
							DATAFORM
							DATAFORM 「それとも……ふふっ❤」
						ENDLIST
						DATALIST
							DATAFORM 「もう%TOSTR(SUM_CUM_TO_COUNT_K7(エル_対象) )%回もイってるよ？」
							DATAFORM 「いちいち数えるな？　いいや、駄目だね。%CALLNAME_K7(エル_対象)%がどれくらい出せるのか……覚えておきたいじゃないか」
							DATAFORM
							DATAFORM 「……後学のためにね……ふふっ❤」
						ENDLIST
					ENDDATA
				CASE 2
					PRINTFORMW 「好き放題してくれたね」
					PRINTFORMW 「口の中が%CALLNAME_K7(エル_対象)%の%SPLIT_RAND("ザーメン/精液",1)%でドロドロだ❤」
					PRINTFORMDW %ANAME(エル)%は口を開くと、まだ精液の残る舌を見せつけるように艶かしく動かす
					PRINTFORMW 「んぐっ……はぁ。とても美味しいとは……言い難いね❤」
				CASE 3
					PRINTFORMW 「まったく……」
					PRINTFORMW 「手が%SPLIT_RAND("ザーメン/精液",1)%まみれじゃないか❤」
					PRINTFORMDW %ANAME(エル)%は白く細い指先で、手の平にこびりついた精液をぬちゃぬちゃと弄んで見せる
				CASE 4
					PRINTFORMW 「んんっ……はぁ……」
					PRINTFORMW 「顔が%SPLIT_RAND("ザーメン/精液",1)%まみれになってしまったね❤」
					PRINTFORMDW %ANAME(エル)%は顔を伝う白濁液をそっと拭う
					PRINTFORMW 「濃厚な…匂い……。頭がどうにかなってしまいそうだ❤」
				CASE 5
					PRINTFORMW 「髪は……結構自慢なんだけどな……」
					PRINTFORMDW %ANAME(エル)%の雪のように白い髪の毛を%ANAME(エル_対象)%の%SPLIT_RAND("ザーメン/精液/体液/白濁液",1)%が伝う
					PRINTFORMW 「あとで洗うの…手伝ってよ？」
				CASEELSE
			ENDSELECT
			PRINTL
			;閨の「なにもしない」から呼ばれる。ピロートーク的な扱い
		CASE 11
			PRINTDATAL
				DATAFORM 「……どうしたんだい？」
				DATAFORM 「……少し休憩……だね」
				DATAFORM 「こうして何もせず……一緒にいるのも悪くないね❤」
				DATAFORM %PRINT_DESC_K7(@"%ANAME(エル)%はにこやかな笑みを浮かべて%ANAME(エル_対象)%をじっと見ている……")%
			ENDDATA
			PRINTL
		CASEELSE
	ENDSELECT

	;───────────────────────────────────────
	;●食事
	;───────────────────────────────────────
ELSEIF SELECTCOM == 351
	PRINTFORML 「そろそろ食事にしようか」
	;おごり発生の場合
	IF IS_MALE(エル_対象) && IS_FEMALE(エル)
		PRINTFORML 「%CALLNAME_K7(エル_対象)%がご馳走してくれるのかい……？」
		PRINTFORML 「ありがとう！　……言ったからには、遠慮しないよ？」
	ENDIF

	;───────────────────────────────────────
	;●移動
	;───────────────────────────────────────
ELSEIF GROUPMATCH(SELECTCOM, 390, 391)
	IF IS_INITIATIVE(エル)
		IF SELECTCOM == 390
			PRINTFORML 「それじゃあ出発しようか」
		ELSE
			PRINTFORML 「別のところへ行きたい？　構わないよ」
		ENDIF
	ELSE
		IF SELECTCOM == 390
			PRINTFORML 「出かけるのかい？　支度しないとね」
		ELSE
			PRINTFORML 「どこへ行こうか？」
		ENDIF
	ENDIF

	;TFLAG:17は誘い方の種類。0=通常
	IF TFLAG:17 == 0
		IF TFLAG:コマンド成否 == 1
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%に行きたい？　いいとも」
		ELSEIF TFLAG:コマンド成否 == 0
			PRINTFORML 「では%GET_PLACENAME(TFLAG:デート場所)%に行こう」
		ELSE
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%？　いいよ、行こう」
		ENDIF

		;TFLAG:17は誘い方の種類。1=エルが勝手に決定
	ELSEIF TFLAG:17 == 1
		PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%に行こうよ」

		;TFLAG:17は誘い方の種類。2=エルの行きたいデート先
	ELSEIF TFLAG:17 == 2
		IF TFLAG:コマンド成否 == 1
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%でいいかな？」
			PRINTFORML 「わぁ、ありがとう。エスコートは任せたよ♪」
		ELSE
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%でいいかな？　それじゃあ行こうか」
		ENDIF

		;TFLAG:17は誘い方の種類。3=エルが行きたいデート先以外
	ELSE
		IF TFLAG:コマンド成否 == 1
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%に行きたい？」
			PRINTFORML 「悪くないね。そうしよう」
		ELSEIF TFLAG:コマンド成否 == 0
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%に行きたい？　いいよ、行こう」
		ELSE
			PRINTFORML 「%GET_PLACENAME(TFLAG:デート場所)%だね。構わないよ」
		ENDIF
	ENDIF
	RETURN 0

	;───────────────────────────────────────
	;●帰還
	;───────────────────────────────────────
ELSEIF SELECTCOM == 392
	PRINTDATAL
		DATAFORM 「そろそろ帰る支度をしようか」
		DATAFORM 「そうだね、帰ろうか」
		DATAFORM 「うん、帰ろう」
	ENDDATA
	RETURN 0

	;───────────────────────────────────────
	;●お腹の音
	;───────────────────────────────────────
ELSEIF SELECTCOM == 326
	PRINTFORML 「えっと……何か聞こえるのかな？」
	RETURN 0

	;───────────────────────────────────────
	;●その他
	;───────────────────────────────────────
ELSE
	; PRINTDATAL
	; 	DATAFORM 「うーむ……」
	; 	DATAFORM 「これは実に興味深い……」
	; 	DATAFORM 「如何ともし難い……」
	; 	DATAFORM 「%CALLNAME_K7(エル_対象)%、何か用かな」
	; 	DATAFORM (ふわぁ……)
	; 	DATAFORM 「さぁて、もうひと頑張り」
	; ENDDATA
	RETURN 0
ENDIF

;───────────────────────────────────────
;●戻る
;───────────────────────────────────────
RETURN 0

;───────────────────────────────────────
;■日常_TARGET_対象_実行後
;───────────────────────────────────────
@KOJO_K7_NOON_AFTER_TARGET(エル_対象)
#DIM エル
#DIM エル_対象
#DIMS エル機嫌

IF !エル_対象
	エル_対象 = MASTER
ENDIF

エル = NAME_TO_CHARA("エル")
エル機嫌 '= TOSTR_EMOTION(エル)

;───────────────────────────────────────
;●機嫌が悪ければ通常のコマンド口上は喋らない
;───────────────────────────────────────
エル機嫌 = %TOSTR_EMOTION(エル)%
SELECTCASE エル機嫌
	CASE "恨", "怒", "憤"
		RETURN 0

	CASE "鬱", "悲", "憂"
		RETURN 0

	CASE  "狂", "恐", "怯"
		RETURN 0

	CASEELSE

ENDSELECT

;───────────────────────────────────────
;●主人公のＭ絶頂
;───────────────────────────────────────
IF NOWEX:エル_対象:Ｍ絶頂 > NOWEX:エル_対象:Ｃ絶頂 && NOWEX:エル_対象:Ｍ絶頂 > NOWEX:エル_対象:Ｂ絶頂 && NOWEX:エル_対象:Ｍ絶頂 > NOWEX:エル_対象:Ａ絶頂 && NOWEX:エル_対象:Ｍ絶頂 > NOWEX:エル_対象:Ｖ絶頂 && NOWEX:エル_対象:Ｍ絶頂 > NOWEX:エル_対象:射精
	IF NOWEX:エル_対象:Ｍ絶頂 > 0
		PRINTFORM 「

		PRINTDATA
			DATAFORM 口で
			DATAFORM 舌で
			DATAFORM 喉で
		ENDDATA

		PRINTDATA
			DATAFORM イッちゃったんだ
			DATAFORM ふふっ、気持ちいいかい
			DATAFORM イッちゃったんだね
		ENDDATA
		PRINTFORM ？

		PRINTFORM %BREAK_K7("末", エル_対象)%

		PRINTFORML 」
	ENDIF
ENDIF

;───────────────────────────────────────
;●戻る
;───────────────────────────────────────
RETURN 0


code:
; ;───────────────────────────────────────
; ;●押し倒すから呼ばれるシチュエーション設定関数
; ;───────────────────────────────────────
@KOJO_K7_SERVICE(エル, エル_対象, 奉仕内容)
#DIM エル
#DIM エル_対象
#DIMS 奉仕内容

; FLAG:調教モード = 5
; FLAG:閨逆調教 = 1

; SELECTCASE 奉仕内容
;     CASE "口"
;         CALL K7_SERVICE_BLOWJOB(エル)
;     CASE "足"
;         CALL K7_SERVICE_FOOTJOB(エル)
;     CASE "自慰"
;         CALL K7_SERVICE_SELF(エル)
;     CASE "触れ合い"
;         CALL K7_SERVICE_TENDER(エル)
;     CASEELSE
;         RETURN
; ENDSELECT
; RETURN

; ;-------------------------------------------------
; @K7_SERVICE_SELF(エル)
; #DIM エル
; CALL COMMON_SAVE_COM_TENDENCY(エル)
; VARSET COM_TENDENCY:エル:0, -1
; ITEM:A_ローター = 1
; ITEM:A_バイブ = 1
; ITEM:A_アナルバイブ = 1
; ITEM:A_双頭バイブ = 1
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "Ｃ自慰") = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "オナホ自慰") = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "秘貝開帳") = 2
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "指フェラ") = 2
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "おねだり") = 1

; ;露出系コマンドは主導度Ｕが低いと自動実行されないため主導度Ｕを一時変更
; エル_変更前夜主導度 = ABL:エル:主導度Ｕ
; エル_変更前倒錯度 = ABL:エル:倒錯度
; ABL:エル:主導度Ｕ = -600
; ABL:エル:倒錯度 = 600
; CALL ADD_EVENTEND_CALLEE("K7_TRAIN_END_STATUS_CHANGED")

; ;-------------------------------------------------
; @K7_SERVICE_BLOWJOB(エル)
; #DIM エル
; CALL COMMON_SAVE_COM_TENDENCY(エル)
; VARSET COM_TENDENCY:エル:0, -1
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "フェラチオ") = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "Ｃ自慰") = 1
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "パイズリ") = 1
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "手コキ") = 2
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "玉揉み") = 2
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "亀頭責め手コキ") = 2
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "亀頭責めフェラ") = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "イラマチオ") = 2
; IF HAS_PENIS(MASTER)
;     COM_TENDENCY:エル:GETNUM(TRAINNAME, "クンニ") = 3
; ENDIF
; CALL ADD_EVENTEND_CALLEE("K7_TRAIN_END")

; ;-------------------------------------------------
; @K7_SERVICE_TENDER(エル)
; #DIM エル
; CALL COMMON_SAVE_COM_TENDENCY(エル)
; VARSET COM_TENDENCY:エル:0, -1
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "キス") = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "愛撫") = 2
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "胸愛撫") = 2

; CALL ADD_EVENTEND_CALLEE("K7_TRAIN_END")

; ;-------------------------------------------------
; @K7_SERVICE_FOOTJOB(エル)
; #DIM エル
; CALL SET_COM_KNOWLEDGE(エル, GETNUM(TRAINNAME, "足コキ"))
; CALL COMMON_SAVE_COM_TENDENCY(エル)
; VARSET COM_TENDENCY:エル:0, -1
; COM_TENDENCY:エル:14 = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "足コキ") = 3
; COM_TENDENCY:エル:GETNUM(TRAINNAME, "Ｃ自慰") = 1

; ;加虐系コマンドは主導度Ｕが低いと自動実行されないため主導度Ｕを一時変更
; エル_変更前夜主導度 = ABL:エル:主導度Ｕ
; エル_変更前倒錯度 = ABL:エル:倒錯度
; ABL:エル:主導度Ｕ = 600
; ABL:エル:倒錯度 = 600
; CALL ADD_EVENTEND_CALLEE("K7_TRAIN_END_STATUS_CHANGED")

; ;-------------------------------------------------
; ;書き換えたCOM_TENDENCYをリセット
; ;-------------------------------------------------
; @EVENTEND_K7_TRAIN_END
; #DIM エル
; エル = NAME_TO_CHARA("エル")
; ;エルのCOM_TENDENCYをを戻す
; CALL COMMON_LOAD_COM_TENDENCY(エル)

; @EVENTEND_K7_TRAIN_END_STATUS_CHANGED
; #DIM エル
; エル = NAME_TO_CHARA("エル")
; ;エルのCOM_TENDENCYをを戻す
; CALL COMMON_LOAD_COM_TENDENCY(エル)
; ABL:エル:主導度Ｕ = エル_変更前夜主導度
; ABL:エル:倒錯度 = エル_変更前倒錯度

repo_name: napo/erafl

license: unknown


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

;=================================================
;●各種イベント
;※ARGにイベント番号が入る。詳しくは資料フォルダの「era恋姫 イベント表」を参照
;※RETURNの値を0→1に変えると、デフォルトのメッセージが表示されなくなる
;=================================================
@KOJO_EVENT_K7(ARG)
#DIM エル
#DIM エル_対象
#DIMS エル機嫌

IF !エル_対象
	エル_対象 = MASTER
ENDIF

エル = NAME_TO_CHARA("エル")
エル機嫌 '= TOSTR_EMOTION(エル)

SETCOLOR エル_口上カラー

IF TALENT:虚ろ || CFLAG:400 == 1
	RESETCOLOR
	RETURN
ENDIF
;-------------------------------------------------
;ファーストキス実行
;-------------------------------------------------
IF ARG == 1
	;恋慕 or 服従
	IF TALENT:恋慕 || TALENT:服従
		PRINTFORMW  「ふふっ❤　どうだったかな？」
		;恋人
	ELSEIF TALENT:恋人
		PRINTFORMW  「ふふっ？　どう……かな？」
		PRINTFORMW
		;それ以外
	ELSE
		PRINTFORMW  「んんっ！？」
	ENDIF

ENDIF

;-------------------------------------------------
;告白成功
;-------------------------------------------------
IF ARG == 2
	;恋慕 or 服従
	IF TALENT:恋慕 || TALENT:服従
		PRINTFORMW 「えっと……」
		PRINTFORMDL エルの瞳が左右に泳ぐ。見る見るうちに顔が朱に染まっていく
		PRINTL
		PRINTFORMW 「その……だね……。ああもう、こういう肝心な時に言葉が見つからないとはね……」
		PRINTL
		PRINTFORMDL エルは耳まで真っ赤に染めてうつむいてしまった
		PRINTL
		WAIT
		PRINTFORMDL 少し時間をおいて、エルはそっとあなたの手を握る
		PRINTFORML 「……ありがとう。嬉しい、素直に言って、とても嬉しい」
		PRINTFORML 「これからもずっと、ずーっと一緒……だよ？」
		PRINTFORMW
	ENDIF

ENDIF

;-------------------------------------------------
;告白失敗
;-------------------------------------------------
IF ARG == 3
	PRINTFORML 「あのねぇ……%CALLNAME_K7(エル_対象)%」
	PRINTFORMW 「そういうのは冗談にしても良くないよ……？」

ENDIF

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

ENDIF

;-------------------------------------------------
;押し倒し成功(合意を取得)
;-------------------------------------------------
IF ARG == 5
	;恋慕 or 服従
	IF TALENT:恋慕 || TALENT:服従
		PRINTFORMW  「それで……この後はどうするつもりなんだい……？」
		;それ以外
	ELSE
		;PRINTFORMW  「」
	ENDIF

ENDIF

;-------------------------------------------------
;押し倒し失敗
;-------------------------------------------------
IF ARG == 6
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;押し倒し成功(既に合意あり)
;-------------------------------------------------
IF ARG == 7
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;押し倒し成功(既に合意あり)
;-------------------------------------------------
IF ARG == 107 && TALENT:エル:親愛
	PRINTFORMW
	PRINTFORMW 「ねぇ……、%CALLNAME_K7(エル_対象)%がして欲しいこと……してあげようか？」
	CALL KOJO_ASK_K7("このまま犯す","口で奉仕させる","足で奉仕させる","自分で慰めさせる","優しく抱き寄せる")
	PRINTFORMW
	SELECTCASE RESULT
		CASE 1
			CALL KOJO_K7_SERVICE(エル, エル_対象,"口")
			PRINTFORMW 「ふぅん、口が……いいんだね？」
			PRINTFORMDL エルは上目遣いで様子を伺いながら、白く細い指を%ANAME(MASTER)%の陰部に這わす
			PRINTFORMDW そしてからかうような笑みを浮かべると、舌を伸ばして先端をちろりと舐めた
			PRINTFORML
			PRINTFORMW 「ふふっ♪　もうこんなにびくびくさせて、ちょっと……気が早いんじゃないかな？」
			PRINTFORMW 「かわいいところいっぱい見せてよ？　たくさん……気持ちよくしてあげるからさ❤」
			PRINTFORML
		CASE 2
			CALL KOJO_K7_SERVICE(エル, エル_対象,"足")
			PRINTFORMW 「足で……して欲しい？」
			PRINTFORMW 「何ともまぁ、恥も外聞もない頼みだねぇ……。構わないけどさ」
			PRINTFORMDL エルはすらりと細く長い足を%ANAME(MASTER)%に向け、秘部をつま先でそっと撫でる
			PRINTFORMW 「それじゃあ、こうしてキミの情けない姿を眺めながら……足でたっぷり可愛がってあげよう❤」
		CASE 3
			CALL KOJO_K7_SERVICE(エル, エル_対象,"自慰")
			PRINTFORMW 「自分でしてるところを見せて欲しい……？」
			PRINTFORMW 「ねぇキミ、私だけ恥ずかしい思いをするのは……フェアじゃないんじゃないかな？」
			PRINTFORMDL エルは渋々ながらも、足を開くと繊細な手付きで自身の秘裂をなぞりはじめた
			PRINTFORML
			PRINTFORMW 「……まぁ精々楽しんでくたまえ」
			PRINTFORMW 「……ただ、次はその……いっぱい可愛がって、欲しいな」
		CASE 4
			CALL KOJO_K7_SERVICE(エル, エル_対象,"触れ合い")
			PRINTFORMW 「甘えたい……？　撫でて欲しい……？」
			PRINTFORMW 「へぇ、キミもなかなか、かわいいところがあるんだねぇ❤」
			PRINTFORMDL　エルは%ANAME(MASTER)%の胸元に飛び込むと、華奢な腕を腰に回した
			PRINTFORMDW　ほんのりと熱を帯びた肌の感触が伝わってくる……
			PRINTFORML
			PRINTFORMW 「いいよ、しばらくこうしていよう。……時間が許す限り……ね❤」
		CASEELSE
	ENDSELECT
ENDIF

;-------------------------------------------------
;押し倒され
;-------------------------------------------------
;誘惑
IF ARG == 320
	PRINTL
	PRINTFORML 「ねぇ……ここまで焦らしておいて、おあずけだなんて酷いじゃないか」
	PRINTFORMDL %ANAME(エル_対象)%を見つめる%ANAME(エル)%の透き通った青い瞳は、情欲に満ちた光を湛えている…
ENDIF
;実行
IF ARG == 321
	PRINTFORMW 「こんなになるまで焦らせてくれたんだ、少しお返ししてやらないとね」
	PRINTFORMDW %ANAME(エル)%は%ANAME(エル_対象)%の胸元に飛び込むと悪戯な笑みを浮かべて%ANAME(エル_対象)%の顔を見据えている
	PRINTFORMW 「ふふっ悪いようにはしないさ、じっとしていても構わないよ」
	PRINTFORMDW %ANAME(エル)%は腕を絡めてすっかり身体を密着させるとついばむようなキスの嵐を浴びせてきた
	PRINTL
	PRINTFORMW 「ほら……力を抜いて……？　たくさん気持ちよくなれるように、シてあげるからさ❤」
ENDIF

;-------------------------------------------------
;デート中に向こうからキス
;-------------------------------------------------
IF ARG == 20
	PRINTFORMW  「%CALLNAME_K7(エル_対象)% 、ちょっといいかな？」
	PRINTFORMW  「んんっ……❤」

ENDIF

;-------------------------------------------------
;デート中に向こうから告白
;-------------------------------------------------
IF ARG == 21
ENDIF

;-------------------------------------------------
;相手から押し倒される
;-------------------------------------------------
;合意なし
IF ARG == 22
	PRINTFORMW

	;合意なし＆酔った勢い
ELSEIF ARG == 23
	;PRINTFORMW

	;合意あり
ELSEIF ARG == 24
	PRINTFORMW

	;合意あり＆酔った勢い
ELSEIF ARG == 25
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;相手からおねだりされる
;-------------------------------------------------
;合意なし
IF ARG == 26
	PRINTFORMW
	PRINTFORMW
	PRINTFORMW

	;合意なし＆酔った勢い
ELSEIF ARG == 27
	;PRINTFORMW

	;合意あり
ELSEIF ARG == 28
	PRINTFORMW
	PRINTFORMW

	;合意あり＆酔った勢い
ELSEIF ARG == 29
	;PRINTFORMW

ENDIF
;-------------------------------------------------
;拠点フェイズ終了(所属国家が同じなら常に呼ばれる)
;-------------------------------------------------
IF ARG == 30
ENDIF

;-------------------------------------------------
;戦略フェイズ終了(所属国家が同じなら常に呼ばれる)
;-------------------------------------------------
IF ARG == 31
	; SELECTCASE RAND:4
	; 	CASE 0
	; 		PRINTFORML お腹が空いたよ
	; 	CASE 1
	; 		PRINTFORML テストだよ
	; 	CASE 2
	; 		PRINTFORML ……なんでティーポットが浮かんでいるんだ……？
	; 	CASE 3
	; 		CALL NEAREST_STAR(CHARACTER_POSITION, "未発見")
	; 		IF RESULT != -1
	; 			LOCAL = RESULT
	; 			CALL GET_PORT_NAME(LOCAL)
	; 			PRINTFORML ここからセクター＃%TOFULL(TOSTR(LOCAL / 10000))%まで行くと未発見の惑星があるみたいだよ
	; 		ENDIF
	; ENDSELECT
ENDIF
;-------------------------------------------------
;酔い限界で倒れる
;-------------------------------------------------
IF ARG == 32
	;PRINTFORMW

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)
			;触手の子を孕んだ
		ELSEIF CFLAG:23 == GET_SPERM_ID("触手")
			;PRINTFORMW
			;他の士官の子を孕んだ
		ELSE
			;PRINTFORMW
		ENDIF
	ENDIF

ENDIF

;-------------------------------------------------
;臨月に入った
;-------------------------------------------------
IF ARG == 41
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

ENDIF

;-------------------------------------------------
;主人公に自分の子供を産ませた
;-------------------------------------------------
IF ARG == 43
	PRINTFORMW
	PRINTFORMW

ENDIF

;-------------------------------------------------
;忠誠を誓わせる/成功
;-------------------------------------------------
IF ARG == 50
	PRINTFORMW

ENDIF

;-------------------------------------------------
;忠誠を誓わせる/失敗
;-------------------------------------------------
IF ARG == 51
	PRINTFORMW

ENDIF

;-------------------------------------------------
;自国に誘う/成功
;-------------------------------------------------
IF ARG == 52
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;自国に誘う/失敗
;-------------------------------------------------
IF ARG == 53
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;恋慕を取得
;-------------------------------------------------
IF ARG == 60
	PRINTFORMW

ENDIF

;-------------------------------------------------
;親友を取得
;-------------------------------------------------
IF ARG == 61
	PRINTFORMW

ENDIF

;-------------------------------------------------
;親愛を取得
;-------------------------------------------------
IF ARG == 62
	PRINTFORMW
	PRINTFORMW

ENDIF

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

ENDIF

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

ENDIF

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

ENDIF

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

ENDIF

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

ENDIF
;-------------------------------------------------
;改造
;-------------------------------------------------
IF ARG == 500

ENDIF

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

ENDIF

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

ENDIF

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

ENDIF

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

ENDIF

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

ENDIF

;-------------------------------------------------
;夜イベント/一般
;-------------------------------------------------
;添い寝
IF ARG == 200

	;晩酌
ELSEIF ARG == 201

	;談笑
ELSEIF ARG == 202

ENDIF

;-------------------------------------------------
;夜イベント/愛撫
;-------------------------------------------------
;責め(通常)
IF ARG == 210
	;PRINTFORMW

	;責め(加虐)
ELSEIF ARG == 211
	;PRINTFORMW

	;受け(通常)
ELSEIF ARG == 212
	;PRINTFORMW

	;受け(被虐)
ELSEIF ARG == 213
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;夜イベント/性交
;-------------------------------------------------
;主人公がこのキャラのＶに挿入
IF ARG == 220

	;主人公がこのキャラのＡに挿入
ELSEIF ARG == 221
	;PRINTFORMW

	;このキャラが主人公のＶに挿入
ELSEIF ARG == 222
	;PRINTFORMW

	;このキャラが主人公のＡに挿入
ELSEIF ARG == 223
	;PRINTFORMW

	;レズ絡み
ELSEIF ARG == 224
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;戦闘開始
;-------------------------------------------------
;野戦
IF ARG == 300
	SELECTCASE RAND:2
		CASE 0
		CASE 1

	ENDSELECT

	;防衛戦(侵攻側)
ELSEIF ARG == 301
	SELECTCASE RAND:2
		CASE 0
		CASE 1
	ENDSELECT

	;防衛戦(防衛側)
ELSEIF ARG == 302
	SELECTCASE RAND:2
		CASE 0
		CASE 1
	ENDSELECT

ENDIF

;-------------------------------------------------
;特殊戦術
;-------------------------------------------------
;計略発動
IF ARG == 310

	;反計
ELSEIF ARG == 311
	;PRINTFORMW  「」

	;貫計(武力)
ELSEIF ARG == 312
	;PRINTFORMW  「」

	;貫計(好感度)
ELSEIF ARG == 313
	;PRINTFORMW  「」

ENDIF

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

ENDIF

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

ENDIF

;-------------------------------------------------
;主人公勢力に捕縛されたときのリアクション
;-------------------------------------------------
;登用に応じる
IF ARG == 332
	;PRINTFORMW

	;登用を拒否する
ELSEIF ARG == 333
	;PRINTFORMW

	;解放される
ELSEIF ARG == 334
	;PRINTFORMW  「」

	;投獄される
ELSEIF ARG == 335
	;PRINTFORMW

	;処刑される
ELSEIF ARG == 336
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;戦死時
;-------------------------------------------------
IF ARG == 337
	;主人公と同一勢力に所属
	IF CFLAG:1 >= 1 && CFLAG:1 == CFLAG:MASTER:1
		IF TALENT:恋慕 || TALENT:服従 || TALENT:親友
			;PRINTFORMW
		ELSE
			;PRINTFORMW
		ENDIF
		;主人公と異なる勢力に所属
	ELSE
		;PRINTFORMW
	ENDIF

ENDIF

;-------------------------------------------------
;捕虜調教のメニュー
;-------------------------------------------------
;解放される
IF ARG == 340
	;PRINTFORMW  「」

	;処刑される
ELSEIF ARG == 341
	PRINTFORMW  「…………」

	;性奴隷化される
ELSEIF ARG == 342
	;PRINTFORMW  「」

ENDIF

;-------------------------------------------------
;放浪イベント
;-------------------------------------------------
;登用に応じる
IF ARG == 350

	;登用を拒否する
ELSEIF ARG == 351
	;PRINTFORMW  「」

	;投獄される
ELSEIF ARG == 352
	;PRINTFORMW  「暗君……」

ENDIF

;-------------------------------------------------
;霖之助・藍関係
;-------------------------------------------------
;[霖之助に恋慕]を取得
IF ARG == 400
	;PRINTFORMW

	;[霖之助の恋人]を取得
ELSEIF ARG == 401
	;PRINTFORMW

	;[霖之助に恋慕]を喪失
ELSEIF ARG == 402
	;PRINTFORMW

	;霖之助と別れさせることに成功
ELSEIF ARG == 403
	;PRINTFORMW

	;霖之助と別れさせることに失敗
ELSEIF ARG == 404
	;PRINTFORMW

	;[藍に恋慕]を取得
ELSEIF ARG == 410
	;PRINTFORMW

	;[藍の恋人]を取得
ELSEIF ARG == 411
	;PRINTFORMW

	;[藍に恋慕]を喪失
ELSEIF ARG == 412
	;PRINTFORMW

	;藍と別れさせることに成功
ELSEIF ARG == 413
	;PRINTFORMW

	;藍と別れさせることに失敗
ELSEIF ARG == 414
	;PRINTFORMW

ENDIF

;-------------------------------------------------
;逆調教時
;-------------------------------------------------
;主人公に対して忠誠を誓わせる
IF ARG == 450

	;主人公に対して忠誠を誓わせる/成功
ELSEIF ARG == 451

	;主人公に対して忠誠を誓わせる/失敗
ELSEIF ARG == 452

ENDIF

;───────────────────────────────────────
;●終了
;───────────────────────────────────────
RESETCOLOR


code:
@SHOW_CHARA_EXPLANATION_9

PRINTFORML 開拓村で出会った、元気で前向きな剣士の冒険者
PRINTFORML まだ若年ながらも、基礎から厳しく鍛錬を重ねた剣技は目を見張るものがある
PRINTL
IF K9_DFLAG_親愛なるあなたへ == 2
	PRINTFORML かつて栄え滅びた、レルム帝国が存在した時代から続く魔術師の家、ハーベスト家の長女
	PRINTFORML 古くから続く魔術師の生まれであり、マナこそ豊富に持っているが、魔法は一切使えなかった
	PRINTFORML しかし、%ANAME(MASTER)%の命の危機に瀕した際、%ANAME(MASTER)%を救いたい想いによって魔術師の素質が開花した
	PRINTL
	PRINTFORML 魔法が使えない一方で優れた剣技を習得したハーベスト家の長女である彼女を、リナシメントの都合のいい旗印
	PRINTFORML として利用されることを恐れた父親の意に沿って、冒険者として送り出された
	PRINTFORML それでも彼女は冒険者としても剣士としても研鑽を重ね、一人前の冒険者として活躍している
	PRINTFORML ハーベスト家から出たものの、家族仲は今でも良好
	PRINTL
	PRINTFORML 領主と冒険者の二足の草鞋を履く%ANAME(MASTER)%の忙しさを見て、領主の仕事を手伝いを申し出た
	PRINTFORML %ANAME(MASTER)%と共に領地経営や冒険をする中で、互いに惹かれていった二人は恋人同士になった
	PRINTFORML その後も交流を続け、より強い絆を育んでいる
ELSEIF K9_DFLAG_シルフィーユの魔法 == 2
	PRINTFORML かつて栄え滅びた、レルム帝国が存在した時代から続く魔術師の家、ハーベスト家の長女
	PRINTFORML 古くから続く魔術師の生まれであり、マナこそ豊富に持っているが、魔法は一切使えなかった
	PRINTFORML しかし、%ANAME(MASTER)%の命の危機に瀕した際、%ANAME(MASTER)%を救いたい想いによって魔術師の素質が開花した
	PRINTL
	PRINTFORML 魔法が使えない一方で優れた剣技を習得したハーベスト家の長女である彼女を、リナシメントの都合のいい旗印
	PRINTFORML として利用されることを恐れた父親の意に沿って、冒険者として送り出された
	PRINTFORML それでも彼女は冒険者としても剣士としても研鑽を重ね、一人前の冒険者として活躍している
	PRINTFORML ハーベスト家から出たものの、家族仲は今でも良好
	PRINTL
	PRINTFORML 領主と冒険者の二足の草鞋を履く%ANAME(MASTER)%の忙しさを見て、領主の仕事を手伝いを申し出た
	IF K9_DFLAG_恋人として == 2
		PRINTFORML %ANAME(MASTER)%と共に領地経営や冒険をする中で、互いに惹かれていった二人は恋人同士になった
	ELSE
		PRINTFORML %ANAME(MASTER)%の元での生活にも慣れてきて、居心地の良さを感じている
	ENDIF
ELSEIF K9_DFLAG_冒険者 == 2
	PRINTFORML かつて栄え滅びた、レルム帝国が存在した時代から続く魔術師の家、ハーベスト家の長女
	PRINTFORML 古くから続く魔術師の生まれであり、マナこそ豊富に持っているが、魔法は一切使えない
	PRINTL
	PRINTFORML 魔法が使えない一方で優れた剣技を習得したハーベスト家の長女である彼女を、リナシメントの都合のいい旗印
	PRINTFORML として利用されることを恐れた父親の意に沿って、冒険者として送り出された
	PRINTFORML それでも彼女は冒険者としても剣士としても研鑽を重ね、一人前の冒険者として活躍している
	PRINTFORML ハーベスト家から出たものの、家族仲は今でも良好
	PRINTL
	PRINTFORML 領主と冒険者の二足の草鞋を履く%ANAME(MASTER)%の忙しさを見て、領主の仕事を手伝いを申し出た
	IF K9_DFLAG_恋人として == 2
		PRINTFORML %ANAME(MASTER)%と共に領地経営や冒険をする中で、互いに惹かれていった二人は恋人同士になった
	ELSE
		PRINTFORML %ANAME(MASTER)%の元での生活にも慣れてきて、居心地の良さを感じ始めている
	ENDIF
ELSEIF K9_DFLAG_魔法が使えなくても == 2
	PRINTFORML かつて栄え滅びた、レルム帝国が存在した時代から続く魔術師の家、ハーベスト家の長女
	PRINTFORML 古くから続く魔術師の生まれであり、マナこそ豊富に持っているが、魔法は一切使えない
	PRINTFORML ハーベスト家から出たものの、家族仲は今でも良好
	PRINTL
	PRINTFORML 領主と冒険者の二足の草鞋を履く%ANAME(MASTER)%の忙しさを見て、領主の仕事を手伝いを申し出た
	PRINTFORML %ANAME(MASTER)%の元での生活にも慣れてきて、居心地の良さを感じ始めている
ELSEIF K9_DFLAG_新天地の生活 == 2
	PRINTFORML マナこそ豊富に持っているが、魔法は一切使えない
	PRINTFORML 立ち振る舞いからして良家の令嬢にも見受けられるが、なぜ冒険者をやっているのかは不明
	PRINTFORML %ANAME(MASTER)%の元での生活は、まだ慣れないところもありながら楽しくやっていけそうだと感じている
	PRINTL
	PRINTFORML 領主と冒険者の二足の草鞋を履く%ANAME(MASTER)%の忙しさを見て、領主の仕事を手伝いを申し出た
ELSE
	PRINTFORML マナこそ豊富に持っているが、魔法は一切使えない
	PRINTFORML 立ち振る舞いからして良家の令嬢にも見受けられるが、なぜ冒険者をやっているのかは不明
ENDIF


code:
;-------------------------------------------------
;desc  :口上デイリーを登録する。REGISGER_KOJO_DAILYを呼び出す
;param :対象:対象のキャラ番号
;-------------------------------------------------
@CREATE_KOJO_DAILY_MAP_K9(対象)
#DIM 対象
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "NEW_WORLD", "新天地の生活")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "DETERMINATION", "魔法が使えなくても")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ADVENTURER", "冒険者")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "PARTNER", "恋人として")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ANTI_MAGIC", "対魔法考察")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "SYLPHILLE_MAGIC", "シルフィーユの魔法")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "MY_DEAR", "親愛なるあなたへ")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ELLE_AND_FEE", "エルとフィー")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "NIGHT_TALK", "夜の語らい")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "BLUE_STAR", "蒼き星の剣")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "WALKING_TOWN", "街角デート")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "COOKING", "一緒にお料理")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "SWORD_AND_SORCERY", "剣と魔法")
CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "SONGSTRES", "二人の歌姫")

CALL REGISTER_KOJO_DAILY(対象, デイリー_通常, "ENGAGEMENT", "契りの夜")


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

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

;NAME_TO_CHARAはキャラクター識別名を参照する(CSVのCSTR:99に設定されている名前)
エル_ID = NAME_TO_CHARA("エル")
シルフィーユ_ID = NAME_TO_CHARA("UC_シルフィーユ")

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_エルとフィー == 2
	RETURN 0

;エルとシルフィーユの好感度が750以上だと発生する
SIF CFLAG:エル_ID:好感度 < 750 || CFLAG:シルフィーユ_ID:好感度 < 750
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

RETURN 1

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

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;---------------------
@KOJO_DAILY_K9_ELLE_AND_FEE(対象)
#DIM 対象
VARS エル = "エル"
VARI エル_ID

VARS シルフィーユ = "UC_シルフィーユ"
VARI シルフィーユ_ID

エル_ID = NAME_TO_CHARA(エル)
シルフィーユ_ID = NAME_TO_CHARA(シルフィーユ)

VARS TEXT

{
	TEXT '= @"
		あるうららかな日\n
		こんな天気のいい日には、ゆっくり散歩でもしたくなるものだ[$W]\n
		しかし、この身は冒険者でもあり、領主でもある\n
		いくら気楽に領地経営しているとはいえ、しなければならない仕事はある[$W]\n
		\n
		[%シルフィーユ%]:「%ANAME(MASTER)%、こっちの書類は終わったよ」[$W]\n
		\n
		ああ、ありがとう。さすがフィー。仕事が早いな[$W]\n
		\n
		それでも自分には、しっかりサポートしてくれるフィーがいる\n
		彼女のおかげでかなり時間に余裕ができていた[$W]\n
		\n
		こちらもひと段落ついた。少し休憩しようか[$W]\n
		\n
		[%シルフィーユ%]:「うんっ、作っておいたプリンがあるから、持ってくるね」[$W]\n
		\n
		プリンか。それは楽しみだ[$W]\n
		フィーのお手製プリンに思いを馳せていたところで、聞きなれた落ち着いた声が届く[$W]\n
		\n
		[%エル%]:「やあ、%ANAME(MASTER)%。ちょっといいかな？」[$W]\n
		\n
		顔を見せたのは、我らが頼れる天才魔導工学者エルであった[$W]\n
		\n
		[%シルフィーユ%]:「あっ、エルさん！　こんにちはっ！」[$W]\n
		\n
		[%エル%]:「ふふっ、シルフィーユ、君は相変わらず元気だね」[$W]\n
		\n
		[%シルフィーユ%]:「元気なのが私の取り柄ですので」[$W]\n
		\n
		[%エル%]:「元気なのはいいことだよ。研究するにも冒険するにも、体力は必要不可欠だからね」[$W]\n
		\n
		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(エル_ID, "[感情:喜][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:喜][サイズ:180px][POS_X:200px]",,1)

{
	TEXT '= @"
		エル、どうしたんだい？[$W]\n
		\n
		[%エル%]:「ああ。ほら、今私が手掛けている研究があることは知っているだろう？」[$W]\n
		\n
		うん、この前エルが説明してくれたからね[$W]\n
		\n
		[%エル%]:「その研究がある程度形になったから、その報告に来たんだ」[$W]\n
		\n
		もうなのか！？　あれだけの研究、まだまだ時間がかかると思っていたんだが[$W]\n
		\n
		[%シルフィーユ%]:「エルさん、すごいですっ！」[$W]\n
		\n
		[%エル%]:「まあね。私の頭脳にかかれば、あれくらいの研究は造作もないものさ」[$W]\n
		[%エル%]:「……なんて言えるとよかったけどね。正直、きちんと形にできてほっとしているところもあるよ」[$W]\n
		\n
		そうなのか？[$W]\n
		\n
		[%エル%]:「キミに売り込みをかけたとき、場所と少しの時間さえ貰えれば、成果を提供して見せると断言してしまったからね」[$W]\n
		[%エル%]:「嘘つきにならないように、それなりに頑張ったよ」[$W]\n
		\n
		……そういえばそんなこと言ってたっけか？[$W]\n
		\n
		[%エル%]:「……まさかキミ、忘れてたのかい？」[$W]\n
		\n
		いやあ、なんかもうエルはうちの頼れる仲間の一人って感覚だっだから……[$W]\n
		\n
		[%エル%]:「……はあ、まったくキミは」[$W]\n
		[%シルフィーユ%]:「……まったく、%ANAME(MASTER)%ってば」[$W]\n
		\n
		おおい、エルさんにフィーさんや。呆れたように顔を見合わせて意気投合してるんじゃありません[$W]\n
		\n
		[%エル%]:「ふふっ、まあいいさ。なんというか、キミらしい」[$W]\n
		[%シルフィーユ%]:「それもそうだね。%ANAME(MASTER)%らしいよね」[$W]\n
		\n
		人をダシに仲良くなるの、やめてくれない？[$W]\n
		\n
		[%エル%]:「それで、今から%ANAME(MASTER)%に研究についての詳細を説明したいと思うんだけど……」[$W]\n
		\n
		それは良いけど、どうしたんだ？[$W]\n
		\n
		[%エル%]:「その前に、シルフィーユが作ったプリンを頂いてもいいかな？」[$W]\n
		\n
		なんでエルがそのことを知っている？[$W]\n
		\n
		[%エル%]:「この部屋のドアを開ける前に、たまたま二人の話し声が聞こえてきてね」[$W]\n
		[%エル%]:「こう見えて、私は甘いものに目がないんだよ」[$W]\n
		\n
		[%シルフィーユ%]:「ふふっ、分かりました。すぐ持ってきますねっ！」[$W]\n
		\n
		[%エル%]:「ああ、ありがとう」[$W]\n
		\n
		なんてことだ！　自分が食べるはずだったプリンがエルの胃の中に！？[$W]\n
		これはいったいどういうことだフィー！？　我のプリンは、どうしたというのだ！？[$W]\n
		\n
		[%シルフィーユ%]:「ちゃんとエルさんの分も、%ANAME(MASTER)%の分もあるから安心してっ！」[$W]\n
		\n
		ならばよしっ！[$W]\n
		\n
		[%シルフィーユ%]:「というわけで、いい子にしてお留守番しててねーっ！」[$W]\n
		\n
		はーいっ！　ってだれが子供かっ！？[$W]\n
		\n
		[%エル%]:「……キミとシルフィーユは、どうして時折漫才のような会話をしているんだい？」[$W]\n
		\n
		ボケてもちゃんとフィーが拾ってくれるし……[$W]\n
		\n
		[%エル%]:「本当にキミ達は……まあ、見てて面白いから良いけどね」[$W]\n
		\n
		"
}

CALL PRINT_DIAG(TEXT)

{
	TEXT '= @"
		\n
		………………[$W]\n
		…………[$W]\n
		……[$W]\n
		[$W]\n
		\n
	"
}

CALL PRINT_DIAG(TEXT)

{
	TEXT '= @"
		[%エル%]:「……とまあ、こんなところかな。分からないところはなかったかい？」[$W]\n
		\n
		エルの話は要領を得て、とても分かりやすいものだった\n
		そして、研究の内容についても、専門外の自分ではあるが、とても有用なものに感じる\n
		天才の名に恥じない目の前の魔導工学者が、まだ16歳ということに改めて驚愕されられる[$W]\n
		\n
		[%シルフィーユ%]:「やっぱりエルさんはすごいですっ！」[$W]\n
		\n
		[%エル%]:「ふふん、もっと褒めてくれてもいいんだよ？」[$W]\n
		\n
		これで二つ目のプリンを頬張ってなければ、もっとかっこいいんだけどなぁ……[$W]\n
		\n
		[%エル%]:「キミ、それは言わない約束だよ？」[$W]\n
		\n
		ああ……そうだったな[$W]\n
		十年前の雪が降りしきる冬の日……エルと約束したんだったな[$W]\n
		エルが大量のプリンを貪っていても……決してそのことにツッコミを入れたりしないって[$W]\n
		\n
		[%シルフィーユ%]:「そんなヘンテコな約束するの、%ANAME(MASTER)%くらいだよっ！？」[$W]\n
		\n
		[%エル%]:「だいたい十年前なんて、お互いに面識すらないだろう？　キミはいったいなにを言っているんだい？」[$W]\n
		\n
		エルがツッコミを入れた……！？　まさか、フィーのツッコミ力を吸収して……！？[$W]\n
		\n
		[%エル%]:「ねえ、シルフィーユ。このあと時間はあるかい？　二人で一緒にお昼ごはんでもどうだい？」\n
		[%シルフィーユ%]:「あっ、いいですね！　一緒に食べましょうか」[$W]\n
		\n
		スルーだけはやめて！？[$W]\n
		\n
		[%シルフィーユ%]:「もう、%ANAME(MASTER)%がボケまくるからだよ？」[$W]\n
		\n
		[%エル%]:「まったく。キミとシルフィーユが揃うと、ちょくちょく話の腰が折れるから大変だよ」[$W]\n
		[%シルフィーユ%]:「まさかの裏切り！？」[$W]\n
		\n
		[%エル%]:「ふふっ、ちょっとしたジョークさ。気を悪くしないで欲しいな」[$W]\n
		[%エル%]:「それはともかく、この研究を%ANAME(MASTER)%達に活かしてもらえると嬉しい」[$W]\n
		\n
		……いや、さすがにこれは良いのか？[$W]\n
		これだけの成果、エルが自身で活かしてもらった方が良くないか？[$W]\n
		\n
		[%エル%]:「いや、それじゃあ私を雇ってもらった時の対価がそのままになってしまうだろう？」[$W]\n
		[%エル%]:「借りっぱなしは私の主義じゃない。どうかもらって欲しい」[$W]\n
		[%エル%]:「既にこの研究を発展させた、次の研究のアイデアもあるんだ。キミがそこまで気にするものじゃないさ」[$W]\n
		\n
		……そうは言ってもなぁ\n
		エルには、魔導工学以外の面でも沢山助けられているし\n
		やっぱりこれはこちらの貰いすぎだろう[$W]\n
		\n
		[%エル%]:「だけど……」[$W]\n
		\n
		[%シルフィーユ%]:「そうですよ、エルさん。%ANAME(MASTER)%の言う通りですよ」[$W]\n
		[%シルフィーユ%]:「エルさんの知識や、観察力に私たちはいつも助けられているんですから」[$W]\n
		[%シルフィーユ%]:「もしエルさんがいないと、私達すごく困っちゃってますよ」[$W]\n
		\n
		[%エル%]:「お互い様だよ。私だって、シルフィーユの剣技や身体能力に助けられているんだから」[$W]\n
		[%エル%]:「それに、%ANAME(MASTER)%やシルフィーユがしっかりこの領地を管理しているから、私はここで存分に研究ができているんだ」[$W]\n
		[%エル%]:「こんなにマナに溢れて自由に研究できる場所は、他にないからね」[$W]\n
		\n
		エルの言う通り、お互い様……だろう？\n
		エルも、フィーも、自分も互いに助けられているんだ[$W]\n
		それでお相子じゃないか？\n
		それ以外に、エルのこの研究成果の対価なんて、支払えないぞ？[$W]\n
		……いやまあ、どうしても対価を支払えというのなら、虎の子の金庫の中からーー[$W]\n
		\n
		[%エル%]:「キミ、そこまでしなくていいから」[$W]\n
		[%エル%]:「ふう……まったく、キミとシルフィーユには負けたよ」[$W]\n
		[%エル%]:「そこまで言うなら、この研究成果は一旦置いといて、しかるべきところで発表することにするさ」[$W]\n
		\n
		ああ、それがいい[$W]\n
		正直、寂れた土地の領主にこんな壮大なもの渡されても、持て余してしまうからな[$W]\n
		\n
		[%シルフィーユ%]:「ふふっ、%ANAME(MASTER)%ってば」[$W]\n
		\n
		[%エル%]:「その代わり、私の頭脳と発明が必要になったら、いつでも言ってくれれば良いよ」[$W]\n
		[%エル%]:「私の力が及ぶ範囲ならば、全力で手助けするよ」[$W]\n
		\n
		[%シルフィーユ%]:「はいっ、よろしくお願いしますね、エルさん！」[$W]\n
		[%シルフィーユ%]:「エルさんも、私の力が必要になったら、いつでも言ってくださいっ！」[$W]\n
		\n
		[%エル%]:「ああ。必要な時があれば、頼らせてもらうよ……フィー」[$W]\n
		\n
		[%シルフィーユ%]:「あ……うんっ、いつでも頼ってね、エルちゃん！」[$W]\n
		\n
		[%エル%]:「エルちゃんはやめて？　エルで良いから」[$W]\n
		\n
		[%シルフィーユ%]:「そう？　……分かった。これからもよろしくね、エルっ！」[$W]\n
		\n
		うん、これからもよろしくな、エルちゃん[$W]\n
		\n
		[%エル%]:「……フィー。%ANAME(MASTER)%のプリン食べてもいいかな？」[$W]\n
		\n
		[%シルフィーユ%]:「だめだよエル。私のプリンならあげるから」[$W]\n
		\n
		だから人をダシに仲良くなるの、やめてくれない？[$W]\n
		\n
		こうして、仲を深めたエルとフィーを優しい気持ちで見つめるのだった[$W]\n
		\n
		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(エル_ID, "[感情:幸][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:幸][サイズ:180px][POS_X:200px]",,1)

PRINTW

K9_DFLAG_エルとフィー = 2


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

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

;前デイリー「対魔法考察」発生済み
SIF K9_DFLAG_対魔法考察 != 2
	RETURN 0

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_シルフィーユの魔法
	RETURN 0

;好感度5000を超えると発生する
;SIF CFLAG:NAME_TO_CHARA("UC_シルフィーユ"):好感度 <= 4999
;好感度3500を超えると発生する（条件緩和）
SIF CFLAG:NAME_TO_CHARA("UC_シルフィーユ"):好感度 <= 3499
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

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

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

CALL KJ_PRINT(対象,@"「はああああっ！」", 1)
PRINTL
PRINTFORML フィーの剣が振るわれる、その度に魔物が切り伏せられていく
PRINTFORMW こちらも負けじと、魔物を一体、二体と倒していく
PRINTL
CALL KJ_PRINT(対象,@"「数は多いけど――この程度なら！」", 1)
PRINTL
PRINTFORML 既にかなりの数の魔物を倒しているが、フィーの体力にはまだまだ余裕がありそうだ
PRINTFORMW さすが、普段からしっかり訓練を積んでいるだけのことはある
;シルフィーユが恋人の場合
IF TALENT:NAME_TO_CHARA("UC_シルフィーユ"):恋人 == 1
	PRINTFORMW 本当に頼りになる相棒だ
ELSE
	PRINTFORMW 本当に頼りになる仲間だ
ENDIF
PRINTL
PRINTFORMW とはいえ、やはり数が多すぎる……！
PRINTL
CALL KJ_PRINT(対象,@"「本当っ、少しは加減ってものを考えて欲しいよねっ！」", 1)
PRINTL
PRINTFORMW そう言いつつ、また一体スケルトンを切り捨てるフィー
PRINTL
PRINTFORML ……そもそも、なぜ自分達が多くの魔物を相手に大立ち回りを演じる羽目になっているのか
PRINTFORML 事の発端は、かつてフィーと出会った開拓村より、再び魔物退治を依頼されたことが発端だった
PRINTFORMW ちょっとゴブリンやスケルトンが見受けられる。その程度の簡単な依頼のはずだったのだが……
PRINTL
CALL KJ_PRINT(対象,@"「やっぱり、この数は異常だよねっ！　なんだかマナも大きく乱れているみたいだしっ！」", 1)
PRINTL
;ソーニャが雇用されてる場合
IF  CFLAG:NAME_TO_CHARA("UC_ソーニャ"):所属 == CFLAG:MASTER:所属
	PRINTFORMW こんなときにソーニャがいてくれれば、まとめて吹き飛ばしてくれるんだけどなっ！
	PRINTL
	CALL KJ_PRINT(対象,@"「同感っ！　でもそんなこと言っても仕方ないよねっ！」", 1)
	PRINTL
ENDIF
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)
PRINTL
PRINTFORML フィーの声に従い、後ろを振り向く
PRINTFORML そこにいたのは、紫紺の衣をまとう骨の魔物
PRINTFORMW ――バロウワイト！　しかもこの感じは、バロウワイト・ハイロードか！
PRINTL
PRINTFORML 非情にまずい。仲間が揃っているならまだしも、今はフィーと自分だけだ
PRINTFORMW バロウワイト・ハイロード一体だけなら、まだ即座に逃げれば生き残れる可能性もあるが……
PRINTL
CALL KJ_PRINT(対象,@"「後ろは……やっぱり塞がれているよね」", 1)
PRINTL
PRINTFORML 後ろのスケルトン達を蹴散らしながら、バロウワイト・ハイロードの魔法から逃れるのは、不可能と言って良い
PRINTFORMW かと言って、ここから距離のあるバロウワイト・ハイロードに無策で突撃するのもまた死にに行くようなものだ
PRINTL
PRINTFORML ……詰みか。だけど、せめてフィーだけは生かせて帰さなければ
PRINTFORMW 命がけでも、バロウワイト・ハイロードにわずかでも時間稼ぎできれば、フィーなら囲みを突破して逃げられるはずだ
PRINTL
CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%、逃げて。私が時間をかせぐから」", 1)
PRINTL
PRINTFORMW ――！？　バカを言うな！　時間稼ぎならこっちがするからフィーが逃げろ！
PRINTL
CALL KJ_PRINT(対象,@"「ダメだよ。%ANAME(MASTER)%は領主さまでしょ。それに、あなたを待っている仲間がいるんだから」", 1)
PRINTL
PRINTFORMW そんなのフィーだって同じだ！　良いから逃げろ！　これはリーダー命令だ！
PRINTL
CALL KJ_PRINT(対象,@"「ごめんね、%ANAME(MASTER)%。その命令は聞けないよ」", 1)
CALL KJ_PRINT(対象,@"「だって、%ANAME(MASTER)%には生きていて欲しいんだもん」", 1)
CALL KJ_PRINT(対象,@"「だから、いいから早く逃げてっ！　もう時間がないんだから！　逃げろっ！」", 1)
PRINTL
PRINTFORML そういうと、フィーはもう詠唱を終えようとしているバロウワイト・ハイロードに駆け出していった！
PRINTFORMW フィー！　バカ野郎！　おまえを置いて逃げられるわけないだろうが！
PRINTL
CALL KJ_PRINT(対象,@"「ハイロードさん、あなたの相手は私だよっ！　自慢の魔法でもなんでも飛ばしてきなさいっ！」", 1)
PRINTL
PRINTFORMW ……………………
PRINTFORMW ………………
PRINTFORMW …………
PRINTL
PRINTFORML 風のような速さで駆けるフィー。けれどバロウワイト・ハイロードの魔法の発動には、到底間に合わない。間に合うわけもない
PRINTFORMW バロウワイト・ハイロードから放たれる、マナストーム
PRINTFORML 標的に逃げ場も、避ける隙間すら与えない無慈悲な魔力の奔流
PRINTFORMW フィーの突撃は、最初から無謀な――命を代価にわずかな時間を稼ぐだけの突撃だった
PRINTL
PRINTFORML フィーの覚悟を、思いを無駄にしないためには、即座に逃げるべきなのだろう
PRINTFORMW 例え自身が命を捨てて時間稼ぎをしたとしても、%ANAME(MASTER)%が生き残る可能性がほんのわずか
PRINTFORML そのことを、フィーが理解した上の行動だとしても……それでも、逃げるべきなのだろう
PRINTFORMW そのことを頭では理解していても――%ANAME(MASTER)%の体はバロウワイト・ハイロードに向かって駆けだしていた
PRINTL
PRINTFORML どうせ生き延びる目がわずかなら……前のめりに倒れてやろう
PRINTFORMW ――フィーの分も一太刀入れてやる。そう決意し、足に力を込めた
PRINTL
PRINTFORMW ……………………
PRINTFORMW ………………
PRINTFORMW …………
PRINTL
PRINTFORML バロウワイト・ハイロードが私に向けて、マナストームを放つ
PRINTFORMW 回避も防御も不可能な魔力の波動。魔術師の適正がない私ではひとたまりもないだろう
PRINTFORML この一撃を受けて生き残ったとしても、どのみち死に体だ。なにもできずに追撃を喰らって終わりなことには変わりない
PRINTFORMW %ANAME(MASTER)%、なんとか逃げてね――
PRINTL
PRINTFORML と思っていたのに、後ろから追いかけてくる気配
PRINTFORMW ……あのおバカさんは、私が命がけで逃がそうとしているのに、なんで逃げずにむしろ追ってきているのだろうか
PRINTFORMW しかたない。 %ANAME(MASTER)%がこの状況で逃げたりしそうにないことは、他の誰よりも私がよく分かっていたことだ
PRINTL
;シルフィーユが恋慕または親愛の場合
IF TALENT:NAME_TO_CHARA("UC_シルフィーユ"):恋慕 == 1 || TALENT:NAME_TO_CHARA("UC_シルフィーユ"):親愛 == 1
	PRINTFORML そしてそんな%ANAME(MASTER)%を、胸を焦がすほどに好きになってしまったのも私だ
	PRINTFORMW まったく、自分のことながらどうしようもない
	PRINTFORMW 死の間際だっていうのに、つい笑ってしまう
ENDIF
PRINTL
PRINTFORMW すぐ目の前まで迫るマナストーム。１秒も経たずに、魔力の暴風は私と%ANAME(MASTER)%を飲み込むだろう
PRINTL
CALL KJ_PRINT(対象,@"「……まったく。 %ANAME(MASTER)%まで死んじゃったら、私だって死んでも死にきれないじゃないっ！」", 1)
PRINTL
PRINTFORMW こんなときに、なぜかお父様の言葉を思い出す
PRINTL
;注意：ここの魔法解説はあくまで「eraFL_設定メモ.txt」と「KOJO_K3_COM.xml」を見て勝手に解釈したものです
PRINTFORML 「いいかいフィー。魔法とは使うものじゃない」
PRINTFORMW 「世界と対話して、理解して、協力をお願いして、力を貸してもらうものだ」
PRINTL
CALL KJ_PRINT(対象,@"「……でもお父様。私が力を貸してってお願いしても、ダメなの」", 1)
PRINTL
PRINTFORML 「そうだな……フィーは頑張り屋さんで、良い子だからな」
PRINTFORMW 「できることは自分でやろうって、頑張ってしまうから」
PRINTFORMW 「……フィーが心から協力を必要としていないから、かもしれないね」
PRINTL
CALL KJ_PRINT(対象,@"「むむむ……難しいなあ」", 1)
PRINTL
PRINTFORMW ……………………
PRINTFORMW ………………
PRINTFORMW …………
PRINTL
PRINTFORMW そして、開拓村で出会った魔術師のユノさんの言葉も
PRINTL
PRINTFORMW 「フィーは良くも悪くも、素直過ぎるからね。世界のあり方をそのまま認めちゃう」
PRINTL
CALL KJ_PRINT(対象,@"「えっと……どういうことです？」", 1)
PRINTL
PRINTFORML 「どういうこともなにも、そのまんまの意味」
PRINTFORMW 「これができない！　じゃあもっと頑張ろう！　もしくは工夫しよう！」
PRINTFORMW 「――これがフィーのあり方」
PRINTL
PRINTFORML 「もちろん、立派なことだよ？　むしろ尊敬したいくらいだね。私は見習う気はないけど」
PRINTFORMW 「でも、魔法使いはそれだけじゃ駄目なときもある。時には対話して、協力を求めなきゃ」
PRINTL
CALL KJ_PRINT(対象,@"「協力って……周りの人達に、ですか？」", 1)
PRINTL
PRINTFORML 「んにゃ。それももちろん大切だけど、魔法使いは世界に協力を求めるの」
PRINTFORMW 「私はこんな世界にしたいです、マナを渡すのでどうか力を貸してくださいってね」
PRINTL
CALL KJ_PRINT(対象,@"「……うーん？　分かるような分からないような」", 1)
CALL KJ_PRINT(対象,@"「お父様やお母様に教わったとおり、協力を求めても魔法はまったく発動しなかったし」", 1)
PRINTL
PRINTFORMW 「漠然とした思いじゃ、伝わらないよ。なんせ、相手は世界だからね。しかも、こことは異なる次元にある世界」
PRINTL
CALL KJ_PRINT(対象,@"「うう……スケールが大きすぎて頭が爆発しそう」", 1)
PRINTL
PRINTFORML 「一度、その世界と繋げることができれば、フィーならきっとすぐだよ」
PRINTFORMW 「フィーにはマナも、知識も、技術も十分過ぎるほどある」
PRINTFORML 「……むしろフィーのマナが大きすぎるから、そんなにマナ渡されても対価分の働きできるかって、世界から言われてる可能性も？」
PRINTFORMW 「まあマナの量の調整も、フィーの場合は一度魔法が使えれば自然と覚えるかな？」
PRINTL
PRINTFORML 私より年上のユノさんが、かわいらしく首を傾げながら自問自答している
PRINTFORML 少しの間そうしていたけれど、やがて思考を取りやめたのか、ユノさんは私の方に向きなおった
PRINTL
PRINTFORMW 「ともかく、魔法には魔力、技術、詠唱……どれも不可欠だけど、一番の大本はここ」
PRINTL
PRINTFORMW そう言って、ユノさんはユノさん自身の胸を指差す
PRINTL
PRINTFORML 「イメージや想念、記憶、信仰、精神……つまり心ってこと」
PRINTFORMW 「世界に、自分の描く理想の世界を伝えて、その通りにしてもらうようにお願いするには、そこが一番重要だからね」
PRINTFORMW 「ちなみに私が初めての魔法を使ったときは、魔法でジョイに褒めて貰いたいと思ったときだったよ……てへり」
PRINTL
CALL KJ_PRINT(対象,@"「あーはい、ごちそうさまです」", 1)
PRINTL
PRINTFORMW 「まあ、つまり……魔術師や魔導技師は、みんなロマンチストってことだよ」
PRINTL
CALL KJ_PRINT(対象,@"「どうしてそんな結論に！？」", 1)
PRINTL
PRINTFORML 「いやいや、魔術師や魔導技師は、自分が夢に思い描く世界を対話と技術で実現させちゃうんだよ？」
PRINTFORMW 「そんなの、ロマンチストに決まってるじゃん？」
PRINTL
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)
PRINTL
PRINTFORMW ……………………
PRINTFORMW ………………
PRINTFORMW …………
PRINTL
PRINTFORMW 今なら分かる気がする
PRINTFORMW もしも、世界が対話によって応えてくれるなら
PRINTFORMW もしも、魔法が世界から力を貸して貰うことであるならば
PRINTL
;シルフィーユが恋慕または親愛の場合
IF TALENT:NAME_TO_CHARA("UC_シルフィーユ"):恋慕 == 1 || TALENT:NAME_TO_CHARA("UC_シルフィーユ"):親愛 == 1
	PRINTFORMW ――どうか、私の大好きで、大切な人を守る力を貸してください
ELSE
	PRINTFORMW ――どうか、私の大切な仲間を守る力を貸してください
ENDIF
PRINTL
PRINTFORML そのとき、初めて世界が応えてくれた――そんな気がした
PRINTFORMW 刹那、初めての感覚に戸惑う。でも、それはほんの一瞬だった
PRINTL
PRINTFORML 自分の中のマナの動きも、魔法の発動の仕方も、詠唱の言葉も――
PRINTFORML それこそ、体に染みつくぐらいたくさん勉強して、練習してきた
PRINTFORMW だから、初めてのことでも私の体は勝手に動いてくれる
PRINTL
PRINTFORML 手に持つ剣にマナを、魔法の力を注ぐ
PRINTFORMW 私の手に持っていた剣が、青い光を放つ
PRINTL
PRINTFORML これは――魔法を断つ、青き破魔の剣
PRINTFORMW 目の前にいる敵が放つ魔法を断つ、%ANAME(MASTER)%を守るための剣
PRINTL
PRINTFORML 私の目と知識は、目の前のマナストームの魔力の構成をはっきりと分析できていた
PRINTFORMW そして、その後ろにいるバロウワイト・ハイロードが自身を守るように身に纏う魔力も
PRINTL
CALL KJ_PRINT(対象,@"「――これは魔法を断つ青き剣」", 1)
CALL KJ_PRINT(対象,@"「これが私の――」", 1)
CALL KJ_PRINT(対象,@"「ううん。これが私と%ANAME(MASTER)%の魔法！」", 1)
PRINTL
PRINTFORMW ――私達の魔法の剣が、魔力の暴風を切り裂いた
PRINTL
PRINTFORMW ……………………
PRINTFORMW ………………
PRINTFORMW …………
PRINTL
PRINTFORML フィーの青き剣が、マナストームを切り裂く
PRINTFORMW 想像していなかった光景に、非常事態にも関わらず一瞬、思考が停止してしまった
PRINTFORML その間にも、フィーは素早く駆けていき――
PRINTFORMW 青い光の剣で、バロウワイト・ハイロードを切り裂いた
PRINTL
PRINTFORML 骨の体でありながら、バロウワイト・ハイロードはその瞬間、驚愕の表情を浮かべていたような気がした
PRINTFORML そして、フィーはすかさずバロウワイト・ハイロードに追撃
PRINTFORMW ――その攻撃により、バロウワイト・ハイロードに二度目の死を与えたのだった
PRINTL
CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%、大丈夫！？」", 1)
PRINTL
PRINTFORMW バロウワイト・ハイロードを倒して、間髪入れずにこちらの心配をするフィー
PRINTL
PRINTFORML とんでもないことしておいて、次の瞬間こちらの心配か？
PRINTFORMW そもそも、フィーの方が大丈夫なのか？
PRINTL
CALL KJ_PRINT(対象,@"「私は全然平気だよ。本当に怪我はないの？」", 1)
PRINTL
PRINTFORMW まったくないよ。フィーのおかげだ
PRINTL
CALL KJ_PRINT(対象,@"「そっかあ……良かったぁ」", 1)
PRINTL
PRINTFORML そう言い、泣きそうな顔で笑うフィー
PRINTFORMW まったく、無茶しやがって……
PRINTL
;シルフィーユが恋人の場合
IF TALENT:NAME_TO_CHARA("UC_シルフィーユ"):恋人 == 1
	PRINTFORMW 思わず、フィーを抱きしめる
	PRINTL
	CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%？　ど、どうしたの？」", 1)
	PRINTL
	PRINTFORML どうしたの、じゃない
	PRINTFORML そうするしかなかったかもしれない。それでも……フィーがいなくなるなんて嫌だ
	PRINTFORMW お願いだから、二度とこんな無茶はしないでくれ
	PRINTL
	CALL KJ_PRINT(対象,@"「うん……ごめんね。ありがとう、%ANAME(MASTER)%」", 1)
ELSE
	PRINTFORMW 思わず、フィーの頬を引っ張る
	PRINTL
	CALL KJ_PRINT(対象,@"「い、いひゃい！？　ひきにゃりにゃにひゅるにょ！？」", 1)
	PRINTL
	PRINTFORML 勝手に命を捨てようとしたバツだ
	PRINTFORMW いくら仲間を逃がすためとはいえ、二度とこんな無茶するんじゃない
	PRINTL
	CALL KJ_PRINT(対象,@"「うう……悪かったけど、頬を引っ張ることないじゃないっ！」", 1)
ENDIF
PRINTL
PRINTFORMW さてと。色々とフィーに聞きたいことはあるけれど
PRINTFORMW ――まずは残ったスケルトン共の退治か
PRINTL
CALL KJ_PRINT(対象,@"「そうだね。数は多いけど」", 1)
PRINTL
PRINTFORMW ああ、二人なら問題ないな
PRINTL
CALL KJ_PRINT(対象,@"「うん、もちろんっ！　任せておいて」", 1)
PRINTL

;シルフィーユが恋人の場合
IF TALENT:NAME_TO_CHARA("UC_シルフィーユ"):恋人 == 1
	PRINTFORMW ああ、背中は任せた。相棒
	PRINTL
	CALL KJ_PRINT(対象,@"「うん、任されたよ。私の背中はよろしくね、私の相棒さんっ」", 1)
ELSE
	PRINTFORMW ああ、頼りにさせてもらうよ、フィー
	PRINTL
	CALL KJ_PRINT(対象,@"「こちらこそ、頼りにさせてもらうからねっ！」", 1)
ENDIF
PRINTL
PRINTFORMW ……………………
PRINTFORMW ………………
PRINTFORMW …………
PRINTL
PRINTFORML それからほどなく、魔物の群れは掃討できた
PRINTFORML もちろん、開拓村への被害はゼロだ
PRINTFORMW 結果的にではあるが、フィーの大きな成長を成果として得た依頼だった
PRINTL
PRINTFORML もちろん、死を覚悟しなければならない状況に置かれたのは、冒険者として大いに反省する必要があるだろう
PRINTFORMW それでも、村を守れたこと。それとフィーが成長できたことは喜んでいいだろう
PRINTL

;素質「魔術師」を付与
TALENT:NAME_TO_CHARA("UC_シルフィーユ"):魔術師 = 1
SETCOLOR COLOR("イエロー")
PRINTFORMW %ANAME(対象)%は「魔術師」の素質を得た
RESETCOLOR

;魔術経験値増加処理
CALL PRINT_ADD_EXP(NAME_TO_CHARA("UC_シルフィーユ"), "魔術経験値", 600, 1)

CALL TRAIN_AUTO_ABLUP(NAME_TO_CHARA("UC_シルフィーユ"), 2)
;PRINTFORMW %ANAME(対象)%は魔術経験値を獲得した

PRINTW
K9_DFLAG_シルフィーユの魔法 = 2
RETURN 1


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

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

;NAME_TO_CHARAはキャラクター識別名を参照する(CSVのCSTR:99に設定されている名前)
リュミエール_ID = NAME_TO_CHARA("リュミエール")
シルフィーユ_ID = NAME_TO_CHARA("UC_シルフィーユ")

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_一緒にお料理 == 2
	RETURN 0

;リュミエールの好感度が750以上、シルフィーユの好感度が1000以上だと発生する
SIF CFLAG:リュミエール_ID:好感度 < 750 || CFLAG:シルフィーユ_ID:好感度 < 1000
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

RETURN 1

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

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;---------------------
@KOJO_DAILY_K9_COOKING(対象)
#DIM 対象
VARS リュミエール = "リュミエール"
VARI リュミエール_ID

VARS シルフィーユ = "UC_シルフィーユ"
VARI シルフィーユ_ID

リュミエール_ID = NAME_TO_CHARA(リュミエール)
シルフィーユ_ID = NAME_TO_CHARA(シルフィーユ)

VARS TEXT

{
	TEXT '= @"
		ある日の昼下がり
		リュミエールとフィーはキッチンで料理の準備をしていた[$W]

		[%リュミエール%]:「シルフィーユ様、わざわざ手伝って頂かなくても……」[$W]

		[%シルフィーユ%]:「でも、リュミエールさん一人だと大変でしょ？」[$W]
		[%シルフィーユ%]:「仕事で手が離せないときは無理だけど、そうじゃないときは手伝わせて？」[$W]

		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(リュミエール_ID, "[感情:通常][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:喜][サイズ:180px][POS_X:200px]",,1)

{
	TEXT '= @"
		[%リュミエール%]:「ですが、シルフィーユ様は%ANAME(MASTER)%様の手伝いだけでなく、訓練もあります」[$W]
		[%リュミエール%]:「そのうえ、料理までさせてしまっては……」[$W]

		[%シルフィーユ%]:「大丈夫、家にいる時だって訓練はもちろん、家の仕事の手伝いもお料理もしていたから」[$W]
		[%シルフィーユ%]:「それに、忙しいのはリュミエールさんも同じでしょ？　お互い様だよ」[$W]

		[%リュミエール%]:「私にお気遣いなど結構ですから……」[$W]
		[%リュミエール%]:「それとシルフィーユ様、私のことはリュミエールとお呼びくださいと何度も申し上げているではありませんか」[$W]

		[%シルフィーユ%]:「それなら、私だってフィーって呼んでって何度も言ってるでしょ？」[$W]

		[%リュミエール%]:「それは……もう、シルフィーユ様は意外と強情なのですから」[$W]

		[%シルフィーユ%]:「えー？　リュミエールさんの方が強情だと思うけど？」[$W]

		[%リュミエール%]:「ふふっ……分かりました。ですが、手伝っていただくからには、遠慮なく使いますからね？」[$W]

		[%シルフィーユ%]:「うんっ、任せて！　お母さま仕込みのノアレルム家庭料理の腕前を見せてあげるからっ！」[$W]

		[%リュミエール%]:「……ノアレルム。そういえば、シルフィーユ様はノアレルム共和国の出身でいらっしゃいましたね？」[$W]

		[%シルフィーユ%]:「そうだよ。リュミエールさんは南フロリアの出身だよね」[$W]

		[%リュミエール%]:「はい。ですから、彼の地の料理に関しては心得がございます」[$W]
		[%リュミエール%]:「よく塩漬けした鴨肉や豆類を煮込んだカソールに、レモンの風味が利いたフィアドーネ……」[$W]
		[%リュミエール%]:「私の得意料理でございます。ノアレルムの料理とは、どのようなものでしょうか？」[$W]

		[%シルフィーユ%]:「そうだね、ノアレルムで良く食べられるのは――」[$W]

		[%リュミエール%]:「そういえば、ノアレルムではスキュラ料理が良く食べられているとお聞きしましたが……」[$W]

		[%シルフィーユ%]:「そんなの好むのごく一部だからね！？　ノアレルムの人が皆食べているなんて思わないでねっ！？」[$W]

		[%リュミエール%]:「そ、そうなのですか。失礼いたしました」[$W]

		[%シルフィーユ%]:「まあ、魚料理が種類豊富で好まれるのはそうだけどね。でも少なくても、うちではスキュラは食べないから」[$W]

		[%リュミエール%]:「承知しました。では改めて、ノアレルム料理について伺ってもよろしいでしょうか？」[$W]

		[%シルフィーユ%]:「うんっ、分かったよ！　えへへっ、料理でリュミエールさんに頼られると嬉しいなあ」[$W]

		[%リュミエール%]:「謙遜なさらないでください。シルフィーユ様も十分料理が上手ではありませんか」[$W]

		[%シルフィーユ%]:「多少は自信あるけど、リュミエールさんには敵わないよ。えっと、それでノアレルムでは――」[$W]

		"
}

;ノアレルム料理がさっぱり分からない……

CALL PRINT_DIAG(TEXT)

{
	TEXT '= @"
		\n
		………………[$W]\n
		…………[$W]\n
		……[$W]\n
		[$W]\n
		\n
	"
}

CALL PRINT_DIAG(TEXT)

{
	TEXT '= @"

		[%リュミエール%]:「なるほど……そのような料理が。参考になります」[$W]

		[%シルフィーユ%]:「リュミエールさんの参考になったなら、嬉しいな」[$W]
		[%シルフィーユ%]:「あっ、そうだ！　もしリュミエールさんが良ければなんだけど……」[$W]
		[%シルフィーユ%]:「時間があるときに、南フロリアの料理も教えてくれたら嬉しいなって」[$W]

		[%リュミエール%]:「南フロリアの料理……ですか？」[$W]

		[%シルフィーユ%]:「うんっ、リュミエールさんのお料理はとってもおいしいですから」[$W]

		[%リュミエール%]:「分かりました。私で良ければですが」[$W]

		[%シルフィーユ%]:「やった！　ありがとうございますっ、リュミエールさん！」[$W]

		[%リュミエール%]:「ふふっ……あ、すみません」[$W]
		[%リュミエール%]:「こうやって、誰かと一緒にお料理するのも楽しいものですね」[$W]
		[%リュミエール%]:「あるいは、シルフィーユ様と一緒に料理しているからでしょうか」[$W]

		[%シルフィーユ%]:「そう言ってくれると嬉しいな。私も、リュミエールさんとお料理するの楽しいもん」[$W]

		[%リュミエール%]:「それは……ありがとうございます。フィー様」[$W]

		[%シルフィーユ%]:「フィー様かぁ……別にフィーで良いのに」[$W]

		[%リュミエール%]:「それはお聞きできません。私は強情ですから」[$W]

		[%シルフィーユ%]:「ふふっ。でもありがとう、リュミエールさん」[$W]

		やあ。二人ともいつもありがとうな
		なにか手伝えることはあるかい？[$W]

		[%シルフィーユ%]:「あっ、%ANAME(MASTER)%！　それじゃあ、できた料理を運んでくれる？」[$W]

		ああ、分かった
		二人は休んでいてくれていいよ。なんならカードゲームでもしていてくれ[$W]

		[%リュミエール%]:「なぜカードゲームなのでしょうか……？」[$W]
		[%リュミエール%]:「そもそも、%ANAME(MASTER)%様に配膳をさせておいて、私が休んでいるわけにはいきません」[$W]

		リュミエールは強情だなぁ……

		[%リュミエール%]:「%ANAME(MASTER)%様までそれを言うのですか……」[$W]

		理由は分からないけれど、ちょっとすねた感じの、しかし楽しそうなリュミエールの顔を見ることができた[$W]

		その日の夕食
		食卓には南フロリアとノアレルムの料理が並んでいた[$W]

		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(リュミエール_ID, "[感情:幸][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:幸][サイズ:180px][POS_X:200px]",,1)

;リュミエールとシルフィーユの料理経験値を加算
CALL PRINT_ADD_EXP(リュミエール_ID, "料理経験値", 300, 1)
CALL TRAIN_AUTO_ABLUP(リュミエール_ID, 2)

CALL PRINT_ADD_EXP(シルフィーユ_ID, "料理経験値", 300, 1)
CALL TRAIN_AUTO_ABLUP(シルフィーユ_ID, 2)

PRINTW

K9_DFLAG_一緒にお料理 = 2


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

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

;NAME_TO_CHARAはキャラクター識別名を参照する(CSVのCSTR:99に設定されている名前)
シルフィーユ_ID = NAME_TO_CHARA("UC_シルフィーユ")
スフレ_ID = NAME_TO_CHARA("UC_スフレ")

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_二人の歌姫 == 2
	RETURN 0

;スフレの好感度が750以上、シルフィーユの好感度が1500以上だと発生する
SIF CFLAG:スフレ_ID:好感度 < 750 || CFLAG:シルフィーユ_ID:好感度 < 1500
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

RETURN 1

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

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;---------------------
@KOJO_DAILY_K9_SONGSTRES(対象)
#DIM 対象
VARS スフレ = "UC_スフレ"
VARI スフレ_ID

VARS シルフィーユ = "UC_シルフィーユ"
VARI シルフィーユ_ID

スフレ_ID = NAME_TO_CHARA(スフレ)
シルフィーユ_ID = NAME_TO_CHARA(シルフィーユ)

VARS TEXT

{
	TEXT '= @"
		[%スフレ%]:「フィーさーんっ！」[$W]

		満面の笑顔を浮かべながらとてとてと駆け寄り、フィーの胸に飛び込むスフレ[$W]

		[%シルフィーユ%]:「わぷっ！？　ふふっ、どうしたのスフレちゃん？」[$W]

		冒険者として日ごろから鍛えているフィーは、ほぼ同じ身長のスフレを難なく受け止めて、スフレの頭を優しく撫でている[$W]

		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(スフレ_ID, "[感情:喜][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:喜][サイズ:180px][POS_X:200px]",,1)

{
	TEXT '= @"
		セイレーンの依頼ですぐに仲良くなったフィーとスフレ
		相性が良かったのか、スフレはすっかりフィーに懐いていた[$W]

		[%スフレ%]:「そのですね……フィーさんにお願いがあるんですっ」[$W]

		[%シルフィーユ%]:「お願い？　私にできることであればやってみるけど、どんなお願いかな？」[$W]

		[%スフレ%]:「私と一緒に歌ってください！」[$W]

		[%シルフィーユ%]:「スフレちゃんと一緒に歌うの？　ここで？」[$W]

		[%スフレ%]:「いえ、観客の皆さんの前でですっ、はいっ！」[$W]

		[%シルフィーユ%]:「……え？」[$W]

		スフレさんは満面の笑みでなかなか無茶なお願いを言って、それを聞いて固まるフィーお姉さん[$W]

		[%スフレ%]:「もちろん今すぐじゃないですけど、近いうちにフィーさんと一緒に皆さんの前で、歌や踊りを披露したいですっ！」[$W]

		[%シルフィーユ%]:「す、スフレちゃん。それはちょっと、私には難しいんじゃないかな？」[$W]

		[%スフレ%]:「フィーさんなら大丈夫ですっ！」[$W]

		[%シルフィーユ%]:「ほら私、スフレちゃんみたいに歌や踊りの練習とかしてないし」[$W]

		[%スフレ%]:「フィーさんなら大丈夫ですっ！」[$W]

		[%シルフィーユ%]:「練習や仲間内で歌う位なら良いけど。観客の皆さんの前で歌うのは、スフレちゃんの足を引っ張っちゃうだろうし」[$W]

		[%スフレ%]:「フィーさんなら大丈夫ですっ！」[$W]

		[%シルフィーユ%]:「いやそれ剣の訓練をしないで、いきなり実戦に出ろってものじゃない――」[$W]

		[%スフレ%]:「それでもフィーさんなら大丈夫ですっ！」
		[%スフレ%]:「フィーさんと二人なら、ノルディアの『ナイト・アット・オペラ』だって満員御礼ですからっ！」[$W]

		[%シルフィーユ%]:「スフレちゃんの私に対する、その信頼はどこから来てるのっ！？」[$W]

		[%スフレ%]:「フィーさんはなんでもできて、優しくて、綺麗で……」
		[%スフレ%]:「私にとって、もう一人の姉さんみたいなものですから」[$W]

		[%シルフィーユ%]:「そ、そっかぁ……私がユノさんと同じようにできている自信はないけれど」
		[%シルフィーユ%]:「スフレちゃんがそう言ってくれるのは嬉しいな」[$W]
		[%シルフィーユ%]:「でも、なんで私を誘ってくれたのかな？」[$W]

		フィーがスフレの頭を優しく撫でながら問いかける[$W]

		[%スフレ%]:「実は二人で歌う重唱があるんです。一人だとどうしても……」
		[%スフレ%]:「そこで、フィーさんにお願いできないかなって思ったんですっ、はいっ！」[$W]
		[%スフレ%]:「ごめんなさい。フィーさんがとても忙しいのは分かっているんですけど……」[$W]

		[%シルフィーユ%]:「そうなんだ。スフレちゃんのお願いだし、できれば叶えてあげたいけれど」[$W]
		[%シルフィーユ%]:「私じゃやっぱり、スフレちゃんの邪魔になるんじゃないかな？」[$W]

		良いんじゃないか？　やってみれば[$W]

		[%シルフィーユ%]:「%ANAME(MASTER)%？」[$W]

		なにも、いきなりスフレに合わせてやれって言うわけじゃないさ
		ひとまず、空いた時間にスフレの練習相手になるくらいの気持ちでやってみれば良いと思うよ[$W]

		[%スフレ%]:「はいっ、フィーさんは忙しいのは分かってますし、まずはそれで大丈夫ですっ！」[$W]

		[%シルフィーユ%]:「スフレちゃんと%ANAME(MASTER)%がそう言うなら……」
		[%シルフィーユ%]:「じゃあ、空いた時間になっちゃうけど、スフレちゃんの練習に付き合わせてくれる？」[$W]

		[%スフレ%]:「はいっ、もちろんですっ！　フィーさんと一緒に歌えるの、嬉しいですっ！」[$W]

		スフレが全身で喜びを表現している。さすが歌姫でありながら舞姫のスフレと言うべきか。その動きは無駄に華麗だ[$W]

		しかし、フィーは本当にスフレに懐かれちゃったな[$W]

		[%シルフィーユ%]:「悪い気はしないけど、ちょっとプレッシャーは感じるかなぁ」[$W]

		[%スフレ%]:「くすっ。いつもはフィーさんにたくさん教わってますけど、今回だけは私がフィーさんの先生さんですねっ！」[$W]

		[%シルフィーユ%]:「ふふっ。よろしくね、スフレ先生っ」[$W]

		[%スフレ%]:「そ、そんな私が先生なんて……もう、フィーさん。恥ずかしいです」[$W]

		そこで恥ずかしがるんかい……[$W]

		それにしても、楽しみだなぁ。フィーが綺麗な衣装を着て、皆の前や旅先で歌っている姿を見るのが[$W]

		[%シルフィーユ%]:「……もしかして、%ANAME(MASTER)%。私が歌っている姿が見たいからスフレちゃんに賛同したの？」[$W]

		そうだが？[$W]

		[%シルフィーユ%]:「即答！？」[$W]

		もちろん、それだけじゃないが。ほら、スフレの様子を見たら残念そうな顔をさせたくないというか[$W]

		[%シルフィーユ%]:「ま、まあそれはたしかにそうだけど」[$W]

		というわけで、楽しみにしているよ[$W]

		[%シルフィーユ%]:「まったくもう……あ、そうだ。%ANAME(MASTER)%も一緒で、三人で歌えば良いんじゃないかな？」[$W]

		ははは、突然何を言っているんだフィーさんや。スフレはフィーだから誘ったんだぞ
		そのスフレがそんなの了承するわけ――[$W]

		[%スフレ%]:「それは素敵ですっ！　%ANAME(MASTER)%さんも一緒に歌いましょうっ！」[$W]

		なんかすごい乗り気だ！？[$W]

		[%シルフィーユ%]:「ふふっ、じゃあ%ANAME(MASTER)%も一緒だね」[$W]

		いや、これでも領主の身だし！　とっても多忙だから！[$W]

		[%シルフィーユ%]:「大丈夫だよ。%ANAME(MASTER)%の仕事、私も手伝ってあげるから」[$W]

		そうしてしばらくの間、三人ではしゃぎ合いながら時間は過ぎていった……

		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(スフレ_ID, "[感情:幸][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:幸][サイズ:180px][POS_X:200px]",,1)

;スフレとシルフィーユの歌唱経験値を加算
CALL PRINT_ADD_EXP(スフレ_ID, "歌唱経験値", 150, 1)
CALL TRAIN_AUTO_ABLUP(スフレ_ID, 2)

CALL PRINT_ADD_EXP(シルフィーユ_ID, "歌唱経験値", 150, 1)
CALL TRAIN_AUTO_ABLUP(シルフィーユ_ID, 2)

PRINTW

K9_DFLAG_二人の歌姫 = 2


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

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

;前デイリー「魔法が使えなくても」発生済み
SIF K9_DFLAG_魔法が使えなくても != 2
	RETURN 0

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_冒険者
	RETURN 0

;好感度1000を超えると発生する
SIF CFLAG:NAME_TO_CHARA("UC_シルフィーユ"):好感度 <= 999
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

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

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

PRINTFORML 朝食後、何気なしに領地の中を散歩する
PRINTFORML 良い天気だ。歩きつつ、平穏そのものの領地の中を気分良く歩いていく
PRINTL
PRINTFORMW そうして足の赴くまま歩いていると、熱心に剣を振るうフィーの姿を見つけた
PRINTL
PRINTFORML 訓練の邪魔をするのも悪いが、見かけていて声をかけないのもどうだろうか
PRINTFORMW 目の前のフィーが仕事を手伝ってくれるおかげで、幸い領主としての仕事は落ち着いてきている
PRINTFORML しばし、フィーが剣を振るう姿を眺めてみるのも良いだろう
PRINTFORMW 訓練している姿を勝手に見たくらいでは、怒られない程度には仲良くなっているはずだ
PRINTL
PRINTFORML フィーが剣を振るう。真っ直ぐ縦に、次に横に
PRINTFORMW 流れるようでいて、力強さを感じる剣だった
PRINTFORML 彼女の剣は、実践的でありながら、同時に美しいとも思わされる
PRINTFORMW それなりに長くフィーを見ていたが、飽きるという感覚はまったくなかった
PRINTL
PRINTFORML どれくらい経っただろうが。５分ほどだったかもしれないし、１時間以上経っていたかもしれない
PRINTFORMW フィーが残心を終え、剣を下ろす
PRINTL
PRINTFORML お疲れ様、精が出るね
PRINTFORMW フィーが剣を下ろしたのを見計らい、彼女に声をかけつつ水を渡す
PRINTL
CALL KJ_PRINT(対象,@"「あれ、%ANAME(MASTER)%？」", 1)
CALL KJ_PRINT(対象,@"「わわっ、もしかして私に？　ありがとう！」", 1)
PRINTL
PRINTFORML いやいや、良いものを見せてもらったからね
PRINTFORMW その対価としては安すぎるくらいさ
PRINTL
CALL KJ_PRINT(対象,@"「良いもの？　私、%ANAME(MASTER)%になにか見せたっけ？」", 1)
PRINTL
PRINTFORMW ああ
PRINTL
CALL ASK_YN("フィーの素敵な剣をね", "フィーの素敵な体をね")
IF RESULT == 0
	PRINTL
	PRINTFORMW お手本にしたいぐらいだったよ。フィーの剣は
	PRINTL
	CALL KJ_PRINT(対象,@"「ええっ、もしかして見てたの！？」", 1)
	CALL KJ_PRINT(対象,@"「素敵って言ってくれるのは嬉しいけど、ちょっと恥ずかしいな」", 1)
ELSE
    PRINTL
	PRINTFORML そう、鍛え上げられた健康的かつ、しなやかで女性らしさをまったく損なわない――
	PRINTFORMW いやむしろ魅力を増している、フィーの扇情的なその体つき
	PRINTFORML 肉感的な太ももとお尻、引き締まったウエストと反するような、剣を振るう度に揺れる豊かな胸！
	PRINTFORMW こんな素晴らしい光景を見るためならば、10,000――いや、20,000ディナリ払ってもまったく惜しくはない！
	PRINTL
	PRINTFORML ありがとう彼女と出会わせてくれた開拓村！　ありがとう、朝の散歩に誘い出してくれた澄んだ空気！
	PRINTFORMW そしてありがとうフィー！　ここに来てくれて！
	PRINTFORML ありとあらゆる幸運と巡り合わせにより、自分はサンクチュアリを垣間見ることができたのだ！
	PRINTFORMW 今、世界に感謝したい！　ありがとう――と！
	PRINTL
	CALL KJ_PRINT(対象,@"「えーいっ！　シルフィーユチョップ！　本気バージョン！」", 1)
	PRINTL
	PRINTFORMW フィーのかいしんのいちげき！　%ANAME(MASTER)%は100のダメージ！
	PRINTFORMW %ANAME(MASTER)%はめのまえがまっくらになった！
	PRINTL
	PRINTFORMW ざんねん！　わたしのぼうけんはこれでおわってしまった！
	PRINTL
	CALL KJ_PRINT(対象,@"「アホなこと言ってないで、そこで正座っ！」", 1)
	PRINTL
	PRINTFORMW フィーに怒られてしまった……
	PRINTFORMW でもこちらの視線を気にして、顔を赤くしてるフィーはかわいかった……
ENDIF
PRINTL
PRINTFORML それにしても、よく鍛えられている剣さばきだね
PRINTFORMW 同じ冒険者として感嘆するくらいだよ
PRINTL
CALL KJ_PRINT(対象,@"「ふふっ、ありがと」", 1)
PRINTL
PRINTFORMW 基礎からしっかり修練してるみたいだけれど、誰かに教わったのか？
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
PRINTFORML そうか。凄い人なんだね。その先生は
PRINTFORMW それにしても、なんでフィーは冒険者になろうと思ったんだ？
PRINTL
CALL KJ_PRINT(対象,@"「なんでって……前も言ったとおり、私は魔法がからっきしだったからね」", 1)
CALL KJ_PRINT(対象,@"「魔術師の家である、ハーベスト家を継ぐことはできないよ」", 1)
CALL KJ_PRINT(対象,@"「幸い、弟と妹は魔術師として高い才能があったからね。尚更だよ」", 1)
PRINTL
PRINTFORML それはそうだけど、他にも道はあったんじゃないか？
PRINTFORML 冒険者って言うと聞こえは良いけど、実際は後ろ盾も保証もなにもない不安定なものだし
PRINTFORMW いくら魔法が使えなくても、ハーベスト家の長女ならいくらでも安全な立場や仕事が得られたんじゃないか？
PRINTL
CALL KJ_PRINT(対象,@"「あー、うん。平時ならそうだったかもね」", 1)
PRINTL
PRINTFORML 平時ならって……ああ。もしかして、リナシメントか？
PRINTFORML ノアレルム共和国の、古帝国の国土――レルム半島南部を取り戻すための、度重なる遠征
PRINTFORMW ずっとぐだぐだに迷走してたけれど、なぜか最近は妙に熱が入っているみたいだね
PRINTL
CALL KJ_PRINT(対象,@"「そうだね。さて、ここで問題です」", 1)
CALL KJ_PRINT(対象,@"「魔法が使えないけれど、剣技はそれなりにできる」", 1)
CALL KJ_PRINT(対象,@"「そんな、古帝国の時代から続く由緒正しき家の長女がいたとします」", 1)
CALL KJ_PRINT(対象,@"「ちなみに、その魔法が使えない長女には、魔術師として高い素養を持つ弟と妹がいます」", 1)
PRINTL
PRINTFORMW なるほど。下手したら体の良い旗印にされて、前線送りにされかねない……か
PRINTL
CALL KJ_PRINT(対象,@"「うん、お父様はそれを危惧したの。考えすぎだって言う声もあったけどね」", 1)
PRINTL
PRINTFORML 真っ当な父親なら、娘を不毛な遠征に送り出されることを心配するのは当たり前だろう
PRINTFORMW 家の発展や維持のためなら、時に非情な判断も求められるかもしれないけれど、この場合はそれでもない
PRINTL
CALL KJ_PRINT(対象,@"「冒険者以外にもいろいろ考えはあったんだけどね」", 1)
CALL KJ_PRINT(対象,@"「商人になるとか、ハーベスト家で表に出ずに事務方として働くとか、他にもいろいろ」", 1)
CALL KJ_PRINT(対象,@"「でも、商人といっても魔術師として続いてきたハーベスト家には、商売のノウハウもないし」", 1)
CALL KJ_PRINT(対象,@"「事務方として働くのも、当面は良いにしても、将来を考えるとね」", 1)
PRINTL
PRINTFORML 父親が当主の間は良くても、弟や妹が当主になった後か
PRINTFORML 魔法以外は優秀な姉が家臣としていると……やりにくいのはありそうだな
PRINTFORMW フィーの明るさと性格なら、やって行けそうな気もするけれど
PRINTL
CALL KJ_PRINT(対象,@"「あとはどこかに嫁入りって考えもあったんだけど」", 1)
CALL KJ_PRINT(対象,@"「やっぱり魔術師の家の、魔法が使えない長女っていう曰く付きだと、それもなかなかね」", 1)
PRINTL
PRINTFORMW そうなのか……こんなに素敵な女の子なのにな
PRINTL
CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%、どうかしたの？」", 1)
PRINTL
PRINTFORMW いや、すまない。なんでもないよ
PRINTL
CALL KJ_PRINT(対象,@"「心配しないで。私は望んで冒険者になったんだから」", 1)
CALL KJ_PRINT(対象,@"「%ANAME(MASTER)%も見たでしょ？　あの開拓村の人達」", 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(対象,@"「冒険者なのか、野盗なのか分からないような人達だっていっぱいいるし」", 1)
CALL KJ_PRINT(対象,@"「それでも、あの開拓村にいたような冒険者さん達」", 1)
CALL KJ_PRINT(対象,@"「それに、%ANAME(MASTER)%のような素敵な冒険者だってたしかにいるんだもん」", 1)
PRINTL
PRINTFORMW いや、自分はそんなんじゃ――
PRINTL
CALL KJ_PRINT(対象,@"「だからね、私もあの人達や、%ANAME(MASTER)%のような偉大な冒険者になりたいって思うの」", 1)
CALL KJ_PRINT(対象,@"「そんな冒険者がいっぱい出てきたら……素敵でしょ？」", 1)
PRINTL
PRINTFORML ……まったく。敵わないな、フィーには
PRINTFORMW 彼女の信頼は裏切れない。なら少しでも立派な冒険者らしく見られるようにしないとな
PRINTL
PRINTFORMW だた、フィー。一つだけ言っておきたいことがある
PRINTL
CALL KJ_PRINT(対象,@"「なに？　%ANAME(MASTER)%？」", 1)
PRINTL
PRINTFORMW フィーは既に偉大な冒険者だって、そう思うよ
PRINTL
CALL KJ_PRINT(対象,@"「……ふえ？　ええっ！？」", 1)
PRINTL
PRINTFORML 大げさに照れて手をぶんぶんと振るフィーを見て、自然と笑みがこぼれる
PRINTFORMW これくらいの意趣返しは良いだろう。心の中でそう、つぶやいた

;好感度+100
CFLAG:対象:好感度 += 100

PRINTW

K9_DFLAG_冒険者 = 2
RETURN 1


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

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

;NAME_TO_CHARAはキャラクター識別名を参照する(CSVのCSTR:99に設定されている名前)
ソーニャ_ID = NAME_TO_CHARA("UC_ソーニャ")
シルフィーユ_ID = NAME_TO_CHARA("UC_シルフィーユ")

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_剣と魔法 == 2
	RETURN 0

;デイリー「シルフィーユの魔法」が発生済みの場合は実行
SIF K9_DFLAG_シルフィーユの魔法 != 2
	RETURN 0

;ソーニャの好感度が750以上だと発生する
SIF CFLAG:ソーニャ_ID:好感度 < 750
	RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

RETURN 1

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

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;---------------------
@KOJO_DAILY_K9_SWORD_AND_SORCERY(対象)
#DIM 対象
VARS ソーニャ = "UC_ソーニャ"
VARI ソーニャ_ID

VARS シルフィーユ = "UC_シルフィーユ"
VARI シルフィーユ_ID

ソーニャ_ID = NAME_TO_CHARA(ソーニャ)
シルフィーユ_ID = NAME_TO_CHARA(シルフィーユ)

VARS TEXT

{
	TEXT '= @"
		とある、平和でのどかな日の午後
		ソーニャとフィーはソファに座りながら、魔法談義に花を咲かせていた[$W]

		"
}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(ソーニャ_ID, "[感情:通常][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:喜][サイズ:180px][POS_X:200px]",,1)

{
	TEXT '= @"
		[%ソーニャ%]:「……驚いた。フィーの魔法に対する見識は、専門の魔術師と比べても引けをとらない……ね？」[$W]

		[%シルフィーユ%]:「子供の頃は魔術師を目指していたからね。それに、魔術師を諦めてからは、剣で魔術師と戦うことを想定した訓練もしていたし」
		[%シルフィーユ%]:「魔術師に対抗するには、それこそ魔法の知識は欠かせないでしょ？　だから魔法についての勉強は続けていたんだ」[$W]

		[%シルフィーユ%]:「魔法が使えなくても、先生からマナの保有量がとっても多いってことは言われていたから、有効活用できないかなって諦めの悪い努力もしたりね」
		[%シルフィーユ%]:「でも、やっぱりソーニャに比べたら全然だよ。やっぱりソーニャはすごいなあ」[$W]

		[%ソーニャ%]:「他のことならともかく、魔法に関しては譲れないから……フィーにだって負けないよ？」[$W]

		そう言い切るソーニャの表情には、普段の気弱な彼女とは違う、魔法に対する確固たる矜持が感じられた
		やはり彼女は根っからの魔術師なのだろう[$W]

		[%ソーニャ%]:「……これ、おいしいね。フィーの手料理はいつでもおいしい……」[$W]

		[%シルフィーユ%]:「そう？　ふふっ、ソーニャに喜んでもらえて嬉しいなぁ」[$W]

		と思っていたら、フィーの作ったサンドイッチを食べて、ふにゃっと表情を和らげるソーニャさん
		……まあ、生粋の魔術師であってもサンドイッチに夢中になることもあるだろう。たぶん[$W]

		まったく、なんだかんだソーニャもまだまだお子様だな[$W]

		[%ソーニャ%]:「……サンドイッチ二刀流なんてしてる%ANAME(MASTER)%にだけは、言われたくないかな」[$W]

		[%シルフィーユ%]:「あーもう、お行儀の悪いことしないの、%ANAME(MASTER)%。めっ」[$W]

		フィーにおでこをつつかれてしまった[$W]

		"
}

CALL PRINT_DIAG(TEXT)

{
	TEXT '= @"
		たしかにフィーの言う通り、両手に1つずつサンドイッチを持って食べるのは、行儀が悪いだろう[$W]
		だがフィーの作ったサンドイッチは我のものだ！　ソーニャにも誰にも譲らん、譲らんぞおおおぉ！[$W]

		[%シルフィーユ%]:「%ANAME(MASTER)%、食べている最中に大声出さないの。お行儀悪いでしょ？」[$W]

		誠に申し訳ありませんでした！[$W]

		即座にフィーに謝り倒すことになった自分であった[$W]

		[%ソーニャ%]:「%ANAME(MASTER)%は……弱いね」[$W]

		シンプルかつ的確なソーニャの言葉が胸に痛い！？[$W]

		[%ソーニャ%]:「ふふっ……大丈夫、ちょっとした冗談だよ……？」[$W]

		冗談か、見事にやられたぞ。まさかソーニャが冗談言うとはなぁ[$W]

		[%ソーニャ%]:「%ANAME(MASTER)%とフィーの二人を見てたら、こうなるよ……？」[$W]

		[%シルフィーユ%]:「私のせいでもあった！？」[$W]

		[%ソーニャ%]:「安心して、フィー……これも冗談」[$W]

		[%シルフィーユ%]:「ふふっ、そっかそっか。ソーニャはお茶目さんだなぁ」[$W]

		[%ソーニャ%]:「フィーだからだよ？　フィーはいつも優しいし、これくらいの冗談は笑顔で許してくれるから……」[$W]

		ソーニャも大分ここになじんできた感があるなあ。フィーという同じ魔術師の友人もできて、なによりだ。[$W]

		[%ソーニャ%]:「フィーにはいつも助けてもらっている……ね。物静かな私にも、こうやって話しかけてくれるし……」[$W]
		[%ソーニャ%]:「冒険のときも、剣を持って先頭で私達の盾になってくれる……だから、私も安心して魔法に集中できるから……」
		[%ソーニャ%]:「外に出て分かったけど……後方の魔術師のことを理解して、動いてくれる剣士って……本当に貴重だよ？」[$W]

		[%シルフィーユ%]:「ありがとう。でも、それを言うなら私こそソーニャにはいっぱい助けてもらっているよ？」
		[%シルフィーユ%]:「ソーニャといると落ち着くし、ソーニャの知識や知見にはとっても頼りにさせてもらっているし」[$W]

		[%シルフィーユ%]:「それに、ソーニャが魔法で助けてくれるから、私は前で安心して戦えているから」[$W]
		[%シルフィーユ%]:「だから――こちらこそありがとうね。ソーニャ」[$W]

		[%ソーニャ%]:「フィーは真っすぐ……なんだか……照れるね？」[$W]

		[%シルフィーユ%]:「うーん、そうかなあ？　私もちょっと照れるところあるよ？」[$W]

		[%ソーニャ%]:「でも、なんだかうらやましい……な。そういうフィーの真っすぐで明るいところ」[$W]

		[%シルフィーユ%]:「私も、ソーニャの落ち着いた知的な物腰に憧れるよ？　私にはちょっと真似できないなぁ」[$W]

		[%ソーニャ%]:「そうかな……？　でも、フィーにも一緒にいると安らぐ雰囲気があるよ……？」[$W]
		[%ソーニャ%]:「なんて言うか……フィーには包容力……？　があると思う」[$W]

		[%シルフィーユ%]:「包容力かぁ……一応、妹と弟の面倒を見ていたりもしていたから、それもあるかも？」[$W]

		[%ソーニャ%]:「性格の影響かもしれないけれど、フィーのマナは温かくて、安らぐ感じがする……」[$W]

		[%シルフィーユ%]:「うーん、マナについては自分でも良く分からないけれど……でも、ソーニャに褒めてもらえると嬉しいな」[$W]

		ふむ……フィーの包容力か……
		たしかにフィーにはそういう面もあるかもしれないな[$W]

		[%シルフィーユ%]:「%ANAME(MASTER)%までそう言われると、嬉しいけどなんだか恥ずかしいなぁ」[$W]
		[%シルフィーユ%]:「でも、ありがとう。%ANAME(MASTER)%にも褒めてもらえて嬉しい」[$W]

		というわけで、包容力のあるフィーさんに、もう一つだけサンドイッチを――[$W]

		[%シルフィーユ%]:「だーめ。夕ご飯が食べられなくなるでしょ？」[$W]

		そうして、フィーにまたおでこをつつかれてしまう[$W]

		[%ソーニャ%]:「くすっ……%ANAME(MASTER)%とフィーは……見てて楽しい……ね？」[$W]

		[%シルフィーユ%]:「それはそれでなんだか複雑だなぁ……悪い気はしないけどね。ねっ、%ANAME(MASTER)%？」[$W]

		そう言って、フィーはこちらに笑顔を向ける[$W]

		よし、それならソーニャも一緒に、フィーにおでこをつつかれる様なことしようぜ！[$W]

		[%ソーニャ%]:「……それは遠慮しておく、かな」[$W]

		そう返事をしたソーニャは、穏やかな笑顔を浮かべていた[$W]

		"
	}

CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(ソーニャ_ID, "[感情:幸][サイズ:180px][POS_X:0]",,0)
CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:幸][サイズ:180px][POS_X:200px]",,1)

;ソーニャとシルフィーユの知識経験値を加算
CALL PRINT_ADD_EXP(ソーニャ_ID, "知識経験値", 150, 1)
CALL TRAIN_AUTO_ABLUP(ソーニャ_ID, 2)

CALL PRINT_ADD_EXP(シルフィーユ_ID, "知識経験値", 150, 1)
CALL TRAIN_AUTO_ABLUP(シルフィーユ_ID, 2)

PRINTW

K9_DFLAG_剣と魔法 = 2


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

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

;NAME_TO_CHARAはキャラクター識別名を参照する(CSVのCSTR:99に設定されている名前)
シルフィーユ_ID = NAME_TO_CHARA("UC_シルフィーユ")

;当デイリー発生済みの場合は実行せず
SIF K9_DFLAG_夜の語らい == 2
	RETURN 0

;前デイリー「恋人として」発生済み
SIF K9_DFLAG_恋人として != 2
	RETURN 0

;好感度2000を超えると発生する
SIF CFLAG:シルフィーユ_ID:好感度 < 2000
	RETURN 0

;前提として無限背塔の攻略が必要
SIF !QST_SV_QUEST_FLAG:15
    RETURN 0

RETURN CHECK_KOJO_DAILY_HAPPEN(対象, 1, 0)

RETURN 1

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

;---------------------
;本体
;イベントが発生した場合は1、発生しなかった場合は0を返す
;発生しなかったというのは例えば、特定条件を満たすキャラからランダムに一人選ぶデイリーで、そもそもその条件を満たすキャラが一人もいないみたいなとき
;---------------------
@KOJO_DAILY_K9_NIGHT_TALK(対象)
#DIM 対象
VARS シルフィーユ = "UC_シルフィーユ"
VARI シルフィーユ_ID

シルフィーユ_ID = NAME_TO_CHARA(シルフィーユ)

VARS TEXT

{
	TEXT '= @"
		冒険からの帰り道の夜[$W]\n
		明かりといえば、空に輝く月と星だけの、夜の闇[$W]\n
		%ANAME(MASTER)%はたき火の近くで座りながらも、辺りへの警戒を続ける[$W]\n
		\n
		仲間はみんな寝静まっている\n
		魔物との連戦を終えた帰りだ。疲れているのだろう[$W]\n
		\n
		しかし、ここは人の住む町や村ではない。安全が保証されない、道中でテントを設立しただけの野営地だ\n
		魔物に盗賊に、野生の動物達。警戒しなければならない相手はいくらでもいる\n
		交代で見張りを立てるのは当然のことだ[$W]\n
		\n
		だが必要なことではあるが、魔物との連戦を終えた後に移動し、疲れた身\n
		心身ともに疲れたまま、一人で夜の見張りをするのはどうしたってきついものがあった[$W]\n
		\n
		ふとすると、眠気や疲れに警戒が疎かになりかける[$W]\n
		これではいけない。危険地帯を離れたとはいえ、安全とは言い切れない場所ではあるのだ\n
		一瞬の気の緩みが自分や仲間を危険にさらすことに繋がりかねない[$W]\n
		%ANAME(MASTER)%は顔を軽く叩き、気を入れ直す[$W]\n
		\n
		[%シルフィーユ%]:「お疲れ様、%ANAME(MASTER)%。良かったら、これどうぞ」[$W]\n
		\n
		そのとき、ふと聞こえた仲間の声。[$W]\n
		%ANAME(MASTER)%は顔をそちらに向ける[$W]\n
		\n
		"
}
CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:通常][サイズ:180px][POS_X:0]",,1)

{
	TEXT '= @"
		そこにいたのは、%ANAME(MASTER)%のカップを持ったフィーだった\n
		カップからは湯気が立っている[$W]\n
		\n
		フィーからカップを受け取り、お礼を言う[$W]\n
		\n
		[%シルフィーユ%]:「ふふっ、どういたしまして」[$W]\n
		\n
		そう言って、笑いかけてくれるフィー[$W]\n
		寝なくて大丈夫なのか、そうフィーに問いかける[$W]\n
		\n
		[%シルフィーユ%]:「うん、私が元気なのが取り柄だからね。ちょっとぐらいなら大丈夫！」[$W]\n
		[%シルフィーユ%]:「先生にみっちり鍛えられたおかげで、体力には自信があるから！」[$W]\n
		\n
		こちらの言葉に、フィーは明るく返してくれた[$W]\n
		\n
		"
}
CALL PRINT_DIAG(TEXT)

{
	TEXT '= @"
		[%シルフィーユ%]:「%ANAME(MASTER)%こそ、ありがとうね」[$W]\n
		\n
		ありがとうって……なにがだい？[$W]\n
		\n
		[%シルフィーユ%]:「私達が疲れているからって、最初の見張りを買って出てくれたでしょ？」[$W]\n
		\n
		それは文字通り買いかぶりだ。[$W]\n
		ただ途中で起こされるのが嫌だから、一番最初の見張りをしようと思っただけだぞ[$W]\n
		\n
		[%シルフィーユ%]:「ふふっ、そっか。それじゃあそういうことにしておくね」[$W]\n
		\n
		ああ、そうしてくれ[$W]\n
		\n
		こちらの言葉をまるで信じておらず、好意で最初の見張り役を受けたと疑わないフィー[$W]\n
		まったく、この子にも困ったものだ\n
		意趣返しとばかりに、フィーの頭を軽くなでる[$W]\n
		\n
		[%シルフィーユ%]:「むー。またそうやって子供扱いする」[$W]\n
		\n
		すまない、撫でがいのある髪がそこにあったから……つい[$W]\n
		\n
		[%シルフィーユ%]:「もう、それどういう髪の毛なのっ！？」[$W]\n
		\n
		あははっ、それはフィーの髪だろう？　自分の髪のこともわからないなんて、フィーさんはお茶目ですなあ[$W]\n
		\n
		[%シルフィーユ%]:「なんですとぉ！？　こうなったら%ANAME(MASTER)%の髪をなでさせてもらうんだからっ！」[$W]\n
		\n
		よーしっ、ならば我の髪を存分になでさせてやろう！　泣いて感謝するとよいわ！[$W]\n
		\n
		[%シルフィーユ%]:「わーい！　よーしよしよしっ！」[$W]\n
		\n
		楽しそうに髪をなでてくるフィー。[$W]\n
		なお、ここは冒険の帰りの野営地で、今は真夜中で交代で見張りしている途中である[$W]\n
		\n
		……こんなところで、周りを警戒しつつお互いに髪をなで合って……いったい何をやっているんだろうな[$W]\n
		\n
		[%シルフィーユ%]:「急に素に戻った！？」[$W]\n
		\n
		飲み物、ありがとうな。フィーも見張りがあるんだから、早く戻って少しでも寝ておいた方がいいぞ[$W]\n
		\n
		[%シルフィーユ%]:「さっきまで嬉々として私の髪をなでて、髪をなでられて喜んでいた人のセリフじゃないよっ！？」[$W]\n
		\n
		こらこら、フィーさんや。みんなが起きるから大声を出しちゃいけませんぜ[$W]\n
		\n
		[%シルフィーユ%]:「あっ、ごめん……え？　私のせい？」[$W]\n
		\n
		冗談は置いといて……本当にありがとうな。おかげで気が休まった[$W]\n
		\n
		[%シルフィーユ%]:「うん、どういたしまして」[$W]\n
		\n
		そう言い、穏やかに笑いかけてくれるフィー[$W]\n
		そのまま自然に、自分はーー
		\n
		"
}

CALL PRINT_DIAG(TEXT)

CALL ASK_MULTI("悩みを打ち明けていた", "くだらない話に興じ始めた","フィーの手料理を食べたいとおねだりした")

SELECTCASE RESULT
    CASE 0
		{
			TEXT '= @"
				\n
				[%シルフィーユ%]:「……ねえ、%ANAME(MASTER)%。その、間違っていたらごめんね」[$W]\n
				\n
				どうしたんだ、改まって？[$W]\n
				\n
				[%シルフィーユ%]:「あまり、一人で抱え込んじゃだめだよ。私達だって、いるんだから」[$W]\n
				\n
				……抱え込むなって、なんだ？　別にフィーが心配するようなことは[$W]\n
				\n
				[%シルフィーユ%]:「でも、%ANAME(MASTER)%はずっと無理しているみたいだよ？」[$W]\n
				[%シルフィーユ%]:「少なくとも、私からはそう見えた」[$W]\n
				[%シルフィーユ%]:「私達を気遣って、危険な役目や大変なことを自分から引き受けて、いつだって私達に気を配って……」[$W]\n
				[%シルフィーユ%]:「%ANAME(MASTER)%がいつか倒れちゃうんじゃないかって、心配で……」[$W]\n
				\n
				ふう……フィーに心配かけるようじゃ、まだまだだなぁ[$W]\n
				\n
				[%シルフィーユ%]:「それは、仕方ないよ。領主様に、私達パーティーのリーダーだもん」[$W]\n
				[%シルフィーユ%]:「片方だけでも大変なのに、どっちもこなしている%ANAME(MASTER)%は、とても立派だと思う」[$W]\n
				[%シルフィーユ%]:「むしろ、私が頼りないから%ANAME(MASTER)%に負担をかけているんじゃないかってーー」[$W]\n
				\n
				それはない。フィーのおかげでとても助かっている[$W]\n
				\n
				[%シルフィーユ%]:「……%ANAME(MASTER)%」[$W]\n
				\n
				ただ、不安なんだ[$W]\n
				領主も、冒険者のリーダーも\n
				どちらも、自分が少し判断を誤ったり、何かを見落とせば……仲間に被害を被ることになる[$W]\n
				場合によっては、自分のミスや油断で、仲間の誰かが命を落とすことだって……そう考えると、いつだって気を抜くわけにいかない[$W]\n
				\n
				[%シルフィーユ%]:「それは……たしかにそうだけど、誰だって完璧にはできないと思う」[$W]\n
				[%シルフィーユ%]:「あらゆる困難や物事から、仲間を完全に守るリーダーなんて、どこにだっていないよ」[$W]\n
				\n
				ああ、分かっている[$W]\n
				でも、自分が好きでやっていることだ\n
				自分のわがままにフィーたちを付き合わせている以上、責任を持つのは最低限の義務だろう？[$W]\n
				……いや、この言い方は卑怯だな。仲間の誰一人だって、不幸にしたくない。それが自分の願いなんだ[$W]\n
				\n
				[%シルフィーユ%]:「……そっか。%ANAME(MASTER)%は、優しくて……強いね」[$W]\n
				[%シルフィーユ%]:「皆のことを思ってくれて、背負ってくれてる」[$W]\n
				[%シルフィーユ%]:「でもね、%ANAME(MASTER)%。私だって、%ANAME(MASTER)%が辛いのは、嫌だよ？」[$W]\n
				\n
				……フィー[$W]\n
				\n
				[%シルフィーユ%]:「%ANAME(MASTER)%の背負っている思いは、分かった」[$W]\n
				[%シルフィーユ%]:「だったら……私にも%ANAME(MASTER)%のこと、支えさせて欲しいな」[$W]\n
				[%シルフィーユ%]:「だって、私達は仲間でしょ。もっと頼って欲しいし……偶には弱音だって見せてほしいな」[$W]\n
				[%シルフィーユ%]:「少なくても、私には……ね？」[$W]\n
				\n
				……ああ、ありがとう。フィー[$W]\n
				\n
				[%シルフィーユ%]:「ふふっ、どういたしまして」[$W]\n
				[%シルフィーユ%]:「それと、話してくれてありがとうね」[$W]\n
				\n
				……こちらこそ、聞いてくれてありがとうな[$W]\n
				\n
				嫌な顔一つせずに、こちらの悩みを聞いてくれて、優しく受け入れてくれたフィー
				そんな彼女が愛おしくなって、つい後ろから抱きしめる[$W]\n
				\n
				[%シルフィーユ%]:「……ふえ？　どうしたの、%ANAME(MASTER)%？」[$W]\n
				\n
				すまない。なんか、フィーをこうして抱きしめたくなったんだ[$W]\n
				こんな時間で申し訳ないけれど、少しだけこうしててもいいか？[$W]\n
				\n
				[%シルフィーユ%]:「%ANAME(MASTER)%……うん、いいよ」[$W]\n
				[%シルフィーユ%]:「私も%ANAME(MASTER)%とこうしていると、温かい気持ちになれるから」[$W]\n
				\n
				そう言うと、フィーは背中をこちらに預けてくる[$W]\n
				そうして、しばし見張りを続けながらフィーのぬくもりを感じ続けていた[$W]\n
				\n
				"
		}
    CASE 1
		{
			TEXT '= @"
				なあ、フィー。以前から気になっていたことがあるんだが[$W]\n
				\n
				[%シルフィーユ%]:「なになに、何が気になっているの？」[$W]\n
				\n
				無限背塔って……なんだ？[$W]\n
				\n
				[%シルフィーユ%]:「……ふえ？　無限背塔がなにって……私達が行ってきたところでしょ？」[$W]\n
				[%シルフィーユ%]:「レルム半島の西側にあって、いつからあるのか、誰が建てたのか分からないところだって」
				\n
				いや、それは分かる。そういうことじゃなくてだ[$W]\n
				気になるのは名前なんだ。まず、背の塔ってなんだ？[$W]\n
				\n
				[%シルフィーユ%]:「え？　背塔……つまり、塔の裏側？　上じゃなくて、下に続いているから背の塔……とか？」[$W]\n
				\n
				でも、それなら無限迷宮で良いんじゃないか？　なんで塔なんだ？[$W]\n
				\n
				[%シルフィーユ%]:「いやまあ、たしかにそうかもしれないけど」[$W]\n
				\n
				次に気になるのは、なんで無限なんだ？　どこまでも続いているのか？　終わりがないのかあの塔は？[$W]\n
				\n
				[%シルフィーユ%]:「さすがに無限ってことはないんじゃない？」[$W]\n
				[%シルフィーユ%]:「たしかに上位の冒険者さん何人もすごい深くまで潜ったけど、最下層にはだどりつけていないみたいだけど」[$W]\n
				\n
				更に更に、低層部ってなんだ？　無限なんだったら、どこまでが低層部ってなんで区別しているんだ？[$W]\n
				低層部があるなら、中層部、高層部もあるのか？[$W]\n
				\n
				[%シルフィーユ%]:「……%ANAME(MASTER)%」
				\n
				どうした？[$W]\n
				\n
				[%シルフィーユ%]:「そんなこと聞かれても、私には分からないでありますっ！」[$W]\n
				\n
				奇遇だな！　こっちもさっぱり分からないぜ！[$W]\n
				よし、この話は終了！　おしまいっ！[$W]\n
				\n
				[%シルフィーユ%]:「そもそもなんで私に聞いたの？」[$W]\n
				\n
				いやー、フィーの反応が知りたくて[$W]\n
				\n
				[%シルフィーユ%]:「はあ……まあ、別に良いけどね。%ANAME(MASTER)%と他愛ない話するのも楽しいし」[$W]\n
				\n
				それにしても、無限背塔とか、背の話をしていたら、フィーを背中から抱きしめたくなってきたなぁ[$W]\n
				というわけで、フィーさんを背中からぎゅーっと[$W]\n
				\n
				[%シルフィーユ%]:「その流れは無理があるんじゃないかなっ！？」[$W]\n
				\n
				いやすまない。フィーをこうやって抱きしめていると、気持ちが安らぐんだ[$W]\n
				こんな時間で申し訳ないけれど、少しだけこうしててもいいか？[$W]\n
				\n
				[%シルフィーユ%]:「もう……しかたないなあ。うん、いいよ」[$W]\n
				[%シルフィーユ%]:「私も%ANAME(MASTER)%とこうしていると、温かい気持ちになれるから」[$W]\n
				\n
				そう言うと、フィーは背中をこちらに預けてくる[$W]\n
				そうして、しばし見張りを続けながらフィーのぬくもりを感じ続けていた[$W]\n
				\n
				"
		}
    CASE 2
		{
			TEXT '= @"
				なあ、フィー。領地に帰ったら、お願いがあるんだ[$W]\n
				\n
				[%シルフィーユ%]:「なになに、どんなお願い？」[$W]\n
				\n
				帰ったら、フィーの手料理が食べたい[$W]\n
				ハンバーグも良いけど……できれば、ふわふわのオムライスがいいな[$W]\n
				\n
				[%シルフィーユ%]:「ふふっ、りょーかいっ！　腕を振るって作るからねっ！」[$W]\n
				\n
				ああ、楽しみにしてる。フィーの手料理を食べると、幸せな気分になれるんだ[$W]\n
				\n
				[%シルフィーユ%]:「えへへ、そう言ってくれると嬉しいな」[$W]\n
				[%シルフィーユ%]:「%ANAME(MASTER)%が私の料理を食べて幸せって言ってくれるのが、とっても嬉しいの」[$W]\n
				\n
				しかし、フィーにしてもらってばかりだと悪いからな[$W]\n
				フィーもなにかやってもらいたいこととかないか？[$W]\n
				\n
				[%シルフィーユ%]:「え、なんでも良いの？」[$W]\n
				\n
				できることならね。さすがに無理なことはできないぞ？[$W]\n
				\n
				[%シルフィーユ%]:「もう、無理なお願いなんてしないよ？」[$W]\n
				[%シルフィーユ%]:「それじゃあねぇ……%ANAME(MASTER)%と二人でお出かけしたいな」[$W]\n
				\n
				そんなことでいいのか？[$W]\n
				\n
				[%シルフィーユ%]:「そんなことじゃないよ、私がしたいことだもん」[$W]\n
				\n
				そういう意味じゃない[$W]\n
				それはこっちだってしたいことになるから、お願いされなくても、ぜひするぞってだけだよ[$W]\n
				\n
				[%シルフィーユ%]:「ふふっ、そっか。うん、それでも私は%ANAME(MASTER)%とお出かけしたいな」[$W]\n
				\n
				そっか。じゃあデートプラン考えておかないとな[$W]\n
				\n
				[%シルフィーユ%]:「一緒に考えようよ、その方が楽しいと思うな」[$W]\n
				\n
				そうだな、そうしようか[$W]\n
				\n
				[%シルフィーユ%]:「うんっ！　やったーっ！　%ANAME(MASTER)%とのお出かけ、楽しみだなぁ」[$W]\n
				\n
				そう言って、無邪気にはしゃぐフィー[$W]\n
				\n
				そんな彼女が愛おしくなって、つい後ろから抱きしめる[$W]\n
				\n
				[%シルフィーユ%]:「……ふえ？　どうしたの、%ANAME(MASTER)%？」[$W]\n
				\n
				すまない。なんか、フィーをこうして抱きしめたくなったんだ[$W]\n
				こんな時間で申し訳ないけれど、少しだけこうしててもいいか？[$W]\n
				\n
				[%シルフィーユ%]:「%ANAME(MASTER)%……うん、いいよ」[$W]\n
				[%シルフィーユ%]:「私も%ANAME(MASTER)%とこうしていると、温かい気持ちになれるから」[$W]\n
				\n
				そう言うと、フィーは背中をこちらに預けてくる[$W]\n
				そうして、しばし見張りを続けながらフィーのぬくもりを感じ続けていた[$W]\n
				\n
				"
		}

ENDSELECT
CALL PRINT_DIAG(TEXT)

CALL DRAW_PORTRAIT(シルフィーユ_ID, "[感情:喜][口:笑い][サイズ:180px][POS_X:0]",,1)

{
	TEXT '= @"
		ふう……フィーの睡眠時間をたくさん削ってしまったな[$W]\n
		この埋め合わせはどうするべきか……[$W]\n
		\n
		また仲間のことを考える自分自身に苦笑いしつつ、今回のことを考えるのはどこか楽しんでいた[$W]\n
		"
}
CALL PRINT_DIAG(TEXT)

PRINTW

K9_DFLAG_夜の語らい = 2